diff --git a/B4A/AutoBackups/Backup medicomed 2024-10-03 13.05.zip b/B4A/AutoBackups/Backup medicomed 2024-10-25 09.49.zip similarity index 99% rename from B4A/AutoBackups/Backup medicomed 2024-10-03 13.05.zip rename to B4A/AutoBackups/Backup medicomed 2024-10-25 09.49.zip index 2044114..72a9536 100644 Binary files a/B4A/AutoBackups/Backup medicomed 2024-10-03 13.05.zip and b/B4A/AutoBackups/Backup medicomed 2024-10-25 09.49.zip differ diff --git a/B4A/AutoBackups/Backup medicomed 2024-10-03 12.43.zip b/B4A/AutoBackups/Backup medicomed 2024-10-30 16.07.zip similarity index 99% rename from B4A/AutoBackups/Backup medicomed 2024-10-03 12.43.zip rename to B4A/AutoBackups/Backup medicomed 2024-10-30 16.07.zip index 55fdafb..1a56c14 100644 Binary files a/B4A/AutoBackups/Backup medicomed 2024-10-03 12.43.zip and b/B4A/AutoBackups/Backup medicomed 2024-10-30 16.07.zip differ diff --git a/B4A/AutoBackups/Backup medicomed 2024-11-04 12.16.zip b/B4A/AutoBackups/Backup medicomed 2024-11-04 12.16.zip new file mode 100644 index 0000000..26db53a Binary files /dev/null and b/B4A/AutoBackups/Backup medicomed 2024-11-04 12.16.zip differ diff --git a/B4A/AutoBackups/Backup medicomed 2024-11-04 12.31.zip b/B4A/AutoBackups/Backup medicomed 2024-11-04 12.31.zip new file mode 100644 index 0000000..330e1c1 Binary files /dev/null and b/B4A/AutoBackups/Backup medicomed 2024-11-04 12.31.zip differ diff --git a/B4A/C_Cliente.bas b/B4A/C_Cliente.bas index 7d8fab9..5273da9 100644 --- a/B4A/C_Cliente.bas +++ b/B4A/C_Cliente.bas @@ -156,6 +156,7 @@ Sub Class_Globals Private et_monto_venta As EditText Private b_can_monto_venta As Button Private b_gu_monto_venta As Button + Private p_inv As Panel End Sub 'You can add more parameters here. @@ -215,6 +216,7 @@ Sub B4XPage_Appear ' Wait For B4XPage_PermissionResult (Permission As String, resultC As Boolean) ' Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_WRITE_EXTERNAL_STORAGE) ' Wait For B4XPage_PermissionResult (Permission As String, resultC As Boolean) + p_inv.Width = Root.Width : p_inv.Height = Root.Height b_inicioFinVenta.Width = Root.Width LA_GPS.TextColor = Colors.Red LA_GPS.Text = "SIN UBICACION GPS" @@ -1029,7 +1031,8 @@ Private Sub b_clienteVenta_Click et_monto_venta.Text = "" p_monto_venta.Visible = True - + p_inv.BringToFront + p_inv.Visible = True End Sub Private Sub b_clinteSinVenta_Click @@ -1043,15 +1046,15 @@ Private Sub b_clinteSinVenta_Click c.Position = 0 clie_id = c.GetString("CUENTA") c.Close - - B4XPages.MainPage.skmt.ExecNonQuery("delete from NOVENTA where NV_CLIENTE In (select cuenta from cuentaa)") - B4XPages.MainPage.skmt.ExecNonQuery("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)") - - B4XPages.MainPage.skmt.ExecNonQuery("UPDATE kmt_info set gestion = 2 where CAT_CL_CODIGO In (select cuenta from cuentaa)") - - B4XPages.MainPage.skmt.ExecNonQuery2("UPDATE HIST_STAY_STORE set HSS_OUT = ? where HSS_OUT = 0 AND HSS_CODIGO In (select cuenta from cuentaa)", Array As Object(DateTime.Time(DateTime.Now))) - B4XPages.MainPage.skmt.ExecNonQuery2("UPDATE HIST_STAY_OUT set HSO_FIN = ? ", Array As Object(DateTime.Time(DateTime.Now))) - +' +' B4XPages.MainPage.skmt.ExecNonQuery("delete from NOVENTA where NV_CLIENTE In (select cuenta from cuentaa)") +' B4XPages.MainPage.skmt.ExecNonQuery("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)") +' + B4XPages.MainPage.skmt.ExecNonQuery("UPDATE kmt_info set gestion = 3 where CAT_CL_CODIGO In (select cuenta from cuentaa)") +' +' B4XPages.MainPage.skmt.ExecNonQuery2("UPDATE HIST_STAY_STORE set HSS_OUT = ? where HSS_OUT = 0 AND HSS_CODIGO In (select cuenta from cuentaa)", Array As Object(DateTime.Time(DateTime.Now))) +' B4XPages.MainPage.skmt.ExecNonQuery2("UPDATE HIST_STAY_OUT set HSO_FIN = ? ", Array As Object(DateTime.Time(DateTime.Now))) +' ToastMessageShow("Cliente con venta eliminado correctamente.", False) Catch @@ -1063,8 +1066,8 @@ End Sub Private Sub b_gu_monto_venta_Click - If et_monto_venta.Text = "" Or et_monto_venta.Text = "0" Then - ToastMessageShow("El monto de venta no puede ser vacío o 0.", True) + If et_monto_venta.Text.Trim = "" Or et_monto_venta.Text.Trim.StartsWith("0") Or et_monto_venta.Text.Trim = "0" Then + ToastMessageShow("El monto de venta no puede estar vacío o empezar con ceros.", True) Else Guardar_Click Subs.ventaNoVenta(usuario, Id_Almacen, ruta_tienda, "ConVenta", Subs.traeCliente, Subs.fechanormal(DateTime.Now), B4XPages.MainPage.lat_gps, B4XPages.MainPage.lon_gps, et_monto_venta.Text) @@ -1075,13 +1078,13 @@ Private Sub b_gu_monto_venta_Click clie_id = c.GetString("CUENTA") c.Close - B4XPages.MainPage.skmt.ExecNonQuery("delete from NOVENTA where NV_CLIENTE In (select cuenta from cuentaa)") - B4XPages.MainPage.skmt.ExecNonQuery("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)") +' B4XPages.MainPage.skmt.ExecNonQuery("delete from NOVENTA where NV_CLIENTE In (select cuenta from cuentaa)") +' B4XPages.MainPage.skmt.ExecNonQuery("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)") B4XPages.MainPage.skmt.ExecNonQuery("UPDATE kmt_info set gestion = 2 where CAT_CL_CODIGO In (select cuenta from cuentaa)") - B4XPages.MainPage.skmt.ExecNonQuery2("UPDATE HIST_STAY_STORE set HSS_OUT = ? where HSS_OUT = 0 AND HSS_CODIGO In (select cuenta from cuentaa)", Array As Object(DateTime.Time(DateTime.Now))) - B4XPages.MainPage.skmt.ExecNonQuery2("UPDATE HIST_STAY_OUT set HSO_FIN = ? ", Array As Object(DateTime.Time(DateTime.Now))) +' B4XPages.MainPage.skmt.ExecNonQuery2("UPDATE HIST_STAY_STORE set HSS_OUT = ? where HSS_OUT = 0 AND HSS_CODIGO In (select cuenta from cuentaa)", Array As Object(DateTime.Time(DateTime.Now))) +' B4XPages.MainPage.skmt.ExecNonQuery2("UPDATE HIST_STAY_OUT set HSO_FIN = ? ", Array As Object(DateTime.Time(DateTime.Now))) ToastMessageShow("Cliente con venta eliminado correctamente.", False) @@ -1090,10 +1093,14 @@ Private Sub b_gu_monto_venta_Click End Try p_monto_venta.Visible = False + p_inv.BringToFront + p_inv.Visible = False End If End Sub Private Sub b_can_monto_venta_Click p_monto_venta.Visible = False + p_inv.BringToFront + p_inv.Visible = False End Sub \ No newline at end of file diff --git a/B4A/C_Historico.bas b/B4A/C_Historico.bas index ccad2cd..a277a14 100644 --- a/B4A/C_Historico.bas +++ b/B4A/C_Historico.bas @@ -101,7 +101,7 @@ End Sub Private Sub B4XPage_CloseRequest As ResumableSub ' BACK key pressed ' Return True To close, False To cancel - B4XPages.ShowPage("Principal") + B4XPages.ShowPage("Cliente") Return False End Sub diff --git a/B4A/C_Principal.bas b/B4A/C_Principal.bas index 4d91fca..00102ed 100644 --- a/B4A/C_Principal.bas +++ b/B4A/C_Principal.bas @@ -219,7 +219,6 @@ Sub Class_Globals Private lblTitle As Label Private B_OK_PANEL5 As Button - Private p_principal As Panel Private p_mandaInfo As Panel End Sub @@ -306,6 +305,7 @@ End Sub Sub B4XPage_Appear '' LogColor("Revisa permisos Phone_State", Colors.Green) + B4XPages.MainPage.reqManager.Initialize(Me, Starter.server) Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_ACCESS_FINE_LOCATION) Wait For B4XPage_PermissionResult (Permission As String, Result As Boolean) If Result Then @@ -537,7 +537,20 @@ Sub Subir_Click Dim cmd As DBCommand cmd.Initialize cmd.Name = "UPDATE_MEDI_ACTUAL2_GPS" - cmd.Parameters = Array As Object(L_MONTOD.Text, L_CUANTOST.Text, l_cuantosc.Text,l_porvisitar.TEXT,c.GetString("hglat"),c.GetString("hglon"),batterystatus(0),LPT, STEYIN, STEYOUT,ALMACEN,l_ruta.Text ) +' L_MONTOD= Suma monto + 'L_CUANTOST = conteo de todo venta y no venta +' l_cuantosc = conteo que tiene mponto + Private cursor As Cursor = B4XPages.MainPage.skmt.ExecQuery("SELECT Sum(montoVentav) AS MONTO_VENTA FROM VENTA_NO_VENTA") + cursor.Position = 0 + Private cursor2 As Cursor = B4XPages.MainPage.skmt.ExecQuery("SELECT COUNT (*) AS CUENTA_TODO FROM VENTA_NO_VENTA") + cursor2.Position = 0 + Private cursor3 As Cursor = B4XPages.MainPage.skmt.ExecQuery("SELECT COUNT (*) AS CUENTA_VENTA FROM VENTA_NO_VENTA WHERE montoVentaV <> 0") + cursor3.Position = 0 + + cmd.Parameters = Array As String(cursor.GetString("MONTO_VENTA"), cursor2.GetString("CUENTA_TODO"), cursor3.GetString("CUENTA_VENTA"),l_porvisitar.TEXT,c.GetString("hglat"),c.GetString("hglon"),batterystatus(0),LPT, STEYIN, STEYOUT,ALMACEN,l_ruta.Text ) + cursor.Close + cursor2.Close + cursor3.Close B4XPages.MainPage.reqManager.ExecuteCommand(cmd , "update_gps") Next End If @@ -600,32 +613,43 @@ Sub Subir_Click ' Log($"'${almacenb}', '${usuariob}', '${rutab}', '${eventob}', '${clienteb}', '${nombreCliente}','${ iniciob}', '${finb}','${ latitudb}','${ longitudb}', '${precision}', '${motivonoventa}', '${motivonovisita}', '${fechab}'"$) ' TMP_ALMACEN, TMP_USUARIO, TMP_RUTA, TMP_EVENTO, TMP_ID_CLIENTE, TMP_NOMBRE_CLIENTE, TMP_INICIO, TMP_FINAL, TMP_LATITUD, TMP_LONGITUD, TMP_PRESICION, TMP_MOTIVO_NO_VENTA, TMP_MOTIVO_NO_VISITA, TMP_FECHA_SINC, TMP_FECHA_MOVIL cmd.Parameters = Array As Object(h.GetString("almacenb"), h.GetString("usuariob"), h.GetString("rutab"), eventob, clienteb, nombreCliente, h.GetString("iniciob"), finb, h.GetString("latitudb"), h.GetString("longitudb"), h.GetString("precision"), h.GetString("motivonoventa"), h.GetString("motivonovisita"), h.GetString("fechab")) - reqManager.ExecuteCommand(cmd , "mandaBitacora") + B4XPages.MainPage.reqManager.ExecuteCommand(cmd , "mandaBitacora") Loop Log("MANDAMOS BITACORA") 'BITACORA (PROYECTO GPS) +' Private h As ResultSet = B4XPages.MainPage.skmt.ExecQuery($"select * from VENTA_No_VENTA"$) +' Do While h.nextrow +' cmd.Initialize +' Private eventov As String = h.GetString("eventov") +' cmd.Name = "insert_venta_no_venta_MEDICOMED" +' Private clientev As String = h.GetString("clientev") +' Private nombreClientev As String =Subs. traeNombreCliente(h.GetString("clientev")) +' If eventov = "Llega a almacen" Then +' nombreClientev = "BOLETA" +' clientev = "" +' End If +' If eventov = "Salida almacen" Then nombreClientev = "CHECKLIST" +' If eventov = "Fin Día" Then nombreClientev = "FIN DIA" +' If eventov = "Carga día" Then nombreClientev = "CARGA DIA" +' cmd.Parameters = Array As Object(h.GetString("usuariov"), h.GetString("almacenv"), h.GetString("rutav"), eventov, clientev, h.GetString("iniciov"), h.GetString("latitudv"), h.GetString("longitudv"), nombreClientev) +' B4XPages.MainPage.reqManager.ExecuteCommand(cmd , "ventaNoVenta") +' Loop + Private h As ResultSet = B4XPages.MainPage.skmt.ExecQuery($"select * from VENTA_No_VENTA"$) - Do While h.nextrow - cmd.Initialize - Private eventov As String = h.GetString("eventov") - cmd.Name = "insert_venta_no_venta_MEDICOMED" - Private clientev As String = h.GetString("clientev") - Private nombreClientev As String =Subs. traeNombreCliente(h.GetString("clientev")) - If eventov = "Llega a almacen" Then - nombreClientev = "BOLETA" - clientev = "" - End If - If eventov = "Salida almacen" Then nombreClientev = "CHECKLIST" - If eventov = "Fin Día" Then nombreClientev = "FIN DIA" - If eventov = "Carga día" Then nombreClientev = "CARGA DIA" - cmd.Parameters = Array As Object(h.GetString("usuariov"), h.GetString("almacenv"), h.GetString("rutav"), eventov, clientev, h.GetString("iniciov"), finb, h.GetString("latitudv"), h.GetString("longitudv"), nombreClientev) - reqManager.ExecuteCommand(cmd , "ventaNoVenta") - Loop - - + If h.RowCount > 0 Then + For i = 0 To h.RowCount -1 + h.Position = i + Dim cmd As DBCommand + cmd.Initialize + cmd.Name = "insert_venta_no_venta_MEDICOMED" + cmd.Parameters = Array As Object(h.GetString("usuariov"), h.GetString("almacenv"), h.GetString("rutav"),h.GetString("eventov"),h.GetString("clientev"),h.GetString("iniciov"),h.GetString("latitudv"),h.GetString("longitudv"),h.GetString("montoVentav")) + B4XPages.MainPage.reqManager.ExecuteCommand(cmd , "ventaNoVenta") + Next + End If + h.Close ' c=B4XPages.MainPage.skmt.ExecQuery("SELECT CAT_CL_NUM_SERIEFISICO,CAT_CL_CODIGO ,CAT_CL_LONG,CAT_CL_LAT, CAT_CL_FOTO FROM kmt_info where CAT_CL_NUM_SERIEFISICO IS NOT NULL") ' If c.RowCount>0 Then @@ -1732,7 +1756,7 @@ Sub connecta_Click Dim cmd As DBCommand cmd.Initialize - cmd.Name = "select_ruta_MEDI_6" + cmd.Name = "select_ruta_MEDI_7" cmd.Parameters = Array As Object(ALMACEN,e_ruta.text) B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0, "ruta") @@ -2059,23 +2083,56 @@ Sub resdia_Click End If c.Close Dim cuantos_obj As String - c=B4XPages.MainPage.skmt.ExecQuery("Select count(*) AS TOTAL from HIST_MARCAS_CUOTAS ") + c=B4XPages.MainPage.skmt.ExecQuery("Select count(*) AS TOTAL from HIST_MARCAS_CUOTAS") c.Position = 0 cuantos_obj = c.GetString("TOTAL") c.Close If cuantos_obj > 0 Then - c=B4XPages.MainPage.skmt.ExecQuery("Select SUM( HMC_TOTAL) AS TOTAL from HIST_MARCAS_CUOTAS ") - c.Position = 0 - L_NES.Text = c.GetString("TOTAL") + c=B4XPages.MainPage.skmt.ExecQuery("Select SUM(IFNULL(HMC_TOTAL),0) AS TOTAL from HIST_MARCAS_CUOTAS") + If c.RowCount > 0 Then + c.Position = 0 + L_NES.Text = c.GetString("TOTAL") + Else + L_NES.Text = "0" + End If c.Close End If - L_REAL.Text = l_monto_ks.Text - L_ALCANCE.Text = Round2((L_NES.Text / L_REAL.Text + 1),2) + + Dim c As Cursor = B4XPages.MainPage.skmt.ExecQuery("SELECT IFNULL(SUM(montoVentav), 0) AS MONTO_DIA FROM VENTA_No_VENTA WHERE clientev <> 0") + If c.RowCount > 0 Then + c.Position = 0 + L_REAL.Text = c.GetString("MONTO_DIA") + Else + L_REAL.Text = "0" + End If + c.Close + + If L_REAL.Text <> "0" And L_REAL.Text <> "" Then + L_ALCANCE.Text = NumberFormat2(L_NES.Text / L_REAL.Text + 1, 0, 2, 2, False) + Else + L_ALCANCE.Text = "0" 'Esto evitara que se vaya a infinito al ividir un numero en 0 + End If L_VPLAN.Text = l_porvisitar.Text - L_VREAL.Text = L_CUANTOST.text + Private cvR As Cursor = B4XPages.MainPage.skmt.ExecQuery("SELECT COUNT(*) AS CUENTAV FROM VENTA_No_VENTA") + If cvR.RowCount > 0 Then + cvR.Position = 0 + L_VREAL.Text = cvR.GetString("CUENTAV") + Else + L_VREAL.Text = "0" + End If + cvR.Close +' L_VREAL.Text = L_CUANTOST.text L_EFEC_VIS.Text = Round2(L_VREAL.text / L_VPLAN.Text,2) - L_VISITCC.Text = l_cuantosc.text + Private cv As Cursor = B4XPages.MainPage.skmt.ExecQuery("SELECT COUNT(*) AS CUENTAV FROM VENTA_No_VENTA WHERE montoVentav <> 0") + If cv.RowCount > 0 Then + cv.Position = 0 + L_VISITCC.Text = cv.GetString("CUENTAV") + Else + L_VISITCC.Text = "0" + End If + cv.Close +' L_VISITCC.Text = l_cuantosc.text L_EFEC_PV.Text = Round2(L_VISITCC.Text / L_VREAL.Text,2) L_EFEC_PURA.Text = Round2(L_VISITCC.Text / L_VPLAN.Text,2) L_LIN_TICK.Text = LPT diff --git a/B4A/Files/cliente.bal b/B4A/Files/cliente.bal index 06d552b..e721deb 100644 Binary files a/B4A/Files/cliente.bal and b/B4A/Files/cliente.bal differ diff --git a/B4A/Files/resdia.bal b/B4A/Files/resdia.bal index aa452f2..0adde77 100644 Binary files a/B4A/Files/resdia.bal and b/B4A/Files/resdia.bal differ diff --git a/B4A/Files/ticketsdia.bal b/B4A/Files/ticketsdia.bal index 6ee9004..4f59ddd 100644 Binary files a/B4A/Files/ticketsdia.bal and b/B4A/Files/ticketsdia.bal differ diff --git a/B4A/Objects/AndroidManifest.xml b/B4A/Objects/AndroidManifest.xml index d965d22..a5d1550 100644 --- a/B4A/Objects/AndroidManifest.xml +++ b/B4A/Objects/AndroidManifest.xml @@ -3,7 +3,7 @@ xmlns:android="http://schemas.android.com/apk/res/android" package="keymon.lat.medicomed" android:versionCode="1" - android:versionName="4.09.22" + android:versionName="4.11.02" android:installLocation="internalOnly"> diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/animatedcounter.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/animatedcounter.class index 385f522..c0fc59f 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/animatedcounter.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/animatedcounter.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/anotherprogressbar$ResumableSub_BusyLoop.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/anotherprogressbar$ResumableSub_BusyLoop.class index a62f35c..026f525 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/anotherprogressbar$ResumableSub_BusyLoop.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/anotherprogressbar$ResumableSub_BusyLoop.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/anotherprogressbar.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/anotherprogressbar.class index 68b1cef..e776276 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/anotherprogressbar.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/anotherprogressbar.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/appupdater$ResumableSub_Service_Start.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/appupdater$ResumableSub_Service_Start.class index e0ac3f3..abdb9ca 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/appupdater$ResumableSub_Service_Start.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/appupdater$ResumableSub_Service_Start.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/appupdater$ResumableSub_download_newApk.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/appupdater$ResumableSub_download_newApk.class index 8405a61..47cfcd5 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/appupdater$ResumableSub_download_newApk.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/appupdater$ResumableSub_download_newApk.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/appupdater$_mnewversion.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/appupdater$_mnewversion.class index eb371b3..16aa18c 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/appupdater$_mnewversion.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/appupdater$_mnewversion.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/appupdater$appupdater_BR.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/appupdater$appupdater_BR.class index 0b28b0d..10e47b5 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/appupdater$appupdater_BR.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/appupdater$appupdater_BR.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/appupdater.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/appupdater.class index fe48740..922281b 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/appupdater.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/appupdater.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xbitset.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xbitset.class index 1799be9..26fbfec 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xbitset.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xbitset.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xbreadcrumb.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xbreadcrumb.class index 153ee64..642fbf0 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xbreadcrumb.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xbreadcrumb.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xbytesbuilder.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xbytesbuilder.class index d331845..727d736 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xbytesbuilder.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xbytesbuilder.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcache$_b4xcacheitem.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcache$_b4xcacheitem.class index f07660b..11a66a7 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcache$_b4xcacheitem.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcache$_b4xcacheitem.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcache.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcache.class index ce4118a..44be37d 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcache.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcache.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcollections.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcollections.class index 16ae2ba..9fbdb1c 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcollections.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcollections.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcolortemplate$ResumableSub_Show.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcolortemplate$ResumableSub_Show.class index ee4f0d6..13e1192 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcolortemplate$ResumableSub_Show.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcolortemplate$ResumableSub_Show.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcolortemplate$_colorpickerpart.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcolortemplate$_colorpickerpart.class index d39ff3a..d442994 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcolortemplate$_colorpickerpart.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcolortemplate$_colorpickerpart.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcolortemplate.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcolortemplate.class index 776d733..271de13 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcolortemplate.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcolortemplate.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcombobox$ResumableSub_RaiseEvent.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcombobox$ResumableSub_RaiseEvent.class index c92c053..cf623d3 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcombobox$ResumableSub_RaiseEvent.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcombobox$ResumableSub_RaiseEvent.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcombobox.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcombobox.class index bd12c16..c635eeb 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcombobox.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcombobox.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcomparatorsort.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcomparatorsort.class index 383f91c..0c8d338 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcomparatorsort.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xcomparatorsort.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdatetemplate$ResumableSub_Show.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdatetemplate$ResumableSub_Show.class index 1fe991f..20539de 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdatetemplate$ResumableSub_Show.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdatetemplate$ResumableSub_Show.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdatetemplate.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdatetemplate.class index 5dce2e3..5936b24 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdatetemplate.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdatetemplate.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdialog$ResumableSub_Show.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdialog$ResumableSub_Show.class index ea6d89c..81ed086 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdialog$ResumableSub_Show.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdialog$ResumableSub_Show.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdialog$ResumableSub_ShowCustom.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdialog$ResumableSub_ShowCustom.class index 12863c9..893b5a5 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdialog$ResumableSub_ShowCustom.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdialog$ResumableSub_ShowCustom.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdialog$ResumableSub_ShowTemplate.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdialog$ResumableSub_ShowTemplate.class index 9730ab0..ada0a2c 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdialog$ResumableSub_ShowTemplate.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdialog$ResumableSub_ShowTemplate.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdialog.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdialog.class index 29b0ba9..17f5715 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdialog.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xdialog.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xfloattextfield$ResumableSub_SwitchFromPasswordToRegular.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xfloattextfield$ResumableSub_SwitchFromPasswordToRegular.class index a78f0a4..35eba92 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xfloattextfield$ResumableSub_SwitchFromPasswordToRegular.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xfloattextfield$ResumableSub_SwitchFromPasswordToRegular.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xfloattextfield.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xfloattextfield.class index 8deecb8..e32dd74 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xfloattextfield.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xfloattextfield.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xformatter$_b4xformatdata.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xformatter$_b4xformatdata.class index 6080b8a..a9bee22 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xformatter$_b4xformatdata.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xformatter$_b4xformatdata.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xformatter.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xformatter.class index 652153c..015daa0 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xformatter.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xformatter.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4ximageview.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4ximageview.class index c1ee2c9..208c45a 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4ximageview.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4ximageview.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xinputtemplate$ResumableSub_Show.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xinputtemplate$ResumableSub_Show.class index 2f82dde..97fa71b 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xinputtemplate$ResumableSub_Show.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xinputtemplate$ResumableSub_Show.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xinputtemplate.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xinputtemplate.class index 5a0194a..84a3722 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xinputtemplate.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xinputtemplate.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xlisttemplate$ResumableSub_Show.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xlisttemplate$ResumableSub_Show.class index 0248a98..539af2e 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xlisttemplate$ResumableSub_Show.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xlisttemplate$ResumableSub_Show.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xlisttemplate.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xlisttemplate.class index 8dd40f7..d050bc0 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xlisttemplate.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xlisttemplate.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xloadingindicator$ResumableSub_MainLoop.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xloadingindicator$ResumableSub_MainLoop.class index bfa09fb..fd9648c 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xloadingindicator$ResumableSub_MainLoop.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xloadingindicator$ResumableSub_MainLoop.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xloadingindicator.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xloadingindicator.class index 25389dc..1125af9 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xloadingindicator.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xloadingindicator.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xlongtexttemplate.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xlongtexttemplate.class index fbb5aab..67998ef 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xlongtexttemplate.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xlongtexttemplate.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xmainpage$ResumableSub_B4XPage_Appear.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xmainpage$ResumableSub_B4XPage_Appear.class index d67a105..044dd9e 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xmainpage$ResumableSub_B4XPage_Appear.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xmainpage$ResumableSub_B4XPage_Appear.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xmainpage$ResumableSub_B4XPage_CloseRequest.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xmainpage$ResumableSub_B4XPage_CloseRequest.class index f795019..db3b1d4 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xmainpage$ResumableSub_B4XPage_CloseRequest.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xmainpage$ResumableSub_B4XPage_CloseRequest.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xmainpage$ResumableSub_b_envioBD_Click.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xmainpage$ResumableSub_b_envioBD_Click.class index f78f3b6..84bed4e 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xmainpage$ResumableSub_b_envioBD_Click.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xmainpage$ResumableSub_b_envioBD_Click.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xmainpage$ResumableSub_copiaDB.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xmainpage$ResumableSub_copiaDB.class index 2164347..34a476a 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xmainpage$ResumableSub_copiaDB.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xmainpage$ResumableSub_copiaDB.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xmainpage.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xmainpage.class index da10576..c30bd0d 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xmainpage.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xmainpage.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xorderedmap.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xorderedmap.class index a56f022..9016496 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xorderedmap.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xorderedmap.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpages.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpages.class index 863af82..a819c89 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpages.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpages.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesdelegator.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesdelegator.class index 828041b..f182b81 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesdelegator.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesdelegator.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager$PagesMenuListener.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager$PagesMenuListener.class index de0cfab..cbe5baa 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager$PagesMenuListener.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager$PagesMenuListener.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager$ResumableSub_HandleCloseRequest.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager$ResumableSub_HandleCloseRequest.class index 8cb2959..6168f92 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager$ResumableSub_HandleCloseRequest.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager$ResumableSub_HandleCloseRequest.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager$_b4amenuitem.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager$_b4amenuitem.class index b5bbbe0..6901d1c 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager$_b4amenuitem.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager$_b4amenuitem.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager$_b4xpageinfo.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager$_b4xpageinfo.class index 78f04d6..7a2c291 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager$_b4xpageinfo.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager$_b4xpageinfo.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager$_b4xpageparent.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager$_b4xpageparent.class index af318fc..2448414 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager$_b4xpageparent.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager$_b4xpageparent.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager.class index 6fac1a1..4f3051a 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xpagesmanager.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xplusminus$ResumableSub_StartDownLoop.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xplusminus$ResumableSub_StartDownLoop.class index 212d179..082bbcd 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xplusminus$ResumableSub_StartDownLoop.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xplusminus$ResumableSub_StartDownLoop.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xplusminus.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xplusminus.class index 0257f1b..951341e 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xplusminus.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xplusminus.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xradiobutton$ResumableSub_SetValueImpl.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xradiobutton$ResumableSub_SetValueImpl.class index 0486c6d..704bb7d 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xradiobutton$ResumableSub_SetValueImpl.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xradiobutton$ResumableSub_SetValueImpl.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xradiobutton.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xradiobutton.class index 58e3877..6ca7ba4 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xradiobutton.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xradiobutton.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xsearchtemplate$ResumableSub_Show.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xsearchtemplate$ResumableSub_Show.class index bd3948c..6dd7d85 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xsearchtemplate$ResumableSub_Show.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xsearchtemplate$ResumableSub_Show.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xsearchtemplate.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xsearchtemplate.class index cb14eb8..efe621b 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xsearchtemplate.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xsearchtemplate.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xseekbar.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xseekbar.class index de77f89..d15182f 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xseekbar.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xseekbar.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xset.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xset.class index 689a854..a1c0776 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xset.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xset.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xsignaturetemplate.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xsignaturetemplate.class index 5ab2252..d16121f 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xsignaturetemplate.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xsignaturetemplate.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xswitch$ResumableSub_SetValueImpl.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xswitch$ResumableSub_SetValueImpl.class index 8ccfd89..c809384 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xswitch$ResumableSub_SetValueImpl.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xswitch$ResumableSub_SetValueImpl.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xswitch.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xswitch.class index 732fb02..6183651 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xswitch.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xswitch.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xtimedtemplate$ResumableSub_Show.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xtimedtemplate$ResumableSub_Show.class index c3e5c40..fa1a2f8 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xtimedtemplate$ResumableSub_Show.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xtimedtemplate$ResumableSub_Show.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xtimedtemplate.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xtimedtemplate.class index e1c7f27..ba47b1f 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xtimedtemplate.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/b4xtimedtemplate.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/batteryutilities.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/batteryutilities.class index 006e7be..8460632 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/batteryutilities.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/batteryutilities.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_cliente$ResumableSub_B4XPage_CloseRequest.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_cliente$ResumableSub_B4XPage_CloseRequest.class index 9f34cf8..55b9b5b 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_cliente$ResumableSub_B4XPage_CloseRequest.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_cliente$ResumableSub_B4XPage_CloseRequest.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_cliente$ResumableSub_b_abono_Click.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_cliente$ResumableSub_b_abono_Click.class index 84710ae..136303f 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_cliente$ResumableSub_b_abono_Click.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_cliente$ResumableSub_b_abono_Click.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_cliente$ResumableSub_sc_result.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_cliente$ResumableSub_sc_result.class index 34894c2..2cc3a30 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_cliente$ResumableSub_sc_result.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_cliente$ResumableSub_sc_result.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_cliente.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_cliente.class index f7b4c24..469c8b3 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_cliente.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_cliente.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_clientes$ResumableSub_B4XPage_CloseRequest.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_clientes$ResumableSub_B4XPage_CloseRequest.class index 9e95acf..3710e57 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_clientes$ResumableSub_B4XPage_CloseRequest.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_clientes$ResumableSub_B4XPage_CloseRequest.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_clientes.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_clientes.class index 72d53e3..39049bf 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_clientes.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_clientes.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_historico$ResumableSub_B4XPage_CloseRequest.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_historico$ResumableSub_B4XPage_CloseRequest.class index 73dd41a..fa88539 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_historico$ResumableSub_B4XPage_CloseRequest.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_historico$ResumableSub_B4XPage_CloseRequest.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_historico.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_historico.class index c7e0fbb..dfedfa5 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_historico.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_historico.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_mapas.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_mapas.class index 1ea9ce6..fb3aa2b 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_mapas.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_mapas.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_nota$ResumableSub_B4XPage_CloseRequest.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_nota$ResumableSub_B4XPage_CloseRequest.class index 45d2e7d..6862bc8 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_nota$ResumableSub_B4XPage_CloseRequest.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_nota$ResumableSub_B4XPage_CloseRequest.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_nota.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_nota.class index 02ac65e..f1a9405 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_nota.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_nota.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_noventa.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_noventa.class index 208300a..0c3cc9c 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_noventa.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_noventa.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_nuevocliente$ResumableSub_InitializeCamera2.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_nuevocliente$ResumableSub_InitializeCamera2.class index 580d862..b2a1930 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_nuevocliente$ResumableSub_InitializeCamera2.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_nuevocliente$ResumableSub_InitializeCamera2.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_nuevocliente.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_nuevocliente.class index ac78129..0508d4b 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_nuevocliente.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_nuevocliente.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_pedidos$ResumableSub_B4XPage_CloseRequest.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_pedidos$ResumableSub_B4XPage_CloseRequest.class index 4b22362..a941007 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_pedidos$ResumableSub_B4XPage_CloseRequest.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_pedidos$ResumableSub_B4XPage_CloseRequest.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_pedidos.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_pedidos.class index 2eb621c..d4de8ea 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_pedidos.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_pedidos.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_principal$ResumableSub_B4XPage_Appear.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_principal$ResumableSub_B4XPage_Appear.class index 46f6c88..2ffd7cb 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_principal$ResumableSub_B4XPage_Appear.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_principal$ResumableSub_B4XPage_Appear.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_principal$ResumableSub_B4XPage_CloseRequest.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_principal$ResumableSub_B4XPage_CloseRequest.class index b6dd2f6..8c233ff 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_principal$ResumableSub_B4XPage_CloseRequest.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_principal$ResumableSub_B4XPage_CloseRequest.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_principal$ResumableSub_Btn_Ubicar_Click.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_principal$ResumableSub_Btn_Ubicar_Click.class index cf1109e..898f7b7 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_principal$ResumableSub_Btn_Ubicar_Click.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_principal$ResumableSub_Btn_Ubicar_Click.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_principal$_titledata.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_principal$_titledata.class index d79fa43..83bcc69 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_principal$_titledata.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_principal$_titledata.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_principal.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_principal.class index d4a4beb..7d3d141 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_principal.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_principal.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_productos$ResumableSub_B4XPage_Appear.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_productos$ResumableSub_B4XPage_Appear.class index 128b037..699f577 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_productos$ResumableSub_B4XPage_Appear.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_productos$ResumableSub_B4XPage_Appear.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_productos$ResumableSub_B4XPage_CloseRequest.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_productos$ResumableSub_B4XPage_CloseRequest.class index f028be4..2bd0b1d 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_productos$ResumableSub_B4XPage_CloseRequest.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_productos$ResumableSub_B4XPage_CloseRequest.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_productos$ResumableSub_Busca_TextChanged.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_productos$ResumableSub_Busca_TextChanged.class index 5ede930..836df8e 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_productos$ResumableSub_Busca_TextChanged.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_productos$ResumableSub_Busca_TextChanged.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_productos$ResumableSub_lv_catalogos2_ItemClick.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_productos$ResumableSub_lv_catalogos2_ItemClick.class index 171a958..dcdf145 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_productos$ResumableSub_lv_catalogos2_ItemClick.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_productos$ResumableSub_lv_catalogos2_ItemClick.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_productos.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_productos.class index 2198164..670833d 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_productos.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_productos.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_promos.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_promos.class index 2148e9e..ed581d5 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_promos.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_promos.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_ticketsdia.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_ticketsdia.class index 0c34622..faeeceb 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_ticketsdia.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_ticketsdia.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_updateavailable$ResumableSub_B4XPage_Appear.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_updateavailable$ResumableSub_B4XPage_Appear.class index 388a4e7..21b5ae9 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_updateavailable$ResumableSub_B4XPage_Appear.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_updateavailable$ResumableSub_B4XPage_Appear.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_updateavailable.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_updateavailable.class index f8bff58..91bbd8b 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/c_updateavailable.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/c_updateavailable.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/cameraexclass2.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/cameraexclass2.class index 1051338..a9cba4d 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/cameraexclass2.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/cameraexclass2.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate$ResumableSub_DownloadApk.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate$ResumableSub_DownloadApk.class index 18285b8..5092349 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate$ResumableSub_DownloadApk.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate$ResumableSub_DownloadApk.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate$ResumableSub_IsvalidWV.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate$ResumableSub_IsvalidWV.class index c67e859..ba8c859 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate$ResumableSub_IsvalidWV.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate$ResumableSub_IsvalidWV.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate$ResumableSub_ReadWebVN.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate$ResumableSub_ReadWebVN.class index cb96eff..1136f78 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate$ResumableSub_ReadWebVN.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate$ResumableSub_ReadWebVN.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate$ResumableSub_TryApkUpdate.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate$ResumableSub_TryApkUpdate.class index e1e7cfb..07ad6a9 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate$ResumableSub_TryApkUpdate.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate$ResumableSub_TryApkUpdate.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate$ResumableSub_UpdateApk.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate$ResumableSub_UpdateApk.class index 6901d9b..b2393ec 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate$ResumableSub_UpdateApk.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate$ResumableSub_UpdateApk.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate.class index 3f12ca1..4f89373 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/cl_appupdate.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/dbrequestmanager$_dbcommand.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/dbrequestmanager$_dbcommand.class index 7082b1f..f664cc6 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/dbrequestmanager$_dbcommand.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/dbrequestmanager$_dbcommand.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/dbrequestmanager$_dbresult.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/dbrequestmanager$_dbresult.class index a94d781..576e177 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/dbrequestmanager$_dbresult.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/dbrequestmanager$_dbresult.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/dbrequestmanager.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/dbrequestmanager.class index 6c72304..e748ddb 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/dbrequestmanager.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/dbrequestmanager.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/fileprovider.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/fileprovider.class index 92a577e..549ea4d 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/fileprovider.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/fileprovider.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/httpjob$_multipartfiledata.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/httpjob$_multipartfiledata.class index bb13c54..137d67b 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/httpjob$_multipartfiledata.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/httpjob$_multipartfiledata.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/httpjob.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/httpjob.class index 9100ccf..5a5934d 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/httpjob.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/httpjob.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/httputils2service.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/httputils2service.class index 8432e1a..6c803fd 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/httputils2service.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/httputils2service.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/madewithlove.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/madewithlove.class index 834f8e3..4c98a3b 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/madewithlove.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/madewithlove.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/main$_camerainfoandid.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/main$_camerainfoandid.class index fc478a8..608211b 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/main$_camerainfoandid.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/main$_camerainfoandid.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/main$_camerasize.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/main$_camerasize.class index 760d1e3..182eca6 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/main$_camerasize.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/main$_camerasize.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/main.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/main.class index 2112e4a..151cba1 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/main.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/main.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/mapa_rutas$ResumableSub_Activity_Create.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/mapa_rutas$ResumableSub_Activity_Create.class index ae8c2ab..4d764ca 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/mapa_rutas$ResumableSub_Activity_Create.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/mapa_rutas$ResumableSub_Activity_Create.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/mapa_rutas$ResumableSub_Activity_Resume.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/mapa_rutas$ResumableSub_Activity_Resume.class index 7a31bd3..49285d8 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/mapa_rutas$ResumableSub_Activity_Resume.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/mapa_rutas$ResumableSub_Activity_Resume.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/mapa_rutas$ResumableSub_MapFragment1_Ready.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/mapa_rutas$ResumableSub_MapFragment1_Ready.class index 4fdf118..fe26ea1 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/mapa_rutas$ResumableSub_MapFragment1_Ready.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/mapa_rutas$ResumableSub_MapFragment1_Ready.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/mapa_rutas.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/mapa_rutas.class index 8787c0a..e0bf9fb 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/mapa_rutas.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/mapa_rutas.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/newinst2$newinst2_BR.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/newinst2$newinst2_BR.class index 951e853..d89b5ab 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/newinst2$newinst2_BR.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/newinst2$newinst2_BR.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/newinst2.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/newinst2.class index fd27f78..235045e 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/newinst2.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/newinst2.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/preoptimizedclv$ResumableSub_B4XSeekBar1_TouchStateChanged.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/preoptimizedclv$ResumableSub_B4XSeekBar1_TouchStateChanged.class index a6f6b2c..b3d586c 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/preoptimizedclv$ResumableSub_B4XSeekBar1_TouchStateChanged.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/preoptimizedclv$ResumableSub_B4XSeekBar1_TouchStateChanged.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/preoptimizedclv$ResumableSub_ListChangedExternally.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/preoptimizedclv$ResumableSub_ListChangedExternally.class index b511090..81adf24 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/preoptimizedclv$ResumableSub_ListChangedExternally.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/preoptimizedclv$ResumableSub_ListChangedExternally.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/preoptimizedclv.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/preoptimizedclv.class index a1127ed..11e62ee 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/preoptimizedclv.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/preoptimizedclv.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/roundslider.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/roundslider.class index 7b993af..bded9a7 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/roundslider.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/roundslider.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/scrollinglabel$ResumableSub_StartScrolling.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/scrollinglabel$ResumableSub_StartScrolling.class index ec7d191..d149029 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/scrollinglabel$ResumableSub_StartScrolling.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/scrollinglabel$ResumableSub_StartScrolling.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/scrollinglabel.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/scrollinglabel.class index 60f3633..ba34d4d 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/scrollinglabel.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/scrollinglabel.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/starter$starter_BR.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/starter$starter_BR.class index 688df39..61c0717 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/starter$starter_BR.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/starter$starter_BR.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/starter.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/starter.class index 3a69499..b4956a5 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/starter.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/starter.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/subs.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/subs.class index a1fc8a5..5084072 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/subs.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/subs.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/swiftbutton.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/swiftbutton.class index 5a28e8b..07ecf0b 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/swiftbutton.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/swiftbutton.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/tracker$ResumableSub_StartFLP.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/tracker$ResumableSub_StartFLP.class index 83160ad..2222bbc 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/tracker$ResumableSub_StartFLP.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/tracker$ResumableSub_StartFLP.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/tracker$ResumableSub_StartFLPSmall.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/tracker$ResumableSub_StartFLPSmall.class index 5f7c1a5..3bb997e 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/tracker$ResumableSub_StartFLPSmall.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/tracker$ResumableSub_StartFLPSmall.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/tracker$tracker_BR.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/tracker$tracker_BR.class index c66c60d..944ce37 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/tracker$tracker_BR.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/tracker$tracker_BR.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/tracker.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/tracker.class index 6730fd3..bfbacfa 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/tracker.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/tracker.class differ diff --git a/B4A/Objects/bin/classes/keymon/lat/medicomed/xuiviewsutils.class b/B4A/Objects/bin/classes/keymon/lat/medicomed/xuiviewsutils.class index 361bc52..378ae0d 100644 Binary files a/B4A/Objects/bin/classes/keymon/lat/medicomed/xuiviewsutils.class and b/B4A/Objects/bin/classes/keymon/lat/medicomed/xuiviewsutils.class differ diff --git a/B4A/Objects/bin/temp.ap_ b/B4A/Objects/bin/temp.ap_ index 0ada454..e3f5ee5 100644 Binary files a/B4A/Objects/bin/temp.ap_ and b/B4A/Objects/bin/temp.ap_ differ diff --git a/B4A/Objects/classes.dex b/B4A/Objects/classes.dex index 3a65163..9cc1bc3 100644 Binary files a/B4A/Objects/classes.dex and b/B4A/Objects/classes.dex differ diff --git a/B4A/Objects/classes2.dex b/B4A/Objects/classes2.dex index 8fdaa0b..8b45184 100644 Binary files a/B4A/Objects/classes2.dex and b/B4A/Objects/classes2.dex differ diff --git a/B4A/Objects/d8_arguments.txt b/B4A/Objects/d8_arguments.txt index 2e28c0c..4faa3a6 100644 --- a/B4A/Objects/d8_arguments.txt +++ b/B4A/Objects/d8_arguments.txt @@ -6,7 +6,6 @@ C:\Android\platforms\android-30\android.jar --min-api 21 C:\Android\tools\..\extras\b4a_local\unpacked-b4ashared-63837499356000\dex_v1\b4ashared.zip -C:\Android\tools\..\extras\b4a_local\unpacked-debug-63837499358000\dex_v1\debug.zip c:\android\tools\..\extras\b4a_remote\com\google\firebase\firebase-ads\19.4.0\unpacked-firebase-ads-19.4.0\jars\classes.zip c:\android\tools\..\extras\b4a_remote\com\google\android\gms\play-services-ads\20.2.0\unpacked-play-services-ads-20.2.0\jars\classes.zip c:\android\tools\..\extras\b4a_remote\androidx\browser\browser\1.0.0\unpacked-browser-1.0.0\jars\classes.zip diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/animatedcounter.dex b/B4A/Objects/dexed/keymon/lat/medicomed/animatedcounter.dex index 3393368..43bd01a 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/animatedcounter.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/animatedcounter.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/anotherprogressbar$ResumableSub_BusyLoop.dex b/B4A/Objects/dexed/keymon/lat/medicomed/anotherprogressbar$ResumableSub_BusyLoop.dex index 518694a..8ee272e 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/anotherprogressbar$ResumableSub_BusyLoop.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/anotherprogressbar$ResumableSub_BusyLoop.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/anotherprogressbar.dex b/B4A/Objects/dexed/keymon/lat/medicomed/anotherprogressbar.dex index cefed19..5826f23 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/anotherprogressbar.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/anotherprogressbar.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/appupdater$ResumableSub_Service_Start.dex b/B4A/Objects/dexed/keymon/lat/medicomed/appupdater$ResumableSub_Service_Start.dex index ebe07be..1770f0f 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/appupdater$ResumableSub_Service_Start.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/appupdater$ResumableSub_Service_Start.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/appupdater$ResumableSub_download_newApk.dex b/B4A/Objects/dexed/keymon/lat/medicomed/appupdater$ResumableSub_download_newApk.dex index 323b3ec..a7572e5 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/appupdater$ResumableSub_download_newApk.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/appupdater$ResumableSub_download_newApk.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/appupdater$_mnewversion.dex b/B4A/Objects/dexed/keymon/lat/medicomed/appupdater$_mnewversion.dex index e8d6890..7ae9633 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/appupdater$_mnewversion.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/appupdater$_mnewversion.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/appupdater$appupdater_BR.dex b/B4A/Objects/dexed/keymon/lat/medicomed/appupdater$appupdater_BR.dex index c9815f6..ab9044a 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/appupdater$appupdater_BR.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/appupdater$appupdater_BR.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/appupdater.dex b/B4A/Objects/dexed/keymon/lat/medicomed/appupdater.dex index 2d1406a..249751a 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/appupdater.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/appupdater.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xbitset.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xbitset.dex index fe63e85..041bb19 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xbitset.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xbitset.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xbreadcrumb.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xbreadcrumb.dex index ac9574d..9693107 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xbreadcrumb.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xbreadcrumb.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xbytesbuilder.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xbytesbuilder.dex index 751549e..afe0be2 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xbytesbuilder.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xbytesbuilder.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xcache$_b4xcacheitem.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xcache$_b4xcacheitem.dex index 9fb2e10..a17ace9 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xcache$_b4xcacheitem.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xcache$_b4xcacheitem.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xcache.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xcache.dex index 8ac461b..4bf7132 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xcache.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xcache.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xcollections.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xcollections.dex index 7abeed5..ca2bbc1 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xcollections.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xcollections.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xcolortemplate$ResumableSub_Show.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xcolortemplate$ResumableSub_Show.dex index 4308692..be4a884 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xcolortemplate$ResumableSub_Show.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xcolortemplate$ResumableSub_Show.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xcolortemplate$_colorpickerpart.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xcolortemplate$_colorpickerpart.dex index a85734b..af2b4b9 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xcolortemplate$_colorpickerpart.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xcolortemplate$_colorpickerpart.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xcolortemplate.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xcolortemplate.dex index f32d5a5..b361b8b 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xcolortemplate.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xcolortemplate.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xcombobox$ResumableSub_RaiseEvent.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xcombobox$ResumableSub_RaiseEvent.dex index 26d288a..9646ca6 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xcombobox$ResumableSub_RaiseEvent.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xcombobox$ResumableSub_RaiseEvent.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xcombobox.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xcombobox.dex index a2c1eeb..3d0e470 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xcombobox.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xcombobox.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xcomparatorsort.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xcomparatorsort.dex index c74615a..3921ae1 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xcomparatorsort.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xcomparatorsort.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xdatetemplate$ResumableSub_Show.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xdatetemplate$ResumableSub_Show.dex index 84ce700..08a58fb 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xdatetemplate$ResumableSub_Show.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xdatetemplate$ResumableSub_Show.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xdatetemplate.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xdatetemplate.dex index 00b32f1..39095de 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xdatetemplate.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xdatetemplate.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xdialog$ResumableSub_Show.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xdialog$ResumableSub_Show.dex index 2f78217..df58d1d 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xdialog$ResumableSub_Show.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xdialog$ResumableSub_Show.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xdialog$ResumableSub_ShowCustom.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xdialog$ResumableSub_ShowCustom.dex index 11d5257..1319861 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xdialog$ResumableSub_ShowCustom.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xdialog$ResumableSub_ShowCustom.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xdialog$ResumableSub_ShowTemplate.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xdialog$ResumableSub_ShowTemplate.dex index 5ffaf67..c0f9b8d 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xdialog$ResumableSub_ShowTemplate.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xdialog$ResumableSub_ShowTemplate.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xdialog.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xdialog.dex index 65f46f3..5f373bd 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xdialog.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xdialog.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xfloattextfield$ResumableSub_SwitchFromPasswordToRegular.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xfloattextfield$ResumableSub_SwitchFromPasswordToRegular.dex index 5b73296..eaafa06 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xfloattextfield$ResumableSub_SwitchFromPasswordToRegular.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xfloattextfield$ResumableSub_SwitchFromPasswordToRegular.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xfloattextfield.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xfloattextfield.dex index 75fb8e0..8533fd8 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xfloattextfield.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xfloattextfield.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xformatter$_b4xformatdata.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xformatter$_b4xformatdata.dex index 4f881ac..9aa30a1 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xformatter$_b4xformatdata.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xformatter$_b4xformatdata.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xformatter.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xformatter.dex index 98f46e6..b295f98 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xformatter.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xformatter.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4ximageview.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4ximageview.dex index b091540..6b5b9b7 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4ximageview.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4ximageview.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xinputtemplate$ResumableSub_Show.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xinputtemplate$ResumableSub_Show.dex index b273400..ad2debb 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xinputtemplate$ResumableSub_Show.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xinputtemplate$ResumableSub_Show.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xinputtemplate.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xinputtemplate.dex index b2d78ab..6fa6d6c 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xinputtemplate.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xinputtemplate.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xlisttemplate$ResumableSub_Show.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xlisttemplate$ResumableSub_Show.dex index ddb8951..3bd9921 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xlisttemplate$ResumableSub_Show.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xlisttemplate$ResumableSub_Show.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xlisttemplate.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xlisttemplate.dex index df9dbcc..979de2a 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xlisttemplate.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xlisttemplate.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xloadingindicator$ResumableSub_MainLoop.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xloadingindicator$ResumableSub_MainLoop.dex index a7f2823..fff88a0 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xloadingindicator$ResumableSub_MainLoop.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xloadingindicator$ResumableSub_MainLoop.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xloadingindicator.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xloadingindicator.dex index d72247d..0d57457 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xloadingindicator.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xloadingindicator.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xlongtexttemplate.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xlongtexttemplate.dex index f5f976d..e842fff 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xlongtexttemplate.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xlongtexttemplate.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xmainpage$ResumableSub_B4XPage_Appear.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xmainpage$ResumableSub_B4XPage_Appear.dex index dd1bf05..243a789 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xmainpage$ResumableSub_B4XPage_Appear.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xmainpage$ResumableSub_B4XPage_Appear.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xmainpage$ResumableSub_B4XPage_CloseRequest.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xmainpage$ResumableSub_B4XPage_CloseRequest.dex index 7614dde..83a6390 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xmainpage$ResumableSub_B4XPage_CloseRequest.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xmainpage$ResumableSub_B4XPage_CloseRequest.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xmainpage$ResumableSub_b_envioBD_Click.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xmainpage$ResumableSub_b_envioBD_Click.dex index 68b51bf..2cec201 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xmainpage$ResumableSub_b_envioBD_Click.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xmainpage$ResumableSub_b_envioBD_Click.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xmainpage$ResumableSub_copiaDB.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xmainpage$ResumableSub_copiaDB.dex index c423089..d4dbeb5 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xmainpage$ResumableSub_copiaDB.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xmainpage$ResumableSub_copiaDB.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xmainpage.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xmainpage.dex index d6e3836..d1440b1 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xmainpage.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xmainpage.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xorderedmap.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xorderedmap.dex index 00c56c5..aab9606 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xorderedmap.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xorderedmap.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xpages.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xpages.dex index f6f03b3..d138e01 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xpages.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xpages.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesdelegator.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesdelegator.dex index 000e6a9..e1feea6 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesdelegator.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesdelegator.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager$PagesMenuListener.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager$PagesMenuListener.dex index 349f74c..ff04925 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager$PagesMenuListener.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager$PagesMenuListener.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager$ResumableSub_HandleCloseRequest.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager$ResumableSub_HandleCloseRequest.dex index 7ed0034..1e816bb 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager$ResumableSub_HandleCloseRequest.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager$ResumableSub_HandleCloseRequest.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager$_b4amenuitem.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager$_b4amenuitem.dex index dae702e..d72d7f3 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager$_b4amenuitem.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager$_b4amenuitem.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager$_b4xpageinfo.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager$_b4xpageinfo.dex index 09b7540..e9c71b0 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager$_b4xpageinfo.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager$_b4xpageinfo.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager$_b4xpageparent.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager$_b4xpageparent.dex index 4acc249..c419605 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager$_b4xpageparent.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager$_b4xpageparent.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager.dex index f4b6616..f7b06cc 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xpagesmanager.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xplusminus$ResumableSub_StartDownLoop.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xplusminus$ResumableSub_StartDownLoop.dex index a4d4c8c..49f1a33 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xplusminus$ResumableSub_StartDownLoop.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xplusminus$ResumableSub_StartDownLoop.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xplusminus.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xplusminus.dex index 8e482b9..7d3a7f5 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xplusminus.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xplusminus.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xradiobutton$ResumableSub_SetValueImpl.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xradiobutton$ResumableSub_SetValueImpl.dex index 025212a..4d6a0e8 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xradiobutton$ResumableSub_SetValueImpl.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xradiobutton$ResumableSub_SetValueImpl.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xradiobutton.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xradiobutton.dex index 16d0086..c50bb89 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xradiobutton.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xradiobutton.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xsearchtemplate$ResumableSub_Show.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xsearchtemplate$ResumableSub_Show.dex index 96f3d98..76ce940 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xsearchtemplate$ResumableSub_Show.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xsearchtemplate$ResumableSub_Show.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xsearchtemplate.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xsearchtemplate.dex index 0e4446d..2705b6f 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xsearchtemplate.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xsearchtemplate.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xseekbar.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xseekbar.dex index b6673fb..485a929 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xseekbar.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xseekbar.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xset.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xset.dex index e52ab07..13d8603 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xset.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xset.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xsignaturetemplate.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xsignaturetemplate.dex index ab60bd0..f82ffa5 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xsignaturetemplate.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xsignaturetemplate.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xswitch$ResumableSub_SetValueImpl.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xswitch$ResumableSub_SetValueImpl.dex index cfac444..d2e1759 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xswitch$ResumableSub_SetValueImpl.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xswitch$ResumableSub_SetValueImpl.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xswitch.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xswitch.dex index 258c9eb..6796ee6 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xswitch.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xswitch.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xtimedtemplate$ResumableSub_Show.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xtimedtemplate$ResumableSub_Show.dex index 9562c77..68442a8 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xtimedtemplate$ResumableSub_Show.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xtimedtemplate$ResumableSub_Show.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/b4xtimedtemplate.dex b/B4A/Objects/dexed/keymon/lat/medicomed/b4xtimedtemplate.dex index 99b5e68..0503387 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/b4xtimedtemplate.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/b4xtimedtemplate.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/batteryutilities.dex b/B4A/Objects/dexed/keymon/lat/medicomed/batteryutilities.dex index 8b8956c..b887550 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/batteryutilities.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/batteryutilities.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_cliente$ResumableSub_B4XPage_CloseRequest.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_cliente$ResumableSub_B4XPage_CloseRequest.dex index 3e1b686..be55e82 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_cliente$ResumableSub_B4XPage_CloseRequest.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_cliente$ResumableSub_B4XPage_CloseRequest.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_cliente$ResumableSub_b_abono_Click.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_cliente$ResumableSub_b_abono_Click.dex index 41af98a..ccd68b7 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_cliente$ResumableSub_b_abono_Click.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_cliente$ResumableSub_b_abono_Click.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_cliente$ResumableSub_sc_result.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_cliente$ResumableSub_sc_result.dex index 11e622b..4650615 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_cliente$ResumableSub_sc_result.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_cliente$ResumableSub_sc_result.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_cliente.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_cliente.dex index c2ed052..cb81246 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_cliente.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_cliente.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_clientes$ResumableSub_B4XPage_CloseRequest.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_clientes$ResumableSub_B4XPage_CloseRequest.dex index 4193a40..2b0108d 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_clientes$ResumableSub_B4XPage_CloseRequest.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_clientes$ResumableSub_B4XPage_CloseRequest.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_clientes.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_clientes.dex index d446e6e..31023a6 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_clientes.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_clientes.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_historico$ResumableSub_B4XPage_CloseRequest.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_historico$ResumableSub_B4XPage_CloseRequest.dex index 8f36af1..bc47fc1 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_historico$ResumableSub_B4XPage_CloseRequest.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_historico$ResumableSub_B4XPage_CloseRequest.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_historico.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_historico.dex index 8701df8..a0e9ff5 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_historico.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_historico.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_mapas.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_mapas.dex index 1788099..5869061 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_mapas.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_mapas.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_nota$ResumableSub_B4XPage_CloseRequest.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_nota$ResumableSub_B4XPage_CloseRequest.dex index e00d593..374984b 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_nota$ResumableSub_B4XPage_CloseRequest.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_nota$ResumableSub_B4XPage_CloseRequest.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_nota.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_nota.dex index 23b3b25..b9b8282 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_nota.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_nota.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_noventa.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_noventa.dex index 71562c5..8083089 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_noventa.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_noventa.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_nuevocliente$ResumableSub_InitializeCamera2.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_nuevocliente$ResumableSub_InitializeCamera2.dex index 8a116fe..123fe66 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_nuevocliente$ResumableSub_InitializeCamera2.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_nuevocliente$ResumableSub_InitializeCamera2.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_nuevocliente.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_nuevocliente.dex index 6672e85..785c70b 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_nuevocliente.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_nuevocliente.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_pedidos$ResumableSub_B4XPage_CloseRequest.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_pedidos$ResumableSub_B4XPage_CloseRequest.dex index 1696091..51e9cc9 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_pedidos$ResumableSub_B4XPage_CloseRequest.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_pedidos$ResumableSub_B4XPage_CloseRequest.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_pedidos.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_pedidos.dex index dab258e..98d1853 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_pedidos.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_pedidos.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_principal$ResumableSub_B4XPage_Appear.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_principal$ResumableSub_B4XPage_Appear.dex index 2157d73..e138f40 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_principal$ResumableSub_B4XPage_Appear.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_principal$ResumableSub_B4XPage_Appear.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_principal$ResumableSub_B4XPage_CloseRequest.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_principal$ResumableSub_B4XPage_CloseRequest.dex index fdf3e8b..7670115 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_principal$ResumableSub_B4XPage_CloseRequest.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_principal$ResumableSub_B4XPage_CloseRequest.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_principal$ResumableSub_Btn_Ubicar_Click.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_principal$ResumableSub_Btn_Ubicar_Click.dex index 4b88c87..8714ffb 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_principal$ResumableSub_Btn_Ubicar_Click.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_principal$ResumableSub_Btn_Ubicar_Click.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_principal$_titledata.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_principal$_titledata.dex index 5b73f77..f06f968 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_principal$_titledata.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_principal$_titledata.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_principal.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_principal.dex index 47dbdf8..f39454d 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_principal.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_principal.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_productos$ResumableSub_B4XPage_Appear.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_productos$ResumableSub_B4XPage_Appear.dex index dcaa605..bc4ae0d 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_productos$ResumableSub_B4XPage_Appear.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_productos$ResumableSub_B4XPage_Appear.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_productos$ResumableSub_B4XPage_CloseRequest.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_productos$ResumableSub_B4XPage_CloseRequest.dex index 2f817c3..c506f4b 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_productos$ResumableSub_B4XPage_CloseRequest.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_productos$ResumableSub_B4XPage_CloseRequest.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_productos$ResumableSub_Busca_TextChanged.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_productos$ResumableSub_Busca_TextChanged.dex index adc2bd0..8a67d00 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_productos$ResumableSub_Busca_TextChanged.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_productos$ResumableSub_Busca_TextChanged.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_productos$ResumableSub_lv_catalogos2_ItemClick.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_productos$ResumableSub_lv_catalogos2_ItemClick.dex index ed2460d..096b7f3 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_productos$ResumableSub_lv_catalogos2_ItemClick.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_productos$ResumableSub_lv_catalogos2_ItemClick.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_productos.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_productos.dex index 5935fc4..ea82fd1 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_productos.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_productos.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_promos.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_promos.dex index 5444ba7..e709e14 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_promos.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_promos.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_ticketsdia.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_ticketsdia.dex index 94a6560..3b89269 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_ticketsdia.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_ticketsdia.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_updateavailable$ResumableSub_B4XPage_Appear.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_updateavailable$ResumableSub_B4XPage_Appear.dex index 68d3944..61aff88 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_updateavailable$ResumableSub_B4XPage_Appear.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_updateavailable$ResumableSub_B4XPage_Appear.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/c_updateavailable.dex b/B4A/Objects/dexed/keymon/lat/medicomed/c_updateavailable.dex index 0116e9d..a8fbf78 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/c_updateavailable.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/c_updateavailable.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/cameraexclass2.dex b/B4A/Objects/dexed/keymon/lat/medicomed/cameraexclass2.dex index 6892195..7a95b7c 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/cameraexclass2.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/cameraexclass2.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate$ResumableSub_DownloadApk.dex b/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate$ResumableSub_DownloadApk.dex index e265cda..596ea61 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate$ResumableSub_DownloadApk.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate$ResumableSub_DownloadApk.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate$ResumableSub_IsvalidWV.dex b/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate$ResumableSub_IsvalidWV.dex index e0d7fa0..f8b9fe4 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate$ResumableSub_IsvalidWV.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate$ResumableSub_IsvalidWV.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate$ResumableSub_ReadWebVN.dex b/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate$ResumableSub_ReadWebVN.dex index 30bfeb9..6e4b541 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate$ResumableSub_ReadWebVN.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate$ResumableSub_ReadWebVN.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate$ResumableSub_TryApkUpdate.dex b/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate$ResumableSub_TryApkUpdate.dex index c5cab96..181fffd 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate$ResumableSub_TryApkUpdate.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate$ResumableSub_TryApkUpdate.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate$ResumableSub_UpdateApk.dex b/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate$ResumableSub_UpdateApk.dex index 9a54b97..e6feb7f 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate$ResumableSub_UpdateApk.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate$ResumableSub_UpdateApk.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate.dex b/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate.dex index acc678c..404eff9 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/cl_appupdate.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/dbrequestmanager$_dbcommand.dex b/B4A/Objects/dexed/keymon/lat/medicomed/dbrequestmanager$_dbcommand.dex index d475d79..f398f2a 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/dbrequestmanager$_dbcommand.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/dbrequestmanager$_dbcommand.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/dbrequestmanager$_dbresult.dex b/B4A/Objects/dexed/keymon/lat/medicomed/dbrequestmanager$_dbresult.dex index 3da2791..4ab071f 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/dbrequestmanager$_dbresult.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/dbrequestmanager$_dbresult.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/dbrequestmanager.dex b/B4A/Objects/dexed/keymon/lat/medicomed/dbrequestmanager.dex index 73755a1..1e6a328 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/dbrequestmanager.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/dbrequestmanager.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/fileprovider.dex b/B4A/Objects/dexed/keymon/lat/medicomed/fileprovider.dex index 3028e9a..fe95ec2 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/fileprovider.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/fileprovider.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/httpjob$_multipartfiledata.dex b/B4A/Objects/dexed/keymon/lat/medicomed/httpjob$_multipartfiledata.dex index 11b3750..00d15a0 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/httpjob$_multipartfiledata.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/httpjob$_multipartfiledata.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/httpjob.dex b/B4A/Objects/dexed/keymon/lat/medicomed/httpjob.dex index 8ed9fb6..a8fea03 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/httpjob.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/httpjob.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/httputils2service.dex b/B4A/Objects/dexed/keymon/lat/medicomed/httputils2service.dex index 777a420..5ff24d5 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/httputils2service.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/httputils2service.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/madewithlove.dex b/B4A/Objects/dexed/keymon/lat/medicomed/madewithlove.dex index b80c2c9..8908896 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/madewithlove.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/madewithlove.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/main$_camerainfoandid.dex b/B4A/Objects/dexed/keymon/lat/medicomed/main$_camerainfoandid.dex index 089181f..28765f9 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/main$_camerainfoandid.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/main$_camerainfoandid.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/main$_camerasize.dex b/B4A/Objects/dexed/keymon/lat/medicomed/main$_camerasize.dex index f02c9cd..2e7cc71 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/main$_camerasize.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/main$_camerasize.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/main.dex b/B4A/Objects/dexed/keymon/lat/medicomed/main.dex index 080312b..9a01466 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/main.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/main.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/mapa_rutas$ResumableSub_Activity_Create.dex b/B4A/Objects/dexed/keymon/lat/medicomed/mapa_rutas$ResumableSub_Activity_Create.dex index 18f36b3..091b869 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/mapa_rutas$ResumableSub_Activity_Create.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/mapa_rutas$ResumableSub_Activity_Create.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/mapa_rutas$ResumableSub_Activity_Resume.dex b/B4A/Objects/dexed/keymon/lat/medicomed/mapa_rutas$ResumableSub_Activity_Resume.dex index 8fdc05f..3bf1e98 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/mapa_rutas$ResumableSub_Activity_Resume.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/mapa_rutas$ResumableSub_Activity_Resume.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/mapa_rutas$ResumableSub_MapFragment1_Ready.dex b/B4A/Objects/dexed/keymon/lat/medicomed/mapa_rutas$ResumableSub_MapFragment1_Ready.dex index 351a3b0..54b25c3 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/mapa_rutas$ResumableSub_MapFragment1_Ready.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/mapa_rutas$ResumableSub_MapFragment1_Ready.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/mapa_rutas.dex b/B4A/Objects/dexed/keymon/lat/medicomed/mapa_rutas.dex index 2a536f5..b5e994e 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/mapa_rutas.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/mapa_rutas.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/newinst2$newinst2_BR.dex b/B4A/Objects/dexed/keymon/lat/medicomed/newinst2$newinst2_BR.dex index 7740d95..4a69a84 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/newinst2$newinst2_BR.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/newinst2$newinst2_BR.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/newinst2.dex b/B4A/Objects/dexed/keymon/lat/medicomed/newinst2.dex index 5373524..96f7daa 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/newinst2.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/newinst2.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/preoptimizedclv$ResumableSub_B4XSeekBar1_TouchStateChanged.dex b/B4A/Objects/dexed/keymon/lat/medicomed/preoptimizedclv$ResumableSub_B4XSeekBar1_TouchStateChanged.dex index 650c088..03f3b33 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/preoptimizedclv$ResumableSub_B4XSeekBar1_TouchStateChanged.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/preoptimizedclv$ResumableSub_B4XSeekBar1_TouchStateChanged.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/preoptimizedclv$ResumableSub_ListChangedExternally.dex b/B4A/Objects/dexed/keymon/lat/medicomed/preoptimizedclv$ResumableSub_ListChangedExternally.dex index 7a388f2..4aa795c 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/preoptimizedclv$ResumableSub_ListChangedExternally.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/preoptimizedclv$ResumableSub_ListChangedExternally.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/preoptimizedclv.dex b/B4A/Objects/dexed/keymon/lat/medicomed/preoptimizedclv.dex index b481f32..9697e52 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/preoptimizedclv.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/preoptimizedclv.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/roundslider.dex b/B4A/Objects/dexed/keymon/lat/medicomed/roundslider.dex index ff5588b..7961e85 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/roundslider.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/roundslider.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/scrollinglabel$ResumableSub_StartScrolling.dex b/B4A/Objects/dexed/keymon/lat/medicomed/scrollinglabel$ResumableSub_StartScrolling.dex index ad01416..b9eed81 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/scrollinglabel$ResumableSub_StartScrolling.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/scrollinglabel$ResumableSub_StartScrolling.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/scrollinglabel.dex b/B4A/Objects/dexed/keymon/lat/medicomed/scrollinglabel.dex index da22ecd..6245468 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/scrollinglabel.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/scrollinglabel.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/starter$starter_BR.dex b/B4A/Objects/dexed/keymon/lat/medicomed/starter$starter_BR.dex index 215edd9..189c7b9 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/starter$starter_BR.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/starter$starter_BR.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/starter.dex b/B4A/Objects/dexed/keymon/lat/medicomed/starter.dex index 51a861f..7abb9c3 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/starter.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/starter.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/subs.dex b/B4A/Objects/dexed/keymon/lat/medicomed/subs.dex index 7cdd2b4..1ced63d 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/subs.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/subs.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/swiftbutton.dex b/B4A/Objects/dexed/keymon/lat/medicomed/swiftbutton.dex index d70da79..60b5d76 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/swiftbutton.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/swiftbutton.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/tracker$ResumableSub_StartFLP.dex b/B4A/Objects/dexed/keymon/lat/medicomed/tracker$ResumableSub_StartFLP.dex index 695d453..ca83b66 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/tracker$ResumableSub_StartFLP.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/tracker$ResumableSub_StartFLP.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/tracker$ResumableSub_StartFLPSmall.dex b/B4A/Objects/dexed/keymon/lat/medicomed/tracker$ResumableSub_StartFLPSmall.dex index a49b128..b1429be 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/tracker$ResumableSub_StartFLPSmall.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/tracker$ResumableSub_StartFLPSmall.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/tracker$tracker_BR.dex b/B4A/Objects/dexed/keymon/lat/medicomed/tracker$tracker_BR.dex index ee2a764..da7c966 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/tracker$tracker_BR.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/tracker$tracker_BR.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/tracker.dex b/B4A/Objects/dexed/keymon/lat/medicomed/tracker.dex index 0dd7e5a..9c6dd77 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/tracker.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/tracker.dex differ diff --git a/B4A/Objects/dexed/keymon/lat/medicomed/xuiviewsutils.dex b/B4A/Objects/dexed/keymon/lat/medicomed/xuiviewsutils.dex index 3bbc6f5..38c7a43 100644 Binary files a/B4A/Objects/dexed/keymon/lat/medicomed/xuiviewsutils.dex and b/B4A/Objects/dexed/keymon/lat/medicomed/xuiviewsutils.dex differ diff --git a/B4A/Objects/medicomed.apk b/B4A/Objects/medicomed.apk new file mode 100644 index 0000000..8927699 Binary files /dev/null and b/B4A/Objects/medicomed.apk differ diff --git a/B4A/Objects/medicomed_RAPID_DEBUG.apk b/B4A/Objects/medicomed_RAPID_DEBUG.apk deleted file mode 100644 index f8c0388..0000000 Binary files a/B4A/Objects/medicomed_RAPID_DEBUG.apk and /dev/null differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/appupdater_subs_0$ResumableSub_Service_Start.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/appupdater_subs_0$ResumableSub_Service_Start.class index 09a5258..1048ed8 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/appupdater_subs_0$ResumableSub_Service_Start.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/appupdater_subs_0$ResumableSub_Service_Start.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/appupdater_subs_0$ResumableSub_download_newApk.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/appupdater_subs_0$ResumableSub_download_newApk.class index 71831ff..f2981c4 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/appupdater_subs_0$ResumableSub_download_newApk.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/appupdater_subs_0$ResumableSub_download_newApk.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/appupdater_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/appupdater_subs_0.class index dbc42dd..215e0fe 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/appupdater_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/appupdater_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xbytesbuilder_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xbytesbuilder_subs_0.class index 351de96..5e31ac3 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xbytesbuilder_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xbytesbuilder_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xfloattextfield_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xfloattextfield_subs_0.class index 5efcc19..7de629c 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xfloattextfield_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xfloattextfield_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4ximageview_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4ximageview_subs_0.class index 4cb68f9..5e9b6d5 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4ximageview_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4ximageview_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xmainpage_subs_0$ResumableSub_B4XPage_Appear.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xmainpage_subs_0$ResumableSub_B4XPage_Appear.class index c229d8f..1a2f2ea 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xmainpage_subs_0$ResumableSub_B4XPage_Appear.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xmainpage_subs_0$ResumableSub_B4XPage_Appear.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xmainpage_subs_0$ResumableSub_B4XPage_CloseRequest.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xmainpage_subs_0$ResumableSub_B4XPage_CloseRequest.class index 66593da..7927b2d 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xmainpage_subs_0$ResumableSub_B4XPage_CloseRequest.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xmainpage_subs_0$ResumableSub_B4XPage_CloseRequest.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xmainpage_subs_0$ResumableSub_b_envioBD_Click.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xmainpage_subs_0$ResumableSub_b_envioBD_Click.class index cb9cbaa..14424a9 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xmainpage_subs_0$ResumableSub_b_envioBD_Click.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xmainpage_subs_0$ResumableSub_b_envioBD_Click.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xmainpage_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xmainpage_subs_0.class index 8c8321d..23da824 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xmainpage_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xmainpage_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xpagesmanager_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xpagesmanager_subs_0.class index 02ffb5c..b72e90d 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xpagesmanager_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xpagesmanager_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xsearchtemplate_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xsearchtemplate_subs_0.class index 5285c4c..72d4710 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xsearchtemplate_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/b4xsearchtemplate_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_cliente.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_cliente.class index b6f11a7..18b6048 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_cliente.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_cliente.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_cliente_subs_0$ResumableSub_B4XPage_CloseRequest.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_cliente_subs_0$ResumableSub_B4XPage_CloseRequest.class index e787f6e..a631d38 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_cliente_subs_0$ResumableSub_B4XPage_CloseRequest.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_cliente_subs_0$ResumableSub_B4XPage_CloseRequest.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_cliente_subs_0$ResumableSub_b_abono_Click.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_cliente_subs_0$ResumableSub_b_abono_Click.class index 58bb91e..c042de2 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_cliente_subs_0$ResumableSub_b_abono_Click.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_cliente_subs_0$ResumableSub_b_abono_Click.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_cliente_subs_0$ResumableSub_sc_result.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_cliente_subs_0$ResumableSub_sc_result.class index 759499e..a2fc73c 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_cliente_subs_0$ResumableSub_sc_result.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_cliente_subs_0$ResumableSub_sc_result.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_cliente_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_cliente_subs_0.class index 8bfcbee..71e238b 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_cliente_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_cliente_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_clientes_subs_0$ResumableSub_B4XPage_CloseRequest.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_clientes_subs_0$ResumableSub_B4XPage_CloseRequest.class index ef71b4d..b5b6f83 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_clientes_subs_0$ResumableSub_B4XPage_CloseRequest.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_clientes_subs_0$ResumableSub_B4XPage_CloseRequest.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_clientes_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_clientes_subs_0.class index 75a5207..36926a2 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_clientes_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_clientes_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_historico_subs_0$ResumableSub_B4XPage_CloseRequest.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_historico_subs_0$ResumableSub_B4XPage_CloseRequest.class index 6817569..b488e75 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_historico_subs_0$ResumableSub_B4XPage_CloseRequest.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_historico_subs_0$ResumableSub_B4XPage_CloseRequest.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_historico_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_historico_subs_0.class index 74b0f83..87300bc 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_historico_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_historico_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_mapas_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_mapas_subs_0.class index e589931..66db0ac 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_mapas_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_mapas_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_noventa_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_noventa_subs_0.class index bbdc8e3..5735098 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_noventa_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_noventa_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_nuevocliente_subs_0$ResumableSub_InitializeCamera2.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_nuevocliente_subs_0$ResumableSub_InitializeCamera2.class index 63f8daa..475a84c 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_nuevocliente_subs_0$ResumableSub_InitializeCamera2.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_nuevocliente_subs_0$ResumableSub_InitializeCamera2.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_nuevocliente_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_nuevocliente_subs_0.class index 91d1595..83b4451 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_nuevocliente_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_nuevocliente_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_pedidos_subs_0$ResumableSub_B4XPage_CloseRequest.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_pedidos_subs_0$ResumableSub_B4XPage_CloseRequest.class index c426f87..1377862 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_pedidos_subs_0$ResumableSub_B4XPage_CloseRequest.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_pedidos_subs_0$ResumableSub_B4XPage_CloseRequest.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_pedidos_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_pedidos_subs_0.class index c893ba7..3e5cf53 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_pedidos_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_pedidos_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_principal_subs_0$ResumableSub_B4XPage_Appear.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_principal_subs_0$ResumableSub_B4XPage_Appear.class index f226f84..18c9e5c 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_principal_subs_0$ResumableSub_B4XPage_Appear.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_principal_subs_0$ResumableSub_B4XPage_Appear.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_principal_subs_0$ResumableSub_B4XPage_CloseRequest.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_principal_subs_0$ResumableSub_B4XPage_CloseRequest.class index 8bca7ee..5155dcc 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_principal_subs_0$ResumableSub_B4XPage_CloseRequest.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_principal_subs_0$ResumableSub_B4XPage_CloseRequest.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_principal_subs_0$ResumableSub_Btn_Ubicar_Click.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_principal_subs_0$ResumableSub_Btn_Ubicar_Click.class index 8bebc0b..e6cae3c 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_principal_subs_0$ResumableSub_Btn_Ubicar_Click.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_principal_subs_0$ResumableSub_Btn_Ubicar_Click.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_principal_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_principal_subs_0.class index 543d5b3..2da3d9f 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_principal_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_principal_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_productos_subs_0$ResumableSub_B4XPage_Appear.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_productos_subs_0$ResumableSub_B4XPage_Appear.class index b81e143..d5b7d04 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_productos_subs_0$ResumableSub_B4XPage_Appear.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_productos_subs_0$ResumableSub_B4XPage_Appear.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_productos_subs_0$ResumableSub_B4XPage_CloseRequest.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_productos_subs_0$ResumableSub_B4XPage_CloseRequest.class index 7b2b389..7e6ec70 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_productos_subs_0$ResumableSub_B4XPage_CloseRequest.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_productos_subs_0$ResumableSub_B4XPage_CloseRequest.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_productos_subs_0$ResumableSub_Busca_TextChanged.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_productos_subs_0$ResumableSub_Busca_TextChanged.class index 6f42e43..df916f1 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_productos_subs_0$ResumableSub_Busca_TextChanged.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_productos_subs_0$ResumableSub_Busca_TextChanged.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_productos_subs_0$ResumableSub_lv_catalogos2_ItemClick.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_productos_subs_0$ResumableSub_lv_catalogos2_ItemClick.class index 28c082b..978d876 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_productos_subs_0$ResumableSub_lv_catalogos2_ItemClick.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_productos_subs_0$ResumableSub_lv_catalogos2_ItemClick.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_productos_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_productos_subs_0.class index 39fce2e..e84adfc 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_productos_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_productos_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_promos_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_promos_subs_0.class index 4fa62e0..571682c 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_promos_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_promos_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_ticketsdia_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_ticketsdia_subs_0.class index ff3b8a3..cc2356e 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_ticketsdia_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_ticketsdia_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_updateavailable_subs_0$ResumableSub_B4XPage_Appear.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_updateavailable_subs_0$ResumableSub_B4XPage_Appear.class index 363517f..8ff4c21 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_updateavailable_subs_0$ResumableSub_B4XPage_Appear.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_updateavailable_subs_0$ResumableSub_B4XPage_Appear.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_updateavailable_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_updateavailable_subs_0.class index 4443769..943dced 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_updateavailable_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/c_updateavailable_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cameraexclass2_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cameraexclass2_subs_0.class index b4d4948..3db82e8 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cameraexclass2_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cameraexclass2_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0$ResumableSub_DownloadApk.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0$ResumableSub_DownloadApk.class index 6125f49..8f940d1 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0$ResumableSub_DownloadApk.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0$ResumableSub_DownloadApk.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0$ResumableSub_IsvalidWV.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0$ResumableSub_IsvalidWV.class index 2fb2792..adefdd6 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0$ResumableSub_IsvalidWV.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0$ResumableSub_IsvalidWV.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0$ResumableSub_ReadWebVN.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0$ResumableSub_ReadWebVN.class index 3d10cf6..01177c9 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0$ResumableSub_ReadWebVN.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0$ResumableSub_ReadWebVN.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0$ResumableSub_TryApkUpdate.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0$ResumableSub_TryApkUpdate.class index 804505b..7b85853 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0$ResumableSub_TryApkUpdate.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0$ResumableSub_TryApkUpdate.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0$ResumableSub_UpdateApk.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0$ResumableSub_UpdateApk.class index a8f1a76..f3fab12 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0$ResumableSub_UpdateApk.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0$ResumableSub_UpdateApk.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0.class index 9f7f0ce..10cdfb1 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/cl_appupdate_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/dbrequestmanager_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/dbrequestmanager_subs_0.class index ced372a..3e6b1d2 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/dbrequestmanager_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/dbrequestmanager_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/fileprovider_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/fileprovider_subs_0.class index 77adc0d..e9346e7 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/fileprovider_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/fileprovider_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/httpjob_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/httpjob_subs_0.class index bb93026..a0b1778 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/httpjob_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/httpjob_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/httputils2service_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/httputils2service_subs_0.class index 86bea5c..d979796 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/httputils2service_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/httputils2service_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/main_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/main_subs_0.class index 09001e2..7561e72 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/main_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/main_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/mapa_rutas_subs_0$ResumableSub_Activity_Create.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/mapa_rutas_subs_0$ResumableSub_Activity_Create.class index 317dd5e..205e011 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/mapa_rutas_subs_0$ResumableSub_Activity_Create.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/mapa_rutas_subs_0$ResumableSub_Activity_Create.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/mapa_rutas_subs_0$ResumableSub_MapFragment1_Ready.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/mapa_rutas_subs_0$ResumableSub_MapFragment1_Ready.class index 715199c..86d8fb0 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/mapa_rutas_subs_0$ResumableSub_MapFragment1_Ready.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/mapa_rutas_subs_0$ResumableSub_MapFragment1_Ready.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/newinst2_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/newinst2_subs_0.class index a568400..8c5680d 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/newinst2_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/newinst2_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/starter_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/starter_subs_0.class index 4ed8222..f3fca2d 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/starter_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/starter_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/subs_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/subs_subs_0.class index 8deffa6..3b4b4b8 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/subs_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/subs_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/tracker_subs_0$ResumableSub_StartFLPSmall.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/tracker_subs_0$ResumableSub_StartFLPSmall.class index d128572..f1db184 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/tracker_subs_0$ResumableSub_StartFLPSmall.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/tracker_subs_0$ResumableSub_StartFLPSmall.class differ diff --git a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/tracker_subs_0.class b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/tracker_subs_0.class index 1beee95..6d9c93d 100644 Binary files a/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/tracker_subs_0.class and b/B4A/Objects/shell/bin/classes/keymon/lat/medicomed/tracker_subs_0.class differ diff --git a/B4A/Objects/shell/bin/classes/subs.txt b/B4A/Objects/shell/bin/classes/subs.txt deleted file mode 100644 index 301ba39..0000000 --- a/B4A/Objects/shell/bin/classes/subs.txt +++ /dev/null @@ -1,4158 +0,0 @@ -keymon.lat.medicomed -0 -54 -b4xmainpage -c_principal -c_cliente -c_clientes -c_mapas -c_nota -c_noventa -c_ticketsdia -cameraexclass2 -batteryutilities -c_historico -c_nuevocliente -c_pedidos -c_productos -c_promos -c_updateavailable -dbrequestmanager -cl_appupdate -b4xbitset -b4xbytesbuilder -b4xcache -b4xcomparatorsort -b4xorderedmap -b4xset -b4xpagesdelegator -b4xpagesmanager -httpjob -animatedcounter -anotherprogressbar -b4xbreadcrumb -b4xcolortemplate -b4xcombobox -b4xdatetemplate -b4xdialog -b4xfloattextfield -b4ximageview -b4xinputtemplate -b4xlisttemplate -b4xloadingindicator -b4xlongtexttemplate -b4xplusminus -b4xradiobutton -b4xsearchtemplate -b4xseekbar -b4xsignaturetemplate -b4xswitch -b4xtimedtemplate -madewithlove -b4xformatter -roundslider -scrollinglabel -swiftbutton -preoptimizedclv -fileprovider -40 -cl_appupdate -b4xpages -b4xbitset -b4xbytesbuilder -b4xcache -b4xcollections -b4xcomparatorsort -b4xorderedmap -b4xset -b4xpagesdelegator -b4xpagesmanager -httpjob -animatedcounter -anotherprogressbar -b4xbreadcrumb -b4xcolortemplate -b4xcombobox -b4xdatetemplate -b4xdialog -b4xfloattextfield -b4ximageview -b4xinputtemplate -b4xlisttemplate -b4xloadingindicator -b4xlongtexttemplate -b4xplusminus -b4xradiobutton -b4xsearchtemplate -b4xseekbar -b4xsignaturetemplate -b4xswitch -b4xtimedtemplate -madewithlove -b4xformatter -roundslider -scrollinglabel -swiftbutton -xuiviewsutils -preoptimizedclv -fileprovider -main,activity_actionbarhomeclick,1,0,36,40 -,actionbarhomeclicked,b4xpages,delegate,b4xpages,mpm,starter,ruta,starter,dia_semana -,actionbarhomeclicked,starter,dia_semana -b4xpagesdelegator,activity_actionbarhomeclick,b4xpages,getmanager,b4xpagesmanager,activity_actionbarhomeclick,b4xpagesmanager,gettoppage,b4xpagesmanager,closerequestexists,b4xpagesmanager,handlecloserequest,b4xpagesmanager,closepage,b4xset,getsize,b4xorderedmap,get,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys,b4xpagesmanager,logevent,b4xmainpage,b4xpage_closerequest,c_principal,b4xpage_closerequest,c_cliente,b4xpage_closerequest,c_clientes,b4xpage_closerequest,c_nota,b4xpage_closerequest,c_historico,b4xpage_closerequest,c_pedidos,b4xpage_closerequest,c_productos,b4xpage_closerequest,c_principal,b_ok_res_click,c_principal,b_ok_panel5_click,b4xpages,showpage,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring,subs,pedidoguardado,subs,borrapedidoclienteactual,c_cliente,guardar_click,c_productos,b4xpage_appear,subs,traecliente,subs,traeruta,subs,traetotalesclienteactual,subs,haypedido,b4xset,contains,b4xpagesmanager,closepageimpl -main,activity_create,1,0,28,31 -b4xpages,delegate,b4xpages,mpm,starter,ruta,starter,dia_semana -b4xpages,mpm,starter,dia_semana -b4xpagesmanager,initialize,b4xorderedmap,initialize,b4xset,initialize,b4xpagesmanager,checkmainactivityorientations,b4xpages,internalsetpagesmanager,b4xmainpage,initialize,b4xorderedmap,getsize,b4xorderedmap,put,b4xpagesmanager,createb4xpageinfo,b4xpagesmanager,backgroundstatechanged,b4xorderedmap,remove,b4xpagesmanager,addpageandcreate,b4xpagesmanager,raiseevent,b4xpagesmanager,gettoppage,b4xpagesdelegator,initialize,b4xorderedmap,getvalues,b4xpagesmanager,logevent,b4xpagesmanager,addpage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,getpagefromid,b4xorderedmap,containskey,b4xpagesmanager,showpage,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xpagesmanager,createpageimpl,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,getmanager,b4xpages,settitle,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -main,activity_keypress,1,0,42,44 -b4xpages,delegate,b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpagesdelegator,activity_keypress,b4xpages,getmanager,b4xpagesmanager,activity_keypress,b4xpagesmanager,gettoppage,b4xpagesmanager,closerequestexists,b4xpagesmanager,handlecloserequest,b4xpagesmanager,closepage,b4xset,getsize,b4xorderedmap,get,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys,b4xpagesmanager,logevent,b4xmainpage,b4xpage_closerequest,c_principal,b4xpage_closerequest,c_cliente,b4xpage_closerequest,c_clientes,b4xpage_closerequest,c_nota,b4xpage_closerequest,c_historico,b4xpage_closerequest,c_pedidos,b4xpage_closerequest,c_productos,b4xpage_closerequest,c_principal,b_ok_res_click,c_principal,b_ok_panel5_click,b4xpages,showpage,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring,subs,pedidoguardado,subs,borrapedidoclienteactual,c_cliente,guardar_click,c_productos,b4xpage_appear,subs,traecliente,subs,traeruta,subs,traetotalesclienteactual,subs,haypedido,b4xset,contains,b4xpagesmanager,closepageimpl -main,activity_pause,1,0,50,52 -b4xpages,delegate,b4xpages,mpm - -b4xpagesdelegator,activity_pause,b4xpages,getmanager,b4xpagesmanager,activity_pause,b4xpagesmanager,raiseeventwithresult,b4xpagesmanager,gettoppage,b4xpagesmanager,backgroundstatechanged,b4xpagesmanager,logevent,b4xset,getsize,b4xorderedmap,get,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys,b4xorderedmap,getvalues -main,activity_permissionresult,0,0,54,56 -b4xpages,delegate,b4xpages,mpm - -b4xpagesdelegator,activity_permissionresult,b4xpages,getmanager,b4xpagesmanager,raiseevent,b4xpagesmanager,gettoppage,b4xpagesmanager,logevent,b4xset,getsize,b4xorderedmap,get,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys -main,activity_resume,1,0,46,48 -b4xpages,delegate,b4xpages,mpm - -b4xpagesdelegator,activity_resume,b4xpages,getmanager,b4xpagesmanager,activity_resume,b4xpagesmanager,backgroundstatechanged,b4xpagesmanager,raiseevent,b4xpagesmanager,gettoppage,b4xorderedmap,getvalues,b4xpagesmanager,logevent,b4xset,getsize,b4xorderedmap,get,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys -main,create_menu,0,0,58,60 -b4xpages,delegate,b4xpages,mpm - -b4xpagesdelegator,create_menu,b4xpages,getmanager,b4xpagesmanager,createmenu,b4xpagesmanager,gettoppage,b4xset,getsize,b4xorderedmap,get,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys -main,globals,0,1,23,26 - - - -main,process_globals,0,1,19,21 - - - -b4xpagesdelegator,activity_actionbarhomeclick,1,0,35,37 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,getmanager,b4xpagesmanager,activity_actionbarhomeclick,b4xpagesmanager,gettoppage,b4xpagesmanager,closerequestexists,b4xpagesmanager,handlecloserequest,b4xpagesmanager,closepage,b4xset,getsize,b4xorderedmap,get,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys,b4xpagesmanager,logevent,b4xmainpage,b4xpage_closerequest,c_principal,b4xpage_closerequest,c_cliente,b4xpage_closerequest,c_clientes,b4xpage_closerequest,c_nota,b4xpage_closerequest,c_historico,b4xpage_closerequest,c_pedidos,b4xpage_closerequest,c_productos,b4xpage_closerequest,c_principal,b_ok_res_click,c_principal,b_ok_panel5_click,b4xpages,showpage,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring,subs,pedidoguardado,subs,borrapedidoclienteactual,c_cliente,guardar_click,c_productos,b4xpage_appear,subs,traecliente,subs,traeruta,subs,traetotalesclienteactual,subs,haypedido,b4xset,contains,b4xpagesmanager,closepageimpl -b4xpagesdelegator,activity_keypress,1,0,27,29 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,getmanager,b4xpagesmanager,activity_keypress,b4xpagesmanager,gettoppage,b4xpagesmanager,closerequestexists,b4xpagesmanager,handlecloserequest,b4xpagesmanager,closepage,b4xset,getsize,b4xorderedmap,get,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys,b4xpagesmanager,logevent,b4xmainpage,b4xpage_closerequest,c_principal,b4xpage_closerequest,c_cliente,b4xpage_closerequest,c_clientes,b4xpage_closerequest,c_nota,b4xpage_closerequest,c_historico,b4xpage_closerequest,c_pedidos,b4xpage_closerequest,c_productos,b4xpage_closerequest,c_principal,b_ok_res_click,c_principal,b_ok_panel5_click,b4xpages,showpage,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring,subs,pedidoguardado,subs,borrapedidoclienteactual,c_cliente,guardar_click,c_productos,b4xpage_appear,subs,traecliente,subs,traeruta,subs,traetotalesclienteactual,subs,haypedido,b4xset,contains,b4xpagesmanager,closepageimpl -b4xpagesdelegator,activity_pause,1,0,52,54 -b4xpages,mpm - -b4xpages,getmanager,b4xpagesmanager,activity_pause,b4xpagesmanager,raiseeventwithresult,b4xpagesmanager,gettoppage,b4xpagesmanager,backgroundstatechanged,b4xpagesmanager,logevent,b4xset,getsize,b4xorderedmap,get,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys,b4xorderedmap,getvalues -b4xpagesdelegator,activity_permissionresult,0,0,31,33 -b4xpages,mpm - -b4xpages,getmanager,b4xpagesmanager,raiseevent,b4xpagesmanager,gettoppage,b4xpagesmanager,logevent,b4xset,getsize,b4xorderedmap,get,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys -b4xpagesdelegator,activity_resume,1,0,48,50 -b4xpages,mpm - -b4xpages,getmanager,b4xpagesmanager,activity_resume,b4xpagesmanager,backgroundstatechanged,b4xpagesmanager,raiseevent,b4xpagesmanager,gettoppage,b4xorderedmap,getvalues,b4xpagesmanager,logevent,b4xset,getsize,b4xorderedmap,get,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys -b4xpagesdelegator,create_menu,0,0,39,41 -b4xpages,mpm - -b4xpages,getmanager,b4xpagesmanager,createmenu,b4xpagesmanager,gettoppage,b4xset,getsize,b4xorderedmap,get,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys -b4xpagesdelegator,initialize,0,0,4,6 - - - -b4xpagesdelegator,class_globals,0,0,1,2 - - - -b4xpagesdelegator,mainform_resize,0,0,44,46 -b4xpages,mpm - -b4xpages,getmanager,b4xpagesmanager,mainform_resize,b4xpagesmanager,raiseevent,b4xpagesmanager,getpageinfofromroot,b4xpagesmanager,logevent,b4xorderedmap,get -b4xpagesmanager,initialize,1,0,59,93 -b4xpages,delegate,b4xpages,mpm,starter,ruta,starter,dia_semana -b4xpages,mpm,starter,dia_semana -b4xorderedmap,initialize,b4xset,initialize,,checkmainactivityorientations,b4xpages,internalsetpagesmanager,b4xmainpage,initialize,b4xorderedmap,getsize,b4xorderedmap,put,,createb4xpageinfo,,backgroundstatechanged,b4xorderedmap,remove,,addpageandcreate,,raiseevent,,gettoppage,b4xpagesdelegator,initialize,b4xorderedmap,getvalues,,logevent,,addpage,,createpageifneeded,,getpagefromid,b4xorderedmap,containskey,,showpage,,toppagedisappear,b4xset,remove,,showpageimpl,b4xset,add,,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,,createpageimpl,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,,createb4xpageparent,b4xpages,getmanager,b4xpages,settitle,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,,settitle,,findpifromb4xpage,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,,raiseeventwithresult,,updatemenuitems,,updatestackstring -b4xpagesmanager,addmenuitem,0,0,481,488 - - -,findpifromb4xpage,b4xorderedmap,getvalues -b4xpagesmanager,addpage,1,0,141,149 -starter,ruta,b4xpages,mpm,starter,dia_semana -starter,dia_semana -b4xorderedmap,containskey,b4xorderedmap,put,,createb4xpageinfo,b4xorderedmap,getsize,,showpage,,getpagefromid,,gettoppage,,createpageifneeded,,toppagedisappear,b4xset,remove,,showpageimpl,b4xset,add,,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,,createpageimpl,,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,,createb4xpageparent,b4xpages,getmanager,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,,settitle,,findpifromb4xpage,b4xorderedmap,getvalues,,addpage,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,,raiseeventwithresult,b4xorderedmap,remove,,raiseevent,,updatemenuitems,,updatestackstring -b4xpagesmanager,addpageandcreate,1,0,151,154 -starter,ruta,b4xpages,mpm,starter,dia_semana -starter,dia_semana -,addpage,,createpageifneeded,,getpagefromid,b4xorderedmap,containskey,b4xorderedmap,put,,createb4xpageinfo,b4xorderedmap,getsize,,showpage,,gettoppage,,toppagedisappear,b4xset,remove,,showpageimpl,b4xset,add,,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,,createpageimpl,,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,,createb4xpageparent,b4xpages,getmanager,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,,settitle,,findpifromb4xpage,b4xorderedmap,getvalues,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,,raiseeventwithresult,b4xorderedmap,remove,,raiseevent,,updatemenuitems,,updatestackstring -b4xpagesmanager,closepage,1,0,209,230 - - -,findpifromb4xpage,b4xset,contains,,gettoppage,b4xset,getsize,,closepageimpl,,toppagedisappear,b4xset,remove,,showpageimpl,,toppageappear,b4xorderedmap,getvalues,b4xorderedmap,containskey,b4xorderedmap,get,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys,,raiseeventwithresult,,logevent,b4xorderedmap,remove,,raiseevent,,updatemenuitems,,updatestackstring -b4xpagesmanager,findpifromb4xpage,0,0,306,313 - - -b4xorderedmap,getvalues -b4xpagesmanager,getpage,0,0,394,396 - - -,getpagefromid,b4xorderedmap,get,b4xorderedmap,getkeys -b4xpagesmanager,settitle,0,0,363,367 - - -,findpifromb4xpage,b4xorderedmap,getvalues -b4xpagesmanager,showpage,1,0,156,178 -starter,ruta,b4xpages,mpm,starter,dia_semana -starter,dia_semana -,getpagefromid,,gettoppage,,createpageifneeded,,toppagedisappear,b4xset,remove,,showpageimpl,b4xset,add,,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,,createpageimpl,b4xorderedmap,put,,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,,createb4xpageparent,b4xpages,getmanager,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,,settitle,,findpifromb4xpage,b4xorderedmap,getvalues,,addpage,b4xorderedmap,containskey,,createb4xpageinfo,,showpage,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,,raiseeventwithresult,b4xorderedmap,remove,,raiseevent,,updatemenuitems,,updatestackstring -b4xpagesmanager,showpageandremovepreviouspages,1,0,180,207 -starter,ruta,b4xpages,mpm,starter,dia_semana -starter,dia_semana -,gettoppage,,showpage,,getpagefromid,,createpageifneeded,,toppagedisappear,b4xset,aslist,b4xset,clear,b4xset,add,,showpageimpl,,toppageappear,b4xset,getsize,b4xorderedmap,get,b4xorderedmap,getsize,b4xorderedmap,getkeys,b4xset,remove,,createpageimpl,b4xorderedmap,put,,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,,createb4xpageparent,b4xpages,getmanager,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,,settitle,,findpifromb4xpage,b4xorderedmap,getvalues,,addpage,b4xorderedmap,containskey,,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xorderedmap,clear,,raiseeventwithresult,b4xorderedmap,remove,,raiseevent,,updatemenuitems,,updatestackstring -b4xpagesmanager,activity_actionbarhomeclick,1,0,129,138 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -,gettoppage,,closerequestexists,,handlecloserequest,,closepage,b4xset,getsize,b4xorderedmap,get,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys,,logevent,b4xmainpage,b4xpage_closerequest,c_principal,b4xpage_closerequest,c_cliente,b4xpage_closerequest,c_clientes,b4xpage_closerequest,c_nota,b4xpage_closerequest,c_historico,b4xpage_closerequest,c_pedidos,b4xpage_closerequest,c_productos,b4xpage_closerequest,c_principal,b_ok_res_click,c_principal,b_ok_panel5_click,b4xpages,showpage,b4xpages,getmanager,,showpage,,getpagefromid,,createpageifneeded,,toppagedisappear,b4xset,remove,,showpageimpl,b4xset,add,,toppageappear,,createpageimpl,b4xorderedmap,put,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,,settitle,,findpifromb4xpage,b4xorderedmap,getvalues,,addpage,b4xorderedmap,containskey,,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,,raiseeventwithresult,b4xorderedmap,remove,,raiseevent,,updatemenuitems,,updatestackstring,subs,pedidoguardado,subs,borrapedidoclienteactual,c_cliente,guardar_click,c_productos,b4xpage_appear,subs,traecliente,subs,traeruta,subs,traetotalesclienteactual,subs,haypedido,b4xset,contains,,closepageimpl -b4xpagesmanager,activity_keypress,1,0,468,479 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -,gettoppage,,closerequestexists,,handlecloserequest,,closepage,b4xset,getsize,b4xorderedmap,get,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys,,logevent,b4xmainpage,b4xpage_closerequest,c_principal,b4xpage_closerequest,c_cliente,b4xpage_closerequest,c_clientes,b4xpage_closerequest,c_nota,b4xpage_closerequest,c_historico,b4xpage_closerequest,c_pedidos,b4xpage_closerequest,c_productos,b4xpage_closerequest,c_principal,b_ok_res_click,c_principal,b_ok_panel5_click,b4xpages,showpage,b4xpages,getmanager,,showpage,,getpagefromid,,createpageifneeded,,toppagedisappear,b4xset,remove,,showpageimpl,b4xset,add,,toppageappear,,createpageimpl,b4xorderedmap,put,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,,settitle,,findpifromb4xpage,b4xorderedmap,getvalues,,addpage,b4xorderedmap,containskey,,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,,raiseeventwithresult,b4xorderedmap,remove,,raiseevent,,updatemenuitems,,updatestackstring,subs,pedidoguardado,subs,borrapedidoclienteactual,c_cliente,guardar_click,c_productos,b4xpage_appear,subs,traecliente,subs,traeruta,subs,traetotalesclienteactual,subs,haypedido,b4xset,contains,,closepageimpl -b4xpagesmanager,activity_pause,1,0,635,638 - - -,raiseeventwithresult,,gettoppage,,backgroundstatechanged,,logevent,b4xset,getsize,b4xorderedmap,get,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys,b4xorderedmap,getvalues -b4xpagesmanager,raiseevent,0,0,548,564 - - -,logevent -b4xpagesmanager,gettoppage,0,0,592,595 - - -b4xset,getsize,b4xorderedmap,get,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys -b4xpagesmanager,activity_resume,1,0,610,616 - - -,backgroundstatechanged,,raiseevent,,gettoppage,b4xorderedmap,getvalues,,logevent,b4xset,getsize,b4xorderedmap,get,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys -b4xpagesmanager,createmenu,0,0,494,512 - - -,gettoppage,b4xset,getsize,b4xorderedmap,get,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys -b4xpagesmanager,mainform_resize,0,0,585,589 - - -,raiseevent,,getpageinfofromroot,,logevent,b4xorderedmap,get -b4xpagesmanager,closerequestexists,0,0,534,536 - - - -b4xpagesmanager,handlecloserequest,1,0,538,545 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -,logevent,b4xmainpage,b4xpage_closerequest,c_principal,b4xpage_closerequest,c_cliente,b4xpage_closerequest,c_clientes,b4xpage_closerequest,c_nota,b4xpage_closerequest,c_historico,b4xpage_closerequest,c_pedidos,b4xpage_closerequest,c_productos,b4xpage_closerequest,,closepage,c_principal,b_ok_res_click,c_principal,b_ok_panel5_click,b4xpages,showpage,b4xpages,getmanager,,showpage,,getpagefromid,,gettoppage,,createpageifneeded,,toppagedisappear,b4xset,remove,,showpageimpl,b4xset,add,,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,,createpageimpl,b4xorderedmap,put,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,,settitle,,findpifromb4xpage,b4xorderedmap,getvalues,,addpage,b4xorderedmap,containskey,,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,,raiseeventwithresult,b4xorderedmap,remove,,raiseevent,,updatemenuitems,,updatestackstring,subs,pedidoguardado,subs,borrapedidoclienteactual,c_cliente,guardar_click,c_productos,b4xpage_appear,subs,traecliente,subs,traeruta,subs,traetotalesclienteactual,subs,haypedido,b4xset,contains,,closepageimpl -b4xpagesmanager,raiseeventwithresult,1,0,566,583 - - -,logevent -b4xpagesmanager,backgroundstatechanged,1,0,618,633 - - -b4xorderedmap,getvalues,,logevent -b4xpagesmanager,createb4xpageinfo,0,0,420,428 - - - -b4xpagesmanager,createpageifneeded,1,0,352,361 -starter,ruta,b4xpages,mpm,starter,dia_semana -starter,dia_semana -b4xorderedmap,getsize,,createpageimpl,b4xorderedmap,put,,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,,createb4xpageparent,b4xpages,getmanager,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,,settitle,,findpifromb4xpage,b4xorderedmap,getvalues,,addpage,b4xorderedmap,containskey,,createb4xpageinfo,,showpage,,getpagefromid,,gettoppage,,createpageifneeded,,toppagedisappear,b4xset,remove,,showpageimpl,b4xset,add,,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,,raiseeventwithresult,b4xorderedmap,remove,,raiseevent,,updatemenuitems,,updatestackstring -b4xpagesmanager,getpagefromid,0,0,398,405 - - -b4xorderedmap,get,b4xorderedmap,getkeys -b4xpagesmanager,logevent,0,0,640,645 - - - -b4xpagesmanager,checkmainactivityorientations,0,0,96,121 - - - -b4xpagesmanager,class_globals,0,0,22,54 - - - -b4xpagesmanager,closepageimpl,0,0,315,331 - - -b4xset,getsize,b4xorderedmap,getsize -b4xpagesmanager,toppagedisappear,1,0,277,286 - - -,gettoppage,,raiseeventwithresult,b4xset,getsize,b4xorderedmap,get,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys,,logevent -b4xpagesmanager,showpageimpl,0,0,333,350 - - - -b4xpagesmanager,toppageappear,0,0,288,304 - - -,gettoppage,,raiseevent,b4xset,getsize,,updatemenuitems,,updatestackstring,b4xorderedmap,get,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys,,logevent -b4xpagesmanager,createb4xpageparent,0,0,598,608 - - - -b4xpagesmanager,createpageimpl,0,0,369,392 - - -,createb4xpageparent -b4xpagesmanager,getpageinfofromroot,0,0,407,409 - - -b4xorderedmap,get -b4xpagesmanager,updatemenuitems,0,0,490,492 - - - -b4xpagesmanager,updatestackstring,0,0,647,659 - - -b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys -b4xmainpage,b_apk_click,0,0,621,623 - - - -b4xmainpage,b_enviobd_click,0,0,678,694 - - -fileprovider,getfileuri -b4xmainpage,b_menu_click,0,0,547,549 - - - -b4xmainpage,b_regesar_click,0,0,644,647 - - -subs,panelvisible -b4xmainpage,b_server_click,0,0,653,663 -starter,server -starter,server -dbrequestmanager,initialize,subs,panelvisible -b4xmainpage,b4xpage_appear,1,0,244,290 -starter,muestraprogreso,starter,server,starter,gps -starter,muestraprogreso -,muestraprogreso,dbrequestmanager,initialize,dbrequestmanager,executequery,,b4xpage_appear,batteryutilities,initialize,batteryutilities,getbatteryinformation,,dameusuario,dbrequestmanager,startjob,dbrequestmanager,writeobject,dbrequestmanager,writeint,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme -b4xmainpage,muestraprogreso,0,0,626,628 - - - -b4xmainpage,dameusuario,0,0,562,574 - - - -b4xmainpage,b4xpage_closerequest,0,0,516,529 - - - -b4xmainpage,b4xpage_created,1,0,101,242 -starter,ruta,b4xpages,mpm,starter,dia_semana -starter,dia_semana -b4xpages,getmanager,b4xpages,settitle,,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xorderedmap,put,b4xpagesmanager,createb4xpageinfo,b4xorderedmap,getsize,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xpagesmanager,createpageimpl,b4xpagesmanager,logevent,,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -b4xmainpage,initialize,0,0,96,98 - - - -b4xmainpage,class_globals,0,0,18,94 - - - -b4xmainpage,copiadb,0,0,592,619 -starter,rp - - -b4xmainpage,entrar_click,1,0,293,393 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,dbrequestmanager,executequery,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring,dbrequestmanager,startjob,dbrequestmanager,writeobject,dbrequestmanager,writeint,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme -b4xmainpage,entrar_longclick,0,0,665,667 - - - -b4xmainpage,gps_locationchanged,1,0,531,536 - - - -b4xmainpage,i_engrane_click,1,0,635,642 -starter,server - -subs,panelvisible -b4xmainpage,i_engrane_longclick,0,0,649,651 -starter,rp - -,copiadb -b4xmainpage,jobdone,1,0,395,514 -httputils2service,tempfolder,b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -dbrequestmanager,handlejob,httpjob,release,b4xpages,showpage,httpjob,getinputstream,dbrequestmanager,readobject,dbrequestmanager,readint,dbrequestmanager,readbyte,dbrequestmanager,readbytesfully,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -b4xmainpage,lv_server_itemclick,1,0,669,675 -starter,server,starter,reqmanager -starter,server -dbrequestmanager,initialize -b4xmainpage,ocultaprogreso,0,0,631,633 - - - -b4xmainpage,pdf_click,0,0,551,553 - - - -b4xmainpage,popupmenu_dismiss,0,0,538,540 - - - -b4xmainpage,popupmenu_menuitemclick,0,0,542,545 - - - -fileprovider,getfileuri,0,0,22,36 - - - -fileprovider,initialize,0,0,8,19 - - - -fileprovider,class_globals,0,0,2,6 - - - -fileprovider,setfileuriasintentdata,0,0,40,44 - - -,getfileuri -subs,panelvisible,0,0,619,624 - - - -subs,agregacolumna,0,0,1422,1440 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -subs,revisabd,0,0,184,283 -starter,ruta,,kmt,,errorlog - - -subs,fechakmt,0,0,63,71 - - - -subs,bitacora,0,0,1280,1336 -b4xpages,mpm - -,traenombrecliente,b4xpages,mainpage,dbrequestmanager,executecommand,b4xpages,getmanager,dbrequestmanager,executebatch,dbrequestmanager,startjob,dbrequestmanager,writeint,dbrequestmanager,writeobject,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme -subs,fechanormal,0,0,1348,1356 - - - -subs,centrapanel,0,0,632,634 - - - -subs,centrapanelv,0,0,637,639 - - - -subs,traenombrecliente,0,0,1339,1346 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -subs,traeusuariodebd,0,0,752,761 -,kmt,starter,ruta,,errorlog - -,revisabd -subs,traeruta,0,0,721,732 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -subs,traecliente,0,0,734,742 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -subs,ventanoventa,0,0,1369,1409 -b4xpages,mpm - -,traenombreclientev,b4xpages,mainpage,dbrequestmanager,executecommand,b4xpages,getmanager,dbrequestmanager,executebatch,dbrequestmanager,startjob,dbrequestmanager,writeint,dbrequestmanager,writeobject,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme -subs,traealmacen,0,0,694,702 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -subs,iniciaactividad,1,0,1359,1367 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,mainpage,b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -subs,pedidoguardado,0,0,1257,1266 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -subs,borrapedidoclienteactual,0,0,1239,1253 -b4xpages,mpm - -b4xpages,mainpage,,traealmacen,b4xpages,getmanager -subs,guardaclientehorainicio,0,0,1202,1205 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -subs,actualizaproducto,0,0,791,812 -b4xpages,mpm - -b4xpages,mainpage,,guardaproductosingestion,b4xpages,getmanager -subs,guardaproductosingestion,0,0,780,789 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -subs,actualizatet,0,0,1208,1223 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -subs,alcanzanlosvariablesparapromo,0,0,943,961 - - - -subs,borraarribade100errores,0,0,495,501 -,errorlog,starter,ruta,,kmt - -,revisabd -subs,borraarribade600renglonesbitacora,0,0,504,510 -,kmt,starter,ruta,,errorlog - -,revisabd -subs,borralogdb,0,0,379,383 -,kmt - - -subs,borramosarchivogps,0,0,175,181 - - - -subs,buscadbusuario,0,0,647,654 -,kmt - - -subs,centraetiqueta,0,0,627,629 - - - -subs,centraprogressbar,0,0,642,644 - - - -subs,compress,0,0,40,49 -,gzip,,su - - -subs,copiadb,0,0,585,616 - - - -subs,cuantosvariablestengobd,0,0,1172,1183 - - - -subs,dameerroresjson,0,0,523,550 -,gzip,,su - -,compress -subs,dameruta,0,0,131,158 -,subslogs,,rutahrsatras,,kmt,starter,ruta,,rutamaxpoints,b4xpages,mpm,,gzip,,su - -,fechakmt,,fechainiciohoy,b4xpages,mainpage,,compress,b4xpages,getmanager -subs,fechainiciohoy,0,0,338,345 - - - -subs,dameusuariodedb,0,0,657,666 -,kmt,starter,ruta,,errorlog - -,revisabd -subs,decompress,0,0,52,60 -,su - - -subs,deleteerrorlog_db,0,0,168,172 -,errorlog - - -subs,deletegps_db,0,0,161,165 -,kmt - - -subs,fechakmt2ticks,0,0,553,573 - - - -subs,getphnid,0,0,20,37 -,devmodel,,phn -,devmodel - -subs,getssid,0,0,286,291 - - - -subs,guardainfoenarchivo,0,0,102,115 - - - -subs,guardainfoenbd,0,0,118,128 -,subslogs,,kmt - - -subs,guardaproducto,0,0,765,775 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -subs,haypedido,0,0,1269,1276 -b4xpages,mpm - -b4xpages,mainpage,,traecliente,b4xpages,getmanager -subs,insertarenglonespruebaenerrorlog,0,0,513,520 -,errorlog,starter,ruta,,kmt - -,revisabd,,fechakmt -subs,installapk,0,0,575,582 - - - -subs,json2map,0,0,294,306 -,kmt - -,log2db,,fechakmt -subs,log2db,0,0,348,351 -,kmt - -,fechakmt -subs,map2json,0,0,309,316 - - - -subs,masdexxmins,0,0,354,360 - - - -subs,masdexxminskmt,0,0,363,376 - - -,fechakmt2ticks -subs,notihigh,0,0,74,85 - - - -subs,notilowreturn,0,0,88,99 - - - -subs,procesapromocion,0,0,1002,1035 -b4xpages,mpm - -,traepromo,,traemaxpromos,,traepromosvendidas,,restafijospromo,,alcanzanlosvariablesparapromo,b4xpages,mainpage,b4xpages,getmanager,,traecliente,,traemosinventariodisponibleparapromo -subs,traepromo,0,0,822,884 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -subs,traemaxpromos,0,0,964,988 -b4xpages,mpm - -b4xpages,mainpage,,traecliente,b4xpages,getmanager -subs,traepromosvendidas,0,0,991,1000 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -subs,restafijospromo,0,0,908,939 -b4xpages,mpm - -,traemosinventariodisponibleparapromo,b4xpages,mainpage,b4xpages,getmanager -subs,process_globals,0,1,3,17 -,rutamaxpoints,,rutahrsatras,,subslogs -,rutamaxpoints,,rutahrsatras,,subslogs - -subs,traemosinventariodisponibleparapromo,0,0,887,903 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -subs,revisaflp,0,0,426,467 -tracker,flp,tracker,uugcoords,,kmt - -,log2db,,fechakmt -subs,revisamaxpromosprodsfijosporinventario,0,0,1081,1106 -b4xpages,mpm - -,traemaxpromos,,traemosinventariodisponibleparapromo,b4xpages,mainpage,,traecliente,b4xpages,getmanager -subs,revisamaxpromosprodsfijosporinventario2,0,0,1038,1078 -b4xpages,mpm - -,traemosinventariodisponibleparapromo,,traemaxpromos,b4xpages,mainpage,b4xpages,getmanager,,traecliente -subs,revisamaxpromosprodsvariablesporinventario,0,0,1113,1169 -b4xpages,mpm - -,traemosinventariodisponibleparapromo,,traemaxpromos,,revisamaxpromosprodsfijosporinventario,b4xpages,mainpage,b4xpages,getmanager,,traecliente -subs,revisauug,0,0,408,423 -tracker,flp,tracker,uugcoords,starter,logger,,kmt -tracker,uugcoords -,fechakmt -subs,traefecha,0,0,744,749 - - - -subs,traenombreclientev,0,0,1413,1420 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -subs,traeprodiddebd,0,0,1187,1199 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -subs,traeprodnombre,0,0,705,718 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -subs,traetotalesclienteactual,0,0,1226,1234 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -dbrequestmanager,initialize,0,0,19,22 - - - -dbrequestmanager,executequery,0,0,28,38 - - -,startjob,,writeobject,,writeint,,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme -dbrequestmanager,handlejob,0,0,184,221 -httputils2service,tempfolder - -httpjob,getinputstream,,readobject,,readint,,readbyte,,readbytesfully -dbrequestmanager,executecommand,0,0,57,59 - - -,executebatch,,startjob,,writeint,,writeobject,,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme -dbrequestmanager,bytestoimage,0,0,242,248 - - - -dbrequestmanager,class_globals,0,0,4,15 - - - -dbrequestmanager,executebatch,0,0,43,54 - - -,startjob,,writeint,,writeobject,,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme -dbrequestmanager,startjob,0,0,61,69 - - -httpjob,initialize,,writeobject,,writeint -dbrequestmanager,writeint,0,0,166,170 - - - -dbrequestmanager,writeobject,0,0,84,119 - - -,writeint -dbrequestmanager,writelist,0,0,71,82 - - -,writeobject,,writeint -dbrequestmanager,filetobytes,0,0,223,230 - - - -dbrequestmanager,readobject,0,0,121,155 - - -,readbytesfully,,readbyte,,readint -dbrequestmanager,readint,0,0,172,175 - - -,readbytesfully -dbrequestmanager,readbyte,0,0,177,181 - - - -dbrequestmanager,imagetobytes,0,0,233,239 - - - -dbrequestmanager,printtable,0,0,251,267 - - - -dbrequestmanager,readbytesfully,0,0,157,164 - - - -batteryutilities,initialize,0,0,7,9 - - - -batteryutilities,getbatteryinformation,0,0,22,28 - - - -batteryutilities,class_globals,0,0,2,5 - - - -batteryutilities,getbatterytechnolgy,0,0,30,36 - - - -b4xpages,getmanager,0,0,14,16 -,mpm - - -b4xpages,settitle,0,0,68,70 -,mpm - -,getmanager,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues -b4xpages,addpage,1,0,37,39 -,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -,getmanager,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xorderedmap,put,b4xpagesmanager,createb4xpageinfo,b4xorderedmap,getsize,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xpagesmanager,createpageimpl,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,,settitle,b4xmainpage,initialize,,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -b4xpages,showpage,1,0,50,52 -,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,,settitle,b4xmainpage,initialize,,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -b4xpages,mainpage,0,0,73,75 -,mpm - -,getmanager -b4xpages,getpage,0,0,27,29 -,mpm - -,getmanager,b4xpagesmanager,getpage,b4xpagesmanager,getpagefromid,b4xorderedmap,get,b4xorderedmap,getkeys -b4xpages,showpageandremovepreviouspages,1,0,56,58 -,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -,getmanager,b4xpagesmanager,showpageandremovepreviouspages,b4xpagesmanager,gettoppage,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,aslist,b4xset,clear,b4xset,add,b4xpagesmanager,showpageimpl,b4xpagesmanager,toppageappear,b4xset,getsize,b4xorderedmap,get,b4xorderedmap,getsize,b4xorderedmap,getkeys,b4xset,remove,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,,settitle,b4xmainpage,initialize,,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -b4xpages,addmenuitem,0,0,91,93 -,mpm - -,getmanager,b4xpagesmanager,addmenuitem,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues -b4xpages,addpageandcreate,1,0,42,44 -,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -,getmanager,b4xpagesmanager,addpageandcreate,b4xpagesmanager,addpage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,getpagefromid,b4xorderedmap,containskey,b4xorderedmap,put,b4xpagesmanager,createb4xpageinfo,b4xorderedmap,getsize,b4xpagesmanager,showpage,b4xpagesmanager,gettoppage,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xpagesmanager,createpageimpl,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,,settitle,b4xmainpage,initialize,,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -b4xpages,closepage,1,0,62,64 -,mpm - -,getmanager,b4xpagesmanager,closepage,b4xpagesmanager,findpifromb4xpage,b4xset,contains,b4xpagesmanager,gettoppage,b4xset,getsize,b4xpagesmanager,closepageimpl,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xpagesmanager,toppageappear,b4xorderedmap,getvalues,b4xorderedmap,containskey,b4xorderedmap,get,b4xset,aslist,b4xorderedmap,getsize,b4xorderedmap,getkeys,b4xpagesmanager,raiseeventwithresult,b4xpagesmanager,logevent,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -b4xpages,getnativeparent,0,0,79,88 -,mpm - -,getmanager,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues -b4xpages,getpageid,0,0,32,34 -,mpm - -,getmanager,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues -b4xpages,internalsetpagesmanager,0,0,19,22 -,delegate,,mpm -,mpm -b4xpagesdelegator,initialize -b4xpages,isinitialized,0,0,9,11 -,mpm - - -b4xpages,process_globals,0,1,1,5 - - - -c_principal,initialize,0,0,222,224 - - - -c_principal,addtitle,1,0,2335,2343 - - - -c_principal,b_comm_click,1,0,2186,2232 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -c_principal,b_mapa_click,0,0,1767,1770 -b4xpages,mpm - -b4xpages,getpage,b4xpages,getmanager,b4xpagesmanager,getpage,b4xpagesmanager,getpagefromid,b4xorderedmap,get,b4xorderedmap,getkeys -c_principal,b_marcas_click,1,0,2246,2331 -b4xpages,mpm - -b4xpages,mainpage,,addtitle,b4xpages,getmanager -c_principal,b_ok_comiss_click,0,0,2234,2243 - - - -c_principal,b_ok_panel5_click,0,0,2345,2357 - - - -c_principal,b_ok_pas_click,1,0,1868,1945 -starter,rp,starter,gps,starter,marcacel,b4xpages,mpm,starter,logger,starter,ruta,starter,reqmanager,starter,timer1,starter,interval -starter,logger -subs,panelvisible,,b4xpage_appear,subs,bitacora,subs,fechanormal,b4xpages,mainpage,dbrequestmanager,executequery,batteryutilities,initialize,batteryutilities,getbatteryinformation,starter,envia_ultima_gps,b4xpages,getmanager,dbrequestmanager,startjob,dbrequestmanager,writeobject,dbrequestmanager,writeint,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme,starter,isconnectedtointernet,dbrequestmanager,executecommand,dbrequestmanager,executebatch,subs,traenombrecliente -c_principal,b4xpage_appear,1,0,301,482 -starter,rp,starter,gps,starter,marcacel,b4xpages,mpm,starter,logger,starter,ruta,starter,reqmanager,starter,timer1,starter,interval -starter,logger -b4xpages,mainpage,dbrequestmanager,executequery,,b4xpage_appear,batteryutilities,initialize,batteryutilities,getbatteryinformation,starter,envia_ultima_gps,b4xpages,getmanager,dbrequestmanager,startjob,dbrequestmanager,writeobject,dbrequestmanager,writeint,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme,starter,isconnectedtointernet,dbrequestmanager,executecommand,dbrequestmanager,executebatch -c_principal,b_ok_res_click,0,0,1951,1962 - - - -c_principal,b4xpage_closerequest,1,0,1686,1699 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -,b_ok_res_click,,b_ok_panel5_click,b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_principal,b4xpage_created,1,0,227,299 -starter,dia_semana,b4xpages,mpm -starter,dia_semana -b4xpages,mainpage,b4xpages,getmanager -c_principal,btn_ubicar_click,0,0,2161,2167 - - - -c_principal,busca_click,1,0,1763,1765 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_principal,carga_click,1,0,1979,1981 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_principal,cargar_click,0,0,777,984 -starter,marcacel,b4xpages,mpm - -subs,panelvisible,subs,centrapanel,subs,centrapanelv,b4xpages,mainpage,dbrequestmanager,executecommand,dbrequestmanager,executequery,b4xpages,getmanager,dbrequestmanager,executebatch,dbrequestmanager,startjob,dbrequestmanager,writeint,dbrequestmanager,writeobject,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme -c_principal,class_globals,0,0,1,219 - - - -c_principal,connecta_click,1,0,1701,1761 -starter,server,b4xpages,mpm - -b4xpages,mainpage,dbrequestmanager,initialize,dbrequestmanager,executequery,b4xpages,getmanager,dbrequestmanager,startjob,dbrequestmanager,writeobject,dbrequestmanager,writeint,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme -c_principal,e_ruta_enterpressed,1,0,1772,1812 -b4xpages,mpm,starter,rp,starter,gps,starter,marcacel,starter,logger,starter,ruta,starter,reqmanager,starter,timer1,starter,interval -starter,logger -b4xpages,mainpage,subs,bitacora,subs,fechanormal,,b4xpage_appear,b4xpages,getmanager,subs,traenombrecliente,dbrequestmanager,executecommand,dbrequestmanager,executebatch,dbrequestmanager,startjob,dbrequestmanager,writeint,dbrequestmanager,writeobject,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme,dbrequestmanager,executequery,batteryutilities,initialize,batteryutilities,getbatteryinformation,starter,envia_ultima_gps,starter,isconnectedtointernet -c_principal,e_ruta_textchanged,1,0,2170,2184 - - - -c_principal,gps_locationchanged,0,0,2157,2159 - - - -c_principal,hacer_ped_click,1,0,2145,2147 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_principal,inv_click,0,0,1814,1843 -b4xpages,mpm - -b4xpages,mainpage,dbrequestmanager,executequery,b4xpages,getmanager,dbrequestmanager,startjob,dbrequestmanager,writeobject,dbrequestmanager,writeint,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme -c_principal,jobdone,1,0,986,1684 -starter,dia_semana,starter,marcacel,b4xpages,mpm,httputils2service,tempfolder,starter,ruta,starter,rp,starter,gps,starter,logger,starter,reqmanager,starter,timer1,starter,interval -starter,dia_semana,starter,logger -b4xpages,mainpage,dbrequestmanager,handlejob,b4xpages,showpage,,b4xpage_appear,httpjob,release,b4xpages,getmanager,httpjob,getinputstream,dbrequestmanager,readobject,dbrequestmanager,readint,dbrequestmanager,readbyte,dbrequestmanager,readbytesfully,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring,dbrequestmanager,executequery,batteryutilities,initialize,batteryutilities,getbatteryinformation,starter,envia_ultima_gps,dbrequestmanager,startjob,dbrequestmanager,writeobject,dbrequestmanager,writeint,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme,starter,isconnectedtointernet,dbrequestmanager,executecommand,dbrequestmanager,executebatch -c_principal,nuevo_click,1,0,1947,1949 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_principal,nvo_cliente_click,1,0,2149,2151 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_principal,p_mandainfo_click,0,0,2361,2363 - - - -c_principal,p_resumen_click,0,0,1975,1977 - - - -c_principal,resdia_click,1,0,1983,2143 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -c_principal,resumen_click,0,0,1964,1973 - - - -c_principal,subir_click,0,0,484,775 -starter,marcacel,b4xpages,mpm - -b4xpages,mainpage,dbrequestmanager,executecommand,subs,traenombrecliente,b4xpages,getmanager,dbrequestmanager,executebatch,dbrequestmanager,startjob,dbrequestmanager,writeint,dbrequestmanager,writeobject,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme -c_principal,t1_tick,0,0,1845,1866 -b4xpages,mpm - -b4xpages,mainpage,dbrequestmanager,executequery,b4xpages,getmanager,dbrequestmanager,startjob,dbrequestmanager,writeobject,dbrequestmanager,writeint,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme -c_principal,tickets_dia_click,1,0,2153,2155 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_clientes,initialize,0,0,35,37 - - - -c_clientes,b_qr_click,0,0,198,203 - - - -c_clientes,b4xpage_appear,1,0,63,99 -starter,dia_semana,b4xpages,mpm - -b4xpages,settitle,b4xpages,mainpage,b4xpages,getmanager,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues -c_clientes,b4xpage_closerequest,0,0,155,163 - - - -c_clientes,b4xpage_created,1,0,40,61 - - - -c_clientes,busca_textchanged,0,0,165,196 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -c_clientes,calc_ean_checksum,0,0,226,239 - - - -c_clientes,class_globals,0,0,6,32 - - - -c_clientes,listview1_itemclick,1,0,101,153 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,mainpage,subs,guardaclientehorainicio,b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_clientes,mods,0,0,1,4 - - - -c_clientes,p_clientes_click,0,0,243,245 - - - -c_clientes,sc_noscan,0,0,222,224 - - - -c_clientes,sc_result,1,0,205,220 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,mainpage,b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_cliente,initialize,0,0,156,158 - - - -c_cliente,b_abono_click,1,0,963,975 -subs,kmt,starter,ruta,subs,errorlog,b4xpages,mpm - -subs,traeusuariodebd,subs,traeruta,subs,traecliente,subs,fechakmt,subs,revisabd,b4xpages,mainpage,b4xpages,getmanager -c_cliente,b_abono1_click,0,0,983,985 - - - -c_cliente,b_can_monto_venta_click,0,0,1091,1093 - - - -c_cliente,b_cancelar_click,1,0,977,981 - - - -c_cliente,b_clienteventa_click,1,0,1022,1027 - - - -c_cliente,b_clintesinventa_click,1,0,1029,1055 -b4xpages,mpm - -,guardar_click,subs,ventanoventa,subs,traecliente,subs,fechanormal,b4xpages,mainpage,subs,traenombreclientev,dbrequestmanager,executecommand,b4xpages,getmanager,dbrequestmanager,executebatch,dbrequestmanager,startjob,dbrequestmanager,writeint,dbrequestmanager,writeobject,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme -c_cliente,guardar_click,0,0,460,463 - - - -c_cliente,b_e_next_click,1,0,757,765 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,mainpage,b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_cliente,b_gu_monto_venta_click,0,0,1058,1088 -b4xpages,mpm - -,guardar_click,subs,ventanoventa,subs,traecliente,subs,fechanormal,b4xpages,mainpage,subs,traenombreclientev,dbrequestmanager,executecommand,b4xpages,getmanager,dbrequestmanager,executebatch,dbrequestmanager,startjob,dbrequestmanager,writeint,dbrequestmanager,writeobject,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme -c_cliente,b_guarda_c_click,0,0,701,722 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -c_cliente,b_imp_click,0,0,609,651 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -c_cliente,b_iniciofinventa_click,1,0,987,1020 -starter,enventa,subs,kmt,starter,ruta,subs,errorlog,b4xpages,mpm,starter,dia_semana -starter,enventa,starter,dia_semana -subs,traeusuariodebd,subs,traealmacen,b4xpages,mainpage,subs,bitacora,subs,fechanormal,subs,traecliente,subs,iniciaactividad,b4xpages,showpageandremovepreviouspages,,guardar2_click,subs,revisabd,b4xpages,getmanager,subs,traenombrecliente,dbrequestmanager,executecommand,dbrequestmanager,executebatch,dbrequestmanager,startjob,dbrequestmanager,writeint,dbrequestmanager,writeobject,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme,b4xpages,showpage,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring,b4xpagesmanager,showpageandremovepreviouspages -c_cliente,guardar2_click,0,0,465,537 - - - -c_cliente,b_mapa_click,1,0,605,607 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_cliente,b_venta_click,0,0,724,755 - - - -c_cliente,b4xpage_appear,1,0,203,358 -starter,gps,tracker,flp,starter,enventa,b4xpages,mpm - -subs,centrapanel,b4xpages,mainpage,,gps_locationchanged,b4xpages,getmanager -c_cliente,gps_locationchanged,0,0,360,403 -tracker,flp,b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -c_cliente,b4xpage_closerequest,1,0,422,446 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -subs,pedidoguardado,subs,borrapedidoclienteactual,b4xpages,showpage,,guardar_click,b4xpages,mainpage,b4xpages,getmanager,subs,traealmacen,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_cliente,b4xpage_created,1,0,161,199 -b4xpages,mpm - -b4xpages,mainpage,dbrequestmanager,initialize,b4xpages,getmanager -c_cliente,bt_qr_click,0,0,547,555 - - - -c_cliente,calc_ean_checksum,0,0,590,603 - - - -c_cliente,cb_factura_checkedchange,0,0,814,817 - - - -c_cliente,class_globals,0,0,5,153 - - - -c_cliente,datos_click,1,0,456,458 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_cliente,gest_click,1,0,409,416 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,mainpage,b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_cliente,hist_click,1,0,543,545 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_cliente,jobdone,0,0,893,957 -httputils2service,tempfolder,b4xpages,mpm - -dbrequestmanager,handlejob,b4xpages,mainpage,httpjob,release,httpjob,getinputstream,dbrequestmanager,readobject,dbrequestmanager,readint,dbrequestmanager,readbyte,dbrequestmanager,readbytesfully,b4xpages,getmanager -c_cliente,listview1_itemlongclick,0,0,405,407 - - - -c_cliente,mandapendientes,0,0,819,891 -b4xpages,mpm - -b4xpages,mainpage,dbrequestmanager,executecommand,b4xpages,getmanager,dbrequestmanager,executebatch,dbrequestmanager,startjob,dbrequestmanager,writeint,dbrequestmanager,writeobject,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme -c_cliente,mods,0,0,1,3 - - - -c_cliente,nuevo_click,1,0,539,541 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_cliente,p_abono_click,0,0,959,961 - - - -c_cliente,p_cliente_click,0,0,810,812 - - - -c_cliente,printer_connected,1,0,653,662 - - -,startprinter -c_cliente,startprinter,1,0,664,699 - - - -c_cliente,rb1_checkedchange,1,0,767,771 - - - -c_cliente,rb2_checkedchange,1,0,773,777 - - - -c_cliente,rb3_checkedchange,1,0,779,783 - - - -c_cliente,rb4_checkedchange,1,0,785,789 - - - -c_cliente,sc_result,0,0,557,580 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -c_cliente,sc_timedout,0,0,582,584 - - - -c_cliente,sc_usercancelled,0,0,586,588 - - - -c_cliente,tar_click,1,0,448,450 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_cliente,tar_longclick,0,0,452,454 - - - -c_cliente,tels_click,1,0,418,420 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_productos,initialize,0,0,82,84 - - - -c_productos,b_aceptar_click,1,0,734,737 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_productos,b_buscar_click,0,0,667,670 -b4xpages,mpm - -,busca_textchanged,b4xpages,mainpage,,llenaprodsll,b4xpages,getmanager,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,b4xseekbar,update,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear -c_productos,busca_textchanged,0,0,856,886 -b4xpages,mpm - -b4xpages,mainpage,,llenaprodsll,b4xpages,getmanager,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,b4xseekbar,update,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear -c_productos,b_continuar_click,0,0,623,643 -b4xpages,mpm,subs,kmt,starter,ruta,subs,errorlog - -,cuentaprods,subs,traeprodnombre,subs,guardaproductosingestion,subs,traealmacen,subs,traefecha,subs,traeusuariodebd,b4xpages,mainpage,subs,traetotalesclienteactual,b4xpages,getmanager,subs,revisabd -c_productos,cuentaprods,0,0,558,569 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -c_productos,b_prodmas_click,0,0,495,521 -b4xpages,mpm,subs,kmt,starter,ruta,subs,errorlog - -subs,actualizaproducto,subs,traealmacen,subs,traeprodnombre,subs,traefecha,subs,traeusuariodebd,b4xpages,mainpage,,cuentaprods,subs,guardaproductosingestion,b4xpages,getmanager,subs,revisabd -c_productos,b_prodmenos_click,0,0,469,493 -b4xpages,mpm,subs,kmt,starter,ruta,subs,errorlog - -subs,traealmacen,subs,actualizaproducto,subs,traeprodnombre,subs,traefecha,subs,traeusuariodebd,b4xpages,mainpage,,cuentaprods,b4xpages,getmanager,subs,guardaproductosingestion,subs,revisabd -c_productos,b_qr_click,1,0,425,447 -b4xpages,mpm - -,b4xpage_appear,subs,traecliente,subs,traeruta,b4xpages,mainpage,subs,traetotalesclienteactual,subs,haypedido,,llenaprodsll,b4xseekbar,update,b4xpages,getmanager,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear -c_productos,b4xpage_appear,1,0,126,199 -b4xpages,mpm - -subs,traecliente,subs,traeruta,b4xpages,mainpage,subs,traetotalesclienteactual,subs,haypedido,,llenaprodsll,b4xseekbar,update,b4xpages,getmanager,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear -c_productos,b_rechazar_click,1,0,712,732 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -subs,borrapedidoclienteactual,b4xpages,mainpage,,llenaprodsll,b4xpages,showpage,subs,traealmacen,b4xpages,getmanager,preoptimizedclv,commit,b4xseekbar,setvalue,b4xseekbar,update,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,preoptimizedclv,createpanel,b4xcollections,createset,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_productos,llenaprodsll,0,0,888,962 -b4xpages,mpm - -b4xpages,mainpage,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,b4xseekbar,update,b4xpages,getmanager,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear -c_productos,b_terminar1_click,0,0,577,621 -b4xpages,mpm - -b4xpages,mainpage,subs,centrapanel,subs,pedidoguardado,b4xpages,getmanager -c_productos,b4xpage_closerequest,1,0,375,421 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -,b4xpage_appear,b4xpages,showpage,subs,traecliente,subs,traeruta,b4xpages,mainpage,subs,traetotalesclienteactual,subs,haypedido,,llenaprodsll,b4xseekbar,update,b4xpages,getmanager,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,preoptimizedclv,createpanel,b4xcollections,createset,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_productos,b4xpage_created,1,0,87,122 -b4xpages,mpm - -preoptimizedclv,initialize,b4xpages,mainpage,,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xset,add,b4xorderedmap,initialize,b4xorderedmap,put,b4xpages,getmanager,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear -c_productos,class_globals,0,0,1,79 - - - -c_productos,clv_prods_ll_itemclick,0,0,801,803 - - - -c_productos,clv_prods_ll_visiblerangechanged,1,0,815,854 -b4xpages,mpm - -subs,pedidoguardado,b4xseekbar,setvalue,b4xpages,mainpage,b4xpages,getmanager,b4xseekbar,update -c_productos,createlistitem,0,0,452,467 - - - -c_productos,et_pcant_focuschanged,0,0,571,575 -b4xpages,mpm - -,cuentaprods,b4xpages,mainpage,b4xpages,getmanager -c_productos,et_pcant_textchanged,1,0,523,556 -b4xpages,mpm,subs,kmt,starter,ruta,subs,errorlog - -subs,actualizaproducto,subs,traealmacen,subs,traeprodnombre,subs,traefecha,subs,traeusuariodebd,b4xpages,mainpage,,cuentaprods,subs,guardaproductosingestion,b4xpages,getmanager,subs,revisabd -c_productos,l_info_click,0,0,651,653 - - - -c_productos,l_prodx_click,0,0,805,813 - - - -c_productos,l_prodx_longclick,0,0,645,649 - - - -c_productos,llenacatalogo,0,0,350,373 - - - -c_productos,lv_catalogos_itemclick,0,0,205,252 -b4xpages,mpm - -b4xpages,mainpage,subs,procesapromocion,b4xpages,getmanager,subs,traepromo,subs,traemaxpromos,subs,traepromosvendidas,subs,restafijospromo,subs,alcanzanlosvariablesparapromo,subs,traecliente,subs,traemosinventariodisponibleparapromo -c_productos,lv_catalogos2_itemclick,1,0,254,322 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,getpage,b4xpages,showpage,b4xpages,mainpage,,llenacatalogo,subs,procesapromocion,b4xpages,getmanager,b4xpagesmanager,getpage,b4xpagesmanager,getpagefromid,b4xorderedmap,get,b4xorderedmap,getkeys,b4xpagesmanager,showpage,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring,subs,traepromo,subs,traemaxpromos,subs,traepromosvendidas,subs,restafijospromo,subs,alcanzanlosvariablesparapromo,subs,traecliente,subs,traemosinventariodisponibleparapromo -c_productos,lv_prodspedido_itemlongclick,1,0,739,799 -b4xpages,mpm - -subs,pedidoguardado,b4xpages,mainpage,subs,traealmacen,,b_terminar1_click,b4xpages,getmanager,subs,centrapanel -c_productos,lv_promos_itemclick,1,0,324,347 -b4xpages,mpm,starter,ruta,starter,dia_semana,subs,kmt,subs,errorlog -starter,dia_semana -b4xpages,getpage,b4xpages,showpage,b4xpages,mainpage,subs,traeprodiddebd,subs,traeusuariodebd,b4xpages,getmanager,b4xpagesmanager,getpage,b4xpagesmanager,getpagefromid,b4xorderedmap,get,b4xorderedmap,getkeys,b4xpagesmanager,showpage,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring,subs,revisabd -c_productos,lv_promos_itemlongclick,0,0,655,665 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -c_productos,lv_subtipo_itemclick,0,0,692,706 - - - -c_productos,lv_tipo_itemclick,0,0,672,690 - - - -c_productos,p_vistapreviatrans_click,0,0,708,710 - - - -c_productos,pclv_addprods,0,0,201,203 - - - -c_productos,pclv_hintrequested,0,0,965,968 - - - -c_updateavailable,initialize,0,0,7,9 - - - -c_updateavailable,b4xpage_appear,1,0,18,35 -appupdater,newapp,b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -,canrequestpackageinstalls,,ofreceactualizacion,,sinactualizacion,b4xpages,mainpage,b4xmainpage,ocultaprogreso,b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_updateavailable,canrequestpackageinstalls,0,0,43,49 - - - -c_updateavailable,ofreceactualizacion,1,0,51,61 -appupdater,newapp,b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,mainpage,b4xmainpage,ocultaprogreso,b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_updateavailable,sinactualizacion,1,0,63,68 -appupdater,newapp,b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,mainpage,b4xmainpage,ocultaprogreso,b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_updateavailable,b4xpage_created,0,0,12,16 - - - -c_updateavailable,class_globals,0,0,1,4 - - - -c_mapas,initialize,0,0,7,9 - - - -c_mapas,b4xpage_created,0,0,12,16 - - - -c_mapas,class_globals,0,0,1,4 - - - -c_nuevocliente,initialize,0,0,46,48 - - - -c_nuevocliente,b_foto_click,0,0,400,405 -starter,rp - -,initializecamera2,subs,panelvisible,cameraexclass2,initialize,cameraexclass2,findcamera -c_nuevocliente,initializecamera2,0,0,318,343 -starter,rp - -cameraexclass2,initialize,cameraexclass2,findcamera -c_nuevocliente,b_foto_inci_click,0,0,312,316 - - -cameraexclass2,takepicture -c_nuevocliente,b4xpage_appear,1,0,67,107 -starter,gps,b4xpages,mpm - -subs,panelvisible,subs,centraetiqueta,subs,centrapanel,b4xpages,mainpage,b4xpages,getmanager -c_nuevocliente,b4xpage_created,1,0,51,63 -b4xpages,mpm - -dbrequestmanager,initialize,b4xpages,mainpage,b4xpages,getmanager -c_nuevocliente,camera1_picturetaken,0,0,359,390 - - -cameraexclass2,savepicturetofile,cameraexclass2,startpreview,,stopcamera2,cameraexclass2,release -c_nuevocliente,stopcamera2,0,0,392,397 - - -cameraexclass2,release -c_nuevocliente,camera1_ready,0,0,345,357 - - -cameraexclass2,setjpegquality,cameraexclass2,setcontinuousautofocus,cameraexclass2,commitparameters,cameraexclass2,startpreview,cameraexclass2,getpreviewsize,cameraexclass2,getsupportedfocusmodes,cameraexclass2,setfocusmode -c_nuevocliente,cancela_click,1,0,127,131 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_nuevocliente,class_globals,0,0,1,43 - - - -c_nuevocliente,et_colonia_click,0,0,137,144 - - - -c_nuevocliente,et_colonia_focuschanged,0,0,162,185 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -c_nuevocliente,et_cp_click,0,0,133,135 - - - -c_nuevocliente,et_cp_textchanged,0,0,146,159 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -c_nuevocliente,gps_locationchanged,0,0,109,125 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -c_nuevocliente,guarda_click,1,0,197,263 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,mainpage,b4xpages,showpage,,mandapendientesclientesnuevos,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring,dbrequestmanager,executecommand,dbrequestmanager,executebatch,dbrequestmanager,startjob,dbrequestmanager,writeint,dbrequestmanager,writeobject,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme -c_nuevocliente,mandapendientesclientesnuevos,0,0,266,280 -b4xpages,mpm - -b4xpages,mainpage,dbrequestmanager,executecommand,b4xpages,getmanager,dbrequestmanager,executebatch,dbrequestmanager,startjob,dbrequestmanager,writeint,dbrequestmanager,writeobject,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme -c_nuevocliente,jobdone,0,0,283,305 -httputils2service,tempfolder,b4xpages,mpm - -dbrequestmanager,handlejob,b4xpages,mainpage,httpjob,release,httpjob,getinputstream,dbrequestmanager,readobject,dbrequestmanager,readint,dbrequestmanager,readbyte,dbrequestmanager,readbytesfully,b4xpages,getmanager -c_nuevocliente,lv_colonia_itemclick,1,0,187,195 - - - -c_nuevocliente,p_nuevocliente_click,0,0,308,310 - - - -c_ticketsdia,initialize,0,0,16,18 - - - -c_ticketsdia,activity_keypress,1,0,110,119 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_ticketsdia,b_noventa_click,0,0,139,188 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -c_ticketsdia,b4xpage_appear,0,0,65,105 -b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -c_ticketsdia,b4xpage_created,1,0,51,60 - - - -c_ticketsdia,class_globals,0,0,1,13 - - - -c_ticketsdia,listview1_itemlongclick,1,0,120,137 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,mainpage,subs,guardaclientehorainicio,b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_ticketsdia,p_ticketsdia_click,0,0,190,192 - - - -c_ticketsdia,regresar_click,1,0,107,109 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_noventa,initialize,0,0,31,33 - - - -c_noventa,b4xpage_appear,1,0,51,58 -starter,gps - - -c_noventa,b4xpage_created,1,0,36,47 -b4xpages,mpm - -dbrequestmanager,initialize,b4xpages,mainpage,b4xpages,getmanager -c_noventa,cancela_click,1,0,65,67 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_noventa,class_globals,0,0,1,28 - - - -c_noventa,gps_locationchanged,0,0,60,63 - - - -c_noventa,guarda_click,1,0,68,136 -starter,enventa,b4xpages,mpm,starter,ruta,starter,dia_semana -starter,enventa,starter,dia_semana -b4xpages,mainpage,subs,bitacora,subs,fechanormal,subs,traealmacen,subs,traeruta,subs,traecliente,,mandapendientesnoventa,b4xpages,showpage,b4xpages,getmanager,subs,traenombrecliente,dbrequestmanager,executecommand,dbrequestmanager,executebatch,dbrequestmanager,startjob,dbrequestmanager,writeint,dbrequestmanager,writeobject,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_noventa,mandapendientesnoventa,0,0,138,167 -b4xpages,mpm - -b4xpages,mainpage,dbrequestmanager,executecommand,b4xpages,getmanager,dbrequestmanager,executebatch,dbrequestmanager,startjob,dbrequestmanager,writeint,dbrequestmanager,writeobject,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme -c_noventa,jobdone,0,0,170,210 -httputils2service,tempfolder,b4xpages,mpm - -dbrequestmanager,handlejob,b4xpages,mainpage,httpjob,release,httpjob,getinputstream,dbrequestmanager,readobject,dbrequestmanager,readint,dbrequestmanager,readbyte,dbrequestmanager,readbytesfully,b4xpages,getmanager -c_nota,initialize,0,0,34,36 - - - -c_nota,activity_pause,0,0,108,110 - - - -c_nota,b_desc_click,1,0,188,234 -b4xpages,mpm,starter,gps - -b4xpages,mainpage,,b4xpage_appear,b4xpages,getmanager,subs,pedidoguardado -c_nota,b4xpage_appear,0,0,55,106 -starter,gps,b4xpages,mpm - -b4xpages,mainpage,subs,pedidoguardado,b4xpages,getmanager -c_nota,b4xpage_closerequest,1,0,121,126 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_nota,b4xpage_created,1,0,39,51 - - - -c_nota,borra_click,1,0,128,148 -b4xpages,mpm,starter,gps - -b4xpages,mainpage,,b4xpage_appear,b4xpages,getmanager,subs,pedidoguardado -c_nota,class_globals,0,0,1,31 - - - -c_nota,gps_locationchanged,0,0,112,115 - - - -c_nota,listview1_itemlongclick,1,0,150,186 -b4xpages,mpm,starter,gps - -b4xpages,mainpage,,b4xpage_appear,b4xpages,getmanager,subs,pedidoguardado -c_nota,p_nota_click,0,0,236,238 - - - -c_nota,regresar_click,1,0,117,119 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_pedidos,initialize,0,0,59,61 - - - -c_pedidos,b4xpage_appear,1,0,79,196 -starter,gps,b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,mainpage,b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_pedidos,b4xpage_closerequest,1,0,531,536 - - - -c_pedidos,b4xpage_created,1,0,64,75 - - - -c_pedidos,class_globals,0,0,1,56 - - - -c_pedidos,desc_promo_click,1,0,548,552 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,mainpage,b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_pedidos,gps_locationchanged,0,0,359,362 - - - -c_pedidos,guardar_click,1,0,198,357 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,mainpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_pedidos,i_fotol_click,0,0,543,546 - - - -c_pedidos,img_prod_click,0,0,538,542 - - - -c_pedidos,nopromo_click,1,0,554,574 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,mainpage,b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_pedidos,p_pedido_click,0,0,576,578 - - - -c_pedidos,terminar_click,1,0,364,529 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,mainpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_promos,initialize,0,0,47,49 - - - -c_promos,agregafijosalista,0,0,162,200 -b4xpages,mpm - -subs,traeprodnombre,b4xpages,mainpage,b4xpages,getmanager -c_promos,b_continuar_click,1,0,394,428 -b4xpages,mpm,subs,kmt,starter,ruta,subs,errorlog,starter,dia_semana -starter,dia_semana -,cuentaprods,subs,traeprodnombre,subs,guardaproductosingestion,subs,traecliente,subs,traefecha,subs,traeusuariodebd,subs,traeruta,b4xpages,mainpage,b4xpages,showpage,,agregafijosalista,subs,traepromo,b4xpages,getmanager,subs,revisabd,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_promos,cuentaprods,0,0,279,333 -b4xpages,mpm - -,agregafijosalista,subs,traepromo,subs,traeprodnombre,b4xpages,mainpage,b4xpages,getmanager -c_promos,b_prodmas_click,0,0,244,272 -b4xpages,mpm - -,cuentaprods,,agregafijosalista,subs,traepromo,subs,traeprodnombre,b4xpages,mainpage,b4xpages,getmanager -c_promos,b_prodmenos_click,0,0,220,242 -b4xpages,mpm - -,cuentaprods,,agregafijosalista,subs,traepromo,subs,traeprodnombre,b4xpages,mainpage,b4xpages,getmanager -c_promos,b_promomas_click,1,0,352,363 -b4xpages,mpm - -,cuentaprods,,agregafijosalista,subs,traepromo,subs,traeprodnombre,b4xpages,mainpage,b4xpages,getmanager -c_promos,b_promomenos_click,1,0,340,350 -b4xpages,mpm - -,cuentaprods,,agregafijosalista,subs,traepromo,subs,traeprodnombre,b4xpages,mainpage,b4xpages,getmanager -c_promos,b_terminar1_click,1,0,365,392 -b4xpages,mpm,subs,kmt,starter,ruta,subs,errorlog,starter,dia_semana -starter,dia_semana -,cuentaprods,subs,traeprodnombre,subs,guardaproductosingestion,subs,traecliente,subs,traefecha,subs,traeusuariodebd,subs,traeruta,b4xpages,mainpage,b4xpages,showpage,c_productos,b_terminar1_click,,agregafijosalista,subs,traepromo,b4xpages,getmanager,subs,revisabd,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring,subs,centrapanel,subs,pedidoguardado -c_promos,b4xpage_appear,1,0,59,78 -b4xpages,mpm - -subs,traetotalesclienteactual,,muestrapromo,b4xpages,mainpage,b4xpages,getmanager,subs,traepromo,subs,traemosinventariodisponibleparapromo,subs,revisamaxpromosprodsfijosporinventario,subs,revisamaxpromosprodsvariablesporinventario,,agregafijosalista,,createlistitem,subs,traeprodnombre,,cuentaprods,subs,traemaxpromos,subs,traecliente -c_promos,muestrapromo,1,0,81,159 -b4xpages,mpm - -subs,traepromo,subs,traemosinventariodisponibleparapromo,subs,revisamaxpromosprodsfijosporinventario,subs,revisamaxpromosprodsvariablesporinventario,,agregafijosalista,,createlistitem,subs,traeprodnombre,,cuentaprods,b4xpages,mainpage,b4xpages,getmanager,subs,traemaxpromos,subs,traecliente -c_promos,b4xpage_created,1,0,52,57 - - - -c_promos,class_globals,0,0,5,44 - - - -c_promos,createlistitem,1,0,202,218 - - - -c_promos,et_pcant_focuschanged,0,0,335,338 -b4xpages,mpm - -,cuentaprods,,agregafijosalista,subs,traepromo,subs,traeprodnombre,b4xpages,mainpage,b4xpages,getmanager -c_promos,et_pcant_textchanged,0,0,274,277 -b4xpages,mpm - -,cuentaprods,,agregafijosalista,subs,traepromo,subs,traeprodnombre,b4xpages,mainpage,b4xpages,getmanager -c_promos,mods,0,0,1,3 - - - -c_historico,initialize,0,0,30,32 - - - -c_historico,b4xpage_appear,0,0,51,84 -starter,gps,b4xpages,mpm - -b4xpages,mainpage,b4xpages,getmanager -c_historico,b4xpage_closerequest,1,0,95,100 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -c_historico,b4xpage_created,1,0,35,47 - - - -c_historico,class_globals,0,0,1,27 - - - -c_historico,gps_locationchanged,0,0,86,89 - - - -c_historico,listview1_itemclick,0,0,107,117 - - - -c_historico,listview2_itemclick,0,0,102,105 - - - -c_historico,regresar_click,1,0,91,93 -b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -httpjob,release,0,0,284,288 -httputils2service,tempfolder - - -httpjob,initialize,0,0,38,48 - - - -httpjob,download,0,0,219,228 - - -,addscheme -httpjob,getinputstream,0,0,347,351 -httputils2service,tempfolder - - -httpjob,getstring,0,0,291,293 -httputils2service,tempfolder - -,getstring2 -httpjob,postbytes,0,0,63,72 - - -,addscheme -httpjob,complete,0,0,315,318 - - - -httpjob,getrequest,0,0,310,312 - - - -httpjob,addscheme,0,0,52,55 - - - -httpjob,class_globals,0,0,2,32 - - - -httpjob,delete,0,0,261,270 - - -,addscheme -httpjob,delete2,0,0,272,281 - - -,addscheme,,escapelink -httpjob,escapelink,0,0,246,258 - - - -httpjob,download2,0,0,235,244 - - -,addscheme,,escapelink -httpjob,getbitmap,0,0,330,334 -httputils2service,tempfolder - - -httpjob,getbitmapresize,0,0,341,343 -httputils2service,tempfolder - - -httpjob,getbitmapsample,0,0,337,339 -httputils2service,tempfolder - - -httpjob,getstring2,0,0,296,306 -httputils2service,tempfolder - - -httpjob,head,0,0,119,128 - - -,addscheme -httpjob,multipartstartsection,0,0,179,186 - - - -httpjob,patchbytes,0,0,97,115 - - -,addscheme -httpjob,patchstring,0,0,92,94 - - -,patchbytes,,addscheme -httpjob,postfile,0,0,190,216 - - -,addscheme,,postbytes -httpjob,postmultipart,0,0,133,177 - - -,multipartstartsection,,postbytes,,addscheme -httpjob,poststring,0,0,58,60 - - -,postbytes,,addscheme -httpjob,putbytes,0,0,80,89 - - -,addscheme -httpjob,putstring,0,0,75,77 - - -,putbytes,,addscheme -starter,application_error,0,0,111,120 -,logcat,,logs,subs,errorlog,,ruta,subs,kmt - -subs,revisabd,subs,fechakmt -starter,envia_ultima_gps,0,0,73,100 -,logger,,ruta,,reqmanager,,timer1,,interval,b4xpages,mpm -,logger -,isconnectedtointernet,b4xpages,mainpage,dbrequestmanager,executecommand,b4xpages,getmanager,dbrequestmanager,executebatch,dbrequestmanager,startjob,dbrequestmanager,writeint,dbrequestmanager,writeobject,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme -starter,isconnectedtointernet,0,0,143,152 - - - -starter,gps_locationchanged,0,0,61,63 - - - -starter,jobdone,0,0,128,141 - - - -starter,logcat_logcatdata,0,0,103,108 -,logs - - -starter,process_globals,0,1,6,32 -,enventa,,server,,interval,,ruta,,dia_semana,,logger,,marcacel,,ph,,muestraprogreso -,enventa,,server,,interval,,ruta,,dia_semana,,logger,,marcacel,,muestraprogreso - -starter,reinicializareqmanager,0,0,122,126 -,reqmanager,,server,,logger - -dbrequestmanager,initialize -starter,service_create,0,0,34,47 -,gps,,timer1,,interval,,logs - - -starter,service_destroy,0,0,69,71 - - - -starter,service_start,0,0,49,54 -,reqmanager,,server,,ruta,subs,kmt,subs,errorlog - -subs,revisabd,dbrequestmanager,initialize -starter,service_taskremoved,0,0,65,67 - - - -starter,timer1_tick,0,0,56,59 -,logger,,ruta,,reqmanager,,timer1,,interval,b4xpages,mpm -,logger -,envia_ultima_gps,,isconnectedtointernet,b4xpages,mainpage,dbrequestmanager,executecommand,b4xpages,getmanager,dbrequestmanager,executebatch,dbrequestmanager,startjob,dbrequestmanager,writeint,dbrequestmanager,writeobject,dbrequestmanager,writelist,httpjob,postbytes,httpjob,initialize,httpjob,addscheme -cameraexclass2,camera_focusdone,0,0,318,324 - - -,takepicture -cameraexclass2,takepicture,0,0,102,104 - - - -cameraexclass2,camera_picturetaken,1,0,106,108 - - - -cameraexclass2,camera_ready,1,0,83,94 - - -,setdisplayorientation,,findcamera,,commitparameters -cameraexclass2,setdisplayorientation,0,0,58,81 - - -,findcamera,,commitparameters -cameraexclass2,class_globals,0,0,6,14 - - - -cameraexclass2,closenow,0,0,307,311 - - - -cameraexclass2,commitparameters,0,0,139,147 - - - -cameraexclass2,facedetection_event,0,0,372,380 - - - -cameraexclass2,findcamera,0,0,33,56 - - - -cameraexclass2,focusandtakepicture,0,0,313,315 - - - -cameraexclass2,getcoloreffect,0,0,149,151 - - -,getparameter -cameraexclass2,getparameter,0,0,134,137 - - - -cameraexclass2,getexposurecompensation,0,0,346,349 - - - -cameraexclass2,getflashmode,0,0,200,203 - - - -cameraexclass2,getfocusdistances,0,0,294,299 - - - -cameraexclass2,getmaxexposurecompensation,0,0,361,364 - - - -cameraexclass2,getmaxzoom,0,0,331,334 - - - -cameraexclass2,getminexposurecompensation,0,0,356,359 - - - -cameraexclass2,getpicturesize,0,0,242,249 - - - -cameraexclass2,getpreviewfpsrange,0,0,222,225 - - - -cameraexclass2,getpreviewsize,0,0,233,240 - - - -cameraexclass2,getsupportedcoloreffects,0,0,210,213 - - - -cameraexclass2,getsupportedflashmodes,0,0,205,208 - - - -cameraexclass2,getsupportedfocusmodes,0,0,273,276 - - - -cameraexclass2,getsupportedpictureformats,0,0,301,304 - - - -cameraexclass2,getsupportedpicturessizes,0,0,173,183 - - - -cameraexclass2,getsupportedpreviewfpsrange,0,0,216,219 - - - -cameraexclass2,getsupportedpreviewsizes,0,0,157,167 - - - -cameraexclass2,getzoom,0,0,336,339 - - - -cameraexclass2,initialize,0,0,16,31 - - -,findcamera -cameraexclass2,iszoomsupported,0,0,326,329 - - - -cameraexclass2,previewimagetojpeg,0,0,253,271 - - - -cameraexclass2,release,0,0,118,120 - - - -cameraexclass2,savepicturetofile,0,0,123,127 - - - -cameraexclass2,setcoloreffect,0,0,153,155 - - -,setparameter -cameraexclass2,setparameter,0,0,129,132 - - - -cameraexclass2,setcontinuousautofocus,0,0,278,287 - - -,getsupportedfocusmodes,,setfocusmode -cameraexclass2,setfocusmode,0,0,289,292 - - - -cameraexclass2,setexposurecompensation,0,0,351,354 - - - -cameraexclass2,setfacedetectionlistener,0,0,366,370 - - - -cameraexclass2,setflashmode,0,0,195,198 - - - -cameraexclass2,setjpegquality,0,0,190,193 - - - -cameraexclass2,setpicturesize,0,0,185,188 - - - -cameraexclass2,setpreviewfpsrange,0,0,227,231 - - - -cameraexclass2,setpreviewsize,0,0,169,172 - - - -cameraexclass2,setzoom,0,0,341,344 - - - -cameraexclass2,startfacedetection,0,0,384,387 - - - -cameraexclass2,startpreview,0,0,110,112 - - - -cameraexclass2,stopfacedetection,0,0,389,392 - - - -cameraexclass2,stoppreview,0,0,114,116 - - - -appupdater,createnotification,0,0,220,229 -,n2,,nnewappnid - - -appupdater,createnotification2,0,0,204,218 - - - -appupdater,download,0,0,197,202 - - -httpjob,initialize,httpjob,download,httpjob,addscheme -appupdater,download_destroy,0,0,192,195 -,n2,,n2id - - -appupdater,download_newapk,1,0,156,190 -starter,muestraprogreso,,newapp,,sharedfolder,starter,logger,,n2,,nnewappnid,b4xpages,mpm,starter,ruta,starter,dia_semana,httputils2service,tempfolder,,usefileprovider -starter,muestraprogreso,starter,dia_semana -b4xpages,showpage,httpjob,initialize,httpjob,download,httpjob,getinputstream,httpjob,release,,setfileuriasintentdata,b4xpages,mainpage,b4xmainpage,ocultaprogreso,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring,httpjob,addscheme,,getfileuri -appupdater,setfileuriasintentdata,0,0,272,276 -,usefileprovider,,sharedfolder - -,getfileuri -appupdater,download_start,1,0,152,154 -starter,muestraprogreso,,newapp,,sharedfolder,starter,logger,,n2,,nnewappnid,b4xpages,mpm,starter,ruta,starter,dia_semana,httputils2service,tempfolder,,usefileprovider -starter,muestraprogreso,starter,dia_semana -,download_newapk,b4xpages,showpage,httpjob,initialize,httpjob,download,httpjob,getinputstream,httpjob,release,,setfileuriasintentdata,b4xpages,mainpage,b4xmainpage,ocultaprogreso,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring,httpjob,addscheme,,getfileuri -appupdater,fileprovider_init,0,0,235,248 -,usefileprovider,,sharedfolder,,rp -,usefileprovider,,sharedfolder - -appupdater,getfileuri,0,0,251,268 -,usefileprovider,,sharedfolder - - -appupdater,process_globals,0,1,70,99 -,lnk,,nnewappnid,,n2id -,lnk,,nnewappnid,,n2id - -appupdater,service_create,0,0,101,107 -,newapp,,n2,,nativeme - - -appupdater,service_destroy,0,0,231,233 - - - -appupdater,service_start,1,0,109,150 -,lnk,,newapp,,nnewapp,,nnewappnid,b4xpages,mpm,,usefileprovider,,sharedfolder,,rp,httputils2service,tempfolder,starter,ruta,starter,dia_semana -,usefileprovider,,sharedfolder,starter,dia_semana -b4xpages,mainpage,b4xmainpage,muestraprogreso,,fileprovider_init,,download,httpjob,getstring,b4xpages,showpage,,createnotification2,httpjob,release,b4xpages,getmanager,httpjob,initialize,httpjob,download,httpjob,addscheme,httpjob,getstring2,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -b4xseekbar,update,0,0,61,86 - - - -b4xseekbar,setvalue,0,0,125,128 - - -,update -b4xseekbar,base_resize,0,0,52,58 - - -,update -b4xseekbar,class_globals,0,0,11,27 - - - -b4xseekbar,designercreateview,0,0,35,50 - - -,base_resize,,update -b4xseekbar,getvalue,0,0,130,132 - - - -b4xseekbar,initialize,0,0,29,32 - - - -b4xseekbar,raisetouchstateevent,0,0,102,106 - - - -b4xseekbar,setvaluebasedontouch,0,0,108,123 - - - -b4xseekbar,touchpanel_touch,0,0,88,100 - - -,raisetouchstateevent,,setvaluebasedontouch,,update -preoptimizedclv,initialize,1,0,29,51 - - -,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xset,add,b4xorderedmap,initialize,b4xorderedmap,put -preoptimizedclv,commit,0,0,62,83 - - -,clearassigneditems,,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear -preoptimizedclv,additem,0,0,53,60 - - - -preoptimizedclv,b4xseekbar1_touchstatechanged,0,0,163,175 - - - -preoptimizedclv,b4xseekbar1_valuechanged,1,0,177,187 - - -,internalsettextorcsbuildertolabel -preoptimizedclv,internalsettextorcsbuildertolabel,0,0,189,201 - - - -preoptimizedclv,class_globals,0,0,2,27 - - - -preoptimizedclv,clearassigneditems,0,0,151,155 - - -b4xset,clear,b4xorderedmap,clear -preoptimizedclv,raisevisiblerangeevent,0,0,85,88 - - - -preoptimizedclv,createpanel,0,0,90,96 - - - -preoptimizedclv,getpanel,0,0,144,149 - - -,createpanel -preoptimizedclv,handlescrollbar,0,0,139,142 - - -b4xseekbar,setvalue,b4xseekbar,update -preoptimizedclv,listchangedexternally,0,0,157,161 - - -,clearassigneditems,,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear -preoptimizedclv,visiblerangechanged,0,0,98,137 - - -b4xset,clear,,getpanel,b4xset,add,b4xset,contains,b4xset,aslist,,handlescrollbar,b4xorderedmap,clear,,createpanel,b4xorderedmap,put,b4xorderedmap,containskey,b4xorderedmap,getkeys,b4xseekbar,setvalue,b4xseekbar,update -mapa_rutas,activity_create,1,0,56,115 -,b_azul,,b_rojo,,b_todos,,b_verde,,mapfragment1,,ruta,,skmt,starter,rp,,mark_azul,,mark_rojo,,mark_verde,,list_azul,,list_rojo,,list_verde,,verde,,azul,,rojo,,todos,,c,,semana,b4xpages,mpm,starter,ruta,starter,dia_semana -,b_azul,,b_rojo,,b_todos,,b_verde,,mapfragment1,,ruta,,verde,,azul,,rojo,,todos,,c,,semana,starter,dia_semana -b4xpages,showpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,b4xpages,mainpage,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -mapa_rutas,activity_pause,0,0,301,303 -,gps - - -mapa_rutas,activity_resume,1,0,117,135 -starter,rp,starter,gps,,list_azul,,list_rojo,,list_verde,,verde,,azul,,rojo,,todos -,verde,,azul,,rojo,,todos - -mapa_rutas,b_azul_click,0,0,337,346 -,azul,,verde,,rojo,,todos,,gmap,,mapfragment1,,rp,,c,,skmt,,latitudru,,longitudru,,codigo,,tienda,,numserie,,mark_azul,,list_azul,,c2,,mark_verde,,list_verde,,c3,,mark_rojo,,list_rojo,,oninfowindowclicklistener1,,googlemapextra -,azul,,verde,,rojo,,todos,,gmap,,c,,latitudru,,longitudru,,codigo,,tienda,,numserie,,mark_azul,,c2,,mark_verde,,c3,,mark_rojo,,oninfowindowclicklistener1 -,mapfragment1_ready -mapa_rutas,mapfragment1_ready,0,0,137,266 -,gmap,,mapfragment1,,rp,,azul,,todos,,c,,skmt,,latitudru,,longitudru,,codigo,,tienda,,numserie,,mark_azul,,list_azul,,verde,,c2,,mark_verde,,list_verde,,rojo,,c3,,mark_rojo,,list_rojo,,oninfowindowclicklistener1,,googlemapextra -,gmap,,c,,latitudru,,longitudru,,codigo,,tienda,,numserie,,mark_azul,,c2,,mark_verde,,c3,,mark_rojo,,oninfowindowclicklistener1 - -mapa_rutas,b_rojo_click,0,0,326,335 -,rojo,,verde,,azul,,todos,,gmap,,mapfragment1,,rp,,c,,skmt,,latitudru,,longitudru,,codigo,,tienda,,numserie,,mark_azul,,list_azul,,c2,,mark_verde,,list_verde,,c3,,mark_rojo,,list_rojo,,oninfowindowclicklistener1,,googlemapextra -,rojo,,verde,,azul,,todos,,gmap,,c,,latitudru,,longitudru,,codigo,,tienda,,numserie,,mark_azul,,c2,,mark_verde,,c3,,mark_rojo,,oninfowindowclicklistener1 -,mapfragment1_ready -mapa_rutas,b_todos_click,0,0,306,314 -,todos,,verde,,azul,,rojo,,gmap,,mapfragment1,,rp,,c,,skmt,,latitudru,,longitudru,,codigo,,tienda,,numserie,,mark_azul,,list_azul,,c2,,mark_verde,,list_verde,,c3,,mark_rojo,,list_rojo,,oninfowindowclicklistener1,,googlemapextra -,todos,,verde,,azul,,rojo,,gmap,,c,,latitudru,,longitudru,,codigo,,tienda,,numserie,,mark_azul,,c2,,mark_verde,,c3,,mark_rojo,,oninfowindowclicklistener1 -,mapfragment1_ready -mapa_rutas,b_verde_click,0,0,316,324 -,verde,,azul,,rojo,,todos,,gmap,,mapfragment1,,rp,,c,,skmt,,latitudru,,longitudru,,codigo,,tienda,,numserie,,mark_azul,,list_azul,,c2,,mark_verde,,list_verde,,c3,,mark_rojo,,list_rojo,,oninfowindowclicklistener1,,googlemapextra -,verde,,azul,,rojo,,todos,,gmap,,c,,latitudru,,longitudru,,codigo,,tienda,,numserie,,mark_azul,,c2,,mark_verde,,c3,,mark_rojo,,oninfowindowclicklistener1 -,mapfragment1_ready -mapa_rutas,globals,0,1,18,54 -,latitud,,longitud,,lat2,,lon2 -,latitud,,longitud,,lat2,,lon2 - -mapa_rutas,gps_locationchanged,0,0,280,299 -,mark_cedis - - -mapa_rutas,oninfowindowclicklistener1_click,1,0,271,277 -,skmt,b4xpages,mpm,starter,ruta,starter,dia_semana -starter,dia_semana -subs,guardaclientehorainicio,b4xpages,showpage,b4xpages,mainpage,b4xpages,getmanager,b4xpagesmanager,showpage,b4xpagesmanager,getpagefromid,b4xpagesmanager,gettoppage,b4xpagesmanager,createpageifneeded,b4xpagesmanager,toppagedisappear,b4xset,remove,b4xpagesmanager,showpageimpl,b4xset,add,b4xpagesmanager,toppageappear,b4xorderedmap,get,b4xorderedmap,getkeys,b4xset,getsize,b4xset,aslist,b4xorderedmap,getsize,b4xpagesmanager,createpageimpl,b4xorderedmap,put,b4xpagesmanager,logevent,b4xmainpage,b4xpage_created,c_principal,b4xpage_created,c_cliente,b4xpage_created,c_clientes,b4xpage_created,c_mapas,b4xpage_created,c_nota,b4xpage_created,c_noventa,b4xpage_created,c_ticketsdia,b4xpage_created,c_historico,b4xpage_created,c_nuevocliente,b4xpage_created,c_pedidos,b4xpage_created,c_productos,b4xpage_created,c_promos,b4xpage_created,c_updateavailable,b4xpage_created,b4xpagesmanager,createb4xpageparent,b4xpages,settitle,b4xmainpage,initialize,b4xpages,addpage,c_principal,initialize,c_clientes,initialize,c_cliente,initialize,c_productos,initialize,c_updateavailable,initialize,c_mapas,initialize,c_nuevocliente,initialize,c_ticketsdia,initialize,c_noventa,initialize,c_nota,initialize,c_pedidos,initialize,c_promos,initialize,c_historico,initialize,fileprovider,initialize,subs,agregacolumna,b4xpagesmanager,settitle,b4xpagesmanager,findpifromb4xpage,b4xorderedmap,getvalues,b4xpagesmanager,addpage,b4xorderedmap,containskey,b4xpagesmanager,createb4xpageinfo,dbrequestmanager,initialize,preoptimizedclv,initialize,c_productos,llenaprodsll,preoptimizedclv,createpanel,b4xcollections,createset,b4xseekbar,update,b4xcollections,createset2,b4xset,initialize,b4xorderedmap,initialize,subs,traealmacen,preoptimizedclv,commit,b4xseekbar,setvalue,preoptimizedclv,clearassigneditems,preoptimizedclv,raisevisiblerangeevent,b4xset,clear,b4xorderedmap,clear,b4xpagesmanager,raiseeventwithresult,b4xorderedmap,remove,b4xpagesmanager,raiseevent,b4xpagesmanager,updatemenuitems,b4xpagesmanager,updatestackstring -mapa_rutas,process_globals,0,1,7,16 - - - -tracker,createlocationrequest,0,0,111,121 -,actuallr -,actuallr - -tracker,createlocationrequestsmalld,0,0,123,134 -,actuallr -,actuallr - -tracker,createnotification,0,0,194,200 - - - -tracker,dameultimaubicacionconocida,0,0,136,144 -,flp,starter,logger - -subs,fechakmt,,formatofecha -tracker,formatofecha,0,0,210,218 - - - -tracker,flp_connectionfailed,0,0,55,57 - - - -tracker,flp_connectionsuccess,0,0,50,53 - - - -tracker,flp_locationchanged,1,0,154,192 -,uugcoords,starter,ruta,b4xpages,mpm,,flp,mapa_rutas,mark_cedis -,uugcoords -b4xpages,mainpage,,formatofecha,b4xmainpage,gps_locationchanged,starter,gps_locationchanged,c_principal,gps_locationchanged,c_cliente,gps_locationchanged,c_nota,gps_locationchanged,c_noventa,gps_locationchanged,c_historico,gps_locationchanged,c_nuevocliente,gps_locationchanged,c_pedidos,gps_locationchanged,mapa_rutas,gps_locationchanged,b4xpages,getmanager -tracker,process_globals,0,1,29,39 -,nid -,nid - -tracker,revisaflp,0,0,221,262 -,flp,,uugcoords,subs,kmt,,flpstarted,,actuallr -,flpstarted,,actuallr -subs,log2db,,startflp,subs,fechakmt,,createlocationrequest -tracker,startflp,0,0,84,97 -,flp,,flpstarted,,actuallr -,flpstarted,,actuallr -,createlocationrequest -tracker,revisauug,0,0,266,291 -,flp,,uugcoords,starter,logger,b4xpages,mpm,,flpstarted,,actuallr -,uugcoords,,flpstarted,,actuallr -subs,fechakmt,b4xpages,mainpage,,startflp,b4xpages,getmanager,,createlocationrequest -tracker,service_create,0,0,41,48 -,flp,,lock,,flpstarted,,actuallr -,flpstarted,,actuallr -,startflp,,createlocationrequest -tracker,service_destroy,0,0,202,208 -,tracking,,lock,,flpstarted,,flp -,tracking,,flpstarted -,stopflp -tracker,stopflp,0,0,146,152 -,flpstarted,,flp -,flpstarted - -tracker,service_start,0,0,59,66 -,nid,,flp,,tracking,,actuallr,starter,rp,,flpstarted -,tracking,,flpstarted,,actuallr -,createnotification,,track,,startflp,,createlocationrequest -tracker,track,0,0,68,82 -,flp,,tracking,,actuallr,starter,rp,,flpstarted -,tracking,,flpstarted,,actuallr -,startflp,,createlocationrequest -tracker,startflpsmall,0,0,99,109 -,flp,starter,logger,,actuallr -,actuallr -,dameultimaubicacionconocida,,createlocationrequestsmalld,subs,fechakmt,,formatofecha -cl_appupdate,canrequestpackageinstalls,0,0,448,453 - - - -cl_appupdate,checknonmarketappsenabled,0,0,471,483 - - - -cl_appupdate,class_globals,0,0,6,45 - - - -cl_appupdate,downloadapk,1,0,158,192 -httputils2service,tempfolder - -,finito,httpjob,initialize,httpjob,download,httpjob,getinputstream,httpjob,release,httpjob,addscheme -cl_appupdate,finito,1,0,290,294 - - - -cl_appupdate,extractcl,0,0,381,395 - - - -cl_appupdate,extractsz,0,0,399,417 - - - -cl_appupdate,extractvn,0,0,360,376 - - - -cl_appupdate,getavailablespace,0,0,137,139 - - -,getfreespace -cl_appupdate,getfreespace,0,0,421,425 - - - -cl_appupdate,getcurvn,0,0,114,116 - - - -cl_appupdate,getfileuri,0,0,503,516 - - - -cl_appupdate,getnmappinst,0,0,435,442 - - - -cl_appupdate,getpackagename,0,0,79,81 - - - -cl_appupdate,getsdkversion,0,0,428,432 - - - -cl_appupdate,getstatus,0,0,108,110 - - - -cl_appupdate,getwebchangelog,0,0,126,128 - - - -cl_appupdate,getwebfilesize,0,0,132,134 - - - -cl_appupdate,getwebvn,0,0,120,122 - - - -cl_appupdate,initialize,0,0,48,70 - - - -cl_appupdate,installapk,1,0,195,206 - - -,sendinstallintent,,finito,,getfileuri -cl_appupdate,sendinstallintent,0,0,487,498 - - -,getfileuri -cl_appupdate,isvalidcv,0,0,297,309 - - - -cl_appupdate,isvalidwv,0,0,312,354 -httputils2service,tempfolder - -httpjob,initialize,httpjob,download,httpjob,getstring,,extractvn,,extractcl,,extractsz,httpjob,release,httpjob,addscheme,httpjob,getstring2 -cl_appupdate,readcurvn,1,0,143,147 - - -,isvalidcv,,finito -cl_appupdate,readwebvn,1,0,151,155 -httputils2service,tempfolder - -,isvalidwv,,finito,httpjob,initialize,httpjob,download,httpjob,getstring,,extractvn,,extractcl,,extractsz,httpjob,release,httpjob,addscheme,httpjob,getstring2 -cl_appupdate,setandstartsplashscreen,0,0,532,544 - - - -cl_appupdate,setcredentials,0,0,96,99 - - - -cl_appupdate,setfileuriasintentdata,0,0,520,524 - - -,getfileuri -cl_appupdate,setnewverapk,0,0,91,93 - - - -cl_appupdate,setnewvertxt,0,0,86,88 - - - -cl_appupdate,setpackagename,0,0,74,76 - - - -cl_appupdate,setverbose,0,0,102,105 -newinst2,svcverbose -newinst2,svcverbose - -cl_appupdate,stopsplashscreen,0,0,547,552 - - - -cl_appupdate,tryapkupdate,1,0,245,287 -httputils2service,tempfolder - -httpjob,initialize,httpjob,download,httpjob,getinputstream,httpjob,release,,sendinstallintent,,finito,httpjob,addscheme,,getfileuri -cl_appupdate,updateapk,1,0,210,242 -httputils2service,tempfolder - -,isvalidwv,,isvalidcv,,getfreespace,,tryapkupdate,httpjob,initialize,httpjob,download,httpjob,getstring,,extractvn,,extractcl,,extractsz,httpjob,release,httpjob,addscheme,httpjob,getstring2,httpjob,getinputstream,,sendinstallintent,,finito,,getfileuri -newinst2,getpackagename,0,0,38,41 - - - -newinst2,myappreload,0,0,43,50 -,svcverbose - - -newinst2,process_globals,0,1,5,11 -,logcolor1 -,logcolor1 - -newinst2,service_create,0,0,13,17 -,logcolor1,,pkg,,svcverbose -,pkg,,svcverbose - -newinst2,service_destroy,0,0,35,36 - - - -newinst2,service_start,0,0,19,33 -,logcolor1,,svcverbose,,pkg -,pkg -,getpackagename,,myappreload -b4xbitset,class_globals,0,0,1,8 - - - -b4xbitset,clear,0,0,54,60 - - - -b4xbitset,get,0,0,38,47 - - - -b4xbitset,getsize,0,0,49,51 - - - -b4xbitset,initialize,0,0,10,13 - - -,clear -b4xbitset,set,0,0,16,35 - - - -b4xbytesbuilder,append,0,0,24,26 - - -,append2,,changelength -b4xbytesbuilder,append2,0,0,31,35 - - -,changelength -b4xbytesbuilder,changelength,0,0,12,21 - - - -b4xbytesbuilder,class_globals,0,0,1,4 - - - -b4xbytesbuilder,clear,0,0,37,39 - - -,changelength -b4xbytesbuilder,getbuffer,0,0,103,104 - - - -b4xbytesbuilder,getinternalbuffer,0,0,127,129 - - - -b4xbytesbuilder,getlength,0,0,92,94 - - - -b4xbytesbuilder,indexof,0,0,107,109 - - -,indexof2 -b4xbytesbuilder,indexof2,0,0,112,124 - - - -b4xbytesbuilder,initialize,0,0,6,9 - - - -b4xbytesbuilder,insert,0,0,43,53 - - -,append,,subarray,,changelength,,append2,,subarray2 -b4xbytesbuilder,subarray,0,0,80,82 - - -,subarray2 -b4xbytesbuilder,remove,0,0,69,77 - - -,subarray2,,subarray,,changelength -b4xbytesbuilder,subarray2,0,0,86,90 - - - -b4xbytesbuilder,set,0,0,56,66 - - -,append,,changelength,,append2 -b4xbytesbuilder,toarray,0,0,97,99 - - -,subarray,,subarray2 -b4xcache,class_globals,0,0,1,7 - - - -b4xcache,containskey,0,0,66,68 - - -b4xorderedmap,containskey -b4xcache,createb4xcacheitem,0,0,102,109 - - - -b4xcache,get,0,0,24,31 - - -b4xorderedmap,get -b4xcache,getmaxsize,0,0,19,21 - - - -b4xcache,initialize,0,0,9,11 - - -b4xorderedmap,initialize -b4xcache,iseternal,0,0,60,63 - - -b4xorderedmap,get -b4xcache,keys,0,0,98,100 - - -b4xorderedmap,getkeys -b4xcache,put,0,0,35,40 - - -,iseternal,b4xorderedmap,put,,createb4xcacheitem,,trimifoversize,b4xorderedmap,get,b4xorderedmap,getsize,b4xorderedmap,getvalues,b4xorderedmap,remove -b4xcache,trimifoversize,0,0,70,79 - - -b4xorderedmap,getsize,b4xorderedmap,getvalues,b4xorderedmap,remove -b4xcache,puteternal,0,0,44,52 - - -,iseternal,,createb4xcacheitem,b4xorderedmap,put,b4xorderedmap,get -b4xcache,remove,0,0,55,58 - - -,iseternal,b4xorderedmap,remove,b4xorderedmap,get -b4xcache,removeolditems,0,0,82,90 - - -b4xorderedmap,getvalues,b4xorderedmap,remove -b4xcache,setmaxsize,0,0,14,17 - - -,trimifoversize,b4xorderedmap,getsize,b4xorderedmap,getvalues,b4xorderedmap,remove -b4xcache,size,0,0,93,95 - - -b4xorderedmap,getsize -b4xorderedmap,containskey,0,0,46,48 - - - -b4xorderedmap,get,0,0,37,39 - - - -b4xorderedmap,initialize,0,0,6,9 - - - -b4xorderedmap,getkeys,0,0,32,34 - - - -b4xorderedmap,put,0,0,12,17 - - - -b4xorderedmap,remove,0,0,20,24 - - - -b4xorderedmap,getvalues,0,0,55,62 - - - -b4xorderedmap,getsize,0,0,50,52 - - - -b4xorderedmap,class_globals,0,0,1,4 - - - -b4xorderedmap,clear,0,0,26,29 - - - -b4xorderedmap,getdataforserializator,0,0,65,67 - - - -b4xorderedmap,getdefault,0,0,42,44 - - - -b4xorderedmap,setdatafromserializator,0,0,70,74 - - - -b4xcollections,createbitset,0,0,52,56 - - -b4xbitset,initialize,b4xbitset,clear -b4xcollections,createorderedmap,0,0,30,32 - - -,createorderedmap2,b4xorderedmap,initialize,b4xorderedmap,put -b4xcollections,createorderedmap2,0,0,38,47 - - -b4xorderedmap,initialize,b4xorderedmap,put -b4xcollections,createset,0,0,9,11 - - -,createset2,b4xset,initialize,b4xset,add,b4xorderedmap,initialize,b4xorderedmap,put -b4xcollections,createset2,0,0,16,25 - - -b4xset,initialize,b4xset,add,b4xorderedmap,initialize,b4xorderedmap,put -b4xcollections,process_globals,0,1,2,4 - - - -b4xset,initialize,0,0,5,7 - - -b4xorderedmap,initialize -b4xset,add,0,0,9,11 - - -b4xorderedmap,put -b4xset,aslist,0,0,29,31 - - -b4xorderedmap,getkeys -b4xset,class_globals,0,0,1,3 - - - -b4xset,clear,0,0,25,27 - - -b4xorderedmap,clear -b4xset,contains,0,0,17,19 - - -b4xorderedmap,containskey -b4xset,getsize,0,0,21,23 - - -b4xorderedmap,getsize -b4xset,remove,0,0,13,15 - - -b4xorderedmap,remove -b4xcomparatorsort,class_globals,0,0,1,2 - - - -b4xcomparatorsort,initialize,0,0,4,5 - - - -b4xcomparatorsort,partition,0,0,30,42 - - -,swap -b4xcomparatorsort,swap,0,0,44,48 - - - -b4xcomparatorsort,quicksort,0,0,21,28 - - -,partition,,quicksort,,swap -b4xcomparatorsort,sort,0,0,12,18 - - -,quicksort,,partition,,swap -httputils2service,completejob,0,0,152,169 -,taskidtojob - -httpjob,complete -httputils2service,hc_responseerror,0,0,115,131 -,taskidtojob - -,completejob,httpjob,complete -httputils2service,hc_responsesuccess,0,0,92,105 -,taskidtojob,,tempfolder - - -httputils2service,process_globals,0,1,2,25 - - - -httputils2service,receiver_receive,0,0,58,62 -,tempfolder,,hc,,taskidtojob -,tempfolder -,service_create -httputils2service,service_create,0,0,27,56 -,tempfolder,,hc,,taskidtojob -,tempfolder - -httputils2service,response_streamfinish,0,0,107,113 -,taskidtojob - -,completejob,httpjob,complete -httputils2service,service_destroy,0,0,68,70 - - - -httputils2service,service_start,0,0,64,66 - - - -httputils2service,submitjob,0,0,74,88 -,taskidtojob,,taskcounter,,hc,,tempfolder -,taskcounter,,tempfolder -,service_create,httpjob,getrequest -animatedcounter,base_resize,0,0,70,86 - - -,createbitmap,,topfromvalue -animatedcounter,createbitmap,0,0,93,107 - - - -animatedcounter,topfromvalue,0,0,88,91 - - - -animatedcounter,class_globals,0,0,5,20 - - - -animatedcounter,createfadebitmap,0,0,56,67 - - - -animatedcounter,designercreateview,0,0,30,54 - - -,createfadebitmap,,setvalue,,base_resize,,getvalue,,topfromvalue,,createbitmap -animatedcounter,setvalue,0,0,109,118 - - -,topfromvalue -animatedcounter,getvalue,0,0,120,126 - - - -animatedcounter,initialize,0,0,22,27 - - - -anotherprogressbar,base_resize,0,0,49,57 - - -,updategraphics,,setvisible,,busyloop -anotherprogressbar,updategraphics,0,0,112,142 - - -,setvisible,,busyloop -anotherprogressbar,busyloop,0,0,59,101 - - - -anotherprogressbar,class_globals,0,0,4,24 - - - -anotherprogressbar,designercreateview,0,0,32,47 - - -,setvalue,,base_resize,,updategraphics,,setvisible,,busyloop -anotherprogressbar,setvalue,0,0,161,163 - - - -anotherprogressbar,getprogresscolor,0,0,103,105 - - - -anotherprogressbar,getvalue,0,0,157,159 - - - -anotherprogressbar,getvisible,0,0,153,155 - - - -anotherprogressbar,initialize,0,0,26,29 - - - -anotherprogressbar,setprogresscolor,0,0,107,110 - - -,updategraphics,,setvisible,,busyloop -anotherprogressbar,setvaluenoanimation,0,0,165,168 - - -,setvalue -anotherprogressbar,setvisible,0,0,145,151 - - -,busyloop -b4xbreadcrumb,base_resize,0,0,51,55 - - -,draw,,drawitem -b4xbreadcrumb,draw,0,0,57,83 - - -,drawitem -b4xbreadcrumb,class_globals,0,0,5,22 - - - -b4xbreadcrumb,designercreateview,0,0,33,49 - - -,draw,,drawitem -b4xbreadcrumb,drawitem,0,0,85,112 - - - -b4xbreadcrumb,finditem,0,0,136,146 - - - -b4xbreadcrumb,getitems,0,0,153,155 - - - -b4xbreadcrumb,initialize,0,0,24,30 - - - -b4xbreadcrumb,setitems,0,0,148,151 - - -,draw,,drawitem -b4xbreadcrumb,touch_touch,1,0,114,134 -xuiviewsutils,utilsinitialized -xuiviewsutils,utilsinitialized -,finditem,,draw,xuiviewsutils,performhapticfeedback,,drawitem,xuiviewsutils,initialize -xuiviewsutils,performhapticfeedback,0,0,21,31 -,utilsinitialized -,utilsinitialized -,initialize -xuiviewsutils,settextorcsbuildertolabel,0,0,50,62 - - - -xuiviewsutils,addstubtoclvifneeded,0,0,34,47 -,xui - - -xuiviewsutils,setbitmapandfill,0,0,65,75 - - - -xuiviewsutils,setalpha,0,0,95,107 - - - -xuiviewsutils,createb4ximageview,0,0,85,92 -,xui - -b4ximageview,initialize,b4ximageview,designercreateview,b4ximageview,update,b4ximageview,updateclip -xuiviewsutils,createlabel,0,0,78,82 - - - -xuiviewsutils,initialize,0,0,10,19 -,utilsinitialized -,utilsinitialized - -xuiviewsutils,process_globals,0,1,2,8 - - - -b4xcolortemplate,alpha_touch,0,0,263,266 - - -,alphabarselectedchange,,update,,drawcolors,,handleselectedcolorchanged,,updatebarcolor,,getselectedcolor,,getselectedhsvcolor -b4xcolortemplate,alphabarselectedchange,0,0,147,156 - - -,update,,drawcolors,,handleselectedcolorchanged,,updatebarcolor,,getselectedcolor,,getselectedhsvcolor -b4xcolortemplate,update,0,0,158,161 - - -,drawcolors,,handleselectedcolorchanged,,updatebarcolor,,getselectedcolor,,getselectedhsvcolor -b4xcolortemplate,base_resize,0,0,51,77 - - -,drawcheckers,,drawhuebar,,drawalphabar,,huebarselectedchanged,,alphabarselectedchange,,update,,drawcolors,,handleselectedcolorchanged,,updatebarcolor,,getselectedcolor,,getselectedhsvcolor -b4xcolortemplate,drawcheckers,0,0,79,96 - - - -b4xcolortemplate,drawhuebar,0,0,98,107 - - - -b4xcolortemplate,drawalphabar,0,0,109,124 - - - -b4xcolortemplate,huebarselectedchanged,0,0,136,145 - - -,update,,drawcolors,,handleselectedcolorchanged,,updatebarcolor,,getselectedcolor,,getselectedhsvcolor -b4xcolortemplate,class_globals,0,0,1,15 - - - -b4xcolortemplate,colors_touch,0,0,253,256 - - -,handleselectedcolorchanged,,updatebarcolor,,getselectedcolor,,getselectedhsvcolor -b4xcolortemplate,handleselectedcolorchanged,0,0,163,173 - - -,updatebarcolor,,getselectedcolor,,getselectedhsvcolor -b4xcolortemplate,colortohsv,0,0,199,228 - - - -b4xcolortemplate,createpanelforbitmapcreator,0,0,30,49 - - - -b4xcolortemplate,dialogclosed,0,0,241,245 - - -,setselectedhsvcolor,,huebarselectedchanged,,alphabarselectedchange,,update,,drawcolors,,handleselectedcolorchanged,,updatebarcolor,,getselectedcolor,,getselectedhsvcolor -b4xcolortemplate,setselectedhsvcolor,0,0,190,197 - - -,huebarselectedchanged,,alphabarselectedchange,,update,,drawcolors,,handleselectedcolorchanged,,updatebarcolor,,getselectedcolor,,getselectedhsvcolor -b4xcolortemplate,drawcolors,0,0,126,134 - - - -b4xcolortemplate,getpanel,0,0,230,232 - - - -b4xcolortemplate,getselectedcolor,0,0,175,179 - - -,getselectedhsvcolor -b4xcolortemplate,getselectedhsvcolor,0,0,186,188 - - - -b4xcolortemplate,updatebarcolor,0,0,247,251 - - -,getselectedcolor,,getselectedhsvcolor -b4xcolortemplate,huebar_touch,0,0,258,261 - - -,huebarselectedchanged,,update,,drawcolors,,handleselectedcolorchanged,,updatebarcolor,,getselectedcolor,,getselectedhsvcolor -b4xcolortemplate,initialize,0,0,17,28 - - -,createpanelforbitmapcreator,,base_resize,,drawcheckers,,drawhuebar,,drawalphabar,,huebarselectedchanged,,alphabarselectedchange,,update,,drawcolors,,handleselectedcolorchanged,,updatebarcolor,,getselectedcolor,,getselectedhsvcolor -b4xcolortemplate,setselectedcolor,0,0,181,183 - - -,setselectedhsvcolor,,colortohsv,,huebarselectedchanged,,alphabarselectedchange,,update,,drawcolors,,handleselectedcolorchanged,,updatebarcolor,,getselectedcolor,,getselectedhsvcolor -b4xcolortemplate,show,0,0,234,239 - - -,getselectedhsvcolor,,updatebarcolor,,getselectedcolor -b4xcombobox,base_resize,0,0,55,57 - - - -b4xcombobox,class_globals,0,0,2,22 - - - -b4xcombobox,cmbbox_itemclick,1,0,157,159 - - -,raiseevent,,getselectedindex -b4xcombobox,raiseevent,1,0,137,150 - - -,getselectedindex -b4xcombobox,designercreateview,0,0,32,53 - - - -b4xcombobox,getitem,0,0,127,135 - - - -b4xcombobox,getselectedindex,0,0,98,104 - - - -b4xcombobox,getselecteditem,0,0,121,125 - - -,getselectedindex,,getitem -b4xcombobox,getsize,0,0,76,84 - - - -b4xcombobox,indexof,0,0,87,95 - - - -b4xcombobox,initialize,0,0,24,29 - - - -b4xcombobox,setitems,0,0,59,73 - - -,setselectedindex -b4xcombobox,setselectedindex,0,0,106,118 - - - -b4xdatetemplate,btnmonth_click,0,0,160,165 - - -,drawdays,,setyearsbuttonstate,,drawbox -b4xdatetemplate,drawdays,0,0,62,84 - - -,setyearsbuttonstate,,drawbox -b4xdatetemplate,btnyear_click,0,0,154,158 - - -,drawdays,,setyearsbuttonstate,,drawbox -b4xdatetemplate,class_globals,0,0,1,35 - - - -b4xdatetemplate,dayspanefg_touch,0,0,167,170 - - -,handlemouse,,drawbox,,selectday,,hide,,drawdays,b4xdialog,close,b4xdialog,getvisible,,setyearsbuttonstate -b4xdatetemplate,handlemouse,0,0,123,147 - - -,drawbox,,selectday,,hide,,drawdays,b4xdialog,close,b4xdialog,getvisible,,setyearsbuttonstate -b4xdatetemplate,dialogclosed,0,0,193,197 - - -,setdate,,selectday -b4xdatetemplate,setdate,0,0,102,113 - - -,selectday -b4xdatetemplate,drawbox,0,0,91,95 - - - -b4xdatetemplate,setyearsbuttonstate,0,0,86,89 - - - -b4xdatetemplate,getdate,0,0,98,100 - - - -b4xdatetemplate,getpanel,0,0,172,174 - - - -b4xdatetemplate,selectday,0,0,115,120 - - - -b4xdatetemplate,hide,0,0,149,151 - - -b4xdialog,close,b4xdialog,getvisible -b4xdatetemplate,initialize,1,0,37,60 - - -,setdate,,selectday -b4xdatetemplate,show,0,0,176,191 - - -,drawdays,,setyearsbuttonstate,,drawbox -b4xdialog,close,0,0,239,245 - - -,getvisible -b4xdialog,background_click,0,0,258,260 - - - -b4xdialog,background_touch,0,0,253,255 - - - -b4xdialog,blur,0,0,287,323 - - -,setavg -b4xdialog,setavg,0,0,325,337 - - - -b4xdialog,button_click,0,0,233,237 - - -,close,,getvisible -b4xdialog,class_globals,0,0,4,34 - - - -b4xdialog,getvisible,0,0,189,191 - - - -b4xdialog,createbutton,0,0,193,212 - - -xuiviewsutils,settextorcsbuildertolabel -b4xdialog,getbutton,0,0,215,220 - - - -b4xdialog,initialize,0,0,36,55 - - - -b4xdialog,internaladdstubtoclvifneeded,0,0,343,345 -xuiviewsutils,xui - -xuiviewsutils,addstubtoclvifneeded -b4xdialog,internalsettextorcsbuildertolabel,0,0,339,341 - - -xuiviewsutils,settextorcsbuildertolabel -b4xdialog,resize,0,0,263,272 - - -,updateblur,,blur,,setavg -b4xdialog,updateblur,0,0,274,285 - - -,blur,,setavg -b4xdialog,setbuttonstate,0,0,223,230 - - -,getbutton -b4xdialog,show,0,0,74,95 - - -xuiviewsutils,settextorcsbuildertolabel,,showcustom,,updateblur,,createbutton,,blur,,setavg -b4xdialog,showcustom,0,0,97,187 - - -,updateblur,,createbutton,xuiviewsutils,settextorcsbuildertolabel,,blur,,setavg -b4xdialog,showtemplate,1,0,65,72 -xuiviewsutils,xui - -b4xcolortemplate,getpanel,b4xdatetemplate,getpanel,b4xinputtemplate,getpanel,b4xlisttemplate,getpanel,b4xlongtexttemplate,getpanel,b4xsearchtemplate,getpanel,b4xsignaturetemplate,getpanel,b4xtimedtemplate,getpanel,b4xcolortemplate,show,b4xdatetemplate,show,b4xinputtemplate,show,b4xlisttemplate,show,b4xlongtexttemplate,show,b4xsearchtemplate,show,b4xsignaturetemplate,show,b4xtimedtemplate,show,,showcustom,b4xcolortemplate,dialogclosed,b4xdatetemplate,dialogclosed,b4xinputtemplate,dialogclosed,b4xlisttemplate,dialogclosed,b4xlongtexttemplate,dialogclosed,b4xsearchtemplate,dialogclosed,b4xsignaturetemplate,dialogclosed,b4xtimedtemplate,dialogclosed,b4xcolortemplate,getselectedhsvcolor,b4xcolortemplate,updatebarcolor,b4xcolortemplate,getselectedcolor,b4xdatetemplate,drawdays,b4xdatetemplate,setyearsbuttonstate,b4xdatetemplate,drawbox,b4xinputtemplate,validate,b4xinputtemplate,isvalid,,setbuttonstate,b4xinputtemplate,setborder,,getbutton,b4xlisttemplate,selectitem,xuiviewsutils,addstubtoclvifneeded,b4xsearchtemplate,update,b4xfloattextfield,settext,b4xfloattextfield,gettextfield,b4xsearchtemplate,additemstolist,b4xfloattextfield,tf_textchanged,b4xfloattextfield,updatelabel,anotherprogressbar,setvaluenoanimation,anotherprogressbar,setvalue,,close,,getvisible,,updateblur,,createbutton,xuiviewsutils,settextorcsbuildertolabel,,blur,,setavg,b4xcolortemplate,setselectedhsvcolor,b4xcolortemplate,huebarselectedchanged,b4xcolortemplate,alphabarselectedchange,b4xcolortemplate,update,b4xcolortemplate,drawcolors,b4xcolortemplate,handleselectedcolorchanged,b4xdatetemplate,setdate,b4xdatetemplate,selectday -b4xdialog,stub_click,0,0,349,351 - - - -b4xinputtemplate,getpanel,0,0,116,118 - - - -b4xinputtemplate,show,0,0,120,135 - - -,validate,,isvalid,b4xdialog,setbuttonstate,,setborder,b4xdialog,getbutton -b4xinputtemplate,dialogclosed,0,0,137,141 - - - -b4xinputtemplate,class_globals,0,0,1,14 - - - -b4xinputtemplate,configurefornumbers,0,0,40,69 - - - -b4xinputtemplate,initialize,1,0,16,31 - - -,setborder -b4xinputtemplate,setborder,0,0,99,101 - - - -b4xinputtemplate,isvalid,0,0,103,105 - - - -b4xinputtemplate,setbordercolor,0,0,34,38 - - -,setborder -b4xinputtemplate,validate,0,0,86,97 - - -,isvalid,b4xdialog,setbuttonstate,,setborder,b4xdialog,getbutton -b4xinputtemplate,textfield1_action,0,0,107,109 - - -,textfield1_enterpressed,,isvalid,b4xdialog,close,b4xdialog,getvisible -b4xinputtemplate,textfield1_enterpressed,0,0,111,113 - - -,isvalid,b4xdialog,close,b4xdialog,getvisible -b4xinputtemplate,textfield1_textchanged,0,0,71,84 - - -,validate,,isvalid,b4xdialog,setbuttonstate,,setborder,b4xdialog,getbutton -b4xlisttemplate,getpanel,0,0,37,39 - - - -b4xlisttemplate,show,0,0,41,57 -xuiviewsutils,xui - -,selectitem,xuiviewsutils,addstubtoclvifneeded,b4xdialog,setbuttonstate,b4xdialog,getbutton -b4xlisttemplate,dialogclosed,0,0,89,91 - - - -b4xlisttemplate,class_globals,0,0,1,12 - - - -b4xlisttemplate,customlistview1_itemclick,0,0,76,87 - - -,selectitem,b4xdialog,close,b4xdialog,setbuttonstate,b4xdialog,getbutton,b4xdialog,getvisible -b4xlisttemplate,selectitem,0,0,59,73 - - -b4xdialog,setbuttonstate,b4xdialog,getbutton -b4xlisttemplate,initialize,1,0,14,28 - - - -b4xlisttemplate,resize,0,0,31,34 - - - -b4xlongtexttemplate,getpanel,0,0,30,32 - - - -b4xlongtexttemplate,show,0,0,34,39 -xuiviewsutils,xui - -xuiviewsutils,addstubtoclvifneeded -b4xlongtexttemplate,dialogclosed,0,0,41,43 - - - -b4xlongtexttemplate,class_globals,0,0,1,6 - - - -b4xlongtexttemplate,initialize,1,0,8,21 - - - -b4xlongtexttemplate,resize,0,0,23,27 - - - -b4xsearchtemplate,getpanel,0,0,61,63 - - - -b4xsearchtemplate,show,1,0,65,79 - - -,update,b4xfloattextfield,settext,b4xfloattextfield,gettextfield,,additemstolist,b4xfloattextfield,tf_textchanged,b4xfloattextfield,updatelabel -b4xsearchtemplate,dialogclosed,0,0,241,243 - - - -b4xsearchtemplate,additemstolist,0,0,128,191 - - - -b4xsearchtemplate,class_globals,0,0,1,22 - - - -b4xsearchtemplate,customlistview1_itemclick,0,0,122,126 - - -b4xdialog,close,b4xdialog,getvisible -b4xsearchtemplate,initialize,1,0,24,52 - - -b4xfloattextfield,gettextfield -b4xsearchtemplate,resize,0,0,54,59 - - - -b4xsearchtemplate,searchfield_enterpressed,0,0,112,119 - - -b4xdialog,close,,customlistview1_itemclick,b4xdialog,getvisible -b4xsearchtemplate,searchfield_textchanged,0,0,81,83 - - -,update,,additemstolist -b4xsearchtemplate,update,0,0,85,110 - - -,additemstolist -b4xsearchtemplate,setindex,0,0,233,239 - - - -b4xsearchtemplate,setitems,0,0,196,230 - - - -b4xsignaturetemplate,getpanel,0,0,28,30 - - - -b4xsignaturetemplate,show,0,0,32,36 - - - -b4xsignaturetemplate,dialogclosed,0,0,56,62 - - - -b4xsignaturetemplate,class_globals,0,0,1,13 - - - -b4xsignaturetemplate,getbitmap,0,0,52,54 - - - -b4xsignaturetemplate,initialize,0,0,15,20 - - - -b4xsignaturetemplate,mbase_touch,0,0,38,50 - - - -b4xsignaturetemplate,resize,0,0,22,25 - - - -b4xtimedtemplate,getpanel,1,0,16,26 - - -b4xcolortemplate,getpanel,b4xdatetemplate,getpanel,b4xinputtemplate,getpanel,b4xlisttemplate,getpanel,b4xlongtexttemplate,getpanel,b4xsearchtemplate,getpanel,b4xsignaturetemplate,getpanel,,getpanel -b4xtimedtemplate,show,1,0,28,39 -xuiviewsutils,xui - -b4xcolortemplate,show,b4xdatetemplate,show,b4xinputtemplate,show,b4xlisttemplate,show,b4xlongtexttemplate,show,b4xsearchtemplate,show,b4xsignaturetemplate,show,,show,anotherprogressbar,setvaluenoanimation,anotherprogressbar,setvalue,b4xdialog,close,b4xcolortemplate,getselectedhsvcolor,b4xcolortemplate,updatebarcolor,b4xcolortemplate,getselectedcolor,b4xdatetemplate,drawdays,b4xdatetemplate,setyearsbuttonstate,b4xdatetemplate,drawbox,b4xinputtemplate,validate,b4xinputtemplate,isvalid,b4xdialog,setbuttonstate,b4xinputtemplate,setborder,b4xdialog,getbutton,b4xlisttemplate,selectitem,xuiviewsutils,addstubtoclvifneeded,b4xsearchtemplate,update,b4xfloattextfield,settext,b4xfloattextfield,gettextfield,b4xsearchtemplate,additemstolist,b4xfloattextfield,tf_textchanged,b4xfloattextfield,updatelabel,b4xdialog,getvisible -b4xtimedtemplate,dialogclosed,0,0,41,44 - - -b4xcolortemplate,dialogclosed,b4xdatetemplate,dialogclosed,b4xinputtemplate,dialogclosed,b4xlisttemplate,dialogclosed,b4xlongtexttemplate,dialogclosed,b4xsearchtemplate,dialogclosed,b4xsignaturetemplate,dialogclosed,,dialogclosed,b4xcolortemplate,setselectedhsvcolor,b4xcolortemplate,huebarselectedchanged,b4xcolortemplate,alphabarselectedchange,b4xcolortemplate,update,b4xcolortemplate,drawcolors,b4xcolortemplate,handleselectedcolorchanged,b4xcolortemplate,updatebarcolor,b4xcolortemplate,getselectedcolor,b4xcolortemplate,getselectedhsvcolor,b4xdatetemplate,setdate,b4xdatetemplate,selectday -b4xtimedtemplate,class_globals,0,0,1,8 - - - -b4xtimedtemplate,initialize,0,0,10,14 - - - -b4xfloattextfield,base_resize,0,0,196,208 - - -,updatelabel -b4xfloattextfield,updatelabel,0,0,210,232 - - - -b4xfloattextfield,class_globals,0,0,16,48 - - - -b4xfloattextfield,createacceptbutton,0,0,125,129 - - -,createbutton -b4xfloattextfield,createbutton,0,0,182,194 - - - -b4xfloattextfield,createbitmap,0,0,257,267 - - - -b4xfloattextfield,createclearbutton,0,0,117,123 - - -,createbutton -b4xfloattextfield,createrevealbutton,0,0,132,135 - - -,createbutton -b4xfloattextfield,createtextfield,0,0,328,386 - - - -b4xfloattextfield,createtextfieldall,0,0,109,115 - - -,createtextfield,,setnextfield -b4xfloattextfield,setnextfield,0,0,299,312 - - - -b4xfloattextfield,designercreateview,0,0,67,107 - - -,createtextfieldall,,update,,createrevealbutton,,createclearbutton,,createacceptbutton,,base_resize,,createtextfield,,setnextfield,,createbitmap,,updatelabel,,createbutton -b4xfloattextfield,update,0,0,245,255 - - -,createbitmap,,updatelabel -b4xfloattextfield,getnextfield,0,0,295,297 - - - -b4xfloattextfield,gettext,0,0,388,390 - - - -b4xfloattextfield,gettextfield,0,0,445,447 - - - -b4xfloattextfield,ime_handleaction,0,0,314,318 - - -,tf_enterpressed,,tf_action,,gettextfield -b4xfloattextfield,tf_enterpressed,0,0,320,326 - - -,tf_action,,gettextfield -b4xfloattextfield,initialize,0,0,50,65 - - - -b4xfloattextfield,lc_click,1,0,403,422 - - -,settext,,switchfrompasswordtoregular,,tf_enterpressed,,tf_textchanged,,updatelabel,,createtextfieldall,,base_resize,,createtextfield,,setnextfield,,tf_action,,gettextfield -b4xfloattextfield,settext,1,0,392,400 - - -,tf_textchanged,,updatelabel -b4xfloattextfield,switchfrompasswordtoregular,0,0,137,180 - - -,createtextfieldall,,base_resize,,createtextfield,,setnextfield,,updatelabel -b4xfloattextfield,requestfocusandshowkeyboard,0,0,450,455 - - - -b4xfloattextfield,tf_textchanged,1,0,287,292 - - -,updatelabel -b4xfloattextfield,tf_action,0,0,277,284 - - -,gettextfield -b4xfloattextfield,tf_beginedit,0,0,269,271 - - -,tf_focuschanged,,updatelabel -b4xfloattextfield,tf_focuschanged,0,0,234,242 - - -,updatelabel -b4xfloattextfield,tf_endedit,0,0,273,275 - - -,tf_focuschanged,,updatelabel -b4ximageview,base_resize,0,0,40,42 - - -,update,,updateclip -b4ximageview,update,0,0,77,107 - - -,updateclip -b4ximageview,class_globals,0,0,5,17 - - - -b4ximageview,clear,0,0,119,122 - - - -b4ximageview,designercreateview,0,0,25,38 - - -,update,,updateclip -b4ximageview,getbitmap,0,0,130,132 - - - -b4ximageview,getcornersradius,0,0,56,58 - - - -b4ximageview,getresizemode,0,0,67,69 - - - -b4ximageview,getroundedimage,0,0,45,47 - - - -b4ximageview,initialize,0,0,19,22 - - - -b4ximageview,load,0,0,110,116 - - -,setbitmap,xuiviewsutils,setbitmapandfill,,update,,updateclip -b4ximageview,setbitmap,0,0,124,128 - - -xuiviewsutils,setbitmapandfill,,update,,updateclip -b4ximageview,setcornersradius,0,0,60,63 - - -,updateclip -b4ximageview,updateclip,0,0,135,164 - - - -b4ximageview,setresizemode,0,0,71,75 - - -,update,,updateclip -b4ximageview,setroundedimage,0,0,49,53 - - -,updateclip -b4xloadingindicator,base_resize,0,0,37,40 - - -,mainloop,,draw_arc1,,draw_arc2,,draw_fivelines1,,draw_pacman,,draw_singlecircle,,draw_threecircles1,,draw_threecircles2,,setalpha -b4xloadingindicator,mainloop,0,0,42,54 - - -,draw_arc1,,draw_arc2,,draw_fivelines1,,draw_pacman,,draw_singlecircle,,draw_threecircles1,,draw_threecircles2,,setalpha -b4xloadingindicator,class_globals,0,0,7,18 - - - -b4xloadingindicator,designercreateview,0,0,26,35 - - -,mainloop,,draw_arc1,,draw_arc2,,draw_fivelines1,,draw_pacman,,draw_singlecircle,,draw_threecircles1,,draw_threecircles2,,setalpha -b4xloadingindicator,draw_arc1,0,0,105,116 - - - -b4xloadingindicator,draw_arc2,0,0,118,129 - - - -b4xloadingindicator,draw_fivelines1,0,0,95,103 - - - -b4xloadingindicator,draw_pacman,0,0,131,148 - - -,setalpha -b4xloadingindicator,setalpha,0,0,91,93 - - - -b4xloadingindicator,draw_singlecircle,0,0,85,89 - - -,setalpha -b4xloadingindicator,draw_threecircles1,0,0,66,74 - - - -b4xloadingindicator,draw_threecircles2,0,0,76,83 - - - -b4xloadingindicator,hide,0,0,61,64 - - - -b4xloadingindicator,initialize,0,0,20,23 - - - -b4xloadingindicator,show,0,0,56,59 - - -,mainloop,,draw_arc1,,draw_arc2,,draw_fivelines1,,draw_pacman,,draw_singlecircle,,draw_threecircles1,,draw_threecircles2,,setalpha -b4xplusminus,base_resize,0,0,83,99 - - - -b4xplusminus,class_globals,0,0,6,29 - - - -b4xplusminus,createlabel,0,0,247,255 - - - -b4xplusminus,decrement,1,0,182,193 - - -,setindex,,getvalueimpl,,internalsettextorcsbuildertolabel,b4xformatter,format,b4xformatter,getformatdata -b4xplusminus,setindex,1,0,142,160 - - -,getvalueimpl,,internalsettextorcsbuildertolabel,b4xformatter,format,b4xformatter,getformatdata -b4xplusminus,designercreateview,1,0,38,81 - - -b4xformatter,getdefaultformat,,createlabel,,setindex,,base_resize,,getvalueimpl,,internalsettextorcsbuildertolabel,b4xformatter,format,b4xformatter,getformatdata -b4xplusminus,getselectedvalue,0,0,117,119 - - -,getvalueimpl -b4xplusminus,getvalueimpl,0,0,130,140 - - - -b4xplusminus,increment,1,0,162,180 - - -,getvalueimpl,b4xformatter,format,,setindex,b4xformatter,getformatdata,,internalsettextorcsbuildertolabel -b4xplusminus,initialize,0,0,31,35 - - -b4xformatter,initialize,b4xformatter,createdefaultformat,b4xformatter,addformatdata -b4xplusminus,internalsettextorcsbuildertolabel,0,0,257,269 - - - -b4xplusminus,pnlarrow_touch,1,0,195,197 -xuiviewsutils,utilsinitialized -xuiviewsutils,utilsinitialized -,touch,xuiviewsutils,performhapticfeedback,,increment,,startdownloop,,decrement,xuiviewsutils,initialize,,getvalueimpl,b4xformatter,format,,setindex,b4xformatter,getformatdata,,internalsettextorcsbuildertolabel -b4xplusminus,touch,1,0,199,213 -xuiviewsutils,utilsinitialized -xuiviewsutils,utilsinitialized -xuiviewsutils,performhapticfeedback,,increment,,startdownloop,,decrement,xuiviewsutils,initialize,,getvalueimpl,b4xformatter,format,,setindex,b4xformatter,getformatdata,,internalsettextorcsbuildertolabel -b4xplusminus,setnumericrange,1,0,108,115 - - -,setindex,,getvalueimpl,,internalsettextorcsbuildertolabel,b4xformatter,format,b4xformatter,getformatdata -b4xplusminus,setselectedvalue,1,0,121,128 - - -,setindex,,getvalueimpl,,internalsettextorcsbuildertolabel,b4xformatter,format,b4xformatter,getformatdata -b4xplusminus,setstringitems,1,0,101,106 - - -,setindex,,getvalueimpl,,internalsettextorcsbuildertolabel,b4xformatter,format,b4xformatter,getformatdata -b4xplusminus,startdownloop,1,0,234,243 - - -,increment,,decrement,,getvalueimpl,b4xformatter,format,,setindex,b4xformatter,getformatdata,,internalsettextorcsbuildertolabel -b4xformatter,getdefaultformat,0,0,78,80 - - - -b4xformatter,format,0,0,92,146 - - -,getformatdata -b4xformatter,initialize,0,0,13,17 - - -,createdefaultformat,,addformatdata -b4xformatter,addformatdata,0,0,65,76 - - - -b4xformatter,class_globals,0,0,1,11 - - - -b4xformatter,copyformatdata,0,0,38,60 - - - -b4xformatter,createdefaultformat,0,0,19,29 - - - -b4xformatter,getformatdata,0,0,83,89 - - - -b4xformatter,formatlabel,0,0,150,155 - - -,format,,getformatdata -b4xformatter,newformatdata,0,0,32,34 - - -,copyformatdata,,getdefaultformat -b4xradiobutton,base_resize,0,0,59,78 - - -,setvalueimpl,,setchecked,,draw,xuiviewsutils,setalpha -b4xradiobutton,setvalueimpl,0,0,98,133 - - -,setchecked,,draw,xuiviewsutils,setalpha,,setvalueimpl -b4xradiobutton,class_globals,0,0,6,25 - - - -b4xradiobutton,designercreateview,0,0,33,56 - - -,base_resize,,setvalueimpl,,setchecked,,draw,xuiviewsutils,setalpha -b4xradiobutton,draw,0,0,153,159 - - - -b4xradiobutton,getchecked,0,0,140,142 - - - -b4xradiobutton,getenabled,0,0,149,151 - - - -b4xradiobutton,gettext,0,0,165,167 - - - -b4xradiobutton,initialize,0,0,27,30 - - - -b4xradiobutton,pnl_click,0,0,86,96 -xuiviewsutils,utilsinitialized -xuiviewsutils,utilsinitialized -xuiviewsutils,performhapticfeedback,,setvalueimpl,xuiviewsutils,initialize,,setchecked,,draw,xuiviewsutils,setalpha -b4xradiobutton,setchecked,0,0,135,138 - - -,setvalueimpl,,setchecked,,draw,xuiviewsutils,setalpha -b4xradiobutton,setenabled,0,0,144,147 - - -,setvalueimpl,,setchecked,,draw,xuiviewsutils,setalpha -b4xradiobutton,settext,0,0,161,163 - - -xuiviewsutils,settextorcsbuildertolabel -b4xswitch,base_resize,0,0,148,150 - - - -b4xswitch,class_globals,0,0,7,25 - - - -b4xswitch,designercreateview,0,0,33,58 - - -,setvalueimpl,,draw,xuiviewsutils,setalpha -b4xswitch,setvalueimpl,0,0,81,106 - - -,draw,xuiviewsutils,setalpha -b4xswitch,draw,0,0,126,146 - - - -b4xswitch,getenabled,0,0,122,124 - - - -b4xswitch,getvalue,0,0,113,115 - - - -b4xswitch,initialize,0,0,27,30 - - - -b4xswitch,pnl_click,0,0,70,79 -xuiviewsutils,utilsinitialized -xuiviewsutils,utilsinitialized -xuiviewsutils,performhapticfeedback,,setvalueimpl,xuiviewsutils,initialize,,draw,xuiviewsutils,setalpha -b4xswitch,setenabled,0,0,117,120 - - -,setvalueimpl,,draw,xuiviewsutils,setalpha -b4xswitch,setvalue,0,0,108,111 - - -,setvalueimpl,,draw,xuiviewsutils,setalpha -madewithlove,base_resize,0,0,47,49 - - - -madewithlove,class_globals,0,0,1,7 - - - -madewithlove,designercreateview,0,0,15,45 - - - -madewithlove,initialize,0,0,9,12 - - - -roundslider,base_resize,0,0,89,96 - - -,createthumb,,draw -roundslider,createthumb,0,0,70,87 - - - -roundslider,draw,0,0,98,121 - - - -roundslider,class_globals,0,0,6,27 - - - -roundslider,designercreateview,0,0,35,55 - - -,base_resize,,createthumb,,draw -roundslider,getvalue,0,0,182,184 - - - -roundslider,initialize,0,0,29,32 - - - -roundslider,pnl_touch,1,0,123,154 - - -,draw -roundslider,setcirclecolor,0,0,64,68 - - -,draw -roundslider,setrange,0,0,176,180 - - -,setvalue,,draw -roundslider,setvalue,0,0,170,173 - - -,draw -roundslider,setthumbcolor,0,0,57,62 - - -,createthumb,,draw -scrollinglabel,base_resize,0,0,40,43 - - -,settext,,measuretextwidth,,stopscrolling,,startscrolling -scrollinglabel,settext,0,0,45,91 - - -,measuretextwidth,,stopscrolling,,startscrolling -scrollinglabel,class_globals,0,0,2,15 - - - -scrollinglabel,designercreateview,0,0,23,38 - - -,settext,,measuretextwidth,,stopscrolling,,startscrolling -scrollinglabel,gettext,0,0,93,95 - - - -scrollinglabel,gettextcolor,0,0,126,128 - - - -scrollinglabel,initialize,0,0,18,21 - - - -scrollinglabel,measuretextwidth,0,0,117,119 - - - -scrollinglabel,stopscrolling,0,0,97,99 - - - -scrollinglabel,startscrolling,0,0,101,115 - - - -scrollinglabel,settextcolor,0,0,121,124 - - -,settext,,measuretextwidth,,stopscrolling,,startscrolling -swiftbutton,base_resize,0,0,54,60 - - -,draw -swiftbutton,draw,0,0,121,142 - - - -swiftbutton,class_globals,0,0,12,25 - - - -swiftbutton,designercreateview,0,0,32,52 - - -,base_resize,,draw -swiftbutton,getenabled,0,0,62,64 - - - -swiftbutton,initialize,0,0,27,30 - - - -swiftbutton,p_touch,0,0,72,92 -xuiviewsutils,utilsinitialized -xuiviewsutils,utilsinitialized -,setpressedstate,,draw,xuiviewsutils,performhapticfeedback,xuiviewsutils,initialize -swiftbutton,setpressedstate,0,0,94,103 - - - -swiftbutton,setcolors,0,0,111,115 - - -,draw -swiftbutton,setenabled,0,0,66,70 - - -,draw -swiftbutton,update,0,0,117,119 - - -,draw diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/animatedcounter.java b/B4A/Objects/shell/src/keymon/lat/medicomed/animatedcounter.java deleted file mode 100644 index 6de0989..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/animatedcounter.java +++ /dev/null @@ -1,43 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class animatedcounter { - public static RemoteObject myClass; - public animatedcounter() { - } - public static PCBA staticBA = new PCBA(null, animatedcounter.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _meventname = RemoteObject.createImmutable(""); -public static RemoteObject _mcallback = RemoteObject.declareNull("Object"); -public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _imageviews = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _mdigits = RemoteObject.createImmutable(0); -public static RemoteObject _lbltemplate = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _mvalue = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _digitheight = RemoteObject.createImmutable(0); -public static RemoteObject _digitwidth = RemoteObject.createImmutable(0); -public static RemoteObject _mduration = RemoteObject.createImmutable(0); -public static RemoteObject _fade = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper"); -public static RemoteObject _xfadeiv = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _tag = RemoteObject.declareNull("Object"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"DateUtils",_ref.getField(false, "_dateutils"),"DigitHeight",_ref.getField(false, "_digitheight"),"DigitWidth",_ref.getField(false, "_digitwidth"),"fade",_ref.getField(false, "_fade"),"ImageViews",_ref.getField(false, "_imageviews"),"lblTemplate",_ref.getField(false, "_lbltemplate"),"mBase",_ref.getField(false, "_mbase"),"mCallBack",_ref.getField(false, "_mcallback"),"mdigits",_ref.getField(false, "_mdigits"),"mDuration",_ref.getField(false, "_mduration"),"mEventName",_ref.getField(false, "_meventname"),"mValue",_ref.getField(false, "_mvalue"),"Tag",_ref.getField(false, "_tag"),"xfadeIv",_ref.getField(false, "_xfadeiv"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/animatedcounter_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/animatedcounter_subs_0.java deleted file mode 100644 index 80f9923..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/animatedcounter_subs_0.java +++ /dev/null @@ -1,471 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class animatedcounter_subs_0 { - - -public static RemoteObject _base_resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("Base_Resize (animatedcounter) ","animatedcounter",37,__ref.getField(false, "ba"),__ref,70); -if (RapidSub.canDelegate("base_resize")) { return __ref.runUserSub(false, "animatedcounter","base_resize", __ref, _width, _height);} -RemoteObject _columns = RemoteObject.createImmutable(0); -RemoteObject _bmp = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper"); -RemoteObject _left = RemoteObject.createImmutable(0); -int _i = 0; -RemoteObject _iv = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 70;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 71;BA.debugLine="mBase.GetView(0).SetLayoutAnimated(0, 0, 0, Width"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0))).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, _width)),(Object)(BA.numberCast(int.class, _height))); - BA.debugLineNum = 72;BA.debugLine="xfadeIv.SetLayoutAnimated(0, 0, 0, Width, Height)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_xfadeiv" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, _width)),(Object)(BA.numberCast(int.class, _height))); - BA.debugLineNum = 73;BA.debugLine="xfadeIv.SetBitmap(fade.Resize(Width, Height, Fals"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_xfadeiv" /*RemoteObject*/ ).runVoidMethod ("SetBitmap",(Object)((__ref.getField(false,"_fade" /*RemoteObject*/ ).runMethod(false,"Resize",(Object)(BA.numberCast(int.class, _width)),(Object)(BA.numberCast(int.class, _height)),(Object)(animatedcounter.__c.getField(true,"False"))).getObject()))); - BA.debugLineNum = 74;BA.debugLine="DigitHeight = Height"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_digitheight" /*RemoteObject*/ ,BA.numberCast(int.class, _height)); - BA.debugLineNum = 75;BA.debugLine="Dim Columns As Int = mdigits"; -Debug.JustUpdateDeviceLine(); -_columns = __ref.getField(true,"_mdigits" /*RemoteObject*/ );Debug.locals.put("Columns", _columns);Debug.locals.put("Columns", _columns); - BA.debugLineNum = 76;BA.debugLine="DigitWidth = Width / Columns"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_digitwidth" /*RemoteObject*/ ,BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_width,_columns}, "/",0, 0))); - BA.debugLineNum = 77;BA.debugLine="Dim bmp As B4XBitmap = CreateBitmap(lblTemplate)"; -Debug.JustUpdateDeviceLine(); -_bmp = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper"); -_bmp = __ref.runClassMethod (keymon.lat.medicomed.animatedcounter.class, "_createbitmap" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_lbltemplate" /*RemoteObject*/ )));Debug.locals.put("bmp", _bmp);Debug.locals.put("bmp", _bmp); - BA.debugLineNum = 78;BA.debugLine="Dim left As Int = Width"; -Debug.JustUpdateDeviceLine(); -_left = BA.numberCast(int.class, _width);Debug.locals.put("left", _left);Debug.locals.put("left", _left); - BA.debugLineNum = 79;BA.debugLine="For i = 0 To ImageViews.Size - 1"; -Debug.JustUpdateDeviceLine(); -{ -final int step9 = 1; -final int limit9 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_imageviews" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step9 > 0 && _i <= limit9) || (step9 < 0 && _i >= limit9) ;_i = ((int)(0 + _i + step9)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 80;BA.debugLine="Dim iv As B4XView = ImageViews.Get(i)"; -Debug.JustUpdateDeviceLine(); -_iv = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_iv = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), __ref.getField(false,"_imageviews" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))));Debug.locals.put("iv", _iv);Debug.locals.put("iv", _iv); - BA.debugLineNum = 82;BA.debugLine="left = left - DigitWidth"; -Debug.JustUpdateDeviceLine(); -_left = RemoteObject.solve(new RemoteObject[] {_left,__ref.getField(true,"_digitwidth" /*RemoteObject*/ )}, "-",1, 1);Debug.locals.put("left", _left); - BA.debugLineNum = 83;BA.debugLine="iv.SetLayoutAnimated(0, left, TopFromValue(i), D"; -Debug.JustUpdateDeviceLine(); -_iv.runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(_left),(Object)(__ref.runClassMethod (keymon.lat.medicomed.animatedcounter.class, "_topfromvalue" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, _i)))),(Object)(__ref.getField(true,"_digitwidth" /*RemoteObject*/ )),(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_digitheight" /*RemoteObject*/ ),RemoteObject.createImmutable(10)}, "*",0, 1))); - BA.debugLineNum = 84;BA.debugLine="iv.SetBitmap(bmp)"; -Debug.JustUpdateDeviceLine(); -_iv.runVoidMethod ("SetBitmap",(Object)((_bmp.getObject()))); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 86;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 5;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 6;BA.debugLine="Private mEventName As String 'ignore"; -animatedcounter._meventname = RemoteObject.createImmutable("");__ref.setField("_meventname",animatedcounter._meventname); - //BA.debugLineNum = 7;BA.debugLine="Private mCallBack As Object 'ignore"; -animatedcounter._mcallback = RemoteObject.createNew ("Object");__ref.setField("_mcallback",animatedcounter._mcallback); - //BA.debugLineNum = 8;BA.debugLine="Public mBase As B4XView 'ignore"; -animatedcounter._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",animatedcounter._mbase); - //BA.debugLineNum = 9;BA.debugLine="Private xui As XUI 'ignore"; -animatedcounter._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",animatedcounter._xui); - //BA.debugLineNum = 10;BA.debugLine="Private ImageViews As List"; -animatedcounter._imageviews = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_imageviews",animatedcounter._imageviews); - //BA.debugLineNum = 11;BA.debugLine="Private mdigits As Int"; -animatedcounter._mdigits = RemoteObject.createImmutable(0);__ref.setField("_mdigits",animatedcounter._mdigits); - //BA.debugLineNum = 12;BA.debugLine="Private lblTemplate As B4XView"; -animatedcounter._lbltemplate = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_lbltemplate",animatedcounter._lbltemplate); - //BA.debugLineNum = 13;BA.debugLine="Private mValue As List"; -animatedcounter._mvalue = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_mvalue",animatedcounter._mvalue); - //BA.debugLineNum = 14;BA.debugLine="Private DigitHeight, DigitWidth As Int"; -animatedcounter._digitheight = RemoteObject.createImmutable(0);__ref.setField("_digitheight",animatedcounter._digitheight); -animatedcounter._digitwidth = RemoteObject.createImmutable(0);__ref.setField("_digitwidth",animatedcounter._digitwidth); - //BA.debugLineNum = 15;BA.debugLine="Private mDuration As Int"; -animatedcounter._mduration = RemoteObject.createImmutable(0);__ref.setField("_mduration",animatedcounter._mduration); - //BA.debugLineNum = 16;BA.debugLine="Private fade As B4XBitmap"; -animatedcounter._fade = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper");__ref.setField("_fade",animatedcounter._fade); - //BA.debugLineNum = 17;BA.debugLine="Private xfadeIv As B4XView"; -animatedcounter._xfadeiv = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_xfadeiv",animatedcounter._xfadeiv); - //BA.debugLineNum = 18;BA.debugLine="Public Tag As Object"; -animatedcounter._tag = RemoteObject.createNew ("Object");__ref.setField("_tag",animatedcounter._tag); - //BA.debugLineNum = 20;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _createbitmap(RemoteObject __ref,RemoteObject _lbl) throws Exception{ -try { - Debug.PushSubsStack("CreateBitmap (animatedcounter) ","animatedcounter",37,__ref.getField(false, "ba"),__ref,93); -if (RapidSub.canDelegate("createbitmap")) { return __ref.runUserSub(false, "animatedcounter","createbitmap", __ref, _lbl);} -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _cvs = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas"); -RemoteObject _r = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XRect"); -RemoteObject _baseline = RemoteObject.createImmutable(0); -int _i = 0; -RemoteObject _res = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper"); -Debug.locals.put("lbl", _lbl); - BA.debugLineNum = 93;BA.debugLine="Private Sub CreateBitmap (lbl As B4XView) As B4XBi"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 94;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"\")"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_p = __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("")));Debug.locals.put("p", _p);Debug.locals.put("p", _p); - BA.debugLineNum = 95;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, DigitWidth, DigitHei"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(true,"_digitwidth" /*RemoteObject*/ )),(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_digitheight" /*RemoteObject*/ ),RemoteObject.createImmutable(10)}, "*",0, 1))); - BA.debugLineNum = 96;BA.debugLine="Dim cvs As B4XCanvas"; -Debug.JustUpdateDeviceLine(); -_cvs = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas");Debug.locals.put("cvs", _cvs); - BA.debugLineNum = 97;BA.debugLine="cvs.Initialize(p)"; -Debug.JustUpdateDeviceLine(); -_cvs.runVoidMethod ("Initialize",(Object)(_p)); - BA.debugLineNum = 98;BA.debugLine="Dim r As B4XRect = cvs.MeasureText(\"5\", lbl.Font)"; -Debug.JustUpdateDeviceLine(); -_r = _cvs.runMethod(false,"MeasureText",(Object)(BA.ObjectToString("5")),(Object)(_lbl.runMethod(false,"getFont")));Debug.locals.put("r", _r);Debug.locals.put("r", _r); - BA.debugLineNum = 99;BA.debugLine="Dim BaseLine As Int = DigitHeight / 2 - r.Height"; -Debug.JustUpdateDeviceLine(); -_baseline = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_digitheight" /*RemoteObject*/ ),RemoteObject.createImmutable(2),_r.runMethod(true,"getHeight"),RemoteObject.createImmutable(2),_r.runMethod(true,"getTop")}, "/-/-",2, 0));Debug.locals.put("BaseLine", _baseline);Debug.locals.put("BaseLine", _baseline); - BA.debugLineNum = 100;BA.debugLine="For i = 0 To 9"; -Debug.JustUpdateDeviceLine(); -{ -final int step7 = 1; -final int limit7 = 9; -_i = 0 ; -for (;(step7 > 0 && _i <= limit7) || (step7 < 0 && _i >= limit7) ;_i = ((int)(0 + _i + step7)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 101;BA.debugLine="cvs.DrawText(i, DigitWidth / 2, i * DigitHeight"; -Debug.JustUpdateDeviceLine(); -_cvs.runVoidMethod ("DrawText",__ref.getField(false, "ba"),(Object)(BA.NumberToString(_i)),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_digitwidth" /*RemoteObject*/ ),RemoteObject.createImmutable(2)}, "/",0, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_i),__ref.getField(true,"_digitheight" /*RemoteObject*/ ),_baseline}, "*+",1, 1))),(Object)(_lbl.runMethod(false,"getFont")),(Object)(_lbl.runMethod(true,"getTextColor")),(Object)(BA.getEnumFromString(BA.getDeviceClass("android.graphics.Paint.Align"),RemoteObject.createImmutable("CENTER")))); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 103;BA.debugLine="cvs.Invalidate"; -Debug.JustUpdateDeviceLine(); -_cvs.runVoidMethod ("Invalidate"); - BA.debugLineNum = 104;BA.debugLine="Dim res As B4XBitmap = cvs.CreateBitmap"; -Debug.JustUpdateDeviceLine(); -_res = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper"); -_res = _cvs.runMethod(false,"CreateBitmap");Debug.locals.put("res", _res);Debug.locals.put("res", _res); - BA.debugLineNum = 105;BA.debugLine="cvs.Release"; -Debug.JustUpdateDeviceLine(); -_cvs.runVoidMethod ("Release"); - BA.debugLineNum = 106;BA.debugLine="Return res"; -Debug.JustUpdateDeviceLine(); -if (true) return _res; - BA.debugLineNum = 107;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createfadebitmap(RemoteObject __ref,RemoteObject _clr) throws Exception{ -try { - Debug.PushSubsStack("CreateFadeBitmap (animatedcounter) ","animatedcounter",37,__ref.getField(false, "ba"),__ref,56); -if (RapidSub.canDelegate("createfadebitmap")) { return __ref.runUserSub(false, "animatedcounter","createfadebitmap", __ref, _clr);} -RemoteObject _bc = RemoteObject.declareNull("b4a.example.bitmapcreator"); -RemoteObject _r = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XRect"); -RemoteObject _tclr = RemoteObject.createImmutable(0); -Debug.locals.put("clr", _clr); - BA.debugLineNum = 56;BA.debugLine="Private Sub CreateFadeBitmap (clr As Int) As B4XBi"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 57;BA.debugLine="Dim bc As BitmapCreator"; -Debug.JustUpdateDeviceLine(); -_bc = RemoteObject.createNew ("b4a.example.bitmapcreator");Debug.locals.put("bc", _bc); - BA.debugLineNum = 58;BA.debugLine="bc.Initialize(200, 50)"; -Debug.JustUpdateDeviceLine(); -_bc.runVoidMethod ("_initialize",__ref.getField(false, "ba"),(Object)(BA.numberCast(int.class, 200)),(Object)(BA.numberCast(int.class, 50))); - BA.debugLineNum = 59;BA.debugLine="Dim r As B4XRect"; -Debug.JustUpdateDeviceLine(); -_r = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas.B4XRect");Debug.locals.put("r", _r); - BA.debugLineNum = 60;BA.debugLine="r.Initialize(0, 0, bc.mWidth, bc.mHeight / 3)"; -Debug.JustUpdateDeviceLine(); -_r.runVoidMethod ("Initialize",(Object)(BA.numberCast(float.class, 0)),(Object)(BA.numberCast(float.class, 0)),(Object)(BA.numberCast(float.class, _bc.getField(true,"_mwidth"))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_bc.getField(true,"_mheight"),RemoteObject.createImmutable(3)}, "/",0, 0)))); - BA.debugLineNum = 61;BA.debugLine="Dim tclr As Int = Bit.And(0x00ffffff, clr)"; -Debug.JustUpdateDeviceLine(); -_tclr = animatedcounter.__c.getField(false,"Bit").runMethod(true,"And",(Object)(BA.numberCast(int.class, ((int)0x00ffffff))),(Object)(_clr));Debug.locals.put("tclr", _tclr);Debug.locals.put("tclr", _tclr); - BA.debugLineNum = 62;BA.debugLine="bc.FillGradient(Array As Int(clr, tclr), r, \"TOP_"; -Debug.JustUpdateDeviceLine(); -_bc.runVoidMethod ("_fillgradient",(Object)(RemoteObject.createNewArray("int",new int[] {2},new Object[] {_clr,_tclr})),(Object)(_r),(Object)(RemoteObject.createImmutable("TOP_BOTTOM"))); - BA.debugLineNum = 63;BA.debugLine="r.Top = bc.mHeight * 2 / 3"; -Debug.JustUpdateDeviceLine(); -_r.runMethod(true,"setTop",BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_bc.getField(true,"_mheight"),RemoteObject.createImmutable(2),RemoteObject.createImmutable(3)}, "*/",0, 0))); - BA.debugLineNum = 64;BA.debugLine="r.Bottom = bc.mHeight"; -Debug.JustUpdateDeviceLine(); -_r.runMethod(true,"setBottom",BA.numberCast(float.class, _bc.getField(true,"_mheight"))); - BA.debugLineNum = 65;BA.debugLine="bc.FillGradient(Array As Int(clr, tclr), r, \"BOTT"; -Debug.JustUpdateDeviceLine(); -_bc.runVoidMethod ("_fillgradient",(Object)(RemoteObject.createNewArray("int",new int[] {2},new Object[] {_clr,_tclr})),(Object)(_r),(Object)(RemoteObject.createImmutable("BOTTOM_TOP"))); - BA.debugLineNum = 66;BA.debugLine="Return bc.Bitmap"; -Debug.JustUpdateDeviceLine(); -if (true) return _bc.runMethod(false,"_getbitmap"); - BA.debugLineNum = 67;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _designercreateview(RemoteObject __ref,RemoteObject _base,RemoteObject _lbl,RemoteObject _props) throws Exception{ -try { - Debug.PushSubsStack("DesignerCreateView (animatedcounter) ","animatedcounter",37,__ref.getField(false, "ba"),__ref,30); -if (RapidSub.canDelegate("designercreateview")) { return __ref.runUserSub(false, "animatedcounter","designercreateview", __ref, _base, _lbl, _props);} -RemoteObject _pnl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -int _i = 0; -RemoteObject _iv = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -RemoteObject _fadeiv = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -Debug.locals.put("Base", _base); -Debug.locals.put("lbl", _lbl); -Debug.locals.put("Props", _props); - BA.debugLineNum = 30;BA.debugLine="Public Sub DesignerCreateView (Base As Object, lbl"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 31;BA.debugLine="mBase = Base"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).setObject (_base); - BA.debugLineNum = 32;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_tag" /*RemoteObject*/ ,__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"getTag")); - BA.debugLineNum = 32;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"setTag",__ref); - BA.debugLineNum = 33;BA.debugLine="Dim pnl As B4XView = xui.CreatePanel(\"\") 'needed"; -Debug.JustUpdateDeviceLine(); -_pnl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_pnl = __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("")));Debug.locals.put("pnl", _pnl);Debug.locals.put("pnl", _pnl); - BA.debugLineNum = 34;BA.debugLine="mBase.AddView(pnl, 0, 0, 0, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((_pnl.getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 35;BA.debugLine="mdigits = Props.Get(\"Digits\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mdigits" /*RemoteObject*/ ,BA.numberCast(int.class, _props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("Digits")))))); - BA.debugLineNum = 36;BA.debugLine="mDuration = Props.Get(\"Duration\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mduration" /*RemoteObject*/ ,BA.numberCast(int.class, _props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("Duration")))))); - BA.debugLineNum = 37;BA.debugLine="lblTemplate = lbl"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_lbltemplate" /*RemoteObject*/ ).setObject (_lbl.getObject()); - BA.debugLineNum = 38;BA.debugLine="fade = CreateFadeBitmap(xui.PaintOrColorToColor(P"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_fade" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.animatedcounter.class, "_createfadebitmap" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)(_props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("FadeColor"))),(Object)((__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_White"))))))))); - BA.debugLineNum = 39;BA.debugLine="For i = 0 To mdigits - 1"; -Debug.JustUpdateDeviceLine(); -{ -final int step10 = 1; -final int limit10 = RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mdigits" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step10 > 0 && _i <= limit10) || (step10 < 0 && _i >= limit10) ;_i = ((int)(0 + _i + step10)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 40;BA.debugLine="Dim iv As ImageView"; -Debug.JustUpdateDeviceLine(); -_iv = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");Debug.locals.put("iv", _iv); - BA.debugLineNum = 41;BA.debugLine="iv.Initialize(\"\")"; -Debug.JustUpdateDeviceLine(); -_iv.runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable(""))); - BA.debugLineNum = 42;BA.debugLine="ImageViews.Add(iv)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_imageviews" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((_iv.getObject()))); - BA.debugLineNum = 43;BA.debugLine="mBase.GetView(0).AddView(iv, 0, 0, 0, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0))).runVoidMethod ("AddView",(Object)((_iv.getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 45;BA.debugLine="Dim fadeIv As ImageView"; -Debug.JustUpdateDeviceLine(); -_fadeiv = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");Debug.locals.put("fadeIv", _fadeiv); - BA.debugLineNum = 46;BA.debugLine="fadeIv.Initialize(\"\")"; -Debug.JustUpdateDeviceLine(); -_fadeiv.runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable(""))); - BA.debugLineNum = 47;BA.debugLine="xfadeIv = fadeIv"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_xfadeiv" /*RemoteObject*/ ).setObject (_fadeiv.getObject()); - BA.debugLineNum = 48;BA.debugLine="mBase.GetView(0).AddView(fadeIv, 0, 0, 0, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0))).runVoidMethod ("AddView",(Object)((_fadeiv.getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 49;BA.debugLine="setValue(0)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.animatedcounter.class, "_setvalue" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 50;BA.debugLine="If xui.IsB4A Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4A").get().booleanValue()) { - BA.debugLineNum = 51;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.animatedcounter.class, "_base_resize" /*RemoteObject*/ ,(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"))),(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight")))); - BA.debugLineNum = 52;BA.debugLine="setValue(getValue)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.animatedcounter.class, "_setvalue" /*RemoteObject*/ ,(Object)(__ref.runClassMethod (keymon.lat.medicomed.animatedcounter.class, "_getvalue" /*RemoteObject*/ ))); - }; - BA.debugLineNum = 54;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getvalue(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getValue (animatedcounter) ","animatedcounter",37,__ref.getField(false, "ba"),__ref,120); -if (RapidSub.canDelegate("getvalue")) { return __ref.runUserSub(false, "animatedcounter","getvalue", __ref);} -RemoteObject _res = RemoteObject.createImmutable(0); -int _i = 0; - BA.debugLineNum = 120;BA.debugLine="Public Sub getValue As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 121;BA.debugLine="Dim res As Int"; -Debug.JustUpdateDeviceLine(); -_res = RemoteObject.createImmutable(0);Debug.locals.put("res", _res); - BA.debugLineNum = 122;BA.debugLine="For i = 0 To mValue.Size - 1"; -Debug.JustUpdateDeviceLine(); -{ -final int step2 = 1; -final int limit2 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mvalue" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step2 > 0 && _i <= limit2) || (step2 < 0 && _i >= limit2) ;_i = ((int)(0 + _i + step2)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 123;BA.debugLine="res = res + mValue.Get(i) * Power(10, i)"; -Debug.JustUpdateDeviceLine(); -_res = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_res,BA.numberCast(double.class, __ref.getField(false,"_mvalue" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i)))),animatedcounter.__c.runMethod(true,"Power",(Object)(BA.numberCast(double.class, 10)),(Object)(BA.numberCast(double.class, _i)))}, "+*",1, 0));Debug.locals.put("res", _res); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 125;BA.debugLine="Return res"; -Debug.JustUpdateDeviceLine(); -if (true) return _res; - BA.debugLineNum = 126;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _callback,RemoteObject _eventname) throws Exception{ -try { - Debug.PushSubsStack("Initialize (animatedcounter) ","animatedcounter",37,__ref.getField(false, "ba"),__ref,22); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "animatedcounter","initialize", __ref, _ba, _callback, _eventname);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); -Debug.locals.put("Callback", _callback); -Debug.locals.put("EventName", _eventname); - BA.debugLineNum = 22;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 23;BA.debugLine="mEventName = EventName"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_meventname" /*RemoteObject*/ ,_eventname); - BA.debugLineNum = 24;BA.debugLine="mCallBack = Callback"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mcallback" /*RemoteObject*/ ,_callback); - BA.debugLineNum = 25;BA.debugLine="ImageViews.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_imageviews" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 26;BA.debugLine="mValue.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mvalue" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 27;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setvalue(RemoteObject __ref,RemoteObject _v) throws Exception{ -try { - Debug.PushSubsStack("setValue (animatedcounter) ","animatedcounter",37,__ref.getField(false, "ba"),__ref,109); -if (RapidSub.canDelegate("setvalue")) { return __ref.runUserSub(false, "animatedcounter","setvalue", __ref, _v);} -int _i = 0; -RemoteObject _iv = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -Debug.locals.put("v", _v); - BA.debugLineNum = 109;BA.debugLine="Public Sub setValue(v As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 110;BA.debugLine="mValue.Clear"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mvalue" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 111;BA.debugLine="For i = 0 To mdigits - 1"; -Debug.JustUpdateDeviceLine(); -{ -final int step2 = 1; -final int limit2 = RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mdigits" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step2 > 0 && _i <= limit2) || (step2 < 0 && _i >= limit2) ;_i = ((int)(0 + _i + step2)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 112;BA.debugLine="mValue.Add(v Mod 10)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mvalue" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((RemoteObject.solve(new RemoteObject[] {_v,RemoteObject.createImmutable(10)}, "%",0, 1)))); - BA.debugLineNum = 113;BA.debugLine="v = v / 10"; -Debug.JustUpdateDeviceLine(); -_v = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_v,RemoteObject.createImmutable(10)}, "/",0, 0));Debug.locals.put("v", _v); - BA.debugLineNum = 114;BA.debugLine="Dim iv As B4XView = ImageViews.Get(i)"; -Debug.JustUpdateDeviceLine(); -_iv = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_iv = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), __ref.getField(false,"_imageviews" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))));Debug.locals.put("iv", _iv);Debug.locals.put("iv", _iv); - BA.debugLineNum = 115;BA.debugLine="iv.SetLayoutAnimated(mDuration, iv.Left, TopFrom"; -Debug.JustUpdateDeviceLine(); -_iv.runVoidMethod ("SetLayoutAnimated",(Object)(__ref.getField(true,"_mduration" /*RemoteObject*/ )),(Object)(_iv.runMethod(true,"getLeft")),(Object)(__ref.runClassMethod (keymon.lat.medicomed.animatedcounter.class, "_topfromvalue" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, _i)))),(Object)(BA.numberCast(int.class, animatedcounter.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, 1)),(Object)(BA.numberCast(double.class, _iv.runMethod(true,"getWidth")))))),(Object)(BA.numberCast(int.class, animatedcounter.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, 1)),(Object)(BA.numberCast(double.class, _iv.runMethod(true,"getHeight"))))))); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 118;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _topfromvalue(RemoteObject __ref,RemoteObject _digit) throws Exception{ -try { - Debug.PushSubsStack("TopFromValue (animatedcounter) ","animatedcounter",37,__ref.getField(false, "ba"),__ref,88); -if (RapidSub.canDelegate("topfromvalue")) { return __ref.runUserSub(false, "animatedcounter","topfromvalue", __ref, _digit);} -RemoteObject _d = RemoteObject.createImmutable(0); -Debug.locals.put("Digit", _digit); - BA.debugLineNum = 88;BA.debugLine="Private Sub TopFromValue (Digit As Int) As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 89;BA.debugLine="Dim d As Int = mValue.Get(Digit)"; -Debug.JustUpdateDeviceLine(); -_d = BA.numberCast(int.class, __ref.getField(false,"_mvalue" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(_digit)));Debug.locals.put("d", _d);Debug.locals.put("d", _d); - BA.debugLineNum = 90;BA.debugLine="Return -d * DigitHeight"; -Debug.JustUpdateDeviceLine(); -if (true) return BA.numberCast(int.class, -(double) (0 + _d.get().intValue())*(double) (0 + __ref.getField(true,"_digitheight" /*RemoteObject*/ ).get().intValue())); - BA.debugLineNum = 91;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/anotherprogressbar.java b/B4A/Objects/shell/src/keymon/lat/medicomed/anotherprogressbar.java deleted file mode 100644 index acc3084..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/anotherprogressbar.java +++ /dev/null @@ -1,48 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class anotherprogressbar { - public static RemoteObject myClass; - public anotherprogressbar() { - } - public static PCBA staticBA = new PCBA(null, anotherprogressbar.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _meventname = RemoteObject.createImmutable(""); -public static RemoteObject _mcallback = RemoteObject.declareNull("Object"); -public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _busybrush = RemoteObject.declareNull("b4a.example.bcpath._bcbrush"); -public static RemoteObject _backgroundcolor = RemoteObject.createImmutable(0); -public static RemoteObject _busyindex = RemoteObject.createImmutable(0); -public static RemoteObject _bc = RemoteObject.declareNull("b4a.example.bitmapcreator"); -public static RemoteObject _miv = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _transparentbrush = RemoteObject.declareNull("b4a.example.bcpath._bcbrush"); -public static RemoteObject _vertical = RemoteObject.createImmutable(false); -public static RemoteObject _currentvalue = RemoteObject.createImmutable(0f); -public static RemoteObject _emptycolor = RemoteObject.createImmutable(0); -public static RemoteObject _emptybrush = RemoteObject.declareNull("b4a.example.bcpath._bcbrush"); -public static RemoteObject _mvalue = RemoteObject.createImmutable(0); -public static RemoteObject _tag = RemoteObject.declareNull("Object"); -public static RemoteObject _valuechangepersecond = RemoteObject.createImmutable(0f); -public static RemoteObject _cornerradius = RemoteObject.createImmutable(0); -public static RemoteObject _brushoffsetdelta = RemoteObject.createImmutable(0); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"BackgroundColor",_ref.getField(false, "_backgroundcolor"),"bc",_ref.getField(false, "_bc"),"BrushOffsetDelta",_ref.getField(false, "_brushoffsetdelta"),"BusyBrush",_ref.getField(false, "_busybrush"),"BusyIndex",_ref.getField(false, "_busyindex"),"CornerRadius",_ref.getField(false, "_cornerradius"),"CurrentValue",_ref.getField(false, "_currentvalue"),"DateUtils",_ref.getField(false, "_dateutils"),"EmptyBrush",_ref.getField(false, "_emptybrush"),"EmptyColor",_ref.getField(false, "_emptycolor"),"mBase",_ref.getField(false, "_mbase"),"mCallBack",_ref.getField(false, "_mcallback"),"mEventName",_ref.getField(false, "_meventname"),"mIV",_ref.getField(false, "_miv"),"mValue",_ref.getField(false, "_mvalue"),"Tag",_ref.getField(false, "_tag"),"TransparentBrush",_ref.getField(false, "_transparentbrush"),"ValueChangePerSecond",_ref.getField(false, "_valuechangepersecond"),"Vertical",_ref.getField(false, "_vertical"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/anotherprogressbar_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/anotherprogressbar_subs_0.java deleted file mode 100644 index c2c32c4..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/anotherprogressbar_subs_0.java +++ /dev/null @@ -1,740 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class anotherprogressbar_subs_0 { - - -public static RemoteObject _base_resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("Base_Resize (anotherprogressbar) ","anotherprogressbar",38,__ref.getField(false, "ba"),__ref,49); -if (RapidSub.canDelegate("base_resize")) { return __ref.runUserSub(false, "anotherprogressbar","base_resize", __ref, _width, _height);} -RemoteObject _v = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 49;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 50;BA.debugLine="For Each v As B4XView In mBase.GetAllViewsRecursi"; -Debug.JustUpdateDeviceLine(); -_v = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -{ -final RemoteObject group1 = __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"GetAllViewsRecursive"); -final int groupLen1 = group1.runMethod(true,"getSize").get() -;int index1 = 0; -; -for (; index1 < groupLen1;index1++){ -_v = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), group1.runMethod(false,"Get",index1));Debug.locals.put("v", _v); -Debug.locals.put("v", _v); - BA.debugLineNum = 51;BA.debugLine="v.SetLayoutAnimated(0, 0, 0, Width, Height)"; -Debug.JustUpdateDeviceLine(); -_v.runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, _width)),(Object)(BA.numberCast(int.class, _height))); - } -}Debug.locals.put("v", _v); -; - BA.debugLineNum = 53;BA.debugLine="bc.Initialize(mBase.Width / xui.Scale, mBase.Heig"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_initialize",__ref.getField(false, "ba"),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"),__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getScale")}, "/",0, 0))),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"),__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getScale")}, "/",0, 0)))); - BA.debugLineNum = 54;BA.debugLine="Vertical = mBase.Height > mBase.Width"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_vertical" /*RemoteObject*/ ,BA.ObjectToBoolean(RemoteObject.solveBoolean(">",__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"),BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"))))); - BA.debugLineNum = 55;BA.debugLine="UpdateGraphics"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.anotherprogressbar.class, "_updategraphics" /*RemoteObject*/ ); - BA.debugLineNum = 57;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _busyloop(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("BusyLoop (anotherprogressbar) ","anotherprogressbar",38,__ref.getField(false, "ba"),__ref,59); -if (RapidSub.canDelegate("busyloop")) { __ref.runUserSub(false, "anotherprogressbar","busyloop", __ref); return;} -ResumableSub_BusyLoop rsub = new ResumableSub_BusyLoop(null,__ref); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_BusyLoop extends BA.ResumableSub { -public ResumableSub_BusyLoop(keymon.lat.medicomed.anotherprogressbar parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.anotherprogressbar parent; -RemoteObject _myindex = RemoteObject.createImmutable(0); -RemoteObject _r = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XRect"); -RemoteObject _lasttime = RemoteObject.createImmutable(0L); -RemoteObject _tasks = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _delta = RemoteObject.createImmutable(0f); -RemoteObject _change = RemoteObject.createImmutable(0f); -RemoteObject _bmp = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper"); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("BusyLoop (anotherprogressbar) ","anotherprogressbar",38,__ref.getField(false, "ba"),__ref,59); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 60;BA.debugLine="Dim MyIndex As Int = BusyIndex"; -Debug.JustUpdateDeviceLine(); -_myindex = __ref.getField(true,"_busyindex" /*RemoteObject*/ );Debug.locals.put("MyIndex", _myindex);Debug.locals.put("MyIndex", _myindex); - BA.debugLineNum = 61;BA.debugLine="Dim r As B4XRect"; -Debug.JustUpdateDeviceLine(); -_r = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas.B4XRect");Debug.locals.put("r", _r); - BA.debugLineNum = 62;BA.debugLine="r.Initialize(0, 0, bc.mWidth, bc.mHeight)"; -Debug.JustUpdateDeviceLine(); -_r.runVoidMethod ("Initialize",(Object)(BA.numberCast(float.class, 0)),(Object)(BA.numberCast(float.class, 0)),(Object)(BA.numberCast(float.class, __ref.getField(false,"_bc" /*RemoteObject*/ ).getField(true,"_mwidth"))),(Object)(BA.numberCast(float.class, __ref.getField(false,"_bc" /*RemoteObject*/ ).getField(true,"_mheight")))); - BA.debugLineNum = 63;BA.debugLine="Dim LastTime As Long = DateTime.Now"; -Debug.JustUpdateDeviceLine(); -_lasttime = parent.__c.getField(false,"DateTime").runMethod(true,"getNow");Debug.locals.put("LastTime", _lasttime);Debug.locals.put("LastTime", _lasttime); - BA.debugLineNum = 64;BA.debugLine="Do While MyIndex = BusyIndex"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 1: -//do while -this.state = 37; -while (RemoteObject.solveBoolean("=",_myindex,BA.numberCast(double.class, __ref.getField(true,"_busyindex" /*RemoteObject*/ )))) { -this.state = 3; -if (true) break; -} -if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 65;BA.debugLine="If Vertical Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 4: -//if -this.state = 9; -if (__ref.getField(true,"_vertical" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 6; -}else { -this.state = 8; -}if (true) break; - -case 6: -//C -this.state = 9; - BA.debugLineNum = 66;BA.debugLine="BusyBrush.SrcOffsetY = BusyBrush.SrcOffsetY + B"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_busybrush" /*RemoteObject*/ ).setField ("SrcOffsetY",RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_busybrush" /*RemoteObject*/ ).getField(true,"SrcOffsetY"),__ref.getField(true,"_brushoffsetdelta" /*RemoteObject*/ )}, "+",1, 1)); - if (true) break; - -case 8: -//C -this.state = 9; - BA.debugLineNum = 68;BA.debugLine="BusyBrush.SrcOffsetX = BusyBrush.SrcOffsetX + B"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_busybrush" /*RemoteObject*/ ).setField ("SrcOffsetX",RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_busybrush" /*RemoteObject*/ ).getField(true,"SrcOffsetX"),__ref.getField(true,"_brushoffsetdelta" /*RemoteObject*/ )}, "+",1, 1)); - if (true) break; - -case 9: -//C -this.state = 10; -; - BA.debugLineNum = 70;BA.debugLine="Dim tasks As List"; -Debug.JustUpdateDeviceLine(); -_tasks = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");Debug.locals.put("tasks", _tasks); - BA.debugLineNum = 71;BA.debugLine="tasks.Initialize"; -Debug.JustUpdateDeviceLine(); -_tasks.runVoidMethod ("Initialize"); - BA.debugLineNum = 72;BA.debugLine="tasks.Add(bc.AsyncDrawRect(bc.TargetRect, Transp"; -Debug.JustUpdateDeviceLine(); -_tasks.runVoidMethod ("Add",(Object)((__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_asyncdrawrect",(Object)(__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(false,"_targetrect")),(Object)(__ref.getField(false,"_transparentbrush" /*RemoteObject*/ )),(Object)(parent.__c.getField(true,"True")),(Object)(BA.numberCast(int.class, 0)))))); - BA.debugLineNum = 73;BA.debugLine="Dim delta As Float = mValue - CurrentValue"; -Debug.JustUpdateDeviceLine(); -_delta = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mvalue" /*RemoteObject*/ ),__ref.getField(true,"_currentvalue" /*RemoteObject*/ )}, "-",1, 0));Debug.locals.put("delta", _delta);Debug.locals.put("delta", _delta); - BA.debugLineNum = 74;BA.debugLine="If Abs(delta) <= 1 Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 10: -//if -this.state = 21; -if (RemoteObject.solveBoolean("k",parent.__c.runMethod(true,"Abs",(Object)(BA.numberCast(double.class, _delta))),BA.numberCast(double.class, 1))) { -this.state = 12; -}else { -this.state = 14; -}if (true) break; - -case 12: -//C -this.state = 21; - BA.debugLineNum = 75;BA.debugLine="CurrentValue = mValue"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_currentvalue" /*RemoteObject*/ ,BA.numberCast(float.class, __ref.getField(true,"_mvalue" /*RemoteObject*/ ))); - if (true) break; - -case 14: -//C -this.state = 15; - BA.debugLineNum = 77;BA.debugLine="Dim change As Float = (DateTime.Now - LastTime)"; -Debug.JustUpdateDeviceLine(); -_change = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {parent.__c.getField(false,"DateTime").runMethod(true,"getNow"),_lasttime}, "-",1, 2)),RemoteObject.createImmutable(1000),__ref.getField(true,"_valuechangepersecond" /*RemoteObject*/ )}, "/*",0, 0));Debug.locals.put("change", _change);Debug.locals.put("change", _change); - BA.debugLineNum = 78;BA.debugLine="If delta > 0 Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 15: -//if -this.state = 20; -if (RemoteObject.solveBoolean(">",_delta,BA.numberCast(double.class, 0))) { -this.state = 17; -}else { -this.state = 19; -}if (true) break; - -case 17: -//C -this.state = 20; - BA.debugLineNum = 79;BA.debugLine="CurrentValue = CurrentValue + Min(change, mVal"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_currentvalue" /*RemoteObject*/ ,BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_currentvalue" /*RemoteObject*/ ),parent.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, _change)),(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mvalue" /*RemoteObject*/ ),__ref.getField(true,"_currentvalue" /*RemoteObject*/ )}, "-",1, 0)))}, "+",1, 0))); - if (true) break; - -case 19: -//C -this.state = 20; - BA.debugLineNum = 81;BA.debugLine="CurrentValue = CurrentValue - Min(change, Curr"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_currentvalue" /*RemoteObject*/ ,BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_currentvalue" /*RemoteObject*/ ),parent.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, _change)),(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_currentvalue" /*RemoteObject*/ ),__ref.getField(true,"_mvalue" /*RemoteObject*/ )}, "-",1, 0)))}, "-",1, 0))); - if (true) break; - -case 20: -//C -this.state = 21; -; - if (true) break; - -case 21: -//C -this.state = 22; -; - BA.debugLineNum = 84;BA.debugLine="LastTime = DateTime.Now"; -Debug.JustUpdateDeviceLine(); -_lasttime = parent.__c.getField(false,"DateTime").runMethod(true,"getNow");Debug.locals.put("LastTime", _lasttime); - BA.debugLineNum = 85;BA.debugLine="If CurrentValue < 100 Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 22: -//if -this.state = 25; -if (RemoteObject.solveBoolean("<",__ref.getField(true,"_currentvalue" /*RemoteObject*/ ),BA.numberCast(double.class, 100))) { -this.state = 24; -}if (true) break; - -case 24: -//C -this.state = 25; - BA.debugLineNum = 86;BA.debugLine="tasks.Add(bc.AsyncDrawRectRounded(bc.TargetRect"; -Debug.JustUpdateDeviceLine(); -_tasks.runVoidMethod ("Add",(Object)((__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_asyncdrawrectrounded",(Object)(__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(false,"_targetrect")),(Object)(__ref.getField(false,"_emptybrush" /*RemoteObject*/ )),(Object)(parent.__c.getField(true,"True")),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(true,"_cornerradius" /*RemoteObject*/ )))))); - if (true) break; -; - BA.debugLineNum = 88;BA.debugLine="If Vertical Then"; -Debug.JustUpdateDeviceLine(); - -case 25: -//if -this.state = 30; -if (__ref.getField(true,"_vertical" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 27; -}else { -this.state = 29; -}if (true) break; - -case 27: -//C -this.state = 30; - BA.debugLineNum = 89;BA.debugLine="r.Bottom = Round(CurrentValue / 100 * bc.mHeigh"; -Debug.JustUpdateDeviceLine(); -_r.runMethod(true,"setBottom",BA.numberCast(float.class, parent.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_currentvalue" /*RemoteObject*/ ),RemoteObject.createImmutable(100),__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(true,"_mheight")}, "/*",0, 0))))); - if (true) break; - -case 29: -//C -this.state = 30; - BA.debugLineNum = 91;BA.debugLine="r.Right = Round(CurrentValue / 100 * bc.mWidth)"; -Debug.JustUpdateDeviceLine(); -_r.runMethod(true,"setRight",BA.numberCast(float.class, parent.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_currentvalue" /*RemoteObject*/ ),RemoteObject.createImmutable(100),__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(true,"_mwidth")}, "/*",0, 0))))); - if (true) break; - -case 30: -//C -this.state = 31; -; - BA.debugLineNum = 94;BA.debugLine="tasks.Add(bc.AsyncDrawRectRounded(r, BusyBrush,"; -Debug.JustUpdateDeviceLine(); -_tasks.runVoidMethod ("Add",(Object)((__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_asyncdrawrectrounded",(Object)(_r),(Object)(__ref.getField(false,"_busybrush" /*RemoteObject*/ )),(Object)(parent.__c.getField(true,"True")),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(true,"_cornerradius" /*RemoteObject*/ )))))); - BA.debugLineNum = 95;BA.debugLine="bc.DrawBitmapCreatorsAsync(Me, \"BC\", tasks)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_drawbitmapcreatorsasync",(Object)(__ref),(Object)(BA.ObjectToString("BC")),(Object)(_tasks)); - BA.debugLineNum = 96;BA.debugLine="Wait For BC_BitmapReady (bmp As B4XBitmap)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("WaitFor","bc_bitmapready", __ref.getField(false, "ba"), anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "anotherprogressbar", "busyloop"), null); -this.state = 38; -return; -case 38: -//C -this.state = 31; -_bmp = (RemoteObject) result.getArrayElement(false,RemoteObject.createImmutable(1));Debug.locals.put("bmp", _bmp); -; - BA.debugLineNum = 97;BA.debugLine="If xui.IsB4J Then bmp = bc.Bitmap"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 31: -//if -this.state = 36; -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4J").get().booleanValue()) { -this.state = 33; -;}if (true) break; - -case 33: -//C -this.state = 36; -_bmp = __ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_getbitmap");Debug.locals.put("bmp", _bmp); -if (true) break; - -case 36: -//C -this.state = 1; -; - BA.debugLineNum = 98;BA.debugLine="bc.SetBitmapToImageView(bmp, mIV)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_setbitmaptoimageview",(Object)(_bmp),(Object)(__ref.getField(false,"_miv" /*RemoteObject*/ ))); - BA.debugLineNum = 99;BA.debugLine="Sleep(30)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "anotherprogressbar", "busyloop"),BA.numberCast(int.class, 30)); -this.state = 39; -return; -case 39: -//C -this.state = 1; -; - if (true) break; - -case 37: -//C -this.state = -1; -; - BA.debugLineNum = 101;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static void _bc_bitmapready(RemoteObject __ref,RemoteObject _bmp) throws Exception{ -} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 4;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 5;BA.debugLine="Private mEventName As String 'ignore"; -anotherprogressbar._meventname = RemoteObject.createImmutable("");__ref.setField("_meventname",anotherprogressbar._meventname); - //BA.debugLineNum = 6;BA.debugLine="Private mCallBack As Object 'ignore"; -anotherprogressbar._mcallback = RemoteObject.createNew ("Object");__ref.setField("_mcallback",anotherprogressbar._mcallback); - //BA.debugLineNum = 7;BA.debugLine="Public mBase As B4XView 'ignore"; -anotherprogressbar._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",anotherprogressbar._mbase); - //BA.debugLineNum = 8;BA.debugLine="Private xui As XUI 'ignore"; -anotherprogressbar._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",anotherprogressbar._xui); - //BA.debugLineNum = 9;BA.debugLine="Private BusyBrush As BCBrush"; -anotherprogressbar._busybrush = RemoteObject.createNew ("b4a.example.bcpath._bcbrush");__ref.setField("_busybrush",anotherprogressbar._busybrush); - //BA.debugLineNum = 10;BA.debugLine="Private BackgroundColor As Int"; -anotherprogressbar._backgroundcolor = RemoteObject.createImmutable(0);__ref.setField("_backgroundcolor",anotherprogressbar._backgroundcolor); - //BA.debugLineNum = 11;BA.debugLine="Private BusyIndex As Int"; -anotherprogressbar._busyindex = RemoteObject.createImmutable(0);__ref.setField("_busyindex",anotherprogressbar._busyindex); - //BA.debugLineNum = 12;BA.debugLine="Private bc As BitmapCreator"; -anotherprogressbar._bc = RemoteObject.createNew ("b4a.example.bitmapcreator");__ref.setField("_bc",anotherprogressbar._bc); - //BA.debugLineNum = 13;BA.debugLine="Private mIV As B4XView"; -anotherprogressbar._miv = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_miv",anotherprogressbar._miv); - //BA.debugLineNum = 14;BA.debugLine="Private TransparentBrush As BCBrush"; -anotherprogressbar._transparentbrush = RemoteObject.createNew ("b4a.example.bcpath._bcbrush");__ref.setField("_transparentbrush",anotherprogressbar._transparentbrush); - //BA.debugLineNum = 15;BA.debugLine="Private Vertical As Boolean"; -anotherprogressbar._vertical = RemoteObject.createImmutable(false);__ref.setField("_vertical",anotherprogressbar._vertical); - //BA.debugLineNum = 16;BA.debugLine="Private CurrentValue As Float"; -anotherprogressbar._currentvalue = RemoteObject.createImmutable(0f);__ref.setField("_currentvalue",anotherprogressbar._currentvalue); - //BA.debugLineNum = 17;BA.debugLine="Public EmptyColor As Int = xui.Color_White"; -anotherprogressbar._emptycolor = __ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_White");__ref.setField("_emptycolor",anotherprogressbar._emptycolor); - //BA.debugLineNum = 18;BA.debugLine="Private EmptyBrush As BCBrush"; -anotherprogressbar._emptybrush = RemoteObject.createNew ("b4a.example.bcpath._bcbrush");__ref.setField("_emptybrush",anotherprogressbar._emptybrush); - //BA.debugLineNum = 19;BA.debugLine="Private mValue As Int"; -anotherprogressbar._mvalue = RemoteObject.createImmutable(0);__ref.setField("_mvalue",anotherprogressbar._mvalue); - //BA.debugLineNum = 20;BA.debugLine="Public Tag As Object"; -anotherprogressbar._tag = RemoteObject.createNew ("Object");__ref.setField("_tag",anotherprogressbar._tag); - //BA.debugLineNum = 21;BA.debugLine="Public ValueChangePerSecond As Float = 60"; -anotherprogressbar._valuechangepersecond = BA.numberCast(float.class, 60);__ref.setField("_valuechangepersecond",anotherprogressbar._valuechangepersecond); - //BA.debugLineNum = 22;BA.debugLine="Public CornerRadius As Int"; -anotherprogressbar._cornerradius = RemoteObject.createImmutable(0);__ref.setField("_cornerradius",anotherprogressbar._cornerradius); - //BA.debugLineNum = 23;BA.debugLine="Public BrushOffsetDelta As Int = 3"; -anotherprogressbar._brushoffsetdelta = BA.numberCast(int.class, 3);__ref.setField("_brushoffsetdelta",anotherprogressbar._brushoffsetdelta); - //BA.debugLineNum = 24;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _designercreateview(RemoteObject __ref,RemoteObject _base,RemoteObject _lbl,RemoteObject _props) throws Exception{ -try { - Debug.PushSubsStack("DesignerCreateView (anotherprogressbar) ","anotherprogressbar",38,__ref.getField(false, "ba"),__ref,32); -if (RapidSub.canDelegate("designercreateview")) { return __ref.runUserSub(false, "anotherprogressbar","designercreateview", __ref, _base, _lbl, _props);} -RemoteObject _iv = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -Debug.locals.put("Base", _base); -Debug.locals.put("lbl", _lbl); -Debug.locals.put("Props", _props); - BA.debugLineNum = 32;BA.debugLine="Public Sub DesignerCreateView (Base As Object, lbl"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 33;BA.debugLine="mBase = Base"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).setObject (_base); - BA.debugLineNum = 34;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_tag" /*RemoteObject*/ ,__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"getTag")); - BA.debugLineNum = 34;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"setTag",__ref); - BA.debugLineNum = 35;BA.debugLine="Dim iv As ImageView"; -Debug.JustUpdateDeviceLine(); -_iv = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");Debug.locals.put("iv", _iv); - BA.debugLineNum = 36;BA.debugLine="iv.Initialize(\"\")"; -Debug.JustUpdateDeviceLine(); -_iv.runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable(""))); - BA.debugLineNum = 37;BA.debugLine="mIV = iv"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_miv" /*RemoteObject*/ ).setObject (_iv.getObject()); - BA.debugLineNum = 38;BA.debugLine="mIV.Color = xui.Color_Transparent"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_miv" /*RemoteObject*/ ).runMethod(true,"setColor",__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")); - BA.debugLineNum = 39;BA.debugLine="setValue(Props.GetDefault(\"Value\", 100))"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.anotherprogressbar.class, "_setvalue" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, _props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("Value"))),(Object)(RemoteObject.createImmutable((100))))))); - BA.debugLineNum = 40;BA.debugLine="CurrentValue = mValue"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_currentvalue" /*RemoteObject*/ ,BA.numberCast(float.class, __ref.getField(true,"_mvalue" /*RemoteObject*/ ))); - BA.debugLineNum = 41;BA.debugLine="mBase.AddView(mIV, 0, 0, 0, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_miv" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 42;BA.debugLine="mBase.AddView(lbl, 0, 0, mBase.Width, mBase.Heigh"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((_lbl.getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"))); - BA.debugLineNum = 43;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetColorAndBorder",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 44;BA.debugLine="BackgroundColor = xui.PaintOrColorToColor(Props.G"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_backgroundcolor" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("ProgressColor"))))))); - BA.debugLineNum = 45;BA.debugLine="CornerRadius = Props.GetDefault(\"CornerRadius\", 1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_cornerradius" /*RemoteObject*/ ,BA.numberCast(int.class, _props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("CornerRadius"))),(Object)(RemoteObject.createImmutable((15)))))); - BA.debugLineNum = 46;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.anotherprogressbar.class, "_base_resize" /*RemoteObject*/ ,(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"))),(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight")))); - BA.debugLineNum = 47;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getprogresscolor(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getProgressColor (anotherprogressbar) ","anotherprogressbar",38,__ref.getField(false, "ba"),__ref,103); -if (RapidSub.canDelegate("getprogresscolor")) { return __ref.runUserSub(false, "anotherprogressbar","getprogresscolor", __ref);} - BA.debugLineNum = 103;BA.debugLine="Public Sub getProgressColor As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 104;BA.debugLine="Return BackgroundColor"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_backgroundcolor" /*RemoteObject*/ ); - BA.debugLineNum = 105;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getvalue(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getValue (anotherprogressbar) ","anotherprogressbar",38,__ref.getField(false, "ba"),__ref,157); -if (RapidSub.canDelegate("getvalue")) { return __ref.runUserSub(false, "anotherprogressbar","getvalue", __ref);} - BA.debugLineNum = 157;BA.debugLine="Public Sub getValue As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 158;BA.debugLine="Return mValue"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_mvalue" /*RemoteObject*/ ); - BA.debugLineNum = 159;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getvisible(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getVisible (anotherprogressbar) ","anotherprogressbar",38,__ref.getField(false, "ba"),__ref,153); -if (RapidSub.canDelegate("getvisible")) { return __ref.runUserSub(false, "anotherprogressbar","getvisible", __ref);} - BA.debugLineNum = 153;BA.debugLine="Public Sub getVisible As Boolean"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 154;BA.debugLine="Return mBase.Visible"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getVisible"); - BA.debugLineNum = 155;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _callback,RemoteObject _eventname) throws Exception{ -try { - Debug.PushSubsStack("Initialize (anotherprogressbar) ","anotherprogressbar",38,__ref.getField(false, "ba"),__ref,26); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "anotherprogressbar","initialize", __ref, _ba, _callback, _eventname);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); -Debug.locals.put("Callback", _callback); -Debug.locals.put("EventName", _eventname); - BA.debugLineNum = 26;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 27;BA.debugLine="mEventName = EventName"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_meventname" /*RemoteObject*/ ,_eventname); - BA.debugLineNum = 28;BA.debugLine="mCallBack = Callback"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mcallback" /*RemoteObject*/ ,_callback); - BA.debugLineNum = 29;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setprogresscolor(RemoteObject __ref,RemoteObject _c) throws Exception{ -try { - Debug.PushSubsStack("setProgressColor (anotherprogressbar) ","anotherprogressbar",38,__ref.getField(false, "ba"),__ref,107); -if (RapidSub.canDelegate("setprogresscolor")) { return __ref.runUserSub(false, "anotherprogressbar","setprogresscolor", __ref, _c);} -Debug.locals.put("c", _c); - BA.debugLineNum = 107;BA.debugLine="Public Sub setProgressColor (c As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 108;BA.debugLine="BackgroundColor = c"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_backgroundcolor" /*RemoteObject*/ ,_c); - BA.debugLineNum = 109;BA.debugLine="UpdateGraphics"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.anotherprogressbar.class, "_updategraphics" /*RemoteObject*/ ); - BA.debugLineNum = 110;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setvalue(RemoteObject __ref,RemoteObject _v) throws Exception{ -try { - Debug.PushSubsStack("setValue (anotherprogressbar) ","anotherprogressbar",38,__ref.getField(false, "ba"),__ref,161); -if (RapidSub.canDelegate("setvalue")) { return __ref.runUserSub(false, "anotherprogressbar","setvalue", __ref, _v);} -Debug.locals.put("v", _v); - BA.debugLineNum = 161;BA.debugLine="Public Sub setValue (v As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 162;BA.debugLine="mValue = Max(0, Min(100, v))"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mvalue" /*RemoteObject*/ ,BA.numberCast(int.class, anotherprogressbar.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, 0)),(Object)(anotherprogressbar.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, 100)),(Object)(BA.numberCast(double.class, _v))))))); - BA.debugLineNum = 163;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setvaluenoanimation(RemoteObject __ref,RemoteObject _v) throws Exception{ -try { - Debug.PushSubsStack("SetValueNoAnimation (anotherprogressbar) ","anotherprogressbar",38,__ref.getField(false, "ba"),__ref,165); -if (RapidSub.canDelegate("setvaluenoanimation")) { return __ref.runUserSub(false, "anotherprogressbar","setvaluenoanimation", __ref, _v);} -Debug.locals.put("v", _v); - BA.debugLineNum = 165;BA.debugLine="Public Sub SetValueNoAnimation (v As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 166;BA.debugLine="setValue(v)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.anotherprogressbar.class, "_setvalue" /*RemoteObject*/ ,(Object)(_v)); - BA.debugLineNum = 167;BA.debugLine="CurrentValue = mValue"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_currentvalue" /*RemoteObject*/ ,BA.numberCast(float.class, __ref.getField(true,"_mvalue" /*RemoteObject*/ ))); - BA.debugLineNum = 168;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setvisible(RemoteObject __ref,RemoteObject _b) throws Exception{ -try { - Debug.PushSubsStack("setVisible (anotherprogressbar) ","anotherprogressbar",38,__ref.getField(false, "ba"),__ref,145); -if (RapidSub.canDelegate("setvisible")) { return __ref.runUserSub(false, "anotherprogressbar","setvisible", __ref, _b);} -Debug.locals.put("b", _b); - BA.debugLineNum = 145;BA.debugLine="Public Sub setVisible(b As Boolean)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 146;BA.debugLine="BusyIndex = BusyIndex + 1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_busyindex" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_busyindex" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "+",1, 1)); - BA.debugLineNum = 147;BA.debugLine="If b Then"; -Debug.JustUpdateDeviceLine(); -if (_b.get().booleanValue()) { - BA.debugLineNum = 148;BA.debugLine="BusyLoop"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.anotherprogressbar.class, "_busyloop" /*void*/ ); - }; - BA.debugLineNum = 150;BA.debugLine="mBase.Visible = b"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"setVisible",_b); - BA.debugLineNum = 151;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _updategraphics(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("UpdateGraphics (anotherprogressbar) ","anotherprogressbar",38,__ref.getField(false, "ba"),__ref,112); -if (RapidSub.canDelegate("updategraphics")) { return __ref.runUserSub(false, "anotherprogressbar","updategraphics", __ref);} -RemoteObject _width = RemoteObject.createImmutable(0); -RemoteObject _template = RemoteObject.declareNull("b4a.example.bitmapcreator"); -RemoteObject _bcolor = RemoteObject.declareNull("b4a.example.bitmapcreator._argbcolor"); - BA.debugLineNum = 112;BA.debugLine="Public Sub UpdateGraphics"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 113;BA.debugLine="EmptyBrush = bc.CreateBrushFromColor(EmptyColor)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_emptybrush" /*RemoteObject*/ ,__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_createbrushfromcolor",(Object)(__ref.getField(true,"_emptycolor" /*RemoteObject*/ )))); - BA.debugLineNum = 114;BA.debugLine="TransparentBrush = bc.CreateBrushFromColor(xui.Co"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_transparentbrush" /*RemoteObject*/ ,__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_createbrushfromcolor",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")))); - BA.debugLineNum = 115;BA.debugLine="Dim Width As Int = 40"; -Debug.JustUpdateDeviceLine(); -_width = BA.numberCast(int.class, 40);Debug.locals.put("Width", _width);Debug.locals.put("Width", _width); - BA.debugLineNum = 116;BA.debugLine="Dim Template As BitmapCreator"; -Debug.JustUpdateDeviceLine(); -_template = RemoteObject.createNew ("b4a.example.bitmapcreator");Debug.locals.put("Template", _template); - BA.debugLineNum = 117;BA.debugLine="Dim bcolor As ARGBColor"; -Debug.JustUpdateDeviceLine(); -_bcolor = RemoteObject.createNew ("b4a.example.bitmapcreator._argbcolor");Debug.locals.put("bcolor", _bcolor); - BA.debugLineNum = 118;BA.debugLine="bc.ColorToARGB(BackgroundColor, bcolor)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_colortoargb",(Object)(__ref.getField(true,"_backgroundcolor" /*RemoteObject*/ )),(Object)(_bcolor)); - BA.debugLineNum = 119;BA.debugLine="bcolor.r = Min(255, bcolor.r * 1.5)"; -Debug.JustUpdateDeviceLine(); -_bcolor.setField ("r",BA.numberCast(int.class, anotherprogressbar.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, 255)),(Object)(RemoteObject.solve(new RemoteObject[] {_bcolor.getField(true,"r"),RemoteObject.createImmutable(1.5)}, "*",0, 0))))); - BA.debugLineNum = 120;BA.debugLine="bcolor.g = Min(255, bcolor.g * 1.5)"; -Debug.JustUpdateDeviceLine(); -_bcolor.setField ("g",BA.numberCast(int.class, anotherprogressbar.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, 255)),(Object)(RemoteObject.solve(new RemoteObject[] {_bcolor.getField(true,"g"),RemoteObject.createImmutable(1.5)}, "*",0, 0))))); - BA.debugLineNum = 121;BA.debugLine="bcolor.b = Min(255, bcolor.b * 1.5)"; -Debug.JustUpdateDeviceLine(); -_bcolor.setField ("b",BA.numberCast(int.class, anotherprogressbar.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, 255)),(Object)(RemoteObject.solve(new RemoteObject[] {_bcolor.getField(true,"b"),RemoteObject.createImmutable(1.5)}, "*",0, 0))))); - BA.debugLineNum = 122;BA.debugLine="If Vertical Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_vertical" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 123;BA.debugLine="Template.Initialize(mBase.Width / xui.Scale, mBa"; -Debug.JustUpdateDeviceLine(); -_template.runVoidMethod ("_initialize",__ref.getField(false, "ba"),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"),__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getScale")}, "/",0, 0))),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"),__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getScale"),_width}, "/+",1, 0)))); - }else { - BA.debugLineNum = 125;BA.debugLine="Template.Initialize(mBase.Height / xui.Scale + W"; -Debug.JustUpdateDeviceLine(); -_template.runVoidMethod ("_initialize",__ref.getField(false, "ba"),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"),__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getScale"),_width}, "/+",1, 0))),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"),__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getScale")}, "/",0, 0)))); - }; - BA.debugLineNum = 128;BA.debugLine="Template.DrawRect(Template.TargetRect, Background"; -Debug.JustUpdateDeviceLine(); -_template.runVoidMethod ("_drawrect",(Object)(_template.getField(false,"_targetrect")),(Object)(__ref.getField(true,"_backgroundcolor" /*RemoteObject*/ )),(Object)(anotherprogressbar.__c.getField(true,"True")),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 129;BA.debugLine="If Vertical Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_vertical" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 130;BA.debugLine="Template.DrawLine(-Width / 2, Width / 2, Templat"; -Debug.JustUpdateDeviceLine(); -_template.runVoidMethod ("_drawline",(Object)(BA.numberCast(float.class, -(double) (0 + _width.get().intValue())/(double)(double) (0 + 2))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_width,RemoteObject.createImmutable(2)}, "/",0, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_template.getField(true,"_mwidth"),_width,RemoteObject.createImmutable(2)}, "+/",1, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_template.getField(true,"_mheight"),_width,RemoteObject.createImmutable(2)}, "-/",1, 0))),(Object)(__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(true,"_argbtocolor",(Object)(_bcolor))),(Object)(_width)); - }else { - BA.debugLineNum = 132;BA.debugLine="Template.DrawLine(Width / 2, -Width / 2, Templat"; -Debug.JustUpdateDeviceLine(); -_template.runVoidMethod ("_drawline",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_width,RemoteObject.createImmutable(2)}, "/",0, 0))),(Object)(BA.numberCast(float.class, -(double) (0 + _width.get().intValue())/(double)(double) (0 + 2))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_template.getField(true,"_mwidth"),_width,RemoteObject.createImmutable(2)}, "-/",1, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_template.getField(true,"_mheight"),_width,RemoteObject.createImmutable(2)}, "+/",1, 0))),(Object)(__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(true,"_argbtocolor",(Object)(_bcolor))),(Object)(_width)); - }; - BA.debugLineNum = 134;BA.debugLine="BusyBrush = bc.CreateBrushFromBitmapCreator(Templ"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_busybrush" /*RemoteObject*/ ,__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_createbrushfrombitmapcreator",(Object)(_template))); - BA.debugLineNum = 135;BA.debugLine="If mValue = 100 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_mvalue" /*RemoteObject*/ ),BA.numberCast(double.class, 100))) { - BA.debugLineNum = 136;BA.debugLine="bc.DrawRectRounded(bc.TargetRect, BackgroundColo"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_drawrectrounded",(Object)(__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(false,"_targetrect")),(Object)(__ref.getField(true,"_backgroundcolor" /*RemoteObject*/ )),(Object)(anotherprogressbar.__c.getField(true,"True")),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 15))); - }else { - BA.debugLineNum = 138;BA.debugLine="bc.DrawRectRounded2(bc.TargetRect, EmptyBrush, T"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_drawrectrounded2",(Object)(__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(false,"_targetrect")),(Object)(__ref.getField(false,"_emptybrush" /*RemoteObject*/ )),(Object)(anotherprogressbar.__c.getField(true,"True")),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 15))); - }; - BA.debugLineNum = 140;BA.debugLine="bc.SetBitmapToImageView(bc.Bitmap, mIV)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_setbitmaptoimageview",(Object)(__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_getbitmap")),(Object)(__ref.getField(false,"_miv" /*RemoteObject*/ ))); - BA.debugLineNum = 141;BA.debugLine="setVisible(mBase.Visible)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.anotherprogressbar.class, "_setvisible" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getVisible"))); - BA.debugLineNum = 142;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/appupdater.java b/B4A/Objects/shell/src/keymon/lat/medicomed/appupdater.java deleted file mode 100644 index a1ddbca..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/appupdater.java +++ /dev/null @@ -1,73 +0,0 @@ - -package keymon.lat.medicomed; - -import java.io.IOException; -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RDebug; -import anywheresoftware.b4a.pc.RemoteObject; -import anywheresoftware.b4a.pc.RDebug.IRemote; -import anywheresoftware.b4a.pc.Debug; -import anywheresoftware.b4a.pc.B4XTypes.B4XClass; -import anywheresoftware.b4a.pc.B4XTypes.DeviceClass; - -public class appupdater implements IRemote{ - public static appupdater mostCurrent; - public static RemoteObject processBA; - public static boolean processGlobalsRun; - public static RemoteObject myClass; - public static RemoteObject remoteMe; - public appupdater() { - mostCurrent = this; - } - public RemoteObject getRemoteMe() { - return remoteMe; - } - -public boolean isSingleton() { - return true; - } - static { - anywheresoftware.b4a.pc.RapidSub.moduleToObject.put(new B4XClass("appupdater"), "keymon.lat.medicomed.appupdater"); - } - public static RemoteObject getObject() { - return myClass; - } - public RemoteObject _service; - private PCBA pcBA; - - public PCBA create(Object[] args) throws ClassNotFoundException{ - processBA = (RemoteObject) args[1]; - _service = (RemoteObject) args[2]; - remoteMe = RemoteObject.declareNull("keymon.lat.medicomed.appupdater"); - anywheresoftware.b4a.keywords.Common.Density = (Float)args[3]; - pcBA = new PCBA(this, appupdater.class); - main_subs_0.initializeProcessGlobals(); - return pcBA; - } -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _lnk = RemoteObject.createImmutable(""); -public static RemoteObject _nnewapp = RemoteObject.declareNull("anywheresoftware.b4a.objects.NotificationWrapper"); -public static RemoteObject _nnewappnid = RemoteObject.createImmutable(0); -public static RemoteObject _nativeme = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -public static RemoteObject _n2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.NotificationWrapper"); -public static RemoteObject _n2id = RemoteObject.createImmutable(0); -public static RemoteObject _sharedfolder = RemoteObject.createImmutable(""); -public static RemoteObject _usefileprovider = RemoteObject.createImmutable(false); -public static RemoteObject _rp = RemoteObject.declareNull("anywheresoftware.b4a.objects.RuntimePermissions"); -public static RemoteObject _newapp = RemoteObject.declareNull("keymon.lat.medicomed.appupdater._mnewversion"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; - public Object[] GetGlobals() { - return new Object[] {"B4XCollections",Debug.moduleToString(keymon.lat.medicomed.b4xcollections.class),"B4XPages",Debug.moduleToString(keymon.lat.medicomed.b4xpages.class),"DateUtils",appupdater.mostCurrent._dateutils,"HttpUtils2Service",Debug.moduleToString(keymon.lat.medicomed.httputils2service.class),"lnk",appupdater._lnk,"Main",Debug.moduleToString(keymon.lat.medicomed.main.class),"MAPA_RUTAS",Debug.moduleToString(keymon.lat.medicomed.mapa_rutas.class),"n2",appupdater._n2,"n2ID",appupdater._n2id,"nativeMe",appupdater._nativeme,"newApp",appupdater._newapp,"newinst2",Debug.moduleToString(keymon.lat.medicomed.newinst2.class),"nNewApp",appupdater._nnewapp,"nNewAppnID",appupdater._nnewappnid,"rp",appupdater._rp,"Service",appupdater.mostCurrent._service,"SharedFolder",appupdater._sharedfolder,"Starter",Debug.moduleToString(keymon.lat.medicomed.starter.class),"Subs",Debug.moduleToString(keymon.lat.medicomed.subs.class),"Tracker",Debug.moduleToString(keymon.lat.medicomed.tracker.class),"UseFileProvider",appupdater._usefileprovider,"XUIViewsUtils",Debug.moduleToString(keymon.lat.medicomed.xuiviewsutils.class)}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/appupdater_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/appupdater_subs_0.java deleted file mode 100644 index 82ac3b3..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/appupdater_subs_0.java +++ /dev/null @@ -1,799 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class appupdater_subs_0 { - - -public static RemoteObject _createnotification(RemoteObject _title,RemoteObject _content,RemoteObject _icon,RemoteObject _targetactivity,RemoteObject _sound,RemoteObject _vibrate) throws Exception{ -try { - Debug.PushSubsStack("CreateNotification (appupdater) ","appupdater",12,appupdater.processBA,appupdater.mostCurrent,220); -if (RapidSub.canDelegate("createnotification")) { return keymon.lat.medicomed.appupdater.remoteMe.runUserSub(false, "appupdater","createnotification", _title, _content, _icon, _targetactivity, _sound, _vibrate);} -Debug.locals.put("Title", _title); -Debug.locals.put("Content", _content); -Debug.locals.put("Icon", _icon); -Debug.locals.put("TargetActivity", _targetactivity); -Debug.locals.put("Sound", _sound); -Debug.locals.put("Vibrate", _vibrate); - BA.debugLineNum = 220;BA.debugLine="Private Sub CreateNotification(Title As String, Co"; -Debug.ShouldStop(134217728); - BA.debugLineNum = 221;BA.debugLine="n2.Initialize"; -Debug.ShouldStop(268435456); -appupdater._n2.runVoidMethod ("Initialize"); - BA.debugLineNum = 222;BA.debugLine="n2.Light = False"; -Debug.ShouldStop(536870912); -appupdater._n2.runVoidMethod ("setLight",appupdater.mostCurrent.__c.getField(true,"False")); - BA.debugLineNum = 223;BA.debugLine="n2.Vibrate = Vibrate"; -Debug.ShouldStop(1073741824); -appupdater._n2.runVoidMethod ("setVibrate",_vibrate); - BA.debugLineNum = 224;BA.debugLine="n2.Sound = Sound"; -Debug.ShouldStop(-2147483648); -appupdater._n2.runVoidMethod ("setSound",_sound); - BA.debugLineNum = 225;BA.debugLine="n2.OnGoingEvent = True"; -Debug.ShouldStop(1); -appupdater._n2.runVoidMethod ("setOnGoingEvent",appupdater.mostCurrent.__c.getField(true,"True")); - BA.debugLineNum = 226;BA.debugLine="n2.Icon = Icon"; -Debug.ShouldStop(2); -appupdater._n2.runVoidMethod ("setIcon",_icon); - BA.debugLineNum = 227;BA.debugLine="n2.SetInfo(Title, Content, TargetActivity)"; -Debug.ShouldStop(4); -appupdater._n2.runVoidMethod ("SetInfoNew",appupdater.processBA,(Object)(BA.ObjectToCharSequence(_title)),(Object)(BA.ObjectToCharSequence(_content)),(Object)(_targetactivity)); - BA.debugLineNum = 228;BA.debugLine="n2.Notify(nNewAppnID)"; -Debug.ShouldStop(8); -appupdater._n2.runVoidMethod ("Notify",(Object)(appupdater._nnewappnid)); - BA.debugLineNum = 229;BA.debugLine="End Sub"; -Debug.ShouldStop(16); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createnotification2(RemoteObject _title,RemoteObject _content,RemoteObject _icon,RemoteObject _targetactivity,RemoteObject _sound,RemoteObject _vibrate,RemoteObject _pn,RemoteObject _pnid) throws Exception{ -try { - Debug.PushSubsStack("CreateNotification2 (appupdater) ","appupdater",12,appupdater.processBA,appupdater.mostCurrent,204); -if (RapidSub.canDelegate("createnotification2")) { return keymon.lat.medicomed.appupdater.remoteMe.runUserSub(false, "appupdater","createnotification2", _title, _content, _icon, _targetactivity, _sound, _vibrate, _pn, _pnid);} -Debug.locals.put("Title", _title); -Debug.locals.put("Content", _content); -Debug.locals.put("Icon", _icon); -Debug.locals.put("TargetActivity", _targetactivity); -Debug.locals.put("Sound", _sound); -Debug.locals.put("Vibrate", _vibrate); -Debug.locals.put("pN", _pn); -Debug.locals.put("pNID", _pnid); - BA.debugLineNum = 204;BA.debugLine="Private Sub CreateNotification2(Title As String, C"; -Debug.ShouldStop(2048); - BA.debugLineNum = 207;BA.debugLine="pN.Initialize2(pN.IMPORTANCE_HIGH)"; -Debug.ShouldStop(16384); -_pn.runVoidMethod ("Initialize2",(Object)(_pn.getField(true,"IMPORTANCE_HIGH"))); - BA.debugLineNum = 210;BA.debugLine="pN.Vibrate = Vibrate"; -Debug.ShouldStop(131072); -_pn.runVoidMethod ("setVibrate",_vibrate); - BA.debugLineNum = 211;BA.debugLine="pN.Sound = Sound"; -Debug.ShouldStop(262144); -_pn.runVoidMethod ("setSound",_sound); - BA.debugLineNum = 213;BA.debugLine="pN.Icon = Icon"; -Debug.ShouldStop(1048576); -_pn.runVoidMethod ("setIcon",_icon); - BA.debugLineNum = 214;BA.debugLine="pN.AutoCancel = True"; -Debug.ShouldStop(2097152); -_pn.runVoidMethod ("setAutoCancel",appupdater.mostCurrent.__c.getField(true,"True")); - BA.debugLineNum = 215;BA.debugLine="pN.SetInfo(Title, Content, TargetActivity)"; -Debug.ShouldStop(4194304); -_pn.runVoidMethod ("SetInfoNew",appupdater.processBA,(Object)(BA.ObjectToCharSequence(_title)),(Object)(BA.ObjectToCharSequence(_content)),(Object)(_targetactivity)); - BA.debugLineNum = 216;BA.debugLine="pN.Notify(pNID)"; -Debug.ShouldStop(8388608); -_pn.runVoidMethod ("Notify",(Object)(_pnid)); - BA.debugLineNum = 217;BA.debugLine="Return pN"; -Debug.ShouldStop(16777216); -if (true) return _pn; - BA.debugLineNum = 218;BA.debugLine="End Sub"; -Debug.ShouldStop(33554432); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _download(RemoteObject _callback,RemoteObject _link) throws Exception{ -try { - Debug.PushSubsStack("Download (appupdater) ","appupdater",12,appupdater.processBA,appupdater.mostCurrent,197); -if (RapidSub.canDelegate("download")) { return keymon.lat.medicomed.appupdater.remoteMe.runUserSub(false, "appupdater","download", _callback, _link);} -RemoteObject _j = RemoteObject.declareNull("keymon.lat.medicomed.httpjob"); -Debug.locals.put("Callback", _callback); -Debug.locals.put("link", _link); - BA.debugLineNum = 197;BA.debugLine="Sub Download (Callback As Object, link As String)"; -Debug.ShouldStop(16); - BA.debugLineNum = 198;BA.debugLine="Dim j As HttpJob"; -Debug.ShouldStop(32); -_j = RemoteObject.createNew ("keymon.lat.medicomed.httpjob");Debug.locals.put("j", _j); - BA.debugLineNum = 199;BA.debugLine="j.Initialize(\"\", Callback)"; -Debug.ShouldStop(64); -_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_initialize" /*RemoteObject*/ ,appupdater.processBA,(Object)(BA.ObjectToString("")),(Object)(_callback)); - BA.debugLineNum = 200;BA.debugLine="j.Download(link)"; -Debug.ShouldStop(128); -_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_download" /*RemoteObject*/ ,(Object)(_link)); - BA.debugLineNum = 201;BA.debugLine="Return j"; -Debug.ShouldStop(256); -if (true) return _j; - BA.debugLineNum = 202;BA.debugLine="End Sub"; -Debug.ShouldStop(512); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _download_destroy() throws Exception{ -try { - Debug.PushSubsStack("download_Destroy (appupdater) ","appupdater",12,appupdater.processBA,appupdater.mostCurrent,192); -if (RapidSub.canDelegate("download_destroy")) { return keymon.lat.medicomed.appupdater.remoteMe.runUserSub(false, "appupdater","download_destroy");} - BA.debugLineNum = 192;BA.debugLine="Sub download_Destroy"; -Debug.ShouldStop(-2147483648); - BA.debugLineNum = 193;BA.debugLine="n2.Cancel(n2ID)"; -Debug.ShouldStop(1); -appupdater._n2.runVoidMethod ("Cancel",(Object)(appupdater._n2id)); - BA.debugLineNum = 194;BA.debugLine="Service.StopForeground(n2ID)"; -Debug.ShouldStop(2); -appupdater.mostCurrent._service.runVoidMethod ("StopForeground",(Object)(appupdater._n2id)); - BA.debugLineNum = 195;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _download_newapk() throws Exception{ -try { - Debug.PushSubsStack("download_newApk (appupdater) ","appupdater",12,appupdater.processBA,appupdater.mostCurrent,156); -if (RapidSub.canDelegate("download_newapk")) { keymon.lat.medicomed.appupdater.remoteMe.runUserSub(false, "appupdater","download_newapk"); return;} -ResumableSub_download_newApk rsub = new ResumableSub_download_newApk(null); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_download_newApk extends BA.ResumableSub { -public ResumableSub_download_newApk(keymon.lat.medicomed.appupdater parent) { -this.parent = parent; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -keymon.lat.medicomed.appupdater parent; -RemoteObject _job_newapp = RemoteObject.declareNull("keymon.lat.medicomed.httpjob"); -RemoteObject _outnewapk = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -RemoteObject _in = RemoteObject.declareNull("anywheresoftware.b4a.objects.IntentWrapper"); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("download_newApk (appupdater) ","appupdater",12,appupdater.processBA,appupdater.mostCurrent,156); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; - BA.debugLineNum = 159;BA.debugLine="Log(\"Descargando actualización\")"; -Debug.ShouldStop(1073741824); -parent.mostCurrent.__c.runVoidMethod ("LogImpl","319529731",RemoteObject.createImmutable("Descargando actualización"),0); - BA.debugLineNum = 160;BA.debugLine="B4XPages.ShowPage(\"login\")"; -Debug.ShouldStop(-2147483648); -parent.mostCurrent._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,appupdater.processBA,(Object)(RemoteObject.createImmutable("login"))); - BA.debugLineNum = 161;BA.debugLine="Starter.muestraProgreso = 1"; -Debug.ShouldStop(1); -parent.mostCurrent._starter._muestraprogreso /*RemoteObject*/ = BA.NumberToString(1); - BA.debugLineNum = 162;BA.debugLine="Dim job_newAPP As HttpJob"; -Debug.ShouldStop(2); -_job_newapp = RemoteObject.createNew ("keymon.lat.medicomed.httpjob");Debug.locals.put("job_newAPP", _job_newapp); - BA.debugLineNum = 163;BA.debugLine="job_newAPP.Initialize(\"job_newAPP\",Me)"; -Debug.ShouldStop(4); -_job_newapp.runClassMethod (keymon.lat.medicomed.httpjob.class, "_initialize" /*RemoteObject*/ ,appupdater.processBA,(Object)(BA.ObjectToString("job_newAPP")),(Object)(appupdater.getObject())); - BA.debugLineNum = 164;BA.debugLine="job_newAPP.Download(newApp.appLink)"; -Debug.ShouldStop(8); -_job_newapp.runClassMethod (keymon.lat.medicomed.httpjob.class, "_download" /*RemoteObject*/ ,(Object)(parent._newapp.getField(true,"appLink" /*RemoteObject*/ ))); - BA.debugLineNum = 165;BA.debugLine="Wait for (job_newAPP) JobDone (job_newAPP As Http"; -Debug.ShouldStop(16); -parent.mostCurrent.__c.runVoidMethod ("WaitFor","jobdone", appupdater.processBA, anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "appupdater", "download_newapk"), (_job_newapp)); -this.state = 15; -return; -case 15: -//C -this.state = 1; -_job_newapp = (RemoteObject) result.getArrayElement(false,RemoteObject.createImmutable(0));Debug.locals.put("job_newAPP", _job_newapp); -; - BA.debugLineNum = 166;BA.debugLine="If job_newAPP.Success = True Then"; -Debug.ShouldStop(32); -if (true) break; - -case 1: -//if -this.state = 14; -if (RemoteObject.solveBoolean("=",_job_newapp.getField(true,"_success" /*RemoteObject*/ ),parent.mostCurrent.__c.getField(true,"True"))) { -this.state = 3; -}if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 168;BA.debugLine="If File.Exists(SharedFolder,\"newapp.apk\") Then"; -Debug.ShouldStop(128); -if (true) break; - -case 4: -//if -this.state = 7; -if (parent.mostCurrent.__c.getField(false,"File").runMethod(true,"Exists",(Object)(parent._sharedfolder),(Object)(RemoteObject.createImmutable("newapp.apk"))).get().booleanValue()) { -this.state = 6; -}if (true) break; - -case 6: -//C -this.state = 7; - BA.debugLineNum = 169;BA.debugLine="File.Delete(SharedFolder,\"newapp.apk\")"; -Debug.ShouldStop(256); -parent.mostCurrent.__c.getField(false,"File").runVoidMethod ("Delete",(Object)(parent._sharedfolder),(Object)(RemoteObject.createImmutable("newapp.apk"))); - if (true) break; - -case 7: -//C -this.state = 8; -; - BA.debugLineNum = 172;BA.debugLine="Dim outNewAPK As OutputStream = File.OpenOutput("; -Debug.ShouldStop(2048); -_outnewapk = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -_outnewapk = parent.mostCurrent.__c.getField(false,"File").runMethod(false,"OpenOutput",(Object)(parent._sharedfolder),(Object)(BA.ObjectToString("newapp.apk")),(Object)(parent.mostCurrent.__c.getField(true,"False")));Debug.locals.put("outNewAPK", _outnewapk);Debug.locals.put("outNewAPK", _outnewapk); - BA.debugLineNum = 173;BA.debugLine="File.Copy2(job_newAPP.GetInputStream, outNewAPK)"; -Debug.ShouldStop(4096); -parent.mostCurrent.__c.getField(false,"File").runVoidMethod ("Copy2",(Object)((_job_newapp.runClassMethod (keymon.lat.medicomed.httpjob.class, "_getinputstream" /*RemoteObject*/ ).getObject())),(Object)((_outnewapk.getObject()))); - BA.debugLineNum = 174;BA.debugLine="outNewAPK.Close"; -Debug.ShouldStop(8192); -_outnewapk.runVoidMethod ("Close"); - BA.debugLineNum = 175;BA.debugLine="If Starter.Logger Then Log(\"APK dir: \"&SharedFol"; -Debug.ShouldStop(16384); -if (true) break; - -case 8: -//if -this.state = 13; -if (parent.mostCurrent._starter._logger /*RemoteObject*/ .get().booleanValue()) { -this.state = 10; -;}if (true) break; - -case 10: -//C -this.state = 13; -parent.mostCurrent.__c.runVoidMethod ("LogImpl","319529747",RemoteObject.concat(RemoteObject.createImmutable("APK dir: "),parent._sharedfolder),0); -if (true) break; - -case 13: -//C -this.state = 14; -; - if (true) break; - -case 14: -//C -this.state = -1; -; - BA.debugLineNum = 177;BA.debugLine="job_newAPP.Release"; -Debug.ShouldStop(65536); -_job_newapp.runClassMethod (keymon.lat.medicomed.httpjob.class, "_release" /*RemoteObject*/ ); - BA.debugLineNum = 179;BA.debugLine="Dim in As Intent"; -Debug.ShouldStop(262144); -_in = RemoteObject.createNew ("anywheresoftware.b4a.objects.IntentWrapper");Debug.locals.put("in", _in); - BA.debugLineNum = 180;BA.debugLine="in.Initialize(in.ACTION_VIEW,\"\" )"; -Debug.ShouldStop(524288); -_in.runVoidMethod ("Initialize",(Object)(_in.getField(true,"ACTION_VIEW")),(Object)(RemoteObject.createImmutable(""))); - BA.debugLineNum = 181;BA.debugLine="SetFileUriAsIntentData(in, \"newapp.apk\")"; -Debug.ShouldStop(1048576); -_setfileuriasintentdata(_in,RemoteObject.createImmutable("newapp.apk")); - BA.debugLineNum = 183;BA.debugLine="in.SetType(\"application/vnd.android.package-archi"; -Debug.ShouldStop(4194304); -_in.runVoidMethod ("SetType",(Object)(RemoteObject.createImmutable("application/vnd.android.package-archive"))); - BA.debugLineNum = 184;BA.debugLine="StartActivity(in)"; -Debug.ShouldStop(8388608); -parent.mostCurrent.__c.runVoidMethod ("StartActivity",appupdater.processBA,(Object)((_in.getObject()))); - BA.debugLineNum = 185;BA.debugLine="n2.Cancel(nNewAppnID)"; -Debug.ShouldStop(16777216); -parent._n2.runVoidMethod ("Cancel",(Object)(parent._nnewappnid)); - BA.debugLineNum = 186;BA.debugLine="B4XPages.MainPage.ocultaProgreso"; -Debug.ShouldStop(33554432); -parent.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,appupdater.processBA).runClassMethod (keymon.lat.medicomed.b4xmainpage.class, "_ocultaprogreso" /*RemoteObject*/ ); - BA.debugLineNum = 188;BA.debugLine="StopService(Me)"; -Debug.ShouldStop(134217728); -parent.mostCurrent.__c.runVoidMethod ("StopService",appupdater.processBA,(Object)(appupdater.getObject())); - BA.debugLineNum = 190;BA.debugLine="End Sub"; -Debug.ShouldStop(536870912); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static void _jobdone(RemoteObject _job_newapp) throws Exception{ -} -public static RemoteObject _download_start(RemoteObject _startingintent) throws Exception{ -try { - Debug.PushSubsStack("download_Start (appupdater) ","appupdater",12,appupdater.processBA,appupdater.mostCurrent,152); -if (RapidSub.canDelegate("download_start")) { return keymon.lat.medicomed.appupdater.remoteMe.runUserSub(false, "appupdater","download_start", _startingintent);} -Debug.locals.put("StartingIntent", _startingintent); - BA.debugLineNum = 152;BA.debugLine="Sub download_Start (StartingIntent As Intent)"; -Debug.ShouldStop(8388608); - BA.debugLineNum = 153;BA.debugLine="download_newApk"; -Debug.ShouldStop(16777216); -_download_newapk(); - BA.debugLineNum = 154;BA.debugLine="End Sub"; -Debug.ShouldStop(33554432); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _fileprovider_init() throws Exception{ -try { - Debug.PushSubsStack("fileProvider_init (appupdater) ","appupdater",12,appupdater.processBA,appupdater.mostCurrent,235); -if (RapidSub.canDelegate("fileprovider_init")) { return keymon.lat.medicomed.appupdater.remoteMe.runUserSub(false, "appupdater","fileprovider_init");} -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.phone.Phone"); - BA.debugLineNum = 235;BA.debugLine="Sub fileProvider_init"; -Debug.ShouldStop(1024); - BA.debugLineNum = 236;BA.debugLine="Dim p As Phone"; -Debug.ShouldStop(2048); -_p = RemoteObject.createNew ("anywheresoftware.b4a.phone.Phone");Debug.locals.put("p", _p); - BA.debugLineNum = 237;BA.debugLine="If p.SdkVersion >= 24 Or File.ExternalWritable ="; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean("g",_p.runMethod(true,"getSdkVersion"),BA.numberCast(double.class, 24)) || RemoteObject.solveBoolean("=",appupdater.mostCurrent.__c.getField(false,"File").runMethod(true,"getExternalWritable"),appupdater.mostCurrent.__c.getField(true,"False"))) { - BA.debugLineNum = 238;BA.debugLine="UseFileProvider = True"; -Debug.ShouldStop(8192); -appupdater._usefileprovider = appupdater.mostCurrent.__c.getField(true,"True"); - BA.debugLineNum = 239;BA.debugLine="SharedFolder = File.Combine(File.DirInternal, \"s"; -Debug.ShouldStop(16384); -appupdater._sharedfolder = appupdater.mostCurrent.__c.getField(false,"File").runMethod(true,"Combine",(Object)(appupdater.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirInternal")),(Object)(RemoteObject.createImmutable("shared"))); - BA.debugLineNum = 240;BA.debugLine="If Not(File.IsDirectory(File.DirInternal,\"shared"; -Debug.ShouldStop(32768); -if (appupdater.mostCurrent.__c.runMethod(true,"Not",(Object)(appupdater.mostCurrent.__c.getField(false,"File").runMethod(true,"IsDirectory",(Object)(appupdater.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirInternal")),(Object)(RemoteObject.createImmutable("shared"))))).get().booleanValue()) { - BA.debugLineNum = 241;BA.debugLine="File.MakeDir(\"\", SharedFolder)"; -Debug.ShouldStop(65536); -appupdater.mostCurrent.__c.getField(false,"File").runVoidMethod ("MakeDir",(Object)(BA.ObjectToString("")),(Object)(appupdater._sharedfolder)); - }; - }else { - BA.debugLineNum = 244;BA.debugLine="UseFileProvider = False"; -Debug.ShouldStop(524288); -appupdater._usefileprovider = appupdater.mostCurrent.__c.getField(true,"False"); - BA.debugLineNum = 245;BA.debugLine="SharedFolder = rp.GetSafeDirDefaultExternal(\"sha"; -Debug.ShouldStop(1048576); -appupdater._sharedfolder = appupdater._rp.runMethod(true,"GetSafeDirDefaultExternal",(Object)(RemoteObject.createImmutable("shared"))); - }; - BA.debugLineNum = 247;BA.debugLine="Log($\"Using FileProvider? ${UseFileProvider}\"$)"; -Debug.ShouldStop(4194304); -appupdater.mostCurrent.__c.runVoidMethod ("LogImpl","319922956",(RemoteObject.concat(RemoteObject.createImmutable("Using FileProvider? "),appupdater.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((appupdater._usefileprovider))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 248;BA.debugLine="End Sub"; -Debug.ShouldStop(8388608); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getfileuri(RemoteObject _filename) throws Exception{ -try { - Debug.PushSubsStack("GetFileUri (appupdater) ","appupdater",12,appupdater.processBA,appupdater.mostCurrent,251); -if (RapidSub.canDelegate("getfileuri")) { return keymon.lat.medicomed.appupdater.remoteMe.runUserSub(false, "appupdater","getfileuri", _filename);} -RemoteObject _uri = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _f = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _fp = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _context = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -Debug.locals.put("FileName", _filename); - BA.debugLineNum = 251;BA.debugLine="Sub GetFileUri (FileName As String) As Object"; -Debug.ShouldStop(67108864); - BA.debugLineNum = 252;BA.debugLine="Try"; -Debug.ShouldStop(134217728); -try { BA.debugLineNum = 253;BA.debugLine="If Not(UseFileProvider) Then"; -Debug.ShouldStop(268435456); -if (appupdater.mostCurrent.__c.runMethod(true,"Not",(Object)(appupdater._usefileprovider)).get().booleanValue()) { - BA.debugLineNum = 254;BA.debugLine="Dim uri As JavaObject"; -Debug.ShouldStop(536870912); -_uri = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("uri", _uri); - BA.debugLineNum = 255;BA.debugLine="Return uri.InitializeStatic(\"android.net.Uri\")."; -Debug.ShouldStop(1073741824); -Debug.CheckDeviceExceptions();if (true) return _uri.runMethod(false,"InitializeStatic",(Object)(RemoteObject.createImmutable("android.net.Uri"))).runMethod(false,"RunMethod",(Object)(BA.ObjectToString("parse")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(RemoteObject.concat(RemoteObject.createImmutable("file://"),appupdater.mostCurrent.__c.getField(false,"File").runMethod(true,"Combine",(Object)(appupdater._sharedfolder),(Object)(_filename))))}))); - }; - BA.debugLineNum = 257;BA.debugLine="Dim f As JavaObject"; -Debug.ShouldStop(1); -_f = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("f", _f); - BA.debugLineNum = 258;BA.debugLine="f.InitializeNewInstance(\"java.io.File\", Array(Sh"; -Debug.ShouldStop(2); -_f.runVoidMethod ("InitializeNewInstance",(Object)(BA.ObjectToString("java.io.File")),(Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(appupdater._sharedfolder),(_filename)}))); - BA.debugLineNum = 259;BA.debugLine="Dim fp As JavaObject"; -Debug.ShouldStop(4); -_fp = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("fp", _fp); - BA.debugLineNum = 260;BA.debugLine="Dim context As JavaObject"; -Debug.ShouldStop(8); -_context = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("context", _context); - BA.debugLineNum = 261;BA.debugLine="context.InitializeContext"; -Debug.ShouldStop(16); -_context.runVoidMethod ("InitializeContext",appupdater.processBA); - BA.debugLineNum = 262;BA.debugLine="fp.InitializeStatic(\"android.support.v4.content."; -Debug.ShouldStop(32); -_fp.runVoidMethod ("InitializeStatic",(Object)(RemoteObject.createImmutable("androidx.core.content.FileProvider"))); - BA.debugLineNum = 263;BA.debugLine="Return fp.RunMethod(\"getUriForFile\", Array(conte"; -Debug.ShouldStop(64); -Debug.CheckDeviceExceptions();if (true) return _fp.runMethod(false,"RunMethod",(Object)(BA.ObjectToString("getUriForFile")),(Object)(RemoteObject.createNewArray("Object",new int[] {3},new Object[] {(_context.getObject()),(RemoteObject.concat(appupdater.mostCurrent.__c.getField(false,"Application").runMethod(true,"getPackageName"),RemoteObject.createImmutable(".provider"))),(_f.getObject())}))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e14) { - BA.rdebugUtils.runVoidMethod("setLastException",appupdater.processBA, e14.toString()); BA.debugLineNum = 265;BA.debugLine="Log(\"FileProvider::GetFileUri - error - \" & Last"; -Debug.ShouldStop(256); -appupdater.mostCurrent.__c.runVoidMethod ("LogImpl","319988494",RemoteObject.concat(RemoteObject.createImmutable("FileProvider::GetFileUri - error - "),appupdater.mostCurrent.__c.runMethod(false,"LastException",appupdater.processBA).runMethod(true,"getMessage")),0); - BA.debugLineNum = 266;BA.debugLine="Return \"\""; -Debug.ShouldStop(512); -if (true) return RemoteObject.createImmutable(("")); - }; - BA.debugLineNum = 268;BA.debugLine="End Sub"; -Debug.ShouldStop(2048); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _process_globals() throws Exception{ - //BA.debugLineNum = 70;BA.debugLine="Sub Process_Globals"; - //BA.debugLineNum = 75;BA.debugLine="Public lnk As String = \"https://keymon.lat/movil/"; -appupdater._lnk = BA.ObjectToString("https://keymon.lat/movil/medicomed/medicomed.ver"); - //BA.debugLineNum = 85;BA.debugLine="Public nNewApp As Notification"; -appupdater._nnewapp = RemoteObject.createNew ("anywheresoftware.b4a.objects.NotificationWrapper"); - //BA.debugLineNum = 86;BA.debugLine="Public nNewAppnID As Int = 16"; -appupdater._nnewappnid = BA.numberCast(int.class, 16); - //BA.debugLineNum = 88;BA.debugLine="Dim nativeMe As JavaObject"; -appupdater._nativeme = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); - //BA.debugLineNum = 89;BA.debugLine="Dim n2 As Notification"; -appupdater._n2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.NotificationWrapper"); - //BA.debugLineNum = 90;BA.debugLine="Dim n2ID As Int = 16"; -appupdater._n2id = BA.numberCast(int.class, 16); - //BA.debugLineNum = 92;BA.debugLine="Public SharedFolder As String"; -appupdater._sharedfolder = RemoteObject.createImmutable(""); - //BA.debugLineNum = 93;BA.debugLine="Public UseFileProvider As Boolean"; -appupdater._usefileprovider = RemoteObject.createImmutable(false); - //BA.debugLineNum = 94;BA.debugLine="Private rp As RuntimePermissions"; -appupdater._rp = RemoteObject.createNew ("anywheresoftware.b4a.objects.RuntimePermissions"); - //BA.debugLineNum = 96;BA.debugLine="Type mNewVersion(update As Boolean, nonewAPP As B"; -; - //BA.debugLineNum = 98;BA.debugLine="Public newApp As mNewVersion"; -appupdater._newapp = RemoteObject.createNew ("keymon.lat.medicomed.appupdater._mnewversion"); - //BA.debugLineNum = 99;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _service_create() throws Exception{ -try { - Debug.PushSubsStack("Service_Create (appupdater) ","appupdater",12,appupdater.processBA,appupdater.mostCurrent,101); -if (RapidSub.canDelegate("service_create")) { return keymon.lat.medicomed.appupdater.remoteMe.runUserSub(false, "appupdater","service_create");} - BA.debugLineNum = 101;BA.debugLine="Sub Service_Create"; -Debug.ShouldStop(16); - BA.debugLineNum = 102;BA.debugLine="Log(\"appUpdater(), Service_Create\")"; -Debug.ShouldStop(32); -appupdater.mostCurrent.__c.runVoidMethod ("LogImpl","319333121",RemoteObject.createImmutable("appUpdater(), Service_Create"),0); - BA.debugLineNum = 103;BA.debugLine="newApp.Initialize"; -Debug.ShouldStop(64); -appupdater._newapp.runVoidMethod ("Initialize"); - BA.debugLineNum = 104;BA.debugLine="Service.AutomaticForegroundMode = Service.AUTOMAT"; -Debug.ShouldStop(128); -appupdater.mostCurrent._service.setField ("AutomaticForegroundMode",appupdater.mostCurrent._service.getField(true,"AUTOMATIC_FOREGROUND_NEVER")); - BA.debugLineNum = 105;BA.debugLine="n2.Initialize"; -Debug.ShouldStop(256); -appupdater._n2.runVoidMethod ("Initialize"); - BA.debugLineNum = 106;BA.debugLine="nativeMe.InitializeContext"; -Debug.ShouldStop(512); -appupdater._nativeme.runVoidMethod ("InitializeContext",appupdater.processBA); - BA.debugLineNum = 107;BA.debugLine="End Sub"; -Debug.ShouldStop(1024); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _service_destroy() throws Exception{ -try { - Debug.PushSubsStack("Service_Destroy (appupdater) ","appupdater",12,appupdater.processBA,appupdater.mostCurrent,231); -if (RapidSub.canDelegate("service_destroy")) { return keymon.lat.medicomed.appupdater.remoteMe.runUserSub(false, "appupdater","service_destroy");} - BA.debugLineNum = 231;BA.debugLine="Sub Service_Destroy"; -Debug.ShouldStop(64); - BA.debugLineNum = 232;BA.debugLine="Log(\"appUpdater(), Service_Destroy\")"; -Debug.ShouldStop(128); -appupdater.mostCurrent.__c.runVoidMethod ("LogImpl","319857409",RemoteObject.createImmutable("appUpdater(), Service_Destroy"),0); - BA.debugLineNum = 233;BA.debugLine="End Sub"; -Debug.ShouldStop(256); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _service_start(RemoteObject _startingintent) throws Exception{ -try { - Debug.PushSubsStack("Service_Start (appupdater) ","appupdater",12,appupdater.processBA,appupdater.mostCurrent,109); -if (RapidSub.canDelegate("service_start")) { keymon.lat.medicomed.appupdater.remoteMe.runUserSub(false, "appupdater","service_start", _startingintent); return;} -ResumableSub_Service_Start rsub = new ResumableSub_Service_Start(null,_startingintent); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_Service_Start extends BA.ResumableSub { -public ResumableSub_Service_Start(keymon.lat.medicomed.appupdater parent,RemoteObject _startingintent) { -this.parent = parent; -this._startingintent = _startingintent; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -keymon.lat.medicomed.appupdater parent; -RemoteObject _startingintent; -RemoteObject _j = RemoteObject.declareNull("keymon.lat.medicomed.httpjob"); -RemoteObject _app = null; - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("Service_Start (appupdater) ","appupdater",12,appupdater.processBA,appupdater.mostCurrent,109); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { -try { - - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("StartingIntent", _startingintent); - BA.debugLineNum = 110;BA.debugLine="Log(\"appUpdater(), Service_Start\")"; -Debug.ShouldStop(8192); -parent.mostCurrent.__c.runVoidMethod ("LogImpl","319398657",RemoteObject.createImmutable("appUpdater(), Service_Start"),0); - BA.debugLineNum = 112;BA.debugLine="B4XPages.MainPage.muestraProgreso(\"Buscando actua"; -Debug.ShouldStop(32768); -parent.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,appupdater.processBA).runClassMethod (keymon.lat.medicomed.b4xmainpage.class, "_muestraprogreso" /*RemoteObject*/ ,(Object)(RemoteObject.createImmutable("Buscando actualización"))); - BA.debugLineNum = 113;BA.debugLine="Log(\"Buscando actualización\")"; -Debug.ShouldStop(65536); -parent.mostCurrent.__c.runVoidMethod ("LogImpl","319398660",RemoteObject.createImmutable("Buscando actualización"),0); - BA.debugLineNum = 114;BA.debugLine="fileProvider_init"; -Debug.ShouldStop(131072); -_fileprovider_init(); - BA.debugLineNum = 115;BA.debugLine="Wait For (Download(Me, lnk)) JobDone (j As HttpJo"; -Debug.ShouldStop(262144); -parent.mostCurrent.__c.runVoidMethod ("WaitFor","jobdone", appupdater.processBA, anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "appupdater", "service_start"), (_download(appupdater.getObject(),parent._lnk))); -this.state = 20; -return; -case 20: -//C -this.state = 1; -_j = (RemoteObject) result.getArrayElement(false,RemoteObject.createImmutable(0));Debug.locals.put("j", _j); -; - BA.debugLineNum = 116;BA.debugLine="If j.Success Then"; -Debug.ShouldStop(524288); -if (true) break; - -case 1: -//if -this.state = 19; -if (_j.getField(true,"_success" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 3; -}else { -this.state = 18; -}if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 117;BA.debugLine="Try"; -Debug.ShouldStop(1048576); -if (true) break; - -case 4: -//try -this.state = 16; -this.catchState = 15; -this.state = 6; -if (true) break; - -case 6: -//C -this.state = 7; -this.catchState = 15; - BA.debugLineNum = 118;BA.debugLine="Dim app() As String = Regex.Split(Chr(9),j.GetS"; -Debug.ShouldStop(2097152); -_app = parent.mostCurrent.__c.getField(false,"Regex").runMethod(false,"Split",(Object)(BA.ObjectToString(parent.mostCurrent.__c.runMethod(true,"Chr",(Object)(BA.numberCast(int.class, 9))))),(Object)(_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_getstring" /*RemoteObject*/ )));Debug.locals.put("app", _app);Debug.locals.put("app", _app); - BA.debugLineNum = 120;BA.debugLine="newApp.appLink = app(3) 'Liga a nueva app"; -Debug.ShouldStop(8388608); -parent._newapp.setField ("appLink" /*RemoteObject*/ ,_app.getArrayElement(true,BA.numberCast(int.class, 3))); - BA.debugLineNum = 121;BA.debugLine="newApp.newMsg = app(1) 'Texto de que hay actual"; -Debug.ShouldStop(16777216); -parent._newapp.setField ("newMsg" /*RemoteObject*/ ,_app.getArrayElement(true,BA.numberCast(int.class, 1))); - BA.debugLineNum = 122;BA.debugLine="newApp.okMsg = app(2) 'Texto de app al corrient"; -Debug.ShouldStop(33554432); -parent._newapp.setField ("okMsg" /*RemoteObject*/ ,_app.getArrayElement(true,BA.numberCast(int.class, 2))); - BA.debugLineNum = 123;BA.debugLine="newApp.version = app(0) 'Version actual"; -Debug.ShouldStop(67108864); -parent._newapp.setField ("version" /*RemoteObject*/ ,_app.getArrayElement(true,BA.numberCast(int.class, 0))); - BA.debugLineNum = 125;BA.debugLine="Log($\"Application.VersionName=${Application.Ver"; -Debug.ShouldStop(268435456); -parent.mostCurrent.__c.runVoidMethod ("LogImpl","319398672",(RemoteObject.concat(RemoteObject.createImmutable("Application.VersionName="),parent.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.mostCurrent.__c.getField(false,"Application").runMethod(true,"getVersionName")))),RemoteObject.createImmutable(", newApp="),parent.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent._newapp))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 128;BA.debugLine="If newApp.version = Application.VersionName Th"; -Debug.ShouldStop(-2147483648); -if (true) break; - -case 7: -//if -this.state = 10; -if (RemoteObject.solveBoolean("=",parent._newapp.getField(true,"version" /*RemoteObject*/ ),parent.mostCurrent.__c.getField(false,"Application").runMethod(true,"getVersionName"))) { -this.state = 9; -}if (true) break; - -case 9: -//C -this.state = 10; - BA.debugLineNum = 129;BA.debugLine="newApp.update = False"; -Debug.ShouldStop(1); -parent._newapp.setField ("update" /*RemoteObject*/ ,parent.mostCurrent.__c.getField(true,"False")); - BA.debugLineNum = 130;BA.debugLine="Log(\"No new app\")"; -Debug.ShouldStop(2); -parent.mostCurrent.__c.runVoidMethod ("LogImpl","319398677",RemoteObject.createImmutable("No new app"),0); - BA.debugLineNum = 131;BA.debugLine="B4XPages.ShowPage(\"updateAvailable\")"; -Debug.ShouldStop(4); -parent.mostCurrent._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,appupdater.processBA,(Object)(RemoteObject.createImmutable("updateAvailable"))); - BA.debugLineNum = 133;BA.debugLine="CreateNotification2(\"Aplicacion al corriente\","; -Debug.ShouldStop(16); -_createnotification2(BA.ObjectToString("Aplicacion al corriente"),BA.ObjectToString("No hay actualizaciones disponibles"),BA.ObjectToString("ic_file_download_white_24dp"),(parent.mostCurrent._main.getObject()),parent.mostCurrent.__c.getField(true,"True"),parent.mostCurrent.__c.getField(true,"True"),parent._nnewapp,parent._nnewappnid); - if (true) break; -; - BA.debugLineNum = 135;BA.debugLine="If newApp.version <> Application.VersionName T"; -Debug.ShouldStop(64); - -case 10: -//if -this.state = 13; -if (RemoteObject.solveBoolean("!",parent._newapp.getField(true,"version" /*RemoteObject*/ ),parent.mostCurrent.__c.getField(false,"Application").runMethod(true,"getVersionName"))) { -this.state = 12; -}if (true) break; - -case 12: -//C -this.state = 13; - BA.debugLineNum = 136;BA.debugLine="newApp.update = True"; -Debug.ShouldStop(128); -parent._newapp.setField ("update" /*RemoteObject*/ ,parent.mostCurrent.__c.getField(true,"True")); - BA.debugLineNum = 137;BA.debugLine="Log(\"New app true\")"; -Debug.ShouldStop(256); -parent.mostCurrent.__c.runVoidMethod ("LogImpl","319398684",RemoteObject.createImmutable("New app true"),0); - BA.debugLineNum = 138;BA.debugLine="B4XPages.ShowPage(\"updateAvailable\")"; -Debug.ShouldStop(512); -parent.mostCurrent._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,appupdater.processBA,(Object)(RemoteObject.createImmutable("updateAvailable"))); - if (true) break; - -case 13: -//C -this.state = 16; -; - Debug.CheckDeviceExceptions(); -if (true) break; - -case 15: -//C -this.state = 16; -this.catchState = 0; - BA.debugLineNum = 143;BA.debugLine="Log(\"appUpdater(), Job Failed, error \" & LastE"; -Debug.ShouldStop(16384); -parent.mostCurrent.__c.runVoidMethod ("LogImpl","319398690",RemoteObject.concat(RemoteObject.createImmutable("appUpdater(), Job Failed, error "),parent.mostCurrent.__c.runMethod(false,"LastException",appupdater.processBA).runMethod(true,"getMessage")),0); - if (true) break; -if (true) break; - -case 16: -//C -this.state = 19; -this.catchState = 0; -; - if (true) break; - -case 18: -//C -this.state = 19; - BA.debugLineNum = 146;BA.debugLine="Log(\"appUpdater(), Job Failed \" & lnk)"; -Debug.ShouldStop(131072); -parent.mostCurrent.__c.runVoidMethod ("LogImpl","319398693",RemoteObject.concat(RemoteObject.createImmutable("appUpdater(), Job Failed "),parent._lnk),0); - if (true) break; - -case 19: -//C -this.state = -1; -; - BA.debugLineNum = 148;BA.debugLine="j.Release"; -Debug.ShouldStop(524288); -_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_release" /*RemoteObject*/ ); - BA.debugLineNum = 150;BA.debugLine="End Sub"; -Debug.ShouldStop(2097152); -if (true) break; -}} - catch (Exception e0) { - -if (catchState == 0) - throw e0; -else { - state = catchState; -BA.rdebugUtils.runVoidMethod("setLastException",appupdater.processBA, e0.toString());} - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _setfileuriasintentdata(RemoteObject _intent,RemoteObject _filename) throws Exception{ -try { - Debug.PushSubsStack("SetFileUriAsIntentData (appupdater) ","appupdater",12,appupdater.processBA,appupdater.mostCurrent,272); -if (RapidSub.canDelegate("setfileuriasintentdata")) { return keymon.lat.medicomed.appupdater.remoteMe.runUserSub(false, "appupdater","setfileuriasintentdata", _intent, _filename);} -RemoteObject _jo = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -Debug.locals.put("Intent", _intent); -Debug.locals.put("FileName", _filename); - BA.debugLineNum = 272;BA.debugLine="Sub SetFileUriAsIntentData (Intent As Intent, File"; -Debug.ShouldStop(32768); - BA.debugLineNum = 273;BA.debugLine="Dim jo As JavaObject = Intent"; -Debug.ShouldStop(65536); -_jo = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_jo = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), _intent.getObject());Debug.locals.put("jo", _jo);Debug.locals.put("jo", _jo); - BA.debugLineNum = 274;BA.debugLine="jo.RunMethod(\"setData\", Array(GetFileUri(FileName"; -Debug.ShouldStop(131072); -_jo.runVoidMethod ("RunMethod",(Object)(BA.ObjectToString("setData")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {_getfileuri(_filename)}))); - BA.debugLineNum = 275;BA.debugLine="Intent.Flags = Bit.Or(Intent.Flags, 1) 'FLAG_GRAN"; -Debug.ShouldStop(262144); -_intent.runMethod(true,"setFlags",appupdater.mostCurrent.__c.getField(false,"Bit").runMethod(true,"Or",(Object)(_intent.runMethod(true,"getFlags")),(Object)(BA.numberCast(int.class, 1)))); - BA.debugLineNum = 276;BA.debugLine="End Sub"; -Debug.ShouldStop(524288); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xbitset.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xbitset.java deleted file mode 100644 index ba6a93d..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xbitset.java +++ /dev/null @@ -1,31 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xbitset { - public static RemoteObject myClass; - public b4xbitset() { - } - public static PCBA staticBA = new PCBA(null, b4xbitset.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _data = null; -public static RemoteObject _msize = RemoteObject.createImmutable(0); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"data",_ref.getField(false, "_data"),"DateUtils",_ref.getField(false, "_dateutils"),"mSize",_ref.getField(false, "_msize")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xbitset_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xbitset_subs_0.java deleted file mode 100644 index 4b5310b..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xbitset_subs_0.java +++ /dev/null @@ -1,161 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xbitset_subs_0 { - - -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 5;BA.debugLine="Private data() As Int"; -b4xbitset._data = RemoteObject.createNewArray ("int", new int[] {0}, new Object[]{});__ref.setField("_data",b4xbitset._data); - //BA.debugLineNum = 7;BA.debugLine="Private mSize As Int"; -b4xbitset._msize = RemoteObject.createImmutable(0);__ref.setField("_msize",b4xbitset._msize); - //BA.debugLineNum = 8;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _clear(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Clear (b4xbitset) ","b4xbitset",26,__ref.getField(false, "ba"),__ref,54); -if (RapidSub.canDelegate("clear")) { return __ref.runUserSub(false, "b4xbitset","clear", __ref);} - BA.debugLineNum = 54;BA.debugLine="Public Sub Clear"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 58;BA.debugLine="Dim data(Bit.ShiftRight(mSize, 5) + 1) As Int"; -Debug.JustUpdateDeviceLine(); -b4xbitset._data = RemoteObject.createNewArray ("int", new int[] {RemoteObject.solve(new RemoteObject[] {b4xbitset.__c.getField(false,"Bit").runMethod(true,"ShiftRight",(Object)(__ref.getField(true,"_msize" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 5))),RemoteObject.createImmutable(1)}, "+",1, 1).get().intValue()}, new Object[]{});__ref.setField("_data",b4xbitset._data); - BA.debugLineNum = 60;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _get(RemoteObject __ref,RemoteObject _index) throws Exception{ -try { - Debug.PushSubsStack("Get (b4xbitset) ","b4xbitset",26,__ref.getField(false, "ba"),__ref,38); -if (RapidSub.canDelegate("get")) { return __ref.runUserSub(false, "b4xbitset","get", __ref, _index);} -RemoteObject _dindex = RemoteObject.createImmutable(0); -RemoteObject _offset = RemoteObject.createImmutable(0); -RemoteObject _blockvalue = RemoteObject.createImmutable(0); -Debug.locals.put("Index", _index); - BA.debugLineNum = 38;BA.debugLine="Public Sub Get(Index As Int) As Boolean"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 39;BA.debugLine="Dim dindex As Int = Bit.ShiftRight(Index, 5)"; -Debug.JustUpdateDeviceLine(); -_dindex = b4xbitset.__c.getField(false,"Bit").runMethod(true,"ShiftRight",(Object)(_index),(Object)(BA.numberCast(int.class, 5)));Debug.locals.put("dindex", _dindex);Debug.locals.put("dindex", _dindex); - BA.debugLineNum = 40;BA.debugLine="Dim offset As Int = Bit.And(0x0000001f, Index)"; -Debug.JustUpdateDeviceLine(); -_offset = b4xbitset.__c.getField(false,"Bit").runMethod(true,"And",(Object)(BA.numberCast(int.class, ((int)0x0000001f))),(Object)(_index));Debug.locals.put("offset", _offset);Debug.locals.put("offset", _offset); - BA.debugLineNum = 44;BA.debugLine="Dim BlockValue As Int = data(dindex)"; -Debug.JustUpdateDeviceLine(); -_blockvalue = __ref.getField(false,"_data" /*RemoteObject*/ ).getArrayElement(true,_dindex);Debug.locals.put("BlockValue", _blockvalue);Debug.locals.put("BlockValue", _blockvalue); - BA.debugLineNum = 46;BA.debugLine="Return Bit.And(BlockValue, Bit.ShiftLeft(1, offse"; -Debug.JustUpdateDeviceLine(); -if (true) return BA.ObjectToBoolean(RemoteObject.solveBoolean("!",b4xbitset.__c.getField(false,"Bit").runMethod(true,"And",(Object)(_blockvalue),(Object)(b4xbitset.__c.getField(false,"Bit").runMethod(true,"ShiftLeft",(Object)(BA.numberCast(int.class, 1)),(Object)(_offset)))),BA.numberCast(double.class, 0))); - BA.debugLineNum = 47;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getsize(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getSize (b4xbitset) ","b4xbitset",26,__ref.getField(false, "ba"),__ref,49); -if (RapidSub.canDelegate("getsize")) { return __ref.runUserSub(false, "b4xbitset","getsize", __ref);} - BA.debugLineNum = 49;BA.debugLine="Public Sub getSize As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 50;BA.debugLine="Return mSize"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_msize" /*RemoteObject*/ ); - BA.debugLineNum = 51;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _size) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xbitset) ","b4xbitset",26,__ref.getField(false, "ba"),__ref,10); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xbitset","initialize", __ref, _ba, _size);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); -Debug.locals.put("Size", _size); - BA.debugLineNum = 10;BA.debugLine="Public Sub Initialize (Size As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 11;BA.debugLine="mSize = Size"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_msize" /*RemoteObject*/ ,_size); - BA.debugLineNum = 12;BA.debugLine="Clear"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xbitset.class, "_clear" /*RemoteObject*/ ); - BA.debugLineNum = 13;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _set(RemoteObject __ref,RemoteObject _index,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("Set (b4xbitset) ","b4xbitset",26,__ref.getField(false, "ba"),__ref,16); -if (RapidSub.canDelegate("set")) { return __ref.runUserSub(false, "b4xbitset","set", __ref, _index, _value);} -RemoteObject _dindex = RemoteObject.createImmutable(0); -RemoteObject _offset = RemoteObject.createImmutable(0); -RemoteObject _blockvalue = RemoteObject.createImmutable(0); -RemoteObject _newblockvalue = RemoteObject.createImmutable(0); -Debug.locals.put("Index", _index); -Debug.locals.put("Value", _value); - BA.debugLineNum = 16;BA.debugLine="Public Sub Set(Index As Int, Value As Boolean)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 17;BA.debugLine="Dim dindex As Int = Bit.ShiftRight(Index, 5)"; -Debug.JustUpdateDeviceLine(); -_dindex = b4xbitset.__c.getField(false,"Bit").runMethod(true,"ShiftRight",(Object)(_index),(Object)(BA.numberCast(int.class, 5)));Debug.locals.put("dindex", _dindex);Debug.locals.put("dindex", _dindex); - BA.debugLineNum = 18;BA.debugLine="Dim offset As Int = Bit.And(0x0000001f, Index)"; -Debug.JustUpdateDeviceLine(); -_offset = b4xbitset.__c.getField(false,"Bit").runMethod(true,"And",(Object)(BA.numberCast(int.class, ((int)0x0000001f))),(Object)(_index));Debug.locals.put("offset", _offset);Debug.locals.put("offset", _offset); - BA.debugLineNum = 22;BA.debugLine="Dim BlockValue As Int = data(dindex)"; -Debug.JustUpdateDeviceLine(); -_blockvalue = __ref.getField(false,"_data" /*RemoteObject*/ ).getArrayElement(true,_dindex);Debug.locals.put("BlockValue", _blockvalue);Debug.locals.put("BlockValue", _blockvalue); - BA.debugLineNum = 24;BA.debugLine="Dim NewBlockValue As Int"; -Debug.JustUpdateDeviceLine(); -_newblockvalue = RemoteObject.createImmutable(0);Debug.locals.put("NewBlockValue", _newblockvalue); - BA.debugLineNum = 25;BA.debugLine="If Value Then"; -Debug.JustUpdateDeviceLine(); -if (_value.get().booleanValue()) { - BA.debugLineNum = 26;BA.debugLine="NewBlockValue = Bit.Or(BlockValue, Bit.ShiftLeft"; -Debug.JustUpdateDeviceLine(); -_newblockvalue = b4xbitset.__c.getField(false,"Bit").runMethod(true,"Or",(Object)(_blockvalue),(Object)(b4xbitset.__c.getField(false,"Bit").runMethod(true,"ShiftLeft",(Object)(BA.numberCast(int.class, 1)),(Object)(_offset))));Debug.locals.put("NewBlockValue", _newblockvalue); - }else { - BA.debugLineNum = 28;BA.debugLine="NewBlockValue = Bit.And(BlockValue, Bit.Not(Bit."; -Debug.JustUpdateDeviceLine(); -_newblockvalue = b4xbitset.__c.getField(false,"Bit").runMethod(true,"And",(Object)(_blockvalue),(Object)(b4xbitset.__c.getField(false,"Bit").runMethod(true,"Not",(Object)(b4xbitset.__c.getField(false,"Bit").runMethod(true,"ShiftLeft",(Object)(BA.numberCast(int.class, 1)),(Object)(_offset))))));Debug.locals.put("NewBlockValue", _newblockvalue); - }; - BA.debugLineNum = 33;BA.debugLine="data(dindex) = NewBlockValue"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_data" /*RemoteObject*/ ).setArrayElement (_newblockvalue,_dindex); - BA.debugLineNum = 35;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xbreadcrumb.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xbreadcrumb.java deleted file mode 100644 index 833b0ab..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xbreadcrumb.java +++ /dev/null @@ -1,45 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xbreadcrumb { - public static RemoteObject myClass; - public b4xbreadcrumb() { - } - public static PCBA staticBA = new PCBA(null, b4xbreadcrumb.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _meventname = RemoteObject.createImmutable(""); -public static RemoteObject _mcallback = RemoteObject.declareNull("Object"); -public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _cvs = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas"); -public static RemoteObject _mitems = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _rightpositions = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _textcolor = RemoteObject.createImmutable(0); -public static RemoteObject _fnt = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont"); -public static RemoteObject _offset = RemoteObject.createImmutable(0); -public static RemoteObject _bc = RemoteObject.declareNull("b4a.example.bitmapcreator"); -public static RemoteObject _crumbcolor = RemoteObject.createImmutable(0); -public static RemoteObject _touchpanel = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _presseditem = RemoteObject.createImmutable(0); -public static RemoteObject _tag = RemoteObject.declareNull("Object"); -public static RemoteObject _mhaptic = RemoteObject.createImmutable(false); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"bc",_ref.getField(false, "_bc"),"CrumbColor",_ref.getField(false, "_crumbcolor"),"cvs",_ref.getField(false, "_cvs"),"DateUtils",_ref.getField(false, "_dateutils"),"fnt",_ref.getField(false, "_fnt"),"mBase",_ref.getField(false, "_mbase"),"mCallBack",_ref.getField(false, "_mcallback"),"mEventName",_ref.getField(false, "_meventname"),"mHaptic",_ref.getField(false, "_mhaptic"),"mItems",_ref.getField(false, "_mitems"),"offset",_ref.getField(false, "_offset"),"PressedItem",_ref.getField(false, "_presseditem"),"RightPositions",_ref.getField(false, "_rightpositions"),"Tag",_ref.getField(false, "_tag"),"TextColor",_ref.getField(false, "_textcolor"),"TouchPanel",_ref.getField(false, "_touchpanel"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xbreadcrumb_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xbreadcrumb_subs_0.java deleted file mode 100644 index 9bd10e3..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xbreadcrumb_subs_0.java +++ /dev/null @@ -1,562 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xbreadcrumb_subs_0 { - - -public static RemoteObject _base_resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("Base_Resize (b4xbreadcrumb) ","b4xbreadcrumb",39,__ref.getField(false, "ba"),__ref,51); -if (RapidSub.canDelegate("base_resize")) { return __ref.runUserSub(false, "b4xbreadcrumb","base_resize", __ref, _width, _height);} -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 51;BA.debugLine="Public Sub Base_Resize (Width As Double, Height As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 52;BA.debugLine="cvs.Resize(Width, Height)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Resize",(Object)(BA.numberCast(float.class, _width)),(Object)(BA.numberCast(float.class, _height))); - BA.debugLineNum = 53;BA.debugLine="TouchPanel.SetLayoutAnimated(0, 0, 0, Width, Heig"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_touchpanel" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, _width)),(Object)(BA.numberCast(int.class, _height))); - BA.debugLineNum = 54;BA.debugLine="Draw"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xbreadcrumb.class, "_draw" /*RemoteObject*/ ); - BA.debugLineNum = 55;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 5;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 6;BA.debugLine="Private mEventName As String 'ignore"; -b4xbreadcrumb._meventname = RemoteObject.createImmutable("");__ref.setField("_meventname",b4xbreadcrumb._meventname); - //BA.debugLineNum = 7;BA.debugLine="Private mCallBack As Object 'ignore"; -b4xbreadcrumb._mcallback = RemoteObject.createNew ("Object");__ref.setField("_mcallback",b4xbreadcrumb._mcallback); - //BA.debugLineNum = 8;BA.debugLine="Public mBase As B4XView 'ignore"; -b4xbreadcrumb._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",b4xbreadcrumb._mbase); - //BA.debugLineNum = 9;BA.debugLine="Private xui As XUI 'ignore"; -b4xbreadcrumb._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",b4xbreadcrumb._xui); - //BA.debugLineNum = 10;BA.debugLine="Private cvs As B4XCanvas"; -b4xbreadcrumb._cvs = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas");__ref.setField("_cvs",b4xbreadcrumb._cvs); - //BA.debugLineNum = 11;BA.debugLine="Private mItems As List"; -b4xbreadcrumb._mitems = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_mitems",b4xbreadcrumb._mitems); - //BA.debugLineNum = 12;BA.debugLine="Private RightPositions As List"; -b4xbreadcrumb._rightpositions = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_rightpositions",b4xbreadcrumb._rightpositions); - //BA.debugLineNum = 13;BA.debugLine="Public TextColor As Int"; -b4xbreadcrumb._textcolor = RemoteObject.createImmutable(0);__ref.setField("_textcolor",b4xbreadcrumb._textcolor); - //BA.debugLineNum = 14;BA.debugLine="Public fnt As B4XFont"; -b4xbreadcrumb._fnt = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont");__ref.setField("_fnt",b4xbreadcrumb._fnt); - //BA.debugLineNum = 15;BA.debugLine="Private offset As Int = 10dip"; -b4xbreadcrumb._offset = b4xbreadcrumb.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 10)));__ref.setField("_offset",b4xbreadcrumb._offset); - //BA.debugLineNum = 16;BA.debugLine="Private bc As BitmapCreator"; -b4xbreadcrumb._bc = RemoteObject.createNew ("b4a.example.bitmapcreator");__ref.setField("_bc",b4xbreadcrumb._bc); - //BA.debugLineNum = 17;BA.debugLine="Public CrumbColor As Int"; -b4xbreadcrumb._crumbcolor = RemoteObject.createImmutable(0);__ref.setField("_crumbcolor",b4xbreadcrumb._crumbcolor); - //BA.debugLineNum = 18;BA.debugLine="Private TouchPanel As B4XView"; -b4xbreadcrumb._touchpanel = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_touchpanel",b4xbreadcrumb._touchpanel); - //BA.debugLineNum = 19;BA.debugLine="Private PressedItem As Int = -1"; -b4xbreadcrumb._presseditem = BA.numberCast(int.class, -(double) (0 + 1));__ref.setField("_presseditem",b4xbreadcrumb._presseditem); - //BA.debugLineNum = 20;BA.debugLine="Public Tag As Object"; -b4xbreadcrumb._tag = RemoteObject.createNew ("Object");__ref.setField("_tag",b4xbreadcrumb._tag); - //BA.debugLineNum = 21;BA.debugLine="Public mHaptic As Boolean"; -b4xbreadcrumb._mhaptic = RemoteObject.createImmutable(false);__ref.setField("_mhaptic",b4xbreadcrumb._mhaptic); - //BA.debugLineNum = 22;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _designercreateview(RemoteObject __ref,RemoteObject _base,RemoteObject _lbl,RemoteObject _props) throws Exception{ -try { - Debug.PushSubsStack("DesignerCreateView (b4xbreadcrumb) ","b4xbreadcrumb",39,__ref.getField(false, "ba"),__ref,33); -if (RapidSub.canDelegate("designercreateview")) { return __ref.runUserSub(false, "b4xbreadcrumb","designercreateview", __ref, _base, _lbl, _props);} -RemoteObject _xlbl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _items = RemoteObject.createImmutable(""); -RemoteObject _s = RemoteObject.createImmutable(""); -Debug.locals.put("Base", _base); -Debug.locals.put("Lbl", _lbl); -Debug.locals.put("Props", _props); - BA.debugLineNum = 33;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 34;BA.debugLine="mBase = Base"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).setObject (_base); - BA.debugLineNum = 35;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_tag" /*RemoteObject*/ ,__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"getTag")); - BA.debugLineNum = 35;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"setTag",__ref); - BA.debugLineNum = 36;BA.debugLine="cvs.Initialize(mBase)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ))); - BA.debugLineNum = 37;BA.debugLine="Dim xlbl As B4XView = Lbl"; -Debug.JustUpdateDeviceLine(); -_xlbl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_xlbl = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), _lbl.getObject());Debug.locals.put("xlbl", _xlbl);Debug.locals.put("xlbl", _xlbl); - BA.debugLineNum = 38;BA.debugLine="fnt = xlbl.Font"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_fnt" /*RemoteObject*/ ,_xlbl.runMethod(false,"getFont")); - BA.debugLineNum = 39;BA.debugLine="TextColor = xlbl.TextColor"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_textcolor" /*RemoteObject*/ ,_xlbl.runMethod(true,"getTextColor")); - BA.debugLineNum = 40;BA.debugLine="CrumbColor = xui.PaintOrColorToColor(Props.Get(\"C"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_crumbcolor" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CrumbColor"))))))); - BA.debugLineNum = 41;BA.debugLine="mHaptic = Props.GetDefault(\"HapticFeedback\", Fals"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mhaptic" /*RemoteObject*/ ,BA.ObjectToBoolean(_props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("HapticFeedback"))),(Object)((b4xbreadcrumb.__c.getField(true,"False")))))); - BA.debugLineNum = 42;BA.debugLine="TouchPanel = xui.CreatePanel(\"Touch\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_touchpanel" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Touch")))); - BA.debugLineNum = 43;BA.debugLine="mBase.AddView(TouchPanel, 0, 0, mBase.Width, mBas"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_touchpanel" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"))); - BA.debugLineNum = 44;BA.debugLine="Dim items As String = Props.Get(\"Items\")"; -Debug.JustUpdateDeviceLine(); -_items = BA.ObjectToString(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("Items")))));Debug.locals.put("items", _items);Debug.locals.put("items", _items); - BA.debugLineNum = 45;BA.debugLine="For Each s As String In Regex.Split(\"\\|\", items)"; -Debug.JustUpdateDeviceLine(); -{ -final RemoteObject group13 = b4xbreadcrumb.__c.getField(false,"Regex").runMethod(false,"Split",(Object)(BA.ObjectToString("\\|")),(Object)(_items)); -final int groupLen13 = group13.getField(true,"length").get() -;int index13 = 0; -; -for (; index13 < groupLen13;index13++){ -_s = group13.getArrayElement(true,RemoteObject.createImmutable(index13));Debug.locals.put("s", _s); -Debug.locals.put("s", _s); - BA.debugLineNum = 46;BA.debugLine="mItems.Add(s)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mitems" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((_s))); - } -}Debug.locals.put("s", _s); -; - BA.debugLineNum = 48;BA.debugLine="Draw"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xbreadcrumb.class, "_draw" /*RemoteObject*/ ); - BA.debugLineNum = 49;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _draw(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Draw (b4xbreadcrumb) ","b4xbreadcrumb",39,__ref.getField(false, "ba"),__ref,57); -if (RapidSub.canDelegate("draw")) { return __ref.runUserSub(false, "b4xbreadcrumb","draw", __ref);} -RemoteObject _bcolor = RemoteObject.declareNull("b4a.example.bitmapcreator._argbcolor"); -RemoteObject _strokecolor = RemoteObject.createImmutable(0); -RemoteObject _clrs = null; -RemoteObject _left = RemoteObject.createImmutable(0); -int _i = 0; -RemoteObject _sc = RemoteObject.createImmutable(0); -RemoteObject _width = RemoteObject.createImmutable(0); - BA.debugLineNum = 57;BA.debugLine="Private Sub Draw"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 58;BA.debugLine="cvs.ClearRect(cvs.TargetRect)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("ClearRect",(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect"))); - BA.debugLineNum = 59;BA.debugLine="Dim bcolor As ARGBColor"; -Debug.JustUpdateDeviceLine(); -_bcolor = RemoteObject.createNew ("b4a.example.bitmapcreator._argbcolor");Debug.locals.put("bcolor", _bcolor); - BA.debugLineNum = 60;BA.debugLine="bc.ColorToARGB(CrumbColor, bcolor)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_colortoargb",(Object)(__ref.getField(true,"_crumbcolor" /*RemoteObject*/ )),(Object)(_bcolor)); - BA.debugLineNum = 61;BA.debugLine="bcolor.r = Min(255, bcolor.r * 2)"; -Debug.JustUpdateDeviceLine(); -_bcolor.setField ("r",BA.numberCast(int.class, b4xbreadcrumb.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, 255)),(Object)(BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {_bcolor.getField(true,"r"),RemoteObject.createImmutable(2)}, "*",0, 1)))))); - BA.debugLineNum = 62;BA.debugLine="bcolor.g = Min(255, bcolor.g * 2)"; -Debug.JustUpdateDeviceLine(); -_bcolor.setField ("g",BA.numberCast(int.class, b4xbreadcrumb.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, 255)),(Object)(BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {_bcolor.getField(true,"g"),RemoteObject.createImmutable(2)}, "*",0, 1)))))); - BA.debugLineNum = 63;BA.debugLine="bcolor.b = Min(255, bcolor.b * 2)"; -Debug.JustUpdateDeviceLine(); -_bcolor.setField ("b",BA.numberCast(int.class, b4xbreadcrumb.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, 255)),(Object)(BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {_bcolor.getField(true,"b"),RemoteObject.createImmutable(2)}, "*",0, 1)))))); - BA.debugLineNum = 64;BA.debugLine="Dim strokeColor As Int = bc.ARGBToColor(bcolor)"; -Debug.JustUpdateDeviceLine(); -_strokecolor = __ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(true,"_argbtocolor",(Object)(_bcolor));Debug.locals.put("strokeColor", _strokecolor);Debug.locals.put("strokeColor", _strokecolor); - BA.debugLineNum = 66;BA.debugLine="bc.ColorToARGB(CrumbColor, bcolor)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_colortoargb",(Object)(__ref.getField(true,"_crumbcolor" /*RemoteObject*/ )),(Object)(_bcolor)); - BA.debugLineNum = 67;BA.debugLine="bcolor.r = bcolor.r * 0.8"; -Debug.JustUpdateDeviceLine(); -_bcolor.setField ("r",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_bcolor.getField(true,"r"),RemoteObject.createImmutable(0.8)}, "*",0, 0))); - BA.debugLineNum = 68;BA.debugLine="bcolor.g = bcolor.g * 0.8"; -Debug.JustUpdateDeviceLine(); -_bcolor.setField ("g",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_bcolor.getField(true,"g"),RemoteObject.createImmutable(0.8)}, "*",0, 0))); - BA.debugLineNum = 69;BA.debugLine="bcolor.b = bcolor.b * 0.8"; -Debug.JustUpdateDeviceLine(); -_bcolor.setField ("b",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_bcolor.getField(true,"b"),RemoteObject.createImmutable(0.8)}, "*",0, 0))); - BA.debugLineNum = 70;BA.debugLine="Dim Clrs() As Int = Array As Int(CrumbColor, bc.A"; -Debug.JustUpdateDeviceLine(); -_clrs = RemoteObject.createNewArray("int",new int[] {2},new Object[] {__ref.getField(true,"_crumbcolor" /*RemoteObject*/ ),__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(true,"_argbtocolor",(Object)(_bcolor))});Debug.locals.put("Clrs", _clrs);Debug.locals.put("Clrs", _clrs); - BA.debugLineNum = 72;BA.debugLine="RightPositions.Clear"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_rightpositions" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 73;BA.debugLine="If mItems.Size = 0 Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_mitems" /*RemoteObject*/ ).runMethod(true,"getSize"),BA.numberCast(double.class, 0))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 74;BA.debugLine="Dim Left As Int = 0"; -Debug.JustUpdateDeviceLine(); -_left = BA.numberCast(int.class, 0);Debug.locals.put("Left", _left);Debug.locals.put("Left", _left); - BA.debugLineNum = 75;BA.debugLine="For i = 0 To mItems.Size - 1"; -Debug.JustUpdateDeviceLine(); -{ -final int step16 = 1; -final int limit16 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mitems" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step16 > 0 && _i <= limit16) || (step16 < 0 && _i >= limit16) ;_i = ((int)(0 + _i + step16)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 76;BA.debugLine="Dim sc As Int"; -Debug.JustUpdateDeviceLine(); -_sc = RemoteObject.createImmutable(0);Debug.locals.put("sc", _sc); - BA.debugLineNum = 77;BA.debugLine="If PressedItem = i Then sc = strokeColor Else sc"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_presseditem" /*RemoteObject*/ ),BA.numberCast(double.class, _i))) { -_sc = _strokecolor;Debug.locals.put("sc", _sc);} -else { -_sc = BA.numberCast(int.class, 0);Debug.locals.put("sc", _sc);}; - BA.debugLineNum = 78;BA.debugLine="Dim width As Int = DrawItem(Left, mItems.Get(i),"; -Debug.JustUpdateDeviceLine(); -_width = __ref.runClassMethod (keymon.lat.medicomed.b4xbreadcrumb.class, "_drawitem" /*RemoteObject*/ ,(Object)(_left),(Object)(BA.ObjectToString(__ref.getField(false,"_mitems" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))))),(Object)(BA.ObjectToBoolean(RemoteObject.solveBoolean("=",RemoteObject.createImmutable(_i),BA.numberCast(double.class, 0)))),(Object)(BA.ObjectToBoolean(RemoteObject.solveBoolean("=",RemoteObject.createImmutable(_i),BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mitems" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1))))),(Object)(_clrs.getArrayElement(true,RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_i),_clrs.getField(true,"length")}, "%",0, 1))),(Object)(_sc));Debug.locals.put("width", _width);Debug.locals.put("width", _width); - BA.debugLineNum = 79;BA.debugLine="Left = Left + width + offset + 2dip"; -Debug.JustUpdateDeviceLine(); -_left = RemoteObject.solve(new RemoteObject[] {_left,_width,__ref.getField(true,"_offset" /*RemoteObject*/ ),b4xbreadcrumb.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)))}, "+++",3, 1);Debug.locals.put("Left", _left); - BA.debugLineNum = 80;BA.debugLine="RightPositions.Add(Left)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_rightpositions" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((_left))); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 82;BA.debugLine="cvs.Invalidate"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Invalidate"); - BA.debugLineNum = 83;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _drawitem(RemoteObject __ref,RemoteObject _left,RemoteObject _text,RemoteObject _first,RemoteObject _last,RemoteObject _clr,RemoteObject _strokecolor) throws Exception{ -try { - Debug.PushSubsStack("DrawItem (b4xbreadcrumb) ","b4xbreadcrumb",39,__ref.getField(false, "ba"),__ref,85); -if (RapidSub.canDelegate("drawitem")) { return __ref.runUserSub(false, "b4xbreadcrumb","drawitem", __ref, _left, _text, _first, _last, _clr, _strokecolor);} -RemoteObject _r = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XRect"); -RemoteObject _itemwidth = RemoteObject.createImmutable(0); -RemoteObject _itemheight = RemoteObject.createImmutable(0); -RemoteObject _baseline = RemoteObject.createImmutable(0); -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XPath"); -Debug.locals.put("Left", _left); -Debug.locals.put("Text", _text); -Debug.locals.put("First", _first); -Debug.locals.put("Last", _last); -Debug.locals.put("clr", _clr); -Debug.locals.put("strokeColor", _strokecolor); - BA.debugLineNum = 85;BA.debugLine="Private Sub DrawItem(Left As Int, Text As String,"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 86;BA.debugLine="Dim r As B4XRect = cvs.MeasureText(Text, fnt)"; -Debug.JustUpdateDeviceLine(); -_r = __ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"MeasureText",(Object)(_text),(Object)(__ref.getField(false,"_fnt" /*RemoteObject*/ )));Debug.locals.put("r", _r);Debug.locals.put("r", _r); - BA.debugLineNum = 87;BA.debugLine="Dim ItemWidth As Int = r.Width + 30dip"; -Debug.JustUpdateDeviceLine(); -_itemwidth = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_r.runMethod(true,"getWidth"),b4xbreadcrumb.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 30)))}, "+",1, 0));Debug.locals.put("ItemWidth", _itemwidth);Debug.locals.put("ItemWidth", _itemwidth); - BA.debugLineNum = 88;BA.debugLine="Dim ItemHeight As Int = cvs.TargetRect.Height"; -Debug.JustUpdateDeviceLine(); -_itemheight = BA.numberCast(int.class, __ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getHeight"));Debug.locals.put("ItemHeight", _itemheight);Debug.locals.put("ItemHeight", _itemheight); - BA.debugLineNum = 89;BA.debugLine="Dim BaseLine As Int = cvs.TargetRect.CenterY - r."; -Debug.JustUpdateDeviceLine(); -_baseline = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterY"),_r.runMethod(true,"getHeight"),RemoteObject.createImmutable(2),_r.runMethod(true,"getTop")}, "-/-",2, 0));Debug.locals.put("BaseLine", _baseline);Debug.locals.put("BaseLine", _baseline); - BA.debugLineNum = 90;BA.debugLine="Dim p As B4XPath"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas.B4XPath");Debug.locals.put("p", _p); - BA.debugLineNum = 91;BA.debugLine="p.Initialize(Left, 0)"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("Initialize",(Object)(BA.numberCast(float.class, _left)),(Object)(BA.numberCast(float.class, 0))); - BA.debugLineNum = 92;BA.debugLine="p.LineTo(Left + ItemWidth, 0)"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("LineTo",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_left,_itemwidth}, "+",1, 1))),(Object)(BA.numberCast(float.class, 0))); - BA.debugLineNum = 93;BA.debugLine="If Last = False Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_last,b4xbreadcrumb.__c.getField(true,"False"))) { - BA.debugLineNum = 94;BA.debugLine="p.LineTo(Left + ItemWidth + offset, ItemHeight /"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("LineTo",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_left,_itemwidth,__ref.getField(true,"_offset" /*RemoteObject*/ )}, "++",2, 1))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_itemheight,RemoteObject.createImmutable(2)}, "/",0, 0)))); - }; - BA.debugLineNum = 96;BA.debugLine="p.LineTo(Left + ItemWidth, ItemHeight)"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("LineTo",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_left,_itemwidth}, "+",1, 1))),(Object)(BA.numberCast(float.class, _itemheight))); - BA.debugLineNum = 97;BA.debugLine="If First = False Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_first,b4xbreadcrumb.__c.getField(true,"False"))) { - BA.debugLineNum = 98;BA.debugLine="p.LineTo(Left - offset, ItemHeight)"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("LineTo",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_left,__ref.getField(true,"_offset" /*RemoteObject*/ )}, "-",1, 1))),(Object)(BA.numberCast(float.class, _itemheight))); - BA.debugLineNum = 99;BA.debugLine="p.LineTo(Left, ItemHeight / 2)"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("LineTo",(Object)(BA.numberCast(float.class, _left)),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_itemheight,RemoteObject.createImmutable(2)}, "/",0, 0)))); - BA.debugLineNum = 100;BA.debugLine="p.LineTo(Left - offset, 0)"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("LineTo",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_left,__ref.getField(true,"_offset" /*RemoteObject*/ )}, "-",1, 1))),(Object)(BA.numberCast(float.class, 0))); - }else { - BA.debugLineNum = 102;BA.debugLine="p.LineTo(Left, ItemHeight)"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("LineTo",(Object)(BA.numberCast(float.class, _left)),(Object)(BA.numberCast(float.class, _itemheight))); - }; - BA.debugLineNum = 104;BA.debugLine="p.LineTo(Left, 0)"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("LineTo",(Object)(BA.numberCast(float.class, _left)),(Object)(BA.numberCast(float.class, 0))); - BA.debugLineNum = 105;BA.debugLine="cvs.DrawPath(p, clr, True, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawPath",(Object)(_p),(Object)(_clr),(Object)(b4xbreadcrumb.__c.getField(true,"True")),(Object)(BA.numberCast(float.class, 0))); - BA.debugLineNum = 106;BA.debugLine="If strokeColor <> 0 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("!",_strokecolor,BA.numberCast(double.class, 0))) { - BA.debugLineNum = 107;BA.debugLine="cvs.DrawPath(p, strokeColor, False, 3dip)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawPath",(Object)(_p),(Object)(_strokecolor),(Object)(b4xbreadcrumb.__c.getField(true,"False")),(Object)(BA.numberCast(float.class, b4xbreadcrumb.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 3)))))); - }; - BA.debugLineNum = 110;BA.debugLine="cvs.DrawText(Text, Left + ItemWidth / 2, BaseLine"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawText",__ref.getField(false, "ba"),(Object)(_text),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_left,_itemwidth,RemoteObject.createImmutable(2)}, "+/",1, 0))),(Object)(BA.numberCast(float.class, _baseline)),(Object)(__ref.getField(false,"_fnt" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_textcolor" /*RemoteObject*/ )),(Object)(BA.getEnumFromString(BA.getDeviceClass("android.graphics.Paint.Align"),RemoteObject.createImmutable("CENTER")))); - BA.debugLineNum = 111;BA.debugLine="Return ItemWidth"; -Debug.JustUpdateDeviceLine(); -if (true) return _itemwidth; - BA.debugLineNum = 112;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _finditem(RemoteObject __ref,RemoteObject _x,RemoteObject _y) throws Exception{ -try { - Debug.PushSubsStack("FindItem (b4xbreadcrumb) ","b4xbreadcrumb",39,__ref.getField(false, "ba"),__ref,136); -if (RapidSub.canDelegate("finditem")) { return __ref.runUserSub(false, "b4xbreadcrumb","finditem", __ref, _x, _y);} -RemoteObject _r = RemoteObject.createImmutable(0); -int _i = 0; -Debug.locals.put("x", _x); -Debug.locals.put("y", _y); - BA.debugLineNum = 136;BA.debugLine="Private Sub FindItem (x As Int, y As Int) As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 137;BA.debugLine="If RightPositions.Size = 0 Then Return -1"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_rightpositions" /*RemoteObject*/ ).runMethod(true,"getSize"),BA.numberCast(double.class, 0))) { -if (true) return BA.numberCast(int.class, -(double) (0 + 1));}; - BA.debugLineNum = 138;BA.debugLine="If y < 0 Or y > cvs.TargetRect.Height Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("<",_y,BA.numberCast(double.class, 0)) || RemoteObject.solveBoolean(">",_y,BA.numberCast(double.class, __ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getHeight")))) { -if (true) return BA.numberCast(int.class, -(double) (0 + 1));}; - BA.debugLineNum = 139;BA.debugLine="Dim r As Int = RightPositions.Get(RightPositions."; -Debug.JustUpdateDeviceLine(); -_r = BA.numberCast(int.class, __ref.getField(false,"_rightpositions" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_rightpositions" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1))));Debug.locals.put("r", _r);Debug.locals.put("r", _r); - BA.debugLineNum = 140;BA.debugLine="If x > r Then Return -1"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",_x,BA.numberCast(double.class, _r))) { -if (true) return BA.numberCast(int.class, -(double) (0 + 1));}; - BA.debugLineNum = 141;BA.debugLine="For i = RightPositions.Size - 2 To 0 Step -1"; -Debug.JustUpdateDeviceLine(); -{ -final int step5 = -1; -final int limit5 = 0; -_i = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_rightpositions" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(2)}, "-",1, 1).get().intValue() ; -for (;(step5 > 0 && _i <= limit5) || (step5 < 0 && _i >= limit5) ;_i = ((int)(0 + _i + step5)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 142;BA.debugLine="Dim r As Int = RightPositions.Get(i)"; -Debug.JustUpdateDeviceLine(); -_r = BA.numberCast(int.class, __ref.getField(false,"_rightpositions" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))));Debug.locals.put("r", _r);Debug.locals.put("r", _r); - BA.debugLineNum = 143;BA.debugLine="If x > r Then Return i + 1"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",_x,BA.numberCast(double.class, _r))) { -if (true) return RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_i),RemoteObject.createImmutable(1)}, "+",1, 1);}; - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 145;BA.debugLine="Return 0"; -Debug.JustUpdateDeviceLine(); -if (true) return BA.numberCast(int.class, 0); - BA.debugLineNum = 146;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getitems(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getItems (b4xbreadcrumb) ","b4xbreadcrumb",39,__ref.getField(false, "ba"),__ref,153); -if (RapidSub.canDelegate("getitems")) { return __ref.runUserSub(false, "b4xbreadcrumb","getitems", __ref);} - BA.debugLineNum = 153;BA.debugLine="Public Sub getItems As List"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 154;BA.debugLine="Return mItems"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_mitems" /*RemoteObject*/ ); - BA.debugLineNum = 155;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _callback,RemoteObject _eventname) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xbreadcrumb) ","b4xbreadcrumb",39,__ref.getField(false, "ba"),__ref,24); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xbreadcrumb","initialize", __ref, _ba, _callback, _eventname);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); -Debug.locals.put("Callback", _callback); -Debug.locals.put("EventName", _eventname); - BA.debugLineNum = 24;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 25;BA.debugLine="mEventName = EventName"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_meventname" /*RemoteObject*/ ,_eventname); - BA.debugLineNum = 26;BA.debugLine="mCallBack = Callback"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mcallback" /*RemoteObject*/ ,_callback); - BA.debugLineNum = 27;BA.debugLine="mItems.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mitems" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 28;BA.debugLine="RightPositions.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_rightpositions" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 29;BA.debugLine="bc.Initialize(1, 1)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_initialize",__ref.getField(false, "ba"),(Object)(BA.numberCast(int.class, 1)),(Object)(BA.numberCast(int.class, 1))); - BA.debugLineNum = 30;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setitems(RemoteObject __ref,RemoteObject _i) throws Exception{ -try { - Debug.PushSubsStack("setItems (b4xbreadcrumb) ","b4xbreadcrumb",39,__ref.getField(false, "ba"),__ref,148); -if (RapidSub.canDelegate("setitems")) { return __ref.runUserSub(false, "b4xbreadcrumb","setitems", __ref, _i);} -Debug.locals.put("i", _i); - BA.debugLineNum = 148;BA.debugLine="Public Sub setItems (i As List)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 149;BA.debugLine="mItems = i"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mitems" /*RemoteObject*/ ,_i); - BA.debugLineNum = 150;BA.debugLine="Draw"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xbreadcrumb.class, "_draw" /*RemoteObject*/ ); - BA.debugLineNum = 151;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _touch_touch(RemoteObject __ref,RemoteObject _action,RemoteObject _x,RemoteObject _y) throws Exception{ -try { - Debug.PushSubsStack("Touch_Touch (b4xbreadcrumb) ","b4xbreadcrumb",39,__ref.getField(false, "ba"),__ref,114); -if (RapidSub.canDelegate("touch_touch")) { return __ref.runUserSub(false, "b4xbreadcrumb","touch_touch", __ref, _action, _x, _y);} -RemoteObject _prev = RemoteObject.createImmutable(0); -RemoteObject _index = RemoteObject.createImmutable(0); -RemoteObject _items = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -int _i = 0; -Debug.locals.put("Action", _action); -Debug.locals.put("X", _x); -Debug.locals.put("Y", _y); - BA.debugLineNum = 114;BA.debugLine="Private Sub Touch_Touch (Action As Int, X As Float"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 115;BA.debugLine="Select Action"; -Debug.JustUpdateDeviceLine(); -switch (BA.switchObjectToInt(_action,__ref.getField(false,"_touchpanel" /*RemoteObject*/ ).getField(true,"TOUCH_ACTION_DOWN"),__ref.getField(false,"_touchpanel" /*RemoteObject*/ ).getField(true,"TOUCH_ACTION_MOVE"),__ref.getField(false,"_touchpanel" /*RemoteObject*/ ).getField(true,"TOUCH_ACTION_UP"))) { -case 0: -case 1: { - BA.debugLineNum = 117;BA.debugLine="Dim prev As Int = PressedItem"; -Debug.JustUpdateDeviceLine(); -_prev = __ref.getField(true,"_presseditem" /*RemoteObject*/ );Debug.locals.put("prev", _prev);Debug.locals.put("prev", _prev); - BA.debugLineNum = 118;BA.debugLine="PressedItem = FindItem(X, Y)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_presseditem" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.b4xbreadcrumb.class, "_finditem" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, _x)),(Object)(BA.numberCast(int.class, _y)))); - BA.debugLineNum = 119;BA.debugLine="If prev <> PressedItem Then Draw"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("!",_prev,BA.numberCast(double.class, __ref.getField(true,"_presseditem" /*RemoteObject*/ )))) { -__ref.runClassMethod (keymon.lat.medicomed.b4xbreadcrumb.class, "_draw" /*RemoteObject*/ );}; - break; } -case 2: { - BA.debugLineNum = 121;BA.debugLine="Dim index As Int = FindItem(X, Y)"; -Debug.JustUpdateDeviceLine(); -_index = __ref.runClassMethod (keymon.lat.medicomed.b4xbreadcrumb.class, "_finditem" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, _x)),(Object)(BA.numberCast(int.class, _y)));Debug.locals.put("index", _index);Debug.locals.put("index", _index); - BA.debugLineNum = 122;BA.debugLine="If index = PressedItem And index > -1 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_index,BA.numberCast(double.class, __ref.getField(true,"_presseditem" /*RemoteObject*/ ))) && RemoteObject.solveBoolean(">",_index,BA.numberCast(double.class, -(double) (0 + 1)))) { - BA.debugLineNum = 123;BA.debugLine="Dim Items As List"; -Debug.JustUpdateDeviceLine(); -_items = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");Debug.locals.put("Items", _items); - BA.debugLineNum = 124;BA.debugLine="Items.Initialize"; -Debug.JustUpdateDeviceLine(); -_items.runVoidMethod ("Initialize"); - BA.debugLineNum = 125;BA.debugLine="For i = 0 To index"; -Debug.JustUpdateDeviceLine(); -{ -final int step11 = 1; -final int limit11 = _index.get().intValue(); -_i = 0 ; -for (;(step11 > 0 && _i <= limit11) || (step11 < 0 && _i >= limit11) ;_i = ((int)(0 + _i + step11)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 126;BA.debugLine="Items.Add(mItems.Get(i))"; -Debug.JustUpdateDeviceLine(); -_items.runVoidMethod ("Add",(Object)(__ref.getField(false,"_mitems" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))))); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 128;BA.debugLine="If mHaptic Then XUIViewsUtils.PerformHapticFee"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_mhaptic" /*RemoteObject*/ ).get().booleanValue()) { -b4xbreadcrumb._xuiviewsutils.runVoidMethod ("_performhapticfeedback" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ )));}; - BA.debugLineNum = 129;BA.debugLine="CallSub2(mCallBack, mEventName & \"_CrumbClick\""; -Debug.JustUpdateDeviceLine(); -b4xbreadcrumb.__c.runMethodAndSync(false,"CallSubNew2",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_CrumbClick"))),(Object)((_items))); - }; - BA.debugLineNum = 131;BA.debugLine="PressedItem = -1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_presseditem" /*RemoteObject*/ ,BA.numberCast(int.class, -(double) (0 + 1))); - BA.debugLineNum = 132;BA.debugLine="Draw"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xbreadcrumb.class, "_draw" /*RemoteObject*/ ); - break; } -} -; - BA.debugLineNum = 134;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xbytesbuilder.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xbytesbuilder.java deleted file mode 100644 index 3536045..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xbytesbuilder.java +++ /dev/null @@ -1,31 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xbytesbuilder { - public static RemoteObject myClass; - public b4xbytesbuilder() { - } - public static PCBA staticBA = new PCBA(null, b4xbytesbuilder.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _mbuffer = null; -public static RemoteObject _mlength = RemoteObject.createImmutable(0); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"DateUtils",_ref.getField(false, "_dateutils"),"mBuffer",_ref.getField(false, "_mbuffer"),"mLength",_ref.getField(false, "_mlength")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xbytesbuilder_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xbytesbuilder_subs_0.java deleted file mode 100644 index 17aca5e..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xbytesbuilder_subs_0.java +++ /dev/null @@ -1,473 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xbytesbuilder_subs_0 { - - -public static RemoteObject _append(RemoteObject __ref,RemoteObject _data) throws Exception{ -try { - Debug.PushSubsStack("Append (b4xbytesbuilder) ","b4xbytesbuilder",27,__ref.getField(false, "ba"),__ref,24); -if (RapidSub.canDelegate("append")) { return __ref.runUserSub(false, "b4xbytesbuilder","append", __ref, _data);} -Debug.locals.put("Data", _data); - BA.debugLineNum = 24;BA.debugLine="Public Sub Append(Data() As Byte) As B4XBytesBuild"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 25;BA.debugLine="Return Append2(Data, 0, Data.Length)"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.runClassMethod (keymon.lat.medicomed.b4xbytesbuilder.class, "_append2" /*RemoteObject*/ ,(Object)(_data),(Object)(BA.numberCast(int.class, 0)),(Object)(_data.getField(true,"length"))); - BA.debugLineNum = 26;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _append2(RemoteObject __ref,RemoteObject _data,RemoteObject _startindex,RemoteObject _length) throws Exception{ -try { - Debug.PushSubsStack("Append2 (b4xbytesbuilder) ","b4xbytesbuilder",27,__ref.getField(false, "ba"),__ref,31); -if (RapidSub.canDelegate("append2")) { return __ref.runUserSub(false, "b4xbytesbuilder","append2", __ref, _data, _startindex, _length);} -RemoteObject _oldlength = RemoteObject.createImmutable(0); -Debug.locals.put("Data", _data); -Debug.locals.put("StartIndex", _startindex); -Debug.locals.put("Length", _length); - BA.debugLineNum = 31;BA.debugLine="Public Sub Append2(Data() As Byte, StartIndex As I"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 32;BA.debugLine="Dim OldLength As Int = ChangeLength(mLength + Len"; -Debug.JustUpdateDeviceLine(); -_oldlength = __ref.runClassMethod (keymon.lat.medicomed.b4xbytesbuilder.class, "_changelength" /*RemoteObject*/ ,(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mlength" /*RemoteObject*/ ),_length}, "+",1, 1)));Debug.locals.put("OldLength", _oldlength);Debug.locals.put("OldLength", _oldlength); - BA.debugLineNum = 33;BA.debugLine="Bit.ArrayCopy(Data, StartIndex, mBuffer, OldLengt"; -Debug.JustUpdateDeviceLine(); -b4xbytesbuilder.__c.getField(false,"Bit").runVoidMethod ("ArrayCopy",(Object)((_data)),(Object)(_startindex),(Object)((__ref.getField(false,"_mbuffer" /*RemoteObject*/ ))),(Object)(_oldlength),(Object)(_length)); - BA.debugLineNum = 34;BA.debugLine="Return Me"; -Debug.JustUpdateDeviceLine(); -if (true) return (__ref); - BA.debugLineNum = 35;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _changelength(RemoteObject __ref,RemoteObject _newlength) throws Exception{ -try { - Debug.PushSubsStack("ChangeLength (b4xbytesbuilder) ","b4xbytesbuilder",27,__ref.getField(false, "ba"),__ref,12); -if (RapidSub.canDelegate("changelength")) { return __ref.runUserSub(false, "b4xbytesbuilder","changelength", __ref, _newlength);} -RemoteObject _oldlength = RemoteObject.createImmutable(0); -RemoteObject _b = null; -Debug.locals.put("NewLength", _newlength); - BA.debugLineNum = 12;BA.debugLine="Private Sub ChangeLength (NewLength As Int) As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 13;BA.debugLine="Dim OldLength As Int = mLength"; -Debug.JustUpdateDeviceLine(); -_oldlength = __ref.getField(true,"_mlength" /*RemoteObject*/ );Debug.locals.put("OldLength", _oldlength);Debug.locals.put("OldLength", _oldlength); - BA.debugLineNum = 14;BA.debugLine="mLength = NewLength"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mlength" /*RemoteObject*/ ,_newlength); - BA.debugLineNum = 15;BA.debugLine="If mBuffer.Length < mLength Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("<",__ref.getField(false,"_mbuffer" /*RemoteObject*/ ).getField(true,"length"),BA.numberCast(double.class, __ref.getField(true,"_mlength" /*RemoteObject*/ )))) { - BA.debugLineNum = 16;BA.debugLine="Dim b(Max(mBuffer.Length * 2, NewLength)) As Byt"; -Debug.JustUpdateDeviceLine(); -_b = RemoteObject.createNewArray ("byte", new int[] {(int) (0 + b4xbytesbuilder.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbuffer" /*RemoteObject*/ ).getField(true,"length"),RemoteObject.createImmutable(2)}, "*",0, 1))),(Object)(BA.numberCast(double.class, _newlength))).get().doubleValue())}, new Object[]{});Debug.locals.put("b", _b); - BA.debugLineNum = 17;BA.debugLine="Bit.ArrayCopy(mBuffer, 0, b, 0, mBuffer.Length)"; -Debug.JustUpdateDeviceLine(); -b4xbytesbuilder.__c.getField(false,"Bit").runVoidMethod ("ArrayCopy",(Object)((__ref.getField(false,"_mbuffer" /*RemoteObject*/ ))),(Object)(BA.numberCast(int.class, 0)),(Object)((_b)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_mbuffer" /*RemoteObject*/ ).getField(true,"length"))); - BA.debugLineNum = 18;BA.debugLine="mBuffer = b"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mbuffer" /*RemoteObject*/ ,_b); - }; - BA.debugLineNum = 20;BA.debugLine="Return OldLength"; -Debug.JustUpdateDeviceLine(); -if (true) return _oldlength; - BA.debugLineNum = 21;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Private mBuffer() As Byte"; -b4xbytesbuilder._mbuffer = RemoteObject.createNewArray ("byte", new int[] {0}, new Object[]{});__ref.setField("_mbuffer",b4xbytesbuilder._mbuffer); - //BA.debugLineNum = 3;BA.debugLine="Private mLength As Int"; -b4xbytesbuilder._mlength = RemoteObject.createImmutable(0);__ref.setField("_mlength",b4xbytesbuilder._mlength); - //BA.debugLineNum = 4;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _clear(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Clear (b4xbytesbuilder) ","b4xbytesbuilder",27,__ref.getField(false, "ba"),__ref,37); -if (RapidSub.canDelegate("clear")) { return __ref.runUserSub(false, "b4xbytesbuilder","clear", __ref);} - BA.debugLineNum = 37;BA.debugLine="Public Sub Clear"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 38;BA.debugLine="ChangeLength(0)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xbytesbuilder.class, "_changelength" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 39;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getbuffer(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getBuffer (b4xbytesbuilder) ","b4xbytesbuilder",27,__ref.getField(false, "ba"),__ref,103); -if (RapidSub.canDelegate("getbuffer")) { return __ref.runUserSub(false, "b4xbytesbuilder","getbuffer", __ref);} - BA.debugLineNum = 103;BA.debugLine="Private Sub getBuffer As Byte() 'ignore"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 104;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getinternalbuffer(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getInternalBuffer (b4xbytesbuilder) ","b4xbytesbuilder",27,__ref.getField(false, "ba"),__ref,127); -if (RapidSub.canDelegate("getinternalbuffer")) { return __ref.runUserSub(false, "b4xbytesbuilder","getinternalbuffer", __ref);} - BA.debugLineNum = 127;BA.debugLine="Public Sub getInternalBuffer As Byte()"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 128;BA.debugLine="Return mBuffer"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_mbuffer" /*RemoteObject*/ ); - BA.debugLineNum = 129;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getlength(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getLength (b4xbytesbuilder) ","b4xbytesbuilder",27,__ref.getField(false, "ba"),__ref,92); -if (RapidSub.canDelegate("getlength")) { return __ref.runUserSub(false, "b4xbytesbuilder","getlength", __ref);} - BA.debugLineNum = 92;BA.debugLine="Public Sub getLength As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 93;BA.debugLine="Return mLength"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_mlength" /*RemoteObject*/ ); - BA.debugLineNum = 94;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _indexof(RemoteObject __ref,RemoteObject _searchfor) throws Exception{ -try { - Debug.PushSubsStack("IndexOf (b4xbytesbuilder) ","b4xbytesbuilder",27,__ref.getField(false, "ba"),__ref,107); -if (RapidSub.canDelegate("indexof")) { return __ref.runUserSub(false, "b4xbytesbuilder","indexof", __ref, _searchfor);} -Debug.locals.put("SearchFor", _searchfor); - BA.debugLineNum = 107;BA.debugLine="Public Sub IndexOf(SearchFor() As Byte) As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 108;BA.debugLine="Return IndexOf2(SearchFor, 0)"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.runClassMethod (keymon.lat.medicomed.b4xbytesbuilder.class, "_indexof2" /*RemoteObject*/ ,(Object)(_searchfor),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 109;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _indexof2(RemoteObject __ref,RemoteObject _searchfor,RemoteObject _index) throws Exception{ -try { - Debug.PushSubsStack("IndexOf2 (b4xbytesbuilder) ","b4xbytesbuilder",27,__ref.getField(false, "ba"),__ref,112); -if (RapidSub.canDelegate("indexof2")) { return __ref.runUserSub(false, "b4xbytesbuilder","indexof2", __ref, _searchfor, _index);} -int _i1 = 0; -int _i2 = 0; -Debug.locals.put("SearchFor", _searchfor); -Debug.locals.put("Index", _index); - BA.debugLineNum = 112;BA.debugLine="Public Sub IndexOf2(SearchFor() As Byte, Index As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 113;BA.debugLine="For i1 = Index To mLength - SearchFor.Length"; -Debug.JustUpdateDeviceLine(); -{ -final int step1 = 1; -final int limit1 = RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mlength" /*RemoteObject*/ ),_searchfor.getField(true,"length")}, "-",1, 1).get().intValue(); -_i1 = _index.get().intValue() ; -for (;(step1 > 0 && _i1 <= limit1) || (step1 < 0 && _i1 >= limit1) ;_i1 = ((int)(0 + _i1 + step1)) ) { -Debug.locals.put("i1", _i1); - BA.debugLineNum = 114;BA.debugLine="For i2 = 0 To SearchFor.Length - 1"; -Debug.JustUpdateDeviceLine(); -{ -final int step2 = 1; -final int limit2 = RemoteObject.solve(new RemoteObject[] {_searchfor.getField(true,"length"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i2 = 0 ; -for (;(step2 > 0 && _i2 <= limit2) || (step2 < 0 && _i2 >= limit2) ;_i2 = ((int)(0 + _i2 + step2)) ) { -Debug.locals.put("i2", _i2); - BA.debugLineNum = 115;BA.debugLine="If SearchFor(i2) <> mBuffer(i1 + i2) Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("!",_searchfor.getArrayElement(true,BA.numberCast(int.class, _i2)),BA.numberCast(double.class, __ref.getField(false,"_mbuffer" /*RemoteObject*/ ).getArrayElement(true,RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_i1),RemoteObject.createImmutable(_i2)}, "+",1, 1))))) { - BA.debugLineNum = 116;BA.debugLine="Exit"; -Debug.JustUpdateDeviceLine(); -if (true) break; - }; - } -}Debug.locals.put("i2", _i2); -; - BA.debugLineNum = 119;BA.debugLine="If i2 = SearchFor.Length Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",RemoteObject.createImmutable(_i2),BA.numberCast(double.class, _searchfor.getField(true,"length")))) { - BA.debugLineNum = 120;BA.debugLine="Return i1"; -Debug.JustUpdateDeviceLine(); -if (true) return BA.numberCast(int.class, _i1); - }; - } -}Debug.locals.put("i1", _i1); -; - BA.debugLineNum = 123;BA.debugLine="Return -1"; -Debug.JustUpdateDeviceLine(); -if (true) return BA.numberCast(int.class, -(double) (0 + 1)); - BA.debugLineNum = 124;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xbytesbuilder) ","b4xbytesbuilder",27,__ref.getField(false, "ba"),__ref,6); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xbytesbuilder","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 6;BA.debugLine="Public Sub Initialize"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 7;BA.debugLine="Dim mBuffer(100) As Byte"; -Debug.JustUpdateDeviceLine(); -b4xbytesbuilder._mbuffer = RemoteObject.createNewArray ("byte", new int[] {100}, new Object[]{});__ref.setField("_mbuffer",b4xbytesbuilder._mbuffer); - BA.debugLineNum = 8;BA.debugLine="mLength = 0"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mlength" /*RemoteObject*/ ,BA.numberCast(int.class, 0)); - BA.debugLineNum = 9;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _insert(RemoteObject __ref,RemoteObject _index,RemoteObject _data) throws Exception{ -try { - Debug.PushSubsStack("Insert (b4xbytesbuilder) ","b4xbytesbuilder",27,__ref.getField(false, "ba"),__ref,43); -if (RapidSub.canDelegate("insert")) { return __ref.runUserSub(false, "b4xbytesbuilder","insert", __ref, _index, _data);} -RemoteObject _afterindex = null; -Debug.locals.put("Index", _index); -Debug.locals.put("Data", _data); - BA.debugLineNum = 43;BA.debugLine="Public Sub Insert(Index As Int, Data() As Byte)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 44;BA.debugLine="If Index >= mLength Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("g",_index,BA.numberCast(double.class, __ref.getField(true,"_mlength" /*RemoteObject*/ )))) { - BA.debugLineNum = 45;BA.debugLine="If Index > mLength Then Log(\"Index too large\")"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",_index,BA.numberCast(double.class, __ref.getField(true,"_mlength" /*RemoteObject*/ )))) { -b4xbytesbuilder.__c.runVoidMethod ("LogImpl","934734082",RemoteObject.createImmutable("Index too large"),0);}; - BA.debugLineNum = 46;BA.debugLine="Append(Data)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xbytesbuilder.class, "_append" /*RemoteObject*/ ,(Object)(_data)); - }else { - BA.debugLineNum = 48;BA.debugLine="Dim AfterIndex() As Byte = SubArray(Index)"; -Debug.JustUpdateDeviceLine(); -_afterindex = __ref.runClassMethod (keymon.lat.medicomed.b4xbytesbuilder.class, "_subarray" /*RemoteObject*/ ,(Object)(_index));Debug.locals.put("AfterIndex", _afterindex);Debug.locals.put("AfterIndex", _afterindex); - BA.debugLineNum = 49;BA.debugLine="ChangeLength(mLength + Data.Length)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xbytesbuilder.class, "_changelength" /*RemoteObject*/ ,(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mlength" /*RemoteObject*/ ),_data.getField(true,"length")}, "+",1, 1))); - BA.debugLineNum = 50;BA.debugLine="Bit.ArrayCopy(Data, 0, mBuffer, Index, Data.Leng"; -Debug.JustUpdateDeviceLine(); -b4xbytesbuilder.__c.getField(false,"Bit").runVoidMethod ("ArrayCopy",(Object)((_data)),(Object)(BA.numberCast(int.class, 0)),(Object)((__ref.getField(false,"_mbuffer" /*RemoteObject*/ ))),(Object)(_index),(Object)(_data.getField(true,"length"))); - BA.debugLineNum = 51;BA.debugLine="Bit.ArrayCopy(AfterIndex, 0, mBuffer, Index + Da"; -Debug.JustUpdateDeviceLine(); -b4xbytesbuilder.__c.getField(false,"Bit").runVoidMethod ("ArrayCopy",(Object)((_afterindex)),(Object)(BA.numberCast(int.class, 0)),(Object)((__ref.getField(false,"_mbuffer" /*RemoteObject*/ ))),(Object)(RemoteObject.solve(new RemoteObject[] {_index,_data.getField(true,"length")}, "+",1, 1)),(Object)(_afterindex.getField(true,"length"))); - }; - BA.debugLineNum = 53;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _remove(RemoteObject __ref,RemoteObject _beginindex,RemoteObject _endindex) throws Exception{ -try { - Debug.PushSubsStack("Remove (b4xbytesbuilder) ","b4xbytesbuilder",27,__ref.getField(false, "ba"),__ref,69); -if (RapidSub.canDelegate("remove")) { return __ref.runUserSub(false, "b4xbytesbuilder","remove", __ref, _beginindex, _endindex);} -RemoteObject _res = null; -RemoteObject _afterendindex = null; -Debug.locals.put("BeginIndex", _beginindex); -Debug.locals.put("EndIndex", _endindex); - BA.debugLineNum = 69;BA.debugLine="Public Sub Remove(BeginIndex As Int, EndIndex As I"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 70;BA.debugLine="Dim res() As Byte = SubArray2(BeginIndex, EndInde"; -Debug.JustUpdateDeviceLine(); -_res = __ref.runClassMethod (keymon.lat.medicomed.b4xbytesbuilder.class, "_subarray2" /*RemoteObject*/ ,(Object)(_beginindex),(Object)(_endindex));Debug.locals.put("res", _res);Debug.locals.put("res", _res); - BA.debugLineNum = 71;BA.debugLine="If EndIndex <= mLength Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("k",_endindex,BA.numberCast(double.class, __ref.getField(true,"_mlength" /*RemoteObject*/ )))) { - BA.debugLineNum = 72;BA.debugLine="Dim AfterEndIndex() As Byte = SubArray(EndIndex)"; -Debug.JustUpdateDeviceLine(); -_afterendindex = __ref.runClassMethod (keymon.lat.medicomed.b4xbytesbuilder.class, "_subarray" /*RemoteObject*/ ,(Object)(_endindex));Debug.locals.put("AfterEndIndex", _afterendindex);Debug.locals.put("AfterEndIndex", _afterendindex); - BA.debugLineNum = 73;BA.debugLine="Bit.ArrayCopy(AfterEndIndex, 0, mBuffer, BeginIn"; -Debug.JustUpdateDeviceLine(); -b4xbytesbuilder.__c.getField(false,"Bit").runVoidMethod ("ArrayCopy",(Object)((_afterendindex)),(Object)(BA.numberCast(int.class, 0)),(Object)((__ref.getField(false,"_mbuffer" /*RemoteObject*/ ))),(Object)(_beginindex),(Object)(_afterendindex.getField(true,"length"))); - }; - BA.debugLineNum = 75;BA.debugLine="ChangeLength(mLength - (EndIndex - BeginIndex))"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xbytesbuilder.class, "_changelength" /*RemoteObject*/ ,(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mlength" /*RemoteObject*/ ),(RemoteObject.solve(new RemoteObject[] {_endindex,_beginindex}, "-",1, 1))}, "-",1, 1))); - BA.debugLineNum = 76;BA.debugLine="Return res"; -Debug.JustUpdateDeviceLine(); -if (true) return _res; - BA.debugLineNum = 77;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _set(RemoteObject __ref,RemoteObject _index,RemoteObject _data) throws Exception{ -try { - Debug.PushSubsStack("Set (b4xbytesbuilder) ","b4xbytesbuilder",27,__ref.getField(false, "ba"),__ref,56); -if (RapidSub.canDelegate("set")) { return __ref.runUserSub(false, "b4xbytesbuilder","set", __ref, _index, _data);} -Debug.locals.put("Index", _index); -Debug.locals.put("Data", _data); - BA.debugLineNum = 56;BA.debugLine="Public Sub Set(Index As Int, Data() As Byte)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 57;BA.debugLine="If Index >= mLength Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("g",_index,BA.numberCast(double.class, __ref.getField(true,"_mlength" /*RemoteObject*/ )))) { - BA.debugLineNum = 58;BA.debugLine="If Index > mLength Then Log(\"Index too large\")"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",_index,BA.numberCast(double.class, __ref.getField(true,"_mlength" /*RemoteObject*/ )))) { -b4xbytesbuilder.__c.runVoidMethod ("LogImpl","934799618",RemoteObject.createImmutable("Index too large"),0);}; - BA.debugLineNum = 59;BA.debugLine="Append(Data)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xbytesbuilder.class, "_append" /*RemoteObject*/ ,(Object)(_data)); - }else { - BA.debugLineNum = 61;BA.debugLine="If Data.Length + Index > mLength Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",RemoteObject.solve(new RemoteObject[] {_data.getField(true,"length"),_index}, "+",1, 1),BA.numberCast(double.class, __ref.getField(true,"_mlength" /*RemoteObject*/ )))) { - BA.debugLineNum = 62;BA.debugLine="ChangeLength(Data.Length + Index)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xbytesbuilder.class, "_changelength" /*RemoteObject*/ ,(Object)(RemoteObject.solve(new RemoteObject[] {_data.getField(true,"length"),_index}, "+",1, 1))); - }; - BA.debugLineNum = 64;BA.debugLine="Bit.ArrayCopy(Data, 0, mBuffer, Index, Data.Leng"; -Debug.JustUpdateDeviceLine(); -b4xbytesbuilder.__c.getField(false,"Bit").runVoidMethod ("ArrayCopy",(Object)((_data)),(Object)(BA.numberCast(int.class, 0)),(Object)((__ref.getField(false,"_mbuffer" /*RemoteObject*/ ))),(Object)(_index),(Object)(_data.getField(true,"length"))); - }; - BA.debugLineNum = 66;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _subarray(RemoteObject __ref,RemoteObject _beginindex) throws Exception{ -try { - Debug.PushSubsStack("SubArray (b4xbytesbuilder) ","b4xbytesbuilder",27,__ref.getField(false, "ba"),__ref,80); -if (RapidSub.canDelegate("subarray")) { return __ref.runUserSub(false, "b4xbytesbuilder","subarray", __ref, _beginindex);} -Debug.locals.put("BeginIndex", _beginindex); - BA.debugLineNum = 80;BA.debugLine="Public Sub SubArray(BeginIndex As Int) As Byte()"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 81;BA.debugLine="Return SubArray2(BeginIndex, mLength)"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.runClassMethod (keymon.lat.medicomed.b4xbytesbuilder.class, "_subarray2" /*RemoteObject*/ ,(Object)(_beginindex),(Object)(__ref.getField(true,"_mlength" /*RemoteObject*/ ))); - BA.debugLineNum = 82;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _subarray2(RemoteObject __ref,RemoteObject _beginindex,RemoteObject _endindex) throws Exception{ -try { - Debug.PushSubsStack("SubArray2 (b4xbytesbuilder) ","b4xbytesbuilder",27,__ref.getField(false, "ba"),__ref,86); -if (RapidSub.canDelegate("subarray2")) { return __ref.runUserSub(false, "b4xbytesbuilder","subarray2", __ref, _beginindex, _endindex);} -RemoteObject _b = null; -Debug.locals.put("BeginIndex", _beginindex); -Debug.locals.put("EndIndex", _endindex); - BA.debugLineNum = 86;BA.debugLine="Public Sub SubArray2(BeginIndex As Int, EndIndex A"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 87;BA.debugLine="Dim b(EndIndex - BeginIndex) As Byte"; -Debug.JustUpdateDeviceLine(); -_b = RemoteObject.createNewArray ("byte", new int[] {RemoteObject.solve(new RemoteObject[] {_endindex,_beginindex}, "-",1, 1).get().intValue()}, new Object[]{});Debug.locals.put("b", _b); - BA.debugLineNum = 88;BA.debugLine="Bit.ArrayCopy(mBuffer, BeginIndex, b, 0, b.Length"; -Debug.JustUpdateDeviceLine(); -b4xbytesbuilder.__c.getField(false,"Bit").runVoidMethod ("ArrayCopy",(Object)((__ref.getField(false,"_mbuffer" /*RemoteObject*/ ))),(Object)(_beginindex),(Object)((_b)),(Object)(BA.numberCast(int.class, 0)),(Object)(_b.getField(true,"length"))); - BA.debugLineNum = 89;BA.debugLine="Return b"; -Debug.JustUpdateDeviceLine(); -if (true) return _b; - BA.debugLineNum = 90;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _toarray(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("ToArray (b4xbytesbuilder) ","b4xbytesbuilder",27,__ref.getField(false, "ba"),__ref,97); -if (RapidSub.canDelegate("toarray")) { return __ref.runUserSub(false, "b4xbytesbuilder","toarray", __ref);} - BA.debugLineNum = 97;BA.debugLine="Public Sub ToArray() As Byte()"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 98;BA.debugLine="Return SubArray(0)"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.runClassMethod (keymon.lat.medicomed.b4xbytesbuilder.class, "_subarray" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 99;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcache.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcache.java deleted file mode 100644 index d99f27d..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcache.java +++ /dev/null @@ -1,33 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xcache { - public static RemoteObject myClass; - public b4xcache() { - } - public static PCBA staticBA = new PCBA(null, b4xcache.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _data = RemoteObject.declareNull("keymon.lat.medicomed.b4xorderedmap"); -public static RemoteObject _mmaxsize = RemoteObject.createImmutable(0); -public static RemoteObject _removethreshold = RemoteObject.createImmutable(0f); -public static RemoteObject _eternalcounts = RemoteObject.createImmutable(0); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"Data",_ref.getField(false, "_data"),"DateUtils",_ref.getField(false, "_dateutils"),"EternalCounts",_ref.getField(false, "_eternalcounts"),"mMaxSize",_ref.getField(false, "_mmaxsize"),"RemoveThreshold",_ref.getField(false, "_removethreshold")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcache_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcache_subs_0.java deleted file mode 100644 index 7efebae..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcache_subs_0.java +++ /dev/null @@ -1,431 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xcache_subs_0 { - - -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Type B4XCacheItem (Value As Object, LastAccessedT"; -; - //BA.debugLineNum = 3;BA.debugLine="Private Data As B4XOrderedMap"; -b4xcache._data = RemoteObject.createNew ("keymon.lat.medicomed.b4xorderedmap");__ref.setField("_data",b4xcache._data); - //BA.debugLineNum = 4;BA.debugLine="Private mMaxSize As Int = 100"; -b4xcache._mmaxsize = BA.numberCast(int.class, 100);__ref.setField("_mmaxsize",b4xcache._mmaxsize); - //BA.debugLineNum = 5;BA.debugLine="Private RemoveThreshold As Float = 0.3"; -b4xcache._removethreshold = BA.numberCast(float.class, 0.3);__ref.setField("_removethreshold",b4xcache._removethreshold); - //BA.debugLineNum = 6;BA.debugLine="Private EternalCounts As Int"; -b4xcache._eternalcounts = RemoteObject.createImmutable(0);__ref.setField("_eternalcounts",b4xcache._eternalcounts); - //BA.debugLineNum = 7;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _containskey(RemoteObject __ref,RemoteObject _key) throws Exception{ -try { - Debug.PushSubsStack("ContainsKey (b4xcache) ","b4xcache",28,__ref.getField(false, "ba"),__ref,66); -if (RapidSub.canDelegate("containskey")) { return __ref.runUserSub(false, "b4xcache","containskey", __ref, _key);} -Debug.locals.put("Key", _key); - BA.debugLineNum = 66;BA.debugLine="Public Sub ContainsKey(Key As String) As Boolean"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 67;BA.debugLine="Return Data.ContainsKey(Key)"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_data" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_containskey" /*RemoteObject*/ ,(Object)((_key))); - BA.debugLineNum = 68;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createb4xcacheitem(RemoteObject __ref,RemoteObject _value,RemoteObject _key) throws Exception{ -try { - Debug.PushSubsStack("CreateB4XCacheItem (b4xcache) ","b4xcache",28,__ref.getField(false, "ba"),__ref,102); -if (RapidSub.canDelegate("createb4xcacheitem")) { return __ref.runUserSub(false, "b4xcache","createb4xcacheitem", __ref, _value, _key);} -RemoteObject _t1 = RemoteObject.declareNull("keymon.lat.medicomed.b4xcache._b4xcacheitem"); -Debug.locals.put("Value", _value); -Debug.locals.put("Key", _key); - BA.debugLineNum = 102;BA.debugLine="Private Sub CreateB4XCacheItem (Value As Object, K"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 103;BA.debugLine="Dim t1 As B4XCacheItem"; -Debug.JustUpdateDeviceLine(); -_t1 = RemoteObject.createNew ("keymon.lat.medicomed.b4xcache._b4xcacheitem");Debug.locals.put("t1", _t1); - BA.debugLineNum = 104;BA.debugLine="t1.Initialize"; -Debug.JustUpdateDeviceLine(); -_t1.runVoidMethod ("Initialize"); - BA.debugLineNum = 105;BA.debugLine="t1.Value = Value"; -Debug.JustUpdateDeviceLine(); -_t1.setField ("Value" /*RemoteObject*/ ,_value); - BA.debugLineNum = 106;BA.debugLine="t1.LastAccessedTime = DateTime.Now"; -Debug.JustUpdateDeviceLine(); -_t1.setField ("LastAccessedTime" /*RemoteObject*/ ,b4xcache.__c.getField(false,"DateTime").runMethod(true,"getNow")); - BA.debugLineNum = 107;BA.debugLine="t1.Key = Key"; -Debug.JustUpdateDeviceLine(); -_t1.setField ("Key" /*RemoteObject*/ ,_key); - BA.debugLineNum = 108;BA.debugLine="Return t1"; -Debug.JustUpdateDeviceLine(); -if (true) return _t1; - BA.debugLineNum = 109;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _get(RemoteObject __ref,RemoteObject _key) throws Exception{ -try { - Debug.PushSubsStack("Get (b4xcache) ","b4xcache",28,__ref.getField(false, "ba"),__ref,24); -if (RapidSub.canDelegate("get")) { return __ref.runUserSub(false, "b4xcache","get", __ref, _key);} -RemoteObject _ci = RemoteObject.declareNull("keymon.lat.medicomed.b4xcache._b4xcacheitem"); -Debug.locals.put("Key", _key); - BA.debugLineNum = 24;BA.debugLine="Public Sub Get (Key As String) As Object"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 25;BA.debugLine="Dim ci As B4XCacheItem = Data.Get(Key)"; -Debug.JustUpdateDeviceLine(); -_ci = (__ref.getField(false,"_data" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_get" /*RemoteObject*/ ,(Object)((_key))));Debug.locals.put("ci", _ci);Debug.locals.put("ci", _ci); - BA.debugLineNum = 26;BA.debugLine="If ci <> Null Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("N",_ci)) { - BA.debugLineNum = 27;BA.debugLine="If ci.Eternal = False Then ci.LastAccessedTime ="; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_ci.getField(true,"Eternal" /*RemoteObject*/ ),b4xcache.__c.getField(true,"False"))) { -_ci.setField ("LastAccessedTime" /*RemoteObject*/ ,b4xcache.__c.getField(false,"DateTime").runMethod(true,"getNow"));}; - BA.debugLineNum = 28;BA.debugLine="Return ci.Value"; -Debug.JustUpdateDeviceLine(); -if (true) return _ci.getField(false,"Value" /*RemoteObject*/ ); - }; - BA.debugLineNum = 30;BA.debugLine="Return Null"; -Debug.JustUpdateDeviceLine(); -if (true) return b4xcache.__c.getField(false,"Null"); - BA.debugLineNum = 31;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getmaxsize(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getMaxSize (b4xcache) ","b4xcache",28,__ref.getField(false, "ba"),__ref,19); -if (RapidSub.canDelegate("getmaxsize")) { return __ref.runUserSub(false, "b4xcache","getmaxsize", __ref);} - BA.debugLineNum = 19;BA.debugLine="Public Sub getMaxSize As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 20;BA.debugLine="Return mMaxSize"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_mmaxsize" /*RemoteObject*/ ); - BA.debugLineNum = 21;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xcache) ","b4xcache",28,__ref.getField(false, "ba"),__ref,9); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xcache","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 9;BA.debugLine="Public Sub Initialize"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 10;BA.debugLine="Data.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_data" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 11;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _iseternal(RemoteObject __ref,RemoteObject _key) throws Exception{ -try { - Debug.PushSubsStack("IsEternal (b4xcache) ","b4xcache",28,__ref.getField(false, "ba"),__ref,60); -if (RapidSub.canDelegate("iseternal")) { return __ref.runUserSub(false, "b4xcache","iseternal", __ref, _key);} -RemoteObject _ci = RemoteObject.declareNull("keymon.lat.medicomed.b4xcache._b4xcacheitem"); -Debug.locals.put("Key", _key); - BA.debugLineNum = 60;BA.debugLine="Private Sub IsEternal(Key As String) As Boolean"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 61;BA.debugLine="Dim ci As B4XCacheItem = Data.Get(Key)"; -Debug.JustUpdateDeviceLine(); -_ci = (__ref.getField(false,"_data" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_get" /*RemoteObject*/ ,(Object)((_key))));Debug.locals.put("ci", _ci);Debug.locals.put("ci", _ci); - BA.debugLineNum = 62;BA.debugLine="Return IIf(ci = Null, False, ci.Eternal)"; -Debug.JustUpdateDeviceLine(); -if (true) return BA.ObjectToBoolean(((RemoteObject.solveBoolean("n",_ci)) ? ((b4xcache.__c.getField(true,"False"))) : ((_ci.getField(true,"Eternal" /*RemoteObject*/ ))))); - BA.debugLineNum = 63;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _keys(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Keys (b4xcache) ","b4xcache",28,__ref.getField(false, "ba"),__ref,98); -if (RapidSub.canDelegate("keys")) { return __ref.runUserSub(false, "b4xcache","keys", __ref);} - BA.debugLineNum = 98;BA.debugLine="Public Sub Keys As List"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 99;BA.debugLine="Return Data.Keys"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_data" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_getkeys" /*RemoteObject*/ ); - BA.debugLineNum = 100;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _put(RemoteObject __ref,RemoteObject _key,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("Put (b4xcache) ","b4xcache",28,__ref.getField(false, "ba"),__ref,35); -if (RapidSub.canDelegate("put")) { return __ref.runUserSub(false, "b4xcache","put", __ref, _key, _value);} -Debug.locals.put("Key", _key); -Debug.locals.put("Value", _value); - BA.debugLineNum = 35;BA.debugLine="Public Sub Put (Key As String, Value As Object) As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 36;BA.debugLine="If IsEternal(Key) Then EternalCounts = EternalCou"; -Debug.JustUpdateDeviceLine(); -if (__ref.runClassMethod (keymon.lat.medicomed.b4xcache.class, "_iseternal" /*RemoteObject*/ ,(Object)(_key)).get().booleanValue()) { -__ref.setField ("_eternalcounts" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_eternalcounts" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "-",1, 1));}; - BA.debugLineNum = 37;BA.debugLine="Data.Put(Key, CreateB4XCacheItem(Value, Key))"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_data" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_put" /*RemoteObject*/ ,(Object)((_key)),(Object)((__ref.runClassMethod (keymon.lat.medicomed.b4xcache.class, "_createb4xcacheitem" /*RemoteObject*/ ,(Object)(_value),(Object)(_key))))); - BA.debugLineNum = 38;BA.debugLine="TrimIfOversize"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcache.class, "_trimifoversize" /*RemoteObject*/ ); - BA.debugLineNum = 39;BA.debugLine="Return Value"; -Debug.JustUpdateDeviceLine(); -if (true) return _value; - BA.debugLineNum = 40;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _puteternal(RemoteObject __ref,RemoteObject _key,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("PutEternal (b4xcache) ","b4xcache",28,__ref.getField(false, "ba"),__ref,44); -if (RapidSub.canDelegate("puteternal")) { return __ref.runUserSub(false, "b4xcache","puteternal", __ref, _key, _value);} -RemoteObject _ci = RemoteObject.declareNull("keymon.lat.medicomed.b4xcache._b4xcacheitem"); -Debug.locals.put("Key", _key); -Debug.locals.put("Value", _value); - BA.debugLineNum = 44;BA.debugLine="Public Sub PutEternal (Key As String, Value As Obj"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 45;BA.debugLine="If IsEternal(Key) Then EternalCounts = EternalCou"; -Debug.JustUpdateDeviceLine(); -if (__ref.runClassMethod (keymon.lat.medicomed.b4xcache.class, "_iseternal" /*RemoteObject*/ ,(Object)(_key)).get().booleanValue()) { -__ref.setField ("_eternalcounts" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_eternalcounts" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "-",1, 1));}; - BA.debugLineNum = 46;BA.debugLine="Dim ci As B4XCacheItem = CreateB4XCacheItem(Value"; -Debug.JustUpdateDeviceLine(); -_ci = __ref.runClassMethod (keymon.lat.medicomed.b4xcache.class, "_createb4xcacheitem" /*RemoteObject*/ ,(Object)(_value),(Object)(_key));Debug.locals.put("ci", _ci);Debug.locals.put("ci", _ci); - BA.debugLineNum = 47;BA.debugLine="ci.Eternal = True"; -Debug.JustUpdateDeviceLine(); -_ci.setField ("Eternal" /*RemoteObject*/ ,b4xcache.__c.getField(true,"True")); - BA.debugLineNum = 48;BA.debugLine="ci.LastAccessedTime = 9223372036854775807"; -Debug.JustUpdateDeviceLine(); -_ci.setField ("LastAccessedTime" /*RemoteObject*/ ,BA.numberCast(long.class, 9223372036854775807L)); - BA.debugLineNum = 49;BA.debugLine="EternalCounts = EternalCounts + 1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_eternalcounts" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_eternalcounts" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "+",1, 1)); - BA.debugLineNum = 50;BA.debugLine="Data.Put(Key, ci)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_data" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_put" /*RemoteObject*/ ,(Object)((_key)),(Object)((_ci))); - BA.debugLineNum = 51;BA.debugLine="Return Value"; -Debug.JustUpdateDeviceLine(); -if (true) return _value; - BA.debugLineNum = 52;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _remove(RemoteObject __ref,RemoteObject _key) throws Exception{ -try { - Debug.PushSubsStack("Remove (b4xcache) ","b4xcache",28,__ref.getField(false, "ba"),__ref,55); -if (RapidSub.canDelegate("remove")) { return __ref.runUserSub(false, "b4xcache","remove", __ref, _key);} -Debug.locals.put("Key", _key); - BA.debugLineNum = 55;BA.debugLine="Public Sub Remove (Key As String)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 56;BA.debugLine="If IsEternal(Key) Then EternalCounts = EternalCou"; -Debug.JustUpdateDeviceLine(); -if (__ref.runClassMethod (keymon.lat.medicomed.b4xcache.class, "_iseternal" /*RemoteObject*/ ,(Object)(_key)).get().booleanValue()) { -__ref.setField ("_eternalcounts" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_eternalcounts" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "-",1, 1));}; - BA.debugLineNum = 57;BA.debugLine="Data.Remove(Key)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_data" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_remove" /*RemoteObject*/ ,(Object)((_key))); - BA.debugLineNum = 58;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _removeolditems(RemoteObject __ref,RemoteObject _agems) throws Exception{ -try { - Debug.PushSubsStack("RemoveOldItems (b4xcache) ","b4xcache",28,__ref.getField(false, "ba"),__ref,82); -if (RapidSub.canDelegate("removeolditems")) { return __ref.runUserSub(false, "b4xcache","removeolditems", __ref, _agems);} -RemoteObject _values = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _level = RemoteObject.createImmutable(0L); -RemoteObject _ci = RemoteObject.declareNull("keymon.lat.medicomed.b4xcache._b4xcacheitem"); -Debug.locals.put("AgeMs", _agems); - BA.debugLineNum = 82;BA.debugLine="Public Sub RemoveOldItems (AgeMs As Long)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 83;BA.debugLine="Dim values As List = Data.Values"; -Debug.JustUpdateDeviceLine(); -_values = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); -_values = __ref.getField(false,"_data" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_getvalues" /*RemoteObject*/ );Debug.locals.put("values", _values);Debug.locals.put("values", _values); - BA.debugLineNum = 84;BA.debugLine="Dim level As Long = DateTime.Now - AgeMs"; -Debug.JustUpdateDeviceLine(); -_level = RemoteObject.solve(new RemoteObject[] {b4xcache.__c.getField(false,"DateTime").runMethod(true,"getNow"),_agems}, "-",1, 2);Debug.locals.put("level", _level);Debug.locals.put("level", _level); - BA.debugLineNum = 85;BA.debugLine="For Each ci As B4XCacheItem In values"; -Debug.JustUpdateDeviceLine(); -{ -final RemoteObject group3 = _values; -final int groupLen3 = group3.runMethod(true,"getSize").get() -;int index3 = 0; -; -for (; index3 < groupLen3;index3++){ -_ci = (group3.runMethod(false,"Get",index3));Debug.locals.put("ci", _ci); -Debug.locals.put("ci", _ci); - BA.debugLineNum = 86;BA.debugLine="If ci.LastAccessedTime <= level Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("k",_ci.getField(true,"LastAccessedTime" /*RemoteObject*/ ),_level)) { - BA.debugLineNum = 87;BA.debugLine="Data.Remove(ci.Key)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_data" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_remove" /*RemoteObject*/ ,(Object)((_ci.getField(true,"Key" /*RemoteObject*/ )))); - }; - } -}Debug.locals.put("ci", _ci); -; - BA.debugLineNum = 90;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setmaxsize(RemoteObject __ref,RemoteObject _s) throws Exception{ -try { - Debug.PushSubsStack("setMaxSize (b4xcache) ","b4xcache",28,__ref.getField(false, "ba"),__ref,14); -if (RapidSub.canDelegate("setmaxsize")) { return __ref.runUserSub(false, "b4xcache","setmaxsize", __ref, _s);} -Debug.locals.put("s", _s); - BA.debugLineNum = 14;BA.debugLine="Public Sub setMaxSize(s As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 15;BA.debugLine="mMaxSize = s"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mmaxsize" /*RemoteObject*/ ,_s); - BA.debugLineNum = 16;BA.debugLine="TrimIfOversize"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcache.class, "_trimifoversize" /*RemoteObject*/ ); - BA.debugLineNum = 17;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _size(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Size (b4xcache) ","b4xcache",28,__ref.getField(false, "ba"),__ref,93); -if (RapidSub.canDelegate("size")) { return __ref.runUserSub(false, "b4xcache","size", __ref);} - BA.debugLineNum = 93;BA.debugLine="Public Sub Size As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 94;BA.debugLine="Return Data.Size"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_data" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_getsize" /*RemoteObject*/ ); - BA.debugLineNum = 95;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _trimifoversize(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("TrimIfOversize (b4xcache) ","b4xcache",28,__ref.getField(false, "ba"),__ref,70); -if (RapidSub.canDelegate("trimifoversize")) { return __ref.runUserSub(false, "b4xcache","trimifoversize", __ref);} -RemoteObject _values = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _numberofitemstoremove = RemoteObject.createImmutable(0); -int _i = 0; - BA.debugLineNum = 70;BA.debugLine="Private Sub TrimIfOversize"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 71;BA.debugLine="If Data.Size - EternalCounts > mMaxSize Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_data" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_getsize" /*RemoteObject*/ ),__ref.getField(true,"_eternalcounts" /*RemoteObject*/ )}, "-",1, 1),BA.numberCast(double.class, __ref.getField(true,"_mmaxsize" /*RemoteObject*/ )))) { - BA.debugLineNum = 72;BA.debugLine="Dim values As List = Data.Values"; -Debug.JustUpdateDeviceLine(); -_values = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); -_values = __ref.getField(false,"_data" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_getvalues" /*RemoteObject*/ );Debug.locals.put("values", _values);Debug.locals.put("values", _values); - BA.debugLineNum = 73;BA.debugLine="values.SortType(\"LastAccessedTime\", True)"; -Debug.JustUpdateDeviceLine(); -_values.runVoidMethod ("SortType",(Object)(BA.ObjectToString("LastAccessedTime")),(Object)(b4xcache.__c.getField(true,"True"))); - BA.debugLineNum = 74;BA.debugLine="Dim NumberOfItemsToRemove As Int = Ceil(mMaxSize"; -Debug.JustUpdateDeviceLine(); -_numberofitemstoremove = BA.numberCast(int.class, b4xcache.__c.runMethod(true,"Ceil",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mmaxsize" /*RemoteObject*/ ),__ref.getField(true,"_removethreshold" /*RemoteObject*/ )}, "*",0, 0))));Debug.locals.put("NumberOfItemsToRemove", _numberofitemstoremove);Debug.locals.put("NumberOfItemsToRemove", _numberofitemstoremove); - BA.debugLineNum = 75;BA.debugLine="For i = 0 To NumberOfItemsToRemove"; -Debug.JustUpdateDeviceLine(); -{ -final int step5 = 1; -final int limit5 = _numberofitemstoremove.get().intValue(); -_i = 0 ; -for (;(step5 > 0 && _i <= limit5) || (step5 < 0 && _i >= limit5) ;_i = ((int)(0 + _i + step5)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 76;BA.debugLine="Data.Remove(values.Get(i).As(B4XCacheItem).Key)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_data" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_remove" /*RemoteObject*/ ,(Object)((((_values.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))))).getField(true,"Key" /*RemoteObject*/ )))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 79;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcollections.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcollections.java deleted file mode 100644 index d90c965..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcollections.java +++ /dev/null @@ -1,62 +0,0 @@ - -package keymon.lat.medicomed; - -import java.io.IOException; -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RDebug; -import anywheresoftware.b4a.pc.RemoteObject; -import anywheresoftware.b4a.pc.RDebug.IRemote; -import anywheresoftware.b4a.pc.Debug; -import anywheresoftware.b4a.pc.B4XTypes.B4XClass; -import anywheresoftware.b4a.pc.B4XTypes.DeviceClass; - -public class b4xcollections implements IRemote{ - public static b4xcollections mostCurrent; - public static RemoteObject processBA; - public static boolean processGlobalsRun; - public static RemoteObject myClass; - public static RemoteObject remoteMe; - public b4xcollections() { - mostCurrent = this; - } - public RemoteObject getRemoteMe() { - return remoteMe; - } - -public boolean isSingleton() { - return true; - } - private static PCBA pcBA = new PCBA(null, b4xcollections.class); - static { - mostCurrent = new b4xcollections(); - remoteMe = RemoteObject.declareNull("keymon.lat.medicomed.b4xcollections"); - anywheresoftware.b4a.pc.RapidSub.moduleToObject.put(new B4XClass("b4xcollections"), "keymon.lat.medicomed.b4xcollections"); - RDebug.INSTANCE.eventTargets.put(new DeviceClass("keymon.lat.medicomed.b4xcollections"), new java.lang.ref.WeakReference (pcBA)); - } - - public static RemoteObject runMethod(boolean notUsed, String method, Object... args) throws Exception{ - return (RemoteObject) pcBA.raiseEvent(method.substring(1), args); - } - public static void runVoidMethod(String method, Object... args) throws Exception{ - runMethod(false, method, args); - } - public PCBA create(Object[] args) throws ClassNotFoundException{ - throw new RuntimeException("CREATE is not supported."); - } -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; - public Object[] GetGlobals() { - return new Object[] {"appUpdater",Debug.moduleToString(keymon.lat.medicomed.appupdater.class),"B4XPages",Debug.moduleToString(keymon.lat.medicomed.b4xpages.class),"DateUtils",b4xcollections.mostCurrent._dateutils,"HttpUtils2Service",Debug.moduleToString(keymon.lat.medicomed.httputils2service.class),"Main",Debug.moduleToString(keymon.lat.medicomed.main.class),"MAPA_RUTAS",Debug.moduleToString(keymon.lat.medicomed.mapa_rutas.class),"newinst2",Debug.moduleToString(keymon.lat.medicomed.newinst2.class),"Starter",Debug.moduleToString(keymon.lat.medicomed.starter.class),"Subs",Debug.moduleToString(keymon.lat.medicomed.subs.class),"Tracker",Debug.moduleToString(keymon.lat.medicomed.tracker.class),"XUIViewsUtils",Debug.moduleToString(keymon.lat.medicomed.xuiviewsutils.class)}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcollections_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcollections_subs_0.java deleted file mode 100644 index 074b0d8..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcollections_subs_0.java +++ /dev/null @@ -1,179 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xcollections_subs_0 { - - -public static RemoteObject _createbitset(RemoteObject _ba,RemoteObject _size) throws Exception{ -try { - Debug.PushSubsStack("CreateBitSet (b4xcollections) ","b4xcollections",29,_ba,b4xcollections.mostCurrent,52); -if (RapidSub.canDelegate("createbitset")) { return keymon.lat.medicomed.b4xcollections.remoteMe.runUserSub(false, "b4xcollections","createbitset", _ba, _size);} -RemoteObject _s = RemoteObject.declareNull("keymon.lat.medicomed.b4xbitset"); -; -Debug.locals.put("Size", _size); - BA.debugLineNum = 52;BA.debugLine="Public Sub CreateBitSet (Size As Int) As B4XBitSet"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 53;BA.debugLine="Dim s As B4XBitSet"; -Debug.JustUpdateDeviceLine(); -_s = RemoteObject.createNew ("keymon.lat.medicomed.b4xbitset");Debug.locals.put("s", _s); - BA.debugLineNum = 54;BA.debugLine="s.Initialize(Size)"; -Debug.JustUpdateDeviceLine(); -_s.runClassMethod (keymon.lat.medicomed.b4xbitset.class, "_initialize" /*RemoteObject*/ ,BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba),(Object)(_size)); - BA.debugLineNum = 55;BA.debugLine="Return s"; -Debug.JustUpdateDeviceLine(); -if (true) return _s; - BA.debugLineNum = 56;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createorderedmap(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("CreateOrderedMap (b4xcollections) ","b4xcollections",29,_ba,b4xcollections.mostCurrent,30); -if (RapidSub.canDelegate("createorderedmap")) { return keymon.lat.medicomed.b4xcollections.remoteMe.runUserSub(false, "b4xcollections","createorderedmap", _ba);} -; - BA.debugLineNum = 30;BA.debugLine="Public Sub CreateOrderedMap As B4XOrderedMap"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 31;BA.debugLine="Return CreateOrderedMap2(Null, Null)"; -Debug.JustUpdateDeviceLine(); -if (true) return _createorderedmap2(_ba,RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), b4xcollections.mostCurrent.__c.getField(false,"Null")),RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), b4xcollections.mostCurrent.__c.getField(false,"Null"))); - BA.debugLineNum = 32;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createorderedmap2(RemoteObject _ba,RemoteObject _keys,RemoteObject _values) throws Exception{ -try { - Debug.PushSubsStack("CreateOrderedMap2 (b4xcollections) ","b4xcollections",29,_ba,b4xcollections.mostCurrent,38); -if (RapidSub.canDelegate("createorderedmap2")) { return keymon.lat.medicomed.b4xcollections.remoteMe.runUserSub(false, "b4xcollections","createorderedmap2", _ba, _keys, _values);} -RemoteObject _m = RemoteObject.declareNull("keymon.lat.medicomed.b4xorderedmap"); -int _i = 0; -; -Debug.locals.put("Keys", _keys); -Debug.locals.put("Values", _values); - BA.debugLineNum = 38;BA.debugLine="Public Sub CreateOrderedMap2 (Keys As List, Values"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 39;BA.debugLine="Dim m As B4XOrderedMap"; -Debug.JustUpdateDeviceLine(); -_m = RemoteObject.createNew ("keymon.lat.medicomed.b4xorderedmap");Debug.locals.put("m", _m); - BA.debugLineNum = 40;BA.debugLine="m.Initialize"; -Debug.JustUpdateDeviceLine(); -_m.runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_initialize" /*RemoteObject*/ ,BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba)); - BA.debugLineNum = 41;BA.debugLine="If Keys <> Null And Values <> Null And Keys.IsIni"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("N",_keys) && RemoteObject.solveBoolean("N",_values) && RemoteObject.solveBoolean(".",_keys.runMethod(true,"IsInitialized")) && RemoteObject.solveBoolean(".",_values.runMethod(true,"IsInitialized"))) { - BA.debugLineNum = 42;BA.debugLine="For i = 0 To Keys.Size - 1"; -Debug.JustUpdateDeviceLine(); -{ -final int step4 = 1; -final int limit4 = RemoteObject.solve(new RemoteObject[] {_keys.runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step4 > 0 && _i <= limit4) || (step4 < 0 && _i >= limit4) ;_i = ((int)(0 + _i + step4)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 43;BA.debugLine="m.Put(Keys.Get(i), Values.Get(i))"; -Debug.JustUpdateDeviceLine(); -_m.runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_put" /*RemoteObject*/ ,(Object)(_keys.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i)))),(Object)(_values.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 46;BA.debugLine="Return m"; -Debug.JustUpdateDeviceLine(); -if (true) return _m; - BA.debugLineNum = 47;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createset(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("CreateSet (b4xcollections) ","b4xcollections",29,_ba,b4xcollections.mostCurrent,9); -if (RapidSub.canDelegate("createset")) { return keymon.lat.medicomed.b4xcollections.remoteMe.runUserSub(false, "b4xcollections","createset", _ba);} -; - BA.debugLineNum = 9;BA.debugLine="Public Sub CreateSet As B4XSet"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 10;BA.debugLine="Return CreateSet2(Null)"; -Debug.JustUpdateDeviceLine(); -if (true) return _createset2(_ba,RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), b4xcollections.mostCurrent.__c.getField(false,"Null"))); - BA.debugLineNum = 11;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createset2(RemoteObject _ba,RemoteObject _values) throws Exception{ -try { - Debug.PushSubsStack("CreateSet2 (b4xcollections) ","b4xcollections",29,_ba,b4xcollections.mostCurrent,16); -if (RapidSub.canDelegate("createset2")) { return keymon.lat.medicomed.b4xcollections.remoteMe.runUserSub(false, "b4xcollections","createset2", _ba, _values);} -RemoteObject _s = RemoteObject.declareNull("keymon.lat.medicomed.b4xset"); -RemoteObject _v = RemoteObject.declareNull("Object"); -; -Debug.locals.put("Values", _values); - BA.debugLineNum = 16;BA.debugLine="Public Sub CreateSet2 (Values As List) As B4XSet"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 17;BA.debugLine="Dim s As B4XSet"; -Debug.JustUpdateDeviceLine(); -_s = RemoteObject.createNew ("keymon.lat.medicomed.b4xset");Debug.locals.put("s", _s); - BA.debugLineNum = 18;BA.debugLine="s.Initialize"; -Debug.JustUpdateDeviceLine(); -_s.runClassMethod (keymon.lat.medicomed.b4xset.class, "_initialize" /*RemoteObject*/ ,BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba)); - BA.debugLineNum = 19;BA.debugLine="If Values <> Null And Values.IsInitialized Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("N",_values) && RemoteObject.solveBoolean(".",_values.runMethod(true,"IsInitialized"))) { - BA.debugLineNum = 20;BA.debugLine="For Each v As Object In Values"; -Debug.JustUpdateDeviceLine(); -{ -final RemoteObject group4 = _values; -final int groupLen4 = group4.runMethod(true,"getSize").get() -;int index4 = 0; -; -for (; index4 < groupLen4;index4++){ -_v = group4.runMethod(false,"Get",index4);Debug.locals.put("v", _v); -Debug.locals.put("v", _v); - BA.debugLineNum = 21;BA.debugLine="s.Add(v)"; -Debug.JustUpdateDeviceLine(); -_s.runClassMethod (keymon.lat.medicomed.b4xset.class, "_add" /*RemoteObject*/ ,(Object)(_v)); - } -}Debug.locals.put("v", _v); -; - }; - BA.debugLineNum = 24;BA.debugLine="Return s"; -Debug.JustUpdateDeviceLine(); -if (true) return _s; - BA.debugLineNum = 25;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _process_globals() throws Exception{ - //BA.debugLineNum = 2;BA.debugLine="Sub Process_Globals"; - //BA.debugLineNum = 4;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcolortemplate.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcolortemplate.java deleted file mode 100644 index 20a112a..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcolortemplate.java +++ /dev/null @@ -1,46 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xcolortemplate { - public static RemoteObject myClass; - public b4xcolortemplate() { - } - public static PCBA staticBA = new PCBA(null, b4xcolortemplate.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _selectedalpha = RemoteObject.createImmutable(0); -public static RemoteObject _bccolors = RemoteObject.declareNull("b4a.example.bitmapcreator"); -public static RemoteObject _selectedh = RemoteObject.createImmutable(0f); -public static RemoteObject _selecteds = RemoteObject.createImmutable(0f); -public static RemoteObject _selectedv = RemoteObject.createImmutable(0f); -public static RemoteObject _devicescale = RemoteObject.createImmutable(0f); -public static RemoteObject _colorscale = RemoteObject.createImmutable(0f); -public static RemoteObject _tempbc = RemoteObject.declareNull("b4a.example.bitmapcreator"); -public static RemoteObject _dont_change = RemoteObject.createImmutable(0); -public static RemoteObject _huebar = RemoteObject.declareNull("keymon.lat.medicomed.b4xcolortemplate._colorpickerpart"); -public static RemoteObject _colorpicker = RemoteObject.declareNull("keymon.lat.medicomed.b4xcolortemplate._colorpickerpart"); -public static RemoteObject _alphabar = RemoteObject.declareNull("keymon.lat.medicomed.b4xcolortemplate._colorpickerpart"); -public static RemoteObject _borderscolor = RemoteObject.createImmutable(0); -public static RemoteObject _xdialog = RemoteObject.declareNull("keymon.lat.medicomed.b4xdialog"); -public static RemoteObject _initialcolor = null; -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"AlphaBar",_ref.getField(false, "_alphabar"),"bcColors",_ref.getField(false, "_bccolors"),"BordersColor",_ref.getField(false, "_borderscolor"),"ColorPicker",_ref.getField(false, "_colorpicker"),"ColorScale",_ref.getField(false, "_colorscale"),"DateUtils",_ref.getField(false, "_dateutils"),"DeviceScale",_ref.getField(false, "_devicescale"),"DONT_CHANGE",_ref.getField(false, "_dont_change"),"HueBar",_ref.getField(false, "_huebar"),"InitialColor",_ref.getField(false, "_initialcolor"),"mBase",_ref.getField(false, "_mbase"),"SelectedAlpha",_ref.getField(false, "_selectedalpha"),"selectedH",_ref.getField(false, "_selectedh"),"selectedS",_ref.getField(false, "_selecteds"),"selectedV",_ref.getField(false, "_selectedv"),"tempBC",_ref.getField(false, "_tempbc"),"xDialog",_ref.getField(false, "_xdialog"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcolortemplate_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcolortemplate_subs_0.java deleted file mode 100644 index b0b0416..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcolortemplate_subs_0.java +++ /dev/null @@ -1,1090 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xcolortemplate_subs_0 { - - -public static RemoteObject _alpha_touch(RemoteObject __ref,RemoteObject _action,RemoteObject _x,RemoteObject _y) throws Exception{ -try { - Debug.PushSubsStack("Alpha_Touch (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,263); -if (RapidSub.canDelegate("alpha_touch")) { return __ref.runUserSub(false, "b4xcolortemplate","alpha_touch", __ref, _action, _x, _y);} -Debug.locals.put("Action", _action); -Debug.locals.put("X", _x); -Debug.locals.put("Y", _y); - BA.debugLineNum = 263;BA.debugLine="Private Sub Alpha_Touch (Action As Int, X As Float"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 264;BA.debugLine="If Action = mBase.TOUCH_ACTION_MOVE_NOTOUCH Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_action,BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).getField(true,"TOUCH_ACTION_MOVE_NOTOUCH")))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 265;BA.debugLine="AlphaBarSelectedChange(x)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_alphabarselectedchange" /*RemoteObject*/ ,(Object)(_x)); - BA.debugLineNum = 266;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _alphabarselectedchange(RemoteObject __ref,RemoteObject _x) throws Exception{ -try { - Debug.PushSubsStack("AlphaBarSelectedChange (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,147); -if (RapidSub.canDelegate("alphabarselectedchange")) { return __ref.runUserSub(false, "b4xcolortemplate","alphabarselectedchange", __ref, _x);} -RemoteObject _r = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XRect"); -Debug.locals.put("x", _x); - BA.debugLineNum = 147;BA.debugLine="Private Sub AlphaBarSelectedChange(x As Float)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 148;BA.debugLine="SelectedAlpha = 255 * Max(0, Min(1, x / AlphaBar."; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_selectedalpha" /*RemoteObject*/ ,BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(255),b4xcolortemplate.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, 0)),(Object)(b4xcolortemplate.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, 1)),(Object)(RemoteObject.solve(new RemoteObject[] {_x,__ref.getField(false,"_alphabar" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getWidth")}, "/",0, 0)))))}, "*",0, 0))); - BA.debugLineNum = 149;BA.debugLine="x = SelectedAlpha / 255 * AlphaBar.pnl.Width"; -Debug.JustUpdateDeviceLine(); -_x = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_selectedalpha" /*RemoteObject*/ ),RemoteObject.createImmutable(255),__ref.getField(false,"_alphabar" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getWidth")}, "/*",0, 0));Debug.locals.put("x", _x); - BA.debugLineNum = 150;BA.debugLine="AlphaBar.cvs.ClearRect(AlphaBar.cvs.TargetRect)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_alphabar" /*RemoteObject*/ ).getField(false,"cvs" /*RemoteObject*/ ).runVoidMethod ("ClearRect",(Object)(__ref.getField(false,"_alphabar" /*RemoteObject*/ ).getField(false,"cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect"))); - BA.debugLineNum = 151;BA.debugLine="Dim r As B4XRect"; -Debug.JustUpdateDeviceLine(); -_r = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas.B4XRect");Debug.locals.put("r", _r); - BA.debugLineNum = 152;BA.debugLine="r.Initialize(x - 3dip, 1dip, x + 3dip, AlphaBar.c"; -Debug.JustUpdateDeviceLine(); -_r.runVoidMethod ("Initialize",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_x,b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 3)))}, "-",1, 0))),(Object)(BA.numberCast(float.class, b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1))))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_x,b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 3)))}, "+",1, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_alphabar" /*RemoteObject*/ ).getField(false,"cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getBottom"),b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1)))}, "-",1, 0)))); - BA.debugLineNum = 153;BA.debugLine="AlphaBar.cvs.DrawRect(r, xui.Color_Black, True, 2"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_alphabar" /*RemoteObject*/ ).getField(false,"cvs" /*RemoteObject*/ ).runVoidMethod ("DrawRect",(Object)(_r),(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Black")),(Object)(b4xcolortemplate.__c.getField(true,"True")),(Object)(BA.numberCast(float.class, b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)))))); - BA.debugLineNum = 154;BA.debugLine="AlphaBar.cvs.Invalidate"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_alphabar" /*RemoteObject*/ ).getField(false,"cvs" /*RemoteObject*/ ).runVoidMethod ("Invalidate"); - BA.debugLineNum = 155;BA.debugLine="Update"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_update" /*RemoteObject*/ ); - BA.debugLineNum = 156;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _base_resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("Base_Resize (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,51); -if (RapidSub.canDelegate("base_resize")) { return __ref.runUserSub(false, "b4xcolortemplate","base_resize", __ref, _width, _height);} -RemoteObject _r = RemoteObject.createImmutable(0); -RemoteObject _w = RemoteObject.createImmutable(0); -RemoteObject _cpp = RemoteObject.declareNull("keymon.lat.medicomed.b4xcolortemplate._colorpickerpart"); -int _i = 0; -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 51;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 53;BA.debugLine="ColorScale = Max(1, Max(Width, Height) / 100 / De"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_colorscale" /*RemoteObject*/ ,BA.numberCast(float.class, b4xcolortemplate.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, 1)),(Object)(RemoteObject.solve(new RemoteObject[] {b4xcolortemplate.__c.runMethod(true,"Max",(Object)(_width),(Object)(_height)),RemoteObject.createImmutable(100),__ref.getField(true,"_devicescale" /*RemoteObject*/ )}, "//",0, 0))))); - BA.debugLineNum = 54;BA.debugLine="HueBar.pnl.SetLayoutAnimated(0, 1dip, 1dip, 30dip"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_huebar" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1)))),(Object)(b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1)))),(Object)(b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 30)))),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_height,b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)))}, "-",1, 0)))); - BA.debugLineNum = 55;BA.debugLine="Dim r As Int = HueBar.pnl.Width + HueBar.pnl.Left"; -Debug.JustUpdateDeviceLine(); -_r = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_huebar" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getWidth"),__ref.getField(false,"_huebar" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getLeft"),b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1)))}, "++",2, 1);Debug.locals.put("r", _r);Debug.locals.put("r", _r); - BA.debugLineNum = 56;BA.debugLine="Dim w As Int = Width - r - 1dip"; -Debug.JustUpdateDeviceLine(); -_w = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_width,_r,b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1)))}, "--",2, 0));Debug.locals.put("w", _w);Debug.locals.put("w", _w); - BA.debugLineNum = 57;BA.debugLine="If xui.IsB4i Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4i").get().booleanValue()) { - BA.debugLineNum = 58;BA.debugLine="r = r - 1"; -Debug.JustUpdateDeviceLine(); -_r = RemoteObject.solve(new RemoteObject[] {_r,RemoteObject.createImmutable(1)}, "-",1, 1);Debug.locals.put("r", _r); - BA.debugLineNum = 59;BA.debugLine="w = w + 1"; -Debug.JustUpdateDeviceLine(); -_w = RemoteObject.solve(new RemoteObject[] {_w,RemoteObject.createImmutable(1)}, "+",1, 1);Debug.locals.put("w", _w); - }; - BA.debugLineNum = 61;BA.debugLine="AlphaBar.pnl.SetLayoutAnimated(0, r, Height - 31d"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_alphabar" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(_r),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_height,b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 31)))}, "-",1, 0))),(Object)(_w),(Object)(b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 30))))); - BA.debugLineNum = 62;BA.debugLine="ColorPicker.pnl.SetLayoutAnimated(0, r, 1dip, w,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_colorpicker" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(_r),(Object)(b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1)))),(Object)(_w),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_height,b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 3))),__ref.getField(false,"_alphabar" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getHeight")}, "--",2, 0)))); - BA.debugLineNum = 63;BA.debugLine="bcColors.Initialize(ColorPicker.pnl.Width / Color"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_bccolors" /*RemoteObject*/ ).runVoidMethod ("_initialize",__ref.getField(false, "ba"),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_colorpicker" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getWidth"),__ref.getField(true,"_colorscale" /*RemoteObject*/ )}, "/",0, 0))),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_colorpicker" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getHeight"),__ref.getField(true,"_colorscale" /*RemoteObject*/ )}, "/",0, 0)))); - BA.debugLineNum = 64;BA.debugLine="For Each cpp As ColorPickerPart In Array(HueBar,"; -Debug.JustUpdateDeviceLine(); -{ -final RemoteObject group12 = RemoteObject.createNewArray("Object",new int[] {3},new Object[] {(__ref.getField(false,"_huebar" /*RemoteObject*/ )),(__ref.getField(false,"_colorpicker" /*RemoteObject*/ )),(__ref.getField(false,"_alphabar" /*RemoteObject*/ ))}); -final int groupLen12 = group12.getField(true,"length").get() -;int index12 = 0; -; -for (; index12 < groupLen12;index12++){ -_cpp = (group12.getArrayElement(false,RemoteObject.createImmutable(index12)));Debug.locals.put("cpp", _cpp); -Debug.locals.put("cpp", _cpp); - BA.debugLineNum = 65;BA.debugLine="For i = 0 To cpp.pnl.NumberOfViews - 1"; -Debug.JustUpdateDeviceLine(); -{ -final int step13 = 1; -final int limit13 = RemoteObject.solve(new RemoteObject[] {_cpp.getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getNumberOfViews"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step13 > 0 && _i <= limit13) || (step13 < 0 && _i >= limit13) ;_i = ((int)(0 + _i + step13)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 66;BA.debugLine="cpp.pnl.GetView(i).SetLayoutAnimated(0, 0, 0, c"; -Debug.JustUpdateDeviceLine(); -_cpp.getField(false,"pnl" /*RemoteObject*/ ).runMethod(false,"GetView",(Object)(BA.numberCast(int.class, _i))).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(_cpp.getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(_cpp.getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getHeight"))); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 68;BA.debugLine="cpp.cvs.Resize(cpp.pnl.Width, cpp.pnl.Height)"; -Debug.JustUpdateDeviceLine(); -_cpp.getField(false,"cvs" /*RemoteObject*/ ).runVoidMethod ("Resize",(Object)(BA.numberCast(float.class, _cpp.getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getWidth"))),(Object)(BA.numberCast(float.class, _cpp.getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getHeight")))); - BA.debugLineNum = 69;BA.debugLine="If cpp.DrawCheckers Then"; -Debug.JustUpdateDeviceLine(); -if (_cpp.getField(true,"DrawCheckers" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 70;BA.debugLine="DrawCheckers(cpp)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_drawcheckers" /*RemoteObject*/ ,(Object)(_cpp)); - }; - } -}Debug.locals.put("cpp", _cpp); -; - BA.debugLineNum = 73;BA.debugLine="DrawHueBar"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_drawhuebar" /*RemoteObject*/ ); - BA.debugLineNum = 74;BA.debugLine="DrawAlphaBar"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_drawalphabar" /*RemoteObject*/ ); - BA.debugLineNum = 75;BA.debugLine="HueBarSelectedChanged (selectedH / 360 * HueBar.p"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_huebarselectedchanged" /*RemoteObject*/ ,(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_selectedh" /*RemoteObject*/ ),RemoteObject.createImmutable(360),__ref.getField(false,"_huebar" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getHeight")}, "/*",0, 0)))); - BA.debugLineNum = 76;BA.debugLine="AlphaBarSelectedChange (SelectedAlpha / 255 * Alp"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_alphabarselectedchange" /*RemoteObject*/ ,(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_selectedalpha" /*RemoteObject*/ ),RemoteObject.createImmutable(255),__ref.getField(false,"_alphabar" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getWidth")}, "/*",0, 0)))); - BA.debugLineNum = 77;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Public mBase As B4XView 'ignore"; -b4xcolortemplate._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",b4xcolortemplate._mbase); - //BA.debugLineNum = 3;BA.debugLine="Private xui As XUI 'ignore"; -b4xcolortemplate._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",b4xcolortemplate._xui); - //BA.debugLineNum = 4;BA.debugLine="Private SelectedAlpha As Int = 255"; -b4xcolortemplate._selectedalpha = BA.numberCast(int.class, 255);__ref.setField("_selectedalpha",b4xcolortemplate._selectedalpha); - //BA.debugLineNum = 5;BA.debugLine="Private bcColors As BitmapCreator"; -b4xcolortemplate._bccolors = RemoteObject.createNew ("b4a.example.bitmapcreator");__ref.setField("_bccolors",b4xcolortemplate._bccolors); - //BA.debugLineNum = 6;BA.debugLine="Private selectedH = 60, selectedS = 0.5, selected"; -b4xcolortemplate._selectedh = BA.numberCast(float.class, 60);__ref.setField("_selectedh",b4xcolortemplate._selectedh); -b4xcolortemplate._selecteds = BA.numberCast(float.class, 0.5);__ref.setField("_selecteds",b4xcolortemplate._selecteds); -b4xcolortemplate._selectedv = BA.numberCast(float.class, 0.5);__ref.setField("_selectedv",b4xcolortemplate._selectedv); - //BA.debugLineNum = 7;BA.debugLine="Private DeviceScale, ColorScale As Float"; -b4xcolortemplate._devicescale = RemoteObject.createImmutable(0f);__ref.setField("_devicescale",b4xcolortemplate._devicescale); -b4xcolortemplate._colorscale = RemoteObject.createImmutable(0f);__ref.setField("_colorscale",b4xcolortemplate._colorscale); - //BA.debugLineNum = 8;BA.debugLine="Private tempBC As BitmapCreator"; -b4xcolortemplate._tempbc = RemoteObject.createNew ("b4a.example.bitmapcreator");__ref.setField("_tempbc",b4xcolortemplate._tempbc); - //BA.debugLineNum = 9;BA.debugLine="Private const DONT_CHANGE As Int = -999999999"; -b4xcolortemplate._dont_change = BA.numberCast(int.class, -(double) (0 + 999999999));__ref.setField("_dont_change",b4xcolortemplate._dont_change); - //BA.debugLineNum = 10;BA.debugLine="Type ColorPickerPart (cvs As B4XCanvas, pnl As B4"; -; - //BA.debugLineNum = 11;BA.debugLine="Private HueBar, ColorPicker, AlphaBar As ColorPic"; -b4xcolortemplate._huebar = RemoteObject.createNew ("keymon.lat.medicomed.b4xcolortemplate._colorpickerpart");__ref.setField("_huebar",b4xcolortemplate._huebar); -b4xcolortemplate._colorpicker = RemoteObject.createNew ("keymon.lat.medicomed.b4xcolortemplate._colorpickerpart");__ref.setField("_colorpicker",b4xcolortemplate._colorpicker); -b4xcolortemplate._alphabar = RemoteObject.createNew ("keymon.lat.medicomed.b4xcolortemplate._colorpickerpart");__ref.setField("_alphabar",b4xcolortemplate._alphabar); - //BA.debugLineNum = 12;BA.debugLine="Private BordersColor As Int"; -b4xcolortemplate._borderscolor = RemoteObject.createImmutable(0);__ref.setField("_borderscolor",b4xcolortemplate._borderscolor); - //BA.debugLineNum = 13;BA.debugLine="Private xDialog As B4XDialog"; -b4xcolortemplate._xdialog = RemoteObject.createNew ("keymon.lat.medicomed.b4xdialog");__ref.setField("_xdialog",b4xcolortemplate._xdialog); - //BA.debugLineNum = 14;BA.debugLine="Private InitialColor() As Object"; -b4xcolortemplate._initialcolor = RemoteObject.createNewArray ("Object", new int[] {0}, new Object[]{});__ref.setField("_initialcolor",b4xcolortemplate._initialcolor); - //BA.debugLineNum = 15;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _colors_touch(RemoteObject __ref,RemoteObject _action,RemoteObject _x,RemoteObject _y) throws Exception{ -try { - Debug.PushSubsStack("Colors_Touch (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,253); -if (RapidSub.canDelegate("colors_touch")) { return __ref.runUserSub(false, "b4xcolortemplate","colors_touch", __ref, _action, _x, _y);} -Debug.locals.put("Action", _action); -Debug.locals.put("X", _x); -Debug.locals.put("Y", _y); - BA.debugLineNum = 253;BA.debugLine="Private Sub Colors_Touch (Action As Int, X As Floa"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 254;BA.debugLine="If Action = mBase.TOUCH_ACTION_MOVE_NOTOUCH Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_action,BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).getField(true,"TOUCH_ACTION_MOVE_NOTOUCH")))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 255;BA.debugLine="HandleSelectedColorChanged(X, Y)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_handleselectedcolorchanged" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, _x)),(Object)(BA.numberCast(int.class, _y))); - BA.debugLineNum = 256;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _colortohsv(RemoteObject __ref,RemoteObject _clr) throws Exception{ -try { - Debug.PushSubsStack("ColorToHSV (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,199); -if (RapidSub.canDelegate("colortohsv")) { return __ref.runUserSub(false, "b4xcolortemplate","colortohsv", __ref, _clr);} -RemoteObject _a = RemoteObject.createImmutable(0); -RemoteObject _r = RemoteObject.createImmutable(0); -RemoteObject _g = RemoteObject.createImmutable(0); -RemoteObject _b = RemoteObject.createImmutable(0); -RemoteObject _h = RemoteObject.createImmutable(0f); -RemoteObject _s = RemoteObject.createImmutable(0f); -RemoteObject _v = RemoteObject.createImmutable(0f); -RemoteObject _cmax = RemoteObject.createImmutable(0); -RemoteObject _cmin = RemoteObject.createImmutable(0); -RemoteObject _rc = RemoteObject.createImmutable(0f); -RemoteObject _gc = RemoteObject.createImmutable(0f); -RemoteObject _bc = RemoteObject.createImmutable(0f); -Debug.locals.put("clr", _clr); - BA.debugLineNum = 199;BA.debugLine="Public Sub ColorToHSV(clr As Int) As Object()"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 200;BA.debugLine="Dim a As Int = Bit.And(0xff, Bit.UnsignedShiftRig"; -Debug.JustUpdateDeviceLine(); -_a = b4xcolortemplate.__c.getField(false,"Bit").runMethod(true,"And",(Object)(BA.numberCast(int.class, ((int)0xff))),(Object)(b4xcolortemplate.__c.getField(false,"Bit").runMethod(true,"UnsignedShiftRight",(Object)(_clr),(Object)(BA.numberCast(int.class, 24)))));Debug.locals.put("a", _a);Debug.locals.put("a", _a); - BA.debugLineNum = 201;BA.debugLine="Dim r As Int = Bit.And(0xff, Bit.UnsignedShiftRig"; -Debug.JustUpdateDeviceLine(); -_r = b4xcolortemplate.__c.getField(false,"Bit").runMethod(true,"And",(Object)(BA.numberCast(int.class, ((int)0xff))),(Object)(b4xcolortemplate.__c.getField(false,"Bit").runMethod(true,"UnsignedShiftRight",(Object)(_clr),(Object)(BA.numberCast(int.class, 16)))));Debug.locals.put("r", _r);Debug.locals.put("r", _r); - BA.debugLineNum = 202;BA.debugLine="Dim g As Int = Bit.And(0xff, Bit.UnsignedShiftRig"; -Debug.JustUpdateDeviceLine(); -_g = b4xcolortemplate.__c.getField(false,"Bit").runMethod(true,"And",(Object)(BA.numberCast(int.class, ((int)0xff))),(Object)(b4xcolortemplate.__c.getField(false,"Bit").runMethod(true,"UnsignedShiftRight",(Object)(_clr),(Object)(BA.numberCast(int.class, 8)))));Debug.locals.put("g", _g);Debug.locals.put("g", _g); - BA.debugLineNum = 203;BA.debugLine="Dim b As Int = Bit.And(0xff, Bit.UnsignedShiftRig"; -Debug.JustUpdateDeviceLine(); -_b = b4xcolortemplate.__c.getField(false,"Bit").runMethod(true,"And",(Object)(BA.numberCast(int.class, ((int)0xff))),(Object)(b4xcolortemplate.__c.getField(false,"Bit").runMethod(true,"UnsignedShiftRight",(Object)(_clr),(Object)(BA.numberCast(int.class, 0)))));Debug.locals.put("b", _b);Debug.locals.put("b", _b); - BA.debugLineNum = 204;BA.debugLine="Dim h, s, v As Float"; -Debug.JustUpdateDeviceLine(); -_h = RemoteObject.createImmutable(0f);Debug.locals.put("h", _h); -_s = RemoteObject.createImmutable(0f);Debug.locals.put("s", _s); -_v = RemoteObject.createImmutable(0f);Debug.locals.put("v", _v); - BA.debugLineNum = 205;BA.debugLine="Dim cmax As Int = Max(Max(r, g), b)"; -Debug.JustUpdateDeviceLine(); -_cmax = BA.numberCast(int.class, b4xcolortemplate.__c.runMethod(true,"Max",(Object)(b4xcolortemplate.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, _r)),(Object)(BA.numberCast(double.class, _g)))),(Object)(BA.numberCast(double.class, _b))));Debug.locals.put("cmax", _cmax);Debug.locals.put("cmax", _cmax); - BA.debugLineNum = 206;BA.debugLine="Dim cmin As Int = Min(Min(r, g), b)"; -Debug.JustUpdateDeviceLine(); -_cmin = BA.numberCast(int.class, b4xcolortemplate.__c.runMethod(true,"Min",(Object)(b4xcolortemplate.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, _r)),(Object)(BA.numberCast(double.class, _g)))),(Object)(BA.numberCast(double.class, _b))));Debug.locals.put("cmin", _cmin);Debug.locals.put("cmin", _cmin); - BA.debugLineNum = 207;BA.debugLine="v = cmax / 255"; -Debug.JustUpdateDeviceLine(); -_v = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_cmax,RemoteObject.createImmutable(255)}, "/",0, 0));Debug.locals.put("v", _v); - BA.debugLineNum = 208;BA.debugLine="If cmax <> 0 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("!",_cmax,BA.numberCast(double.class, 0))) { - BA.debugLineNum = 209;BA.debugLine="s = (cmax - cmin) / cmax"; -Debug.JustUpdateDeviceLine(); -_s = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {_cmax,_cmin}, "-",1, 1)),_cmax}, "/",0, 0));Debug.locals.put("s", _s); - }; - BA.debugLineNum = 211;BA.debugLine="If s = 0 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_s,BA.numberCast(double.class, 0))) { - BA.debugLineNum = 212;BA.debugLine="h = 0"; -Debug.JustUpdateDeviceLine(); -_h = BA.numberCast(float.class, 0);Debug.locals.put("h", _h); - }else { - BA.debugLineNum = 214;BA.debugLine="Dim rc As Float = (cmax - r) / (cmax - cmin)"; -Debug.JustUpdateDeviceLine(); -_rc = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {_cmax,_r}, "-",1, 1)),(RemoteObject.solve(new RemoteObject[] {_cmax,_cmin}, "-",1, 1))}, "/",0, 0));Debug.locals.put("rc", _rc);Debug.locals.put("rc", _rc); - BA.debugLineNum = 215;BA.debugLine="Dim gc As Float = (cmax - g) / (cmax - cmin)"; -Debug.JustUpdateDeviceLine(); -_gc = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {_cmax,_g}, "-",1, 1)),(RemoteObject.solve(new RemoteObject[] {_cmax,_cmin}, "-",1, 1))}, "/",0, 0));Debug.locals.put("gc", _gc);Debug.locals.put("gc", _gc); - BA.debugLineNum = 216;BA.debugLine="Dim bc As Float = (cmax - b) / (cmax - cmin)"; -Debug.JustUpdateDeviceLine(); -_bc = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {_cmax,_b}, "-",1, 1)),(RemoteObject.solve(new RemoteObject[] {_cmax,_cmin}, "-",1, 1))}, "/",0, 0));Debug.locals.put("bc", _bc);Debug.locals.put("bc", _bc); - BA.debugLineNum = 217;BA.debugLine="If r = cmax Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_r,BA.numberCast(double.class, _cmax))) { - BA.debugLineNum = 218;BA.debugLine="h = bc - gc"; -Debug.JustUpdateDeviceLine(); -_h = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_bc,_gc}, "-",1, 0));Debug.locals.put("h", _h); - }else -{ BA.debugLineNum = 219;BA.debugLine="Else If g = cmax Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_g,BA.numberCast(double.class, _cmax))) { - BA.debugLineNum = 220;BA.debugLine="h = 2 + rc - bc"; -Debug.JustUpdateDeviceLine(); -_h = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(2),_rc,_bc}, "+-",2, 0));Debug.locals.put("h", _h); - }else { - BA.debugLineNum = 222;BA.debugLine="h = 4 + gc - rc"; -Debug.JustUpdateDeviceLine(); -_h = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(4),_gc,_rc}, "+-",2, 0));Debug.locals.put("h", _h); - }} -; - BA.debugLineNum = 224;BA.debugLine="h = h / 6"; -Debug.JustUpdateDeviceLine(); -_h = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_h,RemoteObject.createImmutable(6)}, "/",0, 0));Debug.locals.put("h", _h); - BA.debugLineNum = 225;BA.debugLine="If h < 0 Then h = h + 1"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("<",_h,BA.numberCast(double.class, 0))) { -_h = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_h,RemoteObject.createImmutable(1)}, "+",1, 0));Debug.locals.put("h", _h);}; - }; - BA.debugLineNum = 227;BA.debugLine="Return Array (h * 360, s, v, a)"; -Debug.JustUpdateDeviceLine(); -if (true) return RemoteObject.createNewArray("Object",new int[] {4},new Object[] {(RemoteObject.solve(new RemoteObject[] {_h,RemoteObject.createImmutable(360)}, "*",0, 0)),(_s),(_v),(_a)}); - BA.debugLineNum = 228;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createpanelforbitmapcreator(RemoteObject __ref,RemoteObject _eventname,RemoteObject _withcheckers) throws Exception{ -try { - Debug.PushSubsStack("CreatePanelForBitmapCreator (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,30); -if (RapidSub.canDelegate("createpanelforbitmapcreator")) { return __ref.runUserSub(false, "b4xcolortemplate","createpanelforbitmapcreator", __ref, _eventname, _withcheckers);} -RemoteObject _cpp = RemoteObject.declareNull("keymon.lat.medicomed.b4xcolortemplate._colorpickerpart"); -RemoteObject _iv = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -RemoteObject _overlay = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -Debug.locals.put("EventName", _eventname); -Debug.locals.put("WithCheckers", _withcheckers); - BA.debugLineNum = 30;BA.debugLine="Private Sub CreatePanelForBitmapCreator (EventName"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 31;BA.debugLine="Dim cpp As ColorPickerPart"; -Debug.JustUpdateDeviceLine(); -_cpp = RemoteObject.createNew ("keymon.lat.medicomed.b4xcolortemplate._colorpickerpart");Debug.locals.put("cpp", _cpp); - BA.debugLineNum = 32;BA.debugLine="cpp.Initialize"; -Debug.JustUpdateDeviceLine(); -_cpp.runVoidMethod ("Initialize"); - BA.debugLineNum = 33;BA.debugLine="cpp.pnl = xui.CreatePanel(\"\")"; -Debug.JustUpdateDeviceLine(); -_cpp.setField ("pnl" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("")))); - BA.debugLineNum = 34;BA.debugLine="cpp.pnl.SetColorAndBorder(BordersColor, 1dip, Bor"; -Debug.JustUpdateDeviceLine(); -_cpp.getField(false,"pnl" /*RemoteObject*/ ).runVoidMethod ("SetColorAndBorder",(Object)(__ref.getField(true,"_borderscolor" /*RemoteObject*/ )),(Object)(b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1)))),(Object)(__ref.getField(true,"_borderscolor" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 35;BA.debugLine="cpp.pnl.SetLayoutAnimated(0, 1dip, 1dip, 1dip, 1d"; -Debug.JustUpdateDeviceLine(); -_cpp.getField(false,"pnl" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1)))),(Object)(b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1)))),(Object)(b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1)))),(Object)(b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1))))); - BA.debugLineNum = 36;BA.debugLine="If WithCheckers Then"; -Debug.JustUpdateDeviceLine(); -if (_withcheckers.get().booleanValue()) { - BA.debugLineNum = 37;BA.debugLine="cpp.checkersCanvas.Initialize(cpp.pnl)"; -Debug.JustUpdateDeviceLine(); -_cpp.getField(false,"checkersCanvas" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(_cpp.getField(false,"pnl" /*RemoteObject*/ ))); - BA.debugLineNum = 38;BA.debugLine="cpp.DrawCheckers = True"; -Debug.JustUpdateDeviceLine(); -_cpp.setField ("DrawCheckers" /*RemoteObject*/ ,b4xcolortemplate.__c.getField(true,"True")); - }; - BA.debugLineNum = 40;BA.debugLine="Dim iv As ImageView"; -Debug.JustUpdateDeviceLine(); -_iv = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");Debug.locals.put("iv", _iv); - BA.debugLineNum = 41;BA.debugLine="iv.Initialize(\"\")"; -Debug.JustUpdateDeviceLine(); -_iv.runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable(""))); - BA.debugLineNum = 42;BA.debugLine="cpp.iv = iv"; -Debug.JustUpdateDeviceLine(); -_cpp.getField(false,"iv" /*RemoteObject*/ ).setObject (_iv.getObject()); - BA.debugLineNum = 43;BA.debugLine="Dim overlay As B4XView = xui.CreatePanel(EventNam"; -Debug.JustUpdateDeviceLine(); -_overlay = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_overlay = __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(_eventname));Debug.locals.put("overlay", _overlay);Debug.locals.put("overlay", _overlay); - BA.debugLineNum = 44;BA.debugLine="cpp.pnl.AddView(iv, 0, 0, 0, 0)"; -Debug.JustUpdateDeviceLine(); -_cpp.getField(false,"pnl" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((_iv.getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 45;BA.debugLine="cpp.pnl.AddView(overlay, 1dip, 1dip, 1dip, 1dip)"; -Debug.JustUpdateDeviceLine(); -_cpp.getField(false,"pnl" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((_overlay.getObject())),(Object)(b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1)))),(Object)(b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1)))),(Object)(b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1)))),(Object)(b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1))))); - BA.debugLineNum = 46;BA.debugLine="cpp.cvs.Initialize(overlay)"; -Debug.JustUpdateDeviceLine(); -_cpp.getField(false,"cvs" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(_overlay)); - BA.debugLineNum = 47;BA.debugLine="mBase.AddView(cpp.pnl, 0, 0, 0, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((_cpp.getField(false,"pnl" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 48;BA.debugLine="Return cpp"; -Debug.JustUpdateDeviceLine(); -if (true) return _cpp; - BA.debugLineNum = 49;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _dialogclosed(RemoteObject __ref,RemoteObject _result) throws Exception{ -try { - Debug.PushSubsStack("DialogClosed (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,241); -if (RapidSub.canDelegate("dialogclosed")) { return __ref.runUserSub(false, "b4xcolortemplate","dialogclosed", __ref, _result);} -Debug.locals.put("Result", _result); - BA.debugLineNum = 241;BA.debugLine="Private Sub DialogClosed(Result As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 242;BA.debugLine="If Result <> xui.DialogResponse_Positive Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("!",_result,BA.numberCast(double.class, __ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"DialogResponse_Positive")))) { - BA.debugLineNum = 243;BA.debugLine="setSelectedHSVColor(InitialColor)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_setselectedhsvcolor" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_initialcolor" /*RemoteObject*/ ))); - }; - BA.debugLineNum = 245;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _drawalphabar(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("DrawAlphaBar (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,109); -if (RapidSub.canDelegate("drawalphabar")) { return __ref.runUserSub(false, "b4xcolortemplate","drawalphabar", __ref);} -RemoteObject _bc = RemoteObject.declareNull("b4a.example.bitmapcreator"); -RemoteObject _argb = RemoteObject.declareNull("b4a.example.bitmapcreator._argbcolor"); -int _y = 0; -int _x = 0; - BA.debugLineNum = 109;BA.debugLine="Private Sub DrawAlphaBar"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 110;BA.debugLine="Dim bc As BitmapCreator"; -Debug.JustUpdateDeviceLine(); -_bc = RemoteObject.createNew ("b4a.example.bitmapcreator");Debug.locals.put("bc", _bc); - BA.debugLineNum = 111;BA.debugLine="bc.Initialize(AlphaBar.pnl.Width / DeviceScale, A"; -Debug.JustUpdateDeviceLine(); -_bc.runVoidMethod ("_initialize",__ref.getField(false, "ba"),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_alphabar" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getWidth"),__ref.getField(true,"_devicescale" /*RemoteObject*/ )}, "/",0, 0))),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_alphabar" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getHeight"),__ref.getField(true,"_devicescale" /*RemoteObject*/ )}, "/",0, 0)))); - BA.debugLineNum = 112;BA.debugLine="Dim argb As ARGBColor"; -Debug.JustUpdateDeviceLine(); -_argb = RemoteObject.createNew ("b4a.example.bitmapcreator._argbcolor");Debug.locals.put("argb", _argb); - BA.debugLineNum = 113;BA.debugLine="argb.r = 0xcc"; -Debug.JustUpdateDeviceLine(); -_argb.setField ("r",BA.numberCast(int.class, ((int)0xcc))); - BA.debugLineNum = 114;BA.debugLine="argb.g = 0xcc"; -Debug.JustUpdateDeviceLine(); -_argb.setField ("g",BA.numberCast(int.class, ((int)0xcc))); - BA.debugLineNum = 115;BA.debugLine="argb.b = 0xcc"; -Debug.JustUpdateDeviceLine(); -_argb.setField ("b",BA.numberCast(int.class, ((int)0xcc))); - BA.debugLineNum = 117;BA.debugLine="For y = 0 To bc.mHeight - 1"; -Debug.JustUpdateDeviceLine(); -{ -final int step7 = 1; -final int limit7 = RemoteObject.solve(new RemoteObject[] {_bc.getField(true,"_mheight"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_y = 0 ; -for (;(step7 > 0 && _y <= limit7) || (step7 < 0 && _y >= limit7) ;_y = ((int)(0 + _y + step7)) ) { -Debug.locals.put("y", _y); - BA.debugLineNum = 118;BA.debugLine="For x = 0 To bc.mWidth - 1"; -Debug.JustUpdateDeviceLine(); -{ -final int step8 = 1; -final int limit8 = RemoteObject.solve(new RemoteObject[] {_bc.getField(true,"_mwidth"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_x = 0 ; -for (;(step8 > 0 && _x <= limit8) || (step8 < 0 && _x >= limit8) ;_x = ((int)(0 + _x + step8)) ) { -Debug.locals.put("x", _x); - BA.debugLineNum = 119;BA.debugLine="argb.a = x / bc.mWidth * 255"; -Debug.JustUpdateDeviceLine(); -_argb.setField ("a",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_x),_bc.getField(true,"_mwidth"),RemoteObject.createImmutable(255)}, "/*",0, 0))); - BA.debugLineNum = 120;BA.debugLine="bc.SetARGB(x, y, argb)"; -Debug.JustUpdateDeviceLine(); -_bc.runVoidMethod ("_setargb",(Object)(BA.numberCast(int.class, _x)),(Object)(BA.numberCast(int.class, _y)),(Object)(_argb)); - } -}Debug.locals.put("x", _x); -; - } -}Debug.locals.put("y", _y); -; - BA.debugLineNum = 123;BA.debugLine="AlphaBar.iv.SetBitmap(bc.Bitmap)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_alphabar" /*RemoteObject*/ ).getField(false,"iv" /*RemoteObject*/ ).runVoidMethod ("SetBitmap",(Object)((_bc.runMethod(false,"_getbitmap").getObject()))); - BA.debugLineNum = 124;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _drawcheckers(RemoteObject __ref,RemoteObject _cpp) throws Exception{ -try { - Debug.PushSubsStack("DrawCheckers (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,79); -if (RapidSub.canDelegate("drawcheckers")) { return __ref.runUserSub(false, "b4xcolortemplate","drawcheckers", __ref, _cpp);} -RemoteObject _size = RemoteObject.createImmutable(0); -RemoteObject _clrs = null; -RemoteObject _clr = RemoteObject.createImmutable(0); -RemoteObject _r = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XRect"); -int _x = 0; -RemoteObject _xx = RemoteObject.createImmutable(0); -int _y = 0; -Debug.locals.put("cpp", _cpp); - BA.debugLineNum = 79;BA.debugLine="Private Sub DrawCheckers (cpp As ColorPickerPart)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 80;BA.debugLine="cpp.checkersCanvas.Resize(cpp.pnl.Width, cpp.pnl."; -Debug.JustUpdateDeviceLine(); -_cpp.getField(false,"checkersCanvas" /*RemoteObject*/ ).runVoidMethod ("Resize",(Object)(BA.numberCast(float.class, _cpp.getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getWidth"))),(Object)(BA.numberCast(float.class, _cpp.getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getHeight")))); - BA.debugLineNum = 81;BA.debugLine="cpp.checkersCanvas.ClearRect(cpp.checkersCanvas.T"; -Debug.JustUpdateDeviceLine(); -_cpp.getField(false,"checkersCanvas" /*RemoteObject*/ ).runVoidMethod ("ClearRect",(Object)(_cpp.getField(false,"checkersCanvas" /*RemoteObject*/ ).runMethod(false,"getTargetRect"))); - BA.debugLineNum = 82;BA.debugLine="Dim size As Int = 10dip"; -Debug.JustUpdateDeviceLine(); -_size = b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 10)));Debug.locals.put("size", _size);Debug.locals.put("size", _size); - BA.debugLineNum = 83;BA.debugLine="Dim clrs() As Int = Array As Int(0xFFC0C0C0, 0xFF"; -Debug.JustUpdateDeviceLine(); -_clrs = RemoteObject.createNewArray("int",new int[] {2},new Object[] {BA.numberCast(int.class, ((int)0xffc0c0c0)),BA.numberCast(int.class, ((int)0xff757575))});Debug.locals.put("clrs", _clrs);Debug.locals.put("clrs", _clrs); - BA.debugLineNum = 84;BA.debugLine="Dim clr As Int = 0"; -Debug.JustUpdateDeviceLine(); -_clr = BA.numberCast(int.class, 0);Debug.locals.put("clr", _clr);Debug.locals.put("clr", _clr); - BA.debugLineNum = 85;BA.debugLine="Dim r As B4XRect"; -Debug.JustUpdateDeviceLine(); -_r = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas.B4XRect");Debug.locals.put("r", _r); - BA.debugLineNum = 86;BA.debugLine="For x = 0 To cpp.checkersCanvas.TargetRect.Right"; -Debug.JustUpdateDeviceLine(); -{ -final int step7 = _size.get().intValue(); -final int limit7 = (int) (0 + RemoteObject.solve(new RemoteObject[] {_cpp.getField(false,"checkersCanvas" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getRight"),b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1)))}, "-",1, 0).get().doubleValue()); -_x = 0 ; -for (;(step7 > 0 && _x <= limit7) || (step7 < 0 && _x >= limit7) ;_x = ((int)(0 + _x + step7)) ) { -Debug.locals.put("x", _x); - BA.debugLineNum = 87;BA.debugLine="Dim xx As Int = x / size"; -Debug.JustUpdateDeviceLine(); -_xx = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_x),_size}, "/",0, 0));Debug.locals.put("xx", _xx);Debug.locals.put("xx", _xx); - BA.debugLineNum = 88;BA.debugLine="clr = xx Mod 2"; -Debug.JustUpdateDeviceLine(); -_clr = RemoteObject.solve(new RemoteObject[] {_xx,RemoteObject.createImmutable(2)}, "%",0, 1);Debug.locals.put("clr", _clr); - BA.debugLineNum = 89;BA.debugLine="For y = 0 To cpp.checkersCanvas.TargetRect.Botto"; -Debug.JustUpdateDeviceLine(); -{ -final int step10 = _size.get().intValue(); -final int limit10 = (int) (0 + RemoteObject.solve(new RemoteObject[] {_cpp.getField(false,"checkersCanvas" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getBottom"),b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1)))}, "-",1, 0).get().doubleValue()); -_y = 0 ; -for (;(step10 > 0 && _y <= limit10) || (step10 < 0 && _y >= limit10) ;_y = ((int)(0 + _y + step10)) ) { -Debug.locals.put("y", _y); - BA.debugLineNum = 90;BA.debugLine="clr = (clr + 1) Mod 2"; -Debug.JustUpdateDeviceLine(); -_clr = RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {_clr,RemoteObject.createImmutable(1)}, "+",1, 1)),RemoteObject.createImmutable(2)}, "%",0, 1);Debug.locals.put("clr", _clr); - BA.debugLineNum = 91;BA.debugLine="r.Initialize(x, y, x + size, y + size)"; -Debug.JustUpdateDeviceLine(); -_r.runVoidMethod ("Initialize",(Object)(BA.numberCast(float.class, _x)),(Object)(BA.numberCast(float.class, _y)),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_x),_size}, "+",1, 1))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_y),_size}, "+",1, 1)))); - BA.debugLineNum = 92;BA.debugLine="cpp.checkersCanvas.DrawRect(r, clrs(clr), True,"; -Debug.JustUpdateDeviceLine(); -_cpp.getField(false,"checkersCanvas" /*RemoteObject*/ ).runVoidMethod ("DrawRect",(Object)(_r),(Object)(_clrs.getArrayElement(true,_clr)),(Object)(b4xcolortemplate.__c.getField(true,"True")),(Object)(BA.numberCast(float.class, 0))); - } -}Debug.locals.put("y", _y); -; - } -}Debug.locals.put("x", _x); -; - BA.debugLineNum = 95;BA.debugLine="cpp.checkersCanvas.Invalidate"; -Debug.JustUpdateDeviceLine(); -_cpp.getField(false,"checkersCanvas" /*RemoteObject*/ ).runVoidMethod ("Invalidate"); - BA.debugLineNum = 96;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _drawcolors(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("DrawColors (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,126); -if (RapidSub.canDelegate("drawcolors")) { return __ref.runUserSub(false, "b4xcolortemplate","drawcolors", __ref);} -int _x = 0; -int _y = 0; - BA.debugLineNum = 126;BA.debugLine="Private Sub DrawColors"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 127;BA.debugLine="For x = 0 To bcColors.mWidth - 1"; -Debug.JustUpdateDeviceLine(); -{ -final int step1 = 1; -final int limit1 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_bccolors" /*RemoteObject*/ ).getField(true,"_mwidth"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_x = 0 ; -for (;(step1 > 0 && _x <= limit1) || (step1 < 0 && _x >= limit1) ;_x = ((int)(0 + _x + step1)) ) { -Debug.locals.put("x", _x); - BA.debugLineNum = 128;BA.debugLine="For y = 0 To bcColors.mHeight - 1"; -Debug.JustUpdateDeviceLine(); -{ -final int step2 = 1; -final int limit2 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_bccolors" /*RemoteObject*/ ).getField(true,"_mheight"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_y = 0 ; -for (;(step2 > 0 && _y <= limit2) || (step2 < 0 && _y >= limit2) ;_y = ((int)(0 + _y + step2)) ) { -Debug.locals.put("y", _y); - BA.debugLineNum = 129;BA.debugLine="bcColors.SetHSV(x, y, SelectedAlpha, selectedH,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_bccolors" /*RemoteObject*/ ).runVoidMethod ("_sethsv",(Object)(BA.numberCast(int.class, _x)),(Object)(BA.numberCast(int.class, _y)),(Object)(__ref.getField(true,"_selectedalpha" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, __ref.getField(true,"_selectedh" /*RemoteObject*/ ))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_x),__ref.getField(false,"_bccolors" /*RemoteObject*/ ).getField(true,"_mwidth")}, "/",0, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_bccolors" /*RemoteObject*/ ).getField(true,"_mheight"),RemoteObject.createImmutable(_y)}, "-",1, 1)),__ref.getField(false,"_bccolors" /*RemoteObject*/ ).getField(true,"_mheight")}, "/",0, 0)))); - } -}Debug.locals.put("y", _y); -; - } -}Debug.locals.put("x", _x); -; - BA.debugLineNum = 133;BA.debugLine="ColorPicker.iv.SetBitmap(bcColors.Bitmap.Resize(C"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_colorpicker" /*RemoteObject*/ ).getField(false,"iv" /*RemoteObject*/ ).runVoidMethod ("SetBitmap",(Object)((__ref.getField(false,"_bccolors" /*RemoteObject*/ ).runMethod(false,"_getbitmap").runMethod(false,"Resize",(Object)(__ref.getField(false,"_colorpicker" /*RemoteObject*/ ).getField(false,"iv" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(__ref.getField(false,"_colorpicker" /*RemoteObject*/ ).getField(false,"iv" /*RemoteObject*/ ).runMethod(true,"getHeight")),(Object)(b4xcolortemplate.__c.getField(true,"False"))).getObject()))); - BA.debugLineNum = 134;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _drawhuebar(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("DrawHueBar (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,98); -if (RapidSub.canDelegate("drawhuebar")) { return __ref.runUserSub(false, "b4xcolortemplate","drawhuebar", __ref);} -RemoteObject _bchue = RemoteObject.declareNull("b4a.example.bitmapcreator"); -int _y = 0; -int _x = 0; - BA.debugLineNum = 98;BA.debugLine="Private Sub DrawHueBar"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 99;BA.debugLine="Dim bcHue As BitmapCreator"; -Debug.JustUpdateDeviceLine(); -_bchue = RemoteObject.createNew ("b4a.example.bitmapcreator");Debug.locals.put("bcHue", _bchue); - BA.debugLineNum = 100;BA.debugLine="bcHue.Initialize(HueBar.pnl.Width / DeviceScale,"; -Debug.JustUpdateDeviceLine(); -_bchue.runVoidMethod ("_initialize",__ref.getField(false, "ba"),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_huebar" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getWidth"),__ref.getField(true,"_devicescale" /*RemoteObject*/ )}, "/",0, 0))),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_huebar" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getHeight"),__ref.getField(true,"_devicescale" /*RemoteObject*/ )}, "/",0, 0)))); - BA.debugLineNum = 101;BA.debugLine="For y = 0 To bcHue.mHeight - 1"; -Debug.JustUpdateDeviceLine(); -{ -final int step3 = 1; -final int limit3 = RemoteObject.solve(new RemoteObject[] {_bchue.getField(true,"_mheight"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_y = 0 ; -for (;(step3 > 0 && _y <= limit3) || (step3 < 0 && _y >= limit3) ;_y = ((int)(0 + _y + step3)) ) { -Debug.locals.put("y", _y); - BA.debugLineNum = 102;BA.debugLine="For x = 0 To bcHue.mWidth - 1"; -Debug.JustUpdateDeviceLine(); -{ -final int step4 = 1; -final int limit4 = RemoteObject.solve(new RemoteObject[] {_bchue.getField(true,"_mwidth"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_x = 0 ; -for (;(step4 > 0 && _x <= limit4) || (step4 < 0 && _x >= limit4) ;_x = ((int)(0 + _x + step4)) ) { -Debug.locals.put("x", _x); - BA.debugLineNum = 103;BA.debugLine="bcHue.SetHSV(x, y, 255, 360 / bcHue.mHeight * y"; -Debug.JustUpdateDeviceLine(); -_bchue.runVoidMethod ("_sethsv",(Object)(BA.numberCast(int.class, _x)),(Object)(BA.numberCast(int.class, _y)),(Object)(BA.numberCast(int.class, 255)),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(360),_bchue.getField(true,"_mheight"),RemoteObject.createImmutable(_y)}, "/*",0, 0))),(Object)(BA.numberCast(float.class, 1)),(Object)(BA.numberCast(float.class, 1))); - } -}Debug.locals.put("x", _x); -; - } -}Debug.locals.put("y", _y); -; - BA.debugLineNum = 106;BA.debugLine="HueBar.iv.SetBitmap(bcHue.Bitmap)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_huebar" /*RemoteObject*/ ).getField(false,"iv" /*RemoteObject*/ ).runVoidMethod ("SetBitmap",(Object)((_bchue.runMethod(false,"_getbitmap").getObject()))); - BA.debugLineNum = 107;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getpanel(RemoteObject __ref,RemoteObject _dialog) throws Exception{ -try { - Debug.PushSubsStack("GetPanel (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,230); -if (RapidSub.canDelegate("getpanel")) { return __ref.runUserSub(false, "b4xcolortemplate","getpanel", __ref, _dialog);} -Debug.locals.put("Dialog", _dialog); - BA.debugLineNum = 230;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 231;BA.debugLine="Return mBase"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_mbase" /*RemoteObject*/ ); - BA.debugLineNum = 232;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getselectedcolor(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getSelectedColor (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,175); -if (RapidSub.canDelegate("getselectedcolor")) { return __ref.runUserSub(false, "b4xcolortemplate","getselectedcolor", __ref);} -RemoteObject _hsv = null; - BA.debugLineNum = 175;BA.debugLine="Public Sub getSelectedColor As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 176;BA.debugLine="Dim hsv() As Object = getSelectedHSVColor"; -Debug.JustUpdateDeviceLine(); -_hsv = __ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_getselectedhsvcolor" /*RemoteObject*/ );Debug.locals.put("hsv", _hsv);Debug.locals.put("hsv", _hsv); - BA.debugLineNum = 177;BA.debugLine="tempBC.SetHSV(0, 0, SelectedAlpha, hsv(0), hsv(1)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_tempbc" /*RemoteObject*/ ).runVoidMethod ("_sethsv",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(true,"_selectedalpha" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, _hsv.getArrayElement(false,BA.numberCast(int.class, 0)))),(Object)(BA.numberCast(float.class, _hsv.getArrayElement(false,BA.numberCast(int.class, 1)))),(Object)(BA.numberCast(float.class, _hsv.getArrayElement(false,BA.numberCast(int.class, 2))))); - BA.debugLineNum = 178;BA.debugLine="Return tempBC.GetColor(0, 0)"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_tempbc" /*RemoteObject*/ ).runMethod(true,"_getcolor",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 179;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getselectedhsvcolor(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getSelectedHSVColor (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,186); -if (RapidSub.canDelegate("getselectedhsvcolor")) { return __ref.runUserSub(false, "b4xcolortemplate","getselectedhsvcolor", __ref);} - BA.debugLineNum = 186;BA.debugLine="Public Sub getSelectedHSVColor As Object()"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 187;BA.debugLine="Return Array (selectedH, selectedS, selectedV, Se"; -Debug.JustUpdateDeviceLine(); -if (true) return RemoteObject.createNewArray("Object",new int[] {4},new Object[] {(__ref.getField(true,"_selectedh" /*RemoteObject*/ )),(__ref.getField(true,"_selecteds" /*RemoteObject*/ )),(__ref.getField(true,"_selectedv" /*RemoteObject*/ )),(__ref.getField(true,"_selectedalpha" /*RemoteObject*/ ))}); - BA.debugLineNum = 188;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _handleselectedcolorchanged(RemoteObject __ref,RemoteObject _x,RemoteObject _y) throws Exception{ -try { - Debug.PushSubsStack("HandleSelectedColorChanged (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,163); -if (RapidSub.canDelegate("handleselectedcolorchanged")) { return __ref.runUserSub(false, "b4xcolortemplate","handleselectedcolorchanged", __ref, _x, _y);} -Debug.locals.put("x", _x); -Debug.locals.put("y", _y); - BA.debugLineNum = 163;BA.debugLine="Private Sub HandleSelectedColorChanged (x As Int,"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 164;BA.debugLine="If x <> DONT_CHANGE Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("!",_x,BA.numberCast(double.class, __ref.getField(true,"_dont_change" /*RemoteObject*/ )))) { - BA.debugLineNum = 165;BA.debugLine="selectedS = Max(0, Min(1, x / ColorPicker.pnl.Wi"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_selecteds" /*RemoteObject*/ ,BA.numberCast(float.class, b4xcolortemplate.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, 0)),(Object)(b4xcolortemplate.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, 1)),(Object)(RemoteObject.solve(new RemoteObject[] {_x,__ref.getField(false,"_colorpicker" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getWidth")}, "/",0, 0))))))); - BA.debugLineNum = 166;BA.debugLine="selectedV = Max(0, Min(1, (ColorPicker.pnl.Heigh"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_selectedv" /*RemoteObject*/ ,BA.numberCast(float.class, b4xcolortemplate.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, 0)),(Object)(b4xcolortemplate.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, 1)),(Object)(RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_colorpicker" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getHeight"),_y}, "-",1, 1)),__ref.getField(false,"_colorpicker" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getHeight")}, "/",0, 0))))))); - }; - BA.debugLineNum = 168;BA.debugLine="ColorPicker.cvs.ClearRect(ColorPicker.cvs.TargetR"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_colorpicker" /*RemoteObject*/ ).getField(false,"cvs" /*RemoteObject*/ ).runVoidMethod ("ClearRect",(Object)(__ref.getField(false,"_colorpicker" /*RemoteObject*/ ).getField(false,"cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect"))); - BA.debugLineNum = 169;BA.debugLine="ColorPicker.cvs.DrawCircle(selectedS * ColorPicke"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_colorpicker" /*RemoteObject*/ ).getField(false,"cvs" /*RemoteObject*/ ).runVoidMethod ("DrawCircle",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_selecteds" /*RemoteObject*/ ),__ref.getField(false,"_colorpicker" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getWidth")}, "*",0, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_colorpicker" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getHeight"),__ref.getField(true,"_selectedv" /*RemoteObject*/ ),__ref.getField(false,"_colorpicker" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getHeight")}, "-*",1, 0))),(Object)(BA.numberCast(float.class, b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 10))))),(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_White")),(Object)(b4xcolortemplate.__c.getField(true,"False")),(Object)(BA.numberCast(float.class, b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)))))); - BA.debugLineNum = 171;BA.debugLine="ColorPicker.cvs.Invalidate"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_colorpicker" /*RemoteObject*/ ).getField(false,"cvs" /*RemoteObject*/ ).runVoidMethod ("Invalidate"); - BA.debugLineNum = 172;BA.debugLine="UpdateBarColor"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_updatebarcolor" /*RemoteObject*/ ); - BA.debugLineNum = 173;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _huebar_touch(RemoteObject __ref,RemoteObject _action,RemoteObject _x,RemoteObject _y) throws Exception{ -try { - Debug.PushSubsStack("HueBar_Touch (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,258); -if (RapidSub.canDelegate("huebar_touch")) { return __ref.runUserSub(false, "b4xcolortemplate","huebar_touch", __ref, _action, _x, _y);} -Debug.locals.put("Action", _action); -Debug.locals.put("X", _x); -Debug.locals.put("Y", _y); - BA.debugLineNum = 258;BA.debugLine="Private Sub HueBar_Touch (Action As Int, X As Floa"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 259;BA.debugLine="If Action = mBase.TOUCH_ACTION_MOVE_NOTOUCH Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_action,BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).getField(true,"TOUCH_ACTION_MOVE_NOTOUCH")))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 260;BA.debugLine="HueBarSelectedChanged(Y)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_huebarselectedchanged" /*RemoteObject*/ ,(Object)(_y)); - BA.debugLineNum = 261;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _huebarselectedchanged(RemoteObject __ref,RemoteObject _y) throws Exception{ -try { - Debug.PushSubsStack("HueBarSelectedChanged (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,136); -if (RapidSub.canDelegate("huebarselectedchanged")) { return __ref.runUserSub(false, "b4xcolortemplate","huebarselectedchanged", __ref, _y);} -RemoteObject _r = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XRect"); -Debug.locals.put("y", _y); - BA.debugLineNum = 136;BA.debugLine="Private Sub HueBarSelectedChanged (y As Float)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 137;BA.debugLine="selectedH = Max(0, Min(360, 360 * y / HueBar.pnl."; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_selectedh" /*RemoteObject*/ ,BA.numberCast(float.class, b4xcolortemplate.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, 0)),(Object)(b4xcolortemplate.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, 360)),(Object)(RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(360),_y,__ref.getField(false,"_huebar" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getHeight")}, "*/",0, 0))))))); - BA.debugLineNum = 138;BA.debugLine="y = selectedH * HueBar.pnl.Height / 360"; -Debug.JustUpdateDeviceLine(); -_y = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_selectedh" /*RemoteObject*/ ),__ref.getField(false,"_huebar" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getHeight"),RemoteObject.createImmutable(360)}, "*/",0, 0));Debug.locals.put("y", _y); - BA.debugLineNum = 139;BA.debugLine="HueBar.cvs.ClearRect(HueBar.cvs.TargetRect)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_huebar" /*RemoteObject*/ ).getField(false,"cvs" /*RemoteObject*/ ).runVoidMethod ("ClearRect",(Object)(__ref.getField(false,"_huebar" /*RemoteObject*/ ).getField(false,"cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect"))); - BA.debugLineNum = 140;BA.debugLine="Dim r As B4XRect"; -Debug.JustUpdateDeviceLine(); -_r = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas.B4XRect");Debug.locals.put("r", _r); - BA.debugLineNum = 141;BA.debugLine="r.Initialize(0, y - 3dip, HueBar.cvs.TargetRect.R"; -Debug.JustUpdateDeviceLine(); -_r.runVoidMethod ("Initialize",(Object)(BA.numberCast(float.class, 0)),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_y,b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 3)))}, "-",1, 0))),(Object)(__ref.getField(false,"_huebar" /*RemoteObject*/ ).getField(false,"cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getRight")),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_y,b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 3)))}, "+",1, 0)))); - BA.debugLineNum = 142;BA.debugLine="HueBar.cvs.DrawRect(r, xui.Color_White, False, 2d"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_huebar" /*RemoteObject*/ ).getField(false,"cvs" /*RemoteObject*/ ).runVoidMethod ("DrawRect",(Object)(_r),(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_White")),(Object)(b4xcolortemplate.__c.getField(true,"False")),(Object)(BA.numberCast(float.class, b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)))))); - BA.debugLineNum = 143;BA.debugLine="HueBar.cvs.Invalidate"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_huebar" /*RemoteObject*/ ).getField(false,"cvs" /*RemoteObject*/ ).runVoidMethod ("Invalidate"); - BA.debugLineNum = 144;BA.debugLine="Update"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_update" /*RemoteObject*/ ); - BA.debugLineNum = 145;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,17); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xcolortemplate","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 17;BA.debugLine="Public Sub Initialize"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 18;BA.debugLine="tempBC.Initialize(1, 1)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_tempbc" /*RemoteObject*/ ).runVoidMethod ("_initialize",__ref.getField(false, "ba"),(Object)(BA.numberCast(int.class, 1)),(Object)(BA.numberCast(int.class, 1))); - BA.debugLineNum = 19;BA.debugLine="DeviceScale = 100dip / 100"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_devicescale" /*RemoteObject*/ ,BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 100))),RemoteObject.createImmutable(100)}, "/",0, 0))); - BA.debugLineNum = 20;BA.debugLine="mBase = xui.CreatePanel(\"\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mbase" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("")))); - BA.debugLineNum = 21;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, 300dip, 250dip)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 300)))),(Object)(b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 250))))); - BA.debugLineNum = 22;BA.debugLine="BordersColor = xui.Color_Black"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_borderscolor" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Black")); - BA.debugLineNum = 23;BA.debugLine="mBase.SetColorAndBorder(BordersColor, 1dip, Borde"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetColorAndBorder",(Object)(__ref.getField(true,"_borderscolor" /*RemoteObject*/ )),(Object)(b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1)))),(Object)(__ref.getField(true,"_borderscolor" /*RemoteObject*/ )),(Object)(b4xcolortemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2))))); - BA.debugLineNum = 24;BA.debugLine="HueBar = CreatePanelForBitmapCreator(\"hueBar\", Fa"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_huebar" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_createpanelforbitmapcreator" /*RemoteObject*/ ,(Object)(BA.ObjectToString("hueBar")),(Object)(b4xcolortemplate.__c.getField(true,"False")))); - BA.debugLineNum = 25;BA.debugLine="ColorPicker = CreatePanelForBitmapCreator(\"colors"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_colorpicker" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_createpanelforbitmapcreator" /*RemoteObject*/ ,(Object)(BA.ObjectToString("colors")),(Object)(b4xcolortemplate.__c.getField(true,"True")))); - BA.debugLineNum = 26;BA.debugLine="AlphaBar = CreatePanelForBitmapCreator(\"alpha\", T"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_alphabar" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_createpanelforbitmapcreator" /*RemoteObject*/ ,(Object)(BA.ObjectToString("alpha")),(Object)(b4xcolortemplate.__c.getField(true,"True")))); - BA.debugLineNum = 27;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_base_resize" /*RemoteObject*/ ,(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"))),(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight")))); - BA.debugLineNum = 28;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setselectedcolor(RemoteObject __ref,RemoteObject _i) throws Exception{ -try { - Debug.PushSubsStack("setSelectedColor (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,181); -if (RapidSub.canDelegate("setselectedcolor")) { return __ref.runUserSub(false, "b4xcolortemplate","setselectedcolor", __ref, _i);} -Debug.locals.put("i", _i); - BA.debugLineNum = 181;BA.debugLine="Public Sub setSelectedColor(i As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 182;BA.debugLine="setSelectedHSVColor(ColorToHSV(i))"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_setselectedhsvcolor" /*RemoteObject*/ ,(Object)(__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_colortohsv" /*RemoteObject*/ ,(Object)(_i)))); - BA.debugLineNum = 183;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setselectedhsvcolor(RemoteObject __ref,RemoteObject _hsv) throws Exception{ -try { - Debug.PushSubsStack("setSelectedHSVColor (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,190); -if (RapidSub.canDelegate("setselectedhsvcolor")) { return __ref.runUserSub(false, "b4xcolortemplate","setselectedhsvcolor", __ref, _hsv);} -Debug.locals.put("HSV", _hsv); - BA.debugLineNum = 190;BA.debugLine="Public Sub setSelectedHSVColor (HSV() As Object)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 191;BA.debugLine="selectedH = HSV(0)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_selectedh" /*RemoteObject*/ ,BA.numberCast(float.class, _hsv.getArrayElement(false,BA.numberCast(int.class, 0)))); - BA.debugLineNum = 192;BA.debugLine="selectedS = HSV(1)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_selecteds" /*RemoteObject*/ ,BA.numberCast(float.class, _hsv.getArrayElement(false,BA.numberCast(int.class, 1)))); - BA.debugLineNum = 193;BA.debugLine="selectedV = HSV(2)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_selectedv" /*RemoteObject*/ ,BA.numberCast(float.class, _hsv.getArrayElement(false,BA.numberCast(int.class, 2)))); - BA.debugLineNum = 194;BA.debugLine="SelectedAlpha = HSV(3)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_selectedalpha" /*RemoteObject*/ ,BA.numberCast(int.class, _hsv.getArrayElement(false,BA.numberCast(int.class, 3)))); - BA.debugLineNum = 195;BA.debugLine="HueBarSelectedChanged(selectedH / 360 * HueBar.pn"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_huebarselectedchanged" /*RemoteObject*/ ,(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_selectedh" /*RemoteObject*/ ),RemoteObject.createImmutable(360),__ref.getField(false,"_huebar" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getHeight")}, "/*",0, 0)))); - BA.debugLineNum = 196;BA.debugLine="AlphaBarSelectedChange(SelectedAlpha / 255 * Alph"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_alphabarselectedchange" /*RemoteObject*/ ,(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_selectedalpha" /*RemoteObject*/ ),RemoteObject.createImmutable(255),__ref.getField(false,"_alphabar" /*RemoteObject*/ ).getField(false,"pnl" /*RemoteObject*/ ).runMethod(true,"getWidth")}, "/*",0, 0)))); - BA.debugLineNum = 197;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _show(RemoteObject __ref,RemoteObject _dialog) throws Exception{ -try { - Debug.PushSubsStack("Show (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,234); -if (RapidSub.canDelegate("show")) { __ref.runUserSub(false, "b4xcolortemplate","show", __ref, _dialog); return;} -ResumableSub_Show rsub = new ResumableSub_Show(null,__ref,_dialog); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_Show extends BA.ResumableSub { -public ResumableSub_Show(keymon.lat.medicomed.b4xcolortemplate parent,RemoteObject __ref,RemoteObject _dialog) { -this.parent = parent; -this.__ref = __ref; -this._dialog = _dialog; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.b4xcolortemplate parent; -RemoteObject _dialog; - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("Show (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,234); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = -1; -Debug.locals.put("_ref", __ref); -Debug.locals.put("Dialog", _dialog); - BA.debugLineNum = 235;BA.debugLine="InitialColor = getSelectedHSVColor"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_initialcolor" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_getselectedhsvcolor" /*RemoteObject*/ )); - BA.debugLineNum = 236;BA.debugLine="xDialog = Dialog"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_xdialog" /*RemoteObject*/ ,_dialog); - BA.debugLineNum = 237;BA.debugLine="Sleep(0)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xcolortemplate", "show"),BA.numberCast(int.class, 0)); -this.state = 1; -return; -case 1: -//C -this.state = -1; -; - BA.debugLineNum = 238;BA.debugLine="UpdateBarColor"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_updatebarcolor" /*RemoteObject*/ ); - BA.debugLineNum = 239;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _update(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Update (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,158); -if (RapidSub.canDelegate("update")) { return __ref.runUserSub(false, "b4xcolortemplate","update", __ref);} - BA.debugLineNum = 158;BA.debugLine="Private Sub Update"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 159;BA.debugLine="DrawColors"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_drawcolors" /*RemoteObject*/ ); - BA.debugLineNum = 160;BA.debugLine="HandleSelectedColorChanged(DONT_CHANGE, DONT_CHAN"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_handleselectedcolorchanged" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_dont_change" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_dont_change" /*RemoteObject*/ ))); - BA.debugLineNum = 161;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _updatebarcolor(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("UpdateBarColor (b4xcolortemplate) ","b4xcolortemplate",40,__ref.getField(false, "ba"),__ref,247); -if (RapidSub.canDelegate("updatebarcolor")) { return __ref.runUserSub(false, "b4xcolortemplate","updatebarcolor", __ref);} - BA.debugLineNum = 247;BA.debugLine="Private Sub UpdateBarColor"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 248;BA.debugLine="If xDialog.IsInitialized And xDialog.TitleBar.IsI"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(".",__ref.getField(false,"_xdialog" /*RemoteObject*/ ).runMethod(true,"IsInitialized" /*RemoteObject*/ )) && RemoteObject.solveBoolean(".",__ref.getField(false,"_xdialog" /*RemoteObject*/ ).getField(false,"_titlebar" /*RemoteObject*/ ).runMethod(true,"IsInitialized"))) { - BA.debugLineNum = 249;BA.debugLine="xDialog.TitleBar.Color = getSelectedColor"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_xdialog" /*RemoteObject*/ ).getField(false,"_titlebar" /*RemoteObject*/ ).runMethod(true,"setColor",__ref.runClassMethod (keymon.lat.medicomed.b4xcolortemplate.class, "_getselectedcolor" /*RemoteObject*/ )); - }; - BA.debugLineNum = 251;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcombobox.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcombobox.java deleted file mode 100644 index 21c3b1b..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcombobox.java +++ /dev/null @@ -1,39 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xcombobox { - public static RemoteObject myClass; - public b4xcombobox() { - } - public static PCBA staticBA = new PCBA(null, b4xcombobox.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _meventname = RemoteObject.createImmutable(""); -public static RemoteObject _mcallback = RemoteObject.declareNull("Object"); -public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _lastselectedindex = RemoteObject.createImmutable(0); -public static RemoteObject _cmbbox = RemoteObject.declareNull("anywheresoftware.b4a.objects.SpinnerWrapper"); -public static RemoteObject _delaybeforechangeevent = RemoteObject.createImmutable(0); -public static RemoteObject _delayindex = RemoteObject.createImmutable(0); -public static RemoteObject _tag = RemoteObject.declareNull("Object"); -public static RemoteObject _b4icancelbutton = RemoteObject.createImmutable(""); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"B4iCancelButton",_ref.getField(false, "_b4icancelbutton"),"cmbBox",_ref.getField(false, "_cmbbox"),"DateUtils",_ref.getField(false, "_dateutils"),"DelayBeforeChangeEvent",_ref.getField(false, "_delaybeforechangeevent"),"DelayIndex",_ref.getField(false, "_delayindex"),"LastSelectedIndex",_ref.getField(false, "_lastselectedindex"),"mBase",_ref.getField(false, "_mbase"),"mCallBack",_ref.getField(false, "_mcallback"),"mEventName",_ref.getField(false, "_meventname"),"Tag",_ref.getField(false, "_tag"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcombobox_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcombobox_subs_0.java deleted file mode 100644 index ebc8579..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcombobox_subs_0.java +++ /dev/null @@ -1,465 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xcombobox_subs_0 { - - -public static RemoteObject _base_resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("Base_Resize (b4xcombobox) ","b4xcombobox",41,__ref.getField(false, "ba"),__ref,55); -if (RapidSub.canDelegate("base_resize")) { return __ref.runUserSub(false, "b4xcombobox","base_resize", __ref, _width, _height);} -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 55;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 56;BA.debugLine="mBase.GetView(0).SetLayoutAnimated(0, 0, 0, Width"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0))).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, _width)),(Object)(BA.numberCast(int.class, _height))); - BA.debugLineNum = 57;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 2;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 3;BA.debugLine="Private mEventName As String 'ignore"; -b4xcombobox._meventname = RemoteObject.createImmutable("");__ref.setField("_meventname",b4xcombobox._meventname); - //BA.debugLineNum = 4;BA.debugLine="Private mCallBack As Object 'ignore"; -b4xcombobox._mcallback = RemoteObject.createNew ("Object");__ref.setField("_mcallback",b4xcombobox._mcallback); - //BA.debugLineNum = 5;BA.debugLine="Public mBase As B4XView"; -b4xcombobox._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",b4xcombobox._mbase); - //BA.debugLineNum = 6;BA.debugLine="Private xui As XUI 'ignore"; -b4xcombobox._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",b4xcombobox._xui); - //BA.debugLineNum = 7;BA.debugLine="Private LastSelectedIndex As Int"; -b4xcombobox._lastselectedindex = RemoteObject.createImmutable(0);__ref.setField("_lastselectedindex",b4xcombobox._lastselectedindex); - //BA.debugLineNum = 11;BA.debugLine="Public cmbBox As Spinner"; -b4xcombobox._cmbbox = RemoteObject.createNew ("anywheresoftware.b4a.objects.SpinnerWrapper");__ref.setField("_cmbbox",b4xcombobox._cmbbox); - //BA.debugLineNum = 17;BA.debugLine="Public DelayBeforeChangeEvent As Int"; -b4xcombobox._delaybeforechangeevent = RemoteObject.createImmutable(0);__ref.setField("_delaybeforechangeevent",b4xcombobox._delaybeforechangeevent); - //BA.debugLineNum = 19;BA.debugLine="Private DelayIndex As Int"; -b4xcombobox._delayindex = RemoteObject.createImmutable(0);__ref.setField("_delayindex",b4xcombobox._delayindex); - //BA.debugLineNum = 20;BA.debugLine="Public Tag As Object"; -b4xcombobox._tag = RemoteObject.createNew ("Object");__ref.setField("_tag",b4xcombobox._tag); - //BA.debugLineNum = 21;BA.debugLine="Public B4iCancelButton As String = \"Cancel\""; -b4xcombobox._b4icancelbutton = BA.ObjectToString("Cancel");__ref.setField("_b4icancelbutton",b4xcombobox._b4icancelbutton); - //BA.debugLineNum = 22;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _cmbbox_itemclick(RemoteObject __ref,RemoteObject _position,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("CmbBox_ItemClick (b4xcombobox) ","b4xcombobox",41,__ref.getField(false, "ba"),__ref,157); -if (RapidSub.canDelegate("cmbbox_itemclick")) { return __ref.runUserSub(false, "b4xcombobox","cmbbox_itemclick", __ref, _position, _value);} -Debug.locals.put("Position", _position); -Debug.locals.put("Value", _value); - BA.debugLineNum = 157;BA.debugLine="Private Sub CmbBox_ItemClick (Position As Int, Val"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 158;BA.debugLine="RaiseEvent"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcombobox.class, "_raiseevent" /*void*/ ); - BA.debugLineNum = 159;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _designercreateview(RemoteObject __ref,RemoteObject _base,RemoteObject _lbl,RemoteObject _props) throws Exception{ -try { - Debug.PushSubsStack("DesignerCreateView (b4xcombobox) ","b4xcombobox",41,__ref.getField(false, "ba"),__ref,32); -if (RapidSub.canDelegate("designercreateview")) { return __ref.runUserSub(false, "b4xcombobox","designercreateview", __ref, _base, _lbl, _props);} -RemoteObject _xlbl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -Debug.locals.put("Base", _base); -Debug.locals.put("Lbl", _lbl); -Debug.locals.put("Props", _props); - BA.debugLineNum = 32;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 33;BA.debugLine="mBase = Base"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).setObject (_base); - BA.debugLineNum = 34;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_tag" /*RemoteObject*/ ,__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"getTag")); - BA.debugLineNum = 34;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"setTag",__ref); - BA.debugLineNum = 35;BA.debugLine="Dim xlbl As B4XView = Lbl"; -Debug.JustUpdateDeviceLine(); -_xlbl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_xlbl = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), _lbl.getObject());Debug.locals.put("xlbl", _xlbl);Debug.locals.put("xlbl", _xlbl); - BA.debugLineNum = 42;BA.debugLine="cmbBox.Initialize(\"cmbBox\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cmbbox" /*RemoteObject*/ ).runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("cmbBox"))); - BA.debugLineNum = 43;BA.debugLine="cmbBox.TextSize = xlbl.TextSize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cmbbox" /*RemoteObject*/ ).runMethod(true,"setTextSize",_xlbl.runMethod(true,"getTextSize")); - BA.debugLineNum = 44;BA.debugLine="mBase.AddView(cmbBox, 0, 0, mBase.Width, mBase.He"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_cmbbox" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"))); - BA.debugLineNum = 53;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getitem(RemoteObject __ref,RemoteObject _index) throws Exception{ -try { - Debug.PushSubsStack("GetItem (b4xcombobox) ","b4xcombobox",41,__ref.getField(false, "ba"),__ref,127); -if (RapidSub.canDelegate("getitem")) { return __ref.runUserSub(false, "b4xcombobox","getitem", __ref, _index);} -Debug.locals.put("Index", _index); - BA.debugLineNum = 127;BA.debugLine="Public Sub GetItem(Index As Int) As String"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 131;BA.debugLine="Return cmbBox.GetItem(Index)"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_cmbbox" /*RemoteObject*/ ).runMethod(true,"GetItem",(Object)(_index)); - BA.debugLineNum = 135;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getselectedindex(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getSelectedIndex (b4xcombobox) ","b4xcombobox",41,__ref.getField(false, "ba"),__ref,98); -if (RapidSub.canDelegate("getselectedindex")) { return __ref.runUserSub(false, "b4xcombobox","getselectedindex", __ref);} - BA.debugLineNum = 98;BA.debugLine="Public Sub getSelectedIndex As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 100;BA.debugLine="Return cmbBox.SelectedIndex"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_cmbbox" /*RemoteObject*/ ).runMethod(true,"getSelectedIndex"); - BA.debugLineNum = 104;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getselecteditem(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getSelectedItem (b4xcombobox) ","b4xcombobox",41,__ref.getField(false, "ba"),__ref,121); -if (RapidSub.canDelegate("getselecteditem")) { return __ref.runUserSub(false, "b4xcombobox","getselecteditem", __ref);} -RemoteObject _i = RemoteObject.createImmutable(0); - BA.debugLineNum = 121;BA.debugLine="Public Sub getSelectedItem As String"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 122;BA.debugLine="Dim i As Int = getSelectedIndex"; -Debug.JustUpdateDeviceLine(); -_i = __ref.runClassMethod (keymon.lat.medicomed.b4xcombobox.class, "_getselectedindex" /*RemoteObject*/ );Debug.locals.put("i", _i);Debug.locals.put("i", _i); - BA.debugLineNum = 123;BA.debugLine="If i = -1 Then Return \"\""; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_i,BA.numberCast(double.class, -(double) (0 + 1)))) { -if (true) return BA.ObjectToString("");}; - BA.debugLineNum = 124;BA.debugLine="Return GetItem(i)"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.runClassMethod (keymon.lat.medicomed.b4xcombobox.class, "_getitem" /*RemoteObject*/ ,(Object)(_i)); - BA.debugLineNum = 125;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getsize(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getSize (b4xcombobox) ","b4xcombobox",41,__ref.getField(false, "ba"),__ref,76); -if (RapidSub.canDelegate("getsize")) { return __ref.runUserSub(false, "b4xcombobox","getsize", __ref);} - BA.debugLineNum = 76;BA.debugLine="Public Sub getSize As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 80;BA.debugLine="Return cmbBox.Size"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_cmbbox" /*RemoteObject*/ ).runMethod(true,"getSize"); - BA.debugLineNum = 84;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _indexof(RemoteObject __ref,RemoteObject _item) throws Exception{ -try { - Debug.PushSubsStack("IndexOf (b4xcombobox) ","b4xcombobox",41,__ref.getField(false, "ba"),__ref,87); -if (RapidSub.canDelegate("indexof")) { return __ref.runUserSub(false, "b4xcombobox","indexof", __ref, _item);} -Debug.locals.put("Item", _item); - BA.debugLineNum = 87;BA.debugLine="Public Sub IndexOf(Item As String) As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 91;BA.debugLine="Return cmbBox.IndexOf(Item)"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_cmbbox" /*RemoteObject*/ ).runMethod(true,"IndexOf",(Object)(_item)); - BA.debugLineNum = 95;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _callback,RemoteObject _eventname) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xcombobox) ","b4xcombobox",41,__ref.getField(false, "ba"),__ref,24); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xcombobox","initialize", __ref, _ba, _callback, _eventname);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); -Debug.locals.put("Callback", _callback); -Debug.locals.put("EventName", _eventname); - BA.debugLineNum = 24;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 25;BA.debugLine="mEventName = EventName"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_meventname" /*RemoteObject*/ ,_eventname); - BA.debugLineNum = 26;BA.debugLine="mCallBack = Callback"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mcallback" /*RemoteObject*/ ,_callback); - BA.debugLineNum = 27;BA.debugLine="LastSelectedIndex = -1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_lastselectedindex" /*RemoteObject*/ ,BA.numberCast(int.class, -(double) (0 + 1))); - BA.debugLineNum = 28;BA.debugLine="If xui.IsB4J Then DelayBeforeChangeEvent = 500"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4J").get().booleanValue()) { -__ref.setField ("_delaybeforechangeevent" /*RemoteObject*/ ,BA.numberCast(int.class, 500));}; - BA.debugLineNum = 29;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _raiseevent(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("RaiseEvent (b4xcombobox) ","b4xcombobox",41,__ref.getField(false, "ba"),__ref,137); -if (RapidSub.canDelegate("raiseevent")) { __ref.runUserSub(false, "b4xcombobox","raiseevent", __ref); return;} -ResumableSub_RaiseEvent rsub = new ResumableSub_RaiseEvent(null,__ref); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_RaiseEvent extends BA.ResumableSub { -public ResumableSub_RaiseEvent(keymon.lat.medicomed.b4xcombobox parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.b4xcombobox parent; -RemoteObject _index = RemoteObject.createImmutable(0); -RemoteObject _myindex = RemoteObject.createImmutable(0); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("RaiseEvent (b4xcombobox) ","b4xcombobox",41,__ref.getField(false, "ba"),__ref,137); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 138;BA.debugLine="Dim index As Int = getSelectedIndex"; -Debug.JustUpdateDeviceLine(); -_index = __ref.runClassMethod (keymon.lat.medicomed.b4xcombobox.class, "_getselectedindex" /*RemoteObject*/ );Debug.locals.put("index", _index);Debug.locals.put("index", _index); - BA.debugLineNum = 139;BA.debugLine="If LastSelectedIndex = index Then Return"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 1: -//if -this.state = 6; -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_lastselectedindex" /*RemoteObject*/ ),BA.numberCast(double.class, _index))) { -this.state = 3; -;}if (true) break; - -case 3: -//C -this.state = 6; -if (true) return ; -if (true) break; - -case 6: -//C -this.state = 7; -; - BA.debugLineNum = 140;BA.debugLine="If DelayBeforeChangeEvent > 0 Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 7: -//if -this.state = 16; -if (RemoteObject.solveBoolean(">",__ref.getField(true,"_delaybeforechangeevent" /*RemoteObject*/ ),BA.numberCast(double.class, 0))) { -this.state = 9; -}if (true) break; - -case 9: -//C -this.state = 10; - BA.debugLineNum = 141;BA.debugLine="DelayIndex = DelayIndex + 1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_delayindex" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_delayindex" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "+",1, 1)); - BA.debugLineNum = 142;BA.debugLine="Dim MyIndex As Int = DelayIndex"; -Debug.JustUpdateDeviceLine(); -_myindex = __ref.getField(true,"_delayindex" /*RemoteObject*/ );Debug.locals.put("MyIndex", _myindex);Debug.locals.put("MyIndex", _myindex); - BA.debugLineNum = 143;BA.debugLine="Sleep(DelayBeforeChangeEvent)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xcombobox", "raiseevent"),__ref.getField(true,"_delaybeforechangeevent" /*RemoteObject*/ )); -this.state = 21; -return; -case 21: -//C -this.state = 10; -; - BA.debugLineNum = 144;BA.debugLine="If MyIndex <> DelayIndex Then Return"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 10: -//if -this.state = 15; -if (RemoteObject.solveBoolean("!",_myindex,BA.numberCast(double.class, __ref.getField(true,"_delayindex" /*RemoteObject*/ )))) { -this.state = 12; -;}if (true) break; - -case 12: -//C -this.state = 15; -if (true) return ; -if (true) break; - -case 15: -//C -this.state = 16; -; - if (true) break; - -case 16: -//C -this.state = 17; -; - BA.debugLineNum = 146;BA.debugLine="LastSelectedIndex = index"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_lastselectedindex" /*RemoteObject*/ ,_index); - BA.debugLineNum = 147;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_Select"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 17: -//if -this.state = 20; -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"SubExists",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_SelectedIndexChanged"))),(Object)(BA.numberCast(int.class, 1))).get().booleanValue()) { -this.state = 19; -}if (true) break; - -case 19: -//C -this.state = 20; - BA.debugLineNum = 148;BA.debugLine="CallSub2(mCallBack, mEventName & \"_SelectedIndex"; -Debug.JustUpdateDeviceLine(); -parent.__c.runMethodAndSync(false,"CallSubNew2",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_SelectedIndexChanged"))),(Object)((_index))); - if (true) break; - -case 20: -//C -this.state = -1; -; - BA.debugLineNum = 150;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _setitems(RemoteObject __ref,RemoteObject _items) throws Exception{ -try { - Debug.PushSubsStack("SetItems (b4xcombobox) ","b4xcombobox",41,__ref.getField(false, "ba"),__ref,59); -if (RapidSub.canDelegate("setitems")) { return __ref.runUserSub(false, "b4xcombobox","setitems", __ref, _items);} -Debug.locals.put("Items", _items); - BA.debugLineNum = 59;BA.debugLine="Public Sub SetItems(Items As List)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 64;BA.debugLine="cmbBox.Clear"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cmbbox" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 65;BA.debugLine="cmbBox.AddAll(Items)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cmbbox" /*RemoteObject*/ ).runVoidMethod ("AddAll",(Object)(_items)); - BA.debugLineNum = 72;BA.debugLine="If Items.Size > 0 Then setSelectedIndex(0)"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",_items.runMethod(true,"getSize"),BA.numberCast(double.class, 0))) { -__ref.runClassMethod (keymon.lat.medicomed.b4xcombobox.class, "_setselectedindex" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, 0)));}; - BA.debugLineNum = 73;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setselectedindex(RemoteObject __ref,RemoteObject _i) throws Exception{ -try { - Debug.PushSubsStack("setSelectedIndex (b4xcombobox) ","b4xcombobox",41,__ref.getField(false, "ba"),__ref,106); -if (RapidSub.canDelegate("setselectedindex")) { return __ref.runUserSub(false, "b4xcombobox","setselectedindex", __ref, _i);} -Debug.locals.put("i", _i); - BA.debugLineNum = 106;BA.debugLine="Public Sub setSelectedIndex(i As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 107;BA.debugLine="LastSelectedIndex = i"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_lastselectedindex" /*RemoteObject*/ ,_i); - BA.debugLineNum = 109;BA.debugLine="cmbBox.SelectedIndex = i"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cmbbox" /*RemoteObject*/ ).runMethod(true,"setSelectedIndex",_i); - BA.debugLineNum = 118;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcomparatorsort.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcomparatorsort.java deleted file mode 100644 index 2aa68e4..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcomparatorsort.java +++ /dev/null @@ -1,29 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xcomparatorsort { - public static RemoteObject myClass; - public b4xcomparatorsort() { - } - public static PCBA staticBA = new PCBA(null, b4xcomparatorsort.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"DateUtils",_ref.getField(false, "_dateutils")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcomparatorsort_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcomparatorsort_subs_0.java deleted file mode 100644 index 9795aa5..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xcomparatorsort_subs_0.java +++ /dev/null @@ -1,181 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xcomparatorsort_subs_0 { - - -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xcomparatorsort) ","b4xcomparatorsort",30,__ref.getField(false, "ba"),__ref,4); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xcomparatorsort","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 4;BA.debugLine="Public Sub Initialize"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 5;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _partition(RemoteObject __ref,RemoteObject _data,RemoteObject _startindex,RemoteObject _length,RemoteObject _pivotindex,RemoteObject _comparator) throws Exception{ -try { - Debug.PushSubsStack("Partition (b4xcomparatorsort) ","b4xcomparatorsort",30,__ref.getField(false, "ba"),__ref,30); -if (RapidSub.canDelegate("partition")) { return __ref.runUserSub(false, "b4xcomparatorsort","partition", __ref, _data, _startindex, _length, _pivotindex, _comparator);} -RemoteObject _pivotvalue = RemoteObject.declareNull("Object"); -RemoteObject _l = RemoteObject.createImmutable(0); -int _i = 0; -Debug.locals.put("Data", _data); -Debug.locals.put("StartIndex", _startindex); -Debug.locals.put("Length", _length); -Debug.locals.put("PivotIndex", _pivotindex); -Debug.locals.put("Comparator", _comparator); - BA.debugLineNum = 30;BA.debugLine="Private Sub Partition(Data As List, StartIndex As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 31;BA.debugLine="Dim PivotValue As Object = Data.Get(StartIndex +"; -Debug.JustUpdateDeviceLine(); -_pivotvalue = _data.runMethod(false,"Get",(Object)(RemoteObject.solve(new RemoteObject[] {_startindex,_pivotindex}, "+",1, 1)));Debug.locals.put("PivotValue", _pivotvalue);Debug.locals.put("PivotValue", _pivotvalue); - BA.debugLineNum = 32;BA.debugLine="Swap(Data, StartIndex, PivotIndex, Length - 1)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcomparatorsort.class, "_swap" /*RemoteObject*/ ,(Object)(_data),(Object)(_startindex),(Object)(_pivotindex),(Object)(RemoteObject.solve(new RemoteObject[] {_length,RemoteObject.createImmutable(1)}, "-",1, 1))); - BA.debugLineNum = 33;BA.debugLine="Dim L As Int = 0"; -Debug.JustUpdateDeviceLine(); -_l = BA.numberCast(int.class, 0);Debug.locals.put("L", _l);Debug.locals.put("L", _l); - BA.debugLineNum = 34;BA.debugLine="For i = 0 To Length - 2"; -Debug.JustUpdateDeviceLine(); -{ -final int step4 = 1; -final int limit4 = RemoteObject.solve(new RemoteObject[] {_length,RemoteObject.createImmutable(2)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step4 > 0 && _i <= limit4) || (step4 < 0 && _i >= limit4) ;_i = ((int)(0 + _i + step4)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 35;BA.debugLine="If CallSub3(Comparator, \"Compare\", Data.Get(Star"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("<",(BA.numberCast(int.class, b4xcomparatorsort.__c.runMethodAndSync(false,"CallSubNew3",__ref.getField(false, "ba"),(Object)(_comparator),(Object)(BA.ObjectToString("Compare")),(Object)(_data.runMethod(false,"Get",(Object)(RemoteObject.solve(new RemoteObject[] {_startindex,RemoteObject.createImmutable(_i)}, "+",1, 1)))),(Object)(_pivotvalue)))),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 36;BA.debugLine="L = L + 1"; -Debug.JustUpdateDeviceLine(); -_l = RemoteObject.solve(new RemoteObject[] {_l,RemoteObject.createImmutable(1)}, "+",1, 1);Debug.locals.put("L", _l); - BA.debugLineNum = 37;BA.debugLine="Swap(Data, StartIndex, L - 1, i)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcomparatorsort.class, "_swap" /*RemoteObject*/ ,(Object)(_data),(Object)(_startindex),(Object)(RemoteObject.solve(new RemoteObject[] {_l,RemoteObject.createImmutable(1)}, "-",1, 1)),(Object)(BA.numberCast(int.class, _i))); - }; - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 40;BA.debugLine="Swap(Data, StartIndex, Length - 1, L)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcomparatorsort.class, "_swap" /*RemoteObject*/ ,(Object)(_data),(Object)(_startindex),(Object)(RemoteObject.solve(new RemoteObject[] {_length,RemoteObject.createImmutable(1)}, "-",1, 1)),(Object)(_l)); - BA.debugLineNum = 41;BA.debugLine="Return L"; -Debug.JustUpdateDeviceLine(); -if (true) return _l; - BA.debugLineNum = 42;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _quicksort(RemoteObject __ref,RemoteObject _data,RemoteObject _startindex,RemoteObject _length,RemoteObject _comparator) throws Exception{ -try { - Debug.PushSubsStack("QuickSort (b4xcomparatorsort) ","b4xcomparatorsort",30,__ref.getField(false, "ba"),__ref,21); -if (RapidSub.canDelegate("quicksort")) { return __ref.runUserSub(false, "b4xcomparatorsort","quicksort", __ref, _data, _startindex, _length, _comparator);} -RemoteObject _pivotindex = RemoteObject.createImmutable(0); -RemoteObject _r = RemoteObject.createImmutable(0); -Debug.locals.put("Data", _data); -Debug.locals.put("StartIndex", _startindex); -Debug.locals.put("Length", _length); -Debug.locals.put("Comparator", _comparator); - BA.debugLineNum = 21;BA.debugLine="Private Sub QuickSort (Data As List, StartIndex As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 22;BA.debugLine="If Length > 1 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",_length,BA.numberCast(double.class, 1))) { - BA.debugLineNum = 23;BA.debugLine="Dim PivotIndex As Int = Rnd(0, Length)"; -Debug.JustUpdateDeviceLine(); -_pivotindex = b4xcomparatorsort.__c.runMethod(true,"Rnd",(Object)(BA.numberCast(int.class, 0)),(Object)(_length));Debug.locals.put("PivotIndex", _pivotindex);Debug.locals.put("PivotIndex", _pivotindex); - BA.debugLineNum = 24;BA.debugLine="Dim r As Int = Partition(Data, StartIndex, Lengt"; -Debug.JustUpdateDeviceLine(); -_r = __ref.runClassMethod (keymon.lat.medicomed.b4xcomparatorsort.class, "_partition" /*RemoteObject*/ ,(Object)(_data),(Object)(_startindex),(Object)(_length),(Object)(_pivotindex),(Object)(_comparator));Debug.locals.put("r", _r);Debug.locals.put("r", _r); - BA.debugLineNum = 25;BA.debugLine="QuickSort(Data, StartIndex, r, Comparator)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcomparatorsort.class, "_quicksort" /*RemoteObject*/ ,(Object)(_data),(Object)(_startindex),(Object)(_r),(Object)(_comparator)); - BA.debugLineNum = 26;BA.debugLine="QuickSort(Data, StartIndex + r + 1, Length - r -"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcomparatorsort.class, "_quicksort" /*RemoteObject*/ ,(Object)(_data),(Object)(RemoteObject.solve(new RemoteObject[] {_startindex,_r,RemoteObject.createImmutable(1)}, "++",2, 1)),(Object)(RemoteObject.solve(new RemoteObject[] {_length,_r,RemoteObject.createImmutable(1)}, "--",2, 1)),(Object)(_comparator)); - }; - BA.debugLineNum = 28;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _sort(RemoteObject __ref,RemoteObject _data,RemoteObject _comparator) throws Exception{ -try { - Debug.PushSubsStack("Sort (b4xcomparatorsort) ","b4xcomparatorsort",30,__ref.getField(false, "ba"),__ref,12); -if (RapidSub.canDelegate("sort")) { return __ref.runUserSub(false, "b4xcomparatorsort","sort", __ref, _data, _comparator);} -Debug.locals.put("Data", _data); -Debug.locals.put("Comparator", _comparator); - BA.debugLineNum = 12;BA.debugLine="Public Sub Sort (Data As List, Comparator As Objec"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 14;BA.debugLine="QuickSort(Data, 0, Data.Size, Comparator)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xcomparatorsort.class, "_quicksort" /*RemoteObject*/ ,(Object)(_data),(Object)(BA.numberCast(int.class, 0)),(Object)(_data.runMethod(true,"getSize")),(Object)(_comparator)); - BA.debugLineNum = 18;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _swap(RemoteObject __ref,RemoteObject _data,RemoteObject _startindex,RemoteObject _i1,RemoteObject _i2) throws Exception{ -try { - Debug.PushSubsStack("Swap (b4xcomparatorsort) ","b4xcomparatorsort",30,__ref.getField(false, "ba"),__ref,44); -if (RapidSub.canDelegate("swap")) { return __ref.runUserSub(false, "b4xcomparatorsort","swap", __ref, _data, _startindex, _i1, _i2);} -RemoteObject _o = RemoteObject.declareNull("Object"); -Debug.locals.put("Data", _data); -Debug.locals.put("StartIndex", _startindex); -Debug.locals.put("i1", _i1); -Debug.locals.put("i2", _i2); - BA.debugLineNum = 44;BA.debugLine="Private Sub Swap (Data As List, StartIndex As Int,"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 45;BA.debugLine="Dim o As Object = Data.Get(StartIndex + i1)"; -Debug.JustUpdateDeviceLine(); -_o = _data.runMethod(false,"Get",(Object)(RemoteObject.solve(new RemoteObject[] {_startindex,_i1}, "+",1, 1)));Debug.locals.put("o", _o);Debug.locals.put("o", _o); - BA.debugLineNum = 46;BA.debugLine="Data.Set(StartIndex + i1, Data.Get(StartIndex + i"; -Debug.JustUpdateDeviceLine(); -_data.runVoidMethod ("Set",(Object)(RemoteObject.solve(new RemoteObject[] {_startindex,_i1}, "+",1, 1)),(Object)(_data.runMethod(false,"Get",(Object)(RemoteObject.solve(new RemoteObject[] {_startindex,_i2}, "+",1, 1))))); - BA.debugLineNum = 47;BA.debugLine="Data.Set(StartIndex + i2, o)"; -Debug.JustUpdateDeviceLine(); -_data.runVoidMethod ("Set",(Object)(RemoteObject.solve(new RemoteObject[] {_startindex,_i2}, "+",1, 1)),(Object)(_o)); - BA.debugLineNum = 48;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xdatetemplate.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xdatetemplate.java deleted file mode 100644 index c9c08cc..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xdatetemplate.java +++ /dev/null @@ -1,67 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xdatetemplate { - public static RemoteObject myClass; - public b4xdatetemplate() { - } - public static PCBA staticBA = new PCBA(null, b4xdatetemplate.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _month = RemoteObject.createImmutable(0); -public static RemoteObject _year = RemoteObject.createImmutable(0); -public static RemoteObject _boxw = RemoteObject.createImmutable(0f); -public static RemoteObject _boxh = RemoteObject.createImmutable(0f); -public static RemoteObject _vcorrection = RemoteObject.createImmutable(0f); -public static RemoteObject _tempselectedday = RemoteObject.createImmutable(0); -public static RemoteObject _dayofweekoffset = RemoteObject.createImmutable(0); -public static RemoteObject _daysinmonth = RemoteObject.createImmutable(0); -public static RemoteObject _dayspanebg = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _dayspanefg = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _cvs = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas"); -public static RemoteObject _cvsbackground = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas"); -public static RemoteObject _selecteddate = RemoteObject.createImmutable(0L); -public static RemoteObject _previousselecteddate = RemoteObject.createImmutable(0L); -public static RemoteObject _selectedyear = RemoteObject.createImmutable(0); -public static RemoteObject _selectedmonth = RemoteObject.createImmutable(0); -public static RemoteObject _selectedday = RemoteObject.createImmutable(0); -public static RemoteObject _highlightedcolor = RemoteObject.createImmutable(0); -public static RemoteObject _selectedcolor = RemoteObject.createImmutable(0); -public static RemoteObject _daysinmonthcolor = RemoteObject.createImmutable(0); -public static RemoteObject _daysinweekcolor = RemoteObject.createImmutable(0); -public static RemoteObject _cvsdays = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas"); -public static RemoteObject _daystitlespane = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _firstday = RemoteObject.createImmutable(0); -public static RemoteObject _minyear = RemoteObject.createImmutable(0); -public static RemoteObject _maxyear = RemoteObject.createImmutable(0); -public static RemoteObject _btnmonthleft = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _btnmonthright = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _btnyearleft = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _btnyearright = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _lblmonth = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _lblyear = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _pnldialog = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _months = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _mdialog = RemoteObject.declareNull("keymon.lat.medicomed.b4xdialog"); -public static RemoteObject _closeonselection = RemoteObject.createImmutable(false); -public static RemoteObject _daysofweeknames = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"boxH",_ref.getField(false, "_boxh"),"boxW",_ref.getField(false, "_boxw"),"btnMonthLeft",_ref.getField(false, "_btnmonthleft"),"btnMonthRight",_ref.getField(false, "_btnmonthright"),"btnYearLeft",_ref.getField(false, "_btnyearleft"),"btnYearRight",_ref.getField(false, "_btnyearright"),"CloseOnSelection",_ref.getField(false, "_closeonselection"),"cvs",_ref.getField(false, "_cvs"),"cvsBackground",_ref.getField(false, "_cvsbackground"),"cvsDays",_ref.getField(false, "_cvsdays"),"DateUtils",_ref.getField(false, "_dateutils"),"dayOfWeekOffset",_ref.getField(false, "_dayofweekoffset"),"daysInMonth",_ref.getField(false, "_daysinmonth"),"DaysInMonthColor",_ref.getField(false, "_daysinmonthcolor"),"DaysInWeekColor",_ref.getField(false, "_daysinweekcolor"),"DaysOfWeekNames",_ref.getField(false, "_daysofweeknames"),"DaysPaneBg",_ref.getField(false, "_dayspanebg"),"DaysPaneFg",_ref.getField(false, "_dayspanefg"),"DaysTitlesPane",_ref.getField(false, "_daystitlespane"),"FirstDay",_ref.getField(false, "_firstday"),"HighlightedColor",_ref.getField(false, "_highlightedcolor"),"lblMonth",_ref.getField(false, "_lblmonth"),"lblYear",_ref.getField(false, "_lblyear"),"MaxYear",_ref.getField(false, "_maxyear"),"mDialog",_ref.getField(false, "_mdialog"),"MinYear",_ref.getField(false, "_minyear"),"month",_ref.getField(false, "_month"),"months",_ref.getField(false, "_months"),"pnlDialog",_ref.getField(false, "_pnldialog"),"PreviousSelectedDate",_ref.getField(false, "_previousselecteddate"),"SelectedColor",_ref.getField(false, "_selectedcolor"),"selectedDate",_ref.getField(false, "_selecteddate"),"selectedDay",_ref.getField(false, "_selectedday"),"selectedMonth",_ref.getField(false, "_selectedmonth"),"selectedYear",_ref.getField(false, "_selectedyear"),"tempSelectedDay",_ref.getField(false, "_tempselectedday"),"vCorrection",_ref.getField(false, "_vcorrection"),"xui",_ref.getField(false, "_xui"),"year",_ref.getField(false, "_year")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xdatetemplate_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xdatetemplate_subs_0.java deleted file mode 100644 index 78126f7..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xdatetemplate_subs_0.java +++ /dev/null @@ -1,759 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xdatetemplate_subs_0 { - - -public static RemoteObject _btnmonth_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("btnMonth_Click (b4xdatetemplate) ","b4xdatetemplate",42,__ref.getField(false, "ba"),__ref,160); -if (RapidSub.canDelegate("btnmonth_click")) { return __ref.runUserSub(false, "b4xdatetemplate","btnmonth_click", __ref);} -RemoteObject _btn = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _m = RemoteObject.createImmutable(0); - BA.debugLineNum = 160;BA.debugLine="Private Sub btnMonth_Click"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 161;BA.debugLine="Dim btn As B4XView = Sender"; -Debug.JustUpdateDeviceLine(); -_btn = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_btn = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), b4xdatetemplate.__c.runMethod(false,"Sender",__ref.getField(false, "ba")));Debug.locals.put("btn", _btn);Debug.locals.put("btn", _btn); - BA.debugLineNum = 162;BA.debugLine="Dim m As Int = 12 + month - 1 + btn.Tag"; -Debug.JustUpdateDeviceLine(); -_m = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(12),__ref.getField(true,"_month" /*RemoteObject*/ ),RemoteObject.createImmutable(1),BA.numberCast(double.class, _btn.runMethod(false,"getTag"))}, "+-+",3, 0));Debug.locals.put("m", _m);Debug.locals.put("m", _m); - BA.debugLineNum = 163;BA.debugLine="month = (m Mod 12) + 1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_month" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {_m,RemoteObject.createImmutable(12)}, "%",0, 1)),RemoteObject.createImmutable(1)}, "+",1, 1)); - BA.debugLineNum = 164;BA.debugLine="DrawDays"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdatetemplate.class, "_drawdays" /*RemoteObject*/ ); - BA.debugLineNum = 165;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _btnyear_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("btnYear_Click (b4xdatetemplate) ","b4xdatetemplate",42,__ref.getField(false, "ba"),__ref,154); -if (RapidSub.canDelegate("btnyear_click")) { return __ref.runUserSub(false, "b4xdatetemplate","btnyear_click", __ref);} -RemoteObject _btn = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); - BA.debugLineNum = 154;BA.debugLine="Private Sub btnYear_Click"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 155;BA.debugLine="Dim btn As B4XView = Sender"; -Debug.JustUpdateDeviceLine(); -_btn = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_btn = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), b4xdatetemplate.__c.runMethod(false,"Sender",__ref.getField(false, "ba")));Debug.locals.put("btn", _btn);Debug.locals.put("btn", _btn); - BA.debugLineNum = 156;BA.debugLine="year = year + btn.Tag"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_year" /*RemoteObject*/ ,BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_year" /*RemoteObject*/ ),BA.numberCast(double.class, _btn.runMethod(false,"getTag"))}, "+",1, 0))); - BA.debugLineNum = 157;BA.debugLine="DrawDays"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdatetemplate.class, "_drawdays" /*RemoteObject*/ ); - BA.debugLineNum = 158;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Private xui As XUI"; -b4xdatetemplate._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",b4xdatetemplate._xui); - //BA.debugLineNum = 3;BA.debugLine="Private month, year As Int"; -b4xdatetemplate._month = RemoteObject.createImmutable(0);__ref.setField("_month",b4xdatetemplate._month); -b4xdatetemplate._year = RemoteObject.createImmutable(0);__ref.setField("_year",b4xdatetemplate._year); - //BA.debugLineNum = 4;BA.debugLine="Private boxW, boxH As Float"; -b4xdatetemplate._boxw = RemoteObject.createImmutable(0f);__ref.setField("_boxw",b4xdatetemplate._boxw); -b4xdatetemplate._boxh = RemoteObject.createImmutable(0f);__ref.setField("_boxh",b4xdatetemplate._boxh); - //BA.debugLineNum = 5;BA.debugLine="Private vCorrection As Float"; -b4xdatetemplate._vcorrection = RemoteObject.createImmutable(0f);__ref.setField("_vcorrection",b4xdatetemplate._vcorrection); - //BA.debugLineNum = 6;BA.debugLine="Private tempSelectedDay As Int"; -b4xdatetemplate._tempselectedday = RemoteObject.createImmutable(0);__ref.setField("_tempselectedday",b4xdatetemplate._tempselectedday); - //BA.debugLineNum = 7;BA.debugLine="Private dayOfWeekOffset As Int"; -b4xdatetemplate._dayofweekoffset = RemoteObject.createImmutable(0);__ref.setField("_dayofweekoffset",b4xdatetemplate._dayofweekoffset); - //BA.debugLineNum = 8;BA.debugLine="Private daysInMonth As Int"; -b4xdatetemplate._daysinmonth = RemoteObject.createImmutable(0);__ref.setField("_daysinmonth",b4xdatetemplate._daysinmonth); - //BA.debugLineNum = 9;BA.debugLine="Private DaysPaneBg As B4XView"; -b4xdatetemplate._dayspanebg = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_dayspanebg",b4xdatetemplate._dayspanebg); - //BA.debugLineNum = 10;BA.debugLine="Private DaysPaneFg As B4XView"; -b4xdatetemplate._dayspanefg = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_dayspanefg",b4xdatetemplate._dayspanefg); - //BA.debugLineNum = 11;BA.debugLine="Private cvs As B4XCanvas"; -b4xdatetemplate._cvs = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas");__ref.setField("_cvs",b4xdatetemplate._cvs); - //BA.debugLineNum = 12;BA.debugLine="Private cvsBackground As B4XCanvas"; -b4xdatetemplate._cvsbackground = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas");__ref.setField("_cvsbackground",b4xdatetemplate._cvsbackground); - //BA.debugLineNum = 13;BA.debugLine="Private selectedDate As Long"; -b4xdatetemplate._selecteddate = RemoteObject.createImmutable(0L);__ref.setField("_selecteddate",b4xdatetemplate._selecteddate); - //BA.debugLineNum = 14;BA.debugLine="Private PreviousSelectedDate As Long"; -b4xdatetemplate._previousselecteddate = RemoteObject.createImmutable(0L);__ref.setField("_previousselecteddate",b4xdatetemplate._previousselecteddate); - //BA.debugLineNum = 15;BA.debugLine="Private selectedYear, selectedMonth, selectedDay"; -b4xdatetemplate._selectedyear = RemoteObject.createImmutable(0);__ref.setField("_selectedyear",b4xdatetemplate._selectedyear); -b4xdatetemplate._selectedmonth = RemoteObject.createImmutable(0);__ref.setField("_selectedmonth",b4xdatetemplate._selectedmonth); -b4xdatetemplate._selectedday = RemoteObject.createImmutable(0);__ref.setField("_selectedday",b4xdatetemplate._selectedday); - //BA.debugLineNum = 16;BA.debugLine="Public HighlightedColor As Int = 0xFF001BBD"; -b4xdatetemplate._highlightedcolor = BA.numberCast(int.class, ((int)0xff001bbd));__ref.setField("_highlightedcolor",b4xdatetemplate._highlightedcolor); - //BA.debugLineNum = 17;BA.debugLine="Public SelectedColor As Int = 0xFF0BA29B"; -b4xdatetemplate._selectedcolor = BA.numberCast(int.class, ((int)0xff0ba29b));__ref.setField("_selectedcolor",b4xdatetemplate._selectedcolor); - //BA.debugLineNum = 18;BA.debugLine="Public DaysInMonthColor As Int = xui.Color_White"; -b4xdatetemplate._daysinmonthcolor = __ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_White");__ref.setField("_daysinmonthcolor",b4xdatetemplate._daysinmonthcolor); - //BA.debugLineNum = 19;BA.debugLine="Public DaysInWeekColor As Int = xui.Color_Gray"; -b4xdatetemplate._daysinweekcolor = __ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Gray");__ref.setField("_daysinweekcolor",b4xdatetemplate._daysinweekcolor); - //BA.debugLineNum = 20;BA.debugLine="Private cvsDays As B4XCanvas"; -b4xdatetemplate._cvsdays = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas");__ref.setField("_cvsdays",b4xdatetemplate._cvsdays); - //BA.debugLineNum = 21;BA.debugLine="Private DaysTitlesPane As B4XView"; -b4xdatetemplate._daystitlespane = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_daystitlespane",b4xdatetemplate._daystitlespane); - //BA.debugLineNum = 22;BA.debugLine="Public FirstDay As Int = 0"; -b4xdatetemplate._firstday = BA.numberCast(int.class, 0);__ref.setField("_firstday",b4xdatetemplate._firstday); - //BA.debugLineNum = 23;BA.debugLine="Public MinYear = 1970, MaxYear = 2030 As Int"; -b4xdatetemplate._minyear = BA.numberCast(int.class, 1970);__ref.setField("_minyear",b4xdatetemplate._minyear); -b4xdatetemplate._maxyear = BA.numberCast(int.class, 2030);__ref.setField("_maxyear",b4xdatetemplate._maxyear); - //BA.debugLineNum = 24;BA.debugLine="Public btnMonthLeft As B4XView"; -b4xdatetemplate._btnmonthleft = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_btnmonthleft",b4xdatetemplate._btnmonthleft); - //BA.debugLineNum = 25;BA.debugLine="Public btnMonthRight As B4XView"; -b4xdatetemplate._btnmonthright = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_btnmonthright",b4xdatetemplate._btnmonthright); - //BA.debugLineNum = 26;BA.debugLine="Public btnYearLeft As B4XView"; -b4xdatetemplate._btnyearleft = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_btnyearleft",b4xdatetemplate._btnyearleft); - //BA.debugLineNum = 27;BA.debugLine="Public btnYearRight As B4XView"; -b4xdatetemplate._btnyearright = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_btnyearright",b4xdatetemplate._btnyearright); - //BA.debugLineNum = 28;BA.debugLine="Public lblMonth As B4XView"; -b4xdatetemplate._lblmonth = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_lblmonth",b4xdatetemplate._lblmonth); - //BA.debugLineNum = 29;BA.debugLine="Public lblYear As B4XView"; -b4xdatetemplate._lblyear = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_lblyear",b4xdatetemplate._lblyear); - //BA.debugLineNum = 30;BA.debugLine="Private pnlDialog As B4XView"; -b4xdatetemplate._pnldialog = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_pnldialog",b4xdatetemplate._pnldialog); - //BA.debugLineNum = 31;BA.debugLine="Private months As List"; -b4xdatetemplate._months = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_months",b4xdatetemplate._months); - //BA.debugLineNum = 32;BA.debugLine="Private mDialog As B4XDialog"; -b4xdatetemplate._mdialog = RemoteObject.createNew ("keymon.lat.medicomed.b4xdialog");__ref.setField("_mdialog",b4xdatetemplate._mdialog); - //BA.debugLineNum = 33;BA.debugLine="Public CloseOnSelection As Boolean = True"; -b4xdatetemplate._closeonselection = b4xdatetemplate.__c.getField(true,"True");__ref.setField("_closeonselection",b4xdatetemplate._closeonselection); - //BA.debugLineNum = 34;BA.debugLine="Public DaysOfWeekNames As List"; -b4xdatetemplate._daysofweeknames = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_daysofweeknames",b4xdatetemplate._daysofweeknames); - //BA.debugLineNum = 35;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _dayspanefg_touch(RemoteObject __ref,RemoteObject _action,RemoteObject _x,RemoteObject _y) throws Exception{ -try { - Debug.PushSubsStack("DaysPaneFg_Touch (b4xdatetemplate) ","b4xdatetemplate",42,__ref.getField(false, "ba"),__ref,167); -if (RapidSub.canDelegate("dayspanefg_touch")) { return __ref.runUserSub(false, "b4xdatetemplate","dayspanefg_touch", __ref, _action, _x, _y);} -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -Debug.locals.put("Action", _action); -Debug.locals.put("X", _x); -Debug.locals.put("Y", _y); - BA.debugLineNum = 167;BA.debugLine="Private Sub DaysPaneFg_Touch (Action As Int, X As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 168;BA.debugLine="Dim p As B4XView = DaysPaneFg"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_p = __ref.getField(false,"_dayspanefg" /*RemoteObject*/ );Debug.locals.put("p", _p);Debug.locals.put("p", _p); - BA.debugLineNum = 169;BA.debugLine="HandleMouse(X, Y, Action <> p.TOUCH_ACTION_UP)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdatetemplate.class, "_handlemouse" /*RemoteObject*/ ,(Object)(BA.numberCast(double.class, _x)),(Object)(BA.numberCast(double.class, _y)),(Object)(BA.ObjectToBoolean(RemoteObject.solveBoolean("!",_action,BA.numberCast(double.class, _p.getField(true,"TOUCH_ACTION_UP")))))); - BA.debugLineNum = 170;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _dialogclosed(RemoteObject __ref,RemoteObject _result) throws Exception{ -try { - Debug.PushSubsStack("DialogClosed (b4xdatetemplate) ","b4xdatetemplate",42,__ref.getField(false, "ba"),__ref,193); -if (RapidSub.canDelegate("dialogclosed")) { return __ref.runUserSub(false, "b4xdatetemplate","dialogclosed", __ref, _result);} -Debug.locals.put("Result", _result); - BA.debugLineNum = 193;BA.debugLine="Private Sub DialogClosed(Result As Int) 'ignore"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 194;BA.debugLine="If Result <> xui.DialogResponse_Positive Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("!",_result,BA.numberCast(double.class, __ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"DialogResponse_Positive")))) { - BA.debugLineNum = 195;BA.debugLine="setDate(PreviousSelectedDate)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdatetemplate.class, "_setdate" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_previousselecteddate" /*RemoteObject*/ ))); - }; - BA.debugLineNum = 197;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _drawbox(RemoteObject __ref,RemoteObject _c,RemoteObject _clr,RemoteObject _x,RemoteObject _y) throws Exception{ -try { - Debug.PushSubsStack("DrawBox (b4xdatetemplate) ","b4xdatetemplate",42,__ref.getField(false, "ba"),__ref,91); -if (RapidSub.canDelegate("drawbox")) { return __ref.runUserSub(false, "b4xdatetemplate","drawbox", __ref, _c, _clr, _x, _y);} -RemoteObject _r = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XRect"); -Debug.locals.put("c", _c); -Debug.locals.put("clr", _clr); -Debug.locals.put("x", _x); -Debug.locals.put("y", _y); - BA.debugLineNum = 91;BA.debugLine="Private Sub DrawBox(c As B4XCanvas, clr As Int, x"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 92;BA.debugLine="Dim r As B4XRect"; -Debug.JustUpdateDeviceLine(); -_r = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas.B4XRect");Debug.locals.put("r", _r); - BA.debugLineNum = 93;BA.debugLine="r.Initialize(x * boxW, y * boxH, x * boxW + boxW,"; -Debug.JustUpdateDeviceLine(); -_r.runVoidMethod ("Initialize",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_x,__ref.getField(true,"_boxw" /*RemoteObject*/ )}, "*",0, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_y,__ref.getField(true,"_boxh" /*RemoteObject*/ )}, "*",0, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_x,__ref.getField(true,"_boxw" /*RemoteObject*/ ),__ref.getField(true,"_boxw" /*RemoteObject*/ )}, "*+",1, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_y,__ref.getField(true,"_boxh" /*RemoteObject*/ ),__ref.getField(true,"_boxh" /*RemoteObject*/ )}, "*+",1, 0)))); - BA.debugLineNum = 94;BA.debugLine="c.DrawRect(r, clr, True, 1dip)"; -Debug.JustUpdateDeviceLine(); -_c.runVoidMethod ("DrawRect",(Object)(_r),(Object)(_clr),(Object)(b4xdatetemplate.__c.getField(true,"True")),(Object)(BA.numberCast(float.class, b4xdatetemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1)))))); - BA.debugLineNum = 95;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _drawdays(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("DrawDays (b4xdatetemplate) ","b4xdatetemplate",42,__ref.getField(false, "ba"),__ref,62); -if (RapidSub.canDelegate("drawdays")) { return __ref.runUserSub(false, "b4xdatetemplate","drawdays", __ref);} -RemoteObject _firstdayofmonth = RemoteObject.createImmutable(0L); -RemoteObject _daysfont = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont"); -int _day = 0; -RemoteObject _row = RemoteObject.createImmutable(0); - BA.debugLineNum = 62;BA.debugLine="Private Sub DrawDays"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 63;BA.debugLine="lblMonth.Text = months.Get(month - 1)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_lblmonth" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_months" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_month" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "-",1, 1))))); - BA.debugLineNum = 64;BA.debugLine="lblYear.Text = year"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_lblyear" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(true,"_year" /*RemoteObject*/ ))); - BA.debugLineNum = 65;BA.debugLine="SetYearsButtonState"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdatetemplate.class, "_setyearsbuttonstate" /*RemoteObject*/ ); - BA.debugLineNum = 66;BA.debugLine="cvs.ClearRect(cvs.TargetRect)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("ClearRect",(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect"))); - BA.debugLineNum = 67;BA.debugLine="cvsBackground.ClearRect(cvsBackground.TargetRect)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvsbackground" /*RemoteObject*/ ).runVoidMethod ("ClearRect",(Object)(__ref.getField(false,"_cvsbackground" /*RemoteObject*/ ).runMethod(false,"getTargetRect"))); - BA.debugLineNum = 68;BA.debugLine="Dim firstDayOfMonth As Long = DateUtils.setDate(y"; -Debug.JustUpdateDeviceLine(); -_firstdayofmonth = RemoteObject.solve(new RemoteObject[] {b4xdatetemplate._dateutils.runMethod(true,"_setdate",__ref.getField(false, "ba"),(Object)(__ref.getField(true,"_year" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_month" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 1))),RemoteObject.createImmutable(1)}, "-",1, 2);Debug.locals.put("firstDayOfMonth", _firstdayofmonth);Debug.locals.put("firstDayOfMonth", _firstdayofmonth); - BA.debugLineNum = 69;BA.debugLine="dayOfWeekOffset = (7 + DateTime.GetDayOfWeek(firs"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_dayofweekoffset" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(7),b4xdatetemplate.__c.getField(false,"DateTime").runMethod(true,"GetDayOfWeek",(Object)(_firstdayofmonth)),__ref.getField(true,"_firstday" /*RemoteObject*/ )}, "+-",2, 1)),RemoteObject.createImmutable(7)}, "%",0, 1)); - BA.debugLineNum = 70;BA.debugLine="daysInMonth = DateUtils.NumberOfDaysInMonth(month"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_daysinmonth" /*RemoteObject*/ ,b4xdatetemplate._dateutils.runMethod(true,"_numberofdaysinmonth",__ref.getField(false, "ba"),(Object)(__ref.getField(true,"_month" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_year" /*RemoteObject*/ )))); - BA.debugLineNum = 71;BA.debugLine="If year = selectedYear And month = selectedMonth"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_year" /*RemoteObject*/ ),BA.numberCast(double.class, __ref.getField(true,"_selectedyear" /*RemoteObject*/ ))) && RemoteObject.solveBoolean("=",__ref.getField(true,"_month" /*RemoteObject*/ ),BA.numberCast(double.class, __ref.getField(true,"_selectedmonth" /*RemoteObject*/ )))) { - BA.debugLineNum = 73;BA.debugLine="DrawBox(cvs, SelectedColor, (selectedDay - 1 + d"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdatetemplate.class, "_drawbox" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_selectedcolor" /*RemoteObject*/ )),(Object)(RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_selectedday" /*RemoteObject*/ ),RemoteObject.createImmutable(1),__ref.getField(true,"_dayofweekoffset" /*RemoteObject*/ )}, "-+",2, 1)),RemoteObject.createImmutable(7)}, "%",0, 1)),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_selectedday" /*RemoteObject*/ ),RemoteObject.createImmutable(1),__ref.getField(true,"_dayofweekoffset" /*RemoteObject*/ )}, "-+",2, 1)),RemoteObject.createImmutable(7)}, "/",0, 0)))); - }; - BA.debugLineNum = 76;BA.debugLine="Dim daysFont As B4XFont = xui.CreateDefaultBoldFo"; -Debug.JustUpdateDeviceLine(); -_daysfont = __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreateDefaultBoldFont",(Object)(BA.numberCast(float.class, 14)));Debug.locals.put("daysFont", _daysfont);Debug.locals.put("daysFont", _daysfont); - BA.debugLineNum = 77;BA.debugLine="For day = 1 To daysInMonth"; -Debug.JustUpdateDeviceLine(); -{ -final int step13 = 1; -final int limit13 = __ref.getField(true,"_daysinmonth" /*RemoteObject*/ ).get().intValue(); -_day = 1 ; -for (;(step13 > 0 && _day <= limit13) || (step13 < 0 && _day >= limit13) ;_day = ((int)(0 + _day + step13)) ) { -Debug.locals.put("day", _day); - BA.debugLineNum = 78;BA.debugLine="Dim row As Int = (day - 1 + dayOfWeekOffset) / 7"; -Debug.JustUpdateDeviceLine(); -_row = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_day),RemoteObject.createImmutable(1),__ref.getField(true,"_dayofweekoffset" /*RemoteObject*/ )}, "-+",2, 1)),RemoteObject.createImmutable(7)}, "/",0, 0));Debug.locals.put("row", _row);Debug.locals.put("row", _row); - BA.debugLineNum = 79;BA.debugLine="cvs.DrawText(day, (((dayOfWeekOffset + day - 1)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawText",__ref.getField(false, "ba"),(Object)(BA.NumberToString(_day)),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_dayofweekoffset" /*RemoteObject*/ ),RemoteObject.createImmutable(_day),RemoteObject.createImmutable(1)}, "+-",2, 1)),RemoteObject.createImmutable(7)}, "%",0, 1)),RemoteObject.createImmutable(0.5)}, "+",1, 0)),__ref.getField(true,"_boxw" /*RemoteObject*/ )}, "*",0, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {_row,RemoteObject.createImmutable(0.5)}, "+",1, 0)),__ref.getField(true,"_boxh" /*RemoteObject*/ ),__ref.getField(true,"_vcorrection" /*RemoteObject*/ )}, "*+",1, 0))),(Object)(_daysfont),(Object)(__ref.getField(true,"_daysinmonthcolor" /*RemoteObject*/ )),(Object)(BA.getEnumFromString(BA.getDeviceClass("android.graphics.Paint.Align"),RemoteObject.createImmutable("CENTER")))); - } -}Debug.locals.put("day", _day); -; - BA.debugLineNum = 82;BA.debugLine="cvsBackground.Invalidate"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvsbackground" /*RemoteObject*/ ).runVoidMethod ("Invalidate"); - BA.debugLineNum = 83;BA.debugLine="cvs.Invalidate"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Invalidate"); - BA.debugLineNum = 84;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getdate(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getDate (b4xdatetemplate) ","b4xdatetemplate",42,__ref.getField(false, "ba"),__ref,98); -if (RapidSub.canDelegate("getdate")) { return __ref.runUserSub(false, "b4xdatetemplate","getdate", __ref);} - BA.debugLineNum = 98;BA.debugLine="Public Sub getDate As Long"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 99;BA.debugLine="Return selectedDate"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_selecteddate" /*RemoteObject*/ ); - BA.debugLineNum = 100;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0L); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getpanel(RemoteObject __ref,RemoteObject _dialog) throws Exception{ -try { - Debug.PushSubsStack("GetPanel (b4xdatetemplate) ","b4xdatetemplate",42,__ref.getField(false, "ba"),__ref,172); -if (RapidSub.canDelegate("getpanel")) { return __ref.runUserSub(false, "b4xdatetemplate","getpanel", __ref, _dialog);} -Debug.locals.put("Dialog", _dialog); - BA.debugLineNum = 172;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 173;BA.debugLine="Return pnlDialog"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_pnldialog" /*RemoteObject*/ ); - BA.debugLineNum = 174;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _handlemouse(RemoteObject __ref,RemoteObject _x,RemoteObject _y,RemoteObject _move) throws Exception{ -try { - Debug.PushSubsStack("HandleMouse (b4xdatetemplate) ","b4xdatetemplate",42,__ref.getField(false, "ba"),__ref,123); -if (RapidSub.canDelegate("handlemouse")) { return __ref.runUserSub(false, "b4xdatetemplate","handlemouse", __ref, _x, _y, _move);} -RemoteObject _boxx = RemoteObject.createImmutable(0); -RemoteObject _boxy = RemoteObject.createImmutable(0); -RemoteObject _newselectedday = RemoteObject.createImmutable(0); -RemoteObject _validday = RemoteObject.createImmutable(false); -Debug.locals.put("x", _x); -Debug.locals.put("y", _y); -Debug.locals.put("move", _move); - BA.debugLineNum = 123;BA.debugLine="Private Sub HandleMouse(x As Double, y As Double,"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 124;BA.debugLine="Dim boxX = x / boxW, boxY = y / boxH As Int"; -Debug.JustUpdateDeviceLine(); -_boxx = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_x,__ref.getField(true,"_boxw" /*RemoteObject*/ )}, "/",0, 0));Debug.locals.put("boxX", _boxx);Debug.locals.put("boxX", _boxx); -_boxy = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_y,__ref.getField(true,"_boxh" /*RemoteObject*/ )}, "/",0, 0));Debug.locals.put("boxY", _boxy);Debug.locals.put("boxY", _boxy); - BA.debugLineNum = 125;BA.debugLine="Dim newSelectedDay As Int = boxY * 7 + boxX + 1 -"; -Debug.JustUpdateDeviceLine(); -_newselectedday = RemoteObject.solve(new RemoteObject[] {_boxy,RemoteObject.createImmutable(7),_boxx,RemoteObject.createImmutable(1),__ref.getField(true,"_dayofweekoffset" /*RemoteObject*/ )}, "*++-",3, 1);Debug.locals.put("newSelectedDay", _newselectedday);Debug.locals.put("newSelectedDay", _newselectedday); - BA.debugLineNum = 126;BA.debugLine="Dim validDay As Boolean = newSelectedDay > 0 And"; -Debug.JustUpdateDeviceLine(); -_validday = BA.ObjectToBoolean(RemoteObject.solveBoolean(">",_newselectedday,BA.numberCast(double.class, 0)) && RemoteObject.solveBoolean("k",_newselectedday,BA.numberCast(double.class, __ref.getField(true,"_daysinmonth" /*RemoteObject*/ ))));Debug.locals.put("validDay", _validday);Debug.locals.put("validDay", _validday); - BA.debugLineNum = 127;BA.debugLine="If move Then"; -Debug.JustUpdateDeviceLine(); -if (_move.get().booleanValue()) { - BA.debugLineNum = 128;BA.debugLine="If newSelectedDay = tempSelectedDay Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_newselectedday,BA.numberCast(double.class, __ref.getField(true,"_tempselectedday" /*RemoteObject*/ )))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 129;BA.debugLine="cvsBackground.ClearRect(cvsBackground.TargetRect"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvsbackground" /*RemoteObject*/ ).runVoidMethod ("ClearRect",(Object)(__ref.getField(false,"_cvsbackground" /*RemoteObject*/ ).runMethod(false,"getTargetRect"))); - BA.debugLineNum = 130;BA.debugLine="tempSelectedDay = newSelectedDay"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_tempselectedday" /*RemoteObject*/ ,_newselectedday); - BA.debugLineNum = 131;BA.debugLine="If validDay Then"; -Debug.JustUpdateDeviceLine(); -if (_validday.get().booleanValue()) { - BA.debugLineNum = 132;BA.debugLine="DrawBox(cvsBackground, HighlightedColor, boxX,"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdatetemplate.class, "_drawbox" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cvsbackground" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_highlightedcolor" /*RemoteObject*/ )),(Object)(_boxx),(Object)(_boxy)); - }; - }else { - BA.debugLineNum = 135;BA.debugLine="cvsBackground.ClearRect(cvsBackground.TargetRect"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvsbackground" /*RemoteObject*/ ).runVoidMethod ("ClearRect",(Object)(__ref.getField(false,"_cvsbackground" /*RemoteObject*/ ).runMethod(false,"getTargetRect"))); - BA.debugLineNum = 136;BA.debugLine="If validDay Then"; -Debug.JustUpdateDeviceLine(); -if (_validday.get().booleanValue()) { - BA.debugLineNum = 137;BA.debugLine="SelectDay(newSelectedDay)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdatetemplate.class, "_selectday" /*RemoteObject*/ ,(Object)(_newselectedday)); - BA.debugLineNum = 138;BA.debugLine="If CloseOnSelection Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_closeonselection" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 139;BA.debugLine="Hide"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdatetemplate.class, "_hide" /*RemoteObject*/ ); - }else { - BA.debugLineNum = 141;BA.debugLine="DrawDays"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdatetemplate.class, "_drawdays" /*RemoteObject*/ ); - }; - }; - }; - BA.debugLineNum = 146;BA.debugLine="cvsBackground.Invalidate"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvsbackground" /*RemoteObject*/ ).runVoidMethod ("Invalidate"); - BA.debugLineNum = 147;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _hide(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Hide (b4xdatetemplate) ","b4xdatetemplate",42,__ref.getField(false, "ba"),__ref,149); -if (RapidSub.canDelegate("hide")) { return __ref.runUserSub(false, "b4xdatetemplate","hide", __ref);} - BA.debugLineNum = 149;BA.debugLine="Private Sub Hide"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 150;BA.debugLine="mDialog.Close(xui.DialogResponse_Positive)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mdialog" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_close" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"DialogResponse_Positive"))); - BA.debugLineNum = 151;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xdatetemplate) ","b4xdatetemplate",42,__ref.getField(false, "ba"),__ref,37); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xdatetemplate","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 37;BA.debugLine="Public Sub Initialize"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 38;BA.debugLine="pnlDialog = xui.CreatePanel(\"\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_pnldialog" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("")))); - BA.debugLineNum = 39;BA.debugLine="pnlDialog.SetLayoutAnimated(0, 0, 0, 320dip,300di"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnldialog" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(b4xdatetemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 320)))),(Object)(b4xdatetemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 300))))); - BA.debugLineNum = 40;BA.debugLine="pnlDialog.LoadLayout(\"DateTemplate\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnldialog" /*RemoteObject*/ ).runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("DateTemplate")),__ref.getField(false, "ba")); - BA.debugLineNum = 41;BA.debugLine="pnlDialog.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnldialog" /*RemoteObject*/ ).runMethod(false,"setTag",__ref); - BA.debugLineNum = 42;BA.debugLine="month = DateTime.GetMonth(DateTime.Now)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_month" /*RemoteObject*/ ,b4xdatetemplate.__c.getField(false,"DateTime").runMethod(true,"GetMonth",(Object)(b4xdatetemplate.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 43;BA.debugLine="year = DateTime.GetYear(DateTime.Now)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_year" /*RemoteObject*/ ,b4xdatetemplate.__c.getField(false,"DateTime").runMethod(true,"GetYear",(Object)(b4xdatetemplate.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 44;BA.debugLine="months = DateUtils.GetMonthsNames"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_months" /*RemoteObject*/ ,b4xdatetemplate._dateutils.runMethod(false,"_getmonthsnames",__ref.getField(false, "ba"))); - BA.debugLineNum = 45;BA.debugLine="selectedDate = DateTime.Now"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_selecteddate" /*RemoteObject*/ ,b4xdatetemplate.__c.getField(false,"DateTime").runMethod(true,"getNow")); - BA.debugLineNum = 46;BA.debugLine="setDate(selectedDate)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdatetemplate.class, "_setdate" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_selecteddate" /*RemoteObject*/ ))); - BA.debugLineNum = 47;BA.debugLine="cvs.Initialize(DaysPaneFg)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(__ref.getField(false,"_dayspanefg" /*RemoteObject*/ ))); - BA.debugLineNum = 48;BA.debugLine="cvsBackground.Initialize(DaysPaneBg)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvsbackground" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(__ref.getField(false,"_dayspanebg" /*RemoteObject*/ ))); - BA.debugLineNum = 49;BA.debugLine="boxW = cvs.TargetRect.Width / 7"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_boxw" /*RemoteObject*/ ,BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getWidth"),RemoteObject.createImmutable(7)}, "/",0, 0))); - BA.debugLineNum = 50;BA.debugLine="boxH = cvs.TargetRect.Height / 6"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_boxh" /*RemoteObject*/ ,BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getHeight"),RemoteObject.createImmutable(6)}, "/",0, 0))); - BA.debugLineNum = 51;BA.debugLine="vCorrection = 5dip"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_vcorrection" /*RemoteObject*/ ,BA.numberCast(float.class, b4xdatetemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 5))))); - BA.debugLineNum = 52;BA.debugLine="cvsDays.Initialize(DaysTitlesPane)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvsdays" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(__ref.getField(false,"_daystitlespane" /*RemoteObject*/ ))); - BA.debugLineNum = 58;BA.debugLine="DaysOfWeekNames.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_daysofweeknames" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 59;BA.debugLine="DaysOfWeekNames.AddAll(DateUtils.GetDaysNames)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_daysofweeknames" /*RemoteObject*/ ).runVoidMethod ("AddAll",(Object)(b4xdatetemplate._dateutils.runMethod(false,"_getdaysnames",__ref.getField(false, "ba")))); - BA.debugLineNum = 60;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _selectday(RemoteObject __ref,RemoteObject _day) throws Exception{ -try { - Debug.PushSubsStack("SelectDay (b4xdatetemplate) ","b4xdatetemplate",42,__ref.getField(false, "ba"),__ref,115); -if (RapidSub.canDelegate("selectday")) { return __ref.runUserSub(false, "b4xdatetemplate","selectday", __ref, _day);} -Debug.locals.put("day", _day); - BA.debugLineNum = 115;BA.debugLine="Private Sub SelectDay(day As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 116;BA.debugLine="selectedDate = DateUtils.setDate(year, month, day"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_selecteddate" /*RemoteObject*/ ,b4xdatetemplate._dateutils.runMethod(true,"_setdate",__ref.getField(false, "ba"),(Object)(__ref.getField(true,"_year" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_month" /*RemoteObject*/ )),(Object)(_day))); - BA.debugLineNum = 117;BA.debugLine="selectedDay = day"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_selectedday" /*RemoteObject*/ ,_day); - BA.debugLineNum = 118;BA.debugLine="selectedMonth = month"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_selectedmonth" /*RemoteObject*/ ,__ref.getField(true,"_month" /*RemoteObject*/ )); - BA.debugLineNum = 119;BA.debugLine="selectedYear = year"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_selectedyear" /*RemoteObject*/ ,__ref.getField(true,"_year" /*RemoteObject*/ )); - BA.debugLineNum = 120;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setdate(RemoteObject __ref,RemoteObject _date) throws Exception{ -try { - Debug.PushSubsStack("setDate (b4xdatetemplate) ","b4xdatetemplate",42,__ref.getField(false, "ba"),__ref,102); -if (RapidSub.canDelegate("setdate")) { return __ref.runUserSub(false, "b4xdatetemplate","setdate", __ref, _date);} -Debug.locals.put("date", _date); - BA.debugLineNum = 102;BA.debugLine="Public Sub setDate(date As Long)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 104;BA.debugLine="If lblYear.IsInitialized = False Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_lblyear" /*RemoteObject*/ ).runMethod(true,"IsInitialized"),b4xdatetemplate.__c.getField(true,"False"))) { - BA.debugLineNum = 105;BA.debugLine="selectedDate = date"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_selecteddate" /*RemoteObject*/ ,_date); - BA.debugLineNum = 106;BA.debugLine="Return 'the date will be set after the layout is"; -Debug.JustUpdateDeviceLine(); -if (true) return RemoteObject.createImmutable(""); - }; - BA.debugLineNum = 108;BA.debugLine="year = DateTime.GetYear(date)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_year" /*RemoteObject*/ ,b4xdatetemplate.__c.getField(false,"DateTime").runMethod(true,"GetYear",(Object)(_date))); - BA.debugLineNum = 109;BA.debugLine="month = DateTime.GetMonth(date)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_month" /*RemoteObject*/ ,b4xdatetemplate.__c.getField(false,"DateTime").runMethod(true,"GetMonth",(Object)(_date))); - BA.debugLineNum = 110;BA.debugLine="SelectDay(DateTime.GetDayOfMonth(date))"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdatetemplate.class, "_selectday" /*RemoteObject*/ ,(Object)(b4xdatetemplate.__c.getField(false,"DateTime").runMethod(true,"GetDayOfMonth",(Object)(_date)))); - BA.debugLineNum = 111;BA.debugLine="lblYear.Text = year"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_lblyear" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(true,"_year" /*RemoteObject*/ ))); - BA.debugLineNum = 112;BA.debugLine="lblMonth.Text = months.Get(month - 1)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_lblmonth" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_months" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_month" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "-",1, 1))))); - BA.debugLineNum = 113;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setyearsbuttonstate(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("SetYearsButtonState (b4xdatetemplate) ","b4xdatetemplate",42,__ref.getField(false, "ba"),__ref,86); -if (RapidSub.canDelegate("setyearsbuttonstate")) { return __ref.runUserSub(false, "b4xdatetemplate","setyearsbuttonstate", __ref);} - BA.debugLineNum = 86;BA.debugLine="Private Sub SetYearsButtonState"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 87;BA.debugLine="btnYearLeft.Enabled = year > MinYear"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_btnyearleft" /*RemoteObject*/ ).runMethod(true,"setEnabled",BA.ObjectToBoolean(RemoteObject.solveBoolean(">",__ref.getField(true,"_year" /*RemoteObject*/ ),BA.numberCast(double.class, __ref.getField(true,"_minyear" /*RemoteObject*/ ))))); - BA.debugLineNum = 88;BA.debugLine="btnYearRight.Enabled = year < MaxYear"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_btnyearright" /*RemoteObject*/ ).runMethod(true,"setEnabled",BA.ObjectToBoolean(RemoteObject.solveBoolean("<",__ref.getField(true,"_year" /*RemoteObject*/ ),BA.numberCast(double.class, __ref.getField(true,"_maxyear" /*RemoteObject*/ ))))); - BA.debugLineNum = 89;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _show(RemoteObject __ref,RemoteObject _dialog) throws Exception{ -try { - Debug.PushSubsStack("Show (b4xdatetemplate) ","b4xdatetemplate",42,__ref.getField(false, "ba"),__ref,176); -if (RapidSub.canDelegate("show")) { __ref.runUserSub(false, "b4xdatetemplate","show", __ref, _dialog); return;} -ResumableSub_Show rsub = new ResumableSub_Show(null,__ref,_dialog); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_Show extends BA.ResumableSub { -public ResumableSub_Show(keymon.lat.medicomed.b4xdatetemplate parent,RemoteObject __ref,RemoteObject _dialog) { -this.parent = parent; -this.__ref = __ref; -this._dialog = _dialog; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.b4xdatetemplate parent; -RemoteObject _dialog; -RemoteObject _days = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _daysfont = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont"); -int _i = 0; -RemoteObject _d = RemoteObject.createImmutable(""); -int step4; -int limit4; - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("Show (b4xdatetemplate) ","b4xdatetemplate",42,__ref.getField(false, "ba"),__ref,176); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); -Debug.locals.put("Dialog", _dialog); - BA.debugLineNum = 177;BA.debugLine="Dim days As List = DaysOfWeekNames"; -Debug.JustUpdateDeviceLine(); -_days = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); -_days = __ref.getField(false,"_daysofweeknames" /*RemoteObject*/ );Debug.locals.put("days", _days);Debug.locals.put("days", _days); - BA.debugLineNum = 178;BA.debugLine="Dim daysFont As B4XFont = xui.CreateDefaultBoldFo"; -Debug.JustUpdateDeviceLine(); -_daysfont = __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreateDefaultBoldFont",(Object)(BA.numberCast(float.class, 14)));Debug.locals.put("daysFont", _daysfont);Debug.locals.put("daysFont", _daysfont); - BA.debugLineNum = 179;BA.debugLine="cvsDays.ClearRect(cvsDays.TargetRect)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvsdays" /*RemoteObject*/ ).runVoidMethod ("ClearRect",(Object)(__ref.getField(false,"_cvsdays" /*RemoteObject*/ ).runMethod(false,"getTargetRect"))); - BA.debugLineNum = 180;BA.debugLine="For i = FirstDay To FirstDay + 7 - 1"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 1: -//for -this.state = 10; -step4 = 1; -limit4 = RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_firstday" /*RemoteObject*/ ),RemoteObject.createImmutable(7),RemoteObject.createImmutable(1)}, "+-",2, 1).get().intValue(); -_i = __ref.getField(true,"_firstday" /*RemoteObject*/ ).get().intValue() ; -Debug.locals.put("i", _i); -this.state = 11; -if (true) break; - -case 11: -//C -this.state = 10; -if ((step4 > 0 && _i <= limit4) || (step4 < 0 && _i >= limit4)) this.state = 3; -if (true) break; - -case 12: -//C -this.state = 11; -_i = ((int)(0 + _i + step4)) ; -Debug.locals.put("i", _i); -if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 181;BA.debugLine="Dim d As String = days.Get(i Mod 7)"; -Debug.JustUpdateDeviceLine(); -_d = BA.ObjectToString(_days.runMethod(false,"Get",(Object)(RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_i),RemoteObject.createImmutable(7)}, "%",0, 1))));Debug.locals.put("d", _d);Debug.locals.put("d", _d); - BA.debugLineNum = 182;BA.debugLine="If d.Length > 2 Then d = d.SubString2(0, 2)"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 4: -//if -this.state = 9; -if (RemoteObject.solveBoolean(">",_d.runMethod(true,"length"),BA.numberCast(double.class, 2))) { -this.state = 6; -;}if (true) break; - -case 6: -//C -this.state = 9; -_d = _d.runMethod(true,"substring",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 2)));Debug.locals.put("d", _d); -if (true) break; - -case 9: -//C -this.state = 12; -; - BA.debugLineNum = 183;BA.debugLine="cvsDays.DrawText(d, (i - FirstDay + 0.5) * boxW,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvsdays" /*RemoteObject*/ ).runVoidMethod ("DrawText",__ref.getField(false, "ba"),(Object)(_d),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_i),__ref.getField(true,"_firstday" /*RemoteObject*/ ),RemoteObject.createImmutable(0.5)}, "-+",2, 0)),__ref.getField(true,"_boxw" /*RemoteObject*/ )}, "*",0, 0))),(Object)(BA.numberCast(float.class, parent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 20))))),(Object)(_daysfont),(Object)(__ref.getField(true,"_daysinweekcolor" /*RemoteObject*/ )),(Object)(BA.getEnumFromString(BA.getDeviceClass("android.graphics.Paint.Align"),RemoteObject.createImmutable("CENTER")))); - if (true) break; -if (true) break; - -case 10: -//C -this.state = -1; -Debug.locals.put("i", _i); -; - BA.debugLineNum = 185;BA.debugLine="cvsDays.Invalidate"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvsdays" /*RemoteObject*/ ).runVoidMethod ("Invalidate"); - BA.debugLineNum = 186;BA.debugLine="mDialog = Dialog"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mdialog" /*RemoteObject*/ ,_dialog); - BA.debugLineNum = 187;BA.debugLine="DrawDays"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdatetemplate.class, "_drawdays" /*RemoteObject*/ ); - BA.debugLineNum = 188;BA.debugLine="PreviousSelectedDate = selectedDate"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_previousselecteddate" /*RemoteObject*/ ,__ref.getField(true,"_selecteddate" /*RemoteObject*/ )); - BA.debugLineNum = 189;BA.debugLine="Sleep(0)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xdatetemplate", "show"),BA.numberCast(int.class, 0)); -this.state = 13; -return; -case 13: -//C -this.state = -1; -; - BA.debugLineNum = 190;BA.debugLine="SetYearsButtonState"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdatetemplate.class, "_setyearsbuttonstate" /*RemoteObject*/ ); - BA.debugLineNum = 191;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xdialog.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xdialog.java deleted file mode 100644 index b874a62..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xdialog.java +++ /dev/null @@ -1,58 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xdialog { - public static RemoteObject myClass; - public b4xdialog() { - } - public static PCBA staticBA = new PCBA(null, b4xdialog.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _buttonsheight = RemoteObject.createImmutable(0); -public static RemoteObject _titlebarheight = RemoteObject.createImmutable(0); -public static RemoteObject _buttonwidth = RemoteObject.createImmutable(0); -public static RemoteObject _base = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _backgroundcolor = RemoteObject.createImmutable(0); -public static RemoteObject _overlaycolor = RemoteObject.createImmutable(0); -public static RemoteObject _bordercolor = RemoteObject.createImmutable(0); -public static RemoteObject _bordercornersradius = RemoteObject.createImmutable(0); -public static RemoteObject _borderwidth = RemoteObject.createImmutable(0); -public static RemoteObject _buttonscolor = RemoteObject.createImmutable(0); -public static RemoteObject _buttonstextcolor = RemoteObject.createImmutable(0); -public static RemoteObject _background = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _blurimageview = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _blurbackground = RemoteObject.createImmutable(false); -public static RemoteObject _blurreducescale = RemoteObject.createImmutable(0); -public static RemoteObject _mparent = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _title = RemoteObject.declareNull("Object"); -public static RemoteObject _titlebarcolor = RemoteObject.createImmutable(0); -public static RemoteObject _titlebartextcolor = RemoteObject.createImmutable(0); -public static RemoteObject _bodytextcolor = RemoteObject.createImmutable(0); -public static RemoteObject _titlebar = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _putattop = RemoteObject.createImmutable(false); -public static RemoteObject _titlebarfont = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont"); -public static RemoteObject _buttonsfont = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont"); -public static RemoteObject _buttonstextcolordisabled = RemoteObject.createImmutable(0); -public static RemoteObject _visibleanimationduration = RemoteObject.createImmutable(0); -public static RemoteObject _buttonsorder = null; -public static RemoteObject _buttonsstate = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"Background",_ref.getField(false, "_background"),"BackgroundColor",_ref.getField(false, "_backgroundcolor"),"Base",_ref.getField(false, "_base"),"BlurBackground",_ref.getField(false, "_blurbackground"),"BlurImageView",_ref.getField(false, "_blurimageview"),"BlurReduceScale",_ref.getField(false, "_blurreducescale"),"BodyTextColor",_ref.getField(false, "_bodytextcolor"),"BorderColor",_ref.getField(false, "_bordercolor"),"BorderCornersRadius",_ref.getField(false, "_bordercornersradius"),"BorderWidth",_ref.getField(false, "_borderwidth"),"ButtonsColor",_ref.getField(false, "_buttonscolor"),"ButtonsFont",_ref.getField(false, "_buttonsfont"),"ButtonsHeight",_ref.getField(false, "_buttonsheight"),"ButtonsOrder",_ref.getField(false, "_buttonsorder"),"ButtonsState",_ref.getField(false, "_buttonsstate"),"ButtonsTextColor",_ref.getField(false, "_buttonstextcolor"),"ButtonsTextColorDisabled",_ref.getField(false, "_buttonstextcolordisabled"),"ButtonWidth",_ref.getField(false, "_buttonwidth"),"DateUtils",_ref.getField(false, "_dateutils"),"mParent",_ref.getField(false, "_mparent"),"OverlayColor",_ref.getField(false, "_overlaycolor"),"PutAtTop",_ref.getField(false, "_putattop"),"Title",_ref.getField(false, "_title"),"TitleBar",_ref.getField(false, "_titlebar"),"TitleBarColor",_ref.getField(false, "_titlebarcolor"),"TitleBarFont",_ref.getField(false, "_titlebarfont"),"TitleBarHeight",_ref.getField(false, "_titlebarheight"),"TitleBarTextColor",_ref.getField(false, "_titlebartextcolor"),"VisibleAnimationDuration",_ref.getField(false, "_visibleanimationduration"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xdialog_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xdialog_subs_0.java deleted file mode 100644 index 26c9d87..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xdialog_subs_0.java +++ /dev/null @@ -1,1620 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xdialog_subs_0 { - - -public static RemoteObject _background_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Background_Click (b4xdialog) ","b4xdialog",43,__ref.getField(false, "ba"),__ref,258); -if (RapidSub.canDelegate("background_click")) { return __ref.runUserSub(false, "b4xdialog","background_click", __ref);} - BA.debugLineNum = 258;BA.debugLine="Private Sub Background_Click"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 260;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _background_touch(RemoteObject __ref,RemoteObject _action,RemoteObject _x,RemoteObject _y) throws Exception{ -try { - Debug.PushSubsStack("Background_Touch (b4xdialog) ","b4xdialog",43,__ref.getField(false, "ba"),__ref,253); -if (RapidSub.canDelegate("background_touch")) { return __ref.runUserSub(false, "b4xdialog","background_touch", __ref, _action, _x, _y);} -Debug.locals.put("Action", _action); -Debug.locals.put("X", _x); -Debug.locals.put("Y", _y); - BA.debugLineNum = 253;BA.debugLine="Private Sub Background_Touch (Action As Int, X As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 255;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _blur(RemoteObject __ref,RemoteObject _bmp) throws Exception{ -try { - Debug.PushSubsStack("Blur (b4xdialog) ","b4xdialog",43,__ref.getField(false, "ba"),__ref,287); -if (RapidSub.canDelegate("blur")) { return __ref.runUserSub(false, "b4xdialog","blur", __ref, _bmp);} -RemoteObject _bc = RemoteObject.declareNull("b4a.example.bitmapcreator"); -RemoteObject _reducescale = RemoteObject.createImmutable(0); -RemoteObject _count = RemoteObject.createImmutable(0); -RemoteObject _clrs = null; -RemoteObject _temp = RemoteObject.declareNull("b4a.example.bitmapcreator._argbcolor"); -RemoteObject _m = RemoteObject.createImmutable(0); -int _steps = 0; -int _y = 0; -int _x = 0; -Debug.locals.put("bmp", _bmp); - BA.debugLineNum = 287;BA.debugLine="Private Sub Blur (bmp As B4XBitmap) As BitmapCreat"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 288;BA.debugLine="Dim bc As BitmapCreator"; -Debug.JustUpdateDeviceLine(); -_bc = RemoteObject.createNew ("b4a.example.bitmapcreator");Debug.locals.put("bc", _bc); - BA.debugLineNum = 289;BA.debugLine="Dim ReduceScale As Int = BlurReduceScale"; -Debug.JustUpdateDeviceLine(); -_reducescale = __ref.getField(true,"_blurreducescale" /*RemoteObject*/ );Debug.locals.put("ReduceScale", _reducescale);Debug.locals.put("ReduceScale", _reducescale); - BA.debugLineNum = 290;BA.debugLine="bc.Initialize(bmp.Width / ReduceScale / bmp.Scale"; -Debug.JustUpdateDeviceLine(); -_bc.runVoidMethod ("_initialize",__ref.getField(false, "ba"),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_bmp.runMethod(true,"getWidth"),_reducescale,_bmp.runMethod(true,"getScale")}, "//",0, 0))),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_bmp.runMethod(true,"getHeight"),_reducescale,_bmp.runMethod(true,"getScale")}, "//",0, 0)))); - BA.debugLineNum = 291;BA.debugLine="bc.CopyPixelsFromBitmap(bmp)"; -Debug.JustUpdateDeviceLine(); -_bc.runVoidMethod ("_copypixelsfrombitmap",(Object)(_bmp)); - BA.debugLineNum = 292;BA.debugLine="Dim count As Int = 2"; -Debug.JustUpdateDeviceLine(); -_count = BA.numberCast(int.class, 2);Debug.locals.put("count", _count);Debug.locals.put("count", _count); - BA.debugLineNum = 293;BA.debugLine="Dim clrs(3) As ARGBColor"; -Debug.JustUpdateDeviceLine(); -_clrs = RemoteObject.createNewArray ("b4a.example.bitmapcreator._argbcolor", new int[] {3}, new Object[]{});Debug.locals.put("clrs", _clrs); - BA.debugLineNum = 294;BA.debugLine="Dim temp As ARGBColor"; -Debug.JustUpdateDeviceLine(); -_temp = RemoteObject.createNew ("b4a.example.bitmapcreator._argbcolor");Debug.locals.put("temp", _temp); - BA.debugLineNum = 295;BA.debugLine="Dim m As Int"; -Debug.JustUpdateDeviceLine(); -_m = RemoteObject.createImmutable(0);Debug.locals.put("m", _m); - BA.debugLineNum = 296;BA.debugLine="For steps = 1 To count"; -Debug.JustUpdateDeviceLine(); -{ -final int step9 = 1; -final int limit9 = _count.get().intValue(); -_steps = 1 ; -for (;(step9 > 0 && _steps <= limit9) || (step9 < 0 && _steps >= limit9) ;_steps = ((int)(0 + _steps + step9)) ) { -Debug.locals.put("steps", _steps); - BA.debugLineNum = 297;BA.debugLine="For y = 0 To bc.mHeight - 1"; -Debug.JustUpdateDeviceLine(); -{ -final int step10 = 1; -final int limit10 = RemoteObject.solve(new RemoteObject[] {_bc.getField(true,"_mheight"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_y = 0 ; -for (;(step10 > 0 && _y <= limit10) || (step10 < 0 && _y >= limit10) ;_y = ((int)(0 + _y + step10)) ) { -Debug.locals.put("y", _y); - BA.debugLineNum = 298;BA.debugLine="For x = 0 To 2"; -Debug.JustUpdateDeviceLine(); -{ -final int step11 = 1; -final int limit11 = 2; -_x = 0 ; -for (;(step11 > 0 && _x <= limit11) || (step11 < 0 && _x >= limit11) ;_x = ((int)(0 + _x + step11)) ) { -Debug.locals.put("x", _x); - BA.debugLineNum = 299;BA.debugLine="bc.GetARGB(x, y, clrs(x))"; -Debug.JustUpdateDeviceLine(); -_bc.runVoidMethod ("_getargb",(Object)(BA.numberCast(int.class, _x)),(Object)(BA.numberCast(int.class, _y)),(Object)(_clrs.getArrayElement(false,BA.numberCast(int.class, _x)))); - } -}Debug.locals.put("x", _x); -; - BA.debugLineNum = 301;BA.debugLine="SetAvg(bc, 1, y, clrs, temp)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_setavg" /*RemoteObject*/ ,(Object)(_bc),(Object)(BA.numberCast(int.class, 1)),(Object)(BA.numberCast(int.class, _y)),(Object)(_clrs),(Object)(_temp)); - BA.debugLineNum = 302;BA.debugLine="m = 0"; -Debug.JustUpdateDeviceLine(); -_m = BA.numberCast(int.class, 0);Debug.locals.put("m", _m); - BA.debugLineNum = 303;BA.debugLine="For x = 2 To bc.mWidth - 2"; -Debug.JustUpdateDeviceLine(); -{ -final int step16 = 1; -final int limit16 = RemoteObject.solve(new RemoteObject[] {_bc.getField(true,"_mwidth"),RemoteObject.createImmutable(2)}, "-",1, 1).get().intValue(); -_x = 2 ; -for (;(step16 > 0 && _x <= limit16) || (step16 < 0 && _x >= limit16) ;_x = ((int)(0 + _x + step16)) ) { -Debug.locals.put("x", _x); - BA.debugLineNum = 304;BA.debugLine="bc.GetARGB(x + 1, y, clrs(m))"; -Debug.JustUpdateDeviceLine(); -_bc.runVoidMethod ("_getargb",(Object)(RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_x),RemoteObject.createImmutable(1)}, "+",1, 1)),(Object)(BA.numberCast(int.class, _y)),(Object)(_clrs.getArrayElement(false,_m))); - BA.debugLineNum = 305;BA.debugLine="m = (m + 1) Mod 3"; -Debug.JustUpdateDeviceLine(); -_m = RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {_m,RemoteObject.createImmutable(1)}, "+",1, 1)),RemoteObject.createImmutable(3)}, "%",0, 1);Debug.locals.put("m", _m); - BA.debugLineNum = 306;BA.debugLine="SetAvg(bc, x, y, clrs, temp)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_setavg" /*RemoteObject*/ ,(Object)(_bc),(Object)(BA.numberCast(int.class, _x)),(Object)(BA.numberCast(int.class, _y)),(Object)(_clrs),(Object)(_temp)); - } -}Debug.locals.put("x", _x); -; - } -}Debug.locals.put("y", _y); -; - BA.debugLineNum = 309;BA.debugLine="For x = 0 To bc.mWidth - 1"; -Debug.JustUpdateDeviceLine(); -{ -final int step22 = 1; -final int limit22 = RemoteObject.solve(new RemoteObject[] {_bc.getField(true,"_mwidth"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_x = 0 ; -for (;(step22 > 0 && _x <= limit22) || (step22 < 0 && _x >= limit22) ;_x = ((int)(0 + _x + step22)) ) { -Debug.locals.put("x", _x); - BA.debugLineNum = 310;BA.debugLine="For y = 0 To 2"; -Debug.JustUpdateDeviceLine(); -{ -final int step23 = 1; -final int limit23 = 2; -_y = 0 ; -for (;(step23 > 0 && _y <= limit23) || (step23 < 0 && _y >= limit23) ;_y = ((int)(0 + _y + step23)) ) { -Debug.locals.put("y", _y); - BA.debugLineNum = 311;BA.debugLine="bc.GetARGB(x, y, clrs(y))"; -Debug.JustUpdateDeviceLine(); -_bc.runVoidMethod ("_getargb",(Object)(BA.numberCast(int.class, _x)),(Object)(BA.numberCast(int.class, _y)),(Object)(_clrs.getArrayElement(false,BA.numberCast(int.class, _y)))); - } -}Debug.locals.put("y", _y); -; - BA.debugLineNum = 313;BA.debugLine="SetAvg(bc, x, 1, clrs, temp)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_setavg" /*RemoteObject*/ ,(Object)(_bc),(Object)(BA.numberCast(int.class, _x)),(Object)(BA.numberCast(int.class, 1)),(Object)(_clrs),(Object)(_temp)); - BA.debugLineNum = 314;BA.debugLine="m = 0"; -Debug.JustUpdateDeviceLine(); -_m = BA.numberCast(int.class, 0);Debug.locals.put("m", _m); - BA.debugLineNum = 315;BA.debugLine="For y = 2 To bc.mHeight - 2"; -Debug.JustUpdateDeviceLine(); -{ -final int step28 = 1; -final int limit28 = RemoteObject.solve(new RemoteObject[] {_bc.getField(true,"_mheight"),RemoteObject.createImmutable(2)}, "-",1, 1).get().intValue(); -_y = 2 ; -for (;(step28 > 0 && _y <= limit28) || (step28 < 0 && _y >= limit28) ;_y = ((int)(0 + _y + step28)) ) { -Debug.locals.put("y", _y); - BA.debugLineNum = 316;BA.debugLine="bc.GetARGB(x, y + 1, clrs(m))"; -Debug.JustUpdateDeviceLine(); -_bc.runVoidMethod ("_getargb",(Object)(BA.numberCast(int.class, _x)),(Object)(RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_y),RemoteObject.createImmutable(1)}, "+",1, 1)),(Object)(_clrs.getArrayElement(false,_m))); - BA.debugLineNum = 317;BA.debugLine="m = (m + 1) Mod 3"; -Debug.JustUpdateDeviceLine(); -_m = RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {_m,RemoteObject.createImmutable(1)}, "+",1, 1)),RemoteObject.createImmutable(3)}, "%",0, 1);Debug.locals.put("m", _m); - BA.debugLineNum = 318;BA.debugLine="SetAvg(bc, x, y, clrs, temp)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_setavg" /*RemoteObject*/ ,(Object)(_bc),(Object)(BA.numberCast(int.class, _x)),(Object)(BA.numberCast(int.class, _y)),(Object)(_clrs),(Object)(_temp)); - } -}Debug.locals.put("y", _y); -; - } -}Debug.locals.put("x", _x); -; - } -}Debug.locals.put("steps", _steps); -; - BA.debugLineNum = 322;BA.debugLine="Return bc"; -Debug.JustUpdateDeviceLine(); -if (true) return _bc; - BA.debugLineNum = 323;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _button_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Button_Click (b4xdialog) ","b4xdialog",43,__ref.getField(false, "ba"),__ref,233); -if (RapidSub.canDelegate("button_click")) { return __ref.runUserSub(false, "b4xdialog","button_click", __ref);} -RemoteObject _b = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); - BA.debugLineNum = 233;BA.debugLine="Private Sub Button_Click"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 234;BA.debugLine="Dim b As B4XView = Sender"; -Debug.JustUpdateDeviceLine(); -_b = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_b = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), b4xdialog.__c.runMethod(false,"Sender",__ref.getField(false, "ba")));Debug.locals.put("b", _b);Debug.locals.put("b", _b); - BA.debugLineNum = 235;BA.debugLine="If ButtonsState.GetDefault(b.Tag, True) = False T"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_buttonsstate" /*RemoteObject*/ ).runMethod(false,"GetDefault",(Object)(_b.runMethod(false,"getTag")),(Object)((b4xdialog.__c.getField(true,"True")))),(b4xdialog.__c.getField(true,"False")))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 236;BA.debugLine="Close(b.Tag)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_close" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, _b.runMethod(false,"getTag")))); - BA.debugLineNum = 237;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 4;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 5;BA.debugLine="Private xui As XUI"; -b4xdialog._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",b4xdialog._xui); - //BA.debugLineNum = 6;BA.debugLine="Public ButtonsHeight As Int = 40dip"; -b4xdialog._buttonsheight = b4xdialog.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 40)));__ref.setField("_buttonsheight",b4xdialog._buttonsheight); - //BA.debugLineNum = 7;BA.debugLine="Public TitleBarHeight As Int = 30dip"; -b4xdialog._titlebarheight = b4xdialog.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 30)));__ref.setField("_titlebarheight",b4xdialog._titlebarheight); - //BA.debugLineNum = 8;BA.debugLine="Private ButtonWidth As Int = 80dip"; -b4xdialog._buttonwidth = b4xdialog.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 80)));__ref.setField("_buttonwidth",b4xdialog._buttonwidth); - //BA.debugLineNum = 9;BA.debugLine="Public Base As B4XView"; -b4xdialog._base = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_base",b4xdialog._base); - //BA.debugLineNum = 10;BA.debugLine="Public BackgroundColor As Int = 0xFF555555 'base"; -b4xdialog._backgroundcolor = BA.numberCast(int.class, ((int)0xff555555));__ref.setField("_backgroundcolor",b4xdialog._backgroundcolor); - //BA.debugLineNum = 11;BA.debugLine="Public OverlayColor As Int = 0xaa000000"; -b4xdialog._overlaycolor = BA.numberCast(int.class, ((int)0xaa000000));__ref.setField("_overlaycolor",b4xdialog._overlaycolor); - //BA.debugLineNum = 12;BA.debugLine="Public BorderColor As Int = 0xff000000"; -b4xdialog._bordercolor = BA.numberCast(int.class, ((int)0xff000000));__ref.setField("_bordercolor",b4xdialog._bordercolor); - //BA.debugLineNum = 13;BA.debugLine="Public BorderCornersRadius As Int = 2dip"; -b4xdialog._bordercornersradius = b4xdialog.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)));__ref.setField("_bordercornersradius",b4xdialog._bordercornersradius); - //BA.debugLineNum = 14;BA.debugLine="Public BorderWidth As Int = 2dip"; -b4xdialog._borderwidth = b4xdialog.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)));__ref.setField("_borderwidth",b4xdialog._borderwidth); - //BA.debugLineNum = 15;BA.debugLine="Public ButtonsColor As Int = 0xFF555555"; -b4xdialog._buttonscolor = BA.numberCast(int.class, ((int)0xff555555));__ref.setField("_buttonscolor",b4xdialog._buttonscolor); - //BA.debugLineNum = 16;BA.debugLine="Public ButtonsTextColor As Int = 0xFF89D5FF"; -b4xdialog._buttonstextcolor = BA.numberCast(int.class, ((int)0xff89d5ff));__ref.setField("_buttonstextcolor",b4xdialog._buttonstextcolor); - //BA.debugLineNum = 17;BA.debugLine="Private Background As B4XView"; -b4xdialog._background = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_background",b4xdialog._background); - //BA.debugLineNum = 18;BA.debugLine="Private BlurImageView As B4XView"; -b4xdialog._blurimageview = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_blurimageview",b4xdialog._blurimageview); - //BA.debugLineNum = 19;BA.debugLine="Public BlurBackground As Boolean"; -b4xdialog._blurbackground = RemoteObject.createImmutable(false);__ref.setField("_blurbackground",b4xdialog._blurbackground); - //BA.debugLineNum = 20;BA.debugLine="Private BlurReduceScale As Int"; -b4xdialog._blurreducescale = RemoteObject.createImmutable(0);__ref.setField("_blurreducescale",b4xdialog._blurreducescale); - //BA.debugLineNum = 21;BA.debugLine="Public mParent As B4XView"; -b4xdialog._mparent = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mparent",b4xdialog._mparent); - //BA.debugLineNum = 22;BA.debugLine="Public Title As Object = \"\""; -b4xdialog._title = RemoteObject.createImmutable((""));__ref.setField("_title",b4xdialog._title); - //BA.debugLineNum = 23;BA.debugLine="Public TitleBarColor As Int = 0xFF0083B8"; -b4xdialog._titlebarcolor = BA.numberCast(int.class, ((int)0xff0083b8));__ref.setField("_titlebarcolor",b4xdialog._titlebarcolor); - //BA.debugLineNum = 24;BA.debugLine="Public TitleBarTextColor As Int"; -b4xdialog._titlebartextcolor = RemoteObject.createImmutable(0);__ref.setField("_titlebartextcolor",b4xdialog._titlebartextcolor); - //BA.debugLineNum = 25;BA.debugLine="Public BodyTextColor As Int = xui.Color_White"; -b4xdialog._bodytextcolor = __ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_White");__ref.setField("_bodytextcolor",b4xdialog._bodytextcolor); - //BA.debugLineNum = 26;BA.debugLine="Public TitleBar As B4XView"; -b4xdialog._titlebar = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_titlebar",b4xdialog._titlebar); - //BA.debugLineNum = 27;BA.debugLine="Public PutAtTop As Boolean"; -b4xdialog._putattop = RemoteObject.createImmutable(false);__ref.setField("_putattop",b4xdialog._putattop); - //BA.debugLineNum = 28;BA.debugLine="Public TitleBarFont As B4XFont"; -b4xdialog._titlebarfont = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont");__ref.setField("_titlebarfont",b4xdialog._titlebarfont); - //BA.debugLineNum = 29;BA.debugLine="Public ButtonsFont As B4XFont"; -b4xdialog._buttonsfont = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont");__ref.setField("_buttonsfont",b4xdialog._buttonsfont); - //BA.debugLineNum = 30;BA.debugLine="Public ButtonsTextColorDisabled As Int = 0xFF8080"; -b4xdialog._buttonstextcolordisabled = BA.numberCast(int.class, ((int)0xff808080));__ref.setField("_buttonstextcolordisabled",b4xdialog._buttonstextcolordisabled); - //BA.debugLineNum = 31;BA.debugLine="Public VisibleAnimationDuration As Int = 100"; -b4xdialog._visibleanimationduration = BA.numberCast(int.class, 100);__ref.setField("_visibleanimationduration",b4xdialog._visibleanimationduration); - //BA.debugLineNum = 32;BA.debugLine="Public ButtonsOrder() As Int = Array As Int(xui.D"; -b4xdialog._buttonsorder = RemoteObject.createNewArray("int",new int[] {3},new Object[] {__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"DialogResponse_Positive"),__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"DialogResponse_Negative"),__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"DialogResponse_Cancel")});__ref.setField("_buttonsorder",b4xdialog._buttonsorder); - //BA.debugLineNum = 33;BA.debugLine="Public ButtonsState As Map"; -b4xdialog._buttonsstate = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");__ref.setField("_buttonsstate",b4xdialog._buttonsstate); - //BA.debugLineNum = 34;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _close(RemoteObject __ref,RemoteObject _result) throws Exception{ -try { - Debug.PushSubsStack("Close (b4xdialog) ","b4xdialog",43,__ref.getField(false, "ba"),__ref,239); -if (RapidSub.canDelegate("close")) { return __ref.runUserSub(false, "b4xdialog","close", __ref, _result);} -Debug.locals.put("Result", _result); - BA.debugLineNum = 239;BA.debugLine="Public Sub Close (Result As Int) As Boolean"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 240;BA.debugLine="If getVisible Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_getvisible" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 241;BA.debugLine="CallSubDelayed2(Me, \"CloseMessage\", Result)"; -Debug.JustUpdateDeviceLine(); -b4xdialog.__c.runVoidMethod ("CallSubDelayed2",__ref.getField(false, "ba"),(Object)(__ref),(Object)(BA.ObjectToString("CloseMessage")),(Object)((_result))); - BA.debugLineNum = 242;BA.debugLine="Return True"; -Debug.JustUpdateDeviceLine(); -if (true) return b4xdialog.__c.getField(true,"True"); - }; - BA.debugLineNum = 244;BA.debugLine="Return False"; -Debug.JustUpdateDeviceLine(); -if (true) return b4xdialog.__c.getField(true,"False"); - BA.debugLineNum = 245;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createbutton(RemoteObject __ref,RemoteObject _text,RemoteObject _code) throws Exception{ -try { - Debug.PushSubsStack("CreateButton (b4xdialog) ","b4xdialog",43,__ref.getField(false, "ba"),__ref,193); -if (RapidSub.canDelegate("createbutton")) { return __ref.runUserSub(false, "b4xdialog","createbutton", __ref, _text, _code);} -RemoteObject _btn = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _xbtn = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _numberofbuttons = RemoteObject.createImmutable(0); -Debug.locals.put("Text", _text); -Debug.locals.put("Code", _code); - BA.debugLineNum = 193;BA.debugLine="Private Sub CreateButton (Text As Object, Code As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 194;BA.debugLine="If Text = \"\" Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_text,RemoteObject.createImmutable(("")))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 198;BA.debugLine="Dim btn As Label"; -Debug.JustUpdateDeviceLine(); -_btn = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("btn", _btn); - BA.debugLineNum = 200;BA.debugLine="btn.Initialize(\"Button\")"; -Debug.JustUpdateDeviceLine(); -_btn.runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Button"))); - BA.debugLineNum = 201;BA.debugLine="Dim xbtn As B4XView = btn"; -Debug.JustUpdateDeviceLine(); -_xbtn = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_xbtn = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), _btn.getObject());Debug.locals.put("xbtn", _xbtn);Debug.locals.put("xbtn", _xbtn); - BA.debugLineNum = 202;BA.debugLine="XUIViewsUtils.SetTextOrCSBuilderToLabel(xbtn, Tex"; -Debug.JustUpdateDeviceLine(); -b4xdialog._xuiviewsutils.runVoidMethod ("_settextorcsbuildertolabel" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(_xbtn),(Object)(_text)); - BA.debugLineNum = 203;BA.debugLine="xbtn.Tag = Code"; -Debug.JustUpdateDeviceLine(); -_xbtn.runMethod(false,"setTag",(_code)); - BA.debugLineNum = 204;BA.debugLine="xbtn.SetColorAndBorder(ButtonsColor, 0dip, Border"; -Debug.JustUpdateDeviceLine(); -_xbtn.runVoidMethod ("SetColorAndBorder",(Object)(__ref.getField(true,"_buttonscolor" /*RemoteObject*/ )),(Object)(b4xdialog.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 0)))),(Object)(__ref.getField(true,"_bordercolor" /*RemoteObject*/ )),(Object)(b4xdialog.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 5))))); - BA.debugLineNum = 205;BA.debugLine="xbtn.SetTextAlignment(\"CENTER\", \"CENTER\")"; -Debug.JustUpdateDeviceLine(); -_xbtn.runVoidMethod ("SetTextAlignment",(Object)(BA.ObjectToString("CENTER")),(Object)(RemoteObject.createImmutable("CENTER"))); - BA.debugLineNum = 206;BA.debugLine="xbtn.TextColor = ButtonsTextColor"; -Debug.JustUpdateDeviceLine(); -_xbtn.runMethod(true,"setTextColor",__ref.getField(true,"_buttonstextcolor" /*RemoteObject*/ )); - BA.debugLineNum = 207;BA.debugLine="xbtn.Font = ButtonsFont"; -Debug.JustUpdateDeviceLine(); -_xbtn.runMethod(false,"setFont",__ref.getField(false,"_buttonsfont" /*RemoteObject*/ )); - BA.debugLineNum = 208;BA.debugLine="Dim numberOfButtons As Int = Base.NumberOfViews '"; -Debug.JustUpdateDeviceLine(); -_numberofbuttons = __ref.getField(false,"_base" /*RemoteObject*/ ).runMethod(true,"getNumberOfViews");Debug.locals.put("numberOfButtons", _numberofbuttons);Debug.locals.put("numberOfButtons", _numberofbuttons); - BA.debugLineNum = 209;BA.debugLine="Base.AddView(xbtn, Base.Width - 4dip - numberOfBu"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_base" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((_xbtn.getObject())),(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_base" /*RemoteObject*/ ).runMethod(true,"getWidth"),b4xdialog.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 4))),_numberofbuttons,(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_buttonwidth" /*RemoteObject*/ ),b4xdialog.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 5)))}, "+",1, 1)),__ref.getField(true,"_buttonwidth" /*RemoteObject*/ )}, "--*-",3, 1)),(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_base" /*RemoteObject*/ ).runMethod(true,"getHeight"),__ref.getField(true,"_buttonsheight" /*RemoteObject*/ ),b4xdialog.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 4)))}, "--",2, 1)),(Object)(__ref.getField(true,"_buttonwidth" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_buttonsheight" /*RemoteObject*/ ))); - BA.debugLineNum = 211;BA.debugLine="If Code = xui.DialogResponse_Cancel Then xbtn.Req"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_code,BA.numberCast(double.class, __ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"DialogResponse_Cancel")))) { -_xbtn.runVoidMethod ("RequestFocus");}; - BA.debugLineNum = 212;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getbutton(RemoteObject __ref,RemoteObject _resultcode) throws Exception{ -try { - Debug.PushSubsStack("GetButton (b4xdialog) ","b4xdialog",43,__ref.getField(false, "ba"),__ref,215); -if (RapidSub.canDelegate("getbutton")) { return __ref.runUserSub(false, "b4xdialog","getbutton", __ref, _resultcode);} -RemoteObject _b = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -Debug.locals.put("ResultCode", _resultcode); - BA.debugLineNum = 215;BA.debugLine="Public Sub GetButton (ResultCode As Int) As B4XVie"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 216;BA.debugLine="For Each b As B4XView In Base.GetAllViewsRecursiv"; -Debug.JustUpdateDeviceLine(); -_b = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -{ -final RemoteObject group1 = __ref.getField(false,"_base" /*RemoteObject*/ ).runMethod(false,"GetAllViewsRecursive"); -final int groupLen1 = group1.runMethod(true,"getSize").get() -;int index1 = 0; -; -for (; index1 < groupLen1;index1++){ -_b = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), group1.runMethod(false,"Get",index1));Debug.locals.put("b", _b); -Debug.locals.put("b", _b); - BA.debugLineNum = 217;BA.debugLine="If b.Tag = ResultCode Then Return b 'ignore"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_b.runMethod(false,"getTag"),(_resultcode))) { -if (true) return _b;}; - } -}Debug.locals.put("b", _b); -; - BA.debugLineNum = 219;BA.debugLine="Return Null"; -Debug.JustUpdateDeviceLine(); -if (true) return RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), b4xdialog.__c.getField(false,"Null")); - BA.debugLineNum = 220;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getvisible(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getVisible (b4xdialog) ","b4xdialog",43,__ref.getField(false, "ba"),__ref,189); -if (RapidSub.canDelegate("getvisible")) { return __ref.runUserSub(false, "b4xdialog","getvisible", __ref);} - BA.debugLineNum = 189;BA.debugLine="Public Sub getVisible As Boolean"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 190;BA.debugLine="Return Background.IsInitialized And Background.Pa"; -Debug.JustUpdateDeviceLine(); -if (true) return BA.ObjectToBoolean(RemoteObject.solveBoolean(".",__ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(true,"IsInitialized")) && RemoteObject.solveBoolean(".",__ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(false,"getParent").runMethod(true,"IsInitialized"))); - BA.debugLineNum = 191;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _parent) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xdialog) ","b4xdialog",43,__ref.getField(false, "ba"),__ref,36); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xdialog","initialize", __ref, _ba, _parent);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); -Debug.locals.put("Parent", _parent); - BA.debugLineNum = 36;BA.debugLine="Public Sub Initialize (Parent As B4XView)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 37;BA.debugLine="BlurBackground = False"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_blurbackground" /*RemoteObject*/ ,b4xdialog.__c.getField(true,"False")); - BA.debugLineNum = 38;BA.debugLine="If xui.IsB4i Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4i").get().booleanValue()) { - BA.debugLineNum = 39;BA.debugLine="BlurReduceScale = 3"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_blurreducescale" /*RemoteObject*/ ,BA.numberCast(int.class, 3)); - }else -{ BA.debugLineNum = 40;BA.debugLine="Else If xui.IsB4J Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4J").get().booleanValue()) { - BA.debugLineNum = 41;BA.debugLine="BlurReduceScale = 1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_blurreducescale" /*RemoteObject*/ ,BA.numberCast(int.class, 1)); - }else -{ BA.debugLineNum = 42;BA.debugLine="Else if xui.IsB4A Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4A").get().booleanValue()) { - BA.debugLineNum = 43;BA.debugLine="BlurReduceScale = 3"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_blurreducescale" /*RemoteObject*/ ,BA.numberCast(int.class, 3)); - }}} -; - BA.debugLineNum = 45;BA.debugLine="mParent = Parent"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mparent" /*RemoteObject*/ ,_parent); - BA.debugLineNum = 51;BA.debugLine="TitleBarFont = xui.CreateDefaultBoldFont(16)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_titlebarfont" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreateDefaultBoldFont",(Object)(BA.numberCast(float.class, 16)))); - BA.debugLineNum = 52;BA.debugLine="ButtonsFont = xui.CreateDefaultBoldFont(15)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_buttonsfont" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreateDefaultBoldFont",(Object)(BA.numberCast(float.class, 15)))); - BA.debugLineNum = 53;BA.debugLine="TitleBarTextColor = xui.Color_White"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_titlebartextcolor" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_White")); - BA.debugLineNum = 54;BA.debugLine="ButtonsState.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_buttonsstate" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 55;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _internaladdstubtoclvifneeded(RemoteObject __ref,RemoteObject _customlistview1,RemoteObject _color) throws Exception{ -try { - Debug.PushSubsStack("InternalAddStubToCLVIfNeeded (b4xdialog) ","b4xdialog",43,__ref.getField(false, "ba"),__ref,343); -if (RapidSub.canDelegate("internaladdstubtoclvifneeded")) { return __ref.runUserSub(false, "b4xdialog","internaladdstubtoclvifneeded", __ref, _customlistview1, _color);} -Debug.locals.put("CustomListView1", _customlistview1); -Debug.locals.put("Color", _color); - BA.debugLineNum = 343;BA.debugLine="Public Sub InternalAddStubToCLVIfNeeded(CustomList"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 344;BA.debugLine="XUIViewsUtils.AddStubToCLVIfNeeded(CustomListView"; -Debug.JustUpdateDeviceLine(); -b4xdialog._xuiviewsutils.runVoidMethod ("_addstubtoclvifneeded" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(_customlistview1),(Object)(_color)); - BA.debugLineNum = 345;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _internalsettextorcsbuildertolabel(RemoteObject __ref,RemoteObject _xlbl,RemoteObject _text) throws Exception{ -try { - Debug.PushSubsStack("InternalSetTextOrCSBuilderToLabel (b4xdialog) ","b4xdialog",43,__ref.getField(false, "ba"),__ref,339); -if (RapidSub.canDelegate("internalsettextorcsbuildertolabel")) { return __ref.runUserSub(false, "b4xdialog","internalsettextorcsbuildertolabel", __ref, _xlbl, _text);} -Debug.locals.put("xlbl", _xlbl); -Debug.locals.put("Text", _text); - BA.debugLineNum = 339;BA.debugLine="Public Sub InternalSetTextOrCSBuilderToLabel(xlbl"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 340;BA.debugLine="XUIViewsUtils.SetTextOrCSBuilderToLabel(xlbl, Tex"; -Debug.JustUpdateDeviceLine(); -b4xdialog._xuiviewsutils.runVoidMethod ("_settextorcsbuildertolabel" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(_xlbl),(Object)(_text)); - BA.debugLineNum = 341;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("Resize (b4xdialog) ","b4xdialog",43,__ref.getField(false, "ba"),__ref,263); -if (RapidSub.canDelegate("resize")) { return __ref.runUserSub(false, "b4xdialog","resize", __ref, _width, _height);} -RemoteObject _top = RemoteObject.createImmutable(0); -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 263;BA.debugLine="Public Sub Resize (Width As Int, Height As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 265;BA.debugLine="Dim Top As Int = Round(Background.Height / 2 - Ba"; -Debug.JustUpdateDeviceLine(); -_top = BA.numberCast(int.class, b4xdialog.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(true,"getHeight"),RemoteObject.createImmutable(2),__ref.getField(false,"_base" /*RemoteObject*/ ).runMethod(true,"getHeight"),RemoteObject.createImmutable(2)}, "/-/",1, 0))));Debug.locals.put("Top", _top);Debug.locals.put("Top", _top); - BA.debugLineNum = 266;BA.debugLine="If PutAtTop Then Top = 20dip"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_putattop" /*RemoteObject*/ ).get().booleanValue()) { -_top = b4xdialog.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 20)));Debug.locals.put("Top", _top);}; - BA.debugLineNum = 267;BA.debugLine="Background.SetLayoutAnimated(0, 0, 0, Width, Heig"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_background" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(_width),(Object)(_height)); - BA.debugLineNum = 268;BA.debugLine="Base.SetLayoutAnimated(200, Round(Background.Widt"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_base" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 200)),(Object)(BA.numberCast(int.class, b4xdialog.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2),__ref.getField(false,"_base" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/-/",1, 0))))),(Object)(_top),(Object)(__ref.getField(false,"_base" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(__ref.getField(false,"_base" /*RemoteObject*/ ).runMethod(true,"getHeight"))); - BA.debugLineNum = 269;BA.debugLine="If xui.IsB4J Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4J").get().booleanValue()) { - BA.debugLineNum = 270;BA.debugLine="UpdateBlur"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_updateblur" /*RemoteObject*/ ); - }; - BA.debugLineNum = 272;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setavg(RemoteObject __ref,RemoteObject _bc,RemoteObject _x,RemoteObject _y,RemoteObject _clrs,RemoteObject _temp) throws Exception{ -try { - Debug.PushSubsStack("SetAvg (b4xdialog) ","b4xdialog",43,__ref.getField(false, "ba"),__ref,325); -if (RapidSub.canDelegate("setavg")) { return __ref.runUserSub(false, "b4xdialog","setavg", __ref, _bc, _x, _y, _clrs, _temp);} -RemoteObject _c = RemoteObject.declareNull("b4a.example.bitmapcreator._argbcolor"); -Debug.locals.put("bc", _bc); -Debug.locals.put("x", _x); -Debug.locals.put("y", _y); -Debug.locals.put("clrs", _clrs); -Debug.locals.put("temp", _temp); - BA.debugLineNum = 325;BA.debugLine="Private Sub SetAvg(bc As BitmapCreator, x As Int,"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 326;BA.debugLine="temp.Initialize"; -Debug.JustUpdateDeviceLine(); -_temp.runVoidMethod ("Initialize"); - BA.debugLineNum = 327;BA.debugLine="For Each c As ARGBColor In clrs"; -Debug.JustUpdateDeviceLine(); -{ -final RemoteObject group2 = _clrs; -final int groupLen2 = group2.getField(true,"length").get() -;int index2 = 0; -; -for (; index2 < groupLen2;index2++){ -_c = group2.getArrayElement(false,RemoteObject.createImmutable(index2));Debug.locals.put("c", _c); -Debug.locals.put("c", _c); - BA.debugLineNum = 328;BA.debugLine="temp.r = temp.r + c.r"; -Debug.JustUpdateDeviceLine(); -_temp.setField ("r",RemoteObject.solve(new RemoteObject[] {_temp.getField(true,"r"),_c.getField(true,"r")}, "+",1, 1)); - BA.debugLineNum = 329;BA.debugLine="temp.g = temp.g + c.g"; -Debug.JustUpdateDeviceLine(); -_temp.setField ("g",RemoteObject.solve(new RemoteObject[] {_temp.getField(true,"g"),_c.getField(true,"g")}, "+",1, 1)); - BA.debugLineNum = 330;BA.debugLine="temp.b = temp.b + c.b"; -Debug.JustUpdateDeviceLine(); -_temp.setField ("b",RemoteObject.solve(new RemoteObject[] {_temp.getField(true,"b"),_c.getField(true,"b")}, "+",1, 1)); - } -}Debug.locals.put("c", _c); -; - BA.debugLineNum = 332;BA.debugLine="temp.a = 255"; -Debug.JustUpdateDeviceLine(); -_temp.setField ("a",BA.numberCast(int.class, 255)); - BA.debugLineNum = 333;BA.debugLine="temp.r = temp.r / 3"; -Debug.JustUpdateDeviceLine(); -_temp.setField ("r",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_temp.getField(true,"r"),RemoteObject.createImmutable(3)}, "/",0, 0))); - BA.debugLineNum = 334;BA.debugLine="temp.g = temp.g / 3"; -Debug.JustUpdateDeviceLine(); -_temp.setField ("g",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_temp.getField(true,"g"),RemoteObject.createImmutable(3)}, "/",0, 0))); - BA.debugLineNum = 335;BA.debugLine="temp.b = temp.b / 3"; -Debug.JustUpdateDeviceLine(); -_temp.setField ("b",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_temp.getField(true,"b"),RemoteObject.createImmutable(3)}, "/",0, 0))); - BA.debugLineNum = 336;BA.debugLine="bc.SetARGB(x, y, temp)"; -Debug.JustUpdateDeviceLine(); -_bc.runVoidMethod ("_setargb",(Object)(_x),(Object)(_y),(Object)(_temp)); - BA.debugLineNum = 337;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setbuttonstate(RemoteObject __ref,RemoteObject _resultcode,RemoteObject _enabled) throws Exception{ -try { - Debug.PushSubsStack("SetButtonState (b4xdialog) ","b4xdialog",43,__ref.getField(false, "ba"),__ref,223); -if (RapidSub.canDelegate("setbuttonstate")) { return __ref.runUserSub(false, "b4xdialog","setbuttonstate", __ref, _resultcode, _enabled);} -RemoteObject _b = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -Debug.locals.put("ResultCode", _resultcode); -Debug.locals.put("Enabled", _enabled); - BA.debugLineNum = 223;BA.debugLine="Public Sub SetButtonState (ResultCode As Int, Enab"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 224;BA.debugLine="Dim b As B4XView = GetButton(ResultCode)"; -Debug.JustUpdateDeviceLine(); -_b = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_b = __ref.runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_getbutton" /*RemoteObject*/ ,(Object)(_resultcode));Debug.locals.put("b", _b);Debug.locals.put("b", _b); - BA.debugLineNum = 225;BA.debugLine="If b.IsInitialized Then"; -Debug.JustUpdateDeviceLine(); -if (_b.runMethod(true,"IsInitialized").get().booleanValue()) { - BA.debugLineNum = 226;BA.debugLine="b.Enabled = Enabled"; -Debug.JustUpdateDeviceLine(); -_b.runMethod(true,"setEnabled",_enabled); - BA.debugLineNum = 227;BA.debugLine="If Enabled Then b.TextColor = ButtonsTextColor E"; -Debug.JustUpdateDeviceLine(); -if (_enabled.get().booleanValue()) { -_b.runMethod(true,"setTextColor",__ref.getField(true,"_buttonstextcolor" /*RemoteObject*/ ));} -else { -_b.runMethod(true,"setTextColor",__ref.getField(true,"_buttonstextcolordisabled" /*RemoteObject*/ ));}; - BA.debugLineNum = 228;BA.debugLine="ButtonsState.Put(ResultCode, Enabled)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_buttonsstate" /*RemoteObject*/ ).runVoidMethod ("Put",(Object)((_resultcode)),(Object)((_enabled))); - }; - BA.debugLineNum = 230;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _show(RemoteObject __ref,RemoteObject _text,RemoteObject _yes,RemoteObject _no,RemoteObject _cancel) throws Exception{ -try { - Debug.PushSubsStack("Show (b4xdialog) ","b4xdialog",43,__ref.getField(false, "ba"),__ref,74); -if (RapidSub.canDelegate("show")) { return __ref.runUserSub(false, "b4xdialog","show", __ref, _text, _yes, _no, _cancel);} -ResumableSub_Show rsub = new ResumableSub_Show(null,__ref,_text,_yes,_no,_cancel); -rsub.remoteResumableSub = anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSubForFilter(); -rsub.resume(null, null); -return RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.keywords.Common.ResumableSubWrapper"), rsub.remoteResumableSub); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_Show extends BA.ResumableSub { -public ResumableSub_Show(keymon.lat.medicomed.b4xdialog parent,RemoteObject __ref,RemoteObject _text,RemoteObject _yes,RemoteObject _no,RemoteObject _cancel) { -this.parent = parent; -this.__ref = __ref; -this._text = _text; -this._yes = _yes; -this._no = _no; -this._cancel = _cancel; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.b4xdialog parent; -RemoteObject _text; -RemoteObject _yes; -RemoteObject _no; -RemoteObject _cancel; -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _lbl = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _xlbl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _result = RemoteObject.createImmutable(0); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("Show (b4xdialog) ","b4xdialog",43,__ref.getField(false, "ba"),__ref,74); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -{ -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,RemoteObject.createImmutable(null));return;} -case 0: -//C -this.state = -1; -Debug.locals.put("_ref", __ref); -Debug.locals.put("Text", _text); -Debug.locals.put("Yes", _yes); -Debug.locals.put("No", _no); -Debug.locals.put("Cancel", _cancel); - BA.debugLineNum = 75;BA.debugLine="Dim p As B4XView"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");Debug.locals.put("p", _p); - BA.debugLineNum = 76;BA.debugLine="p = xui.CreatePanel(\"\")"; -Debug.JustUpdateDeviceLine(); -_p = __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("")));Debug.locals.put("p", _p); - BA.debugLineNum = 77;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, 300dip, 100dip)"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(parent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 300)))),(Object)(parent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 100))))); - BA.debugLineNum = 78;BA.debugLine="Dim lbl As Label"; -Debug.JustUpdateDeviceLine(); -_lbl = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("lbl", _lbl); - BA.debugLineNum = 79;BA.debugLine="lbl.Initialize(\"\")"; -Debug.JustUpdateDeviceLine(); -_lbl.runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable(""))); - BA.debugLineNum = 83;BA.debugLine="lbl.SingleLine = False"; -Debug.JustUpdateDeviceLine(); -_lbl.runVoidMethod ("setSingleLine",parent.__c.getField(true,"False")); - BA.debugLineNum = 87;BA.debugLine="Dim xlbl As B4XView = lbl"; -Debug.JustUpdateDeviceLine(); -_xlbl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_xlbl = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), _lbl.getObject());Debug.locals.put("xlbl", _xlbl);Debug.locals.put("xlbl", _xlbl); - BA.debugLineNum = 88;BA.debugLine="p.AddView(xlbl, 5dip, 0, p.Width - 10dip, p.Heigh"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("AddView",(Object)((_xlbl.getObject())),(Object)(parent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 5)))),(Object)(BA.numberCast(int.class, 0)),(Object)(RemoteObject.solve(new RemoteObject[] {_p.runMethod(true,"getWidth"),parent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 10)))}, "-",1, 1)),(Object)(_p.runMethod(true,"getHeight"))); - BA.debugLineNum = 89;BA.debugLine="xlbl.TextColor = BodyTextColor"; -Debug.JustUpdateDeviceLine(); -_xlbl.runMethod(true,"setTextColor",__ref.getField(true,"_bodytextcolor" /*RemoteObject*/ )); - BA.debugLineNum = 90;BA.debugLine="xlbl.Font = TitleBarFont"; -Debug.JustUpdateDeviceLine(); -_xlbl.runMethod(false,"setFont",__ref.getField(false,"_titlebarfont" /*RemoteObject*/ )); - BA.debugLineNum = 91;BA.debugLine="XUIViewsUtils.SetTextOrCSBuilderToLabel(xlbl, Tex"; -Debug.JustUpdateDeviceLine(); -parent._xuiviewsutils.runVoidMethod ("_settextorcsbuildertolabel" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(_xlbl),(Object)(_text)); - BA.debugLineNum = 92;BA.debugLine="xlbl.SetTextAlignment(\"CENTER\", \"LEFT\")"; -Debug.JustUpdateDeviceLine(); -_xlbl.runVoidMethod ("SetTextAlignment",(Object)(BA.ObjectToString("CENTER")),(Object)(RemoteObject.createImmutable("LEFT"))); - BA.debugLineNum = 93;BA.debugLine="Wait For (ShowCustom(p, Yes, No, Cancel)) Complet"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("WaitFor","complete", __ref.getField(false, "ba"), anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xdialog", "show"), __ref.runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_showcustom" /*RemoteObject*/ ,(Object)(_p),(Object)(_yes),(Object)(_no),(Object)(_cancel))); -this.state = 1; -return; -case 1: -//C -this.state = -1; -_result = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(1));Debug.locals.put("Result", _result); -; - BA.debugLineNum = 94;BA.debugLine="Return Result"; -Debug.JustUpdateDeviceLine(); -if (true) { -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,(_result));return;}; - BA.debugLineNum = 95;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static void _complete(RemoteObject __ref,RemoteObject _result) throws Exception{ -} -public static RemoteObject _showcustom(RemoteObject __ref,RemoteObject _content,RemoteObject _yes,RemoteObject _no,RemoteObject _cancel) throws Exception{ -try { - Debug.PushSubsStack("ShowCustom (b4xdialog) ","b4xdialog",43,__ref.getField(false, "ba"),__ref,97); -if (RapidSub.canDelegate("showcustom")) { return __ref.runUserSub(false, "b4xdialog","showcustom", __ref, _content, _yes, _no, _cancel);} -ResumableSub_ShowCustom rsub = new ResumableSub_ShowCustom(null,__ref,_content,_yes,_no,_cancel); -rsub.remoteResumableSub = anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSubForFilter(); -rsub.resume(null, null); -return RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.keywords.Common.ResumableSubWrapper"), rsub.remoteResumableSub); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_ShowCustom extends BA.ResumableSub { -public ResumableSub_ShowCustom(keymon.lat.medicomed.b4xdialog parent,RemoteObject __ref,RemoteObject _content,RemoteObject _yes,RemoteObject _no,RemoteObject _cancel) { -this.parent = parent; -this.__ref = __ref; -this._content = _content; -this._yes = _yes; -this._no = _no; -this._cancel = _cancel; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.b4xdialog parent; -RemoteObject _content; -RemoteObject _yes; -RemoteObject _no; -RemoteObject _cancel; -RemoteObject _v = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _iv = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -RemoteObject _includetitle = RemoteObject.createImmutable(false); -RemoteObject _temptitlebarheight = RemoteObject.createImmutable(0); -RemoteObject _height = RemoteObject.createImmutable(0); -RemoteObject _width = RemoteObject.createImmutable(0); -RemoteObject _top = RemoteObject.createImmutable(0); -RemoteObject _removetitle = RemoteObject.createImmutable(false); -int _i = 0; -RemoteObject _btype = RemoteObject.createImmutable(0); -RemoteObject _lbl = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _xlbl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _result = RemoteObject.createImmutable(0); -RemoteObject group1; -int index1; -int groupLen1; -int step46; -int limit46; -RemoteObject group74; -int index74; -int groupLen74; -RemoteObject group78; -int index78; -int groupLen78; - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("ShowCustom (b4xdialog) ","b4xdialog",43,__ref.getField(false, "ba"),__ref,97); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -{ -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,RemoteObject.createImmutable(null));return;} -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); -Debug.locals.put("Content", _content); -Debug.locals.put("Yes", _yes); -Debug.locals.put("No", _no); -Debug.locals.put("Cancel", _cancel); - BA.debugLineNum = 98;BA.debugLine="For Each v As B4XView In mParent.GetAllViewsRecur"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 1: -//for -this.state = 8; -_v = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -group1 = __ref.getField(false,"_mparent" /*RemoteObject*/ ).runMethod(false,"GetAllViewsRecursive"); -index1 = 0; -groupLen1 = group1.runMethod(true,"getSize").get(); -Debug.locals.put("v", _v); -this.state = 60; -if (true) break; - -case 60: -//C -this.state = 8; -if (index1 < groupLen1) { -this.state = 3; -_v = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), group1.runMethod(false,"Get",index1));Debug.locals.put("v", _v);} -if (true) break; - -case 61: -//C -this.state = 60; -index1++; -Debug.locals.put("v", _v); -if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 99;BA.debugLine="If v.Tag <> Null And v.Tag = \"b4xdialog_backgrou"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 4: -//if -this.state = 7; -if (RemoteObject.solveBoolean("N",_v.runMethod(false,"getTag")) && RemoteObject.solveBoolean("=",_v.runMethod(false,"getTag"),RemoteObject.createImmutable(("b4xdialog_background")))) { -this.state = 6; -}if (true) break; - -case 6: -//C -this.state = 7; - BA.debugLineNum = 100;BA.debugLine="v.RemoveViewFromParent"; -Debug.JustUpdateDeviceLine(); -_v.runVoidMethod ("RemoveViewFromParent"); - BA.debugLineNum = 101;BA.debugLine="Exit"; -Debug.JustUpdateDeviceLine(); -this.state = 8; -if (true) break; - if (true) break; - -case 7: -//C -this.state = 61; -; - if (true) break; -if (true) break; - -case 8: -//C -this.state = 9; -Debug.locals.put("v", _v); -; - BA.debugLineNum = 104;BA.debugLine="ButtonsState.Clear"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_buttonsstate" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 105;BA.debugLine="Dim Background As B4XView = xui.CreatePanel(\"back"; -Debug.JustUpdateDeviceLine(); -parent._background = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -parent._background = __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("background")));__ref.setField("_background",parent._background); - BA.debugLineNum = 106;BA.debugLine="Background.Tag = \"b4xdialog_background\""; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(false,"setTag",RemoteObject.createImmutable(("b4xdialog_background"))); - BA.debugLineNum = 107;BA.debugLine="If BlurBackground Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 9: -//if -this.state = 14; -if (__ref.getField(true,"_blurbackground" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 11; -}else { -this.state = 13; -}if (true) break; - -case 11: -//C -this.state = 14; - BA.debugLineNum = 108;BA.debugLine="Dim iv As ImageView"; -Debug.JustUpdateDeviceLine(); -_iv = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");Debug.locals.put("iv", _iv); - BA.debugLineNum = 109;BA.debugLine="iv.Initialize(\"\")"; -Debug.JustUpdateDeviceLine(); -_iv.runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable(""))); - BA.debugLineNum = 110;BA.debugLine="BlurImageView = iv"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_blurimageview" /*RemoteObject*/ ).setObject (_iv.getObject()); - BA.debugLineNum = 111;BA.debugLine="Background.AddView(BlurImageView, 0, 0, Backgrou"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_background" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_blurimageview" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(__ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(true,"getHeight"))); - BA.debugLineNum = 112;BA.debugLine="Background.Color = xui.Color_Transparent"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(true,"setColor",__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")); - if (true) break; - -case 13: -//C -this.state = 14; - BA.debugLineNum = 114;BA.debugLine="Background.Color = OverlayColor"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(true,"setColor",__ref.getField(true,"_overlaycolor" /*RemoteObject*/ )); - if (true) break; - -case 14: -//C -this.state = 15; -; - BA.debugLineNum = 117;BA.debugLine="Dim p As Panel = Background"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper"); -_p = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.PanelWrapper"), __ref.getField(false,"_background" /*RemoteObject*/ ).getObject());Debug.locals.put("p", _p);Debug.locals.put("p", _p); - BA.debugLineNum = 118;BA.debugLine="p.Elevation = 4dip"; -Debug.JustUpdateDeviceLine(); -_p.runMethod(true,"setElevation",BA.numberCast(float.class, parent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 4))))); - BA.debugLineNum = 120;BA.debugLine="mParent.AddView(Background, 0, 0, mParent.Width,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mparent" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_background" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_mparent" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(__ref.getField(false,"_mparent" /*RemoteObject*/ ).runMethod(true,"getHeight"))); - BA.debugLineNum = 121;BA.debugLine="UpdateBlur"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_updateblur" /*RemoteObject*/ ); - BA.debugLineNum = 122;BA.debugLine="Base = xui.CreatePanel(\"\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_base" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("")))); - BA.debugLineNum = 123;BA.debugLine="Base.SetColorAndBorder(BackgroundColor, BorderWid"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_base" /*RemoteObject*/ ).runVoidMethod ("SetColorAndBorder",(Object)(__ref.getField(true,"_backgroundcolor" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_borderwidth" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_bordercolor" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_bordercornersradius" /*RemoteObject*/ ))); - BA.debugLineNum = 124;BA.debugLine="Base.RequestFocus"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_base" /*RemoteObject*/ ).runVoidMethod ("RequestFocus"); - BA.debugLineNum = 125;BA.debugLine="Dim IncludeTitle As Boolean = Title <> \"\""; -Debug.JustUpdateDeviceLine(); -_includetitle = BA.ObjectToBoolean(RemoteObject.solveBoolean("!",__ref.getField(false,"_title" /*RemoteObject*/ ),RemoteObject.createImmutable((""))));Debug.locals.put("IncludeTitle", _includetitle);Debug.locals.put("IncludeTitle", _includetitle); - BA.debugLineNum = 126;BA.debugLine="Dim TempTitleBarHeight As Int = 0"; -Debug.JustUpdateDeviceLine(); -_temptitlebarheight = BA.numberCast(int.class, 0);Debug.locals.put("TempTitleBarHeight", _temptitlebarheight);Debug.locals.put("TempTitleBarHeight", _temptitlebarheight); - BA.debugLineNum = 127;BA.debugLine="If IncludeTitle Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 15: -//if -this.state = 18; -if (_includetitle.get().booleanValue()) { -this.state = 17; -}if (true) break; - -case 17: -//C -this.state = 18; - BA.debugLineNum = 128;BA.debugLine="TempTitleBarHeight = TitleBarHeight"; -Debug.JustUpdateDeviceLine(); -_temptitlebarheight = __ref.getField(true,"_titlebarheight" /*RemoteObject*/ );Debug.locals.put("TempTitleBarHeight", _temptitlebarheight); - if (true) break; - -case 18: -//C -this.state = 19; -; - BA.debugLineNum = 130;BA.debugLine="Dim height As Int = Content.Height + ButtonsHeigh"; -Debug.JustUpdateDeviceLine(); -_height = RemoteObject.solve(new RemoteObject[] {_content.runMethod(true,"getHeight"),__ref.getField(true,"_buttonsheight" /*RemoteObject*/ ),parent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 3))),parent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 3))),_temptitlebarheight}, "++++",4, 1);Debug.locals.put("height", _height);Debug.locals.put("height", _height); - BA.debugLineNum = 131;BA.debugLine="Dim width As Int = Content.Width + 4dip"; -Debug.JustUpdateDeviceLine(); -_width = RemoteObject.solve(new RemoteObject[] {_content.runMethod(true,"getWidth"),parent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 4)))}, "+",1, 1);Debug.locals.put("width", _width);Debug.locals.put("width", _width); - BA.debugLineNum = 132;BA.debugLine="Dim Top As Int = Round(Background.Height / 2 - he"; -Debug.JustUpdateDeviceLine(); -_top = BA.numberCast(int.class, parent.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(true,"getHeight"),RemoteObject.createImmutable(2),_height,RemoteObject.createImmutable(2)}, "/-/",1, 0))));Debug.locals.put("Top", _top);Debug.locals.put("Top", _top); - BA.debugLineNum = 133;BA.debugLine="Dim RemoveTitle As Boolean"; -Debug.JustUpdateDeviceLine(); -_removetitle = RemoteObject.createImmutable(false);Debug.locals.put("RemoveTitle", _removetitle); - BA.debugLineNum = 134;BA.debugLine="If PutAtTop Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 19: -//if -this.state = 28; -if (__ref.getField(true,"_putattop" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 21; -}if (true) break; - -case 21: -//C -this.state = 22; - BA.debugLineNum = 135;BA.debugLine="Top = 20dip"; -Debug.JustUpdateDeviceLine(); -_top = parent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 20)));Debug.locals.put("Top", _top); - BA.debugLineNum = 136;BA.debugLine="If Background.Height - Top - height < 200dip The"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 22: -//if -this.state = 27; -if (RemoteObject.solveBoolean("<",RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(true,"getHeight"),_top,_height}, "--",2, 1),BA.numberCast(double.class, parent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 200)))))) { -this.state = 24; -;}if (true) break; - -case 24: -//C -this.state = 27; -_removetitle = parent.__c.getField(true,"True");Debug.locals.put("RemoveTitle", _removetitle); -if (true) break; - -case 27: -//C -this.state = 28; -; - if (true) break; -; - BA.debugLineNum = 138;BA.debugLine="If RemoveTitle Or Background.Height < height Then"; -Debug.JustUpdateDeviceLine(); - -case 28: -//if -this.state = 31; -if (RemoteObject.solveBoolean(".",_removetitle) || RemoteObject.solveBoolean("<",__ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(true,"getHeight"),BA.numberCast(double.class, _height))) { -this.state = 30; -}if (true) break; - -case 30: -//C -this.state = 31; - BA.debugLineNum = 139;BA.debugLine="Top = 1dip"; -Debug.JustUpdateDeviceLine(); -_top = parent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1)));Debug.locals.put("Top", _top); - BA.debugLineNum = 140;BA.debugLine="IncludeTitle = False"; -Debug.JustUpdateDeviceLine(); -_includetitle = parent.__c.getField(true,"False");Debug.locals.put("IncludeTitle", _includetitle); - BA.debugLineNum = 141;BA.debugLine="height = height - TempTitleBarHeight - 3dip"; -Debug.JustUpdateDeviceLine(); -_height = RemoteObject.solve(new RemoteObject[] {_height,_temptitlebarheight,parent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 3)))}, "--",2, 1);Debug.locals.put("height", _height); - BA.debugLineNum = 142;BA.debugLine="TempTitleBarHeight = 0"; -Debug.JustUpdateDeviceLine(); -_temptitlebarheight = BA.numberCast(int.class, 0);Debug.locals.put("TempTitleBarHeight", _temptitlebarheight); - if (true) break; - -case 31: -//C -this.state = 32; -; - BA.debugLineNum = 144;BA.debugLine="Background.AddView(Base, Round(Background.Width /"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_background" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_base" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, parent.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2),_width,RemoteObject.createImmutable(2)}, "/-/",1, 0))))),(Object)(_top),(Object)(BA.numberCast(int.class, parent.__c.runMethod(true,"Round",(Object)(BA.numberCast(double.class, _width))))),(Object)(BA.numberCast(int.class, parent.__c.runMethod(true,"Round",(Object)(BA.numberCast(double.class, _height)))))); - BA.debugLineNum = 146;BA.debugLine="For i = ButtonsOrder.Length - 1 To 0 Step - 1"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 32: -//for -this.state = 43; -step46 = -1; -limit46 = 0; -_i = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_buttonsorder" /*RemoteObject*/ ).getField(true,"length"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue() ; -Debug.locals.put("i", _i); -this.state = 62; -if (true) break; - -case 62: -//C -this.state = 43; -if ((step46 > 0 && _i <= limit46) || (step46 < 0 && _i >= limit46)) this.state = 34; -if (true) break; - -case 63: -//C -this.state = 62; -_i = ((int)(0 + _i + step46)) ; -Debug.locals.put("i", _i); -if (true) break; - -case 34: -//C -this.state = 35; - BA.debugLineNum = 147;BA.debugLine="Dim btype As Int = ButtonsOrder(i)"; -Debug.JustUpdateDeviceLine(); -_btype = __ref.getField(false,"_buttonsorder" /*RemoteObject*/ ).getArrayElement(true,BA.numberCast(int.class, _i));Debug.locals.put("btype", _btype);Debug.locals.put("btype", _btype); - BA.debugLineNum = 148;BA.debugLine="Select btype"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 35: -//select -this.state = 42; -switch (BA.switchObjectToInt(_btype,__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"DialogResponse_Cancel"),__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"DialogResponse_Negative"),__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"DialogResponse_Positive"))) { -case 0: { -this.state = 37; -if (true) break; -} -case 1: { -this.state = 39; -if (true) break; -} -case 2: { -this.state = 41; -if (true) break; -} -} -if (true) break; - -case 37: -//C -this.state = 42; - BA.debugLineNum = 150;BA.debugLine="CreateButton(Cancel, btype)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_createbutton" /*RemoteObject*/ ,(Object)(_cancel),(Object)(_btype)); - if (true) break; - -case 39: -//C -this.state = 42; - BA.debugLineNum = 152;BA.debugLine="CreateButton(No, btype)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_createbutton" /*RemoteObject*/ ,(Object)(_no),(Object)(_btype)); - if (true) break; - -case 41: -//C -this.state = 42; - BA.debugLineNum = 154;BA.debugLine="CreateButton(Yes, btype)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_createbutton" /*RemoteObject*/ ,(Object)(_yes),(Object)(_btype)); - if (true) break; - -case 42: -//C -this.state = 63; -; - if (true) break; -if (true) break; - -case 43: -//C -this.state = 44; -Debug.locals.put("i", _i); -; - BA.debugLineNum = 157;BA.debugLine="Base.Visible = False"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_base" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 158;BA.debugLine="If IncludeTitle Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 44: -//if -this.state = 47; -if (_includetitle.get().booleanValue()) { -this.state = 46; -}if (true) break; - -case 46: -//C -this.state = 47; - BA.debugLineNum = 159;BA.debugLine="TitleBar = xui.CreatePanel(\"TitleBar\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_titlebar" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("TitleBar")))); - BA.debugLineNum = 160;BA.debugLine="TitleBar.Color = TitleBarColor"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_titlebar" /*RemoteObject*/ ).runMethod(true,"setColor",__ref.getField(true,"_titlebarcolor" /*RemoteObject*/ )); - BA.debugLineNum = 161;BA.debugLine="Base.AddView(TitleBar, 2dip, 2dip, Content.Width"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_base" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_titlebar" /*RemoteObject*/ ).getObject())),(Object)(parent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)))),(Object)(parent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)))),(Object)(_content.runMethod(true,"getWidth")),(Object)(_temptitlebarheight)); - BA.debugLineNum = 162;BA.debugLine="Dim lbl As Label"; -Debug.JustUpdateDeviceLine(); -_lbl = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("lbl", _lbl); - BA.debugLineNum = 163;BA.debugLine="lbl.Initialize(\"\")"; -Debug.JustUpdateDeviceLine(); -_lbl.runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable(""))); - BA.debugLineNum = 164;BA.debugLine="Dim xlbl As B4XView = lbl"; -Debug.JustUpdateDeviceLine(); -_xlbl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_xlbl = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), _lbl.getObject());Debug.locals.put("xlbl", _xlbl);Debug.locals.put("xlbl", _xlbl); - BA.debugLineNum = 165;BA.debugLine="XUIViewsUtils.SetTextOrCSBuilderToLabel(xlbl, Ti"; -Debug.JustUpdateDeviceLine(); -parent._xuiviewsutils.runVoidMethod ("_settextorcsbuildertolabel" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(_xlbl),(Object)(__ref.getField(false,"_title" /*RemoteObject*/ ))); - BA.debugLineNum = 166;BA.debugLine="xlbl.TextColor = TitleBarTextColor"; -Debug.JustUpdateDeviceLine(); -_xlbl.runMethod(true,"setTextColor",__ref.getField(true,"_titlebartextcolor" /*RemoteObject*/ )); - BA.debugLineNum = 167;BA.debugLine="xlbl.Font = TitleBarFont"; -Debug.JustUpdateDeviceLine(); -_xlbl.runMethod(false,"setFont",__ref.getField(false,"_titlebarfont" /*RemoteObject*/ )); - BA.debugLineNum = 168;BA.debugLine="xlbl.SetTextAlignment(\"CENTER\", \"CENTER\")"; -Debug.JustUpdateDeviceLine(); -_xlbl.runVoidMethod ("SetTextAlignment",(Object)(BA.ObjectToString("CENTER")),(Object)(RemoteObject.createImmutable("CENTER"))); - BA.debugLineNum = 169;BA.debugLine="TitleBar.AddView(xlbl, 0, 0, TitleBar.Width, Tit"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_titlebar" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((_xlbl.getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_titlebar" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(__ref.getField(false,"_titlebar" /*RemoteObject*/ ).runMethod(true,"getHeight"))); - if (true) break; - -case 47: -//C -this.state = 48; -; - BA.debugLineNum = 171;BA.debugLine="Content.RemoveViewFromParent"; -Debug.JustUpdateDeviceLine(); -_content.runVoidMethod ("RemoveViewFromParent"); - BA.debugLineNum = 172;BA.debugLine="Base.AddView(Content, 2dip, 2dip + TempTitleBarHe"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_base" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((_content.getObject())),(Object)(parent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)))),(Object)(RemoteObject.solve(new RemoteObject[] {parent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2))),_temptitlebarheight}, "+",1, 1)),(Object)(_content.runMethod(true,"getWidth")),(Object)(_content.runMethod(true,"getHeight"))); - BA.debugLineNum = 173;BA.debugLine="Base.SetVisibleAnimated(VisibleAnimationDuration,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_base" /*RemoteObject*/ ).runVoidMethod ("SetVisibleAnimated",(Object)(__ref.getField(true,"_visibleanimationduration" /*RemoteObject*/ )),(Object)(parent.__c.getField(true,"True"))); - BA.debugLineNum = 174;BA.debugLine="For Each v As B4XView In Background.GetAllViewsRe"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 48: -//for -this.state = 51; -_v = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -group74 = __ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(false,"GetAllViewsRecursive"); -index74 = 0; -groupLen74 = group74.runMethod(true,"getSize").get(); -Debug.locals.put("v", _v); -this.state = 64; -if (true) break; - -case 64: -//C -this.state = 51; -if (index74 < groupLen74) { -this.state = 50; -_v = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), group74.runMethod(false,"Get",index74));Debug.locals.put("v", _v);} -if (true) break; - -case 65: -//C -this.state = 64; -index74++; -Debug.locals.put("v", _v); -if (true) break; - -case 50: -//C -this.state = 65; - BA.debugLineNum = 175;BA.debugLine="v.Enabled = True"; -Debug.JustUpdateDeviceLine(); -_v.runMethod(true,"setEnabled",parent.__c.getField(true,"True")); - if (true) break; -if (true) break; - -case 51: -//C -this.state = 52; -Debug.locals.put("v", _v); -; - BA.debugLineNum = 177;BA.debugLine="Wait For CloseMessage (Result As Int)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("WaitFor","closemessage", __ref.getField(false, "ba"), anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xdialog", "showcustom"), null); -this.state = 66; -return; -case 66: -//C -this.state = 52; -_result = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(1));Debug.locals.put("Result", _result); -; - BA.debugLineNum = 178;BA.debugLine="For Each v As B4XView In Background.GetAllViewsRe"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 52: -//for -this.state = 55; -_v = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -group78 = __ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(false,"GetAllViewsRecursive"); -index78 = 0; -groupLen78 = group78.runMethod(true,"getSize").get(); -Debug.locals.put("v", _v); -this.state = 67; -if (true) break; - -case 67: -//C -this.state = 55; -if (index78 < groupLen78) { -this.state = 54; -_v = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), group78.runMethod(false,"Get",index78));Debug.locals.put("v", _v);} -if (true) break; - -case 68: -//C -this.state = 67; -index78++; -Debug.locals.put("v", _v); -if (true) break; - -case 54: -//C -this.state = 68; - BA.debugLineNum = 179;BA.debugLine="v.Enabled = False"; -Debug.JustUpdateDeviceLine(); -_v.runMethod(true,"setEnabled",parent.__c.getField(true,"False")); - if (true) break; -if (true) break; - -case 55: -//C -this.state = 56; -Debug.locals.put("v", _v); -; - BA.debugLineNum = 181;BA.debugLine="Base.SetVisibleAnimated(VisibleAnimationDuration,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_base" /*RemoteObject*/ ).runVoidMethod ("SetVisibleAnimated",(Object)(__ref.getField(true,"_visibleanimationduration" /*RemoteObject*/ )),(Object)(parent.__c.getField(true,"False"))); - BA.debugLineNum = 182;BA.debugLine="If VisibleAnimationDuration > 0 Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 56: -//if -this.state = 59; -if (RemoteObject.solveBoolean(">",__ref.getField(true,"_visibleanimationduration" /*RemoteObject*/ ),BA.numberCast(double.class, 0))) { -this.state = 58; -}if (true) break; - -case 58: -//C -this.state = 59; - BA.debugLineNum = 183;BA.debugLine="Sleep(VisibleAnimationDuration)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xdialog", "showcustom"),__ref.getField(true,"_visibleanimationduration" /*RemoteObject*/ )); -this.state = 69; -return; -case 69: -//C -this.state = 59; -; - if (true) break; - -case 59: -//C -this.state = -1; -; - BA.debugLineNum = 185;BA.debugLine="Background.RemoveViewFromParent"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_background" /*RemoteObject*/ ).runVoidMethod ("RemoveViewFromParent"); - BA.debugLineNum = 186;BA.debugLine="Return Result"; -Debug.JustUpdateDeviceLine(); -if (true) { -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,(_result));return;}; - BA.debugLineNum = 187;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static void _closemessage(RemoteObject __ref,RemoteObject _result) throws Exception{ -} -public static RemoteObject _showtemplate(RemoteObject __ref,RemoteObject _dialogtemplate,RemoteObject _yes,RemoteObject _no,RemoteObject _cancel) throws Exception{ -try { - Debug.PushSubsStack("ShowTemplate (b4xdialog) ","b4xdialog",43,__ref.getField(false, "ba"),__ref,65); -if (RapidSub.canDelegate("showtemplate")) { return __ref.runUserSub(false, "b4xdialog","showtemplate", __ref, _dialogtemplate, _yes, _no, _cancel);} -ResumableSub_ShowTemplate rsub = new ResumableSub_ShowTemplate(null,__ref,_dialogtemplate,_yes,_no,_cancel); -rsub.remoteResumableSub = anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSubForFilter(); -rsub.resume(null, null); -return RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.keywords.Common.ResumableSubWrapper"), rsub.remoteResumableSub); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_ShowTemplate extends BA.ResumableSub { -public ResumableSub_ShowTemplate(keymon.lat.medicomed.b4xdialog parent,RemoteObject __ref,RemoteObject _dialogtemplate,RemoteObject _yes,RemoteObject _no,RemoteObject _cancel) { -this.parent = parent; -this.__ref = __ref; -this._dialogtemplate = _dialogtemplate; -this._yes = _yes; -this._no = _no; -this._cancel = _cancel; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.b4xdialog parent; -RemoteObject _dialogtemplate; -RemoteObject _yes; -RemoteObject _no; -RemoteObject _cancel; -RemoteObject _content = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _result = RemoteObject.createImmutable(0); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("ShowTemplate (b4xdialog) ","b4xdialog",43,__ref.getField(false, "ba"),__ref,65); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -{ -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,RemoteObject.createImmutable(null));return;} -case 0: -//C -this.state = -1; -Debug.locals.put("_ref", __ref); -Debug.locals.put("DialogTemplate", _dialogtemplate); -Debug.locals.put("Yes", _yes); -Debug.locals.put("No", _no); -Debug.locals.put("Cancel", _cancel); - BA.debugLineNum = 66;BA.debugLine="Dim content As B4XView = CallSub2(DialogTemplate,"; -Debug.JustUpdateDeviceLine(); -_content = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_content = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), parent.__c.runMethodAndSync(false,"CallSubNew2",__ref.getField(false, "ba"),(Object)(_dialogtemplate),(Object)(BA.ObjectToString("GetPanel")),(Object)(__ref)));Debug.locals.put("content", _content);Debug.locals.put("content", _content); - BA.debugLineNum = 67;BA.debugLine="CallSub2(DialogTemplate, \"Show\", Me)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runMethodAndSync(false,"CallSubNew2",__ref.getField(false, "ba"),(Object)(_dialogtemplate),(Object)(BA.ObjectToString("Show")),(Object)(__ref)); - BA.debugLineNum = 68;BA.debugLine="Wait For (ShowCustom(content , Yes, No, Cancel))"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("WaitFor","complete", __ref.getField(false, "ba"), anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xdialog", "showtemplate"), __ref.runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_showcustom" /*RemoteObject*/ ,(Object)(_content),(Object)(_yes),(Object)(_no),(Object)(_cancel))); -this.state = 1; -return; -case 1: -//C -this.state = -1; -_result = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(1));Debug.locals.put("Result", _result); -; - BA.debugLineNum = 69;BA.debugLine="CallSub2(DialogTemplate, \"DialogClosed\", Result)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runMethodAndSync(false,"CallSubNew2",__ref.getField(false, "ba"),(Object)(_dialogtemplate),(Object)(BA.ObjectToString("DialogClosed")),(Object)((_result))); - BA.debugLineNum = 70;BA.debugLine="PutAtTop = False"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_putattop" /*RemoteObject*/ ,parent.__c.getField(true,"False")); - BA.debugLineNum = 71;BA.debugLine="Return Result"; -Debug.JustUpdateDeviceLine(); -if (true) { -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,(_result));return;}; - BA.debugLineNum = 72;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _stub_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Stub_Click (b4xdialog) ","b4xdialog",43,__ref.getField(false, "ba"),__ref,349); -if (RapidSub.canDelegate("stub_click")) { return __ref.runUserSub(false, "b4xdialog","stub_click", __ref);} - BA.debugLineNum = 349;BA.debugLine="Private Sub Stub_Click"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 351;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _updateblur(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("UpdateBlur (b4xdialog) ","b4xdialog",43,__ref.getField(false, "ba"),__ref,274); -if (RapidSub.canDelegate("updateblur")) { return __ref.runUserSub(false, "b4xdialog","updateblur", __ref);} -RemoteObject _source = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper"); -RemoteObject _blurred = RemoteObject.declareNull("b4a.example.bitmapcreator"); - BA.debugLineNum = 274;BA.debugLine="Private Sub UpdateBlur"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 275;BA.debugLine="If BlurBackground = False Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_blurbackground" /*RemoteObject*/ ),b4xdialog.__c.getField(true,"False"))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 276;BA.debugLine="Background.Visible = False"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(true,"setVisible",b4xdialog.__c.getField(true,"False")); - BA.debugLineNum = 277;BA.debugLine="Dim source As B4XBitmap = Background.Parent.Snaps"; -Debug.JustUpdateDeviceLine(); -_source = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper"); -_source = __ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(false,"getParent").runMethod(false,"Snapshot");Debug.locals.put("source", _source);Debug.locals.put("source", _source); - BA.debugLineNum = 278;BA.debugLine="If source.Width > Background.Width Or source.Heig"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",_source.runMethod(true,"getWidth"),BA.numberCast(double.class, __ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(true,"getWidth"))) || RemoteObject.solveBoolean(">",_source.runMethod(true,"getHeight"),BA.numberCast(double.class, __ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(true,"getHeight")))) { - BA.debugLineNum = 279;BA.debugLine="source = source.Crop(0, 0, Background.Width, Bac"; -Debug.JustUpdateDeviceLine(); -_source = _source.runMethod(false,"Crop",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(__ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(true,"getHeight")));Debug.locals.put("source", _source); - }; - BA.debugLineNum = 281;BA.debugLine="Background.Visible = True"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(true,"setVisible",b4xdialog.__c.getField(true,"True")); - BA.debugLineNum = 282;BA.debugLine="BlurImageView.SetLayoutAnimated(0, 0, 0, Backgrou"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_blurimageview" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(__ref.getField(false,"_background" /*RemoteObject*/ ).runMethod(true,"getHeight"))); - BA.debugLineNum = 283;BA.debugLine="Dim blurred As BitmapCreator = Blur(source)"; -Debug.JustUpdateDeviceLine(); -_blurred = __ref.runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_blur" /*RemoteObject*/ ,(Object)(_source));Debug.locals.put("blurred", _blurred);Debug.locals.put("blurred", _blurred); - BA.debugLineNum = 284;BA.debugLine="blurred.SetBitmapToImageView(blurred.Bitmap, Blur"; -Debug.JustUpdateDeviceLine(); -_blurred.runVoidMethod ("_setbitmaptoimageview",(Object)(_blurred.runMethod(false,"_getbitmap")),(Object)(__ref.getField(false,"_blurimageview" /*RemoteObject*/ ))); - BA.debugLineNum = 285;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xfloattextfield.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xfloattextfield.java deleted file mode 100644 index a3f444b..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xfloattextfield.java +++ /dev/null @@ -1,61 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xfloattextfield { - public static RemoteObject myClass; - public b4xfloattextfield() { - } - public static PCBA staticBA = new PCBA(null, b4xfloattextfield.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _meventname = RemoteObject.createImmutable(""); -public static RemoteObject _mcallback = RemoteObject.declareNull("Object"); -public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _mtextfield = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _animationduration = RemoteObject.createImmutable(0); -public static RemoteObject _largelabeltextsize = RemoteObject.createImmutable(0f); -public static RemoteObject _smalllabeltextsize = RemoteObject.createImmutable(0f); -public static RemoteObject _largelabel = RemoteObject.createImmutable(false); -public static RemoteObject _measuringcanvas = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas"); -public static RemoteObject _hintcolor = RemoteObject.createImmutable(0); -public static RemoteObject _nonfocusedhintcolor = RemoteObject.createImmutable(0); -public static RemoteObject _hintimageview = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _hinttext = RemoteObject.createImmutable(""); -public static RemoteObject _hintfont = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont"); -public static RemoteObject _largefocused = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper"); -public static RemoteObject _largenotfocused = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper"); -public static RemoteObject _smallfocused = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper"); -public static RemoteObject _smallnotfocused = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper"); -public static RemoteObject _focused = RemoteObject.createImmutable(false); -public static RemoteObject _lblclear = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _lblv = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _mprops = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -public static RemoteObject _tag = RemoteObject.declareNull("Object"); -public static RemoteObject _keyboardtype = RemoteObject.createImmutable(""); -public static RemoteObject _multiline = RemoteObject.createImmutable(false); -public static RemoteObject _mnexttextfield = RemoteObject.declareNull("keymon.lat.medicomed.b4xfloattextfield"); -public static RemoteObject _ime = RemoteObject.declareNull("anywheresoftware.b4a.objects.IME"); -public static RemoteObject _hintlabellargeoffsetx = RemoteObject.createImmutable(0); -public static RemoteObject _hintlabelsmalloffsety = RemoteObject.createImmutable(0); -public static RemoteObject _hintlabelsmalloffsetx = RemoteObject.createImmutable(0); -public static RemoteObject _lastswitchtextfieldtime = RemoteObject.createImmutable(0L); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"AnimationDuration",_ref.getField(false, "_animationduration"),"DateUtils",_ref.getField(false, "_dateutils"),"Focused",_ref.getField(false, "_focused"),"HintColor",_ref.getField(false, "_hintcolor"),"HintFont",_ref.getField(false, "_hintfont"),"HintImageView",_ref.getField(false, "_hintimageview"),"HintLabelLargeOffsetX",_ref.getField(false, "_hintlabellargeoffsetx"),"HintLabelSmallOffsetX",_ref.getField(false, "_hintlabelsmalloffsetx"),"HintLabelSmallOffsetY",_ref.getField(false, "_hintlabelsmalloffsety"),"HintText",_ref.getField(false, "_hinttext"),"IME",_ref.getField(false, "_ime"),"KeyboardType",_ref.getField(false, "_keyboardtype"),"LargeFocused",_ref.getField(false, "_largefocused"),"LargeLabel",_ref.getField(false, "_largelabel"),"LargeLabelTextSize",_ref.getField(false, "_largelabeltextsize"),"LargeNotFocused",_ref.getField(false, "_largenotfocused"),"LastSwitchTextFieldTime",_ref.getField(false, "_lastswitchtextfieldtime"),"lblClear",_ref.getField(false, "_lblclear"),"lblV",_ref.getField(false, "_lblv"),"mBase",_ref.getField(false, "_mbase"),"mCallBack",_ref.getField(false, "_mcallback"),"MeasuringCanvas",_ref.getField(false, "_measuringcanvas"),"mEventName",_ref.getField(false, "_meventname"),"mNextTextField",_ref.getField(false, "_mnexttextfield"),"mProps",_ref.getField(false, "_mprops"),"mTextField",_ref.getField(false, "_mtextfield"),"Multiline",_ref.getField(false, "_multiline"),"NonFocusedHintColor",_ref.getField(false, "_nonfocusedhintcolor"),"SmallFocused",_ref.getField(false, "_smallfocused"),"SmallLabelTextSize",_ref.getField(false, "_smalllabeltextsize"),"SmallNotFocused",_ref.getField(false, "_smallnotfocused"),"Tag",_ref.getField(false, "_tag"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xfloattextfield_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xfloattextfield_subs_0.java deleted file mode 100644 index 330a553..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xfloattextfield_subs_0.java +++ /dev/null @@ -1,1310 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xfloattextfield_subs_0 { - - -public static RemoteObject _base_resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("Base_Resize (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,196); -if (RapidSub.canDelegate("base_resize")) { return __ref.runUserSub(false, "b4xfloattextfield","base_resize", __ref, _width, _height);} -RemoteObject _firstdistance = RemoteObject.createImmutable(0); -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 196;BA.debugLine="Public Sub Base_Resize (Width As Double, Height As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 197;BA.debugLine="mTextField.SetLayoutAnimated(0, 0, 0, Width, Heig"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mtextfield" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, _width)),(Object)(BA.numberCast(int.class, _height))); - BA.debugLineNum = 198;BA.debugLine="Dim FirstDistance As Int = 2dip"; -Debug.JustUpdateDeviceLine(); -_firstdistance = b4xfloattextfield.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)));Debug.locals.put("FirstDistance", _firstdistance);Debug.locals.put("FirstDistance", _firstdistance); - BA.debugLineNum = 199;BA.debugLine="If Multiline And xui.IsB4J Then FirstDistance = 2"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(".",__ref.getField(true,"_multiline" /*RemoteObject*/ )) && RemoteObject.solveBoolean(".",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4J"))) { -_firstdistance = b4xfloattextfield.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 22)));Debug.locals.put("FirstDistance", _firstdistance);}; - BA.debugLineNum = 200;BA.debugLine="If lblV.IsInitialized Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_lblv" /*RemoteObject*/ ).runMethod(true,"IsInitialized").get().booleanValue()) { - BA.debugLineNum = 201;BA.debugLine="lblV.SetLayoutAnimated(0, Width - lblV.Width - F"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_lblv" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_width,__ref.getField(false,"_lblv" /*RemoteObject*/ ).runMethod(true,"getWidth"),_firstdistance}, "--",2, 0))),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_lblv" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(BA.numberCast(int.class, _height))); - BA.debugLineNum = 202;BA.debugLine="FirstDistance = FirstDistance + lblV.Width + 2di"; -Debug.JustUpdateDeviceLine(); -_firstdistance = RemoteObject.solve(new RemoteObject[] {_firstdistance,__ref.getField(false,"_lblv" /*RemoteObject*/ ).runMethod(true,"getWidth"),b4xfloattextfield.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)))}, "++",2, 1);Debug.locals.put("FirstDistance", _firstdistance); - }; - BA.debugLineNum = 204;BA.debugLine="If lblClear.IsInitialized Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_lblclear" /*RemoteObject*/ ).runMethod(true,"IsInitialized").get().booleanValue()) { - BA.debugLineNum = 205;BA.debugLine="lblClear.SetLayoutAnimated(0, Width - lblClear.W"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_lblclear" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_width,__ref.getField(false,"_lblclear" /*RemoteObject*/ ).runMethod(true,"getWidth"),_firstdistance}, "--",2, 0))),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_lblclear" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(BA.numberCast(int.class, _height))); - }; - BA.debugLineNum = 207;BA.debugLine="UpdateLabel(mTextField.Text, True)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_updatelabel" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_mtextfield" /*RemoteObject*/ ).runMethod(true,"getText")),(Object)(b4xfloattextfield.__c.getField(true,"True"))); - BA.debugLineNum = 208;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 16;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 17;BA.debugLine="Private mEventName As String 'ignore"; -b4xfloattextfield._meventname = RemoteObject.createImmutable("");__ref.setField("_meventname",b4xfloattextfield._meventname); - //BA.debugLineNum = 18;BA.debugLine="Private mCallBack As Object 'ignore"; -b4xfloattextfield._mcallback = RemoteObject.createNew ("Object");__ref.setField("_mcallback",b4xfloattextfield._mcallback); - //BA.debugLineNum = 19;BA.debugLine="Public mBase As B4XView 'ignore"; -b4xfloattextfield._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",b4xfloattextfield._mbase); - //BA.debugLineNum = 20;BA.debugLine="Private xui As XUI 'ignore"; -b4xfloattextfield._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",b4xfloattextfield._xui); - //BA.debugLineNum = 21;BA.debugLine="Private mTextField As B4XView"; -b4xfloattextfield._mtextfield = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mtextfield",b4xfloattextfield._mtextfield); - //BA.debugLineNum = 22;BA.debugLine="Public AnimationDuration As Int = 200"; -b4xfloattextfield._animationduration = BA.numberCast(int.class, 200);__ref.setField("_animationduration",b4xfloattextfield._animationduration); - //BA.debugLineNum = 23;BA.debugLine="Public LargeLabelTextSize = 18, SmallLabelTextSiz"; -b4xfloattextfield._largelabeltextsize = BA.numberCast(float.class, 18);__ref.setField("_largelabeltextsize",b4xfloattextfield._largelabeltextsize); -b4xfloattextfield._smalllabeltextsize = BA.numberCast(float.class, 14);__ref.setField("_smalllabeltextsize",b4xfloattextfield._smalllabeltextsize); - //BA.debugLineNum = 24;BA.debugLine="Private LargeLabel As Boolean"; -b4xfloattextfield._largelabel = RemoteObject.createImmutable(false);__ref.setField("_largelabel",b4xfloattextfield._largelabel); - //BA.debugLineNum = 25;BA.debugLine="Private MeasuringCanvas As B4XCanvas"; -b4xfloattextfield._measuringcanvas = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas");__ref.setField("_measuringcanvas",b4xfloattextfield._measuringcanvas); - //BA.debugLineNum = 26;BA.debugLine="Public HintColor As Int"; -b4xfloattextfield._hintcolor = RemoteObject.createImmutable(0);__ref.setField("_hintcolor",b4xfloattextfield._hintcolor); - //BA.debugLineNum = 27;BA.debugLine="Public NonFocusedHintColor As Int"; -b4xfloattextfield._nonfocusedhintcolor = RemoteObject.createImmutable(0);__ref.setField("_nonfocusedhintcolor",b4xfloattextfield._nonfocusedhintcolor); - //BA.debugLineNum = 28;BA.debugLine="Private HintImageView As B4XView"; -b4xfloattextfield._hintimageview = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_hintimageview",b4xfloattextfield._hintimageview); - //BA.debugLineNum = 29;BA.debugLine="Public HintText As String"; -b4xfloattextfield._hinttext = RemoteObject.createImmutable("");__ref.setField("_hinttext",b4xfloattextfield._hinttext); - //BA.debugLineNum = 30;BA.debugLine="Public HintFont As B4XFont"; -b4xfloattextfield._hintfont = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont");__ref.setField("_hintfont",b4xfloattextfield._hintfont); - //BA.debugLineNum = 31;BA.debugLine="Private LargeFocused, LargeNotFocused, SmallFocus"; -b4xfloattextfield._largefocused = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper");__ref.setField("_largefocused",b4xfloattextfield._largefocused); -b4xfloattextfield._largenotfocused = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper");__ref.setField("_largenotfocused",b4xfloattextfield._largenotfocused); -b4xfloattextfield._smallfocused = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper");__ref.setField("_smallfocused",b4xfloattextfield._smallfocused); -b4xfloattextfield._smallnotfocused = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper");__ref.setField("_smallnotfocused",b4xfloattextfield._smallnotfocused); - //BA.debugLineNum = 32;BA.debugLine="Public Focused As Boolean"; -b4xfloattextfield._focused = RemoteObject.createImmutable(false);__ref.setField("_focused",b4xfloattextfield._focused); - //BA.debugLineNum = 33;BA.debugLine="Public lblClear As B4XView"; -b4xfloattextfield._lblclear = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_lblclear",b4xfloattextfield._lblclear); - //BA.debugLineNum = 34;BA.debugLine="Public lblV As B4XView"; -b4xfloattextfield._lblv = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_lblv",b4xfloattextfield._lblv); - //BA.debugLineNum = 35;BA.debugLine="Private mProps As Map"; -b4xfloattextfield._mprops = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");__ref.setField("_mprops",b4xfloattextfield._mprops); - //BA.debugLineNum = 36;BA.debugLine="Public Tag As Object"; -b4xfloattextfield._tag = RemoteObject.createNew ("Object");__ref.setField("_tag",b4xfloattextfield._tag); - //BA.debugLineNum = 37;BA.debugLine="Private KeyboardType As String 'ignore"; -b4xfloattextfield._keyboardtype = RemoteObject.createImmutable("");__ref.setField("_keyboardtype",b4xfloattextfield._keyboardtype); - //BA.debugLineNum = 38;BA.debugLine="Private Multiline As Boolean"; -b4xfloattextfield._multiline = RemoteObject.createImmutable(false);__ref.setField("_multiline",b4xfloattextfield._multiline); - //BA.debugLineNum = 39;BA.debugLine="Private mNextTextField As B4XFloatTextField"; -b4xfloattextfield._mnexttextfield = RemoteObject.createNew ("keymon.lat.medicomed.b4xfloattextfield");__ref.setField("_mnexttextfield",b4xfloattextfield._mnexttextfield); - //BA.debugLineNum = 41;BA.debugLine="Private IME As IME"; -b4xfloattextfield._ime = RemoteObject.createNew ("anywheresoftware.b4a.objects.IME");__ref.setField("_ime",b4xfloattextfield._ime); - //BA.debugLineNum = 46;BA.debugLine="Public HintLabelLargeOffsetX, HintLabelSmallOffse"; -b4xfloattextfield._hintlabellargeoffsetx = RemoteObject.createImmutable(0);__ref.setField("_hintlabellargeoffsetx",b4xfloattextfield._hintlabellargeoffsetx); -b4xfloattextfield._hintlabelsmalloffsety = b4xfloattextfield.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)));__ref.setField("_hintlabelsmalloffsety",b4xfloattextfield._hintlabelsmalloffsety); -b4xfloattextfield._hintlabelsmalloffsetx = b4xfloattextfield.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)));__ref.setField("_hintlabelsmalloffsetx",b4xfloattextfield._hintlabelsmalloffsetx); - //BA.debugLineNum = 47;BA.debugLine="Private LastSwitchTextFieldTime As Long"; -b4xfloattextfield._lastswitchtextfieldtime = RemoteObject.createImmutable(0L);__ref.setField("_lastswitchtextfieldtime",b4xfloattextfield._lastswitchtextfieldtime); - //BA.debugLineNum = 48;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _createacceptbutton(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("CreateAcceptButton (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,125); -if (RapidSub.canDelegate("createacceptbutton")) { return __ref.runUserSub(false, "b4xfloattextfield","createacceptbutton", __ref);} - BA.debugLineNum = 125;BA.debugLine="Private Sub CreateAcceptButton"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 126;BA.debugLine="If mProps.GetDefault(\"ShowAccept\", True) = False"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_mprops" /*RemoteObject*/ ).runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("ShowAccept"))),(Object)((b4xfloattextfield.__c.getField(true,"True")))),(b4xfloattextfield.__c.getField(true,"False")))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 127;BA.debugLine="lblV = CreateButton(Chr(0xE5CA))"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_lblv" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_createbutton" /*RemoteObject*/ ,(Object)(BA.ObjectToString(b4xfloattextfield.__c.runMethod(true,"Chr",(Object)(BA.numberCast(int.class, ((int)0xe5ca)))))))); - BA.debugLineNum = 128;BA.debugLine="lblV.Tag = \"v\""; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_lblv" /*RemoteObject*/ ).runMethod(false,"setTag",RemoteObject.createImmutable(("v"))); - BA.debugLineNum = 129;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createbitmap(RemoteObject __ref,RemoteObject _r,RemoteObject _color,RemoteObject _fnt) throws Exception{ -try { - Debug.PushSubsStack("CreateBitmap (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,257); -if (RapidSub.canDelegate("createbitmap")) { return __ref.runUserSub(false, "b4xfloattextfield","createbitmap", __ref, _r, _color, _fnt);} -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas"); -RemoteObject _baseline = RemoteObject.createImmutable(0); -RemoteObject _bmp = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper"); -Debug.locals.put("r", _r); -Debug.locals.put("Color", _color); -Debug.locals.put("Fnt", _fnt); - BA.debugLineNum = 257;BA.debugLine="Private Sub CreateBitmap(r As B4XRect, Color As In"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 258;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"\")"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_p = __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("")));Debug.locals.put("p", _p);Debug.locals.put("p", _p); - BA.debugLineNum = 259;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, Max(1, r.Width + 2di"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, b4xfloattextfield.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, 1)),(Object)(RemoteObject.solve(new RemoteObject[] {_r.runMethod(true,"getWidth"),b4xfloattextfield.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)))}, "+",1, 0))))),(Object)(BA.numberCast(int.class, b4xfloattextfield.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, 1)),(Object)(RemoteObject.solve(new RemoteObject[] {_r.runMethod(true,"getHeight"),b4xfloattextfield.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)))}, "+",1, 0)))))); - BA.debugLineNum = 260;BA.debugLine="Dim c As B4XCanvas"; -Debug.JustUpdateDeviceLine(); -_c = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas");Debug.locals.put("c", _c); - BA.debugLineNum = 261;BA.debugLine="c.Initialize(p)"; -Debug.JustUpdateDeviceLine(); -_c.runVoidMethod ("Initialize",(Object)(_p)); - BA.debugLineNum = 262;BA.debugLine="Dim BaseLine As Int = p.Height / 2 - r.Height / 2"; -Debug.JustUpdateDeviceLine(); -_baseline = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_p.runMethod(true,"getHeight"),RemoteObject.createImmutable(2),_r.runMethod(true,"getHeight"),RemoteObject.createImmutable(2),_r.runMethod(true,"getTop")}, "/-/-",2, 0));Debug.locals.put("BaseLine", _baseline);Debug.locals.put("BaseLine", _baseline); - BA.debugLineNum = 263;BA.debugLine="c.DrawText(HintText, p.Width / 2, BaseLine, Fnt,"; -Debug.JustUpdateDeviceLine(); -_c.runVoidMethod ("DrawText",__ref.getField(false, "ba"),(Object)(__ref.getField(true,"_hinttext" /*RemoteObject*/ )),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_p.runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0))),(Object)(BA.numberCast(float.class, _baseline)),(Object)(_fnt),(Object)(_color),(Object)(BA.getEnumFromString(BA.getDeviceClass("android.graphics.Paint.Align"),RemoteObject.createImmutable("CENTER")))); - BA.debugLineNum = 264;BA.debugLine="Dim bmp As B4XBitmap = c.CreateBitmap"; -Debug.JustUpdateDeviceLine(); -_bmp = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper"); -_bmp = _c.runMethod(false,"CreateBitmap");Debug.locals.put("bmp", _bmp);Debug.locals.put("bmp", _bmp); - BA.debugLineNum = 265;BA.debugLine="c.Release"; -Debug.JustUpdateDeviceLine(); -_c.runVoidMethod ("Release"); - BA.debugLineNum = 266;BA.debugLine="Return bmp"; -Debug.JustUpdateDeviceLine(); -if (true) return _bmp; - BA.debugLineNum = 267;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createbutton(RemoteObject __ref,RemoteObject _text) throws Exception{ -try { - Debug.PushSubsStack("CreateButton (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,182); -if (RapidSub.canDelegate("createbutton")) { return __ref.runUserSub(false, "b4xfloattextfield","createbutton", __ref, _text);} -RemoteObject _lc = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _x = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -Debug.locals.put("Text", _text); - BA.debugLineNum = 182;BA.debugLine="Private Sub CreateButton (Text As String) As B4XVi"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 183;BA.debugLine="Dim lc As Label"; -Debug.JustUpdateDeviceLine(); -_lc = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("lc", _lc); - BA.debugLineNum = 184;BA.debugLine="lc.Initialize(\"lc\")"; -Debug.JustUpdateDeviceLine(); -_lc.runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("lc"))); - BA.debugLineNum = 185;BA.debugLine="Dim x As B4XView = lc"; -Debug.JustUpdateDeviceLine(); -_x = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_x = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), _lc.getObject());Debug.locals.put("x", _x);Debug.locals.put("x", _x); - BA.debugLineNum = 186;BA.debugLine="x = lc"; -Debug.JustUpdateDeviceLine(); -_x = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), _lc.getObject());Debug.locals.put("x", _x); - BA.debugLineNum = 187;BA.debugLine="x.Font = xui.CreateMaterialIcons(20)"; -Debug.JustUpdateDeviceLine(); -_x.runMethod(false,"setFont",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreateMaterialIcons",(Object)(BA.numberCast(float.class, 20)))); - BA.debugLineNum = 188;BA.debugLine="x.Text = Text"; -Debug.JustUpdateDeviceLine(); -_x.runMethod(true,"setText",BA.ObjectToCharSequence(_text)); - BA.debugLineNum = 189;BA.debugLine="x.TextColor = mTextField.TextColor"; -Debug.JustUpdateDeviceLine(); -_x.runMethod(true,"setTextColor",__ref.getField(false,"_mtextfield" /*RemoteObject*/ ).runMethod(true,"getTextColor")); - BA.debugLineNum = 190;BA.debugLine="x.Visible = False"; -Debug.JustUpdateDeviceLine(); -_x.runMethod(true,"setVisible",b4xfloattextfield.__c.getField(true,"False")); - BA.debugLineNum = 191;BA.debugLine="x.SetTextAlignment(\"CENTER\", \"CENTER\")"; -Debug.JustUpdateDeviceLine(); -_x.runVoidMethod ("SetTextAlignment",(Object)(BA.ObjectToString("CENTER")),(Object)(RemoteObject.createImmutable("CENTER"))); - BA.debugLineNum = 192;BA.debugLine="mBase.AddView(x, 0, 0, 30dip, 30dip)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((_x.getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(b4xfloattextfield.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 30)))),(Object)(b4xfloattextfield.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 30))))); - BA.debugLineNum = 193;BA.debugLine="Return x"; -Debug.JustUpdateDeviceLine(); -if (true) return _x; - BA.debugLineNum = 194;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createclearbutton(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("CreateClearButton (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,117); -if (RapidSub.canDelegate("createclearbutton")) { return __ref.runUserSub(false, "b4xfloattextfield","createclearbutton", __ref);} - BA.debugLineNum = 117;BA.debugLine="Private Sub CreateClearButton"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 118;BA.debugLine="If mProps.GetDefault(\"ShowClear\", True) = False T"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_mprops" /*RemoteObject*/ ).runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("ShowClear"))),(Object)((b4xfloattextfield.__c.getField(true,"True")))),(b4xfloattextfield.__c.getField(true,"False")))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 119;BA.debugLine="If lblClear.IsInitialized And lblClear.Parent.IsI"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(".",__ref.getField(false,"_lblclear" /*RemoteObject*/ ).runMethod(true,"IsInitialized")) && RemoteObject.solveBoolean(".",__ref.getField(false,"_lblclear" /*RemoteObject*/ ).runMethod(false,"getParent").runMethod(true,"IsInitialized"))) { -__ref.getField(false,"_lblclear" /*RemoteObject*/ ).runVoidMethod ("RemoveViewFromParent");}; - BA.debugLineNum = 120;BA.debugLine="lblClear = CreateButton(Chr(0xE14C))"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_lblclear" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_createbutton" /*RemoteObject*/ ,(Object)(BA.ObjectToString(b4xfloattextfield.__c.runMethod(true,"Chr",(Object)(BA.numberCast(int.class, ((int)0xe14c)))))))); - BA.debugLineNum = 121;BA.debugLine="lblClear.Tag = \"clear\""; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_lblclear" /*RemoteObject*/ ).runMethod(false,"setTag",RemoteObject.createImmutable(("clear"))); - BA.debugLineNum = 123;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createrevealbutton(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("CreateRevealButton (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,132); -if (RapidSub.canDelegate("createrevealbutton")) { return __ref.runUserSub(false, "b4xfloattextfield","createrevealbutton", __ref);} - BA.debugLineNum = 132;BA.debugLine="Private Sub CreateRevealButton"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 133;BA.debugLine="lblClear = CreateButton(Chr(0xE8F4))"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_lblclear" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_createbutton" /*RemoteObject*/ ,(Object)(BA.ObjectToString(b4xfloattextfield.__c.runMethod(true,"Chr",(Object)(BA.numberCast(int.class, ((int)0xe8f4)))))))); - BA.debugLineNum = 134;BA.debugLine="lblClear.Tag = \"reveal\""; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_lblclear" /*RemoteObject*/ ).runMethod(false,"setTag",RemoteObject.createImmutable(("reveal"))); - BA.debugLineNum = 135;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createtextfield(RemoteObject __ref,RemoteObject _password) throws Exception{ -try { - Debug.PushSubsStack("CreateTextField (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,328); -if (RapidSub.canDelegate("createtextfield")) { return __ref.runUserSub(false, "b4xfloattextfield","createtextfield", __ref, _password);} -RemoteObject _tf = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -Debug.locals.put("Password", _password); - BA.debugLineNum = 328;BA.debugLine="Private Sub CreateTextField (Password As Boolean)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 344;BA.debugLine="Dim tf As EditText"; -Debug.JustUpdateDeviceLine(); -_tf = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");Debug.locals.put("tf", _tf); - BA.debugLineNum = 345;BA.debugLine="tf.Initialize(\"tf\")"; -Debug.JustUpdateDeviceLine(); -_tf.runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("tf"))); - BA.debugLineNum = 346;BA.debugLine="tf.SingleLine = Not(Multiline)"; -Debug.JustUpdateDeviceLine(); -_tf.runVoidMethod ("setSingleLine",b4xfloattextfield.__c.runMethod(true,"Not",(Object)(__ref.getField(true,"_multiline" /*RemoteObject*/ )))); - BA.debugLineNum = 347;BA.debugLine="tf.PasswordMode = Password"; -Debug.JustUpdateDeviceLine(); -_tf.runVoidMethod ("setPasswordMode",_password); - BA.debugLineNum = 348;BA.debugLine="If Password Then"; -Debug.JustUpdateDeviceLine(); -if (_password.get().booleanValue()) { - BA.debugLineNum = 349;BA.debugLine="If KeyboardType <> \"Text\" Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("!",__ref.getField(true,"_keyboardtype" /*RemoteObject*/ ),BA.ObjectToString("Text"))) { - BA.debugLineNum = 350;BA.debugLine="tf.InputType = Bit.Or(tf.INPUT_TYPE_NUMBERS, 16"; -Debug.JustUpdateDeviceLine(); -_tf.runMethod(true,"setInputType",b4xfloattextfield.__c.getField(false,"Bit").runMethod(true,"Or",(Object)(_tf.getField(true,"INPUT_TYPE_NUMBERS")),(Object)(BA.numberCast(int.class, 16)))); - }else { - BA.debugLineNum = 352;BA.debugLine="tf.InputType = Bit.Or(0x00000080, 0x00080000) '"; -Debug.JustUpdateDeviceLine(); -_tf.runMethod(true,"setInputType",b4xfloattextfield.__c.getField(false,"Bit").runMethod(true,"Or",(Object)(BA.numberCast(int.class, ((int)0x00000080))),(Object)(BA.numberCast(int.class, ((int)0x00080000))))); - }; - }else { - BA.debugLineNum = 355;BA.debugLine="Select KeyboardType"; -Debug.JustUpdateDeviceLine(); -switch (BA.switchObjectToInt(__ref.getField(true,"_keyboardtype" /*RemoteObject*/ ),BA.ObjectToString("Numbers"),BA.ObjectToString("Decimal"))) { -case 0: { - BA.debugLineNum = 357;BA.debugLine="tf.InputType = tf.INPUT_TYPE_NUMBERS"; -Debug.JustUpdateDeviceLine(); -_tf.runMethod(true,"setInputType",_tf.getField(true,"INPUT_TYPE_NUMBERS")); - break; } -case 1: { - BA.debugLineNum = 359;BA.debugLine="tf.InputType = tf.INPUT_TYPE_DECIMAL_NUMBERS"; -Debug.JustUpdateDeviceLine(); -_tf.runMethod(true,"setInputType",_tf.getField(true,"INPUT_TYPE_DECIMAL_NUMBERS")); - break; } -} -; - }; - BA.debugLineNum = 362;BA.debugLine="Return tf"; -Debug.JustUpdateDeviceLine(); -if (true) return RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), _tf.getObject()); - BA.debugLineNum = 386;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createtextfieldall(RemoteObject __ref,RemoteObject _passwordmode,RemoteObject _font1,RemoteObject _textcolor) throws Exception{ -try { - Debug.PushSubsStack("CreateTextFieldAll (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,109); -if (RapidSub.canDelegate("createtextfieldall")) { return __ref.runUserSub(false, "b4xfloattextfield","createtextfieldall", __ref, _passwordmode, _font1, _textcolor);} -Debug.locals.put("PasswordMode", _passwordmode); -Debug.locals.put("Font1", _font1); -Debug.locals.put("TextColor", _textcolor); - BA.debugLineNum = 109;BA.debugLine="Private Sub CreateTextFieldAll (PasswordMode As Bo"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 110;BA.debugLine="mTextField = CreateTextField (PasswordMode)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mtextfield" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_createtextfield" /*RemoteObject*/ ,(Object)(_passwordmode))); - BA.debugLineNum = 111;BA.debugLine="mTextField.Font = Font1"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mtextfield" /*RemoteObject*/ ).runMethod(false,"setFont",_font1); - BA.debugLineNum = 112;BA.debugLine="mTextField.TextColor = TextColor"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mtextfield" /*RemoteObject*/ ).runMethod(true,"setTextColor",_textcolor); - BA.debugLineNum = 113;BA.debugLine="setNextField(mNextTextField)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_setnextfield" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_mnexttextfield" /*RemoteObject*/ ))); - BA.debugLineNum = 114;BA.debugLine="mBase.AddView(mTextField, 0, 0, 0, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_mtextfield" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 115;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _designercreateview(RemoteObject __ref,RemoteObject _base,RemoteObject _lbl,RemoteObject _props) throws Exception{ -try { - Debug.PushSubsStack("DesignerCreateView (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,67); -if (RapidSub.canDelegate("designercreateview")) { return __ref.runUserSub(false, "b4xfloattextfield","designercreateview", __ref, _base, _lbl, _props);} -RemoteObject _passedlabel = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _iv = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -RemoteObject _passwordmode = RemoteObject.createImmutable(false); -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -Debug.locals.put("Base", _base); -Debug.locals.put("lbl", _lbl); -Debug.locals.put("Props", _props); - BA.debugLineNum = 67;BA.debugLine="Public Sub DesignerCreateView (Base As Object, lbl"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 68;BA.debugLine="mBase = Base"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).setObject (_base); - BA.debugLineNum = 69;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_tag" /*RemoteObject*/ ,__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"getTag")); - BA.debugLineNum = 69;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"setTag",__ref); - BA.debugLineNum = 70;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetColorAndBorder",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 71;BA.debugLine="mProps = Props"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mprops" /*RemoteObject*/ ,_props); - BA.debugLineNum = 72;BA.debugLine="Dim PassedLabel As B4XView = lbl"; -Debug.JustUpdateDeviceLine(); -_passedlabel = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_passedlabel = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), _lbl.getObject());Debug.locals.put("PassedLabel", _passedlabel);Debug.locals.put("PassedLabel", _passedlabel); - BA.debugLineNum = 73;BA.debugLine="Dim iv As ImageView"; -Debug.JustUpdateDeviceLine(); -_iv = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");Debug.locals.put("iv", _iv); - BA.debugLineNum = 74;BA.debugLine="iv.Initialize(\"HintImageView\")"; -Debug.JustUpdateDeviceLine(); -_iv.runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("HintImageView"))); - BA.debugLineNum = 75;BA.debugLine="HintImageView = iv"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_hintimageview" /*RemoteObject*/ ).setObject (_iv.getObject()); - BA.debugLineNum = 76;BA.debugLine="KeyboardType = Props.GetDefault(\"KeyboardType\", \""; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_keyboardtype" /*RemoteObject*/ ,BA.ObjectToString(_props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("KeyboardType"))),(Object)((RemoteObject.createImmutable("Text")))))); - BA.debugLineNum = 82;BA.debugLine="HintColor = xui.PaintOrColorToColor(Props.Get(\"Hi"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_hintcolor" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HintColor"))))))); - BA.debugLineNum = 83;BA.debugLine="NonFocusedHintColor = xui.PaintOrColorToColor(Pro"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_nonfocusedhintcolor" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("NonFocusedHintColor"))))))); - BA.debugLineNum = 85;BA.debugLine="HintText = Props.Get(\"Hint\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_hinttext" /*RemoteObject*/ ,BA.ObjectToString(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("Hint")))))); - BA.debugLineNum = 86;BA.debugLine="HintFont = PassedLabel.Font"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_hintfont" /*RemoteObject*/ ,_passedlabel.runMethod(false,"getFont")); - BA.debugLineNum = 87;BA.debugLine="Dim PasswordMode As Boolean = Props.GetDefault(\"P"; -Debug.JustUpdateDeviceLine(); -_passwordmode = BA.ObjectToBoolean(_props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("PasswordField"))),(Object)((b4xfloattextfield.__c.getField(true,"False")))));Debug.locals.put("PasswordMode", _passwordmode);Debug.locals.put("PasswordMode", _passwordmode); - BA.debugLineNum = 88;BA.debugLine="Multiline = Props.GetDefault(\"Multiline\", False)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_multiline" /*RemoteObject*/ ,BA.ObjectToBoolean(_props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("Multiline"))),(Object)((b4xfloattextfield.__c.getField(true,"False")))))); - BA.debugLineNum = 89;BA.debugLine="If PasswordMode And Multiline Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(".",_passwordmode) && RemoteObject.solveBoolean(".",__ref.getField(true,"_multiline" /*RemoteObject*/ ))) { - BA.debugLineNum = 90;BA.debugLine="Multiline = False"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_multiline" /*RemoteObject*/ ,b4xfloattextfield.__c.getField(true,"False")); - BA.debugLineNum = 91;BA.debugLine="Log(\"Multiline not supported with password mode."; -Debug.JustUpdateDeviceLine(); -b4xfloattextfield.__c.runVoidMethod ("LogImpl","951052568",RemoteObject.createImmutable("Multiline not supported with password mode."),0); - }; - BA.debugLineNum = 93;BA.debugLine="CreateTextFieldAll(PasswordMode, PassedLabel.Font"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_createtextfieldall" /*RemoteObject*/ ,(Object)(_passwordmode),(Object)(_passedlabel.runMethod(false,"getFont")),(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)((_lbl.runMethod(true,"getTextColor")))))); - BA.debugLineNum = 95;BA.debugLine="mBase.AddView(HintImageView, 0, 0, 0, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_hintimageview" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 96;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"\")"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_p = __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("")));Debug.locals.put("p", _p);Debug.locals.put("p", _p); - BA.debugLineNum = 97;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, 2dip, 2dip)"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(b4xfloattextfield.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)))),(Object)(b4xfloattextfield.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2))))); - BA.debugLineNum = 98;BA.debugLine="MeasuringCanvas.Initialize(p)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_measuringcanvas" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(_p)); - BA.debugLineNum = 99;BA.debugLine="Update"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_update" /*RemoteObject*/ ); - BA.debugLineNum = 100;BA.debugLine="If PasswordMode And Props.GetDefault(\"ShowRevealB"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(".",_passwordmode) && RemoteObject.solveBoolean(".",BA.ObjectToBoolean(_props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("ShowRevealButton"))),(Object)((b4xfloattextfield.__c.getField(true,"False"))))))) { - BA.debugLineNum = 101;BA.debugLine="CreateRevealButton"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_createrevealbutton" /*RemoteObject*/ ); - }else { - BA.debugLineNum = 103;BA.debugLine="CreateClearButton"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_createclearbutton" /*RemoteObject*/ ); - }; - BA.debugLineNum = 105;BA.debugLine="CreateAcceptButton"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_createacceptbutton" /*RemoteObject*/ ); - BA.debugLineNum = 106;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_base_resize" /*RemoteObject*/ ,(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"))),(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight")))); - BA.debugLineNum = 107;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getnextfield(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getNextField (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,295); -if (RapidSub.canDelegate("getnextfield")) { return __ref.runUserSub(false, "b4xfloattextfield","getnextfield", __ref);} - BA.debugLineNum = 295;BA.debugLine="Public Sub getNextField As B4XFloatTextField"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 296;BA.debugLine="Return mNextTextField"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_mnexttextfield" /*RemoteObject*/ ); - BA.debugLineNum = 297;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _gettext(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getText (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,388); -if (RapidSub.canDelegate("gettext")) { return __ref.runUserSub(false, "b4xfloattextfield","gettext", __ref);} - BA.debugLineNum = 388;BA.debugLine="Public Sub getText As String"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 389;BA.debugLine="Return mTextField.Text"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_mtextfield" /*RemoteObject*/ ).runMethod(true,"getText"); - BA.debugLineNum = 390;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _gettextfield(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getTextField (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,445); -if (RapidSub.canDelegate("gettextfield")) { return __ref.runUserSub(false, "b4xfloattextfield","gettextfield", __ref);} - BA.debugLineNum = 445;BA.debugLine="Public Sub getTextField As B4XView"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 446;BA.debugLine="Return mTextField"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_mtextfield" /*RemoteObject*/ ); - BA.debugLineNum = 447;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _ime_handleaction(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("ime_HandleAction (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,314); -if (RapidSub.canDelegate("ime_handleaction")) { return __ref.runUserSub(false, "b4xfloattextfield","ime_handleaction", __ref);} - BA.debugLineNum = 314;BA.debugLine="Private Sub ime_HandleAction As Boolean"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 315;BA.debugLine="tf_EnterPressed"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_tf_enterpressed" /*RemoteObject*/ ); - BA.debugLineNum = 316;BA.debugLine="If mNextTextField.IsInitialized Then Return True"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_mnexttextfield" /*RemoteObject*/ ).runMethod(true,"IsInitialized" /*RemoteObject*/ ).get().booleanValue()) { -if (true) return b4xfloattextfield.__c.getField(true,"True");}; - BA.debugLineNum = 317;BA.debugLine="Return False"; -Debug.JustUpdateDeviceLine(); -if (true) return b4xfloattextfield.__c.getField(true,"False"); - BA.debugLineNum = 318;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _callback,RemoteObject _eventname) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,50); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xfloattextfield","initialize", __ref, _ba, _callback, _eventname);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); -Debug.locals.put("Callback", _callback); -Debug.locals.put("EventName", _eventname); - BA.debugLineNum = 50;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 51;BA.debugLine="mEventName = EventName"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_meventname" /*RemoteObject*/ ,_eventname); - BA.debugLineNum = 52;BA.debugLine="mCallBack = Callback"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mcallback" /*RemoteObject*/ ,_callback); - BA.debugLineNum = 53;BA.debugLine="If xui.IsB4A Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4A").get().booleanValue()) { - BA.debugLineNum = 54;BA.debugLine="HintLabelLargeOffsetX = 6dip"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_hintlabellargeoffsetx" /*RemoteObject*/ ,b4xfloattextfield.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 6)))); - }else { - BA.debugLineNum = 56;BA.debugLine="HintLabelLargeOffsetX = 12dip"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_hintlabellargeoffsetx" /*RemoteObject*/ ,b4xfloattextfield.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 12)))); - }; - BA.debugLineNum = 59;BA.debugLine="IME.Initialize(\"ime\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_ime" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(RemoteObject.createImmutable("ime"))); - BA.debugLineNum = 65;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _lc_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("lc_Click (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,403); -if (RapidSub.canDelegate("lc_click")) { return __ref.runUserSub(false, "b4xfloattextfield","lc_click", __ref);} -RemoteObject _btn = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); - BA.debugLineNum = 403;BA.debugLine="Private Sub lc_Click"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 404;BA.debugLine="Dim btn As B4XView = Sender"; -Debug.JustUpdateDeviceLine(); -_btn = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_btn = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), b4xfloattextfield.__c.runMethod(false,"Sender",__ref.getField(false, "ba")));Debug.locals.put("btn", _btn);Debug.locals.put("btn", _btn); - BA.debugLineNum = 405;BA.debugLine="Select btn.Tag"; -Debug.JustUpdateDeviceLine(); -switch (BA.switchObjectToInt(_btn.runMethod(false,"getTag"),RemoteObject.createImmutable(("clear")),RemoteObject.createImmutable(("reveal")),RemoteObject.createImmutable(("hide")),RemoteObject.createImmutable(("v")))) { -case 0: { - BA.debugLineNum = 407;BA.debugLine="setText(\"\")"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_settext" /*RemoteObject*/ ,(Object)(RemoteObject.createImmutable(""))); - break; } -case 1: { - BA.debugLineNum = 409;BA.debugLine="SwitchFromPasswordToRegular (True)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_switchfrompasswordtoregular" /*void*/ ,(Object)(b4xfloattextfield.__c.getField(true,"True"))); - break; } -case 2: { - BA.debugLineNum = 411;BA.debugLine="SwitchFromPasswordToRegular(False)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_switchfrompasswordtoregular" /*void*/ ,(Object)(b4xfloattextfield.__c.getField(true,"False"))); - break; } -case 3: { - BA.debugLineNum = 413;BA.debugLine="tf_EnterPressed"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_tf_enterpressed" /*RemoteObject*/ ); - BA.debugLineNum = 414;BA.debugLine="If mNextTextField.IsInitialized = False Or mNex"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_mnexttextfield" /*RemoteObject*/ ).runMethod(true,"IsInitialized" /*RemoteObject*/ ),b4xfloattextfield.__c.getField(true,"False")) || RemoteObject.solveBoolean("=",__ref.getField(false,"_mnexttextfield" /*RemoteObject*/ ),(__ref))) { - BA.debugLineNum = 416;BA.debugLine="IME.HideKeyboard"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_ime" /*RemoteObject*/ ).runVoidMethod ("HideKeyboard",__ref.getField(false, "ba")); - }; - break; } -} -; - BA.debugLineNum = 422;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _requestfocusandshowkeyboard(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("RequestFocusAndShowKeyboard (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,450); -if (RapidSub.canDelegate("requestfocusandshowkeyboard")) { return __ref.runUserSub(false, "b4xfloattextfield","requestfocusandshowkeyboard", __ref);} - BA.debugLineNum = 450;BA.debugLine="Public Sub RequestFocusAndShowKeyboard"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 451;BA.debugLine="mTextField.RequestFocus"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mtextfield" /*RemoteObject*/ ).runVoidMethod ("RequestFocus"); - BA.debugLineNum = 453;BA.debugLine="IME.ShowKeyboard(mTextField)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_ime" /*RemoteObject*/ ).runVoidMethod ("ShowKeyboard",(Object)((__ref.getField(false,"_mtextfield" /*RemoteObject*/ ).getObject()))); - BA.debugLineNum = 455;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setnextfield(RemoteObject __ref,RemoteObject _field) throws Exception{ -try { - Debug.PushSubsStack("setNextField (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,299); -if (RapidSub.canDelegate("setnextfield")) { return __ref.runUserSub(false, "b4xfloattextfield","setnextfield", __ref, _field);} -RemoteObject _et = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -RemoteObject _o = RemoteObject.declareNull("Object"); -Debug.locals.put("Field", _field); - BA.debugLineNum = 299;BA.debugLine="Public Sub setNextField (Field As B4XFloatTextFiel"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 300;BA.debugLine="If Field.IsInitialized = False Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_field.runMethod(true,"IsInitialized" /*RemoteObject*/ ),b4xfloattextfield.__c.getField(true,"False"))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 302;BA.debugLine="If Multiline = False Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_multiline" /*RemoteObject*/ ),b4xfloattextfield.__c.getField(true,"False"))) { - BA.debugLineNum = 303;BA.debugLine="If Field <> Me Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("!",_field,(__ref))) { - BA.debugLineNum = 304;BA.debugLine="IME.AddHandleActionEvent(mTextField)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_ime" /*RemoteObject*/ ).runVoidMethod ("AddHandleActionEvent",(Object)((__ref.getField(false,"_mtextfield" /*RemoteObject*/ ).getObject())),__ref.getField(false, "ba")); - }; - BA.debugLineNum = 306;BA.debugLine="Dim et As EditText = mTextField"; -Debug.JustUpdateDeviceLine(); -_et = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper"); -_et = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.EditTextWrapper"), __ref.getField(false,"_mtextfield" /*RemoteObject*/ ).getObject());Debug.locals.put("et", _et);Debug.locals.put("et", _et); - BA.debugLineNum = 307;BA.debugLine="et.ForceDoneButton = True"; -Debug.JustUpdateDeviceLine(); -_et.runVoidMethod ("setForceDoneButton",b4xfloattextfield.__c.getField(true,"True")); - }; - BA.debugLineNum = 310;BA.debugLine="Dim o As Object = Field"; -Debug.JustUpdateDeviceLine(); -_o = (_field);Debug.locals.put("o", _o);Debug.locals.put("o", _o); - BA.debugLineNum = 311;BA.debugLine="mNextTextField = o"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mnexttextfield" /*RemoteObject*/ ,(_o)); - BA.debugLineNum = 312;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _settext(RemoteObject __ref,RemoteObject _s) throws Exception{ -try { - Debug.PushSubsStack("setText (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,392); -if (RapidSub.canDelegate("settext")) { return __ref.runUserSub(false, "b4xfloattextfield","settext", __ref, _s);} -RemoteObject _old = RemoteObject.createImmutable(""); -Debug.locals.put("s", _s); - BA.debugLineNum = 392;BA.debugLine="Public Sub setText(s As String)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 393;BA.debugLine="Dim old As String = mTextField.Text 'ignore"; -Debug.JustUpdateDeviceLine(); -_old = __ref.getField(false,"_mtextfield" /*RemoteObject*/ ).runMethod(true,"getText");Debug.locals.put("old", _old);Debug.locals.put("old", _old); - BA.debugLineNum = 394;BA.debugLine="mTextField.Text = s"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mtextfield" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(_s)); - BA.debugLineNum = 396;BA.debugLine="If IsPaused(Me) Then tf_TextChanged(old, s)"; -Debug.JustUpdateDeviceLine(); -if (b4xfloattextfield.__c.runMethod(true,"IsPaused",__ref.getField(false, "ba"),(Object)(__ref)).get().booleanValue()) { -__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_tf_textchanged" /*RemoteObject*/ ,(Object)(_old),(Object)(_s));}; - BA.debugLineNum = 400;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _switchfrompasswordtoregular(RemoteObject __ref,RemoteObject _toregular) throws Exception{ -try { - Debug.PushSubsStack("SwitchFromPasswordToRegular (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,137); -if (RapidSub.canDelegate("switchfrompasswordtoregular")) { __ref.runUserSub(false, "b4xfloattextfield","switchfrompasswordtoregular", __ref, _toregular); return;} -ResumableSub_SwitchFromPasswordToRegular rsub = new ResumableSub_SwitchFromPasswordToRegular(null,__ref,_toregular); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_SwitchFromPasswordToRegular extends BA.ResumableSub { -public ResumableSub_SwitchFromPasswordToRegular(keymon.lat.medicomed.b4xfloattextfield parent,RemoteObject __ref,RemoteObject _toregular) { -this.parent = parent; -this.__ref = __ref; -this._toregular = _toregular; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.b4xfloattextfield parent; -RemoteObject _toregular; -RemoteObject _text = RemoteObject.createImmutable(""); -RemoteObject _textcolor = RemoteObject.createImmutable(0); -RemoteObject _font1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont"); -RemoteObject _oldfield = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _et = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("SwitchFromPasswordToRegular (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,137); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); -Debug.locals.put("ToRegular", _toregular); - BA.debugLineNum = 138;BA.debugLine="Dim text As String = mTextField.Text"; -Debug.JustUpdateDeviceLine(); -_text = __ref.getField(false,"_mtextfield" /*RemoteObject*/ ).runMethod(true,"getText");Debug.locals.put("text", _text);Debug.locals.put("text", _text); - BA.debugLineNum = 139;BA.debugLine="Dim textcolor As Int = mTextField.TextColor"; -Debug.JustUpdateDeviceLine(); -_textcolor = __ref.getField(false,"_mtextfield" /*RemoteObject*/ ).runMethod(true,"getTextColor");Debug.locals.put("textcolor", _textcolor);Debug.locals.put("textcolor", _textcolor); - BA.debugLineNum = 140;BA.debugLine="Dim Font1 As B4XFont = mTextField.Font"; -Debug.JustUpdateDeviceLine(); -_font1 = __ref.getField(false,"_mtextfield" /*RemoteObject*/ ).runMethod(false,"getFont");Debug.locals.put("Font1", _font1);Debug.locals.put("Font1", _font1); - BA.debugLineNum = 141;BA.debugLine="Dim oldfield As B4XView = mTextField"; -Debug.JustUpdateDeviceLine(); -_oldfield = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_oldfield = __ref.getField(false,"_mtextfield" /*RemoteObject*/ );Debug.locals.put("oldfield", _oldfield);Debug.locals.put("oldfield", _oldfield); - BA.debugLineNum = 143;BA.debugLine="CreateTextFieldAll(Not(ToRegular), Font1, textcol"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_createtextfieldall" /*RemoteObject*/ ,(Object)(parent.__c.runMethod(true,"Not",(Object)(_toregular))),(Object)(_font1),(Object)(_textcolor)); - BA.debugLineNum = 144;BA.debugLine="mTextField.Text = text"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mtextfield" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(_text)); - BA.debugLineNum = 145;BA.debugLine="If lblClear.IsInitialized Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 1: -//if -this.state = 10; -if (__ref.getField(false,"_lblclear" /*RemoteObject*/ ).runMethod(true,"IsInitialized").get().booleanValue()) { -this.state = 3; -}if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 146;BA.debugLine="If ToRegular = False Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 4: -//if -this.state = 9; -if (RemoteObject.solveBoolean("=",_toregular,parent.__c.getField(true,"False"))) { -this.state = 6; -}else { -this.state = 8; -}if (true) break; - -case 6: -//C -this.state = 9; - BA.debugLineNum = 147;BA.debugLine="lblClear.Text = Chr(0xE8F4)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_lblclear" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(parent.__c.runMethod(true,"Chr",(Object)(BA.numberCast(int.class, ((int)0xe8f4)))))); - BA.debugLineNum = 148;BA.debugLine="lblClear.Tag = \"reveal\""; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_lblclear" /*RemoteObject*/ ).runMethod(false,"setTag",RemoteObject.createImmutable(("reveal"))); - if (true) break; - -case 8: -//C -this.state = 9; - BA.debugLineNum = 150;BA.debugLine="lblClear.Tag = \"hide\""; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_lblclear" /*RemoteObject*/ ).runMethod(false,"setTag",RemoteObject.createImmutable(("hide"))); - BA.debugLineNum = 151;BA.debugLine="lblClear.Text = Chr(0xE8F5)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_lblclear" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(parent.__c.runMethod(true,"Chr",(Object)(BA.numberCast(int.class, ((int)0xe8f5)))))); - if (true) break; - -case 9: -//C -this.state = 10; -; - BA.debugLineNum = 153;BA.debugLine="lblClear.BringToFront"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_lblclear" /*RemoteObject*/ ).runVoidMethod ("BringToFront"); - if (true) break; -; - BA.debugLineNum = 155;BA.debugLine="If lblV.IsInitialized Then lblV.BringToFront"; -Debug.JustUpdateDeviceLine(); - -case 10: -//if -this.state = 15; -if (__ref.getField(false,"_lblv" /*RemoteObject*/ ).runMethod(true,"IsInitialized").get().booleanValue()) { -this.state = 12; -;}if (true) break; - -case 12: -//C -this.state = 15; -__ref.getField(false,"_lblv" /*RemoteObject*/ ).runVoidMethod ("BringToFront"); -if (true) break; - -case 15: -//C -this.state = 16; -; - BA.debugLineNum = 156;BA.debugLine="HintImageView.BringToFront"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_hintimageview" /*RemoteObject*/ ).runVoidMethod ("BringToFront"); - BA.debugLineNum = 157;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_base_resize" /*RemoteObject*/ ,(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"))),(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight")))); - BA.debugLineNum = 162;BA.debugLine="Dim et As EditText = mTextField"; -Debug.JustUpdateDeviceLine(); -_et = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper"); -_et = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.EditTextWrapper"), __ref.getField(false,"_mtextfield" /*RemoteObject*/ ).getObject());Debug.locals.put("et", _et);Debug.locals.put("et", _et); - BA.debugLineNum = 163;BA.debugLine="et.SelectionStart = mTextField.Text.Length"; -Debug.JustUpdateDeviceLine(); -_et.runMethod(true,"setSelectionStart",__ref.getField(false,"_mtextfield" /*RemoteObject*/ ).runMethod(true,"getText").runMethod(true,"length")); - BA.debugLineNum = 165;BA.debugLine="LastSwitchTextFieldTime = DateTime.Now"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_lastswitchtextfieldtime" /*RemoteObject*/ ,parent.__c.getField(false,"DateTime").runMethod(true,"getNow")); - BA.debugLineNum = 166;BA.debugLine="mTextField.RequestFocus"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mtextfield" /*RemoteObject*/ ).runVoidMethod ("RequestFocus"); - BA.debugLineNum = 167;BA.debugLine="oldfield.RemoveViewFromParent"; -Debug.JustUpdateDeviceLine(); -_oldfield.runVoidMethod ("RemoveViewFromParent"); - BA.debugLineNum = 169;BA.debugLine="LastSwitchTextFieldTime = DateTime.Now + 200"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_lastswitchtextfieldtime" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {parent.__c.getField(false,"DateTime").runMethod(true,"getNow"),RemoteObject.createImmutable(200)}, "+",1, 2)); - BA.debugLineNum = 170;BA.debugLine="et.Enabled = False"; -Debug.JustUpdateDeviceLine(); -_et.runMethod(true,"setEnabled",parent.__c.getField(true,"False")); - BA.debugLineNum = 171;BA.debugLine="Sleep(50)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xfloattextfield", "switchfrompasswordtoregular"),BA.numberCast(int.class, 50)); -this.state = 20; -return; -case 20: -//C -this.state = 16; -; - BA.debugLineNum = 172;BA.debugLine="et.Enabled = True"; -Debug.JustUpdateDeviceLine(); -_et.runMethod(true,"setEnabled",parent.__c.getField(true,"True")); - BA.debugLineNum = 173;BA.debugLine="Sleep(50)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xfloattextfield", "switchfrompasswordtoregular"),BA.numberCast(int.class, 50)); -this.state = 21; -return; -case 21: -//C -this.state = 16; -; - BA.debugLineNum = 174;BA.debugLine="et.RequestFocus"; -Debug.JustUpdateDeviceLine(); -_et.runVoidMethod ("RequestFocus"); - BA.debugLineNum = 175;BA.debugLine="IME.ShowKeyboard(mTextField)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_ime" /*RemoteObject*/ ).runVoidMethod ("ShowKeyboard",(Object)((__ref.getField(false,"_mtextfield" /*RemoteObject*/ ).getObject()))); - BA.debugLineNum = 177;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_Passwo"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 16: -//if -this.state = 19; -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"SubExists",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_PasswordRevealChanged"))),(Object)(BA.numberCast(int.class, 1))).get().booleanValue()) { -this.state = 18; -}if (true) break; - -case 18: -//C -this.state = 19; - BA.debugLineNum = 178;BA.debugLine="CallSubDelayed2(mCallBack, mEventName & \"_Passwo"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("CallSubDelayed2",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_PasswordRevealChanged"))),(Object)((_toregular))); - if (true) break; - -case 19: -//C -this.state = -1; -; - BA.debugLineNum = 180;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _tf_action(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("tf_Action (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,277); -if (RapidSub.canDelegate("tf_action")) { return __ref.runUserSub(false, "b4xfloattextfield","tf_action", __ref);} - BA.debugLineNum = 277;BA.debugLine="Private Sub tf_Action"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 278;BA.debugLine="If mNextTextField.IsInitialized And mNextTextFiel"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(".",__ref.getField(false,"_mnexttextfield" /*RemoteObject*/ ).runMethod(true,"IsInitialized" /*RemoteObject*/ )) && RemoteObject.solveBoolean("!",__ref.getField(false,"_mnexttextfield" /*RemoteObject*/ ),(__ref))) { - BA.debugLineNum = 279;BA.debugLine="mNextTextField.TextField.RequestFocus"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mnexttextfield" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_gettextfield" /*RemoteObject*/ ).runVoidMethod ("RequestFocus"); - }; - BA.debugLineNum = 281;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_EnterP"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"SubExists",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_EnterPressed"))),(Object)(BA.numberCast(int.class, 0))).get().booleanValue()) { - BA.debugLineNum = 282;BA.debugLine="CallSubDelayed(mCallBack, mEventName & \"_EnterPr"; -Debug.JustUpdateDeviceLine(); -b4xfloattextfield.__c.runVoidMethod ("CallSubDelayed",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_EnterPressed")))); - }; - BA.debugLineNum = 284;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _tf_beginedit(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("tf_BeginEdit (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,269); -if (RapidSub.canDelegate("tf_beginedit")) { return __ref.runUserSub(false, "b4xfloattextfield","tf_beginedit", __ref);} - BA.debugLineNum = 269;BA.debugLine="Private Sub tf_BeginEdit"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 270;BA.debugLine="tf_FocusChanged(True)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_tf_focuschanged" /*RemoteObject*/ ,(Object)(b4xfloattextfield.__c.getField(true,"True"))); - BA.debugLineNum = 271;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _tf_endedit(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("tf_EndEdit (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,273); -if (RapidSub.canDelegate("tf_endedit")) { return __ref.runUserSub(false, "b4xfloattextfield","tf_endedit", __ref);} - BA.debugLineNum = 273;BA.debugLine="Private Sub tf_EndEdit"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 274;BA.debugLine="tf_FocusChanged(False)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_tf_focuschanged" /*RemoteObject*/ ,(Object)(b4xfloattextfield.__c.getField(true,"False"))); - BA.debugLineNum = 275;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _tf_enterpressed(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("tf_EnterPressed (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,320); -if (RapidSub.canDelegate("tf_enterpressed")) { return __ref.runUserSub(false, "b4xfloattextfield","tf_enterpressed", __ref);} - BA.debugLineNum = 320;BA.debugLine="Private Sub tf_EnterPressed"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 321;BA.debugLine="tf_Action"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_tf_action" /*RemoteObject*/ ); - BA.debugLineNum = 326;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _tf_focuschanged(RemoteObject __ref,RemoteObject _hasfocus) throws Exception{ -try { - Debug.PushSubsStack("tf_FocusChanged (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,234); -if (RapidSub.canDelegate("tf_focuschanged")) { return __ref.runUserSub(false, "b4xfloattextfield","tf_focuschanged", __ref, _hasfocus);} -Debug.locals.put("HasFocus", _hasfocus); - BA.debugLineNum = 234;BA.debugLine="Private Sub tf_FocusChanged (HasFocus As Boolean)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 235;BA.debugLine="Focused = HasFocus"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_focused" /*RemoteObject*/ ,_hasfocus); - BA.debugLineNum = 236;BA.debugLine="UpdateLabel(mTextField.Text, True)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_updatelabel" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_mtextfield" /*RemoteObject*/ ).runMethod(true,"getText")),(Object)(b4xfloattextfield.__c.getField(true,"True"))); - BA.debugLineNum = 237;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_FocusC"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"SubExists",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_FocusChanged"))),(Object)(BA.numberCast(int.class, 1))).get().booleanValue()) { - BA.debugLineNum = 238;BA.debugLine="If LastSwitchTextFieldTime + 100 < DateTime.Now"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("<",RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_lastswitchtextfieldtime" /*RemoteObject*/ ),RemoteObject.createImmutable(100)}, "+",1, 2),b4xfloattextfield.__c.getField(false,"DateTime").runMethod(true,"getNow"))) { - BA.debugLineNum = 239;BA.debugLine="CallSubDelayed2(mCallBack, mEventName & \"_Focus"; -Debug.JustUpdateDeviceLine(); -b4xfloattextfield.__c.runVoidMethod ("CallSubDelayed2",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_FocusChanged"))),(Object)((__ref.getField(true,"_focused" /*RemoteObject*/ )))); - }; - }; - BA.debugLineNum = 242;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _tf_textchanged(RemoteObject __ref,RemoteObject _old,RemoteObject _new) throws Exception{ -try { - Debug.PushSubsStack("tf_TextChanged (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,287); -if (RapidSub.canDelegate("tf_textchanged")) { return __ref.runUserSub(false, "b4xfloattextfield","tf_textchanged", __ref, _old, _new);} -Debug.locals.put("Old", _old); -Debug.locals.put("New", _new); - BA.debugLineNum = 287;BA.debugLine="Private Sub tf_TextChanged (Old As String, New As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 288;BA.debugLine="UpdateLabel(New, False)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_updatelabel" /*RemoteObject*/ ,(Object)(_new),(Object)(b4xfloattextfield.__c.getField(true,"False"))); - BA.debugLineNum = 289;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_TextCh"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(".",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"SubExists",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_TextChanged"))),(Object)(BA.numberCast(int.class, 2)))) && RemoteObject.solveBoolean(".",__ref.getField(false,"_mtextfield" /*RemoteObject*/ ).runMethod(true,"IsInitialized"))) { - BA.debugLineNum = 290;BA.debugLine="CallSub3(mCallBack, mEventName & \"_TextChanged\","; -Debug.JustUpdateDeviceLine(); -b4xfloattextfield.__c.runMethodAndSync(false,"CallSubNew3",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_TextChanged"))),(Object)((_old)),(Object)((_new))); - }; - BA.debugLineNum = 292;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _update(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Update (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,245); -if (RapidSub.canDelegate("update")) { return __ref.runUserSub(false, "b4xfloattextfield","update", __ref);} -RemoteObject _f = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont"); -RemoteObject _r = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XRect"); - BA.debugLineNum = 245;BA.debugLine="Public Sub Update"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 246;BA.debugLine="Dim f As B4XFont = xui.CreateFont2(HintFont, Lar"; -Debug.JustUpdateDeviceLine(); -_f = __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreateFont2",(Object)(__ref.getField(false,"_hintfont" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_largelabeltextsize" /*RemoteObject*/ )));Debug.locals.put("f", _f);Debug.locals.put("f", _f); - BA.debugLineNum = 247;BA.debugLine="Dim r As B4XRect = MeasuringCanvas.MeasureText(Hi"; -Debug.JustUpdateDeviceLine(); -_r = __ref.getField(false,"_measuringcanvas" /*RemoteObject*/ ).runMethod(false,"MeasureText",(Object)(__ref.getField(true,"_hinttext" /*RemoteObject*/ )),(Object)(_f));Debug.locals.put("r", _r);Debug.locals.put("r", _r); - BA.debugLineNum = 248;BA.debugLine="LargeFocused = CreateBitmap(r, HintColor, f)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_largefocused" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_createbitmap" /*RemoteObject*/ ,(Object)(_r),(Object)(__ref.getField(true,"_hintcolor" /*RemoteObject*/ )),(Object)(_f))); - BA.debugLineNum = 249;BA.debugLine="LargeNotFocused = CreateBitmap(r, NonFocusedHintC"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_largenotfocused" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_createbitmap" /*RemoteObject*/ ,(Object)(_r),(Object)(__ref.getField(true,"_nonfocusedhintcolor" /*RemoteObject*/ )),(Object)(_f))); - BA.debugLineNum = 250;BA.debugLine="f = xui.CreateFont2(HintFont, SmallLabelTextSize)"; -Debug.JustUpdateDeviceLine(); -_f = __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreateFont2",(Object)(__ref.getField(false,"_hintfont" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_smalllabeltextsize" /*RemoteObject*/ )));Debug.locals.put("f", _f); - BA.debugLineNum = 251;BA.debugLine="Dim r As B4XRect = MeasuringCanvas.MeasureText(Hi"; -Debug.JustUpdateDeviceLine(); -_r = __ref.getField(false,"_measuringcanvas" /*RemoteObject*/ ).runMethod(false,"MeasureText",(Object)(__ref.getField(true,"_hinttext" /*RemoteObject*/ )),(Object)(_f));Debug.locals.put("r", _r);Debug.locals.put("r", _r); - BA.debugLineNum = 252;BA.debugLine="SmallFocused = CreateBitmap(r, HintColor, f)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_smallfocused" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_createbitmap" /*RemoteObject*/ ,(Object)(_r),(Object)(__ref.getField(true,"_hintcolor" /*RemoteObject*/ )),(Object)(_f))); - BA.debugLineNum = 253;BA.debugLine="SmallNotFocused = CreateBitmap(r, NonFocusedHintC"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_smallnotfocused" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_createbitmap" /*RemoteObject*/ ,(Object)(_r),(Object)(__ref.getField(true,"_nonfocusedhintcolor" /*RemoteObject*/ )),(Object)(_f))); - BA.debugLineNum = 254;BA.debugLine="UpdateLabel(mTextField.Text, True)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_updatelabel" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_mtextfield" /*RemoteObject*/ ).runMethod(true,"getText")),(Object)(b4xfloattextfield.__c.getField(true,"True"))); - BA.debugLineNum = 255;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _updatelabel(RemoteObject __ref,RemoteObject _txt,RemoteObject _force) throws Exception{ -try { - Debug.PushSubsStack("UpdateLabel (b4xfloattextfield) ","b4xfloattextfield",44,__ref.getField(false, "ba"),__ref,210); -if (RapidSub.canDelegate("updatelabel")) { return __ref.runUserSub(false, "b4xfloattextfield","updatelabel", __ref, _txt, _force);} -RemoteObject _lbl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _goingtolarge = RemoteObject.createImmutable(false); -RemoteObject _b = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper"); -Debug.locals.put("txt", _txt); -Debug.locals.put("force", _force); - BA.debugLineNum = 210;BA.debugLine="Private Sub UpdateLabel (txt As String, force As B"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 211;BA.debugLine="For Each lbl As B4XView In Array As B4XView(lblCl"; -Debug.JustUpdateDeviceLine(); -{ -final RemoteObject group1 = RemoteObject.createNewArray("anywheresoftware.b4a.objects.B4XViewWrapper",new int[] {2},new Object[] {__ref.getField(false,"_lblclear" /*RemoteObject*/ ),__ref.getField(false,"_lblv" /*RemoteObject*/ )}); -final int groupLen1 = group1.getField(true,"length").get() -;int index1 = 0; -; -for (; index1 < groupLen1;index1++){ -_lbl = group1.getArrayElement(false,RemoteObject.createImmutable(index1));Debug.locals.put("lbl", _lbl); -Debug.locals.put("lbl", _lbl); - BA.debugLineNum = 212;BA.debugLine="If lbl.IsInitialized Then lbl.Visible = Focused"; -Debug.JustUpdateDeviceLine(); -if (_lbl.runMethod(true,"IsInitialized").get().booleanValue()) { -_lbl.runMethod(true,"setVisible",BA.ObjectToBoolean(RemoteObject.solveBoolean(".",__ref.getField(true,"_focused" /*RemoteObject*/ )) && RemoteObject.solveBoolean(">",_txt.runMethod(true,"length"),BA.numberCast(double.class, 0))));}; - } -}Debug.locals.put("lbl", _lbl); -; - BA.debugLineNum = 215;BA.debugLine="Dim GoingToLarge As Boolean = txt.Length = 0"; -Debug.JustUpdateDeviceLine(); -_goingtolarge = BA.ObjectToBoolean(RemoteObject.solveBoolean("=",_txt.runMethod(true,"length"),BA.numberCast(double.class, 0)));Debug.locals.put("GoingToLarge", _goingtolarge);Debug.locals.put("GoingToLarge", _goingtolarge); - BA.debugLineNum = 216;BA.debugLine="If GoingToLarge = LargeLabel And force = False Th"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_goingtolarge,__ref.getField(true,"_largelabel" /*RemoteObject*/ )) && RemoteObject.solveBoolean("=",_force,b4xfloattextfield.__c.getField(true,"False"))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 217;BA.debugLine="Dim b As B4XBitmap"; -Debug.JustUpdateDeviceLine(); -_b = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper");Debug.locals.put("b", _b); - BA.debugLineNum = 218;BA.debugLine="If Focused Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_focused" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 219;BA.debugLine="If GoingToLarge Then b = LargeFocused Else b = S"; -Debug.JustUpdateDeviceLine(); -if (_goingtolarge.get().booleanValue()) { -_b = __ref.getField(false,"_largefocused" /*RemoteObject*/ );Debug.locals.put("b", _b);} -else { -_b = __ref.getField(false,"_smallfocused" /*RemoteObject*/ );Debug.locals.put("b", _b);}; - }else { - BA.debugLineNum = 221;BA.debugLine="If GoingToLarge Then b = LargeNotFocused Else b"; -Debug.JustUpdateDeviceLine(); -if (_goingtolarge.get().booleanValue()) { -_b = __ref.getField(false,"_largenotfocused" /*RemoteObject*/ );Debug.locals.put("b", _b);} -else { -_b = __ref.getField(false,"_smallnotfocused" /*RemoteObject*/ );Debug.locals.put("b", _b);}; - }; - BA.debugLineNum = 223;BA.debugLine="If b.IsInitialized = False Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_b.runMethod(true,"IsInitialized"),b4xfloattextfield.__c.getField(true,"False"))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 224;BA.debugLine="HintImageView.SetBitmap(b)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_hintimageview" /*RemoteObject*/ ).runVoidMethod ("SetBitmap",(Object)((_b.getObject()))); - BA.debugLineNum = 225;BA.debugLine="If GoingToLarge Then"; -Debug.JustUpdateDeviceLine(); -if (_goingtolarge.get().booleanValue()) { - BA.debugLineNum = 226;BA.debugLine="HintImageView.SetLayoutAnimated (AnimationDurati"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_hintimageview" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(__ref.getField(true,"_animationduration" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_hintlabellargeoffsetx" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"),RemoteObject.createImmutable(2),_b.runMethod(true,"getHeight"),RemoteObject.createImmutable(2)}, "/-/",1, 0))),(Object)(BA.numberCast(int.class, _b.runMethod(true,"getWidth"))),(Object)(BA.numberCast(int.class, _b.runMethod(true,"getHeight")))); - BA.debugLineNum = 227;BA.debugLine="LargeLabel = True"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_largelabel" /*RemoteObject*/ ,b4xfloattextfield.__c.getField(true,"True")); - }else { - BA.debugLineNum = 229;BA.debugLine="HintImageView.SetLayoutAnimated(AnimationDuratio"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_hintimageview" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(__ref.getField(true,"_animationduration" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_hintlabelsmalloffsetx" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_hintlabelsmalloffsety" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, _b.runMethod(true,"getWidth"))),(Object)(BA.numberCast(int.class, _b.runMethod(true,"getHeight")))); - BA.debugLineNum = 230;BA.debugLine="LargeLabel = False"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_largelabel" /*RemoteObject*/ ,b4xfloattextfield.__c.getField(true,"False")); - }; - BA.debugLineNum = 232;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xformatter.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xformatter.java deleted file mode 100644 index 13f6e3b..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xformatter.java +++ /dev/null @@ -1,33 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xformatter { - public static RemoteObject myClass; - public b4xformatter() { - } - public static PCBA staticBA = new PCBA(null, b4xformatter.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _formats = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _max_value = RemoteObject.createImmutable(0); -public static RemoteObject _min_value = RemoteObject.createImmutable(0); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"DateUtils",_ref.getField(false, "_dateutils"),"formats",_ref.getField(false, "_formats"),"MAX_VALUE",_ref.getField(false, "_max_value"),"MIN_VALUE",_ref.getField(false, "_min_value"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xformatter_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xformatter_subs_0.java deleted file mode 100644 index a6fa102..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xformatter_subs_0.java +++ /dev/null @@ -1,506 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xformatter_subs_0 { - - -public static RemoteObject _addformatdata(RemoteObject __ref,RemoteObject _data,RemoteObject _rangestart,RemoteObject _rangeend,RemoteObject _includeedges) throws Exception{ -try { - Debug.PushSubsStack("AddFormatData (b4xformatter) ","b4xformatter",58,__ref.getField(false, "ba"),__ref,65); -if (RapidSub.canDelegate("addformatdata")) { return __ref.runUserSub(false, "b4xformatter","addformatdata", __ref, _data, _rangestart, _rangeend, _includeedges);} -RemoteObject _factor = RemoteObject.createImmutable(0); -Debug.locals.put("Data", _data); -Debug.locals.put("RangeStart", _rangestart); -Debug.locals.put("RangeEnd", _rangeend); -Debug.locals.put("IncludeEdges", _includeedges); - BA.debugLineNum = 65;BA.debugLine="Public Sub AddFormatData (Data As B4XFormatData, R"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 66;BA.debugLine="Dim factor As Double = Power(10, -Data.MaximumFra"; -Debug.JustUpdateDeviceLine(); -_factor = b4xformatter.__c.runMethod(true,"Power",(Object)(BA.numberCast(double.class, 10)),(Object)(BA.numberCast(double.class, -(double) (0 + _data.getField(true,"MaximumFractions" /*RemoteObject*/ ).get().intValue()))));Debug.locals.put("factor", _factor);Debug.locals.put("factor", _factor); - BA.debugLineNum = 67;BA.debugLine="If IncludeEdges = False Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_includeedges,b4xformatter.__c.getField(true,"False"))) { - BA.debugLineNum = 68;BA.debugLine="RangeStart = RangeStart + factor"; -Debug.JustUpdateDeviceLine(); -_rangestart = RemoteObject.solve(new RemoteObject[] {_rangestart,_factor}, "+",1, 0);Debug.locals.put("RangeStart", _rangestart); - BA.debugLineNum = 69;BA.debugLine="RangeEnd = RangeEnd - factor"; -Debug.JustUpdateDeviceLine(); -_rangeend = RemoteObject.solve(new RemoteObject[] {_rangeend,_factor}, "-",1, 0);Debug.locals.put("RangeEnd", _rangeend); - }; - BA.debugLineNum = 71;BA.debugLine="RangeStart = RangeStart - factor / 2"; -Debug.JustUpdateDeviceLine(); -_rangestart = RemoteObject.solve(new RemoteObject[] {_rangestart,_factor,RemoteObject.createImmutable(2)}, "-/",1, 0);Debug.locals.put("RangeStart", _rangestart); - BA.debugLineNum = 72;BA.debugLine="RangeEnd = RangeEnd + factor / 2"; -Debug.JustUpdateDeviceLine(); -_rangeend = RemoteObject.solve(new RemoteObject[] {_rangeend,_factor,RemoteObject.createImmutable(2)}, "+/",1, 0);Debug.locals.put("RangeEnd", _rangeend); - BA.debugLineNum = 73;BA.debugLine="Data.RangeStart = RangeStart"; -Debug.JustUpdateDeviceLine(); -_data.setField ("RangeStart" /*RemoteObject*/ ,_rangestart); - BA.debugLineNum = 74;BA.debugLine="Data.RangeEnd = RangeEnd"; -Debug.JustUpdateDeviceLine(); -_data.setField ("RangeEnd" /*RemoteObject*/ ,_rangeend); - BA.debugLineNum = 75;BA.debugLine="formats.Add(Data)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_formats" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((_data))); - BA.debugLineNum = 76;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Type B4XFormatData (Prefix As String, Postfix As"; -; - //BA.debugLineNum = 6;BA.debugLine="Private formats As List"; -b4xformatter._formats = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_formats",b4xformatter._formats); - //BA.debugLineNum = 7;BA.debugLine="Public Const MAX_VALUE = 0x7fffffff, MIN_VALUE ="; -b4xformatter._max_value = BA.numberCast(int.class, ((int)0x7fffffff));__ref.setField("_max_value",b4xformatter._max_value); -b4xformatter._min_value = BA.numberCast(int.class, ((int)0x80000000));__ref.setField("_min_value",b4xformatter._min_value); - //BA.debugLineNum = 9;BA.debugLine="Private xui As XUI"; -b4xformatter._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",b4xformatter._xui); - //BA.debugLineNum = 11;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _copyformatdata(RemoteObject __ref,RemoteObject _data) throws Exception{ -try { - Debug.PushSubsStack("CopyFormatData (b4xformatter) ","b4xformatter",58,__ref.getField(false, "ba"),__ref,38); -if (RapidSub.canDelegate("copyformatdata")) { return __ref.runUserSub(false, "b4xformatter","copyformatdata", __ref, _data);} -RemoteObject _d = RemoteObject.declareNull("keymon.lat.medicomed.b4xformatter._b4xformatdata"); -Debug.locals.put("Data", _data); - BA.debugLineNum = 38;BA.debugLine="Public Sub CopyFormatData (Data As B4XFormatData)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 39;BA.debugLine="Dim d As B4XFormatData"; -Debug.JustUpdateDeviceLine(); -_d = RemoteObject.createNew ("keymon.lat.medicomed.b4xformatter._b4xformatdata");Debug.locals.put("d", _d); - BA.debugLineNum = 40;BA.debugLine="d.Initialize"; -Debug.JustUpdateDeviceLine(); -_d.runVoidMethod ("Initialize"); - BA.debugLineNum = 41;BA.debugLine="d.DecimalPoint = Data.DecimalPoint"; -Debug.JustUpdateDeviceLine(); -_d.setField ("DecimalPoint" /*RemoteObject*/ ,_data.getField(true,"DecimalPoint" /*RemoteObject*/ )); - BA.debugLineNum = 42;BA.debugLine="If Data.FormatFont.IsInitialized Then"; -Debug.JustUpdateDeviceLine(); -if (_data.getField(false,"FormatFont" /*RemoteObject*/ ).runMethod(true,"getIsInitialized").get().booleanValue()) { - BA.debugLineNum = 44;BA.debugLine="d.FormatFont = xui.CreateFont(Data.FormatFont.To"; -Debug.JustUpdateDeviceLine(); -_d.setField ("FormatFont" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreateFont",(Object)((_data.getField(false,"FormatFont" /*RemoteObject*/ ).runMethod(false,"ToNativeFont").getObject())),(Object)(_data.getField(false,"FormatFont" /*RemoteObject*/ ).runMethod(true,"getSize")))); - }; - BA.debugLineNum = 47;BA.debugLine="d.GroupingCharacter = Data.GroupingCharacter"; -Debug.JustUpdateDeviceLine(); -_d.setField ("GroupingCharacter" /*RemoteObject*/ ,_data.getField(true,"GroupingCharacter" /*RemoteObject*/ )); - BA.debugLineNum = 48;BA.debugLine="d.MaximumFractions = Data.MaximumFractions"; -Debug.JustUpdateDeviceLine(); -_d.setField ("MaximumFractions" /*RemoteObject*/ ,_data.getField(true,"MaximumFractions" /*RemoteObject*/ )); - BA.debugLineNum = 49;BA.debugLine="d.MinimumFractions = Data.MinimumFractions"; -Debug.JustUpdateDeviceLine(); -_d.setField ("MinimumFractions" /*RemoteObject*/ ,_data.getField(true,"MinimumFractions" /*RemoteObject*/ )); - BA.debugLineNum = 50;BA.debugLine="d.MinimumIntegers = Data.MinimumIntegers"; -Debug.JustUpdateDeviceLine(); -_d.setField ("MinimumIntegers" /*RemoteObject*/ ,_data.getField(true,"MinimumIntegers" /*RemoteObject*/ )); - BA.debugLineNum = 51;BA.debugLine="d.Postfix = Data.Postfix"; -Debug.JustUpdateDeviceLine(); -_d.setField ("Postfix" /*RemoteObject*/ ,_data.getField(true,"Postfix" /*RemoteObject*/ )); - BA.debugLineNum = 52;BA.debugLine="d.Prefix = Data.Prefix"; -Debug.JustUpdateDeviceLine(); -_d.setField ("Prefix" /*RemoteObject*/ ,_data.getField(true,"Prefix" /*RemoteObject*/ )); - BA.debugLineNum = 53;BA.debugLine="d.RangeEnd = Data.RangeEnd"; -Debug.JustUpdateDeviceLine(); -_d.setField ("RangeEnd" /*RemoteObject*/ ,_data.getField(true,"RangeEnd" /*RemoteObject*/ )); - BA.debugLineNum = 54;BA.debugLine="d.RangeStart = Data.RangeStart"; -Debug.JustUpdateDeviceLine(); -_d.setField ("RangeStart" /*RemoteObject*/ ,_data.getField(true,"RangeStart" /*RemoteObject*/ )); - BA.debugLineNum = 55;BA.debugLine="d.RemoveMinusSign = Data.RemoveMinusSign"; -Debug.JustUpdateDeviceLine(); -_d.setField ("RemoveMinusSign" /*RemoteObject*/ ,_data.getField(true,"RemoveMinusSign" /*RemoteObject*/ )); - BA.debugLineNum = 56;BA.debugLine="d.TextColor = Data.TextColor"; -Debug.JustUpdateDeviceLine(); -_d.setField ("TextColor" /*RemoteObject*/ ,_data.getField(true,"TextColor" /*RemoteObject*/ )); - BA.debugLineNum = 57;BA.debugLine="d.FractionPaddingChar = Data.FractionPaddingChar"; -Debug.JustUpdateDeviceLine(); -_d.setField ("FractionPaddingChar" /*RemoteObject*/ ,_data.getField(true,"FractionPaddingChar" /*RemoteObject*/ )); - BA.debugLineNum = 58;BA.debugLine="d.IntegerPaddingChar = Data.IntegerPaddingChar"; -Debug.JustUpdateDeviceLine(); -_d.setField ("IntegerPaddingChar" /*RemoteObject*/ ,_data.getField(true,"IntegerPaddingChar" /*RemoteObject*/ )); - BA.debugLineNum = 59;BA.debugLine="Return d"; -Debug.JustUpdateDeviceLine(); -if (true) return _d; - BA.debugLineNum = 60;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createdefaultformat(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("CreateDefaultFormat (b4xformatter) ","b4xformatter",58,__ref.getField(false, "ba"),__ref,19); -if (RapidSub.canDelegate("createdefaultformat")) { return __ref.runUserSub(false, "b4xformatter","createdefaultformat", __ref);} -RemoteObject _d = RemoteObject.declareNull("keymon.lat.medicomed.b4xformatter._b4xformatdata"); - BA.debugLineNum = 19;BA.debugLine="Private Sub CreateDefaultFormat As B4XFormatData"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 20;BA.debugLine="Dim d As B4XFormatData"; -Debug.JustUpdateDeviceLine(); -_d = RemoteObject.createNew ("keymon.lat.medicomed.b4xformatter._b4xformatdata");Debug.locals.put("d", _d); - BA.debugLineNum = 21;BA.debugLine="d.Initialize"; -Debug.JustUpdateDeviceLine(); -_d.runVoidMethod ("Initialize"); - BA.debugLineNum = 22;BA.debugLine="d.GroupingCharacter = \",\""; -Debug.JustUpdateDeviceLine(); -_d.setField ("GroupingCharacter" /*RemoteObject*/ ,BA.ObjectToString(",")); - BA.debugLineNum = 23;BA.debugLine="d.DecimalPoint = \".\""; -Debug.JustUpdateDeviceLine(); -_d.setField ("DecimalPoint" /*RemoteObject*/ ,BA.ObjectToString(".")); - BA.debugLineNum = 24;BA.debugLine="d.MaximumFractions = 3"; -Debug.JustUpdateDeviceLine(); -_d.setField ("MaximumFractions" /*RemoteObject*/ ,BA.numberCast(int.class, 3)); - BA.debugLineNum = 25;BA.debugLine="d.MinimumIntegers = 1"; -Debug.JustUpdateDeviceLine(); -_d.setField ("MinimumIntegers" /*RemoteObject*/ ,BA.numberCast(int.class, 1)); - BA.debugLineNum = 26;BA.debugLine="d.IntegerPaddingChar = \"0\""; -Debug.JustUpdateDeviceLine(); -_d.setField ("IntegerPaddingChar" /*RemoteObject*/ ,BA.ObjectToString("0")); - BA.debugLineNum = 27;BA.debugLine="d.FractionPaddingChar = \"0\""; -Debug.JustUpdateDeviceLine(); -_d.setField ("FractionPaddingChar" /*RemoteObject*/ ,BA.ObjectToString("0")); - BA.debugLineNum = 28;BA.debugLine="Return d"; -Debug.JustUpdateDeviceLine(); -if (true) return _d; - BA.debugLineNum = 29;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _format(RemoteObject __ref,RemoteObject _number) throws Exception{ -try { - Debug.PushSubsStack("Format (b4xformatter) ","b4xformatter",58,__ref.getField(false, "ba"),__ref,92); -if (RapidSub.canDelegate("format")) { return __ref.runUserSub(false, "b4xformatter","format", __ref, _number);} -RemoteObject _data = RemoteObject.declareNull("keymon.lat.medicomed.b4xformatter._b4xformatdata"); -RemoteObject _sb = RemoteObject.declareNull("anywheresoftware.b4a.keywords.StringBuilderWrapper"); -RemoteObject _numberstartindex = RemoteObject.createImmutable(0); -RemoteObject _factor = RemoteObject.createImmutable(0); -RemoteObject _whole = RemoteObject.createImmutable(0); -RemoteObject _frac = RemoteObject.createImmutable(0); -RemoteObject _g = RemoteObject.createImmutable(0); -RemoteObject _fracstartindex = RemoteObject.createImmutable(0); -RemoteObject _lastzerocount = RemoteObject.createImmutable(0); -RemoteObject _multipler = RemoteObject.createImmutable(0); -RemoteObject _w = RemoteObject.createImmutable(0); -Debug.locals.put("Number", _number); - BA.debugLineNum = 92;BA.debugLine="Public Sub Format (Number As Double) As String"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 93;BA.debugLine="If Number < MIN_VALUE Or Number > MAX_VALUE Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("<",_number,BA.numberCast(double.class, __ref.getField(true,"_min_value" /*RemoteObject*/ ))) || RemoteObject.solveBoolean(">",_number,BA.numberCast(double.class, __ref.getField(true,"_max_value" /*RemoteObject*/ )))) { -if (true) return BA.ObjectToString("OVERFLOW");}; - BA.debugLineNum = 94;BA.debugLine="Dim data As B4XFormatData = GetFormatData (Number"; -Debug.JustUpdateDeviceLine(); -_data = __ref.runClassMethod (keymon.lat.medicomed.b4xformatter.class, "_getformatdata" /*RemoteObject*/ ,(Object)(_number));Debug.locals.put("data", _data);Debug.locals.put("data", _data); - BA.debugLineNum = 95;BA.debugLine="Dim sb As StringBuilder"; -Debug.JustUpdateDeviceLine(); -_sb = RemoteObject.createNew ("anywheresoftware.b4a.keywords.StringBuilderWrapper");Debug.locals.put("sb", _sb); - BA.debugLineNum = 96;BA.debugLine="sb.Initialize"; -Debug.JustUpdateDeviceLine(); -_sb.runVoidMethod ("Initialize"); - BA.debugLineNum = 97;BA.debugLine="sb.Append(data.Prefix)"; -Debug.JustUpdateDeviceLine(); -_sb.runVoidMethod ("Append",(Object)(_data.getField(true,"Prefix" /*RemoteObject*/ ))); - BA.debugLineNum = 98;BA.debugLine="Dim NumberStartIndex As Int = sb.Length"; -Debug.JustUpdateDeviceLine(); -_numberstartindex = _sb.runMethod(true,"getLength");Debug.locals.put("NumberStartIndex", _numberstartindex);Debug.locals.put("NumberStartIndex", _numberstartindex); - BA.debugLineNum = 99;BA.debugLine="Dim factor As Double = Power(10, -data.MaximumFra"; -Debug.JustUpdateDeviceLine(); -_factor = RemoteObject.solve(new RemoteObject[] {b4xformatter.__c.runMethod(true,"Power",(Object)(BA.numberCast(double.class, 10)),(Object)(BA.numberCast(double.class, -(double) (0 + _data.getField(true,"MaximumFractions" /*RemoteObject*/ ).get().intValue())-(double) (0 + 1)))),RemoteObject.createImmutable(5)}, "*",0, 0);Debug.locals.put("factor", _factor);Debug.locals.put("factor", _factor); - BA.debugLineNum = 100;BA.debugLine="If Number < -factor And data.RemoveMinusSign = Fa"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("<",_number,BA.numberCast(double.class, -_factor.get().doubleValue())) && RemoteObject.solveBoolean("=",_data.getField(true,"RemoveMinusSign" /*RemoteObject*/ ),b4xformatter.__c.getField(true,"False"))) { - BA.debugLineNum = 101;BA.debugLine="sb.Append(\"-\")"; -Debug.JustUpdateDeviceLine(); -_sb.runVoidMethod ("Append",(Object)(RemoteObject.createImmutable("-"))); - BA.debugLineNum = 102;BA.debugLine="NumberStartIndex = NumberStartIndex + 1"; -Debug.JustUpdateDeviceLine(); -_numberstartindex = RemoteObject.solve(new RemoteObject[] {_numberstartindex,RemoteObject.createImmutable(1)}, "+",1, 1);Debug.locals.put("NumberStartIndex", _numberstartindex); - }; - BA.debugLineNum = 104;BA.debugLine="Number = Abs(Number) + factor"; -Debug.JustUpdateDeviceLine(); -_number = RemoteObject.solve(new RemoteObject[] {b4xformatter.__c.runMethod(true,"Abs",(Object)(_number)),_factor}, "+",1, 0);Debug.locals.put("Number", _number); - BA.debugLineNum = 105;BA.debugLine="Dim whole As Int = Number"; -Debug.JustUpdateDeviceLine(); -_whole = BA.numberCast(int.class, _number);Debug.locals.put("whole", _whole);Debug.locals.put("whole", _whole); - BA.debugLineNum = 106;BA.debugLine="Dim frac As Double = Number - whole"; -Debug.JustUpdateDeviceLine(); -_frac = RemoteObject.solve(new RemoteObject[] {_number,_whole}, "-",1, 0);Debug.locals.put("frac", _frac);Debug.locals.put("frac", _frac); - BA.debugLineNum = 107;BA.debugLine="Dim g As Int"; -Debug.JustUpdateDeviceLine(); -_g = RemoteObject.createImmutable(0);Debug.locals.put("g", _g); - BA.debugLineNum = 108;BA.debugLine="Do While whole > 0"; -Debug.JustUpdateDeviceLine(); -while (RemoteObject.solveBoolean(">",_whole,BA.numberCast(double.class, 0))) { - BA.debugLineNum = 109;BA.debugLine="If g > 0 And g Mod 3 = 0 And data.GroupingCharac"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",_g,BA.numberCast(double.class, 0)) && RemoteObject.solveBoolean("=",RemoteObject.solve(new RemoteObject[] {_g,RemoteObject.createImmutable(3)}, "%",0, 1),BA.numberCast(double.class, 0)) && RemoteObject.solveBoolean(">",_data.getField(true,"GroupingCharacter" /*RemoteObject*/ ).runMethod(true,"length"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 110;BA.debugLine="sb.Insert(NumberStartIndex, data.GroupingCharac"; -Debug.JustUpdateDeviceLine(); -_sb.runVoidMethod ("Insert",(Object)(_numberstartindex),(Object)(_data.getField(true,"GroupingCharacter" /*RemoteObject*/ ))); - }; - BA.debugLineNum = 112;BA.debugLine="g = g + 1"; -Debug.JustUpdateDeviceLine(); -_g = RemoteObject.solve(new RemoteObject[] {_g,RemoteObject.createImmutable(1)}, "+",1, 1);Debug.locals.put("g", _g); - BA.debugLineNum = 113;BA.debugLine="sb.Insert(NumberStartIndex, whole Mod 10)"; -Debug.JustUpdateDeviceLine(); -_sb.runVoidMethod ("Insert",(Object)(_numberstartindex),(Object)(BA.NumberToString(RemoteObject.solve(new RemoteObject[] {_whole,RemoteObject.createImmutable(10)}, "%",0, 1)))); - BA.debugLineNum = 114;BA.debugLine="whole = whole / 10"; -Debug.JustUpdateDeviceLine(); -_whole = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_whole,RemoteObject.createImmutable(10)}, "/",0, 0));Debug.locals.put("whole", _whole); - } -; - BA.debugLineNum = 116;BA.debugLine="Do While sb.Length - NumberStartIndex < data.Mini"; -Debug.JustUpdateDeviceLine(); -while (RemoteObject.solveBoolean("<",RemoteObject.solve(new RemoteObject[] {_sb.runMethod(true,"getLength"),_numberstartindex}, "-",1, 1),BA.numberCast(double.class, _data.getField(true,"MinimumIntegers" /*RemoteObject*/ )))) { - BA.debugLineNum = 117;BA.debugLine="sb.Insert(NumberStartIndex, data.IntegerPaddingC"; -Debug.JustUpdateDeviceLine(); -_sb.runVoidMethod ("Insert",(Object)(_numberstartindex),(Object)(_data.getField(true,"IntegerPaddingChar" /*RemoteObject*/ ))); - } -; - BA.debugLineNum = 119;BA.debugLine="If data.MaximumFractions > 0 And (data.MinimumFra"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",_data.getField(true,"MaximumFractions" /*RemoteObject*/ ),BA.numberCast(double.class, 0)) && RemoteObject.solveBoolean(".",BA.ObjectToBoolean((RemoteObject.solveBoolean(">",_data.getField(true,"MinimumFractions" /*RemoteObject*/ ),BA.numberCast(double.class, 0)) || RemoteObject.solveBoolean(">",_frac,BA.numberCast(double.class, 0)))))) { - BA.debugLineNum = 120;BA.debugLine="Dim FracStartIndex As Int = sb.Length"; -Debug.JustUpdateDeviceLine(); -_fracstartindex = _sb.runMethod(true,"getLength");Debug.locals.put("FracStartIndex", _fracstartindex);Debug.locals.put("FracStartIndex", _fracstartindex); - BA.debugLineNum = 121;BA.debugLine="Dim LastZeroCount As Int"; -Debug.JustUpdateDeviceLine(); -_lastzerocount = RemoteObject.createImmutable(0);Debug.locals.put("LastZeroCount", _lastzerocount); - BA.debugLineNum = 122;BA.debugLine="Dim Multipler As Int = 10"; -Debug.JustUpdateDeviceLine(); -_multipler = BA.numberCast(int.class, 10);Debug.locals.put("Multipler", _multipler);Debug.locals.put("Multipler", _multipler); - BA.debugLineNum = 123;BA.debugLine="Do While frac >= 2 * factor And sb.Length - Frac"; -Debug.JustUpdateDeviceLine(); -while (RemoteObject.solveBoolean("g",_frac,RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(2),_factor}, "*",0, 0)) && RemoteObject.solveBoolean("<",RemoteObject.solve(new RemoteObject[] {_sb.runMethod(true,"getLength"),_fracstartindex}, "-",1, 1),BA.numberCast(double.class, _data.getField(true,"MaximumFractions" /*RemoteObject*/ )))) { - BA.debugLineNum = 124;BA.debugLine="Dim w As Int = (frac * Multipler)"; -Debug.JustUpdateDeviceLine(); -_w = BA.numberCast(int.class, (RemoteObject.solve(new RemoteObject[] {_frac,_multipler}, "*",0, 0)));Debug.locals.put("w", _w);Debug.locals.put("w", _w); - BA.debugLineNum = 125;BA.debugLine="w = w Mod 10"; -Debug.JustUpdateDeviceLine(); -_w = RemoteObject.solve(new RemoteObject[] {_w,RemoteObject.createImmutable(10)}, "%",0, 1);Debug.locals.put("w", _w); - BA.debugLineNum = 126;BA.debugLine="If w = 0 Then LastZeroCount = LastZeroCount + 1"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_w,BA.numberCast(double.class, 0))) { -_lastzerocount = RemoteObject.solve(new RemoteObject[] {_lastzerocount,RemoteObject.createImmutable(1)}, "+",1, 1);Debug.locals.put("LastZeroCount", _lastzerocount);} -else { -_lastzerocount = BA.numberCast(int.class, 0);Debug.locals.put("LastZeroCount", _lastzerocount);}; - BA.debugLineNum = 127;BA.debugLine="sb.Append(w)"; -Debug.JustUpdateDeviceLine(); -_sb.runVoidMethod ("Append",(Object)(BA.NumberToString(_w))); - BA.debugLineNum = 128;BA.debugLine="Multipler = Multipler * 10"; -Debug.JustUpdateDeviceLine(); -_multipler = RemoteObject.solve(new RemoteObject[] {_multipler,RemoteObject.createImmutable(10)}, "*",0, 1);Debug.locals.put("Multipler", _multipler); - } -; - BA.debugLineNum = 130;BA.debugLine="If data.FractionPaddingChar <> \"0\" And LastZeroC"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("!",_data.getField(true,"FractionPaddingChar" /*RemoteObject*/ ),BA.ObjectToString("0")) && RemoteObject.solveBoolean(">",_lastzerocount,BA.numberCast(double.class, 0))) { - BA.debugLineNum = 131;BA.debugLine="sb.Remove(sb.Length - LastZeroCount, sb.Length)"; -Debug.JustUpdateDeviceLine(); -_sb.runVoidMethod ("Remove",(Object)(RemoteObject.solve(new RemoteObject[] {_sb.runMethod(true,"getLength"),_lastzerocount}, "-",1, 1)),(Object)(_sb.runMethod(true,"getLength"))); - BA.debugLineNum = 132;BA.debugLine="LastZeroCount = 0"; -Debug.JustUpdateDeviceLine(); -_lastzerocount = BA.numberCast(int.class, 0);Debug.locals.put("LastZeroCount", _lastzerocount); - }; - BA.debugLineNum = 134;BA.debugLine="Do While sb.Length - FracStartIndex < data.Minim"; -Debug.JustUpdateDeviceLine(); -while (RemoteObject.solveBoolean("<",RemoteObject.solve(new RemoteObject[] {_sb.runMethod(true,"getLength"),_fracstartindex}, "-",1, 1),BA.numberCast(double.class, _data.getField(true,"MinimumFractions" /*RemoteObject*/ )))) { - BA.debugLineNum = 135;BA.debugLine="sb.Append(data.FractionPaddingChar)"; -Debug.JustUpdateDeviceLine(); -_sb.runVoidMethod ("Append",(Object)(_data.getField(true,"FractionPaddingChar" /*RemoteObject*/ ))); - BA.debugLineNum = 136;BA.debugLine="LastZeroCount = 0"; -Debug.JustUpdateDeviceLine(); -_lastzerocount = BA.numberCast(int.class, 0);Debug.locals.put("LastZeroCount", _lastzerocount); - } -; - BA.debugLineNum = 138;BA.debugLine="LastZeroCount = Min(LastZeroCount, sb.Length - F"; -Debug.JustUpdateDeviceLine(); -_lastzerocount = BA.numberCast(int.class, b4xformatter.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, _lastzerocount)),(Object)(BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {_sb.runMethod(true,"getLength"),_fracstartindex,_data.getField(true,"MinimumFractions" /*RemoteObject*/ )}, "--",2, 1)))));Debug.locals.put("LastZeroCount", _lastzerocount); - BA.debugLineNum = 139;BA.debugLine="If LastZeroCount > 0 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",_lastzerocount,BA.numberCast(double.class, 0))) { - BA.debugLineNum = 140;BA.debugLine="sb.Remove(sb.Length - LastZeroCount, sb.Length)"; -Debug.JustUpdateDeviceLine(); -_sb.runVoidMethod ("Remove",(Object)(RemoteObject.solve(new RemoteObject[] {_sb.runMethod(true,"getLength"),_lastzerocount}, "-",1, 1)),(Object)(_sb.runMethod(true,"getLength"))); - }; - BA.debugLineNum = 142;BA.debugLine="If sb.Length > FracStartIndex Then sb.Insert(Fra"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",_sb.runMethod(true,"getLength"),BA.numberCast(double.class, _fracstartindex))) { -_sb.runVoidMethod ("Insert",(Object)(_fracstartindex),(Object)(_data.getField(true,"DecimalPoint" /*RemoteObject*/ )));}; - }; - BA.debugLineNum = 144;BA.debugLine="sb.Append(data.Postfix)"; -Debug.JustUpdateDeviceLine(); -_sb.runVoidMethod ("Append",(Object)(_data.getField(true,"Postfix" /*RemoteObject*/ ))); - BA.debugLineNum = 145;BA.debugLine="Return sb.ToString"; -Debug.JustUpdateDeviceLine(); -if (true) return _sb.runMethod(true,"ToString"); - BA.debugLineNum = 146;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _formatlabel(RemoteObject __ref,RemoteObject _number,RemoteObject _label) throws Exception{ -try { - Debug.PushSubsStack("FormatLabel (b4xformatter) ","b4xformatter",58,__ref.getField(false, "ba"),__ref,150); -if (RapidSub.canDelegate("formatlabel")) { return __ref.runUserSub(false, "b4xformatter","formatlabel", __ref, _number, _label);} -RemoteObject _data = RemoteObject.declareNull("keymon.lat.medicomed.b4xformatter._b4xformatdata"); -Debug.locals.put("Number", _number); -Debug.locals.put("Label", _label); - BA.debugLineNum = 150;BA.debugLine="Public Sub FormatLabel (Number As Double, Label As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 151;BA.debugLine="Label.Text = Format(Number)"; -Debug.JustUpdateDeviceLine(); -_label.runMethod(true,"setText",BA.ObjectToCharSequence(__ref.runClassMethod (keymon.lat.medicomed.b4xformatter.class, "_format" /*RemoteObject*/ ,(Object)(_number)))); - BA.debugLineNum = 152;BA.debugLine="Dim data As B4XFormatData = GetFormatData(Number)"; -Debug.JustUpdateDeviceLine(); -_data = __ref.runClassMethod (keymon.lat.medicomed.b4xformatter.class, "_getformatdata" /*RemoteObject*/ ,(Object)(_number));Debug.locals.put("data", _data);Debug.locals.put("data", _data); - BA.debugLineNum = 153;BA.debugLine="If data.TextColor <> 0 Then Label.TextColor = dat"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("!",_data.getField(true,"TextColor" /*RemoteObject*/ ),BA.numberCast(double.class, 0))) { -_label.runMethod(true,"setTextColor",_data.getField(true,"TextColor" /*RemoteObject*/ ));}; - BA.debugLineNum = 154;BA.debugLine="If data.FormatFont.IsInitialized Then Label.Font"; -Debug.JustUpdateDeviceLine(); -if (_data.getField(false,"FormatFont" /*RemoteObject*/ ).runMethod(true,"getIsInitialized").get().booleanValue()) { -_label.runMethod(false,"setFont",_data.getField(false,"FormatFont" /*RemoteObject*/ ));}; - BA.debugLineNum = 155;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getdefaultformat(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetDefaultFormat (b4xformatter) ","b4xformatter",58,__ref.getField(false, "ba"),__ref,78); -if (RapidSub.canDelegate("getdefaultformat")) { return __ref.runUserSub(false, "b4xformatter","getdefaultformat", __ref);} - BA.debugLineNum = 78;BA.debugLine="Public Sub GetDefaultFormat As B4XFormatData"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 79;BA.debugLine="Return formats.Get(0)"; -Debug.JustUpdateDeviceLine(); -if (true) return (__ref.getField(false,"_formats" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, 0)))); - BA.debugLineNum = 80;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getformatdata(RemoteObject __ref,RemoteObject _number) throws Exception{ -try { - Debug.PushSubsStack("GetFormatData (b4xformatter) ","b4xformatter",58,__ref.getField(false, "ba"),__ref,83); -if (RapidSub.canDelegate("getformatdata")) { return __ref.runUserSub(false, "b4xformatter","getformatdata", __ref, _number);} -int _i = 0; -RemoteObject _d = RemoteObject.declareNull("keymon.lat.medicomed.b4xformatter._b4xformatdata"); -Debug.locals.put("Number", _number); - BA.debugLineNum = 83;BA.debugLine="Public Sub GetFormatData (Number As Double) As B4X"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 84;BA.debugLine="For i = formats.Size - 1 To 1 Step - 1"; -Debug.JustUpdateDeviceLine(); -{ -final int step1 = -1; -final int limit1 = 1; -_i = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_formats" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue() ; -for (;(step1 > 0 && _i <= limit1) || (step1 < 0 && _i >= limit1) ;_i = ((int)(0 + _i + step1)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 85;BA.debugLine="Dim d As B4XFormatData = formats.Get(i)"; -Debug.JustUpdateDeviceLine(); -_d = (__ref.getField(false,"_formats" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))));Debug.locals.put("d", _d);Debug.locals.put("d", _d); - BA.debugLineNum = 86;BA.debugLine="If Number <= d.RangeEnd And Number >= d.RangeSta"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("k",_number,_d.getField(true,"RangeEnd" /*RemoteObject*/ )) && RemoteObject.solveBoolean("g",_number,_d.getField(true,"RangeStart" /*RemoteObject*/ ))) { -if (true) return _d;}; - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 88;BA.debugLine="Return formats.Get(0)"; -Debug.JustUpdateDeviceLine(); -if (true) return (__ref.getField(false,"_formats" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, 0)))); - BA.debugLineNum = 89;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xformatter) ","b4xformatter",58,__ref.getField(false, "ba"),__ref,13); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xformatter","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -RemoteObject _d = RemoteObject.declareNull("keymon.lat.medicomed.b4xformatter._b4xformatdata"); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 13;BA.debugLine="Public Sub Initialize"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 14;BA.debugLine="formats.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_formats" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 15;BA.debugLine="Dim d As B4XFormatData = CreateDefaultFormat"; -Debug.JustUpdateDeviceLine(); -_d = __ref.runClassMethod (keymon.lat.medicomed.b4xformatter.class, "_createdefaultformat" /*RemoteObject*/ );Debug.locals.put("d", _d);Debug.locals.put("d", _d); - BA.debugLineNum = 16;BA.debugLine="AddFormatData(d, MIN_VALUE, MAX_VALUE, True)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xformatter.class, "_addformatdata" /*RemoteObject*/ ,(Object)(_d),(Object)(BA.numberCast(double.class, __ref.getField(true,"_min_value" /*RemoteObject*/ ))),(Object)(BA.numberCast(double.class, __ref.getField(true,"_max_value" /*RemoteObject*/ ))),(Object)(b4xformatter.__c.getField(true,"True"))); - BA.debugLineNum = 17;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _newformatdata(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("NewFormatData (b4xformatter) ","b4xformatter",58,__ref.getField(false, "ba"),__ref,32); -if (RapidSub.canDelegate("newformatdata")) { return __ref.runUserSub(false, "b4xformatter","newformatdata", __ref);} - BA.debugLineNum = 32;BA.debugLine="Public Sub NewFormatData As B4XFormatData"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 33;BA.debugLine="Return CopyFormatData(GetDefaultFormat)"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.runClassMethod (keymon.lat.medicomed.b4xformatter.class, "_copyformatdata" /*RemoteObject*/ ,(Object)(__ref.runClassMethod (keymon.lat.medicomed.b4xformatter.class, "_getdefaultformat" /*RemoteObject*/ ))); - BA.debugLineNum = 34;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4ximageview.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4ximageview.java deleted file mode 100644 index bb7a08e..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4ximageview.java +++ /dev/null @@ -1,40 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4ximageview { - public static RemoteObject myClass; - public b4ximageview() { - } - public static PCBA staticBA = new PCBA(null, b4ximageview.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _meventname = RemoteObject.createImmutable(""); -public static RemoteObject _mcallback = RemoteObject.declareNull("Object"); -public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _tag = RemoteObject.declareNull("Object"); -public static RemoteObject _iv = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _mresizemode = RemoteObject.createImmutable(""); -public static RemoteObject _mround = RemoteObject.createImmutable(false); -public static RemoteObject _mbitmap = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper"); -public static RemoteObject _mbackgroundcolor = RemoteObject.createImmutable(0); -public static RemoteObject _mcornersradius = RemoteObject.createImmutable(0); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"DateUtils",_ref.getField(false, "_dateutils"),"iv",_ref.getField(false, "_iv"),"mBackgroundColor",_ref.getField(false, "_mbackgroundcolor"),"mBase",_ref.getField(false, "_mbase"),"mBitmap",_ref.getField(false, "_mbitmap"),"mCallBack",_ref.getField(false, "_mcallback"),"mCornersRadius",_ref.getField(false, "_mcornersradius"),"mEventName",_ref.getField(false, "_meventname"),"mResizeMode",_ref.getField(false, "_mresizemode"),"mRound",_ref.getField(false, "_mround"),"Tag",_ref.getField(false, "_tag"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4ximageview_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4ximageview_subs_0.java deleted file mode 100644 index 56c9d79..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4ximageview_subs_0.java +++ /dev/null @@ -1,497 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4ximageview_subs_0 { - - -public static RemoteObject _base_resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("Base_Resize (b4ximageview) ","b4ximageview",45,__ref.getField(false, "ba"),__ref,40); -if (RapidSub.canDelegate("base_resize")) { return __ref.runUserSub(false, "b4ximageview","base_resize", __ref, _width, _height);} -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 40;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 41;BA.debugLine="Update"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4ximageview.class, "_update" /*RemoteObject*/ ); - BA.debugLineNum = 42;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 5;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 6;BA.debugLine="Private mEventName As String 'ignore"; -b4ximageview._meventname = RemoteObject.createImmutable("");__ref.setField("_meventname",b4ximageview._meventname); - //BA.debugLineNum = 7;BA.debugLine="Private mCallBack As Object 'ignore"; -b4ximageview._mcallback = RemoteObject.createNew ("Object");__ref.setField("_mcallback",b4ximageview._mcallback); - //BA.debugLineNum = 8;BA.debugLine="Public mBase As B4XView"; -b4ximageview._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",b4ximageview._mbase); - //BA.debugLineNum = 9;BA.debugLine="Private xui As XUI 'ignore"; -b4ximageview._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",b4ximageview._xui); - //BA.debugLineNum = 10;BA.debugLine="Public Tag As Object"; -b4ximageview._tag = RemoteObject.createNew ("Object");__ref.setField("_tag",b4ximageview._tag); - //BA.debugLineNum = 11;BA.debugLine="Private iv As B4XView"; -b4ximageview._iv = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_iv",b4ximageview._iv); - //BA.debugLineNum = 12;BA.debugLine="Private mResizeMode As String"; -b4ximageview._mresizemode = RemoteObject.createImmutable("");__ref.setField("_mresizemode",b4ximageview._mresizemode); - //BA.debugLineNum = 13;BA.debugLine="Private mRound As Boolean"; -b4ximageview._mround = RemoteObject.createImmutable(false);__ref.setField("_mround",b4ximageview._mround); - //BA.debugLineNum = 14;BA.debugLine="Private mBitmap As B4XBitmap"; -b4ximageview._mbitmap = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper");__ref.setField("_mbitmap",b4ximageview._mbitmap); - //BA.debugLineNum = 15;BA.debugLine="Public mBackgroundColor As Int"; -b4ximageview._mbackgroundcolor = RemoteObject.createImmutable(0);__ref.setField("_mbackgroundcolor",b4ximageview._mbackgroundcolor); - //BA.debugLineNum = 16;BA.debugLine="Private mCornersRadius As Int"; -b4ximageview._mcornersradius = RemoteObject.createImmutable(0);__ref.setField("_mcornersradius",b4ximageview._mcornersradius); - //BA.debugLineNum = 17;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _clear(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Clear (b4ximageview) ","b4ximageview",45,__ref.getField(false, "ba"),__ref,119); -if (RapidSub.canDelegate("clear")) { return __ref.runUserSub(false, "b4ximageview","clear", __ref);} - BA.debugLineNum = 119;BA.debugLine="Public Sub Clear"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 120;BA.debugLine="mBitmap = Null"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbitmap" /*RemoteObject*/ ).setObject (b4ximageview.__c.getField(false,"Null")); - BA.debugLineNum = 121;BA.debugLine="iv.SetBitmap(Null)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_iv" /*RemoteObject*/ ).runVoidMethod ("SetBitmap",(Object)((b4ximageview.__c.getField(false,"Null")))); - BA.debugLineNum = 122;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _designercreateview(RemoteObject __ref,RemoteObject _base,RemoteObject _lbl,RemoteObject _props) throws Exception{ -try { - Debug.PushSubsStack("DesignerCreateView (b4ximageview) ","b4ximageview",45,__ref.getField(false, "ba"),__ref,25); -if (RapidSub.canDelegate("designercreateview")) { return __ref.runUserSub(false, "b4ximageview","designercreateview", __ref, _base, _lbl, _props);} -RemoteObject _iiv = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -Debug.locals.put("Base", _base); -Debug.locals.put("Lbl", _lbl); -Debug.locals.put("Props", _props); - BA.debugLineNum = 25;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 26;BA.debugLine="mBase = Base"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).setObject (_base); - BA.debugLineNum = 27;BA.debugLine="Tag = mBase.Tag"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_tag" /*RemoteObject*/ ,__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"getTag")); - BA.debugLineNum = 28;BA.debugLine="mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"setTag",__ref); - BA.debugLineNum = 29;BA.debugLine="Dim iiv As ImageView"; -Debug.JustUpdateDeviceLine(); -_iiv = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");Debug.locals.put("iiv", _iiv); - BA.debugLineNum = 30;BA.debugLine="iiv.Initialize(\"\")"; -Debug.JustUpdateDeviceLine(); -_iiv.runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable(""))); - BA.debugLineNum = 31;BA.debugLine="iv = iiv"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_iv" /*RemoteObject*/ ).setObject (_iiv.getObject()); - BA.debugLineNum = 32;BA.debugLine="mRound =Props.Get(\"Round\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mround" /*RemoteObject*/ ,BA.ObjectToBoolean(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("Round")))))); - BA.debugLineNum = 33;BA.debugLine="mResizeMode = Props.Get(\"ResizeMode\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mresizemode" /*RemoteObject*/ ,BA.ObjectToString(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("ResizeMode")))))); - BA.debugLineNum = 34;BA.debugLine="mBackgroundColor = xui.PaintOrColorToColor(Props."; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mbackgroundcolor" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("BackgroundColor"))))))); - BA.debugLineNum = 35;BA.debugLine="mCornersRadius = DipToCurrent(Props.GetDefault(\"C"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mcornersradius" /*RemoteObject*/ ,b4ximageview.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, _props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("CornersRadius"))),(Object)(RemoteObject.createImmutable((0)))))))); - BA.debugLineNum = 36;BA.debugLine="mBase.AddView(iv, 0, 0, mBase.Width, mBase.Height"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_iv" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"))); - BA.debugLineNum = 37;BA.debugLine="Update"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4ximageview.class, "_update" /*RemoteObject*/ ); - BA.debugLineNum = 38;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getbitmap(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getBitmap (b4ximageview) ","b4ximageview",45,__ref.getField(false, "ba"),__ref,130); -if (RapidSub.canDelegate("getbitmap")) { return __ref.runUserSub(false, "b4ximageview","getbitmap", __ref);} - BA.debugLineNum = 130;BA.debugLine="Public Sub getBitmap As B4XBitmap"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 131;BA.debugLine="Return mBitmap"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_mbitmap" /*RemoteObject*/ ); - BA.debugLineNum = 132;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getcornersradius(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getCornersRadius (b4ximageview) ","b4ximageview",45,__ref.getField(false, "ba"),__ref,56); -if (RapidSub.canDelegate("getcornersradius")) { return __ref.runUserSub(false, "b4ximageview","getcornersradius", __ref);} - BA.debugLineNum = 56;BA.debugLine="Public Sub getCornersRadius As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 57;BA.debugLine="Return mCornersRadius"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_mcornersradius" /*RemoteObject*/ ); - BA.debugLineNum = 58;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getresizemode(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getResizeMode (b4ximageview) ","b4ximageview",45,__ref.getField(false, "ba"),__ref,67); -if (RapidSub.canDelegate("getresizemode")) { return __ref.runUserSub(false, "b4ximageview","getresizemode", __ref);} - BA.debugLineNum = 67;BA.debugLine="Public Sub getResizeMode As String"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 68;BA.debugLine="Return mResizeMode"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_mresizemode" /*RemoteObject*/ ); - BA.debugLineNum = 69;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getroundedimage(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getRoundedImage (b4ximageview) ","b4ximageview",45,__ref.getField(false, "ba"),__ref,45); -if (RapidSub.canDelegate("getroundedimage")) { return __ref.runUserSub(false, "b4ximageview","getroundedimage", __ref);} - BA.debugLineNum = 45;BA.debugLine="Public Sub getRoundedImage As Boolean"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 46;BA.debugLine="Return mRound"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_mround" /*RemoteObject*/ ); - BA.debugLineNum = 47;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _callback,RemoteObject _eventname) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4ximageview) ","b4ximageview",45,__ref.getField(false, "ba"),__ref,19); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4ximageview","initialize", __ref, _ba, _callback, _eventname);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); -Debug.locals.put("Callback", _callback); -Debug.locals.put("EventName", _eventname); - BA.debugLineNum = 19;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 20;BA.debugLine="mEventName = EventName"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_meventname" /*RemoteObject*/ ,_eventname); - BA.debugLineNum = 21;BA.debugLine="mCallBack = Callback"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mcallback" /*RemoteObject*/ ,_callback); - BA.debugLineNum = 22;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _load(RemoteObject __ref,RemoteObject _dir,RemoteObject _filename) throws Exception{ -try { - Debug.PushSubsStack("Load (b4ximageview) ","b4ximageview",45,__ref.getField(false, "ba"),__ref,110); -if (RapidSub.canDelegate("load")) { return __ref.runUserSub(false, "b4ximageview","load", __ref, _dir, _filename);} -Debug.locals.put("Dir", _dir); -Debug.locals.put("FileName", _filename); - BA.debugLineNum = 110;BA.debugLine="Public Sub Load (Dir As String, FileName As String"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 112;BA.debugLine="setBitmap(LoadBitmapSample(Dir, FileName, mBase.W"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4ximageview.class, "_setbitmap" /*RemoteObject*/ ,RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper"), b4ximageview.__c.runMethod(false,"LoadBitmapSample",(Object)(_dir),(Object)(_filename),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"))).getObject())); - BA.debugLineNum = 116;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setbitmap(RemoteObject __ref,RemoteObject _bmp) throws Exception{ -try { - Debug.PushSubsStack("setBitmap (b4ximageview) ","b4ximageview",45,__ref.getField(false, "ba"),__ref,124); -if (RapidSub.canDelegate("setbitmap")) { return __ref.runUserSub(false, "b4ximageview","setbitmap", __ref, _bmp);} -Debug.locals.put("Bmp", _bmp); - BA.debugLineNum = 124;BA.debugLine="Public Sub setBitmap(Bmp As B4XBitmap)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 125;BA.debugLine="mBitmap = Bmp"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mbitmap" /*RemoteObject*/ ,_bmp); - BA.debugLineNum = 126;BA.debugLine="XUIViewsUtils.SetBitmapAndFill(iv, Bmp)"; -Debug.JustUpdateDeviceLine(); -b4ximageview._xuiviewsutils.runVoidMethod ("_setbitmapandfill" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_iv" /*RemoteObject*/ )),(Object)(_bmp)); - BA.debugLineNum = 127;BA.debugLine="Update"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4ximageview.class, "_update" /*RemoteObject*/ ); - BA.debugLineNum = 128;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setcornersradius(RemoteObject __ref,RemoteObject _i) throws Exception{ -try { - Debug.PushSubsStack("setCornersRadius (b4ximageview) ","b4ximageview",45,__ref.getField(false, "ba"),__ref,60); -if (RapidSub.canDelegate("setcornersradius")) { return __ref.runUserSub(false, "b4ximageview","setcornersradius", __ref, _i);} -Debug.locals.put("i", _i); - BA.debugLineNum = 60;BA.debugLine="Public Sub setCornersRadius (i As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 61;BA.debugLine="mCornersRadius = i"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mcornersradius" /*RemoteObject*/ ,_i); - BA.debugLineNum = 62;BA.debugLine="UpdateClip"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4ximageview.class, "_updateclip" /*RemoteObject*/ ); - BA.debugLineNum = 63;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setresizemode(RemoteObject __ref,RemoteObject _s) throws Exception{ -try { - Debug.PushSubsStack("setResizeMode (b4ximageview) ","b4ximageview",45,__ref.getField(false, "ba"),__ref,71); -if (RapidSub.canDelegate("setresizemode")) { return __ref.runUserSub(false, "b4ximageview","setresizemode", __ref, _s);} -Debug.locals.put("s", _s); - BA.debugLineNum = 71;BA.debugLine="Public Sub setResizeMode(s As String)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 72;BA.debugLine="If s = mResizeMode Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_s,__ref.getField(true,"_mresizemode" /*RemoteObject*/ ))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 73;BA.debugLine="mResizeMode = s"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mresizemode" /*RemoteObject*/ ,_s); - BA.debugLineNum = 74;BA.debugLine="Update"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4ximageview.class, "_update" /*RemoteObject*/ ); - BA.debugLineNum = 75;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setroundedimage(RemoteObject __ref,RemoteObject _b) throws Exception{ -try { - Debug.PushSubsStack("setRoundedImage (b4ximageview) ","b4ximageview",45,__ref.getField(false, "ba"),__ref,49); -if (RapidSub.canDelegate("setroundedimage")) { return __ref.runUserSub(false, "b4ximageview","setroundedimage", __ref, _b);} -Debug.locals.put("b", _b); - BA.debugLineNum = 49;BA.debugLine="Public Sub setRoundedImage (b As Boolean)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 50;BA.debugLine="If b = mRound Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_b,__ref.getField(true,"_mround" /*RemoteObject*/ ))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 51;BA.debugLine="mRound = b"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mround" /*RemoteObject*/ ,_b); - BA.debugLineNum = 52;BA.debugLine="UpdateClip"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4ximageview.class, "_updateclip" /*RemoteObject*/ ); - BA.debugLineNum = 53;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _update(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Update (b4ximageview) ","b4ximageview",45,__ref.getField(false, "ba"),__ref,77); -if (RapidSub.canDelegate("update")) { return __ref.runUserSub(false, "b4ximageview","update", __ref);} -RemoteObject _imageviewwidth = RemoteObject.createImmutable(0f); -RemoteObject _imageviewheight = RemoteObject.createImmutable(0f); -RemoteObject _bmpratio = RemoteObject.createImmutable(0f); -RemoteObject _r = RemoteObject.createImmutable(0f); - BA.debugLineNum = 77;BA.debugLine="Public Sub Update"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 78;BA.debugLine="If mBitmap.IsInitialized = False Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_mbitmap" /*RemoteObject*/ ).runMethod(true,"IsInitialized"),b4ximageview.__c.getField(true,"False"))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 79;BA.debugLine="UpdateClip"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4ximageview.class, "_updateclip" /*RemoteObject*/ ); - BA.debugLineNum = 80;BA.debugLine="Dim ImageViewWidth, ImageViewHeight As Float"; -Debug.JustUpdateDeviceLine(); -_imageviewwidth = RemoteObject.createImmutable(0f);Debug.locals.put("ImageViewWidth", _imageviewwidth); -_imageviewheight = RemoteObject.createImmutable(0f);Debug.locals.put("ImageViewHeight", _imageviewheight); - BA.debugLineNum = 81;BA.debugLine="Dim bmpRatio As Float = mBitmap.Width / mBitmap.H"; -Debug.JustUpdateDeviceLine(); -_bmpratio = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbitmap" /*RemoteObject*/ ).runMethod(true,"getWidth"),__ref.getField(false,"_mbitmap" /*RemoteObject*/ ).runMethod(true,"getHeight")}, "/",0, 0));Debug.locals.put("bmpRatio", _bmpratio);Debug.locals.put("bmpRatio", _bmpratio); - BA.debugLineNum = 82;BA.debugLine="Select mResizeMode"; -Debug.JustUpdateDeviceLine(); -switch (BA.switchObjectToInt(__ref.getField(true,"_mresizemode" /*RemoteObject*/ ),BA.ObjectToString("FILL"),BA.ObjectToString("FIT"),BA.ObjectToString("FILL_WIDTH"),BA.ObjectToString("FILL_HEIGHT"),BA.ObjectToString("FILL_NO_DISTORTIONS"),BA.ObjectToString("NONE"))) { -case 0: { - BA.debugLineNum = 84;BA.debugLine="ImageViewWidth = mBase.Width"; -Debug.JustUpdateDeviceLine(); -_imageviewwidth = BA.numberCast(float.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"));Debug.locals.put("ImageViewWidth", _imageviewwidth); - BA.debugLineNum = 85;BA.debugLine="ImageViewHeight = mBase.Height"; -Debug.JustUpdateDeviceLine(); -_imageviewheight = BA.numberCast(float.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"));Debug.locals.put("ImageViewHeight", _imageviewheight); - break; } -case 1: { - BA.debugLineNum = 87;BA.debugLine="Dim r As Float = Min(mBase.Width / mBitmap.Widt"; -Debug.JustUpdateDeviceLine(); -_r = BA.numberCast(float.class, b4ximageview.__c.runMethod(true,"Min",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"),__ref.getField(false,"_mbitmap" /*RemoteObject*/ ).runMethod(true,"getWidth")}, "/",0, 0)),(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"),__ref.getField(false,"_mbitmap" /*RemoteObject*/ ).runMethod(true,"getHeight")}, "/",0, 0))));Debug.locals.put("r", _r);Debug.locals.put("r", _r); - BA.debugLineNum = 88;BA.debugLine="ImageViewWidth = mBitmap.Width * r"; -Debug.JustUpdateDeviceLine(); -_imageviewwidth = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbitmap" /*RemoteObject*/ ).runMethod(true,"getWidth"),_r}, "*",0, 0));Debug.locals.put("ImageViewWidth", _imageviewwidth); - BA.debugLineNum = 89;BA.debugLine="ImageViewHeight = mBitmap.Height * r"; -Debug.JustUpdateDeviceLine(); -_imageviewheight = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbitmap" /*RemoteObject*/ ).runMethod(true,"getHeight"),_r}, "*",0, 0));Debug.locals.put("ImageViewHeight", _imageviewheight); - break; } -case 2: { - BA.debugLineNum = 91;BA.debugLine="ImageViewWidth = mBase.Width"; -Debug.JustUpdateDeviceLine(); -_imageviewwidth = BA.numberCast(float.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"));Debug.locals.put("ImageViewWidth", _imageviewwidth); - BA.debugLineNum = 92;BA.debugLine="ImageViewHeight = ImageViewWidth / bmpRatio"; -Debug.JustUpdateDeviceLine(); -_imageviewheight = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_imageviewwidth,_bmpratio}, "/",0, 0));Debug.locals.put("ImageViewHeight", _imageviewheight); - break; } -case 3: { - BA.debugLineNum = 94;BA.debugLine="ImageViewHeight = mBase.Height"; -Debug.JustUpdateDeviceLine(); -_imageviewheight = BA.numberCast(float.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"));Debug.locals.put("ImageViewHeight", _imageviewheight); - BA.debugLineNum = 95;BA.debugLine="ImageViewWidth = ImageViewHeight * bmpRatio"; -Debug.JustUpdateDeviceLine(); -_imageviewwidth = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_imageviewheight,_bmpratio}, "*",0, 0));Debug.locals.put("ImageViewWidth", _imageviewwidth); - break; } -case 4: { - BA.debugLineNum = 97;BA.debugLine="Dim r As Float = Max(mBase.Width / mBitmap.Widt"; -Debug.JustUpdateDeviceLine(); -_r = BA.numberCast(float.class, b4ximageview.__c.runMethod(true,"Max",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"),__ref.getField(false,"_mbitmap" /*RemoteObject*/ ).runMethod(true,"getWidth")}, "/",0, 0)),(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"),__ref.getField(false,"_mbitmap" /*RemoteObject*/ ).runMethod(true,"getHeight")}, "/",0, 0))));Debug.locals.put("r", _r);Debug.locals.put("r", _r); - BA.debugLineNum = 98;BA.debugLine="ImageViewWidth = mBitmap.Width * r"; -Debug.JustUpdateDeviceLine(); -_imageviewwidth = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbitmap" /*RemoteObject*/ ).runMethod(true,"getWidth"),_r}, "*",0, 0));Debug.locals.put("ImageViewWidth", _imageviewwidth); - BA.debugLineNum = 99;BA.debugLine="ImageViewHeight = mBitmap.Height * r"; -Debug.JustUpdateDeviceLine(); -_imageviewheight = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbitmap" /*RemoteObject*/ ).runMethod(true,"getHeight"),_r}, "*",0, 0));Debug.locals.put("ImageViewHeight", _imageviewheight); - break; } -case 5: { - BA.debugLineNum = 101;BA.debugLine="ImageViewWidth = mBitmap.Width"; -Debug.JustUpdateDeviceLine(); -_imageviewwidth = BA.numberCast(float.class, __ref.getField(false,"_mbitmap" /*RemoteObject*/ ).runMethod(true,"getWidth"));Debug.locals.put("ImageViewWidth", _imageviewwidth); - BA.debugLineNum = 102;BA.debugLine="ImageViewHeight = mBitmap.Height"; -Debug.JustUpdateDeviceLine(); -_imageviewheight = BA.numberCast(float.class, __ref.getField(false,"_mbitmap" /*RemoteObject*/ ).runMethod(true,"getHeight"));Debug.locals.put("ImageViewHeight", _imageviewheight); - break; } -default: { - BA.debugLineNum = 104;BA.debugLine="Log(\"Invalid resize mode: \" & mResizeMode)"; -Debug.JustUpdateDeviceLine(); -b4ximageview.__c.runVoidMethod ("LogImpl","953411867",RemoteObject.concat(RemoteObject.createImmutable("Invalid resize mode: "),__ref.getField(true,"_mresizemode" /*RemoteObject*/ )),0); - break; } -} -; - BA.debugLineNum = 106;BA.debugLine="iv.SetLayoutAnimated(0, Round(mBase.Width / 2 - I"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_iv" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, b4ximageview.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2),_imageviewwidth,RemoteObject.createImmutable(2)}, "/-/",1, 0))))),(Object)(BA.numberCast(int.class, b4ximageview.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"),RemoteObject.createImmutable(2),_imageviewheight,RemoteObject.createImmutable(2)}, "/-/",1, 0))))),(Object)(BA.numberCast(int.class, b4ximageview.__c.runMethod(true,"Round",(Object)(BA.numberCast(double.class, _imageviewwidth))))),(Object)(BA.numberCast(int.class, b4ximageview.__c.runMethod(true,"Round",(Object)(BA.numberCast(double.class, _imageviewheight)))))); - BA.debugLineNum = 107;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _updateclip(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("UpdateClip (b4ximageview) ","b4ximageview",45,__ref.getField(false, "ba"),__ref,135); -if (RapidSub.canDelegate("updateclip")) { return __ref.runUserSub(false, "b4ximageview","updateclip", __ref);} -RemoteObject _jo = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); - BA.debugLineNum = 135;BA.debugLine="Private Sub UpdateClip"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 136;BA.debugLine="If mRound Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_mround" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 137;BA.debugLine="mBase.SetColorAndBorder(mBackgroundColor, 0, 0,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetColorAndBorder",(Object)(__ref.getField(true,"_mbackgroundcolor" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, b4ximageview.__c.runMethod(true,"Min",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0)),(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"),RemoteObject.createImmutable(2)}, "/",0, 0)))))); - }else { - BA.debugLineNum = 139;BA.debugLine="mBase.SetColorAndBorder(mBackgroundColor, 0, 0,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetColorAndBorder",(Object)(__ref.getField(true,"_mbackgroundcolor" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(true,"_mcornersradius" /*RemoteObject*/ ))); - }; - BA.debugLineNum = 161;BA.debugLine="Dim jo As JavaObject = mBase"; -Debug.JustUpdateDeviceLine(); -_jo = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_jo = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), __ref.getField(false,"_mbase" /*RemoteObject*/ ).getObject());Debug.locals.put("jo", _jo);Debug.locals.put("jo", _jo); - BA.debugLineNum = 162;BA.debugLine="jo.RunMethod(\"setClipToOutline\", Array(mRound Or"; -Debug.JustUpdateDeviceLine(); -_jo.runVoidMethod ("RunMethod",(Object)(BA.ObjectToString("setClipToOutline")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {RemoteObject.createImmutable((RemoteObject.solveBoolean(".",__ref.getField(true,"_mround" /*RemoteObject*/ )) || RemoteObject.solveBoolean(">",__ref.getField(true,"_mcornersradius" /*RemoteObject*/ ),BA.numberCast(double.class, 0))))}))); - BA.debugLineNum = 164;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xinputtemplate.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xinputtemplate.java deleted file mode 100644 index 5136346..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xinputtemplate.java +++ /dev/null @@ -1,40 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xinputtemplate { - public static RemoteObject myClass; - public b4xinputtemplate() { - } - public static PCBA staticBA = new PCBA(null, b4xinputtemplate.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _text = RemoteObject.createImmutable(""); -public static RemoteObject _xdialog = RemoteObject.declareNull("keymon.lat.medicomed.b4xdialog"); -public static RemoteObject _regexpattern = RemoteObject.createImmutable(""); -public static RemoteObject _textfield1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _lbltitle = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _ime = RemoteObject.declareNull("anywheresoftware.b4a.objects.IME"); -public static RemoteObject _mallowdecimals = RemoteObject.createImmutable(false); -public static RemoteObject _bordercolor = RemoteObject.createImmutable(0); -public static RemoteObject _bordercolorinvalid = RemoteObject.createImmutable(0); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"BorderColor",_ref.getField(false, "_bordercolor"),"BorderColorInvalid",_ref.getField(false, "_bordercolorinvalid"),"DateUtils",_ref.getField(false, "_dateutils"),"IME",_ref.getField(false, "_ime"),"lblTitle",_ref.getField(false, "_lbltitle"),"mAllowDecimals",_ref.getField(false, "_mallowdecimals"),"mBase",_ref.getField(false, "_mbase"),"RegexPattern",_ref.getField(false, "_regexpattern"),"Text",_ref.getField(false, "_text"),"TextField1",_ref.getField(false, "_textfield1"),"xDialog",_ref.getField(false, "_xdialog"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xinputtemplate_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xinputtemplate_subs_0.java deleted file mode 100644 index 354c499..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xinputtemplate_subs_0.java +++ /dev/null @@ -1,457 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xinputtemplate_subs_0 { - - -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Private xui As XUI"; -b4xinputtemplate._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",b4xinputtemplate._xui); - //BA.debugLineNum = 3;BA.debugLine="Public mBase As B4XView"; -b4xinputtemplate._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",b4xinputtemplate._mbase); - //BA.debugLineNum = 4;BA.debugLine="Public Text As String"; -b4xinputtemplate._text = RemoteObject.createImmutable("");__ref.setField("_text",b4xinputtemplate._text); - //BA.debugLineNum = 5;BA.debugLine="Private xDialog As B4XDialog"; -b4xinputtemplate._xdialog = RemoteObject.createNew ("keymon.lat.medicomed.b4xdialog");__ref.setField("_xdialog",b4xinputtemplate._xdialog); - //BA.debugLineNum = 6;BA.debugLine="Public RegexPattern As String"; -b4xinputtemplate._regexpattern = RemoteObject.createImmutable("");__ref.setField("_regexpattern",b4xinputtemplate._regexpattern); - //BA.debugLineNum = 7;BA.debugLine="Public TextField1 As B4XView"; -b4xinputtemplate._textfield1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_textfield1",b4xinputtemplate._textfield1); - //BA.debugLineNum = 8;BA.debugLine="Public lblTitle As B4XView"; -b4xinputtemplate._lbltitle = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_lbltitle",b4xinputtemplate._lbltitle); - //BA.debugLineNum = 10;BA.debugLine="Private IME As IME"; -b4xinputtemplate._ime = RemoteObject.createNew ("anywheresoftware.b4a.objects.IME");__ref.setField("_ime",b4xinputtemplate._ime); - //BA.debugLineNum = 12;BA.debugLine="Private mAllowDecimals As Boolean"; -b4xinputtemplate._mallowdecimals = RemoteObject.createImmutable(false);__ref.setField("_mallowdecimals",b4xinputtemplate._mallowdecimals); - //BA.debugLineNum = 13;BA.debugLine="Private BorderColor = xui.Color_White, BorderColo"; -b4xinputtemplate._bordercolor = __ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_White");__ref.setField("_bordercolor",b4xinputtemplate._bordercolor); -b4xinputtemplate._bordercolorinvalid = __ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Red");__ref.setField("_bordercolorinvalid",b4xinputtemplate._bordercolorinvalid); - //BA.debugLineNum = 14;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _configurefornumbers(RemoteObject __ref,RemoteObject _allowdecimals,RemoteObject _allownegative) throws Exception{ -try { - Debug.PushSubsStack("ConfigureForNumbers (b4xinputtemplate) ","b4xinputtemplate",46,__ref.getField(false, "ba"),__ref,40); -if (RapidSub.canDelegate("configurefornumbers")) { return __ref.runUserSub(false, "b4xinputtemplate","configurefornumbers", __ref, _allowdecimals, _allownegative);} -RemoteObject _et = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -Debug.locals.put("AllowDecimals", _allowdecimals); -Debug.locals.put("AllowNegative", _allownegative); - BA.debugLineNum = 40;BA.debugLine="Public Sub ConfigureForNumbers (AllowDecimals As B"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 42;BA.debugLine="Dim et As EditText = TextField1"; -Debug.JustUpdateDeviceLine(); -_et = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper"); -_et = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.EditTextWrapper"), __ref.getField(false,"_textfield1" /*RemoteObject*/ ).getObject());Debug.locals.put("et", _et);Debug.locals.put("et", _et); - BA.debugLineNum = 43;BA.debugLine="If AllowDecimals Or AllowNegative Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(".",_allowdecimals) || RemoteObject.solveBoolean(".",_allownegative)) { - BA.debugLineNum = 44;BA.debugLine="et.InputType = et.INPUT_TYPE_DECIMAL_NUMBERS"; -Debug.JustUpdateDeviceLine(); -_et.runMethod(true,"setInputType",_et.getField(true,"INPUT_TYPE_DECIMAL_NUMBERS")); - }else { - BA.debugLineNum = 46;BA.debugLine="et.InputType = et.INPUT_TYPE_NUMBERS"; -Debug.JustUpdateDeviceLine(); -_et.runMethod(true,"setInputType",_et.getField(true,"INPUT_TYPE_NUMBERS")); - }; - BA.debugLineNum = 59;BA.debugLine="If AllowDecimals And AllowNegative Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(".",_allowdecimals) && RemoteObject.solveBoolean(".",_allownegative)) { - BA.debugLineNum = 60;BA.debugLine="RegexPattern = \"^-?(0|[1-9]\\d*)?(\\.\\d+)?(?<=\\d)$"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_regexpattern" /*RemoteObject*/ ,BA.ObjectToString("^-?(0|[1-9]\\d*)?(\\.\\d+)?(?<=\\d)$")); - }else -{ BA.debugLineNum = 61;BA.debugLine="Else If AllowDecimals And AllowNegative = False T"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(".",_allowdecimals) && RemoteObject.solveBoolean("=",_allownegative,b4xinputtemplate.__c.getField(true,"False"))) { - BA.debugLineNum = 62;BA.debugLine="RegexPattern = \"^(0|[1-9]\\d*)?(\\.\\d+)?(?<=\\d)$\""; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_regexpattern" /*RemoteObject*/ ,BA.ObjectToString("^(0|[1-9]\\d*)?(\\.\\d+)?(?<=\\d)$")); - }else -{ BA.debugLineNum = 63;BA.debugLine="Else If AllowDecimals = False And AllowNegative ="; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_allowdecimals,b4xinputtemplate.__c.getField(true,"False")) && RemoteObject.solveBoolean("=",_allownegative,b4xinputtemplate.__c.getField(true,"True"))) { - BA.debugLineNum = 64;BA.debugLine="RegexPattern = \"^-?(0|[1-9]\\d*)$\""; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_regexpattern" /*RemoteObject*/ ,BA.ObjectToString("^-?(0|[1-9]\\d*)$")); - }else -{ BA.debugLineNum = 65;BA.debugLine="Else If AllowDecimals = False And AllowNegative ="; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_allowdecimals,b4xinputtemplate.__c.getField(true,"False")) && RemoteObject.solveBoolean("=",_allownegative,b4xinputtemplate.__c.getField(true,"False"))) { - BA.debugLineNum = 66;BA.debugLine="RegexPattern = \"^(0|[1-9]\\d*)$\""; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_regexpattern" /*RemoteObject*/ ,BA.ObjectToString("^(0|[1-9]\\d*)$")); - }}}} -; - BA.debugLineNum = 68;BA.debugLine="mAllowDecimals = AllowDecimals"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mallowdecimals" /*RemoteObject*/ ,_allowdecimals); - BA.debugLineNum = 69;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _dialogclosed(RemoteObject __ref,RemoteObject _result) throws Exception{ -try { - Debug.PushSubsStack("DialogClosed (b4xinputtemplate) ","b4xinputtemplate",46,__ref.getField(false, "ba"),__ref,137); -if (RapidSub.canDelegate("dialogclosed")) { return __ref.runUserSub(false, "b4xinputtemplate","dialogclosed", __ref, _result);} -Debug.locals.put("Result", _result); - BA.debugLineNum = 137;BA.debugLine="Private Sub DialogClosed(Result As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 138;BA.debugLine="If Result = xui.DialogResponse_Positive Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_result,BA.numberCast(double.class, __ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"DialogResponse_Positive")))) { - BA.debugLineNum = 139;BA.debugLine="Text = TextField1.Text"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_text" /*RemoteObject*/ ,__ref.getField(false,"_textfield1" /*RemoteObject*/ ).runMethod(true,"getText")); - }; - BA.debugLineNum = 141;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getpanel(RemoteObject __ref,RemoteObject _dialog) throws Exception{ -try { - Debug.PushSubsStack("GetPanel (b4xinputtemplate) ","b4xinputtemplate",46,__ref.getField(false, "ba"),__ref,116); -if (RapidSub.canDelegate("getpanel")) { return __ref.runUserSub(false, "b4xinputtemplate","getpanel", __ref, _dialog);} -Debug.locals.put("Dialog", _dialog); - BA.debugLineNum = 116;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 117;BA.debugLine="Return mBase"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_mbase" /*RemoteObject*/ ); - BA.debugLineNum = 118;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xinputtemplate) ","b4xinputtemplate",46,__ref.getField(false, "ba"),__ref,16); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xinputtemplate","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -RemoteObject _jo = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 16;BA.debugLine="Public Sub Initialize"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 17;BA.debugLine="mBase = xui.CreatePanel(\"mBase\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mbase" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("mBase")))); - BA.debugLineNum = 18;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, 300dip, 80dip)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(b4xinputtemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 300)))),(Object)(b4xinputtemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 80))))); - BA.debugLineNum = 19;BA.debugLine="mBase.LoadLayout(\"B4XInputTemplate\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("B4XInputTemplate")),__ref.getField(false, "ba")); - BA.debugLineNum = 20;BA.debugLine="TextField1.TextColor = xui.Color_White"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_textfield1" /*RemoteObject*/ ).runMethod(true,"setTextColor",__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_White")); - BA.debugLineNum = 22;BA.debugLine="IME.Initialize(\"\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_ime" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(RemoteObject.createImmutable(""))); - BA.debugLineNum = 23;BA.debugLine="Dim jo As JavaObject = TextField1"; -Debug.JustUpdateDeviceLine(); -_jo = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_jo = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), __ref.getField(false,"_textfield1" /*RemoteObject*/ ).getObject());Debug.locals.put("jo", _jo);Debug.locals.put("jo", _jo); - BA.debugLineNum = 24;BA.debugLine="jo.RunMethod(\"setImeOptions\", Array(Bit.Or(335544"; -Debug.JustUpdateDeviceLine(); -_jo.runVoidMethod ("RunMethod",(Object)(BA.ObjectToString("setImeOptions")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(b4xinputtemplate.__c.getField(false,"Bit").runMethod(true,"Or",(Object)(BA.numberCast(int.class, 33554432)),(Object)(BA.numberCast(int.class, 6))))}))); - BA.debugLineNum = 26;BA.debugLine="Dim jo As JavaObject = Me"; -Debug.JustUpdateDeviceLine(); -_jo = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_jo = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), __ref);Debug.locals.put("jo", _jo);Debug.locals.put("jo", _jo); - BA.debugLineNum = 27;BA.debugLine="jo.RunMethod(\"RemoveWarning\", Null)"; -Debug.JustUpdateDeviceLine(); -_jo.runVoidMethod ("RunMethod",(Object)(BA.ObjectToString("RemoveWarning")),(Object)((b4xinputtemplate.__c.getField(false,"Null")))); - BA.debugLineNum = 30;BA.debugLine="SetBorder(BorderColor)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xinputtemplate.class, "_setborder" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_bordercolor" /*RemoteObject*/ ))); - BA.debugLineNum = 31;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _isvalid(RemoteObject __ref,RemoteObject _new) throws Exception{ -try { - Debug.PushSubsStack("IsValid (b4xinputtemplate) ","b4xinputtemplate",46,__ref.getField(false, "ba"),__ref,103); -if (RapidSub.canDelegate("isvalid")) { return __ref.runUserSub(false, "b4xinputtemplate","isvalid", __ref, _new);} -Debug.locals.put("New", _new); - BA.debugLineNum = 103;BA.debugLine="Private Sub IsValid(New As String) As Boolean"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 104;BA.debugLine="Return RegexPattern = \"\" Or Regex.IsMatch(RegexPa"; -Debug.JustUpdateDeviceLine(); -if (true) return BA.ObjectToBoolean(RemoteObject.solveBoolean("=",__ref.getField(true,"_regexpattern" /*RemoteObject*/ ),BA.ObjectToString("")) || RemoteObject.solveBoolean(".",b4xinputtemplate.__c.getField(false,"Regex").runMethod(true,"IsMatch",(Object)(__ref.getField(true,"_regexpattern" /*RemoteObject*/ )),(Object)(_new)))); - BA.debugLineNum = 105;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setborder(RemoteObject __ref,RemoteObject _bc) throws Exception{ -try { - Debug.PushSubsStack("SetBorder (b4xinputtemplate) ","b4xinputtemplate",46,__ref.getField(false, "ba"),__ref,99); -if (RapidSub.canDelegate("setborder")) { return __ref.runUserSub(false, "b4xinputtemplate","setborder", __ref, _bc);} -Debug.locals.put("bc", _bc); - BA.debugLineNum = 99;BA.debugLine="Private Sub SetBorder(bc As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 100;BA.debugLine="TextField1.SetColorAndBorder(xui.Color_Transparen"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_textfield1" /*RemoteObject*/ ).runVoidMethod ("SetColorAndBorder",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")),(Object)(b4xinputtemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1)))),(Object)(_bc),(Object)(b4xinputtemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2))))); - BA.debugLineNum = 101;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setbordercolor(RemoteObject __ref,RemoteObject _valid,RemoteObject _invalid) throws Exception{ -try { - Debug.PushSubsStack("SetBorderColor (b4xinputtemplate) ","b4xinputtemplate",46,__ref.getField(false, "ba"),__ref,34); -if (RapidSub.canDelegate("setbordercolor")) { return __ref.runUserSub(false, "b4xinputtemplate","setbordercolor", __ref, _valid, _invalid);} -Debug.locals.put("Valid", _valid); -Debug.locals.put("Invalid", _invalid); - BA.debugLineNum = 34;BA.debugLine="Public Sub SetBorderColor(Valid As Int, Invalid As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 35;BA.debugLine="BorderColor = Valid"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_bordercolor" /*RemoteObject*/ ,_valid); - BA.debugLineNum = 36;BA.debugLine="BorderColorInvalid = Invalid"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_bordercolorinvalid" /*RemoteObject*/ ,_invalid); - BA.debugLineNum = 37;BA.debugLine="SetBorder(BorderColor)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xinputtemplate.class, "_setborder" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_bordercolor" /*RemoteObject*/ ))); - BA.debugLineNum = 38;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _show(RemoteObject __ref,RemoteObject _dialog) throws Exception{ -try { - Debug.PushSubsStack("Show (b4xinputtemplate) ","b4xinputtemplate",46,__ref.getField(false, "ba"),__ref,120); -if (RapidSub.canDelegate("show")) { __ref.runUserSub(false, "b4xinputtemplate","show", __ref, _dialog); return;} -ResumableSub_Show rsub = new ResumableSub_Show(null,__ref,_dialog); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_Show extends BA.ResumableSub { -public ResumableSub_Show(keymon.lat.medicomed.b4xinputtemplate parent,RemoteObject __ref,RemoteObject _dialog) { -this.parent = parent; -this.__ref = __ref; -this._dialog = _dialog; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.b4xinputtemplate parent; -RemoteObject _dialog; -RemoteObject _tf = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("Show (b4xinputtemplate) ","b4xinputtemplate",46,__ref.getField(false, "ba"),__ref,120); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = -1; -Debug.locals.put("_ref", __ref); -Debug.locals.put("Dialog", _dialog); - BA.debugLineNum = 121;BA.debugLine="xDialog = Dialog"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_xdialog" /*RemoteObject*/ ,_dialog); - BA.debugLineNum = 122;BA.debugLine="xDialog.PutAtTop = xui.IsB4A Or xui.IsB4i"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_xdialog" /*RemoteObject*/ ).setField ("_putattop" /*RemoteObject*/ ,BA.ObjectToBoolean(RemoteObject.solveBoolean(".",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4A")) || RemoteObject.solveBoolean(".",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4i")))); - BA.debugLineNum = 123;BA.debugLine="Sleep(20)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xinputtemplate", "show"),BA.numberCast(int.class, 20)); -this.state = 1; -return; -case 1: -//C -this.state = -1; -; - BA.debugLineNum = 124;BA.debugLine="TextField1.Text = Text"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_textfield1" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(true,"_text" /*RemoteObject*/ ))); - BA.debugLineNum = 125;BA.debugLine="Validate(Text)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xinputtemplate.class, "_validate" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_text" /*RemoteObject*/ ))); - BA.debugLineNum = 126;BA.debugLine="TextField1.RequestFocus"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_textfield1" /*RemoteObject*/ ).runVoidMethod ("RequestFocus"); - BA.debugLineNum = 128;BA.debugLine="Dim tf As EditText = TextField1"; -Debug.JustUpdateDeviceLine(); -_tf = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper"); -_tf = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.EditTextWrapper"), __ref.getField(false,"_textfield1" /*RemoteObject*/ ).getObject());Debug.locals.put("tf", _tf);Debug.locals.put("tf", _tf); - BA.debugLineNum = 129;BA.debugLine="tf.SelectAll"; -Debug.JustUpdateDeviceLine(); -_tf.runVoidMethod ("SelectAll"); - BA.debugLineNum = 130;BA.debugLine="IME.ShowKeyboard(TextField1)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_ime" /*RemoteObject*/ ).runVoidMethod ("ShowKeyboard",(Object)((__ref.getField(false,"_textfield1" /*RemoteObject*/ ).getObject()))); - BA.debugLineNum = 135;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _textfield1_action(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("TextField1_Action (b4xinputtemplate) ","b4xinputtemplate",46,__ref.getField(false, "ba"),__ref,107); -if (RapidSub.canDelegate("textfield1_action")) { return __ref.runUserSub(false, "b4xinputtemplate","textfield1_action", __ref);} - BA.debugLineNum = 107;BA.debugLine="Private Sub TextField1_Action"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 108;BA.debugLine="TextField1_EnterPressed"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xinputtemplate.class, "_textfield1_enterpressed" /*RemoteObject*/ ); - BA.debugLineNum = 109;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _textfield1_enterpressed(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("TextField1_EnterPressed (b4xinputtemplate) ","b4xinputtemplate",46,__ref.getField(false, "ba"),__ref,111); -if (RapidSub.canDelegate("textfield1_enterpressed")) { return __ref.runUserSub(false, "b4xinputtemplate","textfield1_enterpressed", __ref);} - BA.debugLineNum = 111;BA.debugLine="Private Sub TextField1_EnterPressed"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 112;BA.debugLine="If IsValid(TextField1.Text) Then xDialog.Close(xu"; -Debug.JustUpdateDeviceLine(); -if (__ref.runClassMethod (keymon.lat.medicomed.b4xinputtemplate.class, "_isvalid" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_textfield1" /*RemoteObject*/ ).runMethod(true,"getText"))).get().booleanValue()) { -__ref.getField(false,"_xdialog" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_close" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"DialogResponse_Positive")));}; - BA.debugLineNum = 113;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _textfield1_textchanged(RemoteObject __ref,RemoteObject _old,RemoteObject _new) throws Exception{ -try { - Debug.PushSubsStack("TextField1_TextChanged (b4xinputtemplate) ","b4xinputtemplate",46,__ref.getField(false, "ba"),__ref,71); -if (RapidSub.canDelegate("textfield1_textchanged")) { return __ref.runUserSub(false, "b4xinputtemplate","textfield1_textchanged", __ref, _old, _new);} -Debug.locals.put("Old", _old); -Debug.locals.put("New", _new); - BA.debugLineNum = 71;BA.debugLine="Private Sub TextField1_TextChanged (Old As String,"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 83;BA.debugLine="Validate (New)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xinputtemplate.class, "_validate" /*RemoteObject*/ ,(Object)(_new)); - BA.debugLineNum = 84;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _validate(RemoteObject __ref,RemoteObject _new) throws Exception{ -try { - Debug.PushSubsStack("Validate (b4xinputtemplate) ","b4xinputtemplate",46,__ref.getField(false, "ba"),__ref,86); -if (RapidSub.canDelegate("validate")) { return __ref.runUserSub(false, "b4xinputtemplate","validate", __ref, _new);} -RemoteObject _bc = RemoteObject.createImmutable(0); -RemoteObject _enabled = RemoteObject.createImmutable(false); -Debug.locals.put("New", _new); - BA.debugLineNum = 86;BA.debugLine="Private Sub Validate (New As String)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 87;BA.debugLine="Dim bc As Int = BorderColor"; -Debug.JustUpdateDeviceLine(); -_bc = __ref.getField(true,"_bordercolor" /*RemoteObject*/ );Debug.locals.put("bc", _bc);Debug.locals.put("bc", _bc); - BA.debugLineNum = 88;BA.debugLine="Dim enabled As Boolean = True"; -Debug.JustUpdateDeviceLine(); -_enabled = b4xinputtemplate.__c.getField(true,"True");Debug.locals.put("enabled", _enabled);Debug.locals.put("enabled", _enabled); - BA.debugLineNum = 89;BA.debugLine="If IsValid(New) = False Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.runClassMethod (keymon.lat.medicomed.b4xinputtemplate.class, "_isvalid" /*RemoteObject*/ ,(Object)(_new)),b4xinputtemplate.__c.getField(true,"False"))) { - BA.debugLineNum = 90;BA.debugLine="If New.Length > 0 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",_new.runMethod(true,"length"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 91;BA.debugLine="bc = BorderColorInvalid"; -Debug.JustUpdateDeviceLine(); -_bc = __ref.getField(true,"_bordercolorinvalid" /*RemoteObject*/ );Debug.locals.put("bc", _bc); - }; - BA.debugLineNum = 93;BA.debugLine="enabled = False"; -Debug.JustUpdateDeviceLine(); -_enabled = b4xinputtemplate.__c.getField(true,"False");Debug.locals.put("enabled", _enabled); - }; - BA.debugLineNum = 95;BA.debugLine="xDialog.SetButtonState(xui.DialogResponse_Positiv"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_xdialog" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_setbuttonstate" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"DialogResponse_Positive")),(Object)(_enabled)); - BA.debugLineNum = 96;BA.debugLine="SetBorder(bc)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xinputtemplate.class, "_setborder" /*RemoteObject*/ ,(Object)(_bc)); - BA.debugLineNum = 97;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xlisttemplate.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xlisttemplate.java deleted file mode 100644 index afdd36d..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xlisttemplate.java +++ /dev/null @@ -1,39 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xlisttemplate { - public static RemoteObject myClass; - public b4xlisttemplate() { - } - public static PCBA staticBA = new PCBA(null, b4xlisttemplate.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _customlistview1 = RemoteObject.declareNull("b4a.example3.customlistview"); -public static RemoteObject _options = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _selecteditem = RemoteObject.createImmutable(""); -public static RemoteObject _xdialog = RemoteObject.declareNull("keymon.lat.medicomed.b4xdialog"); -public static RemoteObject _allowmultiselection = RemoteObject.createImmutable(false); -public static RemoteObject _selectioncolor = RemoteObject.createImmutable(0); -public static RemoteObject _selecteditems = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _multiselectionminimum = RemoteObject.createImmutable(0); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"AllowMultiSelection",_ref.getField(false, "_allowmultiselection"),"CustomListView1",_ref.getField(false, "_customlistview1"),"DateUtils",_ref.getField(false, "_dateutils"),"mBase",_ref.getField(false, "_mbase"),"MultiSelectionMinimum",_ref.getField(false, "_multiselectionminimum"),"Options",_ref.getField(false, "_options"),"SelectedItem",_ref.getField(false, "_selecteditem"),"SelectedItems",_ref.getField(false, "_selecteditems"),"SelectionColor",_ref.getField(false, "_selectioncolor"),"xDialog",_ref.getField(false, "_xdialog"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xlisttemplate_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xlisttemplate_subs_0.java deleted file mode 100644 index 7c1f99c..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xlisttemplate_subs_0.java +++ /dev/null @@ -1,431 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xlisttemplate_subs_0 { - - -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Private xui As XUI"; -b4xlisttemplate._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",b4xlisttemplate._xui); - //BA.debugLineNum = 3;BA.debugLine="Public mBase As B4XView"; -b4xlisttemplate._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",b4xlisttemplate._mbase); - //BA.debugLineNum = 4;BA.debugLine="Public CustomListView1 As CustomListView"; -b4xlisttemplate._customlistview1 = RemoteObject.createNew ("b4a.example3.customlistview");__ref.setField("_customlistview1",b4xlisttemplate._customlistview1); - //BA.debugLineNum = 5;BA.debugLine="Public Options As List"; -b4xlisttemplate._options = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_options",b4xlisttemplate._options); - //BA.debugLineNum = 6;BA.debugLine="Public SelectedItem As String"; -b4xlisttemplate._selecteditem = RemoteObject.createImmutable("");__ref.setField("_selecteditem",b4xlisttemplate._selecteditem); - //BA.debugLineNum = 7;BA.debugLine="Private xDialog As B4XDialog"; -b4xlisttemplate._xdialog = RemoteObject.createNew ("keymon.lat.medicomed.b4xdialog");__ref.setField("_xdialog",b4xlisttemplate._xdialog); - //BA.debugLineNum = 8;BA.debugLine="Public AllowMultiSelection As Boolean"; -b4xlisttemplate._allowmultiselection = RemoteObject.createImmutable(false);__ref.setField("_allowmultiselection",b4xlisttemplate._allowmultiselection); - //BA.debugLineNum = 9;BA.debugLine="Public SelectionColor As Int = 0xAA0086FF"; -b4xlisttemplate._selectioncolor = BA.numberCast(int.class, ((int)0xaa0086ff));__ref.setField("_selectioncolor",b4xlisttemplate._selectioncolor); - //BA.debugLineNum = 10;BA.debugLine="Public SelectedItems As List"; -b4xlisttemplate._selecteditems = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_selecteditems",b4xlisttemplate._selecteditems); - //BA.debugLineNum = 11;BA.debugLine="Public MultiSelectionMinimum As Int = 0"; -b4xlisttemplate._multiselectionminimum = BA.numberCast(int.class, 0);__ref.setField("_multiselectionminimum",b4xlisttemplate._multiselectionminimum); - //BA.debugLineNum = 12;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _customlistview1_itemclick(RemoteObject __ref,RemoteObject _index,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("CustomListView1_ItemClick (b4xlisttemplate) ","b4xlisttemplate",47,__ref.getField(false, "ba"),__ref,76); -if (RapidSub.canDelegate("customlistview1_itemclick")) { return __ref.runUserSub(false, "b4xlisttemplate","customlistview1_itemclick", __ref, _index, _value);} -RemoteObject _item = RemoteObject.declareNull("b4a.example3.customlistview._clvitem"); -Debug.locals.put("Index", _index); -Debug.locals.put("Value", _value); - BA.debugLineNum = 76;BA.debugLine="Private Sub CustomListView1_ItemClick (Index As In"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 77;BA.debugLine="If Value = \"\" Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_value,RemoteObject.createImmutable(("")))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 78;BA.debugLine="If AllowMultiSelection Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_allowmultiselection" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 79;BA.debugLine="Dim Item As CLVItem = CustomListView1.GetRawList"; -Debug.JustUpdateDeviceLine(); -_item = __ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runMethod(false,"_getrawlistitem",(Object)(_index));Debug.locals.put("Item", _item);Debug.locals.put("Item", _item); - BA.debugLineNum = 80;BA.debugLine="SelectItem (Item, True)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xlisttemplate.class, "_selectitem" /*RemoteObject*/ ,(Object)(_item),(Object)(b4xlisttemplate.__c.getField(true,"True"))); - }else { - BA.debugLineNum = 82;BA.debugLine="SelectedItem = Value"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_selecteditem" /*RemoteObject*/ ,BA.ObjectToString(_value)); - BA.debugLineNum = 83;BA.debugLine="SelectedItems.Clear"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_selecteditems" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 84;BA.debugLine="SelectedItems.Add(Value)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_selecteditems" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)(_value)); - BA.debugLineNum = 85;BA.debugLine="xDialog.Close(xui.DialogResponse_Positive)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_xdialog" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_close" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"DialogResponse_Positive"))); - }; - BA.debugLineNum = 87;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _dialogclosed(RemoteObject __ref,RemoteObject _result) throws Exception{ -try { - Debug.PushSubsStack("DialogClosed (b4xlisttemplate) ","b4xlisttemplate",47,__ref.getField(false, "ba"),__ref,89); -if (RapidSub.canDelegate("dialogclosed")) { return __ref.runUserSub(false, "b4xlisttemplate","dialogclosed", __ref, _result);} -Debug.locals.put("Result", _result); - BA.debugLineNum = 89;BA.debugLine="Private Sub DialogClosed(Result As Int) 'ignore"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 91;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getpanel(RemoteObject __ref,RemoteObject _dialog) throws Exception{ -try { - Debug.PushSubsStack("GetPanel (b4xlisttemplate) ","b4xlisttemplate",47,__ref.getField(false, "ba"),__ref,37); -if (RapidSub.canDelegate("getpanel")) { return __ref.runUserSub(false, "b4xlisttemplate","getpanel", __ref, _dialog);} -Debug.locals.put("Dialog", _dialog); - BA.debugLineNum = 37;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 38;BA.debugLine="Return mBase"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_mbase" /*RemoteObject*/ ); - BA.debugLineNum = 39;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xlisttemplate) ","b4xlisttemplate",47,__ref.getField(false, "ba"),__ref,14); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xlisttemplate","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 14;BA.debugLine="Public Sub Initialize"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 15;BA.debugLine="mBase = xui.CreatePanel(\"mBase\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mbase" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("mBase")))); - BA.debugLineNum = 16;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, 300dip, 300dip)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(b4xlisttemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 300)))),(Object)(b4xlisttemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 300))))); - BA.debugLineNum = 17;BA.debugLine="mBase.LoadLayout(\"ListTemplate\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("ListTemplate")),__ref.getField(false, "ba")); - BA.debugLineNum = 18;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetColorAndBorder",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 19;BA.debugLine="CustomListView1.sv.SetColorAndBorder(xui.Color_Tr"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).getField(false,"_sv").runVoidMethod ("SetColorAndBorder",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 20;BA.debugLine="CustomListView1.DefaultTextBackgroundColor = 0xFF"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).setField ("_defaulttextbackgroundcolor",BA.numberCast(int.class, ((int)0xff555555))); - BA.debugLineNum = 21;BA.debugLine="CustomListView1.DefaultTextColor = xui.Color_Whit"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).setField ("_defaulttextcolor",__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_White")); - BA.debugLineNum = 26;BA.debugLine="Options.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_options" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 27;BA.debugLine="SelectedItems.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_selecteditems" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 28;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("Resize (b4xlisttemplate) ","b4xlisttemplate",47,__ref.getField(false, "ba"),__ref,31); -if (RapidSub.canDelegate("resize")) { return __ref.runUserSub(false, "b4xlisttemplate","resize", __ref, _width, _height);} -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 31;BA.debugLine="Public Sub Resize(Width As Int, Height As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 32;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, Width, Height)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(_width),(Object)(_height)); - BA.debugLineNum = 33;BA.debugLine="CustomListView1.Base_Resize(Width, Height)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runVoidMethod ("_base_resize",(Object)(BA.numberCast(double.class, _width)),(Object)(BA.numberCast(double.class, _height))); - BA.debugLineNum = 34;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _selectitem(RemoteObject __ref,RemoteObject _item,RemoteObject _toggle) throws Exception{ -try { - Debug.PushSubsStack("SelectItem (b4xlisttemplate) ","b4xlisttemplate",47,__ref.getField(false, "ba"),__ref,59); -if (RapidSub.canDelegate("selectitem")) { return __ref.runUserSub(false, "b4xlisttemplate","selectitem", __ref, _item, _toggle);} -RemoteObject _index = RemoteObject.createImmutable(0); -RemoteObject _selected = RemoteObject.createImmutable(false); -Debug.locals.put("Item", _item); -Debug.locals.put("Toggle", _toggle); - BA.debugLineNum = 59;BA.debugLine="Private Sub SelectItem (Item As CLVItem, Toggle As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 60;BA.debugLine="Dim index As Int = SelectedItems.IndexOf(Item.Val"; -Debug.JustUpdateDeviceLine(); -_index = __ref.getField(false,"_selecteditems" /*RemoteObject*/ ).runMethod(true,"IndexOf",(Object)(_item.getField(false,"Value")));Debug.locals.put("index", _index);Debug.locals.put("index", _index); - BA.debugLineNum = 61;BA.debugLine="Dim Selected As Boolean = index > -1"; -Debug.JustUpdateDeviceLine(); -_selected = BA.ObjectToBoolean(RemoteObject.solveBoolean(">",_index,BA.numberCast(double.class, -(double) (0 + 1))));Debug.locals.put("Selected", _selected);Debug.locals.put("Selected", _selected); - BA.debugLineNum = 62;BA.debugLine="If Toggle Then Selected = Not(Selected)"; -Debug.JustUpdateDeviceLine(); -if (_toggle.get().booleanValue()) { -_selected = b4xlisttemplate.__c.runMethod(true,"Not",(Object)(_selected));Debug.locals.put("Selected", _selected);}; - BA.debugLineNum = 63;BA.debugLine="If Selected Then"; -Debug.JustUpdateDeviceLine(); -if (_selected.get().booleanValue()) { - BA.debugLineNum = 64;BA.debugLine="If Not(Toggle) Then Item.Panel.Color = Selection"; -Debug.JustUpdateDeviceLine(); -if (b4xlisttemplate.__c.runMethod(true,"Not",(Object)(_toggle)).get().booleanValue()) { -_item.getField(false,"Panel").runMethod(true,"setColor",__ref.getField(true,"_selectioncolor" /*RemoteObject*/ ));}; - BA.debugLineNum = 65;BA.debugLine="Item.Color = CustomListView1.DefaultTextBackgrou"; -Debug.JustUpdateDeviceLine(); -_item.setField ("Color",__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).getField(true,"_defaulttextbackgroundcolor")); - BA.debugLineNum = 66;BA.debugLine="If index = -1 Then SelectedItems.Add(Item.Value)"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_index,BA.numberCast(double.class, -(double) (0 + 1)))) { -__ref.getField(false,"_selecteditems" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)(_item.getField(false,"Value")));}; - }else { - BA.debugLineNum = 68;BA.debugLine="Item.Color = SelectionColor"; -Debug.JustUpdateDeviceLine(); -_item.setField ("Color",__ref.getField(true,"_selectioncolor" /*RemoteObject*/ )); - BA.debugLineNum = 69;BA.debugLine="If Not(Toggle) Then Item.Panel.Color = CustomLis"; -Debug.JustUpdateDeviceLine(); -if (b4xlisttemplate.__c.runMethod(true,"Not",(Object)(_toggle)).get().booleanValue()) { -_item.getField(false,"Panel").runMethod(true,"setColor",__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).getField(true,"_defaulttextbackgroundcolor"));}; - BA.debugLineNum = 70;BA.debugLine="If index > -1 Then SelectedItems.RemoveAt(index)"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",_index,BA.numberCast(double.class, -(double) (0 + 1)))) { -__ref.getField(false,"_selecteditems" /*RemoteObject*/ ).runVoidMethod ("RemoveAt",(Object)(_index));}; - }; - BA.debugLineNum = 72;BA.debugLine="xDialog.SetButtonState(xui.DialogResponse_Positiv"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_xdialog" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_setbuttonstate" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"DialogResponse_Positive")),(Object)(BA.ObjectToBoolean(RemoteObject.solveBoolean("g",__ref.getField(false,"_selecteditems" /*RemoteObject*/ ).runMethod(true,"getSize"),BA.numberCast(double.class, __ref.getField(true,"_multiselectionminimum" /*RemoteObject*/ )))))); - BA.debugLineNum = 73;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _show(RemoteObject __ref,RemoteObject _dialog) throws Exception{ -try { - Debug.PushSubsStack("Show (b4xlisttemplate) ","b4xlisttemplate",47,__ref.getField(false, "ba"),__ref,41); -if (RapidSub.canDelegate("show")) { __ref.runUserSub(false, "b4xlisttemplate","show", __ref, _dialog); return;} -ResumableSub_Show rsub = new ResumableSub_Show(null,__ref,_dialog); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_Show extends BA.ResumableSub { -public ResumableSub_Show(keymon.lat.medicomed.b4xlisttemplate parent,RemoteObject __ref,RemoteObject _dialog) { -this.parent = parent; -this.__ref = __ref; -this._dialog = _dialog; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.b4xlisttemplate parent; -RemoteObject _dialog; -RemoteObject _opt = RemoteObject.declareNull("Object"); -int _i = 0; -RemoteObject _item = RemoteObject.declareNull("b4a.example3.customlistview._clvitem"); -RemoteObject group3; -int index3; -int groupLen3; -int step8; -int limit8; - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("Show (b4xlisttemplate) ","b4xlisttemplate",47,__ref.getField(false, "ba"),__ref,41); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); -Debug.locals.put("Dialog", _dialog); - BA.debugLineNum = 42;BA.debugLine="xDialog = Dialog"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_xdialog" /*RemoteObject*/ ,_dialog); - BA.debugLineNum = 43;BA.debugLine="CustomListView1.Clear"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runVoidMethod ("_clear"); - BA.debugLineNum = 44;BA.debugLine="For Each opt As Object In Options"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 1: -//for -this.state = 4; -group3 = __ref.getField(false,"_options" /*RemoteObject*/ ); -index3 = 0; -groupLen3 = group3.runMethod(true,"getSize").get(); -Debug.locals.put("opt", _opt); -this.state = 12; -if (true) break; - -case 12: -//C -this.state = 4; -if (index3 < groupLen3) { -this.state = 3; -_opt = group3.runMethod(false,"Get",index3);Debug.locals.put("opt", _opt);} -if (true) break; - -case 13: -//C -this.state = 12; -index3++; -Debug.locals.put("opt", _opt); -if (true) break; - -case 3: -//C -this.state = 13; - BA.debugLineNum = 45;BA.debugLine="CustomListView1.AddTextItem(opt, opt)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runVoidMethod ("_addtextitem",(Object)(_opt),(Object)(_opt)); - if (true) break; -if (true) break; -Debug.locals.put("opt", _opt); -; - BA.debugLineNum = 47;BA.debugLine="If AllowMultiSelection Then"; -Debug.JustUpdateDeviceLine(); - -case 4: -//if -this.state = 11; -if (__ref.getField(true,"_allowmultiselection" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 6; -}if (true) break; - -case 6: -//C -this.state = 7; - BA.debugLineNum = 48;BA.debugLine="Sleep(20)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xlisttemplate", "show"),BA.numberCast(int.class, 20)); -this.state = 14; -return; -case 14: -//C -this.state = 7; -; - BA.debugLineNum = 49;BA.debugLine="For i = 0 To CustomListView1.Size - 1"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 7: -//for -this.state = 10; -step8 = 1; -limit8 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runMethod(true,"_getsize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -Debug.locals.put("i", _i); -this.state = 15; -if (true) break; - -case 15: -//C -this.state = 10; -if ((step8 > 0 && _i <= limit8) || (step8 < 0 && _i >= limit8)) this.state = 9; -if (true) break; - -case 16: -//C -this.state = 15; -_i = ((int)(0 + _i + step8)) ; -Debug.locals.put("i", _i); -if (true) break; - -case 9: -//C -this.state = 16; - BA.debugLineNum = 50;BA.debugLine="Dim item As CLVItem = CustomListView1.GetRawLis"; -Debug.JustUpdateDeviceLine(); -_item = __ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runMethod(false,"_getrawlistitem",(Object)(BA.numberCast(int.class, _i)));Debug.locals.put("item", _item);Debug.locals.put("item", _item); - BA.debugLineNum = 51;BA.debugLine="SelectItem (item, False)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xlisttemplate.class, "_selectitem" /*RemoteObject*/ ,(Object)(_item),(Object)(parent.__c.getField(true,"False"))); - if (true) break; -if (true) break; - -case 10: -//C -this.state = 11; -Debug.locals.put("i", _i); -; - if (true) break; - -case 11: -//C -this.state = -1; -; - BA.debugLineNum = 54;BA.debugLine="XUIViewsUtils.AddStubToCLVIfNeeded(CustomListView"; -Debug.JustUpdateDeviceLine(); -parent._xuiviewsutils.runVoidMethod ("_addstubtoclvifneeded" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_customlistview1" /*RemoteObject*/ )),(Object)(__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).getField(true,"_defaulttextbackgroundcolor"))); - BA.debugLineNum = 55;BA.debugLine="SelectedItem = \"\""; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_selecteditem" /*RemoteObject*/ ,BA.ObjectToString("")); - BA.debugLineNum = 57;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xloadingindicator.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xloadingindicator.java deleted file mode 100644 index ad8bc92..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xloadingindicator.java +++ /dev/null @@ -1,39 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xloadingindicator { - public static RemoteObject myClass; - public b4xloadingindicator() { - } - public static PCBA staticBA = new PCBA(null, b4xloadingindicator.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _meventname = RemoteObject.createImmutable(""); -public static RemoteObject _mcallback = RemoteObject.declareNull("Object"); -public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _clr = RemoteObject.createImmutable(0); -public static RemoteObject _index = RemoteObject.createImmutable(0); -public static RemoteObject _cvs = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas"); -public static RemoteObject _duration = RemoteObject.createImmutable(0); -public static RemoteObject _drawingsubname = RemoteObject.createImmutable(""); -public static RemoteObject _tag = RemoteObject.declareNull("Object"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"clr",_ref.getField(false, "_clr"),"cvs",_ref.getField(false, "_cvs"),"DateUtils",_ref.getField(false, "_dateutils"),"DrawingSubName",_ref.getField(false, "_drawingsubname"),"duration",_ref.getField(false, "_duration"),"index",_ref.getField(false, "_index"),"mBase",_ref.getField(false, "_mbase"),"mCallBack",_ref.getField(false, "_mcallback"),"mEventName",_ref.getField(false, "_meventname"),"Tag",_ref.getField(false, "_tag"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xloadingindicator_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xloadingindicator_subs_0.java deleted file mode 100644 index ed9d286..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xloadingindicator_subs_0.java +++ /dev/null @@ -1,627 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xloadingindicator_subs_0 { - - -public static RemoteObject _base_resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("Base_Resize (b4xloadingindicator) ","b4xloadingindicator",48,__ref.getField(false, "ba"),__ref,37); -if (RapidSub.canDelegate("base_resize")) { return __ref.runUserSub(false, "b4xloadingindicator","base_resize", __ref, _width, _height);} -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 37;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 38;BA.debugLine="cvs.Resize(Width, Height)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Resize",(Object)(BA.numberCast(float.class, _width)),(Object)(BA.numberCast(float.class, _height))); - BA.debugLineNum = 39;BA.debugLine="MainLoop"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xloadingindicator.class, "_mainloop" /*void*/ ); - BA.debugLineNum = 40;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 7;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 8;BA.debugLine="Private mEventName As String 'ignore"; -b4xloadingindicator._meventname = RemoteObject.createImmutable("");__ref.setField("_meventname",b4xloadingindicator._meventname); - //BA.debugLineNum = 9;BA.debugLine="Private mCallBack As Object 'ignore"; -b4xloadingindicator._mcallback = RemoteObject.createNew ("Object");__ref.setField("_mcallback",b4xloadingindicator._mcallback); - //BA.debugLineNum = 10;BA.debugLine="Public mBase As B4XView 'ignore"; -b4xloadingindicator._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",b4xloadingindicator._mbase); - //BA.debugLineNum = 11;BA.debugLine="Private xui As XUI 'ignore"; -b4xloadingindicator._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",b4xloadingindicator._xui); - //BA.debugLineNum = 12;BA.debugLine="Private clr As Int"; -b4xloadingindicator._clr = RemoteObject.createImmutable(0);__ref.setField("_clr",b4xloadingindicator._clr); - //BA.debugLineNum = 13;BA.debugLine="Private index As Int"; -b4xloadingindicator._index = RemoteObject.createImmutable(0);__ref.setField("_index",b4xloadingindicator._index); - //BA.debugLineNum = 14;BA.debugLine="Private cvs As B4XCanvas"; -b4xloadingindicator._cvs = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas");__ref.setField("_cvs",b4xloadingindicator._cvs); - //BA.debugLineNum = 15;BA.debugLine="Private duration As Int"; -b4xloadingindicator._duration = RemoteObject.createImmutable(0);__ref.setField("_duration",b4xloadingindicator._duration); - //BA.debugLineNum = 16;BA.debugLine="Private DrawingSubName As String"; -b4xloadingindicator._drawingsubname = RemoteObject.createImmutable("");__ref.setField("_drawingsubname",b4xloadingindicator._drawingsubname); - //BA.debugLineNum = 17;BA.debugLine="Public Tag As Object"; -b4xloadingindicator._tag = RemoteObject.createNew ("Object");__ref.setField("_tag",b4xloadingindicator._tag); - //BA.debugLineNum = 18;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _designercreateview(RemoteObject __ref,RemoteObject _base,RemoteObject _lbl,RemoteObject _props) throws Exception{ -try { - Debug.PushSubsStack("DesignerCreateView (b4xloadingindicator) ","b4xloadingindicator",48,__ref.getField(false, "ba"),__ref,26); -if (RapidSub.canDelegate("designercreateview")) { return __ref.runUserSub(false, "b4xloadingindicator","designercreateview", __ref, _base, _lbl, _props);} -RemoteObject _style = RemoteObject.createImmutable(""); -Debug.locals.put("Base", _base); -Debug.locals.put("Lbl", _lbl); -Debug.locals.put("Props", _props); - BA.debugLineNum = 26;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 27;BA.debugLine="mBase = Base"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).setObject (_base); - BA.debugLineNum = 28;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_tag" /*RemoteObject*/ ,__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"getTag")); - BA.debugLineNum = 28;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"setTag",__ref); - BA.debugLineNum = 29;BA.debugLine="clr = xui.PaintOrColorToColor(Props.Get(\"Color\""; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_clr" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("Color"))))))); - BA.debugLineNum = 30;BA.debugLine="Dim style As String= Props.Get(\"IndicatorStyle\")"; -Debug.JustUpdateDeviceLine(); -_style = BA.ObjectToString(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("IndicatorStyle")))));Debug.locals.put("style", _style);Debug.locals.put("style", _style); - BA.debugLineNum = 31;BA.debugLine="Dim duration As Int = Props.Get(\"Duration\")"; -Debug.JustUpdateDeviceLine(); -b4xloadingindicator._duration = BA.numberCast(int.class, _props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("Duration")))));__ref.setField("_duration",b4xloadingindicator._duration); - BA.debugLineNum = 32;BA.debugLine="DrawingSubName = \"Draw_\" & style.Replace(\" \", \"\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_drawingsubname" /*RemoteObject*/ ,RemoteObject.concat(RemoteObject.createImmutable("Draw_"),_style.runMethod(true,"replace",(Object)(BA.ObjectToString(" ")),(Object)(RemoteObject.createImmutable(""))))); - BA.debugLineNum = 33;BA.debugLine="cvs.Initialize(mBase)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ))); - BA.debugLineNum = 34;BA.debugLine="MainLoop"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xloadingindicator.class, "_mainloop" /*void*/ ); - BA.debugLineNum = 35;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _draw_arc1(RemoteObject __ref,RemoteObject _progress) throws Exception{ -try { - Debug.PushSubsStack("Draw_Arc1 (b4xloadingindicator) ","b4xloadingindicator",48,__ref.getField(false, "ba"),__ref,105); -if (RapidSub.canDelegate("draw_arc1")) { return __ref.runUserSub(false, "b4xloadingindicator","draw_arc1", __ref, _progress);} -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XPath"); -RemoteObject _r = RemoteObject.createImmutable(0f); -Debug.locals.put("Progress", _progress); - BA.debugLineNum = 105;BA.debugLine="Private Sub Draw_Arc1 (Progress As Float)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 106;BA.debugLine="Dim p As B4XPath"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas.B4XPath");Debug.locals.put("p", _p); - BA.debugLineNum = 107;BA.debugLine="Dim r As Float = cvs.TargetRect.CenterX - 5dip"; -Debug.JustUpdateDeviceLine(); -_r = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterX"),b4xloadingindicator.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 5)))}, "-",1, 0));Debug.locals.put("r", _r);Debug.locals.put("r", _r); - BA.debugLineNum = 108;BA.debugLine="If Progress < 0.5 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("<",_progress,BA.numberCast(double.class, 0.5))) { - BA.debugLineNum = 109;BA.debugLine="p.InitializeArc(cvs.TargetRect.CenterX, cvs.Targ"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("InitializeArc",(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterX")),(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterY")),(Object)(_r),(Object)(BA.numberCast(float.class, -(double) (0 + 90))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_progress,RemoteObject.createImmutable(2),RemoteObject.createImmutable(360)}, "**",0, 0)))); - }else { - BA.debugLineNum = 111;BA.debugLine="p.InitializeArc(cvs.TargetRect.CenterX, cvs.Targ"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("InitializeArc",(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterX")),(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterY")),(Object)(_r),(Object)(BA.numberCast(float.class, -(double) (0 + 90))),(Object)(BA.numberCast(float.class, -(RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(1),_progress}, "-",1, 0)).get().doubleValue()*(double) (0 + 2)*(double) (0 + 360)))); - }; - BA.debugLineNum = 113;BA.debugLine="cvs.ClipPath(p)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("ClipPath",(Object)(_p)); - BA.debugLineNum = 114;BA.debugLine="cvs.DrawRect(cvs.TargetRect, clr, True, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawRect",(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect")),(Object)(__ref.getField(true,"_clr" /*RemoteObject*/ )),(Object)(b4xloadingindicator.__c.getField(true,"True")),(Object)(BA.numberCast(float.class, 0))); - BA.debugLineNum = 115;BA.debugLine="cvs.RemoveClip"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("RemoveClip"); - BA.debugLineNum = 116;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _draw_arc2(RemoteObject __ref,RemoteObject _progress) throws Exception{ -try { - Debug.PushSubsStack("Draw_Arc2 (b4xloadingindicator) ","b4xloadingindicator",48,__ref.getField(false, "ba"),__ref,118); -if (RapidSub.canDelegate("draw_arc2")) { return __ref.runUserSub(false, "b4xloadingindicator","draw_arc2", __ref, _progress);} -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XPath"); -RemoteObject _r = RemoteObject.createImmutable(0f); -Debug.locals.put("Progress", _progress); - BA.debugLineNum = 118;BA.debugLine="Private Sub Draw_Arc2 (Progress As Float)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 119;BA.debugLine="Dim p As B4XPath"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas.B4XPath");Debug.locals.put("p", _p); - BA.debugLineNum = 120;BA.debugLine="Dim r As Float = cvs.TargetRect.CenterX - 5dip"; -Debug.JustUpdateDeviceLine(); -_r = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterX"),b4xloadingindicator.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 5)))}, "-",1, 0));Debug.locals.put("r", _r);Debug.locals.put("r", _r); - BA.debugLineNum = 121;BA.debugLine="If Progress < 0.5 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("<",_progress,BA.numberCast(double.class, 0.5))) { - BA.debugLineNum = 122;BA.debugLine="p.InitializeArc(cvs.TargetRect.CenterX, cvs.Targ"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("InitializeArc",(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterX")),(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterY")),(Object)(_r),(Object)(BA.numberCast(float.class, -(double) (0 + 90))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_progress,RemoteObject.createImmutable(2),RemoteObject.createImmutable(360)}, "**",0, 0)))); - }else { - BA.debugLineNum = 124;BA.debugLine="p.InitializeArc(cvs.TargetRect.CenterX, cvs.Targ"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("InitializeArc",(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterX")),(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterY")),(Object)(_r),(Object)(BA.numberCast(float.class, -(double) (0 + 90))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(360),(RemoteObject.solve(new RemoteObject[] {_progress,RemoteObject.createImmutable(0.5)}, "-",1, 0)),RemoteObject.createImmutable(2),RemoteObject.createImmutable(360)}, "-**",1, 0)))); - }; - BA.debugLineNum = 126;BA.debugLine="cvs.ClipPath(p)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("ClipPath",(Object)(_p)); - BA.debugLineNum = 127;BA.debugLine="cvs.DrawRect(cvs.TargetRect, clr, True, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawRect",(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect")),(Object)(__ref.getField(true,"_clr" /*RemoteObject*/ )),(Object)(b4xloadingindicator.__c.getField(true,"True")),(Object)(BA.numberCast(float.class, 0))); - BA.debugLineNum = 128;BA.debugLine="cvs.RemoveClip"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("RemoveClip"); - BA.debugLineNum = 129;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _draw_fivelines1(RemoteObject __ref,RemoteObject _progress) throws Exception{ -try { - Debug.PushSubsStack("Draw_FiveLines1 (b4xloadingindicator) ","b4xloadingindicator",48,__ref.getField(false, "ba"),__ref,95); -if (RapidSub.canDelegate("draw_fivelines1")) { return __ref.runUserSub(false, "b4xloadingindicator","draw_fivelines1", __ref, _progress);} -RemoteObject _minr = RemoteObject.createImmutable(0); -RemoteObject _maxr = RemoteObject.createImmutable(0); -RemoteObject _dx = RemoteObject.createImmutable(0); -int _i = 0; -RemoteObject _r = RemoteObject.createImmutable(0f); -Debug.locals.put("Progress", _progress); - BA.debugLineNum = 95;BA.debugLine="Private Sub Draw_FiveLines1(Progress As Float)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 96;BA.debugLine="Dim MinR As Int = 10dip"; -Debug.JustUpdateDeviceLine(); -_minr = b4xloadingindicator.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 10)));Debug.locals.put("MinR", _minr);Debug.locals.put("MinR", _minr); - BA.debugLineNum = 97;BA.debugLine="Dim MaxR As Int = cvs.TargetRect.Height / 2"; -Debug.JustUpdateDeviceLine(); -_maxr = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getHeight"),RemoteObject.createImmutable(2)}, "/",0, 0));Debug.locals.put("MaxR", _maxr);Debug.locals.put("MaxR", _maxr); - BA.debugLineNum = 98;BA.debugLine="Dim dx As Int = (cvs.TargetRect.Width - 2dip) / 5"; -Debug.JustUpdateDeviceLine(); -_dx = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getWidth"),b4xloadingindicator.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)))}, "-",1, 0)),RemoteObject.createImmutable(5)}, "/",0, 0));Debug.locals.put("dx", _dx);Debug.locals.put("dx", _dx); - BA.debugLineNum = 99;BA.debugLine="For i = 0 To 4"; -Debug.JustUpdateDeviceLine(); -{ -final int step4 = 1; -final int limit4 = 4; -_i = 0 ; -for (;(step4 > 0 && _i <= limit4) || (step4 < 0 && _i >= limit4) ;_i = ((int)(0 + _i + step4)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 100;BA.debugLine="Dim r As Float = MinR + MaxR / 2 + MaxR / 2 * Si"; -Debug.JustUpdateDeviceLine(); -_r = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_minr,_maxr,RemoteObject.createImmutable(2),_maxr,RemoteObject.createImmutable(2),b4xloadingindicator.__c.runMethod(true,"SinD",(Object)(RemoteObject.solve(new RemoteObject[] {_progress,RemoteObject.createImmutable(360),RemoteObject.createImmutable(30),RemoteObject.createImmutable(_i)}, "*-*",1, 0)))}, "+/+/*",2, 0));Debug.locals.put("r", _r);Debug.locals.put("r", _r); - BA.debugLineNum = 101;BA.debugLine="cvs.DrawLine(2dip + i * dx, cvs.TargetRect.Cente"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawLine",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {b4xloadingindicator.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2))),RemoteObject.createImmutable(_i),_dx}, "+*",1, 1))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterY"),_r}, "-",1, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {b4xloadingindicator.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2))),RemoteObject.createImmutable(_i),_dx}, "+*",1, 1))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterY"),_r}, "+",1, 0))),(Object)(__ref.getField(true,"_clr" /*RemoteObject*/ )),(Object)(BA.numberCast(float.class, b4xloadingindicator.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 4)))))); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 103;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _draw_pacman(RemoteObject __ref,RemoteObject _progress) throws Exception{ -try { - Debug.PushSubsStack("Draw_PacMan (b4xloadingindicator) ","b4xloadingindicator",48,__ref.getField(false, "ba"),__ref,131); -if (RapidSub.canDelegate("draw_pacman")) { return __ref.runUserSub(false, "b4xloadingindicator","draw_pacman", __ref, _progress);} -RemoteObject _dotr = RemoteObject.createImmutable(0); -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XPath"); -RemoteObject _angle = RemoteObject.createImmutable(0); -RemoteObject _cx = RemoteObject.createImmutable(0); -RemoteObject _cy = RemoteObject.createImmutable(0); -RemoteObject _r = RemoteObject.createImmutable(0); -Debug.locals.put("Progress", _progress); - BA.debugLineNum = 131;BA.debugLine="Private Sub Draw_PacMan(Progress As Float)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 132;BA.debugLine="Dim DotR As Int = 5dip"; -Debug.JustUpdateDeviceLine(); -_dotr = b4xloadingindicator.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 5)));Debug.locals.put("DotR", _dotr);Debug.locals.put("DotR", _dotr); - BA.debugLineNum = 133;BA.debugLine="cvs.DrawCircle(cvs.TargetRect.Width - DotR - Prog"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawCircle",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getWidth"),_dotr,_progress,(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterX"),b4xloadingindicator.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 10)))}, "-",1, 0))}, "--*",2, 0))),(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterY")),(Object)(BA.numberCast(float.class, _dotr)),(Object)(__ref.runClassMethod (keymon.lat.medicomed.b4xloadingindicator.class, "_setalpha" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_clr" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(255),RemoteObject.createImmutable(200),_progress}, "-*",1, 0))))),(Object)(b4xloadingindicator.__c.getField(true,"True")),(Object)(BA.numberCast(float.class, 0))); - BA.debugLineNum = 134;BA.debugLine="Dim p As B4XPath"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas.B4XPath");Debug.locals.put("p", _p); - BA.debugLineNum = 135;BA.debugLine="Dim angle As Int = 70 * SinD(Progress * 180)"; -Debug.JustUpdateDeviceLine(); -_angle = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(70),b4xloadingindicator.__c.runMethod(true,"SinD",(Object)(RemoteObject.solve(new RemoteObject[] {_progress,RemoteObject.createImmutable(180)}, "*",0, 0)))}, "*",0, 0));Debug.locals.put("angle", _angle);Debug.locals.put("angle", _angle); - BA.debugLineNum = 136;BA.debugLine="Dim cx As Int = cvs.TargetRect.CenterX - 5dip"; -Debug.JustUpdateDeviceLine(); -_cx = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterX"),b4xloadingindicator.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 5)))}, "-",1, 0));Debug.locals.put("cx", _cx);Debug.locals.put("cx", _cx); - BA.debugLineNum = 137;BA.debugLine="Dim cy As Int = cvs.TargetRect.CenterY"; -Debug.JustUpdateDeviceLine(); -_cy = BA.numberCast(int.class, __ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterY"));Debug.locals.put("cy", _cy);Debug.locals.put("cy", _cy); - BA.debugLineNum = 138;BA.debugLine="Dim r As Int = cvs.TargetRect.CenterY - 5dip"; -Debug.JustUpdateDeviceLine(); -_r = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterY"),b4xloadingindicator.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 5)))}, "-",1, 0));Debug.locals.put("r", _r);Debug.locals.put("r", _r); - BA.debugLineNum = 139;BA.debugLine="If angle = 0 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_angle,BA.numberCast(double.class, 0))) { - BA.debugLineNum = 140;BA.debugLine="cvs.DrawCircle(cx, cy, r, clr, True, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawCircle",(Object)(BA.numberCast(float.class, _cx)),(Object)(BA.numberCast(float.class, _cy)),(Object)(BA.numberCast(float.class, _r)),(Object)(__ref.getField(true,"_clr" /*RemoteObject*/ )),(Object)(b4xloadingindicator.__c.getField(true,"True")),(Object)(BA.numberCast(float.class, 0))); - }else { - BA.debugLineNum = 142;BA.debugLine="p.InitializeArc(cx, cy , r, -angle / 2, -(360-an"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("InitializeArc",(Object)(BA.numberCast(float.class, _cx)),(Object)(BA.numberCast(float.class, _cy)),(Object)(BA.numberCast(float.class, _r)),(Object)(BA.numberCast(float.class, -(double) (0 + _angle.get().intValue())/(double)(double) (0 + 2))),(Object)(BA.numberCast(float.class, -(double) (0 + (RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(360),_angle}, "-",1, 1)).get().intValue())))); - BA.debugLineNum = 143;BA.debugLine="cvs.ClipPath(p)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("ClipPath",(Object)(_p)); - BA.debugLineNum = 144;BA.debugLine="cvs.DrawRect(cvs.TargetRect, clr, True, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawRect",(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect")),(Object)(__ref.getField(true,"_clr" /*RemoteObject*/ )),(Object)(b4xloadingindicator.__c.getField(true,"True")),(Object)(BA.numberCast(float.class, 0))); - BA.debugLineNum = 145;BA.debugLine="cvs.RemoveClip"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("RemoveClip"); - }; - BA.debugLineNum = 148;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _draw_singlecircle(RemoteObject __ref,RemoteObject _progress) throws Exception{ -try { - Debug.PushSubsStack("Draw_SingleCircle (b4xloadingindicator) ","b4xloadingindicator",48,__ref.getField(false, "ba"),__ref,85); -if (RapidSub.canDelegate("draw_singlecircle")) { return __ref.runUserSub(false, "b4xloadingindicator","draw_singlecircle", __ref, _progress);} -int _i = 0; -Debug.locals.put("Progress", _progress); - BA.debugLineNum = 85;BA.debugLine="Private Sub Draw_SingleCircle(Progress As Float)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 86;BA.debugLine="For i = 0 To 2"; -Debug.JustUpdateDeviceLine(); -{ -final int step1 = 1; -final int limit1 = 2; -_i = 0 ; -for (;(step1 > 0 && _i <= limit1) || (step1 < 0 && _i >= limit1) ;_i = ((int)(0 + _i + step1)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 87;BA.debugLine="cvs.DrawCircle(cvs.TargetRect.CenterX, cvs.Targe"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawCircle",(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterX")),(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterY")),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterX"),_progress}, "*",0, 0))),(Object)(__ref.runClassMethod (keymon.lat.medicomed.b4xloadingindicator.class, "_setalpha" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_clr" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(255),RemoteObject.createImmutable(255),_progress}, "-*",1, 0))))),(Object)(b4xloadingindicator.__c.getField(true,"True")),(Object)(BA.numberCast(float.class, 0))); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 89;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _draw_threecircles1(RemoteObject __ref,RemoteObject _progress) throws Exception{ -try { - Debug.PushSubsStack("Draw_ThreeCircles1 (b4xloadingindicator) ","b4xloadingindicator",48,__ref.getField(false, "ba"),__ref,66); -if (RapidSub.canDelegate("draw_threecircles1")) { return __ref.runUserSub(false, "b4xloadingindicator","draw_threecircles1", __ref, _progress);} -RemoteObject _maxr = RemoteObject.createImmutable(0f); -RemoteObject _r = RemoteObject.createImmutable(0f); -int _i = 0; -RemoteObject _alpha = RemoteObject.createImmutable(0); -Debug.locals.put("Progress", _progress); - BA.debugLineNum = 66;BA.debugLine="Private Sub Draw_ThreeCircles1 (Progress As Float)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 67;BA.debugLine="Dim MaxR As Float = (cvs.TargetRect.Width / 2 - 2"; -Debug.JustUpdateDeviceLine(); -_maxr = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getWidth"),RemoteObject.createImmutable(2),b4xloadingindicator.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 20)))}, "/-",1, 0)),RemoteObject.createImmutable(2)}, "/",0, 0));Debug.locals.put("MaxR", _maxr);Debug.locals.put("MaxR", _maxr); - BA.debugLineNum = 68;BA.debugLine="Dim r As Float = 10dip + MaxR + MaxR * Sin(Progre"; -Debug.JustUpdateDeviceLine(); -_r = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {b4xloadingindicator.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 10))),_maxr,_maxr,b4xloadingindicator.__c.runMethod(true,"Sin",(Object)(RemoteObject.solve(new RemoteObject[] {_progress,RemoteObject.createImmutable(2),b4xloadingindicator.__c.getField(true,"cPI")}, "**",0, 0)))}, "++*",2, 0));Debug.locals.put("r", _r);Debug.locals.put("r", _r); - BA.debugLineNum = 69;BA.debugLine="For i = 0 To 2"; -Debug.JustUpdateDeviceLine(); -{ -final int step3 = 1; -final int limit3 = 2; -_i = 0 ; -for (;(step3 > 0 && _i <= limit3) || (step3 < 0 && _i >= limit3) ;_i = ((int)(0 + _i + step3)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 70;BA.debugLine="Dim alpha As Int = i * 120 + Progress * 360"; -Debug.JustUpdateDeviceLine(); -_alpha = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_i),RemoteObject.createImmutable(120),_progress,RemoteObject.createImmutable(360)}, "*+*",1, 0));Debug.locals.put("alpha", _alpha);Debug.locals.put("alpha", _alpha); - BA.debugLineNum = 72;BA.debugLine="cvs.DrawCircle(cvs.TargetRect.CenterX + r * SinD"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawCircle",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterX"),_r,b4xloadingindicator.__c.runMethod(true,"SinD",(Object)(BA.numberCast(double.class, _alpha)))}, "+*",1, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterY"),_r,b4xloadingindicator.__c.runMethod(true,"CosD",(Object)(BA.numberCast(double.class, _alpha)))}, "+*",1, 0))),(Object)(BA.numberCast(float.class, b4xloadingindicator.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 7))))),(Object)(__ref.getField(true,"_clr" /*RemoteObject*/ )),(Object)(b4xloadingindicator.__c.getField(true,"True")),(Object)(BA.numberCast(float.class, b4xloadingindicator.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1)))))); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 74;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _draw_threecircles2(RemoteObject __ref,RemoteObject _progress) throws Exception{ -try { - Debug.PushSubsStack("Draw_ThreeCircles2 (b4xloadingindicator) ","b4xloadingindicator",48,__ref.getField(false, "ba"),__ref,76); -if (RapidSub.canDelegate("draw_threecircles2")) { return __ref.runUserSub(false, "b4xloadingindicator","draw_threecircles2", __ref, _progress);} -RemoteObject _minr = RemoteObject.createImmutable(0); -RemoteObject _maxr = RemoteObject.createImmutable(0); -int _i = 0; -RemoteObject _r = RemoteObject.createImmutable(0f); -Debug.locals.put("Progress", _progress); - BA.debugLineNum = 76;BA.debugLine="Private Sub Draw_ThreeCircles2 (Progress As Float)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 77;BA.debugLine="Dim MinR As Int = 5dip"; -Debug.JustUpdateDeviceLine(); -_minr = b4xloadingindicator.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 5)));Debug.locals.put("MinR", _minr);Debug.locals.put("MinR", _minr); - BA.debugLineNum = 78;BA.debugLine="Dim MaxR As Int = cvs.TargetRect.Width / 2 / 3 -"; -Debug.JustUpdateDeviceLine(); -_maxr = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getWidth"),RemoteObject.createImmutable(2),RemoteObject.createImmutable(3),_minr,b4xloadingindicator.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)))}, "//--",2, 0));Debug.locals.put("MaxR", _maxr);Debug.locals.put("MaxR", _maxr); - BA.debugLineNum = 79;BA.debugLine="For i = 0 To 2"; -Debug.JustUpdateDeviceLine(); -{ -final int step3 = 1; -final int limit3 = 2; -_i = 0 ; -for (;(step3 > 0 && _i <= limit3) || (step3 < 0 && _i >= limit3) ;_i = ((int)(0 + _i + step3)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 80;BA.debugLine="Dim r As Float = MinR + MaxR / 2 + MaxR / 2 * Si"; -Debug.JustUpdateDeviceLine(); -_r = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_minr,_maxr,RemoteObject.createImmutable(2),_maxr,RemoteObject.createImmutable(2),b4xloadingindicator.__c.runMethod(true,"SinD",(Object)(RemoteObject.solve(new RemoteObject[] {_progress,RemoteObject.createImmutable(360),RemoteObject.createImmutable(60),RemoteObject.createImmutable(_i)}, "*-*",1, 0)))}, "+/+/*",2, 0));Debug.locals.put("r", _r);Debug.locals.put("r", _r); - BA.debugLineNum = 81;BA.debugLine="cvs.DrawCircle(MaxR + MinR + (MinR + MaxR + 2dip"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawCircle",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_maxr,_minr,(RemoteObject.solve(new RemoteObject[] {_minr,_maxr,b4xloadingindicator.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)))}, "++",2, 1)),RemoteObject.createImmutable(2),RemoteObject.createImmutable(_i)}, "++**",2, 1))),(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterY")),(Object)(_r),(Object)(__ref.getField(true,"_clr" /*RemoteObject*/ )),(Object)(b4xloadingindicator.__c.getField(true,"True")),(Object)(BA.numberCast(float.class, 0))); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 83;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _hide(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Hide (b4xloadingindicator) ","b4xloadingindicator",48,__ref.getField(false, "ba"),__ref,61); -if (RapidSub.canDelegate("hide")) { return __ref.runUserSub(false, "b4xloadingindicator","hide", __ref);} - BA.debugLineNum = 61;BA.debugLine="Public Sub Hide"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 62;BA.debugLine="mBase.Visible = False"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"setVisible",b4xloadingindicator.__c.getField(true,"False")); - BA.debugLineNum = 63;BA.debugLine="index = index + 1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_index" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_index" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "+",1, 1)); - BA.debugLineNum = 64;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _callback,RemoteObject _eventname) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xloadingindicator) ","b4xloadingindicator",48,__ref.getField(false, "ba"),__ref,20); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xloadingindicator","initialize", __ref, _ba, _callback, _eventname);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); -Debug.locals.put("Callback", _callback); -Debug.locals.put("EventName", _eventname); - BA.debugLineNum = 20;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 21;BA.debugLine="mEventName = EventName"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_meventname" /*RemoteObject*/ ,_eventname); - BA.debugLineNum = 22;BA.debugLine="mCallBack = Callback"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mcallback" /*RemoteObject*/ ,_callback); - BA.debugLineNum = 23;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _mainloop(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("MainLoop (b4xloadingindicator) ","b4xloadingindicator",48,__ref.getField(false, "ba"),__ref,42); -if (RapidSub.canDelegate("mainloop")) { __ref.runUserSub(false, "b4xloadingindicator","mainloop", __ref); return;} -ResumableSub_MainLoop rsub = new ResumableSub_MainLoop(null,__ref); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_MainLoop extends BA.ResumableSub { -public ResumableSub_MainLoop(keymon.lat.medicomed.b4xloadingindicator parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.b4xloadingindicator parent; -RemoteObject _myindex = RemoteObject.createImmutable(0); -RemoteObject _n = RemoteObject.createImmutable(0L); -RemoteObject _progress = RemoteObject.createImmutable(0f); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("MainLoop (b4xloadingindicator) ","b4xloadingindicator",48,__ref.getField(false, "ba"),__ref,42); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 43;BA.debugLine="index = index + 1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_index" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_index" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "+",1, 1)); - BA.debugLineNum = 44;BA.debugLine="Dim MyIndex As Int = index"; -Debug.JustUpdateDeviceLine(); -_myindex = __ref.getField(true,"_index" /*RemoteObject*/ );Debug.locals.put("MyIndex", _myindex);Debug.locals.put("MyIndex", _myindex); - BA.debugLineNum = 45;BA.debugLine="Dim n As Long = DateTime.Now"; -Debug.JustUpdateDeviceLine(); -_n = parent.__c.getField(false,"DateTime").runMethod(true,"getNow");Debug.locals.put("n", _n);Debug.locals.put("n", _n); - BA.debugLineNum = 46;BA.debugLine="Do While MyIndex = index"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 1: -//do while -this.state = 4; -while (RemoteObject.solveBoolean("=",_myindex,BA.numberCast(double.class, __ref.getField(true,"_index" /*RemoteObject*/ )))) { -this.state = 3; -if (true) break; -} -if (true) break; - -case 3: -//C -this.state = 1; - BA.debugLineNum = 47;BA.debugLine="Dim progress As Float = (DateTime.Now - n) / dur"; -Debug.JustUpdateDeviceLine(); -_progress = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {parent.__c.getField(false,"DateTime").runMethod(true,"getNow"),_n}, "-",1, 2)),__ref.getField(true,"_duration" /*RemoteObject*/ )}, "/",0, 0));Debug.locals.put("progress", _progress);Debug.locals.put("progress", _progress); - BA.debugLineNum = 48;BA.debugLine="progress = progress - Floor(progress)"; -Debug.JustUpdateDeviceLine(); -_progress = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_progress,parent.__c.runMethod(true,"Floor",(Object)(BA.numberCast(double.class, _progress)))}, "-",1, 0));Debug.locals.put("progress", _progress); - BA.debugLineNum = 49;BA.debugLine="cvs.ClearRect(cvs.TargetRect)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("ClearRect",(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect"))); - BA.debugLineNum = 50;BA.debugLine="CallSub2(Me, DrawingSubName, progress)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runMethodAndSync(false,"CallSubNew2",__ref.getField(false, "ba"),(Object)(__ref),(Object)(__ref.getField(true,"_drawingsubname" /*RemoteObject*/ )),(Object)((_progress))); - BA.debugLineNum = 51;BA.debugLine="cvs.Invalidate"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Invalidate"); - BA.debugLineNum = 52;BA.debugLine="Sleep(10)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xloadingindicator", "mainloop"),BA.numberCast(int.class, 10)); -this.state = 5; -return; -case 5: -//C -this.state = 1; -; - if (true) break; - -case 4: -//C -this.state = -1; -; - BA.debugLineNum = 54;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _setalpha(RemoteObject __ref,RemoteObject _c,RemoteObject _alpha) throws Exception{ -try { - Debug.PushSubsStack("SetAlpha (b4xloadingindicator) ","b4xloadingindicator",48,__ref.getField(false, "ba"),__ref,91); -if (RapidSub.canDelegate("setalpha")) { return __ref.runUserSub(false, "b4xloadingindicator","setalpha", __ref, _c, _alpha);} -Debug.locals.put("c", _c); -Debug.locals.put("alpha", _alpha); - BA.debugLineNum = 91;BA.debugLine="Private Sub SetAlpha (c As Int, alpha As Int) As I"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 92;BA.debugLine="Return Bit.And(0xffffff, c) + Bit.ShiftLeft(alpha"; -Debug.JustUpdateDeviceLine(); -if (true) return RemoteObject.solve(new RemoteObject[] {b4xloadingindicator.__c.getField(false,"Bit").runMethod(true,"And",(Object)(BA.numberCast(int.class, ((int)0xffffff))),(Object)(_c)),b4xloadingindicator.__c.getField(false,"Bit").runMethod(true,"ShiftLeft",(Object)(_alpha),(Object)(BA.numberCast(int.class, 24)))}, "+",1, 1); - BA.debugLineNum = 93;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _show(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Show (b4xloadingindicator) ","b4xloadingindicator",48,__ref.getField(false, "ba"),__ref,56); -if (RapidSub.canDelegate("show")) { return __ref.runUserSub(false, "b4xloadingindicator","show", __ref);} - BA.debugLineNum = 56;BA.debugLine="Public Sub Show"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 57;BA.debugLine="mBase.Visible = True"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"setVisible",b4xloadingindicator.__c.getField(true,"True")); - BA.debugLineNum = 58;BA.debugLine="MainLoop"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xloadingindicator.class, "_mainloop" /*void*/ ); - BA.debugLineNum = 59;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xlongtexttemplate.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xlongtexttemplate.java deleted file mode 100644 index 6a2d664..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xlongtexttemplate.java +++ /dev/null @@ -1,33 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xlongtexttemplate { - public static RemoteObject myClass; - public b4xlongtexttemplate() { - } - public static PCBA staticBA = new PCBA(null, b4xlongtexttemplate.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _customlistview1 = RemoteObject.declareNull("b4a.example3.customlistview"); -public static RemoteObject _text = RemoteObject.declareNull("Object"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"CustomListView1",_ref.getField(false, "_customlistview1"),"DateUtils",_ref.getField(false, "_dateutils"),"mBase",_ref.getField(false, "_mbase"),"Text",_ref.getField(false, "_text"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xlongtexttemplate_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xlongtexttemplate_subs_0.java deleted file mode 100644 index a2e3f8b..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xlongtexttemplate_subs_0.java +++ /dev/null @@ -1,157 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xlongtexttemplate_subs_0 { - - -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Private xui As XUI"; -b4xlongtexttemplate._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",b4xlongtexttemplate._xui); - //BA.debugLineNum = 3;BA.debugLine="Public mBase As B4XView"; -b4xlongtexttemplate._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",b4xlongtexttemplate._mbase); - //BA.debugLineNum = 4;BA.debugLine="Public CustomListView1 As CustomListView"; -b4xlongtexttemplate._customlistview1 = RemoteObject.createNew ("b4a.example3.customlistview");__ref.setField("_customlistview1",b4xlongtexttemplate._customlistview1); - //BA.debugLineNum = 5;BA.debugLine="Public Text As Object"; -b4xlongtexttemplate._text = RemoteObject.createNew ("Object");__ref.setField("_text",b4xlongtexttemplate._text); - //BA.debugLineNum = 6;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _dialogclosed(RemoteObject __ref,RemoteObject _result) throws Exception{ -try { - Debug.PushSubsStack("DialogClosed (b4xlongtexttemplate) ","b4xlongtexttemplate",49,__ref.getField(false, "ba"),__ref,41); -if (RapidSub.canDelegate("dialogclosed")) { return __ref.runUserSub(false, "b4xlongtexttemplate","dialogclosed", __ref, _result);} -Debug.locals.put("Result", _result); - BA.debugLineNum = 41;BA.debugLine="Private Sub DialogClosed(Result As Int) 'ignore"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 43;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getpanel(RemoteObject __ref,RemoteObject _dialog) throws Exception{ -try { - Debug.PushSubsStack("GetPanel (b4xlongtexttemplate) ","b4xlongtexttemplate",49,__ref.getField(false, "ba"),__ref,30); -if (RapidSub.canDelegate("getpanel")) { return __ref.runUserSub(false, "b4xlongtexttemplate","getpanel", __ref, _dialog);} -Debug.locals.put("Dialog", _dialog); - BA.debugLineNum = 30;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 31;BA.debugLine="Return mBase"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_mbase" /*RemoteObject*/ ); - BA.debugLineNum = 32;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xlongtexttemplate) ","b4xlongtexttemplate",49,__ref.getField(false, "ba"),__ref,8); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xlongtexttemplate","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 8;BA.debugLine="Public Sub Initialize"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 9;BA.debugLine="mBase = xui.CreatePanel(\"mBase\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mbase" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("mBase")))); - BA.debugLineNum = 10;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, 300dip, 300dip)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(b4xlongtexttemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 300)))),(Object)(b4xlongtexttemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 300))))); - BA.debugLineNum = 11;BA.debugLine="mBase.LoadLayout(\"LongTextTemplate\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("LongTextTemplate")),__ref.getField(false, "ba")); - BA.debugLineNum = 12;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetColorAndBorder",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 13;BA.debugLine="CustomListView1.sv.SetColorAndBorder(xui.Color_Tr"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).getField(false,"_sv").runVoidMethod ("SetColorAndBorder",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 14;BA.debugLine="CustomListView1.DefaultTextBackgroundColor = 0xFF"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).setField ("_defaulttextbackgroundcolor",BA.numberCast(int.class, ((int)0xff555555))); - BA.debugLineNum = 15;BA.debugLine="CustomListView1.DefaultTextColor = xui.Color_Whit"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).setField ("_defaulttextcolor",__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_White")); - BA.debugLineNum = 16;BA.debugLine="CustomListView1.sv.Color = 0xFF464646"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).getField(false,"_sv").runMethod(true,"setColor",BA.numberCast(int.class, ((int)0xff464646))); - BA.debugLineNum = 21;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("Resize (b4xlongtexttemplate) ","b4xlongtexttemplate",49,__ref.getField(false, "ba"),__ref,23); -if (RapidSub.canDelegate("resize")) { return __ref.runUserSub(false, "b4xlongtexttemplate","resize", __ref, _width, _height);} -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 23;BA.debugLine="Public Sub Resize(Width As Int, Height As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 24;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, Width, Height)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(_width),(Object)(_height)); - BA.debugLineNum = 25;BA.debugLine="CustomListView1.AsView.SetLayoutAnimated(0, 0, 0,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runMethod(false,"_asview").runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(_width),(Object)(_height)); - BA.debugLineNum = 26;BA.debugLine="CustomListView1.Base_Resize(Width, Height)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runVoidMethod ("_base_resize",(Object)(BA.numberCast(double.class, _width)),(Object)(BA.numberCast(double.class, _height))); - BA.debugLineNum = 27;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _show(RemoteObject __ref,RemoteObject _dialog) throws Exception{ -try { - Debug.PushSubsStack("Show (b4xlongtexttemplate) ","b4xlongtexttemplate",49,__ref.getField(false, "ba"),__ref,34); -if (RapidSub.canDelegate("show")) { return __ref.runUserSub(false, "b4xlongtexttemplate","show", __ref, _dialog);} -Debug.locals.put("Dialog", _dialog); - BA.debugLineNum = 34;BA.debugLine="Private Sub Show (Dialog As B4XDialog) 'ignore"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 35;BA.debugLine="CustomListView1.Clear"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runVoidMethod ("_clear"); - BA.debugLineNum = 36;BA.debugLine="CustomListView1.AddTextItem(Text, \"\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runVoidMethod ("_addtextitem",(Object)(__ref.getField(false,"_text" /*RemoteObject*/ )),(Object)((RemoteObject.createImmutable("")))); - BA.debugLineNum = 37;BA.debugLine="CustomListView1.GetPanel(0).GetView(0).SetTextAli"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runMethod(false,"_getpanel",(Object)(BA.numberCast(int.class, 0))).runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0))).runVoidMethod ("SetTextAlignment",(Object)(BA.ObjectToString("TOP")),(Object)(RemoteObject.createImmutable("LEFT"))); - BA.debugLineNum = 38;BA.debugLine="XUIViewsUtils.AddStubToCLVIfNeeded(CustomListView"; -Debug.JustUpdateDeviceLine(); -b4xlongtexttemplate._xuiviewsutils.runVoidMethod ("_addstubtoclvifneeded" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_customlistview1" /*RemoteObject*/ )),(Object)(__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).getField(true,"_defaulttextbackgroundcolor"))); - BA.debugLineNum = 39;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xmainpage.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xmainpage.java deleted file mode 100644 index 1244199..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xmainpage.java +++ /dev/null @@ -1,98 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xmainpage { - public static RemoteObject myClass; - public b4xmainpage() { - } - public static PCBA staticBA = new PCBA(null, b4xmainpage.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _root = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _login = RemoteObject.declareNull("keymon.lat.medicomed.b4xmainpage"); -public static RemoteObject _reqmanager = RemoteObject.declareNull("keymon.lat.medicomed.dbrequestmanager"); -public static RemoteObject _principal = RemoteObject.declareNull("keymon.lat.medicomed.c_principal"); -public static RemoteObject _clientes = RemoteObject.declareNull("keymon.lat.medicomed.c_clientes"); -public static RemoteObject _cliente = RemoteObject.declareNull("keymon.lat.medicomed.c_cliente"); -public static RemoteObject _productos = RemoteObject.declareNull("keymon.lat.medicomed.c_productos"); -public static RemoteObject _updateavailable = RemoteObject.declareNull("keymon.lat.medicomed.c_updateavailable"); -public static RemoteObject _mapas = RemoteObject.declareNull("keymon.lat.medicomed.c_mapas"); -public static RemoteObject _nuevocliente = RemoteObject.declareNull("keymon.lat.medicomed.c_nuevocliente"); -public static RemoteObject _ticketsdia = RemoteObject.declareNull("keymon.lat.medicomed.c_ticketsdia"); -public static RemoteObject _noventa = RemoteObject.declareNull("keymon.lat.medicomed.c_noventa"); -public static RemoteObject _nota = RemoteObject.declareNull("keymon.lat.medicomed.c_nota"); -public static RemoteObject _pedidos = RemoteObject.declareNull("keymon.lat.medicomed.c_pedidos"); -public static RemoteObject _promos = RemoteObject.declareNull("keymon.lat.medicomed.c_promos"); -public static RemoteObject _historico = RemoteObject.declareNull("keymon.lat.medicomed.c_historico"); -public static RemoteObject _v = RemoteObject.createImmutable(""); -public static RemoteObject _ruta = RemoteObject.createImmutable(""); -public static RemoteObject _tgl = RemoteObject.declareNull("com.rootsoft.togglelibrary.ToggleLibrary"); -public static RemoteObject _lat_gps = RemoteObject.createImmutable(""); -public static RemoteObject _lon_gps = RemoteObject.createImmutable(""); -public static RemoteObject _usuario = RemoteObject.createImmutable(""); -public static RemoteObject _batt = RemoteObject.createImmutable(0); -public static RemoteObject _skmt = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL"); -public static RemoteObject _montoactual = RemoteObject.createImmutable(""); -public static RemoteObject _clientestotal = RemoteObject.createImmutable(""); -public static RemoteObject _clientesventa = RemoteObject.createImmutable(""); -public static RemoteObject _clientesvisitados = RemoteObject.createImmutable(""); -public static RemoteObject _almacen = RemoteObject.createImmutable(""); -public static RemoteObject _rutapreventa = RemoteObject.createImmutable(""); -public static RemoteObject _server = RemoteObject.createImmutable(""); -public static RemoteObject _fecharuta = RemoteObject.createImmutable(""); -public static RemoteObject _logger = RemoteObject.createImmutable(false); -public static RemoteObject _mac_impresora = RemoteObject.createImmutable(""); -public static RemoteObject _phn = RemoteObject.declareNull("anywheresoftware.b4a.phone.Phone.PhoneId"); -public static RemoteObject _user = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -public static RemoteObject _pass = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -public static RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _existe = RemoteObject.createImmutable(""); -public static RemoteObject _paso1 = RemoteObject.createImmutable(""); -public static RemoteObject _imen = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _imei = RemoteObject.createImmutable(""); -public static RemoteObject _alterno = RemoteObject.createImmutable(""); -public static RemoteObject _b_menu = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _popupmenu = RemoteObject.declareNull("com.rootsoft.rspopupmenu.RSPopupMenu"); -public static RemoteObject _cmd = RemoteObject.declareNull("keymon.lat.medicomed.dbrequestmanager._dbcommand"); -public static RemoteObject _pdf = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _bpv1 = RemoteObject.declareNull("batteryprogressviewwrapper.batteryprogressviewWrapper"); -public static RemoteObject _batterystatus = null; -public static RemoteObject _bu = RemoteObject.declareNull("keymon.lat.medicomed.batteryutilities"); -public static RemoteObject _b_apk = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _i_engrane = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -public static RemoteObject _p_main = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _p_appupdate = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _b_regesar = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _l_version = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _imageview1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -public static RemoteObject _label2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _entrar = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _tipo_venta = RemoteObject.createImmutable(""); -public static RemoteObject _bterminarclicked = RemoteObject.createImmutable(false); -public static RemoteObject _lv_server = RemoteObject.declareNull("anywheresoftware.b4a.objects.ListViewWrapper"); -public static RemoteObject _l_server = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _et_server = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -public static RemoteObject _b_server = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _b_enviobd = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _provider = RemoteObject.declareNull("keymon.lat.medicomed.fileprovider"); -public static RemoteObject _rutabdbackup = RemoteObject.createImmutable(""); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"almacen",_ref.getField(false, "_almacen"),"alterno",_ref.getField(false, "_alterno"),"b_apk",_ref.getField(false, "_b_apk"),"b_envioBD",_ref.getField(false, "_b_enviobd"),"b_menu",_ref.getField(false, "_b_menu"),"b_regesar",_ref.getField(false, "_b_regesar"),"b_server",_ref.getField(false, "_b_server"),"batt",_ref.getField(false, "_batt"),"batterystatus",_ref.getField(false, "_batterystatus"),"bpv1",_ref.getField(false, "_bpv1"),"bTerminarClicked",_ref.getField(false, "_bterminarclicked"),"bu",_ref.getField(false, "_bu"),"c",_ref.getField(false, "_c"),"cliente",_ref.getField(false, "_cliente"),"clientes",_ref.getField(false, "_clientes"),"clientesTotal",_ref.getField(false, "_clientestotal"),"clientesVenta",_ref.getField(false, "_clientesventa"),"clientesVisitados",_ref.getField(false, "_clientesvisitados"),"cmd",_ref.getField(false, "_cmd"),"DateUtils",_ref.getField(false, "_dateutils"),"Entrar",_ref.getField(false, "_entrar"),"et_server",_ref.getField(false, "_et_server"),"existe",_ref.getField(false, "_existe"),"fechaRuta",_ref.getField(false, "_fecharuta"),"historico",_ref.getField(false, "_historico"),"i_engrane",_ref.getField(false, "_i_engrane"),"ImageView1",_ref.getField(false, "_imageview1"),"IMEI",_ref.getField(false, "_imei"),"IMEN",_ref.getField(false, "_imen"),"l_server",_ref.getField(false, "_l_server"),"l_version",_ref.getField(false, "_l_version"),"Label2",_ref.getField(false, "_label2"),"lat_gps",_ref.getField(false, "_lat_gps"),"Logger",_ref.getField(false, "_logger"),"login",_ref.getField(false, "_login"),"lon_gps",_ref.getField(false, "_lon_gps"),"lv_server",_ref.getField(false, "_lv_server"),"mac_impresora",_ref.getField(false, "_mac_impresora"),"mapas",_ref.getField(false, "_mapas"),"montoActual",_ref.getField(false, "_montoactual"),"nota",_ref.getField(false, "_nota"),"noVenta",_ref.getField(false, "_noventa"),"nuevoCliente",_ref.getField(false, "_nuevocliente"),"p_appUpdate",_ref.getField(false, "_p_appupdate"),"p_Main",_ref.getField(false, "_p_main"),"paso1",_ref.getField(false, "_paso1"),"pass",_ref.getField(false, "_pass"),"PDF",_ref.getField(false, "_pdf"),"pedidos",_ref.getField(false, "_pedidos"),"Phn",_ref.getField(false, "_phn"),"PopupMenu",_ref.getField(false, "_popupmenu"),"principal",_ref.getField(false, "_principal"),"productos",_ref.getField(false, "_productos"),"promos",_ref.getField(false, "_promos"),"Provider",_ref.getField(false, "_provider"),"reqManager",_ref.getField(false, "_reqmanager"),"Root",_ref.getField(false, "_root"),"ruta",_ref.getField(false, "_ruta"),"rutaBDBackup",_ref.getField(false, "_rutabdbackup"),"rutaPreventa",_ref.getField(false, "_rutapreventa"),"server",_ref.getField(false, "_server"),"skmt",_ref.getField(false, "_skmt"),"tgl",_ref.getField(false, "_tgl"),"ticketsDia",_ref.getField(false, "_ticketsdia"),"tipo_venta",_ref.getField(false, "_tipo_venta"),"updateAvailable",_ref.getField(false, "_updateavailable"),"user",_ref.getField(false, "_user"),"usuario",_ref.getField(false, "_usuario"),"v",_ref.getField(false, "_v"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xmainpage_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xmainpage_subs_0.java deleted file mode 100644 index a4d49fc..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xmainpage_subs_0.java +++ /dev/null @@ -1,2170 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xmainpage_subs_0 { - - -public static RemoteObject _b_apk_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_apk_Click (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,621); -if (RapidSub.canDelegate("b_apk_click")) { return __ref.runUserSub(false, "b4xmainpage","b_apk_click", __ref);} - BA.debugLineNum = 621;BA.debugLine="Sub b_apk_Click"; -Debug.ShouldStop(4096); - BA.debugLineNum = 622;BA.debugLine="StartService(appUpdater)"; -Debug.ShouldStop(8192); -b4xmainpage.__c.runVoidMethod ("StartService",__ref.getField(false, "ba"),(Object)((b4xmainpage._appupdater.getObject()))); - BA.debugLineNum = 623;BA.debugLine="End Sub"; -Debug.ShouldStop(16384); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _b_enviobd_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_envioBD_Click (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,678); -if (RapidSub.canDelegate("b_enviobd_click")) { __ref.runUserSub(false, "b4xmainpage","b_enviobd_click", __ref); return;} -ResumableSub_b_envioBD_Click rsub = new ResumableSub_b_envioBD_Click(null,__ref); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_b_envioBD_Click extends BA.ResumableSub { -public ResumableSub_b_envioBD_Click(keymon.lat.medicomed.b4xmainpage parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.b4xmainpage parent; -RemoteObject _filename = RemoteObject.createImmutable(""); -RemoteObject _email = RemoteObject.declareNull("anywheresoftware.b4a.phone.Phone.Email"); -RemoteObject _in = RemoteObject.declareNull("anywheresoftware.b4a.objects.IntentWrapper"); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("b_envioBD_Click (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,678); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = -1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 681;BA.debugLine="Dim FileName As String = \"kmt.db\""; -Debug.ShouldStop(256); -_filename = BA.ObjectToString("kmt.db");Debug.locals.put("FileName", _filename);Debug.locals.put("FileName", _filename); - BA.debugLineNum = 683;BA.debugLine="Log(\"xxxxxx:\"&Provider.SharedFolder)"; -Debug.ShouldStop(1024); -parent.__c.runVoidMethod ("LogImpl","32097157",RemoteObject.concat(RemoteObject.createImmutable("xxxxxx:"),__ref.getField(false,"_provider" /*RemoteObject*/ ).getField(true,"_sharedfolder" /*RemoteObject*/ )),0); - BA.debugLineNum = 684;BA.debugLine="Sleep(1000)"; -Debug.ShouldStop(2048); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xmainpage", "b_enviobd_click"),BA.numberCast(int.class, 1000)); -this.state = 1; -return; -case 1: -//C -this.state = -1; -; - BA.debugLineNum = 685;BA.debugLine="File.Copy(File.DirInternal, FileName, Provider.Sh"; -Debug.ShouldStop(4096); -parent.__c.getField(false,"File").runVoidMethod ("Copy",(Object)(parent.__c.getField(false,"File").runMethod(true,"getDirInternal")),(Object)(_filename),(Object)(__ref.getField(false,"_provider" /*RemoteObject*/ ).getField(true,"_sharedfolder" /*RemoteObject*/ )),(Object)(_filename)); - BA.debugLineNum = 686;BA.debugLine="Dim email As Email"; -Debug.ShouldStop(8192); -_email = RemoteObject.createNew ("anywheresoftware.b4a.phone.Phone.Email");Debug.locals.put("email", _email); - BA.debugLineNum = 687;BA.debugLine="email.To.Add(\"cheveguerra@gmail.com\")"; -Debug.ShouldStop(16384); -_email.getField(false,"To").runVoidMethod ("Add",(Object)((RemoteObject.createImmutable("cheveguerra@gmail.com")))); - BA.debugLineNum = 688;BA.debugLine="email.Subject = \"subject\""; -Debug.ShouldStop(32768); -_email.setField ("Subject",BA.ObjectToString("subject")); - BA.debugLineNum = 689;BA.debugLine="email.Attachments.Add(Provider.GetFileUri(FileNam"; -Debug.ShouldStop(65536); -_email.getField(false,"Attachments").runVoidMethod ("Add",(Object)(__ref.getField(false,"_provider" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.fileprovider.class, "_getfileuri" /*RemoteObject*/ ,(Object)(_filename)))); - BA.debugLineNum = 691;BA.debugLine="Dim in As Intent = email.GetIntent"; -Debug.ShouldStop(262144); -_in = RemoteObject.createNew ("anywheresoftware.b4a.objects.IntentWrapper"); -_in = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.IntentWrapper"), _email.runMethod(false,"GetIntent"));Debug.locals.put("in", _in);Debug.locals.put("in", _in); - BA.debugLineNum = 692;BA.debugLine="in.Flags = 1 'FLAG_GRANT_READ_URI_PERMISSION"; -Debug.ShouldStop(524288); -_in.runMethod(true,"setFlags",BA.numberCast(int.class, 1)); - BA.debugLineNum = 693;BA.debugLine="StartActivity(in)"; -Debug.ShouldStop(1048576); -parent.__c.runVoidMethod ("StartActivity",__ref.getField(false, "ba"),(Object)((_in.getObject()))); - BA.debugLineNum = 694;BA.debugLine="End Sub"; -Debug.ShouldStop(2097152); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _b_menu_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_menu_Click (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,547); -if (RapidSub.canDelegate("b_menu_click")) { return __ref.runUserSub(false, "b4xmainpage","b_menu_click", __ref);} - BA.debugLineNum = 547;BA.debugLine="Sub b_menu_Click"; -Debug.ShouldStop(4); - BA.debugLineNum = 548;BA.debugLine="PopupMenu.Show"; -Debug.ShouldStop(8); -__ref.getField(false,"_popupmenu" /*RemoteObject*/ ).runVoidMethod ("Show"); - BA.debugLineNum = 549;BA.debugLine="End Sub"; -Debug.ShouldStop(16); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_regesar_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_regesar_Click (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,644); -if (RapidSub.canDelegate("b_regesar_click")) { return __ref.runUserSub(false, "b4xmainpage","b_regesar_click", __ref);} - BA.debugLineNum = 644;BA.debugLine="Sub b_regesar_Click"; -Debug.ShouldStop(8); - BA.debugLineNum = 645;BA.debugLine="p_appUpdate.Visible = False"; -Debug.ShouldStop(16); -__ref.getField(false,"_p_appupdate" /*RemoteObject*/ ).runMethod(true,"setVisible",b4xmainpage.__c.getField(true,"False")); - BA.debugLineNum = 646;BA.debugLine="Subs.panelVisible(p_Main,0,0)"; -Debug.ShouldStop(32); -b4xmainpage._subs.runVoidMethod ("_panelvisible" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_p_main" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 647;BA.debugLine="End Sub"; -Debug.ShouldStop(64); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_server_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B_SERVER_Click (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,653); -if (RapidSub.canDelegate("b_server_click")) { return __ref.runUserSub(false, "b4xmainpage","b_server_click", __ref);} - BA.debugLineNum = 653;BA.debugLine="Sub B_SERVER_Click"; -Debug.ShouldStop(4096); - BA.debugLineNum = 654;BA.debugLine="skmt.ExecNonQuery2(\"delete from CAT_VARIABLES whe"; -Debug.ShouldStop(8192); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("delete from CAT_VARIABLES where CAT_VA_DESCRIPCION = ?")),(Object)(b4xmainpage.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(RemoteObject.createImmutable("SERVER"))}))))); - BA.debugLineNum = 655;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO CAT_VARIABLES(CAT"; -Debug.ShouldStop(16384); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO CAT_VARIABLES(CAT_VA_DESCRIPCION, CAT_VA_VALOR) VALUES (?,?)")),(Object)(b4xmainpage.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {RemoteObject.createImmutable(("SERVER")),(__ref.getField(false,"_et_server" /*RemoteObject*/ ).runMethod(true,"getText"))}))))); - BA.debugLineNum = 656;BA.debugLine="Starter.server = et_server.text"; -Debug.ShouldStop(32768); -b4xmainpage._starter._server /*RemoteObject*/ = __ref.getField(false,"_et_server" /*RemoteObject*/ ).runMethod(true,"getText"); - BA.debugLineNum = 657;BA.debugLine="If Logger Then Log(\"Inicializamos reqManager con"; -Debug.ShouldStop(65536); -if (__ref.getField(true,"_logger" /*RemoteObject*/ ).get().booleanValue()) { -b4xmainpage.__c.runVoidMethod ("LogImpl","31900548",RemoteObject.concat(RemoteObject.createImmutable("Inicializamos reqManager con "),b4xmainpage._starter._server /*RemoteObject*/ ),0);}; - BA.debugLineNum = 658;BA.debugLine="reqManager.Initialize(Me, Starter.server)"; -Debug.ShouldStop(131072); -__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref),(Object)(b4xmainpage._starter._server /*RemoteObject*/ )); - BA.debugLineNum = 659;BA.debugLine="CallSubDelayed(Starter, \"reinicializaReqManager\")"; -Debug.ShouldStop(262144); -b4xmainpage.__c.runVoidMethod ("CallSubDelayed",__ref.getField(false, "ba"),(Object)((b4xmainpage._starter.getObject())),(Object)(RemoteObject.createImmutable("reinicializaReqManager"))); - BA.debugLineNum = 660;BA.debugLine="Subs.panelVisible(p_Main,0,0)"; -Debug.ShouldStop(524288); -b4xmainpage._subs.runVoidMethod ("_panelvisible" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_p_main" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 661;BA.debugLine="p_appUpdate.Visible = False"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_p_appupdate" /*RemoteObject*/ ).runMethod(true,"setVisible",b4xmainpage.__c.getField(true,"False")); - BA.debugLineNum = 663;BA.debugLine="End Sub"; -Debug.ShouldStop(4194304); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _b4xpage_appear(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Appear (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,244); -if (RapidSub.canDelegate("b4xpage_appear")) { __ref.runUserSub(false, "b4xmainpage","b4xpage_appear", __ref); return;} -ResumableSub_B4XPage_Appear rsub = new ResumableSub_B4XPage_Appear(null,__ref); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_B4XPage_Appear extends BA.ResumableSub { -public ResumableSub_B4XPage_Appear(keymon.lat.medicomed.b4xmainpage parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.b4xmainpage parent; -RemoteObject _ph = RemoteObject.declareNull("anywheresoftware.b4a.phone.Phone"); -RemoteObject _deviceid = RemoteObject.createImmutable(""); -RemoteObject _sdate = RemoteObject.createImmutable(""); -RemoteObject _stime = RemoteObject.createImmutable(""); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Appear (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,244); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 245;BA.debugLine="If Starter.muestraProgreso = 1 Then"; -Debug.ShouldStop(1048576); -if (true) break; - -case 1: -//if -this.state = 4; -if (RemoteObject.solveBoolean("=",parent._starter._muestraprogreso /*RemoteObject*/ ,BA.NumberToString(1))) { -this.state = 3; -}if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 246;BA.debugLine="muestraProgreso(\"Descargando actualización\")"; -Debug.ShouldStop(2097152); -__ref.runClassMethod (keymon.lat.medicomed.b4xmainpage.class, "_muestraprogreso" /*RemoteObject*/ ,(Object)(RemoteObject.createImmutable("Descargando actualización"))); - BA.debugLineNum = 247;BA.debugLine="Starter.muestraProgreso = 0"; -Debug.ShouldStop(4194304); -parent._starter._muestraprogreso /*RemoteObject*/ = BA.NumberToString(0); - if (true) break; - -case 4: -//C -this.state = 5; -; - BA.debugLineNum = 249;BA.debugLine="Dim ph As Phone 'Get Id Device"; -Debug.ShouldStop(16777216); -_ph = RemoteObject.createNew ("anywheresoftware.b4a.phone.Phone");Debug.locals.put("ph", _ph); - BA.debugLineNum = 250;BA.debugLine="Dim DeviceID As String = ph.GetSettings(\"android_"; -Debug.ShouldStop(33554432); -_deviceid = _ph.runMethod(true,"GetSettings",(Object)(RemoteObject.createImmutable("android_id"))).runMethod(true,"toUpperCase");Debug.locals.put("DeviceID", _deviceid);Debug.locals.put("DeviceID", _deviceid); - BA.debugLineNum = 251;BA.debugLine="LogColor($\"////////////////// DeviceID: ${Devic"; -Debug.ShouldStop(67108864); -parent.__c.runVoidMethod ("LogImpl","3786439",(RemoteObject.concat(RemoteObject.createImmutable("////////////////// DeviceID: "),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_deviceid))),RemoteObject.createImmutable(" ////////////////// "))),parent.__c.getField(false,"Colors").getField(true,"Blue")); - BA.debugLineNum = 252;BA.debugLine="server = Starter.server"; -Debug.ShouldStop(134217728); -__ref.setField ("_server" /*RemoteObject*/ ,parent._starter._server /*RemoteObject*/ ); - BA.debugLineNum = 253;BA.debugLine="reqManager.Initialize(Me, Starter.server)"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref),(Object)(parent._starter._server /*RemoteObject*/ )); - BA.debugLineNum = 254;BA.debugLine="tgl.Initialize()"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_tgl" /*RemoteObject*/ ).runVoidMethod ("Initialize",__ref.getField(false, "ba")); - BA.debugLineNum = 255;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then"; -Debug.ShouldStop(1073741824); -if (true) break; - -case 5: -//if -this.state = 8; -if (parent.__c.runMethod(true,"Not",(Object)(parent._starter._gps /*RemoteObject*/ .runMethod(true,"getGPSEnabled"))).get().booleanValue()) { -this.state = 7; -}if (true) break; - -case 7: -//C -this.state = 8; - BA.debugLineNum = 256;BA.debugLine="ToastMessageShow(\"Es necesario tener el GPS ence"; -Debug.ShouldStop(-2147483648); -parent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Es necesario tener el GPS encendido")),(Object)(parent.__c.getField(true,"True"))); - BA.debugLineNum = 257;BA.debugLine="Sleep(500)"; -Debug.ShouldStop(1); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xmainpage", "b4xpage_appear"),BA.numberCast(int.class, 500)); -this.state = 19; -return; -case 19: -//C -this.state = 8; -; - BA.debugLineNum = 258;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent"; -Debug.ShouldStop(2); -parent.__c.runVoidMethod ("StartActivity",__ref.getField(false, "ba"),(Object)((parent._starter._gps /*RemoteObject*/ .runMethod(false,"getLocationSettingsIntent")))); - if (true) break; - -case 8: -//C -this.state = 9; -; - BA.debugLineNum = 260;BA.debugLine="c=skmt.ExecQuery2(\"select count(*) as CUANTOS fro"; -Debug.ShouldStop(8); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (__ref.getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select count(*) as CUANTOS from CAT_VARIABLES WHERE CAT_VA_DESCRIPCION = ?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("FECHA")})))); - BA.debugLineNum = 261;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(16); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 262;BA.debugLine="If c.GetString(\"CUANTOS\") = 0 Then"; -Debug.ShouldStop(32); -if (true) break; - -case 9: -//if -this.state = 18; -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS"))),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\""; -Debug.ShouldStop(64); -parent.__c.runVoidMethod ("LogImpl","3786451",(RemoteObject.concat(RemoteObject.createImmutable("No hay fecha: "),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))))),RemoteObject.createImmutable(""))),parent.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 264;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(128); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 265;BA.debugLine="cmd.Name = \"select_fecha\""; -Debug.ShouldStop(256); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_fecha")); - BA.debugLineNum = 266;BA.debugLine="reqManager.ExecuteQuery(cmd , 0, \"fecha\")"; -Debug.ShouldStop(512); -__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("fecha")))); - BA.debugLineNum = 267;BA.debugLine="Msgbox(\"AJUSTAR FECHA\",\"AVISO\") 'Ignore"; -Debug.ShouldStop(1024); -parent.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("AJUSTAR FECHA")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("AVISO"))),__ref.getField(false, "ba")); - BA.debugLineNum = 268;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(2048); -__ref.runClassMethod (keymon.lat.medicomed.b4xmainpage.class, "_b4xpage_appear" /*void*/ ); - if (true) break; - -case 13: -//C -this.state = 14; - BA.debugLineNum = 271;BA.debugLine="c=skmt.ExecQuery2(\"select CAT_VA_VALOR from CAT_"; -Debug.ShouldStop(16384); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (__ref.getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select CAT_VA_VALOR from CAT_VARIABLES WHERE CAT_VA_DESCRIPCION = ?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("FECHA")})))); - BA.debugLineNum = 272;BA.debugLine="c.Position =0"; -Debug.ShouldStop(32768); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 273;BA.debugLine="Dim sDate, sTime As String"; -Debug.ShouldStop(65536); -_sdate = RemoteObject.createImmutable("");Debug.locals.put("sDate", _sdate); -_stime = RemoteObject.createImmutable("");Debug.locals.put("sTime", _stime); - BA.debugLineNum = 274;BA.debugLine="DateTime.DateFormat = \"yyyyMMdd\""; -Debug.ShouldStop(131072); -parent.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("yyyyMMdd")); - BA.debugLineNum = 275;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(262144); -_sdate = parent.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(parent.__c.getField(false,"DateTime").runMethod(true,"getNow")));Debug.locals.put("sDate", _sdate); - BA.debugLineNum = 280;BA.debugLine="If c.GetString(\"CAT_VA_VALOR\") > sDate Then"; -Debug.ShouldStop(8388608); -if (true) break; - -case 14: -//if -this.state = 17; -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_VA_VALOR")))),BA.numberCast(double.class, _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"; -Debug.ShouldStop(16777216); -parent.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("AJUSTAR LA FECHA YA QUE ES MENOR AL SISTEMA")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("AVISO"))),__ref.getField(false, "ba")); - BA.debugLineNum = 282;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(33554432); -__ref.runClassMethod (keymon.lat.medicomed.b4xmainpage.class, "_b4xpage_appear" /*void*/ ); - 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"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_bu" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.batteryutilities.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 286;BA.debugLine="batterystatus = bu.BatteryInformation"; -Debug.ShouldStop(536870912); -__ref.setField ("_batterystatus" /*RemoteObject*/ ,__ref.getField(false,"_bu" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.batteryutilities.class, "_getbatteryinformation" /*RemoteObject*/ )); - BA.debugLineNum = 289;BA.debugLine="dameUsuario"; -Debug.ShouldStop(1); -__ref.runClassMethod (keymon.lat.medicomed.b4xmainpage.class, "_dameusuario" /*RemoteObject*/ ); - BA.debugLineNum = 290;BA.debugLine="End Sub"; -Debug.ShouldStop(2); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _b4xpage_closerequest(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_CloseRequest (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,516); -if (RapidSub.canDelegate("b4xpage_closerequest")) { return __ref.runUserSub(false, "b4xmainpage","b4xpage_closerequest", __ref);} -ResumableSub_B4XPage_CloseRequest rsub = new ResumableSub_B4XPage_CloseRequest(null,__ref); -rsub.remoteResumableSub = anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSubForFilter(); -rsub.resume(null, null); -return RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.keywords.Common.ResumableSubWrapper"), rsub.remoteResumableSub); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_B4XPage_CloseRequest extends BA.ResumableSub { -public ResumableSub_B4XPage_CloseRequest(keymon.lat.medicomed.b4xmainpage parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.b4xmainpage parent; - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_CloseRequest (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,516); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -{ -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,RemoteObject.createImmutable(null));return;} -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 517;BA.debugLine="Log(\"closreq\")"; -Debug.ShouldStop(16); -parent.__c.runVoidMethod ("LogImpl","3983041",RemoteObject.createImmutable("closreq"),0); - BA.debugLineNum = 518;BA.debugLine="Sleep(0)"; -Debug.ShouldStop(32); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xmainpage", "b4xpage_closerequest"),BA.numberCast(int.class, 0)); -this.state = 8; -return; -case 8: -//C -this.state = 1; -; - BA.debugLineNum = 519;BA.debugLine="If p_appUpdate.Visible Then"; -Debug.ShouldStop(64); -if (true) break; - -case 1: -//if -this.state = 4; -if (__ref.getField(false,"_p_appupdate" /*RemoteObject*/ ).runMethod(true,"getVisible").get().booleanValue()) { -this.state = 3; -}if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 520;BA.debugLine="Log(\"update visible\")"; -Debug.ShouldStop(128); -parent.__c.runVoidMethod ("LogImpl","3983044",RemoteObject.createImmutable("update visible"),0); - BA.debugLineNum = 521;BA.debugLine="p_appUpdate.Visible = False"; -Debug.ShouldStop(256); -__ref.getField(false,"_p_appupdate" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 522;BA.debugLine="Return False"; -Debug.ShouldStop(512); -if (true) { -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,(parent.__c.getField(true,"False")));return;}; - if (true) break; -; - BA.debugLineNum = 524;BA.debugLine="If Not(p_appUpdate.Visible) Then"; -Debug.ShouldStop(2048); - -case 4: -//if -this.state = 7; -if (parent.__c.runMethod(true,"Not",(Object)(__ref.getField(false,"_p_appupdate" /*RemoteObject*/ ).runMethod(true,"getVisible"))).get().booleanValue()) { -this.state = 6; -}if (true) break; - -case 6: -//C -this.state = 7; - BA.debugLineNum = 525;BA.debugLine="Log(\"ExitApplication\")"; -Debug.ShouldStop(4096); -parent.__c.runVoidMethod ("LogImpl","3983049",RemoteObject.createImmutable("ExitApplication"),0); - BA.debugLineNum = 526;BA.debugLine="ExitApplication"; -Debug.ShouldStop(8192); -parent.__c.runVoidMethod ("ExitApplication"); - if (true) break; - -case 7: -//C -this.state = -1; -; - BA.debugLineNum = 528;BA.debugLine="Return True"; -Debug.ShouldStop(32768); -if (true) { -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,(parent.__c.getField(true,"True")));return;}; - BA.debugLineNum = 529;BA.debugLine="End Sub"; -Debug.ShouldStop(65536); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _b4xpage_created(RemoteObject __ref,RemoteObject _root1) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Created (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,101); -if (RapidSub.canDelegate("b4xpage_created")) { return __ref.runUserSub(false, "b4xmainpage","b4xpage_created", __ref, _root1);} -Debug.locals.put("Root1", _root1); - BA.debugLineNum = 101;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -Debug.ShouldStop(16); - BA.debugLineNum = 102;BA.debugLine="B4XPages.GetManager.LogEvents = True"; -Debug.ShouldStop(32); -b4xmainpage._b4xpages.runMethod(false,"_getmanager" /*RemoteObject*/ ,__ref.getField(false, "ba")).setField ("_logevents" /*RemoteObject*/ ,b4xmainpage.__c.getField(true,"True")); - BA.debugLineNum = 103;BA.debugLine="Root = Root1"; -Debug.ShouldStop(64); -__ref.setField ("_root" /*RemoteObject*/ ,_root1); - BA.debugLineNum = 104;BA.debugLine="Root.LoadLayout(\"login\")"; -Debug.ShouldStop(128); -__ref.getField(false,"_root" /*RemoteObject*/ ).runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("login")),__ref.getField(false, "ba")); - BA.debugLineNum = 105;BA.debugLine="B4XPages.SetTitle(Me, \"Medicomed Preventa\")"; -Debug.ShouldStop(256); -b4xmainpage._b4xpages.runVoidMethod ("_settitle" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref),(Object)((RemoteObject.createImmutable("Medicomed Preventa")))); - BA.debugLineNum = 106;BA.debugLine="login.Initialize"; -Debug.ShouldStop(512); -__ref.getField(false,"_login" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xmainpage.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 107;BA.debugLine="B4XPages.AddPage(\"Login\", login)"; -Debug.ShouldStop(1024); -b4xmainpage._b4xpages.runVoidMethod ("_addpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString("Login")),(Object)((__ref.getField(false,"_login" /*RemoteObject*/ )))); - BA.debugLineNum = 108;BA.debugLine="principal.Initialize"; -Debug.ShouldStop(2048); -__ref.getField(false,"_principal" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.c_principal.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 109;BA.debugLine="B4XPages.AddPage(\"Principal\", principal)"; -Debug.ShouldStop(4096); -b4xmainpage._b4xpages.runVoidMethod ("_addpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString("Principal")),(Object)((__ref.getField(false,"_principal" /*RemoteObject*/ )))); - BA.debugLineNum = 110;BA.debugLine="clientes.Initialize"; -Debug.ShouldStop(8192); -__ref.getField(false,"_clientes" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.c_clientes.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 111;BA.debugLine="B4XPages.AddPage(\"Clientes\", clientes)"; -Debug.ShouldStop(16384); -b4xmainpage._b4xpages.runVoidMethod ("_addpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString("Clientes")),(Object)((__ref.getField(false,"_clientes" /*RemoteObject*/ )))); - BA.debugLineNum = 112;BA.debugLine="cliente.Initialize"; -Debug.ShouldStop(32768); -__ref.getField(false,"_cliente" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.c_cliente.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 113;BA.debugLine="B4XPages.AddPage(\"Cliente\", cliente)"; -Debug.ShouldStop(65536); -b4xmainpage._b4xpages.runVoidMethod ("_addpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString("Cliente")),(Object)((__ref.getField(false,"_cliente" /*RemoteObject*/ )))); - BA.debugLineNum = 114;BA.debugLine="productos.Initialize"; -Debug.ShouldStop(131072); -__ref.getField(false,"_productos" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.c_productos.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 115;BA.debugLine="B4XPages.AddPage(\"Productos\", productos)"; -Debug.ShouldStop(262144); -b4xmainpage._b4xpages.runVoidMethod ("_addpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString("Productos")),(Object)((__ref.getField(false,"_productos" /*RemoteObject*/ )))); - BA.debugLineNum = 116;BA.debugLine="updateAvailable.Initialize"; -Debug.ShouldStop(524288); -__ref.getField(false,"_updateavailable" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.c_updateavailable.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 117;BA.debugLine="B4XPages.AddPage(\"updateAvailable\", updateAvailab"; -Debug.ShouldStop(1048576); -b4xmainpage._b4xpages.runVoidMethod ("_addpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString("updateAvailable")),(Object)((__ref.getField(false,"_updateavailable" /*RemoteObject*/ )))); - BA.debugLineNum = 118;BA.debugLine="mapas.Initialize"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_mapas" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.c_mapas.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 119;BA.debugLine="B4XPages.AddPage(\"Mapas\", mapas)"; -Debug.ShouldStop(4194304); -b4xmainpage._b4xpages.runVoidMethod ("_addpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString("Mapas")),(Object)((__ref.getField(false,"_mapas" /*RemoteObject*/ )))); - BA.debugLineNum = 120;BA.debugLine="nuevoCliente.Initialize"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_nuevocliente" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.c_nuevocliente.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 121;BA.debugLine="B4XPages.AddPage(\"NuevoCliente\", nuevoCliente)"; -Debug.ShouldStop(16777216); -b4xmainpage._b4xpages.runVoidMethod ("_addpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString("NuevoCliente")),(Object)((__ref.getField(false,"_nuevocliente" /*RemoteObject*/ )))); - BA.debugLineNum = 122;BA.debugLine="ticketsDia.Initialize"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_ticketsdia" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.c_ticketsdia.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 123;BA.debugLine="B4XPages.AddPage(\"TicketsDia\", ticketsDia)"; -Debug.ShouldStop(67108864); -b4xmainpage._b4xpages.runVoidMethod ("_addpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString("TicketsDia")),(Object)((__ref.getField(false,"_ticketsdia" /*RemoteObject*/ )))); - BA.debugLineNum = 124;BA.debugLine="noVenta.Initialize"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_noventa" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.c_noventa.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 125;BA.debugLine="B4XPages.AddPage(\"NoVenta\", noVenta)"; -Debug.ShouldStop(268435456); -b4xmainpage._b4xpages.runVoidMethod ("_addpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString("NoVenta")),(Object)((__ref.getField(false,"_noventa" /*RemoteObject*/ )))); - BA.debugLineNum = 126;BA.debugLine="nota.Initialize"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_nota" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.c_nota.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 127;BA.debugLine="B4XPages.AddPage(\"Nota\", nota)"; -Debug.ShouldStop(1073741824); -b4xmainpage._b4xpages.runVoidMethod ("_addpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString("Nota")),(Object)((__ref.getField(false,"_nota" /*RemoteObject*/ )))); - BA.debugLineNum = 128;BA.debugLine="pedidos.Initialize"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_pedidos" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.c_pedidos.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 129;BA.debugLine="B4XPages.AddPage(\"Pedidos\", pedidos)"; -Debug.ShouldStop(1); -b4xmainpage._b4xpages.runVoidMethod ("_addpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString("Pedidos")),(Object)((__ref.getField(false,"_pedidos" /*RemoteObject*/ )))); - BA.debugLineNum = 130;BA.debugLine="promos.Initialize"; -Debug.ShouldStop(2); -__ref.getField(false,"_promos" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.c_promos.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 131;BA.debugLine="B4XPages.AddPage(\"Promos\", promos)"; -Debug.ShouldStop(4); -b4xmainpage._b4xpages.runVoidMethod ("_addpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString("Promos")),(Object)((__ref.getField(false,"_promos" /*RemoteObject*/ )))); - BA.debugLineNum = 132;BA.debugLine="historico.Initialize"; -Debug.ShouldStop(8); -__ref.getField(false,"_historico" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.c_historico.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 133;BA.debugLine="B4XPages.AddPage(\"Historico\", historico)"; -Debug.ShouldStop(16); -b4xmainpage._b4xpages.runVoidMethod ("_addpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString("Historico")),(Object)((__ref.getField(false,"_historico" /*RemoteObject*/ )))); - BA.debugLineNum = 134;BA.debugLine="ruta = Starter.ruta"; -Debug.ShouldStop(32); -__ref.setField ("_ruta" /*RemoteObject*/ ,b4xmainpage._starter._ruta /*RemoteObject*/ ); - BA.debugLineNum = 136;BA.debugLine="Provider.Initialize"; -Debug.ShouldStop(128); -__ref.getField(false,"_provider" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.fileprovider.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 139;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("=",b4xmainpage.__c.getField(false,"File").runMethod(true,"Exists",(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(RemoteObject.createImmutable("kmt.db"))),b4xmainpage.__c.getField(true,"False"))) { - BA.debugLineNum = 140;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; -Debug.ShouldStop(2048); -b4xmainpage.__c.getField(false,"File").runVoidMethod ("Copy",(Object)(b4xmainpage.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(BA.ObjectToString("kmt.db")),(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(RemoteObject.createImmutable("kmt.db"))); - BA.debugLineNum = 141;BA.debugLine="Log(File.DirAssets)"; -Debug.ShouldStop(4096); -b4xmainpage.__c.runVoidMethod ("LogImpl","3720936",b4xmainpage.__c.getField(false,"File").runMethod(true,"getDirAssets"),0); - BA.debugLineNum = 142;BA.debugLine="LogColor(\"copiamos kmt.db de \"&File.DirAssets &"; -Debug.ShouldStop(8192); -b4xmainpage.__c.runVoidMethod ("LogImpl","3720937",RemoteObject.concat(RemoteObject.createImmutable("copiamos kmt.db de "),b4xmainpage.__c.getField(false,"File").runMethod(true,"getDirAssets"),RemoteObject.createImmutable(" a "),__ref.getField(true,"_ruta" /*RemoteObject*/ )),b4xmainpage.__c.getField(false,"Colors").getField(true,"Green")); - }; - BA.debugLineNum = 144;BA.debugLine="Log(ruta)"; -Debug.ShouldStop(32768); -b4xmainpage.__c.runVoidMethod ("LogImpl","3720939",__ref.getField(true,"_ruta" /*RemoteObject*/ ),0); - BA.debugLineNum = 145;BA.debugLine="skmt.Initialize(ruta,\"kmt.db\", True)"; -Debug.ShouldStop(65536); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(BA.ObjectToString("kmt.db")),(Object)(b4xmainpage.__c.getField(true,"True"))); - BA.debugLineNum = 146;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIS"; -Debug.ShouldStop(131072); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("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"; -Debug.ShouldStop(262144); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("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"; -Debug.ShouldStop(524288); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("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"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("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"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("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"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("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"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("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"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("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"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("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"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("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"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("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"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("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"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("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"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("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"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("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"; -Debug.ShouldStop(1); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("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"; -Debug.ShouldStop(2); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("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"; -Debug.ShouldStop(8); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("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"; -Debug.ShouldStop(32); -b4xmainpage._subs.runVoidMethod ("_agregacolumna" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString("VENTA_No_VENTA")),(Object)(BA.ObjectToString("montoVentav")),(Object)(RemoteObject.createImmutable("TEXT"))); - BA.debugLineNum = 168;BA.debugLine="Try 'Intentamos usar \"pragma_table_info\" para rev"; -Debug.ShouldStop(128); -try { BA.debugLineNum = 169;BA.debugLine="c=skmt.ExecQuery(\"SELECT COUNT(*) AS fCol FROM p"; -Debug.ShouldStop(256); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (__ref.getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("SELECT COUNT(*) AS fCol FROM pragma_table_info('kmt_info') WHERE name='CAT_CL_DIASEMANA'")))); - BA.debugLineNum = 170;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(512); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 171;BA.debugLine="If c.GetString(\"fCol\") = 0 Then 'Si no esta la c"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("fCol"))),BA.NumberToString(0))) { - BA.debugLineNum = 172;BA.debugLine="skmt.ExecNonQuery(\"ALTER TABLE kmt_info ADD COL"; -Debug.ShouldStop(2048); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("ALTER TABLE kmt_info ADD COLUMN CAT_CL_DIASEMANA TEXT"))); - }; - Debug.CheckDeviceExceptions(); -} - catch (Exception e68) { - BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e68.toString()); BA.debugLineNum = 175;BA.debugLine="Try"; -Debug.ShouldStop(16384); -try { BA.debugLineNum = 176;BA.debugLine="skmt.ExecNonQuery(\"ALTER TABLE kmt_info ADD COL"; -Debug.ShouldStop(32768); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("ALTER TABLE kmt_info ADD COLUMN CAT_CL_DIASEMANA TEXT"))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e71) { - BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e71.toString()); BA.debugLineNum = 178;BA.debugLine="Log(LastException)"; -Debug.ShouldStop(131072); -b4xmainpage.__c.runVoidMethod ("LogImpl","3720973",BA.ObjectToString(b4xmainpage.__c.runMethod(false,"LastException",__ref.getField(false, "ba"))),0); - }; - }; - BA.debugLineNum = 181;BA.debugLine="Try 'Intentamos usar \"pragma_table_info\" para rev"; -Debug.ShouldStop(1048576); -try { BA.debugLineNum = 182;BA.debugLine="c=skmt.ExecQuery(\"SELECT COUNT(*) AS fCol FROM p"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (__ref.getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("SELECT COUNT(*) AS fCol FROM pragma_table_info('CAT_GUNAPROD') WHERE name='CAT_GP_TIPOPROD2'")))); - BA.debugLineNum = 183;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 184;BA.debugLine="If c.GetString(\"fCol\") = 0 Then 'Si no esta la c"; -Debug.ShouldStop(8388608); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("fCol"))),BA.NumberToString(0))) { - BA.debugLineNum = 185;BA.debugLine="skmt.ExecNonQuery(\"ALTER TABLE CAT_GUNAPROD ADD"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("ALTER TABLE CAT_GUNAPROD ADD COLUMN CAT_GP_TIPOPROD2 TEXT"))); - }; - Debug.CheckDeviceExceptions(); -} - catch (Exception e81) { - BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e81.toString()); BA.debugLineNum = 188;BA.debugLine="Try"; -Debug.ShouldStop(134217728); -try { BA.debugLineNum = 189;BA.debugLine="skmt.ExecNonQuery(\"ALTER TABLE CAT_GUNAPROD ADD"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("ALTER TABLE CAT_GUNAPROD ADD COLUMN CAT_GP_TIPOPROD2 TEXT"))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e84) { - BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e84.toString()); BA.debugLineNum = 191;BA.debugLine="Log(LastException)"; -Debug.ShouldStop(1073741824); -b4xmainpage.__c.runVoidMethod ("LogImpl","3720986",BA.ObjectToString(b4xmainpage.__c.runMethod(false,"LastException",__ref.getField(false, "ba"))),0); - }; - }; - BA.debugLineNum = 194;BA.debugLine="Try 'Intentamos usar \"pragma_table_info\" para rev"; -Debug.ShouldStop(2); -try { BA.debugLineNum = 195;BA.debugLine="c=skmt.ExecQuery(\"SELECT COUNT(*) AS fCol FROM p"; -Debug.ShouldStop(4); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (__ref.getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("SELECT COUNT(*) AS fCol FROM pragma_table_info('kmt_info') WHERE name='CAT_CL_SECUENCIA'")))); - BA.debugLineNum = 196;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(8); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 197;BA.debugLine="If c.GetString(\"fCol\") = 0 Then 'Si no esta la c"; -Debug.ShouldStop(16); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("fCol"))),BA.NumberToString(0))) { - BA.debugLineNum = 198;BA.debugLine="skmt.ExecNonQuery(\"ALTER TABLE kmt_info ADD COL"; -Debug.ShouldStop(32); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("ALTER TABLE kmt_info ADD COLUMN CAT_CL_SECUENCIA INT"))); - }; - Debug.CheckDeviceExceptions(); -} - catch (Exception e94) { - BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e94.toString()); BA.debugLineNum = 201;BA.debugLine="Try"; -Debug.ShouldStop(256); -try { BA.debugLineNum = 202;BA.debugLine="skmt.ExecNonQuery(\"ALTER TABLE kmt_info ADD COL"; -Debug.ShouldStop(512); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("ALTER TABLE kmt_info ADD COLUMN CAT_CL_SECUENCIA INT"))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e97) { - BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e97.toString()); BA.debugLineNum = 204;BA.debugLine="Log(LastException)"; -Debug.ShouldStop(2048); -b4xmainpage.__c.runVoidMethod ("LogImpl","3720999",BA.ObjectToString(b4xmainpage.__c.runMethod(false,"LastException",__ref.getField(false, "ba"))),0); - }; - }; - BA.debugLineNum = 207;BA.debugLine="c=skmt.ExecQuery(\"select COUNT(*) AS CUANTOS from"; -Debug.ShouldStop(16384); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (__ref.getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select COUNT(*) AS CUANTOS from HIST_STAY_OUT ")))); - BA.debugLineNum = 208;BA.debugLine="C.Position = 0"; -Debug.ShouldStop(32768); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 209;BA.debugLine="If c.GetString(\"CUANTOS\") = 0 Then"; -Debug.ShouldStop(65536); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS"))),BA.NumberToString(0))) { - BA.debugLineNum = 210;BA.debugLine="skmt.ExecNonQuery(\"INSERT INTO HIST_STAY_OUT(HSO"; -Debug.ShouldStop(131072); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("INSERT INTO HIST_STAY_OUT(HSO_INI, HSO_FIN) VALUES (0,0)"))); - }; - BA.debugLineNum = 212;BA.debugLine="C.Close"; -Debug.ShouldStop(524288); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 216;BA.debugLine="l_version.Text = Application.VersionName"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_l_version" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(b4xmainpage.__c.getField(false,"Application").runMethod(true,"getVersionName"))); - BA.debugLineNum = 218;BA.debugLine="PopupMenu.Initialize(\"PopupMenu\", b_menu)"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_popupmenu" /*RemoteObject*/ ).runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(BA.ObjectToString("PopupMenu")),RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.ConcreteViewWrapper"), __ref.getField(false,"_b_menu" /*RemoteObject*/ ).getObject())); - BA.debugLineNum = 219;BA.debugLine="PopupMenu.AddMenuItem(0, 0, \"View\")"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_popupmenu" /*RemoteObject*/ ).runVoidMethod ("AddMenuItem",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(RemoteObject.createImmutable("View"))); - BA.debugLineNum = 220;BA.debugLine="PopupMenu.AddMenuItem(1, 1, \"Edit\")"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_popupmenu" /*RemoteObject*/ ).runVoidMethod ("AddMenuItem",(Object)(BA.numberCast(int.class, 1)),(Object)(BA.numberCast(int.class, 1)),(Object)(RemoteObject.createImmutable("Edit"))); - BA.debugLineNum = 221;BA.debugLine="PopupMenu.AddMenuItem(2, 2, \"Details\")"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_popupmenu" /*RemoteObject*/ ).runVoidMethod ("AddMenuItem",(Object)(BA.numberCast(int.class, 2)),(Object)(BA.numberCast(int.class, 2)),(Object)(RemoteObject.createImmutable("Details"))); - BA.debugLineNum = 222;BA.debugLine="PopupMenu.AddMenuItem(3, 3, \"Remove\")"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_popupmenu" /*RemoteObject*/ ).runVoidMethod ("AddMenuItem",(Object)(BA.numberCast(int.class, 3)),(Object)(BA.numberCast(int.class, 3)),(Object)(RemoteObject.createImmutable("Remove"))); - BA.debugLineNum = 224;BA.debugLine="montoActual = 0"; -Debug.ShouldStop(-2147483648); -__ref.setField ("_montoactual" /*RemoteObject*/ ,BA.NumberToString(0)); - BA.debugLineNum = 225;BA.debugLine="clientesTotal = 0"; -Debug.ShouldStop(1); -__ref.setField ("_clientestotal" /*RemoteObject*/ ,BA.NumberToString(0)); - BA.debugLineNum = 226;BA.debugLine="clientesVenta = 0"; -Debug.ShouldStop(2); -__ref.setField ("_clientesventa" /*RemoteObject*/ ,BA.NumberToString(0)); - BA.debugLineNum = 227;BA.debugLine="clientesVisitados = 0"; -Debug.ShouldStop(4); -__ref.setField ("_clientesvisitados" /*RemoteObject*/ ,BA.NumberToString(0)); - BA.debugLineNum = 228;BA.debugLine="almacen = 0"; -Debug.ShouldStop(8); -__ref.setField ("_almacen" /*RemoteObject*/ ,BA.NumberToString(0)); - BA.debugLineNum = 229;BA.debugLine="rutaPreventa = 0"; -Debug.ShouldStop(16); -__ref.setField ("_rutapreventa" /*RemoteObject*/ ,BA.NumberToString(0)); - BA.debugLineNum = 230;BA.debugLine="p_appUpdate.Visible = False"; -Debug.ShouldStop(32); -__ref.getField(false,"_p_appupdate" /*RemoteObject*/ ).runMethod(true,"setVisible",b4xmainpage.__c.getField(true,"False")); - BA.debugLineNum = 241;BA.debugLine="p_appUpdate.Visible = False"; -Debug.ShouldStop(65536); -__ref.getField(false,"_p_appupdate" /*RemoteObject*/ ).runMethod(true,"setVisible",b4xmainpage.__c.getField(true,"False")); - BA.debugLineNum = 242;BA.debugLine="End Sub"; -Debug.ShouldStop(131072); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 18;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 19;BA.debugLine="Private Root As B4XView"; -b4xmainpage._root = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_root",b4xmainpage._root); - //BA.debugLineNum = 20;BA.debugLine="Private xui As XUI"; -b4xmainpage._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",b4xmainpage._xui); - //BA.debugLineNum = 21;BA.debugLine="Public login As B4XMainPage"; -b4xmainpage._login = RemoteObject.createNew ("keymon.lat.medicomed.b4xmainpage");__ref.setField("_login",b4xmainpage._login); - //BA.debugLineNum = 22;BA.debugLine="Dim reqManager As DBRequestManager"; -b4xmainpage._reqmanager = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager");__ref.setField("_reqmanager",b4xmainpage._reqmanager); - //BA.debugLineNum = 23;BA.debugLine="Public principal As C_Principal"; -b4xmainpage._principal = RemoteObject.createNew ("keymon.lat.medicomed.c_principal");__ref.setField("_principal",b4xmainpage._principal); - //BA.debugLineNum = 24;BA.debugLine="Public clientes As C_Clientes"; -b4xmainpage._clientes = RemoteObject.createNew ("keymon.lat.medicomed.c_clientes");__ref.setField("_clientes",b4xmainpage._clientes); - //BA.debugLineNum = 25;BA.debugLine="Public cliente As C_Cliente"; -b4xmainpage._cliente = RemoteObject.createNew ("keymon.lat.medicomed.c_cliente");__ref.setField("_cliente",b4xmainpage._cliente); - //BA.debugLineNum = 26;BA.debugLine="Public productos As C_Productos"; -b4xmainpage._productos = RemoteObject.createNew ("keymon.lat.medicomed.c_productos");__ref.setField("_productos",b4xmainpage._productos); - //BA.debugLineNum = 27;BA.debugLine="Public updateAvailable As C_UpdateAvailable"; -b4xmainpage._updateavailable = RemoteObject.createNew ("keymon.lat.medicomed.c_updateavailable");__ref.setField("_updateavailable",b4xmainpage._updateavailable); - //BA.debugLineNum = 28;BA.debugLine="Public mapas As C_Mapas"; -b4xmainpage._mapas = RemoteObject.createNew ("keymon.lat.medicomed.c_mapas");__ref.setField("_mapas",b4xmainpage._mapas); - //BA.debugLineNum = 29;BA.debugLine="Public nuevoCliente As C_NuevoCliente"; -b4xmainpage._nuevocliente = RemoteObject.createNew ("keymon.lat.medicomed.c_nuevocliente");__ref.setField("_nuevocliente",b4xmainpage._nuevocliente); - //BA.debugLineNum = 30;BA.debugLine="Public ticketsDia As C_TicketsDia"; -b4xmainpage._ticketsdia = RemoteObject.createNew ("keymon.lat.medicomed.c_ticketsdia");__ref.setField("_ticketsdia",b4xmainpage._ticketsdia); - //BA.debugLineNum = 31;BA.debugLine="Public noVenta As C_NoVenta"; -b4xmainpage._noventa = RemoteObject.createNew ("keymon.lat.medicomed.c_noventa");__ref.setField("_noventa",b4xmainpage._noventa); - //BA.debugLineNum = 32;BA.debugLine="Public nota As C_Nota"; -b4xmainpage._nota = RemoteObject.createNew ("keymon.lat.medicomed.c_nota");__ref.setField("_nota",b4xmainpage._nota); - //BA.debugLineNum = 33;BA.debugLine="Public pedidos As C_Pedidos"; -b4xmainpage._pedidos = RemoteObject.createNew ("keymon.lat.medicomed.c_pedidos");__ref.setField("_pedidos",b4xmainpage._pedidos); - //BA.debugLineNum = 34;BA.debugLine="Public promos As C_Promos"; -b4xmainpage._promos = RemoteObject.createNew ("keymon.lat.medicomed.c_promos");__ref.setField("_promos",b4xmainpage._promos); - //BA.debugLineNum = 35;BA.debugLine="Public historico As C_Historico"; -b4xmainpage._historico = RemoteObject.createNew ("keymon.lat.medicomed.c_historico");__ref.setField("_historico",b4xmainpage._historico); - //BA.debugLineNum = 47;BA.debugLine="Dim reqManager As DBRequestManager"; -b4xmainpage._reqmanager = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager");__ref.setField("_reqmanager",b4xmainpage._reqmanager); - //BA.debugLineNum = 48;BA.debugLine="Dim v As String = Application.VersionName"; -b4xmainpage._v = b4xmainpage.__c.getField(false,"Application").runMethod(true,"getVersionName");__ref.setField("_v",b4xmainpage._v); - //BA.debugLineNum = 49;BA.debugLine="Dim ruta As String"; -b4xmainpage._ruta = RemoteObject.createImmutable("");__ref.setField("_ruta",b4xmainpage._ruta); - //BA.debugLineNum = 50;BA.debugLine="Dim tgl As Toggle"; -b4xmainpage._tgl = RemoteObject.createNew ("com.rootsoft.togglelibrary.ToggleLibrary");__ref.setField("_tgl",b4xmainpage._tgl); - //BA.debugLineNum = 51;BA.debugLine="Dim lat_gps, lon_gps As String"; -b4xmainpage._lat_gps = RemoteObject.createImmutable("");__ref.setField("_lat_gps",b4xmainpage._lat_gps); -b4xmainpage._lon_gps = RemoteObject.createImmutable("");__ref.setField("_lon_gps",b4xmainpage._lon_gps); - //BA.debugLineNum = 52;BA.debugLine="Dim usuario As String"; -b4xmainpage._usuario = RemoteObject.createImmutable("");__ref.setField("_usuario",b4xmainpage._usuario); - //BA.debugLineNum = 53;BA.debugLine="Dim batt As Int"; -b4xmainpage._batt = RemoteObject.createImmutable(0);__ref.setField("_batt",b4xmainpage._batt); - //BA.debugLineNum = 54;BA.debugLine="Dim skmt As SQL"; -b4xmainpage._skmt = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL");__ref.setField("_skmt",b4xmainpage._skmt); - //BA.debugLineNum = 55;BA.debugLine="Dim montoActual, clientesTotal, clientesVenta, cl"; -b4xmainpage._montoactual = RemoteObject.createImmutable("");__ref.setField("_montoactual",b4xmainpage._montoactual); -b4xmainpage._clientestotal = RemoteObject.createImmutable("");__ref.setField("_clientestotal",b4xmainpage._clientestotal); -b4xmainpage._clientesventa = RemoteObject.createImmutable("");__ref.setField("_clientesventa",b4xmainpage._clientesventa); -b4xmainpage._clientesvisitados = RemoteObject.createImmutable("");__ref.setField("_clientesvisitados",b4xmainpage._clientesvisitados); -b4xmainpage._almacen = RemoteObject.createImmutable("");__ref.setField("_almacen",b4xmainpage._almacen); -b4xmainpage._rutapreventa = RemoteObject.createImmutable("");__ref.setField("_rutapreventa",b4xmainpage._rutapreventa); - //BA.debugLineNum = 56;BA.debugLine="Dim server, fechaRuta As String"; -b4xmainpage._server = RemoteObject.createImmutable("");__ref.setField("_server",b4xmainpage._server); -b4xmainpage._fecharuta = RemoteObject.createImmutable("");__ref.setField("_fecharuta",b4xmainpage._fecharuta); - //BA.debugLineNum = 57;BA.debugLine="Dim Logger As Boolean"; -b4xmainpage._logger = RemoteObject.createImmutable(false);__ref.setField("_logger",b4xmainpage._logger); - //BA.debugLineNum = 58;BA.debugLine="Dim mac_impresora As String"; -b4xmainpage._mac_impresora = RemoteObject.createImmutable("");__ref.setField("_mac_impresora",b4xmainpage._mac_impresora); - //BA.debugLineNum = 59;BA.debugLine="Dim Phn As PhoneId"; -b4xmainpage._phn = RemoteObject.createNew ("anywheresoftware.b4a.phone.Phone.PhoneId");__ref.setField("_phn",b4xmainpage._phn); - //BA.debugLineNum = 61;BA.debugLine="Dim user As EditText"; -b4xmainpage._user = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");__ref.setField("_user",b4xmainpage._user); - //BA.debugLineNum = 62;BA.debugLine="Dim pass As EditText"; -b4xmainpage._pass = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");__ref.setField("_pass",b4xmainpage._pass); - //BA.debugLineNum = 63;BA.debugLine="Dim c As Cursor"; -b4xmainpage._c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_c",b4xmainpage._c); - //BA.debugLineNum = 64;BA.debugLine="Dim existe As String"; -b4xmainpage._existe = RemoteObject.createImmutable("");__ref.setField("_existe",b4xmainpage._existe); - //BA.debugLineNum = 65;BA.debugLine="Dim paso1 As String"; -b4xmainpage._paso1 = RemoteObject.createImmutable("");__ref.setField("_paso1",b4xmainpage._paso1); - //BA.debugLineNum = 66;BA.debugLine="Private IMEN As Label"; -b4xmainpage._imen = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_imen",b4xmainpage._imen); - //BA.debugLineNum = 67;BA.debugLine="Dim IMEI As String = \"\""; -b4xmainpage._imei = BA.ObjectToString("");__ref.setField("_imei",b4xmainpage._imei); - //BA.debugLineNum = 68;BA.debugLine="Dim alterno As String"; -b4xmainpage._alterno = RemoteObject.createImmutable("");__ref.setField("_alterno",b4xmainpage._alterno); - //BA.debugLineNum = 69;BA.debugLine="Private b_menu As Button"; -b4xmainpage._b_menu = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_menu",b4xmainpage._b_menu); - //BA.debugLineNum = 70;BA.debugLine="Dim PopupMenu As RSPopupMenu"; -b4xmainpage._popupmenu = RemoteObject.createNew ("com.rootsoft.rspopupmenu.RSPopupMenu");__ref.setField("_popupmenu",b4xmainpage._popupmenu); - //BA.debugLineNum = 71;BA.debugLine="Dim cmd As DBCommand"; -b4xmainpage._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",b4xmainpage._cmd); - //BA.debugLineNum = 72;BA.debugLine="Private PDF As Button"; -b4xmainpage._pdf = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_pdf",b4xmainpage._pdf); - //BA.debugLineNum = 73;BA.debugLine="Private bpv1 As BatteryProgressView"; -b4xmainpage._bpv1 = RemoteObject.createNew ("batteryprogressviewwrapper.batteryprogressviewWrapper");__ref.setField("_bpv1",b4xmainpage._bpv1); - //BA.debugLineNum = 74;BA.debugLine="Dim batterystatus(11) As Int"; -b4xmainpage._batterystatus = RemoteObject.createNewArray ("int", new int[] {11}, new Object[]{});__ref.setField("_batterystatus",b4xmainpage._batterystatus); - //BA.debugLineNum = 75;BA.debugLine="Private bu As BatteryUtilities"; -b4xmainpage._bu = RemoteObject.createNew ("keymon.lat.medicomed.batteryutilities");__ref.setField("_bu",b4xmainpage._bu); - //BA.debugLineNum = 76;BA.debugLine="Private b_apk As Button"; -b4xmainpage._b_apk = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_apk",b4xmainpage._b_apk); - //BA.debugLineNum = 77;BA.debugLine="Private i_engrane As ImageView"; -b4xmainpage._i_engrane = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");__ref.setField("_i_engrane",b4xmainpage._i_engrane); - //BA.debugLineNum = 78;BA.debugLine="Private p_Main As Panel"; -b4xmainpage._p_main = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_main",b4xmainpage._p_main); - //BA.debugLineNum = 79;BA.debugLine="Private p_appUpdate As Panel"; -b4xmainpage._p_appupdate = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_appupdate",b4xmainpage._p_appupdate); - //BA.debugLineNum = 80;BA.debugLine="Private b_regesar As Button"; -b4xmainpage._b_regesar = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_regesar",b4xmainpage._b_regesar); - //BA.debugLineNum = 81;BA.debugLine="Private l_version As Label"; -b4xmainpage._l_version = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_version",b4xmainpage._l_version); - //BA.debugLineNum = 82;BA.debugLine="Private ImageView1 As ImageView"; -b4xmainpage._imageview1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");__ref.setField("_imageview1",b4xmainpage._imageview1); - //BA.debugLineNum = 83;BA.debugLine="Private Label2 As Label"; -b4xmainpage._label2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_label2",b4xmainpage._label2); - //BA.debugLineNum = 84;BA.debugLine="Private Entrar As Button"; -b4xmainpage._entrar = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_entrar",b4xmainpage._entrar); - //BA.debugLineNum = 85;BA.debugLine="Dim tipo_venta As String"; -b4xmainpage._tipo_venta = RemoteObject.createImmutable("");__ref.setField("_tipo_venta",b4xmainpage._tipo_venta); - //BA.debugLineNum = 86;BA.debugLine="Dim bTerminarClicked As Boolean = False"; -b4xmainpage._bterminarclicked = b4xmainpage.__c.getField(true,"False");__ref.setField("_bterminarclicked",b4xmainpage._bterminarclicked); - //BA.debugLineNum = 87;BA.debugLine="Private lv_server As ListView"; -b4xmainpage._lv_server = RemoteObject.createNew ("anywheresoftware.b4a.objects.ListViewWrapper");__ref.setField("_lv_server",b4xmainpage._lv_server); - //BA.debugLineNum = 88;BA.debugLine="Private l_server As Label"; -b4xmainpage._l_server = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_server",b4xmainpage._l_server); - //BA.debugLineNum = 89;BA.debugLine="Private et_server As EditText"; -b4xmainpage._et_server = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");__ref.setField("_et_server",b4xmainpage._et_server); - //BA.debugLineNum = 90;BA.debugLine="Private b_server As Button"; -b4xmainpage._b_server = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_server",b4xmainpage._b_server); - //BA.debugLineNum = 91;BA.debugLine="Private b_envioBD As Button"; -b4xmainpage._b_enviobd = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_enviobd",b4xmainpage._b_enviobd); - //BA.debugLineNum = 92;BA.debugLine="Public Provider As FileProvider"; -b4xmainpage._provider = RemoteObject.createNew ("keymon.lat.medicomed.fileprovider");__ref.setField("_provider",b4xmainpage._provider); - //BA.debugLineNum = 93;BA.debugLine="Public rutaBDBackup As String = \"\""; -b4xmainpage._rutabdbackup = BA.ObjectToString("");__ref.setField("_rutabdbackup",b4xmainpage._rutabdbackup); - //BA.debugLineNum = 94;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static void _copiadb(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("copiaDB (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,592); -if (RapidSub.canDelegate("copiadb")) { __ref.runUserSub(false, "b4xmainpage","copiadb", __ref); return;} -ResumableSub_copiaDB rsub = new ResumableSub_copiaDB(null,__ref); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_copiaDB extends BA.ResumableSub { -public ResumableSub_copiaDB(keymon.lat.medicomed.b4xmainpage parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.b4xmainpage parent; -RemoteObject _permission = RemoteObject.createImmutable(""); -RemoteObject _result = RemoteObject.createImmutable(false); -RemoteObject _thedir = RemoteObject.createImmutable(""); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("copiaDB (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,592); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { -try { - - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 593;BA.debugLine="Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_"; -Debug.ShouldStop(65536); -parent._starter._rp /*RemoteObject*/ .runVoidMethod ("CheckAndRequest",__ref.getField(false, "ba"),(Object)(parent._starter._rp /*RemoteObject*/ .getField(true,"PERMISSION_WRITE_EXTERNAL_STORAGE"))); - BA.debugLineNum = 594;BA.debugLine="Wait For B4XPage_PermissionResult (Permission As"; -Debug.ShouldStop(131072); -parent.__c.runVoidMethod ("WaitFor","b4xpage_permissionresult", __ref.getField(false, "ba"), anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xmainpage", "copiadb"), null); -this.state = 18; -return; -case 18: -//C -this.state = 1; -_permission = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(1));Debug.locals.put("Permission", _permission); -_result = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(2));Debug.locals.put("Result", _result); -; - BA.debugLineNum = 595;BA.debugLine="Dim theDir As String = \"\""; -Debug.ShouldStop(262144); -_thedir = BA.ObjectToString("");Debug.locals.put("theDir", _thedir);Debug.locals.put("theDir", _thedir); - BA.debugLineNum = 596;BA.debugLine="If Result Then"; -Debug.ShouldStop(524288); -if (true) break; - -case 1: -//if -this.state = 17; -if (_result.get().booleanValue()) { -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"; -Debug.ShouldStop(67108864); -_thedir = RemoteObject.createImmutable("");Debug.locals.put("theDir", _thedir); - BA.debugLineNum = 604;BA.debugLine="Try"; -Debug.ShouldStop(134217728); -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\")"; -Debug.ShouldStop(268435456); -parent.__c.getField(false,"File").runVoidMethod ("MakeDir",(Object)(parent.__c.getField(false,"File").runMethod(true,"getDirRootExternal")),(Object)(RemoteObject.createImmutable("kmts"))); - BA.debugLineNum = 606;BA.debugLine="theDir = \"/kmts\""; -Debug.ShouldStop(536870912); -_thedir = BA.ObjectToString("/kmts");Debug.locals.put("theDir", _thedir); - Debug.CheckDeviceExceptions(); -if (true) break; - -case 8: -//C -this.state = 9; -this.catchState = 0; - BA.debugLineNum = 608;BA.debugLine="theDir = \"\""; -Debug.ShouldStop(-2147483648); -_thedir = BA.ObjectToString("");Debug.locals.put("theDir", _thedir); - if (true) break; -if (true) break; -; - BA.debugLineNum = 610;BA.debugLine="Try"; -Debug.ShouldStop(2); - -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"; -Debug.ShouldStop(4); -parent.__c.getField(false,"File").runVoidMethod ("Copy",(Object)(parent.__c.getField(false,"File").runMethod(true,"getDirInternal")),(Object)(BA.ObjectToString("kmt.db")),(Object)(RemoteObject.concat(parent.__c.getField(false,"File").runMethod(true,"getDirRootExternal"),_thedir)),(Object)(RemoteObject.createImmutable("medicomed_kmt.db"))); - BA.debugLineNum = 612;BA.debugLine="ToastMessageShow(\"Listo, copiado a \" & File.Dir"; -Debug.ShouldStop(8); -parent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("Listo, copiado a "),parent.__c.getField(false,"File").runMethod(true,"getDirRootExternal"),_thedir,RemoteObject.createImmutable("/medicomed_kmt_kmt.db")))),(Object)(parent.__c.getField(true,"False"))); - Debug.CheckDeviceExceptions(); -if (true) break; - -case 13: -//C -this.state = 14; -this.catchState = 0; - BA.debugLineNum = 614;BA.debugLine="ToastMessageShow(\"No se pudo hacer la copia: \"&"; -Debug.ShouldStop(32); -parent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("No se pudo hacer la copia: "),parent.__c.runMethod(false,"LastException",__ref.getField(false, "ba"))))),(Object)(parent.__c.getField(true,"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)"; -Debug.ShouldStop(256); -parent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Sin permisos")),(Object)(parent.__c.getField(true,"False"))); - if (true) break; - -case 17: -//C -this.state = -1; -; - BA.debugLineNum = 619;BA.debugLine="End Sub"; -Debug.ShouldStop(1024); -if (true) break; -}} - catch (Exception e0) { - -if (catchState == 0) - throw e0; -else { - state = catchState; -BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e0.toString());} - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static void _b4xpage_permissionresult(RemoteObject __ref,RemoteObject _permission,RemoteObject _result) throws Exception{ -} -public static RemoteObject _dameusuario(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("dameUsuario (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,562); -if (RapidSub.canDelegate("dameusuario")) { return __ref.runUserSub(false, "b4xmainpage","dameusuario", __ref);} - BA.debugLineNum = 562;BA.debugLine="Sub dameUsuario"; -Debug.ShouldStop(131072); - BA.debugLineNum = 563;BA.debugLine="c=skmt.ExecQuery2(\"select count(*) as EXISTE1 fro"; -Debug.ShouldStop(262144); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (__ref.getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select count(*) as EXISTE1 from usuarioa where usuario = ?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {__ref.getField(false,"_user" /*RemoteObject*/ ).runMethod(true,"getText")})))); - BA.debugLineNum = 564;BA.debugLine="c.Position=0"; -Debug.ShouldStop(524288); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 565;BA.debugLine="existe = c.GetString(\"EXISTE1\")"; -Debug.ShouldStop(1048576); -__ref.setField ("_existe" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("EXISTE1")))); - BA.debugLineNum = 566;BA.debugLine="c.Close"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 567;BA.debugLine="If existe > 0 Then"; -Debug.ShouldStop(4194304); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(true,"_existe" /*RemoteObject*/ )),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 568;BA.debugLine="c=skmt.ExecQuery(\"select USUARIO from usuarioa\")"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (__ref.getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select USUARIO from usuarioa")))); - BA.debugLineNum = 569;BA.debugLine="c.Position=0"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 570;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(33554432); -__ref.setField ("_usuario" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")))); - }else { - BA.debugLineNum = 572;BA.debugLine="usuario = \"SINUSUARIO\""; -Debug.ShouldStop(134217728); -__ref.setField ("_usuario" /*RemoteObject*/ ,BA.ObjectToString("SINUSUARIO")); - }; - BA.debugLineNum = 574;BA.debugLine="End Sub"; -Debug.ShouldStop(536870912); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _entrar_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Entrar_Click (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,293); -if (RapidSub.canDelegate("entrar_click")) { return __ref.runUserSub(false, "b4xmainpage","entrar_click", __ref);} -RemoteObject _r = RemoteObject.declareNull("anywheresoftware.b4a.agraham.reflection.Reflection"); -RemoteObject _api = RemoteObject.createImmutable(0); -RemoteObject _pp = RemoteObject.declareNull("anywheresoftware.b4a.phone.Phone"); -RemoteObject _id = RemoteObject.createImmutable(0); - BA.debugLineNum = 293;BA.debugLine="Sub Entrar_Click"; -Debug.ShouldStop(16); - BA.debugLineNum = 294;BA.debugLine="Dim r As Reflector"; -Debug.ShouldStop(32); -_r = RemoteObject.createNew ("anywheresoftware.b4a.agraham.reflection.Reflection");Debug.locals.put("r", _r); - BA.debugLineNum = 295;BA.debugLine="Dim Api As Int"; -Debug.ShouldStop(64); -_api = RemoteObject.createImmutable(0);Debug.locals.put("Api", _api); - BA.debugLineNum = 296;BA.debugLine="Dim PP As Phone"; -Debug.ShouldStop(128); -_pp = RemoteObject.createNew ("anywheresoftware.b4a.phone.Phone");Debug.locals.put("PP", _pp); - BA.debugLineNum = 297;BA.debugLine="Api = r.GetStaticField(\"android.os.Build$VERSION\""; -Debug.ShouldStop(256); -_api = BA.numberCast(int.class, _r.runMethod(false,"GetStaticField",(Object)(BA.ObjectToString("android.os.Build$VERSION")),(Object)(RemoteObject.createImmutable("SDK_INT"))));Debug.locals.put("Api", _api); - BA.debugLineNum = 298;BA.debugLine="If Api < 9 Then"; -Debug.ShouldStop(512); -if (RemoteObject.solveBoolean("<",_api,BA.numberCast(double.class, 9))) { - BA.debugLineNum = 300;BA.debugLine="If File.Exists(File.DirInternal, \"__id\") Then"; -Debug.ShouldStop(2048); -if (b4xmainpage.__c.getField(false,"File").runMethod(true,"Exists",(Object)(b4xmainpage.__c.getField(false,"File").runMethod(true,"getDirInternal")),(Object)(RemoteObject.createImmutable("__id"))).get().booleanValue()) { - BA.debugLineNum = 301;BA.debugLine="IMEI = File.ReadString(File.DirInternal, \"__id"; -Debug.ShouldStop(4096); -__ref.setField ("_imei" /*RemoteObject*/ ,b4xmainpage.__c.getField(false,"File").runMethod(true,"ReadString",(Object)(b4xmainpage.__c.getField(false,"File").runMethod(true,"getDirInternal")),(Object)(RemoteObject.createImmutable("__id")))); - BA.debugLineNum = 302;BA.debugLine="Log(1&\"-\"&IMEI)"; -Debug.ShouldStop(8192); -b4xmainpage.__c.runVoidMethod ("LogImpl","3851977",RemoteObject.concat(RemoteObject.createImmutable(1),RemoteObject.createImmutable("-"),__ref.getField(true,"_imei" /*RemoteObject*/ )),0); - }else { - BA.debugLineNum = 304;BA.debugLine="Dim id As Int"; -Debug.ShouldStop(32768); -_id = RemoteObject.createImmutable(0);Debug.locals.put("id", _id); - BA.debugLineNum = 305;BA.debugLine="id = Rnd(0x10000000, 0x7FFFFFFF)"; -Debug.ShouldStop(65536); -_id = b4xmainpage.__c.runMethod(true,"Rnd",(Object)(BA.numberCast(int.class, ((int)0x10000000))),(Object)(BA.numberCast(int.class, ((int)0x7fffffff))));Debug.locals.put("id", _id); - BA.debugLineNum = 306;BA.debugLine="File.WriteString(File.DirInternal, \"__id\", id)"; -Debug.ShouldStop(131072); -b4xmainpage.__c.getField(false,"File").runVoidMethod ("WriteString",(Object)(b4xmainpage.__c.getField(false,"File").runMethod(true,"getDirInternal")),(Object)(BA.ObjectToString("__id")),(Object)(BA.NumberToString(_id))); - BA.debugLineNum = 307;BA.debugLine="IMEI = id"; -Debug.ShouldStop(262144); -__ref.setField ("_imei" /*RemoteObject*/ ,BA.NumberToString(_id)); - BA.debugLineNum = 308;BA.debugLine="Log(2&\"-\"&IMEI)"; -Debug.ShouldStop(524288); -b4xmainpage.__c.runVoidMethod ("LogImpl","3851983",RemoteObject.concat(RemoteObject.createImmutable(2),RemoteObject.createImmutable("-"),__ref.getField(true,"_imei" /*RemoteObject*/ )),0); - }; - }else { - BA.debugLineNum = 312;BA.debugLine="IMEI = r.GetStaticField(\"android.os.Build\", \"SE"; -Debug.ShouldStop(8388608); -__ref.setField ("_imei" /*RemoteObject*/ ,BA.ObjectToString(_r.runMethod(false,"GetStaticField",(Object)(BA.ObjectToString("android.os.Build")),(Object)(RemoteObject.createImmutable("SERIAL"))))); - }; - BA.debugLineNum = 315;BA.debugLine="If IMEI.ToLowerCase = \"unknown\" Then"; -Debug.ShouldStop(67108864); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_imei" /*RemoteObject*/ ).runMethod(true,"toLowerCase"),BA.ObjectToString("unknown"))) { - BA.debugLineNum = 316;BA.debugLine="IMEI = PP.GetSettings(\"android_id\")"; -Debug.ShouldStop(134217728); -__ref.setField ("_imei" /*RemoteObject*/ ,_pp.runMethod(true,"GetSettings",(Object)(RemoteObject.createImmutable("android_id")))); - }; - BA.debugLineNum = 320;BA.debugLine="If user.Text = \"ALTERNO\" Then"; -Debug.ShouldStop(-2147483648); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_user" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("ALTERNO"))) { - BA.debugLineNum = 321;BA.debugLine="c=skmt.ExecQuery2(\"select CAT_CO_CONFIGURACION,"; -Debug.ShouldStop(1); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (__ref.getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select CAT_CO_CONFIGURACION, CAT_CO_RESULTADO from CAT_CODIGOS where CAT_CO_PONDERACION =1 AND CAT_CO_ACCION = ?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("SERVER")})))); - BA.debugLineNum = 322;BA.debugLine="c.Position =0"; -Debug.ShouldStop(2); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 323;BA.debugLine="server = c.GetString(\"CAT_CO_CONFIGURACION\")"; -Debug.ShouldStop(4); -__ref.setField ("_server" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CO_CONFIGURACION")))); - BA.debugLineNum = 324;BA.debugLine="alterno = c.GetString(\"CAT_CO_RESULTADO\")"; -Debug.ShouldStop(8); -__ref.setField ("_alterno" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CO_RESULTADO")))); - BA.debugLineNum = 325;BA.debugLine="c.Close"; -Debug.ShouldStop(16); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 326;BA.debugLine="If alterno = 1 Then"; -Debug.ShouldStop(32); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_alterno" /*RemoteObject*/ ),BA.NumberToString(1))) { - BA.debugLineNum = 327;BA.debugLine="skmt.ExecNonQuery2(\"UPDATE CAT_CODIGOS SET CAT_"; -Debug.ShouldStop(64); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE CAT_CODIGOS SET CAT_CO_PONDERACION = 1 WHERE CAT_CO_ACCION = ? AND CAT_CO_RESULTADO = 2")),(Object)(b4xmainpage.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("SERVER")}))))); - BA.debugLineNum = 328;BA.debugLine="skmt.ExecNonQuery2(\"UPDATE CAT_CODIGOS SET CAT_"; -Debug.ShouldStop(128); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE CAT_CODIGOS SET CAT_CO_PONDERACION = 0 WHERE CAT_CO_ACCION = ? AND CAT_CO_RESULTADO = 1")),(Object)(b4xmainpage.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("SERVER")}))))); - }else -{ BA.debugLineNum = 329;BA.debugLine="Else if alterno = 2 Then"; -Debug.ShouldStop(256); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_alterno" /*RemoteObject*/ ),BA.NumberToString(2))) { - BA.debugLineNum = 330;BA.debugLine="skmt.ExecNonQuery2(\"UPDATE CAT_CODIGOS SET CAT_"; -Debug.ShouldStop(512); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE CAT_CODIGOS SET CAT_CO_PONDERACION = 1 WHERE CAT_CO_ACCION = ? AND CAT_CO_RESULTADO = 1")),(Object)(b4xmainpage.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("SERVER")}))))); - BA.debugLineNum = 331;BA.debugLine="skmt.ExecNonQuery2(\"UPDATE CAT_CODIGOS SET CAT_"; -Debug.ShouldStop(1024); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE CAT_CODIGOS SET CAT_CO_PONDERACION = 0 WHERE CAT_CO_ACCION = ? AND CAT_CO_RESULTADO = 2")),(Object)(b4xmainpage.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("SERVER")}))))); - }} -; - BA.debugLineNum = 333;BA.debugLine="c=skmt.ExecQuery2(\"select CAT_CO_CONFIGURACION,"; -Debug.ShouldStop(4096); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (__ref.getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select CAT_CO_CONFIGURACION, CAT_CO_RESULTADO from CAT_CODIGOS where CAT_CO_PONDERACION =1 AND CAT_CO_ACCION = ?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("SERVER")})))); - BA.debugLineNum = 334;BA.debugLine="c.Position =0"; -Debug.ShouldStop(8192); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 335;BA.debugLine="server = c.GetString(\"CAT_CO_CONFIGURACION\")"; -Debug.ShouldStop(16384); -__ref.setField ("_server" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CO_CONFIGURACION")))); - BA.debugLineNum = 336;BA.debugLine="user.Text = server"; -Debug.ShouldStop(32768); -__ref.getField(false,"_user" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence(__ref.getField(true,"_server" /*RemoteObject*/ ))); - BA.debugLineNum = 337;BA.debugLine="c.Close"; -Debug.ShouldStop(65536); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - }else -{ BA.debugLineNum = 339;BA.debugLine="else if user.Text = \"KMTS1\" Then"; -Debug.ShouldStop(262144); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_user" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("KMTS1"))) { - BA.debugLineNum = 340;BA.debugLine="skmt.ExecNonQuery(\"delete from usuarioa\")"; -Debug.ShouldStop(524288); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from usuarioa"))); - BA.debugLineNum = 341;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO USUARIOA VALUES"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO USUARIOA VALUES (?,?)")),(Object)(b4xmainpage.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_user" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_pass" /*RemoteObject*/ ).runMethod(true,"getText"))}))))); - BA.debugLineNum = 342;BA.debugLine="skmt.ExecNonQuery(\"delete from cat_almacen\")"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from cat_almacen"))); - BA.debugLineNum = 343;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO CAT_ALMACEN(ID_A"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO CAT_ALMACEN(ID_ALMACEN) VALUES (?)")),(Object)(b4xmainpage.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(false,"_pass" /*RemoteObject*/ ).runMethod(true,"getText"))}))))); - BA.debugLineNum = 344;BA.debugLine="skmt.ExecNonQuery(\"delete from VERSION\")"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from VERSION"))); - BA.debugLineNum = 345;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO VERSION(NOVERSIO"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO VERSION(NOVERSION) VALUES (?)")),(Object)(b4xmainpage.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(RemoteObject.createImmutable("2.1"))}))))); - BA.debugLineNum = 346;BA.debugLine="B4XPages.ShowPage(\"Clientes\")"; -Debug.ShouldStop(33554432); -b4xmainpage._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Clientes"))); - }else -{ BA.debugLineNum = 347;BA.debugLine="else if user.Text = \"BERNA1\" Then"; -Debug.ShouldStop(67108864); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_user" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("BERNA1"))) { - BA.debugLineNum = 348;BA.debugLine="skmt.ExecNonQuery(\"delete from usuarioa\")"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from usuarioa"))); - BA.debugLineNum = 349;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO USUARIOA VALUES"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO USUARIOA VALUES (?,?)")),(Object)(b4xmainpage.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_user" /*RemoteObject*/ ).runMethod(true,"getText")),(RemoteObject.createImmutable("1"))}))))); - BA.debugLineNum = 350;BA.debugLine="skmt.ExecNonQuery(\"delete from cat_almacen\")"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from cat_almacen"))); - BA.debugLineNum = 351;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO CAT_ALMACEN(ID_A"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO CAT_ALMACEN(ID_ALMACEN) VALUES (?)")),(Object)(b4xmainpage.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(RemoteObject.createImmutable("1"))}))))); - BA.debugLineNum = 352;BA.debugLine="skmt.ExecNonQuery(\"delete from VERSION\")"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from VERSION"))); - BA.debugLineNum = 353;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO VERSION(NOVERSIO"; -Debug.ShouldStop(1); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO VERSION(NOVERSION) VALUES (?)")),(Object)(b4xmainpage.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(RemoteObject.createImmutable("2.1"))}))))); - BA.debugLineNum = 354;BA.debugLine="B4XPages.ShowPage(\"Clientes\")"; -Debug.ShouldStop(2); -b4xmainpage._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Clientes"))); - }else -{ BA.debugLineNum = 355;BA.debugLine="else if user.Text = \"IMEI\" Then"; -Debug.ShouldStop(4); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_user" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("IMEI"))) { - BA.debugLineNum = 356;BA.debugLine="user.Text = IMEI"; -Debug.ShouldStop(8); -__ref.getField(false,"_user" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence(__ref.getField(true,"_imei" /*RemoteObject*/ ))); - }}}} -; - BA.debugLineNum = 359;BA.debugLine="c=skmt.ExecQuery2(\"select count(*) as EXISTE1 fro"; -Debug.ShouldStop(64); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (__ref.getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select count(*) as EXISTE1 from usuarioa where usuario = ?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {__ref.getField(false,"_user" /*RemoteObject*/ ).runMethod(true,"getText")})))); - BA.debugLineNum = 360;BA.debugLine="c.Position=0"; -Debug.ShouldStop(128); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 361;BA.debugLine="existe = c.GetString(\"EXISTE1\")"; -Debug.ShouldStop(256); -__ref.setField ("_existe" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("EXISTE1")))); - BA.debugLineNum = 362;BA.debugLine="If existe = 0 Then"; -Debug.ShouldStop(512); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_existe" /*RemoteObject*/ ),BA.NumberToString(0))) { - BA.debugLineNum = 363;BA.debugLine="If IMEI = \"\" Then"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_imei" /*RemoteObject*/ ),BA.ObjectToString(""))) { - BA.debugLineNum = 364;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(2048); -b4xmainpage._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",b4xmainpage._cmd); - BA.debugLineNum = 365;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(4096); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 366;BA.debugLine="cmd.Name = \"select_usuario_MEDI_10\" 'Antes sele"; -Debug.ShouldStop(8192); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_usuario_MEDI_10")); - BA.debugLineNum = 367;BA.debugLine="cmd.Parameters = Array As Object(user.Text.Trim"; -Debug.ShouldStop(16384); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_user" /*RemoteObject*/ ).runMethod(true,"getText").runMethod(true,"trim")),(__ref.getField(false,"_pass" /*RemoteObject*/ ).runMethod(true,"getText").runMethod(true,"trim"))})); - BA.debugLineNum = 368;BA.debugLine="reqManager.ExecuteQuery(cmd , 0, \"usuario_10\")"; -Debug.ShouldStop(32768); -__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("usuario_10")))); - }else { - BA.debugLineNum = 370;BA.debugLine="If IMEI = \"\" Then"; -Debug.ShouldStop(131072); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_imei" /*RemoteObject*/ ),BA.ObjectToString(""))) { - BA.debugLineNum = 371;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(262144); -b4xmainpage._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",b4xmainpage._cmd); - BA.debugLineNum = 372;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(524288); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 373;BA.debugLine="cmd.Name = \"select_usuario_MEDI_10\""; -Debug.ShouldStop(1048576); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_usuario_MEDI_10")); - BA.debugLineNum = 374;BA.debugLine="cmd.Parameters = Array As Object(user.Text.Tri"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_user" /*RemoteObject*/ ).runMethod(true,"getText").runMethod(true,"trim")),(__ref.getField(false,"_pass" /*RemoteObject*/ ).runMethod(true,"getText").runMethod(true,"trim"))})); - BA.debugLineNum = 375;BA.debugLine="reqManager.ExecuteQuery(cmd , 0, \"usuario_10\")"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("usuario_10")))); - }else { - BA.debugLineNum = 377;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(16777216); -b4xmainpage._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",b4xmainpage._cmd); - BA.debugLineNum = 378;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 379;BA.debugLine="cmd.Name = \"select_usuario_MEDI_10\" 'Antes sel"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_usuario_MEDI_10")); - BA.debugLineNum = 380;BA.debugLine="cmd.Parameters = Array As Object(user.Text.Tri"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_user" /*RemoteObject*/ ).runMethod(true,"getText").runMethod(true,"trim")),(__ref.getField(false,"_pass" /*RemoteObject*/ ).runMethod(true,"getText").runMethod(true,"trim"))})); - BA.debugLineNum = 381;BA.debugLine="Log(\"Mandamos: \"&user.Text&\"|\"& pass.Text)"; -Debug.ShouldStop(268435456); -b4xmainpage.__c.runVoidMethod ("LogImpl","3852056",RemoteObject.concat(RemoteObject.createImmutable("Mandamos: "),__ref.getField(false,"_user" /*RemoteObject*/ ).runMethod(true,"getText"),RemoteObject.createImmutable("|"),__ref.getField(false,"_pass" /*RemoteObject*/ ).runMethod(true,"getText")),0); - BA.debugLineNum = 382;BA.debugLine="reqManager.ExecuteQuery(cmd , 0, \"usuario_10\")"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("usuario_10")))); - }; - }; - BA.debugLineNum = 385;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(1); -b4xmainpage._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",b4xmainpage._cmd); - BA.debugLineNum = 386;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(2); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 387;BA.debugLine="cmd.Name = \"select_version_MEDI\""; -Debug.ShouldStop(4); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_version_MEDI")); - BA.debugLineNum = 388;BA.debugLine="reqManager.ExecuteQuery(cmd , 0, \"version\")"; -Debug.ShouldStop(8); -__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("version")))); - }else { - BA.debugLineNum = 390;BA.debugLine="usuario = user.Text"; -Debug.ShouldStop(32); -__ref.setField ("_usuario" /*RemoteObject*/ ,__ref.getField(false,"_user" /*RemoteObject*/ ).runMethod(true,"getText")); - BA.debugLineNum = 391;BA.debugLine="B4XPages.ShowPage(\"Principal\")"; -Debug.ShouldStop(64); -b4xmainpage._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Principal"))); - }; - BA.debugLineNum = 393;BA.debugLine="End Sub"; -Debug.ShouldStop(256); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _entrar_longclick(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Entrar_LongClick (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,665); -if (RapidSub.canDelegate("entrar_longclick")) { return __ref.runUserSub(false, "b4xmainpage","entrar_longclick", __ref);} - BA.debugLineNum = 665;BA.debugLine="Sub Entrar_LongClick"; -Debug.ShouldStop(16777216); - BA.debugLineNum = 667;BA.debugLine="End Sub"; -Debug.ShouldStop(67108864); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _gps_locationchanged(RemoteObject __ref,RemoteObject _location1) throws Exception{ -try { - Debug.PushSubsStack("GPS_LocationChanged (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,531); -if (RapidSub.canDelegate("gps_locationchanged")) { return __ref.runUserSub(false, "b4xmainpage","gps_locationchanged", __ref, _location1);} -Debug.locals.put("Location1", _location1); - BA.debugLineNum = 531;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; -Debug.ShouldStop(262144); - BA.debugLineNum = 532;BA.debugLine="If user.text = \"GPS\" Then"; -Debug.ShouldStop(524288); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_user" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("GPS"))) { - BA.debugLineNum = 533;BA.debugLine="user.Text=Location1.Latitude"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_user" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence(_location1.runMethod(true,"getLatitude"))); - BA.debugLineNum = 534;BA.debugLine="pass.text=Location1.Longitude"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_pass" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence(_location1.runMethod(true,"getLongitude"))); - }; - BA.debugLineNum = 536;BA.debugLine="End Sub"; -Debug.ShouldStop(8388608); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _i_engrane_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("i_engrane_Click (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,635); -if (RapidSub.canDelegate("i_engrane_click")) { return __ref.runUserSub(false, "b4xmainpage","i_engrane_click", __ref);} - BA.debugLineNum = 635;BA.debugLine="Sub i_engrane_Click"; -Debug.ShouldStop(67108864); - BA.debugLineNum = 636;BA.debugLine="lv_server.Clear"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_lv_server" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 637;BA.debugLine="lv_server.AddSingleLine(\"http://keymon.lat:1781\")"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_lv_server" /*RemoteObject*/ ).runVoidMethod ("AddSingleLine",(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("http://keymon.lat:1781")))); - BA.debugLineNum = 638;BA.debugLine="If user.Text = \"KMTS1\" Then lv_server.AddSingleLi"; -Debug.ShouldStop(536870912); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_user" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("KMTS1"))) { -__ref.getField(false,"_lv_server" /*RemoteObject*/ ).runVoidMethod ("AddSingleLine",(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("http://10.0.0.205:1781"))));}; - BA.debugLineNum = 640;BA.debugLine="et_server.Text = Starter.server"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_et_server" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence(b4xmainpage._starter._server /*RemoteObject*/ )); - BA.debugLineNum = 641;BA.debugLine="Subs.panelVisible(p_appUpdate,0,0)"; -Debug.ShouldStop(1); -b4xmainpage._subs.runVoidMethod ("_panelvisible" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_p_appupdate" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 642;BA.debugLine="End Sub"; -Debug.ShouldStop(2); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _i_engrane_longclick(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("i_engrane_LongClick (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,649); -if (RapidSub.canDelegate("i_engrane_longclick")) { return __ref.runUserSub(false, "b4xmainpage","i_engrane_longclick", __ref);} - BA.debugLineNum = 649;BA.debugLine="Sub i_engrane_LongClick"; -Debug.ShouldStop(256); - BA.debugLineNum = 650;BA.debugLine="copiaDB"; -Debug.ShouldStop(512); -__ref.runClassMethod (keymon.lat.medicomed.b4xmainpage.class, "_copiadb" /*void*/ ); - BA.debugLineNum = 651;BA.debugLine="End Sub"; -Debug.ShouldStop(1024); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,96); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xmainpage","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 96;BA.debugLine="Public Sub Initialize"; -Debug.ShouldStop(-2147483648); - BA.debugLineNum = 98;BA.debugLine="End Sub"; -Debug.ShouldStop(2); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _jobdone(RemoteObject __ref,RemoteObject _job) throws Exception{ -try { - Debug.PushSubsStack("JobDone (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,395); -if (RapidSub.canDelegate("jobdone")) { return __ref.runUserSub(false, "b4xmainpage","jobdone", __ref, _job);} -RemoteObject _result = RemoteObject.declareNull("keymon.lat.medicomed.dbrequestmanager._dbresult"); -RemoteObject _records = null; -RemoteObject _cat_ve_version = RemoteObject.createImmutable(""); -RemoteObject _k = RemoteObject.createImmutable(""); -RemoteObject _id_almacen = RemoteObject.createImmutable(""); -RemoteObject _fecha_hoy = RemoteObject.createImmutable(""); -RemoteObject _name = RemoteObject.createImmutable(""); -RemoteObject _imei_base = RemoteObject.createImmutable(""); -Debug.locals.put("Job", _job); - BA.debugLineNum = 395;BA.debugLine="Sub JobDone(Job As HttpJob)"; -Debug.ShouldStop(1024); - BA.debugLineNum = 396;BA.debugLine="Log(Job.Success)"; -Debug.ShouldStop(2048); -b4xmainpage.__c.runVoidMethod ("LogImpl","3917505",BA.ObjectToString(_job.getField(true,"_success" /*RemoteObject*/ )),0); - BA.debugLineNum = 397;BA.debugLine="If Job.Success = False Then"; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_success" /*RemoteObject*/ ),b4xmainpage.__c.getField(true,"False"))) { - BA.debugLineNum = 398;BA.debugLine="ToastMessageShow(\"Error - MainPage: \" & Job.Erro"; -Debug.ShouldStop(8192); -b4xmainpage.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("Error - MainPage: "),_job.getField(true,"_errormessage" /*RemoteObject*/ )))),(Object)(b4xmainpage.__c.getField(true,"True"))); - }else { - BA.debugLineNum = 400;BA.debugLine="LogColor(\"JobDone - MainPage: '\" & reqManager.Ha"; -Debug.ShouldStop(32768); -b4xmainpage.__c.runVoidMethod ("LogImpl","3917509",RemoteObject.concat(RemoteObject.createImmutable("JobDone - MainPage: '"),__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job)).getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable("' - Registros: "),__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job)).getField(false,"Rows" /*RemoteObject*/ ).runMethod(true,"getSize")),b4xmainpage.__c.getField(false,"Colors").getField(true,"Green")); - BA.debugLineNum = 401;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(65536); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 402;BA.debugLine="Dim result As DBResult = reqManager.HandleJob(J"; -Debug.ShouldStop(131072); -_result = __ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("result", _result);Debug.locals.put("result", _result); - BA.debugLineNum = 403;BA.debugLine="If result.Tag = \"version\" Then 'query tag"; -Debug.ShouldStop(262144); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("version")))) { - BA.debugLineNum = 404;BA.debugLine="For Each records() As Object In result.Rows"; -Debug.ShouldStop(524288); -{ -final RemoteObject group9 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen9 = group9.runMethod(true,"getSize").get() -;int index9 = 0; -; -for (; index9 < groupLen9;index9++){ -_records = (group9.runMethod(false,"Get",index9));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 405;BA.debugLine="skmt.ExecNonQuery(\"delete from VERSION\")"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from VERSION"))); - BA.debugLineNum = 406;BA.debugLine="Dim CAT_VE_VERSION As String = records(result"; -Debug.ShouldStop(2097152); -_cat_ve_version = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_VE_VERSION")))))));Debug.locals.put("CAT_VE_VERSION", _cat_ve_version);Debug.locals.put("CAT_VE_VERSION", _cat_ve_version); - BA.debugLineNum = 407;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO VERSION(NOVER"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO VERSION(NOVERSION) VALUES (?)")),(Object)(b4xmainpage.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(_cat_ve_version)}))))); - } -}Debug.locals.put("records", _records); -; - }; - BA.debugLineNum = 411;BA.debugLine="If result.Tag = \"select_fechat\" Then 'query tag"; -Debug.ShouldStop(67108864); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("select_fechat")))) { - BA.debugLineNum = 412;BA.debugLine="For Each records() As Object In result.Rows"; -Debug.ShouldStop(134217728); -{ -final RemoteObject group16 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen16 = group16.runMethod(true,"getSize").get() -;int index16 = 0; -; -for (; index16 < groupLen16;index16++){ -_records = (group16.runMethod(false,"Get",index16));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 413;BA.debugLine="For Each k As String In result.Columns.Keys"; -Debug.ShouldStop(268435456); -{ -final RemoteObject group17 = _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Keys"); -final int groupLen17 = group17.runMethod(true,"getSize").get() -;int index17 = 0; -; -for (; index17 < groupLen17;index17++){ -_k = BA.ObjectToString(group17.runMethod(false,"Get",index17));Debug.locals.put("k", _k); -Debug.locals.put("k", _k); - BA.debugLineNum = 414;BA.debugLine="Log(\"select_fechat: \" & k & \": \" & records(r"; -Debug.ShouldStop(536870912); -b4xmainpage.__c.runVoidMethod ("LogImpl","3917523",RemoteObject.concat(RemoteObject.createImmutable("select_fechat: "),_k,RemoteObject.createImmutable(": "),_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((_k)))))),0); - } -}Debug.locals.put("k", _k); -; - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 420;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(8); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 421;BA.debugLine="Dim result As DBResult = reqManager.HandleJob(J"; -Debug.ShouldStop(16); -_result = __ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("result", _result);Debug.locals.put("result", _result); - BA.debugLineNum = 422;BA.debugLine="If result.Tag = \"agencia\" Then 'query tag"; -Debug.ShouldStop(32); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("agencia")))) { - BA.debugLineNum = 423;BA.debugLine="For Each records() As Object In result.Rows"; -Debug.ShouldStop(64); -{ -final RemoteObject group26 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen26 = group26.runMethod(true,"getSize").get() -;int index26 = 0; -; -for (; index26 < groupLen26;index26++){ -_records = (group26.runMethod(false,"Get",index26));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 424;BA.debugLine="Dim ID_ALMACEN As String = records(result.Col"; -Debug.ShouldStop(128); -_id_almacen = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("ID_ALMACEN")))))));Debug.locals.put("ID_ALMACEN", _id_almacen);Debug.locals.put("ID_ALMACEN", _id_almacen); - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 429;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 430;BA.debugLine="Dim result As DBResult = reqManager.HandleJob(J"; -Debug.ShouldStop(8192); -_result = __ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("result", _result);Debug.locals.put("result", _result); - BA.debugLineNum = 431;BA.debugLine="If result.Tag = \"fecha\" Then 'query tag"; -Debug.ShouldStop(16384); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("fecha")))) { - BA.debugLineNum = 432;BA.debugLine="For Each records() As Object In result.Rows"; -Debug.ShouldStop(32768); -{ -final RemoteObject group34 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen34 = group34.runMethod(true,"getSize").get() -;int index34 = 0; -; -for (; index34 < groupLen34;index34++){ -_records = (group34.runMethod(false,"Get",index34));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 433;BA.debugLine="Dim FECHA_HOY As String = records(result.Colu"; -Debug.ShouldStop(65536); -_fecha_hoy = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("FECHA")))))));Debug.locals.put("FECHA_HOY", _fecha_hoy);Debug.locals.put("FECHA_HOY", _fecha_hoy); - BA.debugLineNum = 434;BA.debugLine="skmt.ExecNonQuery2(\"delete from CAT_VARIABLES"; -Debug.ShouldStop(131072); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("delete from CAT_VARIABLES where CAT_VA_DESCRIPCION = ?")),(Object)(b4xmainpage.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(RemoteObject.createImmutable("FECHA"))}))))); - BA.debugLineNum = 435;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO CAT_VARIABLES"; -Debug.ShouldStop(262144); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO CAT_VARIABLES(CAT_VA_DESCRIPCION, CAT_VA_VALOR) VALUES (?,?)")),(Object)(b4xmainpage.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {RemoteObject.createImmutable(("FECHA")),(_fecha_hoy)}))))); - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 440;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(8388608); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 441;BA.debugLine="Dim result As DBResult = reqManager.HandleJob(J"; -Debug.ShouldStop(16777216); -_result = __ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("result", _result);Debug.locals.put("result", _result); - BA.debugLineNum = 442;BA.debugLine="If result.Tag = \"usuario\" Then 'query tag"; -Debug.ShouldStop(33554432); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("usuario")))) { - BA.debugLineNum = 443;BA.debugLine="For Each records() As Object In result.Rows"; -Debug.ShouldStop(67108864); -{ -final RemoteObject group44 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen44 = group44.runMethod(true,"getSize").get() -;int index44 = 0; -; -for (; index44 < groupLen44;index44++){ -_records = (group44.runMethod(false,"Get",index44));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 444;BA.debugLine="Dim name As String = records(result.Columns.G"; -Debug.ShouldStop(134217728); -_name = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("USUARIO")))))));Debug.locals.put("name", _name);Debug.locals.put("name", _name); - BA.debugLineNum = 445;BA.debugLine="Dim ID_ALMACEN As String = records(result.Col"; -Debug.ShouldStop(268435456); -_id_almacen = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_LO_AGENCIA")))))));Debug.locals.put("ID_ALMACEN", _id_almacen);Debug.locals.put("ID_ALMACEN", _id_almacen); - BA.debugLineNum = 446;BA.debugLine="Dim IMEI_BASE As String = records(result.Colu"; -Debug.ShouldStop(536870912); -_imei_base = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_LO_IDTELEFONO")))))));Debug.locals.put("IMEI_BASE", _imei_base);Debug.locals.put("IMEI_BASE", _imei_base); - BA.debugLineNum = 447;BA.debugLine="Log(records(result.Columns.Get(\"CAT_LO_IDTELE"; -Debug.ShouldStop(1073741824); -b4xmainpage.__c.runVoidMethod ("LogImpl","3917556",BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_LO_IDTELEFONO"))))))),0); - } -}Debug.locals.put("records", _records); -; - BA.debugLineNum = 449;BA.debugLine="paso1 = 1"; -Debug.ShouldStop(1); -__ref.setField ("_paso1" /*RemoteObject*/ ,BA.NumberToString(1)); - BA.debugLineNum = 450;BA.debugLine="ToastMessageShow(name, False)"; -Debug.ShouldStop(2); -b4xmainpage.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence(_name)),(Object)(b4xmainpage.__c.getField(true,"False"))); - BA.debugLineNum = 451;BA.debugLine="Log(\"////////////////////////// \"&name)"; -Debug.ShouldStop(4); -b4xmainpage.__c.runVoidMethod ("LogImpl","3917560",RemoteObject.concat(RemoteObject.createImmutable("////////////////////////// "),_name),0); - }; - }; - BA.debugLineNum = 455;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(64); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 456;BA.debugLine="Dim result As DBResult = reqManager.HandleJob(J"; -Debug.ShouldStop(128); -_result = __ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("result", _result);Debug.locals.put("result", _result); - BA.debugLineNum = 457;BA.debugLine="If result.Tag = \"usuario_10\" Then 'query tag"; -Debug.ShouldStop(256); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("usuario_10")))) { - BA.debugLineNum = 458;BA.debugLine="For Each records() As Object In result.Rows"; -Debug.ShouldStop(512); -{ -final RemoteObject group58 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen58 = group58.runMethod(true,"getSize").get() -;int index58 = 0; -; -for (; index58 < groupLen58;index58++){ -_records = (group58.runMethod(false,"Get",index58));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 459;BA.debugLine="Dim name As String = records(result.Columns.G"; -Debug.ShouldStop(1024); -_name = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("USUARIO")))))));Debug.locals.put("name", _name);Debug.locals.put("name", _name); - BA.debugLineNum = 460;BA.debugLine="Dim ID_ALMACEN As String = records(result.Col"; -Debug.ShouldStop(2048); -_id_almacen = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_LO_AGENCIA")))))));Debug.locals.put("ID_ALMACEN", _id_almacen);Debug.locals.put("ID_ALMACEN", _id_almacen); - BA.debugLineNum = 461;BA.debugLine="Dim IMEI_BASE As String = records(result.Colu"; -Debug.ShouldStop(4096); -_imei_base = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_LO_IDTELEFONO")))))));Debug.locals.put("IMEI_BASE", _imei_base);Debug.locals.put("IMEI_BASE", _imei_base); - } -}Debug.locals.put("records", _records); -; - BA.debugLineNum = 463;BA.debugLine="Log(\"|\"&name&\"|\")"; -Debug.ShouldStop(16384); -b4xmainpage.__c.runVoidMethod ("LogImpl","3917572",RemoteObject.concat(RemoteObject.createImmutable("|"),_name,RemoteObject.createImmutable("|")),0); - BA.debugLineNum = 464;BA.debugLine="paso1 = 1"; -Debug.ShouldStop(32768); -__ref.setField ("_paso1" /*RemoteObject*/ ,BA.NumberToString(1)); - BA.debugLineNum = 465;BA.debugLine="IMEI_BASE = \"\""; -Debug.ShouldStop(65536); -_imei_base = BA.ObjectToString("");Debug.locals.put("IMEI_BASE", _imei_base); - BA.debugLineNum = 466;BA.debugLine="IMEI = \"\""; -Debug.ShouldStop(131072); -__ref.setField ("_imei" /*RemoteObject*/ ,BA.ObjectToString("")); - }; - }; - BA.debugLineNum = 469;BA.debugLine="Job.Release"; -Debug.ShouldStop(1048576); -_job.runClassMethod (keymon.lat.medicomed.httpjob.class, "_release" /*RemoteObject*/ ); - }; - BA.debugLineNum = 471;BA.debugLine="Log($\"Paso1 = ${paso1} - Name: ${name} - IMEI: ${"; -Debug.ShouldStop(4194304); -b4xmainpage.__c.runVoidMethod ("LogImpl","3917580",(RemoteObject.concat(RemoteObject.createImmutable("Paso1 = "),b4xmainpage.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_paso1" /*RemoteObject*/ )))),RemoteObject.createImmutable(" - Name: "),b4xmainpage.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_name))),RemoteObject.createImmutable(" - IMEI: "),b4xmainpage.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_imei" /*RemoteObject*/ )))),RemoteObject.createImmutable(" - IMEI_BASE: "),b4xmainpage.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_imei_base))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 472;BA.debugLine="If paso1 = 1 Then"; -Debug.ShouldStop(8388608); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_paso1" /*RemoteObject*/ ),BA.NumberToString(1))) { - BA.debugLineNum = 473;BA.debugLine="If IMEI = \"\" Then"; -Debug.ShouldStop(16777216); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_imei" /*RemoteObject*/ ),BA.ObjectToString(""))) { - BA.debugLineNum = 474;BA.debugLine="If user.Text = \"KMTS1\" Then name = \"OKActivo\""; -Debug.ShouldStop(33554432); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_user" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("KMTS1"))) { -_name = BA.ObjectToString("OKActivo");Debug.locals.put("name", _name);}; - BA.debugLineNum = 475;BA.debugLine="If name = \"OKActivo\" Then"; -Debug.ShouldStop(67108864); -if (RemoteObject.solveBoolean("=",_name,BA.ObjectToString("OKActivo"))) { - BA.debugLineNum = 476;BA.debugLine="skmt.ExecNonQuery(\"delete from usuarioa\")"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from usuarioa"))); - BA.debugLineNum = 477;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO USUARIOA VALUE"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO USUARIOA VALUES (?,?)")),(Object)(b4xmainpage.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_user" /*RemoteObject*/ ).runMethod(true,"getText").runMethod(true,"trim")),(__ref.getField(false,"_pass" /*RemoteObject*/ ).runMethod(true,"getText").runMethod(true,"trim"))}))))); - BA.debugLineNum = 478;BA.debugLine="skmt.ExecNonQuery(\"delete from cat_almacen\")"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from cat_almacen"))); - BA.debugLineNum = 479;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO CAT_ALMACEN(ID"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO CAT_ALMACEN(ID_ALMACEN) VALUES (?)")),(Object)(b4xmainpage.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(_id_almacen)}))))); - BA.debugLineNum = 480;BA.debugLine="usuario = user.Text"; -Debug.ShouldStop(-2147483648); -__ref.setField ("_usuario" /*RemoteObject*/ ,__ref.getField(false,"_user" /*RemoteObject*/ ).runMethod(true,"getText")); - BA.debugLineNum = 481;BA.debugLine="B4XPages.ShowPage(\"Principal\")"; -Debug.ShouldStop(1); -b4xmainpage._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Principal"))); - }else -{ BA.debugLineNum = 482;BA.debugLine="Else If name = \"OKExpirado\" Then"; -Debug.ShouldStop(2); -if (RemoteObject.solveBoolean("=",_name,BA.ObjectToString("OKExpirado"))) { - BA.debugLineNum = 483;BA.debugLine="Msgbox(\"Usuario Expirado llamar al administrad"; -Debug.ShouldStop(4); -b4xmainpage.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("Usuario Expirado llamar al administrador")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable(""))),__ref.getField(false, "ba")); - }else -{ BA.debugLineNum = 484;BA.debugLine="Else If name = \"OKCancelado\" Then"; -Debug.ShouldStop(8); -if (RemoteObject.solveBoolean("=",_name,BA.ObjectToString("OKCancelado"))) { - BA.debugLineNum = 485;BA.debugLine="Msgbox(\"Usuario Cancelado llamar al administra"; -Debug.ShouldStop(16); -b4xmainpage.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("Usuario Cancelado llamar al administrador")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable(""))),__ref.getField(false, "ba")); - }else { - BA.debugLineNum = 487;BA.debugLine="Msgbox(\"Usuario o password No validos\",\"\") 'Ig"; -Debug.ShouldStop(64); -b4xmainpage.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("Usuario o password No validos")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable(""))),__ref.getField(false, "ba")); - }}} -; - BA.debugLineNum = 489;BA.debugLine="paso1 = 0"; -Debug.ShouldStop(256); -__ref.setField ("_paso1" /*RemoteObject*/ ,BA.NumberToString(0)); - }else { - BA.debugLineNum = 491;BA.debugLine="If name = \"OKActivo\" & IMEI And IMEI = IMEI_BA"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("=",_name,RemoteObject.concat(RemoteObject.createImmutable("OKActivo"),__ref.getField(true,"_imei" /*RemoteObject*/ ))) && RemoteObject.solveBoolean("=",__ref.getField(true,"_imei" /*RemoteObject*/ ),_imei_base)) { - BA.debugLineNum = 492;BA.debugLine="If name = \"OKActivo\" & IMEI Then"; -Debug.ShouldStop(2048); -if (RemoteObject.solveBoolean("=",_name,RemoteObject.concat(RemoteObject.createImmutable("OKActivo"),__ref.getField(true,"_imei" /*RemoteObject*/ )))) { - BA.debugLineNum = 493;BA.debugLine="skmt.ExecNonQuery(\"delete from usuarioa\")"; -Debug.ShouldStop(4096); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from usuarioa"))); - BA.debugLineNum = 494;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO USUARIOA VALU"; -Debug.ShouldStop(8192); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO USUARIOA VALUES (?,?)")),(Object)(b4xmainpage.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_user" /*RemoteObject*/ ).runMethod(true,"getText").runMethod(true,"trim")),(__ref.getField(false,"_pass" /*RemoteObject*/ ).runMethod(true,"getText").runMethod(true,"trim"))}))))); - BA.debugLineNum = 495;BA.debugLine="skmt.ExecNonQuery(\"delete from cat_almacen\")"; -Debug.ShouldStop(16384); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from cat_almacen"))); - BA.debugLineNum = 496;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO CAT_ALMACEN(I"; -Debug.ShouldStop(32768); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO CAT_ALMACEN(ID_ALMACEN) VALUES (?)")),(Object)(b4xmainpage.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(_id_almacen)}))))); - BA.debugLineNum = 497;BA.debugLine="usuario = user.Text"; -Debug.ShouldStop(65536); -__ref.setField ("_usuario" /*RemoteObject*/ ,__ref.getField(false,"_user" /*RemoteObject*/ ).runMethod(true,"getText")); - BA.debugLineNum = 498;BA.debugLine="B4XPages.ShowPage(\"Clientes\")"; -Debug.ShouldStop(131072); -b4xmainpage._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Clientes"))); - }else -{ BA.debugLineNum = 499;BA.debugLine="Else If name = \"OKExpirado\"& IMEI Then"; -Debug.ShouldStop(262144); -if (RemoteObject.solveBoolean("=",_name,RemoteObject.concat(RemoteObject.createImmutable("OKExpirado"),__ref.getField(true,"_imei" /*RemoteObject*/ )))) { - BA.debugLineNum = 500;BA.debugLine="Msgbox(\"Usuario Expirado llamar al administra"; -Debug.ShouldStop(524288); -b4xmainpage.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("Usuario Expirado llamar al administrador")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable(""))),__ref.getField(false, "ba")); - }else -{ BA.debugLineNum = 501;BA.debugLine="Else If name = \"OKCancelado\"& IMEI Then"; -Debug.ShouldStop(1048576); -if (RemoteObject.solveBoolean("=",_name,RemoteObject.concat(RemoteObject.createImmutable("OKCancelado"),__ref.getField(true,"_imei" /*RemoteObject*/ )))) { - BA.debugLineNum = 502;BA.debugLine="Msgbox(\"Usuario Cancelado llamar al administr"; -Debug.ShouldStop(2097152); -b4xmainpage.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("Usuario Cancelado llamar al administrador")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable(""))),__ref.getField(false, "ba")); - }else { - BA.debugLineNum = 504;BA.debugLine="Msgbox(\"Usuario o password No validos\",\"\") 'i"; -Debug.ShouldStop(8388608); -b4xmainpage.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("Usuario o password No validos")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable(""))),__ref.getField(false, "ba")); - }}} -; - BA.debugLineNum = 506;BA.debugLine="paso1 = 0"; -Debug.ShouldStop(33554432); -__ref.setField ("_paso1" /*RemoteObject*/ ,BA.NumberToString(0)); - }else -{ BA.debugLineNum = 507;BA.debugLine="Else IF name = \"OKActivo\" Then"; -Debug.ShouldStop(67108864); -if (RemoteObject.solveBoolean("=",_name,BA.ObjectToString("OKActivo"))) { - BA.debugLineNum = 508;BA.debugLine="Msgbox(\"Telefono no VALIDO!\",\"\") 'ignore"; -Debug.ShouldStop(134217728); -b4xmainpage.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("Telefono no VALIDO!")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable(""))),__ref.getField(false, "ba")); - }else { - BA.debugLineNum = 510;BA.debugLine="Msgbox(\"Usuario o password No validos\",\"\") 'ig"; -Debug.ShouldStop(536870912); -b4xmainpage.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("Usuario o password No validos")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable(""))),__ref.getField(false, "ba")); - }} -; - }; - }; - BA.debugLineNum = 514;BA.debugLine="End Sub"; -Debug.ShouldStop(2); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _lv_server_itemclick(RemoteObject __ref,RemoteObject _position,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("lv_server_ItemClick (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,669); -if (RapidSub.canDelegate("lv_server_itemclick")) { return __ref.runUserSub(false, "b4xmainpage","lv_server_itemclick", __ref, _position, _value);} -Debug.locals.put("Position", _position); -Debug.locals.put("Value", _value); - BA.debugLineNum = 669;BA.debugLine="Private Sub lv_server_ItemClick (Position As Int,"; -Debug.ShouldStop(268435456); - BA.debugLineNum = 670;BA.debugLine="Starter.server = Value"; -Debug.ShouldStop(536870912); -b4xmainpage._starter._server /*RemoteObject*/ = BA.ObjectToString(_value); - BA.debugLineNum = 672;BA.debugLine="et_server.Text = Value"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_et_server" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence(_value)); - BA.debugLineNum = 673;BA.debugLine="Starter.reqManager.Initialize(Me, Value)"; -Debug.ShouldStop(1); -b4xmainpage._starter._reqmanager /*RemoteObject*/ .runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref),(Object)(BA.ObjectToString(_value))); - BA.debugLineNum = 674;BA.debugLine="ToastMessageShow(\"Servidor modificado\", False)"; -Debug.ShouldStop(2); -b4xmainpage.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Servidor modificado")),(Object)(b4xmainpage.__c.getField(true,"False"))); - BA.debugLineNum = 675;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _muestraprogreso(RemoteObject __ref,RemoteObject _mensaje) throws Exception{ -try { - Debug.PushSubsStack("muestraProgreso (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,626); -if (RapidSub.canDelegate("muestraprogreso")) { return __ref.runUserSub(false, "b4xmainpage","muestraprogreso", __ref, _mensaje);} -Debug.locals.put("mensaje", _mensaje); - BA.debugLineNum = 626;BA.debugLine="Sub muestraProgreso(mensaje As String)"; -Debug.ShouldStop(131072); - BA.debugLineNum = 627;BA.debugLine="ProgressDialogShow(mensaje)"; -Debug.ShouldStop(262144); -b4xmainpage.__c.runVoidMethod ("ProgressDialogShow",__ref.getField(false, "ba"),(Object)(BA.ObjectToCharSequence(_mensaje))); - BA.debugLineNum = 628;BA.debugLine="End Sub"; -Debug.ShouldStop(524288); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _ocultaprogreso(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("ocultaProgreso (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,631); -if (RapidSub.canDelegate("ocultaprogreso")) { return __ref.runUserSub(false, "b4xmainpage","ocultaprogreso", __ref);} - BA.debugLineNum = 631;BA.debugLine="Sub ocultaProgreso"; -Debug.ShouldStop(4194304); - BA.debugLineNum = 632;BA.debugLine="ProgressDialogHide"; -Debug.ShouldStop(8388608); -b4xmainpage.__c.runVoidMethod ("ProgressDialogHide"); - BA.debugLineNum = 633;BA.debugLine="End Sub"; -Debug.ShouldStop(16777216); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _pdf_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("PDF_Click (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,551); -if (RapidSub.canDelegate("pdf_click")) { return __ref.runUserSub(false, "b4xmainpage","pdf_click", __ref);} - BA.debugLineNum = 551;BA.debugLine="Sub PDF_Click"; -Debug.ShouldStop(64); - BA.debugLineNum = 553;BA.debugLine="End Sub"; -Debug.ShouldStop(256); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _popupmenu_dismiss(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("PopupMenu_Dismiss (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,538); -if (RapidSub.canDelegate("popupmenu_dismiss")) { return __ref.runUserSub(false, "b4xmainpage","popupmenu_dismiss", __ref);} - BA.debugLineNum = 538;BA.debugLine="Sub PopupMenu_Dismiss"; -Debug.ShouldStop(33554432); - BA.debugLineNum = 539;BA.debugLine="ToastMessageShow(\"PopupMenu dismissed\", False)"; -Debug.ShouldStop(67108864); -b4xmainpage.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("PopupMenu dismissed")),(Object)(b4xmainpage.__c.getField(true,"False"))); - BA.debugLineNum = 540;BA.debugLine="End Sub"; -Debug.ShouldStop(134217728); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _popupmenu_menuitemclick(RemoteObject __ref,RemoteObject _itemid) throws Exception{ -try { - Debug.PushSubsStack("PopupMenu_MenuItemClick (b4xmainpage) ","b4xmainpage",1,__ref.getField(false, "ba"),__ref,542); -if (RapidSub.canDelegate("popupmenu_menuitemclick")) { return __ref.runUserSub(false, "b4xmainpage","popupmenu_menuitemclick", __ref, _itemid);} -Debug.locals.put("ItemId", _itemid); - BA.debugLineNum = 542;BA.debugLine="Sub PopupMenu_MenuItemClick (ItemId As Int) As Boo"; -Debug.ShouldStop(536870912); - BA.debugLineNum = 543;BA.debugLine="ToastMessageShow(\"Item \" & ItemId & \" clicked.\","; -Debug.ShouldStop(1073741824); -b4xmainpage.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("Item "),_itemid,RemoteObject.createImmutable(" clicked.")))),(Object)(b4xmainpage.__c.getField(true,"False"))); - BA.debugLineNum = 544;BA.debugLine="Return False"; -Debug.ShouldStop(-2147483648); -if (true) return b4xmainpage.__c.getField(true,"False"); - BA.debugLineNum = 545;BA.debugLine="End Sub"; -Debug.ShouldStop(1); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xorderedmap.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xorderedmap.java deleted file mode 100644 index d00edbe..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xorderedmap.java +++ /dev/null @@ -1,31 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xorderedmap { - public static RemoteObject myClass; - public b4xorderedmap() { - } - public static PCBA staticBA = new PCBA(null, b4xorderedmap.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _map = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -public static RemoteObject _list = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"DateUtils",_ref.getField(false, "_dateutils"),"list",_ref.getField(false, "_list"),"map",_ref.getField(false, "_map")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xorderedmap_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xorderedmap_subs_0.java deleted file mode 100644 index 374d111..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xorderedmap_subs_0.java +++ /dev/null @@ -1,307 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xorderedmap_subs_0 { - - -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Private map As Map"; -b4xorderedmap._map = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");__ref.setField("_map",b4xorderedmap._map); - //BA.debugLineNum = 3;BA.debugLine="Private list As List"; -b4xorderedmap._list = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_list",b4xorderedmap._list); - //BA.debugLineNum = 4;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _clear(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Clear (b4xorderedmap) ","b4xorderedmap",31,__ref.getField(false, "ba"),__ref,26); -if (RapidSub.canDelegate("clear")) { return __ref.runUserSub(false, "b4xorderedmap","clear", __ref);} - BA.debugLineNum = 26;BA.debugLine="Public Sub Clear"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 27;BA.debugLine="list.Clear"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_list" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 28;BA.debugLine="map.Clear"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_map" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 29;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _containskey(RemoteObject __ref,RemoteObject _key) throws Exception{ -try { - Debug.PushSubsStack("ContainsKey (b4xorderedmap) ","b4xorderedmap",31,__ref.getField(false, "ba"),__ref,46); -if (RapidSub.canDelegate("containskey")) { return __ref.runUserSub(false, "b4xorderedmap","containskey", __ref, _key);} -Debug.locals.put("Key", _key); - BA.debugLineNum = 46;BA.debugLine="Public Sub ContainsKey (Key As Object) As Boolean"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 47;BA.debugLine="Return map.ContainsKey(Key)"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_map" /*RemoteObject*/ ).runMethod(true,"ContainsKey",(Object)(_key)); - BA.debugLineNum = 48;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _get(RemoteObject __ref,RemoteObject _key) throws Exception{ -try { - Debug.PushSubsStack("Get (b4xorderedmap) ","b4xorderedmap",31,__ref.getField(false, "ba"),__ref,37); -if (RapidSub.canDelegate("get")) { return __ref.runUserSub(false, "b4xorderedmap","get", __ref, _key);} -Debug.locals.put("Key", _key); - BA.debugLineNum = 37;BA.debugLine="Public Sub Get (Key As Object) As Object"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 38;BA.debugLine="Return map.Get(Key)"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_map" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(_key)); - BA.debugLineNum = 39;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getdataforserializator(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetDataForSerializator (b4xorderedmap) ","b4xorderedmap",31,__ref.getField(false, "ba"),__ref,65); -if (RapidSub.canDelegate("getdataforserializator")) { return __ref.runUserSub(false, "b4xorderedmap","getdataforserializator", __ref);} - BA.debugLineNum = 65;BA.debugLine="Public Sub GetDataForSerializator As Object"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 66;BA.debugLine="Return Array(map, list)"; -Debug.JustUpdateDeviceLine(); -if (true) return (RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_map" /*RemoteObject*/ ).getObject()),(__ref.getField(false,"_list" /*RemoteObject*/ ).getObject())})); - BA.debugLineNum = 67;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getdefault(RemoteObject __ref,RemoteObject _key,RemoteObject _defaultvalue) throws Exception{ -try { - Debug.PushSubsStack("GetDefault (b4xorderedmap) ","b4xorderedmap",31,__ref.getField(false, "ba"),__ref,42); -if (RapidSub.canDelegate("getdefault")) { return __ref.runUserSub(false, "b4xorderedmap","getdefault", __ref, _key, _defaultvalue);} -Debug.locals.put("Key", _key); -Debug.locals.put("DefaultValue", _defaultvalue); - BA.debugLineNum = 42;BA.debugLine="Public Sub GetDefault (Key As Object, DefaultValue"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 43;BA.debugLine="Return map.GetDefault(Key, DefaultValue)"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_map" /*RemoteObject*/ ).runMethod(false,"GetDefault",(Object)(_key),(Object)(_defaultvalue)); - BA.debugLineNum = 44;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getkeys(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getKeys (b4xorderedmap) ","b4xorderedmap",31,__ref.getField(false, "ba"),__ref,32); -if (RapidSub.canDelegate("getkeys")) { return __ref.runUserSub(false, "b4xorderedmap","getkeys", __ref);} - BA.debugLineNum = 32;BA.debugLine="Public Sub getKeys As List"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 33;BA.debugLine="Return list"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_list" /*RemoteObject*/ ); - BA.debugLineNum = 34;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getsize(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getSize (b4xorderedmap) ","b4xorderedmap",31,__ref.getField(false, "ba"),__ref,50); -if (RapidSub.canDelegate("getsize")) { return __ref.runUserSub(false, "b4xorderedmap","getsize", __ref);} - BA.debugLineNum = 50;BA.debugLine="Public Sub getSize As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 51;BA.debugLine="Return map.Size"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_map" /*RemoteObject*/ ).runMethod(true,"getSize"); - BA.debugLineNum = 52;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getvalues(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getValues (b4xorderedmap) ","b4xorderedmap",31,__ref.getField(false, "ba"),__ref,55); -if (RapidSub.canDelegate("getvalues")) { return __ref.runUserSub(false, "b4xorderedmap","getvalues", __ref);} -RemoteObject _res = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _key = RemoteObject.declareNull("Object"); - BA.debugLineNum = 55;BA.debugLine="Public Sub getValues As List"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 56;BA.debugLine="Dim res As List"; -Debug.JustUpdateDeviceLine(); -_res = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");Debug.locals.put("res", _res); - BA.debugLineNum = 57;BA.debugLine="res.Initialize"; -Debug.JustUpdateDeviceLine(); -_res.runVoidMethod ("Initialize"); - BA.debugLineNum = 58;BA.debugLine="For Each key As Object In list"; -Debug.JustUpdateDeviceLine(); -{ -final RemoteObject group3 = __ref.getField(false,"_list" /*RemoteObject*/ ); -final int groupLen3 = group3.runMethod(true,"getSize").get() -;int index3 = 0; -; -for (; index3 < groupLen3;index3++){ -_key = group3.runMethod(false,"Get",index3);Debug.locals.put("key", _key); -Debug.locals.put("key", _key); - BA.debugLineNum = 59;BA.debugLine="res.Add(map.Get(key))"; -Debug.JustUpdateDeviceLine(); -_res.runVoidMethod ("Add",(Object)(__ref.getField(false,"_map" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(_key)))); - } -}Debug.locals.put("key", _key); -; - BA.debugLineNum = 61;BA.debugLine="Return res"; -Debug.JustUpdateDeviceLine(); -if (true) return _res; - BA.debugLineNum = 62;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xorderedmap) ","b4xorderedmap",31,__ref.getField(false, "ba"),__ref,6); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xorderedmap","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 6;BA.debugLine="Public Sub Initialize"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 7;BA.debugLine="map.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_map" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 8;BA.debugLine="list.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_list" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 9;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _put(RemoteObject __ref,RemoteObject _key,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("Put (b4xorderedmap) ","b4xorderedmap",31,__ref.getField(false, "ba"),__ref,12); -if (RapidSub.canDelegate("put")) { return __ref.runUserSub(false, "b4xorderedmap","put", __ref, _key, _value);} -Debug.locals.put("Key", _key); -Debug.locals.put("Value", _value); - BA.debugLineNum = 12;BA.debugLine="Public Sub Put (Key As Object, Value As Object)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 13;BA.debugLine="If map.ContainsKey(Key) = False Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_map" /*RemoteObject*/ ).runMethod(true,"ContainsKey",(Object)(_key)),b4xorderedmap.__c.getField(true,"False"))) { - BA.debugLineNum = 14;BA.debugLine="list.Add(Key)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_list" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)(_key)); - }; - BA.debugLineNum = 16;BA.debugLine="map.Put(Key, Value)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_map" /*RemoteObject*/ ).runVoidMethod ("Put",(Object)(_key),(Object)(_value)); - BA.debugLineNum = 17;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _remove(RemoteObject __ref,RemoteObject _key) throws Exception{ -try { - Debug.PushSubsStack("Remove (b4xorderedmap) ","b4xorderedmap",31,__ref.getField(false, "ba"),__ref,20); -if (RapidSub.canDelegate("remove")) { return __ref.runUserSub(false, "b4xorderedmap","remove", __ref, _key);} -Debug.locals.put("Key", _key); - BA.debugLineNum = 20;BA.debugLine="Public Sub Remove (Key As Object)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 21;BA.debugLine="If map.ContainsKey(Key) = False Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_map" /*RemoteObject*/ ).runMethod(true,"ContainsKey",(Object)(_key)),b4xorderedmap.__c.getField(true,"False"))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 22;BA.debugLine="list.RemoveAt(list.IndexOf(Key))"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_list" /*RemoteObject*/ ).runVoidMethod ("RemoveAt",(Object)(__ref.getField(false,"_list" /*RemoteObject*/ ).runMethod(true,"IndexOf",(Object)(_key)))); - BA.debugLineNum = 23;BA.debugLine="map.Remove(Key)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_map" /*RemoteObject*/ ).runVoidMethod ("Remove",(Object)(_key)); - BA.debugLineNum = 24;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setdatafromserializator(RemoteObject __ref,RemoteObject _data) throws Exception{ -try { - Debug.PushSubsStack("SetDataFromSerializator (b4xorderedmap) ","b4xorderedmap",31,__ref.getField(false, "ba"),__ref,70); -if (RapidSub.canDelegate("setdatafromserializator")) { return __ref.runUserSub(false, "b4xorderedmap","setdatafromserializator", __ref, _data);} -RemoteObject _o = null; -Debug.locals.put("Data", _data); - BA.debugLineNum = 70;BA.debugLine="Public Sub SetDataFromSerializator (Data As Object"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 71;BA.debugLine="Dim o() As Object = Data"; -Debug.JustUpdateDeviceLine(); -_o = (_data);Debug.locals.put("o", _o);Debug.locals.put("o", _o); - BA.debugLineNum = 72;BA.debugLine="map = o(0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_map" /*RemoteObject*/ ).setObject (_o.getArrayElement(false,BA.numberCast(int.class, 0))); - BA.debugLineNum = 73;BA.debugLine="list = o(1)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_list" /*RemoteObject*/ ).setObject (_o.getArrayElement(false,BA.numberCast(int.class, 1))); - BA.debugLineNum = 74;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xpages.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xpages.java deleted file mode 100644 index db3a457..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xpages.java +++ /dev/null @@ -1,65 +0,0 @@ - -package keymon.lat.medicomed; - -import java.io.IOException; -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RDebug; -import anywheresoftware.b4a.pc.RemoteObject; -import anywheresoftware.b4a.pc.RDebug.IRemote; -import anywheresoftware.b4a.pc.Debug; -import anywheresoftware.b4a.pc.B4XTypes.B4XClass; -import anywheresoftware.b4a.pc.B4XTypes.DeviceClass; - -public class b4xpages implements IRemote{ - public static b4xpages mostCurrent; - public static RemoteObject processBA; - public static boolean processGlobalsRun; - public static RemoteObject myClass; - public static RemoteObject remoteMe; - public b4xpages() { - mostCurrent = this; - } - public RemoteObject getRemoteMe() { - return remoteMe; - } - -public boolean isSingleton() { - return true; - } - private static PCBA pcBA = new PCBA(null, b4xpages.class); - static { - mostCurrent = new b4xpages(); - remoteMe = RemoteObject.declareNull("keymon.lat.medicomed.b4xpages"); - anywheresoftware.b4a.pc.RapidSub.moduleToObject.put(new B4XClass("b4xpages"), "keymon.lat.medicomed.b4xpages"); - RDebug.INSTANCE.eventTargets.put(new DeviceClass("keymon.lat.medicomed.b4xpages"), new java.lang.ref.WeakReference (pcBA)); - } - - public static RemoteObject runMethod(boolean notUsed, String method, Object... args) throws Exception{ - return (RemoteObject) pcBA.raiseEvent(method.substring(1), args); - } - public static void runVoidMethod(String method, Object... args) throws Exception{ - runMethod(false, method, args); - } - public PCBA create(Object[] args) throws ClassNotFoundException{ - throw new RuntimeException("CREATE is not supported."); - } -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _mpm = RemoteObject.declareNull("Object"); -public static RemoteObject _delegate = RemoteObject.declareNull("keymon.lat.medicomed.b4xpagesdelegator"); -public static RemoteObject _globalcontext = RemoteObject.declareNull("Object"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; - public Object[] GetGlobals() { - return new Object[] {"appUpdater",Debug.moduleToString(keymon.lat.medicomed.appupdater.class),"B4XCollections",Debug.moduleToString(keymon.lat.medicomed.b4xcollections.class),"DateUtils",b4xpages.mostCurrent._dateutils,"Delegate",b4xpages._delegate,"GlobalContext",b4xpages._globalcontext,"HttpUtils2Service",Debug.moduleToString(keymon.lat.medicomed.httputils2service.class),"Main",Debug.moduleToString(keymon.lat.medicomed.main.class),"MAPA_RUTAS",Debug.moduleToString(keymon.lat.medicomed.mapa_rutas.class),"mPM",b4xpages._mpm,"newinst2",Debug.moduleToString(keymon.lat.medicomed.newinst2.class),"Starter",Debug.moduleToString(keymon.lat.medicomed.starter.class),"Subs",Debug.moduleToString(keymon.lat.medicomed.subs.class),"Tracker",Debug.moduleToString(keymon.lat.medicomed.tracker.class),"XUIViewsUtils",Debug.moduleToString(keymon.lat.medicomed.xuiviewsutils.class)}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xpages_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xpages_subs_0.java deleted file mode 100644 index 4ca538c..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xpages_subs_0.java +++ /dev/null @@ -1,318 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xpages_subs_0 { - - -public static RemoteObject _addmenuitem(RemoteObject _ba,RemoteObject _b4xpage,RemoteObject _title) throws Exception{ -try { - Debug.PushSubsStack("AddMenuItem (b4xpages) ","b4xpages",25,_ba,b4xpages.mostCurrent,91); -if (RapidSub.canDelegate("addmenuitem")) { return keymon.lat.medicomed.b4xpages.remoteMe.runUserSub(false, "b4xpages","addmenuitem", _ba, _b4xpage, _title);} -; -Debug.locals.put("B4XPage", _b4xpage); -Debug.locals.put("Title", _title); - BA.debugLineNum = 91;BA.debugLine="Public Sub AddMenuItem(B4XPage As Object, Title As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 92;BA.debugLine="Return GetManager.AddMenuItem(B4XPage, Title)"; -Debug.JustUpdateDeviceLine(); -if (true) return _getmanager(_ba).runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_addmenuitem" /*RemoteObject*/ ,(Object)(_b4xpage),(Object)(_title)); - BA.debugLineNum = 93;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _addpage(RemoteObject _ba,RemoteObject _id,RemoteObject _b4xpage) throws Exception{ -try { - Debug.PushSubsStack("AddPage (b4xpages) ","b4xpages",25,_ba,b4xpages.mostCurrent,37); -if (RapidSub.canDelegate("addpage")) { return keymon.lat.medicomed.b4xpages.remoteMe.runUserSub(false, "b4xpages","addpage", _ba, _id, _b4xpage);} -; -Debug.locals.put("Id", _id); -Debug.locals.put("B4XPage", _b4xpage); - BA.debugLineNum = 37;BA.debugLine="Public Sub AddPage (Id As String, B4XPage As Objec"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 38;BA.debugLine="GetManager.AddPage(Id, B4XPage)"; -Debug.JustUpdateDeviceLine(); -_getmanager(_ba).runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_addpage" /*RemoteObject*/ ,(Object)(_id),(Object)(_b4xpage)); - BA.debugLineNum = 39;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _addpageandcreate(RemoteObject _ba,RemoteObject _id,RemoteObject _b4xpage) throws Exception{ -try { - Debug.PushSubsStack("AddPageAndCreate (b4xpages) ","b4xpages",25,_ba,b4xpages.mostCurrent,42); -if (RapidSub.canDelegate("addpageandcreate")) { return keymon.lat.medicomed.b4xpages.remoteMe.runUserSub(false, "b4xpages","addpageandcreate", _ba, _id, _b4xpage);} -; -Debug.locals.put("Id", _id); -Debug.locals.put("B4XPage", _b4xpage); - BA.debugLineNum = 42;BA.debugLine="Public Sub AddPageAndCreate (Id As String, B4XPage"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 43;BA.debugLine="GetManager.AddPageAndCreate(Id, B4XPage)"; -Debug.JustUpdateDeviceLine(); -_getmanager(_ba).runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_addpageandcreate" /*RemoteObject*/ ,(Object)(_id),(Object)(_b4xpage)); - BA.debugLineNum = 44;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _closepage(RemoteObject _ba,RemoteObject _b4xpage) throws Exception{ -try { - Debug.PushSubsStack("ClosePage (b4xpages) ","b4xpages",25,_ba,b4xpages.mostCurrent,62); -if (RapidSub.canDelegate("closepage")) { return keymon.lat.medicomed.b4xpages.remoteMe.runUserSub(false, "b4xpages","closepage", _ba, _b4xpage);} -; -Debug.locals.put("B4XPage", _b4xpage); - BA.debugLineNum = 62;BA.debugLine="Public Sub ClosePage (B4XPage As Object)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 63;BA.debugLine="GetManager.ClosePage (B4XPage)"; -Debug.JustUpdateDeviceLine(); -_getmanager(_ba).runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_closepage" /*RemoteObject*/ ,(Object)(_b4xpage)); - BA.debugLineNum = 64;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getmanager(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("GetManager (b4xpages) ","b4xpages",25,_ba,b4xpages.mostCurrent,14); -if (RapidSub.canDelegate("getmanager")) { return keymon.lat.medicomed.b4xpages.remoteMe.runUserSub(false, "b4xpages","getmanager", _ba);} -; - BA.debugLineNum = 14;BA.debugLine="Public Sub GetManager As B4XPagesManager"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 15;BA.debugLine="Return mPM"; -Debug.JustUpdateDeviceLine(); -if (true) return (b4xpages._mpm); - BA.debugLineNum = 16;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getnativeparent(RemoteObject _ba,RemoteObject _b4xpage) throws Exception{ -try { - Debug.PushSubsStack("GetNativeParent (b4xpages) ","b4xpages",25,_ba,b4xpages.mostCurrent,79); -if (RapidSub.canDelegate("getnativeparent")) { return keymon.lat.medicomed.b4xpages.remoteMe.runUserSub(false, "b4xpages","getnativeparent", _ba, _b4xpage);} -; -Debug.locals.put("B4XPage", _b4xpage); - BA.debugLineNum = 79;BA.debugLine="Public Sub GetNativeParent (B4XPage As Object) As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 87;BA.debugLine="Return GetManager.FindPIFromB4XPage(B4XPage).Pare"; -Debug.JustUpdateDeviceLine(); -if (true) return _getmanager(_ba).runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_findpifromb4xpage" /*RemoteObject*/ ,(Object)(_b4xpage)).getField(false,"Parent" /*RemoteObject*/ ).getField(false,"NativeType" /*RemoteObject*/ ); - BA.debugLineNum = 88;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getpage(RemoteObject _ba,RemoteObject _id) throws Exception{ -try { - Debug.PushSubsStack("GetPage (b4xpages) ","b4xpages",25,_ba,b4xpages.mostCurrent,27); -if (RapidSub.canDelegate("getpage")) { return keymon.lat.medicomed.b4xpages.remoteMe.runUserSub(false, "b4xpages","getpage", _ba, _id);} -; -Debug.locals.put("Id", _id); - BA.debugLineNum = 27;BA.debugLine="Public Sub GetPage (Id As String) As Object"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 28;BA.debugLine="Return GetManager.GetPage(Id)"; -Debug.JustUpdateDeviceLine(); -if (true) return _getmanager(_ba).runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_getpage" /*RemoteObject*/ ,(Object)(_id)); - BA.debugLineNum = 29;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getpageid(RemoteObject _ba,RemoteObject _b4xpage) throws Exception{ -try { - Debug.PushSubsStack("GetPageId (b4xpages) ","b4xpages",25,_ba,b4xpages.mostCurrent,32); -if (RapidSub.canDelegate("getpageid")) { return keymon.lat.medicomed.b4xpages.remoteMe.runUserSub(false, "b4xpages","getpageid", _ba, _b4xpage);} -; -Debug.locals.put("B4XPage", _b4xpage); - BA.debugLineNum = 32;BA.debugLine="Public Sub GetPageId (B4XPage As Object) As String"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 33;BA.debugLine="Return GetManager.FindPIFromB4XPage(B4XPage).Id"; -Debug.JustUpdateDeviceLine(); -if (true) return _getmanager(_ba).runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_findpifromb4xpage" /*RemoteObject*/ ,(Object)(_b4xpage)).getField(true,"Id" /*RemoteObject*/ ); - BA.debugLineNum = 34;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _internalsetpagesmanager(RemoteObject _ba,RemoteObject _pm) throws Exception{ -try { - Debug.PushSubsStack("InternalSetPagesManager (b4xpages) ","b4xpages",25,_ba,b4xpages.mostCurrent,19); -if (RapidSub.canDelegate("internalsetpagesmanager")) { return keymon.lat.medicomed.b4xpages.remoteMe.runUserSub(false, "b4xpages","internalsetpagesmanager", _ba, _pm);} -; -Debug.locals.put("PM", _pm); - BA.debugLineNum = 19;BA.debugLine="Public Sub InternalSetPagesManager(PM As Object)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 20;BA.debugLine="Delegate.Initialize"; -Debug.JustUpdateDeviceLine(); -b4xpages._delegate.runClassMethod (keymon.lat.medicomed.b4xpagesdelegator.class, "_initialize" /*RemoteObject*/ ,BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba)); - BA.debugLineNum = 21;BA.debugLine="mPM = PM"; -Debug.JustUpdateDeviceLine(); -b4xpages._mpm = _pm; - BA.debugLineNum = 22;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _isinitialized(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("IsInitialized (b4xpages) ","b4xpages",25,_ba,b4xpages.mostCurrent,9); -if (RapidSub.canDelegate("isinitialized")) { return keymon.lat.medicomed.b4xpages.remoteMe.runUserSub(false, "b4xpages","isinitialized", _ba);} -; - BA.debugLineNum = 9;BA.debugLine="Public Sub IsInitialized As Boolean"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 10;BA.debugLine="Return mPM Is B4XPagesManager"; -Debug.JustUpdateDeviceLine(); -if (true) return BA.ObjectToBoolean(RemoteObject.solveBoolean("i",b4xpages._mpm, RemoteObject.createImmutable("keymon.lat.medicomed.b4xpagesmanager"))); - BA.debugLineNum = 11;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _mainpage(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("MainPage (b4xpages) ","b4xpages",25,_ba,b4xpages.mostCurrent,73); -if (RapidSub.canDelegate("mainpage")) { return keymon.lat.medicomed.b4xpages.remoteMe.runUserSub(false, "b4xpages","mainpage", _ba);} -; - BA.debugLineNum = 73;BA.debugLine="Public Sub MainPage As B4XMainPage"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 74;BA.debugLine="Return GetManager.MainPage"; -Debug.JustUpdateDeviceLine(); -if (true) return _getmanager(_ba).getField(false,"_mainpage" /*RemoteObject*/ ); - BA.debugLineNum = 75;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _process_globals() throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Process_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Private mPM As Object"; -b4xpages._mpm = RemoteObject.createNew ("Object"); - //BA.debugLineNum = 3;BA.debugLine="Public Delegate As B4XPagesDelegator"; -b4xpages._delegate = RemoteObject.createNew ("keymon.lat.medicomed.b4xpagesdelegator"); - //BA.debugLineNum = 4;BA.debugLine="Public GlobalContext As Object"; -b4xpages._globalcontext = RemoteObject.createNew ("Object"); - //BA.debugLineNum = 5;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _settitle(RemoteObject _ba,RemoteObject _b4xpage,RemoteObject _title) throws Exception{ -try { - Debug.PushSubsStack("SetTitle (b4xpages) ","b4xpages",25,_ba,b4xpages.mostCurrent,68); -if (RapidSub.canDelegate("settitle")) { return keymon.lat.medicomed.b4xpages.remoteMe.runUserSub(false, "b4xpages","settitle", _ba, _b4xpage, _title);} -; -Debug.locals.put("B4XPage", _b4xpage); -Debug.locals.put("Title", _title); - BA.debugLineNum = 68;BA.debugLine="Public Sub SetTitle (B4XPage As Object, Title As O"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 69;BA.debugLine="GetManager.SetTitle(B4XPage, Title)"; -Debug.JustUpdateDeviceLine(); -_getmanager(_ba).runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_settitle" /*RemoteObject*/ ,(Object)(_b4xpage),(Object)(_title)); - BA.debugLineNum = 70;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _showpage(RemoteObject _ba,RemoteObject _id) throws Exception{ -try { - Debug.PushSubsStack("ShowPage (b4xpages) ","b4xpages",25,_ba,b4xpages.mostCurrent,50); -if (RapidSub.canDelegate("showpage")) { return keymon.lat.medicomed.b4xpages.remoteMe.runUserSub(false, "b4xpages","showpage", _ba, _id);} -; -Debug.locals.put("Id", _id); - BA.debugLineNum = 50;BA.debugLine="Public Sub ShowPage (Id As String)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 51;BA.debugLine="GetManager.ShowPage(Id)"; -Debug.JustUpdateDeviceLine(); -_getmanager(_ba).runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_showpage" /*RemoteObject*/ ,(Object)(_id)); - BA.debugLineNum = 52;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _showpageandremovepreviouspages(RemoteObject _ba,RemoteObject _id) throws Exception{ -try { - Debug.PushSubsStack("ShowPageAndRemovePreviousPages (b4xpages) ","b4xpages",25,_ba,b4xpages.mostCurrent,56); -if (RapidSub.canDelegate("showpageandremovepreviouspages")) { return keymon.lat.medicomed.b4xpages.remoteMe.runUserSub(false, "b4xpages","showpageandremovepreviouspages", _ba, _id);} -; -Debug.locals.put("Id", _id); - BA.debugLineNum = 56;BA.debugLine="Public Sub ShowPageAndRemovePreviousPages (Id As S"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 57;BA.debugLine="GetManager.ShowPageAndRemovePreviousPages (Id)"; -Debug.JustUpdateDeviceLine(); -_getmanager(_ba).runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_showpageandremovepreviouspages" /*RemoteObject*/ ,(Object)(_id)); - BA.debugLineNum = 58;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xpagesdelegator.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xpagesdelegator.java deleted file mode 100644 index 029aa54..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xpagesdelegator.java +++ /dev/null @@ -1,29 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xpagesdelegator { - public static RemoteObject myClass; - public b4xpagesdelegator() { - } - public static PCBA staticBA = new PCBA(null, b4xpagesdelegator.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"DateUtils",_ref.getField(false, "_dateutils")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xpagesdelegator_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xpagesdelegator_subs_0.java deleted file mode 100644 index bc24cef..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xpagesdelegator_subs_0.java +++ /dev/null @@ -1,171 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xpagesdelegator_subs_0 { - - -public static RemoteObject _activity_actionbarhomeclick(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Activity_ActionBarHomeClick (b4xpagesdelegator) ","b4xpagesdelegator",33,__ref.getField(false, "ba"),__ref,35); -if (RapidSub.canDelegate("activity_actionbarhomeclick")) { return __ref.runUserSub(false, "b4xpagesdelegator","activity_actionbarhomeclick", __ref);} - BA.debugLineNum = 35;BA.debugLine="Public Sub Activity_ActionBarHomeClick"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 36;BA.debugLine="B4XPages.GetManager.Activity_ActionBarHomeClick"; -Debug.JustUpdateDeviceLine(); -b4xpagesdelegator._b4xpages.runMethod(false,"_getmanager" /*RemoteObject*/ ,__ref.runMethod(false,"getActivityBA")).runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_activity_actionbarhomeclick" /*RemoteObject*/ ); - BA.debugLineNum = 37;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _activity_keypress(RemoteObject __ref,RemoteObject _keycode) throws Exception{ -try { - Debug.PushSubsStack("Activity_KeyPress (b4xpagesdelegator) ","b4xpagesdelegator",33,__ref.getField(false, "ba"),__ref,27); -if (RapidSub.canDelegate("activity_keypress")) { return __ref.runUserSub(false, "b4xpagesdelegator","activity_keypress", __ref, _keycode);} -Debug.locals.put("KeyCode", _keycode); - BA.debugLineNum = 27;BA.debugLine="Public Sub Activity_KeyPress (KeyCode As Int) As B"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 28;BA.debugLine="Return B4XPages.GetManager.Activity_KeyPress (Key"; -Debug.JustUpdateDeviceLine(); -if (true) return b4xpagesdelegator._b4xpages.runMethod(false,"_getmanager" /*RemoteObject*/ ,__ref.runMethod(false,"getActivityBA")).runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_activity_keypress" /*RemoteObject*/ ,(Object)(_keycode)); - BA.debugLineNum = 29;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _activity_pause(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Activity_Pause (b4xpagesdelegator) ","b4xpagesdelegator",33,__ref.getField(false, "ba"),__ref,52); -if (RapidSub.canDelegate("activity_pause")) { return __ref.runUserSub(false, "b4xpagesdelegator","activity_pause", __ref);} - BA.debugLineNum = 52;BA.debugLine="Public Sub Activity_Pause"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 53;BA.debugLine="B4XPages.GetManager.Activity_Pause"; -Debug.JustUpdateDeviceLine(); -b4xpagesdelegator._b4xpages.runMethod(false,"_getmanager" /*RemoteObject*/ ,__ref.runMethod(false,"getActivityBA")).runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_activity_pause" /*RemoteObject*/ ); - BA.debugLineNum = 54;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _activity_permissionresult(RemoteObject __ref,RemoteObject _permission,RemoteObject _result) throws Exception{ -try { - Debug.PushSubsStack("Activity_PermissionResult (b4xpagesdelegator) ","b4xpagesdelegator",33,__ref.getField(false, "ba"),__ref,31); -if (RapidSub.canDelegate("activity_permissionresult")) { return __ref.runUserSub(false, "b4xpagesdelegator","activity_permissionresult", __ref, _permission, _result);} -Debug.locals.put("Permission", _permission); -Debug.locals.put("Result", _result); - BA.debugLineNum = 31;BA.debugLine="Sub Activity_PermissionResult (Permission As Strin"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 32;BA.debugLine="B4XPages.GetManager.RaiseEvent(B4XPages.GetManage"; -Debug.JustUpdateDeviceLine(); -b4xpagesdelegator._b4xpages.runMethod(false,"_getmanager" /*RemoteObject*/ ,__ref.runMethod(false,"getActivityBA")).runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_raiseevent" /*RemoteObject*/ ,(Object)(b4xpagesdelegator._b4xpages.runMethod(false,"_getmanager" /*RemoteObject*/ ,__ref.runMethod(false,"getActivityBA")).runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_gettoppage" /*RemoteObject*/ )),(Object)(BA.ObjectToString("B4XPage_PermissionResult")),(Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(_permission),(_result)}))); - BA.debugLineNum = 33;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _activity_resume(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Activity_Resume (b4xpagesdelegator) ","b4xpagesdelegator",33,__ref.getField(false, "ba"),__ref,48); -if (RapidSub.canDelegate("activity_resume")) { return __ref.runUserSub(false, "b4xpagesdelegator","activity_resume", __ref);} - BA.debugLineNum = 48;BA.debugLine="Public Sub Activity_Resume"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 49;BA.debugLine="B4XPages.GetManager.Activity_Resume"; -Debug.JustUpdateDeviceLine(); -b4xpagesdelegator._b4xpages.runMethod(false,"_getmanager" /*RemoteObject*/ ,__ref.runMethod(false,"getActivityBA")).runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_activity_resume" /*RemoteObject*/ ); - BA.debugLineNum = 50;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _create_menu(RemoteObject __ref,RemoteObject _menu) throws Exception{ -try { - Debug.PushSubsStack("Create_Menu (b4xpagesdelegator) ","b4xpagesdelegator",33,__ref.getField(false, "ba"),__ref,39); -if (RapidSub.canDelegate("create_menu")) { return __ref.runUserSub(false, "b4xpagesdelegator","create_menu", __ref, _menu);} -Debug.locals.put("Menu", _menu); - BA.debugLineNum = 39;BA.debugLine="Public Sub Create_Menu (Menu As Object)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 40;BA.debugLine="B4XPages.GetManager.CreateMenu(Menu)"; -Debug.JustUpdateDeviceLine(); -b4xpagesdelegator._b4xpages.runMethod(false,"_getmanager" /*RemoteObject*/ ,__ref.runMethod(false,"getActivityBA")).runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_createmenu" /*RemoteObject*/ ,(Object)(_menu)); - BA.debugLineNum = 41;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xpagesdelegator) ","b4xpagesdelegator",33,__ref.getField(false, "ba"),__ref,4); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xpagesdelegator","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 4;BA.debugLine="Public Sub Initialize"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 6;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _mainform_resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("MainForm_Resize (b4xpagesdelegator) ","b4xpagesdelegator",33,__ref.getField(false, "ba"),__ref,44); -if (RapidSub.canDelegate("mainform_resize")) { return __ref.runUserSub(false, "b4xpagesdelegator","mainform_resize", __ref, _width, _height);} -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 44;BA.debugLine="Public Sub MainForm_Resize(Width As Double, Height"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 45;BA.debugLine="B4XPages.GetManager.MainForm_Resize(Width, Height"; -Debug.JustUpdateDeviceLine(); -b4xpagesdelegator._b4xpages.runMethod(false,"_getmanager" /*RemoteObject*/ ,__ref.runMethod(false,"getActivityBA")).runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_mainform_resize" /*RemoteObject*/ ,(Object)(_width),(Object)(_height)); - BA.debugLineNum = 46;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xpagesmanager.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xpagesmanager.java deleted file mode 100644 index b0e80a8..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xpagesmanager.java +++ /dev/null @@ -1,42 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xpagesmanager { - public static RemoteObject myClass; - public b4xpagesmanager() { - } - public static PCBA staticBA = new PCBA(null, b4xpagesmanager.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _idtob4xpage = RemoteObject.declareNull("keymon.lat.medicomed.b4xorderedmap"); -public static RemoteObject _rootb4xtopage = RemoteObject.declareNull("keymon.lat.medicomed.b4xorderedmap"); -public static RemoteObject _context = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -public static RemoteObject _mstackofpageids = RemoteObject.declareNull("keymon.lat.medicomed.b4xset"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _mmainform = RemoteObject.declareNull("anywheresoftware.b4a.objects.ActivityWrapper"); -public static RemoteObject _showupindicator = RemoteObject.createImmutable(false); -public static RemoteObject _actionbar = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -public static RemoteObject _isforeground = RemoteObject.createImmutable(false); -public static RemoteObject _transitionanimationduration = RemoteObject.createImmutable(0); -public static RemoteObject _mainpage = RemoteObject.declareNull("keymon.lat.medicomed.b4xmainpage"); -public static RemoteObject _stackstring = RemoteObject.createImmutable(""); -public static RemoteObject _logevents = RemoteObject.createImmutable(false); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"ActionBar",_ref.getField(false, "_actionbar"),"Context",_ref.getField(false, "_context"),"DateUtils",_ref.getField(false, "_dateutils"),"IdToB4XPage",_ref.getField(false, "_idtob4xpage"),"IsForeground",_ref.getField(false, "_isforeground"),"LogEvents",_ref.getField(false, "_logevents"),"MainPage",_ref.getField(false, "_mainpage"),"mMainForm",_ref.getField(false, "_mmainform"),"mStackOfPageIds",_ref.getField(false, "_mstackofpageids"),"RootB4XToPage",_ref.getField(false, "_rootb4xtopage"),"ShowUpIndicator",_ref.getField(false, "_showupindicator"),"StackString",_ref.getField(false, "_stackstring"),"TransitionAnimationDuration",_ref.getField(false, "_transitionanimationduration"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xpagesmanager_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xpagesmanager_subs_0.java deleted file mode 100644 index 11acc12..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xpagesmanager_subs_0.java +++ /dev/null @@ -1,1665 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xpagesmanager_subs_0 { - - -public static RemoteObject _activity_actionbarhomeclick(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Activity_ActionBarHomeClick (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,129); -if (RapidSub.canDelegate("activity_actionbarhomeclick")) { return __ref.runUserSub(false, "b4xpagesmanager","activity_actionbarhomeclick", __ref);} -RemoteObject _pi = RemoteObject.declareNull("keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo"); - BA.debugLineNum = 129;BA.debugLine="Public Sub Activity_ActionBarHomeClick"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 130;BA.debugLine="Dim pi As B4XPageInfo = GetTopPage"; -Debug.JustUpdateDeviceLine(); -_pi = __ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_gettoppage" /*RemoteObject*/ );Debug.locals.put("pi", _pi);Debug.locals.put("pi", _pi); - BA.debugLineNum = 131;BA.debugLine="If pi <> Null Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("N",_pi)) { - BA.debugLineNum = 132;BA.debugLine="If CloseRequestExists (pi) Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_closerequestexists" /*RemoteObject*/ ,(Object)(_pi)).get().booleanValue()) { - BA.debugLineNum = 133;BA.debugLine="HandleCloseRequest(pi)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_handlecloserequest" /*void*/ ,(Object)(_pi)); - }else { - BA.debugLineNum = 135;BA.debugLine="ClosePage(pi.B4XPage)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_closepage" /*RemoteObject*/ ,(Object)(_pi.getField(false,"B4XPage" /*RemoteObject*/ ))); - }; - }; - BA.debugLineNum = 138;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _activity_keypress(RemoteObject __ref,RemoteObject _keycode) throws Exception{ -try { - Debug.PushSubsStack("Activity_KeyPress (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,468); -if (RapidSub.canDelegate("activity_keypress")) { return __ref.runUserSub(false, "b4xpagesmanager","activity_keypress", __ref, _keycode);} -RemoteObject _pi = RemoteObject.declareNull("keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo"); -Debug.locals.put("KeyCode", _keycode); - BA.debugLineNum = 468;BA.debugLine="Public Sub Activity_KeyPress (KeyCode As Int) As B"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 469;BA.debugLine="If KeyCode = KeyCodes.KEYCODE_BACK Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_keycode,BA.numberCast(double.class, b4xpagesmanager.__c.getField(false,"KeyCodes").getField(true,"KEYCODE_BACK")))) { - BA.debugLineNum = 470;BA.debugLine="Dim pi As B4XPageInfo = GetTopPage"; -Debug.JustUpdateDeviceLine(); -_pi = __ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_gettoppage" /*RemoteObject*/ );Debug.locals.put("pi", _pi);Debug.locals.put("pi", _pi); - BA.debugLineNum = 471;BA.debugLine="If CloseRequestExists(pi) Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_closerequestexists" /*RemoteObject*/ ,(Object)(_pi)).get().booleanValue()) { - BA.debugLineNum = 472;BA.debugLine="HandleCloseRequest(pi)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_handlecloserequest" /*void*/ ,(Object)(_pi)); - }else { - BA.debugLineNum = 474;BA.debugLine="ClosePage(pi.B4XPage)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_closepage" /*RemoteObject*/ ,(Object)(_pi.getField(false,"B4XPage" /*RemoteObject*/ ))); - }; - BA.debugLineNum = 476;BA.debugLine="Return True"; -Debug.JustUpdateDeviceLine(); -if (true) return b4xpagesmanager.__c.getField(true,"True"); - }; - BA.debugLineNum = 478;BA.debugLine="Return False"; -Debug.JustUpdateDeviceLine(); -if (true) return b4xpagesmanager.__c.getField(true,"False"); - BA.debugLineNum = 479;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _activity_pause(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Activity_Pause (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,635); -if (RapidSub.canDelegate("activity_pause")) { return __ref.runUserSub(false, "b4xpagesmanager","activity_pause", __ref);} - BA.debugLineNum = 635;BA.debugLine="Public Sub Activity_Pause"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 636;BA.debugLine="RaiseEventWithResult(GetTopPage, \"B4XPage_Disappe"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_raiseeventwithresult" /*RemoteObject*/ ,(Object)(__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_gettoppage" /*RemoteObject*/ )),(Object)(BA.ObjectToString("B4XPage_Disappear")),(Object)((b4xpagesmanager.__c.getField(false,"Null")))); - BA.debugLineNum = 637;BA.debugLine="BackgroundStateChanged(False)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_backgroundstatechanged" /*RemoteObject*/ ,(Object)(b4xpagesmanager.__c.getField(true,"False"))); - BA.debugLineNum = 638;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _activity_resume(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Activity_Resume (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,610); -if (RapidSub.canDelegate("activity_resume")) { return __ref.runUserSub(false, "b4xpagesmanager","activity_resume", __ref);} -RemoteObject _shouldraise = RemoteObject.createImmutable(false); - BA.debugLineNum = 610;BA.debugLine="Public Sub Activity_Resume"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 611;BA.debugLine="Dim ShouldRaise As Boolean = IsForeground = False"; -Debug.JustUpdateDeviceLine(); -_shouldraise = BA.ObjectToBoolean(RemoteObject.solveBoolean("=",__ref.getField(true,"_isforeground" /*RemoteObject*/ ),b4xpagesmanager.__c.getField(true,"False")));Debug.locals.put("ShouldRaise", _shouldraise);Debug.locals.put("ShouldRaise", _shouldraise); - BA.debugLineNum = 612;BA.debugLine="BackgroundStateChanged(True)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_backgroundstatechanged" /*RemoteObject*/ ,(Object)(b4xpagesmanager.__c.getField(true,"True"))); - BA.debugLineNum = 613;BA.debugLine="If ShouldRaise Then"; -Debug.JustUpdateDeviceLine(); -if (_shouldraise.get().booleanValue()) { - BA.debugLineNum = 614;BA.debugLine="RaiseEvent(GetTopPage, \"B4XPage_Appear\", Null)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_raiseevent" /*RemoteObject*/ ,(Object)(__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_gettoppage" /*RemoteObject*/ )),(Object)(BA.ObjectToString("B4XPage_Appear")),(Object)((b4xpagesmanager.__c.getField(false,"Null")))); - }; - BA.debugLineNum = 616;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _addmenuitem(RemoteObject __ref,RemoteObject _b4xpage,RemoteObject _title) throws Exception{ -try { - Debug.PushSubsStack("AddMenuItem (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,481); -if (RapidSub.canDelegate("addmenuitem")) { return __ref.runUserSub(false, "b4xpagesmanager","addmenuitem", __ref, _b4xpage, _title);} -RemoteObject _mi = RemoteObject.declareNull("keymon.lat.medicomed.b4xpagesmanager._b4amenuitem"); -Debug.locals.put("B4XPage", _b4xpage); -Debug.locals.put("Title", _title); - BA.debugLineNum = 481;BA.debugLine="Public Sub AddMenuItem (B4XPage As Object, Title A"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 482;BA.debugLine="Dim mi As B4AMenuItem"; -Debug.JustUpdateDeviceLine(); -_mi = RemoteObject.createNew ("keymon.lat.medicomed.b4xpagesmanager._b4amenuitem");Debug.locals.put("mi", _mi); - BA.debugLineNum = 483;BA.debugLine="mi.Initialize"; -Debug.JustUpdateDeviceLine(); -_mi.runVoidMethod ("Initialize"); - BA.debugLineNum = 484;BA.debugLine="mi.Title = Title"; -Debug.JustUpdateDeviceLine(); -_mi.setField ("Title" /*RemoteObject*/ ,_title); - BA.debugLineNum = 485;BA.debugLine="mi.Tag = Title"; -Debug.JustUpdateDeviceLine(); -_mi.setField ("Tag" /*RemoteObject*/ ,BA.ObjectToString(_title)); - BA.debugLineNum = 486;BA.debugLine="FindPIFromB4XPage(B4XPage).Parent.MenuItems.Add(m"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_findpifromb4xpage" /*RemoteObject*/ ,(Object)(_b4xpage)).getField(false,"Parent" /*RemoteObject*/ ).getField(false,"MenuItems" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((_mi))); - BA.debugLineNum = 487;BA.debugLine="Return mi"; -Debug.JustUpdateDeviceLine(); -if (true) return _mi; - BA.debugLineNum = 488;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _addpage(RemoteObject __ref,RemoteObject _id,RemoteObject _b4xpage) throws Exception{ -try { - Debug.PushSubsStack("AddPage (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,141); -if (RapidSub.canDelegate("addpage")) { return __ref.runUserSub(false, "b4xpagesmanager","addpage", __ref, _id, _b4xpage);} -RemoteObject _idtolower = RemoteObject.createImmutable(""); -Debug.locals.put("Id", _id); -Debug.locals.put("B4XPage", _b4xpage); - BA.debugLineNum = 141;BA.debugLine="Public Sub AddPage (Id As String, B4XPage As Objec"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 142;BA.debugLine="Dim IdToLower As String = Id.ToLowerCase"; -Debug.JustUpdateDeviceLine(); -_idtolower = _id.runMethod(true,"toLowerCase");Debug.locals.put("IdToLower", _idtolower);Debug.locals.put("IdToLower", _idtolower); - BA.debugLineNum = 143;BA.debugLine="If IdToB4XPage.ContainsKey(IdToLower) Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_idtob4xpage" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_containskey" /*RemoteObject*/ ,(Object)((_idtolower))).get().booleanValue()) { - BA.debugLineNum = 144;BA.debugLine="Log($\"Page with this id already exists: ${IdToLo"; -Debug.JustUpdateDeviceLine(); -b4xpagesmanager.__c.runVoidMethod ("LogImpl","939452675",(RemoteObject.concat(RemoteObject.createImmutable("Page with this id already exists: "),b4xpagesmanager.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_idtolower))),RemoteObject.createImmutable("!"))),0); - BA.debugLineNum = 145;BA.debugLine="Return"; -Debug.JustUpdateDeviceLine(); -if (true) return RemoteObject.createImmutable(""); - }; - BA.debugLineNum = 147;BA.debugLine="IdToB4XPage.Put(IdToLower, CreateB4XPageInfo(B4XP"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_idtob4xpage" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_put" /*RemoteObject*/ ,(Object)((_idtolower)),(Object)((__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_createb4xpageinfo" /*RemoteObject*/ ,(Object)(_b4xpage),(Object)(_idtolower),(Object)(b4xpagesmanager.__c.getField(true,"False")),(Object)((_id)))))); - BA.debugLineNum = 148;BA.debugLine="If IdToB4XPage.Size = 1 Then ShowPage(IdToLower)"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_idtob4xpage" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_getsize" /*RemoteObject*/ ),BA.numberCast(double.class, 1))) { -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_showpage" /*RemoteObject*/ ,(Object)(_idtolower));}; - BA.debugLineNum = 149;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _addpageandcreate(RemoteObject __ref,RemoteObject _id,RemoteObject _b4xpage) throws Exception{ -try { - Debug.PushSubsStack("AddPageAndCreate (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,151); -if (RapidSub.canDelegate("addpageandcreate")) { return __ref.runUserSub(false, "b4xpagesmanager","addpageandcreate", __ref, _id, _b4xpage);} -Debug.locals.put("Id", _id); -Debug.locals.put("B4XPage", _b4xpage); - BA.debugLineNum = 151;BA.debugLine="Public Sub AddPageAndCreate (Id As String, B4XPage"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 152;BA.debugLine="AddPage (Id, B4XPage)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_addpage" /*RemoteObject*/ ,(Object)(_id),(Object)(_b4xpage)); - BA.debugLineNum = 153;BA.debugLine="CreatePageIfNeeded(GetPageFromId(Id))"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_createpageifneeded" /*RemoteObject*/ ,(Object)(__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_getpagefromid" /*RemoteObject*/ ,(Object)(_id)))); - BA.debugLineNum = 154;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _backgroundstatechanged(RemoteObject __ref,RemoteObject _newstate) throws Exception{ -try { - Debug.PushSubsStack("BackgroundStateChanged (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,618); -if (RapidSub.canDelegate("backgroundstatechanged")) { return __ref.runUserSub(false, "b4xpagesmanager","backgroundstatechanged", __ref, _newstate);} -RemoteObject _ev = RemoteObject.createImmutable(""); -RemoteObject _pi = RemoteObject.declareNull("keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo"); -Debug.locals.put("NewState", _newstate); - BA.debugLineNum = 618;BA.debugLine="Private Sub BackgroundStateChanged (NewState As Bo"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 619;BA.debugLine="If IsForeground = NewState Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_isforeground" /*RemoteObject*/ ),_newstate)) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 620;BA.debugLine="IsForeground = NewState"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_isforeground" /*RemoteObject*/ ,_newstate); - BA.debugLineNum = 621;BA.debugLine="Dim ev As String"; -Debug.JustUpdateDeviceLine(); -_ev = RemoteObject.createImmutable("");Debug.locals.put("ev", _ev); - BA.debugLineNum = 622;BA.debugLine="If IsForeground Then ev = \"B4XPage_Foreground\" El"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_isforeground" /*RemoteObject*/ ).get().booleanValue()) { -_ev = BA.ObjectToString("B4XPage_Foreground");Debug.locals.put("ev", _ev);} -else { -_ev = BA.ObjectToString("B4XPage_Background");Debug.locals.put("ev", _ev);}; - BA.debugLineNum = 623;BA.debugLine="For Each pi As B4XPageInfo In IdToB4XPage.Values"; -Debug.JustUpdateDeviceLine(); -{ -final RemoteObject group5 = __ref.getField(false,"_idtob4xpage" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_getvalues" /*RemoteObject*/ ); -final int groupLen5 = group5.runMethod(true,"getSize").get() -;int index5 = 0; -; -for (; index5 < groupLen5;index5++){ -_pi = (group5.runMethod(false,"Get",index5));Debug.locals.put("pi", _pi); -Debug.locals.put("pi", _pi); - BA.debugLineNum = 624;BA.debugLine="If xui.SubExists(pi.B4XPage, ev, 0) Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"SubExists",__ref.getField(false, "ba"),(Object)(_pi.getField(false,"B4XPage" /*RemoteObject*/ )),(Object)(_ev),(Object)(BA.numberCast(int.class, 0))).get().booleanValue()) { - BA.debugLineNum = 625;BA.debugLine="LogEvent(pi, ev)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_logevent" /*RemoteObject*/ ,(Object)(_pi),(Object)(_ev)); - BA.debugLineNum = 626;BA.debugLine="If IsForeground Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_isforeground" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 627;BA.debugLine="CallSubDelayed(pi.B4XPage, ev)"; -Debug.JustUpdateDeviceLine(); -b4xpagesmanager.__c.runVoidMethod ("CallSubDelayed",__ref.getField(false, "ba"),(Object)(_pi.getField(false,"B4XPage" /*RemoteObject*/ )),(Object)(_ev)); - }else { - BA.debugLineNum = 629;BA.debugLine="CallSub(pi.B4XPage, ev)"; -Debug.JustUpdateDeviceLine(); -b4xpagesmanager.__c.runMethodAndSync(false,"CallSubNew",__ref.getField(false, "ba"),(Object)(_pi.getField(false,"B4XPage" /*RemoteObject*/ )),(Object)(_ev)); - }; - }; - } -}Debug.locals.put("pi", _pi); -; - BA.debugLineNum = 633;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _checkmainactivityorientations(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("CheckMainActivityOrientations (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,96); -if (RapidSub.canDelegate("checkmainactivityorientations")) { return __ref.runUserSub(false, "b4xpagesmanager","checkmainactivityorientations", __ref);} -RemoteObject _jo = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _jme = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _isappcompat = RemoteObject.createImmutable(false); -RemoteObject _pi = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _activities = null; -RemoteObject _act = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _name = RemoteObject.createImmutable(""); -RemoteObject _screenorientation = RemoteObject.createImmutable(0); - BA.debugLineNum = 96;BA.debugLine="Private Sub CheckMainActivityOrientations"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 98;BA.debugLine="Dim jo As JavaObject"; -Debug.JustUpdateDeviceLine(); -_jo = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("jo", _jo); - BA.debugLineNum = 99;BA.debugLine="jo.InitializeContext"; -Debug.JustUpdateDeviceLine(); -_jo.runVoidMethod ("InitializeContext",__ref.getField(false, "ba")); - BA.debugLineNum = 101;BA.debugLine="ActionBar = jo.RunMethod(\"getActionBar\", Null)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_actionbar" /*RemoteObject*/ ).setObject (_jo.runMethod(false,"RunMethod",(Object)(BA.ObjectToString("getActionBar")),(Object)((b4xpagesmanager.__c.getField(false,"Null"))))); - BA.debugLineNum = 102;BA.debugLine="If ActionBar.IsInitialized = False Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_actionbar" /*RemoteObject*/ ).runMethod(true,"IsInitialized"),b4xpagesmanager.__c.getField(true,"False"))) { - BA.debugLineNum = 103;BA.debugLine="Dim jme As JavaObject = Me"; -Debug.JustUpdateDeviceLine(); -_jme = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_jme = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), __ref);Debug.locals.put("jme", _jme);Debug.locals.put("jme", _jme); - BA.debugLineNum = 104;BA.debugLine="Dim IsAppCompat As Boolean = jme.RunMethod(\"chec"; -Debug.JustUpdateDeviceLine(); -_isappcompat = BA.ObjectToBoolean(_jme.runMethod(false,"RunMethod",(Object)(BA.ObjectToString("checkIfAppCompat")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(_jo.getObject())}))));Debug.locals.put("IsAppCompat", _isappcompat);Debug.locals.put("IsAppCompat", _isappcompat); - BA.debugLineNum = 105;BA.debugLine="If IsAppCompat Then"; -Debug.JustUpdateDeviceLine(); -if (_isappcompat.get().booleanValue()) { - BA.debugLineNum = 106;BA.debugLine="ActionBar = jo.RunMethod(\"getSupportActionBar\","; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_actionbar" /*RemoteObject*/ ).setObject (_jo.runMethod(false,"RunMethod",(Object)(BA.ObjectToString("getSupportActionBar")),(Object)((b4xpagesmanager.__c.getField(false,"Null"))))); - }; - }; - BA.debugLineNum = 110;BA.debugLine="Dim pi As JavaObject = jo.RunMethodJO(\"getPackage"; -Debug.JustUpdateDeviceLine(); -_pi = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_pi = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), _jo.runMethod(false,"RunMethodJO",(Object)(BA.ObjectToString("getPackageManager")),(Object)((b4xpagesmanager.__c.getField(false,"Null")))).runMethod(false,"RunMethod",(Object)(BA.ObjectToString("getPackageInfo")),(Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(b4xpagesmanager.__c.getField(false,"Application").runMethod(true,"getPackageName")),RemoteObject.createImmutable((1))}))));Debug.locals.put("pi", _pi);Debug.locals.put("pi", _pi); - BA.debugLineNum = 111;BA.debugLine="Dim activities() As Object = pi.GetField(\"activit"; -Debug.JustUpdateDeviceLine(); -_activities = (_pi.runMethod(false,"GetField",(Object)(RemoteObject.createImmutable("activities"))));Debug.locals.put("activities", _activities);Debug.locals.put("activities", _activities); - BA.debugLineNum = 112;BA.debugLine="For Each Act As JavaObject In activities"; -Debug.JustUpdateDeviceLine(); -_act = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -{ -final RemoteObject group13 = _activities; -final int groupLen13 = group13.getField(true,"length").get() -;int index13 = 0; -; -for (; index13 < groupLen13;index13++){ -_act = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), group13.getArrayElement(false,RemoteObject.createImmutable(index13)));Debug.locals.put("Act", _act); -Debug.locals.put("Act", _act); - BA.debugLineNum = 113;BA.debugLine="Dim name As String = Act.GetField(\"name\")"; -Debug.JustUpdateDeviceLine(); -_name = BA.ObjectToString(_act.runMethod(false,"GetField",(Object)(RemoteObject.createImmutable("name"))));Debug.locals.put("name", _name);Debug.locals.put("name", _name); - BA.debugLineNum = 114;BA.debugLine="If name.EndsWith(\".main\") Then"; -Debug.JustUpdateDeviceLine(); -if (_name.runMethod(true,"endsWith",(Object)(RemoteObject.createImmutable(".main"))).get().booleanValue()) { - BA.debugLineNum = 115;BA.debugLine="Dim screenOrientation As Int = Act.GetField(\"sc"; -Debug.JustUpdateDeviceLine(); -_screenorientation = BA.numberCast(int.class, _act.runMethod(false,"GetField",(Object)(RemoteObject.createImmutable("screenOrientation"))));Debug.locals.put("screenOrientation", _screenorientation);Debug.locals.put("screenOrientation", _screenorientation); - BA.debugLineNum = 116;BA.debugLine="If screenOrientation = -1 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_screenorientation,BA.numberCast(double.class, -(double) (0 + 1)))) { - BA.debugLineNum = 117;BA.debugLine="LogColor(\"#SupportedOrientations attribute mus"; -Debug.JustUpdateDeviceLine(); -b4xpagesmanager.__c.runVoidMethod ("LogImpl","939321621",BA.ObjectToString("#SupportedOrientations attribute must be set to landscape or portrait."),__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Red")); - }; - }; - } -}Debug.locals.put("Act", _act); -; - BA.debugLineNum = 121;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 22;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 23;BA.debugLine="Private IdToB4XPage As B4XOrderedMap"; -b4xpagesmanager._idtob4xpage = RemoteObject.createNew ("keymon.lat.medicomed.b4xorderedmap");__ref.setField("_idtob4xpage",b4xpagesmanager._idtob4xpage); - //BA.debugLineNum = 24;BA.debugLine="Private RootB4XToPage As B4XOrderedMap"; -b4xpagesmanager._rootb4xtopage = RemoteObject.createNew ("keymon.lat.medicomed.b4xorderedmap");__ref.setField("_rootb4xtopage",b4xpagesmanager._rootb4xtopage); - //BA.debugLineNum = 26;BA.debugLine="Private Context As JavaObject"; -b4xpagesmanager._context = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");__ref.setField("_context",b4xpagesmanager._context); - //BA.debugLineNum = 27;BA.debugLine="Type B4XPageParent (NativeType As Activity, MenuI"; -; - //BA.debugLineNum = 28;BA.debugLine="Type B4AMenuItem (Title As Object, Bitmap As B4XB"; -; - //BA.debugLineNum = 34;BA.debugLine="Type B4XPageInfo (B4XPage As Object, Id As String"; -; - //BA.debugLineNum = 38;BA.debugLine="Public mStackOfPageIds As B4XSet"; -b4xpagesmanager._mstackofpageids = RemoteObject.createNew ("keymon.lat.medicomed.b4xset");__ref.setField("_mstackofpageids",b4xpagesmanager._mstackofpageids); - //BA.debugLineNum = 39;BA.debugLine="Private xui As XUI 'ignore"; -b4xpagesmanager._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",b4xpagesmanager._xui); - //BA.debugLineNum = 43;BA.debugLine="Private mMainForm As Activity"; -b4xpagesmanager._mmainform = RemoteObject.createNew ("anywheresoftware.b4a.objects.ActivityWrapper");__ref.setField("_mmainform",b4xpagesmanager._mmainform); - //BA.debugLineNum = 44;BA.debugLine="Public ShowUpIndicator As Boolean = True"; -b4xpagesmanager._showupindicator = b4xpagesmanager.__c.getField(true,"True");__ref.setField("_showupindicator",b4xpagesmanager._showupindicator); - //BA.debugLineNum = 45;BA.debugLine="Public ActionBar As JavaObject"; -b4xpagesmanager._actionbar = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");__ref.setField("_actionbar",b4xpagesmanager._actionbar); - //BA.debugLineNum = 49;BA.debugLine="Public IsForeground As Boolean"; -b4xpagesmanager._isforeground = RemoteObject.createImmutable(false);__ref.setField("_isforeground",b4xpagesmanager._isforeground); - //BA.debugLineNum = 50;BA.debugLine="Public TransitionAnimationDuration As Int = 100"; -b4xpagesmanager._transitionanimationduration = BA.numberCast(int.class, 100);__ref.setField("_transitionanimationduration",b4xpagesmanager._transitionanimationduration); - //BA.debugLineNum = 51;BA.debugLine="Public MainPage As B4XMainPage"; -b4xpagesmanager._mainpage = RemoteObject.createNew ("keymon.lat.medicomed.b4xmainpage");__ref.setField("_mainpage",b4xpagesmanager._mainpage); - //BA.debugLineNum = 52;BA.debugLine="Private StackString As String"; -b4xpagesmanager._stackstring = RemoteObject.createImmutable("");__ref.setField("_stackstring",b4xpagesmanager._stackstring); - //BA.debugLineNum = 53;BA.debugLine="Public LogEvents As Boolean = False"; -b4xpagesmanager._logevents = b4xpagesmanager.__c.getField(true,"False");__ref.setField("_logevents",b4xpagesmanager._logevents); - //BA.debugLineNum = 54;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _closepage(RemoteObject __ref,RemoteObject _b4xpage) throws Exception{ -try { - Debug.PushSubsStack("ClosePage (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,209); -if (RapidSub.canDelegate("closepage")) { return __ref.runUserSub(false, "b4xpagesmanager","closepage", __ref, _b4xpage);} -RemoteObject _pi = RemoteObject.declareNull("keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo"); -RemoteObject _isclosingtoppage = RemoteObject.createImmutable(false); -Debug.locals.put("B4XPage", _b4xpage); - BA.debugLineNum = 209;BA.debugLine="Public Sub ClosePage (B4XPage As Object)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 210;BA.debugLine="Dim pi As B4XPageInfo = FindPIFromB4XPage(B4XPage"; -Debug.JustUpdateDeviceLine(); -_pi = __ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_findpifromb4xpage" /*RemoteObject*/ ,(Object)(_b4xpage));Debug.locals.put("pi", _pi);Debug.locals.put("pi", _pi); - BA.debugLineNum = 211;BA.debugLine="If mStackOfPageIds.Contains(pi.Id) = False Then R"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_mstackofpageids" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xset.class, "_contains" /*RemoteObject*/ ,(Object)((_pi.getField(true,"Id" /*RemoteObject*/ )))),b4xpagesmanager.__c.getField(true,"False"))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 212;BA.debugLine="If xui.IsB4i And GetTopPage <> pi Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(".",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4i")) && RemoteObject.solveBoolean("!",__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_gettoppage" /*RemoteObject*/ ),_pi)) { - BA.debugLineNum = 213;BA.debugLine="Log(\"Only top page can be closed\")"; -Debug.JustUpdateDeviceLine(); -b4xpagesmanager.__c.runVoidMethod ("LogImpl","939714820",RemoteObject.createImmutable("Only top page can be closed"),0); - BA.debugLineNum = 214;BA.debugLine="Return"; -Debug.JustUpdateDeviceLine(); -if (true) return RemoteObject.createImmutable(""); - }else -{ BA.debugLineNum = 215;BA.debugLine="Else If xui.IsB4i And mStackOfPageIds.Size = 1 Th"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(".",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4i")) && RemoteObject.solveBoolean("=",__ref.getField(false,"_mstackofpageids" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xset.class, "_getsize" /*RemoteObject*/ ),BA.numberCast(double.class, 1))) { - BA.debugLineNum = 216;BA.debugLine="Log(\"First page cannot be closed\")"; -Debug.JustUpdateDeviceLine(); -b4xpagesmanager.__c.runVoidMethod ("LogImpl","939714823",RemoteObject.createImmutable("First page cannot be closed"),0); - BA.debugLineNum = 217;BA.debugLine="Return"; -Debug.JustUpdateDeviceLine(); -if (true) return RemoteObject.createImmutable(""); - }} -; - BA.debugLineNum = 219;BA.debugLine="Dim IsClosingTopPage As Boolean = GetTopPage = pi"; -Debug.JustUpdateDeviceLine(); -_isclosingtoppage = BA.ObjectToBoolean(RemoteObject.solveBoolean("=",__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_gettoppage" /*RemoteObject*/ ),_pi));Debug.locals.put("IsClosingTopPage", _isclosingtoppage);Debug.locals.put("IsClosingTopPage", _isclosingtoppage); - BA.debugLineNum = 220;BA.debugLine="ClosePageImpl(pi)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_closepageimpl" /*RemoteObject*/ ,(Object)(_pi)); - BA.debugLineNum = 221;BA.debugLine="If IsClosingTopPage Then"; -Debug.JustUpdateDeviceLine(); -if (_isclosingtoppage.get().booleanValue()) { - BA.debugLineNum = 222;BA.debugLine="TopPageDisappear"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_toppagedisappear" /*RemoteObject*/ ); - }; - BA.debugLineNum = 224;BA.debugLine="If xui.IsB4A And mStackOfPageIds.Size = 1 Then Re"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(".",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4A")) && RemoteObject.solveBoolean("=",__ref.getField(false,"_mstackofpageids" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xset.class, "_getsize" /*RemoteObject*/ ),BA.numberCast(double.class, 1))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 225;BA.debugLine="mStackOfPageIds.Remove(pi.Id)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mstackofpageids" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xset.class, "_remove" /*RemoteObject*/ ,(Object)((_pi.getField(true,"Id" /*RemoteObject*/ )))); - BA.debugLineNum = 226;BA.debugLine="If IsClosingTopPage Then"; -Debug.JustUpdateDeviceLine(); -if (_isclosingtoppage.get().booleanValue()) { - BA.debugLineNum = 227;BA.debugLine="If xui.IsB4A Then ShowPageImpl(GetTopPage)"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4A").get().booleanValue()) { -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_showpageimpl" /*RemoteObject*/ ,(Object)(__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_gettoppage" /*RemoteObject*/ )));}; - BA.debugLineNum = 228;BA.debugLine="TopPageAppear"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_toppageappear" /*RemoteObject*/ ); - }; - BA.debugLineNum = 230;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _closepageimpl(RemoteObject __ref,RemoteObject _pi) throws Exception{ -try { - Debug.PushSubsStack("ClosePageImpl (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,315); -if (RapidSub.canDelegate("closepageimpl")) { return __ref.runUserSub(false, "b4xpagesmanager","closepageimpl", __ref, _pi);} -RemoteObject _i = RemoteObject.declareNull("anywheresoftware.b4a.objects.IntentWrapper"); -Debug.locals.put("pi", _pi); - BA.debugLineNum = 315;BA.debugLine="Private Sub ClosePageImpl (pi As B4XPageInfo) 'ign"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 317;BA.debugLine="If mStackOfPageIds.Size = 1 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_mstackofpageids" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xset.class, "_getsize" /*RemoteObject*/ ),BA.numberCast(double.class, 1))) { - BA.debugLineNum = 318;BA.debugLine="Dim i As Intent"; -Debug.JustUpdateDeviceLine(); -_i = RemoteObject.createNew ("anywheresoftware.b4a.objects.IntentWrapper");Debug.locals.put("i", _i); - BA.debugLineNum = 319;BA.debugLine="i.Initialize(i.ACTION_MAIN, \"\")"; -Debug.JustUpdateDeviceLine(); -_i.runVoidMethod ("Initialize",(Object)(_i.getField(true,"ACTION_MAIN")),(Object)(RemoteObject.createImmutable(""))); - BA.debugLineNum = 320;BA.debugLine="i.AddCategory(\"android.intent.category.HOME\")"; -Debug.JustUpdateDeviceLine(); -_i.runVoidMethod ("AddCategory",(Object)(RemoteObject.createImmutable("android.intent.category.HOME"))); - BA.debugLineNum = 321;BA.debugLine="i.Flags = 0x10000000"; -Debug.JustUpdateDeviceLine(); -_i.runMethod(true,"setFlags",BA.numberCast(int.class, ((int)0x10000000))); - BA.debugLineNum = 322;BA.debugLine="StartActivity(i)"; -Debug.JustUpdateDeviceLine(); -b4xpagesmanager.__c.runVoidMethod ("StartActivity",__ref.getField(false, "ba"),(Object)((_i.getObject()))); - }else { - BA.debugLineNum = 324;BA.debugLine="pi.Root.RemoveViewFromParent"; -Debug.JustUpdateDeviceLine(); -_pi.getField(false,"Root" /*RemoteObject*/ ).runVoidMethod ("RemoveViewFromParent"); - }; - BA.debugLineNum = 331;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _closerequestexists(RemoteObject __ref,RemoteObject _pi) throws Exception{ -try { - Debug.PushSubsStack("CloseRequestExists (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,534); -if (RapidSub.canDelegate("closerequestexists")) { return __ref.runUserSub(false, "b4xpagesmanager","closerequestexists", __ref, _pi);} -Debug.locals.put("pi", _pi); - BA.debugLineNum = 534;BA.debugLine="Private Sub CloseRequestExists (pi As B4XPageInfo)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 535;BA.debugLine="Return xui.SubExists(pi.B4XPage, \"B4XPage_CloseRe"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"SubExists",__ref.getField(false, "ba"),(Object)(_pi.getField(false,"B4XPage" /*RemoteObject*/ )),(Object)(BA.ObjectToString("B4XPage_CloseRequest")),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 536;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createb4xpageinfo(RemoteObject __ref,RemoteObject _b4xpage,RemoteObject _id,RemoteObject _created,RemoteObject _title) throws Exception{ -try { - Debug.PushSubsStack("CreateB4XPageInfo (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,420); -if (RapidSub.canDelegate("createb4xpageinfo")) { return __ref.runUserSub(false, "b4xpagesmanager","createb4xpageinfo", __ref, _b4xpage, _id, _created, _title);} -RemoteObject _t1 = RemoteObject.declareNull("keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo"); -Debug.locals.put("B4XPage", _b4xpage); -Debug.locals.put("Id", _id); -Debug.locals.put("Created", _created); -Debug.locals.put("Title", _title); - BA.debugLineNum = 420;BA.debugLine="Private Sub CreateB4XPageInfo (B4XPage As Object,"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 421;BA.debugLine="Dim t1 As B4XPageInfo"; -Debug.JustUpdateDeviceLine(); -_t1 = RemoteObject.createNew ("keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo");Debug.locals.put("t1", _t1); - BA.debugLineNum = 422;BA.debugLine="t1.Initialize"; -Debug.JustUpdateDeviceLine(); -_t1.runVoidMethod ("Initialize"); - BA.debugLineNum = 423;BA.debugLine="t1.B4XPage = B4XPage"; -Debug.JustUpdateDeviceLine(); -_t1.setField ("B4XPage" /*RemoteObject*/ ,_b4xpage); - BA.debugLineNum = 424;BA.debugLine="t1.Id = Id"; -Debug.JustUpdateDeviceLine(); -_t1.setField ("Id" /*RemoteObject*/ ,_id); - BA.debugLineNum = 425;BA.debugLine="t1.Created = Created"; -Debug.JustUpdateDeviceLine(); -_t1.setField ("Created" /*RemoteObject*/ ,_created); - BA.debugLineNum = 426;BA.debugLine="t1.Title = Title"; -Debug.JustUpdateDeviceLine(); -_t1.setField ("Title" /*RemoteObject*/ ,_title); - BA.debugLineNum = 427;BA.debugLine="Return t1"; -Debug.JustUpdateDeviceLine(); -if (true) return _t1; - BA.debugLineNum = 428;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createb4xpageparent(RemoteObject __ref,RemoteObject _nativetype) throws Exception{ -try { - Debug.PushSubsStack("CreateB4XPageParent (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,598); -if (RapidSub.canDelegate("createb4xpageparent")) { return __ref.runUserSub(false, "b4xpagesmanager","createb4xpageparent", __ref, _nativetype);} -RemoteObject _t1 = RemoteObject.declareNull("keymon.lat.medicomed.b4xpagesmanager._b4xpageparent"); -Debug.locals.put("NativeType", _nativetype); - BA.debugLineNum = 598;BA.debugLine="Private Sub CreateB4XPageParent (NativeType As Obj"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 604;BA.debugLine="Dim t1 As B4XPageParent"; -Debug.JustUpdateDeviceLine(); -_t1 = RemoteObject.createNew ("keymon.lat.medicomed.b4xpagesmanager._b4xpageparent");Debug.locals.put("t1", _t1); - BA.debugLineNum = 605;BA.debugLine="t1.Initialize"; -Debug.JustUpdateDeviceLine(); -_t1.runVoidMethod ("Initialize"); - BA.debugLineNum = 606;BA.debugLine="t1.NativeType = NativeType"; -Debug.JustUpdateDeviceLine(); -_t1.getField(false,"NativeType" /*RemoteObject*/ ).setObject (_nativetype); - BA.debugLineNum = 607;BA.debugLine="Return t1"; -Debug.JustUpdateDeviceLine(); -if (true) return _t1; - BA.debugLineNum = 608;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createmenu(RemoteObject __ref,RemoteObject _menu) throws Exception{ -try { - Debug.PushSubsStack("CreateMenu (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,494); -if (RapidSub.canDelegate("createmenu")) { return __ref.runUserSub(false, "b4xpagesmanager","createmenu", __ref, _menu);} -RemoteObject _pi = RemoteObject.declareNull("keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo"); -RemoteObject _jo = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _mi = RemoteObject.declareNull("keymon.lat.medicomed.b4xpagesmanager._b4amenuitem"); -RemoteObject _nativemenuitem = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _bd = RemoteObject.declareNull("anywheresoftware.b4a.objects.drawable.BitmapDrawable"); -RemoteObject _listener = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -Debug.locals.put("Menu", _menu); - BA.debugLineNum = 494;BA.debugLine="Public Sub CreateMenu (Menu As Object)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 495;BA.debugLine="Dim pi As B4XPageInfo = GetTopPage"; -Debug.JustUpdateDeviceLine(); -_pi = __ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_gettoppage" /*RemoteObject*/ );Debug.locals.put("pi", _pi);Debug.locals.put("pi", _pi); - BA.debugLineNum = 496;BA.debugLine="If pi = Null Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("n",_pi)) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 497;BA.debugLine="Dim jo As JavaObject = Menu"; -Debug.JustUpdateDeviceLine(); -_jo = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_jo = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), _menu);Debug.locals.put("jo", _jo);Debug.locals.put("jo", _jo); - BA.debugLineNum = 498;BA.debugLine="For Each mi As B4AMenuItem In pi.Parent.MenuItems"; -Debug.JustUpdateDeviceLine(); -{ -final RemoteObject group4 = _pi.getField(false,"Parent" /*RemoteObject*/ ).getField(false,"MenuItems" /*RemoteObject*/ ); -final int groupLen4 = group4.runMethod(true,"getSize").get() -;int index4 = 0; -; -for (; index4 < groupLen4;index4++){ -_mi = (group4.runMethod(false,"Get",index4));Debug.locals.put("mi", _mi); -Debug.locals.put("mi", _mi); - BA.debugLineNum = 499;BA.debugLine="Dim NativeMenuItem As JavaObject = jo.RunMethod("; -Debug.JustUpdateDeviceLine(); -_nativemenuitem = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_nativemenuitem = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), _jo.runMethod(false,"RunMethod",(Object)(BA.ObjectToString("add")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {_mi.getField(false,"Title" /*RemoteObject*/ )}))));Debug.locals.put("NativeMenuItem", _nativemenuitem);Debug.locals.put("NativeMenuItem", _nativemenuitem); - BA.debugLineNum = 500;BA.debugLine="If mi.Bitmap.IsInitialized Then"; -Debug.JustUpdateDeviceLine(); -if (_mi.getField(false,"Bitmap" /*RemoteObject*/ ).runMethod(true,"IsInitialized").get().booleanValue()) { - BA.debugLineNum = 501;BA.debugLine="Dim bd As BitmapDrawable"; -Debug.JustUpdateDeviceLine(); -_bd = RemoteObject.createNew ("anywheresoftware.b4a.objects.drawable.BitmapDrawable");Debug.locals.put("bd", _bd); - BA.debugLineNum = 502;BA.debugLine="bd.Initialize(mi.Bitmap)"; -Debug.JustUpdateDeviceLine(); -_bd.runVoidMethod ("Initialize",(Object)((_mi.getField(false,"Bitmap" /*RemoteObject*/ ).getObject()))); - BA.debugLineNum = 503;BA.debugLine="NativeMenuItem.RunMethod(\"setIcon\", Array(bd))"; -Debug.JustUpdateDeviceLine(); -_nativemenuitem.runVoidMethod ("RunMethod",(Object)(BA.ObjectToString("setIcon")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(_bd.getObject())}))); - }; - BA.debugLineNum = 505;BA.debugLine="If mi.AddToBar Then"; -Debug.JustUpdateDeviceLine(); -if (_mi.getField(true,"AddToBar" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 506;BA.debugLine="NativeMenuItem.RunMethod(\"setShowAsAction\", Arr"; -Debug.JustUpdateDeviceLine(); -_nativemenuitem.runVoidMethod ("RunMethod",(Object)(BA.ObjectToString("setShowAsAction")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {RemoteObject.createImmutable((1))}))); - }; - BA.debugLineNum = 508;BA.debugLine="Dim listener As JavaObject"; -Debug.JustUpdateDeviceLine(); -_listener = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("listener", _listener); - BA.debugLineNum = 509;BA.debugLine="listener.InitializeNewInstance(Application.Packa"; -Debug.JustUpdateDeviceLine(); -_listener.runVoidMethod ("InitializeNewInstance",(Object)(RemoteObject.concat(b4xpagesmanager.__c.getField(false,"Application").runMethod(true,"getPackageName"),RemoteObject.createImmutable(".b4xpagesmanager$PagesMenuListener"))),(Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {_pi.getField(false,"B4XPage" /*RemoteObject*/ ),(_mi.getField(true,"Tag" /*RemoteObject*/ ))}))); - BA.debugLineNum = 510;BA.debugLine="NativeMenuItem.RunMethod(\"setOnMenuItemClickList"; -Debug.JustUpdateDeviceLine(); -_nativemenuitem.runVoidMethod ("RunMethod",(Object)(BA.ObjectToString("setOnMenuItemClickListener")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(_listener.getObject())}))); - } -}Debug.locals.put("mi", _mi); -; - BA.debugLineNum = 512;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createpageifneeded(RemoteObject __ref,RemoteObject _pi) throws Exception{ -try { - Debug.PushSubsStack("CreatePageIfNeeded (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,352); -if (RapidSub.canDelegate("createpageifneeded")) { return __ref.runUserSub(false, "b4xpagesmanager","createpageifneeded", __ref, _pi);} -Debug.locals.put("pi", _pi); - BA.debugLineNum = 352;BA.debugLine="Private Sub CreatePageIfNeeded(pi As B4XPageInfo)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 353;BA.debugLine="If pi.Created Then Return"; -Debug.JustUpdateDeviceLine(); -if (_pi.getField(true,"Created" /*RemoteObject*/ ).get().booleanValue()) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 354;BA.debugLine="pi.IsFirst = IdToB4XPage.Size = 1"; -Debug.JustUpdateDeviceLine(); -_pi.setField ("IsFirst" /*RemoteObject*/ ,BA.ObjectToBoolean(RemoteObject.solveBoolean("=",__ref.getField(false,"_idtob4xpage" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_getsize" /*RemoteObject*/ ),BA.numberCast(double.class, 1)))); - BA.debugLineNum = 355;BA.debugLine="CreatePageImpl (pi)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_createpageimpl" /*RemoteObject*/ ,(Object)(_pi)); - BA.debugLineNum = 356;BA.debugLine="pi.Created = True"; -Debug.JustUpdateDeviceLine(); -_pi.setField ("Created" /*RemoteObject*/ ,b4xpagesmanager.__c.getField(true,"True")); - BA.debugLineNum = 357;BA.debugLine="RootB4XToPage.Put(pi.Root, pi)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_rootb4xtopage" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_put" /*RemoteObject*/ ,(Object)((_pi.getField(false,"Root" /*RemoteObject*/ ).getObject())),(Object)((_pi))); - BA.debugLineNum = 358;BA.debugLine="LogEvent(pi, \"B4XPage_Created\")"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_logevent" /*RemoteObject*/ ,(Object)(_pi),(Object)(RemoteObject.createImmutable("B4XPage_Created"))); - BA.debugLineNum = 359;BA.debugLine="CallSub2(pi.B4XPage, \"B4XPage_Created\", pi.root)"; -Debug.JustUpdateDeviceLine(); -b4xpagesmanager.__c.runMethodAndSync(false,"CallSubNew2",__ref.getField(false, "ba"),(Object)(_pi.getField(false,"B4XPage" /*RemoteObject*/ )),(Object)(BA.ObjectToString("B4XPage_Created")),(Object)((_pi.getField(false,"Root" /*RemoteObject*/ )))); - BA.debugLineNum = 361;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createpageimpl(RemoteObject __ref,RemoteObject _pi) throws Exception{ -try { - Debug.PushSubsStack("CreatePageImpl (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,369); -if (RapidSub.canDelegate("createpageimpl")) { return __ref.runUserSub(false, "b4xpagesmanager","createpageimpl", __ref, _pi);} -Debug.locals.put("pi", _pi); - BA.debugLineNum = 369;BA.debugLine="Private Sub CreatePageImpl (pi As B4XPageInfo)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 381;BA.debugLine="pi.Root = xui.CreatePanel(\"root\")"; -Debug.JustUpdateDeviceLine(); -_pi.setField ("Root" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("root")))); - BA.debugLineNum = 382;BA.debugLine="pi.root.SetLayoutAnimated(0, 0, 0, 100%x, 100%y)"; -Debug.JustUpdateDeviceLine(); -_pi.getField(false,"Root" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(b4xpagesmanager.__c.runMethod(true,"PerXToCurrent",(Object)(BA.numberCast(float.class, 100)),__ref.getField(false, "ba"))),(Object)(b4xpagesmanager.__c.runMethod(true,"PerYToCurrent",(Object)(BA.numberCast(float.class, 100)),__ref.getField(false, "ba")))); - BA.debugLineNum = 383;BA.debugLine="pi.Parent = CreateB4XPageParent(mMainForm)"; -Debug.JustUpdateDeviceLine(); -_pi.setField ("Parent" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_createb4xpageparent" /*RemoteObject*/ ,(Object)((__ref.getField(false,"_mmainform" /*RemoteObject*/ ).getObject())))); - BA.debugLineNum = 384;BA.debugLine="pi.Parent.MenuItems.Initialize"; -Debug.JustUpdateDeviceLine(); -_pi.getField(false,"Parent" /*RemoteObject*/ ).getField(false,"MenuItems" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 392;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _findpifromb4xpage(RemoteObject __ref,RemoteObject _page) throws Exception{ -try { - Debug.PushSubsStack("FindPIFromB4XPage (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,306); -if (RapidSub.canDelegate("findpifromb4xpage")) { return __ref.runUserSub(false, "b4xpagesmanager","findpifromb4xpage", __ref, _page);} -RemoteObject _pi = RemoteObject.declareNull("keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo"); -Debug.locals.put("Page", _page); - BA.debugLineNum = 306;BA.debugLine="Public Sub FindPIFromB4XPage (Page As Object) As B"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 307;BA.debugLine="For Each pi As B4XPageInfo In IdToB4XPage.Values"; -Debug.JustUpdateDeviceLine(); -{ -final RemoteObject group1 = __ref.getField(false,"_idtob4xpage" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_getvalues" /*RemoteObject*/ ); -final int groupLen1 = group1.runMethod(true,"getSize").get() -;int index1 = 0; -; -for (; index1 < groupLen1;index1++){ -_pi = (group1.runMethod(false,"Get",index1));Debug.locals.put("pi", _pi); -Debug.locals.put("pi", _pi); - BA.debugLineNum = 308;BA.debugLine="If pi.B4XPage = Page Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_pi.getField(false,"B4XPage" /*RemoteObject*/ ),_page)) { - BA.debugLineNum = 309;BA.debugLine="Return pi"; -Debug.JustUpdateDeviceLine(); -if (true) return _pi; - }; - } -}Debug.locals.put("pi", _pi); -; - BA.debugLineNum = 312;BA.debugLine="Return Null"; -Debug.JustUpdateDeviceLine(); -if (true) return (b4xpagesmanager.__c.getField(false,"Null")); - BA.debugLineNum = 313;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getpage(RemoteObject __ref,RemoteObject _id) throws Exception{ -try { - Debug.PushSubsStack("GetPage (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,394); -if (RapidSub.canDelegate("getpage")) { return __ref.runUserSub(false, "b4xpagesmanager","getpage", __ref, _id);} -Debug.locals.put("Id", _id); - BA.debugLineNum = 394;BA.debugLine="Public Sub GetPage (Id As String) As Object"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 395;BA.debugLine="Return GetPageFromId(Id).B4XPage"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_getpagefromid" /*RemoteObject*/ ,(Object)(_id)).getField(false,"B4XPage" /*RemoteObject*/ ); - BA.debugLineNum = 396;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getpagefromid(RemoteObject __ref,RemoteObject _id) throws Exception{ -try { - Debug.PushSubsStack("GetPageFromId (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,398); -if (RapidSub.canDelegate("getpagefromid")) { return __ref.runUserSub(false, "b4xpagesmanager","getpagefromid", __ref, _id);} -RemoteObject _pi = RemoteObject.declareNull("keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo"); -Debug.locals.put("id", _id); - BA.debugLineNum = 398;BA.debugLine="Private Sub GetPageFromId (id As String) As B4XPag"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 399;BA.debugLine="Dim pi As B4XPageInfo = IdToB4XPage.Get(id.ToLowe"; -Debug.JustUpdateDeviceLine(); -_pi = (__ref.getField(false,"_idtob4xpage" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_get" /*RemoteObject*/ ,(Object)((_id.runMethod(true,"toLowerCase")))));Debug.locals.put("pi", _pi);Debug.locals.put("pi", _pi); - BA.debugLineNum = 400;BA.debugLine="If pi = Null Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("n",_pi)) { - BA.debugLineNum = 401;BA.debugLine="Log(\"Error: page id not found: \" & id)"; -Debug.JustUpdateDeviceLine(); -b4xpagesmanager.__c.runVoidMethod ("LogImpl","940370179",RemoteObject.concat(RemoteObject.createImmutable("Error: page id not found: "),_id),0); - BA.debugLineNum = 402;BA.debugLine="Log(\"Ids: \" & IdToB4XPage.Keys) 'ignore"; -Debug.JustUpdateDeviceLine(); -b4xpagesmanager.__c.runVoidMethod ("LogImpl","940370180",RemoteObject.concat(RemoteObject.createImmutable("Ids: "),__ref.getField(false,"_idtob4xpage" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_getkeys" /*RemoteObject*/ )),0); - }; - BA.debugLineNum = 404;BA.debugLine="Return pi"; -Debug.JustUpdateDeviceLine(); -if (true) return _pi; - BA.debugLineNum = 405;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getpageinfofromroot(RemoteObject __ref,RemoteObject _root) throws Exception{ -try { - Debug.PushSubsStack("GetPageInfoFromRoot (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,407); -if (RapidSub.canDelegate("getpageinfofromroot")) { return __ref.runUserSub(false, "b4xpagesmanager","getpageinfofromroot", __ref, _root);} -Debug.locals.put("Root", _root); - BA.debugLineNum = 407;BA.debugLine="Public Sub GetPageInfoFromRoot (Root As B4XView) A"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 408;BA.debugLine="Return RootB4XToPage.Get(Root)"; -Debug.JustUpdateDeviceLine(); -if (true) return (__ref.getField(false,"_rootb4xtopage" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_get" /*RemoteObject*/ ,(Object)((_root.getObject())))); - BA.debugLineNum = 409;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _gettoppage(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetTopPage (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,592); -if (RapidSub.canDelegate("gettoppage")) { return __ref.runUserSub(false, "b4xpagesmanager","gettoppage", __ref);} - BA.debugLineNum = 592;BA.debugLine="Public Sub GetTopPage As B4XPageInfo"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 593;BA.debugLine="If mStackOfPageIds.Size = 0 Then Return Null"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_mstackofpageids" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xset.class, "_getsize" /*RemoteObject*/ ),BA.numberCast(double.class, 0))) { -if (true) return (b4xpagesmanager.__c.getField(false,"Null"));}; - BA.debugLineNum = 594;BA.debugLine="Return IdToB4XPage.Get(mStackOfPageIds.AsList.Get"; -Debug.JustUpdateDeviceLine(); -if (true) return (__ref.getField(false,"_idtob4xpage" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_get" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_mstackofpageids" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xset.class, "_aslist" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mstackofpageids" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xset.class, "_getsize" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "-",1, 1)))))); - BA.debugLineNum = 595;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _handlecloserequest(RemoteObject __ref,RemoteObject _pi) throws Exception{ -try { - Debug.PushSubsStack("HandleCloseRequest (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,538); -if (RapidSub.canDelegate("handlecloserequest")) { __ref.runUserSub(false, "b4xpagesmanager","handlecloserequest", __ref, _pi); return;} -ResumableSub_HandleCloseRequest rsub = new ResumableSub_HandleCloseRequest(null,__ref,_pi); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_HandleCloseRequest extends BA.ResumableSub { -public ResumableSub_HandleCloseRequest(keymon.lat.medicomed.b4xpagesmanager parent,RemoteObject __ref,RemoteObject _pi) { -this.parent = parent; -this.__ref = __ref; -this._pi = _pi; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.b4xpagesmanager parent; -RemoteObject _pi; -RemoteObject _rs = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common.ResumableSubWrapper"); -RemoteObject _shouldclose = RemoteObject.createImmutable(false); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("HandleCloseRequest (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,538); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); -Debug.locals.put("pi", _pi); - BA.debugLineNum = 539;BA.debugLine="LogEvent(pi, \"B4XPage_CloseRequest\")"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_logevent" /*RemoteObject*/ ,(Object)(_pi),(Object)(RemoteObject.createImmutable("B4XPage_CloseRequest"))); - BA.debugLineNum = 540;BA.debugLine="Dim rs As ResumableSub = CallSub(pi.B4XPage, \"B4X"; -Debug.JustUpdateDeviceLine(); -_rs = RemoteObject.createNew ("anywheresoftware.b4a.keywords.Common.ResumableSubWrapper"); -_rs = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.keywords.Common.ResumableSubWrapper"), parent.__c.runMethodAndSync(false,"CallSubNew",__ref.getField(false, "ba"),(Object)(_pi.getField(false,"B4XPage" /*RemoteObject*/ )),(Object)(RemoteObject.createImmutable("B4XPage_CloseRequest"))));Debug.locals.put("rs", _rs);Debug.locals.put("rs", _rs); - BA.debugLineNum = 541;BA.debugLine="Wait For (rs) Complete (ShouldClose As Boolean)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("WaitFor","complete", __ref.getField(false, "ba"), anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xpagesmanager", "handlecloserequest"), _rs); -this.state = 5; -return; -case 5: -//C -this.state = 1; -_shouldclose = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(1));Debug.locals.put("ShouldClose", _shouldclose); -; - BA.debugLineNum = 542;BA.debugLine="If ShouldClose Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 1: -//if -this.state = 4; -if (_shouldclose.get().booleanValue()) { -this.state = 3; -}if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 543;BA.debugLine="ClosePage(pi.B4XPage)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_closepage" /*RemoteObject*/ ,(Object)(_pi.getField(false,"B4XPage" /*RemoteObject*/ ))); - if (true) break; - -case 4: -//C -this.state = -1; -; - BA.debugLineNum = 545;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static void _complete(RemoteObject __ref,RemoteObject _shouldclose) throws Exception{ -} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _activity) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,59); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xpagesmanager","initialize", __ref, _ba, _activity);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -RemoteObject _jo = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _module = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _nonmainpagewasadded = RemoteObject.createImmutable(false); -Debug.locals.put("ba", _ba); -Debug.locals.put("Activity", _activity); - BA.debugLineNum = 59;BA.debugLine="Public Sub Initialize (Activity As Activity)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 63;BA.debugLine="IdToB4XPage.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_idtob4xpage" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 64;BA.debugLine="RootB4XToPage.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_rootb4xtopage" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 65;BA.debugLine="mStackOfPageIds.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mstackofpageids" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xset.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 69;BA.debugLine="Context.InitializeContext"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_context" /*RemoteObject*/ ).runVoidMethod ("InitializeContext",__ref.getField(false, "ba")); - BA.debugLineNum = 70;BA.debugLine="mMainForm = Activity"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mmainform" /*RemoteObject*/ ,_activity); - BA.debugLineNum = 71;BA.debugLine="CheckMainActivityOrientations"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_checkmainactivityorientations" /*RemoteObject*/ ); - BA.debugLineNum = 72;BA.debugLine="Dim jo As JavaObject = Me"; -Debug.JustUpdateDeviceLine(); -_jo = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_jo = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), __ref);Debug.locals.put("jo", _jo);Debug.locals.put("jo", _jo); - BA.debugLineNum = 73;BA.debugLine="Dim module As JavaObject"; -Debug.JustUpdateDeviceLine(); -_module = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("module", _module); - BA.debugLineNum = 74;BA.debugLine="module.InitializeStatic(jo.RunMethodJO(\"getActivi"; -Debug.JustUpdateDeviceLine(); -_module.runMethod(false,"InitializeStatic",(Object)(BA.ObjectToString(_jo.runMethod(false,"RunMethodJO",(Object)(BA.ObjectToString("getActivityBA")),(Object)((b4xpagesmanager.__c.getField(false,"Null")))).runMethod(false,"GetField",(Object)(RemoteObject.createImmutable("className")))))).runVoidMethod ("SetField",(Object)(BA.ObjectToString("dontPause")),(Object)((b4xpagesmanager.__c.getField(true,"True")))); - BA.debugLineNum = 78;BA.debugLine="B4XPages.InternalSetPagesManager(Me)"; -Debug.JustUpdateDeviceLine(); -b4xpagesmanager._b4xpages.runVoidMethod ("_internalsetpagesmanager" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref)); - BA.debugLineNum = 79;BA.debugLine="MainPage.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mainpage" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xmainpage.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 80;BA.debugLine="Dim NonMainPageWasAdded As Boolean = IdToB4XPage."; -Debug.JustUpdateDeviceLine(); -_nonmainpagewasadded = BA.ObjectToBoolean(RemoteObject.solveBoolean(">",__ref.getField(false,"_idtob4xpage" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_getsize" /*RemoteObject*/ ),BA.numberCast(double.class, 0)));Debug.locals.put("NonMainPageWasAdded", _nonmainpagewasadded);Debug.locals.put("NonMainPageWasAdded", _nonmainpagewasadded); - BA.debugLineNum = 81;BA.debugLine="IdToB4XPage.Put(\"~~~~~temp~~~~\", CreateB4XPageInf"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_idtob4xpage" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_put" /*RemoteObject*/ ,(Object)(RemoteObject.createImmutable(("~~~~~temp~~~~"))),(Object)((__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_createb4xpageinfo" /*RemoteObject*/ ,(Object)((__ref.getField(false,"_mainpage" /*RemoteObject*/ ))),(Object)(BA.ObjectToString("")),(Object)(b4xpagesmanager.__c.getField(true,"False")),(Object)((RemoteObject.createImmutable(""))))))); - BA.debugLineNum = 82;BA.debugLine="BackgroundStateChanged(True)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_backgroundstatechanged" /*RemoteObject*/ ,(Object)(b4xpagesmanager.__c.getField(true,"True"))); - BA.debugLineNum = 83;BA.debugLine="IdToB4XPage.Remove(\"~~~~~temp~~~~\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_idtob4xpage" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_remove" /*RemoteObject*/ ,(Object)((RemoteObject.createImmutable("~~~~~temp~~~~")))); - BA.debugLineNum = 84;BA.debugLine="AddPageAndCreate(\"MainPage\", MainPage)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_addpageandcreate" /*RemoteObject*/ ,(Object)(BA.ObjectToString("MainPage")),(Object)((__ref.getField(false,"_mainpage" /*RemoteObject*/ )))); - BA.debugLineNum = 85;BA.debugLine="If LogEvents = False Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_logevents" /*RemoteObject*/ ),b4xpagesmanager.__c.getField(true,"False"))) { - BA.debugLineNum = 86;BA.debugLine="Log(\"Call B4XPages.GetManager.LogEvents = True t"; -Debug.JustUpdateDeviceLine(); -b4xpagesmanager.__c.runVoidMethod ("LogImpl","939256091",RemoteObject.createImmutable("Call B4XPages.GetManager.LogEvents = True to enable logging B4XPages events."),0); - }; - BA.debugLineNum = 88;BA.debugLine="If NonMainPageWasAdded Then"; -Debug.JustUpdateDeviceLine(); -if (_nonmainpagewasadded.get().booleanValue()) { - BA.debugLineNum = 89;BA.debugLine="If Not(xui.IsB4i) Then"; -Debug.JustUpdateDeviceLine(); -if (b4xpagesmanager.__c.runMethod(true,"Not",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4i"))).get().booleanValue()) { - BA.debugLineNum = 90;BA.debugLine="RaiseEvent(GetTopPage, \"B4XPage_Appear\", Null)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_raiseevent" /*RemoteObject*/ ,(Object)(__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_gettoppage" /*RemoteObject*/ )),(Object)(BA.ObjectToString("B4XPage_Appear")),(Object)((b4xpagesmanager.__c.getField(false,"Null")))); - }; - }; - BA.debugLineNum = 93;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _logevent(RemoteObject __ref,RemoteObject _pi,RemoteObject _ev) throws Exception{ -try { - Debug.PushSubsStack("LogEvent (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,640); -if (RapidSub.canDelegate("logevent")) { return __ref.runUserSub(false, "b4xpagesmanager","logevent", __ref, _pi, _ev);} -RemoteObject _msg = RemoteObject.createImmutable(""); -Debug.locals.put("pi", _pi); -Debug.locals.put("ev", _ev); - BA.debugLineNum = 640;BA.debugLine="Private Sub LogEvent (pi As B4XPageInfo, ev As Str"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 641;BA.debugLine="If LogEvents Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_logevents" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 642;BA.debugLine="Dim msg As String = $\"*** ${pi.Id}: ${ev} ${Stac"; -Debug.JustUpdateDeviceLine(); -_msg = (RemoteObject.concat(RemoteObject.createImmutable("*** "),b4xpagesmanager.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_pi.getField(true,"Id" /*RemoteObject*/ )))),RemoteObject.createImmutable(": "),b4xpagesmanager.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_ev))),RemoteObject.createImmutable(" "),b4xpagesmanager.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_stackstring" /*RemoteObject*/ )))),RemoteObject.createImmutable("")));Debug.locals.put("msg", _msg);Debug.locals.put("msg", _msg); - BA.debugLineNum = 643;BA.debugLine="Log(msg)"; -Debug.JustUpdateDeviceLine(); -b4xpagesmanager.__c.runVoidMethod ("LogImpl","941484291",_msg,0); - }; - BA.debugLineNum = 645;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _mainform_resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("MainForm_Resize (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,585); -if (RapidSub.canDelegate("mainform_resize")) { return __ref.runUserSub(false, "b4xpagesmanager","mainform_resize", __ref, _width, _height);} -RemoteObject _w = RemoteObject.createImmutable(0); -RemoteObject _h = RemoteObject.createImmutable(0); -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 585;BA.debugLine="Public Sub MainForm_Resize(Width As Double, Height"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 586;BA.debugLine="Dim w As Int = Width"; -Debug.JustUpdateDeviceLine(); -_w = BA.numberCast(int.class, _width);Debug.locals.put("w", _w);Debug.locals.put("w", _w); - BA.debugLineNum = 587;BA.debugLine="Dim h As Int = Height"; -Debug.JustUpdateDeviceLine(); -_h = BA.numberCast(int.class, _height);Debug.locals.put("h", _h);Debug.locals.put("h", _h); - BA.debugLineNum = 588;BA.debugLine="RaiseEvent(GetPageInfoFromRoot(Sender), \"B4XPage_"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_raiseevent" /*RemoteObject*/ ,(Object)(__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_getpageinfofromroot" /*RemoteObject*/ ,RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), b4xpagesmanager.__c.runMethod(false,"Sender",__ref.getField(false, "ba"))))),(Object)(BA.ObjectToString("B4XPage_Resize")),(Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(_w),(_h)}))); - BA.debugLineNum = 589;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _raiseevent(RemoteObject __ref,RemoteObject _targetpage,RemoteObject _subname,RemoteObject _params) throws Exception{ -try { - Debug.PushSubsStack("RaiseEvent (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,548); -if (RapidSub.canDelegate("raiseevent")) { return __ref.runUserSub(false, "b4xpagesmanager","raiseevent", __ref, _targetpage, _subname, _params);} -RemoteObject _length = RemoteObject.createImmutable(0); -Debug.locals.put("TargetPage", _targetpage); -Debug.locals.put("SubName", _subname); -Debug.locals.put("Params", _params); - BA.debugLineNum = 548;BA.debugLine="Public Sub RaiseEvent (TargetPage As B4XPageInfo,"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 549;BA.debugLine="If TargetPage = Null Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("n",_targetpage)) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 550;BA.debugLine="Dim length As Int"; -Debug.JustUpdateDeviceLine(); -_length = RemoteObject.createImmutable(0);Debug.locals.put("length", _length); - BA.debugLineNum = 551;BA.debugLine="If Params = Null Then length = 0 Else length = Pa"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("n",_params)) { -_length = BA.numberCast(int.class, 0);Debug.locals.put("length", _length);} -else { -_length = _params.getField(true,"length");Debug.locals.put("length", _length);}; - BA.debugLineNum = 552;BA.debugLine="LogEvent(TargetPage, SubName)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_logevent" /*RemoteObject*/ ,(Object)(_targetpage),(Object)(_subname)); - BA.debugLineNum = 553;BA.debugLine="If xui.SubExists(TargetPage.B4XPage, SubName, len"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"SubExists",__ref.getField(false, "ba"),(Object)(_targetpage.getField(false,"B4XPage" /*RemoteObject*/ )),(Object)(_subname),(Object)(_length)),b4xpagesmanager.__c.getField(true,"False"))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 554;BA.debugLine="Select length"; -Debug.JustUpdateDeviceLine(); -switch (BA.switchObjectToInt(_length,BA.numberCast(int.class, 0),BA.numberCast(int.class, 1),BA.numberCast(int.class, 2))) { -case 0: { - BA.debugLineNum = 556;BA.debugLine="CallSubDelayed(TargetPage.B4XPage, SubName)"; -Debug.JustUpdateDeviceLine(); -b4xpagesmanager.__c.runVoidMethod ("CallSubDelayed",__ref.getField(false, "ba"),(Object)(_targetpage.getField(false,"B4XPage" /*RemoteObject*/ )),(Object)(_subname)); - break; } -case 1: { - BA.debugLineNum = 558;BA.debugLine="CallSubDelayed2(TargetPage.B4XPage, SubName, Pa"; -Debug.JustUpdateDeviceLine(); -b4xpagesmanager.__c.runVoidMethod ("CallSubDelayed2",__ref.getField(false, "ba"),(Object)(_targetpage.getField(false,"B4XPage" /*RemoteObject*/ )),(Object)(_subname),(Object)(_params.getArrayElement(false,BA.numberCast(int.class, 0)))); - break; } -case 2: { - BA.debugLineNum = 560;BA.debugLine="CallSubDelayed3(TargetPage.B4XPage, SubName, Pa"; -Debug.JustUpdateDeviceLine(); -b4xpagesmanager.__c.runVoidMethod ("CallSubDelayed3",__ref.getField(false, "ba"),(Object)(_targetpage.getField(false,"B4XPage" /*RemoteObject*/ )),(Object)(_subname),(Object)(_params.getArrayElement(false,BA.numberCast(int.class, 0))),(Object)(_params.getArrayElement(false,BA.numberCast(int.class, 1)))); - break; } -default: { - BA.debugLineNum = 562;BA.debugLine="Log(\"Too many parameters\")"; -Debug.JustUpdateDeviceLine(); -b4xpagesmanager.__c.runVoidMethod ("LogImpl","940960014",RemoteObject.createImmutable("Too many parameters"),0); - break; } -} -; - BA.debugLineNum = 564;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _raiseeventwithresult(RemoteObject __ref,RemoteObject _targetpage,RemoteObject _subname,RemoteObject _params) throws Exception{ -try { - Debug.PushSubsStack("RaiseEventWithResult (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,566); -if (RapidSub.canDelegate("raiseeventwithresult")) { return __ref.runUserSub(false, "b4xpagesmanager","raiseeventwithresult", __ref, _targetpage, _subname, _params);} -RemoteObject _length = RemoteObject.createImmutable(0); -Debug.locals.put("TargetPage", _targetpage); -Debug.locals.put("SubName", _subname); -Debug.locals.put("Params", _params); - BA.debugLineNum = 566;BA.debugLine="Public Sub RaiseEventWithResult (TargetPage As B4X"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 567;BA.debugLine="If TargetPage = Null Then Return Null"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("n",_targetpage)) { -if (true) return b4xpagesmanager.__c.getField(false,"Null");}; - BA.debugLineNum = 568;BA.debugLine="Dim length As Int"; -Debug.JustUpdateDeviceLine(); -_length = RemoteObject.createImmutable(0);Debug.locals.put("length", _length); - BA.debugLineNum = 569;BA.debugLine="If Params = Null Then length = 0 Else length = Pa"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("n",_params)) { -_length = BA.numberCast(int.class, 0);Debug.locals.put("length", _length);} -else { -_length = _params.getField(true,"length");Debug.locals.put("length", _length);}; - BA.debugLineNum = 570;BA.debugLine="LogEvent(TargetPage, SubName)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_logevent" /*RemoteObject*/ ,(Object)(_targetpage),(Object)(_subname)); - BA.debugLineNum = 571;BA.debugLine="If xui.SubExists(TargetPage.B4XPage, SubName, len"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"SubExists",__ref.getField(false, "ba"),(Object)(_targetpage.getField(false,"B4XPage" /*RemoteObject*/ )),(Object)(_subname),(Object)(_length)),b4xpagesmanager.__c.getField(true,"False"))) { -if (true) return b4xpagesmanager.__c.getField(false,"Null");}; - BA.debugLineNum = 572;BA.debugLine="Select length"; -Debug.JustUpdateDeviceLine(); -switch (BA.switchObjectToInt(_length,BA.numberCast(int.class, 0),BA.numberCast(int.class, 1),BA.numberCast(int.class, 2))) { -case 0: { - BA.debugLineNum = 574;BA.debugLine="Return CallSub(TargetPage.B4XPage, SubName)"; -Debug.JustUpdateDeviceLine(); -if (true) return b4xpagesmanager.__c.runMethodAndSync(false,"CallSubNew",__ref.getField(false, "ba"),(Object)(_targetpage.getField(false,"B4XPage" /*RemoteObject*/ )),(Object)(_subname)); - break; } -case 1: { - BA.debugLineNum = 576;BA.debugLine="Return CallSub2(TargetPage.B4XPage, SubName, Pa"; -Debug.JustUpdateDeviceLine(); -if (true) return b4xpagesmanager.__c.runMethodAndSync(false,"CallSubNew2",__ref.getField(false, "ba"),(Object)(_targetpage.getField(false,"B4XPage" /*RemoteObject*/ )),(Object)(_subname),(Object)(_params.getArrayElement(false,BA.numberCast(int.class, 0)))); - break; } -case 2: { - BA.debugLineNum = 578;BA.debugLine="Return CallSub3(TargetPage.B4XPage, SubName, Pa"; -Debug.JustUpdateDeviceLine(); -if (true) return b4xpagesmanager.__c.runMethodAndSync(false,"CallSubNew3",__ref.getField(false, "ba"),(Object)(_targetpage.getField(false,"B4XPage" /*RemoteObject*/ )),(Object)(_subname),(Object)(_params.getArrayElement(false,BA.numberCast(int.class, 0))),(Object)(_params.getArrayElement(false,BA.numberCast(int.class, 1)))); - break; } -default: { - BA.debugLineNum = 580;BA.debugLine="Log(\"Too many parameters\")"; -Debug.JustUpdateDeviceLine(); -b4xpagesmanager.__c.runVoidMethod ("LogImpl","941025550",RemoteObject.createImmutable("Too many parameters"),0); - break; } -} -; - BA.debugLineNum = 582;BA.debugLine="Return Null"; -Debug.JustUpdateDeviceLine(); -if (true) return b4xpagesmanager.__c.getField(false,"Null"); - BA.debugLineNum = 583;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _settitle(RemoteObject __ref,RemoteObject _b4xpage,RemoteObject _title) throws Exception{ -try { - Debug.PushSubsStack("SetTitle (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,363); -if (RapidSub.canDelegate("settitle")) { return __ref.runUserSub(false, "b4xpagesmanager","settitle", __ref, _b4xpage, _title);} -RemoteObject _pi = RemoteObject.declareNull("keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo"); -Debug.locals.put("B4XPage", _b4xpage); -Debug.locals.put("Title", _title); - BA.debugLineNum = 363;BA.debugLine="Public Sub SetTitle (B4XPage As Object, Title As O"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 364;BA.debugLine="Dim pi As B4XPageInfo = FindPIFromB4XPage(B4XPage"; -Debug.JustUpdateDeviceLine(); -_pi = __ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_findpifromb4xpage" /*RemoteObject*/ ,(Object)(_b4xpage));Debug.locals.put("pi", _pi);Debug.locals.put("pi", _pi); - BA.debugLineNum = 365;BA.debugLine="pi.Title = Title"; -Debug.JustUpdateDeviceLine(); -_pi.setField ("Title" /*RemoteObject*/ ,_title); - BA.debugLineNum = 366;BA.debugLine="pi.Parent.NativeType.Title = Title"; -Debug.JustUpdateDeviceLine(); -_pi.getField(false,"Parent" /*RemoteObject*/ ).getField(false,"NativeType" /*RemoteObject*/ ).runMethod(false,"setTitle",BA.ObjectToCharSequence(_title)); - BA.debugLineNum = 367;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _showpage(RemoteObject __ref,RemoteObject _id) throws Exception{ -try { - Debug.PushSubsStack("ShowPage (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,156); -if (RapidSub.canDelegate("showpage")) { return __ref.runUserSub(false, "b4xpagesmanager","showpage", __ref, _id);} -RemoteObject _pi = RemoteObject.declareNull("keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo"); -RemoteObject _top = RemoteObject.declareNull("keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo"); -Debug.locals.put("Id", _id); - BA.debugLineNum = 156;BA.debugLine="Public Sub ShowPage (Id As String)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 157;BA.debugLine="Dim pi As B4XPageInfo = GetPageFromId(Id)"; -Debug.JustUpdateDeviceLine(); -_pi = __ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_getpagefromid" /*RemoteObject*/ ,(Object)(_id));Debug.locals.put("pi", _pi);Debug.locals.put("pi", _pi); - BA.debugLineNum = 158;BA.debugLine="If pi = GetTopPage Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_pi,__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_gettoppage" /*RemoteObject*/ ))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 159;BA.debugLine="CreatePageIfNeeded(pi)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_createpageifneeded" /*RemoteObject*/ ,(Object)(_pi)); - BA.debugLineNum = 160;BA.debugLine="TopPageDisappear"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_toppagedisappear" /*RemoteObject*/ ); - BA.debugLineNum = 162;BA.debugLine="Dim Top As B4XPageInfo = GetTopPage"; -Debug.JustUpdateDeviceLine(); -_top = __ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_gettoppage" /*RemoteObject*/ );Debug.locals.put("Top", _top);Debug.locals.put("Top", _top); - BA.debugLineNum = 163;BA.debugLine="If Top <> Null Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("N",_top)) { - BA.debugLineNum = 164;BA.debugLine="Top.Root.RemoveViewFromParent"; -Debug.JustUpdateDeviceLine(); -_top.getField(false,"Root" /*RemoteObject*/ ).runVoidMethod ("RemoveViewFromParent"); - }; - BA.debugLineNum = 174;BA.debugLine="mStackOfPageIds.Remove(pi.Id)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mstackofpageids" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xset.class, "_remove" /*RemoteObject*/ ,(Object)((_pi.getField(true,"Id" /*RemoteObject*/ )))); - BA.debugLineNum = 175;BA.debugLine="ShowPageImpl(pi)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_showpageimpl" /*RemoteObject*/ ,(Object)(_pi)); - BA.debugLineNum = 176;BA.debugLine="mStackOfPageIds.Add(pi.Id)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mstackofpageids" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xset.class, "_add" /*RemoteObject*/ ,(Object)((_pi.getField(true,"Id" /*RemoteObject*/ )))); - BA.debugLineNum = 177;BA.debugLine="TopPageAppear"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_toppageappear" /*RemoteObject*/ ); - BA.debugLineNum = 178;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _showpageandremovepreviouspages(RemoteObject __ref,RemoteObject _id) throws Exception{ -try { - Debug.PushSubsStack("ShowPageAndRemovePreviousPages (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,180); -if (RapidSub.canDelegate("showpageandremovepreviouspages")) { return __ref.runUserSub(false, "b4xpagesmanager","showpageandremovepreviouspages", __ref, _id);} -RemoteObject _pi = RemoteObject.declareNull("keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo"); -RemoteObject _pagetoremove = RemoteObject.declareNull("keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo"); -Debug.locals.put("Id", _id); - BA.debugLineNum = 180;BA.debugLine="Public Sub ShowPageAndRemovePreviousPages (Id As S"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 181;BA.debugLine="If GetTopPage = Null Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("n",__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_gettoppage" /*RemoteObject*/ ))) { - BA.debugLineNum = 182;BA.debugLine="ShowPage(Id)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_showpage" /*RemoteObject*/ ,(Object)(_id)); - BA.debugLineNum = 183;BA.debugLine="Return"; -Debug.JustUpdateDeviceLine(); -if (true) return RemoteObject.createImmutable(""); - }; - BA.debugLineNum = 185;BA.debugLine="Dim pi As B4XPageInfo = GetPageFromId(Id)"; -Debug.JustUpdateDeviceLine(); -_pi = __ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_getpagefromid" /*RemoteObject*/ ,(Object)(_id));Debug.locals.put("pi", _pi);Debug.locals.put("pi", _pi); - BA.debugLineNum = 186;BA.debugLine="CreatePageIfNeeded(pi)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_createpageifneeded" /*RemoteObject*/ ,(Object)(_pi)); - BA.debugLineNum = 187;BA.debugLine="TopPageDisappear"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_toppagedisappear" /*RemoteObject*/ ); - BA.debugLineNum = 191;BA.debugLine="For Each Id As String In mStackOfPageIds.AsList"; -Debug.JustUpdateDeviceLine(); -{ -final RemoteObject group8 = __ref.getField(false,"_mstackofpageids" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xset.class, "_aslist" /*RemoteObject*/ ); -final int groupLen8 = group8.runMethod(true,"getSize").get() -;int index8 = 0; -; -for (; index8 < groupLen8;index8++){ -_id = BA.ObjectToString(group8.runMethod(false,"Get",index8));Debug.locals.put("Id", _id); -Debug.locals.put("Id", _id); - BA.debugLineNum = 192;BA.debugLine="Dim PageToRemove As B4XPageInfo = GetPageFromId("; -Debug.JustUpdateDeviceLine(); -_pagetoremove = __ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_getpagefromid" /*RemoteObject*/ ,(Object)(_id));Debug.locals.put("PageToRemove", _pagetoremove);Debug.locals.put("PageToRemove", _pagetoremove); - BA.debugLineNum = 194;BA.debugLine="PageToRemove.Root.RemoveViewFromParent"; -Debug.JustUpdateDeviceLine(); -_pagetoremove.getField(false,"Root" /*RemoteObject*/ ).runVoidMethod ("RemoveViewFromParent"); - } -}Debug.locals.put("Id", _id); -; - BA.debugLineNum = 201;BA.debugLine="mStackOfPageIds.Clear"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mstackofpageids" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xset.class, "_clear" /*RemoteObject*/ ); - BA.debugLineNum = 202;BA.debugLine="mStackOfPageIds.Add(pi.Id)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mstackofpageids" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xset.class, "_add" /*RemoteObject*/ ,(Object)((_pi.getField(true,"Id" /*RemoteObject*/ )))); - BA.debugLineNum = 203;BA.debugLine="If xui.IsB4A Or xui.IsB4J Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(".",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4A")) || RemoteObject.solveBoolean(".",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4J"))) { - BA.debugLineNum = 204;BA.debugLine="ShowPageImpl(pi)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_showpageimpl" /*RemoteObject*/ ,(Object)(_pi)); - }; - BA.debugLineNum = 206;BA.debugLine="TopPageAppear"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_toppageappear" /*RemoteObject*/ ); - BA.debugLineNum = 207;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _showpageimpl(RemoteObject __ref,RemoteObject _pi) throws Exception{ -try { - Debug.PushSubsStack("ShowPageImpl (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,333); -if (RapidSub.canDelegate("showpageimpl")) { return __ref.runUserSub(false, "b4xpagesmanager","showpageimpl", __ref, _pi);} -RemoteObject _pnl = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -Debug.locals.put("pi", _pi); - BA.debugLineNum = 333;BA.debugLine="Private Sub ShowPageImpl (pi As B4XPageInfo)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 339;BA.debugLine="If pi.Root.Parent.IsInitialized Then pi.Root.Remo"; -Debug.JustUpdateDeviceLine(); -if (_pi.getField(false,"Root" /*RemoteObject*/ ).runMethod(false,"getParent").runMethod(true,"IsInitialized").get().booleanValue()) { -_pi.getField(false,"Root" /*RemoteObject*/ ).runVoidMethod ("RemoveViewFromParent");}; - BA.debugLineNum = 340;BA.debugLine="Dim pnl As Panel = pi.Root"; -Debug.JustUpdateDeviceLine(); -_pnl = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper"); -_pnl = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.PanelWrapper"), _pi.getField(false,"Root" /*RemoteObject*/ ).getObject());Debug.locals.put("pnl", _pnl);Debug.locals.put("pnl", _pnl); - BA.debugLineNum = 341;BA.debugLine="If TransitionAnimationDuration > 0 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",__ref.getField(true,"_transitionanimationduration" /*RemoteObject*/ ),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 342;BA.debugLine="mMainForm.AddView(pnl, 0, 0, 20dip, 20dip)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mmainform" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((_pnl.getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(b4xpagesmanager.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 20)))),(Object)(b4xpagesmanager.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 20))))); - BA.debugLineNum = 343;BA.debugLine="pnl.SetLayoutAnimated(TransitionAnimationDuratio"; -Debug.JustUpdateDeviceLine(); -_pnl.runVoidMethod ("SetLayoutAnimated",(Object)(__ref.getField(true,"_transitionanimationduration" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(b4xpagesmanager.__c.runMethod(true,"PerXToCurrent",(Object)(BA.numberCast(float.class, 100)),__ref.getField(false, "ba"))),(Object)(b4xpagesmanager.__c.runMethod(true,"PerYToCurrent",(Object)(BA.numberCast(float.class, 100)),__ref.getField(false, "ba")))); - }else { - BA.debugLineNum = 345;BA.debugLine="mMainForm.AddView(pnl, 0, 0, 100%x, 100%y)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mmainform" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((_pnl.getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(b4xpagesmanager.__c.runMethod(true,"PerXToCurrent",(Object)(BA.numberCast(float.class, 100)),__ref.getField(false, "ba"))),(Object)(b4xpagesmanager.__c.runMethod(true,"PerYToCurrent",(Object)(BA.numberCast(float.class, 100)),__ref.getField(false, "ba")))); - }; - BA.debugLineNum = 350;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _toppageappear(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("TopPageAppear (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,288); -if (RapidSub.canDelegate("toppageappear")) { return __ref.runUserSub(false, "b4xpagesmanager","toppageappear", __ref);} -RemoteObject _pi = RemoteObject.declareNull("keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo"); - BA.debugLineNum = 288;BA.debugLine="Private Sub TopPageAppear"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 289;BA.debugLine="Dim pi As B4XPageInfo = GetTopPage"; -Debug.JustUpdateDeviceLine(); -_pi = __ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_gettoppage" /*RemoteObject*/ );Debug.locals.put("pi", _pi);Debug.locals.put("pi", _pi); - BA.debugLineNum = 290;BA.debugLine="If pi = Null Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("n",_pi)) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 291;BA.debugLine="pi.Parent.NativeType.Title = pi.Title"; -Debug.JustUpdateDeviceLine(); -_pi.getField(false,"Parent" /*RemoteObject*/ ).getField(false,"NativeType" /*RemoteObject*/ ).runMethod(false,"setTitle",BA.ObjectToCharSequence(_pi.getField(false,"Title" /*RemoteObject*/ ))); - BA.debugLineNum = 292;BA.debugLine="If Not(xui.IsB4i) Then"; -Debug.JustUpdateDeviceLine(); -if (b4xpagesmanager.__c.runMethod(true,"Not",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4i"))).get().booleanValue()) { - BA.debugLineNum = 293;BA.debugLine="If IsForeground Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_isforeground" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 294;BA.debugLine="RaiseEvent(pi, \"B4XPage_Appear\", Null)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_raiseevent" /*RemoteObject*/ ,(Object)(_pi),(Object)(BA.ObjectToString("B4XPage_Appear")),(Object)((b4xpagesmanager.__c.getField(false,"Null")))); - }; - }; - BA.debugLineNum = 298;BA.debugLine="If ShowUpIndicator And ActionBar.IsInitialized Th"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(".",__ref.getField(true,"_showupindicator" /*RemoteObject*/ )) && RemoteObject.solveBoolean(".",__ref.getField(false,"_actionbar" /*RemoteObject*/ ).runMethod(true,"IsInitialized"))) { - BA.debugLineNum = 299;BA.debugLine="ActionBar.RunMethod(\"setDisplayHomeAsUpEnabled\","; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_actionbar" /*RemoteObject*/ ).runVoidMethod ("RunMethod",(Object)(BA.ObjectToString("setDisplayHomeAsUpEnabled")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {RemoteObject.createImmutable((RemoteObject.solveBoolean(">",__ref.getField(false,"_mstackofpageids" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xset.class, "_getsize" /*RemoteObject*/ ),BA.numberCast(double.class, 1))))}))); - }; - BA.debugLineNum = 301;BA.debugLine="UpdateMenuItems"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_updatemenuitems" /*RemoteObject*/ ); - BA.debugLineNum = 303;BA.debugLine="UpdateStackString"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_updatestackstring" /*RemoteObject*/ ); - BA.debugLineNum = 304;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _toppagedisappear(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("TopPageDisappear (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,277); -if (RapidSub.canDelegate("toppagedisappear")) { return __ref.runUserSub(false, "b4xpagesmanager","toppagedisappear", __ref);} -RemoteObject _pi = RemoteObject.declareNull("keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo"); - BA.debugLineNum = 277;BA.debugLine="Private Sub TopPageDisappear"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 278;BA.debugLine="If xui.IsB4J Then Return"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4J").get().booleanValue()) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 279;BA.debugLine="Dim pi As B4XPageInfo = GetTopPage"; -Debug.JustUpdateDeviceLine(); -_pi = __ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_gettoppage" /*RemoteObject*/ );Debug.locals.put("pi", _pi);Debug.locals.put("pi", _pi); - BA.debugLineNum = 280;BA.debugLine="If pi = Null Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("n",_pi)) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 281;BA.debugLine="If Not(xui.IsB4i) Then"; -Debug.JustUpdateDeviceLine(); -if (b4xpagesmanager.__c.runMethod(true,"Not",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4i"))).get().booleanValue()) { - BA.debugLineNum = 282;BA.debugLine="If IsForeground Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_isforeground" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 283;BA.debugLine="RaiseEventWithResult(pi, \"B4XPage_Disappear\", N"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_raiseeventwithresult" /*RemoteObject*/ ,(Object)(_pi),(Object)(BA.ObjectToString("B4XPage_Disappear")),(Object)((b4xpagesmanager.__c.getField(false,"Null")))); - }; - }; - BA.debugLineNum = 286;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _updatemenuitems(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("UpdateMenuItems (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,490); -if (RapidSub.canDelegate("updatemenuitems")) { return __ref.runUserSub(false, "b4xpagesmanager","updatemenuitems", __ref);} - BA.debugLineNum = 490;BA.debugLine="Private Sub UpdateMenuItems"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 491;BA.debugLine="Context.RunMethod(\"invalidateOptionsMenu\", Null)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_context" /*RemoteObject*/ ).runVoidMethod ("RunMethod",(Object)(BA.ObjectToString("invalidateOptionsMenu")),(Object)((b4xpagesmanager.__c.getField(false,"Null")))); - BA.debugLineNum = 492;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _updatestackstring(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("UpdateStackString (b4xpagesmanager) ","b4xpagesmanager",34,__ref.getField(false, "ba"),__ref,647); -if (RapidSub.canDelegate("updatestackstring")) { return __ref.runUserSub(false, "b4xpagesmanager","updatestackstring", __ref);} -RemoteObject _sb = RemoteObject.declareNull("anywheresoftware.b4a.keywords.StringBuilderWrapper"); -RemoteObject _id = RemoteObject.createImmutable(""); - BA.debugLineNum = 647;BA.debugLine="Public Sub UpdateStackString"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 648;BA.debugLine="Dim sb As StringBuilder"; -Debug.JustUpdateDeviceLine(); -_sb = RemoteObject.createNew ("anywheresoftware.b4a.keywords.StringBuilderWrapper");Debug.locals.put("sb", _sb); - BA.debugLineNum = 649;BA.debugLine="sb.Initialize"; -Debug.JustUpdateDeviceLine(); -_sb.runVoidMethod ("Initialize"); - BA.debugLineNum = 650;BA.debugLine="sb.Append(\"[\")"; -Debug.JustUpdateDeviceLine(); -_sb.runVoidMethod ("Append",(Object)(RemoteObject.createImmutable("["))); - BA.debugLineNum = 651;BA.debugLine="If mStackOfPageIds.Size > 0 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_mstackofpageids" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xset.class, "_getsize" /*RemoteObject*/ ),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 652;BA.debugLine="For Each id As String In mStackOfPageIds.AsList"; -Debug.JustUpdateDeviceLine(); -{ -final RemoteObject group5 = __ref.getField(false,"_mstackofpageids" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xset.class, "_aslist" /*RemoteObject*/ ); -final int groupLen5 = group5.runMethod(true,"getSize").get() -;int index5 = 0; -; -for (; index5 < groupLen5;index5++){ -_id = BA.ObjectToString(group5.runMethod(false,"Get",index5));Debug.locals.put("id", _id); -Debug.locals.put("id", _id); - BA.debugLineNum = 653;BA.debugLine="sb.Append(id).Append(\", \")"; -Debug.JustUpdateDeviceLine(); -_sb.runMethod(false,"Append",(Object)(_id)).runVoidMethod ("Append",(Object)(RemoteObject.createImmutable(", "))); - } -}Debug.locals.put("id", _id); -; - BA.debugLineNum = 655;BA.debugLine="sb.Remove(sb.Length - 2, sb.Length)"; -Debug.JustUpdateDeviceLine(); -_sb.runVoidMethod ("Remove",(Object)(RemoteObject.solve(new RemoteObject[] {_sb.runMethod(true,"getLength"),RemoteObject.createImmutable(2)}, "-",1, 1)),(Object)(_sb.runMethod(true,"getLength"))); - }; - BA.debugLineNum = 657;BA.debugLine="sb.Append(\"]\")"; -Debug.JustUpdateDeviceLine(); -_sb.runVoidMethod ("Append",(Object)(RemoteObject.createImmutable("]"))); - BA.debugLineNum = 658;BA.debugLine="StackString = sb.ToString"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_stackstring" /*RemoteObject*/ ,_sb.runMethod(true,"ToString")); - BA.debugLineNum = 659;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xplusminus.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xplusminus.java deleted file mode 100644 index c94b12d..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xplusminus.java +++ /dev/null @@ -1,55 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xplusminus { - public static RemoteObject myClass; - public b4xplusminus() { - } - public static PCBA staticBA = new PCBA(null, b4xplusminus.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _meventname = RemoteObject.createImmutable(""); -public static RemoteObject _mcallback = RemoteObject.declareNull("Object"); -public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _tag = RemoteObject.declareNull("Object"); -public static RemoteObject _pnlplus = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _pnlminus = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _lblplus = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _lblminus = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _formation = RemoteObject.createImmutable(""); -public static RemoteObject _mcyclic = RemoteObject.createImmutable(false); -public static RemoteObject _mrapid = RemoteObject.createImmutable(false); -public static RemoteObject _mainlabel = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _arrowssize = RemoteObject.createImmutable(0); -public static RemoteObject _mstringitems = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _mstartrange = RemoteObject.createImmutable(0); -public static RemoteObject _minterval = RemoteObject.createImmutable(0); -public static RemoteObject _mendrange = RemoteObject.createImmutable(0); -public static RemoteObject _mselectedindex = RemoteObject.createImmutable(0); -public static RemoteObject _loopindex = RemoteObject.createImmutable(0); -public static RemoteObject _rapidperiod1 = RemoteObject.createImmutable(0); -public static RemoteObject _rapidperiod2 = RemoteObject.createImmutable(0); -public static RemoteObject _formatter = RemoteObject.declareNull("keymon.lat.medicomed.b4xformatter"); -public static RemoteObject _stringmode = RemoteObject.createImmutable(false); -public static RemoteObject _size = RemoteObject.createImmutable(0); -public static RemoteObject _mhaptic = RemoteObject.createImmutable(false); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"ArrowsSize",_ref.getField(false, "_arrowssize"),"DateUtils",_ref.getField(false, "_dateutils"),"Formation",_ref.getField(false, "_formation"),"Formatter",_ref.getField(false, "_formatter"),"lblMinus",_ref.getField(false, "_lblminus"),"lblPlus",_ref.getField(false, "_lblplus"),"LoopIndex",_ref.getField(false, "_loopindex"),"MainLabel",_ref.getField(false, "_mainlabel"),"mBase",_ref.getField(false, "_mbase"),"mCallBack",_ref.getField(false, "_mcallback"),"mCyclic",_ref.getField(false, "_mcyclic"),"mEndRange",_ref.getField(false, "_mendrange"),"mEventName",_ref.getField(false, "_meventname"),"mHaptic",_ref.getField(false, "_mhaptic"),"mInterval",_ref.getField(false, "_minterval"),"mRapid",_ref.getField(false, "_mrapid"),"mSelectedIndex",_ref.getField(false, "_mselectedindex"),"mStartRange",_ref.getField(false, "_mstartrange"),"mStringItems",_ref.getField(false, "_mstringitems"),"pnlMinus",_ref.getField(false, "_pnlminus"),"pnlPlus",_ref.getField(false, "_pnlplus"),"RapidPeriod1",_ref.getField(false, "_rapidperiod1"),"RapidPeriod2",_ref.getField(false, "_rapidperiod2"),"Size",_ref.getField(false, "_size"),"StringMode",_ref.getField(false, "_stringmode"),"Tag",_ref.getField(false, "_tag"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xplusminus_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xplusminus_subs_0.java deleted file mode 100644 index 7b7b203..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xplusminus_subs_0.java +++ /dev/null @@ -1,873 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xplusminus_subs_0 { - - -public static RemoteObject _base_resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("Base_Resize (b4xplusminus) ","b4xplusminus",50,__ref.getField(false, "ba"),__ref,83); -if (RapidSub.canDelegate("base_resize")) { return __ref.runUserSub(false, "b4xplusminus","base_resize", __ref, _width, _height);} -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 83;BA.debugLine="Public Sub Base_Resize (Width As Double, Height As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 84;BA.debugLine="If Formation = \"Horizontal\" Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_formation" /*RemoteObject*/ ),BA.ObjectToString("Horizontal"))) { - BA.debugLineNum = 85;BA.debugLine="pnlMinus.SetLayoutAnimated(0, 0, 0, ArrowsSize,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnlminus" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(true,"_arrowssize" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, _height))); - BA.debugLineNum = 86;BA.debugLine="pnlPlus.SetLayoutAnimated(0, Width - ArrowsSize,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnlplus" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_width,__ref.getField(true,"_arrowssize" /*RemoteObject*/ )}, "-",1, 0))),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(true,"_arrowssize" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, _height))); - BA.debugLineNum = 87;BA.debugLine="MainLabel.SetLayoutAnimated(0, 0, 0, Width, Heig"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mainlabel" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, _width)),(Object)(BA.numberCast(int.class, _height))); - }else -{ BA.debugLineNum = 88;BA.debugLine="Else if Formation = \"Vertical\" Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_formation" /*RemoteObject*/ ),BA.ObjectToString("Vertical"))) { - BA.debugLineNum = 89;BA.debugLine="pnlPlus.SetLayoutAnimated(0, 0, 0, Width, Arrows"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnlplus" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, _width)),(Object)(__ref.getField(true,"_arrowssize" /*RemoteObject*/ ))); - BA.debugLineNum = 90;BA.debugLine="pnlMinus.SetLayoutAnimated(0, 0, Height - Arrows"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnlminus" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_height,__ref.getField(true,"_arrowssize" /*RemoteObject*/ )}, "-",1, 0))),(Object)(BA.numberCast(int.class, _width)),(Object)(__ref.getField(true,"_arrowssize" /*RemoteObject*/ ))); - BA.debugLineNum = 91;BA.debugLine="MainLabel.SetLayoutAnimated(0, 0, 0, Width, Heig"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mainlabel" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, _width)),(Object)(BA.numberCast(int.class, _height))); - }else { - BA.debugLineNum = 93;BA.debugLine="pnlMinus.SetLayoutAnimated(0, 0, Height - Arrows"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnlminus" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_height,__ref.getField(true,"_arrowssize" /*RemoteObject*/ )}, "-",1, 0))),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_width,RemoteObject.createImmutable(2)}, "/",0, 0))),(Object)(__ref.getField(true,"_arrowssize" /*RemoteObject*/ ))); - BA.debugLineNum = 94;BA.debugLine="pnlPlus.SetLayoutAnimated(0, Width / 2, pnlMinus"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnlplus" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_width,RemoteObject.createImmutable(2)}, "/",0, 0))),(Object)(__ref.getField(false,"_pnlminus" /*RemoteObject*/ ).runMethod(true,"getTop")),(Object)(__ref.getField(false,"_pnlminus" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(__ref.getField(false,"_pnlminus" /*RemoteObject*/ ).runMethod(true,"getHeight"))); - BA.debugLineNum = 95;BA.debugLine="MainLabel.SetLayoutAnimated(0, 0, 0, Width, Heig"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mainlabel" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, _width)),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_height,__ref.getField(true,"_arrowssize" /*RemoteObject*/ ),b4xplusminus.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 5)))}, "-+",2, 0)))); - }} -; - BA.debugLineNum = 97;BA.debugLine="lblMinus.SetLayoutAnimated(0, 0, 0, pnlMinus.Widt"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_lblminus" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_pnlminus" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(__ref.getField(false,"_pnlminus" /*RemoteObject*/ ).runMethod(true,"getHeight"))); - BA.debugLineNum = 98;BA.debugLine="lblPlus.SetLayoutAnimated(0, 0, 0, pnlPlus.Width,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_lblplus" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_pnlplus" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(__ref.getField(false,"_pnlplus" /*RemoteObject*/ ).runMethod(true,"getHeight"))); - BA.debugLineNum = 99;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 6;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 7;BA.debugLine="Private mEventName As String 'ignore"; -b4xplusminus._meventname = RemoteObject.createImmutable("");__ref.setField("_meventname",b4xplusminus._meventname); - //BA.debugLineNum = 8;BA.debugLine="Private mCallBack As Object 'ignore"; -b4xplusminus._mcallback = RemoteObject.createNew ("Object");__ref.setField("_mcallback",b4xplusminus._mcallback); - //BA.debugLineNum = 9;BA.debugLine="Public mBase As B4XView 'ignore"; -b4xplusminus._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",b4xplusminus._mbase); - //BA.debugLineNum = 10;BA.debugLine="Private xui As XUI 'ignore"; -b4xplusminus._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",b4xplusminus._xui); - //BA.debugLineNum = 11;BA.debugLine="Public Tag As Object"; -b4xplusminus._tag = RemoteObject.createNew ("Object");__ref.setField("_tag",b4xplusminus._tag); - //BA.debugLineNum = 12;BA.debugLine="Public pnlPlus, pnlMinus As B4XView"; -b4xplusminus._pnlplus = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_pnlplus",b4xplusminus._pnlplus); -b4xplusminus._pnlminus = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_pnlminus",b4xplusminus._pnlminus); - //BA.debugLineNum = 13;BA.debugLine="Public lblPlus, lblMinus As B4XView"; -b4xplusminus._lblplus = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_lblplus",b4xplusminus._lblplus); -b4xplusminus._lblminus = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_lblminus",b4xplusminus._lblminus); - //BA.debugLineNum = 14;BA.debugLine="Public Formation As String"; -b4xplusminus._formation = RemoteObject.createImmutable("");__ref.setField("_formation",b4xplusminus._formation); - //BA.debugLineNum = 15;BA.debugLine="Public mCyclic As Boolean"; -b4xplusminus._mcyclic = RemoteObject.createImmutable(false);__ref.setField("_mcyclic",b4xplusminus._mcyclic); - //BA.debugLineNum = 16;BA.debugLine="Public mRapid As Boolean"; -b4xplusminus._mrapid = RemoteObject.createImmutable(false);__ref.setField("_mrapid",b4xplusminus._mrapid); - //BA.debugLineNum = 17;BA.debugLine="Public MainLabel As B4XView"; -b4xplusminus._mainlabel = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mainlabel",b4xplusminus._mainlabel); - //BA.debugLineNum = 18;BA.debugLine="Public ArrowsSize As Int = 30dip"; -b4xplusminus._arrowssize = b4xplusminus.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 30)));__ref.setField("_arrowssize",b4xplusminus._arrowssize); - //BA.debugLineNum = 19;BA.debugLine="Private mStringItems As List"; -b4xplusminus._mstringitems = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_mstringitems",b4xplusminus._mstringitems); - //BA.debugLineNum = 20;BA.debugLine="Private mStartRange, mInterval, mEndRange As Doub"; -b4xplusminus._mstartrange = RemoteObject.createImmutable(0);__ref.setField("_mstartrange",b4xplusminus._mstartrange); -b4xplusminus._minterval = RemoteObject.createImmutable(0);__ref.setField("_minterval",b4xplusminus._minterval); -b4xplusminus._mendrange = RemoteObject.createImmutable(0);__ref.setField("_mendrange",b4xplusminus._mendrange); - //BA.debugLineNum = 21;BA.debugLine="Private mSelectedIndex As Int = -1"; -b4xplusminus._mselectedindex = BA.numberCast(int.class, -(double) (0 + 1));__ref.setField("_mselectedindex",b4xplusminus._mselectedindex); - //BA.debugLineNum = 22;BA.debugLine="Private LoopIndex As Int"; -b4xplusminus._loopindex = RemoteObject.createImmutable(0);__ref.setField("_loopindex",b4xplusminus._loopindex); - //BA.debugLineNum = 23;BA.debugLine="Public RapidPeriod1 As Int = 1000"; -b4xplusminus._rapidperiod1 = BA.numberCast(int.class, 1000);__ref.setField("_rapidperiod1",b4xplusminus._rapidperiod1); - //BA.debugLineNum = 24;BA.debugLine="Public RapidPeriod2 As Int = 30"; -b4xplusminus._rapidperiod2 = BA.numberCast(int.class, 30);__ref.setField("_rapidperiod2",b4xplusminus._rapidperiod2); - //BA.debugLineNum = 25;BA.debugLine="Public Formatter As B4XFormatter"; -b4xplusminus._formatter = RemoteObject.createNew ("keymon.lat.medicomed.b4xformatter");__ref.setField("_formatter",b4xplusminus._formatter); - //BA.debugLineNum = 26;BA.debugLine="Private StringMode As Boolean"; -b4xplusminus._stringmode = RemoteObject.createImmutable(false);__ref.setField("_stringmode",b4xplusminus._stringmode); - //BA.debugLineNum = 27;BA.debugLine="Private Size As Int"; -b4xplusminus._size = RemoteObject.createImmutable(0);__ref.setField("_size",b4xplusminus._size); - //BA.debugLineNum = 28;BA.debugLine="Public mHaptic As Boolean"; -b4xplusminus._mhaptic = RemoteObject.createImmutable(false);__ref.setField("_mhaptic",b4xplusminus._mhaptic); - //BA.debugLineNum = 29;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _createlabel(RemoteObject __ref,RemoteObject _text) throws Exception{ -try { - Debug.PushSubsStack("CreateLabel (b4xplusminus) ","b4xplusminus",50,__ref.getField(false, "ba"),__ref,247); -if (RapidSub.canDelegate("createlabel")) { return __ref.runUserSub(false, "b4xplusminus","createlabel", __ref, _text);} -RemoteObject _lbl = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _xlbl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -Debug.locals.put("text", _text); - BA.debugLineNum = 247;BA.debugLine="Private Sub CreateLabel (text As String) As B4XVie"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 248;BA.debugLine="Dim lbl As Label"; -Debug.JustUpdateDeviceLine(); -_lbl = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("lbl", _lbl); - BA.debugLineNum = 249;BA.debugLine="lbl.Initialize(\"\")"; -Debug.JustUpdateDeviceLine(); -_lbl.runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable(""))); - BA.debugLineNum = 250;BA.debugLine="Dim xlbl As B4XView = lbl"; -Debug.JustUpdateDeviceLine(); -_xlbl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_xlbl = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), _lbl.getObject());Debug.locals.put("xlbl", _xlbl);Debug.locals.put("xlbl", _xlbl); - BA.debugLineNum = 251;BA.debugLine="xlbl.Font = xui.CreateMaterialIcons(30)"; -Debug.JustUpdateDeviceLine(); -_xlbl.runMethod(false,"setFont",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreateMaterialIcons",(Object)(BA.numberCast(float.class, 30)))); - BA.debugLineNum = 252;BA.debugLine="xlbl.Text = text"; -Debug.JustUpdateDeviceLine(); -_xlbl.runMethod(true,"setText",BA.ObjectToCharSequence(_text)); - BA.debugLineNum = 253;BA.debugLine="xlbl.TextColor = MainLabel.TextColor"; -Debug.JustUpdateDeviceLine(); -_xlbl.runMethod(true,"setTextColor",__ref.getField(false,"_mainlabel" /*RemoteObject*/ ).runMethod(true,"getTextColor")); - BA.debugLineNum = 254;BA.debugLine="Return xlbl"; -Debug.JustUpdateDeviceLine(); -if (true) return _xlbl; - BA.debugLineNum = 255;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _decrement(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Decrement (b4xplusminus) ","b4xplusminus",50,__ref.getField(false, "ba"),__ref,182); -if (RapidSub.canDelegate("decrement")) { return __ref.runUserSub(false, "b4xplusminus","decrement", __ref);} - BA.debugLineNum = 182;BA.debugLine="Public Sub Decrement"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 183;BA.debugLine="If mSelectedIndex <= 0 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("k",__ref.getField(true,"_mselectedindex" /*RemoteObject*/ ),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 184;BA.debugLine="If mCyclic Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_mcyclic" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 185;BA.debugLine="mSelectedIndex = Size"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mselectedindex" /*RemoteObject*/ ,__ref.getField(true,"_size" /*RemoteObject*/ )); - }else { - BA.debugLineNum = 187;BA.debugLine="mSelectedIndex = 0"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mselectedindex" /*RemoteObject*/ ,BA.numberCast(int.class, 0)); - BA.debugLineNum = 188;BA.debugLine="LoopIndex = LoopIndex + 1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_loopindex" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_loopindex" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "+",1, 1)); - BA.debugLineNum = 189;BA.debugLine="Return"; -Debug.JustUpdateDeviceLine(); -if (true) return RemoteObject.createImmutable(""); - }; - }; - BA.debugLineNum = 192;BA.debugLine="SetIndex(mSelectedIndex - 1, True)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_setindex" /*RemoteObject*/ ,(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mselectedindex" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "-",1, 1)),(Object)(b4xplusminus.__c.getField(true,"True"))); - BA.debugLineNum = 193;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _designercreateview(RemoteObject __ref,RemoteObject _base,RemoteObject _lbl,RemoteObject _props) throws Exception{ -try { - Debug.PushSubsStack("DesignerCreateView (b4xplusminus) ","b4xplusminus",50,__ref.getField(false, "ba"),__ref,38); -if (RapidSub.canDelegate("designercreateview")) { return __ref.runUserSub(false, "b4xplusminus","designercreateview", __ref, _base, _lbl, _props);} -RemoteObject _pnl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -Debug.locals.put("Base", _base); -Debug.locals.put("lbl", _lbl); -Debug.locals.put("Props", _props); - BA.debugLineNum = 38;BA.debugLine="Public Sub DesignerCreateView (Base As Object, lbl"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 39;BA.debugLine="mBase = Base"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).setObject (_base); - BA.debugLineNum = 40;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_tag" /*RemoteObject*/ ,__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"getTag")); - BA.debugLineNum = 40;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"setTag",__ref); - BA.debugLineNum = 41;BA.debugLine="MainLabel = lbl"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mainlabel" /*RemoteObject*/ ).setObject (_lbl.getObject()); - BA.debugLineNum = 42;BA.debugLine="MainLabel.SetTextAlignment(\"CENTER\", \"CENTER\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mainlabel" /*RemoteObject*/ ).runVoidMethod ("SetTextAlignment",(Object)(BA.ObjectToString("CENTER")),(Object)(RemoteObject.createImmutable("CENTER"))); - BA.debugLineNum = 43;BA.debugLine="Dim pnl As B4XView = Props.Get(\"page\")"; -Debug.JustUpdateDeviceLine(); -_pnl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_pnl = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), _props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("page")))));Debug.locals.put("pnl", _pnl);Debug.locals.put("pnl", _pnl); - BA.debugLineNum = 53;BA.debugLine="pnlPlus = xui.CreatePanel(\"pnlArrow\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_pnlplus" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("pnlArrow")))); - BA.debugLineNum = 54;BA.debugLine="pnlMinus = xui.CreatePanel(\"pnlArrow\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_pnlminus" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("pnlArrow")))); - BA.debugLineNum = 56;BA.debugLine="pnlPlus.Tag = True"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnlplus" /*RemoteObject*/ ).runMethod(false,"setTag",(b4xplusminus.__c.getField(true,"True"))); - BA.debugLineNum = 57;BA.debugLine="pnlMinus.Tag = False"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnlminus" /*RemoteObject*/ ).runMethod(false,"setTag",(b4xplusminus.__c.getField(true,"False"))); - BA.debugLineNum = 58;BA.debugLine="Formation = Props.Get(\"Orientation\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_formation" /*RemoteObject*/ ,BA.ObjectToString(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("Orientation")))))); - BA.debugLineNum = 59;BA.debugLine="mCyclic = Props.Get(\"Cyclic\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mcyclic" /*RemoteObject*/ ,BA.ObjectToBoolean(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("Cyclic")))))); - BA.debugLineNum = 60;BA.debugLine="mRapid = Props.Get(\"Rapid\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mrapid" /*RemoteObject*/ ,BA.ObjectToBoolean(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("Rapid")))))); - BA.debugLineNum = 61;BA.debugLine="mHaptic = Props.GetDefault(\"HapticFeedback\", Fals"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mhaptic" /*RemoteObject*/ ,BA.ObjectToBoolean(_props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("HapticFeedback"))),(Object)((b4xplusminus.__c.getField(true,"False")))))); - BA.debugLineNum = 62;BA.debugLine="Formatter.GetDefaultFormat.FormatFont = MainLabel"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_formatter" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xformatter.class, "_getdefaultformat" /*RemoteObject*/ ).setField ("FormatFont" /*RemoteObject*/ ,__ref.getField(false,"_mainlabel" /*RemoteObject*/ ).runMethod(false,"getFont")); - BA.debugLineNum = 63;BA.debugLine="Formatter.GetDefaultFormat.TextColor = MainLabel."; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_formatter" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xformatter.class, "_getdefaultformat" /*RemoteObject*/ ).setField ("TextColor" /*RemoteObject*/ ,__ref.getField(false,"_mainlabel" /*RemoteObject*/ ).runMethod(true,"getTextColor")); - BA.debugLineNum = 64;BA.debugLine="If Formation = \"Horizontal\" Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_formation" /*RemoteObject*/ ),BA.ObjectToString("Horizontal"))) { - BA.debugLineNum = 65;BA.debugLine="lblPlus = CreateLabel(Chr(0xE315))"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_lblplus" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_createlabel" /*RemoteObject*/ ,(Object)(BA.ObjectToString(b4xplusminus.__c.runMethod(true,"Chr",(Object)(BA.numberCast(int.class, ((int)0xe315)))))))); - BA.debugLineNum = 66;BA.debugLine="lblMinus = CreateLabel(Chr(0xE314))"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_lblminus" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_createlabel" /*RemoteObject*/ ,(Object)(BA.ObjectToString(b4xplusminus.__c.runMethod(true,"Chr",(Object)(BA.numberCast(int.class, ((int)0xe314)))))))); - }else { - BA.debugLineNum = 68;BA.debugLine="lblPlus = CreateLabel(Chr(0xE316))"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_lblplus" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_createlabel" /*RemoteObject*/ ,(Object)(BA.ObjectToString(b4xplusminus.__c.runMethod(true,"Chr",(Object)(BA.numberCast(int.class, ((int)0xe316)))))))); - BA.debugLineNum = 69;BA.debugLine="lblMinus = CreateLabel(Chr(0xE313))"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_lblminus" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_createlabel" /*RemoteObject*/ ,(Object)(BA.ObjectToString(b4xplusminus.__c.runMethod(true,"Chr",(Object)(BA.numberCast(int.class, ((int)0xe313)))))))); - }; - BA.debugLineNum = 71;BA.debugLine="lblMinus.SetTextAlignment(\"CENTER\", \"CENTER\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_lblminus" /*RemoteObject*/ ).runVoidMethod ("SetTextAlignment",(Object)(BA.ObjectToString("CENTER")),(Object)(RemoteObject.createImmutable("CENTER"))); - BA.debugLineNum = 72;BA.debugLine="lblPlus.SetTextAlignment(\"CENTER\", \"CENTER\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_lblplus" /*RemoteObject*/ ).runVoidMethod ("SetTextAlignment",(Object)(BA.ObjectToString("CENTER")),(Object)(RemoteObject.createImmutable("CENTER"))); - BA.debugLineNum = 73;BA.debugLine="MainLabel.SetTextAlignment(\"CENTER\", \"CENTER\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mainlabel" /*RemoteObject*/ ).runVoidMethod ("SetTextAlignment",(Object)(BA.ObjectToString("CENTER")),(Object)(RemoteObject.createImmutable("CENTER"))); - BA.debugLineNum = 74;BA.debugLine="mBase.AddView(MainLabel, 0, 0, 0, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_mainlabel" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 75;BA.debugLine="mBase.AddView(pnlPlus, 0, 0, 0, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_pnlplus" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 76;BA.debugLine="mBase.AddView(pnlMinus, 0, 0, 0, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_pnlminus" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 77;BA.debugLine="pnlPlus.AddView(lblPlus, 0, 0, 0, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnlplus" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_lblplus" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 78;BA.debugLine="pnlMinus.AddView(lblMinus, 0, 0, 0, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnlminus" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_lblminus" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 79;BA.debugLine="SetIndex(-1, False)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_setindex" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, -(double) (0 + 1))),(Object)(b4xplusminus.__c.getField(true,"False"))); - BA.debugLineNum = 80;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_base_resize" /*RemoteObject*/ ,(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"))),(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight")))); - BA.debugLineNum = 81;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getselectedvalue(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getSelectedValue (b4xplusminus) ","b4xplusminus",50,__ref.getField(false, "ba"),__ref,117); -if (RapidSub.canDelegate("getselectedvalue")) { return __ref.runUserSub(false, "b4xplusminus","getselectedvalue", __ref);} - BA.debugLineNum = 117;BA.debugLine="Public Sub getSelectedValue As Object"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 118;BA.debugLine="Return GetValueImpl (mSelectedIndex)"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_getvalueimpl" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_mselectedindex" /*RemoteObject*/ ))); - BA.debugLineNum = 119;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getvalueimpl(RemoteObject __ref,RemoteObject _index) throws Exception{ -try { - Debug.PushSubsStack("GetValueImpl (b4xplusminus) ","b4xplusminus",50,__ref.getField(false, "ba"),__ref,130); -if (RapidSub.canDelegate("getvalueimpl")) { return __ref.runUserSub(false, "b4xplusminus","getvalueimpl", __ref, _index);} -Debug.locals.put("Index", _index); - BA.debugLineNum = 130;BA.debugLine="Private Sub GetValueImpl (Index As Int) As Object"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 131;BA.debugLine="If StringMode Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_stringmode" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 132;BA.debugLine="Return mStringItems.Get(Index)"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_mstringitems" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(_index)); - }else { - BA.debugLineNum = 134;BA.debugLine="If Index = Size - 1 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_index,BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_size" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "-",1, 1)))) { - BA.debugLineNum = 135;BA.debugLine="Return mEndRange"; -Debug.JustUpdateDeviceLine(); -if (true) return (__ref.getField(true,"_mendrange" /*RemoteObject*/ )); - }else { - BA.debugLineNum = 137;BA.debugLine="Return mStartRange + Index * mInterval"; -Debug.JustUpdateDeviceLine(); -if (true) return (RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mstartrange" /*RemoteObject*/ ),_index,__ref.getField(true,"_minterval" /*RemoteObject*/ )}, "+*",1, 0)); - }; - }; - BA.debugLineNum = 140;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _increment(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Increment (b4xplusminus) ","b4xplusminus",50,__ref.getField(false, "ba"),__ref,162); -if (RapidSub.canDelegate("increment")) { return __ref.runUserSub(false, "b4xplusminus","increment", __ref);} -RemoteObject _v1 = RemoteObject.createImmutable(0); -RemoteObject _v2 = RemoteObject.createImmutable(0); - BA.debugLineNum = 162;BA.debugLine="Public Sub Increment"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 163;BA.debugLine="If mSelectedIndex = Size - 3 And StringMode = Fal"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_mselectedindex" /*RemoteObject*/ ),BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_size" /*RemoteObject*/ ),RemoteObject.createImmutable(3)}, "-",1, 1))) && RemoteObject.solveBoolean("=",__ref.getField(true,"_stringmode" /*RemoteObject*/ ),b4xplusminus.__c.getField(true,"False"))) { - BA.debugLineNum = 164;BA.debugLine="Dim v1 As Double = GetValueImpl(mSelectedIndex +"; -Debug.JustUpdateDeviceLine(); -_v1 = BA.numberCast(double.class, __ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_getvalueimpl" /*RemoteObject*/ ,(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mselectedindex" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "+",1, 1))));Debug.locals.put("v1", _v1);Debug.locals.put("v1", _v1); - BA.debugLineNum = 165;BA.debugLine="Dim v2 As Double = GetValueImpl(mSelectedIndex +"; -Debug.JustUpdateDeviceLine(); -_v2 = BA.numberCast(double.class, __ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_getvalueimpl" /*RemoteObject*/ ,(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mselectedindex" /*RemoteObject*/ ),RemoteObject.createImmutable(2)}, "+",1, 1))));Debug.locals.put("v2", _v2);Debug.locals.put("v2", _v2); - BA.debugLineNum = 166;BA.debugLine="If Formatter.Format(v1) = Formatter.Format(v2) T"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_formatter" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xformatter.class, "_format" /*RemoteObject*/ ,(Object)(_v1)),__ref.getField(false,"_formatter" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xformatter.class, "_format" /*RemoteObject*/ ,(Object)(_v2)))) { - BA.debugLineNum = 167;BA.debugLine="mSelectedIndex = mSelectedIndex + 1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mselectedindex" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mselectedindex" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "+",1, 1)); - }; - }; - BA.debugLineNum = 170;BA.debugLine="If mSelectedIndex >= Size - 1 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("g",__ref.getField(true,"_mselectedindex" /*RemoteObject*/ ),BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_size" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "-",1, 1)))) { - BA.debugLineNum = 171;BA.debugLine="If mCyclic Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_mcyclic" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 172;BA.debugLine="mSelectedIndex = -1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mselectedindex" /*RemoteObject*/ ,BA.numberCast(int.class, -(double) (0 + 1))); - }else { - BA.debugLineNum = 174;BA.debugLine="mSelectedIndex = Size - 1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mselectedindex" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_size" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "-",1, 1)); - BA.debugLineNum = 175;BA.debugLine="LoopIndex = LoopIndex + 1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_loopindex" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_loopindex" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "+",1, 1)); - BA.debugLineNum = 176;BA.debugLine="Return"; -Debug.JustUpdateDeviceLine(); -if (true) return RemoteObject.createImmutable(""); - }; - }; - BA.debugLineNum = 179;BA.debugLine="SetIndex(mSelectedIndex + 1, True)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_setindex" /*RemoteObject*/ ,(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mselectedindex" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "+",1, 1)),(Object)(b4xplusminus.__c.getField(true,"True"))); - BA.debugLineNum = 180;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _callback,RemoteObject _eventname) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xplusminus) ","b4xplusminus",50,__ref.getField(false, "ba"),__ref,31); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xplusminus","initialize", __ref, _ba, _callback, _eventname);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); -Debug.locals.put("Callback", _callback); -Debug.locals.put("EventName", _eventname); - BA.debugLineNum = 31;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 32;BA.debugLine="mEventName = EventName"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_meventname" /*RemoteObject*/ ,_eventname); - BA.debugLineNum = 33;BA.debugLine="mCallBack = Callback"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mcallback" /*RemoteObject*/ ,_callback); - BA.debugLineNum = 34;BA.debugLine="Formatter.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_formatter" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xformatter.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 35;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _internalsettextorcsbuildertolabel(RemoteObject __ref,RemoteObject _xlbl,RemoteObject _text) throws Exception{ -try { - Debug.PushSubsStack("InternalSetTextOrCSBuilderToLabel (b4xplusminus) ","b4xplusminus",50,__ref.getField(false, "ba"),__ref,257); -if (RapidSub.canDelegate("internalsettextorcsbuildertolabel")) { return __ref.runUserSub(false, "b4xplusminus","internalsettextorcsbuildertolabel", __ref, _xlbl, _text);} -Debug.locals.put("xlbl", _xlbl); -Debug.locals.put("Text", _text); - BA.debugLineNum = 257;BA.debugLine="Private Sub InternalSetTextOrCSBuilderToLabel(xlbl"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 259;BA.debugLine="xlbl.Text = Text"; -Debug.JustUpdateDeviceLine(); -_xlbl.runMethod(true,"setText",BA.ObjectToCharSequence(_text)); - BA.debugLineNum = 269;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _pnlarrow_touch(RemoteObject __ref,RemoteObject _action,RemoteObject _x,RemoteObject _y) throws Exception{ -try { - Debug.PushSubsStack("pnlArrow_Touch (b4xplusminus) ","b4xplusminus",50,__ref.getField(false, "ba"),__ref,195); -if (RapidSub.canDelegate("pnlarrow_touch")) { return __ref.runUserSub(false, "b4xplusminus","pnlarrow_touch", __ref, _action, _x, _y);} -Debug.locals.put("Action", _action); -Debug.locals.put("X", _x); -Debug.locals.put("Y", _y); - BA.debugLineNum = 195;BA.debugLine="Private Sub pnlArrow_Touch (Action As Int, X As Fl"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 196;BA.debugLine="Touch(Action = lblPlus.TOUCH_ACTION_DOWN, Action"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_touch" /*RemoteObject*/ ,(Object)(BA.ObjectToBoolean(RemoteObject.solveBoolean("=",_action,BA.numberCast(double.class, __ref.getField(false,"_lblplus" /*RemoteObject*/ ).getField(true,"TOUCH_ACTION_DOWN"))))),(Object)(BA.ObjectToBoolean(RemoteObject.solveBoolean("!",_action,BA.numberCast(double.class, __ref.getField(false,"_lblplus" /*RemoteObject*/ ).getField(true,"TOUCH_ACTION_MOVE"))))),RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), b4xplusminus.__c.runMethod(false,"Sender",__ref.getField(false, "ba")))); - BA.debugLineNum = 197;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setindex(RemoteObject __ref,RemoteObject _i,RemoteObject _raiseevent) throws Exception{ -try { - Debug.PushSubsStack("SetIndex (b4xplusminus) ","b4xplusminus",50,__ref.getField(false, "ba"),__ref,142); -if (RapidSub.canDelegate("setindex")) { return __ref.runUserSub(false, "b4xplusminus","setindex", __ref, _i, _raiseevent);} -RemoteObject _value = RemoteObject.declareNull("Object"); -Debug.locals.put("i", _i); -Debug.locals.put("RaiseEvent", _raiseevent); - BA.debugLineNum = 142;BA.debugLine="Private Sub SetIndex(i As Int, RaiseEvent As Boole"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 143;BA.debugLine="If i >= Size Then i = -1"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("g",_i,BA.numberCast(double.class, __ref.getField(true,"_size" /*RemoteObject*/ )))) { -_i = BA.numberCast(int.class, -(double) (0 + 1));Debug.locals.put("i", _i);}; - BA.debugLineNum = 144;BA.debugLine="mSelectedIndex = i"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mselectedindex" /*RemoteObject*/ ,_i); - BA.debugLineNum = 145;BA.debugLine="If mSelectedIndex = -1 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_mselectedindex" /*RemoteObject*/ ),BA.numberCast(double.class, -(double) (0 + 1)))) { - BA.debugLineNum = 146;BA.debugLine="MainLabel.Text = \"\""; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mainlabel" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("")); - }else { - BA.debugLineNum = 148;BA.debugLine="Dim value As Object = GetValueImpl (mSelectedInd"; -Debug.JustUpdateDeviceLine(); -_value = __ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_getvalueimpl" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_mselectedindex" /*RemoteObject*/ )));Debug.locals.put("value", _value);Debug.locals.put("value", _value); - BA.debugLineNum = 149;BA.debugLine="If StringMode Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_stringmode" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 150;BA.debugLine="InternalSetTextOrCSBuilderToLabel(MainLabel, va"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_internalsettextorcsbuildertolabel" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_mainlabel" /*RemoteObject*/ )),(Object)(_value)); - }else { - BA.debugLineNum = 152;BA.debugLine="MainLabel.Text = Formatter.Format(value)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mainlabel" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_formatter" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xformatter.class, "_format" /*RemoteObject*/ ,(Object)(BA.numberCast(double.class, _value))))); - }; - BA.debugLineNum = 154;BA.debugLine="If RaiseEvent And xui.SubExists(mCallBack, mEven"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(".",_raiseevent) && RemoteObject.solveBoolean(".",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"SubExists",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_valuechanged"))),(Object)(BA.numberCast(int.class, 1))))) { - BA.debugLineNum = 155;BA.debugLine="CallSub2(mCallBack, mEventName & \"_valuechanged"; -Debug.JustUpdateDeviceLine(); -b4xplusminus.__c.runMethodAndSync(false,"CallSubNew2",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_valuechanged"))),(Object)(_value)); - }; - }; - BA.debugLineNum = 158;BA.debugLine="lblPlus.Enabled = Size > 0 And (mCyclic Or mSelec"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_lblplus" /*RemoteObject*/ ).runMethod(true,"setEnabled",BA.ObjectToBoolean(RemoteObject.solveBoolean(">",__ref.getField(true,"_size" /*RemoteObject*/ ),BA.numberCast(double.class, 0)) && RemoteObject.solveBoolean(".",BA.ObjectToBoolean((RemoteObject.solveBoolean(".",__ref.getField(true,"_mcyclic" /*RemoteObject*/ )) || RemoteObject.solveBoolean("<",__ref.getField(true,"_mselectedindex" /*RemoteObject*/ ),BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_size" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "-",1, 1)))))))); - BA.debugLineNum = 159;BA.debugLine="lblMinus.Enabled = Size > 0 And (mCyclic Or mSele"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_lblminus" /*RemoteObject*/ ).runMethod(true,"setEnabled",BA.ObjectToBoolean(RemoteObject.solveBoolean(">",__ref.getField(true,"_size" /*RemoteObject*/ ),BA.numberCast(double.class, 0)) && RemoteObject.solveBoolean(".",BA.ObjectToBoolean((RemoteObject.solveBoolean(".",__ref.getField(true,"_mcyclic" /*RemoteObject*/ )) || RemoteObject.solveBoolean(">",__ref.getField(true,"_mselectedindex" /*RemoteObject*/ ),BA.numberCast(double.class, 0))))))); - BA.debugLineNum = 160;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setnumericrange(RemoteObject __ref,RemoteObject _startrange,RemoteObject _endrange,RemoteObject _interval) throws Exception{ -try { - Debug.PushSubsStack("SetNumericRange (b4xplusminus) ","b4xplusminus",50,__ref.getField(false, "ba"),__ref,108); -if (RapidSub.canDelegate("setnumericrange")) { return __ref.runUserSub(false, "b4xplusminus","setnumericrange", __ref, _startrange, _endrange, _interval);} -Debug.locals.put("StartRange", _startrange); -Debug.locals.put("EndRange", _endrange); -Debug.locals.put("Interval", _interval); - BA.debugLineNum = 108;BA.debugLine="Public Sub SetNumericRange (StartRange As Double,"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 109;BA.debugLine="Size = Ceil((EndRange - StartRange) / Interval) +"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_size" /*RemoteObject*/ ,BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {b4xplusminus.__c.runMethod(true,"Ceil",(Object)(RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {_endrange,_startrange}, "-",1, 0)),_interval}, "/",0, 0))),RemoteObject.createImmutable(1)}, "+",1, 0))); - BA.debugLineNum = 110;BA.debugLine="mStartRange = StartRange"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mstartrange" /*RemoteObject*/ ,_startrange); - BA.debugLineNum = 111;BA.debugLine="mEndRange = EndRange"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mendrange" /*RemoteObject*/ ,_endrange); - BA.debugLineNum = 112;BA.debugLine="mInterval = Interval"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_minterval" /*RemoteObject*/ ,_interval); - BA.debugLineNum = 113;BA.debugLine="StringMode = False"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_stringmode" /*RemoteObject*/ ,b4xplusminus.__c.getField(true,"False")); - BA.debugLineNum = 114;BA.debugLine="SetIndex(0, False)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_setindex" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, 0)),(Object)(b4xplusminus.__c.getField(true,"False"))); - BA.debugLineNum = 115;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setselectedvalue(RemoteObject __ref,RemoteObject _v) throws Exception{ -try { - Debug.PushSubsStack("setSelectedValue (b4xplusminus) ","b4xplusminus",50,__ref.getField(false, "ba"),__ref,121); -if (RapidSub.canDelegate("setselectedvalue")) { return __ref.runUserSub(false, "b4xplusminus","setselectedvalue", __ref, _v);} -RemoteObject _n = RemoteObject.createImmutable(0); -Debug.locals.put("v", _v); - BA.debugLineNum = 121;BA.debugLine="Public Sub setSelectedValue (v As Object)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 122;BA.debugLine="If StringMode Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_stringmode" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 123;BA.debugLine="SetIndex(mStringItems.IndexOf(v), False)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_setindex" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_mstringitems" /*RemoteObject*/ ).runMethod(true,"IndexOf",(Object)(_v))),(Object)(b4xplusminus.__c.getField(true,"False"))); - }else { - BA.debugLineNum = 125;BA.debugLine="Dim n As Double = v"; -Debug.JustUpdateDeviceLine(); -_n = BA.numberCast(double.class, _v);Debug.locals.put("n", _n);Debug.locals.put("n", _n); - BA.debugLineNum = 126;BA.debugLine="SetIndex(Min(Size - 1, Max(0, Round((n - mStartR"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_setindex" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, b4xplusminus.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_size" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "-",1, 1))),(Object)(b4xplusminus.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, 0)),(Object)(BA.numberCast(double.class, b4xplusminus.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {_n,__ref.getField(true,"_mstartrange" /*RemoteObject*/ )}, "-",1, 0)),__ref.getField(true,"_minterval" /*RemoteObject*/ )}, "/",0, 0)))))))))),(Object)(b4xplusminus.__c.getField(true,"False"))); - }; - BA.debugLineNum = 128;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setstringitems(RemoteObject __ref,RemoteObject _list) throws Exception{ -try { - Debug.PushSubsStack("SetStringItems (b4xplusminus) ","b4xplusminus",50,__ref.getField(false, "ba"),__ref,101); -if (RapidSub.canDelegate("setstringitems")) { return __ref.runUserSub(false, "b4xplusminus","setstringitems", __ref, _list);} -Debug.locals.put("list", _list); - BA.debugLineNum = 101;BA.debugLine="Public Sub SetStringItems (list As List)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 102;BA.debugLine="mStringItems = list"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mstringitems" /*RemoteObject*/ ,_list); - BA.debugLineNum = 103;BA.debugLine="StringMode = True"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_stringmode" /*RemoteObject*/ ,b4xplusminus.__c.getField(true,"True")); - BA.debugLineNum = 104;BA.debugLine="Size = mStringItems.Size"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_size" /*RemoteObject*/ ,__ref.getField(false,"_mstringitems" /*RemoteObject*/ ).runMethod(true,"getSize")); - BA.debugLineNum = 105;BA.debugLine="SetIndex(-1, False)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_setindex" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, -(double) (0 + 1))),(Object)(b4xplusminus.__c.getField(true,"False"))); - BA.debugLineNum = 106;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _startdownloop(RemoteObject __ref,RemoteObject _up) throws Exception{ -try { - Debug.PushSubsStack("StartDownLoop (b4xplusminus) ","b4xplusminus",50,__ref.getField(false, "ba"),__ref,234); -if (RapidSub.canDelegate("startdownloop")) { __ref.runUserSub(false, "b4xplusminus","startdownloop", __ref, _up); return;} -ResumableSub_StartDownLoop rsub = new ResumableSub_StartDownLoop(null,__ref,_up); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_StartDownLoop extends BA.ResumableSub { -public ResumableSub_StartDownLoop(keymon.lat.medicomed.b4xplusminus parent,RemoteObject __ref,RemoteObject _up) { -this.parent = parent; -this.__ref = __ref; -this._up = _up; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.b4xplusminus parent; -RemoteObject _up; -RemoteObject _myindex = RemoteObject.createImmutable(0); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("StartDownLoop (b4xplusminus) ","b4xplusminus",50,__ref.getField(false, "ba"),__ref,234); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); -Debug.locals.put("Up", _up); - BA.debugLineNum = 235;BA.debugLine="LoopIndex = LoopIndex + 1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_loopindex" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_loopindex" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "+",1, 1)); - BA.debugLineNum = 236;BA.debugLine="If mRapid = False Then Return"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 1: -//if -this.state = 6; -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_mrapid" /*RemoteObject*/ ),parent.__c.getField(true,"False"))) { -this.state = 3; -;}if (true) break; - -case 3: -//C -this.state = 6; -if (true) return ; -if (true) break; - -case 6: -//C -this.state = 7; -; - BA.debugLineNum = 237;BA.debugLine="Dim MyIndex As Int = LoopIndex"; -Debug.JustUpdateDeviceLine(); -_myindex = __ref.getField(true,"_loopindex" /*RemoteObject*/ );Debug.locals.put("MyIndex", _myindex);Debug.locals.put("MyIndex", _myindex); - BA.debugLineNum = 238;BA.debugLine="Sleep(RapidPeriod1)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xplusminus", "startdownloop"),__ref.getField(true,"_rapidperiod1" /*RemoteObject*/ )); -this.state = 19; -return; -case 19: -//C -this.state = 7; -; - BA.debugLineNum = 239;BA.debugLine="Do While MyIndex = LoopIndex"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 7: -//do while -this.state = 18; -while (RemoteObject.solveBoolean("=",_myindex,BA.numberCast(double.class, __ref.getField(true,"_loopindex" /*RemoteObject*/ )))) { -this.state = 9; -if (true) break; -} -if (true) break; - -case 9: -//C -this.state = 10; - BA.debugLineNum = 240;BA.debugLine="If Up Then Increment Else Decrement"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 10: -//if -this.state = 17; -if (_up.get().booleanValue()) { -this.state = 12; -;} -else { -this.state = 14; -;}if (true) break; - -case 12: -//C -this.state = 17; -__ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_increment" /*RemoteObject*/ ); -if (true) break; - -case 14: -//C -this.state = 17; -__ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_decrement" /*RemoteObject*/ ); -if (true) break; - -case 17: -//C -this.state = 7; -; - BA.debugLineNum = 241;BA.debugLine="Sleep(RapidPeriod2)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xplusminus", "startdownloop"),__ref.getField(true,"_rapidperiod2" /*RemoteObject*/ )); -this.state = 20; -return; -case 20: -//C -this.state = 7; -; - if (true) break; - -case 18: -//C -this.state = -1; -; - BA.debugLineNum = 243;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _touch(RemoteObject __ref,RemoteObject _start,RemoteObject _stop,RemoteObject _pnl) throws Exception{ -try { - Debug.PushSubsStack("Touch (b4xplusminus) ","b4xplusminus",50,__ref.getField(false, "ba"),__ref,199); -if (RapidSub.canDelegate("touch")) { return __ref.runUserSub(false, "b4xplusminus","touch", __ref, _start, _stop, _pnl);} -Debug.locals.put("Start", _start); -Debug.locals.put("Stop", _stop); -Debug.locals.put("pnl", _pnl); - BA.debugLineNum = 199;BA.debugLine="Private Sub Touch (Start As Boolean, Stop As Boole"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 200;BA.debugLine="If pnl.GetView(0).Enabled = False Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_pnl.runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0))).runMethod(true,"getEnabled"),b4xplusminus.__c.getField(true,"False"))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 201;BA.debugLine="If Start Then"; -Debug.JustUpdateDeviceLine(); -if (_start.get().booleanValue()) { - BA.debugLineNum = 202;BA.debugLine="If mHaptic Then XUIViewsUtils.PerformHapticFeedb"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_mhaptic" /*RemoteObject*/ ).get().booleanValue()) { -b4xplusminus._xuiviewsutils.runVoidMethod ("_performhapticfeedback" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(_pnl));}; - BA.debugLineNum = 203;BA.debugLine="If pnl.Tag = True Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_pnl.runMethod(false,"getTag"),(b4xplusminus.__c.getField(true,"True")))) { - BA.debugLineNum = 204;BA.debugLine="Increment"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_increment" /*RemoteObject*/ ); - BA.debugLineNum = 205;BA.debugLine="StartDownLoop(True)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_startdownloop" /*void*/ ,(Object)(b4xplusminus.__c.getField(true,"True"))); - }else { - BA.debugLineNum = 207;BA.debugLine="Decrement"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_decrement" /*RemoteObject*/ ); - BA.debugLineNum = 208;BA.debugLine="StartDownLoop(False)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xplusminus.class, "_startdownloop" /*void*/ ,(Object)(b4xplusminus.__c.getField(true,"False"))); - }; - }else -{ BA.debugLineNum = 210;BA.debugLine="Else If Stop Then"; -Debug.JustUpdateDeviceLine(); -if (_stop.get().booleanValue()) { - BA.debugLineNum = 211;BA.debugLine="LoopIndex = LoopIndex + 1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_loopindex" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_loopindex" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "+",1, 1)); - }} -; - BA.debugLineNum = 213;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xradiobutton.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xradiobutton.java deleted file mode 100644 index a1b625b..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xradiobutton.java +++ /dev/null @@ -1,49 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xradiobutton { - public static RemoteObject myClass; - public b4xradiobutton() { - } - public static PCBA staticBA = new PCBA(null, b4xradiobutton.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _meventname = RemoteObject.createImmutable(""); -public static RemoteObject _mcallback = RemoteObject.declareNull("Object"); -public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _oncolor = RemoteObject.createImmutable(0); -public static RemoteObject _offcolor = RemoteObject.createImmutable(0); -public static RemoteObject _bc = RemoteObject.declareNull("b4a.example.bitmapcreator"); -public static RemoteObject _iv = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _mvalue = RemoteObject.createImmutable(false); -public static RemoteObject _transparent = RemoteObject.declareNull("b4a.example.bcpath._bcbrush"); -public static RemoteObject _loopindex = RemoteObject.createImmutable(0); -public static RemoteObject _tag = RemoteObject.declareNull("Object"); -public static RemoteObject _onbrush = RemoteObject.declareNull("b4a.example.bcpath._bcbrush"); -public static RemoteObject _offbrush = RemoteObject.declareNull("b4a.example.bcpath._bcbrush"); -public static RemoteObject _menabled = RemoteObject.createImmutable(false); -public static RemoteObject _mhaptic = RemoteObject.createImmutable(false); -public static RemoteObject _size = RemoteObject.createImmutable(0); -public static RemoteObject _mlabel = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _pnl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _scale = RemoteObject.createImmutable(0f); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"bc",_ref.getField(false, "_bc"),"DateUtils",_ref.getField(false, "_dateutils"),"iv",_ref.getField(false, "_iv"),"LoopIndex",_ref.getField(false, "_loopindex"),"mBase",_ref.getField(false, "_mbase"),"mCallBack",_ref.getField(false, "_mcallback"),"mEnabled",_ref.getField(false, "_menabled"),"mEventName",_ref.getField(false, "_meventname"),"mHaptic",_ref.getField(false, "_mhaptic"),"mLabel",_ref.getField(false, "_mlabel"),"mValue",_ref.getField(false, "_mvalue"),"OffBrush",_ref.getField(false, "_offbrush"),"OffColor",_ref.getField(false, "_offcolor"),"OnBrush",_ref.getField(false, "_onbrush"),"OnColor",_ref.getField(false, "_oncolor"),"pnl",_ref.getField(false, "_pnl"),"Scale",_ref.getField(false, "_scale"),"Size",_ref.getField(false, "_size"),"Tag",_ref.getField(false, "_tag"),"transparent",_ref.getField(false, "_transparent"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xradiobutton_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xradiobutton_subs_0.java deleted file mode 100644 index 154dc82..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xradiobutton_subs_0.java +++ /dev/null @@ -1,797 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xradiobutton_subs_0 { - - -public static RemoteObject _base_resize(RemoteObject __ref,RemoteObject _width1,RemoteObject _height1) throws Exception{ -try { - Debug.PushSubsStack("Base_Resize (b4xradiobutton) ","b4xradiobutton",51,__ref.getField(false, "ba"),__ref,59); -if (RapidSub.canDelegate("base_resize")) { return __ref.runUserSub(false, "b4xradiobutton","base_resize", __ref, _width1, _height1);} -RemoteObject _newsize = RemoteObject.createImmutable(0); -RemoteObject _gap = RemoteObject.createImmutable(0); -Debug.locals.put("Width1", _width1); -Debug.locals.put("Height1", _height1); - BA.debugLineNum = 59;BA.debugLine="Private Sub Base_Resize (Width1 As Double, Height1"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 60;BA.debugLine="Dim NewSize As Int = Max(5dip, Height1)"; -Debug.JustUpdateDeviceLine(); -_newsize = BA.numberCast(int.class, b4xradiobutton.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, b4xradiobutton.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 5))))),(Object)(_height1)));Debug.locals.put("NewSize", _newsize);Debug.locals.put("NewSize", _newsize); - BA.debugLineNum = 61;BA.debugLine="If NewSize = Size Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_newsize,BA.numberCast(double.class, __ref.getField(true,"_size" /*RemoteObject*/ )))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 62;BA.debugLine="Size = NewSize"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_size" /*RemoteObject*/ ,_newsize); - BA.debugLineNum = 63;BA.debugLine="Dim gap As Int = 3dip"; -Debug.JustUpdateDeviceLine(); -_gap = b4xradiobutton.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 3)));Debug.locals.put("gap", _gap);Debug.locals.put("gap", _gap); - BA.debugLineNum = 65;BA.debugLine="bc.Initialize(NewSize - 2 * gap, NewSize - 2 * ga"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.solve(new RemoteObject[] {_newsize,RemoteObject.createImmutable(2),_gap}, "-*",1, 1)),(Object)(RemoteObject.solve(new RemoteObject[] {_newsize,RemoteObject.createImmutable(2),_gap}, "-*",1, 1))); - BA.debugLineNum = 66;BA.debugLine="Scale = xui.Scale"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_scale" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getScale")); - BA.debugLineNum = 71;BA.debugLine="iv.SetLayoutAnimated(0, gap, gap, Size - 2 * gap,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_iv" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(_gap),(Object)(_gap),(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_size" /*RemoteObject*/ ),RemoteObject.createImmutable(2),_gap}, "-*",1, 1)),(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_size" /*RemoteObject*/ ),RemoteObject.createImmutable(2),_gap}, "-*",1, 1))); - BA.debugLineNum = 72;BA.debugLine="pnl.SetLayoutAnimated(0, 0, 0, Width1, Height1)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnl" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, _width1)),(Object)(BA.numberCast(int.class, _height1))); - BA.debugLineNum = 73;BA.debugLine="mLabel.SetLayoutAnimated(0, Size + gap, 0, Width1"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mlabel" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_size" /*RemoteObject*/ ),_gap}, "+",1, 1)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_width1,__ref.getField(true,"_size" /*RemoteObject*/ ),_gap}, "--",2, 0))),(Object)(BA.numberCast(int.class, _height1))); - BA.debugLineNum = 74;BA.debugLine="OnBrush = bc.CreateBrushFromColor(OnColor)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_onbrush" /*RemoteObject*/ ,__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_createbrushfromcolor",(Object)(__ref.getField(true,"_oncolor" /*RemoteObject*/ )))); - BA.debugLineNum = 75;BA.debugLine="OffBrush = bc.CreateBrushFromColor(OffColor)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_offbrush" /*RemoteObject*/ ,__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_createbrushfromcolor",(Object)(__ref.getField(true,"_offcolor" /*RemoteObject*/ )))); - BA.debugLineNum = 76;BA.debugLine="transparent = bc.CreateBrushFromColor(xui.Color_T"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_transparent" /*RemoteObject*/ ,__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_createbrushfromcolor",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")))); - BA.debugLineNum = 77;BA.debugLine="SetValueImpl(mValue, True)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xradiobutton.class, "_setvalueimpl" /*void*/ ,(Object)(__ref.getField(true,"_mvalue" /*RemoteObject*/ )),(Object)(b4xradiobutton.__c.getField(true,"True"))); - BA.debugLineNum = 78;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 6;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 7;BA.debugLine="Private mEventName As String 'ignore"; -b4xradiobutton._meventname = RemoteObject.createImmutable("");__ref.setField("_meventname",b4xradiobutton._meventname); - //BA.debugLineNum = 8;BA.debugLine="Private mCallBack As Object 'ignore"; -b4xradiobutton._mcallback = RemoteObject.createNew ("Object");__ref.setField("_mcallback",b4xradiobutton._mcallback); - //BA.debugLineNum = 9;BA.debugLine="Public mBase As B4XView 'ignore"; -b4xradiobutton._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",b4xradiobutton._mbase); - //BA.debugLineNum = 10;BA.debugLine="Private xui As XUI 'ignore"; -b4xradiobutton._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",b4xradiobutton._xui); - //BA.debugLineNum = 11;BA.debugLine="Public OnColor, OffColor As Int"; -b4xradiobutton._oncolor = RemoteObject.createImmutable(0);__ref.setField("_oncolor",b4xradiobutton._oncolor); -b4xradiobutton._offcolor = RemoteObject.createImmutable(0);__ref.setField("_offcolor",b4xradiobutton._offcolor); - //BA.debugLineNum = 12;BA.debugLine="Private bc As BitmapCreator"; -b4xradiobutton._bc = RemoteObject.createNew ("b4a.example.bitmapcreator");__ref.setField("_bc",b4xradiobutton._bc); - //BA.debugLineNum = 13;BA.debugLine="Private iv As B4XView"; -b4xradiobutton._iv = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_iv",b4xradiobutton._iv); - //BA.debugLineNum = 14;BA.debugLine="Private mValue As Boolean"; -b4xradiobutton._mvalue = RemoteObject.createImmutable(false);__ref.setField("_mvalue",b4xradiobutton._mvalue); - //BA.debugLineNum = 15;BA.debugLine="Private transparent As BCBrush"; -b4xradiobutton._transparent = RemoteObject.createNew ("b4a.example.bcpath._bcbrush");__ref.setField("_transparent",b4xradiobutton._transparent); - //BA.debugLineNum = 16;BA.debugLine="Private LoopIndex As Int"; -b4xradiobutton._loopindex = RemoteObject.createImmutable(0);__ref.setField("_loopindex",b4xradiobutton._loopindex); - //BA.debugLineNum = 17;BA.debugLine="Public Tag As Object"; -b4xradiobutton._tag = RemoteObject.createNew ("Object");__ref.setField("_tag",b4xradiobutton._tag); - //BA.debugLineNum = 18;BA.debugLine="Private OnBrush, OffBrush As BCBrush"; -b4xradiobutton._onbrush = RemoteObject.createNew ("b4a.example.bcpath._bcbrush");__ref.setField("_onbrush",b4xradiobutton._onbrush); -b4xradiobutton._offbrush = RemoteObject.createNew ("b4a.example.bcpath._bcbrush");__ref.setField("_offbrush",b4xradiobutton._offbrush); - //BA.debugLineNum = 19;BA.debugLine="Private mEnabled As Boolean = True"; -b4xradiobutton._menabled = b4xradiobutton.__c.getField(true,"True");__ref.setField("_menabled",b4xradiobutton._menabled); - //BA.debugLineNum = 20;BA.debugLine="Public mHaptic As Boolean"; -b4xradiobutton._mhaptic = RemoteObject.createImmutable(false);__ref.setField("_mhaptic",b4xradiobutton._mhaptic); - //BA.debugLineNum = 21;BA.debugLine="Private Size As Int"; -b4xradiobutton._size = RemoteObject.createImmutable(0);__ref.setField("_size",b4xradiobutton._size); - //BA.debugLineNum = 22;BA.debugLine="Public mLabel As B4XView"; -b4xradiobutton._mlabel = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mlabel",b4xradiobutton._mlabel); - //BA.debugLineNum = 23;BA.debugLine="Private pnl As B4XView"; -b4xradiobutton._pnl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_pnl",b4xradiobutton._pnl); - //BA.debugLineNum = 24;BA.debugLine="Private Scale As Float 'ignore"; -b4xradiobutton._scale = RemoteObject.createImmutable(0f);__ref.setField("_scale",b4xradiobutton._scale); - //BA.debugLineNum = 25;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _designercreateview(RemoteObject __ref,RemoteObject _base,RemoteObject _lbl,RemoteObject _props) throws Exception{ -try { - Debug.PushSubsStack("DesignerCreateView (b4xradiobutton) ","b4xradiobutton",51,__ref.getField(false, "ba"),__ref,33); -if (RapidSub.canDelegate("designercreateview")) { return __ref.runUserSub(false, "b4xradiobutton","designercreateview", __ref, _base, _lbl, _props);} -RemoteObject _iiv = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -Debug.locals.put("Base", _base); -Debug.locals.put("Lbl", _lbl); -Debug.locals.put("Props", _props); - BA.debugLineNum = 33;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 34;BA.debugLine="mBase = Base"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).setObject (_base); - BA.debugLineNum = 35;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_tag" /*RemoteObject*/ ,__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"getTag")); - BA.debugLineNum = 35;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"setTag",__ref); - BA.debugLineNum = 36;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetColorAndBorder",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 37;BA.debugLine="pnl = xui.CreatePanel(\"pnl\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_pnl" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("pnl")))); - BA.debugLineNum = 38;BA.debugLine="pnl.Color = xui.Color_Transparent"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnl" /*RemoteObject*/ ).runMethod(true,"setColor",__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")); - BA.debugLineNum = 39;BA.debugLine="Dim iiv As ImageView"; -Debug.JustUpdateDeviceLine(); -_iiv = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");Debug.locals.put("iiv", _iiv); - BA.debugLineNum = 40;BA.debugLine="iiv.Initialize(\"\")"; -Debug.JustUpdateDeviceLine(); -_iiv.runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable(""))); - BA.debugLineNum = 41;BA.debugLine="iv = iiv"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_iv" /*RemoteObject*/ ).setObject (_iiv.getObject()); - BA.debugLineNum = 42;BA.debugLine="mBase.AddView(iv, 0, 0, 0, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_iv" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 43;BA.debugLine="mLabel = Lbl"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mlabel" /*RemoteObject*/ ).setObject (_lbl.getObject()); - BA.debugLineNum = 44;BA.debugLine="mLabel.SetTextAlignment(\"CENTER\", \"LEFT\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mlabel" /*RemoteObject*/ ).runVoidMethod ("SetTextAlignment",(Object)(BA.ObjectToString("CENTER")),(Object)(RemoteObject.createImmutable("LEFT"))); - BA.debugLineNum = 45;BA.debugLine="mBase.AddView(mLabel, 0, 0, 0, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_mlabel" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 46;BA.debugLine="mBase.AddView(pnl, 0, 0, 0, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_pnl" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 48;BA.debugLine="OnColor = xui.PaintOrColorToColor(Props.Get(\"OnCo"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_oncolor" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("OnColor"))))))); - BA.debugLineNum = 49;BA.debugLine="OffColor = xui.PaintOrColorToColor(Props.Get(\"Off"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_offcolor" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("OffColor"))))))); - BA.debugLineNum = 50;BA.debugLine="mHaptic = Props.GetDefault(\"HapticFeedback\", Fals"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mhaptic" /*RemoteObject*/ ,BA.ObjectToBoolean(_props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("HapticFeedback"))),(Object)((b4xradiobutton.__c.getField(true,"False")))))); - BA.debugLineNum = 52;BA.debugLine="mEnabled = mBase.Enabled"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_menabled" /*RemoteObject*/ ,__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getEnabled")); - BA.debugLineNum = 53;BA.debugLine="mBase.Enabled = True"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"setEnabled",b4xradiobutton.__c.getField(true,"True")); - BA.debugLineNum = 54;BA.debugLine="mValue = Props.Get(\"Value\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mvalue" /*RemoteObject*/ ,BA.ObjectToBoolean(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("Value")))))); - BA.debugLineNum = 55;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xradiobutton.class, "_base_resize" /*RemoteObject*/ ,(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"))),(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight")))); - BA.debugLineNum = 56;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _draw(RemoteObject __ref,RemoteObject _state) throws Exception{ -try { - Debug.PushSubsStack("Draw (b4xradiobutton) ","b4xradiobutton",51,__ref.getField(false, "ba"),__ref,153); -if (RapidSub.canDelegate("draw")) { return __ref.runUserSub(false, "b4xradiobutton","draw", __ref, _state);} -RemoteObject _r = RemoteObject.createImmutable(0f); -Debug.locals.put("State", _state); - BA.debugLineNum = 153;BA.debugLine="Private Sub Draw (State As Float)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 154;BA.debugLine="bc.DrawRect2(bc.TargetRect, transparent, True, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_drawrect2",(Object)(__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(false,"_targetrect")),(Object)(__ref.getField(false,"_transparent" /*RemoteObject*/ )),(Object)(b4xradiobutton.__c.getField(true,"True")),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 155;BA.debugLine="Dim r As Float = Floor(bc.mHeight / 2)"; -Debug.JustUpdateDeviceLine(); -_r = BA.numberCast(float.class, b4xradiobutton.__c.runMethod(true,"Floor",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(true,"_mheight"),RemoteObject.createImmutable(2)}, "/",0, 0))));Debug.locals.put("r", _r);Debug.locals.put("r", _r); - BA.debugLineNum = 156;BA.debugLine="If State < 1 Then bc.DrawCircle2(r, r, r, OffBrus"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("<",_state,BA.numberCast(double.class, 1))) { -__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_drawcircle2",(Object)(_r),(Object)(_r),(Object)(_r),(Object)(__ref.getField(false,"_offbrush" /*RemoteObject*/ )),(Object)(b4xradiobutton.__c.getField(true,"True")),(Object)(BA.numberCast(int.class, 0)));}; - BA.debugLineNum = 157;BA.debugLine="If State > 0 Then bc.DrawCircle2(r, r, r * State,"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",_state,BA.numberCast(double.class, 0))) { -__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_drawcircle2",(Object)(_r),(Object)(_r),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_r,_state}, "*",0, 0))),(Object)(__ref.getField(false,"_onbrush" /*RemoteObject*/ )),(Object)(b4xradiobutton.__c.getField(true,"True")),(Object)(BA.numberCast(int.class, 0)));}; - BA.debugLineNum = 158;BA.debugLine="bc.SetBitmapToImageView(bc.Bitmap, iv)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_setbitmaptoimageview",(Object)(__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_getbitmap")),(Object)(__ref.getField(false,"_iv" /*RemoteObject*/ ))); - BA.debugLineNum = 159;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getchecked(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getChecked (b4xradiobutton) ","b4xradiobutton",51,__ref.getField(false, "ba"),__ref,140); -if (RapidSub.canDelegate("getchecked")) { return __ref.runUserSub(false, "b4xradiobutton","getchecked", __ref);} - BA.debugLineNum = 140;BA.debugLine="Public Sub getChecked As Boolean"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 141;BA.debugLine="Return mValue"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_mvalue" /*RemoteObject*/ ); - BA.debugLineNum = 142;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getenabled(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getEnabled (b4xradiobutton) ","b4xradiobutton",51,__ref.getField(false, "ba"),__ref,149); -if (RapidSub.canDelegate("getenabled")) { return __ref.runUserSub(false, "b4xradiobutton","getenabled", __ref);} - BA.debugLineNum = 149;BA.debugLine="Public Sub getEnabled As Boolean"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 150;BA.debugLine="Return mEnabled"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_menabled" /*RemoteObject*/ ); - BA.debugLineNum = 151;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _gettext(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getText (b4xradiobutton) ","b4xradiobutton",51,__ref.getField(false, "ba"),__ref,165); -if (RapidSub.canDelegate("gettext")) { return __ref.runUserSub(false, "b4xradiobutton","gettext", __ref);} - BA.debugLineNum = 165;BA.debugLine="Public Sub getText As Object"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 166;BA.debugLine="Return mLabel.Text"; -Debug.JustUpdateDeviceLine(); -if (true) return (__ref.getField(false,"_mlabel" /*RemoteObject*/ ).runMethod(true,"getText")); - BA.debugLineNum = 167;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _callback,RemoteObject _eventname) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xradiobutton) ","b4xradiobutton",51,__ref.getField(false, "ba"),__ref,27); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xradiobutton","initialize", __ref, _ba, _callback, _eventname);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); -Debug.locals.put("Callback", _callback); -Debug.locals.put("EventName", _eventname); - BA.debugLineNum = 27;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 28;BA.debugLine="mEventName = EventName"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_meventname" /*RemoteObject*/ ,_eventname); - BA.debugLineNum = 29;BA.debugLine="mCallBack = Callback"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mcallback" /*RemoteObject*/ ,_callback); - BA.debugLineNum = 30;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _pnl_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("pnl_Click (b4xradiobutton) ","b4xradiobutton",51,__ref.getField(false, "ba"),__ref,86); -if (RapidSub.canDelegate("pnl_click")) { return __ref.runUserSub(false, "b4xradiobutton","pnl_click", __ref);} - BA.debugLineNum = 86;BA.debugLine="Private Sub pnl_Click"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 88;BA.debugLine="If mValue Then Return"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_mvalue" /*RemoteObject*/ ).get().booleanValue()) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 89;BA.debugLine="If mEnabled Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_menabled" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 90;BA.debugLine="If mHaptic Then XUIViewsUtils.PerformHapticFeedb"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_mhaptic" /*RemoteObject*/ ).get().booleanValue()) { -b4xradiobutton._xuiviewsutils.runVoidMethod ("_performhapticfeedback" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ )));}; - BA.debugLineNum = 91;BA.debugLine="SetValueImpl(Not(mValue), False)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xradiobutton.class, "_setvalueimpl" /*void*/ ,(Object)(b4xradiobutton.__c.runMethod(true,"Not",(Object)(__ref.getField(true,"_mvalue" /*RemoteObject*/ )))),(Object)(b4xradiobutton.__c.getField(true,"False"))); - BA.debugLineNum = 92;BA.debugLine="If mValue And xui.SubExists(mCallBack, mEventNam"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(".",__ref.getField(true,"_mvalue" /*RemoteObject*/ )) && RemoteObject.solveBoolean(".",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"SubExists",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_Checked"))),(Object)(BA.numberCast(int.class, 0))))) { - BA.debugLineNum = 93;BA.debugLine="CallSubDelayed(mCallBack, mEventName & \"_Checke"; -Debug.JustUpdateDeviceLine(); -b4xradiobutton.__c.runVoidMethod ("CallSubDelayed",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_Checked")))); - }; - }; - BA.debugLineNum = 96;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setchecked(RemoteObject __ref,RemoteObject _b) throws Exception{ -try { - Debug.PushSubsStack("setChecked (b4xradiobutton) ","b4xradiobutton",51,__ref.getField(false, "ba"),__ref,135); -if (RapidSub.canDelegate("setchecked")) { return __ref.runUserSub(false, "b4xradiobutton","setchecked", __ref, _b);} -Debug.locals.put("b", _b); - BA.debugLineNum = 135;BA.debugLine="Public Sub setChecked(b As Boolean)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 136;BA.debugLine="If b = mValue Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_b,__ref.getField(true,"_mvalue" /*RemoteObject*/ ))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 137;BA.debugLine="SetValueImpl(b, False)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xradiobutton.class, "_setvalueimpl" /*void*/ ,(Object)(_b),(Object)(b4xradiobutton.__c.getField(true,"False"))); - BA.debugLineNum = 138;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setenabled(RemoteObject __ref,RemoteObject _b) throws Exception{ -try { - Debug.PushSubsStack("setEnabled (b4xradiobutton) ","b4xradiobutton",51,__ref.getField(false, "ba"),__ref,144); -if (RapidSub.canDelegate("setenabled")) { return __ref.runUserSub(false, "b4xradiobutton","setenabled", __ref, _b);} -Debug.locals.put("b", _b); - BA.debugLineNum = 144;BA.debugLine="Public Sub setEnabled (b As Boolean)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 145;BA.debugLine="mEnabled = b"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_menabled" /*RemoteObject*/ ,_b); - BA.debugLineNum = 146;BA.debugLine="SetValueImpl(mValue, True)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xradiobutton.class, "_setvalueimpl" /*void*/ ,(Object)(__ref.getField(true,"_mvalue" /*RemoteObject*/ )),(Object)(b4xradiobutton.__c.getField(true,"True"))); - BA.debugLineNum = 147;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _settext(RemoteObject __ref,RemoteObject _t) throws Exception{ -try { - Debug.PushSubsStack("setText (b4xradiobutton) ","b4xradiobutton",51,__ref.getField(false, "ba"),__ref,161); -if (RapidSub.canDelegate("settext")) { return __ref.runUserSub(false, "b4xradiobutton","settext", __ref, _t);} -Debug.locals.put("t", _t); - BA.debugLineNum = 161;BA.debugLine="Public Sub setText (t As Object)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 162;BA.debugLine="XUIViewsUtils.SetTextOrCSBuilderToLabel(mLabel, t"; -Debug.JustUpdateDeviceLine(); -b4xradiobutton._xuiviewsutils.runVoidMethod ("_settextorcsbuildertolabel" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mlabel" /*RemoteObject*/ )),(Object)(_t)); - BA.debugLineNum = 163;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _setvalueimpl(RemoteObject __ref,RemoteObject _b,RemoteObject _immediate) throws Exception{ -try { - Debug.PushSubsStack("SetValueImpl (b4xradiobutton) ","b4xradiobutton",51,__ref.getField(false, "ba"),__ref,98); -if (RapidSub.canDelegate("setvalueimpl")) { __ref.runUserSub(false, "b4xradiobutton","setvalueimpl", __ref, _b, _immediate); return;} -ResumableSub_SetValueImpl rsub = new ResumableSub_SetValueImpl(null,__ref,_b,_immediate); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_SetValueImpl extends BA.ResumableSub { -public ResumableSub_SetValueImpl(keymon.lat.medicomed.b4xradiobutton parent,RemoteObject __ref,RemoteObject _b,RemoteObject _immediate) { -this.parent = parent; -this.__ref = __ref; -this._b = _b; -this._immediate = _immediate; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.b4xradiobutton parent; -RemoteObject _b; -RemoteObject _immediate; -int _i = 0; -RemoteObject _v = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _rb = RemoteObject.declareNull("keymon.lat.medicomed.b4xradiobutton"); -RemoteObject _myindex = RemoteObject.createImmutable(0); -RemoteObject _start = RemoteObject.createImmutable(0L); -RemoteObject _duration = RemoteObject.createImmutable(0); -RemoteObject _state1 = RemoteObject.createImmutable(0f); -int step3; -int limit3; - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("SetValueImpl (b4xradiobutton) ","b4xradiobutton",51,__ref.getField(false, "ba"),__ref,98); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); -Debug.locals.put("b", _b); -Debug.locals.put("Immediate", _immediate); - BA.debugLineNum = 99;BA.debugLine="mValue = b"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mvalue" /*RemoteObject*/ ,_b); - BA.debugLineNum = 100;BA.debugLine="If b = True Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 1: -//if -this.state = 12; -if (RemoteObject.solveBoolean("=",_b,parent.__c.getField(true,"True"))) { -this.state = 3; -}if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 101;BA.debugLine="For i = 0 To mBase.Parent.NumberOfViews - 1"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 4: -//for -this.state = 11; -step3 = 1; -limit3 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"getParent").runMethod(true,"getNumberOfViews"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -Debug.locals.put("i", _i); -this.state = 59; -if (true) break; - -case 59: -//C -this.state = 11; -if ((step3 > 0 && _i <= limit3) || (step3 < 0 && _i >= limit3)) this.state = 6; -if (true) break; - -case 60: -//C -this.state = 59; -_i = ((int)(0 + _i + step3)) ; -Debug.locals.put("i", _i); -if (true) break; - -case 6: -//C -this.state = 7; - BA.debugLineNum = 102;BA.debugLine="Dim v As B4XView = mBase.Parent.GetView(i)"; -Debug.JustUpdateDeviceLine(); -_v = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_v = __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"getParent").runMethod(false,"GetView",(Object)(BA.numberCast(int.class, _i)));Debug.locals.put("v", _v);Debug.locals.put("v", _v); - BA.debugLineNum = 103;BA.debugLine="If v <> mBase And v.Tag Is B4XRadioButton Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 7: -//if -this.state = 10; -if (RemoteObject.solveBoolean("!",_v,__ref.getField(false,"_mbase" /*RemoteObject*/ )) && RemoteObject.solveBoolean("i",_v.runMethod(false,"getTag"), RemoteObject.createImmutable("keymon.lat.medicomed.b4xradiobutton"))) { -this.state = 9; -}if (true) break; - -case 9: -//C -this.state = 10; - BA.debugLineNum = 104;BA.debugLine="Dim rb As B4XRadioButton = v.Tag"; -Debug.JustUpdateDeviceLine(); -_rb = (_v.runMethod(false,"getTag"));Debug.locals.put("rb", _rb);Debug.locals.put("rb", _rb); - BA.debugLineNum = 105;BA.debugLine="rb.Checked = False"; -Debug.JustUpdateDeviceLine(); -_rb.runClassMethod (keymon.lat.medicomed.b4xradiobutton.class, "_setchecked" /*RemoteObject*/ ,parent.__c.getField(true,"False")); - if (true) break; - -case 10: -//C -this.state = 60; -; - if (true) break; -if (true) break; - -case 11: -//C -this.state = 12; -Debug.locals.put("i", _i); -; - if (true) break; - -case 12: -//C -this.state = 13; -; - BA.debugLineNum = 109;BA.debugLine="LoopIndex = LoopIndex + 1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_loopindex" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_loopindex" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "+",1, 1)); - BA.debugLineNum = 110;BA.debugLine="If Immediate Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 13: -//if -this.state = 53; -if (_immediate.get().booleanValue()) { -this.state = 15; -}else { -this.state = 25; -}if (true) break; - -case 15: -//C -this.state = 16; - BA.debugLineNum = 111;BA.debugLine="If mValue Then Draw(1) Else Draw(0)"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 16: -//if -this.state = 23; -if (__ref.getField(true,"_mvalue" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 18; -;} -else { -this.state = 20; -;}if (true) break; - -case 18: -//C -this.state = 23; -__ref.runClassMethod (keymon.lat.medicomed.b4xradiobutton.class, "_draw" /*RemoteObject*/ ,(Object)(BA.numberCast(float.class, 1))); -if (true) break; - -case 20: -//C -this.state = 23; -__ref.runClassMethod (keymon.lat.medicomed.b4xradiobutton.class, "_draw" /*RemoteObject*/ ,(Object)(BA.numberCast(float.class, 0))); -if (true) break; - -case 23: -//C -this.state = 53; -; - if (true) break; - -case 25: -//C -this.state = 26; - BA.debugLineNum = 113;BA.debugLine="Dim MyIndex As Int = LoopIndex"; -Debug.JustUpdateDeviceLine(); -_myindex = __ref.getField(true,"_loopindex" /*RemoteObject*/ );Debug.locals.put("MyIndex", _myindex);Debug.locals.put("MyIndex", _myindex); - BA.debugLineNum = 114;BA.debugLine="Dim start As Long = DateTime.Now"; -Debug.JustUpdateDeviceLine(); -_start = parent.__c.getField(false,"DateTime").runMethod(true,"getNow");Debug.locals.put("start", _start);Debug.locals.put("start", _start); - BA.debugLineNum = 115;BA.debugLine="Dim duration As Int = 200"; -Debug.JustUpdateDeviceLine(); -_duration = BA.numberCast(int.class, 200);Debug.locals.put("duration", _duration);Debug.locals.put("duration", _duration); - BA.debugLineNum = 116;BA.debugLine="Do While DateTime.Now < start + duration"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 26: -//do while -this.state = 41; -while (RemoteObject.solveBoolean("<",parent.__c.getField(false,"DateTime").runMethod(true,"getNow"),RemoteObject.solve(new RemoteObject[] {_start,_duration}, "+",1, 2))) { -this.state = 28; -if (true) break; -} -if (true) break; - -case 28: -//C -this.state = 29; - BA.debugLineNum = 117;BA.debugLine="Dim state1 As Float = (DateTime.Now - start) /"; -Debug.JustUpdateDeviceLine(); -_state1 = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {parent.__c.getField(false,"DateTime").runMethod(true,"getNow"),_start}, "-",1, 2)),_duration}, "/",0, 0));Debug.locals.put("state1", _state1);Debug.locals.put("state1", _state1); - BA.debugLineNum = 118;BA.debugLine="If mValue = False Then state1 = 1 - state1"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 29: -//if -this.state = 34; -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_mvalue" /*RemoteObject*/ ),parent.__c.getField(true,"False"))) { -this.state = 31; -;}if (true) break; - -case 31: -//C -this.state = 34; -_state1 = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(1),_state1}, "-",1, 0));Debug.locals.put("state1", _state1); -if (true) break; - -case 34: -//C -this.state = 35; -; - BA.debugLineNum = 119;BA.debugLine="Draw(state1)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xradiobutton.class, "_draw" /*RemoteObject*/ ,(Object)(_state1)); - BA.debugLineNum = 120;BA.debugLine="Sleep(16)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xradiobutton", "setvalueimpl"),BA.numberCast(int.class, 16)); -this.state = 61; -return; -case 61: -//C -this.state = 35; -; - BA.debugLineNum = 121;BA.debugLine="If MyIndex <> LoopIndex Then Exit"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 35: -//if -this.state = 40; -if (RemoteObject.solveBoolean("!",_myindex,BA.numberCast(double.class, __ref.getField(true,"_loopindex" /*RemoteObject*/ )))) { -this.state = 37; -;}if (true) break; - -case 37: -//C -this.state = 40; -this.state = 41; -if (true) break; -if (true) break; - -case 40: -//C -this.state = 26; -; - if (true) break; -; - BA.debugLineNum = 123;BA.debugLine="If MyIndex = LoopIndex Then"; -Debug.JustUpdateDeviceLine(); - -case 41: -//if -this.state = 52; -if (RemoteObject.solveBoolean("=",_myindex,BA.numberCast(double.class, __ref.getField(true,"_loopindex" /*RemoteObject*/ )))) { -this.state = 43; -}if (true) break; - -case 43: -//C -this.state = 44; - BA.debugLineNum = 124;BA.debugLine="If mValue Then Draw(1) Else Draw(0)"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 44: -//if -this.state = 51; -if (__ref.getField(true,"_mvalue" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 46; -;} -else { -this.state = 48; -;}if (true) break; - -case 46: -//C -this.state = 51; -__ref.runClassMethod (keymon.lat.medicomed.b4xradiobutton.class, "_draw" /*RemoteObject*/ ,(Object)(BA.numberCast(float.class, 1))); -if (true) break; - -case 48: -//C -this.state = 51; -__ref.runClassMethod (keymon.lat.medicomed.b4xradiobutton.class, "_draw" /*RemoteObject*/ ,(Object)(BA.numberCast(float.class, 0))); -if (true) break; - -case 51: -//C -this.state = 52; -; - if (true) break; - -case 52: -//C -this.state = 53; -; - if (true) break; -; - BA.debugLineNum = 127;BA.debugLine="If mEnabled Then"; -Debug.JustUpdateDeviceLine(); - -case 53: -//if -this.state = 58; -if (__ref.getField(true,"_menabled" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 55; -}else { -this.state = 57; -}if (true) break; - -case 55: -//C -this.state = 58; - BA.debugLineNum = 128;BA.debugLine="XUIViewsUtils.SetAlpha(mBase, 1)"; -Debug.JustUpdateDeviceLine(); -parent._xuiviewsutils.runVoidMethod ("_setalpha" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ )),(Object)(BA.numberCast(float.class, 1))); - if (true) break; - -case 57: -//C -this.state = 58; - BA.debugLineNum = 130;BA.debugLine="XUIViewsUtils.SetAlpha(mBase, 0.4)"; -Debug.JustUpdateDeviceLine(); -parent._xuiviewsutils.runVoidMethod ("_setalpha" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ )),(Object)(BA.numberCast(float.class, 0.4))); - if (true) break; - -case 58: -//C -this.state = -1; -; - BA.debugLineNum = 133;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xsearchtemplate.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xsearchtemplate.java deleted file mode 100644 index 15925e5..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xsearchtemplate.java +++ /dev/null @@ -1,47 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xsearchtemplate { - public static RemoteObject myClass; - public b4xsearchtemplate() { - } - public static PCBA staticBA = new PCBA(null, b4xsearchtemplate.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _customlistview1 = RemoteObject.declareNull("b4a.example3.customlistview"); -public static RemoteObject _xdialog = RemoteObject.declareNull("keymon.lat.medicomed.b4xdialog"); -public static RemoteObject _searchfield = RemoteObject.declareNull("keymon.lat.medicomed.b4xfloattextfield"); -public static RemoteObject _prefixlist = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -public static RemoteObject _substringlist = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -public static RemoteObject _texthighlightcolor = RemoteObject.createImmutable(0); -public static RemoteObject _itemhightlightcolor = RemoteObject.createImmutable(0); -public static RemoteObject _max_limit = RemoteObject.createImmutable(0); -public static RemoteObject _maxnumberofitemstoshow = RemoteObject.createImmutable(0); -public static RemoteObject _itemscache = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _allitems = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _selecteditem = RemoteObject.createImmutable(""); -public static RemoteObject _lastterm = RemoteObject.createImmutable(""); -public static RemoteObject _ime = RemoteObject.declareNull("anywheresoftware.b4a.objects.IME"); -public static RemoteObject _allowunlistedtext = RemoteObject.createImmutable(false); -public static RemoteObject _prefixonly = RemoteObject.createImmutable(false); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"AllItems",_ref.getField(false, "_allitems"),"AllowUnlistedText",_ref.getField(false, "_allowunlistedtext"),"CustomListView1",_ref.getField(false, "_customlistview1"),"DateUtils",_ref.getField(false, "_dateutils"),"IME",_ref.getField(false, "_ime"),"ItemHightlightColor",_ref.getField(false, "_itemhightlightcolor"),"ItemsCache",_ref.getField(false, "_itemscache"),"LastTerm",_ref.getField(false, "_lastterm"),"MAX_LIMIT",_ref.getField(false, "_max_limit"),"MaxNumberOfItemsToShow",_ref.getField(false, "_maxnumberofitemstoshow"),"mBase",_ref.getField(false, "_mbase"),"prefixList",_ref.getField(false, "_prefixlist"),"PrefixOnly",_ref.getField(false, "_prefixonly"),"SearchField",_ref.getField(false, "_searchfield"),"SelectedItem",_ref.getField(false, "_selecteditem"),"substringList",_ref.getField(false, "_substringlist"),"TextHighlightColor",_ref.getField(false, "_texthighlightcolor"),"xDialog",_ref.getField(false, "_xdialog"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xsearchtemplate_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xsearchtemplate_subs_0.java deleted file mode 100644 index 76942cc..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xsearchtemplate_subs_0.java +++ /dev/null @@ -1,748 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xsearchtemplate_subs_0 { - - -public static RemoteObject _additemstolist(RemoteObject __ref,RemoteObject _li,RemoteObject _full) throws Exception{ -try { - Debug.PushSubsStack("AddItemsToList (b4xsearchtemplate) ","b4xsearchtemplate",52,__ref.getField(false, "ba"),__ref,128); -if (RapidSub.canDelegate("additemstolist")) { return __ref.runUserSub(false, "b4xsearchtemplate","additemstolist", __ref, _li, _full);} -int _i = 0; -RemoteObject _item = RemoteObject.createImmutable(""); -RemoteObject _x = RemoteObject.createImmutable(0); -RemoteObject _pnlcolor = RemoteObject.createImmutable(0); -RemoteObject _cs = RemoteObject.declareNull("anywheresoftware.b4a.objects.CSBuilder"); -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -Debug.locals.put("li", _li); -Debug.locals.put("full", _full); - BA.debugLineNum = 128;BA.debugLine="Private Sub AddItemsToList(li As List, full As Str"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 129;BA.debugLine="If li.IsInitialized = False Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_li.runMethod(true,"IsInitialized"),b4xsearchtemplate.__c.getField(true,"False"))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 134;BA.debugLine="For i = 0 To li.Size - 1"; -Debug.JustUpdateDeviceLine(); -{ -final int step2 = 1; -final int limit2 = RemoteObject.solve(new RemoteObject[] {_li.runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step2 > 0 && _i <= limit2) || (step2 < 0 && _i >= limit2) ;_i = ((int)(0 + _i + step2)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 135;BA.debugLine="If CustomListView1.Size >= MaxNumberOfItemsToSho"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("g",__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runMethod(true,"_getsize"),BA.numberCast(double.class, __ref.getField(true,"_maxnumberofitemstoshow" /*RemoteObject*/ )))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 136;BA.debugLine="Dim item As String = li.Get(i)"; -Debug.JustUpdateDeviceLine(); -_item = BA.ObjectToString(_li.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))));Debug.locals.put("item", _item);Debug.locals.put("item", _item); - BA.debugLineNum = 137;BA.debugLine="Dim x As Int = item.ToLowerCase.IndexOf(full)"; -Debug.JustUpdateDeviceLine(); -_x = _item.runMethod(true,"toLowerCase").runMethod(true,"indexOf",(Object)(_full));Debug.locals.put("x", _x);Debug.locals.put("x", _x); - BA.debugLineNum = 138;BA.debugLine="If x = -1 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_x,BA.numberCast(double.class, -(double) (0 + 1)))) { - BA.debugLineNum = 139;BA.debugLine="Continue"; -Debug.JustUpdateDeviceLine(); -if (true) continue; - }; - BA.debugLineNum = 141;BA.debugLine="Dim pnlColor As Int"; -Debug.JustUpdateDeviceLine(); -_pnlcolor = RemoteObject.createImmutable(0);Debug.locals.put("pnlColor", _pnlcolor); - BA.debugLineNum = 142;BA.debugLine="If CustomListView1.Size = 0 And full.Length > 0"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runMethod(true,"_getsize"),BA.numberCast(double.class, 0)) && RemoteObject.solveBoolean(">",_full.runMethod(true,"length"),BA.numberCast(double.class, 0)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_allowunlistedtext" /*RemoteObject*/ ),b4xsearchtemplate.__c.getField(true,"False"))) { - BA.debugLineNum = 143;BA.debugLine="pnlColor = ItemHightlightColor"; -Debug.JustUpdateDeviceLine(); -_pnlcolor = __ref.getField(true,"_itemhightlightcolor" /*RemoteObject*/ );Debug.locals.put("pnlColor", _pnlcolor); - }else { - BA.debugLineNum = 145;BA.debugLine="pnlColor = CustomListView1.DefaultTextBackgroun"; -Debug.JustUpdateDeviceLine(); -_pnlcolor = __ref.getField(false,"_customlistview1" /*RemoteObject*/ ).getField(true,"_defaulttextbackgroundcolor");Debug.locals.put("pnlColor", _pnlcolor); - }; - BA.debugLineNum = 148;BA.debugLine="Dim cs As CSBuilder"; -Debug.JustUpdateDeviceLine(); -_cs = RemoteObject.createNew ("anywheresoftware.b4a.objects.CSBuilder");Debug.locals.put("cs", _cs); - BA.debugLineNum = 149;BA.debugLine="cs.Initialize.Append(item.SubString2(0, x)).Colo"; -Debug.JustUpdateDeviceLine(); -_cs.runMethod(false,"Initialize").runMethod(false,"Append",(Object)(BA.ObjectToCharSequence(_item.runMethod(true,"substring",(Object)(BA.numberCast(int.class, 0)),(Object)(_x))))).runMethod(false,"Color",(Object)(__ref.getField(true,"_texthighlightcolor" /*RemoteObject*/ ))).runMethod(false,"Append",(Object)(BA.ObjectToCharSequence(_item.runMethod(true,"substring",(Object)(_x),(Object)(RemoteObject.solve(new RemoteObject[] {_x,_full.runMethod(true,"length")}, "+",1, 1)))))).runVoidMethod ("Pop"); - BA.debugLineNum = 150;BA.debugLine="cs.Append(item.SubString(x + full.Length))"; -Debug.JustUpdateDeviceLine(); -_cs.runVoidMethod ("Append",(Object)(BA.ObjectToCharSequence(_item.runMethod(true,"substring",(Object)(RemoteObject.solve(new RemoteObject[] {_x,_full.runMethod(true,"length")}, "+",1, 1)))))); - BA.debugLineNum = 151;BA.debugLine="If ItemsCache.Size > 0 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_itemscache" /*RemoteObject*/ ).runMethod(true,"getSize"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 152;BA.debugLine="Dim p As B4XView = ItemsCache.Get(ItemsCache.Si"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_p = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), __ref.getField(false,"_itemscache" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_itemscache" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1))));Debug.locals.put("p", _p);Debug.locals.put("p", _p); - BA.debugLineNum = 153;BA.debugLine="ItemsCache.RemoveAt(ItemsCache.Size - 1)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_itemscache" /*RemoteObject*/ ).runVoidMethod ("RemoveAt",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_itemscache" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1))); - BA.debugLineNum = 155;BA.debugLine="p.GetView(0).Text = cs"; -Debug.JustUpdateDeviceLine(); -_p.runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0))).runMethod(true,"setText",BA.ObjectToCharSequence(_cs.getObject())); - BA.debugLineNum = 160;BA.debugLine="p.Color = pnlColor"; -Debug.JustUpdateDeviceLine(); -_p.runMethod(true,"setColor",_pnlcolor); - BA.debugLineNum = 161;BA.debugLine="CustomListView1.Add(p, item)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runVoidMethod ("_add",(Object)(_p),(Object)((_item))); - }else { - BA.debugLineNum = 163;BA.debugLine="CustomListView1.AddTextItem(cs, item)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runVoidMethod ("_addtextitem",(Object)((_cs.getObject())),(Object)((_item))); - }; - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 184;BA.debugLine="For i = 0 To li.Size - 1"; -Debug.JustUpdateDeviceLine(); -{ -final int step28 = 1; -final int limit28 = RemoteObject.solve(new RemoteObject[] {_li.runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step28 > 0 && _i <= limit28) || (step28 < 0 && _i >= limit28) ;_i = ((int)(0 + _i + step28)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 185;BA.debugLine="Dim item As String = li.Get(i)"; -Debug.JustUpdateDeviceLine(); -_item = BA.ObjectToString(_li.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))));Debug.locals.put("item", _item);Debug.locals.put("item", _item); - BA.debugLineNum = 186;BA.debugLine="Dim x As Int = item.ToLowerCase.IndexOf(full)"; -Debug.JustUpdateDeviceLine(); -_x = _item.runMethod(true,"toLowerCase").runMethod(true,"indexOf",(Object)(_full));Debug.locals.put("x", _x);Debug.locals.put("x", _x); - BA.debugLineNum = 187;BA.debugLine="If x = -1 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_x,BA.numberCast(double.class, -(double) (0 + 1)))) { - BA.debugLineNum = 188;BA.debugLine="Continue"; -Debug.JustUpdateDeviceLine(); -if (true) continue; - }; - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 191;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Private xui As XUI"; -b4xsearchtemplate._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",b4xsearchtemplate._xui); - //BA.debugLineNum = 3;BA.debugLine="Public mBase As B4XView"; -b4xsearchtemplate._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",b4xsearchtemplate._mbase); - //BA.debugLineNum = 4;BA.debugLine="Public CustomListView1 As CustomListView"; -b4xsearchtemplate._customlistview1 = RemoteObject.createNew ("b4a.example3.customlistview");__ref.setField("_customlistview1",b4xsearchtemplate._customlistview1); - //BA.debugLineNum = 5;BA.debugLine="Private xDialog As B4XDialog"; -b4xsearchtemplate._xdialog = RemoteObject.createNew ("keymon.lat.medicomed.b4xdialog");__ref.setField("_xdialog",b4xsearchtemplate._xdialog); - //BA.debugLineNum = 6;BA.debugLine="Public SearchField As B4XFloatTextField"; -b4xsearchtemplate._searchfield = RemoteObject.createNew ("keymon.lat.medicomed.b4xfloattextfield");__ref.setField("_searchfield",b4xsearchtemplate._searchfield); - //BA.debugLineNum = 7;BA.debugLine="Private prefixList As Map"; -b4xsearchtemplate._prefixlist = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");__ref.setField("_prefixlist",b4xsearchtemplate._prefixlist); - //BA.debugLineNum = 8;BA.debugLine="Private substringList As Map"; -b4xsearchtemplate._substringlist = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");__ref.setField("_substringlist",b4xsearchtemplate._substringlist); - //BA.debugLineNum = 9;BA.debugLine="Public TextHighlightColor As Int = 0xFFFD5C5C"; -b4xsearchtemplate._texthighlightcolor = BA.numberCast(int.class, ((int)0xfffd5c5c));__ref.setField("_texthighlightcolor",b4xsearchtemplate._texthighlightcolor); - //BA.debugLineNum = 10;BA.debugLine="Public ItemHightlightColor As Int = 0x7E008EFF"; -b4xsearchtemplate._itemhightlightcolor = BA.numberCast(int.class, ((int)0x7e008eff));__ref.setField("_itemhightlightcolor",b4xsearchtemplate._itemhightlightcolor); - //BA.debugLineNum = 11;BA.debugLine="Private MAX_LIMIT = 4 As Int"; -b4xsearchtemplate._max_limit = BA.numberCast(int.class, 4);__ref.setField("_max_limit",b4xsearchtemplate._max_limit); - //BA.debugLineNum = 12;BA.debugLine="Public MaxNumberOfItemsToShow As Int = 100"; -b4xsearchtemplate._maxnumberofitemstoshow = BA.numberCast(int.class, 100);__ref.setField("_maxnumberofitemstoshow",b4xsearchtemplate._maxnumberofitemstoshow); - //BA.debugLineNum = 13;BA.debugLine="Private ItemsCache As List"; -b4xsearchtemplate._itemscache = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_itemscache",b4xsearchtemplate._itemscache); - //BA.debugLineNum = 14;BA.debugLine="Private AllItems As List"; -b4xsearchtemplate._allitems = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_allitems",b4xsearchtemplate._allitems); - //BA.debugLineNum = 15;BA.debugLine="Public SelectedItem As String"; -b4xsearchtemplate._selecteditem = RemoteObject.createImmutable("");__ref.setField("_selecteditem",b4xsearchtemplate._selecteditem); - //BA.debugLineNum = 16;BA.debugLine="Private LastTerm As String"; -b4xsearchtemplate._lastterm = RemoteObject.createImmutable("");__ref.setField("_lastterm",b4xsearchtemplate._lastterm); - //BA.debugLineNum = 18;BA.debugLine="Private IME As IME"; -b4xsearchtemplate._ime = RemoteObject.createNew ("anywheresoftware.b4a.objects.IME");__ref.setField("_ime",b4xsearchtemplate._ime); - //BA.debugLineNum = 20;BA.debugLine="Public AllowUnlistedText As Boolean"; -b4xsearchtemplate._allowunlistedtext = RemoteObject.createImmutable(false);__ref.setField("_allowunlistedtext",b4xsearchtemplate._allowunlistedtext); - //BA.debugLineNum = 21;BA.debugLine="Public PrefixOnly As Boolean"; -b4xsearchtemplate._prefixonly = RemoteObject.createImmutable(false);__ref.setField("_prefixonly",b4xsearchtemplate._prefixonly); - //BA.debugLineNum = 22;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _customlistview1_itemclick(RemoteObject __ref,RemoteObject _index,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("CustomListView1_ItemClick (b4xsearchtemplate) ","b4xsearchtemplate",52,__ref.getField(false, "ba"),__ref,122); -if (RapidSub.canDelegate("customlistview1_itemclick")) { return __ref.runUserSub(false, "b4xsearchtemplate","customlistview1_itemclick", __ref, _index, _value);} -Debug.locals.put("Index", _index); -Debug.locals.put("Value", _value); - BA.debugLineNum = 122;BA.debugLine="Private Sub CustomListView1_ItemClick (Index As In"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 123;BA.debugLine="If Value = \"\" Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_value,RemoteObject.createImmutable(("")))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 124;BA.debugLine="SelectedItem = Value"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_selecteditem" /*RemoteObject*/ ,BA.ObjectToString(_value)); - BA.debugLineNum = 125;BA.debugLine="xDialog.Close(xui.DialogResponse_Positive)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_xdialog" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_close" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"DialogResponse_Positive"))); - BA.debugLineNum = 126;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _dialogclosed(RemoteObject __ref,RemoteObject _result) throws Exception{ -try { - Debug.PushSubsStack("DialogClosed (b4xsearchtemplate) ","b4xsearchtemplate",52,__ref.getField(false, "ba"),__ref,241); -if (RapidSub.canDelegate("dialogclosed")) { return __ref.runUserSub(false, "b4xsearchtemplate","dialogclosed", __ref, _result);} -Debug.locals.put("Result", _result); - BA.debugLineNum = 241;BA.debugLine="Private Sub DialogClosed(Result As Int) 'ignore"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 243;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getpanel(RemoteObject __ref,RemoteObject _dialog) throws Exception{ -try { - Debug.PushSubsStack("GetPanel (b4xsearchtemplate) ","b4xsearchtemplate",52,__ref.getField(false, "ba"),__ref,61); -if (RapidSub.canDelegate("getpanel")) { return __ref.runUserSub(false, "b4xsearchtemplate","getpanel", __ref, _dialog);} -Debug.locals.put("Dialog", _dialog); - BA.debugLineNum = 61;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 62;BA.debugLine="Return mBase"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_mbase" /*RemoteObject*/ ); - BA.debugLineNum = 63;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xsearchtemplate) ","b4xsearchtemplate",52,__ref.getField(false, "ba"),__ref,24); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xsearchtemplate","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -RemoteObject _height = RemoteObject.createImmutable(0); -RemoteObject _jo = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 24;BA.debugLine="Public Sub Initialize"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 25;BA.debugLine="mBase = xui.CreatePanel(\"mBase\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mbase" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("mBase")))); - BA.debugLineNum = 27;BA.debugLine="Dim height As Int"; -Debug.JustUpdateDeviceLine(); -_height = RemoteObject.createImmutable(0);Debug.locals.put("height", _height); - BA.debugLineNum = 28;BA.debugLine="If xui.IsB4A Or xui.IsB4i Then height = 220dip El"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(".",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4A")) || RemoteObject.solveBoolean(".",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4i"))) { -_height = b4xsearchtemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 220)));Debug.locals.put("height", _height);} -else { -_height = b4xsearchtemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 300)));Debug.locals.put("height", _height);}; - BA.debugLineNum = 29;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, 300dip, height)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(b4xsearchtemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 300)))),(Object)(_height)); - BA.debugLineNum = 30;BA.debugLine="mBase.LoadLayout(\"SearchTemplate\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("SearchTemplate")),__ref.getField(false, "ba")); - BA.debugLineNum = 31;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetColorAndBorder",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 32;BA.debugLine="CustomListView1.sv.SetColorAndBorder(xui.Color_Tr"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).getField(false,"_sv").runVoidMethod ("SetColorAndBorder",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 33;BA.debugLine="CustomListView1.DefaultTextBackgroundColor = 0xFF"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).setField ("_defaulttextbackgroundcolor",BA.numberCast(int.class, ((int)0xff555555))); - BA.debugLineNum = 34;BA.debugLine="CustomListView1.DefaultTextColor = xui.Color_Whit"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).setField ("_defaulttextcolor",__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_White")); - BA.debugLineNum = 44;BA.debugLine="ItemsCache.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_itemscache" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 45;BA.debugLine="prefixList.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_prefixlist" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 46;BA.debugLine="substringList.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_substringlist" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 48;BA.debugLine="IME.Initialize(\"\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_ime" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(RemoteObject.createImmutable(""))); - BA.debugLineNum = 49;BA.debugLine="Dim jo As JavaObject = SearchField.TextField"; -Debug.JustUpdateDeviceLine(); -_jo = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_jo = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), __ref.getField(false,"_searchfield" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_gettextfield" /*RemoteObject*/ ).getObject());Debug.locals.put("jo", _jo);Debug.locals.put("jo", _jo); - BA.debugLineNum = 50;BA.debugLine="jo.RunMethod(\"setImeOptions\", Array(Bit.Or(335544"; -Debug.JustUpdateDeviceLine(); -_jo.runVoidMethod ("RunMethod",(Object)(BA.ObjectToString("setImeOptions")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(b4xsearchtemplate.__c.getField(false,"Bit").runMethod(true,"Or",(Object)(BA.numberCast(int.class, 33554432)),(Object)(BA.numberCast(int.class, 6))))}))); - BA.debugLineNum = 52;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("Resize (b4xsearchtemplate) ","b4xsearchtemplate",52,__ref.getField(false, "ba"),__ref,54); -if (RapidSub.canDelegate("resize")) { return __ref.runUserSub(false, "b4xsearchtemplate","resize", __ref, _width, _height);} -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 54;BA.debugLine="Public Sub Resize(Width As Int, Height As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 55;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, Width, Height)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(_width),(Object)(_height)); - BA.debugLineNum = 56;BA.debugLine="Dim c As B4XView = CustomListView1.AsView"; -Debug.JustUpdateDeviceLine(); -_c = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_c = __ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runMethod(false,"_asview");Debug.locals.put("c", _c);Debug.locals.put("c", _c); - BA.debugLineNum = 57;BA.debugLine="c.SetLayoutAnimated(0, 0, c.Top, Width, Height -"; -Debug.JustUpdateDeviceLine(); -_c.runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(_c.runMethod(true,"getTop")),(Object)(_width),(Object)(RemoteObject.solve(new RemoteObject[] {_height,_c.runMethod(true,"getTop")}, "-",1, 1))); - BA.debugLineNum = 58;BA.debugLine="CustomListView1.Base_Resize(Width, c.Height)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runVoidMethod ("_base_resize",(Object)(BA.numberCast(double.class, _width)),(Object)(BA.numberCast(double.class, _c.runMethod(true,"getHeight")))); - BA.debugLineNum = 59;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _searchfield_enterpressed(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("SearchField_EnterPressed (b4xsearchtemplate) ","b4xsearchtemplate",52,__ref.getField(false, "ba"),__ref,112); -if (RapidSub.canDelegate("searchfield_enterpressed")) { return __ref.runUserSub(false, "b4xsearchtemplate","searchfield_enterpressed", __ref);} - BA.debugLineNum = 112;BA.debugLine="Private Sub SearchField_EnterPressed"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 113;BA.debugLine="If AllowUnlistedText Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_allowunlistedtext" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 114;BA.debugLine="SelectedItem = LastTerm"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_selecteditem" /*RemoteObject*/ ,__ref.getField(true,"_lastterm" /*RemoteObject*/ )); - BA.debugLineNum = 115;BA.debugLine="xDialog.Close(xui.DialogResponse_Positive)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_xdialog" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_close" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"DialogResponse_Positive"))); - }else -{ BA.debugLineNum = 116;BA.debugLine="Else If CustomListView1.Size > 0 And LastTerm.Len"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runMethod(true,"_getsize"),BA.numberCast(double.class, 0)) && RemoteObject.solveBoolean(">",__ref.getField(true,"_lastterm" /*RemoteObject*/ ).runMethod(true,"length"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 117;BA.debugLine="CustomListView1_ItemClick(0, CustomListView1.Get"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xsearchtemplate.class, "_customlistview1_itemclick" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runMethod(false,"_getvalue",(Object)(BA.numberCast(int.class, 0))))); - }} -; - BA.debugLineNum = 119;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _searchfield_textchanged(RemoteObject __ref,RemoteObject _old,RemoteObject _new) throws Exception{ -try { - Debug.PushSubsStack("SearchField_TextChanged (b4xsearchtemplate) ","b4xsearchtemplate",52,__ref.getField(false, "ba"),__ref,81); -if (RapidSub.canDelegate("searchfield_textchanged")) { return __ref.runUserSub(false, "b4xsearchtemplate","searchfield_textchanged", __ref, _old, _new);} -Debug.locals.put("Old", _old); -Debug.locals.put("New", _new); - BA.debugLineNum = 81;BA.debugLine="Private Sub SearchField_TextChanged (Old As String"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 82;BA.debugLine="Update(New, False)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xsearchtemplate.class, "_update" /*RemoteObject*/ ,(Object)(_new),(Object)(b4xsearchtemplate.__c.getField(true,"False"))); - BA.debugLineNum = 83;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setindex(RemoteObject __ref,RemoteObject _index) throws Exception{ -try { - Debug.PushSubsStack("SetIndex (b4xsearchtemplate) ","b4xsearchtemplate",52,__ref.getField(false, "ba"),__ref,233); -if (RapidSub.canDelegate("setindex")) { return __ref.runUserSub(false, "b4xsearchtemplate","setindex", __ref, _index);} -RemoteObject _obj = null; -Debug.locals.put("Index", _index); - BA.debugLineNum = 233;BA.debugLine="Public Sub SetIndex(Index As Object)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 234;BA.debugLine="Dim obj() As Object"; -Debug.JustUpdateDeviceLine(); -_obj = RemoteObject.createNewArray ("Object", new int[] {0}, new Object[]{});Debug.locals.put("obj", _obj); - BA.debugLineNum = 235;BA.debugLine="obj = Index"; -Debug.JustUpdateDeviceLine(); -_obj = (_index);Debug.locals.put("obj", _obj); - BA.debugLineNum = 236;BA.debugLine="prefixList = obj(0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_prefixlist" /*RemoteObject*/ ).setObject (_obj.getArrayElement(false,BA.numberCast(int.class, 0))); - BA.debugLineNum = 237;BA.debugLine="substringList = obj(1)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_substringlist" /*RemoteObject*/ ).setObject (_obj.getArrayElement(false,BA.numberCast(int.class, 1))); - BA.debugLineNum = 238;BA.debugLine="Dim AllItems As List = obj(2)"; -Debug.JustUpdateDeviceLine(); -b4xsearchtemplate._allitems = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); -b4xsearchtemplate._allitems = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), _obj.getArrayElement(false,BA.numberCast(int.class, 2)));__ref.setField("_allitems",b4xsearchtemplate._allitems); - BA.debugLineNum = 239;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setitems(RemoteObject __ref,RemoteObject _items) throws Exception{ -try { - Debug.PushSubsStack("SetItems (b4xsearchtemplate) ","b4xsearchtemplate",52,__ref.getField(false, "ba"),__ref,196); -if (RapidSub.canDelegate("setitems")) { return __ref.runUserSub(false, "b4xsearchtemplate","setitems", __ref, _items);} -RemoteObject _starttime = RemoteObject.createImmutable(0L); -RemoteObject _noduplicates = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -RemoteObject _m = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -RemoteObject _li = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -int _i = 0; -RemoteObject _itemnotlower = RemoteObject.createImmutable(""); -RemoteObject _itemtolower = RemoteObject.createImmutable(""); -int _start = 0; -RemoteObject _count = RemoteObject.createImmutable(0); -RemoteObject _str = RemoteObject.createImmutable(""); -Debug.locals.put("Items", _items); - BA.debugLineNum = 196;BA.debugLine="Public Sub SetItems(Items As List) As Object"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 197;BA.debugLine="Dim startTime As Long"; -Debug.JustUpdateDeviceLine(); -_starttime = RemoteObject.createImmutable(0L);Debug.locals.put("startTime", _starttime); - BA.debugLineNum = 198;BA.debugLine="startTime = DateTime.Now"; -Debug.JustUpdateDeviceLine(); -_starttime = b4xsearchtemplate.__c.getField(false,"DateTime").runMethod(true,"getNow");Debug.locals.put("startTime", _starttime); - BA.debugLineNum = 199;BA.debugLine="Dim noDuplicates As Map"; -Debug.JustUpdateDeviceLine(); -_noduplicates = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");Debug.locals.put("noDuplicates", _noduplicates); - BA.debugLineNum = 200;BA.debugLine="noDuplicates.Initialize"; -Debug.JustUpdateDeviceLine(); -_noduplicates.runVoidMethod ("Initialize"); - BA.debugLineNum = 201;BA.debugLine="prefixList.Clear"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_prefixlist" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 202;BA.debugLine="substringList.Clear"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_substringlist" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 203;BA.debugLine="Dim m As Map"; -Debug.JustUpdateDeviceLine(); -_m = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");Debug.locals.put("m", _m); - BA.debugLineNum = 204;BA.debugLine="Dim li As List"; -Debug.JustUpdateDeviceLine(); -_li = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");Debug.locals.put("li", _li); - BA.debugLineNum = 205;BA.debugLine="For i = 0 To Items.Size - 1"; -Debug.JustUpdateDeviceLine(); -{ -final int step9 = 1; -final int limit9 = RemoteObject.solve(new RemoteObject[] {_items.runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step9 > 0 && _i <= limit9) || (step9 < 0 && _i >= limit9) ;_i = ((int)(0 + _i + step9)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 206;BA.debugLine="Dim itemNotLower As String = Items.Get(i)"; -Debug.JustUpdateDeviceLine(); -_itemnotlower = BA.ObjectToString(_items.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))));Debug.locals.put("itemNotLower", _itemnotlower);Debug.locals.put("itemNotLower", _itemnotlower); - BA.debugLineNum = 207;BA.debugLine="Dim itemToLower As String = itemNotLower.ToLower"; -Debug.JustUpdateDeviceLine(); -_itemtolower = _itemnotlower.runMethod(true,"toLowerCase");Debug.locals.put("itemToLower", _itemtolower);Debug.locals.put("itemToLower", _itemtolower); - BA.debugLineNum = 208;BA.debugLine="noDuplicates.Clear"; -Debug.JustUpdateDeviceLine(); -_noduplicates.runVoidMethod ("Clear"); - BA.debugLineNum = 209;BA.debugLine="For start = 0 To IIf(PrefixOnly, 0, itemToLower."; -Debug.JustUpdateDeviceLine(); -{ -final int step13 = 1; -final int limit13 = (int)(BA.ObjectToNumber(((__ref.getField(true,"_prefixonly" /*RemoteObject*/ ).get().booleanValue()) ? (RemoteObject.createImmutable((0))) : ((RemoteObject.solve(new RemoteObject[] {_itemtolower.runMethod(true,"length"),RemoteObject.createImmutable(1)}, "-",1, 1))))).get().doubleValue()); -_start = 0 ; -for (;(step13 > 0 && _start <= limit13) || (step13 < 0 && _start >= limit13) ;_start = ((int)(0 + _start + step13)) ) { -Debug.locals.put("start", _start); - BA.debugLineNum = 210;BA.debugLine="Dim count As Int = 1"; -Debug.JustUpdateDeviceLine(); -_count = BA.numberCast(int.class, 1);Debug.locals.put("count", _count);Debug.locals.put("count", _count); - BA.debugLineNum = 211;BA.debugLine="Do While count <= MAX_LIMIT And start + count <"; -Debug.JustUpdateDeviceLine(); -while (RemoteObject.solveBoolean("k",_count,BA.numberCast(double.class, __ref.getField(true,"_max_limit" /*RemoteObject*/ ))) && RemoteObject.solveBoolean("k",RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_start),_count}, "+",1, 1),BA.numberCast(double.class, _itemtolower.runMethod(true,"length")))) { - BA.debugLineNum = 212;BA.debugLine="Dim str As String = itemToLower.SubString2(sta"; -Debug.JustUpdateDeviceLine(); -_str = _itemtolower.runMethod(true,"substring",(Object)(BA.numberCast(int.class, _start)),(Object)(RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_start),_count}, "+",1, 1)));Debug.locals.put("str", _str);Debug.locals.put("str", _str); - BA.debugLineNum = 213;BA.debugLine="If noDuplicates.ContainsKey(str) = False Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_noduplicates.runMethod(true,"ContainsKey",(Object)((_str))),b4xsearchtemplate.__c.getField(true,"False"))) { - BA.debugLineNum = 214;BA.debugLine="noDuplicates.Put(str, \"\")"; -Debug.JustUpdateDeviceLine(); -_noduplicates.runVoidMethod ("Put",(Object)((_str)),(Object)((RemoteObject.createImmutable("")))); - BA.debugLineNum = 215;BA.debugLine="If start = 0 Then m = prefixList Else m = sub"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",RemoteObject.createImmutable(_start),BA.numberCast(double.class, 0))) { -_m = __ref.getField(false,"_prefixlist" /*RemoteObject*/ );Debug.locals.put("m", _m);} -else { -_m = __ref.getField(false,"_substringlist" /*RemoteObject*/ );Debug.locals.put("m", _m);}; - BA.debugLineNum = 216;BA.debugLine="li = m.Get(str)"; -Debug.JustUpdateDeviceLine(); -_li = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), _m.runMethod(false,"Get",(Object)((_str))));Debug.locals.put("li", _li); - BA.debugLineNum = 217;BA.debugLine="If li.IsInitialized = False Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_li.runMethod(true,"IsInitialized"),b4xsearchtemplate.__c.getField(true,"False"))) { - BA.debugLineNum = 218;BA.debugLine="li.Initialize"; -Debug.JustUpdateDeviceLine(); -_li.runVoidMethod ("Initialize"); - BA.debugLineNum = 219;BA.debugLine="m.Put(str, li)"; -Debug.JustUpdateDeviceLine(); -_m.runVoidMethod ("Put",(Object)((_str)),(Object)((_li.getObject()))); - }; - BA.debugLineNum = 221;BA.debugLine="li.Add(itemNotLower)"; -Debug.JustUpdateDeviceLine(); -_li.runVoidMethod ("Add",(Object)((_itemnotlower))); - }; - BA.debugLineNum = 223;BA.debugLine="count = count + 1"; -Debug.JustUpdateDeviceLine(); -_count = RemoteObject.solve(new RemoteObject[] {_count,RemoteObject.createImmutable(1)}, "+",1, 1);Debug.locals.put("count", _count); - } -; - } -}Debug.locals.put("start", _start); -; - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 227;BA.debugLine="Log(\"Index time: \" & (DateTime.Now - startTime) &"; -Debug.JustUpdateDeviceLine(); -b4xsearchtemplate.__c.runVoidMethod ("LogImpl","959179039",RemoteObject.concat(RemoteObject.createImmutable("Index time: "),(RemoteObject.solve(new RemoteObject[] {b4xsearchtemplate.__c.getField(false,"DateTime").runMethod(true,"getNow"),_starttime}, "-",1, 2)),RemoteObject.createImmutable(" ms ("),_items.runMethod(true,"getSize"),RemoteObject.createImmutable(" Items)")),0); - BA.debugLineNum = 228;BA.debugLine="AllItems = Items"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_allitems" /*RemoteObject*/ ,_items); - BA.debugLineNum = 229;BA.debugLine="Return Array(prefixList, substringList, AllItems)"; -Debug.JustUpdateDeviceLine(); -if (true) return (RemoteObject.createNewArray("Object",new int[] {3},new Object[] {(__ref.getField(false,"_prefixlist" /*RemoteObject*/ ).getObject()),(__ref.getField(false,"_substringlist" /*RemoteObject*/ ).getObject()),(__ref.getField(false,"_allitems" /*RemoteObject*/ ).getObject())})); - BA.debugLineNum = 230;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _show(RemoteObject __ref,RemoteObject _dialog) throws Exception{ -try { - Debug.PushSubsStack("Show (b4xsearchtemplate) ","b4xsearchtemplate",52,__ref.getField(false, "ba"),__ref,65); -if (RapidSub.canDelegate("show")) { __ref.runUserSub(false, "b4xsearchtemplate","show", __ref, _dialog); return;} -ResumableSub_Show rsub = new ResumableSub_Show(null,__ref,_dialog); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_Show extends BA.ResumableSub { -public ResumableSub_Show(keymon.lat.medicomed.b4xsearchtemplate parent,RemoteObject __ref,RemoteObject _dialog) { -this.parent = parent; -this.__ref = __ref; -this._dialog = _dialog; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.b4xsearchtemplate parent; -RemoteObject _dialog; - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("Show (b4xsearchtemplate) ","b4xsearchtemplate",52,__ref.getField(false, "ba"),__ref,65); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = -1; -Debug.locals.put("_ref", __ref); -Debug.locals.put("Dialog", _dialog); - BA.debugLineNum = 66;BA.debugLine="xDialog = Dialog"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_xdialog" /*RemoteObject*/ ,_dialog); - BA.debugLineNum = 67;BA.debugLine="xDialog.PutAtTop = xui.IsB4A Or xui.IsB4i"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_xdialog" /*RemoteObject*/ ).setField ("_putattop" /*RemoteObject*/ ,BA.ObjectToBoolean(RemoteObject.solveBoolean(".",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4A")) || RemoteObject.solveBoolean(".",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4i")))); - BA.debugLineNum = 68;BA.debugLine="CustomListView1.AsView.Color = xui.Color_Transpar"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"setColor",__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")); - BA.debugLineNum = 69;BA.debugLine="CustomListView1.sv.Color = xui.Color_Transparent"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).getField(false,"_sv").runMethod(true,"setColor",__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")); - BA.debugLineNum = 70;BA.debugLine="mBase.Color = xui.Color_Transparent"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"setColor",__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")); - BA.debugLineNum = 71;BA.debugLine="Sleep(20)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xsearchtemplate", "show"),BA.numberCast(int.class, 20)); -this.state = 1; -return; -case 1: -//C -this.state = -1; -; - BA.debugLineNum = 72;BA.debugLine="Update(\"\", True)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xsearchtemplate.class, "_update" /*RemoteObject*/ ,(Object)(BA.ObjectToString("")),(Object)(parent.__c.getField(true,"True"))); - BA.debugLineNum = 73;BA.debugLine="CustomListView1.JumpToItem(0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runVoidMethod ("_jumptoitem",(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 74;BA.debugLine="SearchField.Text = \"\""; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_searchfield" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_settext" /*RemoteObject*/ ,BA.ObjectToString("")); - BA.debugLineNum = 75;BA.debugLine="SearchField.TextField.RequestFocus"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_searchfield" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_gettextfield" /*RemoteObject*/ ).runVoidMethod ("RequestFocus"); - BA.debugLineNum = 77;BA.debugLine="IME.ShowKeyboard(SearchField.TextField)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_ime" /*RemoteObject*/ ).runVoidMethod ("ShowKeyboard",(Object)((__ref.getField(false,"_searchfield" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xfloattextfield.class, "_gettextfield" /*RemoteObject*/ ).getObject()))); - BA.debugLineNum = 79;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _update(RemoteObject __ref,RemoteObject _term,RemoteObject _force) throws Exception{ -try { - Debug.PushSubsStack("Update (b4xsearchtemplate) ","b4xsearchtemplate",52,__ref.getField(false, "ba"),__ref,85); -if (RapidSub.canDelegate("update")) { return __ref.runUserSub(false, "b4xsearchtemplate","update", __ref, _term, _force);} -int _i = 0; -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _str1 = RemoteObject.createImmutable(""); -RemoteObject _str2 = RemoteObject.createImmutable(""); -Debug.locals.put("Term", _term); -Debug.locals.put("Force", _force); - BA.debugLineNum = 85;BA.debugLine="Private Sub Update(Term As String, Force As Boolea"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 86;BA.debugLine="If Term = LastTerm And Force = False Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_term,__ref.getField(true,"_lastterm" /*RemoteObject*/ )) && RemoteObject.solveBoolean("=",_force,b4xsearchtemplate.__c.getField(true,"False"))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 87;BA.debugLine="LastTerm = Term"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_lastterm" /*RemoteObject*/ ,_term); - BA.debugLineNum = 88;BA.debugLine="If xui.IsB4J = False Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4J"),b4xsearchtemplate.__c.getField(true,"False"))) { - BA.debugLineNum = 89;BA.debugLine="For i = 0 To CustomListView1.Size - 1"; -Debug.JustUpdateDeviceLine(); -{ -final int step4 = 1; -final int limit4 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runMethod(true,"_getsize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step4 > 0 && _i <= limit4) || (step4 < 0 && _i >= limit4) ;_i = ((int)(0 + _i + step4)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 90;BA.debugLine="Dim p As B4XView = CustomListView1.GetPanel(i)"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_p = __ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runMethod(false,"_getpanel",(Object)(BA.numberCast(int.class, _i)));Debug.locals.put("p", _p);Debug.locals.put("p", _p); - BA.debugLineNum = 91;BA.debugLine="p.RemoveViewFromParent"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("RemoveViewFromParent"); - BA.debugLineNum = 92;BA.debugLine="ItemsCache.Add(p)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_itemscache" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((_p.getObject()))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 95;BA.debugLine="CustomListView1.Clear"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_customlistview1" /*RemoteObject*/ ).runVoidMethod ("_clear"); - BA.debugLineNum = 97;BA.debugLine="Dim str1, str2 As String"; -Debug.JustUpdateDeviceLine(); -_str1 = RemoteObject.createImmutable("");Debug.locals.put("str1", _str1); -_str2 = RemoteObject.createImmutable("");Debug.locals.put("str2", _str2); - BA.debugLineNum = 98;BA.debugLine="str1 = Term.ToLowerCase"; -Debug.JustUpdateDeviceLine(); -_str1 = _term.runMethod(true,"toLowerCase");Debug.locals.put("str1", _str1); - BA.debugLineNum = 99;BA.debugLine="If Term = \"\" Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_term,BA.ObjectToString(""))) { - BA.debugLineNum = 100;BA.debugLine="AddItemsToList(AllItems, str1)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xsearchtemplate.class, "_additemstolist" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_allitems" /*RemoteObject*/ )),(Object)(_str1)); - }else { - BA.debugLineNum = 102;BA.debugLine="If str1.Length > MAX_LIMIT Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",_str1.runMethod(true,"length"),BA.numberCast(double.class, __ref.getField(true,"_max_limit" /*RemoteObject*/ )))) { - BA.debugLineNum = 103;BA.debugLine="str2 = str1.SubString2(0, MAX_LIMIT)"; -Debug.JustUpdateDeviceLine(); -_str2 = _str1.runMethod(true,"substring",(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(true,"_max_limit" /*RemoteObject*/ )));Debug.locals.put("str2", _str2); - }else { - BA.debugLineNum = 105;BA.debugLine="str2 = str1"; -Debug.JustUpdateDeviceLine(); -_str2 = _str1;Debug.locals.put("str2", _str2); - }; - BA.debugLineNum = 107;BA.debugLine="AddItemsToList(prefixList.Get(str2), str1)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xsearchtemplate.class, "_additemstolist" /*RemoteObject*/ ,RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), __ref.getField(false,"_prefixlist" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((_str2)))),(Object)(_str1)); - BA.debugLineNum = 108;BA.debugLine="AddItemsToList(substringList.Get(str2), str1)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xsearchtemplate.class, "_additemstolist" /*RemoteObject*/ ,RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), __ref.getField(false,"_substringlist" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((_str2)))),(Object)(_str1)); - }; - BA.debugLineNum = 110;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xseekbar.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xseekbar.java deleted file mode 100644 index d5dae01..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xseekbar.java +++ /dev/null @@ -1,50 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xseekbar { - public static RemoteObject myClass; - public b4xseekbar() { - } - public static PCBA staticBA = new PCBA(null, b4xseekbar.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _meventname = RemoteObject.createImmutable(""); -public static RemoteObject _mcallback = RemoteObject.declareNull("Object"); -public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _color1 = RemoteObject.createImmutable(0); -public static RemoteObject _color2 = RemoteObject.createImmutable(0); -public static RemoteObject _thumbcolor = RemoteObject.createImmutable(0); -public static RemoteObject _cvs = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas"); -public static RemoteObject _tag = RemoteObject.declareNull("Object"); -public static RemoteObject _touchpanel = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _mvalue = RemoteObject.createImmutable(0); -public static RemoteObject _minvalue = RemoteObject.createImmutable(0); -public static RemoteObject _maxvalue = RemoteObject.createImmutable(0); -public static RemoteObject _interval = RemoteObject.createImmutable(0); -public static RemoteObject _vertical = RemoteObject.createImmutable(false); -public static RemoteObject _size1 = RemoteObject.createImmutable(0); -public static RemoteObject _size2 = RemoteObject.createImmutable(0); -public static RemoteObject _radius1 = RemoteObject.createImmutable(0); -public static RemoteObject _radius2 = RemoteObject.createImmutable(0); -public static RemoteObject _pressed = RemoteObject.createImmutable(false); -public static RemoteObject _size = RemoteObject.createImmutable(0); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"Color1",_ref.getField(false, "_color1"),"Color2",_ref.getField(false, "_color2"),"cvs",_ref.getField(false, "_cvs"),"DateUtils",_ref.getField(false, "_dateutils"),"Interval",_ref.getField(false, "_interval"),"MaxValue",_ref.getField(false, "_maxvalue"),"mBase",_ref.getField(false, "_mbase"),"mCallBack",_ref.getField(false, "_mcallback"),"mEventName",_ref.getField(false, "_meventname"),"MinValue",_ref.getField(false, "_minvalue"),"mValue",_ref.getField(false, "_mvalue"),"Pressed",_ref.getField(false, "_pressed"),"Radius1",_ref.getField(false, "_radius1"),"Radius2",_ref.getField(false, "_radius2"),"size",_ref.getField(false, "_size"),"Size1",_ref.getField(false, "_size1"),"Size2",_ref.getField(false, "_size2"),"Tag",_ref.getField(false, "_tag"),"ThumbColor",_ref.getField(false, "_thumbcolor"),"TouchPanel",_ref.getField(false, "_touchpanel"),"Vertical",_ref.getField(false, "_vertical"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xseekbar_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xseekbar_subs_0.java deleted file mode 100644 index 3673c8a..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xseekbar_subs_0.java +++ /dev/null @@ -1,425 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xseekbar_subs_0 { - - -public static RemoteObject _base_resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("Base_Resize (b4xseekbar) ","b4xseekbar",53,__ref.getField(false, "ba"),__ref,52); -if (RapidSub.canDelegate("base_resize")) { return __ref.runUserSub(false, "b4xseekbar","base_resize", __ref, _width, _height);} -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 52;BA.debugLine="Public Sub Base_Resize (Width As Double, Height As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 53;BA.debugLine="cvs.Resize(Width, Height)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Resize",(Object)(BA.numberCast(float.class, _width)),(Object)(BA.numberCast(float.class, _height))); - BA.debugLineNum = 54;BA.debugLine="TouchPanel.SetLayoutAnimated(0, 0, 0, Width, Heig"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_touchpanel" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, _width)),(Object)(BA.numberCast(int.class, _height))); - BA.debugLineNum = 55;BA.debugLine="Vertical = mBase.Height > mBase.Width"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_vertical" /*RemoteObject*/ ,BA.ObjectToBoolean(RemoteObject.solveBoolean(">",__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"),BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"))))); - BA.debugLineNum = 56;BA.debugLine="size = Max(mBase.Height, mBase.Width) - 2 * Radiu"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_size" /*RemoteObject*/ ,BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {b4xseekbar.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"))),(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth")))),RemoteObject.createImmutable(2),__ref.getField(true,"_radius2" /*RemoteObject*/ )}, "-*",1, 0))); - BA.debugLineNum = 57;BA.debugLine="Update"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xseekbar.class, "_update" /*RemoteObject*/ ); - BA.debugLineNum = 58;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 11;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 12;BA.debugLine="Private mEventName As String 'ignore"; -b4xseekbar._meventname = RemoteObject.createImmutable("");__ref.setField("_meventname",b4xseekbar._meventname); - //BA.debugLineNum = 13;BA.debugLine="Private mCallBack As Object 'ignore"; -b4xseekbar._mcallback = RemoteObject.createNew ("Object");__ref.setField("_mcallback",b4xseekbar._mcallback); - //BA.debugLineNum = 14;BA.debugLine="Public mBase As B4XView 'ignore"; -b4xseekbar._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",b4xseekbar._mbase); - //BA.debugLineNum = 15;BA.debugLine="Private xui As XUI 'ignore"; -b4xseekbar._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",b4xseekbar._xui); - //BA.debugLineNum = 16;BA.debugLine="Public Color1, Color2, ThumbColor As Int"; -b4xseekbar._color1 = RemoteObject.createImmutable(0);__ref.setField("_color1",b4xseekbar._color1); -b4xseekbar._color2 = RemoteObject.createImmutable(0);__ref.setField("_color2",b4xseekbar._color2); -b4xseekbar._thumbcolor = RemoteObject.createImmutable(0);__ref.setField("_thumbcolor",b4xseekbar._thumbcolor); - //BA.debugLineNum = 17;BA.debugLine="Private cvs As B4XCanvas"; -b4xseekbar._cvs = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas");__ref.setField("_cvs",b4xseekbar._cvs); - //BA.debugLineNum = 18;BA.debugLine="Public Tag As Object"; -b4xseekbar._tag = RemoteObject.createNew ("Object");__ref.setField("_tag",b4xseekbar._tag); - //BA.debugLineNum = 19;BA.debugLine="Private TouchPanel As B4XView"; -b4xseekbar._touchpanel = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_touchpanel",b4xseekbar._touchpanel); - //BA.debugLineNum = 20;BA.debugLine="Private mValue As Int"; -b4xseekbar._mvalue = RemoteObject.createImmutable(0);__ref.setField("_mvalue",b4xseekbar._mvalue); - //BA.debugLineNum = 21;BA.debugLine="Public MinValue, MaxValue As Int"; -b4xseekbar._minvalue = RemoteObject.createImmutable(0);__ref.setField("_minvalue",b4xseekbar._minvalue); -b4xseekbar._maxvalue = RemoteObject.createImmutable(0);__ref.setField("_maxvalue",b4xseekbar._maxvalue); - //BA.debugLineNum = 22;BA.debugLine="Public Interval As Int = 1"; -b4xseekbar._interval = BA.numberCast(int.class, 1);__ref.setField("_interval",b4xseekbar._interval); - //BA.debugLineNum = 23;BA.debugLine="Private Vertical As Boolean"; -b4xseekbar._vertical = RemoteObject.createImmutable(false);__ref.setField("_vertical",b4xseekbar._vertical); - //BA.debugLineNum = 24;BA.debugLine="Public Size1 = 4dip, Size2 = 2dip, Radius1 = 6dip"; -b4xseekbar._size1 = b4xseekbar.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 4)));__ref.setField("_size1",b4xseekbar._size1); -b4xseekbar._size2 = b4xseekbar.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)));__ref.setField("_size2",b4xseekbar._size2); -b4xseekbar._radius1 = b4xseekbar.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 6)));__ref.setField("_radius1",b4xseekbar._radius1); -b4xseekbar._radius2 = b4xseekbar.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 12)));__ref.setField("_radius2",b4xseekbar._radius2); - //BA.debugLineNum = 25;BA.debugLine="Private Pressed As Boolean"; -b4xseekbar._pressed = RemoteObject.createImmutable(false);__ref.setField("_pressed",b4xseekbar._pressed); - //BA.debugLineNum = 26;BA.debugLine="Private size As Int"; -b4xseekbar._size = RemoteObject.createImmutable(0);__ref.setField("_size",b4xseekbar._size); - //BA.debugLineNum = 27;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _designercreateview(RemoteObject __ref,RemoteObject _base,RemoteObject _lbl,RemoteObject _props) throws Exception{ -try { - Debug.PushSubsStack("DesignerCreateView (b4xseekbar) ","b4xseekbar",53,__ref.getField(false, "ba"),__ref,35); -if (RapidSub.canDelegate("designercreateview")) { return __ref.runUserSub(false, "b4xseekbar","designercreateview", __ref, _base, _lbl, _props);} -Debug.locals.put("Base", _base); -Debug.locals.put("Lbl", _lbl); -Debug.locals.put("Props", _props); - BA.debugLineNum = 35;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 36;BA.debugLine="mBase = Base"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).setObject (_base); - BA.debugLineNum = 37;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_tag" /*RemoteObject*/ ,__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"getTag")); - BA.debugLineNum = 37;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"setTag",__ref); - BA.debugLineNum = 38;BA.debugLine="Color1 = xui.PaintOrColorToColor(Props.Get(\"Color"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_color1" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("Color1"))))))); - BA.debugLineNum = 39;BA.debugLine="Color2 = xui.PaintOrColorToColor(Props.Get(\"Color"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_color2" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("Color2"))))))); - BA.debugLineNum = 40;BA.debugLine="ThumbColor = xui.PaintOrColorToColor(Props.Get(\"T"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_thumbcolor" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("ThumbColor"))))))); - BA.debugLineNum = 41;BA.debugLine="Interval = Max(1, Props.GetDefault(\"Interval\", 1)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_interval" /*RemoteObject*/ ,BA.numberCast(int.class, b4xseekbar.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, 1)),(Object)(BA.numberCast(double.class, _props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("Interval"))),(Object)(RemoteObject.createImmutable((1))))))))); - BA.debugLineNum = 42;BA.debugLine="MinValue = Props.Get(\"Min\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_minvalue" /*RemoteObject*/ ,BA.numberCast(int.class, _props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("Min")))))); - BA.debugLineNum = 43;BA.debugLine="MaxValue = Props.Get(\"Max\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_maxvalue" /*RemoteObject*/ ,BA.numberCast(int.class, _props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("Max")))))); - BA.debugLineNum = 44;BA.debugLine="mValue = Max(MinValue, Min(MaxValue, Props.Get(\"V"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mvalue" /*RemoteObject*/ ,BA.numberCast(int.class, b4xseekbar.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, __ref.getField(true,"_minvalue" /*RemoteObject*/ ))),(Object)(b4xseekbar.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, __ref.getField(true,"_maxvalue" /*RemoteObject*/ ))),(Object)(BA.numberCast(double.class, _props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("Value"))))))))))); - BA.debugLineNum = 45;BA.debugLine="cvs.Initialize(mBase)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ))); - BA.debugLineNum = 46;BA.debugLine="TouchPanel = xui.CreatePanel(\"TouchPanel\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_touchpanel" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("TouchPanel")))); - BA.debugLineNum = 47;BA.debugLine="mBase.AddView(TouchPanel, 0, 0, mBase.Width, mBas"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_touchpanel" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"))); - BA.debugLineNum = 48;BA.debugLine="If xui.IsB4A Or xui.IsB4i Then Radius2 = 20dip"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(".",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4A")) || RemoteObject.solveBoolean(".",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4i"))) { -__ref.setField ("_radius2" /*RemoteObject*/ ,b4xseekbar.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 20))));}; - BA.debugLineNum = 49;BA.debugLine="If xui.IsB4A Then Base_Resize(mBase.Width, mBase."; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4A").get().booleanValue()) { -__ref.runClassMethod (keymon.lat.medicomed.b4xseekbar.class, "_base_resize" /*RemoteObject*/ ,(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"))),(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"))));}; - BA.debugLineNum = 50;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getvalue(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getValue (b4xseekbar) ","b4xseekbar",53,__ref.getField(false, "ba"),__ref,130); -if (RapidSub.canDelegate("getvalue")) { return __ref.runUserSub(false, "b4xseekbar","getvalue", __ref);} - BA.debugLineNum = 130;BA.debugLine="Public Sub getValue As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 131;BA.debugLine="Return mValue"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_mvalue" /*RemoteObject*/ ); - BA.debugLineNum = 132;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _callback,RemoteObject _eventname) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xseekbar) ","b4xseekbar",53,__ref.getField(false, "ba"),__ref,29); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xseekbar","initialize", __ref, _ba, _callback, _eventname);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); -Debug.locals.put("Callback", _callback); -Debug.locals.put("EventName", _eventname); - BA.debugLineNum = 29;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 30;BA.debugLine="mEventName = EventName"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_meventname" /*RemoteObject*/ ,_eventname); - BA.debugLineNum = 31;BA.debugLine="mCallBack = Callback"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mcallback" /*RemoteObject*/ ,_callback); - BA.debugLineNum = 32;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _raisetouchstateevent(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("RaiseTouchStateEvent (b4xseekbar) ","b4xseekbar",53,__ref.getField(false, "ba"),__ref,102); -if (RapidSub.canDelegate("raisetouchstateevent")) { return __ref.runUserSub(false, "b4xseekbar","raisetouchstateevent", __ref);} - BA.debugLineNum = 102;BA.debugLine="Private Sub RaiseTouchStateEvent"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 103;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_TouchS"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"SubExists",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_TouchStateChanged"))),(Object)(BA.numberCast(int.class, 1))).get().booleanValue()) { - BA.debugLineNum = 104;BA.debugLine="CallSubDelayed2(mCallBack, mEventName & \"_TouchS"; -Debug.JustUpdateDeviceLine(); -b4xseekbar.__c.runVoidMethod ("CallSubDelayed2",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_TouchStateChanged"))),(Object)((__ref.getField(true,"_pressed" /*RemoteObject*/ )))); - }; - BA.debugLineNum = 106;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setvalue(RemoteObject __ref,RemoteObject _v) throws Exception{ -try { - Debug.PushSubsStack("setValue (b4xseekbar) ","b4xseekbar",53,__ref.getField(false, "ba"),__ref,125); -if (RapidSub.canDelegate("setvalue")) { return __ref.runUserSub(false, "b4xseekbar","setvalue", __ref, _v);} -Debug.locals.put("v", _v); - BA.debugLineNum = 125;BA.debugLine="Public Sub setValue(v As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 126;BA.debugLine="mValue = Max(MinValue, Min(MaxValue, v))"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mvalue" /*RemoteObject*/ ,BA.numberCast(int.class, b4xseekbar.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, __ref.getField(true,"_minvalue" /*RemoteObject*/ ))),(Object)(b4xseekbar.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, __ref.getField(true,"_maxvalue" /*RemoteObject*/ ))),(Object)(BA.numberCast(double.class, _v))))))); - BA.debugLineNum = 127;BA.debugLine="Update"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xseekbar.class, "_update" /*RemoteObject*/ ); - BA.debugLineNum = 128;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setvaluebasedontouch(RemoteObject __ref,RemoteObject _x,RemoteObject _y) throws Exception{ -try { - Debug.PushSubsStack("SetValueBasedOnTouch (b4xseekbar) ","b4xseekbar",53,__ref.getField(false, "ba"),__ref,108); -if (RapidSub.canDelegate("setvaluebasedontouch")) { return __ref.runUserSub(false, "b4xseekbar","setvaluebasedontouch", __ref, _x, _y);} -RemoteObject _v = RemoteObject.createImmutable(0); -RemoteObject _newvalue = RemoteObject.createImmutable(0); -Debug.locals.put("x", _x); -Debug.locals.put("y", _y); - BA.debugLineNum = 108;BA.debugLine="Private Sub SetValueBasedOnTouch(x As Int, y As In"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 109;BA.debugLine="Dim v As Int"; -Debug.JustUpdateDeviceLine(); -_v = RemoteObject.createImmutable(0);Debug.locals.put("v", _v); - BA.debugLineNum = 110;BA.debugLine="If Vertical Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_vertical" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 111;BA.debugLine="v = (mBase.Height - Radius2 - y) / size * (MaxVa"; -Debug.JustUpdateDeviceLine(); -_v = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"),__ref.getField(true,"_radius2" /*RemoteObject*/ ),_y}, "--",2, 1)),__ref.getField(true,"_size" /*RemoteObject*/ ),(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_maxvalue" /*RemoteObject*/ ),__ref.getField(true,"_minvalue" /*RemoteObject*/ )}, "-",1, 1)),__ref.getField(true,"_minvalue" /*RemoteObject*/ )}, "/*+",1, 0));Debug.locals.put("v", _v); - }else { - BA.debugLineNum = 113;BA.debugLine="v = (x - Radius2) / size * (MaxValue - MinValue)"; -Debug.JustUpdateDeviceLine(); -_v = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {_x,__ref.getField(true,"_radius2" /*RemoteObject*/ )}, "-",1, 1)),__ref.getField(true,"_size" /*RemoteObject*/ ),(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_maxvalue" /*RemoteObject*/ ),__ref.getField(true,"_minvalue" /*RemoteObject*/ )}, "-",1, 1)),__ref.getField(true,"_minvalue" /*RemoteObject*/ )}, "/*+",1, 0));Debug.locals.put("v", _v); - }; - BA.debugLineNum = 115;BA.debugLine="v = Round (v / Interval) * Interval"; -Debug.JustUpdateDeviceLine(); -_v = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {b4xseekbar.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {_v,__ref.getField(true,"_interval" /*RemoteObject*/ )}, "/",0, 0))),__ref.getField(true,"_interval" /*RemoteObject*/ )}, "*",0, 2));Debug.locals.put("v", _v); - BA.debugLineNum = 116;BA.debugLine="Dim NewValue As Int = Max(MinValue, Min(MaxValue,"; -Debug.JustUpdateDeviceLine(); -_newvalue = BA.numberCast(int.class, b4xseekbar.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, __ref.getField(true,"_minvalue" /*RemoteObject*/ ))),(Object)(b4xseekbar.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, __ref.getField(true,"_maxvalue" /*RemoteObject*/ ))),(Object)(BA.numberCast(double.class, _v))))));Debug.locals.put("NewValue", _newvalue);Debug.locals.put("NewValue", _newvalue); - BA.debugLineNum = 117;BA.debugLine="If NewValue <> mValue Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("!",_newvalue,BA.numberCast(double.class, __ref.getField(true,"_mvalue" /*RemoteObject*/ )))) { - BA.debugLineNum = 118;BA.debugLine="mValue = NewValue"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mvalue" /*RemoteObject*/ ,_newvalue); - BA.debugLineNum = 119;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_Value"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"SubExists",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_ValueChanged"))),(Object)(BA.numberCast(int.class, 1))).get().booleanValue()) { - BA.debugLineNum = 120;BA.debugLine="CallSubDelayed2(mCallBack, mEventName & \"_Value"; -Debug.JustUpdateDeviceLine(); -b4xseekbar.__c.runVoidMethod ("CallSubDelayed2",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_ValueChanged"))),(Object)((__ref.getField(true,"_mvalue" /*RemoteObject*/ )))); - }; - }; - BA.debugLineNum = 123;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _touchpanel_touch(RemoteObject __ref,RemoteObject _action,RemoteObject _x,RemoteObject _y) throws Exception{ -try { - Debug.PushSubsStack("TouchPanel_Touch (b4xseekbar) ","b4xseekbar",53,__ref.getField(false, "ba"),__ref,88); -if (RapidSub.canDelegate("touchpanel_touch")) { return __ref.runUserSub(false, "b4xseekbar","touchpanel_touch", __ref, _action, _x, _y);} -Debug.locals.put("Action", _action); -Debug.locals.put("X", _x); -Debug.locals.put("Y", _y); - BA.debugLineNum = 88;BA.debugLine="Private Sub TouchPanel_Touch (Action As Int, X As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 89;BA.debugLine="If Action = TouchPanel.TOUCH_ACTION_DOWN Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_action,BA.numberCast(double.class, __ref.getField(false,"_touchpanel" /*RemoteObject*/ ).getField(true,"TOUCH_ACTION_DOWN")))) { - BA.debugLineNum = 90;BA.debugLine="Pressed = True"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_pressed" /*RemoteObject*/ ,b4xseekbar.__c.getField(true,"True")); - BA.debugLineNum = 91;BA.debugLine="RaiseTouchStateEvent"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xseekbar.class, "_raisetouchstateevent" /*RemoteObject*/ ); - BA.debugLineNum = 92;BA.debugLine="SetValueBasedOnTouch(X, Y)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xseekbar.class, "_setvaluebasedontouch" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, _x)),(Object)(BA.numberCast(int.class, _y))); - }else -{ BA.debugLineNum = 93;BA.debugLine="Else If Action = TouchPanel.TOUCH_ACTION_MOVE The"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_action,BA.numberCast(double.class, __ref.getField(false,"_touchpanel" /*RemoteObject*/ ).getField(true,"TOUCH_ACTION_MOVE")))) { - BA.debugLineNum = 94;BA.debugLine="SetValueBasedOnTouch(X, Y)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xseekbar.class, "_setvaluebasedontouch" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, _x)),(Object)(BA.numberCast(int.class, _y))); - }else -{ BA.debugLineNum = 95;BA.debugLine="Else If Action = TouchPanel.TOUCH_ACTION_UP Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_action,BA.numberCast(double.class, __ref.getField(false,"_touchpanel" /*RemoteObject*/ ).getField(true,"TOUCH_ACTION_UP")))) { - BA.debugLineNum = 96;BA.debugLine="Pressed = False"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_pressed" /*RemoteObject*/ ,b4xseekbar.__c.getField(true,"False")); - BA.debugLineNum = 97;BA.debugLine="RaiseTouchStateEvent"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xseekbar.class, "_raisetouchstateevent" /*RemoteObject*/ ); - }}} -; - BA.debugLineNum = 99;BA.debugLine="Update"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xseekbar.class, "_update" /*RemoteObject*/ ); - BA.debugLineNum = 100;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _update(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Update (b4xseekbar) ","b4xseekbar",53,__ref.getField(false, "ba"),__ref,61); -if (RapidSub.canDelegate("update")) { return __ref.runUserSub(false, "b4xseekbar","update", __ref);} -RemoteObject _s1 = RemoteObject.createImmutable(0); -RemoteObject _y = RemoteObject.createImmutable(0); -RemoteObject _x = RemoteObject.createImmutable(0); - BA.debugLineNum = 61;BA.debugLine="Public Sub Update"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 63;BA.debugLine="cvs.ClearRect(cvs.TargetRect)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("ClearRect",(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect"))); - BA.debugLineNum = 64;BA.debugLine="If size > 0 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",__ref.getField(true,"_size" /*RemoteObject*/ ),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 65;BA.debugLine="If Vertical = False Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_vertical" /*RemoteObject*/ ),b4xseekbar.__c.getField(true,"False"))) { - BA.debugLineNum = 66;BA.debugLine="Dim s1 As Int = Radius2 + (mValue - MinValue) /"; -Debug.JustUpdateDeviceLine(); -_s1 = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_radius2" /*RemoteObject*/ ),(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mvalue" /*RemoteObject*/ ),__ref.getField(true,"_minvalue" /*RemoteObject*/ )}, "-",1, 1)),(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_maxvalue" /*RemoteObject*/ ),__ref.getField(true,"_minvalue" /*RemoteObject*/ )}, "-",1, 1)),__ref.getField(true,"_size" /*RemoteObject*/ )}, "+/*",1, 0));Debug.locals.put("s1", _s1);Debug.locals.put("s1", _s1); - BA.debugLineNum = 67;BA.debugLine="Dim y As Int = mBase.Height / 2"; -Debug.JustUpdateDeviceLine(); -_y = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"),RemoteObject.createImmutable(2)}, "/",0, 0));Debug.locals.put("y", _y);Debug.locals.put("y", _y); - BA.debugLineNum = 68;BA.debugLine="cvs.DrawLine(Radius2, y, s1, y, Color1, Size1)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawLine",(Object)(BA.numberCast(float.class, __ref.getField(true,"_radius2" /*RemoteObject*/ ))),(Object)(BA.numberCast(float.class, _y)),(Object)(BA.numberCast(float.class, _s1)),(Object)(BA.numberCast(float.class, _y)),(Object)(__ref.getField(true,"_color1" /*RemoteObject*/ )),(Object)(BA.numberCast(float.class, __ref.getField(true,"_size1" /*RemoteObject*/ )))); - BA.debugLineNum = 69;BA.debugLine="cvs.DrawLine(s1, y, mBase.Width - Radius2, y, C"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawLine",(Object)(BA.numberCast(float.class, _s1)),(Object)(BA.numberCast(float.class, _y)),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"),__ref.getField(true,"_radius2" /*RemoteObject*/ )}, "-",1, 1))),(Object)(BA.numberCast(float.class, _y)),(Object)(__ref.getField(true,"_color2" /*RemoteObject*/ )),(Object)(BA.numberCast(float.class, __ref.getField(true,"_size2" /*RemoteObject*/ )))); - BA.debugLineNum = 70;BA.debugLine="cvs.DrawCircle(s1, y, Radius1, Color1, True, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawCircle",(Object)(BA.numberCast(float.class, _s1)),(Object)(BA.numberCast(float.class, _y)),(Object)(BA.numberCast(float.class, __ref.getField(true,"_radius1" /*RemoteObject*/ ))),(Object)(__ref.getField(true,"_color1" /*RemoteObject*/ )),(Object)(b4xseekbar.__c.getField(true,"True")),(Object)(BA.numberCast(float.class, 0))); - BA.debugLineNum = 71;BA.debugLine="If Pressed Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_pressed" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 72;BA.debugLine="cvs.DrawCircle(s1, y, Radius2, ThumbColor, Tru"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawCircle",(Object)(BA.numberCast(float.class, _s1)),(Object)(BA.numberCast(float.class, _y)),(Object)(BA.numberCast(float.class, __ref.getField(true,"_radius2" /*RemoteObject*/ ))),(Object)(__ref.getField(true,"_thumbcolor" /*RemoteObject*/ )),(Object)(b4xseekbar.__c.getField(true,"True")),(Object)(BA.numberCast(float.class, 0))); - }; - }else { - BA.debugLineNum = 75;BA.debugLine="Dim s1 As Int = Radius2 + (MaxValue - mValue) /"; -Debug.JustUpdateDeviceLine(); -_s1 = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_radius2" /*RemoteObject*/ ),(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_maxvalue" /*RemoteObject*/ ),__ref.getField(true,"_mvalue" /*RemoteObject*/ )}, "-",1, 1)),(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_maxvalue" /*RemoteObject*/ ),__ref.getField(true,"_minvalue" /*RemoteObject*/ )}, "-",1, 1)),__ref.getField(true,"_size" /*RemoteObject*/ )}, "+/*",1, 0));Debug.locals.put("s1", _s1);Debug.locals.put("s1", _s1); - BA.debugLineNum = 76;BA.debugLine="Dim x As Int = mBase.Width / 2"; -Debug.JustUpdateDeviceLine(); -_x = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0));Debug.locals.put("x", _x);Debug.locals.put("x", _x); - BA.debugLineNum = 77;BA.debugLine="cvs.DrawLine(x, Radius2, x, s1, Color2, Size2)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawLine",(Object)(BA.numberCast(float.class, _x)),(Object)(BA.numberCast(float.class, __ref.getField(true,"_radius2" /*RemoteObject*/ ))),(Object)(BA.numberCast(float.class, _x)),(Object)(BA.numberCast(float.class, _s1)),(Object)(__ref.getField(true,"_color2" /*RemoteObject*/ )),(Object)(BA.numberCast(float.class, __ref.getField(true,"_size2" /*RemoteObject*/ )))); - BA.debugLineNum = 78;BA.debugLine="cvs.DrawLine(x, s1, x, mBase.Height - Radius2,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawLine",(Object)(BA.numberCast(float.class, _x)),(Object)(BA.numberCast(float.class, _s1)),(Object)(BA.numberCast(float.class, _x)),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"),__ref.getField(true,"_radius2" /*RemoteObject*/ )}, "-",1, 1))),(Object)(__ref.getField(true,"_color1" /*RemoteObject*/ )),(Object)(BA.numberCast(float.class, __ref.getField(true,"_size1" /*RemoteObject*/ )))); - BA.debugLineNum = 79;BA.debugLine="cvs.DrawCircle(x, s1, Radius1, Color1, True, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawCircle",(Object)(BA.numberCast(float.class, _x)),(Object)(BA.numberCast(float.class, _s1)),(Object)(BA.numberCast(float.class, __ref.getField(true,"_radius1" /*RemoteObject*/ ))),(Object)(__ref.getField(true,"_color1" /*RemoteObject*/ )),(Object)(b4xseekbar.__c.getField(true,"True")),(Object)(BA.numberCast(float.class, 0))); - BA.debugLineNum = 80;BA.debugLine="If Pressed Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_pressed" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 81;BA.debugLine="cvs.DrawCircle(x, s1, Radius2, ThumbColor, Tru"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawCircle",(Object)(BA.numberCast(float.class, _x)),(Object)(BA.numberCast(float.class, _s1)),(Object)(BA.numberCast(float.class, __ref.getField(true,"_radius2" /*RemoteObject*/ ))),(Object)(__ref.getField(true,"_thumbcolor" /*RemoteObject*/ )),(Object)(b4xseekbar.__c.getField(true,"True")),(Object)(BA.numberCast(float.class, 0))); - }; - }; - }; - BA.debugLineNum = 85;BA.debugLine="cvs.Invalidate"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Invalidate"); - BA.debugLineNum = 86;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xset.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xset.java deleted file mode 100644 index 79e4b97..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xset.java +++ /dev/null @@ -1,30 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xset { - public static RemoteObject myClass; - public b4xset() { - } - public static PCBA staticBA = new PCBA(null, b4xset.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _map = RemoteObject.declareNull("keymon.lat.medicomed.b4xorderedmap"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"DateUtils",_ref.getField(false, "_dateutils"),"map",_ref.getField(false, "_map")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xset_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xset_subs_0.java deleted file mode 100644 index 0508a49..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xset_subs_0.java +++ /dev/null @@ -1,154 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xset_subs_0 { - - -public static RemoteObject _add(RemoteObject __ref,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("Add (b4xset) ","b4xset",32,__ref.getField(false, "ba"),__ref,9); -if (RapidSub.canDelegate("add")) { return __ref.runUserSub(false, "b4xset","add", __ref, _value);} -Debug.locals.put("Value", _value); - BA.debugLineNum = 9;BA.debugLine="Public Sub Add(Value As Object)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 10;BA.debugLine="map.Put(Value, \"\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_map" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_put" /*RemoteObject*/ ,(Object)(_value),(Object)((RemoteObject.createImmutable("")))); - BA.debugLineNum = 11;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _aslist(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("AsList (b4xset) ","b4xset",32,__ref.getField(false, "ba"),__ref,29); -if (RapidSub.canDelegate("aslist")) { return __ref.runUserSub(false, "b4xset","aslist", __ref);} - BA.debugLineNum = 29;BA.debugLine="Public Sub AsList As List"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 30;BA.debugLine="Return map.Keys"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_map" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_getkeys" /*RemoteObject*/ ); - BA.debugLineNum = 31;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Private map As B4XOrderedMap"; -b4xset._map = RemoteObject.createNew ("keymon.lat.medicomed.b4xorderedmap");__ref.setField("_map",b4xset._map); - //BA.debugLineNum = 3;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _clear(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Clear (b4xset) ","b4xset",32,__ref.getField(false, "ba"),__ref,25); -if (RapidSub.canDelegate("clear")) { return __ref.runUserSub(false, "b4xset","clear", __ref);} - BA.debugLineNum = 25;BA.debugLine="Public Sub Clear"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 26;BA.debugLine="map.Clear"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_map" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_clear" /*RemoteObject*/ ); - BA.debugLineNum = 27;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _contains(RemoteObject __ref,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("Contains (b4xset) ","b4xset",32,__ref.getField(false, "ba"),__ref,17); -if (RapidSub.canDelegate("contains")) { return __ref.runUserSub(false, "b4xset","contains", __ref, _value);} -Debug.locals.put("Value", _value); - BA.debugLineNum = 17;BA.debugLine="Public Sub Contains (Value As Object) As Boolean"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 18;BA.debugLine="Return map.ContainsKey(Value)"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_map" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_containskey" /*RemoteObject*/ ,(Object)(_value)); - BA.debugLineNum = 19;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getsize(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getSize (b4xset) ","b4xset",32,__ref.getField(false, "ba"),__ref,21); -if (RapidSub.canDelegate("getsize")) { return __ref.runUserSub(false, "b4xset","getsize", __ref);} - BA.debugLineNum = 21;BA.debugLine="Public Sub getSize As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 22;BA.debugLine="Return map.Size"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_map" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_getsize" /*RemoteObject*/ ); - BA.debugLineNum = 23;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xset) ","b4xset",32,__ref.getField(false, "ba"),__ref,5); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xset","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 5;BA.debugLine="Public Sub Initialize"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 6;BA.debugLine="map.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_map" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 7;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _remove(RemoteObject __ref,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("Remove (b4xset) ","b4xset",32,__ref.getField(false, "ba"),__ref,13); -if (RapidSub.canDelegate("remove")) { return __ref.runUserSub(false, "b4xset","remove", __ref, _value);} -Debug.locals.put("Value", _value); - BA.debugLineNum = 13;BA.debugLine="Public Sub Remove(Value As Object)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 14;BA.debugLine="map.Remove(Value)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_map" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xorderedmap.class, "_remove" /*RemoteObject*/ ,(Object)(_value)); - BA.debugLineNum = 15;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xsignaturetemplate.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xsignaturetemplate.java deleted file mode 100644 index 79b1a94..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xsignaturetemplate.java +++ /dev/null @@ -1,41 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xsignaturetemplate { - public static RemoteObject myClass; - public b4xsignaturetemplate() { - } - public static PCBA staticBA = new PCBA(null, b4xsignaturetemplate.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _cvs = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas"); -public static RemoteObject _lastx = RemoteObject.createImmutable(0f); -public static RemoteObject _lasty = RemoteObject.createImmutable(0f); -public static RemoteObject _strokewidth = RemoteObject.createImmutable(0f); -public static RemoteObject _strokecolor = RemoteObject.createImmutable(0); -public static RemoteObject _textcolor = RemoteObject.createImmutable(0); -public static RemoteObject _backgroundcolor = RemoteObject.createImmutable(0); -public static RemoteObject _adddateandtime = RemoteObject.createImmutable(false); -public static RemoteObject _textfont = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont"); -public static RemoteObject _numberofpoints = RemoteObject.createImmutable(0); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"AddDateAndTime",_ref.getField(false, "_adddateandtime"),"BackgroundColor",_ref.getField(false, "_backgroundcolor"),"cvs",_ref.getField(false, "_cvs"),"DateUtils",_ref.getField(false, "_dateutils"),"LastX",_ref.getField(false, "_lastx"),"LastY",_ref.getField(false, "_lasty"),"mBase",_ref.getField(false, "_mbase"),"NumberOfPoints",_ref.getField(false, "_numberofpoints"),"StrokeColor",_ref.getField(false, "_strokecolor"),"StrokeWidth",_ref.getField(false, "_strokewidth"),"TextColor",_ref.getField(false, "_textcolor"),"TextFont",_ref.getField(false, "_textfont"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xsignaturetemplate_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xsignaturetemplate_subs_0.java deleted file mode 100644 index e7b1bb1..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xsignaturetemplate_subs_0.java +++ /dev/null @@ -1,237 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xsignaturetemplate_subs_0 { - - -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Private xui As XUI"; -b4xsignaturetemplate._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",b4xsignaturetemplate._xui); - //BA.debugLineNum = 3;BA.debugLine="Public mBase As B4XView"; -b4xsignaturetemplate._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",b4xsignaturetemplate._mbase); - //BA.debugLineNum = 4;BA.debugLine="Private cvs As B4XCanvas"; -b4xsignaturetemplate._cvs = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas");__ref.setField("_cvs",b4xsignaturetemplate._cvs); - //BA.debugLineNum = 5;BA.debugLine="Private LastX, LastY As Float"; -b4xsignaturetemplate._lastx = RemoteObject.createImmutable(0f);__ref.setField("_lastx",b4xsignaturetemplate._lastx); -b4xsignaturetemplate._lasty = RemoteObject.createImmutable(0f);__ref.setField("_lasty",b4xsignaturetemplate._lasty); - //BA.debugLineNum = 6;BA.debugLine="Public StrokeWidth As Float = 2dip"; -b4xsignaturetemplate._strokewidth = BA.numberCast(float.class, b4xsignaturetemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2))));__ref.setField("_strokewidth",b4xsignaturetemplate._strokewidth); - //BA.debugLineNum = 7;BA.debugLine="Public StrokeColor As Int = xui.Color_Black"; -b4xsignaturetemplate._strokecolor = __ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Black");__ref.setField("_strokecolor",b4xsignaturetemplate._strokecolor); - //BA.debugLineNum = 8;BA.debugLine="Public TextColor As Int = 0xFFFF8800"; -b4xsignaturetemplate._textcolor = BA.numberCast(int.class, ((int)0xffff8800));__ref.setField("_textcolor",b4xsignaturetemplate._textcolor); - //BA.debugLineNum = 9;BA.debugLine="Public BackgroundColor As Int = xui.Color_White"; -b4xsignaturetemplate._backgroundcolor = __ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_White");__ref.setField("_backgroundcolor",b4xsignaturetemplate._backgroundcolor); - //BA.debugLineNum = 10;BA.debugLine="Public AddDateAndTime As Boolean = True"; -b4xsignaturetemplate._adddateandtime = b4xsignaturetemplate.__c.getField(true,"True");__ref.setField("_adddateandtime",b4xsignaturetemplate._adddateandtime); - //BA.debugLineNum = 11;BA.debugLine="Public TextFont As B4XFont"; -b4xsignaturetemplate._textfont = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont");__ref.setField("_textfont",b4xsignaturetemplate._textfont); - //BA.debugLineNum = 12;BA.debugLine="Public NumberOfPoints As Int"; -b4xsignaturetemplate._numberofpoints = RemoteObject.createImmutable(0);__ref.setField("_numberofpoints",b4xsignaturetemplate._numberofpoints); - //BA.debugLineNum = 13;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _dialogclosed(RemoteObject __ref,RemoteObject _result) throws Exception{ -try { - Debug.PushSubsStack("DialogClosed (b4xsignaturetemplate) ","b4xsignaturetemplate",54,__ref.getField(false, "ba"),__ref,56); -if (RapidSub.canDelegate("dialogclosed")) { return __ref.runUserSub(false, "b4xsignaturetemplate","dialogclosed", __ref, _result);} -RemoteObject _r = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XRect"); -RemoteObject _baseline = RemoteObject.createImmutable(0); -Debug.locals.put("Result", _result); - BA.debugLineNum = 56;BA.debugLine="Private Sub DialogClosed (Result As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 57;BA.debugLine="If Result = xui.DialogResponse_Positive And AddDa"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_result,BA.numberCast(double.class, __ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"DialogResponse_Positive"))) && RemoteObject.solveBoolean(".",__ref.getField(true,"_adddateandtime" /*RemoteObject*/ ))) { - BA.debugLineNum = 58;BA.debugLine="Dim r As B4XRect = cvs.MeasureText(\"M\", TextFont"; -Debug.JustUpdateDeviceLine(); -_r = __ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"MeasureText",(Object)(BA.ObjectToString("M")),(Object)(__ref.getField(false,"_textfont" /*RemoteObject*/ )));Debug.locals.put("r", _r);Debug.locals.put("r", _r); - BA.debugLineNum = 59;BA.debugLine="Dim Baseline As Int = cvs.TargetRect.Bottom - r."; -Debug.JustUpdateDeviceLine(); -_baseline = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getBottom"),_r.runMethod(true,"getHeight"),_r.runMethod(true,"getTop"),b4xsignaturetemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)))}, "---",3, 0));Debug.locals.put("Baseline", _baseline);Debug.locals.put("Baseline", _baseline); - BA.debugLineNum = 60;BA.debugLine="cvs.DrawText($\"$DateTime{DateTime.Now}\"$, 2dip,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawText",__ref.getField(false, "ba"),(Object)((RemoteObject.concat(RemoteObject.createImmutable(""),b4xsignaturetemplate.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("datetime")),(Object)((b4xsignaturetemplate.__c.getField(false,"DateTime").runMethod(true,"getNow")))),RemoteObject.createImmutable("")))),(Object)(BA.numberCast(float.class, b4xsignaturetemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2))))),(Object)(BA.numberCast(float.class, _baseline)),(Object)(__ref.getField(false,"_textfont" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_textcolor" /*RemoteObject*/ )),(Object)(BA.getEnumFromString(BA.getDeviceClass("android.graphics.Paint.Align"),RemoteObject.createImmutable("LEFT")))); - }; - BA.debugLineNum = 62;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getbitmap(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getBitmap (b4xsignaturetemplate) ","b4xsignaturetemplate",54,__ref.getField(false, "ba"),__ref,52); -if (RapidSub.canDelegate("getbitmap")) { return __ref.runUserSub(false, "b4xsignaturetemplate","getbitmap", __ref);} - BA.debugLineNum = 52;BA.debugLine="Public Sub getBitmap As B4XBitmap"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 53;BA.debugLine="Return cvs.CreateBitmap"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"CreateBitmap"); - BA.debugLineNum = 54;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getpanel(RemoteObject __ref,RemoteObject _dialog) throws Exception{ -try { - Debug.PushSubsStack("GetPanel (b4xsignaturetemplate) ","b4xsignaturetemplate",54,__ref.getField(false, "ba"),__ref,28); -if (RapidSub.canDelegate("getpanel")) { return __ref.runUserSub(false, "b4xsignaturetemplate","getpanel", __ref, _dialog);} -Debug.locals.put("Dialog", _dialog); - BA.debugLineNum = 28;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 29;BA.debugLine="Return mBase"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_mbase" /*RemoteObject*/ ); - BA.debugLineNum = 30;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xsignaturetemplate) ","b4xsignaturetemplate",54,__ref.getField(false, "ba"),__ref,15); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xsignaturetemplate","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 15;BA.debugLine="Public Sub Initialize"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 16;BA.debugLine="mBase = xui.CreatePanel(\"mBase\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mbase" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("mBase")))); - BA.debugLineNum = 17;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, 300dip, 200dip)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(b4xsignaturetemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 300)))),(Object)(b4xsignaturetemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 200))))); - BA.debugLineNum = 18;BA.debugLine="cvs.Initialize(mBase)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ))); - BA.debugLineNum = 19;BA.debugLine="TextFont = xui.CreateDefaultFont(14)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_textfont" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreateDefaultFont",(Object)(BA.numberCast(float.class, 14)))); - BA.debugLineNum = 20;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _mbase_touch(RemoteObject __ref,RemoteObject _action,RemoteObject _x,RemoteObject _y) throws Exception{ -try { - Debug.PushSubsStack("mBase_Touch (b4xsignaturetemplate) ","b4xsignaturetemplate",54,__ref.getField(false, "ba"),__ref,38); -if (RapidSub.canDelegate("mbase_touch")) { return __ref.runUserSub(false, "b4xsignaturetemplate","mbase_touch", __ref, _action, _x, _y);} -Debug.locals.put("Action", _action); -Debug.locals.put("X", _x); -Debug.locals.put("Y", _y); - BA.debugLineNum = 38;BA.debugLine="Private Sub mBase_Touch (Action As Int, X As Float"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 39;BA.debugLine="Select Action"; -Debug.JustUpdateDeviceLine(); -switch (BA.switchObjectToInt(_action,__ref.getField(false,"_mbase" /*RemoteObject*/ ).getField(true,"TOUCH_ACTION_DOWN"),__ref.getField(false,"_mbase" /*RemoteObject*/ ).getField(true,"TOUCH_ACTION_MOVE"))) { -case 0: { - BA.debugLineNum = 41;BA.debugLine="LastX = X"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_lastx" /*RemoteObject*/ ,_x); - BA.debugLineNum = 42;BA.debugLine="LastY = Y"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_lasty" /*RemoteObject*/ ,_y); - break; } -case 1: { - BA.debugLineNum = 44;BA.debugLine="cvs.DrawLine(LastX, LastY, X, Y, StrokeColor, S"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawLine",(Object)(__ref.getField(true,"_lastx" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_lasty" /*RemoteObject*/ )),(Object)(_x),(Object)(_y),(Object)(__ref.getField(true,"_strokecolor" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_strokewidth" /*RemoteObject*/ ))); - BA.debugLineNum = 45;BA.debugLine="LastX = X"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_lastx" /*RemoteObject*/ ,_x); - BA.debugLineNum = 46;BA.debugLine="LastY = Y"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_lasty" /*RemoteObject*/ ,_y); - BA.debugLineNum = 47;BA.debugLine="cvs.Invalidate"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Invalidate"); - BA.debugLineNum = 48;BA.debugLine="NumberOfPoints = NumberOfPoints + 1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_numberofpoints" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_numberofpoints" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "+",1, 1)); - break; } -} -; - BA.debugLineNum = 50;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("Resize (b4xsignaturetemplate) ","b4xsignaturetemplate",54,__ref.getField(false, "ba"),__ref,22); -if (RapidSub.canDelegate("resize")) { return __ref.runUserSub(false, "b4xsignaturetemplate","resize", __ref, _width, _height);} -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 22;BA.debugLine="Public Sub Resize(Width As Int, Height As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 23;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, Width, Height)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(_width),(Object)(_height)); - BA.debugLineNum = 24;BA.debugLine="cvs.Resize(Width, Height)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Resize",(Object)(BA.numberCast(float.class, _width)),(Object)(BA.numberCast(float.class, _height))); - BA.debugLineNum = 25;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _show(RemoteObject __ref,RemoteObject _dialog) throws Exception{ -try { - Debug.PushSubsStack("Show (b4xsignaturetemplate) ","b4xsignaturetemplate",54,__ref.getField(false, "ba"),__ref,32); -if (RapidSub.canDelegate("show")) { return __ref.runUserSub(false, "b4xsignaturetemplate","show", __ref, _dialog);} -Debug.locals.put("Dialog", _dialog); - BA.debugLineNum = 32;BA.debugLine="Private Sub Show (Dialog As B4XDialog) 'ignore"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 33;BA.debugLine="cvs.DrawRect(cvs.TargetRect, BackgroundColor, Tru"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawRect",(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect")),(Object)(__ref.getField(true,"_backgroundcolor" /*RemoteObject*/ )),(Object)(b4xsignaturetemplate.__c.getField(true,"True")),(Object)(BA.numberCast(float.class, 0))); - BA.debugLineNum = 34;BA.debugLine="cvs.Invalidate"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Invalidate"); - BA.debugLineNum = 35;BA.debugLine="NumberOfPoints = 0"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_numberofpoints" /*RemoteObject*/ ,BA.numberCast(int.class, 0)); - BA.debugLineNum = 36;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xswitch.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xswitch.java deleted file mode 100644 index c8f4c53..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xswitch.java +++ /dev/null @@ -1,47 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xswitch { - public static RemoteObject myClass; - public b4xswitch() { - } - public static PCBA staticBA = new PCBA(null, b4xswitch.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _meventname = RemoteObject.createImmutable(""); -public static RemoteObject _mcallback = RemoteObject.declareNull("Object"); -public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _oncolor = RemoteObject.declareNull("b4a.example.bcpath._bcbrush"); -public static RemoteObject _offcolor = RemoteObject.declareNull("b4a.example.bcpath._bcbrush"); -public static RemoteObject _bc = RemoteObject.declareNull("b4a.example.bitmapcreator"); -public static RemoteObject _width = RemoteObject.createImmutable(0); -public static RemoteObject _height = RemoteObject.createImmutable(0); -public static RemoteObject _thumbcolor = RemoteObject.declareNull("b4a.example.bcpath._bcbrush"); -public static RemoteObject _iv = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -public static RemoteObject _mvalue = RemoteObject.createImmutable(false); -public static RemoteObject _transparent = RemoteObject.declareNull("b4a.example.bcpath._bcbrush"); -public static RemoteObject _loopindex = RemoteObject.createImmutable(0); -public static RemoteObject _tag = RemoteObject.declareNull("Object"); -public static RemoteObject _scale = RemoteObject.createImmutable(0f); -public static RemoteObject _menabled = RemoteObject.createImmutable(false); -public static RemoteObject _mhaptic = RemoteObject.createImmutable(false); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"bc",_ref.getField(false, "_bc"),"DateUtils",_ref.getField(false, "_dateutils"),"Height",_ref.getField(false, "_height"),"iv",_ref.getField(false, "_iv"),"LoopIndex",_ref.getField(false, "_loopindex"),"mBase",_ref.getField(false, "_mbase"),"mCallBack",_ref.getField(false, "_mcallback"),"mEnabled",_ref.getField(false, "_menabled"),"mEventName",_ref.getField(false, "_meventname"),"mHaptic",_ref.getField(false, "_mhaptic"),"mValue",_ref.getField(false, "_mvalue"),"OffColor",_ref.getField(false, "_offcolor"),"OnColor",_ref.getField(false, "_oncolor"),"Scale",_ref.getField(false, "_scale"),"Tag",_ref.getField(false, "_tag"),"ThumbColor",_ref.getField(false, "_thumbcolor"),"transparent",_ref.getField(false, "_transparent"),"Width",_ref.getField(false, "_width"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xswitch_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xswitch_subs_0.java deleted file mode 100644 index 0325c29..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xswitch_subs_0.java +++ /dev/null @@ -1,659 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xswitch_subs_0 { - - -public static RemoteObject _base_resize(RemoteObject __ref,RemoteObject _width1,RemoteObject _height1) throws Exception{ -try { - Debug.PushSubsStack("Base_Resize (b4xswitch) ","b4xswitch",55,__ref.getField(false, "ba"),__ref,148); -if (RapidSub.canDelegate("base_resize")) { return __ref.runUserSub(false, "b4xswitch","base_resize", __ref, _width1, _height1);} -Debug.locals.put("Width1", _width1); -Debug.locals.put("Height1", _height1); - BA.debugLineNum = 148;BA.debugLine="Private Sub Base_Resize (Width1 As Double, Height1"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 150;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 7;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 8;BA.debugLine="Private mEventName As String 'ignore"; -b4xswitch._meventname = RemoteObject.createImmutable("");__ref.setField("_meventname",b4xswitch._meventname); - //BA.debugLineNum = 9;BA.debugLine="Private mCallBack As Object 'ignore"; -b4xswitch._mcallback = RemoteObject.createNew ("Object");__ref.setField("_mcallback",b4xswitch._mcallback); - //BA.debugLineNum = 10;BA.debugLine="Public mBase As B4XView 'ignore"; -b4xswitch._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",b4xswitch._mbase); - //BA.debugLineNum = 11;BA.debugLine="Private xui As XUI 'ignore"; -b4xswitch._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",b4xswitch._xui); - //BA.debugLineNum = 12;BA.debugLine="Private OnColor, OffColor As BCBrush"; -b4xswitch._oncolor = RemoteObject.createNew ("b4a.example.bcpath._bcbrush");__ref.setField("_oncolor",b4xswitch._oncolor); -b4xswitch._offcolor = RemoteObject.createNew ("b4a.example.bcpath._bcbrush");__ref.setField("_offcolor",b4xswitch._offcolor); - //BA.debugLineNum = 13;BA.debugLine="Private bc As BitmapCreator"; -b4xswitch._bc = RemoteObject.createNew ("b4a.example.bitmapcreator");__ref.setField("_bc",b4xswitch._bc); - //BA.debugLineNum = 14;BA.debugLine="Private Width As Int = 55dip"; -b4xswitch._width = b4xswitch.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 55)));__ref.setField("_width",b4xswitch._width); - //BA.debugLineNum = 15;BA.debugLine="Private Height As Int = 31dip"; -b4xswitch._height = b4xswitch.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 31)));__ref.setField("_height",b4xswitch._height); - //BA.debugLineNum = 16;BA.debugLine="Private ThumbColor As BCBrush"; -b4xswitch._thumbcolor = RemoteObject.createNew ("b4a.example.bcpath._bcbrush");__ref.setField("_thumbcolor",b4xswitch._thumbcolor); - //BA.debugLineNum = 17;BA.debugLine="Private iv As ImageView"; -b4xswitch._iv = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");__ref.setField("_iv",b4xswitch._iv); - //BA.debugLineNum = 18;BA.debugLine="Private mValue As Boolean"; -b4xswitch._mvalue = RemoteObject.createImmutable(false);__ref.setField("_mvalue",b4xswitch._mvalue); - //BA.debugLineNum = 19;BA.debugLine="Private transparent As BCBrush"; -b4xswitch._transparent = RemoteObject.createNew ("b4a.example.bcpath._bcbrush");__ref.setField("_transparent",b4xswitch._transparent); - //BA.debugLineNum = 20;BA.debugLine="Private LoopIndex As Int"; -b4xswitch._loopindex = RemoteObject.createImmutable(0);__ref.setField("_loopindex",b4xswitch._loopindex); - //BA.debugLineNum = 21;BA.debugLine="Public Tag As Object"; -b4xswitch._tag = RemoteObject.createNew ("Object");__ref.setField("_tag",b4xswitch._tag); - //BA.debugLineNum = 22;BA.debugLine="Private Scale As Float"; -b4xswitch._scale = RemoteObject.createImmutable(0f);__ref.setField("_scale",b4xswitch._scale); - //BA.debugLineNum = 23;BA.debugLine="Private mEnabled As Boolean = True"; -b4xswitch._menabled = b4xswitch.__c.getField(true,"True");__ref.setField("_menabled",b4xswitch._menabled); - //BA.debugLineNum = 24;BA.debugLine="Public mHaptic As Boolean"; -b4xswitch._mhaptic = RemoteObject.createImmutable(false);__ref.setField("_mhaptic",b4xswitch._mhaptic); - //BA.debugLineNum = 25;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _designercreateview(RemoteObject __ref,RemoteObject _base,RemoteObject _lbl,RemoteObject _props) throws Exception{ -try { - Debug.PushSubsStack("DesignerCreateView (b4xswitch) ","b4xswitch",55,__ref.getField(false, "ba"),__ref,33); -if (RapidSub.canDelegate("designercreateview")) { return __ref.runUserSub(false, "b4xswitch","designercreateview", __ref, _base, _lbl, _props);} -RemoteObject _pnl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -Debug.locals.put("Base", _base); -Debug.locals.put("Lbl", _lbl); -Debug.locals.put("Props", _props); - BA.debugLineNum = 33;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 34;BA.debugLine="mBase = Base"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).setObject (_base); - BA.debugLineNum = 35;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_tag" /*RemoteObject*/ ,__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"getTag")); - BA.debugLineNum = 35;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"setTag",__ref); - BA.debugLineNum = 36;BA.debugLine="mBase.SetLayoutAnimated(0, mBase.Left, mBase.Top,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getLeft")),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getTop")),(Object)(__ref.getField(true,"_width" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_height" /*RemoteObject*/ ))); - BA.debugLineNum = 37;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetColorAndBorder",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 38;BA.debugLine="Dim pnl As B4XView = xui.CreatePanel(\"pnl\")"; -Debug.JustUpdateDeviceLine(); -_pnl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_pnl = __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("pnl")));Debug.locals.put("pnl", _pnl);Debug.locals.put("pnl", _pnl); - BA.debugLineNum = 39;BA.debugLine="pnl.Color = xui.Color_Transparent"; -Debug.JustUpdateDeviceLine(); -_pnl.runMethod(true,"setColor",__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")); - BA.debugLineNum = 40;BA.debugLine="iv.Initialize(\"\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_iv" /*RemoteObject*/ ).runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable(""))); - BA.debugLineNum = 41;BA.debugLine="mBase.AddView(iv, 0, 0, Width, Height)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_iv" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(true,"_width" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_height" /*RemoteObject*/ ))); - BA.debugLineNum = 42;BA.debugLine="mBase.AddView(pnl, 0, 0, Width, Height)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((_pnl.getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(true,"_width" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_height" /*RemoteObject*/ ))); - BA.debugLineNum = 44;BA.debugLine="bc.Initialize(Width, Height)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_initialize",__ref.getField(false, "ba"),(Object)(__ref.getField(true,"_width" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_height" /*RemoteObject*/ ))); - BA.debugLineNum = 45;BA.debugLine="Scale = xui.Scale"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_scale" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getScale")); - BA.debugLineNum = 50;BA.debugLine="OnColor = bc.CreateBrushFromColor(xui.PaintOrColo"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_oncolor" /*RemoteObject*/ ,__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_createbrushfromcolor",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("OnColor"))))))))); - BA.debugLineNum = 51;BA.debugLine="OffColor = bc.CreateBrushFromColor(xui.PaintOrCol"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_offcolor" /*RemoteObject*/ ,__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_createbrushfromcolor",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("OffColor"))))))))); - BA.debugLineNum = 52;BA.debugLine="ThumbColor = bc.CreateBrushFromColor(xui.PaintOrC"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_thumbcolor" /*RemoteObject*/ ,__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_createbrushfromcolor",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("ThumbColor"))))))))); - BA.debugLineNum = 53;BA.debugLine="mHaptic = Props.GetDefault(\"HapticFeedback\", Fals"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mhaptic" /*RemoteObject*/ ,BA.ObjectToBoolean(_props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("HapticFeedback"))),(Object)((b4xswitch.__c.getField(true,"False")))))); - BA.debugLineNum = 54;BA.debugLine="transparent = bc.CreateBrushFromColor(xui.Color_T"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_transparent" /*RemoteObject*/ ,__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_createbrushfromcolor",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")))); - BA.debugLineNum = 55;BA.debugLine="mEnabled = mBase.Enabled"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_menabled" /*RemoteObject*/ ,__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getEnabled")); - BA.debugLineNum = 56;BA.debugLine="mBase.Enabled = True"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"setEnabled",b4xswitch.__c.getField(true,"True")); - BA.debugLineNum = 57;BA.debugLine="SetValueImpl(Props.Get(\"Value\"), True)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xswitch.class, "_setvalueimpl" /*void*/ ,(Object)(BA.ObjectToBoolean(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("Value")))))),(Object)(b4xswitch.__c.getField(true,"True"))); - BA.debugLineNum = 58;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _draw(RemoteObject __ref,RemoteObject _state) throws Exception{ -try { - Debug.PushSubsStack("Draw (b4xswitch) ","b4xswitch",55,__ref.getField(false, "ba"),__ref,126); -if (RapidSub.canDelegate("draw")) { return __ref.runUserSub(false, "b4xswitch","draw", __ref, _state);} -RemoteObject _r = RemoteObject.createImmutable(0f); -RemoteObject _cx = RemoteObject.createImmutable(0f); -RemoteObject _cy = RemoteObject.createImmutable(0); -RemoteObject _smallrect = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XRect"); -RemoteObject _w = RemoteObject.createImmutable(0f); -RemoteObject _h = RemoteObject.createImmutable(0f); -Debug.locals.put("State", _state); - BA.debugLineNum = 126;BA.debugLine="Private Sub Draw (State As Float)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 127;BA.debugLine="bc.DrawRect2(bc.TargetRect, transparent, True, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_drawrect2",(Object)(__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(false,"_targetrect")),(Object)(__ref.getField(false,"_transparent" /*RemoteObject*/ )),(Object)(b4xswitch.__c.getField(true,"True")),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 128;BA.debugLine="Dim r As Float = Round(bc.mHeight / 2)"; -Debug.JustUpdateDeviceLine(); -_r = BA.numberCast(float.class, b4xswitch.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(true,"_mheight"),RemoteObject.createImmutable(2)}, "/",0, 0))));Debug.locals.put("r", _r);Debug.locals.put("r", _r); - BA.debugLineNum = 129;BA.debugLine="Dim cx As Float = r - 1 * Scale + (bc.mWidth - 2"; -Debug.JustUpdateDeviceLine(); -_cx = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_r,RemoteObject.createImmutable(1),__ref.getField(true,"_scale" /*RemoteObject*/ ),(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(true,"_mwidth"),RemoteObject.createImmutable(2),_r}, "-*",1, 0)),_state}, "-*+*",2, 0));Debug.locals.put("cx", _cx);Debug.locals.put("cx", _cx); - BA.debugLineNum = 130;BA.debugLine="If State = 0 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_state,BA.numberCast(double.class, 0))) { - BA.debugLineNum = 131;BA.debugLine="cx = r"; -Debug.JustUpdateDeviceLine(); -_cx = _r;Debug.locals.put("cx", _cx); - }else -{ BA.debugLineNum = 132;BA.debugLine="Else If State = 1 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_state,BA.numberCast(double.class, 1))) { - BA.debugLineNum = 133;BA.debugLine="cx = Round(bc.mWidth - 1 * Scale - r)"; -Debug.JustUpdateDeviceLine(); -_cx = BA.numberCast(float.class, b4xswitch.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(true,"_mwidth"),RemoteObject.createImmutable(1),__ref.getField(true,"_scale" /*RemoteObject*/ ),_r}, "-*-",2, 0))));Debug.locals.put("cx", _cx); - }} -; - BA.debugLineNum = 135;BA.debugLine="Dim cy As Int = bc.mHeight / 2"; -Debug.JustUpdateDeviceLine(); -_cy = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(true,"_mheight"),RemoteObject.createImmutable(2)}, "/",0, 0));Debug.locals.put("cy", _cy);Debug.locals.put("cy", _cy); - BA.debugLineNum = 136;BA.debugLine="Dim smallrect As B4XRect"; -Debug.JustUpdateDeviceLine(); -_smallrect = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas.B4XRect");Debug.locals.put("smallrect", _smallrect); - BA.debugLineNum = 137;BA.debugLine="Dim w As Float = State * bc.mWidth"; -Debug.JustUpdateDeviceLine(); -_w = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_state,__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(true,"_mwidth")}, "*",0, 0));Debug.locals.put("w", _w);Debug.locals.put("w", _w); - BA.debugLineNum = 138;BA.debugLine="Dim h As Float = State * bc.mHeight"; -Debug.JustUpdateDeviceLine(); -_h = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_state,__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(true,"_mheight")}, "*",0, 0));Debug.locals.put("h", _h);Debug.locals.put("h", _h); - BA.debugLineNum = 139;BA.debugLine="If State < 1 Then bc.DrawRectRounded2(bc.TargetRe"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("<",_state,BA.numberCast(double.class, 1))) { -__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_drawrectrounded2",(Object)(__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(false,"_targetrect")),(Object)(__ref.getField(false,"_offcolor" /*RemoteObject*/ )),(Object)(b4xswitch.__c.getField(true,"True")),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(2),__ref.getField(true,"_scale" /*RemoteObject*/ )}, "*",0, 0))),(Object)(BA.numberCast(int.class, _r)));}; - BA.debugLineNum = 140;BA.debugLine="smallrect.Initialize(bc.mWidth / 2 - w / 2, cy -"; -Debug.JustUpdateDeviceLine(); -_smallrect.runVoidMethod ("Initialize",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(true,"_mwidth"),RemoteObject.createImmutable(2),_w,RemoteObject.createImmutable(2)}, "/-/",1, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_cy,_h,RemoteObject.createImmutable(2)}, "-/",1, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(true,"_mwidth"),RemoteObject.createImmutable(2),_w,RemoteObject.createImmutable(2)}, "/+/",1, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_cy,_h,RemoteObject.createImmutable(2)}, "+/",1, 0)))); - BA.debugLineNum = 141;BA.debugLine="If State > 0 Then bc.DrawRectRounded2(smallrect,"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",_state,BA.numberCast(double.class, 0))) { -__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_drawrectrounded2",(Object)(_smallrect),(Object)(__ref.getField(false,"_oncolor" /*RemoteObject*/ )),(Object)(b4xswitch.__c.getField(true,"True")),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(2),__ref.getField(true,"_scale" /*RemoteObject*/ )}, "*",0, 0))),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_smallrect.runMethod(true,"getHeight"),RemoteObject.createImmutable(2)}, "/",0, 0))));}; - BA.debugLineNum = 142;BA.debugLine="If mEnabled Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_menabled" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 143;BA.debugLine="bc.DrawCircle2(cx, cy, r - 2 * Scale, ThumbColor"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_drawcircle2",(Object)(_cx),(Object)(BA.numberCast(float.class, _cy)),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_r,RemoteObject.createImmutable(2),__ref.getField(true,"_scale" /*RemoteObject*/ )}, "-*",1, 0))),(Object)(__ref.getField(false,"_thumbcolor" /*RemoteObject*/ )),(Object)(b4xswitch.__c.getField(true,"True")),(Object)(BA.numberCast(int.class, 0))); - }; - BA.debugLineNum = 145;BA.debugLine="bc.SetBitmapToImageView(bc.Bitmap, iv)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_setbitmaptoimageview",(Object)(__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_getbitmap")),RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), __ref.getField(false,"_iv" /*RemoteObject*/ ).getObject())); - BA.debugLineNum = 146;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getenabled(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getEnabled (b4xswitch) ","b4xswitch",55,__ref.getField(false, "ba"),__ref,122); -if (RapidSub.canDelegate("getenabled")) { return __ref.runUserSub(false, "b4xswitch","getenabled", __ref);} - BA.debugLineNum = 122;BA.debugLine="Public Sub getEnabled As Boolean"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 123;BA.debugLine="Return mEnabled"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_menabled" /*RemoteObject*/ ); - BA.debugLineNum = 124;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getvalue(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getValue (b4xswitch) ","b4xswitch",55,__ref.getField(false, "ba"),__ref,113); -if (RapidSub.canDelegate("getvalue")) { return __ref.runUserSub(false, "b4xswitch","getvalue", __ref);} - BA.debugLineNum = 113;BA.debugLine="Public Sub getValue As Boolean"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 114;BA.debugLine="Return mValue"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_mvalue" /*RemoteObject*/ ); - BA.debugLineNum = 115;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _callback,RemoteObject _eventname) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xswitch) ","b4xswitch",55,__ref.getField(false, "ba"),__ref,27); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xswitch","initialize", __ref, _ba, _callback, _eventname);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); -Debug.locals.put("Callback", _callback); -Debug.locals.put("EventName", _eventname); - BA.debugLineNum = 27;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 28;BA.debugLine="mEventName = EventName"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_meventname" /*RemoteObject*/ ,_eventname); - BA.debugLineNum = 29;BA.debugLine="mCallBack = Callback"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mcallback" /*RemoteObject*/ ,_callback); - BA.debugLineNum = 30;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _pnl_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("pnl_Click (b4xswitch) ","b4xswitch",55,__ref.getField(false, "ba"),__ref,70); -if (RapidSub.canDelegate("pnl_click")) { return __ref.runUserSub(false, "b4xswitch","pnl_click", __ref);} - BA.debugLineNum = 70;BA.debugLine="Private Sub pnl_Click"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 72;BA.debugLine="If mEnabled Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_menabled" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 73;BA.debugLine="If mHaptic Then XUIViewsUtils.PerformHapticFeedb"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_mhaptic" /*RemoteObject*/ ).get().booleanValue()) { -b4xswitch._xuiviewsutils.runVoidMethod ("_performhapticfeedback" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ )));}; - BA.debugLineNum = 74;BA.debugLine="SetValueImpl(Not(mValue), False)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xswitch.class, "_setvalueimpl" /*void*/ ,(Object)(b4xswitch.__c.runMethod(true,"Not",(Object)(__ref.getField(true,"_mvalue" /*RemoteObject*/ )))),(Object)(b4xswitch.__c.getField(true,"False"))); - BA.debugLineNum = 75;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_Value"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"SubExists",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_ValueChanged"))),(Object)(BA.numberCast(int.class, 1))).get().booleanValue()) { - BA.debugLineNum = 76;BA.debugLine="CallSubDelayed2(mCallBack, mEventName & \"_Value"; -Debug.JustUpdateDeviceLine(); -b4xswitch.__c.runVoidMethod ("CallSubDelayed2",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_ValueChanged"))),(Object)((__ref.getField(true,"_mvalue" /*RemoteObject*/ )))); - }; - }; - BA.debugLineNum = 79;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setenabled(RemoteObject __ref,RemoteObject _b) throws Exception{ -try { - Debug.PushSubsStack("setEnabled (b4xswitch) ","b4xswitch",55,__ref.getField(false, "ba"),__ref,117); -if (RapidSub.canDelegate("setenabled")) { return __ref.runUserSub(false, "b4xswitch","setenabled", __ref, _b);} -Debug.locals.put("b", _b); - BA.debugLineNum = 117;BA.debugLine="Public Sub setEnabled (b As Boolean)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 118;BA.debugLine="mEnabled = b"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_menabled" /*RemoteObject*/ ,_b); - BA.debugLineNum = 119;BA.debugLine="SetValueImpl(mValue, True)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xswitch.class, "_setvalueimpl" /*void*/ ,(Object)(__ref.getField(true,"_mvalue" /*RemoteObject*/ )),(Object)(b4xswitch.__c.getField(true,"True"))); - BA.debugLineNum = 120;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setvalue(RemoteObject __ref,RemoteObject _b) throws Exception{ -try { - Debug.PushSubsStack("setValue (b4xswitch) ","b4xswitch",55,__ref.getField(false, "ba"),__ref,108); -if (RapidSub.canDelegate("setvalue")) { return __ref.runUserSub(false, "b4xswitch","setvalue", __ref, _b);} -Debug.locals.put("b", _b); - BA.debugLineNum = 108;BA.debugLine="Public Sub setValue(b As Boolean)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 109;BA.debugLine="If b = mValue Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_b,__ref.getField(true,"_mvalue" /*RemoteObject*/ ))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 110;BA.debugLine="SetValueImpl(b, False)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xswitch.class, "_setvalueimpl" /*void*/ ,(Object)(_b),(Object)(b4xswitch.__c.getField(true,"False"))); - BA.debugLineNum = 111;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _setvalueimpl(RemoteObject __ref,RemoteObject _b,RemoteObject _immediate) throws Exception{ -try { - Debug.PushSubsStack("SetValueImpl (b4xswitch) ","b4xswitch",55,__ref.getField(false, "ba"),__ref,81); -if (RapidSub.canDelegate("setvalueimpl")) { __ref.runUserSub(false, "b4xswitch","setvalueimpl", __ref, _b, _immediate); return;} -ResumableSub_SetValueImpl rsub = new ResumableSub_SetValueImpl(null,__ref,_b,_immediate); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_SetValueImpl extends BA.ResumableSub { -public ResumableSub_SetValueImpl(keymon.lat.medicomed.b4xswitch parent,RemoteObject __ref,RemoteObject _b,RemoteObject _immediate) { -this.parent = parent; -this.__ref = __ref; -this._b = _b; -this._immediate = _immediate; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.b4xswitch parent; -RemoteObject _b; -RemoteObject _immediate; -RemoteObject _myindex = RemoteObject.createImmutable(0); -RemoteObject _start = RemoteObject.createImmutable(0L); -RemoteObject _duration = RemoteObject.createImmutable(0); -RemoteObject _state1 = RemoteObject.createImmutable(0f); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("SetValueImpl (b4xswitch) ","b4xswitch",55,__ref.getField(false, "ba"),__ref,81); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); -Debug.locals.put("b", _b); -Debug.locals.put("Immediate", _immediate); - BA.debugLineNum = 82;BA.debugLine="mValue = b"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mvalue" /*RemoteObject*/ ,_b); - BA.debugLineNum = 83;BA.debugLine="LoopIndex = LoopIndex + 1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_loopindex" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_loopindex" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "+",1, 1)); - BA.debugLineNum = 84;BA.debugLine="If Immediate Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 1: -//if -this.state = 41; -if (_immediate.get().booleanValue()) { -this.state = 3; -}else { -this.state = 13; -}if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 85;BA.debugLine="If mValue Then Draw(1) Else Draw(0)"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 4: -//if -this.state = 11; -if (__ref.getField(true,"_mvalue" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 6; -;} -else { -this.state = 8; -;}if (true) break; - -case 6: -//C -this.state = 11; -__ref.runClassMethod (keymon.lat.medicomed.b4xswitch.class, "_draw" /*RemoteObject*/ ,(Object)(BA.numberCast(float.class, 1))); -if (true) break; - -case 8: -//C -this.state = 11; -__ref.runClassMethod (keymon.lat.medicomed.b4xswitch.class, "_draw" /*RemoteObject*/ ,(Object)(BA.numberCast(float.class, 0))); -if (true) break; - -case 11: -//C -this.state = 41; -; - if (true) break; - -case 13: -//C -this.state = 14; - BA.debugLineNum = 87;BA.debugLine="Dim MyIndex As Int = LoopIndex"; -Debug.JustUpdateDeviceLine(); -_myindex = __ref.getField(true,"_loopindex" /*RemoteObject*/ );Debug.locals.put("MyIndex", _myindex);Debug.locals.put("MyIndex", _myindex); - BA.debugLineNum = 88;BA.debugLine="Dim start As Long = DateTime.Now"; -Debug.JustUpdateDeviceLine(); -_start = parent.__c.getField(false,"DateTime").runMethod(true,"getNow");Debug.locals.put("start", _start);Debug.locals.put("start", _start); - BA.debugLineNum = 89;BA.debugLine="Dim duration As Int = 200"; -Debug.JustUpdateDeviceLine(); -_duration = BA.numberCast(int.class, 200);Debug.locals.put("duration", _duration);Debug.locals.put("duration", _duration); - BA.debugLineNum = 90;BA.debugLine="Do While DateTime.Now < start + duration"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 14: -//do while -this.state = 29; -while (RemoteObject.solveBoolean("<",parent.__c.getField(false,"DateTime").runMethod(true,"getNow"),RemoteObject.solve(new RemoteObject[] {_start,_duration}, "+",1, 2))) { -this.state = 16; -if (true) break; -} -if (true) break; - -case 16: -//C -this.state = 17; - BA.debugLineNum = 91;BA.debugLine="Dim state1 As Float = (DateTime.Now - start) /"; -Debug.JustUpdateDeviceLine(); -_state1 = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {parent.__c.getField(false,"DateTime").runMethod(true,"getNow"),_start}, "-",1, 2)),_duration}, "/",0, 0));Debug.locals.put("state1", _state1);Debug.locals.put("state1", _state1); - BA.debugLineNum = 92;BA.debugLine="If mValue = False Then state1 = 1 - state1"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 17: -//if -this.state = 22; -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_mvalue" /*RemoteObject*/ ),parent.__c.getField(true,"False"))) { -this.state = 19; -;}if (true) break; - -case 19: -//C -this.state = 22; -_state1 = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(1),_state1}, "-",1, 0));Debug.locals.put("state1", _state1); -if (true) break; - -case 22: -//C -this.state = 23; -; - BA.debugLineNum = 93;BA.debugLine="Draw(state1)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.b4xswitch.class, "_draw" /*RemoteObject*/ ,(Object)(_state1)); - BA.debugLineNum = 94;BA.debugLine="Sleep(16)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xswitch", "setvalueimpl"),BA.numberCast(int.class, 16)); -this.state = 47; -return; -case 47: -//C -this.state = 23; -; - BA.debugLineNum = 95;BA.debugLine="If MyIndex <> LoopIndex Then Exit"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 23: -//if -this.state = 28; -if (RemoteObject.solveBoolean("!",_myindex,BA.numberCast(double.class, __ref.getField(true,"_loopindex" /*RemoteObject*/ )))) { -this.state = 25; -;}if (true) break; - -case 25: -//C -this.state = 28; -this.state = 29; -if (true) break; -if (true) break; - -case 28: -//C -this.state = 14; -; - if (true) break; -; - BA.debugLineNum = 97;BA.debugLine="If MyIndex = LoopIndex Then"; -Debug.JustUpdateDeviceLine(); - -case 29: -//if -this.state = 40; -if (RemoteObject.solveBoolean("=",_myindex,BA.numberCast(double.class, __ref.getField(true,"_loopindex" /*RemoteObject*/ )))) { -this.state = 31; -}if (true) break; - -case 31: -//C -this.state = 32; - BA.debugLineNum = 98;BA.debugLine="If mValue Then Draw(1) Else Draw(0)"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 32: -//if -this.state = 39; -if (__ref.getField(true,"_mvalue" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 34; -;} -else { -this.state = 36; -;}if (true) break; - -case 34: -//C -this.state = 39; -__ref.runClassMethod (keymon.lat.medicomed.b4xswitch.class, "_draw" /*RemoteObject*/ ,(Object)(BA.numberCast(float.class, 1))); -if (true) break; - -case 36: -//C -this.state = 39; -__ref.runClassMethod (keymon.lat.medicomed.b4xswitch.class, "_draw" /*RemoteObject*/ ,(Object)(BA.numberCast(float.class, 0))); -if (true) break; - -case 39: -//C -this.state = 40; -; - if (true) break; - -case 40: -//C -this.state = 41; -; - if (true) break; -; - BA.debugLineNum = 101;BA.debugLine="If mEnabled Then"; -Debug.JustUpdateDeviceLine(); - -case 41: -//if -this.state = 46; -if (__ref.getField(true,"_menabled" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 43; -}else { -this.state = 45; -}if (true) break; - -case 43: -//C -this.state = 46; - BA.debugLineNum = 102;BA.debugLine="XUIViewsUtils.SetAlpha(mBase, 1)"; -Debug.JustUpdateDeviceLine(); -parent._xuiviewsutils.runVoidMethod ("_setalpha" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ )),(Object)(BA.numberCast(float.class, 1))); - if (true) break; - -case 45: -//C -this.state = 46; - BA.debugLineNum = 104;BA.debugLine="XUIViewsUtils.SetAlpha(mBase, 0.6)"; -Debug.JustUpdateDeviceLine(); -parent._xuiviewsutils.runVoidMethod ("_setalpha" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ )),(Object)(BA.numberCast(float.class, 0.6))); - if (true) break; - -case 46: -//C -this.state = -1; -; - BA.debugLineNum = 106;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xtimedtemplate.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xtimedtemplate.java deleted file mode 100644 index 62994e9..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xtimedtemplate.java +++ /dev/null @@ -1,35 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class b4xtimedtemplate { - public static RemoteObject myClass; - public b4xtimedtemplate() { - } - public static PCBA staticBA = new PCBA(null, b4xtimedtemplate.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _anotherprogressbar1 = RemoteObject.declareNull("keymon.lat.medicomed.anotherprogressbar"); -public static RemoteObject _mtemplate = RemoteObject.declareNull("Object"); -public static RemoteObject _timeoutmilliseconds = RemoteObject.createImmutable(0); -public static RemoteObject _index = RemoteObject.createImmutable(0); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"AnotherProgressBar1",_ref.getField(false, "_anotherprogressbar1"),"DateUtils",_ref.getField(false, "_dateutils"),"Index",_ref.getField(false, "_index"),"mBase",_ref.getField(false, "_mbase"),"mTemplate",_ref.getField(false, "_mtemplate"),"TimeoutMilliseconds",_ref.getField(false, "_timeoutmilliseconds"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xtimedtemplate_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/b4xtimedtemplate_subs_0.java deleted file mode 100644 index e0ec251..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/b4xtimedtemplate_subs_0.java +++ /dev/null @@ -1,224 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class b4xtimedtemplate_subs_0 { - - -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Private xui As XUI"; -b4xtimedtemplate._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",b4xtimedtemplate._xui); - //BA.debugLineNum = 3;BA.debugLine="Public mBase As B4XView"; -b4xtimedtemplate._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",b4xtimedtemplate._mbase); - //BA.debugLineNum = 4;BA.debugLine="Private AnotherProgressBar1 As AnotherProgressBar"; -b4xtimedtemplate._anotherprogressbar1 = RemoteObject.createNew ("keymon.lat.medicomed.anotherprogressbar");__ref.setField("_anotherprogressbar1",b4xtimedtemplate._anotherprogressbar1); - //BA.debugLineNum = 5;BA.debugLine="Private mTemplate As Object"; -b4xtimedtemplate._mtemplate = RemoteObject.createNew ("Object");__ref.setField("_mtemplate",b4xtimedtemplate._mtemplate); - //BA.debugLineNum = 6;BA.debugLine="Public TimeoutMilliseconds As Int = 10000"; -b4xtimedtemplate._timeoutmilliseconds = BA.numberCast(int.class, 10000);__ref.setField("_timeoutmilliseconds",b4xtimedtemplate._timeoutmilliseconds); - //BA.debugLineNum = 7;BA.debugLine="Private Index As Int"; -b4xtimedtemplate._index = RemoteObject.createImmutable(0);__ref.setField("_index",b4xtimedtemplate._index); - //BA.debugLineNum = 8;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _dialogclosed(RemoteObject __ref,RemoteObject _result) throws Exception{ -try { - Debug.PushSubsStack("DialogClosed (b4xtimedtemplate) ","b4xtimedtemplate",56,__ref.getField(false, "ba"),__ref,41); -if (RapidSub.canDelegate("dialogclosed")) { return __ref.runUserSub(false, "b4xtimedtemplate","dialogclosed", __ref, _result);} -Debug.locals.put("Result", _result); - BA.debugLineNum = 41;BA.debugLine="Private Sub DialogClosed(Result As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 42;BA.debugLine="Index = Index + 1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_index" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_index" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "+",1, 1)); - BA.debugLineNum = 43;BA.debugLine="CallSub2(mTemplate, \"DialogClosed\", Result)"; -Debug.JustUpdateDeviceLine(); -b4xtimedtemplate.__c.runMethodAndSync(false,"CallSubNew2",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mtemplate" /*RemoteObject*/ )),(Object)(BA.ObjectToString("DialogClosed")),(Object)((_result))); - BA.debugLineNum = 44;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getpanel(RemoteObject __ref,RemoteObject _dialog) throws Exception{ -try { - Debug.PushSubsStack("GetPanel (b4xtimedtemplate) ","b4xtimedtemplate",56,__ref.getField(false, "ba"),__ref,16); -if (RapidSub.canDelegate("getpanel")) { return __ref.runUserSub(false, "b4xtimedtemplate","getpanel", __ref, _dialog);} -RemoteObject _innerpanel = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -Debug.locals.put("Dialog", _dialog); - BA.debugLineNum = 16;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 17;BA.debugLine="If mBase.NumberOfViews = 0 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getNumberOfViews"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 18;BA.debugLine="Dim InnerPanel As B4XView = CallSub2(mTemplate,"; -Debug.JustUpdateDeviceLine(); -_innerpanel = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_innerpanel = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), b4xtimedtemplate.__c.runMethodAndSync(false,"CallSubNew2",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mtemplate" /*RemoteObject*/ )),(Object)(BA.ObjectToString("GetPanel")),(Object)((_dialog))));Debug.locals.put("InnerPanel", _innerpanel);Debug.locals.put("InnerPanel", _innerpanel); - BA.debugLineNum = 19;BA.debugLine="If InnerPanel.Parent.IsInitialized Then InnerPan"; -Debug.JustUpdateDeviceLine(); -if (_innerpanel.runMethod(false,"getParent").runMethod(true,"IsInitialized").get().booleanValue()) { -_innerpanel.runVoidMethod ("RemoveViewFromParent");}; - BA.debugLineNum = 20;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, InnerPanel.Widt"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(_innerpanel.runMethod(true,"getWidth")),(Object)(RemoteObject.solve(new RemoteObject[] {_innerpanel.runMethod(true,"getHeight"),b4xtimedtemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 19)))}, "+",1, 1))); - BA.debugLineNum = 21;BA.debugLine="mBase.LoadLayout(\"TimedDialogTemplate\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("TimedDialogTemplate")),__ref.getField(false, "ba")); - BA.debugLineNum = 22;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetColorAndBorder",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 23;BA.debugLine="mBase.AddView(InnerPanel, 0, 19dip, InnerPanel.W"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((_innerpanel.getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(b4xtimedtemplate.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 19)))),(Object)(_innerpanel.runMethod(true,"getWidth")),(Object)(_innerpanel.runMethod(true,"getHeight"))); - }; - BA.debugLineNum = 25;BA.debugLine="Return mBase"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_mbase" /*RemoteObject*/ ); - BA.debugLineNum = 26;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _innertemplate) throws Exception{ -try { - Debug.PushSubsStack("Initialize (b4xtimedtemplate) ","b4xtimedtemplate",56,__ref.getField(false, "ba"),__ref,10); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xtimedtemplate","initialize", __ref, _ba, _innertemplate);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); -Debug.locals.put("InnerTemplate", _innertemplate); - BA.debugLineNum = 10;BA.debugLine="Public Sub Initialize (InnerTemplate As Object)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 11;BA.debugLine="mBase = xui.CreatePanel(\"mBase\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mbase" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("mBase")))); - BA.debugLineNum = 12;BA.debugLine="mTemplate = InnerTemplate"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mtemplate" /*RemoteObject*/ ,_innertemplate); - BA.debugLineNum = 14;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _show(RemoteObject __ref,RemoteObject _dialog) throws Exception{ -try { - Debug.PushSubsStack("Show (b4xtimedtemplate) ","b4xtimedtemplate",56,__ref.getField(false, "ba"),__ref,28); -if (RapidSub.canDelegate("show")) { __ref.runUserSub(false, "b4xtimedtemplate","show", __ref, _dialog); return;} -ResumableSub_Show rsub = new ResumableSub_Show(null,__ref,_dialog); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_Show extends BA.ResumableSub { -public ResumableSub_Show(keymon.lat.medicomed.b4xtimedtemplate parent,RemoteObject __ref,RemoteObject _dialog) { -this.parent = parent; -this.__ref = __ref; -this._dialog = _dialog; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.b4xtimedtemplate parent; -RemoteObject _dialog; -RemoteObject _myindex = RemoteObject.createImmutable(0); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("Show (b4xtimedtemplate) ","b4xtimedtemplate",56,__ref.getField(false, "ba"),__ref,28); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); -Debug.locals.put("Dialog", _dialog); - BA.debugLineNum = 29;BA.debugLine="CallSub2(mTemplate, \"Show\", Dialog)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runMethodAndSync(false,"CallSubNew2",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mtemplate" /*RemoteObject*/ )),(Object)(BA.ObjectToString("Show")),(Object)((_dialog))); - BA.debugLineNum = 30;BA.debugLine="AnotherProgressBar1.SetValueNoAnimation(0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_anotherprogressbar1" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.anotherprogressbar.class, "_setvaluenoanimation" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 31;BA.debugLine="AnotherProgressBar1.ValueChangePerSecond = 100 /"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_anotherprogressbar1" /*RemoteObject*/ ).setField ("_valuechangepersecond" /*RemoteObject*/ ,BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(100),(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_timeoutmilliseconds" /*RemoteObject*/ ),RemoteObject.createImmutable(1000)}, "/",0, 0))}, "/",0, 0))); - BA.debugLineNum = 32;BA.debugLine="AnotherProgressBar1.Value = 100"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_anotherprogressbar1" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.anotherprogressbar.class, "_setvalue" /*RemoteObject*/ ,BA.numberCast(int.class, 100)); - BA.debugLineNum = 33;BA.debugLine="Index = Index + 1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_index" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_index" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "+",1, 1)); - BA.debugLineNum = 34;BA.debugLine="Dim MyIndex As Int = Index"; -Debug.JustUpdateDeviceLine(); -_myindex = __ref.getField(true,"_index" /*RemoteObject*/ );Debug.locals.put("MyIndex", _myindex);Debug.locals.put("MyIndex", _myindex); - BA.debugLineNum = 35;BA.debugLine="Sleep(TimeoutMilliseconds)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "b4xtimedtemplate", "show"),__ref.getField(true,"_timeoutmilliseconds" /*RemoteObject*/ )); -this.state = 5; -return; -case 5: -//C -this.state = 1; -; - BA.debugLineNum = 36;BA.debugLine="If MyIndex = Index Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 1: -//if -this.state = 4; -if (RemoteObject.solveBoolean("=",_myindex,BA.numberCast(double.class, __ref.getField(true,"_index" /*RemoteObject*/ )))) { -this.state = 3; -}if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 37;BA.debugLine="Dialog.Close(xui.DialogResponse_Cancel)"; -Debug.JustUpdateDeviceLine(); -_dialog.runClassMethod (keymon.lat.medicomed.b4xdialog.class, "_close" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"DialogResponse_Cancel"))); - if (true) break; - -case 4: -//C -this.state = -1; -; - BA.debugLineNum = 39;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/batteryutilities.java b/B4A/Objects/shell/src/keymon/lat/medicomed/batteryutilities.java deleted file mode 100644 index 0f90848..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/batteryutilities.java +++ /dev/null @@ -1,30 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class batteryutilities { - public static RemoteObject myClass; - public batteryutilities() { - } - public static PCBA staticBA = new PCBA(null, batteryutilities.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _nativeme = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"DateUtils",_ref.getField(false, "_dateutils"),"nativeMe",_ref.getField(false, "_nativeme")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/batteryutilities_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/batteryutilities_subs_0.java deleted file mode 100644 index c1b56d2..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/batteryutilities_subs_0.java +++ /dev/null @@ -1,89 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class batteryutilities_subs_0 { - - -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 2;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 3;BA.debugLine="Private nativeMe As JavaObject"; -batteryutilities._nativeme = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");__ref.setField("_nativeme",batteryutilities._nativeme); - //BA.debugLineNum = 5;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _getbatteryinformation(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getBatteryInformation (batteryutilities) ","batteryutilities",13,__ref.getField(false, "ba"),__ref,22); -if (RapidSub.canDelegate("getbatteryinformation")) { return __ref.runUserSub(false, "batteryutilities","getbatteryinformation", __ref);} -RemoteObject _batteryinfo = null; - BA.debugLineNum = 22;BA.debugLine="Public Sub getBatteryInformation () As Int()"; -Debug.ShouldStop(2097152); - BA.debugLineNum = 24;BA.debugLine="Dim batteryInfo(11) As Int"; -Debug.ShouldStop(8388608); -_batteryinfo = RemoteObject.createNewArray ("int", new int[] {11}, new Object[]{});Debug.locals.put("batteryInfo", _batteryinfo); - BA.debugLineNum = 25;BA.debugLine="batteryInfo = nativeMe.RunMethod(\"getBatteryInfor"; -Debug.ShouldStop(16777216); -_batteryinfo = (__ref.getField(false,"_nativeme" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(BA.ObjectToString("getBatteryInformation")),(Object)((batteryutilities.__c.getField(false,"Null")))));Debug.locals.put("batteryInfo", _batteryinfo); - BA.debugLineNum = 26;BA.debugLine="Return batteryInfo"; -Debug.ShouldStop(33554432); -if (true) return _batteryinfo; - BA.debugLineNum = 28;BA.debugLine="End Sub"; -Debug.ShouldStop(134217728); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getbatterytechnolgy(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getBatteryTechnolgy (batteryutilities) ","batteryutilities",13,__ref.getField(false, "ba"),__ref,30); -if (RapidSub.canDelegate("getbatterytechnolgy")) { return __ref.runUserSub(false, "batteryutilities","getbatterytechnolgy", __ref);} -RemoteObject _batterytech = RemoteObject.createImmutable(""); - BA.debugLineNum = 30;BA.debugLine="Public Sub getBatteryTechnolgy() As String"; -Debug.ShouldStop(536870912); - BA.debugLineNum = 32;BA.debugLine="Dim batterytech As String"; -Debug.ShouldStop(-2147483648); -_batterytech = RemoteObject.createImmutable("");Debug.locals.put("batterytech", _batterytech); - BA.debugLineNum = 33;BA.debugLine="batterytech = nativeMe.RunMethod(\"getBatteryTechn"; -Debug.ShouldStop(1); -_batterytech = BA.ObjectToString(__ref.getField(false,"_nativeme" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(BA.ObjectToString("getBatteryTechnology")),(Object)((batteryutilities.__c.getField(false,"Null")))));Debug.locals.put("batterytech", _batterytech); - BA.debugLineNum = 34;BA.debugLine="Return batterytech"; -Debug.ShouldStop(2); -if (true) return _batterytech; - BA.debugLineNum = 36;BA.debugLine="End Sub"; -Debug.ShouldStop(8); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (batteryutilities) ","batteryutilities",13,__ref.getField(false, "ba"),__ref,7); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "batteryutilities","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 7;BA.debugLine="Public Sub Initialize"; -Debug.ShouldStop(64); - BA.debugLineNum = 8;BA.debugLine="nativeMe = Me"; -Debug.ShouldStop(128); -__ref.getField(false,"_nativeme" /*RemoteObject*/ ).setObject (__ref); - BA.debugLineNum = 9;BA.debugLine="End Sub"; -Debug.ShouldStop(256); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_cliente.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_cliente.java deleted file mode 100644 index 63efc9c..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_cliente.java +++ /dev/null @@ -1,160 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class c_cliente { - public static RemoteObject myClass; - public c_cliente() { - } - public static PCBA staticBA = new PCBA(null, c_cliente.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _root = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _p_cliente = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _reqmanager = RemoteObject.declareNull("keymon.lat.medicomed.dbrequestmanager"); -public static RemoteObject _cmd = RemoteObject.declareNull("keymon.lat.medicomed.dbrequestmanager._dbcommand"); -public static RemoteObject _ime = RemoteObject.declareNull("anywheresoftware.b4a.objects.IME"); -public static RemoteObject _g = RemoteObject.declareNull("anywheresoftware.b4a.gps.GPS"); -public static RemoteObject _ruta = RemoteObject.createImmutable(""); -public static RemoteObject _skmt = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL"); -public static RemoteObject _clie_id = RemoteObject.createImmutable(""); -public static RemoteObject _sdate = RemoteObject.createImmutable(""); -public static RemoteObject _stime = RemoteObject.createImmutable(""); -public static RemoteObject _usuario = RemoteObject.createImmutable(""); -public static RemoteObject _total_cliente = RemoteObject.createImmutable(""); -public static RemoteObject _m_lat = RemoteObject.createImmutable(""); -public static RemoteObject _m_lon = RemoteObject.createImmutable(""); -public static RemoteObject _btadmin = RemoteObject.declareNull("anywheresoftware.b4a.objects.Serial.BluetoothAdmin"); -public static RemoteObject _cmp20 = RemoteObject.declareNull("anywheresoftware.b4a.objects.Serial"); -public static RemoteObject _printer = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.TextWriterWrapper"); -public static RemoteObject _paireddevices = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -public static RemoteObject _l = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _tamano = RemoteObject.createImmutable(0); -public static RemoteObject _espacio = RemoteObject.createImmutable(0); -public static RemoteObject _blanco = RemoteObject.createImmutable(""); -public static RemoteObject _cuenta = RemoteObject.createImmutable(""); -public static RemoteObject _tipo_venta = RemoteObject.createImmutable(""); -public static RemoteObject _mac_impresora = RemoteObject.createImmutable(""); -public static RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _s = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _dd = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _c2 = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _listview1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ListViewWrapper"); -public static RemoteObject _la_cuenta = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _la_nombre = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _la_calle = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _la_numero = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _la_nint = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _la_edo = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _la_pob = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _la_col = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _la_cp = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _la_zona = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _gest = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _la_saldotot = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _la_saldooper = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _tels = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _label10 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _label11 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _tar = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _la_comm = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _la_actdte = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _la_usuario = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _la_resultado = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_entre1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_entre2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_atiende = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_atiende2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _datos = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _guardar = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _nuevo = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _l_total = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _s2 = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _res = RemoteObject.createImmutable(""); -public static RemoteObject _hist = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _monto_compra = RemoteObject.createImmutable(""); -public static RemoteObject _meta = RemoteObject.createImmutable(""); -public static RemoteObject _meta2 = RemoteObject.createImmutable(""); -public static RemoteObject _verifica = RemoteObject.createImmutable(""); -public static RemoteObject _l_qr = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _bt_qr = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _codigo = RemoteObject.createImmutable(""); -public static RemoteObject _b_mapa = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _cuantos = RemoteObject.createImmutable(""); -public static RemoteObject _b_imp = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _toggla = RemoteObject.declareNull("com.rootsoft.togglelibrary.ToggleLibrary"); -public static RemoteObject _tgl = RemoteObject.declareNull("com.rootsoft.togglelibrary.ToggleLibrary"); -public static RemoteObject _panel1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _i_compra = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -public static RemoteObject _b_guarda_c = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _b_venta = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _almacen = RemoteObject.createImmutable(""); -public static RemoteObject _la_gps = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _b_e_next = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _e_res_e = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -public static RemoteObject _t_tenc = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _panel2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _contador_e = RemoteObject.createImmutable(""); -public static RemoteObject _hr_res1 = RemoteObject.createImmutable(""); -public static RemoteObject _hr_res2 = RemoteObject.createImmutable(""); -public static RemoteObject _hr_res3 = RemoteObject.createImmutable(""); -public static RemoteObject _existe = RemoteObject.createImmutable(""); -public static RemoteObject _telefono = RemoteObject.createImmutable(""); -public static RemoteObject _rb1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper"); -public static RemoteObject _rb2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper"); -public static RemoteObject _rb3 = RemoteObject.declareNull("anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper"); -public static RemoteObject _rb4 = RemoteObject.declareNull("anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper"); -public static RemoteObject _rb5 = RemoteObject.declareNull("anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper"); -public static RemoteObject _stay_hh = RemoteObject.createImmutable(""); -public static RemoteObject _stay_mi = RemoteObject.createImmutable(""); -public static RemoteObject _stay_ss = RemoteObject.createImmutable(""); -public static RemoteObject _la_geo = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _result = RemoteObject.createImmutable(0); -public static RemoteObject _cercavalor = RemoteObject.createImmutable(""); -public static RemoteObject _la_ruta = RemoteObject.createImmutable(""); -public static RemoteObject _b_like = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _b_gps = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _sc = RemoteObject.declareNull("ice.zxing.b4aZXingLib"); -public static RemoteObject _cb_factura = RemoteObject.declareNull("anywheresoftware.b4a.objects.CompoundButtonWrapper.CheckBoxWrapper"); -public static RemoteObject _p_cbfactura = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _venimosdeticketsdia = RemoteObject.createImmutable(false); -public static RemoteObject _p_abono = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _et_abono = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -public static RemoteObject _b_abono = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _b_cancelar = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _b_abono1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _label20 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_calle1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_ubicacion2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _dentrodegeocerca = RemoteObject.createImmutable(false); -public static RemoteObject _b_iniciofinventa = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _precision = RemoteObject.createImmutable(0); -public static RemoteObject _motivonoventa = RemoteObject.createImmutable(""); -public static RemoteObject _motivonovisita = RemoteObject.createImmutable(""); -public static RemoteObject _id_almacen = RemoteObject.createImmutable(""); -public static RemoteObject _ruta_tienda = RemoteObject.createImmutable(""); -public static RemoteObject _b_clintesinventa = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _b_clienteventa = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _p_monto_venta = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _et_monto_venta = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -public static RemoteObject _b_can_monto_venta = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _b_gu_monto_venta = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"ALMACEN",_ref.getField(false, "_almacen"),"b_abono",_ref.getField(false, "_b_abono"),"b_abono1",_ref.getField(false, "_b_abono1"),"b_can_monto_venta",_ref.getField(false, "_b_can_monto_venta"),"b_cancelar",_ref.getField(false, "_b_cancelar"),"b_clienteVenta",_ref.getField(false, "_b_clienteventa"),"b_clinteSinVenta",_ref.getField(false, "_b_clintesinventa"),"B_E_NEXT",_ref.getField(false, "_b_e_next"),"B_GPS",_ref.getField(false, "_b_gps"),"b_gu_monto_venta",_ref.getField(false, "_b_gu_monto_venta"),"B_GUARDA_C",_ref.getField(false, "_b_guarda_c"),"B_IMP",_ref.getField(false, "_b_imp"),"b_inicioFinVenta",_ref.getField(false, "_b_iniciofinventa"),"b_like",_ref.getField(false, "_b_like"),"b_mapa",_ref.getField(false, "_b_mapa"),"b_venta",_ref.getField(false, "_b_venta"),"BLANCO",_ref.getField(false, "_blanco"),"BT_QR",_ref.getField(false, "_bt_qr"),"btAdmin",_ref.getField(false, "_btadmin"),"c",_ref.getField(false, "_c"),"c2",_ref.getField(false, "_c2"),"cb_factura",_ref.getField(false, "_cb_factura"),"cercavalor",_ref.getField(false, "_cercavalor"),"clie_id",_ref.getField(false, "_clie_id"),"cmd",_ref.getField(false, "_cmd"),"cmp20",_ref.getField(false, "_cmp20"),"CODIGO",_ref.getField(false, "_codigo"),"CONTADOR_E",_ref.getField(false, "_contador_e"),"CUANTOS",_ref.getField(false, "_cuantos"),"cuenta",_ref.getField(false, "_cuenta"),"DateUtils",_ref.getField(false, "_dateutils"),"DATOS",_ref.getField(false, "_datos"),"DD",_ref.getField(false, "_dd"),"dentroDeGeocerca",_ref.getField(false, "_dentrodegeocerca"),"E_RES_E",_ref.getField(false, "_e_res_e"),"ESPACIO",_ref.getField(false, "_espacio"),"et_abono",_ref.getField(false, "_et_abono"),"et_monto_venta",_ref.getField(false, "_et_monto_venta"),"EXISTE",_ref.getField(false, "_existe"),"g",_ref.getField(false, "_g"),"gest",_ref.getField(false, "_gest"),"Guardar",_ref.getField(false, "_guardar"),"HIST",_ref.getField(false, "_hist"),"HR_RES1",_ref.getField(false, "_hr_res1"),"HR_RES2",_ref.getField(false, "_hr_res2"),"HR_RES3",_ref.getField(false, "_hr_res3"),"I_COMPRA",_ref.getField(false, "_i_compra"),"Id_Almacen",_ref.getField(false, "_id_almacen"),"ime",_ref.getField(false, "_ime"),"L",_ref.getField(false, "_l"),"l_atiende",_ref.getField(false, "_l_atiende"),"l_atiende2",_ref.getField(false, "_l_atiende2"),"l_calle1",_ref.getField(false, "_l_calle1"),"l_entre1",_ref.getField(false, "_l_entre1"),"l_entre2",_ref.getField(false, "_l_entre2"),"L_QR",_ref.getField(false, "_l_qr"),"l_total",_ref.getField(false, "_l_total"),"l_ubicacion2",_ref.getField(false, "_l_ubicacion2"),"la_actdte",_ref.getField(false, "_la_actdte"),"la_Calle",_ref.getField(false, "_la_calle"),"la_col",_ref.getField(false, "_la_col"),"la_comm",_ref.getField(false, "_la_comm"),"la_cp",_ref.getField(false, "_la_cp"),"la_cuenta",_ref.getField(false, "_la_cuenta"),"la_edo",_ref.getField(false, "_la_edo"),"LA_GEO",_ref.getField(false, "_la_geo"),"LA_GPS",_ref.getField(false, "_la_gps"),"la_nint",_ref.getField(false, "_la_nint"),"La_nombre",_ref.getField(false, "_la_nombre"),"la_numero",_ref.getField(false, "_la_numero"),"la_pob",_ref.getField(false, "_la_pob"),"la_resultado",_ref.getField(false, "_la_resultado"),"LA_RUTA",_ref.getField(false, "_la_ruta"),"la_saldooper",_ref.getField(false, "_la_saldooper"),"la_saldotot",_ref.getField(false, "_la_saldotot"),"la_usuario",_ref.getField(false, "_la_usuario"),"la_zona",_ref.getField(false, "_la_zona"),"Label10",_ref.getField(false, "_label10"),"Label11",_ref.getField(false, "_label11"),"Label20",_ref.getField(false, "_label20"),"ListView1",_ref.getField(false, "_listview1"),"m_lat",_ref.getField(false, "_m_lat"),"m_lon",_ref.getField(false, "_m_lon"),"MAC_IMPRESORA",_ref.getField(false, "_mac_impresora"),"META",_ref.getField(false, "_meta"),"META2",_ref.getField(false, "_meta2"),"MONTO_COMPRA",_ref.getField(false, "_monto_compra"),"motivoNoVenta",_ref.getField(false, "_motivonoventa"),"motivoNoVisita",_ref.getField(false, "_motivonovisita"),"NUEVO",_ref.getField(false, "_nuevo"),"p_abono",_ref.getField(false, "_p_abono"),"p_cbFactura",_ref.getField(false, "_p_cbfactura"),"p_cliente",_ref.getField(false, "_p_cliente"),"p_monto_venta",_ref.getField(false, "_p_monto_venta"),"PairedDevices",_ref.getField(false, "_paireddevices"),"Panel1",_ref.getField(false, "_panel1"),"Panel2",_ref.getField(false, "_panel2"),"precision",_ref.getField(false, "_precision"),"printer",_ref.getField(false, "_printer"),"RB1",_ref.getField(false, "_rb1"),"RB2",_ref.getField(false, "_rb2"),"RB3",_ref.getField(false, "_rb3"),"RB4",_ref.getField(false, "_rb4"),"RB5",_ref.getField(false, "_rb5"),"reqManager",_ref.getField(false, "_reqmanager"),"res",_ref.getField(false, "_res"),"result",_ref.getField(false, "_result"),"Root",_ref.getField(false, "_root"),"ruta",_ref.getField(false, "_ruta"),"ruta_tienda",_ref.getField(false, "_ruta_tienda"),"s",_ref.getField(false, "_s"),"S2",_ref.getField(false, "_s2"),"sc",_ref.getField(false, "_sc"),"sDate",_ref.getField(false, "_sdate"),"skmt",_ref.getField(false, "_skmt"),"stay_hh",_ref.getField(false, "_stay_hh"),"stay_mi",_ref.getField(false, "_stay_mi"),"stay_ss",_ref.getField(false, "_stay_ss"),"sTime",_ref.getField(false, "_stime"),"t_tenc",_ref.getField(false, "_t_tenc"),"TAMANO",_ref.getField(false, "_tamano"),"Tar",_ref.getField(false, "_tar"),"TELEFONO",_ref.getField(false, "_telefono"),"Tels",_ref.getField(false, "_tels"),"tgl",_ref.getField(false, "_tgl"),"tipo_venta",_ref.getField(false, "_tipo_venta"),"Toggla",_ref.getField(false, "_toggla"),"total_cliente",_ref.getField(false, "_total_cliente"),"usuario",_ref.getField(false, "_usuario"),"venimosDeTicketsDia",_ref.getField(false, "_venimosdeticketsdia"),"VERIFICA",_ref.getField(false, "_verifica"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_cliente_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_cliente_subs_0.java deleted file mode 100644 index 0ef5307..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_cliente_subs_0.java +++ /dev/null @@ -1,2919 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class c_cliente_subs_0 { - - -public static void _b_abono_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_abono_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,963); -if (RapidSub.canDelegate("b_abono_click")) { __ref.runUserSub(false, "c_cliente","b_abono_click", __ref); return;} -ResumableSub_b_abono_Click rsub = new ResumableSub_b_abono_Click(null,__ref); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_b_abono_Click extends BA.ResumableSub { -public ResumableSub_b_abono_Click(keymon.lat.medicomed.c_cliente parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.c_cliente parent; -RemoteObject _resultado = RemoteObject.createImmutable(0); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("b_abono_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,963); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 964;BA.debugLine="p_abono.Visible = False"; -Debug.ShouldStop(8); -__ref.getField(false,"_p_abono" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 965;BA.debugLine="If et_abono.Text <> \"\" Then"; -Debug.ShouldStop(16); -if (true) break; - -case 1: -//if -this.state = 8; -if (RemoteObject.solveBoolean("!",__ref.getField(false,"_et_abono" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString(""))) { -this.state = 3; -}if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 966;BA.debugLine="Msgbox2Async($\"¿Seguro que quieres realizar un a"; -Debug.ShouldStop(32); -parent.__c.runVoidMethod ("Msgbox2Async",(Object)(BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("¿Seguro que quieres realizar un abono de $"),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(false,"_et_abono" /*RemoteObject*/ ).runMethod(true,"getText")))),RemoteObject.createImmutable(" para este cliente?"))))),(Object)(BA.ObjectToCharSequence("Guardar Abono")),(Object)(BA.ObjectToString("Guardar")),(Object)(BA.ObjectToString("Cancelar")),(Object)(BA.ObjectToString("")),RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper"), parent.__c.getField(false,"Null")),__ref.getField(false, "ba"),(Object)(parent.__c.getField(true,"True"))); - BA.debugLineNum = 967;BA.debugLine="Wait For Msgbox_Result (resultado As Int)"; -Debug.ShouldStop(64); -parent.__c.runVoidMethod ("WaitFor","msgbox_result", __ref.getField(false, "ba"), anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "c_cliente", "b_abono_click"), null); -this.state = 9; -return; -case 9: -//C -this.state = 4; -_resultado = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(1));Debug.locals.put("resultado", _resultado); -; - BA.debugLineNum = 968;BA.debugLine="If resultado = DialogResponse.POSITIVE Then"; -Debug.ShouldStop(128); -if (true) break; - -case 4: -//if -this.state = 7; -if (RemoteObject.solveBoolean("=",_resultado,BA.numberCast(double.class, parent.__c.getField(false,"DialogResponse").getField(true,"POSITIVE")))) { -this.state = 6; -}if (true) break; - -case 6: -//C -this.state = 7; - BA.debugLineNum = 969;BA.debugLine="skmt.ExecNonQuery($\"INSERT INTO ABONOS(a_usuari"; -Debug.ShouldStop(256); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("INSERT INTO ABONOS(a_usuario, a_ruta, a_cliente, a_abono, a_fecha) VALUES ('"),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent._subs.runMethod(true,"_traeusuariodebd" /*RemoteObject*/ ,__ref.getField(false, "ba"))))),RemoteObject.createImmutable("', '"),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent._subs.runMethod(true,"_traeruta" /*RemoteObject*/ ,__ref.getField(false, "ba"))))),RemoteObject.createImmutable("', '"),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent._subs.runMethod(true,"_traecliente" /*RemoteObject*/ ,__ref.getField(false, "ba"))))),RemoteObject.createImmutable("' ,'"),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(false,"_et_abono" /*RemoteObject*/ ).runMethod(true,"getText")))),RemoteObject.createImmutable("', '"),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent._subs.runMethod(true,"_fechakmt" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.NumberToString(parent.__c.getField(false,"DateTime").runMethod(true,"getNow"))))))),RemoteObject.createImmutable("')"))))); - BA.debugLineNum = 970;BA.debugLine="ToastMessageShow(\"Abono guardado\", False)"; -Debug.ShouldStop(512); -parent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Abono guardado")),(Object)(parent.__c.getField(true,"False"))); - if (true) break; - -case 7: -//C -this.state = 8; -; - if (true) break; - -case 8: -//C -this.state = -1; -; - BA.debugLineNum = 973;BA.debugLine="et_abono.Text = \"\""; -Debug.ShouldStop(4096); -__ref.getField(false,"_et_abono" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("")); - BA.debugLineNum = 974;BA.debugLine="ime.HideKeyboard"; -Debug.ShouldStop(8192); -__ref.getField(false,"_ime" /*RemoteObject*/ ).runVoidMethod ("HideKeyboard",__ref.getField(false, "ba")); - BA.debugLineNum = 975;BA.debugLine="End Sub"; -Debug.ShouldStop(16384); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static void _msgbox_result(RemoteObject __ref,RemoteObject _resultado) throws Exception{ -} -public static RemoteObject _b_abono1_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_abono1_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,983); -if (RapidSub.canDelegate("b_abono1_click")) { return __ref.runUserSub(false, "c_cliente","b_abono1_click", __ref);} - BA.debugLineNum = 983;BA.debugLine="Private Sub b_abono1_Click"; -Debug.ShouldStop(4194304); - BA.debugLineNum = 984;BA.debugLine="p_abono.Visible = True"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_p_abono" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"True")); - BA.debugLineNum = 985;BA.debugLine="End Sub"; -Debug.ShouldStop(16777216); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_can_monto_venta_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_can_monto_venta_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,1091); -if (RapidSub.canDelegate("b_can_monto_venta_click")) { return __ref.runUserSub(false, "c_cliente","b_can_monto_venta_click", __ref);} - BA.debugLineNum = 1091;BA.debugLine="Private Sub b_can_monto_venta_Click"; -Debug.ShouldStop(4); - BA.debugLineNum = 1092;BA.debugLine="p_monto_venta.Visible = False"; -Debug.ShouldStop(8); -__ref.getField(false,"_p_monto_venta" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False")); - BA.debugLineNum = 1093;BA.debugLine="End Sub"; -Debug.ShouldStop(16); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_cancelar_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_cancelar_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,977); -if (RapidSub.canDelegate("b_cancelar_click")) { return __ref.runUserSub(false, "c_cliente","b_cancelar_click", __ref);} - BA.debugLineNum = 977;BA.debugLine="Private Sub b_cancelar_Click"; -Debug.ShouldStop(65536); - BA.debugLineNum = 978;BA.debugLine="et_abono.Text = \"\""; -Debug.ShouldStop(131072); -__ref.getField(false,"_et_abono" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("")); - BA.debugLineNum = 979;BA.debugLine="p_abono.Visible = False"; -Debug.ShouldStop(262144); -__ref.getField(false,"_p_abono" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False")); - BA.debugLineNum = 980;BA.debugLine="ime.HideKeyboard"; -Debug.ShouldStop(524288); -__ref.getField(false,"_ime" /*RemoteObject*/ ).runVoidMethod ("HideKeyboard",__ref.getField(false, "ba")); - BA.debugLineNum = 981;BA.debugLine="End Sub"; -Debug.ShouldStop(1048576); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_clienteventa_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_clienteVenta_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,1022); -if (RapidSub.canDelegate("b_clienteventa_click")) { return __ref.runUserSub(false, "c_cliente","b_clienteventa_click", __ref);} - BA.debugLineNum = 1022;BA.debugLine="Private Sub b_clienteVenta_Click"; -Debug.ShouldStop(536870912); - BA.debugLineNum = 1024;BA.debugLine="et_monto_venta.Text = \"\""; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_et_monto_venta" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("")); - BA.debugLineNum = 1025;BA.debugLine="p_monto_venta.Visible = True"; -Debug.ShouldStop(1); -__ref.getField(false,"_p_monto_venta" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"True")); - BA.debugLineNum = 1027;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_clintesinventa_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_clinteSinVenta_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,1029); -if (RapidSub.canDelegate("b_clintesinventa_click")) { return __ref.runUserSub(false, "c_cliente","b_clintesinventa_click", __ref);} - BA.debugLineNum = 1029;BA.debugLine="Private Sub b_clinteSinVenta_Click"; -Debug.ShouldStop(16); - BA.debugLineNum = 1031;BA.debugLine="Guardar_Click"; -Debug.ShouldStop(64); -__ref.runClassMethod (keymon.lat.medicomed.c_cliente.class, "_guardar_click" /*RemoteObject*/ ); - BA.debugLineNum = 1032;BA.debugLine="et_monto_venta.Text = \"0\""; -Debug.ShouldStop(128); -__ref.getField(false,"_et_monto_venta" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("0")); - BA.debugLineNum = 1033;BA.debugLine="Subs.ventaNoVenta(usuario, Id_Almacen, ruta_tiend"; -Debug.ShouldStop(256); -c_cliente._subs.runVoidMethod ("_ventanoventa" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_id_almacen" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_ruta_tienda" /*RemoteObject*/ )),(Object)(BA.ObjectToString("SinVenta")),(Object)(c_cliente._subs.runMethod(true,"_traecliente" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(c_cliente._subs.runMethod(true,"_fechanormal" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.NumberToString(c_cliente.__c.getField(false,"DateTime").runMethod(true,"getNow"))))),(Object)(c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ )),(Object)(c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lon_gps" /*RemoteObject*/ )),(Object)(__ref.getField(false,"_et_monto_venta" /*RemoteObject*/ ).runMethod(true,"getText"))); - BA.debugLineNum = 1035;BA.debugLine="Try"; -Debug.ShouldStop(1024); -try { BA.debugLineNum = 1036;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"Select CUE"; -Debug.ShouldStop(2048); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select CUENTA from cuentaa")))); - BA.debugLineNum = 1037;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(4096); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 1038;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -Debug.ShouldStop(8192); -__ref.setField ("_clie_id" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUENTA")))); - BA.debugLineNum = 1039;BA.debugLine="c.Close"; -Debug.ShouldStop(16384); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 1041;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(65536); -c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from NOVENTA where NV_CLIENTE In (select cuenta from cuentaa)"))); - BA.debugLineNum = 1042;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(131072); -c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"))); - BA.debugLineNum = 1044;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_"; -Debug.ShouldStop(524288); -c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("UPDATE kmt_info set gestion = 2 where CAT_CL_CODIGO In (select cuenta from cuentaa)"))); - BA.debugLineNum = 1046;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HIS"; -Debug.ShouldStop(2097152); -c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE HIST_STAY_STORE set HSS_OUT = ? where HSS_OUT = 0 AND HSS_CODIGO In (select cuenta from cuentaa)")),(Object)(c_cliente.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(c_cliente.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_cliente.__c.getField(false,"DateTime").runMethod(true,"getNow"))))}))))); - BA.debugLineNum = 1047;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HIS"; -Debug.ShouldStop(4194304); -c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE HIST_STAY_OUT set HSO_FIN = ? ")),(Object)(c_cliente.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(c_cliente.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_cliente.__c.getField(false,"DateTime").runMethod(true,"getNow"))))}))))); - BA.debugLineNum = 1049;BA.debugLine="ToastMessageShow(\"Cliente con venta eliminado co"; -Debug.ShouldStop(16777216); -c_cliente.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Cliente con venta eliminado correctamente.")),(Object)(c_cliente.__c.getField(true,"False"))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e16) { - BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e16.toString()); BA.debugLineNum = 1052;BA.debugLine="ToastMessageShow(\"Error eliminando cliente con v"; -Debug.ShouldStop(134217728); -c_cliente.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Error eliminando cliente con venta.")),(Object)(c_cliente.__c.getField(true,"True"))); - }; - BA.debugLineNum = 1055;BA.debugLine="End Sub"; -Debug.ShouldStop(1073741824); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_e_next_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B_E_NEXT_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,757); -if (RapidSub.canDelegate("b_e_next_click")) { return __ref.runUserSub(false, "c_cliente","b_e_next_click", __ref);} - BA.debugLineNum = 757;BA.debugLine="Sub B_E_NEXT_Click"; -Debug.ShouldStop(1048576); - BA.debugLineNum = 758;BA.debugLine="If E_RES_E.Text <> \"\" Then"; -Debug.ShouldStop(2097152); -if (RemoteObject.solveBoolean("!",__ref.getField(false,"_e_res_e" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString(""))) { - BA.debugLineNum = 759;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert int"; -Debug.ShouldStop(4194304); -c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("insert into HIST_ENCUESTA(HE_CLIE, HE_RES, HE_FECHA, HE_TIPO) VALUES (?,?,?,?)")),(Object)(c_cliente.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {4},new Object[] {(__ref.getField(false,"_la_cuenta" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_e_res_e" /*RemoteObject*/ ).runMethod(true,"getText")),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(RemoteObject.createImmutable("DONDE"))}))))); - BA.debugLineNum = 760;BA.debugLine="Panel2.Visible = False"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_panel2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False")); - BA.debugLineNum = 761;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; -Debug.ShouldStop(16777216); -c_cliente._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Productos"))); - }else { - BA.debugLineNum = 763;BA.debugLine="Msgbox(\"SIN RESPUESTA\",\"AVISO\") 'Ignore"; -Debug.ShouldStop(67108864); -c_cliente.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("SIN RESPUESTA")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("AVISO"))),__ref.getField(false, "ba")); - }; - BA.debugLineNum = 765;BA.debugLine="End Sub"; -Debug.ShouldStop(268435456); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_gu_monto_venta_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_gu_monto_venta_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,1058); -if (RapidSub.canDelegate("b_gu_monto_venta_click")) { return __ref.runUserSub(false, "c_cliente","b_gu_monto_venta_click", __ref);} - BA.debugLineNum = 1058;BA.debugLine="Private Sub b_gu_monto_venta_Click"; -Debug.ShouldStop(2); - BA.debugLineNum = 1060;BA.debugLine="If et_monto_venta.Text = \"\" Or et_monto_venta.Tex"; -Debug.ShouldStop(8); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_et_monto_venta" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("")) || RemoteObject.solveBoolean("=",__ref.getField(false,"_et_monto_venta" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("0"))) { - BA.debugLineNum = 1061;BA.debugLine="ToastMessageShow(\"El monto de venta no puede ser"; -Debug.ShouldStop(16); -c_cliente.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("El monto de venta no puede ser vacío o 0.")),(Object)(c_cliente.__c.getField(true,"True"))); - }else { - BA.debugLineNum = 1063;BA.debugLine="Guardar_Click"; -Debug.ShouldStop(64); -__ref.runClassMethod (keymon.lat.medicomed.c_cliente.class, "_guardar_click" /*RemoteObject*/ ); - BA.debugLineNum = 1064;BA.debugLine="Subs.ventaNoVenta(usuario, Id_Almacen, ruta_tien"; -Debug.ShouldStop(128); -c_cliente._subs.runVoidMethod ("_ventanoventa" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_id_almacen" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_ruta_tienda" /*RemoteObject*/ )),(Object)(BA.ObjectToString("ConVenta")),(Object)(c_cliente._subs.runMethod(true,"_traecliente" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(c_cliente._subs.runMethod(true,"_fechanormal" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.NumberToString(c_cliente.__c.getField(false,"DateTime").runMethod(true,"getNow"))))),(Object)(c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ )),(Object)(c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lon_gps" /*RemoteObject*/ )),(Object)(__ref.getField(false,"_et_monto_venta" /*RemoteObject*/ ).runMethod(true,"getText"))); - BA.debugLineNum = 1066;BA.debugLine="Try"; -Debug.ShouldStop(512); -try { BA.debugLineNum = 1067;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"Select CU"; -Debug.ShouldStop(1024); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select CUENTA from cuentaa")))); - BA.debugLineNum = 1068;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(2048); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 1069;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -Debug.ShouldStop(4096); -__ref.setField ("_clie_id" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUENTA")))); - BA.debugLineNum = 1070;BA.debugLine="c.Close"; -Debug.ShouldStop(8192); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 1072;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(32768); -c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from NOVENTA where NV_CLIENTE In (select cuenta from cuentaa)"))); - BA.debugLineNum = 1073;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(65536); -c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"))); - BA.debugLineNum = 1075;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt"; -Debug.ShouldStop(262144); -c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("UPDATE kmt_info set gestion = 2 where CAT_CL_CODIGO In (select cuenta from cuentaa)"))); - BA.debugLineNum = 1077;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HI"; -Debug.ShouldStop(1048576); -c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE HIST_STAY_STORE set HSS_OUT = ? where HSS_OUT = 0 AND HSS_CODIGO In (select cuenta from cuentaa)")),(Object)(c_cliente.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(c_cliente.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_cliente.__c.getField(false,"DateTime").runMethod(true,"getNow"))))}))))); - BA.debugLineNum = 1078;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HI"; -Debug.ShouldStop(2097152); -c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE HIST_STAY_OUT set HSO_FIN = ? ")),(Object)(c_cliente.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(c_cliente.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_cliente.__c.getField(false,"DateTime").runMethod(true,"getNow"))))}))))); - BA.debugLineNum = 1080;BA.debugLine="ToastMessageShow(\"Cliente con venta eliminado c"; -Debug.ShouldStop(8388608); -c_cliente.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Cliente con venta eliminado correctamente.")),(Object)(c_cliente.__c.getField(true,"False"))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e18) { - BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e18.toString()); BA.debugLineNum = 1083;BA.debugLine="ToastMessageShow(\"Error eliminando cliente con"; -Debug.ShouldStop(67108864); -c_cliente.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Error eliminando cliente con venta.")),(Object)(c_cliente.__c.getField(true,"True"))); - }; - BA.debugLineNum = 1086;BA.debugLine="p_monto_venta.Visible = False"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_p_monto_venta" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False")); - }; - BA.debugLineNum = 1088;BA.debugLine="End Sub"; -Debug.ShouldStop(-2147483648); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_guarda_c_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B_GUARDA_C_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,701); -if (RapidSub.canDelegate("b_guarda_c_click")) { return __ref.runUserSub(false, "c_cliente","b_guarda_c_click", __ref);} - BA.debugLineNum = 701;BA.debugLine="Sub B_GUARDA_C_Click"; -Debug.ShouldStop(268435456); - BA.debugLineNum = 702;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; -Debug.ShouldStop(536870912); -c_cliente.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("MM/dd/yyyy")); - BA.debugLineNum = 703;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(1073741824); -__ref.setField ("_sdate" /*RemoteObject*/ ,c_cliente.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(c_cliente.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 704;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -Debug.ShouldStop(-2147483648); -__ref.setField ("_stime" /*RemoteObject*/ ,c_cliente.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_cliente.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 705;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENTA"; -Debug.ShouldStop(1); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select CUENTA from cuentaa")))); - BA.debugLineNum = 706;BA.debugLine="c.Position=0"; -Debug.ShouldStop(2); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 707;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -Debug.ShouldStop(4); -__ref.setField ("_clie_id" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUENTA")))); - BA.debugLineNum = 708;BA.debugLine="c.Close"; -Debug.ShouldStop(8); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 709;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUARI"; -Debug.ShouldStop(16); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select USUARIO from usuarioa")))); - BA.debugLineNum = 710;BA.debugLine="c.Position=0"; -Debug.ShouldStop(32); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 711;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(64); -__ref.setField ("_usuario" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")))); - BA.debugLineNum = 712;BA.debugLine="c.Close"; -Debug.ShouldStop(128); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 713;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; -Debug.ShouldStop(256); -c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA) VALUES(?,?,?,?,?,?,?,?,?,?) ")),(Object)(c_cliente.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {10},new Object[] {RemoteObject.createImmutable(("4")),RemoteObject.createImmutable((.01)),RemoteObject.createImmutable((.01)),RemoteObject.createImmutable((2)),RemoteObject.createImmutable(("KNORR RINDE MAS 70 GR")),RemoteObject.createImmutable(("GUNA2")),(__ref.getField(false,"_la_cuenta" /*RemoteObject*/ ).runMethod(true,"getText")),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(__ref.getField(true,"_la_ruta" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 714;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; -Debug.ShouldStop(512); -c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO HIST_FACE(HFCLIENTE, HFALIAS,HFRUTA,HFALMACEN) VALUES (?,?,?,?) ")),(Object)(c_cliente.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {4},new Object[] {(__ref.getField(false,"_la_cuenta" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_i_compra" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(true,"_la_ruta" /*RemoteObject*/ )),(__ref.getField(true,"_almacen" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 715;BA.debugLine="Panel1.Visible = False"; -Debug.ShouldStop(1024); -__ref.getField(false,"_panel1" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False")); - BA.debugLineNum = 717;BA.debugLine="Tar.Visible = False"; -Debug.ShouldStop(4096); -__ref.getField(false,"_tar" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False")); - BA.debugLineNum = 718;BA.debugLine="Tels.Visible = False"; -Debug.ShouldStop(8192); -__ref.getField(false,"_tels" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False")); - BA.debugLineNum = 719;BA.debugLine="gest.Visible = False"; -Debug.ShouldStop(16384); -__ref.getField(false,"_gest" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False")); - BA.debugLineNum = 721;BA.debugLine="Guardar.Visible = True"; -Debug.ShouldStop(65536); -__ref.getField(false,"_guardar" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"True")); - BA.debugLineNum = 722;BA.debugLine="End Sub"; -Debug.ShouldStop(131072); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_imp_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B_IMP_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,609); -if (RapidSub.canDelegate("b_imp_click")) { return __ref.runUserSub(false, "c_cliente","b_imp_click", __ref);} -int _i = 0; -int _e = 0; - BA.debugLineNum = 609;BA.debugLine="Sub B_IMP_Click"; -Debug.ShouldStop(1); - BA.debugLineNum = 610;BA.debugLine="TAMANO = 0"; -Debug.ShouldStop(2); -__ref.setField ("_tamano" /*RemoteObject*/ ,BA.numberCast(int.class, 0)); - BA.debugLineNum = 611;BA.debugLine="ESPACIO = 21"; -Debug.ShouldStop(4); -__ref.setField ("_espacio" /*RemoteObject*/ ,BA.numberCast(int.class, 21)); - BA.debugLineNum = 612;BA.debugLine="BLANCO = \" \""; -Debug.ShouldStop(8); -__ref.setField ("_blanco" /*RemoteObject*/ ,BA.ObjectToString(" ")); - BA.debugLineNum = 613;BA.debugLine="printer.Initialize(cmp20.OutputStream)"; -Debug.ShouldStop(16); -__ref.getField(false,"_printer" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(__ref.getField(false,"_cmp20" /*RemoteObject*/ ).runMethod(false,"getOutputStream"))); - BA.debugLineNum = 614;BA.debugLine="printer.WriteLine(\"DURAKELO S.A. de C.V.\")"; -Debug.ShouldStop(32); -__ref.getField(false,"_printer" /*RemoteObject*/ ).runVoidMethod ("WriteLine",(Object)(RemoteObject.createImmutable("DURAKELO S.A. de C.V."))); - BA.debugLineNum = 615;BA.debugLine="printer.WriteLine(\"RFC: DUR-011025-T12\")"; -Debug.ShouldStop(64); -__ref.getField(false,"_printer" /*RemoteObject*/ ).runVoidMethod ("WriteLine",(Object)(RemoteObject.createImmutable("RFC: DUR-011025-T12"))); - BA.debugLineNum = 616;BA.debugLine="printer.WriteLine(\"Tel.: 618-826-0104\")"; -Debug.ShouldStop(128); -__ref.getField(false,"_printer" /*RemoteObject*/ ).runVoidMethod ("WriteLine",(Object)(RemoteObject.createImmutable("Tel.: 618-826-0104"))); - BA.debugLineNum = 617;BA.debugLine="printer.WriteLine(\"Vendedor: KMTS \")"; -Debug.ShouldStop(256); -__ref.getField(false,"_printer" /*RemoteObject*/ ).runVoidMethod ("WriteLine",(Object)(RemoteObject.createImmutable("Vendedor: KMTS "))); - BA.debugLineNum = 618;BA.debugLine="printer.WriteLine(\"Tienda: \" & La_nombre.Text)"; -Debug.ShouldStop(512); -__ref.getField(false,"_printer" /*RemoteObject*/ ).runVoidMethod ("WriteLine",(Object)(RemoteObject.concat(RemoteObject.createImmutable("Tienda: "),__ref.getField(false,"_la_nombre" /*RemoteObject*/ ).runMethod(true,"getText")))); - BA.debugLineNum = 619;BA.debugLine="printer.WriteLine(\"-----------PREVENTA-----------"; -Debug.ShouldStop(1024); -__ref.getField(false,"_printer" /*RemoteObject*/ ).runVoidMethod ("WriteLine",(Object)(RemoteObject.createImmutable("-----------PREVENTA-----------"))); - BA.debugLineNum = 620;BA.debugLine="s=B4XPages.MainPage.skmt.ExecQuery(\"select PE_PRO"; -Debug.ShouldStop(2048); -__ref.getField(false,"_s" /*RemoteObject*/ ).setObject (c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select PE_PRONOMBRE, PE_CANT, length(pe_cant) as L_CANT, PE_COSTOU, length(PE_COSTOU) as L_COSTOU, PE_COSTO_TOT, length(PE_COSTO_TOT) as L_COSTO_TOT FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)")))); - BA.debugLineNum = 621;BA.debugLine="If S.RowCount>0 Then"; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 622;BA.debugLine="For i=0 To S.RowCount -1"; -Debug.ShouldStop(8192); -{ -final int step13 = 1; -final int limit13 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step13 > 0 && _i <= limit13) || (step13 < 0 && _i >= limit13) ;_i = ((int)(0 + _i + step13)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 623;BA.debugLine="S.Position=i"; -Debug.ShouldStop(16384); -__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 624;BA.debugLine="printer.WriteLine(s.GetString(\"PE_CANT\") & \" \""; -Debug.ShouldStop(32768); -__ref.getField(false,"_printer" /*RemoteObject*/ ).runVoidMethod ("WriteLine",(Object)(RemoteObject.concat(__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CANT"))),RemoteObject.createImmutable(" "),__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_PRONOMBRE")))))); - BA.debugLineNum = 625;BA.debugLine="TAMANO = s.GetLong(\"L_CANT\") + TAMANO"; -Debug.ShouldStop(65536); -__ref.setField ("_tamano" /*RemoteObject*/ ,BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"GetLong",(Object)(RemoteObject.createImmutable("L_CANT"))),__ref.getField(true,"_tamano" /*RemoteObject*/ )}, "+",1, 2))); - BA.debugLineNum = 626;BA.debugLine="TAMANO = s.GetLong(\"L_COSTOU\") + TAMANO"; -Debug.ShouldStop(131072); -__ref.setField ("_tamano" /*RemoteObject*/ ,BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"GetLong",(Object)(RemoteObject.createImmutable("L_COSTOU"))),__ref.getField(true,"_tamano" /*RemoteObject*/ )}, "+",1, 2))); - BA.debugLineNum = 627;BA.debugLine="TAMANO = s.GetLong(\"L_COSTO_TOT\") + TAMANO"; -Debug.ShouldStop(262144); -__ref.setField ("_tamano" /*RemoteObject*/ ,BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"GetLong",(Object)(RemoteObject.createImmutable("L_COSTO_TOT"))),__ref.getField(true,"_tamano" /*RemoteObject*/ )}, "+",1, 2))); - BA.debugLineNum = 628;BA.debugLine="ESPACIO = ESPACIO - TAMANO"; -Debug.ShouldStop(524288); -__ref.setField ("_espacio" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_espacio" /*RemoteObject*/ ),__ref.getField(true,"_tamano" /*RemoteObject*/ )}, "-",1, 1)); - BA.debugLineNum = 629;BA.debugLine="For E=0 To ESPACIO -1"; -Debug.ShouldStop(1048576); -{ -final int step20 = 1; -final int limit20 = RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_espacio" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_e = 0 ; -for (;(step20 > 0 && _e <= limit20) || (step20 < 0 && _e >= limit20) ;_e = ((int)(0 + _e + step20)) ) { -Debug.locals.put("E", _e); - BA.debugLineNum = 630;BA.debugLine="BLANCO = \" \" & BLANCO"; -Debug.ShouldStop(2097152); -__ref.setField ("_blanco" /*RemoteObject*/ ,RemoteObject.concat(RemoteObject.createImmutable(" "),__ref.getField(true,"_blanco" /*RemoteObject*/ ))); - } -}Debug.locals.put("E", _e); -; - BA.debugLineNum = 632;BA.debugLine="printer.WriteLine(BLANCO & s.GETSTRING(\"PE_CANT"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_printer" /*RemoteObject*/ ).runVoidMethod ("WriteLine",(Object)(RemoteObject.concat(__ref.getField(true,"_blanco" /*RemoteObject*/ ),__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CANT"))),RemoteObject.createImmutable(" X $"),__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_COSTOU"))),RemoteObject.createImmutable(" $"),__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_COSTO_TOT")))))); - BA.debugLineNum = 633;BA.debugLine="TAMANO = 0"; -Debug.ShouldStop(16777216); -__ref.setField ("_tamano" /*RemoteObject*/ ,BA.numberCast(int.class, 0)); - BA.debugLineNum = 634;BA.debugLine="ESPACIO = 21"; -Debug.ShouldStop(33554432); -__ref.setField ("_espacio" /*RemoteObject*/ ,BA.numberCast(int.class, 21)); - BA.debugLineNum = 635;BA.debugLine="BLANCO = \" \""; -Debug.ShouldStop(67108864); -__ref.setField ("_blanco" /*RemoteObject*/ ,BA.ObjectToString(" ")); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 638;BA.debugLine="s.Close"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_s" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 639;BA.debugLine="printer.WriteLine(\"Total Preventa: $\" & total_c"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_printer" /*RemoteObject*/ ).runVoidMethod ("WriteLine",(Object)(RemoteObject.concat(RemoteObject.createImmutable("Total Preventa: $"),__ref.getField(true,"_total_cliente" /*RemoteObject*/ )))); - BA.debugLineNum = 640;BA.debugLine="printer.WriteLine(\"------------VENTA-------------"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_printer" /*RemoteObject*/ ).runVoidMethod ("WriteLine",(Object)(RemoteObject.createImmutable("------------VENTA-------------"))); - BA.debugLineNum = 641;BA.debugLine="printer.WriteLine(\" \")"; -Debug.ShouldStop(1); -__ref.getField(false,"_printer" /*RemoteObject*/ ).runVoidMethod ("WriteLine",(Object)(RemoteObject.createImmutable(" "))); - BA.debugLineNum = 642;BA.debugLine="printer.WriteLine(\"TOTAL: $\" & total_cliente)"; -Debug.ShouldStop(2); -__ref.getField(false,"_printer" /*RemoteObject*/ ).runVoidMethod ("WriteLine",(Object)(RemoteObject.concat(RemoteObject.createImmutable("TOTAL: $"),__ref.getField(true,"_total_cliente" /*RemoteObject*/ )))); - BA.debugLineNum = 643;BA.debugLine="printer.WriteLine(\" \")"; -Debug.ShouldStop(4); -__ref.getField(false,"_printer" /*RemoteObject*/ ).runVoidMethod ("WriteLine",(Object)(RemoteObject.createImmutable(" "))); - BA.debugLineNum = 644;BA.debugLine="printer.WriteLine(\"----ESTE TICKET NO ES UN -----"; -Debug.ShouldStop(8); -__ref.getField(false,"_printer" /*RemoteObject*/ ).runVoidMethod ("WriteLine",(Object)(RemoteObject.createImmutable("----ESTE TICKET NO ES UN -----"))); - BA.debugLineNum = 645;BA.debugLine="printer.WriteLine(\"--COMPROBANTE FISCAL, SOLO ES-"; -Debug.ShouldStop(16); -__ref.getField(false,"_printer" /*RemoteObject*/ ).runVoidMethod ("WriteLine",(Object)(RemoteObject.createImmutable("--COMPROBANTE FISCAL, SOLO ES-"))); - BA.debugLineNum = 646;BA.debugLine="printer.WriteLine(\"--------INFORMATIVO-----------"; -Debug.ShouldStop(32); -__ref.getField(false,"_printer" /*RemoteObject*/ ).runVoidMethod ("WriteLine",(Object)(RemoteObject.createImmutable("--------INFORMATIVO-----------"))); - BA.debugLineNum = 647;BA.debugLine="printer.WriteLine(\"------------------------------"; -Debug.ShouldStop(64); -__ref.getField(false,"_printer" /*RemoteObject*/ ).runVoidMethod ("WriteLine",(Object)(RemoteObject.createImmutable("------------------------------"))); - BA.debugLineNum = 648;BA.debugLine="printer.WriteLine(\" \")"; -Debug.ShouldStop(128); -__ref.getField(false,"_printer" /*RemoteObject*/ ).runVoidMethod ("WriteLine",(Object)(RemoteObject.createImmutable(" "))); - BA.debugLineNum = 649;BA.debugLine="printer.Flush"; -Debug.ShouldStop(256); -__ref.getField(false,"_printer" /*RemoteObject*/ ).runVoidMethod ("Flush"); - BA.debugLineNum = 651;BA.debugLine="End Sub"; -Debug.ShouldStop(1024); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_iniciofinventa_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_inicioFinVenta_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,987); -if (RapidSub.canDelegate("b_iniciofinventa_click")) { return __ref.runUserSub(false, "c_cliente","b_iniciofinventa_click", __ref);} - BA.debugLineNum = 987;BA.debugLine="Private Sub b_inicioFinVenta_Click"; -Debug.ShouldStop(67108864); - BA.debugLineNum = 988;BA.debugLine="usuario = Subs.traeUsuarioDeBD"; -Debug.ShouldStop(134217728); -__ref.setField ("_usuario" /*RemoteObject*/ ,c_cliente._subs.runMethod(true,"_traeusuariodebd" /*RemoteObject*/ ,__ref.getField(false, "ba"))); - BA.debugLineNum = 989;BA.debugLine="Id_Almacen = Subs.traeAlmacen"; -Debug.ShouldStop(268435456); -__ref.setField ("_id_almacen" /*RemoteObject*/ ,c_cliente._subs.runMethod(true,"_traealmacen" /*RemoteObject*/ ,__ref.getField(false, "ba"))); - BA.debugLineNum = 991;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"select CAT_"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_CL_RUTA from kmt_info where CAT_CL_CODIGO In (Select cuenta from cuentaa)")))); - BA.debugLineNum = 992;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 993;BA.debugLine="ruta_tienda = c.GetString(\"CAT_CL_RUTA\")"; -Debug.ShouldStop(1); -__ref.setField ("_ruta_tienda" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_RUTA")))); - BA.debugLineNum = 995;BA.debugLine="If dentroDeGeocerca Then precision = 1"; -Debug.ShouldStop(4); -if (__ref.getField(true,"_dentrodegeocerca" /*RemoteObject*/ ).get().booleanValue()) { -__ref.setField ("_precision" /*RemoteObject*/ ,BA.numberCast(int.class, 1));}; - BA.debugLineNum = 996;BA.debugLine="motivoNoVenta = \"\""; -Debug.ShouldStop(8); -__ref.setField ("_motivonoventa" /*RemoteObject*/ ,BA.ObjectToString("")); - BA.debugLineNum = 997;BA.debugLine="motivoNoVisita = \"\""; -Debug.ShouldStop(16); -__ref.setField ("_motivonovisita" /*RemoteObject*/ ,BA.ObjectToString("")); - BA.debugLineNum = 999;BA.debugLine="If Starter.enVenta Then"; -Debug.ShouldStop(64); -if (c_cliente._starter._enventa /*RemoteObject*/ .get().booleanValue()) { - BA.debugLineNum = 1000;BA.debugLine="b_inicioFinVenta.Visible = True"; -Debug.ShouldStop(128); -__ref.getField(false,"_b_iniciofinventa" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"True")); - BA.debugLineNum = 1001;BA.debugLine="Subs.bitacora(Subs.fechanormal(DateTime.Now), us"; -Debug.ShouldStop(256); -c_cliente._subs.runVoidMethod ("_bitacora" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(c_cliente._subs.runMethod(true,"_fechanormal" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.NumberToString(c_cliente.__c.getField(false,"DateTime").runMethod(true,"getNow"))))),(Object)(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_id_almacen" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_ruta_tienda" /*RemoteObject*/ )),(Object)(BA.ObjectToString("Termina Venta")),(Object)(c_cliente._subs.runMethod(true,"_traecliente" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(BA.ObjectToString("")),(Object)(c_cliente._subs.runMethod(true,"_fechanormal" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.NumberToString(c_cliente.__c.getField(false,"DateTime").runMethod(true,"getNow"))))),(Object)(c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ )),(Object)(c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lon_gps" /*RemoteObject*/ )),(Object)(BA.NumberToString(__ref.getField(true,"_precision" /*RemoteObject*/ ))),(Object)(__ref.getField(true,"_motivonoventa" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_motivonovisita" /*RemoteObject*/ ))); - BA.debugLineNum = 1002;BA.debugLine="Starter.enVenta = False"; -Debug.ShouldStop(512); -c_cliente._starter._enventa /*RemoteObject*/ = c_cliente.__c.getField(true,"False"); - BA.debugLineNum = 1003;BA.debugLine="LogColor($\">>>>>> TERMINA VENTA: ${Starter.enVen"; -Debug.ShouldStop(1024); -c_cliente.__c.runVoidMethod ("LogImpl","37864336",(RemoteObject.concat(RemoteObject.createImmutable(">>>>>> TERMINA VENTA: "),c_cliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((c_cliente._starter._enventa /*RemoteObject*/ ))),RemoteObject.createImmutable(" - "),c_cliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((c_cliente._subs.runMethod(true,"_traecliente" /*RemoteObject*/ ,__ref.getField(false, "ba"))))),RemoteObject.createImmutable(""))),c_cliente.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 1004;BA.debugLine="Subs.iniciaActividad(\"principal\")"; -Debug.ShouldStop(2048); -c_cliente._subs.runVoidMethod ("_iniciaactividad" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("principal"))); - BA.debugLineNum = 1005;BA.debugLine="B4XPages.ShowPageAndRemovePreviousPages(\"Princip"; -Debug.ShouldStop(4096); -c_cliente._b4xpages.runVoidMethod ("_showpageandremovepreviouspages" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Principal"))); - BA.debugLineNum = 1006;BA.debugLine="Guardar2_Click"; -Debug.ShouldStop(8192); -__ref.runClassMethod (keymon.lat.medicomed.c_cliente.class, "_guardar2_click" /*RemoteObject*/ ); - }else { - BA.debugLineNum = 1010;BA.debugLine="b_inicioFinVenta.Width = Root.Width"; -Debug.ShouldStop(131072); -__ref.getField(false,"_b_iniciofinventa" /*RemoteObject*/ ).runMethod(true,"setWidth",__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth")); - BA.debugLineNum = 1011;BA.debugLine="Subs.bitacora(Subs.fechanormal(DateTime.Now), us"; -Debug.ShouldStop(262144); -c_cliente._subs.runVoidMethod ("_bitacora" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(c_cliente._subs.runMethod(true,"_fechanormal" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.NumberToString(c_cliente.__c.getField(false,"DateTime").runMethod(true,"getNow"))))),(Object)(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_id_almacen" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_ruta_tienda" /*RemoteObject*/ )),(Object)(BA.ObjectToString("Inicia Venta")),(Object)(c_cliente._subs.runMethod(true,"_traecliente" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(c_cliente._subs.runMethod(true,"_fechanormal" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.NumberToString(c_cliente.__c.getField(false,"DateTime").runMethod(true,"getNow"))))),(Object)(BA.ObjectToString("")),(Object)(c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ )),(Object)(c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lon_gps" /*RemoteObject*/ )),(Object)(BA.NumberToString(__ref.getField(true,"_precision" /*RemoteObject*/ ))),(Object)(__ref.getField(true,"_motivonoventa" /*RemoteObject*/ )),(Object)(RemoteObject.createImmutable(""))); - BA.debugLineNum = 1012;BA.debugLine="Starter.enVenta = True"; -Debug.ShouldStop(524288); -c_cliente._starter._enventa /*RemoteObject*/ = c_cliente.__c.getField(true,"True"); - BA.debugLineNum = 1013;BA.debugLine="LogColor($\">>>>>> INICIA VENTA: ${Starter.enVent"; -Debug.ShouldStop(1048576); -c_cliente.__c.runVoidMethod ("LogImpl","37864346",(RemoteObject.concat(RemoteObject.createImmutable(">>>>>> INICIA VENTA: "),c_cliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((c_cliente._starter._enventa /*RemoteObject*/ ))),RemoteObject.createImmutable(" - "),c_cliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((c_cliente._subs.runMethod(true,"_traecliente" /*RemoteObject*/ ,__ref.getField(false, "ba"))))),RemoteObject.createImmutable(""))),c_cliente.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 1014;BA.debugLine="b_inicioFinVenta.Visible = False"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_b_iniciofinventa" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False")); - }; - BA.debugLineNum = 1018;BA.debugLine="c.Close"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 1020;BA.debugLine="End Sub"; -Debug.ShouldStop(134217728); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_mapa_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_mapa_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,605); -if (RapidSub.canDelegate("b_mapa_click")) { return __ref.runUserSub(false, "c_cliente","b_mapa_click", __ref);} - BA.debugLineNum = 605;BA.debugLine="Sub b_mapa_Click"; -Debug.ShouldStop(268435456); - BA.debugLineNum = 606;BA.debugLine="B4XPages.ShowPage(\"mapas\")"; -Debug.ShouldStop(536870912); -c_cliente._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("mapas"))); - BA.debugLineNum = 607;BA.debugLine="End Sub"; -Debug.ShouldStop(1073741824); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_venta_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_venta_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,724); -if (RapidSub.canDelegate("b_venta_click")) { return __ref.runUserSub(false, "c_cliente","b_venta_click", __ref);} - BA.debugLineNum = 724;BA.debugLine="Sub b_venta_Click"; -Debug.ShouldStop(524288); - BA.debugLineNum = 725;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; -Debug.ShouldStop(1048576); -c_cliente.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("MM/dd/yyyy")); - BA.debugLineNum = 726;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(2097152); -__ref.setField ("_sdate" /*RemoteObject*/ ,c_cliente.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(c_cliente.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 727;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -Debug.ShouldStop(4194304); -__ref.setField ("_stime" /*RemoteObject*/ ,c_cliente.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_cliente.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 755;BA.debugLine="End Sub"; -Debug.ShouldStop(262144); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b4xpage_appear(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Appear (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,203); -if (RapidSub.canDelegate("b4xpage_appear")) { return __ref.runUserSub(false, "c_cliente","b4xpage_appear", __ref);} -RemoteObject _factura = RemoteObject.createImmutable(""); - BA.debugLineNum = 203;BA.debugLine="Sub B4XPage_Appear"; -Debug.ShouldStop(1024); - BA.debugLineNum = 205;BA.debugLine="b_clinteSinVenta.Enabled = False"; -Debug.ShouldStop(4096); -__ref.getField(false,"_b_clintesinventa" /*RemoteObject*/ ).runMethod(true,"setEnabled",c_cliente.__c.getField(true,"False")); - BA.debugLineNum = 206;BA.debugLine="b_clienteVenta.Enabled = False"; -Debug.ShouldStop(8192); -__ref.getField(false,"_b_clienteventa" /*RemoteObject*/ ).runMethod(true,"setEnabled",c_cliente.__c.getField(true,"False")); - BA.debugLineNum = 212;BA.debugLine="b_inicioFinVenta.Width = Root.Width"; -Debug.ShouldStop(524288); -__ref.getField(false,"_b_iniciofinventa" /*RemoteObject*/ ).runMethod(true,"setWidth",__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth")); - BA.debugLineNum = 213;BA.debugLine="LA_GPS.TextColor = Colors.Red"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_la_gps" /*RemoteObject*/ ).runMethod(true,"setTextColor",c_cliente.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 214;BA.debugLine="LA_GPS.Text = \"SIN UBICACION GPS\""; -Debug.ShouldStop(2097152); -__ref.getField(false,"_la_gps" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("SIN UBICACION GPS")); - BA.debugLineNum = 215;BA.debugLine="cercavalor = 0"; -Debug.ShouldStop(4194304); -__ref.setField ("_cercavalor" /*RemoteObject*/ ,BA.NumberToString(0)); - BA.debugLineNum = 216;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then"; -Debug.ShouldStop(8388608); -if (c_cliente.__c.runMethod(true,"Not",(Object)(c_cliente._starter._gps /*RemoteObject*/ .runMethod(true,"getGPSEnabled"))).get().booleanValue()) { - BA.debugLineNum = 217;BA.debugLine="ToastMessageShow(\"Es necesario tener el GPS ence"; -Debug.ShouldStop(16777216); -c_cliente.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Es necesario tener el GPS encendido")),(Object)(c_cliente.__c.getField(true,"True"))); - BA.debugLineNum = 218;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent"; -Debug.ShouldStop(33554432); -c_cliente.__c.runVoidMethod ("StartActivity",__ref.getField(false, "ba"),(Object)((c_cliente._starter._gps /*RemoteObject*/ .runMethod(false,"getLocationSettingsIntent")))); - }; - BA.debugLineNum = 220;BA.debugLine="cb_factura.Checked = False"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_cb_factura" /*RemoteObject*/ ).runMethodAndSync(true,"setChecked",c_cliente.__c.getField(true,"False")); - BA.debugLineNum = 221;BA.debugLine="p_abono.Visible = False"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_p_abono" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False")); - BA.debugLineNum = 222;BA.debugLine="Subs.centraPanel(p_abono, Root.Width)"; -Debug.ShouldStop(536870912); -c_cliente._subs.runVoidMethod ("_centrapanel" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_p_abono" /*RemoteObject*/ )),(Object)(__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"))); - BA.debugLineNum = 223;BA.debugLine="skmt.Initialize(ruta,\"kmt.db\", True)"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(BA.ObjectToString("kmt.db")),(Object)(c_cliente.__c.getField(true,"True"))); - BA.debugLineNum = 224;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_CL"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select 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 from kmt_info where CAT_CL_CODIGO In (Select cuenta from cuentaa)")))); - BA.debugLineNum = 225;BA.debugLine="s=B4XPages.MainPage.skmt.ExecQuery(\"Select SUM(PE"; -Debug.ShouldStop(1); -__ref.getField(false,"_s" /*RemoteObject*/ ).setObject (c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select SUM(PE_COSTO_TOT) As TOTAL_CLIE, SUM(PE_CANT) As CANT_CLIE, PC_FACTURA FROM PEDIDO_CLIENTE INNER JOIN PEDIDO ON PEDIDO_CLIENTE.PC_CLIENTE = PEDIDO.PE_CLIENTE WHERE (PE_CLIENTE IN (Select cuenta from cuentaa))")))); - BA.debugLineNum = 226;BA.debugLine="s.Position=0"; -Debug.ShouldStop(2); -__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 227;BA.debugLine="If c.RowCount > 0 Then"; -Debug.ShouldStop(4); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 228;BA.debugLine="c.Position=0"; -Debug.ShouldStop(8); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 229;BA.debugLine="la_cuenta.Text = c.GetString(\"CAT_CL_CODIGO\")"; -Debug.ShouldStop(16); -__ref.getField(false,"_la_cuenta" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_CODIGO"))))); - BA.debugLineNum = 230;BA.debugLine="La_nombre.Text = c.GetString(\"CAT_CL_NOMBRE\")"; -Debug.ShouldStop(32); -__ref.getField(false,"_la_nombre" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_NOMBRE"))))); - BA.debugLineNum = 231;BA.debugLine="la_Calle.Text = c.GetString(\"CAT_CL_CALLE\")"; -Debug.ShouldStop(64); -__ref.getField(false,"_la_calle" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_CALLE"))))); - BA.debugLineNum = 232;BA.debugLine="la_col.Text = c.GetString(\"CAT_CL_COLONIA\")"; -Debug.ShouldStop(128); -__ref.getField(false,"_la_col" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_COLONIA"))))); - BA.debugLineNum = 233;BA.debugLine="la_edo.Text = c.GetString(\"CAT_CL_EDO\")"; -Debug.ShouldStop(256); -__ref.getField(false,"_la_edo" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_EDO"))))); - BA.debugLineNum = 234;BA.debugLine="l_entre1.Text = c.GetString(\"CAT_CL_NOEXT\")"; -Debug.ShouldStop(512); -__ref.getField(false,"_l_entre1" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_NOEXT"))))); - BA.debugLineNum = 235;BA.debugLine="l_entre2.Text = c.GetString(\"CAT_CL_NOINT\")"; -Debug.ShouldStop(1024); -__ref.getField(false,"_l_entre2" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_NOINT"))))); - BA.debugLineNum = 236;BA.debugLine="l_atiende.Text = c.GetString(\"CAT_CL_ATIENDE1\")"; -Debug.ShouldStop(2048); -__ref.getField(false,"_l_atiende" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_ATIENDE1"))))); - BA.debugLineNum = 237;BA.debugLine="l_atiende2.Text = c.GetString(\"CAT_CL_ATIENTE2\")"; -Debug.ShouldStop(4096); -__ref.getField(false,"_l_atiende2" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_ATIENTE2"))))); - BA.debugLineNum = 238;BA.debugLine="Label20.Text = c.GetString(\"CAT_CL_CP\")"; -Debug.ShouldStop(8192); -__ref.getField(false,"_label20" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_CP"))))); - BA.debugLineNum = 239;BA.debugLine="l_calle1.Text = c.GetString(\"CAT_CL_CALLE1\")"; -Debug.ShouldStop(16384); -__ref.getField(false,"_l_calle1" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_CALLE1"))))); - BA.debugLineNum = 240;BA.debugLine="TELEFONO = c.GetString(\"CAT_CL_TELEFONO\")"; -Debug.ShouldStop(32768); -__ref.setField ("_telefono" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_TELEFONO")))); - BA.debugLineNum = 241;BA.debugLine="l_total.Text = s.GetString(\"TOTAL_CLIE\")"; -Debug.ShouldStop(65536); -__ref.getField(false,"_l_total" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_CLIE"))))); - BA.debugLineNum = 242;BA.debugLine="total_cliente = s.GetString(\"TOTAL_CLIE\")"; -Debug.ShouldStop(131072); -__ref.setField ("_total_cliente" /*RemoteObject*/ ,__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_CLIE")))); - BA.debugLineNum = 243;BA.debugLine="Private factura As String = 0"; -Debug.ShouldStop(262144); -_factura = BA.NumberToString(0);Debug.locals.put("factura", _factura);Debug.locals.put("factura", _factura); - BA.debugLineNum = 244;BA.debugLine="If s.GetString(\"PC_FACTURA\") <> Null And IsNumbe"; -Debug.ShouldStop(524288); -if (RemoteObject.solveBoolean("N",__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_FACTURA")))) && RemoteObject.solveBoolean(".",c_cliente.__c.runMethod(true,"IsNumber",(Object)(__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_FACTURA"))))))) { -_factura = __ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_FACTURA")));Debug.locals.put("factura", _factura);}; - BA.debugLineNum = 245;BA.debugLine="If factura = \"1\" Then cb_factura.Checked = True"; -Debug.ShouldStop(1048576); -if (RemoteObject.solveBoolean("=",_factura,BA.ObjectToString("1"))) { -__ref.getField(false,"_cb_factura" /*RemoteObject*/ ).runMethodAndSync(true,"setChecked",c_cliente.__c.getField(true,"True"));}; - BA.debugLineNum = 246;BA.debugLine="m_lat = \"0\""; -Debug.ShouldStop(2097152); -__ref.setField ("_m_lat" /*RemoteObject*/ ,BA.ObjectToString("0")); - BA.debugLineNum = 247;BA.debugLine="If c.GetString(\"CAT_CL_LAT\") <> \"\" Then m_lat =c"; -Debug.ShouldStop(4194304); -if (RemoteObject.solveBoolean("!",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_LAT"))),BA.ObjectToString(""))) { -__ref.setField ("_m_lat" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_LAT"))));}; - BA.debugLineNum = 248;BA.debugLine="If m_lat.Length < 5 Then m_lat = \"0\""; -Debug.ShouldStop(8388608); -if (RemoteObject.solveBoolean("<",__ref.getField(true,"_m_lat" /*RemoteObject*/ ).runMethod(true,"length"),BA.numberCast(double.class, 5))) { -__ref.setField ("_m_lat" /*RemoteObject*/ ,BA.ObjectToString("0"));}; - BA.debugLineNum = 249;BA.debugLine="m_lon = \"0\""; -Debug.ShouldStop(16777216); -__ref.setField ("_m_lon" /*RemoteObject*/ ,BA.ObjectToString("0")); - BA.debugLineNum = 250;BA.debugLine="If c.GetString(\"CAT_CL_LONG\") <> \"\" Then m_lon ="; -Debug.ShouldStop(33554432); -if (RemoteObject.solveBoolean("!",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_LONG"))),BA.ObjectToString(""))) { -__ref.setField ("_m_lon" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_LONG"))));}; - BA.debugLineNum = 251;BA.debugLine="If m_lon.Length < 5 Then m_lon = \"0\""; -Debug.ShouldStop(67108864); -if (RemoteObject.solveBoolean("<",__ref.getField(true,"_m_lon" /*RemoteObject*/ ).runMethod(true,"length"),BA.numberCast(double.class, 5))) { -__ref.setField ("_m_lon" /*RemoteObject*/ ,BA.ObjectToString("0"));}; - BA.debugLineNum = 252;BA.debugLine="LA_RUTA = c.GetString(\"CAT_CL_RUTA\")"; -Debug.ShouldStop(134217728); -__ref.setField ("_la_ruta" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_RUTA")))); - BA.debugLineNum = 254;BA.debugLine="If c.GetString(\"CAT_CL_NUM_SERIEFISICO\") = \"0\""; -Debug.ShouldStop(536870912); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_NUM_SERIEFISICO"))),BA.ObjectToString("0"))) { - BA.debugLineNum = 255;BA.debugLine="L_QR.TEXT = \"SIN CODIGO\""; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_l_qr" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("SIN CODIGO")); - BA.debugLineNum = 256;BA.debugLine="L_QR.TextColor = Colors.Red"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_l_qr" /*RemoteObject*/ ).runMethod(true,"setTextColor",c_cliente.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 257;BA.debugLine="gest.VISIBLE = False"; -Debug.ShouldStop(1); -__ref.getField(false,"_gest" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False")); - BA.debugLineNum = 258;BA.debugLine="BT_QR.Visible = True"; -Debug.ShouldStop(2); -__ref.getField(false,"_bt_qr" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"True")); - }else { - BA.debugLineNum = 260;BA.debugLine="L_QR.TEXT = c.GetString(\"CAT_CL_NUM_SERIEFISICO"; -Debug.ShouldStop(8); -__ref.getField(false,"_l_qr" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_NUM_SERIEFISICO"))))); - BA.debugLineNum = 261;BA.debugLine="L_QR.TextColor = Colors.Blue"; -Debug.ShouldStop(16); -__ref.getField(false,"_l_qr" /*RemoteObject*/ ).runMethod(true,"setTextColor",c_cliente.__c.getField(false,"Colors").getField(true,"Blue")); - BA.debugLineNum = 262;BA.debugLine="BT_QR.Visible = False"; -Debug.ShouldStop(32); -__ref.getField(false,"_bt_qr" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False")); - }; - }; - BA.debugLineNum = 265;BA.debugLine="c.Close"; -Debug.ShouldStop(256); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 266;BA.debugLine="s.Close"; -Debug.ShouldStop(512); -__ref.getField(false,"_s" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 267;BA.debugLine="S2=B4XPages.MainPage.skmt.ExecQuery(\"select count"; -Debug.ShouldStop(1024); -__ref.getField(false,"_s2" /*RemoteObject*/ ).setObject (c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select count(*) AS CUANTOS from HIST_VENTAS WHERE HVD_CLIENTE IN (Select CUENTA from cuentaa)")))); - BA.debugLineNum = 268;BA.debugLine="S2.Position =0"; -Debug.ShouldStop(2048); -__ref.getField(false,"_s2" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 269;BA.debugLine="CUANTOS = S2.GetString(\"CUANTOS\")"; -Debug.ShouldStop(4096); -__ref.setField ("_cuantos" /*RemoteObject*/ ,__ref.getField(false,"_s2" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))); - BA.debugLineNum = 270;BA.debugLine="S2.Close"; -Debug.ShouldStop(8192); -__ref.getField(false,"_s2" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 271;BA.debugLine="If CUANTOS > 0 Then"; -Debug.ShouldStop(16384); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(true,"_cuantos" /*RemoteObject*/ )),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 272;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery(\"select sum("; -Debug.ShouldStop(32768); -__ref.getField(false,"_c2" /*RemoteObject*/ ).setObject (c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select sum(HVD_COSTO_TOT) AS TOTAL from HIST_VENTAS WHERE HVD_CLIENTE IN (Select CUENTA from cuentaa)")))); - BA.debugLineNum = 273;BA.debugLine="c2.Position =0"; -Debug.ShouldStop(65536); -__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 274;BA.debugLine="MONTO_COMPRA = c2.GetString(\"TOTAL\")"; -Debug.ShouldStop(131072); -__ref.setField ("_monto_compra" /*RemoteObject*/ ,__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL")))); - BA.debugLineNum = 275;BA.debugLine="c2.Close"; -Debug.ShouldStop(262144); -__ref.getField(false,"_c2" /*RemoteObject*/ ).runVoidMethod ("Close"); - }else { - BA.debugLineNum = 277;BA.debugLine="MONTO_COMPRA = \"0\""; -Debug.ShouldStop(1048576); -__ref.setField ("_monto_compra" /*RemoteObject*/ ,BA.ObjectToString("0")); - }; - BA.debugLineNum = 280;BA.debugLine="la_saldotot.Text = MONTO_COMPRA"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_la_saldotot" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(true,"_monto_compra" /*RemoteObject*/ ))); - BA.debugLineNum = 281;BA.debugLine="If MONTO_COMPRA <> \"0\" Then"; -Debug.ShouldStop(16777216); -if (RemoteObject.solveBoolean("!",__ref.getField(true,"_monto_compra" /*RemoteObject*/ ),BA.ObjectToString("0"))) { - BA.debugLineNum = 282;BA.debugLine="META2 = 1200 - MONTO_COMPRA"; -Debug.ShouldStop(33554432); -__ref.setField ("_meta2" /*RemoteObject*/ ,BA.NumberToString(RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(1200),BA.numberCast(double.class, __ref.getField(true,"_monto_compra" /*RemoteObject*/ ))}, "-",1, 0))); - }else { - BA.debugLineNum = 284;BA.debugLine="META2 = 1200"; -Debug.ShouldStop(134217728); -__ref.setField ("_meta2" /*RemoteObject*/ ,BA.NumberToString(1200)); - }; - BA.debugLineNum = 286;BA.debugLine="If META2 < 1 Then"; -Debug.ShouldStop(536870912); -if (RemoteObject.solveBoolean("<",BA.numberCast(double.class, __ref.getField(true,"_meta2" /*RemoteObject*/ )),BA.numberCast(double.class, 1))) { - BA.debugLineNum = 287;BA.debugLine="META2 = \"CUBIERTO\""; -Debug.ShouldStop(1073741824); -__ref.setField ("_meta2" /*RemoteObject*/ ,BA.ObjectToString("CUBIERTO")); - }; - BA.debugLineNum = 289;BA.debugLine="la_saldooper.Text = META2"; -Debug.ShouldStop(1); -__ref.getField(false,"_la_saldooper" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(true,"_meta2" /*RemoteObject*/ ))); - BA.debugLineNum = 290;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select ID_ALM"; -Debug.ShouldStop(2); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select ID_ALMACEN from CAT_ALMACEN")))); - BA.debugLineNum = 291;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(4); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 292;BA.debugLine="C.Position=0"; -Debug.ShouldStop(8); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 293;BA.debugLine="ALMACEN = C.GetString(\"ID_ALMACEN\")"; -Debug.ShouldStop(16); -__ref.setField ("_almacen" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("ID_ALMACEN")))); - }; - BA.debugLineNum = 295;BA.debugLine="c.Close"; -Debug.ShouldStop(64); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 296;BA.debugLine="If ALMACEN = \"1\" Then"; -Debug.ShouldStop(128); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_almacen" /*RemoteObject*/ ),BA.ObjectToString("1"))) { - BA.debugLineNum = 297;BA.debugLine="Tels.Visible = False"; -Debug.ShouldStop(256); -__ref.getField(false,"_tels" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False")); - BA.debugLineNum = 298;BA.debugLine="gest.Visible = False"; -Debug.ShouldStop(512); -__ref.getField(false,"_gest" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False")); - }; - BA.debugLineNum = 301;BA.debugLine="If ALMACEN = \"4\" Then"; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_almacen" /*RemoteObject*/ ),BA.ObjectToString("4"))) { - BA.debugLineNum = 303;BA.debugLine="DD=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT COU"; -Debug.ShouldStop(16384); -__ref.getField(false,"_dd" /*RemoteObject*/ ).setObject (c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("SELECT COUNT(*) AS CUANTOS FROM HIST_VENTAS WHERE HVD_CLIENTE IN (Select cuenta from cuentaa) AND HVD_PRONOMBRE =?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("KNORR RINDE MAS 70 GR")})))); - BA.debugLineNum = 304;BA.debugLine="DD.Position =0"; -Debug.ShouldStop(32768); -__ref.getField(false,"_dd" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 305;BA.debugLine="If DD.GetString(\"CUANTOS\") = 0 Then"; -Debug.ShouldStop(65536); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_dd" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS"))),BA.NumberToString(0))) { - BA.debugLineNum = 306;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT COU"; -Debug.ShouldStop(131072); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("SELECT COUNT(*) AS CUANTOS FROM PEDIDO WHERE PE_CLIENTE IN (Select cuenta from cuentaa) AND PE_PRONOMBRE =?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("KNORR RINDE MAS 70 GR")})))); - BA.debugLineNum = 307;BA.debugLine="c.Position =0"; -Debug.ShouldStop(262144); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 313;BA.debugLine="c.Close"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - }else { - }; - BA.debugLineNum = 317;BA.debugLine="DD.Close"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_dd" /*RemoteObject*/ ).runVoidMethod ("Close"); - }else { - }; - BA.debugLineNum = 321;BA.debugLine="If ALMACEN = \"16\" Or ALMACEN = \"13\" Then"; -Debug.ShouldStop(1); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_almacen" /*RemoteObject*/ ),BA.ObjectToString("16")) || RemoteObject.solveBoolean("=",__ref.getField(true,"_almacen" /*RemoteObject*/ ),BA.ObjectToString("13"))) { - BA.debugLineNum = 322;BA.debugLine="Tels.Visible = False"; -Debug.ShouldStop(2); -__ref.getField(false,"_tels" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False")); - BA.debugLineNum = 323;BA.debugLine="gest.Visible = False"; -Debug.ShouldStop(4); -__ref.getField(false,"_gest" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False")); - }; - BA.debugLineNum = 325;BA.debugLine="CallSubDelayed(Tracker, \"Track\")"; -Debug.ShouldStop(16); -c_cliente.__c.runVoidMethod ("CallSubDelayed",__ref.getField(false, "ba"),(Object)((c_cliente._tracker.getObject())),(Object)(RemoteObject.createImmutable("Track"))); - BA.debugLineNum = 327;BA.debugLine="If Not(Starter.GPS.GPSEnabled) Then"; -Debug.ShouldStop(64); -if (c_cliente.__c.runMethod(true,"Not",(Object)(c_cliente._starter._gps /*RemoteObject*/ .runMethod(true,"getGPSEnabled"))).get().booleanValue()) { - BA.debugLineNum = 328;BA.debugLine="ToastMessageShow(\"Debe Activar el GPS del Equipo"; -Debug.ShouldStop(128); -c_cliente.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Debe Activar el GPS del Equipo.")),(Object)(c_cliente.__c.getField(true,"True"))); - BA.debugLineNum = 329;BA.debugLine="StartActivity(Starter.GPS.LocationSettingsIntent"; -Debug.ShouldStop(256); -c_cliente.__c.runVoidMethod ("StartActivity",__ref.getField(false, "ba"),(Object)((c_cliente._starter._gps /*RemoteObject*/ .runMethod(false,"getLocationSettingsIntent")))); - }else { - BA.debugLineNum = 331;BA.debugLine="Starter.GPS.Start(0, 0)"; -Debug.ShouldStop(1024); -c_cliente._starter._gps /*RemoteObject*/ .runVoidMethodAndSync ("Start",__ref.getField(false, "ba"),(Object)(BA.numberCast(long.class, 0)),(Object)(BA.numberCast(float.class, 0))); - }; - BA.debugLineNum = 334;BA.debugLine="CallSubDelayed(Tracker, \"StartFLPSmall\")"; -Debug.ShouldStop(8192); -c_cliente.__c.runVoidMethod ("CallSubDelayed",__ref.getField(false, "ba"),(Object)((c_cliente._tracker.getObject())),(Object)(RemoteObject.createImmutable("StartFLPSmall"))); - BA.debugLineNum = 335;BA.debugLine="If Tracker.FLP.IsInitialized And Tracker.FLP.GetL"; -Debug.ShouldStop(16384); -if (RemoteObject.solveBoolean(".",c_cliente._tracker._flp /*RemoteObject*/ .runMethod(true,"IsInitialized")) && RemoteObject.solveBoolean(".",c_cliente._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation").runMethod(true,"IsInitialized"))) { - BA.debugLineNum = 336;BA.debugLine="B4XPages.MainPage.lat_gps = Tracker.FLP.GetLastK"; -Debug.ShouldStop(32768); -c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).setField ("_lat_gps" /*RemoteObject*/ ,BA.NumberToString(c_cliente._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation").runMethod(true,"getLatitude"))); - BA.debugLineNum = 337;BA.debugLine="B4XPages.MainPage.lon_gps = Tracker.FLP.GetLastK"; -Debug.ShouldStop(65536); -c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).setField ("_lon_gps" /*RemoteObject*/ ,BA.NumberToString(c_cliente._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation").runMethod(true,"getLongitude"))); - BA.debugLineNum = 339;BA.debugLine="GPS_LocationChanged(Tracker.FLP.GetLastKnownLoca"; -Debug.ShouldStop(262144); -__ref.runClassMethod (keymon.lat.medicomed.c_cliente.class, "_gps_locationchanged" /*RemoteObject*/ ,(Object)(c_cliente._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation"))); - }; - BA.debugLineNum = 341;BA.debugLine="Tels.Visible = False"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_tels" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False")); - BA.debugLineNum = 342;BA.debugLine="gest.Visible = False"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_gest" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False")); - BA.debugLineNum = 344;BA.debugLine="If la_cuenta.text.SubString2(0,1) = \"N\" Then gest"; -Debug.ShouldStop(8388608); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_la_cuenta" /*RemoteObject*/ ).runMethod(true,"getText").runMethod(true,"substring",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 1))),BA.ObjectToString("N"))) { -__ref.getField(false,"_gest" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False"));}; - BA.debugLineNum = 346;BA.debugLine="b_inicioFinVenta.Text = \"INICIAR VENTA\""; -Debug.ShouldStop(33554432); -__ref.getField(false,"_b_iniciofinventa" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("INICIAR VENTA")); - BA.debugLineNum = 347;BA.debugLine="b_inicioFinVenta.BringToFront"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_b_iniciofinventa" /*RemoteObject*/ ).runVoidMethod ("BringToFront"); - BA.debugLineNum = 349;BA.debugLine="If Not(Starter.enVenta) And la_cuenta.Text <> \"0\""; -Debug.ShouldStop(268435456); -if (RemoteObject.solveBoolean(".",c_cliente.__c.runMethod(true,"Not",(Object)(c_cliente._starter._enventa /*RemoteObject*/ ))) && RemoteObject.solveBoolean("!",__ref.getField(false,"_la_cuenta" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("0"))) { - BA.debugLineNum = 350;BA.debugLine="b_inicioFinVenta.Visible = True"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_b_iniciofinventa" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"True")); - }else { - BA.debugLineNum = 354;BA.debugLine="b_inicioFinVenta.Visible = False"; -Debug.ShouldStop(2); -__ref.getField(false,"_b_iniciofinventa" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False")); - }; - BA.debugLineNum = 358;BA.debugLine="End Sub"; -Debug.ShouldStop(32); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b4xpage_closerequest(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_CloseRequest (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,422); -if (RapidSub.canDelegate("b4xpage_closerequest")) { return __ref.runUserSub(false, "c_cliente","b4xpage_closerequest", __ref);} -ResumableSub_B4XPage_CloseRequest rsub = new ResumableSub_B4XPage_CloseRequest(null,__ref); -rsub.remoteResumableSub = anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSubForFilter(); -rsub.resume(null, null); -return RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.keywords.Common.ResumableSubWrapper"), rsub.remoteResumableSub); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_B4XPage_CloseRequest extends BA.ResumableSub { -public ResumableSub_B4XPage_CloseRequest(keymon.lat.medicomed.c_cliente parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.c_cliente parent; -RemoteObject _resultado1 = RemoteObject.createImmutable(0); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_CloseRequest (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,422); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -{ -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,RemoteObject.createImmutable(null));return;} -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 426;BA.debugLine="If IsNumber(l_total.text) And l_total.text <> \"0\""; -Debug.ShouldStop(512); -if (true) break; - -case 1: -//if -this.state = 10; -if (RemoteObject.solveBoolean(".",parent.__c.runMethod(true,"IsNumber",(Object)(__ref.getField(false,"_l_total" /*RemoteObject*/ ).runMethod(true,"getText")))) && RemoteObject.solveBoolean("!",__ref.getField(false,"_l_total" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("0")) && RemoteObject.solveBoolean(".",parent.__c.runMethod(true,"Not",(Object)(parent._subs.runMethod(true,"_pedidoguardado" /*RemoteObject*/ ,__ref.getField(false, "ba")))))) { -this.state = 3; -}if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 427;BA.debugLine="LogColor(\"Hay Venta\", Colors.Red)"; -Debug.ShouldStop(1024); -parent.__c.runVoidMethod ("LogImpl","35767173",BA.ObjectToString("Hay Venta"),parent.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 428;BA.debugLine="Private resultado1 As Int = Msgbox2($\"Va salir s"; -Debug.ShouldStop(2048); -_resultado1 = parent.__c.runMethodAndSync(true,"Msgbox2",(Object)(BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("Va salir sin haber guardado la venta, si continua, la venta se BORRARA."),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"CRLF")))),RemoteObject.createImmutable(""),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"CRLF")))),RemoteObject.createImmutable("¿Esta seguro que desea continuar?"))))),(Object)(BA.ObjectToCharSequence("SE VA A BORRAR LA VENTA")),(Object)(BA.ObjectToString("Borrar Venta")),(Object)(BA.ObjectToString("Guardar Venta")),(Object)(BA.ObjectToString("")),(Object)((parent.__c.runMethod(false,"LoadBitmap",(Object)(parent.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(RemoteObject.createImmutable("alert2.png"))).getObject())),__ref.getField(false, "ba"));Debug.locals.put("resultado1", _resultado1);Debug.locals.put("resultado1", _resultado1); - BA.debugLineNum = 429;BA.debugLine="If resultado1 = DialogResponse.POSITIVE Then"; -Debug.ShouldStop(4096); -if (true) break; - -case 4: -//if -this.state = 9; -if (RemoteObject.solveBoolean("=",_resultado1,BA.numberCast(double.class, parent.__c.getField(false,"DialogResponse").getField(true,"POSITIVE")))) { -this.state = 6; -}else -{ BA.debugLineNum = 435;BA.debugLine="else if resultado1=DialogResponse.CANCEL Then"; -Debug.ShouldStop(262144); -if (RemoteObject.solveBoolean("=",_resultado1,BA.numberCast(double.class, parent.__c.getField(false,"DialogResponse").getField(true,"CANCEL")))) { -this.state = 8; -}} -if (true) break; - -case 6: -//C -this.state = 9; - BA.debugLineNum = 430;BA.debugLine="Log(\"Borrra venta\")"; -Debug.ShouldStop(8192); -parent.__c.runVoidMethod ("LogImpl","35767176",RemoteObject.createImmutable("Borrra venta"),0); - BA.debugLineNum = 431;BA.debugLine="Subs.borraPedidoClienteActual"; -Debug.ShouldStop(16384); -parent._subs.runVoidMethod ("_borrapedidoclienteactual" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 432;BA.debugLine="ToastMessageShow(\"Venta Borrada\", False)"; -Debug.ShouldStop(32768); -parent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Venta Borrada")),(Object)(parent.__c.getField(true,"False"))); - BA.debugLineNum = 434;BA.debugLine="B4XPages.ShowPage(\"Principal\")"; -Debug.ShouldStop(131072); -parent._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Principal"))); - if (true) break; - -case 8: -//C -this.state = 9; - BA.debugLineNum = 436;BA.debugLine="Log(\"Pedido guardado\")"; -Debug.ShouldStop(524288); -parent.__c.runVoidMethod ("LogImpl","35767182",RemoteObject.createImmutable("Pedido guardado"),0); - BA.debugLineNum = 437;BA.debugLine="Guardar_Click"; -Debug.ShouldStop(1048576); -__ref.runClassMethod (keymon.lat.medicomed.c_cliente.class, "_guardar_click" /*RemoteObject*/ ); - BA.debugLineNum = 438;BA.debugLine="ToastMessageShow(\"Venta Guardada\", False)"; -Debug.ShouldStop(2097152); -parent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Venta Guardada")),(Object)(parent.__c.getField(true,"False"))); - if (true) break; - -case 9: -//C -this.state = 10; -; - if (true) break; - -case 10: -//C -this.state = -1; -; - BA.debugLineNum = 441;BA.debugLine="ToastMessageShow(\"Por favor presione GUARDAR para"; -Debug.ShouldStop(16777216); -parent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Por favor presione GUARDAR para continuar")),(Object)(parent.__c.getField(true,"True"))); - BA.debugLineNum = 445;BA.debugLine="Return False"; -Debug.ShouldStop(268435456); -if (true) { -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,(parent.__c.getField(true,"False")));return;}; - BA.debugLineNum = 446;BA.debugLine="End Sub"; -Debug.ShouldStop(536870912); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _b4xpage_created(RemoteObject __ref,RemoteObject _root1) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Created (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,161); -if (RapidSub.canDelegate("b4xpage_created")) { return __ref.runUserSub(false, "c_cliente","b4xpage_created", __ref, _root1);} -Debug.locals.put("Root1", _root1); - BA.debugLineNum = 161;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -Debug.ShouldStop(1); - BA.debugLineNum = 162;BA.debugLine="Root = Root1"; -Debug.ShouldStop(2); -__ref.setField ("_root" /*RemoteObject*/ ,_root1); - BA.debugLineNum = 165;BA.debugLine="Root.LoadLayout(\"cliente\")"; -Debug.ShouldStop(16); -__ref.getField(false,"_root" /*RemoteObject*/ ).runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("cliente")),__ref.getField(false, "ba")); - BA.debugLineNum = 166;BA.debugLine="ruta = File.DirInternal"; -Debug.ShouldStop(32); -__ref.setField ("_ruta" /*RemoteObject*/ ,c_cliente.__c.getField(false,"File").runMethod(true,"getDirInternal")); - BA.debugLineNum = 167;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; -Debug.ShouldStop(64); -if (RemoteObject.solveBoolean("=",c_cliente.__c.getField(false,"File").runMethod(true,"Exists",(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(RemoteObject.createImmutable("kmt.db"))),c_cliente.__c.getField(true,"False"))) { - BA.debugLineNum = 168;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; -Debug.ShouldStop(128); -c_cliente.__c.getField(false,"File").runVoidMethod ("Copy",(Object)(c_cliente.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(BA.ObjectToString("kmt.db")),(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(RemoteObject.createImmutable("kmt.db"))); - }; - BA.debugLineNum = 170;BA.debugLine="skmt.Initialize(ruta,\"kmt.db\", True)"; -Debug.ShouldStop(512); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(BA.ObjectToString("kmt.db")),(Object)(c_cliente.__c.getField(true,"True"))); - BA.debugLineNum = 171;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_CL"; -Debug.ShouldStop(1024); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select 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 from kmt_info where CAT_CL_CODIGO In (Select cuenta from cuentaa)")))); - BA.debugLineNum = 172;BA.debugLine="s=B4XPages.MainPage.skmt.ExecQuery(\"select sum(pe"; -Debug.ShouldStop(2048); -__ref.getField(false,"_s" /*RemoteObject*/ ).setObject (c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)")))); - BA.debugLineNum = 173;BA.debugLine="s.Position=0"; -Debug.ShouldStop(4096); -__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 174;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(8192); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 175;BA.debugLine="c.Position=0"; -Debug.ShouldStop(16384); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 176;BA.debugLine="la_cuenta.Text = c.GetString(\"CAT_CL_CODIGO\")"; -Debug.ShouldStop(32768); -__ref.getField(false,"_la_cuenta" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_CODIGO"))))); - BA.debugLineNum = 177;BA.debugLine="cuenta = c.GetString(\"CAT_CL_CODIGO\")"; -Debug.ShouldStop(65536); -__ref.setField ("_cuenta" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_CODIGO")))); - BA.debugLineNum = 178;BA.debugLine="La_nombre.Text = c.GetString(\"CAT_CL_NOMBRE\")"; -Debug.ShouldStop(131072); -__ref.getField(false,"_la_nombre" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_NOMBRE"))))); - BA.debugLineNum = 179;BA.debugLine="la_Calle.Text = c.GetString(\"CAT_CL_CALLE\") & c."; -Debug.ShouldStop(262144); -__ref.getField(false,"_la_calle" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(RemoteObject.concat(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_CALLE"))),__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_NOEXT")))))); - BA.debugLineNum = 180;BA.debugLine="la_col.Text = c.GetString(\"CAT_CL_COLONIA\")"; -Debug.ShouldStop(524288); -__ref.getField(false,"_la_col" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_COLONIA"))))); - BA.debugLineNum = 181;BA.debugLine="la_edo.Text = c.GetString(\"CAT_CL_EDO\")"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_la_edo" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_EDO"))))); - BA.debugLineNum = 183;BA.debugLine="l_entre1.Text = c.GetString(\"CAT_CL_NOEXT\")"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_l_entre1" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_NOEXT"))))); - BA.debugLineNum = 184;BA.debugLine="l_entre2.Text = c.GetString(\"CAT_CL_NOINT\")"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_l_entre2" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_NOINT"))))); - BA.debugLineNum = 185;BA.debugLine="l_atiende.Text = c.GetString(\"CAT_CL_ATIENDE1\")"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_l_atiende" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_ATIENDE1"))))); - BA.debugLineNum = 186;BA.debugLine="l_atiende2.Text = c.GetString(\"CAT_CL_ATIENTE2\")"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_l_atiende2" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_ATIENTE2"))))); - BA.debugLineNum = 187;BA.debugLine="la_saldotot.Text = c.GetString(\"CAT_CL_TELEFONO\""; -Debug.ShouldStop(67108864); -__ref.getField(false,"_la_saldotot" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_TELEFONO"))))); - BA.debugLineNum = 188;BA.debugLine="la_saldooper.Text = c.GetString(\"CAT_CL_EMAIL\")"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_la_saldooper" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_EMAIL"))))); - BA.debugLineNum = 189;BA.debugLine="l_total.Text = s.GetString(\"TOTAL_CLIE\")"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_l_total" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_CLIE"))))); - BA.debugLineNum = 190;BA.debugLine="total_cliente = s.GetString(\"TOTAL_CLIE\")"; -Debug.ShouldStop(536870912); -__ref.setField ("_total_cliente" /*RemoteObject*/ ,__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_CLIE")))); - BA.debugLineNum = 191;BA.debugLine="MONTO_COMPRA = c.GetString(\"CAT_CL_MTOCOMPRA\")"; -Debug.ShouldStop(1073741824); -__ref.setField ("_monto_compra" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_MTOCOMPRA")))); - BA.debugLineNum = 192;BA.debugLine="Label20.Text = c.GetString(\"CAT_CL_CP\")"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_label20" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_CP"))))); - }; - BA.debugLineNum = 194;BA.debugLine="c.Close"; -Debug.ShouldStop(2); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 195;BA.debugLine="s.Close"; -Debug.ShouldStop(4); -__ref.getField(false,"_s" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 196;BA.debugLine="btAdmin.Initialize(\"BlueTeeth\")"; -Debug.ShouldStop(8); -__ref.getField(false,"_btadmin" /*RemoteObject*/ ).runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("BlueTeeth"))); - BA.debugLineNum = 197;BA.debugLine="cmp20.Initialize(\"Printer\")"; -Debug.ShouldStop(16); -__ref.getField(false,"_cmp20" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(RemoteObject.createImmutable("Printer"))); - BA.debugLineNum = 198;BA.debugLine="reqManager.Initialize(Me, B4XPages.MainPage.SERVE"; -Debug.ShouldStop(32); -__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref),(Object)(c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_server" /*RemoteObject*/ ))); - BA.debugLineNum = 199;BA.debugLine="End Sub"; -Debug.ShouldStop(64); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _bt_qr_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("BT_QR_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,547); -if (RapidSub.canDelegate("bt_qr_click")) { return __ref.runUserSub(false, "c_cliente","bt_qr_click", __ref);} - BA.debugLineNum = 547;BA.debugLine="Sub BT_QR_Click"; -Debug.ShouldStop(4); - BA.debugLineNum = 548;BA.debugLine="sc.isportrait = True"; -Debug.ShouldStop(8); -__ref.getField(false,"_sc" /*RemoteObject*/ ).setField ("isportrait",c_cliente.__c.getField(true,"True")); - BA.debugLineNum = 549;BA.debugLine="sc.timeoutDuration = 45"; -Debug.ShouldStop(16); -__ref.getField(false,"_sc" /*RemoteObject*/ ).setField ("timeoutDuration",BA.numberCast(int.class, 45)); - BA.debugLineNum = 550;BA.debugLine="sc.theViewFinderXfactor = 0.7"; -Debug.ShouldStop(32); -__ref.getField(false,"_sc" /*RemoteObject*/ ).setField ("theViewFinderXfactor",BA.numberCast(double.class, 0.7)); - BA.debugLineNum = 551;BA.debugLine="sc.theViewFinderYfactor = 0.5"; -Debug.ShouldStop(64); -__ref.getField(false,"_sc" /*RemoteObject*/ ).setField ("theViewFinderYfactor",BA.numberCast(double.class, 0.5)); - BA.debugLineNum = 552;BA.debugLine="sc.theResultColor = Colors.Green"; -Debug.ShouldStop(128); -__ref.getField(false,"_sc" /*RemoteObject*/ ).setField ("theResultColor",c_cliente.__c.getField(false,"Colors").getField(true,"Green")); - BA.debugLineNum = 553;BA.debugLine="sc.mustVibrate = True"; -Debug.ShouldStop(256); -__ref.getField(false,"_sc" /*RemoteObject*/ ).setField ("mustVibrate",c_cliente.__c.getField(true,"True")); - BA.debugLineNum = 554;BA.debugLine="sc.BeginScan(\"sc\")"; -Debug.ShouldStop(512); -__ref.getField(false,"_sc" /*RemoteObject*/ ).runVoidMethod ("BeginScan",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("sc"))); - BA.debugLineNum = 555;BA.debugLine="End Sub"; -Debug.ShouldStop(1024); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _calc_ean_checksum(RemoteObject __ref,RemoteObject _number) throws Exception{ -try { - Debug.PushSubsStack("calc_ean_checksum (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,590); -if (RapidSub.canDelegate("calc_ean_checksum")) { return __ref.runUserSub(false, "c_cliente","calc_ean_checksum", __ref, _number);} -RemoteObject _i = RemoteObject.createImmutable(0); -RemoteObject _co = RemoteObject.createImmutable('\0'); -RemoteObject _soma = RemoteObject.createImmutable(0); -RemoteObject _n = RemoteObject.createImmutable(0); -RemoteObject _digit = RemoteObject.createImmutable(0f); -Debug.locals.put("number", _number); - BA.debugLineNum = 590;BA.debugLine="Sub calc_ean_checksum(number As String) As String"; -Debug.ShouldStop(8192); - BA.debugLineNum = 591;BA.debugLine="Dim i As Int"; -Debug.ShouldStop(16384); -_i = RemoteObject.createImmutable(0);Debug.locals.put("i", _i); - BA.debugLineNum = 592;BA.debugLine="Dim cO As Char"; -Debug.ShouldStop(32768); -_co = RemoteObject.createImmutable('\0');Debug.locals.put("cO", _co); - BA.debugLineNum = 593;BA.debugLine="Dim soma As Int"; -Debug.ShouldStop(65536); -_soma = RemoteObject.createImmutable(0);Debug.locals.put("soma", _soma); - BA.debugLineNum = 594;BA.debugLine="Dim n As Int"; -Debug.ShouldStop(131072); -_n = RemoteObject.createImmutable(0);Debug.locals.put("n", _n); - BA.debugLineNum = 595;BA.debugLine="Dim digit As Float"; -Debug.ShouldStop(262144); -_digit = RemoteObject.createImmutable(0f);Debug.locals.put("digit", _digit); - BA.debugLineNum = 596;BA.debugLine="soma = 0"; -Debug.ShouldStop(524288); -_soma = BA.numberCast(int.class, 0);Debug.locals.put("soma", _soma); - BA.debugLineNum = 597;BA.debugLine="For i=0 To number.Length - 1"; -Debug.ShouldStop(1048576); -{ -final int step7 = 1; -final int limit7 = RemoteObject.solve(new RemoteObject[] {_number.runMethod(true,"length"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = BA.numberCast(int.class, 0) ; -for (;(step7 > 0 && _i.get().intValue() <= limit7) || (step7 < 0 && _i.get().intValue() >= limit7) ;_i = RemoteObject.createImmutable((int)(0 + _i.get().intValue() + step7)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 598;BA.debugLine="digit = number.SubString2(i,i+1)"; -Debug.ShouldStop(2097152); -_digit = BA.numberCast(float.class, _number.runMethod(true,"substring",(Object)(_i),(Object)(RemoteObject.solve(new RemoteObject[] {_i,RemoteObject.createImmutable(1)}, "+",1, 1))));Debug.locals.put("digit", _digit); - BA.debugLineNum = 599;BA.debugLine="n= digit * ((i Mod 2) * 2 + 1)"; -Debug.ShouldStop(4194304); -_n = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_digit,(RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {_i,RemoteObject.createImmutable(2)}, "%",0, 1)),RemoteObject.createImmutable(2),RemoteObject.createImmutable(1)}, "*+",1, 1))}, "*",0, 0));Debug.locals.put("n", _n); - BA.debugLineNum = 600;BA.debugLine="soma=soma+n"; -Debug.ShouldStop(8388608); -_soma = RemoteObject.solve(new RemoteObject[] {_soma,_n}, "+",1, 1);Debug.locals.put("soma", _soma); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 602;BA.debugLine="Return number & ( ( 10 - ( soma Mod 10 )) Mod 10"; -Debug.ShouldStop(33554432); -if (true) return RemoteObject.concat(_number,(RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(10),(RemoteObject.solve(new RemoteObject[] {_soma,RemoteObject.createImmutable(10)}, "%",0, 1))}, "-",1, 1)),RemoteObject.createImmutable(10)}, "%",0, 1))); - BA.debugLineNum = 603;BA.debugLine="End Sub"; -Debug.ShouldStop(67108864); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _cb_factura_checkedchange(RemoteObject __ref,RemoteObject _checked) throws Exception{ -try { - Debug.PushSubsStack("cb_factura_CheckedChange (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,814); -if (RapidSub.canDelegate("cb_factura_checkedchange")) { return __ref.runUserSub(false, "c_cliente","cb_factura_checkedchange", __ref, _checked);} -Debug.locals.put("Checked", _checked); - BA.debugLineNum = 814;BA.debugLine="Private Sub cb_factura_CheckedChange(Checked As Bo"; -Debug.ShouldStop(8192); - BA.debugLineNum = 816;BA.debugLine="If Checked Then p_cbFactura.Color = Colors.Green"; -Debug.ShouldStop(32768); -if (_checked.get().booleanValue()) { -__ref.getField(false,"_p_cbfactura" /*RemoteObject*/ ).runVoidMethod ("setColor",c_cliente.__c.getField(false,"Colors").getField(true,"Green"));} -else { -__ref.getField(false,"_p_cbfactura" /*RemoteObject*/ ).runVoidMethod ("setColor",c_cliente.__c.getField(false,"Colors").getField(true,"Red"));}; - BA.debugLineNum = 817;BA.debugLine="End Sub"; -Debug.ShouldStop(65536); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 5;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 6;BA.debugLine="Private Root As B4XView 'ignore"; -c_cliente._root = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_root",c_cliente._root); - //BA.debugLineNum = 7;BA.debugLine="Private xui As XUI 'ignore"; -c_cliente._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",c_cliente._xui); - //BA.debugLineNum = 8;BA.debugLine="Private p_cliente As Panel"; -c_cliente._p_cliente = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_cliente",c_cliente._p_cliente); - //BA.debugLineNum = 9;BA.debugLine="Dim reqManager As DBRequestManager"; -c_cliente._reqmanager = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager");__ref.setField("_reqmanager",c_cliente._reqmanager); - //BA.debugLineNum = 10;BA.debugLine="Dim cmd As DBCommand"; -c_cliente._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",c_cliente._cmd); - //BA.debugLineNum = 11;BA.debugLine="Dim ime As IME"; -c_cliente._ime = RemoteObject.createNew ("anywheresoftware.b4a.objects.IME");__ref.setField("_ime",c_cliente._ime); - //BA.debugLineNum = 13;BA.debugLine="Dim g As GPS"; -c_cliente._g = RemoteObject.createNew ("anywheresoftware.b4a.gps.GPS");__ref.setField("_g",c_cliente._g); - //BA.debugLineNum = 14;BA.debugLine="Dim ruta As String"; -c_cliente._ruta = RemoteObject.createImmutable("");__ref.setField("_ruta",c_cliente._ruta); - //BA.debugLineNum = 15;BA.debugLine="Dim skmt As SQL"; -c_cliente._skmt = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL");__ref.setField("_skmt",c_cliente._skmt); - //BA.debugLineNum = 16;BA.debugLine="Dim clie_id As String"; -c_cliente._clie_id = RemoteObject.createImmutable("");__ref.setField("_clie_id",c_cliente._clie_id); - //BA.debugLineNum = 17;BA.debugLine="Dim sDate,sTime As String"; -c_cliente._sdate = RemoteObject.createImmutable("");__ref.setField("_sdate",c_cliente._sdate); -c_cliente._stime = RemoteObject.createImmutable("");__ref.setField("_stime",c_cliente._stime); - //BA.debugLineNum = 18;BA.debugLine="Dim usuario As String"; -c_cliente._usuario = RemoteObject.createImmutable("");__ref.setField("_usuario",c_cliente._usuario); - //BA.debugLineNum = 19;BA.debugLine="Dim total_cliente As String"; -c_cliente._total_cliente = RemoteObject.createImmutable("");__ref.setField("_total_cliente",c_cliente._total_cliente); - //BA.debugLineNum = 20;BA.debugLine="Dim m_lat, m_lon As String"; -c_cliente._m_lat = RemoteObject.createImmutable("");__ref.setField("_m_lat",c_cliente._m_lat); -c_cliente._m_lon = RemoteObject.createImmutable("");__ref.setField("_m_lon",c_cliente._m_lon); - //BA.debugLineNum = 21;BA.debugLine="Dim btAdmin As BluetoothAdmin"; -c_cliente._btadmin = RemoteObject.createNew ("anywheresoftware.b4a.objects.Serial.BluetoothAdmin");__ref.setField("_btadmin",c_cliente._btadmin); - //BA.debugLineNum = 22;BA.debugLine="Dim cmp20 As Serial"; -c_cliente._cmp20 = RemoteObject.createNew ("anywheresoftware.b4a.objects.Serial");__ref.setField("_cmp20",c_cliente._cmp20); - //BA.debugLineNum = 23;BA.debugLine="Dim printer As TextWriter"; -c_cliente._printer = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.TextWriterWrapper");__ref.setField("_printer",c_cliente._printer); - //BA.debugLineNum = 24;BA.debugLine="Dim PairedDevices As Map"; -c_cliente._paireddevices = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");__ref.setField("_paireddevices",c_cliente._paireddevices); - //BA.debugLineNum = 25;BA.debugLine="Dim L As List"; -c_cliente._l = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_l",c_cliente._l); - //BA.debugLineNum = 26;BA.debugLine="Dim TAMANO As Int"; -c_cliente._tamano = RemoteObject.createImmutable(0);__ref.setField("_tamano",c_cliente._tamano); - //BA.debugLineNum = 27;BA.debugLine="Dim ESPACIO As Int"; -c_cliente._espacio = RemoteObject.createImmutable(0);__ref.setField("_espacio",c_cliente._espacio); - //BA.debugLineNum = 28;BA.debugLine="Dim BLANCO As String"; -c_cliente._blanco = RemoteObject.createImmutable("");__ref.setField("_blanco",c_cliente._blanco); - //BA.debugLineNum = 29;BA.debugLine="Dim cuenta As String"; -c_cliente._cuenta = RemoteObject.createImmutable("");__ref.setField("_cuenta",c_cliente._cuenta); - //BA.debugLineNum = 30;BA.debugLine="Dim tipo_venta As String = \"PREVENTA\""; -c_cliente._tipo_venta = BA.ObjectToString("PREVENTA");__ref.setField("_tipo_venta",c_cliente._tipo_venta); - //BA.debugLineNum = 31;BA.debugLine="Dim MAC_IMPRESORA As String"; -c_cliente._mac_impresora = RemoteObject.createImmutable("");__ref.setField("_mac_impresora",c_cliente._mac_impresora); - //BA.debugLineNum = 33;BA.debugLine="Dim c As Cursor"; -c_cliente._c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_c",c_cliente._c); - //BA.debugLineNum = 34;BA.debugLine="Dim s As Cursor"; -c_cliente._s = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_s",c_cliente._s); - //BA.debugLineNum = 35;BA.debugLine="Dim DD As Cursor"; -c_cliente._dd = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_dd",c_cliente._dd); - //BA.debugLineNum = 36;BA.debugLine="Dim c2 As Cursor"; -c_cliente._c2 = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_c2",c_cliente._c2); - //BA.debugLineNum = 37;BA.debugLine="Dim ListView1 As ListView"; -c_cliente._listview1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ListViewWrapper");__ref.setField("_listview1",c_cliente._listview1); - //BA.debugLineNum = 38;BA.debugLine="Dim la_cuenta As Label"; -c_cliente._la_cuenta = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_la_cuenta",c_cliente._la_cuenta); - //BA.debugLineNum = 39;BA.debugLine="Dim La_nombre As Label"; -c_cliente._la_nombre = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_la_nombre",c_cliente._la_nombre); - //BA.debugLineNum = 40;BA.debugLine="Dim la_Calle As Label"; -c_cliente._la_calle = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_la_calle",c_cliente._la_calle); - //BA.debugLineNum = 41;BA.debugLine="Dim la_numero As Label"; -c_cliente._la_numero = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_la_numero",c_cliente._la_numero); - //BA.debugLineNum = 42;BA.debugLine="Dim la_nint As Label"; -c_cliente._la_nint = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_la_nint",c_cliente._la_nint); - //BA.debugLineNum = 43;BA.debugLine="Dim la_edo As Label"; -c_cliente._la_edo = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_la_edo",c_cliente._la_edo); - //BA.debugLineNum = 44;BA.debugLine="Dim la_pob As Label"; -c_cliente._la_pob = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_la_pob",c_cliente._la_pob); - //BA.debugLineNum = 45;BA.debugLine="Dim la_col As Label"; -c_cliente._la_col = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_la_col",c_cliente._la_col); - //BA.debugLineNum = 46;BA.debugLine="Dim la_cp As Label"; -c_cliente._la_cp = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_la_cp",c_cliente._la_cp); - //BA.debugLineNum = 47;BA.debugLine="Dim la_zona As Label"; -c_cliente._la_zona = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_la_zona",c_cliente._la_zona); - //BA.debugLineNum = 48;BA.debugLine="Dim gest As Button"; -c_cliente._gest = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_gest",c_cliente._gest); - //BA.debugLineNum = 49;BA.debugLine="Dim la_saldotot As Label"; -c_cliente._la_saldotot = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_la_saldotot",c_cliente._la_saldotot); - //BA.debugLineNum = 50;BA.debugLine="Dim la_saldooper As Label"; -c_cliente._la_saldooper = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_la_saldooper",c_cliente._la_saldooper); - //BA.debugLineNum = 52;BA.debugLine="Dim Tels As Button"; -c_cliente._tels = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_tels",c_cliente._tels); - //BA.debugLineNum = 53;BA.debugLine="Dim Label10 As Label"; -c_cliente._label10 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_label10",c_cliente._label10); - //BA.debugLineNum = 54;BA.debugLine="Dim Label11 As Label"; -c_cliente._label11 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_label11",c_cliente._label11); - //BA.debugLineNum = 56;BA.debugLine="Dim Tar As Button"; -c_cliente._tar = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_tar",c_cliente._tar); - //BA.debugLineNum = 58;BA.debugLine="Dim la_comm As Label"; -c_cliente._la_comm = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_la_comm",c_cliente._la_comm); - //BA.debugLineNum = 59;BA.debugLine="Dim la_actdte As Label"; -c_cliente._la_actdte = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_la_actdte",c_cliente._la_actdte); - //BA.debugLineNum = 60;BA.debugLine="Dim la_usuario As Label"; -c_cliente._la_usuario = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_la_usuario",c_cliente._la_usuario); - //BA.debugLineNum = 61;BA.debugLine="Dim la_resultado As Label"; -c_cliente._la_resultado = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_la_resultado",c_cliente._la_resultado); - //BA.debugLineNum = 62;BA.debugLine="Dim l_entre1 As Label"; -c_cliente._l_entre1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_entre1",c_cliente._l_entre1); - //BA.debugLineNum = 63;BA.debugLine="Dim l_entre2 As Label"; -c_cliente._l_entre2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_entre2",c_cliente._l_entre2); - //BA.debugLineNum = 64;BA.debugLine="Dim l_atiende As Label"; -c_cliente._l_atiende = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_atiende",c_cliente._l_atiende); - //BA.debugLineNum = 65;BA.debugLine="Dim l_atiende2 As Label"; -c_cliente._l_atiende2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_atiende2",c_cliente._l_atiende2); - //BA.debugLineNum = 66;BA.debugLine="Dim DATOS As Button"; -c_cliente._datos = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_datos",c_cliente._datos); - //BA.debugLineNum = 67;BA.debugLine="Dim Guardar As Button"; -c_cliente._guardar = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_guardar",c_cliente._guardar); - //BA.debugLineNum = 68;BA.debugLine="Dim NUEVO As Button"; -c_cliente._nuevo = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_nuevo",c_cliente._nuevo); - //BA.debugLineNum = 71;BA.debugLine="Dim l_total As Label"; -c_cliente._l_total = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_total",c_cliente._l_total); - //BA.debugLineNum = 72;BA.debugLine="Dim c2 As Cursor"; -c_cliente._c2 = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_c2",c_cliente._c2); - //BA.debugLineNum = 73;BA.debugLine="Dim S2 As Cursor"; -c_cliente._s2 = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_s2",c_cliente._s2); - //BA.debugLineNum = 74;BA.debugLine="Private s As Cursor"; -c_cliente._s = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_s",c_cliente._s); - //BA.debugLineNum = 75;BA.debugLine="Dim res As String"; -c_cliente._res = RemoteObject.createImmutable("");__ref.setField("_res",c_cliente._res); - //BA.debugLineNum = 76;BA.debugLine="Private HIST As Button"; -c_cliente._hist = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_hist",c_cliente._hist); - //BA.debugLineNum = 77;BA.debugLine="Private MONTO_COMPRA As String"; -c_cliente._monto_compra = RemoteObject.createImmutable("");__ref.setField("_monto_compra",c_cliente._monto_compra); - //BA.debugLineNum = 78;BA.debugLine="Private META As String"; -c_cliente._meta = RemoteObject.createImmutable("");__ref.setField("_meta",c_cliente._meta); - //BA.debugLineNum = 79;BA.debugLine="Private META2 As String"; -c_cliente._meta2 = RemoteObject.createImmutable("");__ref.setField("_meta2",c_cliente._meta2); - //BA.debugLineNum = 80;BA.debugLine="Private VERIFICA As String"; -c_cliente._verifica = RemoteObject.createImmutable("");__ref.setField("_verifica",c_cliente._verifica); - //BA.debugLineNum = 81;BA.debugLine="Private L_QR As Label"; -c_cliente._l_qr = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_qr",c_cliente._l_qr); - //BA.debugLineNum = 82;BA.debugLine="Private BT_QR As Button"; -c_cliente._bt_qr = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_bt_qr",c_cliente._bt_qr); - //BA.debugLineNum = 84;BA.debugLine="Dim CODIGO As String"; -c_cliente._codigo = RemoteObject.createImmutable("");__ref.setField("_codigo",c_cliente._codigo); - //BA.debugLineNum = 86;BA.debugLine="Private b_mapa As Button"; -c_cliente._b_mapa = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_mapa",c_cliente._b_mapa); - //BA.debugLineNum = 87;BA.debugLine="Dim CUANTOS As String"; -c_cliente._cuantos = RemoteObject.createImmutable("");__ref.setField("_cuantos",c_cliente._cuantos); - //BA.debugLineNum = 88;BA.debugLine="Private B_IMP As Button"; -c_cliente._b_imp = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_imp",c_cliente._b_imp); - //BA.debugLineNum = 89;BA.debugLine="Dim Toggla As Toggle"; -c_cliente._toggla = RemoteObject.createNew ("com.rootsoft.togglelibrary.ToggleLibrary");__ref.setField("_toggla",c_cliente._toggla); - //BA.debugLineNum = 90;BA.debugLine="Dim tgl As Toggle"; -c_cliente._tgl = RemoteObject.createNew ("com.rootsoft.togglelibrary.ToggleLibrary");__ref.setField("_tgl",c_cliente._tgl); - //BA.debugLineNum = 91;BA.debugLine="Private Panel1 As Panel"; -c_cliente._panel1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_panel1",c_cliente._panel1); - //BA.debugLineNum = 92;BA.debugLine="Private I_COMPRA As EditText"; -c_cliente._i_compra = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");__ref.setField("_i_compra",c_cliente._i_compra); - //BA.debugLineNum = 93;BA.debugLine="Private B_GUARDA_C As Button"; -c_cliente._b_guarda_c = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_guarda_c",c_cliente._b_guarda_c); - //BA.debugLineNum = 94;BA.debugLine="Private b_venta As Button"; -c_cliente._b_venta = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_venta",c_cliente._b_venta); - //BA.debugLineNum = 95;BA.debugLine="Dim ALMACEN As String"; -c_cliente._almacen = RemoteObject.createImmutable("");__ref.setField("_almacen",c_cliente._almacen); - //BA.debugLineNum = 96;BA.debugLine="Private LA_GPS As Label"; -c_cliente._la_gps = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_la_gps",c_cliente._la_gps); - //BA.debugLineNum = 97;BA.debugLine="Private B_E_NEXT As Button"; -c_cliente._b_e_next = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_e_next",c_cliente._b_e_next); - //BA.debugLineNum = 98;BA.debugLine="Private E_RES_E As EditText"; -c_cliente._e_res_e = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");__ref.setField("_e_res_e",c_cliente._e_res_e); - //BA.debugLineNum = 99;BA.debugLine="Private t_tenc As Label"; -c_cliente._t_tenc = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_t_tenc",c_cliente._t_tenc); - //BA.debugLineNum = 100;BA.debugLine="Private Panel2 As Panel"; -c_cliente._panel2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_panel2",c_cliente._panel2); - //BA.debugLineNum = 101;BA.debugLine="Private CONTADOR_E As String"; -c_cliente._contador_e = RemoteObject.createImmutable("");__ref.setField("_contador_e",c_cliente._contador_e); - //BA.debugLineNum = 102;BA.debugLine="Private HR_RES1 As String"; -c_cliente._hr_res1 = RemoteObject.createImmutable("");__ref.setField("_hr_res1",c_cliente._hr_res1); - //BA.debugLineNum = 103;BA.debugLine="Private HR_RES2 As String"; -c_cliente._hr_res2 = RemoteObject.createImmutable("");__ref.setField("_hr_res2",c_cliente._hr_res2); - //BA.debugLineNum = 104;BA.debugLine="Private HR_RES3 As String"; -c_cliente._hr_res3 = RemoteObject.createImmutable("");__ref.setField("_hr_res3",c_cliente._hr_res3); - //BA.debugLineNum = 105;BA.debugLine="Private EXISTE As String"; -c_cliente._existe = RemoteObject.createImmutable("");__ref.setField("_existe",c_cliente._existe); - //BA.debugLineNum = 106;BA.debugLine="Private TELEFONO As String"; -c_cliente._telefono = RemoteObject.createImmutable("");__ref.setField("_telefono",c_cliente._telefono); - //BA.debugLineNum = 108;BA.debugLine="Private RB1 As RadioButton"; -c_cliente._rb1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper");__ref.setField("_rb1",c_cliente._rb1); - //BA.debugLineNum = 109;BA.debugLine="Private RB2 As RadioButton"; -c_cliente._rb2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper");__ref.setField("_rb2",c_cliente._rb2); - //BA.debugLineNum = 110;BA.debugLine="Private RB3 As RadioButton"; -c_cliente._rb3 = RemoteObject.createNew ("anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper");__ref.setField("_rb3",c_cliente._rb3); - //BA.debugLineNum = 111;BA.debugLine="Private RB4 As RadioButton"; -c_cliente._rb4 = RemoteObject.createNew ("anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper");__ref.setField("_rb4",c_cliente._rb4); - //BA.debugLineNum = 112;BA.debugLine="Private RB5 As RadioButton"; -c_cliente._rb5 = RemoteObject.createNew ("anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper");__ref.setField("_rb5",c_cliente._rb5); - //BA.debugLineNum = 114;BA.debugLine="Private stay_hh As String"; -c_cliente._stay_hh = RemoteObject.createImmutable("");__ref.setField("_stay_hh",c_cliente._stay_hh); - //BA.debugLineNum = 115;BA.debugLine="Private stay_mi As String"; -c_cliente._stay_mi = RemoteObject.createImmutable("");__ref.setField("_stay_mi",c_cliente._stay_mi); - //BA.debugLineNum = 116;BA.debugLine="Private stay_ss As String"; -c_cliente._stay_ss = RemoteObject.createImmutable("");__ref.setField("_stay_ss",c_cliente._stay_ss); - //BA.debugLineNum = 118;BA.debugLine="Private LA_GEO As Label"; -c_cliente._la_geo = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_la_geo",c_cliente._la_geo); - //BA.debugLineNum = 119;BA.debugLine="Dim result As Int"; -c_cliente._result = RemoteObject.createImmutable(0);__ref.setField("_result",c_cliente._result); - //BA.debugLineNum = 120;BA.debugLine="Private cercavalor As String"; -c_cliente._cercavalor = RemoteObject.createImmutable("");__ref.setField("_cercavalor",c_cliente._cercavalor); - //BA.debugLineNum = 121;BA.debugLine="Private LA_RUTA As String"; -c_cliente._la_ruta = RemoteObject.createImmutable("");__ref.setField("_la_ruta",c_cliente._la_ruta); - //BA.debugLineNum = 123;BA.debugLine="Private b_like As Button"; -c_cliente._b_like = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_like",c_cliente._b_like); - //BA.debugLineNum = 124;BA.debugLine="Private B_GPS As Button"; -c_cliente._b_gps = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_gps",c_cliente._b_gps); - //BA.debugLineNum = 125;BA.debugLine="Dim sc As JhsIceZxing1"; -c_cliente._sc = RemoteObject.createNew ("ice.zxing.b4aZXingLib");__ref.setField("_sc",c_cliente._sc); - //BA.debugLineNum = 126;BA.debugLine="Dim CODIGO As String"; -c_cliente._codigo = RemoteObject.createImmutable("");__ref.setField("_codigo",c_cliente._codigo); - //BA.debugLineNum = 127;BA.debugLine="Private cb_factura As CheckBox"; -c_cliente._cb_factura = RemoteObject.createNew ("anywheresoftware.b4a.objects.CompoundButtonWrapper.CheckBoxWrapper");__ref.setField("_cb_factura",c_cliente._cb_factura); - //BA.debugLineNum = 128;BA.debugLine="Private p_cbFactura As Panel"; -c_cliente._p_cbfactura = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_cbfactura",c_cliente._p_cbfactura); - //BA.debugLineNum = 129;BA.debugLine="Dim venimosDeTicketsDia As Boolean = False"; -c_cliente._venimosdeticketsdia = c_cliente.__c.getField(true,"False");__ref.setField("_venimosdeticketsdia",c_cliente._venimosdeticketsdia); - //BA.debugLineNum = 130;BA.debugLine="Private p_abono As Panel"; -c_cliente._p_abono = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_abono",c_cliente._p_abono); - //BA.debugLineNum = 131;BA.debugLine="Private et_abono As EditText"; -c_cliente._et_abono = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");__ref.setField("_et_abono",c_cliente._et_abono); - //BA.debugLineNum = 132;BA.debugLine="Private b_abono As Button"; -c_cliente._b_abono = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_abono",c_cliente._b_abono); - //BA.debugLineNum = 133;BA.debugLine="Private b_cancelar As Button"; -c_cliente._b_cancelar = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_cancelar",c_cliente._b_cancelar); - //BA.debugLineNum = 134;BA.debugLine="Private b_abono1 As Button"; -c_cliente._b_abono1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_abono1",c_cliente._b_abono1); - //BA.debugLineNum = 135;BA.debugLine="Private Label20 As Label"; -c_cliente._label20 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_label20",c_cliente._label20); - //BA.debugLineNum = 136;BA.debugLine="Private l_calle1 As Label"; -c_cliente._l_calle1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_calle1",c_cliente._l_calle1); - //BA.debugLineNum = 137;BA.debugLine="Private l_ubicacion2 As Label"; -c_cliente._l_ubicacion2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_ubicacion2",c_cliente._l_ubicacion2); - //BA.debugLineNum = 139;BA.debugLine="Dim dentroDeGeocerca As Boolean = False"; -c_cliente._dentrodegeocerca = c_cliente.__c.getField(true,"False");__ref.setField("_dentrodegeocerca",c_cliente._dentrodegeocerca); - //BA.debugLineNum = 140;BA.debugLine="Dim b_inicioFinVenta As Button"; -c_cliente._b_iniciofinventa = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_iniciofinventa",c_cliente._b_iniciofinventa); - //BA.debugLineNum = 141;BA.debugLine="Dim precision As Int = 0"; -c_cliente._precision = BA.numberCast(int.class, 0);__ref.setField("_precision",c_cliente._precision); - //BA.debugLineNum = 142;BA.debugLine="Dim motivoNoVenta, motivoNoVisita As String"; -c_cliente._motivonoventa = RemoteObject.createImmutable("");__ref.setField("_motivonoventa",c_cliente._motivonoventa); -c_cliente._motivonovisita = RemoteObject.createImmutable("");__ref.setField("_motivonovisita",c_cliente._motivonovisita); - //BA.debugLineNum = 143;BA.debugLine="Dim usuario As String = \"\""; -c_cliente._usuario = BA.ObjectToString("");__ref.setField("_usuario",c_cliente._usuario); - //BA.debugLineNum = 144;BA.debugLine="Dim Id_Almacen As String"; -c_cliente._id_almacen = RemoteObject.createImmutable("");__ref.setField("_id_almacen",c_cliente._id_almacen); - //BA.debugLineNum = 145;BA.debugLine="Dim ruta_tienda As String"; -c_cliente._ruta_tienda = RemoteObject.createImmutable("");__ref.setField("_ruta_tienda",c_cliente._ruta_tienda); - //BA.debugLineNum = 147;BA.debugLine="Private b_clinteSinVenta As Button"; -c_cliente._b_clintesinventa = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_clintesinventa",c_cliente._b_clintesinventa); - //BA.debugLineNum = 148;BA.debugLine="Private b_clienteVenta As Button"; -c_cliente._b_clienteventa = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_clienteventa",c_cliente._b_clienteventa); - //BA.debugLineNum = 149;BA.debugLine="Private p_monto_venta As Panel"; -c_cliente._p_monto_venta = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_monto_venta",c_cliente._p_monto_venta); - //BA.debugLineNum = 150;BA.debugLine="Private et_monto_venta As EditText"; -c_cliente._et_monto_venta = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");__ref.setField("_et_monto_venta",c_cliente._et_monto_venta); - //BA.debugLineNum = 151;BA.debugLine="Private b_can_monto_venta As Button"; -c_cliente._b_can_monto_venta = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_can_monto_venta",c_cliente._b_can_monto_venta); - //BA.debugLineNum = 152;BA.debugLine="Private b_gu_monto_venta As Button"; -c_cliente._b_gu_monto_venta = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_gu_monto_venta",c_cliente._b_gu_monto_venta); - //BA.debugLineNum = 153;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _datos_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("DATOS_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,456); -if (RapidSub.canDelegate("datos_click")) { return __ref.runUserSub(false, "c_cliente","datos_click", __ref);} - BA.debugLineNum = 456;BA.debugLine="Sub DATOS_Click"; -Debug.ShouldStop(128); - BA.debugLineNum = 457;BA.debugLine="B4XPages.ShowPage(\"telefonos\")"; -Debug.ShouldStop(256); -c_cliente._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("telefonos"))); - BA.debugLineNum = 458;BA.debugLine="End Sub"; -Debug.ShouldStop(512); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _gest_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("gest_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,409); -if (RapidSub.canDelegate("gest_click")) { return __ref.runUserSub(false, "c_cliente","gest_click", __ref);} - BA.debugLineNum = 409;BA.debugLine="Sub gest_Click"; -Debug.ShouldStop(16777216); - BA.debugLineNum = 410;BA.debugLine="B4XPages.MainPage.tipo_venta = \"PREVENTA\""; -Debug.ShouldStop(33554432); -c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).setField ("_tipo_venta" /*RemoteObject*/ ,BA.ObjectToString("PREVENTA")); - BA.debugLineNum = 415;BA.debugLine="B4XPages.ShowPage(\"productos\")"; -Debug.ShouldStop(1073741824); -c_cliente._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("productos"))); - BA.debugLineNum = 416;BA.debugLine="End Sub"; -Debug.ShouldStop(-2147483648); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _gps_locationchanged(RemoteObject __ref,RemoteObject _location1) throws Exception{ -try { - Debug.PushSubsStack("GPS_LocationChanged (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,360); -if (RapidSub.canDelegate("gps_locationchanged")) { return __ref.runUserSub(false, "c_cliente","gps_locationchanged", __ref, _location1);} -RemoteObject _l1 = RemoteObject.declareNull("anywheresoftware.b4a.gps.LocationWrapper"); -RemoteObject _l2 = RemoteObject.declareNull("anywheresoftware.b4a.gps.LocationWrapper"); -RemoteObject _distance = RemoteObject.createImmutable(0L); -Debug.locals.put("Location1", _location1); - BA.debugLineNum = 360;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; -Debug.ShouldStop(128); - BA.debugLineNum = 362;BA.debugLine="If Tracker.FLP.GetLastKnownLocation.IsInitialized"; -Debug.ShouldStop(512); -if (RemoteObject.solveBoolean(".",c_cliente._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation").runMethod(true,"IsInitialized")) && RemoteObject.solveBoolean("!",c_cliente._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation").runMethod(true,"getLatitude"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 363;BA.debugLine="B4XPages.MainPage.lat_gps = Tracker.FLP.GetLastK"; -Debug.ShouldStop(1024); -c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).setField ("_lat_gps" /*RemoteObject*/ ,BA.NumberToString(c_cliente._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation").runMethod(true,"getLatitude"))); - BA.debugLineNum = 364;BA.debugLine="B4XPages.MainPage.lon_gps = Tracker.FLP.GetLastK"; -Debug.ShouldStop(2048); -c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).setField ("_lon_gps" /*RemoteObject*/ ,BA.NumberToString(c_cliente._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation").runMethod(true,"getLongitude"))); - }; - BA.debugLineNum = 368;BA.debugLine="Dim l1, l2 As Location"; -Debug.ShouldStop(32768); -_l1 = RemoteObject.createNew ("anywheresoftware.b4a.gps.LocationWrapper");Debug.locals.put("l1", _l1); -_l2 = RemoteObject.createNew ("anywheresoftware.b4a.gps.LocationWrapper");Debug.locals.put("l2", _l2); - BA.debugLineNum = 369;BA.debugLine="l1.Initialize2(B4XPages.MainPage.lat_gps, B4XPage"; -Debug.ShouldStop(65536); -_l1.runVoidMethod ("Initialize2",(Object)(c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ )),(Object)(c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lon_gps" /*RemoteObject*/ ))); - BA.debugLineNum = 371;BA.debugLine="l2.Initialize2(m_lat, m_lon)"; -Debug.ShouldStop(262144); -_l2.runVoidMethod ("Initialize2",(Object)(__ref.getField(true,"_m_lat" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_m_lon" /*RemoteObject*/ ))); - BA.debugLineNum = 373;BA.debugLine="BT_QR.Enabled = True"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_bt_qr" /*RemoteObject*/ ).runMethod(true,"setEnabled",c_cliente.__c.getField(true,"True")); - BA.debugLineNum = 374;BA.debugLine="LA_GPS.TextColor = Colors.Blue"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_la_gps" /*RemoteObject*/ ).runMethod(true,"setTextColor",c_cliente.__c.getField(false,"Colors").getField(true,"Blue")); - BA.debugLineNum = 375;BA.debugLine="LA_GPS.Text = \"CON UBICACION GPS\""; -Debug.ShouldStop(4194304); -__ref.getField(false,"_la_gps" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("CON UBICACION GPS")); - BA.debugLineNum = 376;BA.debugLine="b_clinteSinVenta.Enabled = True"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_b_clintesinventa" /*RemoteObject*/ ).runMethod(true,"setEnabled",c_cliente.__c.getField(true,"True")); - BA.debugLineNum = 377;BA.debugLine="b_clienteVenta.Enabled = True"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_b_clienteventa" /*RemoteObject*/ ).runMethod(true,"setEnabled",c_cliente.__c.getField(true,"True")); - BA.debugLineNum = 380;BA.debugLine="Dim distance As Long"; -Debug.ShouldStop(134217728); -_distance = RemoteObject.createImmutable(0L);Debug.locals.put("distance", _distance); - BA.debugLineNum = 381;BA.debugLine="distance = l1.DistanceTo(l2) 'the result is i"; -Debug.ShouldStop(268435456); -_distance = BA.numberCast(long.class, _l1.runMethod(true,"DistanceTo",(Object)((_l2.getObject()))));Debug.locals.put("distance", _distance); - BA.debugLineNum = 382;BA.debugLine="gest.Visible = False"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_gest" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False")); - BA.debugLineNum = 384;BA.debugLine="LA_GEO.TextColor = Colors.Blue"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_la_geo" /*RemoteObject*/ ).runMethod(true,"setTextColor",c_cliente.__c.getField(false,"Colors").getField(true,"Blue")); - BA.debugLineNum = 385;BA.debugLine="Tels.Visible = False"; -Debug.ShouldStop(1); -__ref.getField(false,"_tels" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False")); - BA.debugLineNum = 386;BA.debugLine="gest.Visible = False"; -Debug.ShouldStop(2); -__ref.getField(false,"_gest" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"False")); - BA.debugLineNum = 390;BA.debugLine="LA_GEO.Text= $\"$1.2{distance/1000} kms\"$"; -Debug.ShouldStop(32); -__ref.getField(false,"_la_geo" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable(""),c_cliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("1.2")),(Object)((RemoteObject.solve(new RemoteObject[] {_distance,RemoteObject.createImmutable(1000)}, "/",0, 0)))),RemoteObject.createImmutable(" kms"))))); - BA.debugLineNum = 391;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FROM"; -Debug.ShouldStop(64); -c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("DELETE FROM HIST_GPS"))); - BA.debugLineNum = 392;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; -Debug.ShouldStop(128); -c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO HIST_GPS (HGDATE, HGLAT, HGLON) VALUES(?,?,?) ")),(Object)(c_cliente.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {3},new Object[] {(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ )),(c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lon_gps" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 394;BA.debugLine="l_ubicacion2.TextSize = 13"; -Debug.ShouldStop(512); -__ref.getField(false,"_l_ubicacion2" /*RemoteObject*/ ).runMethod(true,"setTextSize",BA.numberCast(float.class, 13)); - BA.debugLineNum = 395;BA.debugLine="l_ubicacion2.Text = $\"Precisión GPS $1.0{Location"; -Debug.ShouldStop(1024); -__ref.getField(false,"_l_ubicacion2" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("Precisión GPS "),c_cliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("1.0")),(Object)((_location1.runMethod(true,"getAccuracy")))),RemoteObject.createImmutable(" m"))))); - BA.debugLineNum = 396;BA.debugLine="If Location1.Accuracy > 200 Then"; -Debug.ShouldStop(2048); -if (RemoteObject.solveBoolean(">",_location1.runMethod(true,"getAccuracy"),BA.numberCast(double.class, 200))) { - BA.debugLineNum = 397;BA.debugLine="l_ubicacion2.TextColor = Colors.Red"; -Debug.ShouldStop(4096); -__ref.getField(false,"_l_ubicacion2" /*RemoteObject*/ ).runMethod(true,"setTextColor",c_cliente.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 398;BA.debugLine="l_ubicacion2.TextSize = 16"; -Debug.ShouldStop(8192); -__ref.getField(false,"_l_ubicacion2" /*RemoteObject*/ ).runMethod(true,"setTextSize",BA.numberCast(float.class, 16)); - BA.debugLineNum = 399;BA.debugLine="l_ubicacion2.Text = $\"Mala señal $1.0{Location1."; -Debug.ShouldStop(16384); -__ref.getField(false,"_l_ubicacion2" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("Mala señal "),c_cliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("1.0")),(Object)((_location1.runMethod(true,"getAccuracy")))),RemoteObject.createImmutable(" m"))))); - }; - BA.debugLineNum = 402;BA.debugLine="CallSubDelayed(Tracker, \"CreateLocationRequest\")"; -Debug.ShouldStop(131072); -c_cliente.__c.runVoidMethod ("CallSubDelayed",__ref.getField(false, "ba"),(Object)((c_cliente._tracker.getObject())),(Object)(RemoteObject.createImmutable("CreateLocationRequest"))); - BA.debugLineNum = 403;BA.debugLine="End Sub"; -Debug.ShouldStop(262144); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _guardar_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Guardar_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,460); -if (RapidSub.canDelegate("guardar_click")) { return __ref.runUserSub(false, "c_cliente","guardar_click", __ref);} - BA.debugLineNum = 460;BA.debugLine="Sub Guardar_Click"; -Debug.ShouldStop(2048); - BA.debugLineNum = 461;BA.debugLine="b_inicioFinVenta.Text = \"FIN VENTA\""; -Debug.ShouldStop(4096); -__ref.getField(false,"_b_iniciofinventa" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("FIN VENTA")); - BA.debugLineNum = 462;BA.debugLine="b_inicioFinVenta.Visible = True"; -Debug.ShouldStop(8192); -__ref.getField(false,"_b_iniciofinventa" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"True")); - BA.debugLineNum = 463;BA.debugLine="End Sub"; -Debug.ShouldStop(16384); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _guardar2_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Guardar2_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,465); -if (RapidSub.canDelegate("guardar2_click")) { return __ref.runUserSub(false, "c_cliente","guardar2_click", __ref);} - BA.debugLineNum = 465;BA.debugLine="Sub Guardar2_Click"; -Debug.ShouldStop(65536); - BA.debugLineNum = 537;BA.debugLine="End Sub"; -Debug.ShouldStop(16777216); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _hist_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("HIST_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,543); -if (RapidSub.canDelegate("hist_click")) { return __ref.runUserSub(false, "c_cliente","hist_click", __ref);} - BA.debugLineNum = 543;BA.debugLine="Sub HIST_Click"; -Debug.ShouldStop(1073741824); - BA.debugLineNum = 544;BA.debugLine="B4XPages.ShowPage(\"Historico\")"; -Debug.ShouldStop(-2147483648); -c_cliente._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Historico"))); - BA.debugLineNum = 545;BA.debugLine="End Sub"; -Debug.ShouldStop(1); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,156); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "c_cliente","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 156;BA.debugLine="Public Sub Initialize As Object"; -Debug.ShouldStop(134217728); - BA.debugLineNum = 157;BA.debugLine="Return Me"; -Debug.ShouldStop(268435456); -if (true) return __ref; - BA.debugLineNum = 158;BA.debugLine="End Sub"; -Debug.ShouldStop(536870912); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _jobdone(RemoteObject __ref,RemoteObject _job) throws Exception{ -try { - Debug.PushSubsStack("JobDone (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,893); -if (RapidSub.canDelegate("jobdone")) { return __ref.runUserSub(false, "c_cliente","jobdone", __ref, _job);} -RemoteObject _resultado = RemoteObject.declareNull("keymon.lat.medicomed.dbrequestmanager._dbresult"); -RemoteObject _cliente = RemoteObject.createImmutable(""); -RemoteObject _records = null; -RemoteObject _k = RemoteObject.createImmutable(""); -Debug.locals.put("Job", _job); - BA.debugLineNum = 893;BA.debugLine="Sub JobDone(Job As HttpJob)"; -Debug.ShouldStop(268435456); - BA.debugLineNum = 894;BA.debugLine="Log(Job.Success)"; -Debug.ShouldStop(536870912); -c_cliente.__c.runVoidMethod ("LogImpl","37536641",BA.ObjectToString(_job.getField(true,"_success" /*RemoteObject*/ )),0); - BA.debugLineNum = 895;BA.debugLine="If Job.Success = False Then"; -Debug.ShouldStop(1073741824); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_success" /*RemoteObject*/ ),c_cliente.__c.getField(true,"False"))) { - }else { - BA.debugLineNum = 898;BA.debugLine="LogColor(\"JobDone: '\" & reqManager.HandleJob(Job"; -Debug.ShouldStop(2); -c_cliente.__c.runVoidMethod ("LogImpl","37536645",RemoteObject.concat(RemoteObject.createImmutable("JobDone: '"),__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job)).getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable("' - Registros: "),__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job)).getField(false,"Rows" /*RemoteObject*/ ).runMethod(true,"getSize")),c_cliente.__c.getField(false,"Colors").getField(true,"Green")); - BA.debugLineNum = 899;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(4); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 900;BA.debugLine="Dim resultado As DBResult = reqManager.HandleJo"; -Debug.ShouldStop(8); -_resultado = __ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("resultado", _resultado);Debug.locals.put("resultado", _resultado); - BA.debugLineNum = 901;BA.debugLine="If resultado.Tag.As(String).IndexOf(\"ins_pedido"; -Debug.ShouldStop(16); -if (RemoteObject.solveBoolean(">",(BA.ObjectToString(_resultado.getField(false,"Tag" /*RemoteObject*/ ))).runMethod(true,"indexOf",(Object)(RemoteObject.createImmutable("ins_pedidosPendientes_head_"))),BA.numberCast(double.class, -(double) (0 + 1)))) { - BA.debugLineNum = 902;BA.debugLine="Private cliente As String= resultado.Tag"; -Debug.ShouldStop(32); -_cliente = BA.ObjectToString(_resultado.getField(false,"Tag" /*RemoteObject*/ ));Debug.locals.put("cliente", _cliente);Debug.locals.put("cliente", _cliente); - BA.debugLineNum = 903;BA.debugLine="cliente = cliente.SubString(cliente.IndexOf(\"_"; -Debug.ShouldStop(64); -_cliente = _cliente.runMethod(true,"substring",(Object)(RemoteObject.solve(new RemoteObject[] {_cliente.runMethod(true,"indexOf",(Object)(RemoteObject.createImmutable("_"))),RemoteObject.createImmutable(24)}, "+",1, 1)));Debug.locals.put("cliente", _cliente); - BA.debugLineNum = 904;BA.debugLine="Log($\"Cliente1:${cliente}\"$)"; -Debug.ShouldStop(128); -c_cliente.__c.runVoidMethod ("LogImpl","37536651",(RemoteObject.concat(RemoteObject.createImmutable("Cliente1:"),c_cliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_cliente))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 905;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update P"; -Debug.ShouldStop(256); -c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("update PEDIDO_CLIENTE SET pc_envio_ok = ? WHERE PC_CLIENTE = ? AND pc_envio_ok <> 1")),(Object)(c_cliente.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("String",new int[] {2},new Object[] {BA.ObjectToString("1"),_cliente}))))); - BA.debugLineNum = 906;BA.debugLine="For Each records() As Object In resultado.Rows"; -Debug.ShouldStop(512); -{ -final RemoteObject group12 = _resultado.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen12 = group12.runMethod(true,"getSize").get() -;int index12 = 0; -; -for (; index12 < groupLen12;index12++){ -_records = (group12.runMethod(false,"Get",index12));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 907;BA.debugLine="For Each k As String In resultado.Columns.Key"; -Debug.ShouldStop(1024); -{ -final RemoteObject group13 = _resultado.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Keys"); -final int groupLen13 = group13.runMethod(true,"getSize").get() -;int index13 = 0; -; -for (; index13 < groupLen13;index13++){ -_k = BA.ObjectToString(group13.runMethod(false,"Get",index13));Debug.locals.put("k", _k); -Debug.locals.put("k", _k); - BA.debugLineNum = 908;BA.debugLine="Log(resultado.Tag & \": \" & k & \": \" & record"; -Debug.ShouldStop(2048); -c_cliente.__c.runVoidMethod ("LogImpl","37536655",RemoteObject.concat(_resultado.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(": "),_k,RemoteObject.createImmutable(": "),_records.getArrayElement(false,BA.numberCast(int.class, _resultado.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((_k)))))),0); - } -}Debug.locals.put("k", _k); -; - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 914;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(131072); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 915;BA.debugLine="Dim resultado As DBResult = reqManager.HandleJo"; -Debug.ShouldStop(262144); -_resultado = __ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("resultado", _resultado);Debug.locals.put("resultado", _resultado); - BA.debugLineNum = 916;BA.debugLine="If resultado.Tag.As(String).IndexOf(\"ins_pedido"; -Debug.ShouldStop(524288); -if (RemoteObject.solveBoolean(">",(BA.ObjectToString(_resultado.getField(false,"Tag" /*RemoteObject*/ ))).runMethod(true,"indexOf",(Object)(RemoteObject.createImmutable("ins_pedidosPendientes_prods_"))),BA.numberCast(double.class, -(double) (0 + 1)))) { - BA.debugLineNum = 917;BA.debugLine="Private cliente As String= resultado.Tag"; -Debug.ShouldStop(1048576); -_cliente = BA.ObjectToString(_resultado.getField(false,"Tag" /*RemoteObject*/ ));Debug.locals.put("cliente", _cliente);Debug.locals.put("cliente", _cliente); - BA.debugLineNum = 918;BA.debugLine="cliente = cliente.SubString(cliente.IndexOf(\"_"; -Debug.ShouldStop(2097152); -_cliente = _cliente.runMethod(true,"substring",(Object)(RemoteObject.solve(new RemoteObject[] {_cliente.runMethod(true,"indexOf",(Object)(RemoteObject.createImmutable("_"))),RemoteObject.createImmutable(25)}, "+",1, 1)));Debug.locals.put("cliente", _cliente); - BA.debugLineNum = 919;BA.debugLine="Log($\"Cliente2:${cliente}\"$)"; -Debug.ShouldStop(4194304); -c_cliente.__c.runVoidMethod ("LogImpl","37536666",(RemoteObject.concat(RemoteObject.createImmutable("Cliente2:"),c_cliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_cliente))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 920;BA.debugLine="For Each records() As Object In resultado.Rows"; -Debug.ShouldStop(8388608); -{ -final RemoteObject group25 = _resultado.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen25 = group25.runMethod(true,"getSize").get() -;int index25 = 0; -; -for (; index25 < groupLen25;index25++){ -_records = (group25.runMethod(false,"Get",index25));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 921;BA.debugLine="For Each k As String In resultado.Columns.Key"; -Debug.ShouldStop(16777216); -{ -final RemoteObject group26 = _resultado.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Keys"); -final int groupLen26 = group26.runMethod(true,"getSize").get() -;int index26 = 0; -; -for (; index26 < groupLen26;index26++){ -_k = BA.ObjectToString(group26.runMethod(false,"Get",index26));Debug.locals.put("k", _k); -Debug.locals.put("k", _k); - BA.debugLineNum = 922;BA.debugLine="Log(resultado.Tag & \": \" & k & \": \" & record"; -Debug.ShouldStop(33554432); -c_cliente.__c.runVoidMethod ("LogImpl","37536669",RemoteObject.concat(_resultado.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(": "),_k,RemoteObject.createImmutable(": "),_records.getArrayElement(false,BA.numberCast(int.class, _resultado.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((_k)))))),0); - } -}Debug.locals.put("k", _k); -; - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 928;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(-2147483648); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 929;BA.debugLine="Dim resultado As DBResult = reqManager.HandleJo"; -Debug.ShouldStop(1); -_resultado = __ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("resultado", _resultado);Debug.locals.put("resultado", _resultado); - BA.debugLineNum = 930;BA.debugLine="If resultado.Tag.As(String).IndexOf(\"ins_abonos"; -Debug.ShouldStop(2); -if (RemoteObject.solveBoolean(">",(BA.ObjectToString(_resultado.getField(false,"Tag" /*RemoteObject*/ ))).runMethod(true,"indexOf",(Object)(RemoteObject.createImmutable("ins_abonosPendientes_"))),BA.numberCast(double.class, -(double) (0 + 1)))) { - BA.debugLineNum = 931;BA.debugLine="Private cliente As String= resultado.Tag"; -Debug.ShouldStop(4); -_cliente = BA.ObjectToString(_resultado.getField(false,"Tag" /*RemoteObject*/ ));Debug.locals.put("cliente", _cliente);Debug.locals.put("cliente", _cliente); - BA.debugLineNum = 932;BA.debugLine="cliente = cliente.SubString(cliente.IndexOf(\"_"; -Debug.ShouldStop(8); -_cliente = _cliente.runMethod(true,"substring",(Object)(RemoteObject.solve(new RemoteObject[] {_cliente.runMethod(true,"indexOf",(Object)(RemoteObject.createImmutable("_"))),RemoteObject.createImmutable(18)}, "+",1, 1)));Debug.locals.put("cliente", _cliente); - BA.debugLineNum = 933;BA.debugLine="Log($\"Cliente2:${cliente}\"$)"; -Debug.ShouldStop(16); -c_cliente.__c.runVoidMethod ("LogImpl","37536680",(RemoteObject.concat(RemoteObject.createImmutable("Cliente2:"),c_cliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_cliente))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 934;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"UPDATE A"; -Debug.ShouldStop(32); -c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("UPDATE ABONOS set a_enviado = 1 where a_cliente = '"),c_cliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_cliente))),RemoteObject.createImmutable("'"))))); - BA.debugLineNum = 935;BA.debugLine="For Each records() As Object In resultado.Rows"; -Debug.ShouldStop(64); -{ -final RemoteObject group39 = _resultado.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen39 = group39.runMethod(true,"getSize").get() -;int index39 = 0; -; -for (; index39 < groupLen39;index39++){ -_records = (group39.runMethod(false,"Get",index39));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 936;BA.debugLine="For Each k As String In resultado.Columns.Key"; -Debug.ShouldStop(128); -{ -final RemoteObject group40 = _resultado.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Keys"); -final int groupLen40 = group40.runMethod(true,"getSize").get() -;int index40 = 0; -; -for (; index40 < groupLen40;index40++){ -_k = BA.ObjectToString(group40.runMethod(false,"Get",index40));Debug.locals.put("k", _k); -Debug.locals.put("k", _k); - BA.debugLineNum = 937;BA.debugLine="Log(resultado.Tag & \": \" & k & \": \" & record"; -Debug.ShouldStop(256); -c_cliente.__c.runVoidMethod ("LogImpl","37536684",RemoteObject.concat(_resultado.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(": "),_k,RemoteObject.createImmutable(": "),_records.getArrayElement(false,BA.numberCast(int.class, _resultado.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((_k)))))),0); - } -}Debug.locals.put("k", _k); -; - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 942;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(8192); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 943;BA.debugLine="Dim resultado As DBResult = reqManager.HandleJo"; -Debug.ShouldStop(16384); -_resultado = __ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("resultado", _resultado);Debug.locals.put("resultado", _resultado); - BA.debugLineNum = 944;BA.debugLine="If resultado.Tag= \"mandaBitacora\" Then"; -Debug.ShouldStop(32768); -if (RemoteObject.solveBoolean("=",_resultado.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("mandaBitacora")))) { - BA.debugLineNum = 945;BA.debugLine="Log(\"mandaBitacora\")"; -Debug.ShouldStop(65536); -c_cliente.__c.runVoidMethod ("LogImpl","37536692",RemoteObject.createImmutable("mandaBitacora"),0); - }; - }; - BA.debugLineNum = 948;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(524288); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 949;BA.debugLine="Dim resultado As DBResult = reqManager.HandleJo"; -Debug.ShouldStop(1048576); -_resultado = __ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("resultado", _resultado);Debug.locals.put("resultado", _resultado); - BA.debugLineNum = 950;BA.debugLine="If resultado.Tag= \"ventaNoVenta\" Then"; -Debug.ShouldStop(2097152); -if (RemoteObject.solveBoolean("=",_resultado.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("ventaNoVenta")))) { - BA.debugLineNum = 951;BA.debugLine="Log(\"ventaNoVenta\")"; -Debug.ShouldStop(4194304); -c_cliente.__c.runVoidMethod ("LogImpl","37536698",RemoteObject.createImmutable("ventaNoVenta"),0); - }; - }; - BA.debugLineNum = 954;BA.debugLine="Job.Release"; -Debug.ShouldStop(33554432); -_job.runClassMethod (keymon.lat.medicomed.httpjob.class, "_release" /*RemoteObject*/ ); - }; - BA.debugLineNum = 957;BA.debugLine="End Sub"; -Debug.ShouldStop(268435456); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _listview1_itemlongclick(RemoteObject __ref,RemoteObject _position,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("ListView1_ItemLongClick (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,405); -if (RapidSub.canDelegate("listview1_itemlongclick")) { return __ref.runUserSub(false, "c_cliente","listview1_itemlongclick", __ref, _position, _value);} -Debug.locals.put("Position", _position); -Debug.locals.put("Value", _value); - BA.debugLineNum = 405;BA.debugLine="Sub ListView1_ItemLongClick (Position As Int, Valu"; -Debug.ShouldStop(1048576); - BA.debugLineNum = 407;BA.debugLine="End Sub"; -Debug.ShouldStop(4194304); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _mandapendientes(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("mandaPendientes (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,819); -if (RapidSub.canDelegate("mandapendientes")) { return __ref.runUserSub(false, "c_cliente","mandapendientes", __ref);} -int _i = 0; -RemoteObject _ab = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); - BA.debugLineNum = 819;BA.debugLine="Sub mandaPendientes"; -Debug.ShouldStop(262144); - BA.debugLineNum = 821;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT PC_CLI"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("SELECT PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT, PC_COSTO_SIN, PC_RUTA, PC_ALMACEN, PC_FACTURA FROM PEDIDO_CLIENTE where pc_envio_ok <> 1")))); - BA.debugLineNum = 823;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(4194304); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 824;BA.debugLine="For i=0 To c.RowCount -1"; -Debug.ShouldStop(8388608); -{ -final int step3 = 1; -final int limit3 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step3 > 0 && _i <= limit3) || (step3 < 0 && _i >= limit3) ;_i = ((int)(0 + _i + step3)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 825;BA.debugLine="c.Position=i"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 826;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(33554432); -c_cliente._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",c_cliente._cmd); - BA.debugLineNum = 832;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(-2147483648); -c_cliente._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",c_cliente._cmd); - BA.debugLineNum = 833;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(1); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 834;BA.debugLine="cmd.Name = \"insert_pedidos_MEDI\""; -Debug.ShouldStop(2); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("insert_pedidos_MEDI")); - BA.debugLineNum = 835;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\"P"; -Debug.ShouldStop(4); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {11},new Object[] {(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_CLIENTE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_FECHA")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_USER")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_NOART")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_MONTO")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_LON")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_LAT")))),(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_principal" /*RemoteObject*/ ).getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_COSTO_SIN")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_FACTURA"))))})); - BA.debugLineNum = 836;BA.debugLine="reqManager.ExecuteCommand(cmd , $\"ins_pedidosPe"; -Debug.ShouldStop(8); -__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(((RemoteObject.concat(RemoteObject.createImmutable("ins_pedidosPendientes_head_"),c_cliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_CLIENTE")))))),RemoteObject.createImmutable("")))))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 841;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT PC_ENV"; -Debug.ShouldStop(256); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("SELECT PC_ENVIO_OK, PE_CEDIS, PE_COSTO_TOT, PE_COSTOU, PE_CANT, PE_PRONOMBRE, PE_PROID, PE_CLIENTE, PE_FECHA, PE_USUARIO, PE_COSTO_SIN, PE_RUTA, PE_DESC, PE_FOLIO FROM pedido_cliente left join PEDIDO where pc_cliente = pe_cliente and pc_envio_ok <> 1")))); - BA.debugLineNum = 843;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 844;BA.debugLine="For i=0 To c.RowCount -1"; -Debug.ShouldStop(2048); -{ -final int step15 = 1; -final int limit15 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step15 > 0 && _i <= limit15) || (step15 < 0 && _i >= limit15) ;_i = ((int)(0 + _i + step15)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 845;BA.debugLine="c.Position=i"; -Debug.ShouldStop(4096); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 846;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(8192); -c_cliente._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",c_cliente._cmd); - BA.debugLineNum = 853;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 854;BA.debugLine="cmd.Name = \"insert_pedido_MEDI\""; -Debug.ShouldStop(2097152); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("insert_pedido_MEDI")); - BA.debugLineNum = 855;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\"P"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {14},new Object[] {(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CEDIS")))),(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_COSTO_TOT")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_COSTOU")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CANT")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_PRONOMBRE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_PROID")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CLIENTE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_FECHA")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_USUARIO")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_RUTA")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_COSTO_SIN")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_DESC")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_FOLIO"))))})); - BA.debugLineNum = 856;BA.debugLine="reqManager.ExecuteCommand(cmd , $\"ins_pedidosPe"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(((RemoteObject.concat(RemoteObject.createImmutable("ins_pedidosPendientes_prods_"),c_cliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CLIENTE")))))),RemoteObject.createImmutable("")))))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 861;BA.debugLine="Dim ab As Cursor = B4XPages.MainPage.skmt.ExecQue"; -Debug.ShouldStop(268435456); -_ab = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -_ab = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), c_cliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)((RemoteObject.createImmutable("SELECT * from ABONOS where a_enviado is null")))));Debug.locals.put("ab", _ab);Debug.locals.put("ab", _ab); - BA.debugLineNum = 863;BA.debugLine="If ab.RowCount > 0 Then"; -Debug.ShouldStop(1073741824); -if (RemoteObject.solveBoolean(">",_ab.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 864;BA.debugLine="For i=0 To ab.RowCount -1"; -Debug.ShouldStop(-2147483648); -{ -final int step26 = 1; -final int limit26 = RemoteObject.solve(new RemoteObject[] {_ab.runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step26 > 0 && _i <= limit26) || (step26 < 0 && _i >= limit26) ;_i = ((int)(0 + _i + step26)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 865;BA.debugLine="ab.Position = i"; -Debug.ShouldStop(1); -_ab.runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 866;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(2); -c_cliente._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",c_cliente._cmd); - BA.debugLineNum = 867;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(4); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 868;BA.debugLine="cmd.Name = \"insert_abono_MEDI\""; -Debug.ShouldStop(8); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("insert_abono_MEDI")); - BA.debugLineNum = 869;BA.debugLine="cmd.Parameters = Array As Object( ab.GetString("; -Debug.ShouldStop(16); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {5},new Object[] {(_ab.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("a_usuario")))),(_ab.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("a_ruta")))),(_ab.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("a_cliente")))),(_ab.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("a_abono")))),(_ab.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("a_fecha"))))})); - BA.debugLineNum = 870;BA.debugLine="reqManager.ExecuteCommand(cmd , $\"ins_abonosPen"; -Debug.ShouldStop(32); -__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(((RemoteObject.concat(RemoteObject.createImmutable("ins_abonosPendientes_"),c_cliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_ab.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("a_cliente")))))),RemoteObject.createImmutable("")))))); - BA.debugLineNum = 871;BA.debugLine="Log($\"ins_abonosPendientes_${ab.GetString(\"a_cl"; -Debug.ShouldStop(64); -c_cliente.__c.runVoidMethod ("LogImpl","37471156",(RemoteObject.concat(RemoteObject.createImmutable("ins_abonosPendientes_"),c_cliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_ab.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("a_cliente")))))),RemoteObject.createImmutable(""))),0); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 874;BA.debugLine="ab.Close"; -Debug.ShouldStop(512); -_ab.runVoidMethod ("Close"); - BA.debugLineNum = 891;BA.debugLine="End Sub"; -Debug.ShouldStop(67108864); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _mods(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("MODS (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,1); -if (RapidSub.canDelegate("mods")) { return __ref.runUserSub(false, "c_cliente","mods", __ref);} - BA.debugLineNum = 1;BA.debugLine="Sub MODS 'ignore"; -Debug.ShouldStop(1); - BA.debugLineNum = 3;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _nuevo_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("NUEVO_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,539); -if (RapidSub.canDelegate("nuevo_click")) { return __ref.runUserSub(false, "c_cliente","nuevo_click", __ref);} - BA.debugLineNum = 539;BA.debugLine="Sub NUEVO_Click"; -Debug.ShouldStop(67108864); - BA.debugLineNum = 540;BA.debugLine="B4XPages.ShowPage(\"NuevoCliente\")"; -Debug.ShouldStop(134217728); -c_cliente._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("NuevoCliente"))); - BA.debugLineNum = 541;BA.debugLine="End Sub"; -Debug.ShouldStop(268435456); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _p_abono_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("p_abono_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,959); -if (RapidSub.canDelegate("p_abono_click")) { return __ref.runUserSub(false, "c_cliente","p_abono_click", __ref);} - BA.debugLineNum = 959;BA.debugLine="Private Sub p_abono_Click"; -Debug.ShouldStop(1073741824); - BA.debugLineNum = 961;BA.debugLine="End Sub"; -Debug.ShouldStop(1); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _p_cliente_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("p_cliente_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,810); -if (RapidSub.canDelegate("p_cliente_click")) { return __ref.runUserSub(false, "c_cliente","p_cliente_click", __ref);} - BA.debugLineNum = 810;BA.debugLine="Private Sub p_cliente_Click"; -Debug.ShouldStop(512); - BA.debugLineNum = 812;BA.debugLine="End Sub"; -Debug.ShouldStop(2048); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _printer_connected(RemoteObject __ref,RemoteObject _success) throws Exception{ -try { - Debug.PushSubsStack("Printer_Connected (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,653); -if (RapidSub.canDelegate("printer_connected")) { return __ref.runUserSub(false, "c_cliente","printer_connected", __ref, _success);} -Debug.locals.put("Success", _success); - BA.debugLineNum = 653;BA.debugLine="Sub Printer_Connected (Success As Boolean)"; -Debug.ShouldStop(4096); - BA.debugLineNum = 654;BA.debugLine="If Success Then"; -Debug.ShouldStop(8192); -if (_success.get().booleanValue()) { - BA.debugLineNum = 655;BA.debugLine="B_IMP.Enabled = True"; -Debug.ShouldStop(16384); -__ref.getField(false,"_b_imp" /*RemoteObject*/ ).runMethod(true,"setEnabled",c_cliente.__c.getField(true,"True")); - }else { - BA.debugLineNum = 657;BA.debugLine="B_IMP.Enabled = False"; -Debug.ShouldStop(65536); -__ref.getField(false,"_b_imp" /*RemoteObject*/ ).runMethod(true,"setEnabled",c_cliente.__c.getField(true,"False")); - BA.debugLineNum = 658;BA.debugLine="If Msgbox2(\"\", \"Printer Error\",\"Reprint\",\"Cancel"; -Debug.ShouldStop(131072); -if (RemoteObject.solveBoolean("=",c_cliente.__c.runMethodAndSync(true,"Msgbox2",(Object)(BA.ObjectToCharSequence("")),(Object)(BA.ObjectToCharSequence("Printer Error")),(Object)(BA.ObjectToString("Reprint")),(Object)(BA.ObjectToString("Cancel")),(Object)(BA.ObjectToString("")),(Object)((c_cliente.__c.getField(false,"Null"))),__ref.getField(false, "ba")),BA.numberCast(double.class, c_cliente.__c.getField(false,"DialogResponse").getField(true,"POSITIVE")))) { - BA.debugLineNum = 659;BA.debugLine="StartPrinter"; -Debug.ShouldStop(262144); -__ref.runClassMethod (keymon.lat.medicomed.c_cliente.class, "_startprinter" /*RemoteObject*/ ); - }; - }; - BA.debugLineNum = 662;BA.debugLine="End Sub"; -Debug.ShouldStop(2097152); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _rb1_checkedchange(RemoteObject __ref,RemoteObject _checked) throws Exception{ -try { - Debug.PushSubsStack("RB1_CheckedChange (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,767); -if (RapidSub.canDelegate("rb1_checkedchange")) { return __ref.runUserSub(false, "c_cliente","rb1_checkedchange", __ref, _checked);} -Debug.locals.put("Checked", _checked); - BA.debugLineNum = 767;BA.debugLine="Sub RB1_CheckedChange(Checked As Boolean)"; -Debug.ShouldStop(1073741824); - BA.debugLineNum = 768;BA.debugLine="If RB1.Checked = True Then"; -Debug.ShouldStop(-2147483648); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_rb1" /*RemoteObject*/ ).runMethod(true,"getChecked"),c_cliente.__c.getField(true,"True"))) { - BA.debugLineNum = 769;BA.debugLine="E_RES_E.Text = \"CENTRAL DE ABASTOS\""; -Debug.ShouldStop(1); -__ref.getField(false,"_e_res_e" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("CENTRAL DE ABASTOS")); - }; - BA.debugLineNum = 771;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _rb2_checkedchange(RemoteObject __ref,RemoteObject _checked) throws Exception{ -try { - Debug.PushSubsStack("RB2_CheckedChange (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,773); -if (RapidSub.canDelegate("rb2_checkedchange")) { return __ref.runUserSub(false, "c_cliente","rb2_checkedchange", __ref, _checked);} -Debug.locals.put("Checked", _checked); - BA.debugLineNum = 773;BA.debugLine="Sub RB2_CheckedChange(Checked As Boolean)"; -Debug.ShouldStop(16); - BA.debugLineNum = 774;BA.debugLine="If RB2.Checked = True Then"; -Debug.ShouldStop(32); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_rb2" /*RemoteObject*/ ).runMethod(true,"getChecked"),c_cliente.__c.getField(true,"True"))) { - BA.debugLineNum = 775;BA.debugLine="E_RES_E.Text = \"AUTOSERVICIO\""; -Debug.ShouldStop(64); -__ref.getField(false,"_e_res_e" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("AUTOSERVICIO")); - }; - BA.debugLineNum = 777;BA.debugLine="End Sub"; -Debug.ShouldStop(256); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _rb3_checkedchange(RemoteObject __ref,RemoteObject _checked) throws Exception{ -try { - Debug.PushSubsStack("RB3_CheckedChange (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,779); -if (RapidSub.canDelegate("rb3_checkedchange")) { return __ref.runUserSub(false, "c_cliente","rb3_checkedchange", __ref, _checked);} -Debug.locals.put("Checked", _checked); - BA.debugLineNum = 779;BA.debugLine="Sub RB3_CheckedChange(Checked As Boolean)"; -Debug.ShouldStop(1024); - BA.debugLineNum = 780;BA.debugLine="If RB3.Checked = True Then"; -Debug.ShouldStop(2048); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_rb3" /*RemoteObject*/ ).runMethod(true,"getChecked"),c_cliente.__c.getField(true,"True"))) { - BA.debugLineNum = 781;BA.debugLine="E_RES_E.Text = \"CLUB DE PRECIO\""; -Debug.ShouldStop(4096); -__ref.getField(false,"_e_res_e" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("CLUB DE PRECIO")); - }; - BA.debugLineNum = 783;BA.debugLine="End Sub"; -Debug.ShouldStop(16384); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _rb4_checkedchange(RemoteObject __ref,RemoteObject _checked) throws Exception{ -try { - Debug.PushSubsStack("RB4_CheckedChange (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,785); -if (RapidSub.canDelegate("rb4_checkedchange")) { return __ref.runUserSub(false, "c_cliente","rb4_checkedchange", __ref, _checked);} -Debug.locals.put("Checked", _checked); - BA.debugLineNum = 785;BA.debugLine="Sub RB4_CheckedChange(Checked As Boolean)"; -Debug.ShouldStop(65536); - BA.debugLineNum = 786;BA.debugLine="If RB4.Checked = True Then"; -Debug.ShouldStop(131072); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_rb4" /*RemoteObject*/ ).runMethod(true,"getChecked"),c_cliente.__c.getField(true,"True"))) { - BA.debugLineNum = 787;BA.debugLine="E_RES_E.Text = \"DIRECTO PEDEGREE\""; -Debug.ShouldStop(262144); -__ref.getField(false,"_e_res_e" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("DIRECTO PEDEGREE")); - }; - BA.debugLineNum = 789;BA.debugLine="End Sub"; -Debug.ShouldStop(1048576); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _sc_result(RemoteObject __ref,RemoteObject _atype,RemoteObject _values,RemoteObject _image) throws Exception{ -try { - Debug.PushSubsStack("sc_result (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,557); -if (RapidSub.canDelegate("sc_result")) { __ref.runUserSub(false, "c_cliente","sc_result", __ref, _atype, _values, _image); return;} -ResumableSub_sc_result rsub = new ResumableSub_sc_result(null,__ref,_atype,_values,_image); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_sc_result extends BA.ResumableSub { -public ResumableSub_sc_result(keymon.lat.medicomed.c_cliente parent,RemoteObject __ref,RemoteObject _atype,RemoteObject _values,RemoteObject _image) { -this.parent = parent; -this.__ref = __ref; -this._atype = _atype; -this._values = _values; -this._image = _image; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.c_cliente parent; -RemoteObject _atype; -RemoteObject _values; -RemoteObject _image; -RemoteObject _resultado = RemoteObject.createImmutable(0); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("sc_result (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,557); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); -Debug.locals.put("atype", _atype); -Debug.locals.put("Values", _values); -Debug.locals.put("image", _image); - BA.debugLineNum = 560;BA.debugLine="CODIGO = Values"; -Debug.ShouldStop(32768); -__ref.setField ("_codigo" /*RemoteObject*/ ,_values); - BA.debugLineNum = 561;BA.debugLine="DD=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT COUN"; -Debug.ShouldStop(65536); -__ref.getField(false,"_dd" /*RemoteObject*/ ).setObject (parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("SELECT COUNT(*) AS CUANTOS FROM kmt_info WHERE CAT_CL_NUM_SERIEFISICO = ?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {__ref.getField(true,"_codigo" /*RemoteObject*/ )})))); - BA.debugLineNum = 562;BA.debugLine="DD.Position =0"; -Debug.ShouldStop(131072); -__ref.getField(false,"_dd" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 563;BA.debugLine="If DD.GetString(\"CUANTOS\") > 0 Then"; -Debug.ShouldStop(262144); -if (true) break; - -case 1: -//if -this.state = 16; -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_dd" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))),BA.numberCast(double.class, 0))) { -this.state = 3; -}else { -this.state = 5; -}if (true) break; - -case 3: -//C -this.state = 16; - BA.debugLineNum = 564;BA.debugLine="MsgboxAsync(\"Código ya asignado\", \"AVISO\")"; -Debug.ShouldStop(524288); -parent.__c.runVoidMethod ("MsgboxAsync",(Object)(BA.ObjectToCharSequence("Código ya asignado")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("AVISO"))),__ref.getField(false, "ba")); - if (true) break; - -case 5: -//C -this.state = 6; - BA.debugLineNum = 566;BA.debugLine="If CODIGO.Length = 7 Then"; -Debug.ShouldStop(2097152); -if (true) break; - -case 6: -//if -this.state = 15; -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_codigo" /*RemoteObject*/ ).runMethod(true,"length"),BA.numberCast(double.class, 7))) { -this.state = 8; -}else { -this.state = 14; -}if (true) break; - -case 8: -//C -this.state = 9; - BA.debugLineNum = 567;BA.debugLine="Msgbox2Async(\"El código \"& CODIGO & \" es correc"; -Debug.ShouldStop(4194304); -parent.__c.runVoidMethod ("Msgbox2Async",(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("El código "),__ref.getField(true,"_codigo" /*RemoteObject*/ ),RemoteObject.createImmutable(" es correcto?")))),(Object)(BA.ObjectToCharSequence("Title")),(Object)(BA.ObjectToString("Yes")),(Object)(BA.ObjectToString("Cancel")),(Object)(BA.ObjectToString("No")),RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper"), parent.__c.getField(false,"Null")),__ref.getField(false, "ba"),(Object)(parent.__c.getField(true,"False"))); - BA.debugLineNum = 568;BA.debugLine="Wait For Msgbox_Result (resultado As Int)"; -Debug.ShouldStop(8388608); -parent.__c.runVoidMethod ("WaitFor","msgbox_result", __ref.getField(false, "ba"), anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "c_cliente", "sc_result"), null); -this.state = 17; -return; -case 17: -//C -this.state = 9; -_resultado = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(1));Debug.locals.put("resultado", _resultado); -; - BA.debugLineNum = 569;BA.debugLine="If resultado = DialogResponse.POSITIVE Then"; -Debug.ShouldStop(16777216); -if (true) break; - -case 9: -//if -this.state = 12; -if (RemoteObject.solveBoolean("=",_resultado,BA.numberCast(double.class, parent.__c.getField(false,"DialogResponse").getField(true,"POSITIVE")))) { -this.state = 11; -}if (true) break; - -case 11: -//C -this.state = 12; - BA.debugLineNum = 570;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE k"; -Debug.ShouldStop(33554432); -parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE kmt_info set CAT_CL_NUM_SERIEFISICO = ?, CAT_CL_LONG = ?, CAT_CL_LAT =? where CAT_CL_CODIGO In (select cuenta from cuentaa)")),(Object)(parent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {3},new Object[] {(__ref.getField(true,"_codigo" /*RemoteObject*/ )),(parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lon_gps" /*RemoteObject*/ )),(parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 571;BA.debugLine="L_QR.TEXT =CODIGO"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_l_qr" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(true,"_codigo" /*RemoteObject*/ ))); - BA.debugLineNum = 572;BA.debugLine="L_QR.TextColor = Colors.Blue"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_l_qr" /*RemoteObject*/ ).runMethod(true,"setTextColor",parent.__c.getField(false,"Colors").getField(true,"Blue")); - BA.debugLineNum = 573;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert i"; -Debug.ShouldStop(268435456); -parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("insert into HIST_CODIGO_BARRAS(CODIGOKMTS, CODIGOB, LAT, LON) VALUES (?,?,?,?)")),(Object)(parent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {4},new Object[] {(__ref.getField(false,"_la_cuenta" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(true,"_codigo" /*RemoteObject*/ )),(parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lon_gps" /*RemoteObject*/ )),(parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ ))}))))); - if (true) break; - -case 12: -//C -this.state = 15; -; - if (true) break; - -case 14: -//C -this.state = 15; - BA.debugLineNum = 576;BA.debugLine="MsgboxAsync(\"Código No Valido\", \"AVISO\")"; -Debug.ShouldStop(-2147483648); -parent.__c.runVoidMethod ("MsgboxAsync",(Object)(BA.ObjectToCharSequence("Código No Valido")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("AVISO"))),__ref.getField(false, "ba")); - if (true) break; - -case 15: -//C -this.state = 16; -; - if (true) break; - -case 16: -//C -this.state = -1; -; - BA.debugLineNum = 579;BA.debugLine="DD.Close"; -Debug.ShouldStop(4); -__ref.getField(false,"_dd" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 580;BA.debugLine="End Sub"; -Debug.ShouldStop(8); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _sc_timedout(RemoteObject __ref,RemoteObject _timedout) throws Exception{ -try { - Debug.PushSubsStack("sc_timedout (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,582); -if (RapidSub.canDelegate("sc_timedout")) { return __ref.runUserSub(false, "c_cliente","sc_timedout", __ref, _timedout);} -Debug.locals.put("timedOut", _timedout); - BA.debugLineNum = 582;BA.debugLine="Sub sc_timedout(timedOut As Boolean)"; -Debug.ShouldStop(32); - BA.debugLineNum = 583;BA.debugLine="Log(\"timedOut \" & timedOut)"; -Debug.ShouldStop(64); -c_cliente.__c.runVoidMethod ("LogImpl","36422529",RemoteObject.concat(RemoteObject.createImmutable("timedOut "),_timedout),0); - BA.debugLineNum = 584;BA.debugLine="End Sub"; -Debug.ShouldStop(128); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _sc_usercancelled(RemoteObject __ref,RemoteObject _usercancelled) throws Exception{ -try { - Debug.PushSubsStack("sc_usercancelled (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,586); -if (RapidSub.canDelegate("sc_usercancelled")) { return __ref.runUserSub(false, "c_cliente","sc_usercancelled", __ref, _usercancelled);} -Debug.locals.put("userCancelled", _usercancelled); - BA.debugLineNum = 586;BA.debugLine="Sub sc_usercancelled(userCancelled As Boolean)"; -Debug.ShouldStop(512); - BA.debugLineNum = 587;BA.debugLine="Log(\"userCancelled \" & userCancelled)"; -Debug.ShouldStop(1024); -c_cliente.__c.runVoidMethod ("LogImpl","36488065",RemoteObject.concat(RemoteObject.createImmutable("userCancelled "),_usercancelled),0); - BA.debugLineNum = 588;BA.debugLine="End Sub"; -Debug.ShouldStop(2048); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _startprinter(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("StartPrinter (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,664); -if (RapidSub.canDelegate("startprinter")) { return __ref.runUserSub(false, "c_cliente","startprinter", __ref);} -RemoteObject _resimp = RemoteObject.createImmutable(0); -int _i = 0; - BA.debugLineNum = 664;BA.debugLine="Sub StartPrinter"; -Debug.ShouldStop(8388608); - BA.debugLineNum = 665;BA.debugLine="Dim PairedDevices As Map"; -Debug.ShouldStop(16777216); -c_cliente._paireddevices = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");__ref.setField("_paireddevices",c_cliente._paireddevices); - BA.debugLineNum = 666;BA.debugLine="Dim L As List"; -Debug.ShouldStop(33554432); -c_cliente._l = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_l",c_cliente._l); - BA.debugLineNum = 667;BA.debugLine="Dim resimp As Int"; -Debug.ShouldStop(67108864); -_resimp = RemoteObject.createImmutable(0);Debug.locals.put("resimp", _resimp); - BA.debugLineNum = 668;BA.debugLine="ToastMessageShow(\"Printing.....\",True)"; -Debug.ShouldStop(134217728); -c_cliente.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Printing.....")),(Object)(c_cliente.__c.getField(true,"True"))); - BA.debugLineNum = 669;BA.debugLine="PairedDevices.Initialize"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_paireddevices" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 670;BA.debugLine="Try"; -Debug.ShouldStop(536870912); -try { BA.debugLineNum = 671;BA.debugLine="PairedDevices = cmp20.GetPairedDevices"; -Debug.ShouldStop(1073741824); -__ref.setField ("_paireddevices" /*RemoteObject*/ ,__ref.getField(false,"_cmp20" /*RemoteObject*/ ).runMethod(false,"GetPairedDevices")); - Debug.CheckDeviceExceptions(); -} - catch (Exception e9) { - BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e9.toString()); BA.debugLineNum = 673;BA.debugLine="Msgbox(\"Getting Paired Devices\",\"Printer Error\")"; -Debug.ShouldStop(1); -c_cliente.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("Getting Paired Devices")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("Printer Error"))),__ref.getField(false, "ba")); - BA.debugLineNum = 674;BA.debugLine="printer.Close"; -Debug.ShouldStop(2); -__ref.getField(false,"_printer" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 675;BA.debugLine="cmp20.Disconnect"; -Debug.ShouldStop(4); -__ref.getField(false,"_cmp20" /*RemoteObject*/ ).runVoidMethod ("Disconnect"); - }; - BA.debugLineNum = 677;BA.debugLine="If PairedDevices.Size = 0 Then"; -Debug.ShouldStop(16); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_paireddevices" /*RemoteObject*/ ).runMethod(true,"getSize"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 678;BA.debugLine="Msgbox(\"Error Connecting to Printer - Printer No"; -Debug.ShouldStop(32); -c_cliente.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("Error Connecting to Printer - Printer Not Found")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable(""))),__ref.getField(false, "ba")); - BA.debugLineNum = 679;BA.debugLine="Return"; -Debug.ShouldStop(64); -if (true) return RemoteObject.createImmutable(""); - }; - BA.debugLineNum = 681;BA.debugLine="If PairedDevices.Size = 1 Then"; -Debug.ShouldStop(256); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_paireddevices" /*RemoteObject*/ ).runMethod(true,"getSize"),BA.numberCast(double.class, 1))) { - BA.debugLineNum = 682;BA.debugLine="Try"; -Debug.ShouldStop(512); -try { BA.debugLineNum = 683;BA.debugLine="cmp20.ConnectInsecure(btAdmin,PairedDevices.Get"; -Debug.ShouldStop(1024); -__ref.getField(false,"_cmp20" /*RemoteObject*/ ).runVoidMethod ("ConnectInsecure",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_btadmin" /*RemoteObject*/ )),(Object)(BA.ObjectToString(__ref.getField(false,"_paireddevices" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(__ref.getField(false,"_paireddevices" /*RemoteObject*/ ).runMethod(false,"GetKeyAt",(Object)(BA.numberCast(int.class, 0))))))),(Object)(BA.numberCast(int.class, 1))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e21) { - BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e21.toString()); BA.debugLineNum = 685;BA.debugLine="Msgbox(\"Connecting\",\"Printer Error\") 'Ignore"; -Debug.ShouldStop(4096); -c_cliente.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("Connecting")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("Printer Error"))),__ref.getField(false, "ba")); - BA.debugLineNum = 686;BA.debugLine="printer.Close"; -Debug.ShouldStop(8192); -__ref.getField(false,"_printer" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 687;BA.debugLine="cmp20.Disconnect"; -Debug.ShouldStop(16384); -__ref.getField(false,"_cmp20" /*RemoteObject*/ ).runVoidMethod ("Disconnect"); - }; - }else { - BA.debugLineNum = 690;BA.debugLine="L.Initialize"; -Debug.ShouldStop(131072); -__ref.getField(false,"_l" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 691;BA.debugLine="For i = 0 To PairedDevices.Size - 1"; -Debug.ShouldStop(262144); -{ -final int step27 = 1; -final int limit27 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_paireddevices" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step27 > 0 && _i <= limit27) || (step27 < 0 && _i >= limit27) ;_i = ((int)(0 + _i + step27)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 692;BA.debugLine="L.Add(PairedDevices.GetKeyAt(i))"; -Debug.ShouldStop(524288); -__ref.getField(false,"_l" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)(__ref.getField(false,"_paireddevices" /*RemoteObject*/ ).runMethod(false,"GetKeyAt",(Object)(BA.numberCast(int.class, _i))))); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 694;BA.debugLine="resimp = InputList(L, \"Choose device\", -1) 'Igno"; -Debug.ShouldStop(2097152); -_resimp = c_cliente.__c.runMethodAndSync(true,"InputList",(Object)(__ref.getField(false,"_l" /*RemoteObject*/ )),(Object)(BA.ObjectToCharSequence("Choose device")),(Object)(BA.numberCast(int.class, -(double) (0 + 1))),__ref.getField(false, "ba"));Debug.locals.put("resimp", _resimp); - BA.debugLineNum = 695;BA.debugLine="If resimp <> DialogResponse.CANCEL Then"; -Debug.ShouldStop(4194304); -if (RemoteObject.solveBoolean("!",_resimp,BA.numberCast(double.class, c_cliente.__c.getField(false,"DialogResponse").getField(true,"CANCEL")))) { - BA.debugLineNum = 696;BA.debugLine="cmp20.Connect(PairedDevices.Get(L.Get(resimp)))"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_cmp20" /*RemoteObject*/ ).runVoidMethod ("Connect",__ref.getField(false, "ba"),(Object)(BA.ObjectToString(__ref.getField(false,"_paireddevices" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(__ref.getField(false,"_l" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(_resimp))))))); - }; - }; - BA.debugLineNum = 699;BA.debugLine="End Sub"; -Debug.ShouldStop(67108864); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _tar_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Tar_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,448); -if (RapidSub.canDelegate("tar_click")) { return __ref.runUserSub(false, "c_cliente","tar_click", __ref);} - BA.debugLineNum = 448;BA.debugLine="Sub Tar_Click"; -Debug.ShouldStop(-2147483648); - BA.debugLineNum = 449;BA.debugLine="B4XPages.ShowPage(\"Nota\")"; -Debug.ShouldStop(1); -c_cliente._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Nota"))); - BA.debugLineNum = 450;BA.debugLine="End Sub"; -Debug.ShouldStop(2); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _tar_longclick(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Tar_LongClick (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,452); -if (RapidSub.canDelegate("tar_longclick")) { return __ref.runUserSub(false, "c_cliente","tar_longclick", __ref);} - BA.debugLineNum = 452;BA.debugLine="Sub Tar_LongClick"; -Debug.ShouldStop(8); - BA.debugLineNum = 453;BA.debugLine="p_abono.Visible = True"; -Debug.ShouldStop(16); -__ref.getField(false,"_p_abono" /*RemoteObject*/ ).runMethod(true,"setVisible",c_cliente.__c.getField(true,"True")); - BA.debugLineNum = 454;BA.debugLine="End Sub"; -Debug.ShouldStop(32); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _tels_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Tels_Click (c_cliente) ","c_cliente",4,__ref.getField(false, "ba"),__ref,418); -if (RapidSub.canDelegate("tels_click")) { return __ref.runUserSub(false, "c_cliente","tels_click", __ref);} - BA.debugLineNum = 418;BA.debugLine="Sub Tels_Click"; -Debug.ShouldStop(2); - BA.debugLineNum = 419;BA.debugLine="B4XPages.ShowPage(\"NoVenta\")"; -Debug.ShouldStop(4); -c_cliente._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("NoVenta"))); - BA.debugLineNum = 420;BA.debugLine="End Sub"; -Debug.ShouldStop(8); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_clientes.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_clientes.java deleted file mode 100644 index c85d87d..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_clientes.java +++ /dev/null @@ -1,48 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class c_clientes { - public static RemoteObject myClass; - public c_clientes() { - } - public static PCBA staticBA = new PCBA(null, c_clientes.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _root = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _c2 = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _s = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _listview1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ListViewWrapper"); -public static RemoteObject _entro = RemoteObject.createImmutable(""); -public static RemoteObject _gest = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _lfila = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _busca = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -public static RemoteObject _colonia = RemoteObject.createImmutable(""); -public static RemoteObject _b_qr = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _qr = RemoteObject.declareNull("com.inforpires.baQRCode.baQRCode"); -public static RemoteObject _codigo = RemoteObject.createImmutable(""); -public static RemoteObject _stime = RemoteObject.createImmutable(""); -public static RemoteObject _ruta = RemoteObject.createImmutable(""); -public static RemoteObject _q_buscar = RemoteObject.createImmutable(""); -public static RemoteObject _p_clientes = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _la_cuenta = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"b_qr",_ref.getField(false, "_b_qr"),"busca",_ref.getField(false, "_busca"),"c",_ref.getField(false, "_c"),"c2",_ref.getField(false, "_c2"),"CODIGO",_ref.getField(false, "_codigo"),"colonia",_ref.getField(false, "_colonia"),"DateUtils",_ref.getField(false, "_dateutils"),"entro",_ref.getField(false, "_entro"),"gest",_ref.getField(false, "_gest"),"la_cuenta",_ref.getField(false, "_la_cuenta"),"lfila",_ref.getField(false, "_lfila"),"ListView1",_ref.getField(false, "_listview1"),"p_clientes",_ref.getField(false, "_p_clientes"),"q_buscar",_ref.getField(false, "_q_buscar"),"qr",_ref.getField(false, "_qr"),"Root",_ref.getField(false, "_root"),"ruta",_ref.getField(false, "_ruta"),"s",_ref.getField(false, "_s"),"STIME",_ref.getField(false, "_stime"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_clientes_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_clientes_subs_0.java deleted file mode 100644 index 9f0e2a8..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_clientes_subs_0.java +++ /dev/null @@ -1,731 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class c_clientes_subs_0 { - - -public static RemoteObject _b_qr_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_qr_Click (c_clientes) ","c_clientes",5,__ref.getField(false, "ba"),__ref,198); -if (RapidSub.canDelegate("b_qr_click")) { return __ref.runUserSub(false, "c_clientes","b_qr_click", __ref);} -RemoteObject _scan_width = RemoteObject.createImmutable(0); -RemoteObject _scan_height = RemoteObject.createImmutable(0); - BA.debugLineNum = 198;BA.debugLine="Sub b_qr_Click"; -Debug.ShouldStop(32); - BA.debugLineNum = 199;BA.debugLine="Dim scan_width As Int"; -Debug.ShouldStop(64); -_scan_width = RemoteObject.createImmutable(0);Debug.locals.put("scan_width", _scan_width); - BA.debugLineNum = 200;BA.debugLine="Dim scan_height As Int"; -Debug.ShouldStop(128); -_scan_height = RemoteObject.createImmutable(0);Debug.locals.put("scan_height", _scan_height); - BA.debugLineNum = 201;BA.debugLine="scan_width = 400"; -Debug.ShouldStop(256); -_scan_width = BA.numberCast(int.class, 400);Debug.locals.put("scan_width", _scan_width); - BA.debugLineNum = 202;BA.debugLine="scan_height = 400"; -Debug.ShouldStop(512); -_scan_height = BA.numberCast(int.class, 400);Debug.locals.put("scan_height", _scan_height); - BA.debugLineNum = 203;BA.debugLine="End Sub"; -Debug.ShouldStop(1024); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b4xpage_appear(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Appear (c_clientes) ","c_clientes",5,__ref.getField(false, "ba"),__ref,63); -if (RapidSub.canDelegate("b4xpage_appear")) { return __ref.runUserSub(false, "c_clientes","b4xpage_appear", __ref);} -RemoteObject _label1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _label2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -int _i = 0; - BA.debugLineNum = 63;BA.debugLine="Sub B4XPage_Appear"; -Debug.ShouldStop(1073741824); - BA.debugLineNum = 64;BA.debugLine="B4XPages.SetTitle(Me, $\"Clientes - ${Starter.dia_"; -Debug.ShouldStop(-2147483648); -c_clientes._b4xpages.runVoidMethod ("_settitle" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref),(Object)(((RemoteObject.concat(RemoteObject.createImmutable("Clientes - "),c_clientes.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((c_clientes._starter._dia_semana /*RemoteObject*/ ))),RemoteObject.createImmutable("")))))); - BA.debugLineNum = 65;BA.debugLine="busca.Text = \"\""; -Debug.ShouldStop(1); -__ref.getField(false,"_busca" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("")); - BA.debugLineNum = 66;BA.debugLine="entro =\"2\""; -Debug.ShouldStop(2); -__ref.setField ("_entro" /*RemoteObject*/ ,BA.ObjectToString("2")); - BA.debugLineNum = 67;BA.debugLine="colonia = 0"; -Debug.ShouldStop(4); -__ref.setField ("_colonia" /*RemoteObject*/ ,BA.NumberToString(0)); - BA.debugLineNum = 68;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_CL"; -Debug.ShouldStop(8); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_clientes._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_CL_NOMBRE, CAT_CL_CALLE, CAT_CL_CODIGO, CAT_CL_NOEXT, CAT_CL_CALLE1, CAT_CL_SECUENCIA from kmt_info where gestion = 0 ORDER BY CAT_CL_SECUENCIA, CAT_CL_CODIGO")))); - BA.debugLineNum = 69;BA.debugLine="ListView1.Clear"; -Debug.ShouldStop(16); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 71;BA.debugLine="lfila.Text = \"NOMBRE\""; -Debug.ShouldStop(64); -__ref.getField(false,"_lfila" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("NOMBRE")); - BA.debugLineNum = 72;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(128); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 73;BA.debugLine="c.Position= 0"; -Debug.ShouldStop(256); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 74;BA.debugLine="la_cuenta.text = c.GetString(\"CAT_CL_CODIGO\")"; -Debug.ShouldStop(512); -__ref.getField(false,"_la_cuenta" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_CODIGO"))))); - BA.debugLineNum = 75;BA.debugLine="Log(\"La cuenta: --->\"&la_cuenta)"; -Debug.ShouldStop(1024); -c_clientes.__c.runVoidMethod ("LogImpl","38454156",RemoteObject.concat(RemoteObject.createImmutable("La cuenta: --->"),__ref.getField(false,"_la_cuenta" /*RemoteObject*/ )),0); - BA.debugLineNum = 76;BA.debugLine="Dim label1 As Label"; -Debug.ShouldStop(2048); -_label1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label1", _label1); - BA.debugLineNum = 77;BA.debugLine="label1 = ListView1.TwoLinesLayout.Label"; -Debug.ShouldStop(4096); -_label1 = __ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").getField(false,"Label");Debug.locals.put("label1", _label1); - BA.debugLineNum = 78;BA.debugLine="label1.TextSize = 14"; -Debug.ShouldStop(8192); -_label1.runMethod(true,"setTextSize",BA.numberCast(float.class, 14)); - BA.debugLineNum = 79;BA.debugLine="label1.TextColor = Colors.Black"; -Debug.ShouldStop(16384); -_label1.runMethod(true,"setTextColor",c_clientes.__c.getField(false,"Colors").getField(true,"Black")); - BA.debugLineNum = 80;BA.debugLine="Dim label2 As Label"; -Debug.ShouldStop(32768); -_label2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label2", _label2); - BA.debugLineNum = 81;BA.debugLine="label2 = ListView1.TwoLinesLayout.SecondLabel"; -Debug.ShouldStop(65536); -_label2 = __ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").getField(false,"SecondLabel");Debug.locals.put("label2", _label2); - BA.debugLineNum = 82;BA.debugLine="label2.TextSize = 14"; -Debug.ShouldStop(131072); -_label2.runMethod(true,"setTextSize",BA.numberCast(float.class, 14)); - BA.debugLineNum = 83;BA.debugLine="label2.TextColor = Colors.Black"; -Debug.ShouldStop(262144); -_label2.runMethod(true,"setTextColor",c_clientes.__c.getField(false,"Colors").getField(true,"Black")); - BA.debugLineNum = 84;BA.debugLine="label2.Height = 50dip"; -Debug.ShouldStop(524288); -_label2.runMethod(true,"setHeight",c_clientes.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 50)))); - BA.debugLineNum = 85;BA.debugLine="label2.Width = ListView1.Width * 0.99"; -Debug.ShouldStop(1048576); -_label2.runMethod(true,"setWidth",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(0.99)}, "*",0, 0))); - BA.debugLineNum = 86;BA.debugLine="ListView1.TwoLinesLayout.ItemHeight = 85dip"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").runMethod(true,"setItemHeight",c_clientes.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 85)))); - BA.debugLineNum = 87;BA.debugLine="For i=0 To c.RowCount -1"; -Debug.ShouldStop(4194304); -{ -final int step23 = 1; -final int limit23 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step23 > 0 && _i <= limit23) || (step23 < 0 && _i >= limit23) ;_i = ((int)(0 + _i + step23)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 88;BA.debugLine="c.Position=i"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 91;BA.debugLine="ListView1.AddTwoLines(c.GetString(\"CAT_CL_CODIG"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runVoidMethod ("AddTwoLines",(Object)(BA.ObjectToCharSequence(RemoteObject.concat(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_CODIGO"))),RemoteObject.createImmutable(" - "),__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_SECUENCIA")))))),(Object)(BA.ObjectToCharSequence(RemoteObject.concat(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_NOMBRE"))),c_clientes.__c.getField(true,"CRLF"),__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_CALLE1"))))))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 95;BA.debugLine="c.Close"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 96;BA.debugLine="p_clientes.Height = Root.Height"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_p_clientes" /*RemoteObject*/ ).runMethod(true,"setHeight",__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getHeight")); - BA.debugLineNum = 97;BA.debugLine="ListView1.Height = Root.Height * 0.75"; -Debug.ShouldStop(1); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(true,"setHeight",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getHeight"),RemoteObject.createImmutable(0.75)}, "*",0, 0))); - BA.debugLineNum = 98;BA.debugLine="entro = \"4\""; -Debug.ShouldStop(2); -__ref.setField ("_entro" /*RemoteObject*/ ,BA.ObjectToString("4")); - BA.debugLineNum = 99;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b4xpage_closerequest(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_CloseRequest (c_clientes) ","c_clientes",5,__ref.getField(false, "ba"),__ref,155); -if (RapidSub.canDelegate("b4xpage_closerequest")) { return __ref.runUserSub(false, "c_clientes","b4xpage_closerequest", __ref);} -ResumableSub_B4XPage_CloseRequest rsub = new ResumableSub_B4XPage_CloseRequest(null,__ref); -rsub.remoteResumableSub = anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSubForFilter(); -rsub.resume(null, null); -return RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.keywords.Common.ResumableSubWrapper"), rsub.remoteResumableSub); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_B4XPage_CloseRequest extends BA.ResumableSub { -public ResumableSub_B4XPage_CloseRequest(keymon.lat.medicomed.c_clientes parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.c_clientes parent; - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_CloseRequest (c_clientes) ","c_clientes",5,__ref.getField(false, "ba"),__ref,155); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -{ -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,RemoteObject.createImmutable(null));return;} -case 0: -//C -this.state = -1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 162;BA.debugLine="Return True"; -Debug.ShouldStop(2); -if (true) { -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,(parent.__c.getField(true,"True")));return;}; - BA.debugLineNum = 163;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _b4xpage_created(RemoteObject __ref,RemoteObject _root1) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Created (c_clientes) ","c_clientes",5,__ref.getField(false, "ba"),__ref,40); -if (RapidSub.canDelegate("b4xpage_created")) { return __ref.runUserSub(false, "c_clientes","b4xpage_created", __ref, _root1);} -Debug.locals.put("Root1", _root1); - BA.debugLineNum = 40;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -Debug.ShouldStop(128); - BA.debugLineNum = 41;BA.debugLine="Root = Root1"; -Debug.ShouldStop(256); -__ref.setField ("_root" /*RemoteObject*/ ,_root1); - BA.debugLineNum = 43;BA.debugLine="Root.LoadLayout(\"clientes\")"; -Debug.ShouldStop(1024); -__ref.getField(false,"_root" /*RemoteObject*/ ).runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("clientes")),__ref.getField(false, "ba")); - BA.debugLineNum = 45;BA.debugLine="entro =\"2\""; -Debug.ShouldStop(4096); -__ref.setField ("_entro" /*RemoteObject*/ ,BA.ObjectToString("2")); - BA.debugLineNum = 50;BA.debugLine="ruta = File.DirInternal"; -Debug.ShouldStop(131072); -__ref.setField ("_ruta" /*RemoteObject*/ ,c_clientes.__c.getField(false,"File").runMethod(true,"getDirInternal")); - BA.debugLineNum = 57;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; -Debug.ShouldStop(16777216); -if (RemoteObject.solveBoolean("=",c_clientes.__c.getField(false,"File").runMethod(true,"Exists",(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(RemoteObject.createImmutable("kmt.db"))),c_clientes.__c.getField(true,"False"))) { - BA.debugLineNum = 58;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; -Debug.ShouldStop(33554432); -c_clientes.__c.getField(false,"File").runVoidMethod ("Copy",(Object)(c_clientes.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(BA.ObjectToString("kmt.db")),(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(RemoteObject.createImmutable("kmt.db"))); - }; - BA.debugLineNum = 60;BA.debugLine="qr.initialize"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_qr" /*RemoteObject*/ ).runVoidMethod ("initialize"); - BA.debugLineNum = 61;BA.debugLine="End Sub"; -Debug.ShouldStop(268435456); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _busca_textchanged(RemoteObject __ref,RemoteObject _old,RemoteObject _new) throws Exception{ -try { - Debug.PushSubsStack("BUSCA_TextChanged (c_clientes) ","c_clientes",5,__ref.getField(false, "ba"),__ref,165); -if (RapidSub.canDelegate("busca_textchanged")) { return __ref.runUserSub(false, "c_clientes","busca_textchanged", __ref, _old, _new);} -RemoteObject _label1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _label2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -int _i = 0; -Debug.locals.put("Old", _old); -Debug.locals.put("New", _new); - BA.debugLineNum = 165;BA.debugLine="Sub BUSCA_TextChanged (Old As String, New As Strin"; -Debug.ShouldStop(16); - BA.debugLineNum = 167;BA.debugLine="If Old <> \"\" And New <> \"\" Then"; -Debug.ShouldStop(64); -if (RemoteObject.solveBoolean("!",_old,BA.ObjectToString("")) && RemoteObject.solveBoolean("!",_new,BA.ObjectToString(""))) { - BA.debugLineNum = 169;BA.debugLine="q_buscar = \"%\" & busca.Text & \"%\""; -Debug.ShouldStop(256); -__ref.setField ("_q_buscar" /*RemoteObject*/ ,RemoteObject.concat(RemoteObject.createImmutable("%"),__ref.getField(false,"_busca" /*RemoteObject*/ ).runMethod(true,"getText"),RemoteObject.createImmutable("%"))); - BA.debugLineNum = 170;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery2(\"select CA"; -Debug.ShouldStop(512); -__ref.getField(false,"_c2" /*RemoteObject*/ ).setObject (c_clientes._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select CAT_CL_NOMBRE, CAT_CL_CALLE, CAT_CL_CODIGO,CAT_CL_SECUENCIA, CAT_CL_CALLE1 from kmt_info where (CAT_CL_NOMBRE like ? OR CAT_CL_CODIGO LIKE ? OR CAT_CL_CALLE1 LIKE ?)and gestion = 0 order by CAT_CL_NOMBRE ")),(Object)(RemoteObject.createNewArray("String",new int[] {3},new Object[] {__ref.getField(true,"_q_buscar" /*RemoteObject*/ ),__ref.getField(true,"_q_buscar" /*RemoteObject*/ ),__ref.getField(true,"_q_buscar" /*RemoteObject*/ )})))); - BA.debugLineNum = 171;BA.debugLine="ListView1.Clear"; -Debug.ShouldStop(1024); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 172;BA.debugLine="lfila.text = \"Nombre y Calle\""; -Debug.ShouldStop(2048); -__ref.getField(false,"_lfila" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("Nombre y Calle")); - BA.debugLineNum = 174;BA.debugLine="If c2.RowCount > 0 Then"; -Debug.ShouldStop(8192); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 175;BA.debugLine="Dim label1 As Label"; -Debug.ShouldStop(16384); -_label1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label1", _label1); - BA.debugLineNum = 176;BA.debugLine="label1 = ListView1.TwoLinesLayout.Label"; -Debug.ShouldStop(32768); -_label1 = __ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").getField(false,"Label");Debug.locals.put("label1", _label1); - BA.debugLineNum = 177;BA.debugLine="label1.TextSize = 14"; -Debug.ShouldStop(65536); -_label1.runMethod(true,"setTextSize",BA.numberCast(float.class, 14)); - BA.debugLineNum = 178;BA.debugLine="label1.TextColor = Colors.DarkGray"; -Debug.ShouldStop(131072); -_label1.runMethod(true,"setTextColor",c_clientes.__c.getField(false,"Colors").getField(true,"DarkGray")); - BA.debugLineNum = 179;BA.debugLine="Dim label2 As Label"; -Debug.ShouldStop(262144); -_label2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label2", _label2); - BA.debugLineNum = 180;BA.debugLine="label2 = ListView1.TwoLinesLayout.SecondLabel"; -Debug.ShouldStop(524288); -_label2 = __ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").getField(false,"SecondLabel");Debug.locals.put("label2", _label2); - BA.debugLineNum = 181;BA.debugLine="label2.TextSize = 14"; -Debug.ShouldStop(1048576); -_label2.runMethod(true,"setTextSize",BA.numberCast(float.class, 14)); - BA.debugLineNum = 182;BA.debugLine="label2.Height = 50dip"; -Debug.ShouldStop(2097152); -_label2.runMethod(true,"setHeight",c_clientes.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 50)))); - BA.debugLineNum = 183;BA.debugLine="label2.Width = ListView1.Width * 0.99"; -Debug.ShouldStop(4194304); -_label2.runMethod(true,"setWidth",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(0.99)}, "*",0, 0))); - BA.debugLineNum = 184;BA.debugLine="label2.TextColor = Colors.DarkGray"; -Debug.ShouldStop(8388608); -_label2.runMethod(true,"setTextColor",c_clientes.__c.getField(false,"Colors").getField(true,"DarkGray")); - BA.debugLineNum = 186;BA.debugLine="For i=0 To c2.RowCount -1"; -Debug.ShouldStop(33554432); -{ -final int step17 = 1; -final int limit17 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step17 > 0 && _i <= limit17) || (step17 < 0 && _i >= limit17) ;_i = ((int)(0 + _i + step17)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 187;BA.debugLine="c2.Position=i"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 190;BA.debugLine="ListView1.AddTwoLines(c2.GetString(\"CAT_CL_COD"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runVoidMethod ("AddTwoLines",(Object)(BA.ObjectToCharSequence(RemoteObject.concat(__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_CODIGO"))),RemoteObject.createImmutable(" - "),__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_SECUENCIA")))))),(Object)(BA.ObjectToCharSequence(RemoteObject.concat(__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_NOMBRE"))),c_clientes.__c.getField(true,"CRLF"),__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_CALLE1"))))))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 193;BA.debugLine="entro = \"4\""; -Debug.ShouldStop(1); -__ref.setField ("_entro" /*RemoteObject*/ ,BA.ObjectToString("4")); - BA.debugLineNum = 194;BA.debugLine="c2.Close"; -Debug.ShouldStop(2); -__ref.getField(false,"_c2" /*RemoteObject*/ ).runVoidMethod ("Close"); - }; - BA.debugLineNum = 196;BA.debugLine="End Sub"; -Debug.ShouldStop(8); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _calc_ean_checksum(RemoteObject __ref,RemoteObject _number) throws Exception{ -try { - Debug.PushSubsStack("calc_ean_checksum (c_clientes) ","c_clientes",5,__ref.getField(false, "ba"),__ref,226); -if (RapidSub.canDelegate("calc_ean_checksum")) { return __ref.runUserSub(false, "c_clientes","calc_ean_checksum", __ref, _number);} -RemoteObject _i = RemoteObject.createImmutable(0); -RemoteObject _co = RemoteObject.createImmutable('\0'); -RemoteObject _soma = RemoteObject.createImmutable(0); -RemoteObject _n = RemoteObject.createImmutable(0); -RemoteObject _digit = RemoteObject.createImmutable(0f); -Debug.locals.put("number", _number); - BA.debugLineNum = 226;BA.debugLine="Sub calc_ean_checksum(number As String) As String"; -Debug.ShouldStop(2); - BA.debugLineNum = 227;BA.debugLine="Dim i As Int"; -Debug.ShouldStop(4); -_i = RemoteObject.createImmutable(0);Debug.locals.put("i", _i); - BA.debugLineNum = 228;BA.debugLine="Dim cO As Char"; -Debug.ShouldStop(8); -_co = RemoteObject.createImmutable('\0');Debug.locals.put("cO", _co); - BA.debugLineNum = 229;BA.debugLine="Dim soma As Int"; -Debug.ShouldStop(16); -_soma = RemoteObject.createImmutable(0);Debug.locals.put("soma", _soma); - BA.debugLineNum = 230;BA.debugLine="Dim n As Int"; -Debug.ShouldStop(32); -_n = RemoteObject.createImmutable(0);Debug.locals.put("n", _n); - BA.debugLineNum = 231;BA.debugLine="Dim digit As Float"; -Debug.ShouldStop(64); -_digit = RemoteObject.createImmutable(0f);Debug.locals.put("digit", _digit); - BA.debugLineNum = 232;BA.debugLine="soma = 0"; -Debug.ShouldStop(128); -_soma = BA.numberCast(int.class, 0);Debug.locals.put("soma", _soma); - BA.debugLineNum = 233;BA.debugLine="For i=0 To number.Length - 1"; -Debug.ShouldStop(256); -{ -final int step7 = 1; -final int limit7 = RemoteObject.solve(new RemoteObject[] {_number.runMethod(true,"length"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = BA.numberCast(int.class, 0) ; -for (;(step7 > 0 && _i.get().intValue() <= limit7) || (step7 < 0 && _i.get().intValue() >= limit7) ;_i = RemoteObject.createImmutable((int)(0 + _i.get().intValue() + step7)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 234;BA.debugLine="digit = number.SubString2(i,i+1)"; -Debug.ShouldStop(512); -_digit = BA.numberCast(float.class, _number.runMethod(true,"substring",(Object)(_i),(Object)(RemoteObject.solve(new RemoteObject[] {_i,RemoteObject.createImmutable(1)}, "+",1, 1))));Debug.locals.put("digit", _digit); - BA.debugLineNum = 235;BA.debugLine="n= digit * ((i Mod 2) * 2 + 1)"; -Debug.ShouldStop(1024); -_n = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_digit,(RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {_i,RemoteObject.createImmutable(2)}, "%",0, 1)),RemoteObject.createImmutable(2),RemoteObject.createImmutable(1)}, "*+",1, 1))}, "*",0, 0));Debug.locals.put("n", _n); - BA.debugLineNum = 236;BA.debugLine="soma=soma+n"; -Debug.ShouldStop(2048); -_soma = RemoteObject.solve(new RemoteObject[] {_soma,_n}, "+",1, 1);Debug.locals.put("soma", _soma); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 238;BA.debugLine="Return number & ( ( 10 - ( soma Mod 10 )) Mod 10"; -Debug.ShouldStop(8192); -if (true) return RemoteObject.concat(_number,(RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(10),(RemoteObject.solve(new RemoteObject[] {_soma,RemoteObject.createImmutable(10)}, "%",0, 1))}, "-",1, 1)),RemoteObject.createImmutable(10)}, "%",0, 1))); - BA.debugLineNum = 239;BA.debugLine="End Sub"; -Debug.ShouldStop(16384); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 6;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 7;BA.debugLine="Private Root As B4XView 'ignore"; -c_clientes._root = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_root",c_clientes._root); - //BA.debugLineNum = 8;BA.debugLine="Private xui As XUI 'ignore"; -c_clientes._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",c_clientes._xui); - //BA.debugLineNum = 11;BA.debugLine="Dim c As Cursor"; -c_clientes._c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_c",c_clientes._c); - //BA.debugLineNum = 12;BA.debugLine="Dim c2 As Cursor"; -c_clientes._c2 = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_c2",c_clientes._c2); - //BA.debugLineNum = 13;BA.debugLine="Dim s As Cursor"; -c_clientes._s = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_s",c_clientes._s); - //BA.debugLineNum = 14;BA.debugLine="Dim ListView1 As ListView"; -c_clientes._listview1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ListViewWrapper");__ref.setField("_listview1",c_clientes._listview1); - //BA.debugLineNum = 15;BA.debugLine="Dim entro As String"; -c_clientes._entro = RemoteObject.createImmutable("");__ref.setField("_entro",c_clientes._entro); - //BA.debugLineNum = 16;BA.debugLine="Dim gest As Button"; -c_clientes._gest = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_gest",c_clientes._gest); - //BA.debugLineNum = 17;BA.debugLine="Dim lfila As Label"; -c_clientes._lfila = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_lfila",c_clientes._lfila); - //BA.debugLineNum = 18;BA.debugLine="Dim busca As EditText"; -c_clientes._busca = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");__ref.setField("_busca",c_clientes._busca); - //BA.debugLineNum = 19;BA.debugLine="Dim colonia As String"; -c_clientes._colonia = RemoteObject.createImmutable("");__ref.setField("_colonia",c_clientes._colonia); - //BA.debugLineNum = 20;BA.debugLine="Private b_qr As Button"; -c_clientes._b_qr = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_qr",c_clientes._b_qr); - //BA.debugLineNum = 21;BA.debugLine="Private qr As QRCode"; -c_clientes._qr = RemoteObject.createNew ("com.inforpires.baQRCode.baQRCode");__ref.setField("_qr",c_clientes._qr); - //BA.debugLineNum = 23;BA.debugLine="Dim CODIGO As String"; -c_clientes._codigo = RemoteObject.createImmutable("");__ref.setField("_codigo",c_clientes._codigo); - //BA.debugLineNum = 24;BA.debugLine="Dim STIME As String"; -c_clientes._stime = RemoteObject.createImmutable("");__ref.setField("_stime",c_clientes._stime); - //BA.debugLineNum = 27;BA.debugLine="Dim ruta As String"; -c_clientes._ruta = RemoteObject.createImmutable("");__ref.setField("_ruta",c_clientes._ruta); - //BA.debugLineNum = 28;BA.debugLine="Dim q_buscar As String"; -c_clientes._q_buscar = RemoteObject.createImmutable("");__ref.setField("_q_buscar",c_clientes._q_buscar); - //BA.debugLineNum = 29;BA.debugLine="Private p_clientes As Panel"; -c_clientes._p_clientes = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_clientes",c_clientes._p_clientes); - //BA.debugLineNum = 30;BA.debugLine="Dim la_cuenta As Label"; -c_clientes._la_cuenta = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_la_cuenta",c_clientes._la_cuenta); - //BA.debugLineNum = 32;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (c_clientes) ","c_clientes",5,__ref.getField(false, "ba"),__ref,35); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "c_clientes","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 35;BA.debugLine="Public Sub Initialize As Object"; -Debug.ShouldStop(4); - BA.debugLineNum = 36;BA.debugLine="Return Me"; -Debug.ShouldStop(8); -if (true) return __ref; - BA.debugLineNum = 37;BA.debugLine="End Sub"; -Debug.ShouldStop(16); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _listview1_itemclick(RemoteObject __ref,RemoteObject _position,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("ListView1_ItemClick (c_clientes) ","c_clientes",5,__ref.getField(false, "ba"),__ref,101); -if (RapidSub.canDelegate("listview1_itemclick")) { return __ref.runUserSub(false, "c_clientes","listview1_itemclick", __ref, _position, _value);} -RemoteObject _value2 = null; -int _i = 0; -Debug.locals.put("Position", _position); -Debug.locals.put("Value", _value); - BA.debugLineNum = 101;BA.debugLine="Sub ListView1_ItemClick (Position As Int, Value As"; -Debug.ShouldStop(16); - BA.debugLineNum = 102;BA.debugLine="Private value2() As String = Regex.Split(\" - \","; -Debug.ShouldStop(32); -_value2 = c_clientes.__c.getField(false,"Regex").runMethod(false,"Split",(Object)(BA.ObjectToString(" - ")),(Object)(BA.ObjectToString(_value)));Debug.locals.put("value2", _value2);Debug.locals.put("value2", _value2); - BA.debugLineNum = 104;BA.debugLine="If colonia = 0 Then"; -Debug.ShouldStop(128); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_colonia" /*RemoteObject*/ ),BA.NumberToString(0))) { - BA.debugLineNum = 105;BA.debugLine="colonia = value2(0)"; -Debug.ShouldStop(256); -__ref.setField ("_colonia" /*RemoteObject*/ ,_value2.getArrayElement(true,BA.numberCast(int.class, 0))); - }; - BA.debugLineNum = 108;BA.debugLine="Log(\"-------------------------------\" & value2(0)"; -Debug.ShouldStop(2048); -c_clientes.__c.runVoidMethod ("LogImpl","38519687",RemoteObject.concat(RemoteObject.createImmutable("-------------------------------"),_value2.getArrayElement(true,BA.numberCast(int.class, 0))),0); - BA.debugLineNum = 110;BA.debugLine="If entro = \"2\" Then"; -Debug.ShouldStop(8192); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_entro" /*RemoteObject*/ ),BA.ObjectToString("2"))) { - BA.debugLineNum = 111;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery2(\"select CAT"; -Debug.ShouldStop(16384); -__ref.getField(false,"_c2" /*RemoteObject*/ ).setObject (c_clientes._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select CAT_CL_CALLE, CAT_CL_COLONIA, count(*) as cuantos from kmt_info where gestion = 0 and CAT_CL_COLONIA = ? GROUP BY CAT_CL_CALLE, CAT_CL_COLONIA order by CAT_CL_CALLE ")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {_value2.getArrayElement(true,BA.numberCast(int.class, 0))})))); - BA.debugLineNum = 112;BA.debugLine="ListView1.Clear"; -Debug.ShouldStop(32768); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 113;BA.debugLine="lfila.text = \"Calle\""; -Debug.ShouldStop(65536); -__ref.getField(false,"_lfila" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("Calle")); - BA.debugLineNum = 114;BA.debugLine="If c2.RowCount>0 Then"; -Debug.ShouldStop(131072); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 115;BA.debugLine="For i=0 To c2.RowCount -1"; -Debug.ShouldStop(262144); -{ -final int step11 = 1; -final int limit11 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step11 > 0 && _i <= limit11) || (step11 < 0 && _i >= limit11) ;_i = ((int)(0 + _i + step11)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 116;BA.debugLine="c2.Position=i"; -Debug.ShouldStop(524288); -__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 117;BA.debugLine="ListView1.AddTwoLines(c2.GetString(\"CAT_CL_CAL"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runVoidMethod ("AddTwoLines",(Object)(BA.ObjectToCharSequence(__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_CALLE"))))),(Object)(BA.ObjectToCharSequence(__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("cuantos")))))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 120;BA.debugLine="entro = \"3\""; -Debug.ShouldStop(8388608); -__ref.setField ("_entro" /*RemoteObject*/ ,BA.ObjectToString("3")); - }else -{ BA.debugLineNum = 121;BA.debugLine="Else If entro = \"3\" Then"; -Debug.ShouldStop(16777216); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_entro" /*RemoteObject*/ ),BA.ObjectToString("3"))) { - BA.debugLineNum = 122;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery2(\"select CA"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_c2" /*RemoteObject*/ ).setObject (c_clientes._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select CAT_CL_NOMBRE, CAT_CL_CALLE, CAT_CL_CODIGO from kmt_info where gestion = 0 and CAT_CL_CALLE = ? AND CAT_CL_COLONIA = ? order by CAT_CL_NOMBRE ")),(Object)(RemoteObject.createNewArray("String",new int[] {2},new Object[] {_value2.getArrayElement(true,BA.numberCast(int.class, 0)),__ref.getField(true,"_colonia" /*RemoteObject*/ )})))); - BA.debugLineNum = 123;BA.debugLine="ListView1.Clear"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 124;BA.debugLine="lfila.text = \"Nombre\""; -Debug.ShouldStop(134217728); -__ref.getField(false,"_lfila" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("Nombre")); - BA.debugLineNum = 125;BA.debugLine="If c2.RowCount>0 Then"; -Debug.ShouldStop(268435456); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 126;BA.debugLine="For i=0 To c2.RowCount -1"; -Debug.ShouldStop(536870912); -{ -final int step22 = 1; -final int limit22 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step22 > 0 && _i <= limit22) || (step22 < 0 && _i >= limit22) ;_i = ((int)(0 + _i + step22)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 127;BA.debugLine="c2.Position=i"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 128;BA.debugLine="ListView1.AddTwoLines(c2.GetString(\"CAT_CL_COD"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runVoidMethod ("AddTwoLines",(Object)(BA.ObjectToCharSequence(__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_CODIGO"))))),(Object)(BA.ObjectToCharSequence(__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_NOMBRE")))))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 131;BA.debugLine="entro = \"4\""; -Debug.ShouldStop(4); -__ref.setField ("_entro" /*RemoteObject*/ ,BA.ObjectToString("4")); - }else -{ BA.debugLineNum = 132;BA.debugLine="Else If entro = \"4\" Then"; -Debug.ShouldStop(8); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_entro" /*RemoteObject*/ ),BA.ObjectToString("4"))) { - BA.debugLineNum = 133;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(16); -c_clientes._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from CUENTAA"))); - BA.debugLineNum = 134;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -Debug.ShouldStop(32); -c_clientes._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO CUENTAA VALUES (?)")),(Object)(c_clientes.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(_value2.getArrayElement(true,BA.numberCast(int.class, 0)))}))))); - BA.debugLineNum = 135;BA.debugLine="DateTime.TimeFormat = \"HHmmss\""; -Debug.ShouldStop(64); -c_clientes.__c.getField(false,"DateTime").runMethod(true,"setTimeFormat",BA.ObjectToString("HHmmss")); - BA.debugLineNum = 136;BA.debugLine="STIME=DateTime.Time(DateTime.Now)"; -Debug.ShouldStop(128); -__ref.setField ("_stime" /*RemoteObject*/ ,c_clientes.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_clientes.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 138;BA.debugLine="s=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT COUN"; -Debug.ShouldStop(512); -__ref.getField(false,"_s" /*RemoteObject*/ ).setObject (c_clientes._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("SELECT COUNT(*) AS CUANTOS FROM HIST_STAY_STORE WHERE HSS_IN = ? AND HSS_CODIGO In (select cuenta from cuentaa)")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("0")})))); - BA.debugLineNum = 139;BA.debugLine="s.Position = 0"; -Debug.ShouldStop(1024); -__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 140;BA.debugLine="If s.GetString(\"CUANTOS\") = 1 Then"; -Debug.ShouldStop(2048); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS"))),BA.NumberToString(1))) { - BA.debugLineNum = 141;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HI"; -Debug.ShouldStop(4096); -c_clientes._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE HIST_STAY_STORE set HSS_IN = ? where HSS_IN = 0 AND HSS_CODIGO In (select cuenta from cuentaa)")),(Object)(c_clientes.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(true,"_stime" /*RemoteObject*/ ))}))))); - }else { - BA.debugLineNum = 143;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT IN"; -Debug.ShouldStop(16384); -c_clientes._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO HIST_STAY_STORE(HSS_CODIGO, HSS_IN , HSS_OUT , HSS_TOT) VALUES (?,0,0,0)")),(Object)(c_clientes.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(_value2.getArrayElement(true,BA.numberCast(int.class, 0)))}))))); - BA.debugLineNum = 144;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HI"; -Debug.ShouldStop(32768); -c_clientes._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE HIST_STAY_STORE set HSS_IN = ? where HSS_IN = 0 AND HSS_CODIGO In (select cuenta from cuentaa)")),(Object)(c_clientes.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(true,"_stime" /*RemoteObject*/ ))}))))); - }; - BA.debugLineNum = 146;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HIS"; -Debug.ShouldStop(131072); -c_clientes._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE HIST_STAY_OUT set HSO_INI = ? where HSO_INI = 0 ")),(Object)(c_clientes.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(true,"_stime" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 147;BA.debugLine="DateTime.TimeFormat = \"HH:mm:ss\""; -Debug.ShouldStop(262144); -c_clientes.__c.getField(false,"DateTime").runMethod(true,"setTimeFormat",BA.ObjectToString("HH:mm:ss")); - BA.debugLineNum = 149;BA.debugLine="Subs.guardaClienteHoraInicio(value2(0))"; -Debug.ShouldStop(1048576); -c_clientes._subs.runVoidMethod ("_guardaclientehorainicio" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(_value2.getArrayElement(true,BA.numberCast(int.class, 0)))); - BA.debugLineNum = 151;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; -Debug.ShouldStop(4194304); -c_clientes._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Cliente"))); - }}} -; - BA.debugLineNum = 153;BA.debugLine="End Sub"; -Debug.ShouldStop(16777216); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _mods(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Mods (c_clientes) ","c_clientes",5,__ref.getField(false, "ba"),__ref,1); -if (RapidSub.canDelegate("mods")) { return __ref.runUserSub(false, "c_clientes","mods", __ref);} - BA.debugLineNum = 1;BA.debugLine="Sub Mods"; -Debug.ShouldStop(1); - BA.debugLineNum = 4;BA.debugLine="End Sub"; -Debug.ShouldStop(8); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _p_clientes_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("p_clientes_Click (c_clientes) ","c_clientes",5,__ref.getField(false, "ba"),__ref,243); -if (RapidSub.canDelegate("p_clientes_click")) { return __ref.runUserSub(false, "c_clientes","p_clientes_click", __ref);} - BA.debugLineNum = 243;BA.debugLine="Private Sub p_clientes_Click"; -Debug.ShouldStop(262144); - BA.debugLineNum = 245;BA.debugLine="End Sub"; -Debug.ShouldStop(1048576); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _sc_noscan(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("sc_noScan (c_clientes) ","c_clientes",5,__ref.getField(false, "ba"),__ref,222); -if (RapidSub.canDelegate("sc_noscan")) { return __ref.runUserSub(false, "c_clientes","sc_noscan", __ref);} - BA.debugLineNum = 222;BA.debugLine="Sub sc_noScan"; -Debug.ShouldStop(536870912); - BA.debugLineNum = 223;BA.debugLine="Log(\"nothing returned from the scan !!!!!\")"; -Debug.ShouldStop(1073741824); -c_clientes.__c.runVoidMethod ("LogImpl","38847361",RemoteObject.createImmutable("nothing returned from the scan !!!!!"),0); - BA.debugLineNum = 224;BA.debugLine="End Sub"; -Debug.ShouldStop(-2147483648); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _sc_result(RemoteObject __ref,RemoteObject _atype,RemoteObject _values) throws Exception{ -try { - Debug.PushSubsStack("sc_result (c_clientes) ","c_clientes",5,__ref.getField(false, "ba"),__ref,205); -if (RapidSub.canDelegate("sc_result")) { return __ref.runUserSub(false, "c_clientes","sc_result", __ref, _atype, _values);} -Debug.locals.put("atype", _atype); -Debug.locals.put("Values", _values); - BA.debugLineNum = 205;BA.debugLine="Sub sc_result(atype As String,Values As String)"; -Debug.ShouldStop(4096); - BA.debugLineNum = 206;BA.debugLine="CODIGO = Values"; -Debug.ShouldStop(8192); -__ref.setField ("_codigo" /*RemoteObject*/ ,_values); - BA.debugLineNum = 207;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery2(\"select CO"; -Debug.ShouldStop(16384); -__ref.getField(false,"_c2" /*RemoteObject*/ ).setObject (c_clientes._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select COUNT(*) AS ENCONTRADO from kmt_info where CAT_CL_NUM_SERIEFISICO = ? order by CAT_CL_NOMBRE ")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {__ref.getField(true,"_codigo" /*RemoteObject*/ )})))); - BA.debugLineNum = 208;BA.debugLine="c2.Position =0"; -Debug.ShouldStop(32768); -__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 209;BA.debugLine="If c2.GetString(\"ENCONTRADO\") > 0 Then"; -Debug.ShouldStop(65536); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("ENCONTRADO")))),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 210;BA.debugLine="s=B4XPages.MainPage.skmt.ExecQuery2(\"select CA"; -Debug.ShouldStop(131072); -__ref.getField(false,"_s" /*RemoteObject*/ ).setObject (c_clientes._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select CAT_CL_CODIGO from kmt_info where CAT_CL_NUM_SERIEFISICO = ? order by CAT_CL_NOMBRE ")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {__ref.getField(true,"_codigo" /*RemoteObject*/ )})))); - BA.debugLineNum = 211;BA.debugLine="s.Position =0"; -Debug.ShouldStop(262144); -__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 212;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(524288); -c_clientes._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from CUENTAA"))); - BA.debugLineNum = 213;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -Debug.ShouldStop(1048576); -c_clientes._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO CUENTAA VALUES (?)")),(Object)(c_clientes.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_CODIGO"))))}))))); - BA.debugLineNum = 214;BA.debugLine="s.Close"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_s" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 216;BA.debugLine="B4XPages.ShowPage(\"clientes\")"; -Debug.ShouldStop(8388608); -c_clientes._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("clientes"))); - }else { - BA.debugLineNum = 218;BA.debugLine="Msgbox(\"CODIGO \" & CODIGO & \" NO ENCONTRADO\",\"AV"; -Debug.ShouldStop(33554432); -c_clientes.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("CODIGO "),__ref.getField(true,"_codigo" /*RemoteObject*/ ),RemoteObject.createImmutable(" NO ENCONTRADO")))),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("AVISO"))),__ref.getField(false, "ba")); - }; - BA.debugLineNum = 220;BA.debugLine="End Sub"; -Debug.ShouldStop(134217728); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_historico.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_historico.java deleted file mode 100644 index c14bad7..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_historico.java +++ /dev/null @@ -1,49 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class c_historico { - public static RemoteObject myClass; - public c_historico() { - } - public static PCBA staticBA = new PCBA(null, c_historico.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _root = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _g = RemoteObject.declareNull("anywheresoftware.b4a.gps.GPS"); -public static RemoteObject _clie_id = RemoteObject.createImmutable(""); -public static RemoteObject _sdate = RemoteObject.createImmutable(""); -public static RemoteObject _stime = RemoteObject.createImmutable(""); -public static RemoteObject _usuario = RemoteObject.createImmutable(""); -public static RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _ruta = RemoteObject.createImmutable(""); -public static RemoteObject _regresar = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _listview1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ListViewWrapper"); -public static RemoteObject _l_cant = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_total = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _borra = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _existe = RemoteObject.createImmutable(""); -public static RemoteObject _result = RemoteObject.createImmutable(""); -public static RemoteObject _titulo = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _b_desc = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _listview2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ListViewWrapper"); -public static RemoteObject _tgl = RemoteObject.declareNull("com.rootsoft.togglelibrary.ToggleLibrary"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"b_desc",_ref.getField(false, "_b_desc"),"borra",_ref.getField(false, "_borra"),"c",_ref.getField(false, "_c"),"clie_id",_ref.getField(false, "_clie_id"),"DateUtils",_ref.getField(false, "_dateutils"),"Existe",_ref.getField(false, "_existe"),"g",_ref.getField(false, "_g"),"L_CANT",_ref.getField(false, "_l_cant"),"L_TOTAL",_ref.getField(false, "_l_total"),"ListView1",_ref.getField(false, "_listview1"),"ListView2",_ref.getField(false, "_listview2"),"Regresar",_ref.getField(false, "_regresar"),"result",_ref.getField(false, "_result"),"Root",_ref.getField(false, "_root"),"ruta",_ref.getField(false, "_ruta"),"sDate",_ref.getField(false, "_sdate"),"sTime",_ref.getField(false, "_stime"),"tgl",_ref.getField(false, "_tgl"),"Titulo",_ref.getField(false, "_titulo"),"usuario",_ref.getField(false, "_usuario"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_historico_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_historico_subs_0.java deleted file mode 100644 index 92af5be..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_historico_subs_0.java +++ /dev/null @@ -1,402 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class c_historico_subs_0 { - - -public static RemoteObject _b4xpage_appear(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Appear (c_historico) ","c_historico",14,__ref.getField(false, "ba"),__ref,51); -if (RapidSub.canDelegate("b4xpage_appear")) { return __ref.runUserSub(false, "c_historico","b4xpage_appear", __ref);} -int _i = 0; -RemoteObject _label1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _label2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); - BA.debugLineNum = 51;BA.debugLine="Sub B4XPage_Appear"; -Debug.ShouldStop(262144); - BA.debugLineNum = 52;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then"; -Debug.ShouldStop(524288); -if (c_historico.__c.runMethod(true,"Not",(Object)(c_historico._starter._gps /*RemoteObject*/ .runMethod(true,"getGPSEnabled"))).get().booleanValue()) { - BA.debugLineNum = 53;BA.debugLine="ToastMessageShow(\"Es necesario tener el GPS ence"; -Debug.ShouldStop(1048576); -c_historico.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Es necesario tener el GPS encendido")),(Object)(c_historico.__c.getField(true,"True"))); - BA.debugLineNum = 54;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent"; -Debug.ShouldStop(2097152); -c_historico.__c.runVoidMethod ("StartActivity",__ref.getField(false, "ba"),(Object)((c_historico._starter._gps /*RemoteObject*/ .runMethod(false,"getLocationSettingsIntent")))); - }; - BA.debugLineNum = 56;BA.debugLine="L_CANT.Text =\"\""; -Debug.ShouldStop(8388608); -__ref.getField(false,"_l_cant" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("")); - BA.debugLineNum = 57;BA.debugLine="L_TOTAL.Text=\"\""; -Debug.ShouldStop(16777216); -__ref.getField(false,"_l_total" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("")); - BA.debugLineNum = 58;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select count("; -Debug.ShouldStop(33554432); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_historico._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select count(*) as EXISTE from HIST_VENTAS WHERE HVD_CLIENTE IN (Select CUENTA from cuentaa)")))); - BA.debugLineNum = 59;BA.debugLine="C.Position=0"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 60;BA.debugLine="Existe = C.GetString(\"EXISTE\")"; -Debug.ShouldStop(134217728); -__ref.setField ("_existe" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("EXISTE")))); - BA.debugLineNum = 61;BA.debugLine="C.Close"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 62;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select HVD_CL"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_historico._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select HVD_CLIENTE,HVD_PRONOMBRE,HVD_CANT,HVD_COSTO_TOT from HIST_VENTAS WHERE HVD_CLIENTE IN (Select CUENTA from cuentaa) order by HVD_PRONOMBRE asc")))); - BA.debugLineNum = 63;BA.debugLine="ListView1.Clear"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 64;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(-2147483648); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 65;BA.debugLine="For i=0 To c.RowCount -1"; -Debug.ShouldStop(1); -{ -final int step14 = 1; -final int limit14 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step14 > 0 && _i <= limit14) || (step14 < 0 && _i >= limit14) ;_i = ((int)(0 + _i + step14)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 66;BA.debugLine="c.Position=i"; -Debug.ShouldStop(2); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 67;BA.debugLine="Dim label1 As Label"; -Debug.ShouldStop(4); -_label1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label1", _label1); - BA.debugLineNum = 68;BA.debugLine="label1 = ListView1.TwoLinesLayout.Label"; -Debug.ShouldStop(8); -_label1 = __ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").getField(false,"Label");Debug.locals.put("label1", _label1); - BA.debugLineNum = 69;BA.debugLine="label1.TextSize = 15"; -Debug.ShouldStop(16); -_label1.runMethod(true,"setTextSize",BA.numberCast(float.class, 15)); - BA.debugLineNum = 70;BA.debugLine="label1.TextColor = Colors.Black"; -Debug.ShouldStop(32); -_label1.runMethod(true,"setTextColor",c_historico.__c.getField(false,"Colors").getField(true,"Black")); - BA.debugLineNum = 71;BA.debugLine="Dim label2 As Label"; -Debug.ShouldStop(64); -_label2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label2", _label2); - BA.debugLineNum = 72;BA.debugLine="label2 = ListView1.TwoLinesLayout.SecondLabel"; -Debug.ShouldStop(128); -_label2 = __ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").getField(false,"SecondLabel");Debug.locals.put("label2", _label2); - BA.debugLineNum = 73;BA.debugLine="label2.TextSize = 10"; -Debug.ShouldStop(256); -_label2.runMethod(true,"setTextSize",BA.numberCast(float.class, 10)); - BA.debugLineNum = 74;BA.debugLine="label2.TextColor = Colors.Blue"; -Debug.ShouldStop(512); -_label2.runMethod(true,"setTextColor",c_historico.__c.getField(false,"Colors").getField(true,"Blue")); - BA.debugLineNum = 75;BA.debugLine="ListView1.AddTwoLines(c.GetString(\"HVD_PRONOMBR"; -Debug.ShouldStop(1024); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runVoidMethod ("AddTwoLines",(Object)(BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HVD_PRONOMBRE"))))),(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("Cantidad #"),__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HVD_CANT"))),RemoteObject.createImmutable(" SubTotal $"),__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HVD_COSTO_TOT"))))))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 78;BA.debugLine="If Existe <> 0 Then"; -Debug.ShouldStop(8192); -if (RemoteObject.solveBoolean("!",__ref.getField(true,"_existe" /*RemoteObject*/ ),BA.NumberToString(0))) { - BA.debugLineNum = 79;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select SUM(H"; -Debug.ShouldStop(16384); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_historico._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select SUM(HVD_CANT) AS PC_NOART, SUM(HVD_COSTO_TOT) AS PC_MONTO from HIST_VENTAS where HVD_CLIENTE in (Select CUENTA from cuentaa)")))); - BA.debugLineNum = 80;BA.debugLine="C.Position=0"; -Debug.ShouldStop(32768); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 81;BA.debugLine="L_CANT.Text = c.GetString(\"PC_NOART\")"; -Debug.ShouldStop(65536); -__ref.getField(false,"_l_cant" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_NOART"))))); - BA.debugLineNum = 82;BA.debugLine="L_TOTAL.Text = c.GetString(\"PC_MONTO\")"; -Debug.ShouldStop(131072); -__ref.getField(false,"_l_total" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_MONTO"))))); - }; - BA.debugLineNum = 84;BA.debugLine="End Sub"; -Debug.ShouldStop(524288); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b4xpage_closerequest(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_CloseRequest (c_historico) ","c_historico",14,__ref.getField(false, "ba"),__ref,95); -if (RapidSub.canDelegate("b4xpage_closerequest")) { return __ref.runUserSub(false, "c_historico","b4xpage_closerequest", __ref);} -ResumableSub_B4XPage_CloseRequest rsub = new ResumableSub_B4XPage_CloseRequest(null,__ref); -rsub.remoteResumableSub = anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSubForFilter(); -rsub.resume(null, null); -return RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.keywords.Common.ResumableSubWrapper"), rsub.remoteResumableSub); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_B4XPage_CloseRequest extends BA.ResumableSub { -public ResumableSub_B4XPage_CloseRequest(keymon.lat.medicomed.c_historico parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.c_historico parent; - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_CloseRequest (c_historico) ","c_historico",14,__ref.getField(false, "ba"),__ref,95); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -{ -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,RemoteObject.createImmutable(null));return;} -case 0: -//C -this.state = -1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 98;BA.debugLine="B4XPages.ShowPage(\"Principal\")"; -Debug.ShouldStop(2); -parent._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Principal"))); - BA.debugLineNum = 99;BA.debugLine="Return False"; -Debug.ShouldStop(4); -if (true) { -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,(parent.__c.getField(true,"False")));return;}; - BA.debugLineNum = 100;BA.debugLine="End Sub"; -Debug.ShouldStop(8); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _b4xpage_created(RemoteObject __ref,RemoteObject _root1) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Created (c_historico) ","c_historico",14,__ref.getField(false, "ba"),__ref,35); -if (RapidSub.canDelegate("b4xpage_created")) { return __ref.runUserSub(false, "c_historico","b4xpage_created", __ref, _root1);} -Debug.locals.put("Root1", _root1); - BA.debugLineNum = 35;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -Debug.ShouldStop(4); - BA.debugLineNum = 36;BA.debugLine="Root = Root1"; -Debug.ShouldStop(8); -__ref.setField ("_root" /*RemoteObject*/ ,_root1); - BA.debugLineNum = 38;BA.debugLine="ruta = File.DirInternal"; -Debug.ShouldStop(32); -__ref.setField ("_ruta" /*RemoteObject*/ ,c_historico.__c.getField(false,"File").runMethod(true,"getDirInternal")); - BA.debugLineNum = 39;BA.debugLine="Root.LoadLayout(\"nota\")"; -Debug.ShouldStop(64); -__ref.getField(false,"_root" /*RemoteObject*/ ).runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("nota")),__ref.getField(false, "ba")); - BA.debugLineNum = 40;BA.debugLine="borra.Visible = False"; -Debug.ShouldStop(128); -__ref.getField(false,"_borra" /*RemoteObject*/ ).runMethod(true,"setVisible",c_historico.__c.getField(true,"False")); - BA.debugLineNum = 41;BA.debugLine="Titulo.Text = \"Acumulado\""; -Debug.ShouldStop(256); -__ref.getField(false,"_titulo" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("Acumulado")); - BA.debugLineNum = 42;BA.debugLine="b_desc.Visible = False"; -Debug.ShouldStop(512); -__ref.getField(false,"_b_desc" /*RemoteObject*/ ).runMethod(true,"setVisible",c_historico.__c.getField(true,"False")); - BA.debugLineNum = 43;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("=",c_historico.__c.getField(false,"File").runMethod(true,"Exists",(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(RemoteObject.createImmutable("kmt.db"))),c_historico.__c.getField(true,"False"))) { - BA.debugLineNum = 44;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; -Debug.ShouldStop(2048); -c_historico.__c.getField(false,"File").runVoidMethod ("Copy",(Object)(c_historico.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(BA.ObjectToString("kmt.db")),(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(RemoteObject.createImmutable("kmt.db"))); - }; - BA.debugLineNum = 47;BA.debugLine="End Sub"; -Debug.ShouldStop(16384); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Private Root As B4XView 'ignore"; -c_historico._root = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_root",c_historico._root); - //BA.debugLineNum = 3;BA.debugLine="Private xui As XUI 'ignore"; -c_historico._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",c_historico._xui); - //BA.debugLineNum = 5;BA.debugLine="Dim g As GPS"; -c_historico._g = RemoteObject.createNew ("anywheresoftware.b4a.gps.GPS");__ref.setField("_g",c_historico._g); - //BA.debugLineNum = 6;BA.debugLine="Dim clie_id As String"; -c_historico._clie_id = RemoteObject.createImmutable("");__ref.setField("_clie_id",c_historico._clie_id); - //BA.debugLineNum = 7;BA.debugLine="Dim sDate,sTime As String"; -c_historico._sdate = RemoteObject.createImmutable("");__ref.setField("_sdate",c_historico._sdate); -c_historico._stime = RemoteObject.createImmutable("");__ref.setField("_stime",c_historico._stime); - //BA.debugLineNum = 8;BA.debugLine="Dim usuario As String"; -c_historico._usuario = RemoteObject.createImmutable("");__ref.setField("_usuario",c_historico._usuario); - //BA.debugLineNum = 10;BA.debugLine="Dim c As Cursor"; -c_historico._c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_c",c_historico._c); - //BA.debugLineNum = 11;BA.debugLine="Dim ruta As String"; -c_historico._ruta = RemoteObject.createImmutable("");__ref.setField("_ruta",c_historico._ruta); - //BA.debugLineNum = 12;BA.debugLine="Dim Regresar As Button"; -c_historico._regresar = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_regresar",c_historico._regresar); - //BA.debugLineNum = 15;BA.debugLine="Dim ListView1 As ListView"; -c_historico._listview1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ListViewWrapper");__ref.setField("_listview1",c_historico._listview1); - //BA.debugLineNum = 16;BA.debugLine="Dim L_CANT As Label"; -c_historico._l_cant = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_cant",c_historico._l_cant); - //BA.debugLineNum = 17;BA.debugLine="Dim L_TOTAL As Label"; -c_historico._l_total = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_total",c_historico._l_total); - //BA.debugLineNum = 18;BA.debugLine="Dim borra As Button"; -c_historico._borra = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_borra",c_historico._borra); - //BA.debugLineNum = 19;BA.debugLine="Dim Existe As String"; -c_historico._existe = RemoteObject.createImmutable("");__ref.setField("_existe",c_historico._existe); - //BA.debugLineNum = 20;BA.debugLine="Dim result As String"; -c_historico._result = RemoteObject.createImmutable("");__ref.setField("_result",c_historico._result); - //BA.debugLineNum = 23;BA.debugLine="Private Titulo As Label"; -c_historico._titulo = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_titulo",c_historico._titulo); - //BA.debugLineNum = 24;BA.debugLine="Private b_desc As Button"; -c_historico._b_desc = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_desc",c_historico._b_desc); - //BA.debugLineNum = 25;BA.debugLine="Private ListView2 As ListView"; -c_historico._listview2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ListViewWrapper");__ref.setField("_listview2",c_historico._listview2); - //BA.debugLineNum = 26;BA.debugLine="Dim tgl As Toggle"; -c_historico._tgl = RemoteObject.createNew ("com.rootsoft.togglelibrary.ToggleLibrary");__ref.setField("_tgl",c_historico._tgl); - //BA.debugLineNum = 27;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _gps_locationchanged(RemoteObject __ref,RemoteObject _location1) throws Exception{ -try { - Debug.PushSubsStack("GPS_LocationChanged (c_historico) ","c_historico",14,__ref.getField(false, "ba"),__ref,86); -if (RapidSub.canDelegate("gps_locationchanged")) { return __ref.runUserSub(false, "c_historico","gps_locationchanged", __ref, _location1);} -Debug.locals.put("Location1", _location1); - BA.debugLineNum = 86;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; -Debug.ShouldStop(2097152); - BA.debugLineNum = 89;BA.debugLine="End Sub"; -Debug.ShouldStop(16777216); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (c_historico) ","c_historico",14,__ref.getField(false, "ba"),__ref,30); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "c_historico","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 30;BA.debugLine="Public Sub Initialize As Object"; -Debug.ShouldStop(536870912); - BA.debugLineNum = 31;BA.debugLine="Return Me"; -Debug.ShouldStop(1073741824); -if (true) return __ref; - BA.debugLineNum = 32;BA.debugLine="End Sub"; -Debug.ShouldStop(-2147483648); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _listview1_itemclick(RemoteObject __ref,RemoteObject _position,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("ListView1_ItemClick (c_historico) ","c_historico",14,__ref.getField(false, "ba"),__ref,107); -if (RapidSub.canDelegate("listview1_itemclick")) { return __ref.runUserSub(false, "c_historico","listview1_itemclick", __ref, _position, _value);} -RemoteObject _label1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -int _i = 0; -Debug.locals.put("Position", _position); -Debug.locals.put("Value", _value); - BA.debugLineNum = 107;BA.debugLine="Sub ListView1_ItemClick (Position As Int, Value As"; -Debug.ShouldStop(1024); - BA.debugLineNum = 108;BA.debugLine="ListView2.Visible = True"; -Debug.ShouldStop(2048); -__ref.getField(false,"_listview2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_historico.__c.getField(true,"True")); - BA.debugLineNum = 109;BA.debugLine="ListView1.Visible = False"; -Debug.ShouldStop(4096); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(true,"setVisible",c_historico.__c.getField(true,"False")); - BA.debugLineNum = 110;BA.debugLine="Dim label1 As Label"; -Debug.ShouldStop(8192); -_label1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label1", _label1); - BA.debugLineNum = 111;BA.debugLine="For i=0 To 20"; -Debug.ShouldStop(16384); -{ -final int step4 = 1; -final int limit4 = 20; -_i = 0 ; -for (;(step4 > 0 && _i <= limit4) || (step4 < 0 && _i >= limit4) ;_i = ((int)(0 + _i + step4)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 112;BA.debugLine="label1 = ListView2.SingleLineLayout.Label"; -Debug.ShouldStop(32768); -_label1 = __ref.getField(false,"_listview2" /*RemoteObject*/ ).runMethod(false,"getSingleLineLayout").getField(false,"Label");Debug.locals.put("label1", _label1); - BA.debugLineNum = 113;BA.debugLine="label1.TextSize = 15"; -Debug.ShouldStop(65536); -_label1.runMethod(true,"setTextSize",BA.numberCast(float.class, 15)); - BA.debugLineNum = 114;BA.debugLine="label1.TextColor = Colors.Black"; -Debug.ShouldStop(131072); -_label1.runMethod(true,"setTextColor",c_historico.__c.getField(false,"Colors").getField(true,"Black")); - BA.debugLineNum = 115;BA.debugLine="ListView2.AddSingleLine(i)"; -Debug.ShouldStop(262144); -__ref.getField(false,"_listview2" /*RemoteObject*/ ).runVoidMethod ("AddSingleLine",(Object)(BA.ObjectToCharSequence(_i))); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 117;BA.debugLine="End Sub"; -Debug.ShouldStop(1048576); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _listview2_itemclick(RemoteObject __ref,RemoteObject _position,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("ListView2_ItemClick (c_historico) ","c_historico",14,__ref.getField(false, "ba"),__ref,102); -if (RapidSub.canDelegate("listview2_itemclick")) { return __ref.runUserSub(false, "c_historico","listview2_itemclick", __ref, _position, _value);} -Debug.locals.put("Position", _position); -Debug.locals.put("Value", _value); - BA.debugLineNum = 102;BA.debugLine="Sub ListView2_ItemClick (Position As Int, Value As"; -Debug.ShouldStop(32); - BA.debugLineNum = 103;BA.debugLine="ListView2.Visible = False"; -Debug.ShouldStop(64); -__ref.getField(false,"_listview2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_historico.__c.getField(true,"False")); - BA.debugLineNum = 104;BA.debugLine="ListView1.Visible = True"; -Debug.ShouldStop(128); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(true,"setVisible",c_historico.__c.getField(true,"True")); - BA.debugLineNum = 105;BA.debugLine="End Sub"; -Debug.ShouldStop(256); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _regresar_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Regresar_Click (c_historico) ","c_historico",14,__ref.getField(false, "ba"),__ref,91); -if (RapidSub.canDelegate("regresar_click")) { return __ref.runUserSub(false, "c_historico","regresar_click", __ref);} - BA.debugLineNum = 91;BA.debugLine="Sub Regresar_Click"; -Debug.ShouldStop(67108864); - BA.debugLineNum = 92;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; -Debug.ShouldStop(134217728); -c_historico._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Cliente"))); - BA.debugLineNum = 93;BA.debugLine="End Sub"; -Debug.ShouldStop(268435456); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_mapas.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_mapas.java deleted file mode 100644 index b5fa868..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_mapas.java +++ /dev/null @@ -1,31 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class c_mapas { - public static RemoteObject myClass; - public c_mapas() { - } - public static PCBA staticBA = new PCBA(null, c_mapas.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _root = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"DateUtils",_ref.getField(false, "_dateutils"),"Root",_ref.getField(false, "_root"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_mapas_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_mapas_subs_0.java deleted file mode 100644 index 51b805c..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_mapas_subs_0.java +++ /dev/null @@ -1,59 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class c_mapas_subs_0 { - - -public static RemoteObject _b4xpage_created(RemoteObject __ref,RemoteObject _root1) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Created (c_mapas) ","c_mapas",6,__ref.getField(false, "ba"),__ref,12); -if (RapidSub.canDelegate("b4xpage_created")) { return __ref.runUserSub(false, "c_mapas","b4xpage_created", __ref, _root1);} -Debug.locals.put("Root1", _root1); - BA.debugLineNum = 12;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -Debug.ShouldStop(2048); - BA.debugLineNum = 13;BA.debugLine="Root = Root1"; -Debug.ShouldStop(4096); -__ref.setField ("_root" /*RemoteObject*/ ,_root1); - BA.debugLineNum = 16;BA.debugLine="End Sub"; -Debug.ShouldStop(32768); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Private Root As B4XView 'ignore"; -c_mapas._root = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_root",c_mapas._root); - //BA.debugLineNum = 3;BA.debugLine="Private xui As XUI 'ignore"; -c_mapas._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",c_mapas._xui); - //BA.debugLineNum = 4;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (c_mapas) ","c_mapas",6,__ref.getField(false, "ba"),__ref,7); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "c_mapas","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 7;BA.debugLine="Public Sub Initialize As Object"; -Debug.ShouldStop(64); - BA.debugLineNum = 8;BA.debugLine="Return Me"; -Debug.ShouldStop(128); -if (true) return __ref; - BA.debugLineNum = 9;BA.debugLine="End Sub"; -Debug.ShouldStop(256); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_nota.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_nota.java deleted file mode 100644 index ce43035..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_nota.java +++ /dev/null @@ -1,54 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class c_nota { - public static RemoteObject myClass; - public c_nota() { - } - public static PCBA staticBA = new PCBA(null, c_nota.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _root = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _skmt = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL"); -public static RemoteObject _g = RemoteObject.declareNull("anywheresoftware.b4a.gps.GPS"); -public static RemoteObject _clie_id = RemoteObject.createImmutable(""); -public static RemoteObject _sdate = RemoteObject.createImmutable(""); -public static RemoteObject _stime = RemoteObject.createImmutable(""); -public static RemoteObject _usuario = RemoteObject.createImmutable(""); -public static RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _ruta = RemoteObject.createImmutable(""); -public static RemoteObject _regresar = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _listview1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ListViewWrapper"); -public static RemoteObject _l_cant = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_total = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _borra = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _existe = RemoteObject.createImmutable(""); -public static RemoteObject _result = RemoteObject.createImmutable(""); -public static RemoteObject _desc = RemoteObject.createImmutable(""); -public static RemoteObject _titulo = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _b_desc = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _descuento = RemoteObject.createImmutable(""); -public static RemoteObject _folio = RemoteObject.createImmutable(""); -public static RemoteObject _tgl = RemoteObject.declareNull("com.rootsoft.togglelibrary.ToggleLibrary"); -public static RemoteObject _almacen = RemoteObject.createImmutable(""); -public static RemoteObject _p_nota = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"almacen",_ref.getField(false, "_almacen"),"b_desc",_ref.getField(false, "_b_desc"),"borra",_ref.getField(false, "_borra"),"c",_ref.getField(false, "_c"),"clie_id",_ref.getField(false, "_clie_id"),"DateUtils",_ref.getField(false, "_dateutils"),"DESC",_ref.getField(false, "_desc"),"DESCUENTO",_ref.getField(false, "_descuento"),"Existe",_ref.getField(false, "_existe"),"folio",_ref.getField(false, "_folio"),"g",_ref.getField(false, "_g"),"L_CANT",_ref.getField(false, "_l_cant"),"L_TOTAL",_ref.getField(false, "_l_total"),"ListView1",_ref.getField(false, "_listview1"),"p_nota",_ref.getField(false, "_p_nota"),"Regresar",_ref.getField(false, "_regresar"),"result",_ref.getField(false, "_result"),"Root",_ref.getField(false, "_root"),"ruta",_ref.getField(false, "_ruta"),"sDate",_ref.getField(false, "_sdate"),"skmt",_ref.getField(false, "_skmt"),"sTime",_ref.getField(false, "_stime"),"tgl",_ref.getField(false, "_tgl"),"Titulo",_ref.getField(false, "_titulo"),"usuario",_ref.getField(false, "_usuario"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_nota_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_nota_subs_0.java deleted file mode 100644 index d975953..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_nota_subs_0.java +++ /dev/null @@ -1,744 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class c_nota_subs_0 { - - -public static RemoteObject _activity_pause(RemoteObject __ref,RemoteObject _userclosed) throws Exception{ -try { - Debug.PushSubsStack("Activity_Pause (c_nota) ","c_nota",7,__ref.getField(false, "ba"),__ref,108); -if (RapidSub.canDelegate("activity_pause")) { return __ref.runUserSub(false, "c_nota","activity_pause", __ref, _userclosed);} -Debug.locals.put("UserClosed", _userclosed); - BA.debugLineNum = 108;BA.debugLine="Sub Activity_Pause (UserClosed As Boolean)"; -Debug.ShouldStop(2048); - BA.debugLineNum = 110;BA.debugLine="End Sub"; -Debug.ShouldStop(8192); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_desc_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_desc_Click (c_nota) ","c_nota",7,__ref.getField(false, "ba"),__ref,188); -if (RapidSub.canDelegate("b_desc_click")) { return __ref.runUserSub(false, "c_nota","b_desc_click", __ref);} - BA.debugLineNum = 188;BA.debugLine="Sub b_desc_Click"; -Debug.ShouldStop(134217728); - BA.debugLineNum = 189;BA.debugLine="If DESCUENTO = \"MENOS\" Then"; -Debug.ShouldStop(268435456); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_descuento" /*RemoteObject*/ ),BA.ObjectToString("MENOS"))) { - BA.debugLineNum = 190;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; -Debug.ShouldStop(536870912); -c_nota.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("MM/dd/yyyy")); - BA.debugLineNum = 191;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(1073741824); -__ref.setField ("_sdate" /*RemoteObject*/ ,c_nota.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(c_nota.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 192;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -Debug.ShouldStop(-2147483648); -__ref.setField ("_stime" /*RemoteObject*/ ,c_nota.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_nota.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 193;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; -Debug.ShouldStop(1); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select CUENTA from cuentaa")))); - BA.debugLineNum = 194;BA.debugLine="c.Position=0"; -Debug.ShouldStop(2); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 195;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -Debug.ShouldStop(4); -__ref.setField ("_clie_id" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUENTA")))); - BA.debugLineNum = 196;BA.debugLine="c.Close"; -Debug.ShouldStop(8); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 197;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; -Debug.ShouldStop(16); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select USUARIO from usuarioa")))); - BA.debugLineNum = 198;BA.debugLine="c.Position=0"; -Debug.ShouldStop(32); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 199;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(64); -__ref.setField ("_usuario" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")))); - BA.debugLineNum = 200;BA.debugLine="c.Close"; -Debug.ShouldStop(128); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 201;BA.debugLine="result = Msgbox2(\"Seguro que desea dar descuent"; -Debug.ShouldStop(256); -__ref.setField ("_result" /*RemoteObject*/ ,BA.NumberToString(c_nota.__c.runMethodAndSync(true,"Msgbox2",(Object)(BA.ObjectToCharSequence("Seguro que desea dar descuento del 5%?")),(Object)(BA.ObjectToCharSequence("Dar descuento")),(Object)(BA.ObjectToString("Si")),(Object)(BA.ObjectToString("")),(Object)(BA.ObjectToString("No")),(Object)((c_nota.__c.runMethod(false,"LoadBitmap",(Object)(c_nota.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(RemoteObject.createImmutable("alert2.png"))).getObject())),__ref.getField(false, "ba")))); - BA.debugLineNum = 202;BA.debugLine="If result = DialogResponse.POSITIVE Then"; -Debug.ShouldStop(512); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_result" /*RemoteObject*/ ),BA.NumberToString(c_nota.__c.getField(false,"DialogResponse").getField(true,"POSITIVE")))) { - BA.debugLineNum = 203;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE ped"; -Debug.ShouldStop(1024); -c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("UPDATE pedido SET PE_COSTO_TOT = PE_COSTO_TOT * .95, PE_DESC = 5 WHERE PE_CLIENTE In (select cuenta from cuentaa)"))); - BA.debugLineNum = 204;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum("; -Debug.ShouldStop(2048); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, count(*) as CUANTOS FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)")))); - BA.debugLineNum = 205;BA.debugLine="c.Position=0"; -Debug.ShouldStop(4096); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 206;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(8192); -c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"))); - BA.debugLineNum = 207;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert in"; -Debug.ShouldStop(16384); -c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT) VALUES (?,?,?,?,?,?,?)")),(Object)(c_nota.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {7},new Object[] {(__ref.getField(true,"_clie_id" /*RemoteObject*/ )),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CANT_CLIE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_CLIE")))),(c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lon_gps" /*RemoteObject*/ )),(c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 208;BA.debugLine="c.Close"; -Debug.ShouldStop(32768); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 209;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(65536); -__ref.runClassMethod (keymon.lat.medicomed.c_nota.class, "_b4xpage_appear" /*RemoteObject*/ ); - }; - }else -{ BA.debugLineNum = 211;BA.debugLine="ELSE IF DESCUENTO = \"MAS\" Then"; -Debug.ShouldStop(262144); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_descuento" /*RemoteObject*/ ),BA.ObjectToString("MAS"))) { - BA.debugLineNum = 212;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; -Debug.ShouldStop(524288); -c_nota.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("MM/dd/yyyy")); - BA.debugLineNum = 213;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(1048576); -__ref.setField ("_sdate" /*RemoteObject*/ ,c_nota.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(c_nota.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 214;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -Debug.ShouldStop(2097152); -__ref.setField ("_stime" /*RemoteObject*/ ,c_nota.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_nota.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 215;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select CUENTA from cuentaa")))); - BA.debugLineNum = 216;BA.debugLine="c.Position=0"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 217;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -Debug.ShouldStop(16777216); -__ref.setField ("_clie_id" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUENTA")))); - BA.debugLineNum = 218;BA.debugLine="c.Close"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 219;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select USUARIO from usuarioa")))); - BA.debugLineNum = 220;BA.debugLine="c.Position=0"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 221;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(268435456); -__ref.setField ("_usuario" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")))); - BA.debugLineNum = 222;BA.debugLine="c.Close"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 223;BA.debugLine="result = Msgbox2(\"Seguro que desea CANCELAR el"; -Debug.ShouldStop(1073741824); -__ref.setField ("_result" /*RemoteObject*/ ,BA.NumberToString(c_nota.__c.runMethodAndSync(true,"Msgbox2",(Object)(BA.ObjectToCharSequence("Seguro que desea CANCELAR el descuento?")),(Object)(BA.ObjectToCharSequence("Cancelar descuento")),(Object)(BA.ObjectToString("Si")),(Object)(BA.ObjectToString("")),(Object)(BA.ObjectToString("No")),(Object)((c_nota.__c.runMethod(false,"LoadBitmap",(Object)(c_nota.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(RemoteObject.createImmutable("alert2.png"))).getObject())),__ref.getField(false, "ba")))); - BA.debugLineNum = 224;BA.debugLine="If result = DialogResponse.POSITIVE Then"; -Debug.ShouldStop(-2147483648); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_result" /*RemoteObject*/ ),BA.NumberToString(c_nota.__c.getField(false,"DialogResponse").getField(true,"POSITIVE")))) { - BA.debugLineNum = 225;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE ped"; -Debug.ShouldStop(1); -c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("UPDATE pedido SET PE_COSTO_TOT = PE_COSTO_TOT / .95, PE_DESC = 0 WHERE PE_CLIENTE In (select cuenta from cuentaa)"))); - BA.debugLineNum = 226;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum("; -Debug.ShouldStop(2); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, count(*) as CUANTOS FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)")))); - BA.debugLineNum = 227;BA.debugLine="c.Position=0"; -Debug.ShouldStop(4); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 228;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(8); -c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"))); - BA.debugLineNum = 229;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert in"; -Debug.ShouldStop(16); -c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT) VALUES (?,?,?,?,?,?,?)")),(Object)(c_nota.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {7},new Object[] {(__ref.getField(true,"_clie_id" /*RemoteObject*/ )),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CANT_CLIE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_CLIE")))),(c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lon_gps" /*RemoteObject*/ )),(c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 230;BA.debugLine="c.Close"; -Debug.ShouldStop(32); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 231;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(64); -__ref.runClassMethod (keymon.lat.medicomed.c_nota.class, "_b4xpage_appear" /*RemoteObject*/ ); - }; - }} -; - BA.debugLineNum = 234;BA.debugLine="End Sub"; -Debug.ShouldStop(512); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b4xpage_appear(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Appear (c_nota) ","c_nota",7,__ref.getField(false, "ba"),__ref,55); -if (RapidSub.canDelegate("b4xpage_appear")) { return __ref.runUserSub(false, "c_nota","b4xpage_appear", __ref);} -RemoteObject _cs = RemoteObject.declareNull("anywheresoftware.b4a.objects.CSBuilder"); -int _i = 0; -RemoteObject _label1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _textcolor = RemoteObject.createImmutable(0); -RemoteObject _label2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); - BA.debugLineNum = 55;BA.debugLine="Sub B4XPage_Appear"; -Debug.ShouldStop(4194304); - BA.debugLineNum = 56;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then"; -Debug.ShouldStop(8388608); -if (c_nota.__c.runMethod(true,"Not",(Object)(c_nota._starter._gps /*RemoteObject*/ .runMethod(true,"getGPSEnabled"))).get().booleanValue()) { - BA.debugLineNum = 57;BA.debugLine="ToastMessageShow(\"Es necesario tener el GPS ence"; -Debug.ShouldStop(16777216); -c_nota.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Es necesario tener el GPS encendido")),(Object)(c_nota.__c.getField(true,"True"))); - BA.debugLineNum = 58;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent"; -Debug.ShouldStop(33554432); -c_nota.__c.runVoidMethod ("StartActivity",__ref.getField(false, "ba"),(Object)((c_nota._starter._gps /*RemoteObject*/ .runMethod(false,"getLocationSettingsIntent")))); - }; - BA.debugLineNum = 60;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select ID_AL"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select ID_ALMACEN from CAT_ALMACEN")))); - BA.debugLineNum = 61;BA.debugLine="C.Position =0"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 62;BA.debugLine="almacen = C.GetString(\"ID_ALMACEN\")"; -Debug.ShouldStop(536870912); -__ref.setField ("_almacen" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("ID_ALMACEN")))); - BA.debugLineNum = 63;BA.debugLine="C.Close"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 64;BA.debugLine="L_CANT.Text =\"\""; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_l_cant" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("")); - BA.debugLineNum = 65;BA.debugLine="L_TOTAL.Text=\"\""; -Debug.ShouldStop(1); -__ref.getField(false,"_l_total" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("")); - BA.debugLineNum = 66;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select count("; -Debug.ShouldStop(2); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select count(*) as EXISTE from pedido_cliente WHERE pc_cliente IN (Select CUENTA from cuentaa)")))); - BA.debugLineNum = 67;BA.debugLine="C.Position=0"; -Debug.ShouldStop(4); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 68;BA.debugLine="Existe = C.GetString(\"EXISTE\")"; -Debug.ShouldStop(8); -__ref.setField ("_existe" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("EXISTE")))); - BA.debugLineNum = 69;BA.debugLine="C.Close"; -Debug.ShouldStop(16); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 70;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select PE_PRO"; -Debug.ShouldStop(32); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select PE_PRONOMBRE,PE_COSTO_TOT, PE_CANT, PE_FOLIO, PE_CEDIS FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa) order by PE_CEDIS, PE_PRONOMBRE")))); - BA.debugLineNum = 71;BA.debugLine="ListView1.Clear"; -Debug.ShouldStop(64); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 72;BA.debugLine="Private cs As CSBuilder"; -Debug.ShouldStop(128); -_cs = RemoteObject.createNew ("anywheresoftware.b4a.objects.CSBuilder");Debug.locals.put("cs", _cs); - BA.debugLineNum = 73;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(256); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 74;BA.debugLine="For i=0 To c.RowCount -1"; -Debug.ShouldStop(512); -{ -final int step19 = 1; -final int limit19 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step19 > 0 && _i <= limit19) || (step19 < 0 && _i >= limit19) ;_i = ((int)(0 + _i + step19)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 75;BA.debugLine="cs.Initialize"; -Debug.ShouldStop(1024); -_cs.runVoidMethod ("Initialize"); - BA.debugLineNum = 76;BA.debugLine="c.Position=i"; -Debug.ShouldStop(2048); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 77;BA.debugLine="Dim label1 As Label"; -Debug.ShouldStop(4096); -_label1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label1", _label1); - BA.debugLineNum = 78;BA.debugLine="label1 = ListView1.TwoLinesLayout.Label"; -Debug.ShouldStop(8192); -_label1 = __ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").getField(false,"Label");Debug.locals.put("label1", _label1); - BA.debugLineNum = 79;BA.debugLine="label1.TextSize = 15"; -Debug.ShouldStop(16384); -_label1.runMethod(true,"setTextSize",BA.numberCast(float.class, 15)); - BA.debugLineNum = 80;BA.debugLine="label1.TextColor = Colors.Black"; -Debug.ShouldStop(32768); -_label1.runMethod(true,"setTextColor",c_nota.__c.getField(false,"Colors").getField(true,"Black")); - BA.debugLineNum = 81;BA.debugLine="label1.color = Colors.White"; -Debug.ShouldStop(65536); -_label1.runVoidMethod ("setColor",c_nota.__c.getField(false,"Colors").getField(true,"White")); - BA.debugLineNum = 82;BA.debugLine="Private textColor As Int = Colors.black"; -Debug.ShouldStop(131072); -_textcolor = c_nota.__c.getField(false,"Colors").getField(true,"Black");Debug.locals.put("textColor", _textcolor);Debug.locals.put("textColor", _textcolor); - BA.debugLineNum = 84;BA.debugLine="If Not(IsNumber(c.GetString(\"PE_CEDIS\"))) Then"; -Debug.ShouldStop(524288); -if (c_nota.__c.runMethod(true,"Not",(Object)(c_nota.__c.runMethod(true,"IsNumber",(Object)(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CEDIS"))))))).get().booleanValue()) { -_textcolor = c_nota.__c.getField(false,"Colors").runMethod(true,"RGB",(Object)(BA.numberCast(int.class, 210)),(Object)(BA.numberCast(int.class, 105)),(Object)(BA.numberCast(int.class, 30)));Debug.locals.put("textColor", _textcolor);}; - BA.debugLineNum = 85;BA.debugLine="Dim label2 As Label"; -Debug.ShouldStop(1048576); -_label2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label2", _label2); - BA.debugLineNum = 86;BA.debugLine="label2 = ListView1.TwoLinesLayout.SecondLabel"; -Debug.ShouldStop(2097152); -_label2 = __ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").getField(false,"SecondLabel");Debug.locals.put("label2", _label2); - BA.debugLineNum = 87;BA.debugLine="label2.TextSize = 10"; -Debug.ShouldStop(4194304); -_label2.runMethod(true,"setTextSize",BA.numberCast(float.class, 10)); - BA.debugLineNum = 88;BA.debugLine="label2.TextColor = Colors.Blue"; -Debug.ShouldStop(8388608); -_label2.runMethod(true,"setTextColor",c_nota.__c.getField(false,"Colors").getField(true,"Blue")); - BA.debugLineNum = 89;BA.debugLine="ListView1.AddTwoLines(cs.Color(textColor).appen"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runVoidMethod ("AddTwoLines",(Object)(BA.ObjectToCharSequence(_cs.runMethod(false,"Color",(Object)(_textcolor)).runMethod(false,"Append",(Object)(BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_PRONOMBRE")))))).runMethod(false,"Pop").getObject())),(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("Cantidad #"),__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CANT"))),RemoteObject.createImmutable(" SubTotal $"),__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_COSTO_TOT"))),RemoteObject.createImmutable(" Folio "),__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_FOLIO"))))))); - BA.debugLineNum = 90;BA.debugLine="folio = c.GetString(\"PE_FOLIO\")"; -Debug.ShouldStop(33554432); -__ref.setField ("_folio" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_FOLIO")))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 93;BA.debugLine="If Existe <> 0 Then"; -Debug.ShouldStop(268435456); -if (RemoteObject.solveBoolean("!",__ref.getField(true,"_existe" /*RemoteObject*/ ),BA.NumberToString(0))) { - BA.debugLineNum = 94;BA.debugLine="c =B4XPages.MainPage.skmt.ExecQuery(\"select sum("; -Debug.ShouldStop(536870912); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select sum(PE_CANT) as PC_NOART, sum (PE_COSTO_TOT) as PC_MONTO from PEDIDO where PE_CLIENTE in (Select CUENTA from cuentaa) AND PE_PROID NOT IN (SELECT CAT_PA_ID FROM PROMOS_COMP ) ")))); - BA.debugLineNum = 96;BA.debugLine="C.Position=0"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 97;BA.debugLine="L_CANT.Text = c.GetString(\"PC_NOART\")"; -Debug.ShouldStop(1); -__ref.getField(false,"_l_cant" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_NOART"))))); - BA.debugLineNum = 98;BA.debugLine="L_TOTAL.Text = c.GetString(\"PC_MONTO\")"; -Debug.ShouldStop(2); -__ref.getField(false,"_l_total" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_MONTO"))))); - BA.debugLineNum = 99;BA.debugLine="c.Close"; -Debug.ShouldStop(4); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 100;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select SUM(I"; -Debug.ShouldStop(8); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select SUM(IFNULL(PE_DESC,0)) AS DESCUENTO FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)")))); - BA.debugLineNum = 101;BA.debugLine="c.Position=0"; -Debug.ShouldStop(16); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 102;BA.debugLine="DESC = c.GetString(\"DESCUENTO\")"; -Debug.ShouldStop(32); -__ref.setField ("_desc" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("DESCUENTO")))); - BA.debugLineNum = 103;BA.debugLine="b_desc.Visible = False"; -Debug.ShouldStop(64); -__ref.getField(false,"_b_desc" /*RemoteObject*/ ).runMethod(true,"setVisible",c_nota.__c.getField(true,"False")); - }; - BA.debugLineNum = 105;BA.debugLine="If Subs.pedidoGuardado Then borra.Enabled = False"; -Debug.ShouldStop(256); -if (c_nota._subs.runMethod(true,"_pedidoguardado" /*RemoteObject*/ ,__ref.getField(false, "ba")).get().booleanValue()) { -__ref.getField(false,"_borra" /*RemoteObject*/ ).runMethod(true,"setEnabled",c_nota.__c.getField(true,"False"));} -else { -__ref.getField(false,"_borra" /*RemoteObject*/ ).runMethod(true,"setEnabled",c_nota.__c.getField(true,"True"));}; - BA.debugLineNum = 106;BA.debugLine="End Sub"; -Debug.ShouldStop(512); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b4xpage_closerequest(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_CloseRequest (c_nota) ","c_nota",7,__ref.getField(false, "ba"),__ref,121); -if (RapidSub.canDelegate("b4xpage_closerequest")) { return __ref.runUserSub(false, "c_nota","b4xpage_closerequest", __ref);} -ResumableSub_B4XPage_CloseRequest rsub = new ResumableSub_B4XPage_CloseRequest(null,__ref); -rsub.remoteResumableSub = anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSubForFilter(); -rsub.resume(null, null); -return RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.keywords.Common.ResumableSubWrapper"), rsub.remoteResumableSub); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_B4XPage_CloseRequest extends BA.ResumableSub { -public ResumableSub_B4XPage_CloseRequest(keymon.lat.medicomed.c_nota parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.c_nota parent; - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_CloseRequest (c_nota) ","c_nota",7,__ref.getField(false, "ba"),__ref,121); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -{ -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,RemoteObject.createImmutable(null));return;} -case 0: -//C -this.state = -1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 124;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; -Debug.ShouldStop(134217728); -parent._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Cliente"))); - BA.debugLineNum = 125;BA.debugLine="Return False"; -Debug.ShouldStop(268435456); -if (true) { -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,(parent.__c.getField(true,"False")));return;}; - BA.debugLineNum = 126;BA.debugLine="End Sub"; -Debug.ShouldStop(536870912); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _b4xpage_created(RemoteObject __ref,RemoteObject _root1) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Created (c_nota) ","c_nota",7,__ref.getField(false, "ba"),__ref,39); -if (RapidSub.canDelegate("b4xpage_created")) { return __ref.runUserSub(false, "c_nota","b4xpage_created", __ref, _root1);} -Debug.locals.put("Root1", _root1); - BA.debugLineNum = 39;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -Debug.ShouldStop(64); - BA.debugLineNum = 40;BA.debugLine="Root = Root1"; -Debug.ShouldStop(128); -__ref.setField ("_root" /*RemoteObject*/ ,_root1); - BA.debugLineNum = 41;BA.debugLine="ruta = File.DirInternal"; -Debug.ShouldStop(256); -__ref.setField ("_ruta" /*RemoteObject*/ ,c_nota.__c.getField(false,"File").runMethod(true,"getDirInternal")); - BA.debugLineNum = 42;BA.debugLine="Root.LoadLayout(\"nota\")"; -Debug.ShouldStop(512); -__ref.getField(false,"_root" /*RemoteObject*/ ).runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("nota")),__ref.getField(false, "ba")); - BA.debugLineNum = 43;BA.debugLine="borra.Visible = True"; -Debug.ShouldStop(1024); -__ref.getField(false,"_borra" /*RemoteObject*/ ).runMethod(true,"setVisible",c_nota.__c.getField(true,"True")); - BA.debugLineNum = 44;BA.debugLine="Titulo.Text = \"Pedido Actual\""; -Debug.ShouldStop(2048); -__ref.getField(false,"_titulo" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("Pedido Actual")); - BA.debugLineNum = 51;BA.debugLine="End Sub"; -Debug.ShouldStop(262144); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _borra_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("borra_Click (c_nota) ","c_nota",7,__ref.getField(false, "ba"),__ref,128); -if (RapidSub.canDelegate("borra_click")) { return __ref.runUserSub(false, "c_nota","borra_click", __ref);} -int _i = 0; - BA.debugLineNum = 128;BA.debugLine="Sub borra_Click"; -Debug.ShouldStop(-2147483648); - BA.debugLineNum = 129;BA.debugLine="If folio <> \"\" Then"; -Debug.ShouldStop(1); -if (RemoteObject.solveBoolean("!",__ref.getField(true,"_folio" /*RemoteObject*/ ),BA.ObjectToString(""))) { - BA.debugLineNum = 130;BA.debugLine="result = Msgbox2(\"Seguro que desea borrar el pe"; -Debug.ShouldStop(2); -__ref.setField ("_result" /*RemoteObject*/ ,BA.NumberToString(c_nota.__c.runMethodAndSync(true,"Msgbox2",(Object)(BA.ObjectToCharSequence("Seguro que desea borrar el pedido?")),(Object)(BA.ObjectToCharSequence("Cancelar pedido")),(Object)(BA.ObjectToString("Si")),(Object)(BA.ObjectToString("")),(Object)(BA.ObjectToString("No")),(Object)((c_nota.__c.runMethod(false,"LoadBitmap",(Object)(c_nota.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(RemoteObject.createImmutable("alert2.png"))).getObject())),__ref.getField(false, "ba")))); - BA.debugLineNum = 131;BA.debugLine="If result = DialogResponse.POSITIVE Then"; -Debug.ShouldStop(4); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_result" /*RemoteObject*/ ),BA.NumberToString(c_nota.__c.getField(false,"DialogResponse").getField(true,"POSITIVE")))) { - BA.debugLineNum = 132;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select PE_P"; -Debug.ShouldStop(8); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select PE_PROID,PE_CANT FROM PEDIDO where pe_cliente in (Select CUENTA from cuentaa) ")))); - BA.debugLineNum = 133;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(16); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 134;BA.debugLine="For i=0 To c.RowCount -1"; -Debug.ShouldStop(32); -{ -final int step6 = 1; -final int limit6 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step6 > 0 && _i <= limit6) || (step6 < 0 && _i >= limit6) ;_i = ((int)(0 + _i + step6)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 135;BA.debugLine="c.Position=i"; -Debug.ShouldStop(64); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 136;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update"; -Debug.ShouldStop(128); -c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen + ? where cat_gp_id = ?")),(Object)(c_nota.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CANT")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_PROID"))))}))))); - BA.debugLineNum = 137;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(256); -c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO INVENT_X_ENVIAR (ALMACEN , PROID , CANTIDAD ) VALUES(?,?,?) ")),(Object)(c_nota.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {3},new Object[] {(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_PROID")))),RemoteObject.createImmutable(((double)(Double.parseDouble(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CANT"))).get()))*-(double) (0 + 1)))}))))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 140;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(2048); -c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido_cliente where pc_cliente in (Select CUENTA from cuentaa)"))); - BA.debugLineNum = 141;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(4096); -c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido where pe_cliente in (Select CUENTA from cuentaa)"))); - BA.debugLineNum = 142;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt"; -Debug.ShouldStop(8192); -c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("UPDATE kmt_info set gestion = 0 where CAT_CL_CODIGO In (select cuenta from cuentaa)"))); - BA.debugLineNum = 143;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(16384); -__ref.runClassMethod (keymon.lat.medicomed.c_nota.class, "_b4xpage_appear" /*RemoteObject*/ ); - }; - }else { - BA.debugLineNum = 146;BA.debugLine="Msgbox(\"CLIENTE YA SE TRANSMITIO, FAVOR DE LLAMA"; -Debug.ShouldStop(131072); -c_nota.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("CLIENTE YA SE TRANSMITIO, FAVOR DE LLAMAR A SOPORTE PARA ASISTENCIA")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("AVISO"))),__ref.getField(false, "ba")); - }; - BA.debugLineNum = 148;BA.debugLine="End Sub"; -Debug.ShouldStop(524288); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Private Root As B4XView 'ignore"; -c_nota._root = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_root",c_nota._root); - //BA.debugLineNum = 3;BA.debugLine="Private xui As XUI 'ignore"; -c_nota._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",c_nota._xui); - //BA.debugLineNum = 5;BA.debugLine="Dim skmt As SQL"; -c_nota._skmt = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL");__ref.setField("_skmt",c_nota._skmt); - //BA.debugLineNum = 6;BA.debugLine="Dim g As GPS"; -c_nota._g = RemoteObject.createNew ("anywheresoftware.b4a.gps.GPS");__ref.setField("_g",c_nota._g); - //BA.debugLineNum = 7;BA.debugLine="Dim clie_id As String"; -c_nota._clie_id = RemoteObject.createImmutable("");__ref.setField("_clie_id",c_nota._clie_id); - //BA.debugLineNum = 8;BA.debugLine="Dim sDate,sTime As String"; -c_nota._sdate = RemoteObject.createImmutable("");__ref.setField("_sdate",c_nota._sdate); -c_nota._stime = RemoteObject.createImmutable("");__ref.setField("_stime",c_nota._stime); - //BA.debugLineNum = 9;BA.debugLine="Dim usuario As String"; -c_nota._usuario = RemoteObject.createImmutable("");__ref.setField("_usuario",c_nota._usuario); - //BA.debugLineNum = 11;BA.debugLine="Dim c As Cursor"; -c_nota._c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_c",c_nota._c); - //BA.debugLineNum = 12;BA.debugLine="Dim ruta As String"; -c_nota._ruta = RemoteObject.createImmutable("");__ref.setField("_ruta",c_nota._ruta); - //BA.debugLineNum = 13;BA.debugLine="Dim Regresar As Button"; -c_nota._regresar = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_regresar",c_nota._regresar); - //BA.debugLineNum = 15;BA.debugLine="Dim ListView1 As ListView"; -c_nota._listview1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ListViewWrapper");__ref.setField("_listview1",c_nota._listview1); - //BA.debugLineNum = 16;BA.debugLine="Dim L_CANT As Label"; -c_nota._l_cant = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_cant",c_nota._l_cant); - //BA.debugLineNum = 17;BA.debugLine="Dim L_TOTAL As Label"; -c_nota._l_total = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_total",c_nota._l_total); - //BA.debugLineNum = 18;BA.debugLine="Dim borra As Button"; -c_nota._borra = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_borra",c_nota._borra); - //BA.debugLineNum = 19;BA.debugLine="Dim Existe As String"; -c_nota._existe = RemoteObject.createImmutable("");__ref.setField("_existe",c_nota._existe); - //BA.debugLineNum = 20;BA.debugLine="Dim result As String"; -c_nota._result = RemoteObject.createImmutable("");__ref.setField("_result",c_nota._result); - //BA.debugLineNum = 22;BA.debugLine="Dim DESC As String"; -c_nota._desc = RemoteObject.createImmutable("");__ref.setField("_desc",c_nota._desc); - //BA.debugLineNum = 24;BA.debugLine="Private Titulo As Label"; -c_nota._titulo = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_titulo",c_nota._titulo); - //BA.debugLineNum = 25;BA.debugLine="Private b_desc As Button"; -c_nota._b_desc = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_desc",c_nota._b_desc); - //BA.debugLineNum = 26;BA.debugLine="Dim DESCUENTO As String"; -c_nota._descuento = RemoteObject.createImmutable("");__ref.setField("_descuento",c_nota._descuento); - //BA.debugLineNum = 27;BA.debugLine="Dim folio As String"; -c_nota._folio = RemoteObject.createImmutable("");__ref.setField("_folio",c_nota._folio); - //BA.debugLineNum = 28;BA.debugLine="Dim tgl As Toggle"; -c_nota._tgl = RemoteObject.createNew ("com.rootsoft.togglelibrary.ToggleLibrary");__ref.setField("_tgl",c_nota._tgl); - //BA.debugLineNum = 29;BA.debugLine="Private almacen As String"; -c_nota._almacen = RemoteObject.createImmutable("");__ref.setField("_almacen",c_nota._almacen); - //BA.debugLineNum = 30;BA.debugLine="Private p_nota As Panel"; -c_nota._p_nota = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_nota",c_nota._p_nota); - //BA.debugLineNum = 31;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _gps_locationchanged(RemoteObject __ref,RemoteObject _location1) throws Exception{ -try { - Debug.PushSubsStack("GPS_LocationChanged (c_nota) ","c_nota",7,__ref.getField(false, "ba"),__ref,112); -if (RapidSub.canDelegate("gps_locationchanged")) { return __ref.runUserSub(false, "c_nota","gps_locationchanged", __ref, _location1);} -Debug.locals.put("Location1", _location1); - BA.debugLineNum = 112;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; -Debug.ShouldStop(32768); - BA.debugLineNum = 115;BA.debugLine="End Sub"; -Debug.ShouldStop(262144); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (c_nota) ","c_nota",7,__ref.getField(false, "ba"),__ref,34); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "c_nota","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 34;BA.debugLine="Public Sub Initialize As Object"; -Debug.ShouldStop(2); - BA.debugLineNum = 35;BA.debugLine="Return Me"; -Debug.ShouldStop(4); -if (true) return __ref; - BA.debugLineNum = 36;BA.debugLine="End Sub"; -Debug.ShouldStop(8); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _listview1_itemlongclick(RemoteObject __ref,RemoteObject _position,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("ListView1_ItemLongClick (c_nota) ","c_nota",7,__ref.getField(false, "ba"),__ref,150); -if (RapidSub.canDelegate("listview1_itemlongclick")) { return __ref.runUserSub(false, "c_nota","listview1_itemlongclick", __ref, _position, _value);} -Debug.locals.put("Position", _position); -Debug.locals.put("Value", _value); - BA.debugLineNum = 150;BA.debugLine="Sub ListView1_ItemLongClick (Position As Int, Valu"; -Debug.ShouldStop(2097152); - BA.debugLineNum = 151;BA.debugLine="result = Msgbox2(\"Seguro que desea borrar este a"; -Debug.ShouldStop(4194304); -__ref.setField ("_result" /*RemoteObject*/ ,BA.NumberToString(c_nota.__c.runMethodAndSync(true,"Msgbox2",(Object)(BA.ObjectToCharSequence("Seguro que desea borrar este articulo?")),(Object)(BA.ObjectToCharSequence("Borrar Articulo")),(Object)(BA.ObjectToString("Si")),(Object)(BA.ObjectToString("")),(Object)(BA.ObjectToString("No")),(Object)((c_nota.__c.runMethod(false,"LoadBitmap",(Object)(c_nota.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(RemoteObject.createImmutable("alert2.png"))).getObject())),__ref.getField(false, "ba")))); - BA.debugLineNum = 152;BA.debugLine="If result = DialogResponse.POSITIVE Then"; -Debug.ShouldStop(8388608); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_result" /*RemoteObject*/ ),BA.NumberToString(c_nota.__c.getField(false,"DialogResponse").getField(true,"POSITIVE")))) { - BA.debugLineNum = 153;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"select PE_P"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select PE_PROID,PE_CANT FROM PEDIDO where pe_pronombre = ? and pe_cliente in (Select CUENTA from cuentaa) ")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {BA.ObjectToString(_value)})))); - BA.debugLineNum = 154;BA.debugLine="c.Position=0"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 155;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat"; -Debug.ShouldStop(67108864); -c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen + ? where cat_gp_id = ?")),(Object)(c_nota.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CANT")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_PROID"))))}))))); - BA.debugLineNum = 156;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -Debug.ShouldStop(134217728); -c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO INVENT_X_ENVIAR (ALMACEN , PROID , CANTIDAD ) VALUES(?,?,?) ")),(Object)(c_nota.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {3},new Object[] {(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_PROID")))),RemoteObject.createImmutable(((double)(Double.parseDouble(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CANT"))).get()))*-(double) (0 + 1)))}))))); - BA.debugLineNum = 157;BA.debugLine="c.Close"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 158;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"select coun"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select count(*) AS CUANTOS from cat_gunaprod where CAT_GP_ID in (select pe_cedis from pedido where pe_pronombre = ? and pe_cliente in (Select CUENTA from cuentaa)) and CAT_GP_CLASIF = 'PROMOS' AND CAT_GP_TIPO = 'PROMOS' AND CAT_GP_SUBTIPO = 'PROMOS'")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {BA.ObjectToString(_value)})))); - BA.debugLineNum = 159;BA.debugLine="c.Position=0"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 160;BA.debugLine="If c.GetString(\"CUANTOS\") > 0 Then"; -Debug.ShouldStop(-2147483648); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 161;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete fr"; -Debug.ShouldStop(1); -c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("delete from pedido where pe_cedis in (select pe_cedis from pedido where pe_pronombre = ?) and pe_cliente in (Select CUENTA from cuentaa)")),(Object)(c_nota.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {_value}))))); - }else { - BA.debugLineNum = 163;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete fr"; -Debug.ShouldStop(4); -c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("delete from pedido where pe_pronombre = ? and pe_cliente in (Select CUENTA from cuentaa)")),(Object)(c_nota.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {_value}))))); - }; - BA.debugLineNum = 165;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; -Debug.ShouldStop(16); -c_nota.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("MM/dd/yyyy")); - BA.debugLineNum = 166;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(32); -__ref.setField ("_sdate" /*RemoteObject*/ ,c_nota.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(c_nota.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 167;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -Debug.ShouldStop(64); -__ref.setField ("_stime" /*RemoteObject*/ ,c_nota.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_nota.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 168;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; -Debug.ShouldStop(128); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select CUENTA from cuentaa")))); - BA.debugLineNum = 169;BA.debugLine="c.Position=0"; -Debug.ShouldStop(256); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 170;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -Debug.ShouldStop(512); -__ref.setField ("_clie_id" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUENTA")))); - BA.debugLineNum = 171;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; -Debug.ShouldStop(1024); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select USUARIO from usuarioa")))); - BA.debugLineNum = 172;BA.debugLine="c.Position=0"; -Debug.ShouldStop(2048); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 173;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(4096); -__ref.setField ("_usuario" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")))); - BA.debugLineNum = 174;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(p"; -Debug.ShouldStop(8192); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, count(*) as CUANTOS FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)")))); - BA.debugLineNum = 175;BA.debugLine="c.Position=0"; -Debug.ShouldStop(16384); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 176;BA.debugLine="If c.GetString(\"CUANTOS\") > 0 Then"; -Debug.ShouldStop(32768); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 177;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(65536); -c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"))); - BA.debugLineNum = 178;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert in"; -Debug.ShouldStop(131072); -c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT) VALUES (?,?,?,?,?,?,?)")),(Object)(c_nota.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {7},new Object[] {(__ref.getField(true,"_clie_id" /*RemoteObject*/ )),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CANT_CLIE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_CLIE")))),(c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lon_gps" /*RemoteObject*/ )),(c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 179;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt"; -Debug.ShouldStop(262144); -c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("UPDATE kmt_info set gestion = 0 where CAT_CL_CODIGO In (select cuenta from cuentaa)"))); - }else { - BA.debugLineNum = 181;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(1048576); -c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"))); - BA.debugLineNum = 182;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt"; -Debug.ShouldStop(2097152); -c_nota._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("UPDATE kmt_info set gestion = 0 where CAT_CL_CODIGO In (select cuenta from cuentaa)"))); - }; - BA.debugLineNum = 184;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(8388608); -__ref.runClassMethod (keymon.lat.medicomed.c_nota.class, "_b4xpage_appear" /*RemoteObject*/ ); - }; - BA.debugLineNum = 186;BA.debugLine="End Sub"; -Debug.ShouldStop(33554432); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _p_nota_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("p_nota_Click (c_nota) ","c_nota",7,__ref.getField(false, "ba"),__ref,236); -if (RapidSub.canDelegate("p_nota_click")) { return __ref.runUserSub(false, "c_nota","p_nota_click", __ref);} - BA.debugLineNum = 236;BA.debugLine="Private Sub p_nota_Click"; -Debug.ShouldStop(2048); - BA.debugLineNum = 238;BA.debugLine="End Sub"; -Debug.ShouldStop(8192); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _regresar_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Regresar_Click (c_nota) ","c_nota",7,__ref.getField(false, "ba"),__ref,117); -if (RapidSub.canDelegate("regresar_click")) { return __ref.runUserSub(false, "c_nota","regresar_click", __ref);} - BA.debugLineNum = 117;BA.debugLine="Sub Regresar_Click"; -Debug.ShouldStop(1048576); - BA.debugLineNum = 118;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; -Debug.ShouldStop(2097152); -c_nota._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Cliente"))); - BA.debugLineNum = 119;BA.debugLine="End Sub"; -Debug.ShouldStop(4194304); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_noventa.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_noventa.java deleted file mode 100644 index 5f3aecc..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_noventa.java +++ /dev/null @@ -1,52 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class c_noventa { - public static RemoteObject myClass; - public c_noventa() { - } - public static PCBA staticBA = new PCBA(null, c_noventa.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _root = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _g = RemoteObject.declareNull("anywheresoftware.b4a.gps.GPS"); -public static RemoteObject _ruta = RemoteObject.createImmutable(""); -public static RemoteObject _skmt = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL"); -public static RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _cancela = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _guarda = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _r_1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper"); -public static RemoteObject _r_2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper"); -public static RemoteObject _r_3 = RemoteObject.declareNull("anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper"); -public static RemoteObject _e_comm = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -public static RemoteObject _motivo = RemoteObject.createImmutable(""); -public static RemoteObject _cuenta = RemoteObject.createImmutable(""); -public static RemoteObject _usuario = RemoteObject.createImmutable(""); -public static RemoteObject _sdate = RemoteObject.createImmutable(""); -public static RemoteObject _stime = RemoteObject.createImmutable(""); -public static RemoteObject _tgl = RemoteObject.declareNull("com.rootsoft.togglelibrary.ToggleLibrary"); -public static RemoteObject _r_4 = RemoteObject.declareNull("anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper"); -public static RemoteObject _stay_hh = RemoteObject.createImmutable(""); -public static RemoteObject _stay_mi = RemoteObject.createImmutable(""); -public static RemoteObject _stay_ss = RemoteObject.createImmutable(""); -public static RemoteObject _reqmanager = RemoteObject.declareNull("keymon.lat.medicomed.dbrequestmanager"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"c",_ref.getField(false, "_c"),"CANCELA",_ref.getField(false, "_cancela"),"cuenta",_ref.getField(false, "_cuenta"),"DateUtils",_ref.getField(false, "_dateutils"),"e_comm",_ref.getField(false, "_e_comm"),"g",_ref.getField(false, "_g"),"GUARDA",_ref.getField(false, "_guarda"),"motivo",_ref.getField(false, "_motivo"),"r_1",_ref.getField(false, "_r_1"),"r_2",_ref.getField(false, "_r_2"),"r_3",_ref.getField(false, "_r_3"),"r_4",_ref.getField(false, "_r_4"),"reqManager",_ref.getField(false, "_reqmanager"),"Root",_ref.getField(false, "_root"),"ruta",_ref.getField(false, "_ruta"),"sDate",_ref.getField(false, "_sdate"),"skmt",_ref.getField(false, "_skmt"),"stay_hh",_ref.getField(false, "_stay_hh"),"stay_mi",_ref.getField(false, "_stay_mi"),"stay_ss",_ref.getField(false, "_stay_ss"),"sTime",_ref.getField(false, "_stime"),"tgl",_ref.getField(false, "_tgl"),"usuario",_ref.getField(false, "_usuario"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_noventa_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_noventa_subs_0.java deleted file mode 100644 index 881bfbc..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_noventa_subs_0.java +++ /dev/null @@ -1,595 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class c_noventa_subs_0 { - - -public static RemoteObject _b4xpage_appear(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Appear (c_noventa) ","c_noventa",8,__ref.getField(false, "ba"),__ref,51); -if (RapidSub.canDelegate("b4xpage_appear")) { return __ref.runUserSub(false, "c_noventa","b4xpage_appear", __ref);} - BA.debugLineNum = 51;BA.debugLine="Sub B4XPage_Appear"; -Debug.ShouldStop(262144); - BA.debugLineNum = 52;BA.debugLine="e_comm.Text=\"\""; -Debug.ShouldStop(524288); -__ref.getField(false,"_e_comm" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("")); - BA.debugLineNum = 53;BA.debugLine="tgl.Initialize"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_tgl" /*RemoteObject*/ ).runVoidMethod ("Initialize",__ref.getField(false, "ba")); - BA.debugLineNum = 54;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then"; -Debug.ShouldStop(2097152); -if (c_noventa.__c.runMethod(true,"Not",(Object)(c_noventa._starter._gps /*RemoteObject*/ .runMethod(true,"getGPSEnabled"))).get().booleanValue()) { - BA.debugLineNum = 55;BA.debugLine="ToastMessageShow(\"Es necesario tener el GPS ence"; -Debug.ShouldStop(4194304); -c_noventa.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Es necesario tener el GPS encendido")),(Object)(c_noventa.__c.getField(true,"True"))); - BA.debugLineNum = 56;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent"; -Debug.ShouldStop(8388608); -c_noventa.__c.runVoidMethod ("StartActivity",__ref.getField(false, "ba"),(Object)((c_noventa._starter._gps /*RemoteObject*/ .runMethod(false,"getLocationSettingsIntent")))); - }; - BA.debugLineNum = 58;BA.debugLine="End Sub"; -Debug.ShouldStop(33554432); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b4xpage_created(RemoteObject __ref,RemoteObject _root1) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Created (c_noventa) ","c_noventa",8,__ref.getField(false, "ba"),__ref,36); -if (RapidSub.canDelegate("b4xpage_created")) { return __ref.runUserSub(false, "c_noventa","b4xpage_created", __ref, _root1);} -Debug.locals.put("Root1", _root1); - BA.debugLineNum = 36;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -Debug.ShouldStop(8); - BA.debugLineNum = 37;BA.debugLine="Root = Root1"; -Debug.ShouldStop(16); -__ref.setField ("_root" /*RemoteObject*/ ,_root1); - BA.debugLineNum = 39;BA.debugLine="Root.LoadLayout(\"noventa\")"; -Debug.ShouldStop(64); -__ref.getField(false,"_root" /*RemoteObject*/ ).runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("noventa")),__ref.getField(false, "ba")); - BA.debugLineNum = 40;BA.debugLine="ruta = File.DirInternal"; -Debug.ShouldStop(128); -__ref.setField ("_ruta" /*RemoteObject*/ ,c_noventa.__c.getField(false,"File").runMethod(true,"getDirInternal")); - BA.debugLineNum = 42;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; -Debug.ShouldStop(512); -if (RemoteObject.solveBoolean("=",c_noventa.__c.getField(false,"File").runMethod(true,"Exists",(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(RemoteObject.createImmutable("kmt.db"))),c_noventa.__c.getField(true,"False"))) { - BA.debugLineNum = 43;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; -Debug.ShouldStop(1024); -c_noventa.__c.getField(false,"File").runVoidMethod ("Copy",(Object)(c_noventa.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(BA.ObjectToString("kmt.db")),(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(RemoteObject.createImmutable("kmt.db"))); - }; - BA.debugLineNum = 46;BA.debugLine="reqManager.Initialize(Me, B4XPages.MainPage.SERVE"; -Debug.ShouldStop(8192); -__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref),(Object)(c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_server" /*RemoteObject*/ ))); - BA.debugLineNum = 47;BA.debugLine="End Sub"; -Debug.ShouldStop(16384); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _cancela_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("CANCELA_Click (c_noventa) ","c_noventa",8,__ref.getField(false, "ba"),__ref,65); -if (RapidSub.canDelegate("cancela_click")) { return __ref.runUserSub(false, "c_noventa","cancela_click", __ref);} - BA.debugLineNum = 65;BA.debugLine="Sub CANCELA_Click"; -Debug.ShouldStop(1); - BA.debugLineNum = 66;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; -Debug.ShouldStop(2); -c_noventa._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Cliente"))); - BA.debugLineNum = 67;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Private Root As B4XView 'ignore"; -c_noventa._root = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_root",c_noventa._root); - //BA.debugLineNum = 3;BA.debugLine="Private xui As XUI 'ignore"; -c_noventa._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",c_noventa._xui); - //BA.debugLineNum = 5;BA.debugLine="Dim g As GPS"; -c_noventa._g = RemoteObject.createNew ("anywheresoftware.b4a.gps.GPS");__ref.setField("_g",c_noventa._g); - //BA.debugLineNum = 6;BA.debugLine="Dim ruta As String"; -c_noventa._ruta = RemoteObject.createImmutable("");__ref.setField("_ruta",c_noventa._ruta); - //BA.debugLineNum = 7;BA.debugLine="Dim skmt As SQL"; -c_noventa._skmt = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL");__ref.setField("_skmt",c_noventa._skmt); - //BA.debugLineNum = 8;BA.debugLine="Dim c As Cursor"; -c_noventa._c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_c",c_noventa._c); - //BA.debugLineNum = 10;BA.debugLine="Dim CANCELA As Button"; -c_noventa._cancela = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_cancela",c_noventa._cancela); - //BA.debugLineNum = 11;BA.debugLine="Dim GUARDA As Button"; -c_noventa._guarda = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_guarda",c_noventa._guarda); - //BA.debugLineNum = 12;BA.debugLine="Dim r_1 As RadioButton"; -c_noventa._r_1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper");__ref.setField("_r_1",c_noventa._r_1); - //BA.debugLineNum = 13;BA.debugLine="Dim r_2 As RadioButton"; -c_noventa._r_2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper");__ref.setField("_r_2",c_noventa._r_2); - //BA.debugLineNum = 14;BA.debugLine="Dim r_3 As RadioButton"; -c_noventa._r_3 = RemoteObject.createNew ("anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper");__ref.setField("_r_3",c_noventa._r_3); - //BA.debugLineNum = 15;BA.debugLine="Dim e_comm As EditText"; -c_noventa._e_comm = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");__ref.setField("_e_comm",c_noventa._e_comm); - //BA.debugLineNum = 16;BA.debugLine="Dim motivo As String"; -c_noventa._motivo = RemoteObject.createImmutable("");__ref.setField("_motivo",c_noventa._motivo); - //BA.debugLineNum = 17;BA.debugLine="Dim cuenta As String"; -c_noventa._cuenta = RemoteObject.createImmutable("");__ref.setField("_cuenta",c_noventa._cuenta); - //BA.debugLineNum = 18;BA.debugLine="Dim usuario As String"; -c_noventa._usuario = RemoteObject.createImmutable("");__ref.setField("_usuario",c_noventa._usuario); - //BA.debugLineNum = 19;BA.debugLine="Dim sDate,sTime As String"; -c_noventa._sdate = RemoteObject.createImmutable("");__ref.setField("_sdate",c_noventa._sdate); -c_noventa._stime = RemoteObject.createImmutable("");__ref.setField("_stime",c_noventa._stime); - //BA.debugLineNum = 21;BA.debugLine="Dim tgl As Toggle"; -c_noventa._tgl = RemoteObject.createNew ("com.rootsoft.togglelibrary.ToggleLibrary");__ref.setField("_tgl",c_noventa._tgl); - //BA.debugLineNum = 22;BA.debugLine="Dim r_4 As RadioButton"; -c_noventa._r_4 = RemoteObject.createNew ("anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper");__ref.setField("_r_4",c_noventa._r_4); - //BA.debugLineNum = 24;BA.debugLine="Private stay_hh As String"; -c_noventa._stay_hh = RemoteObject.createImmutable("");__ref.setField("_stay_hh",c_noventa._stay_hh); - //BA.debugLineNum = 25;BA.debugLine="Private stay_mi As String"; -c_noventa._stay_mi = RemoteObject.createImmutable("");__ref.setField("_stay_mi",c_noventa._stay_mi); - //BA.debugLineNum = 26;BA.debugLine="Private stay_ss As String"; -c_noventa._stay_ss = RemoteObject.createImmutable("");__ref.setField("_stay_ss",c_noventa._stay_ss); - //BA.debugLineNum = 27;BA.debugLine="Dim reqManager As DBRequestManager"; -c_noventa._reqmanager = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager");__ref.setField("_reqmanager",c_noventa._reqmanager); - //BA.debugLineNum = 28;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _gps_locationchanged(RemoteObject __ref,RemoteObject _location1) throws Exception{ -try { - Debug.PushSubsStack("GPS_LocationChanged (c_noventa) ","c_noventa",8,__ref.getField(false, "ba"),__ref,60); -if (RapidSub.canDelegate("gps_locationchanged")) { return __ref.runUserSub(false, "c_noventa","gps_locationchanged", __ref, _location1);} -Debug.locals.put("Location1", _location1); - BA.debugLineNum = 60;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; -Debug.ShouldStop(134217728); - BA.debugLineNum = 63;BA.debugLine="End Sub"; -Debug.ShouldStop(1073741824); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _guarda_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GUARDA_Click (c_noventa) ","c_noventa",8,__ref.getField(false, "ba"),__ref,68); -if (RapidSub.canDelegate("guarda_click")) { return __ref.runUserSub(false, "c_noventa","guarda_click", __ref);} -int _i = 0; - BA.debugLineNum = 68;BA.debugLine="Sub GUARDA_Click"; -Debug.ShouldStop(8); - BA.debugLineNum = 69;BA.debugLine="If r_1.Checked Then"; -Debug.ShouldStop(16); -if (__ref.getField(false,"_r_1" /*RemoteObject*/ ).runMethod(true,"getChecked").get().booleanValue()) { - BA.debugLineNum = 70;BA.debugLine="motivo = \"CERRADO\""; -Debug.ShouldStop(32); -__ref.setField ("_motivo" /*RemoteObject*/ ,BA.ObjectToString("CERRADO")); - }else -{ BA.debugLineNum = 71;BA.debugLine="Else If r_2.Checked Then"; -Debug.ShouldStop(64); -if (__ref.getField(false,"_r_2" /*RemoteObject*/ ).runMethod(true,"getChecked").get().booleanValue()) { - BA.debugLineNum = 72;BA.debugLine="motivo = \"NO COMPRA\""; -Debug.ShouldStop(128); -__ref.setField ("_motivo" /*RemoteObject*/ ,BA.ObjectToString("NO COMPRA")); - }else -{ BA.debugLineNum = 73;BA.debugLine="Else If r_3.Checked Then"; -Debug.ShouldStop(256); -if (__ref.getField(false,"_r_3" /*RemoteObject*/ ).runMethod(true,"getChecked").get().booleanValue()) { - BA.debugLineNum = 74;BA.debugLine="motivo = \"CON PRODUCTO\""; -Debug.ShouldStop(512); -__ref.setField ("_motivo" /*RemoteObject*/ ,BA.ObjectToString("CON PRODUCTO")); - }else -{ BA.debugLineNum = 75;BA.debugLine="Else If r_4.Checked Then"; -Debug.ShouldStop(1024); -if (__ref.getField(false,"_r_4" /*RemoteObject*/ ).runMethod(true,"getChecked").get().booleanValue()) { - BA.debugLineNum = 76;BA.debugLine="motivo = \"NO ESTA EL ENCARGADO\""; -Debug.ShouldStop(2048); -__ref.setField ("_motivo" /*RemoteObject*/ ,BA.ObjectToString("NO ESTA EL ENCARGADO")); - }else { - BA.debugLineNum = 78;BA.debugLine="motivo = \"Cerrado permanente.\""; -Debug.ShouldStop(8192); -__ref.setField ("_motivo" /*RemoteObject*/ ,BA.ObjectToString("Cerrado permanente.")); - }}}} -; - BA.debugLineNum = 81;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; -Debug.ShouldStop(65536); -c_noventa.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("MM/dd/yyyy")); - BA.debugLineNum = 82;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(131072); -__ref.setField ("_sdate" /*RemoteObject*/ ,c_noventa.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(c_noventa.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 83;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -Debug.ShouldStop(262144); -__ref.setField ("_stime" /*RemoteObject*/ ,c_noventa.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_noventa.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 84;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CUENTA"; -Debug.ShouldStop(524288); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CUENTA from cuentaa")))); - BA.debugLineNum = 85;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 86;BA.debugLine="cuenta = c.GetString(\"CUENTA\")"; -Debug.ShouldStop(2097152); -__ref.setField ("_cuenta" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUENTA")))); - BA.debugLineNum = 87;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select usuari"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select usuario from usuarioa")))); - BA.debugLineNum = 88;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 89;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(16777216); -__ref.setField ("_usuario" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")))); - BA.debugLineNum = 90;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select PE_PRO"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select PE_PROID,PE_CANT FROM PEDIDO where pe_cliente in (Select CUENTA from cuentaa) ")))); - BA.debugLineNum = 91;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(67108864); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 92;BA.debugLine="For i=0 To c.RowCount -1"; -Debug.ShouldStop(134217728); -{ -final int step23 = 1; -final int limit23 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step23 > 0 && _i <= limit23) || (step23 < 0 && _i >= limit23) ;_i = ((int)(0 + _i + step23)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 93;BA.debugLine="c.Position=i"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 94;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update ca"; -Debug.ShouldStop(536870912); -c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen + ? where cat_gp_id = ?")),(Object)(c_noventa.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CANT")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_PROID"))))}))))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 98;BA.debugLine="If B4XPages.MainPage.cliente.IsInitialized Then"; -Debug.ShouldStop(2); -if (c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_cliente" /*RemoteObject*/ ).runMethod(true,"IsInitialized" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 99;BA.debugLine="B4XPages.MainPage.cliente.motivoNoVenta = motivo"; -Debug.ShouldStop(4); -c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_cliente" /*RemoteObject*/ ).setField ("_motivonoventa" /*RemoteObject*/ ,__ref.getField(true,"_motivo" /*RemoteObject*/ )); - BA.debugLineNum = 100;BA.debugLine="Subs.bitacora(Subs.fechanormal(DateTime.Now), us"; -Debug.ShouldStop(8); -c_noventa._subs.runVoidMethod ("_bitacora" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(c_noventa._subs.runMethod(true,"_fechanormal" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.NumberToString(c_noventa.__c.getField(false,"DateTime").runMethod(true,"getNow"))))),(Object)(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(Object)(c_noventa._subs.runMethod(true,"_traealmacen" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(c_noventa._subs.runMethod(true,"_traeruta" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(BA.ObjectToString("No Venta")),(Object)(c_noventa._subs.runMethod(true,"_traecliente" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(BA.ObjectToString("")),(Object)(c_noventa._subs.runMethod(true,"_fechanormal" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.NumberToString(c_noventa.__c.getField(false,"DateTime").runMethod(true,"getNow"))))),(Object)(c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ )),(Object)(c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lon_gps" /*RemoteObject*/ )),(Object)(BA.NumberToString(c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_cliente" /*RemoteObject*/ ).getField(true,"_precision" /*RemoteObject*/ ))),(Object)(__ref.getField(true,"_motivo" /*RemoteObject*/ )),(Object)(__ref.getField(false,"_e_comm" /*RemoteObject*/ ).runMethod(true,"getText"))); - BA.debugLineNum = 101;BA.debugLine="Starter.enVenta = False"; -Debug.ShouldStop(16); -c_noventa._starter._enventa /*RemoteObject*/ = c_noventa.__c.getField(true,"False"); - }; - BA.debugLineNum = 104;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(128); -c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido_cliente where pc_cliente in (Select CUENTA from cuentaa)"))); - BA.debugLineNum = 105;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(256); -c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido where pe_cliente in (Select CUENTA from cuentaa)"))); - BA.debugLineNum = 107;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; -Debug.ShouldStop(1024); -c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO NOVENTA (NV_CLIENTE,NV_FECHA,NV_USER,NV_MOTIVO,NV_COMM,NV_LAT,NV_LON,NV_ENVIO) VALUES(?,?,?,?,?,?,?,0) ")),(Object)(c_noventa.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {7},new Object[] {(__ref.getField(true,"_cuenta" /*RemoteObject*/ )),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(__ref.getField(true,"_motivo" /*RemoteObject*/ )),(__ref.getField(false,"_e_comm" /*RemoteObject*/ ).runMethod(true,"getText")),(c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ )),(c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lon_gps" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 108;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_i"; -Debug.ShouldStop(2048); -c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("UPDATE kmt_info set gestion = 3 where CAT_CL_CODIGO In (select cuenta from cuentaa)"))); - BA.debugLineNum = 109;BA.debugLine="DateTime.TimeFormat = \"HHmmss\""; -Debug.ShouldStop(4096); -c_noventa.__c.getField(false,"DateTime").runMethod(true,"setTimeFormat",BA.ObjectToString("HHmmss")); - BA.debugLineNum = 110;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -Debug.ShouldStop(8192); -__ref.setField ("_stime" /*RemoteObject*/ ,c_noventa.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_noventa.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 111;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HIST"; -Debug.ShouldStop(16384); -c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE HIST_STAY_STORE set HSS_OUT = ? where HSS_CODIGO In (select cuenta from cuentaa)")),(Object)(c_noventa.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(true,"_stime" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 114;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\" Select (subs"; -Debug.ShouldStop(131072); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.concat(RemoteObject.createImmutable(" Select (substr(HSS_OUT,1,2) - substr(HSS_IN,1,2)) - Case when (substr(HSS_OUT,3,2) - substr(HSS_IN,3,2)) < 0 Then 1 Else 0 end HORAS_TOTALES, "),RemoteObject.createImmutable("Case when (substr(HSS_OUT,3,2) - substr(HSS_IN,3,2)) < 0 Then (substr(HSS_OUT,3,2) + 60 - substr(HSS_IN,3,2)) "),RemoteObject.createImmutable(" Else (substr(HSS_OUT,3,2) - substr(HSS_IN,3,2)) End - Case when (substr(HSS_OUT,5,2) - substr(HSS_IN,5,2)) < 0 Then 1 Else 0 end MINUTOS_TOTALES, "),RemoteObject.createImmutable("Case when (substr(HSS_OUT,5,2) - substr(HSS_IN,5,2)) < 0 Then (substr(HSS_OUT,5,2) + 60 - substr(HSS_IN,5,2)) "),RemoteObject.createImmutable(" Else (substr(HSS_OUT,5,2) - substr(HSS_IN,5,2)) end SEGUNDOS_TOTALES "),RemoteObject.createImmutable(" from HIST_STAY_STORE where HSS_CODIGO In (Select cuenta from cuentaa) "))))); - BA.debugLineNum = 120;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 121;BA.debugLine="stay_hh = c.GetString(\"HORAS_TOTALES\") * 60 * 60"; -Debug.ShouldStop(16777216); -__ref.setField ("_stay_hh" /*RemoteObject*/ ,BA.NumberToString(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HORAS_TOTALES")))),RemoteObject.createImmutable(60),RemoteObject.createImmutable(60)}, "**",0, 0))); - BA.debugLineNum = 122;BA.debugLine="stay_mi = c.GetString(\"MINUTOS_TOTALES\") * 60"; -Debug.ShouldStop(33554432); -__ref.setField ("_stay_mi" /*RemoteObject*/ ,BA.NumberToString(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("MINUTOS_TOTALES")))),RemoteObject.createImmutable(60)}, "*",0, 0))); - BA.debugLineNum = 123;BA.debugLine="stay_ss = c.GetString(\"SEGUNDOS_TOTALES\")"; -Debug.ShouldStop(67108864); -__ref.setField ("_stay_ss" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("SEGUNDOS_TOTALES")))); - BA.debugLineNum = 125;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HIST"; -Debug.ShouldStop(268435456); -c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE HIST_STAY_STORE set HSS_TOT = ? where HSS_CODIGO In (select cuenta from cuentaa)")),(Object)(c_noventa.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(true,"_stay_hh" /*RemoteObject*/ )),BA.numberCast(double.class, __ref.getField(true,"_stay_mi" /*RemoteObject*/ )),BA.numberCast(double.class, __ref.getField(true,"_stay_ss" /*RemoteObject*/ ))}, "++",2, 0))}))))); - BA.debugLineNum = 126;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HIST"; -Debug.ShouldStop(536870912); -c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE HIST_STAY_OUT set HSO_FIN = ? ")),(Object)(c_noventa.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(true,"_stime" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 127;BA.debugLine="DateTime.TimeFormat = \"HH:mm:ss\""; -Debug.ShouldStop(1073741824); -c_noventa.__c.getField(false,"DateTime").runMethod(true,"setTimeFormat",BA.ObjectToString("HH:mm:ss")); - BA.debugLineNum = 129;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update PEDI"; -Debug.ShouldStop(1); -c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("update PEDIDO_INICIO_FINAL set PIF_HORA_FINAL = ? where PIF_CLIENTE = ? and PIF_HORA_FINAL = 0")),(Object)(c_noventa.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(c_noventa.__c.getField(false,"DateTime").runMethod(true,"getNow")),(__ref.getField(true,"_cuenta" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 130;BA.debugLine="LogColor($\"actualizamos \"${cuenta}, hora_final=$"; -Debug.ShouldStop(2); -c_noventa.__c.runVoidMethod ("LogImpl","310420286",(RemoteObject.concat(RemoteObject.createImmutable("actualizamos \""),c_noventa.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_cuenta" /*RemoteObject*/ )))),RemoteObject.createImmutable(", hora_final="),c_noventa.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((c_noventa.__c.getField(false,"DateTime").runMethod(true,"getNow")))),RemoteObject.createImmutable(""))),c_noventa.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 132;BA.debugLine="Subs.bitacora(Subs.fechanormal(DateTime.Now), usu"; -Debug.ShouldStop(8); -c_noventa._subs.runVoidMethod ("_bitacora" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(c_noventa._subs.runMethod(true,"_fechanormal" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.NumberToString(c_noventa.__c.getField(false,"DateTime").runMethod(true,"getNow"))))),(Object)(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(Object)(c_noventa._subs.runMethod(true,"_traealmacen" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(c_noventa._subs.runMethod(true,"_traeruta" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(BA.ObjectToString("NO VENTA")),(Object)(c_noventa._subs.runMethod(true,"_traecliente" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(c_noventa._subs.runMethod(true,"_fechanormal" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.NumberToString(c_noventa.__c.getField(false,"DateTime").runMethod(true,"getNow"))))),(Object)(c_noventa._subs.runMethod(true,"_fechanormal" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.NumberToString(c_noventa.__c.getField(false,"DateTime").runMethod(true,"getNow"))))),(Object)(c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ )),(Object)(c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lon_gps" /*RemoteObject*/ )),(Object)(BA.NumberToString(2)),(Object)(BA.ObjectToString("")),(Object)(BA.ObjectToString(__ref.getField(false,"_r_1" /*RemoteObject*/ ).runMethod(true,"getChecked")))); - BA.debugLineNum = 134;BA.debugLine="mandaPendientesnoventa"; -Debug.ShouldStop(32); -__ref.runClassMethod (keymon.lat.medicomed.c_noventa.class, "_mandapendientesnoventa" /*RemoteObject*/ ); - BA.debugLineNum = 135;BA.debugLine="B4XPages.ShowPage(\"Principal\")"; -Debug.ShouldStop(64); -c_noventa._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Principal"))); - BA.debugLineNum = 136;BA.debugLine="End Sub"; -Debug.ShouldStop(128); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (c_noventa) ","c_noventa",8,__ref.getField(false, "ba"),__ref,31); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "c_noventa","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 31;BA.debugLine="Public Sub Initialize As Object"; -Debug.ShouldStop(1073741824); - BA.debugLineNum = 32;BA.debugLine="Return Me"; -Debug.ShouldStop(-2147483648); -if (true) return __ref; - BA.debugLineNum = 33;BA.debugLine="End Sub"; -Debug.ShouldStop(1); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _jobdone(RemoteObject __ref,RemoteObject _job) throws Exception{ -try { - Debug.PushSubsStack("JobDone (c_noventa) ","c_noventa",8,__ref.getField(false, "ba"),__ref,170); -if (RapidSub.canDelegate("jobdone")) { return __ref.runUserSub(false, "c_noventa","jobdone", __ref, _job);} -RemoteObject _resultado = RemoteObject.declareNull("keymon.lat.medicomed.dbrequestmanager._dbresult"); -RemoteObject _cliente = RemoteObject.createImmutable(""); -RemoteObject _records = null; -RemoteObject _k = RemoteObject.createImmutable(""); -Debug.locals.put("Job", _job); - BA.debugLineNum = 170;BA.debugLine="Sub JobDone(Job As HttpJob)"; -Debug.ShouldStop(512); - BA.debugLineNum = 171;BA.debugLine="Log(Job.Success)"; -Debug.ShouldStop(1024); -c_noventa.__c.runVoidMethod ("LogImpl","310551297",BA.ObjectToString(_job.getField(true,"_success" /*RemoteObject*/ )),0); - BA.debugLineNum = 172;BA.debugLine="If Job.Success = False Then"; -Debug.ShouldStop(2048); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_success" /*RemoteObject*/ ),c_noventa.__c.getField(true,"False"))) { - }else { - BA.debugLineNum = 175;BA.debugLine="LogColor(\"JobDone: '\" & reqManager.HandleJob(Job"; -Debug.ShouldStop(16384); -c_noventa.__c.runVoidMethod ("LogImpl","310551301",RemoteObject.concat(RemoteObject.createImmutable("JobDone: '"),__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job)).getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable("' - Registros: "),__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job)).getField(false,"Rows" /*RemoteObject*/ ).runMethod(true,"getSize")),c_noventa.__c.getField(false,"Colors").getField(true,"Green")); - BA.debugLineNum = 176;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(32768); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 177;BA.debugLine="Dim resultado As DBResult = reqManager.HandleJo"; -Debug.ShouldStop(65536); -_resultado = __ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("resultado", _resultado);Debug.locals.put("resultado", _resultado); - BA.debugLineNum = 178;BA.debugLine="If resultado.Tag.As(String).IndexOf(\"ins_NOVENT"; -Debug.ShouldStop(131072); -if (RemoteObject.solveBoolean(">",(BA.ObjectToString(_resultado.getField(false,"Tag" /*RemoteObject*/ ))).runMethod(true,"indexOf",(Object)(RemoteObject.createImmutable("ins_NOVENTAPendientes_head_"))),BA.numberCast(double.class, -(double) (0 + 1)))) { - BA.debugLineNum = 179;BA.debugLine="Private cliente As String= resultado.Tag"; -Debug.ShouldStop(262144); -_cliente = BA.ObjectToString(_resultado.getField(false,"Tag" /*RemoteObject*/ ));Debug.locals.put("cliente", _cliente);Debug.locals.put("cliente", _cliente); - BA.debugLineNum = 180;BA.debugLine="cliente = cliente.SubString(cliente.IndexOf(\"_"; -Debug.ShouldStop(524288); -_cliente = _cliente.runMethod(true,"substring",(Object)(RemoteObject.solve(new RemoteObject[] {_cliente.runMethod(true,"indexOf",(Object)(RemoteObject.createImmutable("_"))),RemoteObject.createImmutable(24)}, "+",1, 1)));Debug.locals.put("cliente", _cliente); - BA.debugLineNum = 181;BA.debugLine="Log($\"Cliente1:${cliente}\"$)"; -Debug.ShouldStop(1048576); -c_noventa.__c.runVoidMethod ("LogImpl","310551307",(RemoteObject.concat(RemoteObject.createImmutable("Cliente1:"),c_noventa.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_cliente))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 182;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update N"; -Debug.ShouldStop(2097152); -c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("update NOVENTA SET NV_ENVIO = ? WHERE NV_CLIENTE = ? AND NV_ENVIO <> 1")),(Object)(c_noventa.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("String",new int[] {2},new Object[] {BA.ObjectToString("1"),_cliente}))))); - BA.debugLineNum = 183;BA.debugLine="For Each records() As Object In resultado.Rows"; -Debug.ShouldStop(4194304); -{ -final RemoteObject group12 = _resultado.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen12 = group12.runMethod(true,"getSize").get() -;int index12 = 0; -; -for (; index12 < groupLen12;index12++){ -_records = (group12.runMethod(false,"Get",index12));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 184;BA.debugLine="For Each k As String In resultado.Columns.Key"; -Debug.ShouldStop(8388608); -{ -final RemoteObject group13 = _resultado.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Keys"); -final int groupLen13 = group13.runMethod(true,"getSize").get() -;int index13 = 0; -; -for (; index13 < groupLen13;index13++){ -_k = BA.ObjectToString(group13.runMethod(false,"Get",index13));Debug.locals.put("k", _k); -Debug.locals.put("k", _k); - BA.debugLineNum = 185;BA.debugLine="Log(resultado.Tag & \": \" & k & \": \" & record"; -Debug.ShouldStop(16777216); -c_noventa.__c.runVoidMethod ("LogImpl","310551311",RemoteObject.concat(_resultado.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(": "),_k,RemoteObject.createImmutable(": "),_records.getArrayElement(false,BA.numberCast(int.class, _resultado.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((_k)))))),0); - } -}Debug.locals.put("k", _k); -; - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 193;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(1); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 194;BA.debugLine="Dim resultado As DBResult = reqManager.HandleJo"; -Debug.ShouldStop(2); -_resultado = __ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("resultado", _resultado);Debug.locals.put("resultado", _resultado); - BA.debugLineNum = 195;BA.debugLine="If resultado.Tag.As(String).IndexOf(\"ins_NOVENT"; -Debug.ShouldStop(4); -if (RemoteObject.solveBoolean(">",(BA.ObjectToString(_resultado.getField(false,"Tag" /*RemoteObject*/ ))).runMethod(true,"indexOf",(Object)(RemoteObject.createImmutable("ins_NOVENTAcerradoper_head_"))),BA.numberCast(double.class, -(double) (0 + 1)))) { - BA.debugLineNum = 196;BA.debugLine="Private cliente As String= resultado.Tag"; -Debug.ShouldStop(8); -_cliente = BA.ObjectToString(_resultado.getField(false,"Tag" /*RemoteObject*/ ));Debug.locals.put("cliente", _cliente);Debug.locals.put("cliente", _cliente); - BA.debugLineNum = 197;BA.debugLine="cliente = cliente.SubString(cliente.IndexOf(\"_"; -Debug.ShouldStop(16); -_cliente = _cliente.runMethod(true,"substring",(Object)(RemoteObject.solve(new RemoteObject[] {_cliente.runMethod(true,"indexOf",(Object)(RemoteObject.createImmutable("_"))),RemoteObject.createImmutable(24)}, "+",1, 1)));Debug.locals.put("cliente", _cliente); - BA.debugLineNum = 198;BA.debugLine="Log($\"Cliente1:${cliente}\"$)"; -Debug.ShouldStop(32); -c_noventa.__c.runVoidMethod ("LogImpl","310551324",(RemoteObject.concat(RemoteObject.createImmutable("Cliente1:"),c_noventa.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_cliente))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 199;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update N"; -Debug.ShouldStop(64); -c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("update NOVENTA SET NV_ENVIO = ? WHERE NV_CLIENTE = ? AND NV_ENVIO <> 1")),(Object)(c_noventa.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("String",new int[] {2},new Object[] {BA.ObjectToString("1"),_cliente}))))); - BA.debugLineNum = 200;BA.debugLine="For Each records() As Object In resultado.Rows"; -Debug.ShouldStop(128); -{ -final RemoteObject group26 = _resultado.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen26 = group26.runMethod(true,"getSize").get() -;int index26 = 0; -; -for (; index26 < groupLen26;index26++){ -_records = (group26.runMethod(false,"Get",index26));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 201;BA.debugLine="For Each k As String In resultado.Columns.Key"; -Debug.ShouldStop(256); -{ -final RemoteObject group27 = _resultado.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Keys"); -final int groupLen27 = group27.runMethod(true,"getSize").get() -;int index27 = 0; -; -for (; index27 < groupLen27;index27++){ -_k = BA.ObjectToString(group27.runMethod(false,"Get",index27));Debug.locals.put("k", _k); -Debug.locals.put("k", _k); - BA.debugLineNum = 202;BA.debugLine="Log(resultado.Tag & \": \" & k & \": \" & record"; -Debug.ShouldStop(512); -c_noventa.__c.runVoidMethod ("LogImpl","310551328",RemoteObject.concat(_resultado.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(": "),_k,RemoteObject.createImmutable(": "),_records.getArrayElement(false,BA.numberCast(int.class, _resultado.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((_k)))))),0); - } -}Debug.locals.put("k", _k); -; - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 207;BA.debugLine="Job.Release"; -Debug.ShouldStop(16384); -_job.runClassMethod (keymon.lat.medicomed.httpjob.class, "_release" /*RemoteObject*/ ); - }; - BA.debugLineNum = 210;BA.debugLine="End Sub"; -Debug.ShouldStop(131072); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _mandapendientesnoventa(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("mandaPendientesnoventa (c_noventa) ","c_noventa",8,__ref.getField(false, "ba"),__ref,138); -if (RapidSub.canDelegate("mandapendientesnoventa")) { return __ref.runUserSub(false, "c_noventa","mandapendientesnoventa", __ref);} -int _i = 0; -RemoteObject _cmd = RemoteObject.declareNull("keymon.lat.medicomed.dbrequestmanager._dbcommand"); - BA.debugLineNum = 138;BA.debugLine="Sub mandaPendientesnoventa"; -Debug.ShouldStop(512); - BA.debugLineNum = 139;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT NV_CL"; -Debug.ShouldStop(1024); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("SELECT NV_CLIENTE,NV_FECHA,NV_USER,NV_MOTIVO,NV_COMM,NV_LAT,NV_LON, NV_NOMBRE, NV_DIRECCION FROM NOVENTA where NV_ENVIO <> 1")))); - BA.debugLineNum = 140;BA.debugLine="Log($\"NOVENYA_Cliente PENDIENTE: ${c.RowCount}\"$)"; -Debug.ShouldStop(2048); -c_noventa.__c.runVoidMethod ("LogImpl","310485762",(RemoteObject.concat(RemoteObject.createImmutable("NOVENYA_Cliente PENDIENTE: "),c_noventa.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount")))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 141;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 142;BA.debugLine="For i=0 To c.RowCount -1"; -Debug.ShouldStop(8192); -{ -final int step4 = 1; -final int limit4 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step4 > 0 && _i <= limit4) || (step4 < 0 && _i >= limit4) ;_i = ((int)(0 + _i + step4)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 143;BA.debugLine="c.Position=i"; -Debug.ShouldStop(16384); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 144;BA.debugLine="Log(c.GetString(\"NV_MOTIVO\"))"; -Debug.ShouldStop(32768); -c_noventa.__c.runVoidMethod ("LogImpl","310485766",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_MOTIVO"))),0); - BA.debugLineNum = 145;BA.debugLine="If c.GetString(\"NV_MOTIVO\") = \"Cerrado permanen"; -Debug.ShouldStop(65536); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_MOTIVO"))),BA.ObjectToString("Cerrado permanente."))) { - BA.debugLineNum = 146;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(131072); -_cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");Debug.locals.put("cmd", _cmd); - BA.debugLineNum = 147;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(262144); -_cmd.runVoidMethod ("Initialize"); - BA.debugLineNum = 148;BA.debugLine="cmd.Name = \"insert_clientescerrados_MEDI\""; -Debug.ShouldStop(524288); -_cmd.setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("insert_clientescerrados_MEDI")); - BA.debugLineNum = 149;BA.debugLine="cmd.Parameters = Array As Object(c.GetString(\""; -Debug.ShouldStop(1048576); -_cmd.setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {10},new Object[] {(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_CLIENTE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_FECHA")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_USER")))),RemoteObject.createImmutable(("CERRADO PERMANENTE")),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_LAT")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_LON")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_NOMBRE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_DIRECCION")))),(c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_principal" /*RemoteObject*/ ).getField(true,"_almacen" /*RemoteObject*/ )),(c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_principal" /*RemoteObject*/ ).getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"getText"))})); - BA.debugLineNum = 150;BA.debugLine="reqManager.ExecuteCommand(cmd , $\"ins_NOVENTAc"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(_cmd),(Object)(((RemoteObject.concat(RemoteObject.createImmutable("ins_NOVENTAcerradoper_head_"),c_noventa.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_CLIENTE")))))),RemoteObject.createImmutable("")))))); - BA.debugLineNum = 152;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(8388608); -_cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");Debug.locals.put("cmd", _cmd); - BA.debugLineNum = 153;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(16777216); -_cmd.runVoidMethod ("Initialize"); - BA.debugLineNum = 154;BA.debugLine="cmd.Name = \"insert_noventa_MEDI\""; -Debug.ShouldStop(33554432); -_cmd.setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("insert_noventa_MEDI")); - BA.debugLineNum = 155;BA.debugLine="cmd.Parameters = Array As Object(c.GetString(\""; -Debug.ShouldStop(67108864); -_cmd.setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {11},new Object[] {(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_CLIENTE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_FECHA")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_USER")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_MOTIVO")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_COMM")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_LAT")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_LON")))),(c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_principal" /*RemoteObject*/ ).getField(true,"_almacen" /*RemoteObject*/ )),(c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_principal" /*RemoteObject*/ ).getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_NOMBRE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_DIRECCION"))))})); - BA.debugLineNum = 156;BA.debugLine="reqManager.ExecuteCommand(cmd , $\"ins_NOVENTAP"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(_cmd),(Object)(((RemoteObject.concat(RemoteObject.createImmutable("ins_NOVENTAPendientes_head_"),c_noventa.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_CLIENTE")))))),RemoteObject.createImmutable("")))))); - }else { - BA.debugLineNum = 158;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(536870912); -_cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");Debug.locals.put("cmd", _cmd); - BA.debugLineNum = 159;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(1073741824); -_cmd.runVoidMethod ("Initialize"); - BA.debugLineNum = 160;BA.debugLine="cmd.Name = \"insert_noventa_MEDI\""; -Debug.ShouldStop(-2147483648); -_cmd.setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("insert_noventa_MEDI")); - BA.debugLineNum = 161;BA.debugLine="cmd.Parameters = Array As Object(c.GetString(\""; -Debug.ShouldStop(1); -_cmd.setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {11},new Object[] {(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_CLIENTE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_FECHA")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_USER")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_MOTIVO")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_COMM")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_LAT")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_LON")))),(c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_principal" /*RemoteObject*/ ).getField(true,"_almacen" /*RemoteObject*/ )),(c_noventa._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_principal" /*RemoteObject*/ ).getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_NOMBRE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_DIRECCION"))))})); - BA.debugLineNum = 162;BA.debugLine="reqManager.ExecuteCommand(cmd , $\"ins_NOVENTAP"; -Debug.ShouldStop(2); -__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(_cmd),(Object)(((RemoteObject.concat(RemoteObject.createImmutable("ins_NOVENTAPendientes_head_"),c_noventa.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_CLIENTE")))))),RemoteObject.createImmutable("")))))); - }; - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 166;BA.debugLine="c.Close"; -Debug.ShouldStop(32); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 167;BA.debugLine="End Sub"; -Debug.ShouldStop(64); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_nuevocliente.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_nuevocliente.java deleted file mode 100644 index 4859d0e..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_nuevocliente.java +++ /dev/null @@ -1,71 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class c_nuevocliente { - public static RemoteObject myClass; - public c_nuevocliente() { - } - public static PCBA staticBA = new PCBA(null, c_nuevocliente.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _root = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _g = RemoteObject.declareNull("anywheresoftware.b4a.gps.GPS"); -public static RemoteObject _ruta = RemoteObject.createImmutable(""); -public static RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _reqmanager = RemoteObject.declareNull("keymon.lat.medicomed.dbrequestmanager"); -public static RemoteObject _cancela = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _guarda = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _cuenta = RemoteObject.createImmutable(""); -public static RemoteObject _usuario = RemoteObject.createImmutable(""); -public static RemoteObject _sdate = RemoteObject.createImmutable(""); -public static RemoteObject _stime = RemoteObject.createImmutable(""); -public static RemoteObject _sdate2 = RemoteObject.createImmutable(""); -public static RemoteObject _stime2 = RemoteObject.createImmutable(""); -public static RemoteObject _no_cliente = RemoteObject.createImmutable(""); -public static RemoteObject _no_ruta = RemoteObject.createImmutable(""); -public static RemoteObject _desdebd = RemoteObject.createImmutable(false); -public static RemoteObject _r_4 = RemoteObject.declareNull("anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper"); -public static RemoteObject _e_nombre = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -public static RemoteObject _tgl = RemoteObject.declareNull("com.rootsoft.togglelibrary.ToggleLibrary"); -public static RemoteObject _l_sinubicacion = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _p_nuevocliente = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _label1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _p_botones = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _p_cam = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _p_camara = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _b_foto_inci = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _camex2 = RemoteObject.declareNull("keymon.lat.medicomed.cameraexclass2"); -public static RemoteObject _frontcamera = RemoteObject.createImmutable(false); -public static RemoteObject _fototomada = RemoteObject.createImmutable(""); -public static RemoteObject _almacen = RemoteObject.createImmutable(""); -public static RemoteObject _et_direccion = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -public static RemoteObject _label2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _lat = RemoteObject.createImmutable(0); -public static RemoteObject _lon = RemoteObject.createImmutable(0); -public static RemoteObject _b_ubicacion = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _label3 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _et_colonia = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -public static RemoteObject _label4 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _et_cp = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -public static RemoteObject _lv_colonia = RemoteObject.declareNull("anywheresoftware.b4a.objects.ListViewWrapper"); -public static RemoteObject _banderasepo = RemoteObject.createImmutable(0); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"ALMACEN",_ref.getField(false, "_almacen"),"b_foto_inci",_ref.getField(false, "_b_foto_inci"),"b_ubicacion",_ref.getField(false, "_b_ubicacion"),"banderasepo",_ref.getField(false, "_banderasepo"),"c",_ref.getField(false, "_c"),"camEx2",_ref.getField(false, "_camex2"),"CANCELA",_ref.getField(false, "_cancela"),"cuenta",_ref.getField(false, "_cuenta"),"DateUtils",_ref.getField(false, "_dateutils"),"desdeBD",_ref.getField(false, "_desdebd"),"E_NOMBRE",_ref.getField(false, "_e_nombre"),"et_colonia",_ref.getField(false, "_et_colonia"),"et_cp",_ref.getField(false, "_et_cp"),"et_direccion",_ref.getField(false, "_et_direccion"),"fototomada",_ref.getField(false, "_fototomada"),"frontCamera",_ref.getField(false, "_frontcamera"),"g",_ref.getField(false, "_g"),"GUARDA",_ref.getField(false, "_guarda"),"l_sinUbicacion",_ref.getField(false, "_l_sinubicacion"),"Label1",_ref.getField(false, "_label1"),"Label2",_ref.getField(false, "_label2"),"Label3",_ref.getField(false, "_label3"),"Label4",_ref.getField(false, "_label4"),"lat",_ref.getField(false, "_lat"),"lon",_ref.getField(false, "_lon"),"lv_colonia",_ref.getField(false, "_lv_colonia"),"no_cliente",_ref.getField(false, "_no_cliente"),"no_ruta",_ref.getField(false, "_no_ruta"),"p_botones",_ref.getField(false, "_p_botones"),"p_cam",_ref.getField(false, "_p_cam"),"p_camara",_ref.getField(false, "_p_camara"),"p_nuevoCliente",_ref.getField(false, "_p_nuevocliente"),"r_4",_ref.getField(false, "_r_4"),"reqManager",_ref.getField(false, "_reqmanager"),"Root",_ref.getField(false, "_root"),"ruta",_ref.getField(false, "_ruta"),"sDate",_ref.getField(false, "_sdate"),"sDate2",_ref.getField(false, "_sdate2"),"sTime",_ref.getField(false, "_stime"),"sTime2",_ref.getField(false, "_stime2"),"tgl",_ref.getField(false, "_tgl"),"usuario",_ref.getField(false, "_usuario"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_nuevocliente_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_nuevocliente_subs_0.java deleted file mode 100644 index 3f29c99..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_nuevocliente_subs_0.java +++ /dev/null @@ -1,1323 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class c_nuevocliente_subs_0 { - - -public static RemoteObject _b_foto_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B_FOTO_Click (c_nuevocliente) ","c_nuevocliente",15,__ref.getField(false, "ba"),__ref,400); -if (RapidSub.canDelegate("b_foto_click")) { return __ref.runUserSub(false, "c_nuevocliente","b_foto_click", __ref);} - BA.debugLineNum = 400;BA.debugLine="Private Sub B_FOTO_Click"; -Debug.ShouldStop(32768); - BA.debugLineNum = 401;BA.debugLine="DateTime.DateFormat=\"ddMMyyyyHHmmss\""; -Debug.ShouldStop(65536); -c_nuevocliente.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("ddMMyyyyHHmmss")); - BA.debugLineNum = 402;BA.debugLine="InitializeCamera2"; -Debug.ShouldStop(131072); -__ref.runClassMethod (keymon.lat.medicomed.c_nuevocliente.class, "_initializecamera2" /*void*/ ); - BA.debugLineNum = 403;BA.debugLine="Subs.panelVisible(p_camara, 0, 0)"; -Debug.ShouldStop(262144); -c_nuevocliente._subs.runVoidMethod ("_panelvisible" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_p_camara" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 404;BA.debugLine="fototomada = DateTime.Now & \"_cliente.jpg\""; -Debug.ShouldStop(524288); -__ref.setField ("_fototomada" /*RemoteObject*/ ,RemoteObject.concat(c_nuevocliente.__c.getField(false,"DateTime").runMethod(true,"getNow"),RemoteObject.createImmutable("_cliente.jpg"))); - BA.debugLineNum = 405;BA.debugLine="End Sub"; -Debug.ShouldStop(1048576); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_foto_inci_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_foto_inci_Click (c_nuevocliente) ","c_nuevocliente",15,__ref.getField(false, "ba"),__ref,312); -if (RapidSub.canDelegate("b_foto_inci_click")) { return __ref.runUserSub(false, "c_nuevocliente","b_foto_inci_click", __ref);} - BA.debugLineNum = 312;BA.debugLine="Private Sub b_foto_inci_Click"; -Debug.ShouldStop(8388608); - BA.debugLineNum = 313;BA.debugLine="camEx2.TakePicture"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_camex2" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.cameraexclass2.class, "_takepicture" /*RemoteObject*/ ); - BA.debugLineNum = 314;BA.debugLine="p_camara.Visible = False"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_p_camara" /*RemoteObject*/ ).runMethod(true,"setVisible",c_nuevocliente.__c.getField(true,"False")); - BA.debugLineNum = 316;BA.debugLine="End Sub"; -Debug.ShouldStop(134217728); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b4xpage_appear(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Appear (c_nuevocliente) ","c_nuevocliente",15,__ref.getField(false, "ba"),__ref,67); -if (RapidSub.canDelegate("b4xpage_appear")) { return __ref.runUserSub(false, "c_nuevocliente","b4xpage_appear", __ref);} - BA.debugLineNum = 67;BA.debugLine="Sub B4XPage_Appear"; -Debug.ShouldStop(4); - BA.debugLineNum = 68;BA.debugLine="E_NOMBRE.Text = \"\""; -Debug.ShouldStop(8); -__ref.getField(false,"_e_nombre" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("")); - BA.debugLineNum = 69;BA.debugLine="et_colonia.Text = \"\""; -Debug.ShouldStop(16); -__ref.getField(false,"_et_colonia" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("")); - BA.debugLineNum = 70;BA.debugLine="et_cp.Text = \"\""; -Debug.ShouldStop(32); -__ref.getField(false,"_et_cp" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("")); - BA.debugLineNum = 71;BA.debugLine="et_direccion.Text = \"\""; -Debug.ShouldStop(64); -__ref.getField(false,"_et_direccion" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("")); - BA.debugLineNum = 72;BA.debugLine="lv_colonia.Visible = False"; -Debug.ShouldStop(128); -__ref.getField(false,"_lv_colonia" /*RemoteObject*/ ).runMethod(true,"setVisible",c_nuevocliente.__c.getField(true,"False")); - BA.debugLineNum = 73;BA.debugLine="lv_colonia.Clear"; -Debug.ShouldStop(256); -__ref.getField(false,"_lv_colonia" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 74;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then"; -Debug.ShouldStop(512); -if (c_nuevocliente.__c.runMethod(true,"Not",(Object)(c_nuevocliente._starter._gps /*RemoteObject*/ .runMethod(true,"getGPSEnabled"))).get().booleanValue()) { - BA.debugLineNum = 75;BA.debugLine="ToastMessageShow(\"Es necesario tener el GPS ence"; -Debug.ShouldStop(1024); -c_nuevocliente.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Es necesario tener el GPS encendido")),(Object)(c_nuevocliente.__c.getField(true,"True"))); - BA.debugLineNum = 76;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent"; -Debug.ShouldStop(2048); -c_nuevocliente.__c.runVoidMethod ("StartActivity",__ref.getField(false, "ba"),(Object)((c_nuevocliente._starter._gps /*RemoteObject*/ .runMethod(false,"getLocationSettingsIntent")))); - }; - BA.debugLineNum = 78;BA.debugLine="GUARDA.Visible = False"; -Debug.ShouldStop(8192); -__ref.getField(false,"_guarda" /*RemoteObject*/ ).runMethod(true,"setVisible",c_nuevocliente.__c.getField(true,"False")); - BA.debugLineNum = 79;BA.debugLine="Subs.panelVisible(p_nuevoCliente, 0, 0)"; -Debug.ShouldStop(16384); -c_nuevocliente._subs.runVoidMethod ("_panelvisible" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_p_nuevocliente" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 80;BA.debugLine="p_nuevoCliente.Height = Root.Height"; -Debug.ShouldStop(32768); -__ref.getField(false,"_p_nuevocliente" /*RemoteObject*/ ).runMethod(true,"setHeight",__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getHeight")); - BA.debugLineNum = 81;BA.debugLine="p_nuevoCliente.Width = Root.Width"; -Debug.ShouldStop(65536); -__ref.getField(false,"_p_nuevocliente" /*RemoteObject*/ ).runMethod(true,"setWidth",__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth")); - BA.debugLineNum = 82;BA.debugLine="Subs.centraEtiqueta(Label1, Root.Width)"; -Debug.ShouldStop(131072); -c_nuevocliente._subs.runVoidMethod ("_centraetiqueta" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_label1" /*RemoteObject*/ )),(Object)(__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"))); - BA.debugLineNum = 83;BA.debugLine="Subs.centraEtiqueta(Label2, Root.Width)"; -Debug.ShouldStop(262144); -c_nuevocliente._subs.runVoidMethod ("_centraetiqueta" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_label2" /*RemoteObject*/ )),(Object)(__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"))); - BA.debugLineNum = 84;BA.debugLine="Subs.centraEtiqueta(Label3, Root.Width)"; -Debug.ShouldStop(524288); -c_nuevocliente._subs.runVoidMethod ("_centraetiqueta" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_label3" /*RemoteObject*/ )),(Object)(__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"))); - BA.debugLineNum = 85;BA.debugLine="Subs.centraEtiqueta(Label4, Root.Width)"; -Debug.ShouldStop(1048576); -c_nuevocliente._subs.runVoidMethod ("_centraetiqueta" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_label4" /*RemoteObject*/ )),(Object)(__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"))); - BA.debugLineNum = 86;BA.debugLine="Subs.centraEtiqueta(l_sinUbicacion, Root.Width)"; -Debug.ShouldStop(2097152); -c_nuevocliente._subs.runVoidMethod ("_centraetiqueta" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_l_sinubicacion" /*RemoteObject*/ )),(Object)(__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"))); - BA.debugLineNum = 87;BA.debugLine="Subs.centraEtiqueta(b_ubicacion, Root.Width)"; -Debug.ShouldStop(4194304); -c_nuevocliente._subs.runVoidMethod ("_centraetiqueta" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_b_ubicacion" /*RemoteObject*/ )),(Object)(__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"))); - BA.debugLineNum = 88;BA.debugLine="Subs.centraPanel(p_botones, Root.Width)"; -Debug.ShouldStop(8388608); -c_nuevocliente._subs.runVoidMethod ("_centrapanel" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_p_botones" /*RemoteObject*/ )),(Object)(__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"))); - BA.debugLineNum = 89;BA.debugLine="E_NOMBRE.Left = Round(Root.Width/2)-(E_NOMBRE.Wid"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_e_nombre" /*RemoteObject*/ ).runMethod(true,"setLeft",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {c_nuevocliente.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0))),(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_e_nombre" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0))}, "-",1, 0))); - BA.debugLineNum = 90;BA.debugLine="et_direccion.Left = Round(Root.Width/2)-(E_NOMBRE"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_et_direccion" /*RemoteObject*/ ).runMethod(true,"setLeft",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {c_nuevocliente.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0))),(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_e_nombre" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0))}, "-",1, 0))); - BA.debugLineNum = 91;BA.debugLine="et_colonia.Left = Round(Root.Width/2)-(E_NOMBRE.W"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_et_colonia" /*RemoteObject*/ ).runMethod(true,"setLeft",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {c_nuevocliente.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0))),(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_e_nombre" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0))}, "-",1, 0))); - BA.debugLineNum = 92;BA.debugLine="et_cp.Left = Round(Root.Width/2)-(E_NOMBRE.Width/"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_et_cp" /*RemoteObject*/ ).runMethod(true,"setLeft",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {c_nuevocliente.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0))),(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_e_nombre" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0))}, "-",1, 0))); - BA.debugLineNum = 93;BA.debugLine="If B4XPages.MainPage.lat_gps <> \"0.0\" Then"; -Debug.ShouldStop(268435456); -if (RemoteObject.solveBoolean("!",c_nuevocliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ ),BA.ObjectToString("0.0"))) { - BA.debugLineNum = 94;BA.debugLine="GUARDA.Visible = True 'Si hay ubicaccion, mostra"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_guarda" /*RemoteObject*/ ).runMethod(true,"setVisible",c_nuevocliente.__c.getField(true,"True")); - BA.debugLineNum = 95;BA.debugLine="l_sinUbicacion.Visible = False"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_l_sinubicacion" /*RemoteObject*/ ).runMethod(true,"setVisible",c_nuevocliente.__c.getField(true,"False")); - }; - BA.debugLineNum = 98;BA.debugLine="If Not(Starter.GPS.GPSEnabled) Then"; -Debug.ShouldStop(2); -if (c_nuevocliente.__c.runMethod(true,"Not",(Object)(c_nuevocliente._starter._gps /*RemoteObject*/ .runMethod(true,"getGPSEnabled"))).get().booleanValue()) { - BA.debugLineNum = 99;BA.debugLine="ToastMessageShow(\"Debe Activar el GPS del Equipo"; -Debug.ShouldStop(4); -c_nuevocliente.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Debe Activar el GPS del Equipo.")),(Object)(c_nuevocliente.__c.getField(true,"True"))); - BA.debugLineNum = 100;BA.debugLine="StartActivity(Starter.GPS.LocationSettingsIntent"; -Debug.ShouldStop(8); -c_nuevocliente.__c.runVoidMethod ("StartActivity",__ref.getField(false, "ba"),(Object)((c_nuevocliente._starter._gps /*RemoteObject*/ .runMethod(false,"getLocationSettingsIntent")))); - }else { - BA.debugLineNum = 102;BA.debugLine="Starter.GPS.Start(0, 0)"; -Debug.ShouldStop(32); -c_nuevocliente._starter._gps /*RemoteObject*/ .runVoidMethodAndSync ("Start",__ref.getField(false, "ba"),(Object)(BA.numberCast(long.class, 0)),(Object)(BA.numberCast(float.class, 0))); - }; - BA.debugLineNum = 105;BA.debugLine="CallSubDelayed(Tracker, \"StartFLPSmall\")"; -Debug.ShouldStop(256); -c_nuevocliente.__c.runVoidMethod ("CallSubDelayed",__ref.getField(false, "ba"),(Object)((c_nuevocliente._tracker.getObject())),(Object)(RemoteObject.createImmutable("StartFLPSmall"))); - BA.debugLineNum = 106;BA.debugLine="desdeBD = False"; -Debug.ShouldStop(512); -__ref.setField ("_desdebd" /*RemoteObject*/ ,c_nuevocliente.__c.getField(true,"False")); - BA.debugLineNum = 107;BA.debugLine="End Sub"; -Debug.ShouldStop(1024); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b4xpage_created(RemoteObject __ref,RemoteObject _root1) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Created (c_nuevocliente) ","c_nuevocliente",15,__ref.getField(false, "ba"),__ref,51); -if (RapidSub.canDelegate("b4xpage_created")) { return __ref.runUserSub(false, "c_nuevocliente","b4xpage_created", __ref, _root1);} -Debug.locals.put("Root1", _root1); - BA.debugLineNum = 51;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -Debug.ShouldStop(262144); - BA.debugLineNum = 52;BA.debugLine="Root = Root1"; -Debug.ShouldStop(524288); -__ref.setField ("_root" /*RemoteObject*/ ,_root1); - BA.debugLineNum = 54;BA.debugLine="Root.LoadLayout(\"nuevocliente\")"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_root" /*RemoteObject*/ ).runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("nuevocliente")),__ref.getField(false, "ba")); - BA.debugLineNum = 55;BA.debugLine="ruta = File.DirInternal"; -Debug.ShouldStop(4194304); -__ref.setField ("_ruta" /*RemoteObject*/ ,c_nuevocliente.__c.getField(false,"File").runMethod(true,"getDirInternal")); - BA.debugLineNum = 56;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; -Debug.ShouldStop(8388608); -if (RemoteObject.solveBoolean("=",c_nuevocliente.__c.getField(false,"File").runMethod(true,"Exists",(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(RemoteObject.createImmutable("kmt.db"))),c_nuevocliente.__c.getField(true,"False"))) { - BA.debugLineNum = 57;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; -Debug.ShouldStop(16777216); -c_nuevocliente.__c.getField(false,"File").runVoidMethod ("Copy",(Object)(c_nuevocliente.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(BA.ObjectToString("kmt.db")),(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(RemoteObject.createImmutable("kmt.db"))); - }; - BA.debugLineNum = 62;BA.debugLine="reqManager.Initialize(Me, B4XPages.MainPage.SERVE"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref),(Object)(c_nuevocliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_server" /*RemoteObject*/ ))); - BA.debugLineNum = 63;BA.debugLine="End Sub"; -Debug.ShouldStop(1073741824); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _camera1_picturetaken(RemoteObject __ref,RemoteObject _data) throws Exception{ -try { - Debug.PushSubsStack("Camera1_PictureTaken (c_nuevocliente) ","c_nuevocliente",15,__ref.getField(false, "ba"),__ref,359); -if (RapidSub.canDelegate("camera1_picturetaken")) { return __ref.runUserSub(false, "c_nuevocliente","camera1_picturetaken", __ref, _data);} -RemoteObject _filename = RemoteObject.createImmutable(""); -RemoteObject _dirp = RemoteObject.createImmutable(""); -RemoteObject _dir = RemoteObject.createImmutable(""); -RemoteObject _dir2 = RemoteObject.createImmutable(""); -Debug.locals.put("Data", _data); - BA.debugLineNum = 359;BA.debugLine="Sub Camera1_PictureTaken (Data()As Byte)"; -Debug.ShouldStop(64); - BA.debugLineNum = 360;BA.debugLine="Log(\"tome foto\")"; -Debug.ShouldStop(128); -c_nuevocliente.__c.runVoidMethod ("LogImpl","322151169",RemoteObject.createImmutable("tome foto"),0); - BA.debugLineNum = 361;BA.debugLine="Dim filename As String = fototomada"; -Debug.ShouldStop(256); -_filename = __ref.getField(true,"_fototomada" /*RemoteObject*/ );Debug.locals.put("filename", _filename);Debug.locals.put("filename", _filename); - BA.debugLineNum = 362;BA.debugLine="Dim Dirp As String = File.DirInternal"; -Debug.ShouldStop(512); -_dirp = c_nuevocliente.__c.getField(false,"File").runMethod(true,"getDirInternal");Debug.locals.put("Dirp", _dirp);Debug.locals.put("Dirp", _dirp); - BA.debugLineNum = 363;BA.debugLine="Dim Dir As String"; -Debug.ShouldStop(1024); -_dir = RemoteObject.createImmutable("");Debug.locals.put("Dir", _dir); - BA.debugLineNum = 364;BA.debugLine="Dim Dir2 As String"; -Debug.ShouldStop(2048); -_dir2 = RemoteObject.createImmutable("");Debug.locals.put("Dir2", _dir2); - BA.debugLineNum = 365;BA.debugLine="Try"; -Debug.ShouldStop(4096); -try { BA.debugLineNum = 366;BA.debugLine="File.MakeDir(Dirp,\"/promotoriakmts\")"; -Debug.ShouldStop(8192); -c_nuevocliente.__c.getField(false,"File").runVoidMethod ("MakeDir",(Object)(_dirp),(Object)(RemoteObject.createImmutable("/promotoriakmts"))); - BA.debugLineNum = 367;BA.debugLine="Dir = \"/promotoriakmts\""; -Debug.ShouldStop(16384); -_dir = BA.ObjectToString("/promotoriakmts");Debug.locals.put("Dir", _dir); - BA.debugLineNum = 368;BA.debugLine="Log(\"creado en promotoria \" & Dirp & Dir)"; -Debug.ShouldStop(32768); -c_nuevocliente.__c.runVoidMethod ("LogImpl","322151177",RemoteObject.concat(RemoteObject.createImmutable("creado en promotoria "),_dirp,_dir),0); - Debug.CheckDeviceExceptions(); -} - catch (Exception e11) { - BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e11.toString()); BA.debugLineNum = 370;BA.debugLine="Dir = \"\""; -Debug.ShouldStop(131072); -_dir = BA.ObjectToString("");Debug.locals.put("Dir", _dir); - BA.debugLineNum = 371;BA.debugLine="Log(\"creado en raiz\")"; -Debug.ShouldStop(262144); -c_nuevocliente.__c.runVoidMethod ("LogImpl","322151180",RemoteObject.createImmutable("creado en raiz"),0); - }; - BA.debugLineNum = 374;BA.debugLine="Try"; -Debug.ShouldStop(2097152); -try { BA.debugLineNum = 375;BA.debugLine="File.MakeDir(Dirp & Dir,\"/reduccion\")"; -Debug.ShouldStop(4194304); -c_nuevocliente.__c.getField(false,"File").runVoidMethod ("MakeDir",(Object)(RemoteObject.concat(_dirp,_dir)),(Object)(RemoteObject.createImmutable("/reduccion"))); - BA.debugLineNum = 376;BA.debugLine="Dir2 = \"/reduccion\""; -Debug.ShouldStop(8388608); -_dir2 = BA.ObjectToString("/reduccion");Debug.locals.put("Dir2", _dir2); - BA.debugLineNum = 377;BA.debugLine="Log(\"creado en promotoria \" & Dirp & Dir & Dir2)"; -Debug.ShouldStop(16777216); -c_nuevocliente.__c.runVoidMethod ("LogImpl","322151186",RemoteObject.concat(RemoteObject.createImmutable("creado en promotoria "),_dirp,_dir,_dir2),0); - Debug.CheckDeviceExceptions(); -} - catch (Exception e19) { - BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e19.toString()); BA.debugLineNum = 379;BA.debugLine="Dir = \"\""; -Debug.ShouldStop(67108864); -_dir = BA.ObjectToString("");Debug.locals.put("Dir", _dir); - BA.debugLineNum = 380;BA.debugLine="Log(\"creado en raiz\")"; -Debug.ShouldStop(134217728); -c_nuevocliente.__c.runVoidMethod ("LogImpl","322151189",RemoteObject.createImmutable("creado en raiz"),0); - }; - BA.debugLineNum = 383;BA.debugLine="camEx2.SavePictureToFile(Data, Dirp&Dir, filename"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_camex2" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.cameraexclass2.class, "_savepicturetofile" /*RemoteObject*/ ,(Object)(_data),(Object)(RemoteObject.concat(_dirp,_dir)),(Object)(_filename)); - BA.debugLineNum = 384;BA.debugLine="camEx2.StartPreview 'restart preview"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_camex2" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.cameraexclass2.class, "_startpreview" /*RemoteObject*/ ); - BA.debugLineNum = 385;BA.debugLine="ToastMessageShow(\"Picture saved.\" & CRLF & \"File"; -Debug.ShouldStop(1); -c_nuevocliente.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("Picture saved."),c_nuevocliente.__c.getField(true,"CRLF"),RemoteObject.createImmutable("File size: "),c_nuevocliente.__c.getField(false,"File").runMethod(true,"Size",(Object)(_dir),(Object)(_filename)),_dir,RemoteObject.createImmutable(","),_filename))),(Object)(c_nuevocliente.__c.getField(true,"True"))); - BA.debugLineNum = 386;BA.debugLine="Log(\"Picture saved.\" & CRLF & \"File size: \" & Fi"; -Debug.ShouldStop(2); -c_nuevocliente.__c.runVoidMethod ("LogImpl","322151195",RemoteObject.concat(RemoteObject.createImmutable("Picture saved."),c_nuevocliente.__c.getField(true,"CRLF"),RemoteObject.createImmutable("File size: "),c_nuevocliente.__c.getField(false,"File").runMethod(true,"Size",(Object)(_dir),(Object)(_filename)),_dir,RemoteObject.createImmutable(","),_filename),0); - BA.debugLineNum = 387;BA.debugLine="p_camara.Visible = False"; -Debug.ShouldStop(4); -__ref.getField(false,"_p_camara" /*RemoteObject*/ ).runMethod(true,"setVisible",c_nuevocliente.__c.getField(true,"False")); - BA.debugLineNum = 388;BA.debugLine="StopCamera2"; -Debug.ShouldStop(8); -__ref.runClassMethod (keymon.lat.medicomed.c_nuevocliente.class, "_stopcamera2" /*RemoteObject*/ ); - BA.debugLineNum = 390;BA.debugLine="End Sub"; -Debug.ShouldStop(32); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _camera1_ready(RemoteObject __ref,RemoteObject _success) throws Exception{ -try { - Debug.PushSubsStack("Camera1_Ready (c_nuevocliente) ","c_nuevocliente",15,__ref.getField(false, "ba"),__ref,345); -if (RapidSub.canDelegate("camera1_ready")) { return __ref.runUserSub(false, "c_nuevocliente","camera1_ready", __ref, _success);} -Debug.locals.put("Success", _success); - BA.debugLineNum = 345;BA.debugLine="Sub Camera1_Ready (Success As Boolean)"; -Debug.ShouldStop(16777216); - BA.debugLineNum = 346;BA.debugLine="Log(\"Camara ready\")"; -Debug.ShouldStop(33554432); -c_nuevocliente.__c.runVoidMethod ("LogImpl","322085633",RemoteObject.createImmutable("Camara ready"),0); - BA.debugLineNum = 347;BA.debugLine="If Success Then"; -Debug.ShouldStop(67108864); -if (_success.get().booleanValue()) { - BA.debugLineNum = 348;BA.debugLine="camEx2.SetJpegQuality(90)"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_camex2" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.cameraexclass2.class, "_setjpegquality" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, 90))); - BA.debugLineNum = 349;BA.debugLine="camEx2.SetContinuousAutoFocus"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_camex2" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.cameraexclass2.class, "_setcontinuousautofocus" /*RemoteObject*/ ); - BA.debugLineNum = 350;BA.debugLine="camEx2.CommitParameters"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_camex2" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.cameraexclass2.class, "_commitparameters" /*RemoteObject*/ ); - BA.debugLineNum = 351;BA.debugLine="camEx2.StartPreview"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_camex2" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.cameraexclass2.class, "_startpreview" /*RemoteObject*/ ); - BA.debugLineNum = 352;BA.debugLine="Log(camEx2.GetPreviewSize)"; -Debug.ShouldStop(-2147483648); -c_nuevocliente.__c.runVoidMethod ("LogImpl","322085639",BA.ObjectToString(__ref.getField(false,"_camex2" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.cameraexclass2.class, "_getpreviewsize" /*RemoteObject*/ )),0); - }else { - BA.debugLineNum = 354;BA.debugLine="ToastMessageShow(\"Cannot open camera.\", True)"; -Debug.ShouldStop(2); -c_nuevocliente.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Cannot open camera.")),(Object)(c_nuevocliente.__c.getField(true,"True"))); - BA.debugLineNum = 355;BA.debugLine="Log(\"Cannot open camera\")"; -Debug.ShouldStop(4); -c_nuevocliente.__c.runVoidMethod ("LogImpl","322085642",RemoteObject.createImmutable("Cannot open camera"),0); - }; - BA.debugLineNum = 357;BA.debugLine="End Sub"; -Debug.ShouldStop(16); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _cancela_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("CANCELA_Click (c_nuevocliente) ","c_nuevocliente",15,__ref.getField(false, "ba"),__ref,127); -if (RapidSub.canDelegate("cancela_click")) { return __ref.runUserSub(false, "c_nuevocliente","cancela_click", __ref);} - BA.debugLineNum = 127;BA.debugLine="Sub CANCELA_Click"; -Debug.ShouldStop(1073741824); - BA.debugLineNum = 128;BA.debugLine="B4XPages.ShowPage(\"Principal\")"; -Debug.ShouldStop(-2147483648); -c_nuevocliente._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Principal"))); - BA.debugLineNum = 129;BA.debugLine="CallSubDelayed(Tracker, \"StartFLP\")"; -Debug.ShouldStop(1); -c_nuevocliente.__c.runVoidMethod ("CallSubDelayed",__ref.getField(false, "ba"),(Object)((c_nuevocliente._tracker.getObject())),(Object)(RemoteObject.createImmutable("StartFLP"))); - BA.debugLineNum = 130;BA.debugLine="lv_colonia.Clear"; -Debug.ShouldStop(2); -__ref.getField(false,"_lv_colonia" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 131;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Private Root As B4XView 'ignore"; -c_nuevocliente._root = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_root",c_nuevocliente._root); - //BA.debugLineNum = 3;BA.debugLine="Private xui As XUI 'ignore"; -c_nuevocliente._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",c_nuevocliente._xui); - //BA.debugLineNum = 5;BA.debugLine="Dim g As GPS"; -c_nuevocliente._g = RemoteObject.createNew ("anywheresoftware.b4a.gps.GPS");__ref.setField("_g",c_nuevocliente._g); - //BA.debugLineNum = 6;BA.debugLine="Dim ruta As String"; -c_nuevocliente._ruta = RemoteObject.createImmutable("");__ref.setField("_ruta",c_nuevocliente._ruta); - //BA.debugLineNum = 7;BA.debugLine="Dim c As Cursor"; -c_nuevocliente._c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_c",c_nuevocliente._c); - //BA.debugLineNum = 8;BA.debugLine="Dim reqManager As DBRequestManager"; -c_nuevocliente._reqmanager = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager");__ref.setField("_reqmanager",c_nuevocliente._reqmanager); - //BA.debugLineNum = 9;BA.debugLine="Dim CANCELA As Button"; -c_nuevocliente._cancela = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_cancela",c_nuevocliente._cancela); - //BA.debugLineNum = 10;BA.debugLine="Dim GUARDA As Button"; -c_nuevocliente._guarda = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_guarda",c_nuevocliente._guarda); - //BA.debugLineNum = 11;BA.debugLine="Dim cuenta As String"; -c_nuevocliente._cuenta = RemoteObject.createImmutable("");__ref.setField("_cuenta",c_nuevocliente._cuenta); - //BA.debugLineNum = 12;BA.debugLine="Dim usuario As String"; -c_nuevocliente._usuario = RemoteObject.createImmutable("");__ref.setField("_usuario",c_nuevocliente._usuario); - //BA.debugLineNum = 13;BA.debugLine="Dim sDate,sTime As String"; -c_nuevocliente._sdate = RemoteObject.createImmutable("");__ref.setField("_sdate",c_nuevocliente._sdate); -c_nuevocliente._stime = RemoteObject.createImmutable("");__ref.setField("_stime",c_nuevocliente._stime); - //BA.debugLineNum = 14;BA.debugLine="Dim sDate2,sTime2 As String"; -c_nuevocliente._sdate2 = RemoteObject.createImmutable("");__ref.setField("_sdate2",c_nuevocliente._sdate2); -c_nuevocliente._stime2 = RemoteObject.createImmutable("");__ref.setField("_stime2",c_nuevocliente._stime2); - //BA.debugLineNum = 15;BA.debugLine="Dim no_cliente As String"; -c_nuevocliente._no_cliente = RemoteObject.createImmutable("");__ref.setField("_no_cliente",c_nuevocliente._no_cliente); - //BA.debugLineNum = 16;BA.debugLine="Dim no_ruta As String"; -c_nuevocliente._no_ruta = RemoteObject.createImmutable("");__ref.setField("_no_ruta",c_nuevocliente._no_ruta); - //BA.debugLineNum = 17;BA.debugLine="Dim desdeBD As Boolean"; -c_nuevocliente._desdebd = RemoteObject.createImmutable(false);__ref.setField("_desdebd",c_nuevocliente._desdebd); - //BA.debugLineNum = 18;BA.debugLine="Dim r_4 As RadioButton"; -c_nuevocliente._r_4 = RemoteObject.createNew ("anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper");__ref.setField("_r_4",c_nuevocliente._r_4); - //BA.debugLineNum = 19;BA.debugLine="Dim E_NOMBRE As EditText"; -c_nuevocliente._e_nombre = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");__ref.setField("_e_nombre",c_nuevocliente._e_nombre); - //BA.debugLineNum = 20;BA.debugLine="Dim tgl As Toggle"; -c_nuevocliente._tgl = RemoteObject.createNew ("com.rootsoft.togglelibrary.ToggleLibrary");__ref.setField("_tgl",c_nuevocliente._tgl); - //BA.debugLineNum = 21;BA.debugLine="Private l_sinUbicacion As Label"; -c_nuevocliente._l_sinubicacion = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_sinubicacion",c_nuevocliente._l_sinubicacion); - //BA.debugLineNum = 22;BA.debugLine="Private p_nuevoCliente As Panel"; -c_nuevocliente._p_nuevocliente = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_nuevocliente",c_nuevocliente._p_nuevocliente); - //BA.debugLineNum = 23;BA.debugLine="Private Label1 As Label"; -c_nuevocliente._label1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_label1",c_nuevocliente._label1); - //BA.debugLineNum = 24;BA.debugLine="Private p_botones As Panel"; -c_nuevocliente._p_botones = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_botones",c_nuevocliente._p_botones); - //BA.debugLineNum = 25;BA.debugLine="Private p_cam As Panel"; -c_nuevocliente._p_cam = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_cam",c_nuevocliente._p_cam); - //BA.debugLineNum = 26;BA.debugLine="Private p_camara As Panel"; -c_nuevocliente._p_camara = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_camara",c_nuevocliente._p_camara); - //BA.debugLineNum = 27;BA.debugLine="Private b_foto_inci As Button"; -c_nuevocliente._b_foto_inci = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_foto_inci",c_nuevocliente._b_foto_inci); - //BA.debugLineNum = 28;BA.debugLine="Private camEx2 As CameraExClass2"; -c_nuevocliente._camex2 = RemoteObject.createNew ("keymon.lat.medicomed.cameraexclass2");__ref.setField("_camex2",c_nuevocliente._camex2); - //BA.debugLineNum = 29;BA.debugLine="Dim frontCamera As Boolean = False"; -c_nuevocliente._frontcamera = c_nuevocliente.__c.getField(true,"False");__ref.setField("_frontcamera",c_nuevocliente._frontcamera); - //BA.debugLineNum = 30;BA.debugLine="Dim fototomada As String = \"0\""; -c_nuevocliente._fototomada = BA.ObjectToString("0");__ref.setField("_fototomada",c_nuevocliente._fototomada); - //BA.debugLineNum = 31;BA.debugLine="Dim ALMACEN As String"; -c_nuevocliente._almacen = RemoteObject.createImmutable("");__ref.setField("_almacen",c_nuevocliente._almacen); - //BA.debugLineNum = 32;BA.debugLine="Private et_direccion As EditText"; -c_nuevocliente._et_direccion = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");__ref.setField("_et_direccion",c_nuevocliente._et_direccion); - //BA.debugLineNum = 33;BA.debugLine="Private Label2 As Label"; -c_nuevocliente._label2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_label2",c_nuevocliente._label2); - //BA.debugLineNum = 34;BA.debugLine="Dim lat As Double = 0"; -c_nuevocliente._lat = BA.numberCast(double.class, 0);__ref.setField("_lat",c_nuevocliente._lat); - //BA.debugLineNum = 35;BA.debugLine="Dim lon As Double = 0"; -c_nuevocliente._lon = BA.numberCast(double.class, 0);__ref.setField("_lon",c_nuevocliente._lon); - //BA.debugLineNum = 36;BA.debugLine="Private b_ubicacion As Label"; -c_nuevocliente._b_ubicacion = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_b_ubicacion",c_nuevocliente._b_ubicacion); - //BA.debugLineNum = 37;BA.debugLine="Private Label3 As Label"; -c_nuevocliente._label3 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_label3",c_nuevocliente._label3); - //BA.debugLineNum = 38;BA.debugLine="Private et_colonia As EditText"; -c_nuevocliente._et_colonia = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");__ref.setField("_et_colonia",c_nuevocliente._et_colonia); - //BA.debugLineNum = 39;BA.debugLine="Private Label4 As Label"; -c_nuevocliente._label4 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_label4",c_nuevocliente._label4); - //BA.debugLineNum = 40;BA.debugLine="Private et_cp As EditText"; -c_nuevocliente._et_cp = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");__ref.setField("_et_cp",c_nuevocliente._et_cp); - //BA.debugLineNum = 41;BA.debugLine="Private lv_colonia As ListView"; -c_nuevocliente._lv_colonia = RemoteObject.createNew ("anywheresoftware.b4a.objects.ListViewWrapper");__ref.setField("_lv_colonia",c_nuevocliente._lv_colonia); - //BA.debugLineNum = 42;BA.debugLine="Dim banderasepo As Int"; -c_nuevocliente._banderasepo = RemoteObject.createImmutable(0);__ref.setField("_banderasepo",c_nuevocliente._banderasepo); - //BA.debugLineNum = 43;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _et_colonia_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("et_colonia_Click (c_nuevocliente) ","c_nuevocliente",15,__ref.getField(false, "ba"),__ref,137); -if (RapidSub.canDelegate("et_colonia_click")) { return __ref.runUserSub(false, "c_nuevocliente","et_colonia_click", __ref);} - BA.debugLineNum = 137;BA.debugLine="Private Sub et_colonia_Click"; -Debug.ShouldStop(256); - BA.debugLineNum = 138;BA.debugLine="Sender.As(EditText).InputType = 524288"; -Debug.ShouldStop(512); -(RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.EditTextWrapper"), c_nuevocliente.__c.runMethod(false,"Sender",__ref.getField(false, "ba")))).runMethod(true,"setInputType",BA.numberCast(int.class, 524288)); - BA.debugLineNum = 139;BA.debugLine="If lv_colonia.Visible = False Then"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_lv_colonia" /*RemoteObject*/ ).runMethod(true,"getVisible"),c_nuevocliente.__c.getField(true,"False"))) { - BA.debugLineNum = 140;BA.debugLine="lv_colonia.Visible = True"; -Debug.ShouldStop(2048); -__ref.getField(false,"_lv_colonia" /*RemoteObject*/ ).runMethod(true,"setVisible",c_nuevocliente.__c.getField(true,"True")); - }else { - BA.debugLineNum = 142;BA.debugLine="lv_colonia.Visible = False"; -Debug.ShouldStop(8192); -__ref.getField(false,"_lv_colonia" /*RemoteObject*/ ).runMethod(true,"setVisible",c_nuevocliente.__c.getField(true,"False")); - }; - BA.debugLineNum = 144;BA.debugLine="End Sub"; -Debug.ShouldStop(32768); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _et_colonia_focuschanged(RemoteObject __ref,RemoteObject _hasfocus) throws Exception{ -try { - Debug.PushSubsStack("et_colonia_FocusChanged (c_nuevocliente) ","c_nuevocliente",15,__ref.getField(false, "ba"),__ref,162); -if (RapidSub.canDelegate("et_colonia_focuschanged")) { return __ref.runUserSub(false, "c_nuevocliente","et_colonia_focuschanged", __ref, _hasfocus);} -RemoteObject _cc = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -int _i = 0; -Debug.locals.put("HasFocus", _hasfocus); - BA.debugLineNum = 162;BA.debugLine="Private Sub et_colonia_FocusChanged (HasFocus As B"; -Debug.ShouldStop(2); - BA.debugLineNum = 163;BA.debugLine="If HasFocus Then"; -Debug.ShouldStop(4); -if (_hasfocus.get().booleanValue()) { - BA.debugLineNum = 164;BA.debugLine="Private cc As Cursor = B4XPages.MainPage.skmt.Ex"; -Debug.ShouldStop(8); -_cc = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -_cc = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), c_nuevocliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("select colonia from sepomex where codigo = '"),c_nuevocliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(false,"_et_cp" /*RemoteObject*/ ).runMethod(true,"getText")))),RemoteObject.createImmutable("'"))))));Debug.locals.put("cc", _cc);Debug.locals.put("cc", _cc); - BA.debugLineNum = 165;BA.debugLine="lv_colonia.Clear"; -Debug.ShouldStop(16); -__ref.getField(false,"_lv_colonia" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 166;BA.debugLine="lv_colonia.BringToFront"; -Debug.ShouldStop(32); -__ref.getField(false,"_lv_colonia" /*RemoteObject*/ ).runVoidMethod ("BringToFront"); - BA.debugLineNum = 167;BA.debugLine="Private Label1 As Label"; -Debug.ShouldStop(64); -c_nuevocliente._label1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_label1",c_nuevocliente._label1); - BA.debugLineNum = 168;BA.debugLine="Label1 = lv_colonia.SingleLineLayout.Label"; -Debug.ShouldStop(128); -__ref.setField ("_label1" /*RemoteObject*/ ,__ref.getField(false,"_lv_colonia" /*RemoteObject*/ ).runMethod(false,"getSingleLineLayout").getField(false,"Label")); - BA.debugLineNum = 169;BA.debugLine="Label1.TextColor = Colors.White"; -Debug.ShouldStop(256); -__ref.getField(false,"_label1" /*RemoteObject*/ ).runMethod(true,"setTextColor",c_nuevocliente.__c.getField(false,"Colors").getField(true,"White")); - BA.debugLineNum = 170;BA.debugLine="Label1.TextSize = 14"; -Debug.ShouldStop(512); -__ref.getField(false,"_label1" /*RemoteObject*/ ).runMethod(true,"setTextSize",BA.numberCast(float.class, 14)); - BA.debugLineNum = 172;BA.debugLine="If cc.RowCount > 0 Then"; -Debug.ShouldStop(2048); -if (RemoteObject.solveBoolean(">",_cc.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 173;BA.debugLine="For i = 0 To cc.RowCount - 1"; -Debug.ShouldStop(4096); -{ -final int step10 = 1; -final int limit10 = RemoteObject.solve(new RemoteObject[] {_cc.runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step10 > 0 && _i <= limit10) || (step10 < 0 && _i >= limit10) ;_i = ((int)(0 + _i + step10)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 174;BA.debugLine="cc.Position = i"; -Debug.ShouldStop(8192); -_cc.runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 175;BA.debugLine="lv_colonia.AddSingleLine(cc.GetString(\"COLONIA"; -Debug.ShouldStop(16384); -__ref.getField(false,"_lv_colonia" /*RemoteObject*/ ).runVoidMethod ("AddSingleLine",(Object)(BA.ObjectToCharSequence(_cc.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("COLONIA")))))); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 178;BA.debugLine="lv_colonia.AddSingleLine(\"Ingrese colonia manua"; -Debug.ShouldStop(131072); -__ref.getField(false,"_lv_colonia" /*RemoteObject*/ ).runVoidMethod ("AddSingleLine",(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("Ingrese colonia manualmente.")))); - }else { - BA.debugLineNum = 180;BA.debugLine="lv_colonia.AddSingleLine(\"Código no encontrado."; -Debug.ShouldStop(524288); -__ref.getField(false,"_lv_colonia" /*RemoteObject*/ ).runVoidMethod ("AddSingleLine",(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("Código no encontrado.")))); - BA.debugLineNum = 181;BA.debugLine="lv_colonia.AddSingleLine(\"Ingrese colonia manua"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_lv_colonia" /*RemoteObject*/ ).runVoidMethod ("AddSingleLine",(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("Ingrese colonia manualmente.")))); - }; - BA.debugLineNum = 183;BA.debugLine="lv_colonia.Visible = True"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_lv_colonia" /*RemoteObject*/ ).runMethod(true,"setVisible",c_nuevocliente.__c.getField(true,"True")); - }; - BA.debugLineNum = 185;BA.debugLine="End Sub"; -Debug.ShouldStop(16777216); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _et_cp_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("et_cp_click (c_nuevocliente) ","c_nuevocliente",15,__ref.getField(false, "ba"),__ref,133); -if (RapidSub.canDelegate("et_cp_click")) { return __ref.runUserSub(false, "c_nuevocliente","et_cp_click", __ref);} - BA.debugLineNum = 133;BA.debugLine="Sub et_cp_click"; -Debug.ShouldStop(16); - BA.debugLineNum = 134;BA.debugLine="lv_colonia.Visible = False"; -Debug.ShouldStop(32); -__ref.getField(false,"_lv_colonia" /*RemoteObject*/ ).runMethod(true,"setVisible",c_nuevocliente.__c.getField(true,"False")); - BA.debugLineNum = 135;BA.debugLine="End Sub"; -Debug.ShouldStop(64); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _et_cp_textchanged(RemoteObject __ref,RemoteObject _old,RemoteObject _new) throws Exception{ -try { - Debug.PushSubsStack("et_cp_TextChanged (c_nuevocliente) ","c_nuevocliente",15,__ref.getField(false, "ba"),__ref,146); -if (RapidSub.canDelegate("et_cp_textchanged")) { return __ref.runUserSub(false, "c_nuevocliente","et_cp_textchanged", __ref, _old, _new);} -RemoteObject _cc = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -int _x = 0; -Debug.locals.put("Old", _old); -Debug.locals.put("New", _new); - BA.debugLineNum = 146;BA.debugLine="Private Sub et_cp_TextChanged (Old As String, New"; -Debug.ShouldStop(131072); - BA.debugLineNum = 147;BA.debugLine="If Not(desdeBD) And New.Length = 5 Then"; -Debug.ShouldStop(262144); -if (RemoteObject.solveBoolean(".",c_nuevocliente.__c.runMethod(true,"Not",(Object)(__ref.getField(true,"_desdebd" /*RemoteObject*/ )))) && RemoteObject.solveBoolean("=",_new.runMethod(true,"length"),BA.numberCast(double.class, 5))) { - BA.debugLineNum = 148;BA.debugLine="Private cc As Cursor = B4XPages.MainPage.skmt.Ex"; -Debug.ShouldStop(524288); -_cc = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -_cc = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), c_nuevocliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("select estado, municipio, colonia from sepomex where codigo = '"),c_nuevocliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(false,"_et_cp" /*RemoteObject*/ ).runMethod(true,"getText")))),RemoteObject.createImmutable("'"))))));Debug.locals.put("cc", _cc);Debug.locals.put("cc", _cc); - BA.debugLineNum = 150;BA.debugLine="If cc.RowCount > 0 Then"; -Debug.ShouldStop(2097152); -if (RemoteObject.solveBoolean(">",_cc.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 151;BA.debugLine="For x = 0 To cc.RowCount - 1"; -Debug.ShouldStop(4194304); -{ -final int step4 = 1; -final int limit4 = RemoteObject.solve(new RemoteObject[] {_cc.runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_x = 0 ; -for (;(step4 > 0 && _x <= limit4) || (step4 < 0 && _x >= limit4) ;_x = ((int)(0 + _x + step4)) ) { -Debug.locals.put("x", _x); - BA.debugLineNum = 152;BA.debugLine="cc.Position = x"; -Debug.ShouldStop(8388608); -_cc.runMethod(true,"setPosition",BA.numberCast(int.class, _x)); - } -}Debug.locals.put("x", _x); -; - }; - }else -{ BA.debugLineNum = 155;BA.debugLine="else if New.Length < 5 Then"; -Debug.ShouldStop(67108864); -if (RemoteObject.solveBoolean("<",_new.runMethod(true,"length"),BA.numberCast(double.class, 5))) { - BA.debugLineNum = 156;BA.debugLine="lv_colonia.Visible = False"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_lv_colonia" /*RemoteObject*/ ).runMethod(true,"setVisible",c_nuevocliente.__c.getField(true,"False")); - }} -; - BA.debugLineNum = 158;BA.debugLine="desdeBD = False"; -Debug.ShouldStop(536870912); -__ref.setField ("_desdebd" /*RemoteObject*/ ,c_nuevocliente.__c.getField(true,"False")); - BA.debugLineNum = 159;BA.debugLine="End Sub"; -Debug.ShouldStop(1073741824); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _gps_locationchanged(RemoteObject __ref,RemoteObject _location1) throws Exception{ -try { - Debug.PushSubsStack("GPS_LocationChanged (c_nuevocliente) ","c_nuevocliente",15,__ref.getField(false, "ba"),__ref,109); -if (RapidSub.canDelegate("gps_locationchanged")) { return __ref.runUserSub(false, "c_nuevocliente","gps_locationchanged", __ref, _location1);} -Debug.locals.put("Location1", _location1); - BA.debugLineNum = 109;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; -Debug.ShouldStop(4096); - BA.debugLineNum = 110;BA.debugLine="If B4XPages.MainPage.lat_gps <> \"0.0\" Then"; -Debug.ShouldStop(8192); -if (RemoteObject.solveBoolean("!",c_nuevocliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ ),BA.ObjectToString("0.0"))) { - BA.debugLineNum = 111;BA.debugLine="GUARDA.Visible = True 'Si hay ubicaccion, mostra"; -Debug.ShouldStop(16384); -__ref.getField(false,"_guarda" /*RemoteObject*/ ).runMethod(true,"setVisible",c_nuevocliente.__c.getField(true,"True")); - BA.debugLineNum = 112;BA.debugLine="l_sinUbicacion.Visible = True"; -Debug.ShouldStop(32768); -__ref.getField(false,"_l_sinubicacion" /*RemoteObject*/ ).runMethod(true,"setVisible",c_nuevocliente.__c.getField(true,"True")); - BA.debugLineNum = 113;BA.debugLine="lat = Location1.Latitude"; -Debug.ShouldStop(65536); -__ref.setField ("_lat" /*RemoteObject*/ ,_location1.runMethod(true,"getLatitude")); - BA.debugLineNum = 114;BA.debugLine="lon = Location1.Longitude"; -Debug.ShouldStop(131072); -__ref.setField ("_lon" /*RemoteObject*/ ,_location1.runMethod(true,"getLongitude")); - BA.debugLineNum = 115;BA.debugLine="l_sinUbicacion.Text = (\"Latitud: \" & lat & \", Lo"; -Debug.ShouldStop(262144); -__ref.getField(false,"_l_sinubicacion" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("Latitud: "),__ref.getField(true,"_lat" /*RemoteObject*/ ),RemoteObject.createImmutable(", Longotud: "),__ref.getField(true,"_lon" /*RemoteObject*/ ))))); - }; - BA.debugLineNum = 118;BA.debugLine="b_ubicacion.TextSize = 13"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_b_ubicacion" /*RemoteObject*/ ).runMethod(true,"setTextSize",BA.numberCast(float.class, 13)); - BA.debugLineNum = 119;BA.debugLine="b_ubicacion.Text = $\"Precisión GPS $1.0{Location1"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_b_ubicacion" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("Precisión GPS "),c_nuevocliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("1.0")),(Object)((_location1.runMethod(true,"getAccuracy")))),RemoteObject.createImmutable(" m"))))); - BA.debugLineNum = 120;BA.debugLine="If Location1.Accuracy > 200 Then"; -Debug.ShouldStop(8388608); -if (RemoteObject.solveBoolean(">",_location1.runMethod(true,"getAccuracy"),BA.numberCast(double.class, 200))) { - BA.debugLineNum = 121;BA.debugLine="b_ubicacion.TextColor = Colors.Red"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_b_ubicacion" /*RemoteObject*/ ).runMethod(true,"setTextColor",c_nuevocliente.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 122;BA.debugLine="b_ubicacion.TextSize = 16"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_b_ubicacion" /*RemoteObject*/ ).runMethod(true,"setTextSize",BA.numberCast(float.class, 16)); - BA.debugLineNum = 123;BA.debugLine="b_ubicacion.Text = $\"Mala señal $1.0{Location1.A"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_b_ubicacion" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("Mala señal "),c_nuevocliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("1.0")),(Object)((_location1.runMethod(true,"getAccuracy")))),RemoteObject.createImmutable(" m"))))); - }; - BA.debugLineNum = 125;BA.debugLine="End Sub"; -Debug.ShouldStop(268435456); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _guarda_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GUARDA_Click (c_nuevocliente) ","c_nuevocliente",15,__ref.getField(false, "ba"),__ref,197); -if (RapidSub.canDelegate("guarda_click")) { return __ref.runUserSub(false, "c_nuevocliente","guarda_click", __ref);} -RemoteObject _hora = RemoteObject.createImmutable(""); -RemoteObject _mins = RemoteObject.createImmutable(""); -RemoteObject _segs = RemoteObject.createImmutable(""); - BA.debugLineNum = 197;BA.debugLine="Sub GUARDA_Click"; -Debug.ShouldStop(16); - BA.debugLineNum = 198;BA.debugLine="If E_NOMBRE.Text = \"\" Then"; -Debug.ShouldStop(32); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_e_nombre" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString(""))) { - BA.debugLineNum = 199;BA.debugLine="MsgboxAsync(\"Por favor captura el nombre de la T"; -Debug.ShouldStop(64); -c_nuevocliente.__c.runVoidMethod ("MsgboxAsync",(Object)(BA.ObjectToCharSequence("Por favor captura el nombre de la Tienda")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("Atención"))),__ref.getField(false, "ba")); - }else { - BA.debugLineNum = 201;BA.debugLine="If et_direccion.Text.Length > 3 Then"; -Debug.ShouldStop(256); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_et_direccion" /*RemoteObject*/ ).runMethod(true,"getText").runMethod(true,"length"),BA.numberCast(double.class, 3))) { - BA.debugLineNum = 202;BA.debugLine="If lat <> 0 Then"; -Debug.ShouldStop(512); -if (RemoteObject.solveBoolean("!",__ref.getField(true,"_lat" /*RemoteObject*/ ),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 203;BA.debugLine="If et_colonia.Text.Length > 3 Then"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_et_colonia" /*RemoteObject*/ ).runMethod(true,"getText").runMethod(true,"length"),BA.numberCast(double.class, 3))) { - BA.debugLineNum = 204;BA.debugLine="If et_cp.Text.Length > 3 Then"; -Debug.ShouldStop(2048); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_et_cp" /*RemoteObject*/ ).runMethod(true,"getText").runMethod(true,"length"),BA.numberCast(double.class, 3))) { - BA.debugLineNum = 206;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; -Debug.ShouldStop(8192); -c_nuevocliente.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("MM/dd/yyyy")); - BA.debugLineNum = 207;BA.debugLine="DateTime.Timeformat = \"HHmmss\""; -Debug.ShouldStop(16384); -c_nuevocliente.__c.getField(false,"DateTime").runMethod(true,"setTimeFormat",BA.ObjectToString("HHmmss")); - BA.debugLineNum = 208;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(32768); -__ref.setField ("_sdate" /*RemoteObject*/ ,c_nuevocliente.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(c_nuevocliente.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 209;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -Debug.ShouldStop(65536); -__ref.setField ("_stime" /*RemoteObject*/ ,c_nuevocliente.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_nuevocliente.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 210;BA.debugLine="Log($\" //////////// Date: ${sDate} - Time:"; -Debug.ShouldStop(131072); -c_nuevocliente.__c.runVoidMethod ("LogImpl","321692429",(RemoteObject.concat(RemoteObject.createImmutable(" //////////// Date: "),c_nuevocliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_sdate" /*RemoteObject*/ )))),RemoteObject.createImmutable(" - Time: "),c_nuevocliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_stime" /*RemoteObject*/ )))),RemoteObject.createImmutable(" ////////////////"))),0); - BA.debugLineNum = 212;BA.debugLine="Private hora As String = sTime.SubString2(0,"; -Debug.ShouldStop(524288); -_hora = __ref.getField(true,"_stime" /*RemoteObject*/ ).runMethod(true,"substring",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 2)));Debug.locals.put("hora", _hora);Debug.locals.put("hora", _hora); - BA.debugLineNum = 213;BA.debugLine="Private mins As String = sTime.SubString2(2,"; -Debug.ShouldStop(1048576); -_mins = __ref.getField(true,"_stime" /*RemoteObject*/ ).runMethod(true,"substring",(Object)(BA.numberCast(int.class, 2)),(Object)(BA.numberCast(int.class, 4)));Debug.locals.put("mins", _mins);Debug.locals.put("mins", _mins); - BA.debugLineNum = 214;BA.debugLine="Private segs As String = sTime.SubString(4)"; -Debug.ShouldStop(2097152); -_segs = __ref.getField(true,"_stime" /*RemoteObject*/ ).runMethod(true,"substring",(Object)(BA.numberCast(int.class, 4)));Debug.locals.put("segs", _segs);Debug.locals.put("segs", _segs); - BA.debugLineNum = 215;BA.debugLine="sTime = hora&\":\"&mins&\":\"&segs"; -Debug.ShouldStop(4194304); -__ref.setField ("_stime" /*RemoteObject*/ ,RemoteObject.concat(_hora,RemoteObject.createImmutable(":"),_mins,RemoteObject.createImmutable(":"),_segs)); - BA.debugLineNum = 216;BA.debugLine="Log(\"////////////// sTime: \"&sTime&\" ///////"; -Debug.ShouldStop(8388608); -c_nuevocliente.__c.runVoidMethod ("LogImpl","321692435",RemoteObject.concat(RemoteObject.createImmutable("////////////// sTime: "),__ref.getField(true,"_stime" /*RemoteObject*/ ),RemoteObject.createImmutable(" ////////////////")),0); - BA.debugLineNum = 217;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select C"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_nuevocliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_CL_RUTA FROM kmt_info")))); - BA.debugLineNum = 218;BA.debugLine="c.Position=0"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 219;BA.debugLine="no_ruta= c.GetString(\"CAT_CL_RUTA\")"; -Debug.ShouldStop(67108864); -__ref.setField ("_no_ruta" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_RUTA")))); - BA.debugLineNum = 220;BA.debugLine="no_cliente= \"N\" & sTime & no_ruta"; -Debug.ShouldStop(134217728); -__ref.setField ("_no_cliente" /*RemoteObject*/ ,RemoteObject.concat(RemoteObject.createImmutable("N"),__ref.getField(true,"_stime" /*RemoteObject*/ ),__ref.getField(true,"_no_ruta" /*RemoteObject*/ ))); - BA.debugLineNum = 221;BA.debugLine="Log(\"++ ++ no_cliente = \"&no_cliente)"; -Debug.ShouldStop(268435456); -c_nuevocliente.__c.runVoidMethod ("LogImpl","321692440",RemoteObject.concat(RemoteObject.createImmutable("++ ++ no_cliente = "),__ref.getField(true,"_no_cliente" /*RemoteObject*/ )),0); - BA.debugLineNum = 222;BA.debugLine="c.Close"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 223;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(1073741824); -c_nuevocliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("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) ")),(Object)(c_nuevocliente.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {18},new Object[] {(__ref.getField(true,"_no_cliente" /*RemoteObject*/ )),(__ref.getField(true,"_no_ruta" /*RemoteObject*/ )),(__ref.getField(false,"_e_nombre" /*RemoteObject*/ ).runMethod(true,"getText")),RemoteObject.createImmutable(("null")),RemoteObject.createImmutable(("null")),RemoteObject.createImmutable(("null")),RemoteObject.createImmutable(("null")),RemoteObject.createImmutable(("null")),RemoteObject.createImmutable(("null")),RemoteObject.createImmutable(("null")),RemoteObject.createImmutable(("null")),RemoteObject.createImmutable(("null")),RemoteObject.createImmutable(("null")),RemoteObject.createImmutable(("null")),RemoteObject.createImmutable(("null")),RemoteObject.createImmutable(("null")),(c_nuevocliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lon_gps" /*RemoteObject*/ )),(c_nuevocliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 224;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(-2147483648); -c_nuevocliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO HIST_STAY_STORE(HSS_CODIGO, HSS_IN , HSS_OUT , HSS_TOT) VALUES (?,0,0,0)")),(Object)(c_nuevocliente.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(true,"_no_cliente" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 225;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete"; -Debug.ShouldStop(1); -c_nuevocliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from CUENTAA"))); - BA.debugLineNum = 226;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(2); -c_nuevocliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO CUENTAA VALUES (?)")),(Object)(c_nuevocliente.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(true,"_no_cliente" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 227;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select I"; -Debug.ShouldStop(4); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_nuevocliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select ID_ALMACEN from CAT_ALMACEN")))); - BA.debugLineNum = 228;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(8); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 229;BA.debugLine="C.Position=0"; -Debug.ShouldStop(16); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 230;BA.debugLine="ALMACEN = C.GetString(\"ID_ALMACEN\")"; -Debug.ShouldStop(32); -__ref.setField ("_almacen" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("ID_ALMACEN")))); - }; - BA.debugLineNum = 232;BA.debugLine="c.Close"; -Debug.ShouldStop(128); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 233;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select u"; -Debug.ShouldStop(256); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_nuevocliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select usuario from usuarioa")))); - BA.debugLineNum = 234;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(512); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 235;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(1024); -__ref.setField ("_usuario" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")))); - BA.debugLineNum = 236;BA.debugLine="c.Close"; -Debug.ShouldStop(2048); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 239;BA.debugLine="DateTime.DateFormat = \"dd/MM/yyyy\""; -Debug.ShouldStop(16384); -c_nuevocliente.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("dd/MM/yyyy")); - BA.debugLineNum = 240;BA.debugLine="DateTime.Timeformat = \"HH:mm:ss\""; -Debug.ShouldStop(32768); -c_nuevocliente.__c.getField(false,"DateTime").runMethod(true,"setTimeFormat",BA.ObjectToString("HH:mm:ss")); - BA.debugLineNum = 241;BA.debugLine="sDate2=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(65536); -__ref.setField ("_sdate2" /*RemoteObject*/ ,c_nuevocliente.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(c_nuevocliente.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 242;BA.debugLine="sTime2=DateTime.Time(DateTime.Now)"; -Debug.ShouldStop(131072); -__ref.setField ("_stime2" /*RemoteObject*/ ,c_nuevocliente.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_nuevocliente.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 244;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(524288); -c_nuevocliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("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,?)")),(Object)(c_nuevocliente.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("String",new int[] {12},new Object[] {__ref.getField(true,"_no_cliente" /*RemoteObject*/ ),RemoteObject.concat(__ref.getField(true,"_sdate2" /*RemoteObject*/ ),RemoteObject.createImmutable(" "),__ref.getField(true,"_stime2" /*RemoteObject*/ )),__ref.getField(true,"_usuario" /*RemoteObject*/ ),BA.NumberToString(__ref.getField(true,"_lat" /*RemoteObject*/ )),BA.NumberToString(__ref.getField(true,"_lon" /*RemoteObject*/ )),__ref.getField(false,"_e_nombre" /*RemoteObject*/ ).runMethod(true,"getText"),__ref.getField(false,"_et_direccion" /*RemoteObject*/ ).runMethod(true,"getText"),__ref.getField(false,"_et_colonia" /*RemoteObject*/ ).runMethod(true,"getText"),__ref.getField(false,"_et_cp" /*RemoteObject*/ ).runMethod(true,"getText"),__ref.getField(true,"_almacen" /*RemoteObject*/ ),__ref.getField(true,"_no_ruta" /*RemoteObject*/ ),BA.NumberToString(__ref.getField(true,"_banderasepo" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 245;BA.debugLine="fototomada = \"0\""; -Debug.ShouldStop(1048576); -__ref.setField ("_fototomada" /*RemoteObject*/ ,BA.ObjectToString("0")); - BA.debugLineNum = 246;BA.debugLine="B4XPages.ShowPage(\"cliente\")"; -Debug.ShouldStop(2097152); -c_nuevocliente._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("cliente"))); - BA.debugLineNum = 247;BA.debugLine="CallSubDelayed(Tracker, \"StartFLP\")"; -Debug.ShouldStop(4194304); -c_nuevocliente.__c.runVoidMethod ("CallSubDelayed",__ref.getField(false, "ba"),(Object)((c_nuevocliente._tracker.getObject())),(Object)(RemoteObject.createImmutable("StartFLP"))); - BA.debugLineNum = 249;BA.debugLine="mandaPendientesclientesnuevos"; -Debug.ShouldStop(16777216); -__ref.runClassMethod (keymon.lat.medicomed.c_nuevocliente.class, "_mandapendientesclientesnuevos" /*RemoteObject*/ ); - }else { - BA.debugLineNum = 251;BA.debugLine="MsgboxAsync(\"Por favor captura el C.P. del c"; -Debug.ShouldStop(67108864); -c_nuevocliente.__c.runVoidMethod ("MsgboxAsync",(Object)(BA.ObjectToCharSequence("Por favor captura el C.P. del cliente")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("Atención"))),__ref.getField(false, "ba")); - }; - }else { - BA.debugLineNum = 254;BA.debugLine="MsgboxAsync(\"Por favor captura la colonia del"; -Debug.ShouldStop(536870912); -c_nuevocliente.__c.runVoidMethod ("MsgboxAsync",(Object)(BA.ObjectToCharSequence("Por favor captura la colonia del cliente")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("Atención"))),__ref.getField(false, "ba")); - }; - }else { - BA.debugLineNum = 257;BA.debugLine="MsgboxAsync(\"Por favor revisa que tengas señal"; -Debug.ShouldStop(1); -c_nuevocliente.__c.runVoidMethod ("MsgboxAsync",(Object)(BA.ObjectToCharSequence("Por favor revisa que tengas señal GPS")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("Atención"))),__ref.getField(false, "ba")); - }; - }else { - BA.debugLineNum = 260;BA.debugLine="MsgboxAsync(\"Por favor captura la dirección del"; -Debug.ShouldStop(8); -c_nuevocliente.__c.runVoidMethod ("MsgboxAsync",(Object)(BA.ObjectToCharSequence("Por favor captura la dirección del cliente")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("Atención"))),__ref.getField(false, "ba")); - }; - }; - BA.debugLineNum = 263;BA.debugLine="End Sub"; -Debug.ShouldStop(64); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (c_nuevocliente) ","c_nuevocliente",15,__ref.getField(false, "ba"),__ref,46); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "c_nuevocliente","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 46;BA.debugLine="Public Sub Initialize As Object"; -Debug.ShouldStop(8192); - BA.debugLineNum = 47;BA.debugLine="Return Me"; -Debug.ShouldStop(16384); -if (true) return __ref; - BA.debugLineNum = 48;BA.debugLine="End Sub"; -Debug.ShouldStop(32768); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _initializecamera2(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("InitializeCamera2 (c_nuevocliente) ","c_nuevocliente",15,__ref.getField(false, "ba"),__ref,318); -if (RapidSub.canDelegate("initializecamera2")) { __ref.runUserSub(false, "c_nuevocliente","initializecamera2", __ref); return;} -ResumableSub_InitializeCamera2 rsub = new ResumableSub_InitializeCamera2(null,__ref); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_InitializeCamera2 extends BA.ResumableSub { -public ResumableSub_InitializeCamera2(keymon.lat.medicomed.c_nuevocliente parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.c_nuevocliente parent; -RemoteObject _permission = RemoteObject.createImmutable(""); -RemoteObject _result = RemoteObject.createImmutable(false); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("InitializeCamera2 (c_nuevocliente) ","c_nuevocliente",15,__ref.getField(false, "ba"),__ref,318); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 319;BA.debugLine="Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_"; -Debug.ShouldStop(1073741824); -parent._starter._rp /*RemoteObject*/ .runVoidMethod ("CheckAndRequest",__ref.getField(false, "ba"),(Object)(parent._starter._rp /*RemoteObject*/ .getField(true,"PERMISSION_CAMERA"))); - BA.debugLineNum = 320;BA.debugLine="Wait For B4XPage_PermissionResult (Permission As"; -Debug.ShouldStop(-2147483648); -parent.__c.runVoidMethod ("WaitFor","b4xpage_permissionresult", __ref.getField(false, "ba"), anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "c_nuevocliente", "initializecamera2"), null); -this.state = 19; -return; -case 19: -//C -this.state = 1; -_permission = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(1));Debug.locals.put("Permission", _permission); -_result = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(2));Debug.locals.put("Result", _result); -; - BA.debugLineNum = 321;BA.debugLine="If Result Then"; -Debug.ShouldStop(1); -if (true) break; - -case 1: -//if -this.state = 6; -if (_result.get().booleanValue()) { -this.state = 3; -}else { -this.state = 5; -}if (true) break; - -case 3: -//C -this.state = 6; - BA.debugLineNum = 322;BA.debugLine="camEx2.Initialize(p_cam, frontCamera, Me, \"Camer"; -Debug.ShouldStop(2); -__ref.getField(false,"_camex2" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.cameraexclass2.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_p_cam" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_frontcamera" /*RemoteObject*/ )),(Object)(__ref),(Object)(RemoteObject.createImmutable("Camera1"))); - BA.debugLineNum = 323;BA.debugLine="frontCamera = camEx2.Front"; -Debug.ShouldStop(4); -__ref.setField ("_frontcamera" /*RemoteObject*/ ,__ref.getField(false,"_camex2" /*RemoteObject*/ ).getField(true,"_front" /*RemoteObject*/ )); - BA.debugLineNum = 324;BA.debugLine="Log(\"inicializamos Camara\")"; -Debug.ShouldStop(8); -parent.__c.runVoidMethod ("LogImpl","322020102",RemoteObject.createImmutable("inicializamos Camara"),0); - if (true) break; - -case 5: -//C -this.state = 6; - BA.debugLineNum = 326;BA.debugLine="ToastMessageShow(\"No permission!!!\", True)"; -Debug.ShouldStop(32); -parent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("No permission!!!")),(Object)(parent.__c.getField(true,"True"))); - if (true) break; - -case 6: -//C -this.state = 7; -; - BA.debugLineNum = 328;BA.debugLine="Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_"; -Debug.ShouldStop(128); -parent._starter._rp /*RemoteObject*/ .runVoidMethod ("CheckAndRequest",__ref.getField(false, "ba"),(Object)(parent._starter._rp /*RemoteObject*/ .getField(true,"PERMISSION_WRITE_EXTERNAL_STORAGE"))); - BA.debugLineNum = 329;BA.debugLine="Wait For B4XPage_PermissionResult (Permission As"; -Debug.ShouldStop(256); -parent.__c.runVoidMethod ("WaitFor","b4xpage_permissionresult", __ref.getField(false, "ba"), anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "c_nuevocliente", "initializecamera2"), null); -this.state = 20; -return; -case 20: -//C -this.state = 7; -_permission = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(1));Debug.locals.put("Permission", _permission); -_result = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(2));Debug.locals.put("Result", _result); -; - BA.debugLineNum = 330;BA.debugLine="If Result Then"; -Debug.ShouldStop(512); -if (true) break; - -case 7: -//if -this.state = 12; -if (_result.get().booleanValue()) { -this.state = 9; -}else { -this.state = 11; -}if (true) break; - -case 9: -//C -this.state = 12; - BA.debugLineNum = 331;BA.debugLine="Log(\"conpermisos para escritura\")"; -Debug.ShouldStop(1024); -parent.__c.runVoidMethod ("LogImpl","322020109",RemoteObject.createImmutable("conpermisos para escritura"),0); - if (true) break; - -case 11: -//C -this.state = 12; - BA.debugLineNum = 333;BA.debugLine="ToastMessageShow(\"No permission!!!\", True)"; -Debug.ShouldStop(4096); -parent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("No permission!!!")),(Object)(parent.__c.getField(true,"True"))); - if (true) break; - -case 12: -//C -this.state = 13; -; - BA.debugLineNum = 336;BA.debugLine="Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_"; -Debug.ShouldStop(32768); -parent._starter._rp /*RemoteObject*/ .runVoidMethod ("CheckAndRequest",__ref.getField(false, "ba"),(Object)(parent._starter._rp /*RemoteObject*/ .getField(true,"PERMISSION_READ_EXTERNAL_STORAGE"))); - BA.debugLineNum = 337;BA.debugLine="Wait For B4XPage_PermissionResult (Permission As"; -Debug.ShouldStop(65536); -parent.__c.runVoidMethod ("WaitFor","b4xpage_permissionresult", __ref.getField(false, "ba"), anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "c_nuevocliente", "initializecamera2"), null); -this.state = 21; -return; -case 21: -//C -this.state = 13; -_permission = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(1));Debug.locals.put("Permission", _permission); -_result = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(2));Debug.locals.put("Result", _result); -; - BA.debugLineNum = 338;BA.debugLine="If Result Then"; -Debug.ShouldStop(131072); -if (true) break; - -case 13: -//if -this.state = 18; -if (_result.get().booleanValue()) { -this.state = 15; -}else { -this.state = 17; -}if (true) break; - -case 15: -//C -this.state = 18; - BA.debugLineNum = 339;BA.debugLine="Log(\"conpermisos para escritura\")"; -Debug.ShouldStop(262144); -parent.__c.runVoidMethod ("LogImpl","322020117",RemoteObject.createImmutable("conpermisos para escritura"),0); - if (true) break; - -case 17: -//C -this.state = 18; - BA.debugLineNum = 341;BA.debugLine="ToastMessageShow(\"No permission!!!\", True)"; -Debug.ShouldStop(1048576); -parent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("No permission!!!")),(Object)(parent.__c.getField(true,"True"))); - if (true) break; - -case 18: -//C -this.state = -1; -; - BA.debugLineNum = 343;BA.debugLine="End Sub"; -Debug.ShouldStop(4194304); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static void _b4xpage_permissionresult(RemoteObject __ref,RemoteObject _permission,RemoteObject _result) throws Exception{ -} -public static RemoteObject _jobdone(RemoteObject __ref,RemoteObject _job) throws Exception{ -try { - Debug.PushSubsStack("JobDone (c_nuevocliente) ","c_nuevocliente",15,__ref.getField(false, "ba"),__ref,283); -if (RapidSub.canDelegate("jobdone")) { return __ref.runUserSub(false, "c_nuevocliente","jobdone", __ref, _job);} -RemoteObject _resultado = RemoteObject.declareNull("keymon.lat.medicomed.dbrequestmanager._dbresult"); -RemoteObject _cliente = RemoteObject.createImmutable(""); -RemoteObject _records = null; -RemoteObject _k = RemoteObject.createImmutable(""); -Debug.locals.put("Job", _job); - BA.debugLineNum = 283;BA.debugLine="Sub JobDone(Job As HttpJob)"; -Debug.ShouldStop(67108864); - BA.debugLineNum = 284;BA.debugLine="Log(Job.Success)"; -Debug.ShouldStop(134217728); -c_nuevocliente.__c.runVoidMethod ("LogImpl","321823489",BA.ObjectToString(_job.getField(true,"_success" /*RemoteObject*/ )),0); - BA.debugLineNum = 285;BA.debugLine="If Job.Success = False Then"; -Debug.ShouldStop(268435456); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_success" /*RemoteObject*/ ),c_nuevocliente.__c.getField(true,"False"))) { - }else { - BA.debugLineNum = 288;BA.debugLine="LogColor(\"JobDone: '\" & reqManager.HandleJob(Job"; -Debug.ShouldStop(-2147483648); -c_nuevocliente.__c.runVoidMethod ("LogImpl","321823493",RemoteObject.concat(RemoteObject.createImmutable("JobDone: '"),__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job)).getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable("' - Registros: "),__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job)).getField(false,"Rows" /*RemoteObject*/ ).runMethod(true,"getSize")),c_nuevocliente.__c.getField(false,"Colors").getField(true,"Green")); - BA.debugLineNum = 289;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(1); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 290;BA.debugLine="Dim resultado As DBResult = reqManager.HandleJo"; -Debug.ShouldStop(2); -_resultado = __ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("resultado", _resultado);Debug.locals.put("resultado", _resultado); - BA.debugLineNum = 291;BA.debugLine="If resultado.Tag.As(String).IndexOf(\"ins_CNUEVO"; -Debug.ShouldStop(4); -if (RemoteObject.solveBoolean(">",(BA.ObjectToString(_resultado.getField(false,"Tag" /*RemoteObject*/ ))).runMethod(true,"indexOf",(Object)(RemoteObject.createImmutable("ins_CNUEVOSPendientes_head_"))),BA.numberCast(double.class, -(double) (0 + 1)))) { - BA.debugLineNum = 292;BA.debugLine="Private cliente As String= resultado.Tag"; -Debug.ShouldStop(8); -_cliente = BA.ObjectToString(_resultado.getField(false,"Tag" /*RemoteObject*/ ));Debug.locals.put("cliente", _cliente);Debug.locals.put("cliente", _cliente); - BA.debugLineNum = 293;BA.debugLine="cliente = cliente.SubString(cliente.IndexOf(\"_"; -Debug.ShouldStop(16); -_cliente = _cliente.runMethod(true,"substring",(Object)(RemoteObject.solve(new RemoteObject[] {_cliente.runMethod(true,"indexOf",(Object)(RemoteObject.createImmutable("_"))),RemoteObject.createImmutable(24)}, "+",1, 1)));Debug.locals.put("cliente", _cliente); - BA.debugLineNum = 294;BA.debugLine="Log($\"Cliente1:${cliente}\"$)"; -Debug.ShouldStop(32); -c_nuevocliente.__c.runVoidMethod ("LogImpl","321823499",(RemoteObject.concat(RemoteObject.createImmutable("Cliente1:"),c_nuevocliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_cliente))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 295;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update C"; -Debug.ShouldStop(64); -c_nuevocliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("update CLIENTES_NUEVOS SET CN_ENVIO = ? WHERE CN_ID = ? AND CN_ENVIO <> 1")),(Object)(c_nuevocliente.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("String",new int[] {2},new Object[] {BA.ObjectToString("1"),_cliente}))))); - BA.debugLineNum = 296;BA.debugLine="For Each records() As Object In resultado.Rows"; -Debug.ShouldStop(128); -{ -final RemoteObject group12 = _resultado.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen12 = group12.runMethod(true,"getSize").get() -;int index12 = 0; -; -for (; index12 < groupLen12;index12++){ -_records = (group12.runMethod(false,"Get",index12));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 297;BA.debugLine="For Each k As String In resultado.Columns.Key"; -Debug.ShouldStop(256); -{ -final RemoteObject group13 = _resultado.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Keys"); -final int groupLen13 = group13.runMethod(true,"getSize").get() -;int index13 = 0; -; -for (; index13 < groupLen13;index13++){ -_k = BA.ObjectToString(group13.runMethod(false,"Get",index13));Debug.locals.put("k", _k); -Debug.locals.put("k", _k); - BA.debugLineNum = 298;BA.debugLine="Log(resultado.Tag & \": \" & k & \": \" & record"; -Debug.ShouldStop(512); -c_nuevocliente.__c.runVoidMethod ("LogImpl","321823503",RemoteObject.concat(_resultado.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(": "),_k,RemoteObject.createImmutable(": "),_records.getArrayElement(false,BA.numberCast(int.class, _resultado.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((_k)))))),0); - } -}Debug.locals.put("k", _k); -; - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 303;BA.debugLine="Job.Release"; -Debug.ShouldStop(16384); -_job.runClassMethod (keymon.lat.medicomed.httpjob.class, "_release" /*RemoteObject*/ ); - }; - BA.debugLineNum = 305;BA.debugLine="End Sub"; -Debug.ShouldStop(65536); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _lv_colonia_itemclick(RemoteObject __ref,RemoteObject _position,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("lv_colonia_ItemClick (c_nuevocliente) ","c_nuevocliente",15,__ref.getField(false, "ba"),__ref,187); -if (RapidSub.canDelegate("lv_colonia_itemclick")) { return __ref.runUserSub(false, "c_nuevocliente","lv_colonia_itemclick", __ref, _position, _value);} -Debug.locals.put("Position", _position); -Debug.locals.put("Value", _value); - BA.debugLineNum = 187;BA.debugLine="Private Sub lv_colonia_ItemClick (Position As Int,"; -Debug.ShouldStop(67108864); - BA.debugLineNum = 188;BA.debugLine="lv_colonia.Visible = False"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_lv_colonia" /*RemoteObject*/ ).runMethod(true,"setVisible",c_nuevocliente.__c.getField(true,"False")); - BA.debugLineNum = 189;BA.debugLine="If Value <> \"Código no encontrado.\" And Value <>"; -Debug.ShouldStop(268435456); -if (RemoteObject.solveBoolean("!",_value,RemoteObject.createImmutable(("Código no encontrado."))) && RemoteObject.solveBoolean("!",_value,RemoteObject.createImmutable(("Ingrese colonia manualmente.")))) { - BA.debugLineNum = 190;BA.debugLine="et_colonia.Text = Value"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_et_colonia" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence(_value)); - BA.debugLineNum = 191;BA.debugLine="banderasepo = 0"; -Debug.ShouldStop(1073741824); -__ref.setField ("_banderasepo" /*RemoteObject*/ ,BA.numberCast(int.class, 0)); - }else { - BA.debugLineNum = 193;BA.debugLine="banderasepo = 1"; -Debug.ShouldStop(1); -__ref.setField ("_banderasepo" /*RemoteObject*/ ,BA.numberCast(int.class, 1)); - }; - BA.debugLineNum = 195;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _mandapendientesclientesnuevos(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("mandaPendientesclientesnuevos (c_nuevocliente) ","c_nuevocliente",15,__ref.getField(false, "ba"),__ref,266); -if (RapidSub.canDelegate("mandapendientesclientesnuevos")) { return __ref.runUserSub(false, "c_nuevocliente","mandapendientesclientesnuevos", __ref);} -int _i = 0; -RemoteObject _cmd = RemoteObject.declareNull("keymon.lat.medicomed.dbrequestmanager._dbcommand"); - BA.debugLineNum = 266;BA.debugLine="Sub mandaPendientesclientesnuevos"; -Debug.ShouldStop(512); - BA.debugLineNum = 267;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT CN_ID"; -Debug.ShouldStop(1024); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_nuevocliente._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("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")))); - BA.debugLineNum = 268;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(2048); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 269;BA.debugLine="For i = 0 To c.RowCount - 1"; -Debug.ShouldStop(4096); -{ -final int step3 = 1; -final int limit3 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step3 > 0 && _i <= limit3) || (step3 < 0 && _i >= limit3) ;_i = ((int)(0 + _i + step3)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 270;BA.debugLine="c.Position = i"; -Debug.ShouldStop(8192); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 272;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(32768); -_cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");Debug.locals.put("cmd", _cmd); - BA.debugLineNum = 273;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(65536); -_cmd.runVoidMethod ("Initialize"); - BA.debugLineNum = 274;BA.debugLine="cmd.Name = \"insert_clientesnuevos2_MEDI\""; -Debug.ShouldStop(131072); -_cmd.setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("insert_clientesnuevos2_MEDI")); - BA.debugLineNum = 275;BA.debugLine="cmd.Parameters = Array As Object(c.GetString(\"C"; -Debug.ShouldStop(262144); -_cmd.setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {12},new Object[] {(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CN_ID")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CN_FECHA")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CN_USER")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CN_LAT")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CN_LON")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CN_NOMBRE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CN_DIRECCION")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("COLONIA")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CP")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CN_ALMACEN")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CN_RUTA")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CN_BANDERA"))))})); - BA.debugLineNum = 276;BA.debugLine="reqManager.ExecuteCommand(cmd , $\"ins_CNUEVOSPe"; -Debug.ShouldStop(524288); -__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(_cmd),(Object)(((RemoteObject.concat(RemoteObject.createImmutable("ins_CNUEVOSPendientes_head_"),c_nuevocliente.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CN_ID")))))),RemoteObject.createImmutable("")))))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 279;BA.debugLine="c.Close"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 280;BA.debugLine="End Sub"; -Debug.ShouldStop(8388608); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _p_nuevocliente_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("p_nuevoCliente_Click (c_nuevocliente) ","c_nuevocliente",15,__ref.getField(false, "ba"),__ref,308); -if (RapidSub.canDelegate("p_nuevocliente_click")) { return __ref.runUserSub(false, "c_nuevocliente","p_nuevocliente_click", __ref);} - BA.debugLineNum = 308;BA.debugLine="Private Sub p_nuevoCliente_Click"; -Debug.ShouldStop(524288); - BA.debugLineNum = 310;BA.debugLine="End Sub"; -Debug.ShouldStop(2097152); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _stopcamera2(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("StopCamera2 (c_nuevocliente) ","c_nuevocliente",15,__ref.getField(false, "ba"),__ref,392); -if (RapidSub.canDelegate("stopcamera2")) { return __ref.runUserSub(false, "c_nuevocliente","stopcamera2", __ref);} - BA.debugLineNum = 392;BA.debugLine="Private Sub StopCamera2"; -Debug.ShouldStop(128); - BA.debugLineNum = 394;BA.debugLine="If camEx2.IsInitialized Then"; -Debug.ShouldStop(512); -if (__ref.getField(false,"_camex2" /*RemoteObject*/ ).runMethod(true,"IsInitialized" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 395;BA.debugLine="camEx2.Release"; -Debug.ShouldStop(1024); -__ref.getField(false,"_camex2" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.cameraexclass2.class, "_release" /*RemoteObject*/ ); - }; - BA.debugLineNum = 397;BA.debugLine="End Sub"; -Debug.ShouldStop(4096); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_pedidos.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_pedidos.java deleted file mode 100644 index 3f811f9..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_pedidos.java +++ /dev/null @@ -1,81 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class c_pedidos { - public static RemoteObject myClass; - public c_pedidos() { - } - public static PCBA staticBA = new PCBA(null, c_pedidos.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _root = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _g = RemoteObject.declareNull("anywheresoftware.b4a.gps.GPS"); -public static RemoteObject _ruta = RemoteObject.createImmutable(""); -public static RemoteObject _skmt = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL"); -public static RemoteObject _t3 = RemoteObject.declareNull("anywheresoftware.b4a.objects.Timer"); -public static RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.phone.Phone"); -public static RemoteObject _sb = RemoteObject.declareNull("anywheresoftware.b4a.keywords.StringBuilderWrapper"); -public static RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _e = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _f = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _h = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _cc = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _dd = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _l_tipo = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_sub = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_marca = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_desc = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_precio = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_bodega = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _cantidad = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -public static RemoteObject _guardar = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _terminar = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _img_prod = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -public static RemoteObject _img_paso = null; -public static RemoteObject _l_proid = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _clie_id = RemoteObject.createImmutable(""); -public static RemoteObject _sdate = RemoteObject.createImmutable(""); -public static RemoteObject _stime = RemoteObject.createImmutable(""); -public static RemoteObject _usuario = RemoteObject.createImmutable(""); -public static RemoteObject _t_venta = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _promo_c = RemoteObject.createImmutable(""); -public static RemoteObject _i_fotol = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -public static RemoteObject _desc_promo = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _nopromo = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _tot_art_promo = RemoteObject.createImmutable(""); -public static RemoteObject _cambio = RemoteObject.createImmutable(""); -public static RemoteObject _costo_tot = RemoteObject.createImmutable(""); -public static RemoteObject _almacen = RemoteObject.createImmutable(""); -public static RemoteObject _preciosin = RemoteObject.createImmutable(""); -public static RemoteObject _cl_ruta = RemoteObject.createImmutable(""); -public static RemoteObject _d = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _tot_art_promor = RemoteObject.createImmutable(""); -public static RemoteObject _promo_cr = RemoteObject.createImmutable(""); -public static RemoteObject _total_promo = RemoteObject.createImmutable(""); -public static RemoteObject _hccp_cant = RemoteObject.createImmutable(""); -public static RemoteObject _tgl = RemoteObject.declareNull("com.rootsoft.togglelibrary.ToggleLibrary"); -public static RemoteObject _precio_cero = RemoteObject.createImmutable(""); -public static RemoteObject _bonsabor = RemoteObject.createImmutable(""); -public static RemoteObject _bonsabor2 = RemoteObject.createImmutable(""); -public static RemoteObject _cmd = RemoteObject.declareNull("keymon.lat.medicomed.dbrequestmanager._dbcommand"); -public static RemoteObject _p_pedido = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"ALMACEN",_ref.getField(false, "_almacen"),"BONSABOR",_ref.getField(false, "_bonsabor"),"BONSABOR2",_ref.getField(false, "_bonsabor2"),"c",_ref.getField(false, "_c"),"cambio",_ref.getField(false, "_cambio"),"cantidad",_ref.getField(false, "_cantidad"),"CC",_ref.getField(false, "_cc"),"cl_ruta",_ref.getField(false, "_cl_ruta"),"clie_id",_ref.getField(false, "_clie_id"),"cmd",_ref.getField(false, "_cmd"),"COSTO_TOT",_ref.getField(false, "_costo_tot"),"d",_ref.getField(false, "_d"),"DateUtils",_ref.getField(false, "_dateutils"),"DD",_ref.getField(false, "_dd"),"DESC_PROMO",_ref.getField(false, "_desc_promo"),"e",_ref.getField(false, "_e"),"f",_ref.getField(false, "_f"),"g",_ref.getField(false, "_g"),"guardar",_ref.getField(false, "_guardar"),"h",_ref.getField(false, "_h"),"HCCP_CANT",_ref.getField(false, "_hccp_cant"),"i_fotol",_ref.getField(false, "_i_fotol"),"IMG_PASO",_ref.getField(false, "_img_paso"),"img_prod",_ref.getField(false, "_img_prod"),"l_bodega",_ref.getField(false, "_l_bodega"),"l_desc",_ref.getField(false, "_l_desc"),"l_marca",_ref.getField(false, "_l_marca"),"l_precio",_ref.getField(false, "_l_precio"),"L_PROID",_ref.getField(false, "_l_proid"),"l_sub",_ref.getField(false, "_l_sub"),"l_tipo",_ref.getField(false, "_l_tipo"),"nopromo",_ref.getField(false, "_nopromo"),"p",_ref.getField(false, "_p"),"p_pedido",_ref.getField(false, "_p_pedido"),"precio_Cero",_ref.getField(false, "_precio_cero"),"preciosin",_ref.getField(false, "_preciosin"),"PROMO_C",_ref.getField(false, "_promo_c"),"PROMO_CR",_ref.getField(false, "_promo_cr"),"Root",_ref.getField(false, "_root"),"ruta",_ref.getField(false, "_ruta"),"sb",_ref.getField(false, "_sb"),"sDate",_ref.getField(false, "_sdate"),"skmt",_ref.getField(false, "_skmt"),"sTime",_ref.getField(false, "_stime"),"t_venta",_ref.getField(false, "_t_venta"),"t3",_ref.getField(false, "_t3"),"Terminar",_ref.getField(false, "_terminar"),"tgl",_ref.getField(false, "_tgl"),"TOT_ART_PROMO",_ref.getField(false, "_tot_art_promo"),"TOT_ART_PROMOR",_ref.getField(false, "_tot_art_promor"),"TOTAL_PROMO",_ref.getField(false, "_total_promo"),"usuario",_ref.getField(false, "_usuario"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_pedidos_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_pedidos_subs_0.java deleted file mode 100644 index 3860fda..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_pedidos_subs_0.java +++ /dev/null @@ -1,1686 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class c_pedidos_subs_0 { - - -public static RemoteObject _b4xpage_appear(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Appear (c_pedidos) ","c_pedidos",16,__ref.getField(false, "ba"),__ref,79); -if (RapidSub.canDelegate("b4xpage_appear")) { return __ref.runUserSub(false, "c_pedidos","b4xpage_appear", __ref);} -RemoteObject _out = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); - BA.debugLineNum = 79;BA.debugLine="Sub B4XPage_Appear"; -Debug.ShouldStop(16384); - BA.debugLineNum = 80;BA.debugLine="tgl.Initialize"; -Debug.ShouldStop(32768); -__ref.getField(false,"_tgl" /*RemoteObject*/ ).runVoidMethod ("Initialize",__ref.getField(false, "ba")); - BA.debugLineNum = 81;BA.debugLine="BONSABOR = 0"; -Debug.ShouldStop(65536); -__ref.setField ("_bonsabor" /*RemoteObject*/ ,BA.NumberToString(0)); - BA.debugLineNum = 82;BA.debugLine="BONSABOR2 = 0"; -Debug.ShouldStop(131072); -__ref.setField ("_bonsabor2" /*RemoteObject*/ ,BA.NumberToString(0)); - BA.debugLineNum = 83;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then"; -Debug.ShouldStop(262144); -if (c_pedidos.__c.runMethod(true,"Not",(Object)(c_pedidos._starter._gps /*RemoteObject*/ .runMethod(true,"getGPSEnabled"))).get().booleanValue()) { - BA.debugLineNum = 84;BA.debugLine="ToastMessageShow(\"Es necesario tener el GPS ence"; -Debug.ShouldStop(524288); -c_pedidos.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Es necesario tener el GPS encendido")),(Object)(c_pedidos.__c.getField(true,"True"))); - BA.debugLineNum = 85;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent"; -Debug.ShouldStop(1048576); -c_pedidos.__c.runVoidMethod ("StartActivity",__ref.getField(false, "ba"),(Object)((c_pedidos._starter._gps /*RemoteObject*/ .runMethod(false,"getLocationSettingsIntent")))); - }; - BA.debugLineNum = 87;BA.debugLine="cantidad.Text = \"\""; -Debug.ShouldStop(4194304); -__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("")); - BA.debugLineNum = 88;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select ID_AL"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select ID_ALMACEN from CAT_ALMACEN")))); - BA.debugLineNum = 89;BA.debugLine="C.Position =0"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 90;BA.debugLine="ALMACEN = C.GetString(\"ID_ALMACEN\")"; -Debug.ShouldStop(33554432); -__ref.setField ("_almacen" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("ID_ALMACEN")))); - BA.debugLineNum = 91;BA.debugLine="C.Close"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 92;BA.debugLine="i_fotol.Visible = False"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_i_fotol" /*RemoteObject*/ ).runMethod(true,"setVisible",c_pedidos.__c.getField(true,"False")); - BA.debugLineNum = 93;BA.debugLine="sb.Initialize"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_sb" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 94;BA.debugLine="p.Shell(\"ping -c1 -W1 177.244.63.54\",Null, sb,Nul"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_p" /*RemoteObject*/ ).runVoidMethod ("Shell",(Object)(BA.ObjectToString("ping -c1 -W1 177.244.63.54")),(Object)((c_pedidos.__c.getField(false,"Null"))),(Object)((__ref.getField(false,"_sb" /*RemoteObject*/ ).getObject())),(Object)((c_pedidos.__c.getField(false,"Null")))); - BA.debugLineNum = 95;BA.debugLine="skmt.Initialize(ruta,\"kmt.db\", True)"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(BA.ObjectToString("kmt.db")),(Object)(c_pedidos.__c.getField(true,"True"))); - BA.debugLineNum = 96;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_GP"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_GP_ID,CAT_GP_NOMBRE,CAT_GP_IMP1,CAT_GP_IMP2,CAT_GP_PRECIO,CAT_GP_CLASIF,CAT_GP_STS,CAT_GP_TIPO,CAT_GP_SUBTIPO,CAT_GP_IMG,CAT_GP_ALMACEN,CAT_GP_DEV from CAT_GUNAPROD where CAT_GP_NOMBRE In (Select PDESC from PROID)")))); - BA.debugLineNum = 97;BA.debugLine="c.Position=0"; -Debug.ShouldStop(1); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 98;BA.debugLine="L_PROID.Text = c.GetString(\"CAT_GP_ID\")"; -Debug.ShouldStop(2); -__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_ID"))))); - BA.debugLineNum = 99;BA.debugLine="l_tipo.Text = c.GetString(\"CAT_GP_TIPO\")"; -Debug.ShouldStop(4); -__ref.getField(false,"_l_tipo" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_TIPO"))))); - BA.debugLineNum = 100;BA.debugLine="l_sub.Text = c.GetString(\"CAT_GP_SUBTIPO\")"; -Debug.ShouldStop(8); -__ref.getField(false,"_l_sub" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_SUBTIPO"))))); - BA.debugLineNum = 101;BA.debugLine="l_marca.Text = c.GetString(\"CAT_GP_CLASIF\")"; -Debug.ShouldStop(16); -__ref.getField(false,"_l_marca" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_CLASIF"))))); - BA.debugLineNum = 102;BA.debugLine="l_desc.Text = c.GetString(\"CAT_GP_NOMBRE\")"; -Debug.ShouldStop(32); -__ref.getField(false,"_l_desc" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_NOMBRE"))))); - BA.debugLineNum = 103;BA.debugLine="l_precio.Text = c.GetDouble(\"CAT_GP_PRECIO\")"; -Debug.ShouldStop(64); -__ref.getField(false,"_l_precio" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetDouble",(Object)(RemoteObject.createImmutable("CAT_GP_PRECIO"))))); - BA.debugLineNum = 104;BA.debugLine="l_bodega.Text = c.GetString(\"CAT_GP_ALMACEN\")"; -Debug.ShouldStop(128); -__ref.getField(false,"_l_bodega" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_ALMACEN"))))); - BA.debugLineNum = 105;BA.debugLine="IMG_PASO = c.GetBlob(\"CAT_GP_IMG\")"; -Debug.ShouldStop(256); -__ref.setField ("_img_paso" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(false,"GetBlob",(Object)(RemoteObject.createImmutable("CAT_GP_IMG")))); - BA.debugLineNum = 106;BA.debugLine="PROMO_C = c.GetString(\"CAT_GP_STS\")"; -Debug.ShouldStop(512); -__ref.setField ("_promo_c" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_STS")))); - BA.debugLineNum = 107;BA.debugLine="cambio = c.GetString(\"CAT_GP_DEV\")"; -Debug.ShouldStop(1024); -__ref.setField ("_cambio" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_DEV")))); - BA.debugLineNum = 108;BA.debugLine="preciosin = c.GetString(\"CAT_GP_IMP2\")"; -Debug.ShouldStop(2048); -__ref.setField ("_preciosin" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_IMP2")))); - BA.debugLineNum = 109;BA.debugLine="PROMO_CR = c.GetString(\"CAT_GP_IMP1\")"; -Debug.ShouldStop(4096); -__ref.setField ("_promo_cr" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_IMP1")))); - BA.debugLineNum = 110;BA.debugLine="cambio = \"0\""; -Debug.ShouldStop(8192); -__ref.setField ("_cambio" /*RemoteObject*/ ,BA.ObjectToString("0")); - BA.debugLineNum = 112;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery2(\"select count"; -Debug.ShouldStop(32768); -__ref.getField(false,"_e" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select count(*) as CUANTOS FROM pedido WHERE PE_CEDIS = ? AND PE_CLIENTE IN (Select cuenta from cuentaa) ")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_ID")))})))); - BA.debugLineNum = 113;BA.debugLine="e.Position =0"; -Debug.ShouldStop(65536); -__ref.getField(false,"_e" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 114;BA.debugLine="If e.GetString(\"CUANTOS\") = 0 Then"; -Debug.ShouldStop(131072); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_e" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS"))),BA.NumberToString(0))) { - BA.debugLineNum = 115;BA.debugLine="If l_marca.text = \"PROMOS\" And l_tipo.Text =\"PRO"; -Debug.ShouldStop(262144); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_l_marca" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("PROMOS")) && RemoteObject.solveBoolean("=",__ref.getField(false,"_l_tipo" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("PROMOS"))) { - BA.debugLineNum = 116;BA.debugLine="DESC_PROMO.Visible = True"; -Debug.ShouldStop(524288); -__ref.getField(false,"_desc_promo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_pedidos.__c.getField(true,"True")); - BA.debugLineNum = 117;BA.debugLine="CC=B4XPages.MainPage.skmt.ExecQuery2(\"select co"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_cc" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select count(*) as CUANTOS FROM PROMOS_COMP WHERE CAT_PA_ID = ?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_ID")))})))); - BA.debugLineNum = 118;BA.debugLine="CC.Position =0"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_cc" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 119;BA.debugLine="If CC.GetString(\"CUANTOS\") = 0 Then"; -Debug.ShouldStop(4194304); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_cc" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS"))),BA.NumberToString(0))) { - BA.debugLineNum = 120;BA.debugLine="l_bodega.Text = \"0\" ' se modifica a cero para"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_l_bodega" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("0")); - }else { - BA.debugLineNum = 122;BA.debugLine="CC.Close"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_cc" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 123;BA.debugLine="CC=B4XPages.MainPage.skmt.ExecQuery2(\"select C"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_cc" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select CAT_PA_MAXPROM, CAT_PA_MAXPROMREC, CAT_PA_MAXPROMCLIE FROM PROMOS_COMP WHERE CAT_PA_ID = ?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_ID")))})))); - BA.debugLineNum = 124;BA.debugLine="CC.Position =0"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_cc" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 126;BA.debugLine="DD=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT C"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_dd" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("SELECT COUNT(*) AS CUANTOS FROM HIST_CLIENTE_CANT_PROMOS WHERE HCCP_CLIENTE IN (Select cuenta from cuentaa) AND HCCP_PROMO =?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_ID")))})))); - BA.debugLineNum = 127;BA.debugLine="DD.Position =0"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_dd" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 128;BA.debugLine="If DD.GetString(\"CUANTOS\") = 0 Then"; -Debug.ShouldStop(-2147483648); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_dd" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS"))),BA.NumberToString(0))) { - BA.debugLineNum = 129;BA.debugLine="HCCP_CANT = 0"; -Debug.ShouldStop(1); -__ref.setField ("_hccp_cant" /*RemoteObject*/ ,BA.NumberToString(0)); - }else { - BA.debugLineNum = 131;BA.debugLine="DD.Close"; -Debug.ShouldStop(4); -__ref.getField(false,"_dd" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 132;BA.debugLine="DD=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT"; -Debug.ShouldStop(8); -__ref.getField(false,"_dd" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("SELECT HCCP_CANT FROM HIST_CLIENTE_CANT_PROMOS WHERE HCCP_CLIENTE IN (Select cuenta from cuentaa) AND HCCP_PROMO =?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_ID")))})))); - BA.debugLineNum = 133;BA.debugLine="DD.Position =0"; -Debug.ShouldStop(16); -__ref.getField(false,"_dd" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 134;BA.debugLine="HCCP_CANT = DD.GetString(\"HCCP_CANT\")"; -Debug.ShouldStop(32); -__ref.setField ("_hccp_cant" /*RemoteObject*/ ,__ref.getField(false,"_dd" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HCCP_CANT")))); - BA.debugLineNum = 135;BA.debugLine="DD.Close"; -Debug.ShouldStop(64); -__ref.getField(false,"_dd" /*RemoteObject*/ ).runVoidMethod ("Close"); - }; - BA.debugLineNum = 137;BA.debugLine="BONSABOR = HCCP_CANT"; -Debug.ShouldStop(256); -__ref.setField ("_bonsabor" /*RemoteObject*/ ,__ref.getField(true,"_hccp_cant" /*RemoteObject*/ )); - BA.debugLineNum = 138;BA.debugLine="DD=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT C"; -Debug.ShouldStop(512); -__ref.getField(false,"_dd" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("SELECT COUNT(*) AS CUANTOS FROM HIST_VENTAS WHERE HVD_CLIENTE IN (Select cuenta from cuentaa) AND HVD_PRONOMBRE =?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_NOMBRE")))})))); - BA.debugLineNum = 139;BA.debugLine="DD.Position =0"; -Debug.ShouldStop(1024); -__ref.getField(false,"_dd" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 140;BA.debugLine="If DD.GetString(\"CUANTOS\") = 0 Then"; -Debug.ShouldStop(2048); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_dd" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS"))),BA.NumberToString(0))) { - BA.debugLineNum = 141;BA.debugLine="HCCP_CANT = 0"; -Debug.ShouldStop(4096); -__ref.setField ("_hccp_cant" /*RemoteObject*/ ,BA.NumberToString(0)); - }else { - BA.debugLineNum = 143;BA.debugLine="DD.Close"; -Debug.ShouldStop(16384); -__ref.getField(false,"_dd" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 144;BA.debugLine="DD=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT"; -Debug.ShouldStop(32768); -__ref.getField(false,"_dd" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("SELECT SUM(HVD_CANT) AS HCCP_CANT FROM HIST_VENTAS WHERE HVD_CLIENTE IN (Select cuenta from cuentaa) AND HVD_PRONOMBRE =?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_NOMBRE")))})))); - BA.debugLineNum = 145;BA.debugLine="DD.Position =0"; -Debug.ShouldStop(65536); -__ref.getField(false,"_dd" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 146;BA.debugLine="HCCP_CANT = DD.GetString(\"HCCP_CANT\")"; -Debug.ShouldStop(131072); -__ref.setField ("_hccp_cant" /*RemoteObject*/ ,__ref.getField(false,"_dd" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HCCP_CANT")))); - BA.debugLineNum = 147;BA.debugLine="DD.Close"; -Debug.ShouldStop(262144); -__ref.getField(false,"_dd" /*RemoteObject*/ ).runVoidMethod ("Close"); - }; - BA.debugLineNum = 149;BA.debugLine="DD=B4XPages.MainPage.skmt.ExecQuery2(\"Select C"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_dd" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("Select COUNT(*) AS CUANTOS FROM PEDIDO WHERE PE_CLIENTE IN (Select cuenta from cuentaa) AND PE_PROID IN (select CAT_GP_ID from CAT_GUNAPROD where CAT_GP_CLASIF = ?) ")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_NOMBRE")))})))); - BA.debugLineNum = 150;BA.debugLine="DD.Position =0"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_dd" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 151;BA.debugLine="BONSABOR2 = DD.GetString(\"CUANTOS\")"; -Debug.ShouldStop(4194304); -__ref.setField ("_bonsabor2" /*RemoteObject*/ ,__ref.getField(false,"_dd" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))); - BA.debugLineNum = 152;BA.debugLine="DD.Close"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_dd" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 153;BA.debugLine="TOTAL_PROMO = CC.GetString(\"CAT_PA_MAXPROMCLIE"; -Debug.ShouldStop(16777216); -__ref.setField ("_total_promo" /*RemoteObject*/ ,BA.NumberToString(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_cc" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_PA_MAXPROMCLIE")))),BA.numberCast(double.class, __ref.getField(true,"_hccp_cant" /*RemoteObject*/ ))}, "-",1, 0))); - BA.debugLineNum = 154;BA.debugLine="If HCCP_CANT = 0 Then"; -Debug.ShouldStop(33554432); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_hccp_cant" /*RemoteObject*/ ),BA.NumberToString(0))) { - BA.debugLineNum = 155;BA.debugLine="l_bodega.Text = CC.GetString(\"CAT_PA_MAXPROM\""; -Debug.ShouldStop(67108864); -__ref.getField(false,"_l_bodega" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_cc" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_PA_MAXPROM"))))); - }else -{ BA.debugLineNum = 156;BA.debugLine="Else IF TOTAL_PROMO > CC.GetString(\"CAT_PA_MAX"; -Debug.ShouldStop(134217728); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(true,"_total_promo" /*RemoteObject*/ )),BA.numberCast(double.class, __ref.getField(false,"_cc" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_PA_MAXPROMREC")))))) { - BA.debugLineNum = 157;BA.debugLine="l_bodega.Text = CC.GetString(\"CAT_PA_MAXPROM"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_l_bodega" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_cc" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_PA_MAXPROMREC"))))); - }else { - BA.debugLineNum = 159;BA.debugLine="l_bodega.Text = TOTAL_PROMO"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_l_bodega" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(true,"_total_promo" /*RemoteObject*/ ))); - }} -; - }; - }else { - BA.debugLineNum = 163;BA.debugLine="DESC_PROMO.Visible = False"; -Debug.ShouldStop(4); -__ref.getField(false,"_desc_promo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_pedidos.__c.getField(true,"False")); - }; - BA.debugLineNum = 165;BA.debugLine="c.Close"; -Debug.ShouldStop(16); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 166;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CASE"; -Debug.ShouldStop(32); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CASE WHEN pe_costo_tot is null then 0 else sum( pe_costo_tot ) end as TOTAL_CLIE FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)")))); - BA.debugLineNum = 167;BA.debugLine="c.Position=0"; -Debug.ShouldStop(64); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 168;BA.debugLine="t_venta.Text = c.GetString(\"TOTAL_CLIE\")"; -Debug.ShouldStop(128); -__ref.getField(false,"_t_venta" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_CLIE"))))); - BA.debugLineNum = 169;BA.debugLine="c.Close"; -Debug.ShouldStop(256); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 170;BA.debugLine="Terminar.Visible = True"; -Debug.ShouldStop(512); -__ref.getField(false,"_terminar" /*RemoteObject*/ ).runMethod(true,"setVisible",c_pedidos.__c.getField(true,"True")); - BA.debugLineNum = 171;BA.debugLine="guardar.Visible = True"; -Debug.ShouldStop(1024); -__ref.getField(false,"_guardar" /*RemoteObject*/ ).runMethod(true,"setVisible",c_pedidos.__c.getField(true,"True")); - BA.debugLineNum = 172;BA.debugLine="cantidad.Visible = True"; -Debug.ShouldStop(2048); -__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"setVisible",c_pedidos.__c.getField(true,"True")); - BA.debugLineNum = 173;BA.debugLine="If cambio = \"1\" Then"; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_cambio" /*RemoteObject*/ ),BA.ObjectToString("1"))) { - BA.debugLineNum = 174;BA.debugLine="nopromo.Visible = True"; -Debug.ShouldStop(8192); -__ref.getField(false,"_nopromo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_pedidos.__c.getField(true,"True")); - }else { - BA.debugLineNum = 176;BA.debugLine="nopromo.Visible = False"; -Debug.ShouldStop(32768); -__ref.getField(false,"_nopromo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_pedidos.__c.getField(true,"False")); - }; - BA.debugLineNum = 178;BA.debugLine="Dim out As OutputStream"; -Debug.ShouldStop(131072); -_out = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper");Debug.locals.put("out", _out); - BA.debugLineNum = 179;BA.debugLine="out = File.OpenOutput(ruta, \"1.jpg\", False)"; -Debug.ShouldStop(262144); -_out = c_pedidos.__c.getField(false,"File").runMethod(false,"OpenOutput",(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(BA.ObjectToString("1.jpg")),(Object)(c_pedidos.__c.getField(true,"False")));Debug.locals.put("out", _out); - BA.debugLineNum = 180;BA.debugLine="out.WriteBytes(IMG_PASO, 0, IMG_PASO.Length)"; -Debug.ShouldStop(524288); -_out.runVoidMethod ("WriteBytes",(Object)(__ref.getField(false,"_img_paso" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_img_paso" /*RemoteObject*/ ).getField(true,"length"))); - BA.debugLineNum = 181;BA.debugLine="out.Close"; -Debug.ShouldStop(1048576); -_out.runVoidMethod ("Close"); - BA.debugLineNum = 182;BA.debugLine="img_prod.Bitmap = LoadBitmap(ruta,\"1.jpg\")"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_img_prod" /*RemoteObject*/ ).runMethod(false,"setBitmap",(c_pedidos.__c.runMethod(false,"LoadBitmap",(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(RemoteObject.createImmutable("1.jpg"))).getObject())); - BA.debugLineNum = 183;BA.debugLine="TOT_ART_PROMO = \"0\""; -Debug.ShouldStop(4194304); -__ref.setField ("_tot_art_promo" /*RemoteObject*/ ,BA.ObjectToString("0")); - BA.debugLineNum = 184;BA.debugLine="TOT_ART_PROMOR = \"0\""; -Debug.ShouldStop(8388608); -__ref.setField ("_tot_art_promor" /*RemoteObject*/ ,BA.ObjectToString("0")); - BA.debugLineNum = 185;BA.debugLine="If l_marca.text = \"PROMOS\" And l_tipo.Text =\"PRO"; -Debug.ShouldStop(16777216); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_l_marca" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("PROMOS")) && RemoteObject.solveBoolean("=",__ref.getField(false,"_l_tipo" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("PROMOS")) && RemoteObject.solveBoolean("=",__ref.getField(false,"_l_bodega" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("0"))) { - BA.debugLineNum = 186;BA.debugLine="Msgbox(\"ALERTA\",\"EL CLIENTE NO PUEDE TENER ESTA"; -Debug.ShouldStop(33554432); -c_pedidos.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("ALERTA")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("EL CLIENTE NO PUEDE TENER ESTA PROMOCION"))),__ref.getField(false, "ba")); - BA.debugLineNum = 187;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; -Debug.ShouldStop(67108864); -c_pedidos._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Productos"))); - }else -{ BA.debugLineNum = 188;BA.debugLine="ELSE IF l_marca.text = \"PROMOS\" And l_tipo.Text"; -Debug.ShouldStop(134217728); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_l_marca" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("PROMOS")) && RemoteObject.solveBoolean("=",__ref.getField(false,"_l_tipo" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("PROMOS")) && RemoteObject.solveBoolean("=",__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("PROUNI1")) && RemoteObject.solveBoolean("!",__ref.getField(true,"_bonsabor" /*RemoteObject*/ ),BA.ObjectToString("1")) && RemoteObject.solveBoolean("=",__ref.getField(true,"_bonsabor2" /*RemoteObject*/ ),BA.NumberToString(0))) { - BA.debugLineNum = 189;BA.debugLine="Msgbox(\"ALERTA\",\"EL CLIENTE NO PUEDE TENER ESTA"; -Debug.ShouldStop(268435456); -c_pedidos.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("ALERTA")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("EL CLIENTE NO PUEDE TENER ESTA PROMOCION"))),__ref.getField(false, "ba")); - BA.debugLineNum = 190;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; -Debug.ShouldStop(536870912); -c_pedidos._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Productos"))); - }} -; - }else { - BA.debugLineNum = 193;BA.debugLine="Msgbox(\"ALERTA\",\"EL CLIENTE YA COMPRO ESTE PRODU"; -Debug.ShouldStop(1); -c_pedidos.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("ALERTA")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("EL CLIENTE YA COMPRO ESTE PRODUCTO REVISAR NOTA"))),__ref.getField(false, "ba")); - BA.debugLineNum = 194;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; -Debug.ShouldStop(2); -c_pedidos._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Productos"))); - }; - BA.debugLineNum = 196;BA.debugLine="End Sub"; -Debug.ShouldStop(8); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b4xpage_closerequest(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_CloseRequest (c_pedidos) ","c_pedidos",16,__ref.getField(false, "ba"),__ref,531); -if (RapidSub.canDelegate("b4xpage_closerequest")) { return __ref.runUserSub(false, "c_pedidos","b4xpage_closerequest", __ref);} -ResumableSub_B4XPage_CloseRequest rsub = new ResumableSub_B4XPage_CloseRequest(null,__ref); -rsub.remoteResumableSub = anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSubForFilter(); -rsub.resume(null, null); -return RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.keywords.Common.ResumableSubWrapper"), rsub.remoteResumableSub); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_B4XPage_CloseRequest extends BA.ResumableSub { -public ResumableSub_B4XPage_CloseRequest(keymon.lat.medicomed.c_pedidos parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.c_pedidos parent; - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_CloseRequest (c_pedidos) ","c_pedidos",16,__ref.getField(false, "ba"),__ref,531); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -{ -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,RemoteObject.createImmutable(null));return;} -case 0: -//C -this.state = -1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 534;BA.debugLine="Msgbox(\"Presione Boton Terminar.\",\"ADVERTENCIA\")"; -Debug.ShouldStop(2097152); -parent.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("Presione Boton Terminar.")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("ADVERTENCIA"))),__ref.getField(false, "ba")); - BA.debugLineNum = 535;BA.debugLine="Return False"; -Debug.ShouldStop(4194304); -if (true) { -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,(parent.__c.getField(true,"False")));return;}; - BA.debugLineNum = 536;BA.debugLine="End Sub"; -Debug.ShouldStop(8388608); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _b4xpage_created(RemoteObject __ref,RemoteObject _root1) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Created (c_pedidos) ","c_pedidos",16,__ref.getField(false, "ba"),__ref,64); -if (RapidSub.canDelegate("b4xpage_created")) { return __ref.runUserSub(false, "c_pedidos","b4xpage_created", __ref, _root1);} -Debug.locals.put("Root1", _root1); - BA.debugLineNum = 64;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -Debug.ShouldStop(-2147483648); - BA.debugLineNum = 65;BA.debugLine="Root = Root1"; -Debug.ShouldStop(1); -__ref.setField ("_root" /*RemoteObject*/ ,_root1); - BA.debugLineNum = 67;BA.debugLine="Root.LoadLayout(\"pedido\")"; -Debug.ShouldStop(4); -__ref.getField(false,"_root" /*RemoteObject*/ ).runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("pedido")),__ref.getField(false, "ba")); - BA.debugLineNum = 68;BA.debugLine="i_fotol.Visible = False"; -Debug.ShouldStop(8); -__ref.getField(false,"_i_fotol" /*RemoteObject*/ ).runMethod(true,"setVisible",c_pedidos.__c.getField(true,"False")); - BA.debugLineNum = 70;BA.debugLine="ruta = File.DirInternal"; -Debug.ShouldStop(32); -__ref.setField ("_ruta" /*RemoteObject*/ ,c_pedidos.__c.getField(false,"File").runMethod(true,"getDirInternal")); - BA.debugLineNum = 71;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; -Debug.ShouldStop(64); -if (RemoteObject.solveBoolean("=",c_pedidos.__c.getField(false,"File").runMethod(true,"Exists",(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(RemoteObject.createImmutable("kmt.db"))),c_pedidos.__c.getField(true,"False"))) { - BA.debugLineNum = 72;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; -Debug.ShouldStop(128); -c_pedidos.__c.getField(false,"File").runVoidMethod ("Copy",(Object)(c_pedidos.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(BA.ObjectToString("kmt.db")),(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(RemoteObject.createImmutable("kmt.db"))); - }; - BA.debugLineNum = 75;BA.debugLine="End Sub"; -Debug.ShouldStop(1024); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Private Root As B4XView 'ignore"; -c_pedidos._root = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_root",c_pedidos._root); - //BA.debugLineNum = 3;BA.debugLine="Private xui As XUI 'ignore"; -c_pedidos._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",c_pedidos._xui); - //BA.debugLineNum = 5;BA.debugLine="Dim g As GPS"; -c_pedidos._g = RemoteObject.createNew ("anywheresoftware.b4a.gps.GPS");__ref.setField("_g",c_pedidos._g); - //BA.debugLineNum = 6;BA.debugLine="Dim ruta As String"; -c_pedidos._ruta = RemoteObject.createImmutable("");__ref.setField("_ruta",c_pedidos._ruta); - //BA.debugLineNum = 7;BA.debugLine="Dim skmt As SQL"; -c_pedidos._skmt = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL");__ref.setField("_skmt",c_pedidos._skmt); - //BA.debugLineNum = 8;BA.debugLine="Private t3 As Timer"; -c_pedidos._t3 = RemoteObject.createNew ("anywheresoftware.b4a.objects.Timer");__ref.setField("_t3",c_pedidos._t3); - //BA.debugLineNum = 9;BA.debugLine="Dim p As Phone"; -c_pedidos._p = RemoteObject.createNew ("anywheresoftware.b4a.phone.Phone");__ref.setField("_p",c_pedidos._p); - //BA.debugLineNum = 10;BA.debugLine="Dim sb As StringBuilder"; -c_pedidos._sb = RemoteObject.createNew ("anywheresoftware.b4a.keywords.StringBuilderWrapper");__ref.setField("_sb",c_pedidos._sb); - //BA.debugLineNum = 12;BA.debugLine="Dim c As Cursor"; -c_pedidos._c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_c",c_pedidos._c); - //BA.debugLineNum = 13;BA.debugLine="Dim e As Cursor"; -c_pedidos._e = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_e",c_pedidos._e); - //BA.debugLineNum = 14;BA.debugLine="Dim f As Cursor"; -c_pedidos._f = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_f",c_pedidos._f); - //BA.debugLineNum = 15;BA.debugLine="Dim h As Cursor"; -c_pedidos._h = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_h",c_pedidos._h); - //BA.debugLineNum = 16;BA.debugLine="Dim CC As Cursor"; -c_pedidos._cc = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_cc",c_pedidos._cc); - //BA.debugLineNum = 17;BA.debugLine="Dim DD As Cursor"; -c_pedidos._dd = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_dd",c_pedidos._dd); - //BA.debugLineNum = 18;BA.debugLine="Dim l_tipo As Label"; -c_pedidos._l_tipo = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_tipo",c_pedidos._l_tipo); - //BA.debugLineNum = 19;BA.debugLine="Dim l_sub As Label"; -c_pedidos._l_sub = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_sub",c_pedidos._l_sub); - //BA.debugLineNum = 20;BA.debugLine="Dim l_marca As Label"; -c_pedidos._l_marca = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_marca",c_pedidos._l_marca); - //BA.debugLineNum = 21;BA.debugLine="Dim l_desc As Label"; -c_pedidos._l_desc = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_desc",c_pedidos._l_desc); - //BA.debugLineNum = 22;BA.debugLine="Dim l_precio As Label"; -c_pedidos._l_precio = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_precio",c_pedidos._l_precio); - //BA.debugLineNum = 23;BA.debugLine="Dim l_bodega As Label"; -c_pedidos._l_bodega = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_bodega",c_pedidos._l_bodega); - //BA.debugLineNum = 24;BA.debugLine="Dim cantidad As EditText"; -c_pedidos._cantidad = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");__ref.setField("_cantidad",c_pedidos._cantidad); - //BA.debugLineNum = 25;BA.debugLine="Dim guardar As Button"; -c_pedidos._guardar = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_guardar",c_pedidos._guardar); - //BA.debugLineNum = 26;BA.debugLine="Dim Terminar As Button"; -c_pedidos._terminar = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_terminar",c_pedidos._terminar); - //BA.debugLineNum = 27;BA.debugLine="Dim img_prod As ImageView"; -c_pedidos._img_prod = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");__ref.setField("_img_prod",c_pedidos._img_prod); - //BA.debugLineNum = 28;BA.debugLine="Dim IMG_PASO() As Byte"; -c_pedidos._img_paso = RemoteObject.createNewArray ("byte", new int[] {0}, new Object[]{});__ref.setField("_img_paso",c_pedidos._img_paso); - //BA.debugLineNum = 29;BA.debugLine="Dim L_PROID As Label"; -c_pedidos._l_proid = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_proid",c_pedidos._l_proid); - //BA.debugLineNum = 30;BA.debugLine="Dim clie_id As String"; -c_pedidos._clie_id = RemoteObject.createImmutable("");__ref.setField("_clie_id",c_pedidos._clie_id); - //BA.debugLineNum = 31;BA.debugLine="Dim sDate,sTime As String"; -c_pedidos._sdate = RemoteObject.createImmutable("");__ref.setField("_sdate",c_pedidos._sdate); -c_pedidos._stime = RemoteObject.createImmutable("");__ref.setField("_stime",c_pedidos._stime); - //BA.debugLineNum = 32;BA.debugLine="Dim usuario As String"; -c_pedidos._usuario = RemoteObject.createImmutable("");__ref.setField("_usuario",c_pedidos._usuario); - //BA.debugLineNum = 34;BA.debugLine="Dim t_venta As Label"; -c_pedidos._t_venta = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_t_venta",c_pedidos._t_venta); - //BA.debugLineNum = 35;BA.debugLine="Dim PROMO_C As String"; -c_pedidos._promo_c = RemoteObject.createImmutable("");__ref.setField("_promo_c",c_pedidos._promo_c); - //BA.debugLineNum = 36;BA.debugLine="Dim i_fotol As ImageView"; -c_pedidos._i_fotol = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");__ref.setField("_i_fotol",c_pedidos._i_fotol); - //BA.debugLineNum = 37;BA.debugLine="Private DESC_PROMO As Button"; -c_pedidos._desc_promo = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_desc_promo",c_pedidos._desc_promo); - //BA.debugLineNum = 38;BA.debugLine="Private nopromo As Button"; -c_pedidos._nopromo = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_nopromo",c_pedidos._nopromo); - //BA.debugLineNum = 39;BA.debugLine="Dim TOT_ART_PROMO As String"; -c_pedidos._tot_art_promo = RemoteObject.createImmutable("");__ref.setField("_tot_art_promo",c_pedidos._tot_art_promo); - //BA.debugLineNum = 40;BA.debugLine="Dim cambio As String"; -c_pedidos._cambio = RemoteObject.createImmutable("");__ref.setField("_cambio",c_pedidos._cambio); - //BA.debugLineNum = 41;BA.debugLine="Dim COSTO_TOT As String"; -c_pedidos._costo_tot = RemoteObject.createImmutable("");__ref.setField("_costo_tot",c_pedidos._costo_tot); - //BA.debugLineNum = 42;BA.debugLine="Dim ALMACEN As String"; -c_pedidos._almacen = RemoteObject.createImmutable("");__ref.setField("_almacen",c_pedidos._almacen); - //BA.debugLineNum = 43;BA.debugLine="Dim preciosin As String"; -c_pedidos._preciosin = RemoteObject.createImmutable("");__ref.setField("_preciosin",c_pedidos._preciosin); - //BA.debugLineNum = 44;BA.debugLine="Dim cl_ruta As String"; -c_pedidos._cl_ruta = RemoteObject.createImmutable("");__ref.setField("_cl_ruta",c_pedidos._cl_ruta); - //BA.debugLineNum = 45;BA.debugLine="Dim d As Cursor"; -c_pedidos._d = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_d",c_pedidos._d); - //BA.debugLineNum = 46;BA.debugLine="Dim TOT_ART_PROMOR As String"; -c_pedidos._tot_art_promor = RemoteObject.createImmutable("");__ref.setField("_tot_art_promor",c_pedidos._tot_art_promor); - //BA.debugLineNum = 47;BA.debugLine="Dim PROMO_CR As String"; -c_pedidos._promo_cr = RemoteObject.createImmutable("");__ref.setField("_promo_cr",c_pedidos._promo_cr); - //BA.debugLineNum = 48;BA.debugLine="Dim TOTAL_PROMO As String"; -c_pedidos._total_promo = RemoteObject.createImmutable("");__ref.setField("_total_promo",c_pedidos._total_promo); - //BA.debugLineNum = 49;BA.debugLine="Dim HCCP_CANT As String"; -c_pedidos._hccp_cant = RemoteObject.createImmutable("");__ref.setField("_hccp_cant",c_pedidos._hccp_cant); - //BA.debugLineNum = 50;BA.debugLine="Dim tgl As Toggle"; -c_pedidos._tgl = RemoteObject.createNew ("com.rootsoft.togglelibrary.ToggleLibrary");__ref.setField("_tgl",c_pedidos._tgl); - //BA.debugLineNum = 51;BA.debugLine="Dim precio_Cero As String"; -c_pedidos._precio_cero = RemoteObject.createImmutable("");__ref.setField("_precio_cero",c_pedidos._precio_cero); - //BA.debugLineNum = 52;BA.debugLine="Private BONSABOR As String"; -c_pedidos._bonsabor = RemoteObject.createImmutable("");__ref.setField("_bonsabor",c_pedidos._bonsabor); - //BA.debugLineNum = 53;BA.debugLine="Private BONSABOR2 As String"; -c_pedidos._bonsabor2 = RemoteObject.createImmutable("");__ref.setField("_bonsabor2",c_pedidos._bonsabor2); - //BA.debugLineNum = 54;BA.debugLine="Dim cmd As DBCommand"; -c_pedidos._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",c_pedidos._cmd); - //BA.debugLineNum = 55;BA.debugLine="Private p_pedido As Panel"; -c_pedidos._p_pedido = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_pedido",c_pedidos._p_pedido); - //BA.debugLineNum = 56;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _desc_promo_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("DESC_PROMO_Click (c_pedidos) ","c_pedidos",16,__ref.getField(false, "ba"),__ref,548); -if (RapidSub.canDelegate("desc_promo_click")) { return __ref.runUserSub(false, "c_pedidos","desc_promo_click", __ref);} - BA.debugLineNum = 548;BA.debugLine="Sub DESC_PROMO_Click"; -Debug.ShouldStop(8); - BA.debugLineNum = 549;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(16); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from PROIDID"))); - BA.debugLineNum = 550;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; -Debug.ShouldStop(32); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO PROIDID VALUES (?)")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText"))}))))); - BA.debugLineNum = 551;BA.debugLine="B4XPages.ShowPage(\"detalle_promo\")"; -Debug.ShouldStop(64); -c_pedidos._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("detalle_promo"))); - BA.debugLineNum = 552;BA.debugLine="End Sub"; -Debug.ShouldStop(128); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _gps_locationchanged(RemoteObject __ref,RemoteObject _location1) throws Exception{ -try { - Debug.PushSubsStack("GPS_LocationChanged (c_pedidos) ","c_pedidos",16,__ref.getField(false, "ba"),__ref,359); -if (RapidSub.canDelegate("gps_locationchanged")) { return __ref.runUserSub(false, "c_pedidos","gps_locationchanged", __ref, _location1);} -Debug.locals.put("Location1", _location1); - BA.debugLineNum = 359;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; -Debug.ShouldStop(64); - BA.debugLineNum = 362;BA.debugLine="End Sub"; -Debug.ShouldStop(512); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _guardar_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("guardar_Click (c_pedidos) ","c_pedidos",16,__ref.getField(false, "ba"),__ref,198); -if (RapidSub.canDelegate("guardar_click")) { return __ref.runUserSub(false, "c_pedidos","guardar_click", __ref);} -int _i = 0; - BA.debugLineNum = 198;BA.debugLine="Sub guardar_Click"; -Debug.ShouldStop(32); - BA.debugLineNum = 199;BA.debugLine="If cantidad.Text = \"\" Then"; -Debug.ShouldStop(64); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString(""))) { - BA.debugLineNum = 200;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; -Debug.ShouldStop(128); -c_pedidos._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Productos"))); - }else -{ BA.debugLineNum = 201;BA.debugLine="ELSE If cantidad.Text > l_bodega.Text Then"; -Debug.ShouldStop(256); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),BA.numberCast(double.class, __ref.getField(false,"_l_bodega" /*RemoteObject*/ ).runMethod(true,"getText")))) { - BA.debugLineNum = 202;BA.debugLine="Msgbox(\"Exede la existencia\", \"ADVERTENCIA\") 'ig"; -Debug.ShouldStop(512); -c_pedidos.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("Exede la existencia")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("ADVERTENCIA"))),__ref.getField(false, "ba")); - }else -{ BA.debugLineNum = 203;BA.debugLine="Else If l_marca.text = \"PROMOS\" And l_tipo.Text ="; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_l_marca" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("PROMOS")) && RemoteObject.solveBoolean("=",__ref.getField(false,"_l_tipo" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("PROMOS")) && RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(true,"_promo_c" /*RemoteObject*/ )),BA.numberCast(double.class, 0)) && RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 204;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(2048); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from PROIDID"))); - BA.debugLineNum = 205;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -Debug.ShouldStop(4096); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO PROIDID VALUES (?)")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText"))}))))); - BA.debugLineNum = 206;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select count"; -Debug.ShouldStop(8192); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select count(*) as CUANTOSD from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND CAT_DP_TIPO = 1)")))); - BA.debugLineNum = 207;BA.debugLine="c.Position =0"; -Debug.ShouldStop(16384); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 208;BA.debugLine="If c.GetString(\"CUANTOSD\") = 0 Then"; -Debug.ShouldStop(32768); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOSD"))),BA.NumberToString(0))) { - BA.debugLineNum = 209;BA.debugLine="Msgbox(\"No tiene venta el cliente para la promo"; -Debug.ShouldStop(65536); -c_pedidos.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("No tiene venta el cliente para la promo")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("ADVERTENCIA"))),__ref.getField(false, "ba")); - }else { - BA.debugLineNum = 211;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select sum("; -Debug.ShouldStop(262144); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select sum(pe_cant) As TOT_ART_PROMO, sum(PE_COSTO_TOT) as COSTO_TOT from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND CAT_DP_PRECIO > 1)")))); - BA.debugLineNum = 212;BA.debugLine="C.Position =0"; -Debug.ShouldStop(524288); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 213;BA.debugLine="TOT_ART_PROMO = C.GetString(\"TOT_ART_PROMO\")"; -Debug.ShouldStop(1048576); -__ref.setField ("_tot_art_promo" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOT_ART_PROMO")))); - BA.debugLineNum = 214;BA.debugLine="COSTO_TOT = C.GetString(\"COSTO_TOT\")"; -Debug.ShouldStop(2097152); -__ref.setField ("_costo_tot" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("COSTO_TOT")))); - BA.debugLineNum = 215;BA.debugLine="C.Close"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 216;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select coun"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select count(*) as CUANTOSD from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND (CAT_DP_PRECIO = 0.01 or CAT_DP_PRECIO = 1 OR CAT_DP_PRECIO = 0) AND CAT_DP_TIPO = 1)")))); - BA.debugLineNum = 217;BA.debugLine="c.Position =0"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 218;BA.debugLine="If c.GetString(\"CUANTOSD\") = 0 Then"; -Debug.ShouldStop(33554432); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOSD"))),BA.NumberToString(0))) { - BA.debugLineNum = 219;BA.debugLine="TOT_ART_PROMOR = \"0\" 'Msgbox(\"No tiene venta e"; -Debug.ShouldStop(67108864); -__ref.setField ("_tot_art_promor" /*RemoteObject*/ ,BA.ObjectToString("0")); - }else { - BA.debugLineNum = 221;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select sum"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select sum(pe_cant) As TOT_ART_PROMO, sum(PE_COSTO_TOT) as COSTO_TOT from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND (CAT_DP_PRECIO = 0.01 or CAT_DP_PRECIO = 1 OR CAT_DP_PRECIO = 0) AND CAT_DP_TIPO = 1)")))); - BA.debugLineNum = 222;BA.debugLine="C.Position =0"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 223;BA.debugLine="TOT_ART_PROMOR = C.GetString(\"TOT_ART_PROMO\")"; -Debug.ShouldStop(1073741824); -__ref.setField ("_tot_art_promor" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOT_ART_PROMO")))); - }; - BA.debugLineNum = 225;BA.debugLine="C.Close"; -Debug.ShouldStop(1); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 226;BA.debugLine="PROMO_C = PROMO_C * cantidad.Text"; -Debug.ShouldStop(2); -__ref.setField ("_promo_c" /*RemoteObject*/ ,BA.NumberToString(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(true,"_promo_c" /*RemoteObject*/ )),BA.numberCast(double.class, __ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText"))}, "*",0, 0))); - BA.debugLineNum = 227;BA.debugLine="PROMO_CR = PROMO_CR * cantidad.Text"; -Debug.ShouldStop(4); -__ref.setField ("_promo_cr" /*RemoteObject*/ ,BA.NumberToString(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(true,"_promo_cr" /*RemoteObject*/ )),BA.numberCast(double.class, __ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText"))}, "*",0, 0))); - BA.debugLineNum = 228;BA.debugLine="If TOT_ART_PROMO = PROMO_C And TOT_ART_PROMOR"; -Debug.ShouldStop(8); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_tot_art_promo" /*RemoteObject*/ ),__ref.getField(true,"_promo_c" /*RemoteObject*/ )) && RemoteObject.solveBoolean("=",__ref.getField(true,"_tot_art_promor" /*RemoteObject*/ ),__ref.getField(true,"_promo_cr" /*RemoteObject*/ ))) { - BA.debugLineNum = 229;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE P"; -Debug.ShouldStop(16); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE PEDIDO SET PE_CEDIS = (?) WHERE PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID))")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText"))}))))); - BA.debugLineNum = 230;BA.debugLine="D=B4XPages.MainPage.skmt.ExecQuery(\"select CAT"; -Debug.ShouldStop(32); -__ref.getField(false,"_d" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_DP_ID, CAT_DP_PRECIO, CAT_DP_PRECIO_SIMPTOS, CAT_DP_IDPROD FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) AND CAT_DP_PRECIO > 1")))); - BA.debugLineNum = 231;BA.debugLine="If D.RowCount>0 Then"; -Debug.ShouldStop(64); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 232;BA.debugLine="For i=0 To D.RowCount -1"; -Debug.ShouldStop(128); -{ -final int step34 = 1; -final int limit34 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step34 > 0 && _i <= limit34) || (step34 < 0 && _i >= limit34) ;_i = ((int)(0 + _i + step34)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 233;BA.debugLine="D.Position=i"; -Debug.ShouldStop(256); -__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 234;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE"; -Debug.ShouldStop(512); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE PEDIDO SET PE_COSTOU = (?), PE_COSTO_TOT = PE_CANT * (?) , PE_COSTO_SIN = (?) WHERE PE_PROID = (?) And PE_CEDIS In (Select PROIDID from PROIDID) AND PE_CLIENTE IN (Select CUENTA from cuentaa) ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {4},new Object[] {(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PRECIO")))),(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PRECIO")))),(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PRECIO_SIMPTOS")))),(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_IDPROD"))))}))))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 237;BA.debugLine="D.Close"; -Debug.ShouldStop(4096); -__ref.getField(false,"_d" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 238;BA.debugLine="D=B4XPages.MainPage.skmt.ExecQuery(\"select CAT"; -Debug.ShouldStop(8192); -__ref.getField(false,"_d" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_DP_ID, CAT_DP_PRECIO, CAT_DP_PRECIO_SIMPTOS, CAT_DP_IDPROD FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) AND (CAT_DP_PRECIO = 0.01 or CAT_DP_PRECIO = 1 OR CAT_DP_PRECIO = 0) AND CAT_DP_TIPO = 1")))); - BA.debugLineNum = 239;BA.debugLine="If D.RowCount>0 Then"; -Debug.ShouldStop(16384); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 240;BA.debugLine="For i=0 To D.RowCount -1"; -Debug.ShouldStop(32768); -{ -final int step42 = 1; -final int limit42 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step42 > 0 && _i <= limit42) || (step42 < 0 && _i >= limit42) ;_i = ((int)(0 + _i + step42)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 241;BA.debugLine="D.Position=i"; -Debug.ShouldStop(65536); -__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 242;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE"; -Debug.ShouldStop(131072); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE PEDIDO SET PE_COSTOU = (?), PE_COSTO_TOT = PE_CANT * (?) , PE_COSTO_SIN = (?) WHERE PE_PROID = (?) And PE_CEDIS In (Select PROIDID from PROIDID) AND PE_CLIENTE IN (Select CUENTA from cuentaa) ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {4},new Object[] {(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PRECIO")))),(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PRECIO")))),(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PRECIO_SIMPTOS")))),(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_IDPROD"))))}))))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 245;BA.debugLine="D.Close"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_d" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 246;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; -Debug.ShouldStop(2097152); -c_pedidos.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("MM/dd/yyyy")); - BA.debugLineNum = 247;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(4194304); -__ref.setField ("_sdate" /*RemoteObject*/ ,c_pedidos.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(c_pedidos.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 248;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -Debug.ShouldStop(8388608); -__ref.setField ("_stime" /*RemoteObject*/ ,c_pedidos.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_pedidos.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 249;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUE"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select CUENTA from cuentaa")))); - BA.debugLineNum = 250;BA.debugLine="c.Position=0"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 251;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -Debug.ShouldStop(67108864); -__ref.setField ("_clie_id" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUENTA")))); - BA.debugLineNum = 252;BA.debugLine="c.Close"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 253;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_CL_RUTA from kmt_info where CAT_CL_CODIGO In (Select cuenta from cuentaa)")))); - BA.debugLineNum = 254;BA.debugLine="c.Position=0"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 255;BA.debugLine="cl_ruta = c.GetString(\"CAT_CL_RUTA\")"; -Debug.ShouldStop(1073741824); -__ref.setField ("_cl_ruta" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_RUTA")))); - BA.debugLineNum = 256;BA.debugLine="c.Close"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 257;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USU"; -Debug.ShouldStop(1); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select USUARIO from usuarioa")))); - BA.debugLineNum = 258;BA.debugLine="c.Position=0"; -Debug.ShouldStop(2); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 259;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(4); -__ref.setField ("_usuario" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")))); - BA.debugLineNum = 260;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery(\"select cou"; -Debug.ShouldStop(8); -__ref.getField(false,"_e" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select count(*) as CUANTOS FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) and CAT_DP_TIPO = 0 ")))); - BA.debugLineNum = 262;BA.debugLine="e.Position =0"; -Debug.ShouldStop(32); -__ref.getField(false,"_e" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 263;BA.debugLine="If e.GetString(\"CUANTOS\") > 0 Then"; -Debug.ShouldStop(64); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_e" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 264;BA.debugLine="F=B4XPages.MainPage.skmt.ExecQuery(\"select CA"; -Debug.ShouldStop(128); -__ref.getField(false,"_f" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_DP_IDPROD, CAT_DP_PZAS,CAT_DP_PRECIO FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) and CAT_DP_TIPO = 0 ")))); - BA.debugLineNum = 267;BA.debugLine="If f.RowCount>0 Then"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 268;BA.debugLine="For i=0 To f.RowCount -1"; -Debug.ShouldStop(2048); -{ -final int step67 = 1; -final int limit67 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step67 > 0 && _i <= limit67) || (step67 < 0 && _i >= limit67) ;_i = ((int)(0 + _i + step67)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 269;BA.debugLine="f.Position=i"; -Debug.ShouldStop(4096); -__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 270;BA.debugLine="precio_Cero = f.GetString(\"CAT_DP_PRECIO\")"; -Debug.ShouldStop(8192); -__ref.setField ("_precio_cero" /*RemoteObject*/ ,__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PRECIO")))); - BA.debugLineNum = 271;BA.debugLine="h=B4XPages.MainPage.skmt.ExecQuery2(\"select"; -Debug.ShouldStop(16384); -__ref.getField(false,"_h" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select CAT_GP_NOMBRE from CAT_GUNAPROD where CAT_GP_ID = ? ")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_IDPROD")))})))); - BA.debugLineNum = 272;BA.debugLine="h.Position=0"; -Debug.ShouldStop(32768); -__ref.getField(false,"_h" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 274;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSER"; -Debug.ShouldStop(131072); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA) VALUES(?,?,?,?,?,?,?,?,?,?) ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {10},new Object[] {(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText")),(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(true,"_precio_cero" /*RemoteObject*/ )),BA.numberCast(double.class, __ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PZAS")))),BA.numberCast(double.class, __ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText"))}, "**",0, 0)),(__ref.getField(true,"_precio_cero" /*RemoteObject*/ )),(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PZAS")))),BA.numberCast(double.class, __ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText"))}, "*",0, 0)),(__ref.getField(false,"_h" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_NOMBRE")))),(__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_IDPROD")))),(__ref.getField(true,"_clie_id" /*RemoteObject*/ )),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(__ref.getField(true,"_cl_ruta" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 275;BA.debugLine="h.Close"; -Debug.ShouldStop(262144); -__ref.getField(false,"_h" /*RemoteObject*/ ).runVoidMethod ("Close"); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 278;BA.debugLine="f.Close"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_f" /*RemoteObject*/ ).runVoidMethod ("Close"); - }; - BA.debugLineNum = 280;BA.debugLine="e.Close"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_e" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 281;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT I"; -Debug.ShouldStop(16777216); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?) ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {11},new Object[] {(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText")),RemoteObject.createImmutable((0)),RemoteObject.createImmutable((0)),(__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_desc" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(true,"_clie_id" /*RemoteObject*/ )),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(__ref.getField(true,"_cl_ruta" /*RemoteObject*/ )),(c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_tipo_venta" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 282;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update c"; -Debug.ShouldStop(33554432); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText"))}))))); - }else { - BA.debugLineNum = 284;BA.debugLine="Msgbox(\"Tiene \" & TOT_ART_PROMO & \" \" & TOT_AR"; -Debug.ShouldStop(134217728); -c_pedidos.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("Tiene "),__ref.getField(true,"_tot_art_promo" /*RemoteObject*/ ),RemoteObject.createImmutable(" "),__ref.getField(true,"_tot_art_promor" /*RemoteObject*/ ),RemoteObject.createImmutable(" y necesita "),__ref.getField(true,"_promo_c" /*RemoteObject*/ ),RemoteObject.createImmutable(" "),__ref.getField(true,"_promo_cr" /*RemoteObject*/ ),RemoteObject.createImmutable(" Para la Promo. ")))),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("ADVERTENCIA"))),__ref.getField(false, "ba")); - }; - }; - BA.debugLineNum = 287;BA.debugLine="cantidad.Text = \"\""; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("")); - BA.debugLineNum = 288;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; -Debug.ShouldStop(-2147483648); -c_pedidos._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Productos"))); - }else -{ BA.debugLineNum = 289;BA.debugLine="else If l_marca.text = \"PROMOS\" And l_tipo.Text ="; -Debug.ShouldStop(1); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_l_marca" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("PROMOS")) && RemoteObject.solveBoolean("=",__ref.getField(false,"_l_tipo" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("PROMOS")) && RemoteObject.solveBoolean("=",__ref.getField(true,"_promo_c" /*RemoteObject*/ ),BA.NumberToString(0))) { - BA.debugLineNum = 290;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(2); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from PROIDID"))); - BA.debugLineNum = 291;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -Debug.ShouldStop(4); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO PROIDID VALUES (?)")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText"))}))))); - BA.debugLineNum = 292;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; -Debug.ShouldStop(8); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select CUENTA from cuentaa")))); - BA.debugLineNum = 293;BA.debugLine="c.Position=0"; -Debug.ShouldStop(16); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 294;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -Debug.ShouldStop(32); -__ref.setField ("_clie_id" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUENTA")))); - BA.debugLineNum = 295;BA.debugLine="c.Close"; -Debug.ShouldStop(64); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 296;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; -Debug.ShouldStop(128); -c_pedidos.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("MM/dd/yyyy")); - BA.debugLineNum = 297;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(256); -__ref.setField ("_sdate" /*RemoteObject*/ ,c_pedidos.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(c_pedidos.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 298;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -Debug.ShouldStop(512); -__ref.setField ("_stime" /*RemoteObject*/ ,c_pedidos.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_pedidos.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 299;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_C"; -Debug.ShouldStop(1024); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_CL_RUTA from kmt_info where CAT_CL_CODIGO In (Select cuenta from cuentaa)")))); - BA.debugLineNum = 300;BA.debugLine="c.Position=0"; -Debug.ShouldStop(2048); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 301;BA.debugLine="cl_ruta = c.GetString(\"CAT_CL_RUTA\")"; -Debug.ShouldStop(4096); -__ref.setField ("_cl_ruta" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_RUTA")))); - BA.debugLineNum = 302;BA.debugLine="c.Close"; -Debug.ShouldStop(8192); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 303;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; -Debug.ShouldStop(16384); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select USUARIO from usuarioa")))); - BA.debugLineNum = 304;BA.debugLine="c.Position=0"; -Debug.ShouldStop(32768); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 305;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(65536); -__ref.setField ("_usuario" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")))); - BA.debugLineNum = 308;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery(\"select count"; -Debug.ShouldStop(524288); -__ref.getField(false,"_e" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select count(*) as CUANTOS FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) ")))); - BA.debugLineNum = 309;BA.debugLine="e.Position =0"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_e" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 310;BA.debugLine="If e.GetString(\"CUANTOS\") > 0 Then"; -Debug.ShouldStop(2097152); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_e" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 311;BA.debugLine="F=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_f" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_DP_IDPROD, CAT_DP_PZAS, CAT_DP_PRECIO FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID)")))); - BA.debugLineNum = 312;BA.debugLine="For i =0 To f.RowCount -1"; -Debug.ShouldStop(8388608); -{ -final int step108 = 1; -final int limit108 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step108 > 0 && _i <= limit108) || (step108 < 0 && _i >= limit108) ;_i = ((int)(0 + _i + step108)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 313;BA.debugLine="F.Position =i"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 314;BA.debugLine="h=B4XPages.MainPage.skmt.ExecQuery2(\"select CA"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_h" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select CAT_GP_NOMBRE from CAT_GUNAPROD where CAT_GP_ID = ? ")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_IDPROD")))})))); - BA.debugLineNum = 315;BA.debugLine="h.Position=0"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_h" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 316;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT I"; -Debug.ShouldStop(134217728); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?) ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {11},new Object[] {(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText")),(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PRECIO")))),BA.numberCast(double.class, __ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),BA.numberCast(double.class, __ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PZAS"))))}, "**",0, 0)),(__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PRECIO")))),(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PZAS")))),BA.numberCast(double.class, __ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText"))}, "*",0, 0)),(__ref.getField(false,"_h" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_NOMBRE")))),(__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_IDPROD")))),(__ref.getField(true,"_clie_id" /*RemoteObject*/ )),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(__ref.getField(true,"_cl_ruta" /*RemoteObject*/ )),(c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_tipo_venta" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 317;BA.debugLine="h.Close"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_h" /*RemoteObject*/ ).runVoidMethod ("Close"); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 319;BA.debugLine="f.Close"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_f" /*RemoteObject*/ ).runVoidMethod ("Close"); - }; - BA.debugLineNum = 321;BA.debugLine="e.Close"; -Debug.ShouldStop(1); -__ref.getField(false,"_e" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 323;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -Debug.ShouldStop(4); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?) ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {11},new Object[] {(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText")),RemoteObject.createImmutable((0)),RemoteObject.createImmutable((0)),(__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_desc" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(true,"_clie_id" /*RemoteObject*/ )),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(__ref.getField(true,"_cl_ruta" /*RemoteObject*/ )),(c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_tipo_venta" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 324;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat"; -Debug.ShouldStop(8); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText"))}))))); - BA.debugLineNum = 325;BA.debugLine="cantidad.Text = \"\""; -Debug.ShouldStop(16); -__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("")); - BA.debugLineNum = 326;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(p"; -Debug.ShouldStop(32); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, SUM(PE_COSTO_SIN) AS TOTAL_CLIE_SIN FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)")))); - BA.debugLineNum = 327;BA.debugLine="c.Position=0"; -Debug.ShouldStop(64); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 328;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(128); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"))); - BA.debugLineNum = 329;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert int"; -Debug.ShouldStop(256); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT,PC_ALMACEN,PC_RUTA,PC_COSTO_SIN) VALUES (?,?,?,?,?,?,?,?,?,?)")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {10},new Object[] {(__ref.getField(true,"_clie_id" /*RemoteObject*/ )),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CANT_CLIE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_CLIE")))),(c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lon_gps" /*RemoteObject*/ )),(c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ )),(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(__ref.getField(true,"_cl_ruta" /*RemoteObject*/ )),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_CLIE_SIN"))))}))))); - BA.debugLineNum = 330;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_"; -Debug.ShouldStop(512); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("UPDATE kmt_info set gestion = 2 where CAT_CL_CODIGO In (select cuenta from cuentaa)"))); - BA.debugLineNum = 331;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; -Debug.ShouldStop(1024); -c_pedidos._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Productos"))); - }else { - BA.debugLineNum = 333;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; -Debug.ShouldStop(4096); -c_pedidos.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("MM/dd/yyyy")); - BA.debugLineNum = 334;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(8192); -__ref.setField ("_sdate" /*RemoteObject*/ ,c_pedidos.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(c_pedidos.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 335;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -Debug.ShouldStop(16384); -__ref.setField ("_stime" /*RemoteObject*/ ,c_pedidos.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_pedidos.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 336;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; -Debug.ShouldStop(32768); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select CUENTA from cuentaa")))); - BA.debugLineNum = 337;BA.debugLine="c.Position=0"; -Debug.ShouldStop(65536); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 338;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -Debug.ShouldStop(131072); -__ref.setField ("_clie_id" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUENTA")))); - BA.debugLineNum = 339;BA.debugLine="c.Close"; -Debug.ShouldStop(262144); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 340;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_C"; -Debug.ShouldStop(524288); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_CL_RUTA from kmt_info where CAT_CL_CODIGO In (Select cuenta from cuentaa)")))); - BA.debugLineNum = 341;BA.debugLine="c.Position=0"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 342;BA.debugLine="cl_ruta = c.GetString(\"CAT_CL_RUTA\")"; -Debug.ShouldStop(2097152); -__ref.setField ("_cl_ruta" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_RUTA")))); - BA.debugLineNum = 343;BA.debugLine="c.Close"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 344;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select USUARIO from usuarioa")))); - BA.debugLineNum = 345;BA.debugLine="c.Position=0"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 346;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(33554432); -__ref.setField ("_usuario" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")))); - BA.debugLineNum = 347;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -Debug.ShouldStop(67108864); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_COSTO_SIN, PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?,?) ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {12},new Object[] {(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),BA.numberCast(double.class, __ref.getField(false,"_l_precio" /*RemoteObject*/ ).runMethod(true,"getText"))}, "*",0, 0)),(__ref.getField(false,"_l_precio" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_desc" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(true,"_clie_id" /*RemoteObject*/ )),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(__ref.getField(true,"_cl_ruta" /*RemoteObject*/ )),(__ref.getField(true,"_preciosin" /*RemoteObject*/ )),(c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_tipo_venta" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 348;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat"; -Debug.ShouldStop(134217728); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText"))}))))); - BA.debugLineNum = 349;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(p"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, SUM(PE_COSTO_SIN) AS TOTAL_CLIE_SIN FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)")))); - BA.debugLineNum = 350;BA.debugLine="c.Position=0"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 351;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(1073741824); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"))); - BA.debugLineNum = 352;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert int"; -Debug.ShouldStop(-2147483648); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT,PC_ALMACEN,PC_RUTA,PC_COSTO_SIN) VALUES (?,?,?,?,?,?,?,?,?,?)")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {10},new Object[] {(__ref.getField(true,"_clie_id" /*RemoteObject*/ )),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CANT_CLIE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_CLIE")))),(c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lon_gps" /*RemoteObject*/ )),(c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ )),(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(__ref.getField(true,"_cl_ruta" /*RemoteObject*/ )),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_CLIE_SIN"))))}))))); - BA.debugLineNum = 353;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_"; -Debug.ShouldStop(1); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("UPDATE kmt_info set gestion = 2 where CAT_CL_CODIGO In (select cuenta from cuentaa)"))); - BA.debugLineNum = 354;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -Debug.ShouldStop(2); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO INVENT_X_ENVIAR (ALMACEN , PROID , CANTIDAD ) VALUES(?,?,?) ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {3},new Object[] {(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText"))}))))); - BA.debugLineNum = 355;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; -Debug.ShouldStop(4); -c_pedidos._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Productos"))); - }}}} -; - BA.debugLineNum = 357;BA.debugLine="End Sub"; -Debug.ShouldStop(16); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _i_fotol_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("i_fotol_Click (c_pedidos) ","c_pedidos",16,__ref.getField(false, "ba"),__ref,543); -if (RapidSub.canDelegate("i_fotol_click")) { return __ref.runUserSub(false, "c_pedidos","i_fotol_click", __ref);} - BA.debugLineNum = 543;BA.debugLine="Sub i_fotol_Click"; -Debug.ShouldStop(1073741824); - BA.debugLineNum = 544;BA.debugLine="i_fotol.Visible = False"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_i_fotol" /*RemoteObject*/ ).runMethod(true,"setVisible",c_pedidos.__c.getField(true,"False")); - BA.debugLineNum = 546;BA.debugLine="End Sub"; -Debug.ShouldStop(2); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _img_prod_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("img_prod_Click (c_pedidos) ","c_pedidos",16,__ref.getField(false, "ba"),__ref,538); -if (RapidSub.canDelegate("img_prod_click")) { return __ref.runUserSub(false, "c_pedidos","img_prod_click", __ref);} - BA.debugLineNum = 538;BA.debugLine="Sub img_prod_Click"; -Debug.ShouldStop(33554432); - BA.debugLineNum = 539;BA.debugLine="i_fotol.Visible = True"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_i_fotol" /*RemoteObject*/ ).runMethod(true,"setVisible",c_pedidos.__c.getField(true,"True")); - BA.debugLineNum = 540;BA.debugLine="i_fotol.Bitmap = LoadBitmap(ruta,\"1.jpg\")"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_i_fotol" /*RemoteObject*/ ).runMethod(false,"setBitmap",(c_pedidos.__c.runMethod(false,"LoadBitmap",(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(RemoteObject.createImmutable("1.jpg"))).getObject())); - BA.debugLineNum = 542;BA.debugLine="End Sub"; -Debug.ShouldStop(536870912); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (c_pedidos) ","c_pedidos",16,__ref.getField(false, "ba"),__ref,59); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "c_pedidos","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 59;BA.debugLine="Public Sub Initialize As Object"; -Debug.ShouldStop(67108864); - BA.debugLineNum = 60;BA.debugLine="Return Me"; -Debug.ShouldStop(134217728); -if (true) return __ref; - BA.debugLineNum = 61;BA.debugLine="End Sub"; -Debug.ShouldStop(268435456); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _nopromo_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("nopromo_Click (c_pedidos) ","c_pedidos",16,__ref.getField(false, "ba"),__ref,554); -if (RapidSub.canDelegate("nopromo_click")) { return __ref.runUserSub(false, "c_pedidos","nopromo_click", __ref);} - BA.debugLineNum = 554;BA.debugLine="Sub nopromo_Click"; -Debug.ShouldStop(512); - BA.debugLineNum = 555;BA.debugLine="If cantidad.Text = \"\" Then"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString(""))) { - BA.debugLineNum = 556;BA.debugLine="Msgbox(\"Cantidad no puede ser 0\",\"Cantidad\") 'ig"; -Debug.ShouldStop(2048); -c_pedidos.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("Cantidad no puede ser 0")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("Cantidad"))),__ref.getField(false, "ba")); - }else -{ BA.debugLineNum = 557;BA.debugLine="Else If cantidad.Text > l_bodega.Text Then"; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),BA.numberCast(double.class, __ref.getField(false,"_l_bodega" /*RemoteObject*/ ).runMethod(true,"getText")))) { - BA.debugLineNum = 558;BA.debugLine="Msgbox(\"Exede la existencia\", \"ADVERTENCIA\") 'ig"; -Debug.ShouldStop(8192); -c_pedidos.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("Exede la existencia")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("ADVERTENCIA"))),__ref.getField(false, "ba")); - }else { - BA.debugLineNum = 560;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; -Debug.ShouldStop(32768); -c_pedidos.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("MM/dd/yyyy")); - BA.debugLineNum = 561;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(65536); -__ref.setField ("_sdate" /*RemoteObject*/ ,c_pedidos.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(c_pedidos.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 562;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -Debug.ShouldStop(131072); -__ref.setField ("_stime" /*RemoteObject*/ ,c_pedidos.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_pedidos.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 563;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; -Debug.ShouldStop(262144); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select CUENTA from cuentaa")))); - BA.debugLineNum = 564;BA.debugLine="c.Position=0"; -Debug.ShouldStop(524288); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 565;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -Debug.ShouldStop(1048576); -__ref.setField ("_clie_id" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUENTA")))); - BA.debugLineNum = 566;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select USUARIO from usuarioa")))); - BA.debugLineNum = 567;BA.debugLine="c.Position=0"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 568;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(8388608); -__ref.setField ("_usuario" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")))); - BA.debugLineNum = 569;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -Debug.ShouldStop(16777216); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?) ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {10},new Object[] {RemoteObject.createImmutable(("COACALCO")),RemoteObject.createImmutable((0)),RemoteObject.createImmutable((0)),(__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_desc" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(true,"_clie_id" /*RemoteObject*/ )),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_tipo_venta" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 570;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat"; -Debug.ShouldStop(33554432); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText"))}))))); - BA.debugLineNum = 571;BA.debugLine="cantidad.Text = \"\""; -Debug.ShouldStop(67108864); -__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("")); - BA.debugLineNum = 572;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; -Debug.ShouldStop(134217728); -c_pedidos._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Productos"))); - }} -; - BA.debugLineNum = 574;BA.debugLine="End Sub"; -Debug.ShouldStop(536870912); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _p_pedido_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("p_pedido_Click (c_pedidos) ","c_pedidos",16,__ref.getField(false, "ba"),__ref,576); -if (RapidSub.canDelegate("p_pedido_click")) { return __ref.runUserSub(false, "c_pedidos","p_pedido_click", __ref);} - BA.debugLineNum = 576;BA.debugLine="Private Sub p_pedido_Click"; -Debug.ShouldStop(-2147483648); - BA.debugLineNum = 578;BA.debugLine="End Sub"; -Debug.ShouldStop(2); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _terminar_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Terminar_Click (c_pedidos) ","c_pedidos",16,__ref.getField(false, "ba"),__ref,364); -if (RapidSub.canDelegate("terminar_click")) { return __ref.runUserSub(false, "c_pedidos","terminar_click", __ref);} -int _i = 0; - BA.debugLineNum = 364;BA.debugLine="Sub Terminar_Click"; -Debug.ShouldStop(2048); - BA.debugLineNum = 365;BA.debugLine="If cantidad.Text = \"\" Then"; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString(""))) { - BA.debugLineNum = 366;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; -Debug.ShouldStop(8192); -c_pedidos._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Cliente"))); - }else -{ BA.debugLineNum = 367;BA.debugLine="ELSE If cantidad.Text > l_bodega.Text Then"; -Debug.ShouldStop(16384); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),BA.numberCast(double.class, __ref.getField(false,"_l_bodega" /*RemoteObject*/ ).runMethod(true,"getText")))) { - BA.debugLineNum = 368;BA.debugLine="Msgbox(\"Exede la existencia\", \"ADVERTENCIA\") 'ig"; -Debug.ShouldStop(32768); -c_pedidos.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("Exede la existencia")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("ADVERTENCIA"))),__ref.getField(false, "ba")); - }else -{ BA.debugLineNum = 369;BA.debugLine="Else If l_marca.text = \"PROMOS\" And l_tipo.Text ="; -Debug.ShouldStop(65536); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_l_marca" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("PROMOS")) && RemoteObject.solveBoolean("=",__ref.getField(false,"_l_tipo" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("PROMOS")) && RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(true,"_promo_c" /*RemoteObject*/ )),BA.numberCast(double.class, 0)) && RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 370;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(131072); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from PROIDID"))); - BA.debugLineNum = 371;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -Debug.ShouldStop(262144); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO PROIDID VALUES (?)")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText"))}))))); - BA.debugLineNum = 372;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select count"; -Debug.ShouldStop(524288); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select count(*) as CUANTOSD from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND CAT_DP_TIPO = 1)")))); - BA.debugLineNum = 373;BA.debugLine="c.Position =0"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 374;BA.debugLine="If c.GetString(\"CUANTOSD\") = 0 Then"; -Debug.ShouldStop(2097152); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOSD"))),BA.NumberToString(0))) { - BA.debugLineNum = 375;BA.debugLine="Msgbox(\"No tiene venta el cliente para la promo"; -Debug.ShouldStop(4194304); -c_pedidos.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("No tiene venta el cliente para la promo")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("ADVERTENCIA"))),__ref.getField(false, "ba")); - }else { - BA.debugLineNum = 377;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select sum("; -Debug.ShouldStop(16777216); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select sum(pe_cant) As TOT_ART_PROMO, sum(PE_COSTO_TOT) as COSTO_TOT from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND CAT_DP_PRECIO > 1)")))); - BA.debugLineNum = 378;BA.debugLine="C.Position =0"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 379;BA.debugLine="TOT_ART_PROMO = C.GetString(\"TOT_ART_PROMO\")"; -Debug.ShouldStop(67108864); -__ref.setField ("_tot_art_promo" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOT_ART_PROMO")))); - BA.debugLineNum = 380;BA.debugLine="COSTO_TOT = C.GetString(\"COSTO_TOT\")"; -Debug.ShouldStop(134217728); -__ref.setField ("_costo_tot" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("COSTO_TOT")))); - BA.debugLineNum = 381;BA.debugLine="C.Close"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 382;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select coun"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select count(*) as CUANTOSD from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND (CAT_DP_PRECIO = 0.01 or CAT_DP_PRECIO = 1 OR CAT_DP_PRECIO = 0) AND CAT_DP_TIPO = 1)")))); - BA.debugLineNum = 383;BA.debugLine="c.Position =0"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 384;BA.debugLine="If c.GetString(\"CUANTOSD\") = 0 Then"; -Debug.ShouldStop(-2147483648); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOSD"))),BA.NumberToString(0))) { - BA.debugLineNum = 385;BA.debugLine="TOT_ART_PROMOR = \"0\" 'Msgbox(\"No tiene venta e"; -Debug.ShouldStop(1); -__ref.setField ("_tot_art_promor" /*RemoteObject*/ ,BA.ObjectToString("0")); - }else { - BA.debugLineNum = 387;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select sum"; -Debug.ShouldStop(4); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select sum(pe_cant) As TOT_ART_PROMO, sum(PE_COSTO_TOT) as COSTO_TOT from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND (CAT_DP_PRECIO = 0.01 or CAT_DP_PRECIO = 1 OR CAT_DP_PRECIO = 0) AND CAT_DP_TIPO = 1)")))); - BA.debugLineNum = 388;BA.debugLine="C.Position =0"; -Debug.ShouldStop(8); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 389;BA.debugLine="TOT_ART_PROMOR = C.GetString(\"TOT_ART_PROMO\")"; -Debug.ShouldStop(16); -__ref.setField ("_tot_art_promor" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOT_ART_PROMO")))); - }; - BA.debugLineNum = 391;BA.debugLine="C.Close"; -Debug.ShouldStop(64); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 392;BA.debugLine="PROMO_C = PROMO_C * cantidad.Text"; -Debug.ShouldStop(128); -__ref.setField ("_promo_c" /*RemoteObject*/ ,BA.NumberToString(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(true,"_promo_c" /*RemoteObject*/ )),BA.numberCast(double.class, __ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText"))}, "*",0, 0))); - BA.debugLineNum = 393;BA.debugLine="PROMO_CR = PROMO_CR * cantidad.Text"; -Debug.ShouldStop(256); -__ref.setField ("_promo_cr" /*RemoteObject*/ ,BA.NumberToString(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(true,"_promo_cr" /*RemoteObject*/ )),BA.numberCast(double.class, __ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText"))}, "*",0, 0))); - BA.debugLineNum = 394;BA.debugLine="If TOT_ART_PROMO = PROMO_C And TOT_ART_PROMOR"; -Debug.ShouldStop(512); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_tot_art_promo" /*RemoteObject*/ ),__ref.getField(true,"_promo_c" /*RemoteObject*/ )) && RemoteObject.solveBoolean("=",__ref.getField(true,"_tot_art_promor" /*RemoteObject*/ ),__ref.getField(true,"_promo_cr" /*RemoteObject*/ ))) { - BA.debugLineNum = 398;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE P"; -Debug.ShouldStop(8192); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE PEDIDO SET PE_CEDIS = (?) WHERE PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID))")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText"))}))))); - BA.debugLineNum = 399;BA.debugLine="D=B4XPages.MainPage.skmt.ExecQuery(\"select CAT"; -Debug.ShouldStop(16384); -__ref.getField(false,"_d" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_DP_ID, CAT_DP_PRECIO, CAT_DP_PRECIO_SIMPTOS, CAT_DP_IDPROD FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) AND CAT_DP_PRECIO > 1")))); - BA.debugLineNum = 400;BA.debugLine="If D.RowCount>0 Then"; -Debug.ShouldStop(32768); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 401;BA.debugLine="For i=0 To D.RowCount -1"; -Debug.ShouldStop(65536); -{ -final int step34 = 1; -final int limit34 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step34 > 0 && _i <= limit34) || (step34 < 0 && _i >= limit34) ;_i = ((int)(0 + _i + step34)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 402;BA.debugLine="D.Position=i"; -Debug.ShouldStop(131072); -__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 403;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE"; -Debug.ShouldStop(262144); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE PEDIDO SET PE_COSTOU = (?), PE_COSTO_TOT = PE_CANT * (?) , PE_COSTO_SIN = (?) WHERE PE_PROID = (?) And PE_CEDIS In (Select PROIDID from PROIDID) AND PE_CLIENTE IN (Select CUENTA from cuentaa) ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {4},new Object[] {(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PRECIO")))),(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PRECIO")))),(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PRECIO_SIMPTOS")))),(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_IDPROD"))))}))))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 406;BA.debugLine="D.Close"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_d" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 407;BA.debugLine="D=B4XPages.MainPage.skmt.ExecQuery(\"select CAT"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_d" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_DP_ID, CAT_DP_PRECIO, CAT_DP_PRECIO_SIMPTOS, CAT_DP_IDPROD FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) AND (CAT_DP_PRECIO = 0.01 or CAT_DP_PRECIO = 1 OR CAT_DP_PRECIO = 0) AND CAT_DP_TIPO = 1")))); - BA.debugLineNum = 408;BA.debugLine="If D.RowCount>0 Then"; -Debug.ShouldStop(8388608); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 409;BA.debugLine="For i=0 To D.RowCount -1"; -Debug.ShouldStop(16777216); -{ -final int step42 = 1; -final int limit42 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step42 > 0 && _i <= limit42) || (step42 < 0 && _i >= limit42) ;_i = ((int)(0 + _i + step42)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 410;BA.debugLine="D.Position=i"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 411;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE"; -Debug.ShouldStop(67108864); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE PEDIDO SET PE_COSTOU = (?), PE_COSTO_TOT = PE_CANT * (?) , PE_COSTO_SIN = (?) WHERE PE_PROID = (?) And PE_CEDIS In (Select PROIDID from PROIDID) AND PE_CLIENTE IN (Select CUENTA from cuentaa) ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {4},new Object[] {(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PRECIO")))),(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PRECIO")))),(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PRECIO_SIMPTOS")))),(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_IDPROD"))))}))))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 414;BA.debugLine="D.Close"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_d" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 415;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; -Debug.ShouldStop(1073741824); -c_pedidos.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("MM/dd/yyyy")); - BA.debugLineNum = 416;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(-2147483648); -__ref.setField ("_sdate" /*RemoteObject*/ ,c_pedidos.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(c_pedidos.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 417;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -Debug.ShouldStop(1); -__ref.setField ("_stime" /*RemoteObject*/ ,c_pedidos.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_pedidos.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 418;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUE"; -Debug.ShouldStop(2); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select CUENTA from cuentaa")))); - BA.debugLineNum = 419;BA.debugLine="c.Position=0"; -Debug.ShouldStop(4); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 420;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -Debug.ShouldStop(8); -__ref.setField ("_clie_id" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUENTA")))); - BA.debugLineNum = 421;BA.debugLine="c.Close"; -Debug.ShouldStop(16); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 422;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT"; -Debug.ShouldStop(32); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_CL_RUTA from kmt_info where CAT_CL_CODIGO In (Select cuenta from cuentaa)")))); - BA.debugLineNum = 423;BA.debugLine="c.Position=0"; -Debug.ShouldStop(64); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 424;BA.debugLine="cl_ruta = c.GetString(\"CAT_CL_RUTA\")"; -Debug.ShouldStop(128); -__ref.setField ("_cl_ruta" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_RUTA")))); - BA.debugLineNum = 425;BA.debugLine="c.Close"; -Debug.ShouldStop(256); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 426;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USU"; -Debug.ShouldStop(512); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select USUARIO from usuarioa")))); - BA.debugLineNum = 427;BA.debugLine="c.Position=0"; -Debug.ShouldStop(1024); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 428;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(2048); -__ref.setField ("_usuario" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")))); - BA.debugLineNum = 430;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery(\"select cou"; -Debug.ShouldStop(8192); -__ref.getField(false,"_e" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select count(*) as CUANTOS FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) and CAT_DP_TIPO = 0 ")))); - BA.debugLineNum = 432;BA.debugLine="e.Position =0"; -Debug.ShouldStop(32768); -__ref.getField(false,"_e" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 433;BA.debugLine="If e.GetString(\"CUANTOS\") > 0 Then"; -Debug.ShouldStop(65536); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_e" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 434;BA.debugLine="F=B4XPages.MainPage.skmt.ExecQuery(\"select CA"; -Debug.ShouldStop(131072); -__ref.getField(false,"_f" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_DP_IDPROD, CAT_DP_PZAS,CAT_DP_PRECIO FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) and CAT_DP_TIPO = 0 ")))); - BA.debugLineNum = 437;BA.debugLine="If f.RowCount>0 Then"; -Debug.ShouldStop(1048576); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 438;BA.debugLine="For i=0 To f.RowCount -1"; -Debug.ShouldStop(2097152); -{ -final int step67 = 1; -final int limit67 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step67 > 0 && _i <= limit67) || (step67 < 0 && _i >= limit67) ;_i = ((int)(0 + _i + step67)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 439;BA.debugLine="f.Position=i"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 440;BA.debugLine="precio_Cero = f.GetString(\"CAT_DP_PRECIO\")"; -Debug.ShouldStop(8388608); -__ref.setField ("_precio_cero" /*RemoteObject*/ ,__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PRECIO")))); - BA.debugLineNum = 441;BA.debugLine="h=B4XPages.MainPage.skmt.ExecQuery2(\"select"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_h" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select CAT_GP_NOMBRE from CAT_GUNAPROD where CAT_GP_ID = ? ")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_IDPROD")))})))); - BA.debugLineNum = 442;BA.debugLine="h.Position=0"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_h" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 443;BA.debugLine="Log(111)"; -Debug.ShouldStop(67108864); -c_pedidos.__c.runVoidMethod ("LogImpl","322741071",BA.NumberToString(111),0); - BA.debugLineNum = 444;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSER"; -Debug.ShouldStop(134217728); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?) ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {11},new Object[] {(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText")),(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(true,"_precio_cero" /*RemoteObject*/ )),BA.numberCast(double.class, __ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PZAS")))),BA.numberCast(double.class, __ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText"))}, "**",0, 0)),(__ref.getField(true,"_precio_cero" /*RemoteObject*/ )),(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PZAS")))),BA.numberCast(double.class, __ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText"))}, "*",0, 0)),(__ref.getField(false,"_h" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_NOMBRE")))),(__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_IDPROD")))),(__ref.getField(true,"_clie_id" /*RemoteObject*/ )),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(__ref.getField(true,"_cl_ruta" /*RemoteObject*/ )),(c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_tipo_venta" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 445;BA.debugLine="h.Close"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_h" /*RemoteObject*/ ).runVoidMethod ("Close"); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 448;BA.debugLine="f.Close"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_f" /*RemoteObject*/ ).runVoidMethod ("Close"); - }; - BA.debugLineNum = 450;BA.debugLine="e.Close"; -Debug.ShouldStop(2); -__ref.getField(false,"_e" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 451;BA.debugLine="Log(222)"; -Debug.ShouldStop(4); -c_pedidos.__c.runVoidMethod ("LogImpl","322741079",BA.NumberToString(222),0); - BA.debugLineNum = 452;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT I"; -Debug.ShouldStop(8); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?) ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {11},new Object[] {(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText")),RemoteObject.createImmutable((0)),RemoteObject.createImmutable((0)),(__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_desc" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(true,"_clie_id" /*RemoteObject*/ )),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(__ref.getField(true,"_cl_ruta" /*RemoteObject*/ )),(c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_tipo_venta" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 453;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update c"; -Debug.ShouldStop(16); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText"))}))))); - }else { - BA.debugLineNum = 455;BA.debugLine="Msgbox(\"Tiene \" & TOT_ART_PROMO & \" \" & TOT_AR"; -Debug.ShouldStop(64); -c_pedidos.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("Tiene "),__ref.getField(true,"_tot_art_promo" /*RemoteObject*/ ),RemoteObject.createImmutable(" "),__ref.getField(true,"_tot_art_promor" /*RemoteObject*/ ),RemoteObject.createImmutable(" y necesita "),__ref.getField(true,"_promo_c" /*RemoteObject*/ ),RemoteObject.createImmutable(" "),__ref.getField(true,"_promo_cr" /*RemoteObject*/ ),RemoteObject.createImmutable(" Para la Promo. ")))),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("ADVERTENCIA"))),__ref.getField(false, "ba")); - }; - }; - BA.debugLineNum = 458;BA.debugLine="cantidad.Text = \"\""; -Debug.ShouldStop(512); -__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("")); - BA.debugLineNum = 459;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; -Debug.ShouldStop(1024); -c_pedidos._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Cliente"))); - }else -{ BA.debugLineNum = 460;BA.debugLine="else If l_marca.text = \"PROMOS\" And l_tipo.Text ="; -Debug.ShouldStop(2048); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_l_marca" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("PROMOS")) && RemoteObject.solveBoolean("=",__ref.getField(false,"_l_tipo" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("PROMOS")) && RemoteObject.solveBoolean("=",__ref.getField(true,"_promo_c" /*RemoteObject*/ ),BA.NumberToString(0))) { - BA.debugLineNum = 461;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(4096); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from PROIDID"))); - BA.debugLineNum = 462;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -Debug.ShouldStop(8192); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO PROIDID VALUES (?)")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText"))}))))); - BA.debugLineNum = 463;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; -Debug.ShouldStop(16384); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select CUENTA from cuentaa")))); - BA.debugLineNum = 464;BA.debugLine="c.Position=0"; -Debug.ShouldStop(32768); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 465;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -Debug.ShouldStop(65536); -__ref.setField ("_clie_id" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUENTA")))); - BA.debugLineNum = 466;BA.debugLine="c.Close"; -Debug.ShouldStop(131072); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 467;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; -Debug.ShouldStop(262144); -c_pedidos.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("MM/dd/yyyy")); - BA.debugLineNum = 468;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(524288); -__ref.setField ("_sdate" /*RemoteObject*/ ,c_pedidos.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(c_pedidos.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 469;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -Debug.ShouldStop(1048576); -__ref.setField ("_stime" /*RemoteObject*/ ,c_pedidos.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_pedidos.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 470;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_C"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_CL_RUTA from kmt_info where CAT_CL_CODIGO In (Select cuenta from cuentaa)")))); - BA.debugLineNum = 471;BA.debugLine="c.Position=0"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 472;BA.debugLine="cl_ruta = c.GetString(\"CAT_CL_RUTA\")"; -Debug.ShouldStop(8388608); -__ref.setField ("_cl_ruta" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_RUTA")))); - BA.debugLineNum = 473;BA.debugLine="c.Close"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 474;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select USUARIO from usuarioa")))); - BA.debugLineNum = 475;BA.debugLine="c.Position=0"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 476;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(134217728); -__ref.setField ("_usuario" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")))); - BA.debugLineNum = 478;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery(\"select count"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_e" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select count(*) as CUANTOS FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) ")))); - BA.debugLineNum = 479;BA.debugLine="e.Position =0"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_e" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 480;BA.debugLine="If e.GetString(\"CUANTOS\") > 0 Then"; -Debug.ShouldStop(-2147483648); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_e" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 481;BA.debugLine="F=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_"; -Debug.ShouldStop(1); -__ref.getField(false,"_f" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_DP_IDPROD, CAT_DP_PZAS, CAT_DP_PRECIO FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID)")))); - BA.debugLineNum = 482;BA.debugLine="For i =0 To f.RowCount -1"; -Debug.ShouldStop(2); -{ -final int step110 = 1; -final int limit110 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step110 > 0 && _i <= limit110) || (step110 < 0 && _i >= limit110) ;_i = ((int)(0 + _i + step110)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 483;BA.debugLine="F.Position =i"; -Debug.ShouldStop(4); -__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 484;BA.debugLine="h=B4XPages.MainPage.skmt.ExecQuery2(\"select CA"; -Debug.ShouldStop(8); -__ref.getField(false,"_h" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select CAT_GP_NOMBRE from CAT_GUNAPROD where CAT_GP_ID = ? ")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_IDPROD")))})))); - BA.debugLineNum = 485;BA.debugLine="h.Position=0"; -Debug.ShouldStop(16); -__ref.getField(false,"_h" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 486;BA.debugLine="Log(333)"; -Debug.ShouldStop(32); -c_pedidos.__c.runVoidMethod ("LogImpl","322741114",BA.NumberToString(333),0); - BA.debugLineNum = 487;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT I"; -Debug.ShouldStop(64); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?) ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {11},new Object[] {(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText")),(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PRECIO")))),BA.numberCast(double.class, __ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),BA.numberCast(double.class, __ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PZAS"))))}, "**",0, 0)),(__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PRECIO")))),(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PZAS")))),BA.numberCast(double.class, __ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText"))}, "*",0, 0)),(__ref.getField(false,"_h" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_NOMBRE")))),(__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_IDPROD")))),(__ref.getField(true,"_clie_id" /*RemoteObject*/ )),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(__ref.getField(true,"_cl_ruta" /*RemoteObject*/ )),(c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_tipo_venta" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 488;BA.debugLine="h.Close"; -Debug.ShouldStop(128); -__ref.getField(false,"_h" /*RemoteObject*/ ).runVoidMethod ("Close"); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 490;BA.debugLine="f.Close"; -Debug.ShouldStop(512); -__ref.getField(false,"_f" /*RemoteObject*/ ).runVoidMethod ("Close"); - }; - BA.debugLineNum = 492;BA.debugLine="e.Close"; -Debug.ShouldStop(2048); -__ref.getField(false,"_e" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 493;BA.debugLine="Log(444)"; -Debug.ShouldStop(4096); -c_pedidos.__c.runVoidMethod ("LogImpl","322741121",BA.NumberToString(444),0); - BA.debugLineNum = 494;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -Debug.ShouldStop(8192); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?) ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {11},new Object[] {(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText")),RemoteObject.createImmutable((0)),RemoteObject.createImmutable((0)),(__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_desc" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(true,"_clie_id" /*RemoteObject*/ )),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(__ref.getField(true,"_cl_ruta" /*RemoteObject*/ )),(c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_tipo_venta" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 495;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat"; -Debug.ShouldStop(16384); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText"))}))))); - BA.debugLineNum = 496;BA.debugLine="cantidad.Text = \"\""; -Debug.ShouldStop(32768); -__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("")); - BA.debugLineNum = 497;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(p"; -Debug.ShouldStop(65536); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, SUM(PE_COSTO_SIN) AS TOTAL_CLIE_SIN FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)")))); - BA.debugLineNum = 498;BA.debugLine="c.Position=0"; -Debug.ShouldStop(131072); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 499;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(262144); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"))); - BA.debugLineNum = 500;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert int"; -Debug.ShouldStop(524288); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT,PC_ALMACEN,PC_RUTA,PC_COSTO_SIN) VALUES (?,?,?,?,?,?,?,?,?,?)")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {10},new Object[] {(__ref.getField(true,"_clie_id" /*RemoteObject*/ )),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CANT_CLIE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_CLIE")))),(c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lon_gps" /*RemoteObject*/ )),(c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ )),(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(__ref.getField(true,"_cl_ruta" /*RemoteObject*/ )),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_CLIE_SIN"))))}))))); - BA.debugLineNum = 501;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_"; -Debug.ShouldStop(1048576); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("UPDATE kmt_info set gestion = 2 where CAT_CL_CODIGO In (select cuenta from cuentaa)"))); - BA.debugLineNum = 502;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; -Debug.ShouldStop(2097152); -c_pedidos._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Cliente"))); - }else { - BA.debugLineNum = 504;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; -Debug.ShouldStop(8388608); -c_pedidos.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("MM/dd/yyyy")); - BA.debugLineNum = 505;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(16777216); -__ref.setField ("_sdate" /*RemoteObject*/ ,c_pedidos.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(c_pedidos.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 506;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -Debug.ShouldStop(33554432); -__ref.setField ("_stime" /*RemoteObject*/ ,c_pedidos.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_pedidos.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 507;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select CUENTA from cuentaa")))); - BA.debugLineNum = 508;BA.debugLine="c.Position=0"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 509;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -Debug.ShouldStop(268435456); -__ref.setField ("_clie_id" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUENTA")))); - BA.debugLineNum = 510;BA.debugLine="c.Close"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 511;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_C"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_CL_RUTA from kmt_info where CAT_CL_CODIGO In (Select cuenta from cuentaa)")))); - BA.debugLineNum = 512;BA.debugLine="c.Position=0"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 513;BA.debugLine="cl_ruta = c.GetString(\"CAT_CL_RUTA\")"; -Debug.ShouldStop(1); -__ref.setField ("_cl_ruta" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_RUTA")))); - BA.debugLineNum = 514;BA.debugLine="c.Close"; -Debug.ShouldStop(2); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 515;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; -Debug.ShouldStop(4); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select USUARIO from usuarioa")))); - BA.debugLineNum = 516;BA.debugLine="c.Position=0"; -Debug.ShouldStop(8); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 517;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(16); -__ref.setField ("_usuario" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")))); - BA.debugLineNum = 518;BA.debugLine="Log(555)"; -Debug.ShouldStop(32); -c_pedidos.__c.runVoidMethod ("LogImpl","322741146",BA.NumberToString(555),0); - BA.debugLineNum = 519;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -Debug.ShouldStop(64); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_COSTO_SIN,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?,?) ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {12},new Object[] {(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),BA.numberCast(double.class, __ref.getField(false,"_l_precio" /*RemoteObject*/ ).runMethod(true,"getText"))}, "*",0, 0)),(__ref.getField(false,"_l_precio" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_desc" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(true,"_clie_id" /*RemoteObject*/ )),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(__ref.getField(true,"_cl_ruta" /*RemoteObject*/ )),(__ref.getField(true,"_preciosin" /*RemoteObject*/ )),(c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_tipo_venta" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 520;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat"; -Debug.ShouldStop(128); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText"))}))))); - BA.debugLineNum = 521;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(p"; -Debug.ShouldStop(256); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, SUM(PE_COSTO_SIN) AS TOTAL_CLIE_SIN FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)")))); - BA.debugLineNum = 522;BA.debugLine="c.Position=0"; -Debug.ShouldStop(512); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 523;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(1024); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"))); - BA.debugLineNum = 524;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert int"; -Debug.ShouldStop(2048); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT,PC_ALMACEN,PC_RUTA,PC_COSTO_SIN) VALUES (?,?,?,?,?,?,?,?,?,?)")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {10},new Object[] {(__ref.getField(true,"_clie_id" /*RemoteObject*/ )),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CANT_CLIE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_CLIE")))),(c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lon_gps" /*RemoteObject*/ )),(c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ )),(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(__ref.getField(true,"_cl_ruta" /*RemoteObject*/ )),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_CLIE_SIN"))))}))))); - BA.debugLineNum = 525;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_"; -Debug.ShouldStop(4096); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("UPDATE kmt_info set gestion = 2 where CAT_CL_CODIGO In (select cuenta from cuentaa)"))); - BA.debugLineNum = 526;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -Debug.ShouldStop(8192); -c_pedidos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO INVENT_X_ENVIAR (ALMACEN , PROID , CANTIDAD ) VALUES(?,?,?) ")),(Object)(c_pedidos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {3},new Object[] {(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(__ref.getField(false,"_l_proid" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_cantidad" /*RemoteObject*/ ).runMethod(true,"getText"))}))))); - BA.debugLineNum = 527;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; -Debug.ShouldStop(16384); -c_pedidos._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Cliente"))); - }}}} -; - BA.debugLineNum = 529;BA.debugLine="End Sub"; -Debug.ShouldStop(65536); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_principal.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_principal.java deleted file mode 100644 index 1c610c6..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_principal.java +++ /dev/null @@ -1,224 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class c_principal { - public static RemoteObject myClass; - public c_principal() { - } - public static PCBA staticBA = new PCBA(null, c_principal.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _rp = RemoteObject.declareNull("anywheresoftware.b4a.objects.RuntimePermissions"); -public static RemoteObject _root = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _reqmanager = RemoteObject.declareNull("keymon.lat.medicomed.dbrequestmanager"); -public static RemoteObject _conectado = RemoteObject.createImmutable(""); -public static RemoteObject _t1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.Timer"); -public static RemoteObject _sb = RemoteObject.declareNull("anywheresoftware.b4a.keywords.StringBuilderWrapper"); -public static RemoteObject _phone = RemoteObject.declareNull("anywheresoftware.b4a.phone.Phone"); -public static RemoteObject _g = RemoteObject.declareNull("anywheresoftware.b4a.gps.GPS"); -public static RemoteObject _trabajar = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _d = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _b = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _e = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _f = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _d2 = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _dd = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _lv = RemoteObject.declareNull("anywheresoftware.b4a.objects.ListViewWrapper"); -public static RemoteObject _cargar = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _pendiente = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _foto1 = null; -public static RemoteObject _usuario = RemoteObject.createImmutable(""); -public static RemoteObject _connecta = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _conn = RemoteObject.createImmutable(""); -public static RemoteObject _subir = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _cmd = RemoteObject.declareNull("keymon.lat.medicomed.dbrequestmanager._dbcommand"); -public static RemoteObject _tope = RemoteObject.createImmutable(0); -public static RemoteObject _count_clie = RemoteObject.createImmutable(0); -public static RemoteObject _fecha = RemoteObject.createImmutable(""); -public static RemoteObject _drop = RemoteObject.createImmutable(0); -public static RemoteObject _efectiva = RemoteObject.createImmutable(0); -public static RemoteObject _l_montod = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_cuantosc = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_drop = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_efectiva = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_ctast = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _busca = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _cuantos = RemoteObject.createImmutable(""); -public static RemoteObject _l_cuantosn = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _e_ruta = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -public static RemoteObject _l_porvisitar = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _b_mapa = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _l_ruta = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _almacen = RemoteObject.createImmutable(""); -public static RemoteObject _img2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -public static RemoteObject _listo1 = RemoteObject.createImmutable(""); -public static RemoteObject _listo2 = RemoteObject.createImmutable(""); -public static RemoteObject _listo3 = RemoteObject.createImmutable(""); -public static RemoteObject _listo4 = RemoteObject.createImmutable(""); -public static RemoteObject _listo5 = RemoteObject.createImmutable(""); -public static RemoteObject _ejecutando = RemoteObject.createImmutable(""); -public static RemoteObject _res = RemoteObject.createImmutable(""); -public static RemoteObject _inve = RemoteObject.createImmutable(""); -public static RemoteObject _cuantos_pedidosc = RemoteObject.createImmutable(""); -public static RemoteObject _cuantos_pedido = RemoteObject.createImmutable(""); -public static RemoteObject _cuantos_noventa = RemoteObject.createImmutable(""); -public static RemoteObject _datos_iguales = RemoteObject.createImmutable(""); -public static RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.phone.Phone.PhoneId"); -public static RemoteObject _imei = RemoteObject.createImmutable(""); -public static RemoteObject _inv = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _p1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _clave = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -public static RemoteObject _b_ok_pas = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _paso = RemoteObject.createImmutable(""); -public static RemoteObject _usuario1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -public static RemoteObject _connecta1 = RemoteObject.createImmutable(0); -public static RemoteObject _armafolio = RemoteObject.createImmutable(""); -public static RemoteObject _nuevo = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _s_cc = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _s_cp = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _s_ch = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _pb2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ProgressBarWrapper"); -public static RemoteObject _pb1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ProgressBarWrapper"); -public static RemoteObject _l_p_1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_p_2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_p_3 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _carga = RemoteObject.createImmutable(""); -public static RemoteObject _porcentaje = RemoteObject.createImmutable(""); -public static RemoteObject _p_resumen = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _b_ok_res = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _resumen = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _l_cuantost = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _img3 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -public static RemoteObject _imageview3 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -public static RemoteObject _imageview5 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -public static RemoteObject _l_tickprom = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_marcas = RemoteObject.declareNull("anywheresoftware.b4a.objects.ListViewWrapper"); -public static RemoteObject _imageview9 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -public static RemoteObject _e_ruta2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -public static RemoteObject _resdia = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -public static RemoteObject _hacer_ped = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -public static RemoteObject _nvo_cliente = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -public static RemoteObject _tickets_dia = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -public static RemoteObject _l_monto_ks = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_monto_kp = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_monto_k = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_monto_c1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_monto_c2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_monto_c3 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_encuesta = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _bpv1 = RemoteObject.declareNull("batteryprogressviewwrapper.batteryprogressviewWrapper"); -public static RemoteObject _batterystatus = null; -public static RemoteObject _bu = RemoteObject.declareNull("keymon.lat.medicomed.batteryutilities"); -public static RemoteObject _panel4 = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _l_nes = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_real = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_alcance = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_vplan = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_vreal = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_efec_vis = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_visitcc = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_efec_pv = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_efec_pura = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_cte_promo = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_reden_promo = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_lin_tick = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _scroll_resdia = RemoteObject.declareNull("anywheresoftware.b4a.objects.ScrollViewWrapper"); -public static RemoteObject _l_acumulado = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_unilever = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_rechazop = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_rechazom = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_vta_3mes = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_vta_2mes = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_vta_1mes = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_mes_py = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_frec_de_creal = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_frec_de_cobj = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_cob_visit = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_visit_real = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_visit_plan = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_eco = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_cob_ccc = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_ctes = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_vpo_vta = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_vpo_obj = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_ds_vta = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_ds_obj = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_dra_vta = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_dra_obj = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_alcancem = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_tendencia = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_vta_acum = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_obj_mes = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_ds_objd = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_ds_vtad = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _lpt = RemoteObject.createImmutable(""); -public static RemoteObject _steyin = RemoteObject.createImmutable(""); -public static RemoteObject _steyout = RemoteObject.createImmutable(""); -public static RemoteObject _l_prio = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_secund = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_comp = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _stay_hh = RemoteObject.createImmutable(""); -public static RemoteObject _stay_mi = RemoteObject.createImmutable(""); -public static RemoteObject _stay_ss = RemoteObject.createImmutable(""); -public static RemoteObject _sdate = RemoteObject.createImmutable(""); -public static RemoteObject _stime = RemoteObject.createImmutable(""); -public static RemoteObject _horaingreso = RemoteObject.createImmutable(""); -public static RemoteObject _l_quala = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_ferrero = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_sanmarcos = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_campari = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_iberia = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_bepensa = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_scj = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_medj = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_duracell = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_guna = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_kimb = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_tresm = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_redb = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _btn_ubicar = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _b_comm = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _l_total_mm = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_total_vive = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_total_guna = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_total_ba = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_total_comis = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_total_mm_1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_total_vive_1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_total_guna_1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_total_ba_1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_total_comis_1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _b_ok_comiss = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _panel_c = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _titleheight = RemoteObject.createImmutable(0); -public static RemoteObject _title2height = RemoteObject.createImmutable(0); -public static RemoteObject _dividerheight = RemoteObject.createImmutable(0); -public static RemoteObject _clv1 = RemoteObject.declareNull("b4a.example3.customlistview"); -public static RemoteObject _pnltitle = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _b_marcas = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _panel5 = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _lbltitle = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _b_ok_panel5 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _p_principal = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _p_mandainfo = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"ALMACEN",_ref.getField(false, "_almacen"),"armafolio",_ref.getField(false, "_armafolio"),"b",_ref.getField(false, "_b"),"B_COMM",_ref.getField(false, "_b_comm"),"b_mapa",_ref.getField(false, "_b_mapa"),"B_MARCAS",_ref.getField(false, "_b_marcas"),"B_OK_COMISS",_ref.getField(false, "_b_ok_comiss"),"B_OK_PANEL5",_ref.getField(false, "_b_ok_panel5"),"B_OK_PAS",_ref.getField(false, "_b_ok_pas"),"B_OK_RES",_ref.getField(false, "_b_ok_res"),"batterystatus",_ref.getField(false, "_batterystatus"),"bpv1",_ref.getField(false, "_bpv1"),"Btn_Ubicar",_ref.getField(false, "_btn_ubicar"),"bu",_ref.getField(false, "_bu"),"BUSCA",_ref.getField(false, "_busca"),"c",_ref.getField(false, "_c"),"CARGA",_ref.getField(false, "_carga"),"cargar",_ref.getField(false, "_cargar"),"CLAVE",_ref.getField(false, "_clave"),"CLV1",_ref.getField(false, "_clv1"),"cmd",_ref.getField(false, "_cmd"),"conectado",_ref.getField(false, "_conectado"),"conn",_ref.getField(false, "_conn"),"connecta",_ref.getField(false, "_connecta"),"connecta1",_ref.getField(false, "_connecta1"),"COUNT_CLIE",_ref.getField(false, "_count_clie"),"Cuantos",_ref.getField(false, "_cuantos"),"cuantos_noventa",_ref.getField(false, "_cuantos_noventa"),"cuantos_pedido",_ref.getField(false, "_cuantos_pedido"),"cuantos_pedidosc",_ref.getField(false, "_cuantos_pedidosc"),"d",_ref.getField(false, "_d"),"D2",_ref.getField(false, "_d2"),"DateUtils",_ref.getField(false, "_dateutils"),"datos_iguales",_ref.getField(false, "_datos_iguales"),"dd",_ref.getField(false, "_dd"),"DividerHeight",_ref.getField(false, "_dividerheight"),"drop",_ref.getField(false, "_drop"),"e",_ref.getField(false, "_e"),"e_ruta",_ref.getField(false, "_e_ruta"),"E_RUTA2",_ref.getField(false, "_e_ruta2"),"efectiva",_ref.getField(false, "_efectiva"),"EJECUTANDO",_ref.getField(false, "_ejecutando"),"f",_ref.getField(false, "_f"),"fecha",_ref.getField(false, "_fecha"),"foto1",_ref.getField(false, "_foto1"),"g",_ref.getField(false, "_g"),"hacer_ped",_ref.getField(false, "_hacer_ped"),"HORAINGRESO",_ref.getField(false, "_horaingreso"),"ImageView3",_ref.getField(false, "_imageview3"),"ImageView5",_ref.getField(false, "_imageview5"),"ImageView9",_ref.getField(false, "_imageview9"),"imei",_ref.getField(false, "_imei"),"img2",_ref.getField(false, "_img2"),"img3",_ref.getField(false, "_img3"),"inv",_ref.getField(false, "_inv"),"inve",_ref.getField(false, "_inve"),"L_ACUMULADO",_ref.getField(false, "_l_acumulado"),"L_ALCANCE",_ref.getField(false, "_l_alcance"),"L_ALCANCEM",_ref.getField(false, "_l_alcancem"),"L_BEPENSA",_ref.getField(false, "_l_bepensa"),"L_CAMPARI",_ref.getField(false, "_l_campari"),"L_COB_CCC",_ref.getField(false, "_l_cob_ccc"),"L_COB_VISIT",_ref.getField(false, "_l_cob_visit"),"L_COMP",_ref.getField(false, "_l_comp"),"l_ctast",_ref.getField(false, "_l_ctast"),"L_CTE_PROMO",_ref.getField(false, "_l_cte_promo"),"L_CTES",_ref.getField(false, "_l_ctes"),"l_cuantosc",_ref.getField(false, "_l_cuantosc"),"l_cuantosn",_ref.getField(false, "_l_cuantosn"),"L_CUANTOST",_ref.getField(false, "_l_cuantost"),"L_DRA_OBJ",_ref.getField(false, "_l_dra_obj"),"L_DRA_VTA",_ref.getField(false, "_l_dra_vta"),"l_drop",_ref.getField(false, "_l_drop"),"L_DS_OBJ",_ref.getField(false, "_l_ds_obj"),"L_DS_OBJD",_ref.getField(false, "_l_ds_objd"),"L_DS_VTA",_ref.getField(false, "_l_ds_vta"),"L_DS_VTAD",_ref.getField(false, "_l_ds_vtad"),"L_DURACELL",_ref.getField(false, "_l_duracell"),"L_ECO",_ref.getField(false, "_l_eco"),"L_EFEC_PURA",_ref.getField(false, "_l_efec_pura"),"L_EFEC_PV",_ref.getField(false, "_l_efec_pv"),"L_EFEC_VIS",_ref.getField(false, "_l_efec_vis"),"l_efectiva",_ref.getField(false, "_l_efectiva"),"l_encuesta",_ref.getField(false, "_l_encuesta"),"L_FERRERO",_ref.getField(false, "_l_ferrero"),"L_FREC_DE_COBJ",_ref.getField(false, "_l_frec_de_cobj"),"L_FREC_DE_CREAL",_ref.getField(false, "_l_frec_de_creal"),"L_GUNA",_ref.getField(false, "_l_guna"),"L_IBERIA",_ref.getField(false, "_l_iberia"),"L_KIMB",_ref.getField(false, "_l_kimb"),"L_LIN_TICK",_ref.getField(false, "_l_lin_tick"),"L_MARCAS",_ref.getField(false, "_l_marcas"),"L_MEDJ",_ref.getField(false, "_l_medj"),"L_MES_PY",_ref.getField(false, "_l_mes_py"),"l_monto_c1",_ref.getField(false, "_l_monto_c1"),"l_monto_c2",_ref.getField(false, "_l_monto_c2"),"l_monto_c3",_ref.getField(false, "_l_monto_c3"),"l_monto_k",_ref.getField(false, "_l_monto_k"),"l_monto_kp",_ref.getField(false, "_l_monto_kp"),"l_monto_ks",_ref.getField(false, "_l_monto_ks"),"L_MONTOD",_ref.getField(false, "_l_montod"),"L_NES",_ref.getField(false, "_l_nes"),"L_OBJ_MES",_ref.getField(false, "_l_obj_mes"),"L_P_1",_ref.getField(false, "_l_p_1"),"L_P_2",_ref.getField(false, "_l_p_2"),"L_P_3",_ref.getField(false, "_l_p_3"),"l_porvisitar",_ref.getField(false, "_l_porvisitar"),"L_PRIO",_ref.getField(false, "_l_prio"),"L_QUALA",_ref.getField(false, "_l_quala"),"L_REAL",_ref.getField(false, "_l_real"),"L_RECHAZOM",_ref.getField(false, "_l_rechazom"),"L_RECHAZOP",_ref.getField(false, "_l_rechazop"),"L_REDB",_ref.getField(false, "_l_redb"),"L_REDEN_PROMO",_ref.getField(false, "_l_reden_promo"),"l_ruta",_ref.getField(false, "_l_ruta"),"L_SANMARCOS",_ref.getField(false, "_l_sanmarcos"),"L_SCJ",_ref.getField(false, "_l_scj"),"L_SECUND",_ref.getField(false, "_l_secund"),"L_TENDENCIA",_ref.getField(false, "_l_tendencia"),"L_TICKPROM",_ref.getField(false, "_l_tickprom"),"L_TOTAL_BA",_ref.getField(false, "_l_total_ba"),"L_TOTAL_BA_1",_ref.getField(false, "_l_total_ba_1"),"L_TOTAL_COMIS",_ref.getField(false, "_l_total_comis"),"L_TOTAL_COMIS_1",_ref.getField(false, "_l_total_comis_1"),"L_TOTAL_GUNA",_ref.getField(false, "_l_total_guna"),"L_TOTAL_GUNA_1",_ref.getField(false, "_l_total_guna_1"),"L_TOTAL_MM",_ref.getField(false, "_l_total_mm"),"L_TOTAL_MM_1",_ref.getField(false, "_l_total_mm_1"),"L_TOTAL_VIVE",_ref.getField(false, "_l_total_vive"),"L_TOTAL_VIVE_1",_ref.getField(false, "_l_total_vive_1"),"L_TRESM",_ref.getField(false, "_l_tresm"),"L_UNILEVER",_ref.getField(false, "_l_unilever"),"L_VISIT_PLAN",_ref.getField(false, "_l_visit_plan"),"L_VISIT_REAL",_ref.getField(false, "_l_visit_real"),"L_VISITCC",_ref.getField(false, "_l_visitcc"),"L_VPLAN",_ref.getField(false, "_l_vplan"),"L_VPO_OBJ",_ref.getField(false, "_l_vpo_obj"),"L_VPO_VTA",_ref.getField(false, "_l_vpo_vta"),"L_VREAL",_ref.getField(false, "_l_vreal"),"L_VTA_1MES",_ref.getField(false, "_l_vta_1mes"),"L_VTA_2MES",_ref.getField(false, "_l_vta_2mes"),"L_VTA_3MES",_ref.getField(false, "_l_vta_3mes"),"L_VTA_ACUM",_ref.getField(false, "_l_vta_acum"),"lblTitle",_ref.getField(false, "_lbltitle"),"Listo1",_ref.getField(false, "_listo1"),"Listo2",_ref.getField(false, "_listo2"),"Listo3",_ref.getField(false, "_listo3"),"Listo4",_ref.getField(false, "_listo4"),"Listo5",_ref.getField(false, "_listo5"),"LPT",_ref.getField(false, "_lpt"),"lv",_ref.getField(false, "_lv"),"NUEVO",_ref.getField(false, "_nuevo"),"nvo_cliente",_ref.getField(false, "_nvo_cliente"),"p",_ref.getField(false, "_p"),"p_mandaInfo",_ref.getField(false, "_p_mandainfo"),"p_principal",_ref.getField(false, "_p_principal"),"P_RESUMEN",_ref.getField(false, "_p_resumen"),"P1",_ref.getField(false, "_p1"),"Panel_C",_ref.getField(false, "_panel_c"),"Panel4",_ref.getField(false, "_panel4"),"Panel5",_ref.getField(false, "_panel5"),"PASO",_ref.getField(false, "_paso"),"PB1",_ref.getField(false, "_pb1"),"PB2",_ref.getField(false, "_pb2"),"pendiente",_ref.getField(false, "_pendiente"),"PHONE",_ref.getField(false, "_phone"),"pnlTitle",_ref.getField(false, "_pnltitle"),"PORCENTAJE",_ref.getField(false, "_porcentaje"),"reqManager",_ref.getField(false, "_reqmanager"),"RES",_ref.getField(false, "_res"),"resdia",_ref.getField(false, "_resdia"),"Resumen",_ref.getField(false, "_resumen"),"Root",_ref.getField(false, "_root"),"rp",_ref.getField(false, "_rp"),"S_CC",_ref.getField(false, "_s_cc"),"S_CH",_ref.getField(false, "_s_ch"),"S_CP",_ref.getField(false, "_s_cp"),"sb",_ref.getField(false, "_sb"),"SCROLL_RESDIA",_ref.getField(false, "_scroll_resdia"),"sDate",_ref.getField(false, "_sdate"),"stay_hh",_ref.getField(false, "_stay_hh"),"stay_mi",_ref.getField(false, "_stay_mi"),"stay_ss",_ref.getField(false, "_stay_ss"),"STEYIN",_ref.getField(false, "_steyin"),"STEYOUT",_ref.getField(false, "_steyout"),"sTime",_ref.getField(false, "_stime"),"Subir",_ref.getField(false, "_subir"),"t1",_ref.getField(false, "_t1"),"tickets_dia",_ref.getField(false, "_tickets_dia"),"Title2Height",_ref.getField(false, "_title2height"),"TitleHeight",_ref.getField(false, "_titleheight"),"TOPE",_ref.getField(false, "_tope"),"trabajar",_ref.getField(false, "_trabajar"),"usuario",_ref.getField(false, "_usuario"),"USUARIO1",_ref.getField(false, "_usuario1"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_principal_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_principal_subs_0.java deleted file mode 100644 index 35a8612..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_principal_subs_0.java +++ /dev/null @@ -1,6560 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class c_principal_subs_0 { - - -public static RemoteObject _addtitle(RemoteObject __ref,RemoteObject _title) throws Exception{ -try { - Debug.PushSubsStack("AddTitle (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,2335); -if (RapidSub.canDelegate("addtitle")) { return __ref.runUserSub(false, "c_principal","addtitle", __ref, _title);} -RemoteObject _p_marcas = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _td = RemoteObject.declareNull("keymon.lat.medicomed.c_principal._titledata"); -Debug.locals.put("Title", _title); - BA.debugLineNum = 2335;BA.debugLine="Sub AddTitle (Title As String)"; -Debug.ShouldStop(1073741824); - BA.debugLineNum = 2336;BA.debugLine="Dim p_MARCAS As B4XView = xui.CreatePanel(\"\")"; -Debug.ShouldStop(-2147483648); -_p_marcas = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_p_marcas = __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("")));Debug.locals.put("p_MARCAS", _p_marcas);Debug.locals.put("p_MARCAS", _p_marcas); - BA.debugLineNum = 2337;BA.debugLine="p_MARCAS.SetLayoutAnimated(0, 0, 0, CLV1.AsView.W"; -Debug.ShouldStop(1); -_p_marcas.runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_clv1" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"getWidth")),(Object)(__ref.getField(true,"_titleheight" /*RemoteObject*/ ))); - BA.debugLineNum = 2338;BA.debugLine="p_MARCAS.LoadLayout(\"CellTitle\")"; -Debug.ShouldStop(2); -_p_marcas.runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("CellTitle")),__ref.getField(false, "ba")); - BA.debugLineNum = 2339;BA.debugLine="lblTitle.Text = Title"; -Debug.ShouldStop(4); -__ref.getField(false,"_lbltitle" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(_title)); - BA.debugLineNum = 2340;BA.debugLine="Dim td As TitleData"; -Debug.ShouldStop(8); -_td = RemoteObject.createNew ("keymon.lat.medicomed.c_principal._titledata");Debug.locals.put("td", _td); - BA.debugLineNum = 2341;BA.debugLine="td.Title = Title"; -Debug.ShouldStop(16); -_td.setField ("Title" /*RemoteObject*/ ,_title); - BA.debugLineNum = 2342;BA.debugLine="CLV1.Add(p_MARCAS, td)"; -Debug.ShouldStop(32); -__ref.getField(false,"_clv1" /*RemoteObject*/ ).runVoidMethod ("_add",(Object)(_p_marcas),(Object)((_td))); - BA.debugLineNum = 2343;BA.debugLine="End Sub"; -Debug.ShouldStop(64); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_comm_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B_COMM_Click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,2186); -if (RapidSub.canDelegate("b_comm_click")) { return __ref.runUserSub(false, "c_principal","b_comm_click", __ref);} -int _i = 0; - BA.debugLineNum = 2186;BA.debugLine="Sub B_COMM_Click"; -Debug.ShouldStop(512); - BA.debugLineNum = 2189;BA.debugLine="SCROLL_RESDIA.Visible = False"; -Debug.ShouldStop(4096); -__ref.getField(false,"_scroll_resdia" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 2190;BA.debugLine="Panel5.Visible = True"; -Debug.ShouldStop(8192); -__ref.getField(false,"_panel5" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 2191;BA.debugLine="pnlTitle.Visible = False"; -Debug.ShouldStop(16384); -__ref.getField(false,"_pnltitle" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 2192;BA.debugLine="pnlTitle.SetLayoutAnimated(0, 0, 0, CLV1.AsView.W"; -Debug.ShouldStop(32768); -__ref.getField(false,"_pnltitle" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_clv1" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"getWidth")),(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_titleheight" /*RemoteObject*/ ),__ref.getField(true,"_dividerheight" /*RemoteObject*/ )}, "+",1, 1))); - BA.debugLineNum = 2193;BA.debugLine="pnlTitle.LoadLayout(\"CellTitle\")"; -Debug.ShouldStop(65536); -__ref.getField(false,"_pnltitle" /*RemoteObject*/ ).runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("CellTitle")),__ref.getField(false, "ba")); - BA.debugLineNum = 2194;BA.debugLine="CLV1.Clear"; -Debug.ShouldStop(131072); -__ref.getField(false,"_clv1" /*RemoteObject*/ ).runVoidMethod ("_clear"); - BA.debugLineNum = 2196;BA.debugLine="dd=B4XPages.MainPage.skmt.ExecQuery(\"SELECT SUM(P"; -Debug.ShouldStop(524288); -__ref.getField(false,"_dd" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("SELECT SUM(PE_CANT) AS CUANTOS, PE_PRONOMBRE FROM PEDIDO GROUP BY PE_PRONOMBRE")))); - BA.debugLineNum = 2197;BA.debugLine="If dd.RowCount>0 Then"; -Debug.ShouldStop(1048576); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_dd" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 2198;BA.debugLine="For i=0 To dd.RowCount -1"; -Debug.ShouldStop(2097152); -{ -final int step9 = 1; -final int limit9 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_dd" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step9 > 0 && _i <= limit9) || (step9 < 0 && _i >= limit9) ;_i = ((int)(0 + _i + step9)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 2199;BA.debugLine="dd.Position = i"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_dd" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 2200;BA.debugLine="CLV1.AddTextItem(dd.GetString(\"PE_PRONOMBRE\"),\""; -Debug.ShouldStop(8388608); -__ref.getField(false,"_clv1" /*RemoteObject*/ ).runVoidMethod ("_addtextitem",(Object)((__ref.getField(false,"_dd" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_PRONOMBRE"))))),(Object)((RemoteObject.createImmutable("1")))); - BA.debugLineNum = 2201;BA.debugLine="CLV1.AddTextItem(\"CANTIDAD = \" & dd.GetString("; -Debug.ShouldStop(16777216); -__ref.getField(false,"_clv1" /*RemoteObject*/ ).runVoidMethod ("_addtextitem",(Object)((RemoteObject.concat(RemoteObject.createImmutable("CANTIDAD = "),__ref.getField(false,"_dd" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))))),(Object)((RemoteObject.createImmutable("1")))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 2204;BA.debugLine="dd.Close"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_dd" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 2232;BA.debugLine="End Sub"; -Debug.ShouldStop(8388608); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_mapa_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_mapa_Click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,1767); -if (RapidSub.canDelegate("b_mapa_click")) { return __ref.runUserSub(false, "c_principal","b_mapa_click", __ref);} - BA.debugLineNum = 1767;BA.debugLine="Sub b_mapa_Click"; -Debug.ShouldStop(64); - BA.debugLineNum = 1768;BA.debugLine="Log(\"mapClic\")"; -Debug.ShouldStop(128); -c_principal.__c.runVoidMethod ("LogImpl","33670017",RemoteObject.createImmutable("mapClic"),0); - BA.debugLineNum = 1769;BA.debugLine="B4XPages.GetPage(\"Mapas\")"; -Debug.ShouldStop(256); -c_principal._b4xpages.runVoidMethod ("_getpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Mapas"))); - BA.debugLineNum = 1770;BA.debugLine="End Sub"; -Debug.ShouldStop(512); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_marcas_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B_MARCAS_Click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,2246); -if (RapidSub.canDelegate("b_marcas_click")) { return __ref.runUserSub(false, "c_principal","b_marcas_click", __ref);} -int _i = 0; - BA.debugLineNum = 2246;BA.debugLine="Sub B_MARCAS_Click"; -Debug.ShouldStop(32); - BA.debugLineNum = 2271;BA.debugLine="SCROLL_RESDIA.Visible = False"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_scroll_resdia" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 2272;BA.debugLine="Panel5.Visible = True"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_panel5" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 2273;BA.debugLine="pnlTitle.Visible = False"; -Debug.ShouldStop(1); -__ref.getField(false,"_pnltitle" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 2274;BA.debugLine="pnlTitle.SetLayoutAnimated(0, 0, 0, CLV1.AsView.W"; -Debug.ShouldStop(2); -__ref.getField(false,"_pnltitle" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_clv1" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"getWidth")),(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_titleheight" /*RemoteObject*/ ),__ref.getField(true,"_dividerheight" /*RemoteObject*/ )}, "+",1, 1))); - BA.debugLineNum = 2275;BA.debugLine="pnlTitle.LoadLayout(\"CellTitle\")"; -Debug.ShouldStop(4); -__ref.getField(false,"_pnltitle" /*RemoteObject*/ ).runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("CellTitle")),__ref.getField(false, "ba")); - BA.debugLineNum = 2276;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CAT_GP"; -Debug.ShouldStop(8); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select CAT_GP_CLASIF, SUM(TOTAL) AS TOTAL FROM TOTAL_MARCAS GROUP BY CAT_GP_CLASIF")))); - BA.debugLineNum = 2277;BA.debugLine="CLV1.Clear"; -Debug.ShouldStop(16); -__ref.getField(false,"_clv1" /*RemoteObject*/ ).runVoidMethod ("_clear"); - BA.debugLineNum = 2278;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(32); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 2279;BA.debugLine="For i=0 To c.RowCount -1"; -Debug.ShouldStop(64); -{ -final int step9 = 1; -final int limit9 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step9 > 0 && _i <= limit9) || (step9 < 0 && _i >= limit9) ;_i = ((int)(0 + _i + step9)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 2280;BA.debugLine="c.Position=i"; -Debug.ShouldStop(128); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 2281;BA.debugLine="AddTitle(c.GetString(\"CAT_GP_CLASIF\"))"; -Debug.ShouldStop(256); -__ref.runClassMethod (keymon.lat.medicomed.c_principal.class, "_addtitle" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_CLASIF"))))); - BA.debugLineNum = 2282;BA.debugLine="If c.GetString(\"CAT_GP_CLASIF\") = \"PROMOS\" Then"; -Debug.ShouldStop(512); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_CLASIF"))),BA.ObjectToString("PROMOS"))) { - BA.debugLineNum = 2283;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"SELECT SUM"; -Debug.ShouldStop(1024); -__ref.getField(false,"_d" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("SELECT SUM(PE_CANT) AS CUANTOS FROM PEDIDO WHERE PE_CEDIS = PE_PROID")))); - BA.debugLineNum = 2284;BA.debugLine="d.Position=0"; -Debug.ShouldStop(2048); -__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 2285;BA.debugLine="CLV1.AddTextItem(\"CANTIDAD DE PROMOS = \" & d.G"; -Debug.ShouldStop(4096); -__ref.getField(false,"_clv1" /*RemoteObject*/ ).runVoidMethod ("_addtextitem",(Object)((RemoteObject.concat(RemoteObject.createImmutable("CANTIDAD DE PROMOS = "),__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))))),(Object)((RemoteObject.createImmutable("1")))); - BA.debugLineNum = 2286;BA.debugLine="d.Close"; -Debug.ShouldStop(8192); -__ref.getField(false,"_d" /*RemoteObject*/ ).runVoidMethod ("Close"); - }else { - BA.debugLineNum = 2288;BA.debugLine="f=B4XPages.MainPage.skmt.ExecQuery2(\"select CO"; -Debug.ShouldStop(32768); -__ref.getField(false,"_f" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select COUNT(*) AS CUANTOS from HIST_MARCAS_CUOTAS where HMC_MARCA = ?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_CLASIF")))})))); - BA.debugLineNum = 2289;BA.debugLine="f.Position=0"; -Debug.ShouldStop(65536); -__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 2290;BA.debugLine="If f.GetString(\"CUANTOS\") > 0 Then"; -Debug.ShouldStop(131072); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 2291;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery2(\"select H"; -Debug.ShouldStop(262144); -__ref.getField(false,"_e" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select HMC_MARCA, HMC_TOTAL from HIST_MARCAS_CUOTAS where HMC_MARCA = ?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_CLASIF")))})))); - BA.debugLineNum = 2292;BA.debugLine="e.Position=0"; -Debug.ShouldStop(524288); -__ref.getField(false,"_e" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 2293;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT c"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_d" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("SELECT count(distinct(PE_CLIENTE)) AS CUANTOS FROM PEDIDO WHERE PE_PROID in (select CAT_GP_ID from cat_gunaprod WHERE CAT_GP_CLASIF =?)")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_CLASIF")))})))); - BA.debugLineNum = 2294;BA.debugLine="d.Position=0"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 2295;BA.debugLine="CLV1.AddTextItem(\"TOTAL PREVENTA = $\" & c.Ge"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_clv1" /*RemoteObject*/ ).runVoidMethod ("_addtextitem",(Object)((RemoteObject.concat(RemoteObject.createImmutable("TOTAL PREVENTA = $"),__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL")))))),(Object)((RemoteObject.createImmutable("1")))); - BA.debugLineNum = 2296;BA.debugLine="CLV1.AddTextItem(\"M E T A = $\" & e.GetString"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_clv1" /*RemoteObject*/ ).runVoidMethod ("_addtextitem",(Object)((RemoteObject.concat(RemoteObject.createImmutable("M E T A = $"),__ref.getField(false,"_e" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HMC_TOTAL")))))),(Object)((RemoteObject.createImmutable("1")))); - BA.debugLineNum = 2297;BA.debugLine="CLV1.AddTextItem(\"FALTA = $\" & (e.GetString("; -Debug.ShouldStop(16777216); -__ref.getField(false,"_clv1" /*RemoteObject*/ ).runVoidMethod ("_addtextitem",(Object)((RemoteObject.concat(RemoteObject.createImmutable("FALTA = $"),(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_e" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HMC_TOTAL")))),BA.numberCast(double.class, __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL"))))}, "-",1, 0))))),(Object)((RemoteObject.createImmutable("1")))); - BA.debugLineNum = 2298;BA.debugLine="CLV1.AddTextItem(\"CLIENTES = \" & d.GetString"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_clv1" /*RemoteObject*/ ).runVoidMethod ("_addtextitem",(Object)((RemoteObject.concat(RemoteObject.createImmutable("CLIENTES = "),__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))))),(Object)((RemoteObject.createImmutable("1")))); - BA.debugLineNum = 2299;BA.debugLine="d.Close"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_d" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 2300;BA.debugLine="e.Close"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_e" /*RemoteObject*/ ).runVoidMethod ("Close"); - }else { - BA.debugLineNum = 2302;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT c"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_d" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("SELECT count(distinct(pe_cliente)) AS CUANTOS FROM PEDIDO WHERE PE_PROID in (select CAT_GP_ID from cat_gunaprod WHERE CAT_GP_CLASIF =?)")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_CLASIF")))})))); - BA.debugLineNum = 2303;BA.debugLine="d.Position=0"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 2304;BA.debugLine="CLV1.AddTextItem(\"TOTAL PREVENTA = $\" & c.Ge"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_clv1" /*RemoteObject*/ ).runVoidMethod ("_addtextitem",(Object)((RemoteObject.concat(RemoteObject.createImmutable("TOTAL PREVENTA = $"),__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL")))))),(Object)((RemoteObject.createImmutable("1")))); - BA.debugLineNum = 2305;BA.debugLine="CLV1.AddTextItem(\"M E T A = $\" & \"1000\",\"1\")"; -Debug.ShouldStop(1); -__ref.getField(false,"_clv1" /*RemoteObject*/ ).runVoidMethod ("_addtextitem",(Object)((RemoteObject.concat(RemoteObject.createImmutable("M E T A = $"),RemoteObject.createImmutable("1000")))),(Object)((RemoteObject.createImmutable("1")))); - BA.debugLineNum = 2306;BA.debugLine="CLV1.AddTextItem(\"FALTA = $\" & (1000 - c.Get"; -Debug.ShouldStop(2); -__ref.getField(false,"_clv1" /*RemoteObject*/ ).runVoidMethod ("_addtextitem",(Object)((RemoteObject.concat(RemoteObject.createImmutable("FALTA = $"),(RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(1000),BA.numberCast(double.class, __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL"))))}, "-",1, 0))))),(Object)((RemoteObject.createImmutable("1")))); - BA.debugLineNum = 2307;BA.debugLine="CLV1.AddTextItem(\"CLIENTES = \" & d.GetString"; -Debug.ShouldStop(4); -__ref.getField(false,"_clv1" /*RemoteObject*/ ).runVoidMethod ("_addtextitem",(Object)((RemoteObject.concat(RemoteObject.createImmutable("CLIENTES = "),__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))))),(Object)((RemoteObject.createImmutable("1")))); - BA.debugLineNum = 2308;BA.debugLine="d.Close"; -Debug.ShouldStop(8); -__ref.getField(false,"_d" /*RemoteObject*/ ).runVoidMethod ("Close"); - }; - BA.debugLineNum = 2313;BA.debugLine="f.Close"; -Debug.ShouldStop(256); -__ref.getField(false,"_f" /*RemoteObject*/ ).runVoidMethod ("Close"); - }; - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 2317;BA.debugLine="c.Close"; -Debug.ShouldStop(4096); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 2318;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select HMC_MA"; -Debug.ShouldStop(8192); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select HMC_MARCA, HMC_TOTAL from HIST_MARCAS_CUOTAS where HMC_MARCA not in (SELECT CAT_GP_CLASIF FROM TOTAL_MARCAS )")))); - BA.debugLineNum = 2319;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(16384); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 2320;BA.debugLine="For i=0 To c.RowCount -1"; -Debug.ShouldStop(32768); -{ -final int step47 = 1; -final int limit47 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step47 > 0 && _i <= limit47) || (step47 < 0 && _i >= limit47) ;_i = ((int)(0 + _i + step47)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 2321;BA.debugLine="c.Position=i"; -Debug.ShouldStop(65536); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 2322;BA.debugLine="AddTitle(c.GetString(\"HMC_MARCA\"))"; -Debug.ShouldStop(131072); -__ref.runClassMethod (keymon.lat.medicomed.c_principal.class, "_addtitle" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HMC_MARCA"))))); - BA.debugLineNum = 2323;BA.debugLine="CLV1.AddTextItem(\"TOTAL PREVENTA = $ 0.00\",\"1\""; -Debug.ShouldStop(262144); -__ref.getField(false,"_clv1" /*RemoteObject*/ ).runVoidMethod ("_addtextitem",(Object)(RemoteObject.createImmutable(("TOTAL PREVENTA = $ 0.00"))),(Object)((RemoteObject.createImmutable("1")))); - BA.debugLineNum = 2324;BA.debugLine="CLV1.AddTextItem(\"M E T A = $\" & C.GetString(\""; -Debug.ShouldStop(524288); -__ref.getField(false,"_clv1" /*RemoteObject*/ ).runVoidMethod ("_addtextitem",(Object)((RemoteObject.concat(RemoteObject.createImmutable("M E T A = $"),__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HMC_TOTAL")))))),(Object)((RemoteObject.createImmutable("1")))); - BA.debugLineNum = 2325;BA.debugLine="CLV1.AddTextItem(\"CLIENTES = 0\",\"1\")"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_clv1" /*RemoteObject*/ ).runVoidMethod ("_addtextitem",(Object)(RemoteObject.createImmutable(("CLIENTES = 0"))),(Object)((RemoteObject.createImmutable("1")))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 2328;BA.debugLine="c.Close"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 2331;BA.debugLine="End Sub"; -Debug.ShouldStop(67108864); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_ok_comiss_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B_OK_COMISS_Click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,2234); -if (RapidSub.canDelegate("b_ok_comiss_click")) { return __ref.runUserSub(false, "c_principal","b_ok_comiss_click", __ref);} - BA.debugLineNum = 2234;BA.debugLine="Sub B_OK_COMISS_Click"; -Debug.ShouldStop(33554432); - BA.debugLineNum = 2235;BA.debugLine="NUEVO.Visible =True"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_nuevo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 2236;BA.debugLine="BUSCA.Visible=True"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_busca" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 2237;BA.debugLine="connecta.Visible=True"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_connecta" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 2238;BA.debugLine="Resumen.Visible= True"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_resumen" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 2239;BA.debugLine="P_RESUMEN.Visible=False"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_p_resumen" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 2240;BA.debugLine="Panel_C.Visible = False"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_panel_c" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 2241;BA.debugLine="SCROLL_RESDIA.Visible = False"; -Debug.ShouldStop(1); -__ref.getField(false,"_scroll_resdia" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 2242;BA.debugLine="Btn_Ubicar.Visible=True"; -Debug.ShouldStop(2); -__ref.getField(false,"_btn_ubicar" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 2243;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_ok_panel5_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B_OK_PANEL5_Click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,2345); -if (RapidSub.canDelegate("b_ok_panel5_click")) { return __ref.runUserSub(false, "c_principal","b_ok_panel5_click", __ref);} - BA.debugLineNum = 2345;BA.debugLine="Sub B_OK_PANEL5_Click"; -Debug.ShouldStop(256); - BA.debugLineNum = 2346;BA.debugLine="Panel5.Visible = False"; -Debug.ShouldStop(512); -__ref.getField(false,"_panel5" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 2347;BA.debugLine="NUEVO.Visible =True"; -Debug.ShouldStop(1024); -__ref.getField(false,"_nuevo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 2348;BA.debugLine="BUSCA.Visible=True"; -Debug.ShouldStop(2048); -__ref.getField(false,"_busca" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 2349;BA.debugLine="connecta.Visible=True"; -Debug.ShouldStop(4096); -__ref.getField(false,"_connecta" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 2350;BA.debugLine="Resumen.Visible= True"; -Debug.ShouldStop(8192); -__ref.getField(false,"_resumen" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 2351;BA.debugLine="P_RESUMEN.Visible=False"; -Debug.ShouldStop(16384); -__ref.getField(false,"_p_resumen" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 2352;BA.debugLine="Panel4.Visible = False"; -Debug.ShouldStop(32768); -__ref.getField(false,"_panel4" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 2353;BA.debugLine="SCROLL_RESDIA.Visible = False"; -Debug.ShouldStop(65536); -__ref.getField(false,"_scroll_resdia" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 2354;BA.debugLine="Btn_Ubicar.Visible=True"; -Debug.ShouldStop(131072); -__ref.getField(false,"_btn_ubicar" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 2355;BA.debugLine="p_principal.Visible = True"; -Debug.ShouldStop(262144); -__ref.getField(false,"_p_principal" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 2357;BA.debugLine="End Sub"; -Debug.ShouldStop(1048576); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_ok_pas_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B_OK_PAS_Click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,1868); -if (RapidSub.canDelegate("b_ok_pas_click")) { return __ref.runUserSub(false, "c_principal","b_ok_pas_click", __ref);} - BA.debugLineNum = 1868;BA.debugLine="Sub B_OK_PAS_Click"; -Debug.ShouldStop(2048); - BA.debugLineNum = 1869;BA.debugLine="If CARGA = \"SUBIR\" And S_CP.Text = \"INFO OK\" Then"; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_carga" /*RemoteObject*/ ),BA.ObjectToString("SUBIR")) && RemoteObject.solveBoolean("=",__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("INFO OK"))) { - BA.debugLineNum = 1870;BA.debugLine="P1.Visible = False"; -Debug.ShouldStop(8192); -__ref.getField(false,"_p1" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1871;BA.debugLine="p_mandaInfo.Visible = False"; -Debug.ShouldStop(16384); -__ref.getField(false,"_p_mandainfo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1872;BA.debugLine="Btn_Ubicar.Visible=True"; -Debug.ShouldStop(32768); -__ref.getField(false,"_btn_ubicar" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1874;BA.debugLine="NUEVO.Visible =True"; -Debug.ShouldStop(131072); -__ref.getField(false,"_nuevo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1875;BA.debugLine="BUSCA.Visible=True"; -Debug.ShouldStop(262144); -__ref.getField(false,"_busca" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1876;BA.debugLine="connecta.Visible=True"; -Debug.ShouldStop(524288); -__ref.getField(false,"_connecta" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1877;BA.debugLine="Resumen.Visible= True"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_resumen" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1878;BA.debugLine="img2.Visible=False"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_img2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1879;BA.debugLine="Subs.panelVisible(p_principal, 0, 0)"; -Debug.ShouldStop(4194304); -c_principal._subs.runVoidMethod ("_panelvisible" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_p_principal" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - }else -{ BA.debugLineNum = 1880;BA.debugLine="Else If CARGA = \"SUBIR\" And S_CP.Text = \"ERROR\" T"; -Debug.ShouldStop(8388608); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_carga" /*RemoteObject*/ ),BA.ObjectToString("SUBIR")) && RemoteObject.solveBoolean("=",__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("ERROR"))) { - BA.debugLineNum = 1881;BA.debugLine="Msgbox(\"Tiene que subir de nuevo la información\""; -Debug.ShouldStop(16777216); -c_principal.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("Tiene que subir de nuevo la información")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("Atención"))),__ref.getField(false, "ba")); - BA.debugLineNum = 1882;BA.debugLine="P1.Visible = False"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_p1" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1883;BA.debugLine="p_mandaInfo.Visible = False"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_p_mandainfo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1885;BA.debugLine="NUEVO.Visible =True"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_nuevo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1886;BA.debugLine="BUSCA.Visible=True"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_busca" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1887;BA.debugLine="connecta.Visible=True"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_connecta" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1888;BA.debugLine="Resumen.Visible= True"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_resumen" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1889;BA.debugLine="img2.Visible=False"; -Debug.ShouldStop(1); -__ref.getField(false,"_img2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1890;BA.debugLine="Subs.panelVisible(p_principal, 0, 0)"; -Debug.ShouldStop(2); -c_principal._subs.runVoidMethod ("_panelvisible" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_p_principal" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - }else -{ BA.debugLineNum = 1891;BA.debugLine="Else if CARGA = \"SUBIR\" And S_CP.Text <> \"INFO OK"; -Debug.ShouldStop(4); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_carga" /*RemoteObject*/ ),BA.ObjectToString("SUBIR")) && RemoteObject.solveBoolean("!",__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("INFO OK"))) { - BA.debugLineNum = 1892;BA.debugLine="RES = Msgbox2(\"Seguro que desea abortar el proc"; -Debug.ShouldStop(8); -__ref.setField ("_res" /*RemoteObject*/ ,BA.NumberToString(c_principal.__c.runMethodAndSync(true,"Msgbox2",(Object)(BA.ObjectToCharSequence("Seguro que desea abortar el proceso")),(Object)(BA.ObjectToCharSequence("Cierre")),(Object)(BA.ObjectToString("Si")),(Object)(BA.ObjectToString("")),(Object)(BA.ObjectToString("No")),(Object)((c_principal.__c.runMethod(false,"LoadBitmap",(Object)(c_principal.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(RemoteObject.createImmutable("alert2.png"))).getObject())),__ref.getField(false, "ba")))); - BA.debugLineNum = 1893;BA.debugLine="If RES = DialogResponse.POSITIVE Then"; -Debug.ShouldStop(16); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_res" /*RemoteObject*/ ),BA.NumberToString(c_principal.__c.getField(false,"DialogResponse").getField(true,"POSITIVE")))) { - BA.debugLineNum = 1894;BA.debugLine="P1.Visible = False"; -Debug.ShouldStop(32); -__ref.getField(false,"_p1" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1896;BA.debugLine="NUEVO.Visible =True"; -Debug.ShouldStop(128); -__ref.getField(false,"_nuevo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1897;BA.debugLine="BUSCA.Visible=True"; -Debug.ShouldStop(256); -__ref.getField(false,"_busca" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1898;BA.debugLine="connecta.Visible=True"; -Debug.ShouldStop(512); -__ref.getField(false,"_connecta" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1899;BA.debugLine="Resumen.Visible= True"; -Debug.ShouldStop(1024); -__ref.getField(false,"_resumen" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1900;BA.debugLine="img2.Visible=False"; -Debug.ShouldStop(2048); -__ref.getField(false,"_img2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1901;BA.debugLine="Subs.panelVisible(p_principal, 0, 0)"; -Debug.ShouldStop(4096); -c_principal._subs.runVoidMethod ("_panelvisible" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_p_principal" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 1902;BA.debugLine="ExitApplication"; -Debug.ShouldStop(8192); -c_principal.__c.runVoidMethod ("ExitApplication"); - }; - }}} -; - BA.debugLineNum = 1905;BA.debugLine="If CARGA = \"CARGAR\" And S_CP.Text = \"LISTO\" And S"; -Debug.ShouldStop(65536); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_carga" /*RemoteObject*/ ),BA.ObjectToString("CARGAR")) && RemoteObject.solveBoolean("=",__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("LISTO")) && RemoteObject.solveBoolean("=",__ref.getField(false,"_s_cc" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("LISTO")) && RemoteObject.solveBoolean("=",__ref.getField(false,"_s_ch" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("LISTO"))) { - BA.debugLineNum = 1906;BA.debugLine="P1.Visible = False"; -Debug.ShouldStop(131072); -__ref.getField(false,"_p1" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1907;BA.debugLine="p_mandaInfo.Visible = False"; -Debug.ShouldStop(262144); -__ref.getField(false,"_p_mandainfo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1908;BA.debugLine="p_mandaInfo.Visible = False"; -Debug.ShouldStop(524288); -__ref.getField(false,"_p_mandainfo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1909;BA.debugLine="Btn_Ubicar.Visible=True"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_btn_ubicar" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1911;BA.debugLine="NUEVO.Visible =True"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_nuevo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1912;BA.debugLine="BUSCA.Visible=True"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_busca" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1913;BA.debugLine="connecta.Visible=True"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_connecta" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1914;BA.debugLine="Resumen.Visible= True"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_resumen" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1915;BA.debugLine="img2.Visible=False"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_img2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1916;BA.debugLine="Subs.panelVisible(p_principal, 0, 0)"; -Debug.ShouldStop(134217728); -c_principal._subs.runVoidMethod ("_panelvisible" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_p_principal" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 1917;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(268435456); -__ref.runClassMethod (keymon.lat.medicomed.c_principal.class, "_b4xpage_appear" /*void*/ ); - BA.debugLineNum = 1918;BA.debugLine="Subs.bitacora(Subs.fechanormal(DateTime.Now),usu"; -Debug.ShouldStop(536870912); -c_principal._subs.runVoidMethod ("_bitacora" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(c_principal._subs.runMethod(true,"_fechanormal" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.NumberToString(c_principal.__c.getField(false,"DateTime").runMethod(true,"getNow"))))),(Object)(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(Object)(__ref.getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"getText")),(Object)(BA.ObjectToString("Carga día")),(Object)(BA.ObjectToString("")),(Object)(c_principal._subs.runMethod(true,"_fechanormal" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.NumberToString(c_principal.__c.getField(false,"DateTime").runMethod(true,"getNow"))))),(Object)(c_principal._subs.runMethod(true,"_fechanormal" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.NumberToString(c_principal.__c.getField(false,"DateTime").runMethod(true,"getNow"))))),(Object)(c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ )),(Object)(c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lon_gps" /*RemoteObject*/ )),(Object)(BA.ObjectToString("2")),(Object)(BA.ObjectToString("")),(Object)(RemoteObject.createImmutable(""))); - }else -{ BA.debugLineNum = 1919;BA.debugLine="Else if CARGA = \"CARGAR\" And (S_CP.Text <> \"LISTO"; -Debug.ShouldStop(1073741824); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_carga" /*RemoteObject*/ ),BA.ObjectToString("CARGAR")) && RemoteObject.solveBoolean(".",BA.ObjectToBoolean((RemoteObject.solveBoolean("!",__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("LISTO")) || RemoteObject.solveBoolean("!",__ref.getField(false,"_s_cc" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("LISTO")) || RemoteObject.solveBoolean("!",__ref.getField(false,"_s_ch" /*RemoteObject*/ ).runMethod(true,"getText"),RemoteObject.createImmutable("LISTO")))))) { - BA.debugLineNum = 1920;BA.debugLine="RES = Msgbox2(\"Seguro que desea abortar el proc"; -Debug.ShouldStop(-2147483648); -__ref.setField ("_res" /*RemoteObject*/ ,BA.NumberToString(c_principal.__c.runMethodAndSync(true,"Msgbox2",(Object)(BA.ObjectToCharSequence("Seguro que desea abortar el proceso")),(Object)(BA.ObjectToCharSequence("Cierre")),(Object)(BA.ObjectToString("Si")),(Object)(BA.ObjectToString("")),(Object)(BA.ObjectToString("No")),(Object)((c_principal.__c.runMethod(false,"LoadBitmap",(Object)(c_principal.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(RemoteObject.createImmutable("alert2.png"))).getObject())),__ref.getField(false, "ba")))); - BA.debugLineNum = 1921;BA.debugLine="If RES = DialogResponse.POSITIVE Then"; -Debug.ShouldStop(1); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_res" /*RemoteObject*/ ),BA.NumberToString(c_principal.__c.getField(false,"DialogResponse").getField(true,"POSITIVE")))) { - BA.debugLineNum = 1922;BA.debugLine="P1.Visible = False"; -Debug.ShouldStop(2); -__ref.getField(false,"_p1" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1923;BA.debugLine="p_mandaInfo.Visible = False"; -Debug.ShouldStop(4); -__ref.getField(false,"_p_mandainfo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1925;BA.debugLine="NUEVO.Visible =True"; -Debug.ShouldStop(16); -__ref.getField(false,"_nuevo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1926;BA.debugLine="BUSCA.Visible=True"; -Debug.ShouldStop(32); -__ref.getField(false,"_busca" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1927;BA.debugLine="connecta.Visible=True"; -Debug.ShouldStop(64); -__ref.getField(false,"_connecta" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1928;BA.debugLine="Resumen.Visible= True"; -Debug.ShouldStop(128); -__ref.getField(false,"_resumen" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1929;BA.debugLine="img2.Visible=False"; -Debug.ShouldStop(256); -__ref.getField(false,"_img2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1930;BA.debugLine="Subs.panelVisible(p_principal, 0, 0)"; -Debug.ShouldStop(512); -c_principal._subs.runVoidMethod ("_panelvisible" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_p_principal" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 1931;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(1024); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from kmt_info"))); - BA.debugLineNum = 1932;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(2048); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from cod_result"))); - BA.debugLineNum = 1933;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(4096); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from hist_gest"))); - BA.debugLineNum = 1934;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(8192); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from cat_gunaprod"))); - BA.debugLineNum = 1935;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(16384); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from CAT_DETALLES_PAQ"))); - BA.debugLineNum = 1936;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(32768); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from telefonos"))); - BA.debugLineNum = 1937;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(65536); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from HIST_VENTAS"))); - BA.debugLineNum = 1938;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(131072); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from HIST_PROMOS"))); - BA.debugLineNum = 1939;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(262144); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from HIST_CLIENTE_CANT_PROMOS"))); - BA.debugLineNum = 1940;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(524288); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from PROMOS_COMP"))); - BA.debugLineNum = 1941;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(1048576); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from CAT_VERIFICACION"))); - BA.debugLineNum = 1942;BA.debugLine="ExitApplication"; -Debug.ShouldStop(2097152); -c_principal.__c.runVoidMethod ("ExitApplication"); - }; - }} -; - BA.debugLineNum = 1945;BA.debugLine="End Sub"; -Debug.ShouldStop(16777216); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_ok_res_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B_OK_RES_Click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,1951); -if (RapidSub.canDelegate("b_ok_res_click")) { return __ref.runUserSub(false, "c_principal","b_ok_res_click", __ref);} - BA.debugLineNum = 1951;BA.debugLine="Sub B_OK_RES_Click"; -Debug.ShouldStop(1073741824); - BA.debugLineNum = 1953;BA.debugLine="NUEVO.Visible =True"; -Debug.ShouldStop(1); -__ref.getField(false,"_nuevo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1954;BA.debugLine="BUSCA.Visible=True"; -Debug.ShouldStop(2); -__ref.getField(false,"_busca" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1955;BA.debugLine="connecta.Visible=True"; -Debug.ShouldStop(4); -__ref.getField(false,"_connecta" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1956;BA.debugLine="Resumen.Visible= True"; -Debug.ShouldStop(8); -__ref.getField(false,"_resumen" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1957;BA.debugLine="P_RESUMEN.Visible=False"; -Debug.ShouldStop(16); -__ref.getField(false,"_p_resumen" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1958;BA.debugLine="Panel4.Visible = False"; -Debug.ShouldStop(32); -__ref.getField(false,"_panel4" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1959;BA.debugLine="SCROLL_RESDIA.Visible = False"; -Debug.ShouldStop(64); -__ref.getField(false,"_scroll_resdia" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1960;BA.debugLine="Btn_Ubicar.Visible=True"; -Debug.ShouldStop(128); -__ref.getField(false,"_btn_ubicar" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1961;BA.debugLine="p_principal.Visible = True"; -Debug.ShouldStop(256); -__ref.getField(false,"_p_principal" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1962;BA.debugLine="End Sub"; -Debug.ShouldStop(512); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _b4xpage_appear(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Appear (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,301); -if (RapidSub.canDelegate("b4xpage_appear")) { __ref.runUserSub(false, "c_principal","b4xpage_appear", __ref); return;} -ResumableSub_B4XPage_Appear rsub = new ResumableSub_B4XPage_Appear(null,__ref); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_B4XPage_Appear extends BA.ResumableSub { -public ResumableSub_B4XPage_Appear(keymon.lat.medicomed.c_principal parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.c_principal parent; -RemoteObject _permission = RemoteObject.createImmutable(""); -RemoteObject _result = RemoteObject.createImmutable(false); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Appear (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,301); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 303;BA.debugLine="Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_"; -Debug.ShouldStop(16384); -parent._starter._rp /*RemoteObject*/ .runVoidMethod ("CheckAndRequest",__ref.getField(false, "ba"),(Object)(parent._starter._rp /*RemoteObject*/ .getField(true,"PERMISSION_ACCESS_FINE_LOCATION"))); - BA.debugLineNum = 304;BA.debugLine="Wait For B4XPage_PermissionResult (Permission As"; -Debug.ShouldStop(32768); -parent.__c.runVoidMethod ("WaitFor","b4xpage_permissionresult", __ref.getField(false, "ba"), anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "c_principal", "b4xpage_appear"), null); -this.state = 68; -return; -case 68: -//C -this.state = 1; -_permission = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(1));Debug.locals.put("Permission", _permission); -_result = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(2));Debug.locals.put("Result", _result); -; - BA.debugLineNum = 305;BA.debugLine="If Result Then"; -Debug.ShouldStop(65536); -if (true) break; - -case 1: -//if -this.state = 6; -if (_result.get().booleanValue()) { -this.state = 3; -}else { -this.state = 5; -}if (true) break; - -case 3: -//C -this.state = 6; - if (true) break; - -case 5: -//C -this.state = 6; - BA.debugLineNum = 308;BA.debugLine="Log(\"SIN permisos de ubicacion\")"; -Debug.ShouldStop(524288); -parent.__c.runVoidMethod ("LogImpl","33211271",RemoteObject.createImmutable("SIN permisos de ubicacion"),0); - if (true) break; - -case 6: -//C -this.state = 7; -; - BA.debugLineNum = 310;BA.debugLine="Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_"; -Debug.ShouldStop(2097152); -parent._starter._rp /*RemoteObject*/ .runVoidMethod ("CheckAndRequest",__ref.getField(false, "ba"),(Object)(parent._starter._rp /*RemoteObject*/ .getField(true,"PERMISSION_READ_PHONE_STATE"))); - BA.debugLineNum = 311;BA.debugLine="Wait For B4XPage_PermissionResult (Permission As"; -Debug.ShouldStop(4194304); -parent.__c.runVoidMethod ("WaitFor","b4xpage_permissionresult", __ref.getField(false, "ba"), anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "c_principal", "b4xpage_appear"), null); -this.state = 69; -return; -case 69: -//C -this.state = 7; -_permission = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(1));Debug.locals.put("Permission", _permission); -_result = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(2));Debug.locals.put("Result", _result); -; - BA.debugLineNum = 312;BA.debugLine="If Result Then"; -Debug.ShouldStop(8388608); -if (true) break; - -case 7: -//if -this.state = 10; -if (_result.get().booleanValue()) { -this.state = 9; -}if (true) break; - -case 9: -//C -this.state = 10; - if (true) break; - -case 10: -//C -this.state = 11; -; - BA.debugLineNum = 318;BA.debugLine="HORAINGRESO =\"000000\""; -Debug.ShouldStop(536870912); -__ref.setField ("_horaingreso" /*RemoteObject*/ ,BA.ObjectToString("000000")); - BA.debugLineNum = 319;BA.debugLine="Btn_Ubicar.Left = (Root.Width/2) - (Btn_Ubicar.Wi"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_btn_ubicar" /*RemoteObject*/ ).runMethod(true,"setLeft",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0)),(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_btn_ubicar" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0))}, "-",1, 0))); - BA.debugLineNum = 321;BA.debugLine="PASO =0"; -Debug.ShouldStop(1); -__ref.setField ("_paso" /*RemoteObject*/ ,BA.NumberToString(0)); - BA.debugLineNum = 322;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then"; -Debug.ShouldStop(2); -if (true) break; - -case 11: -//if -this.state = 20; -if (parent.__c.runMethod(true,"Not",(Object)(parent._starter._gps /*RemoteObject*/ .runMethod(true,"getGPSEnabled"))).get().booleanValue()) { -this.state = 13; -}if (true) break; - -case 13: -//C -this.state = 14; - BA.debugLineNum = 323;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessageS"; -Debug.ShouldStop(4); -if (true) break; - -case 14: -//if -this.state = 19; -if (RemoteObject.solveBoolean("!",parent._starter._marcacel /*RemoteObject*/ ,BA.ObjectToString("Sony"))) { -this.state = 16; -;}if (true) break; - -case 16: -//C -this.state = 19; -parent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Es necesario tener el GPS encendido")),(Object)(parent.__c.getField(true,"True"))); -if (true) break; - -case 19: -//C -this.state = 20; -; - BA.debugLineNum = 324;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent"; -Debug.ShouldStop(8); -parent.__c.runVoidMethod ("StartActivity",__ref.getField(false, "ba"),(Object)((parent._starter._gps /*RemoteObject*/ .runMethod(false,"getLocationSettingsIntent")))); - if (true) break; - -case 20: -//C -this.state = 21; -; - BA.debugLineNum = 326;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"select count"; -Debug.ShouldStop(32); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select count(*) as CUANTOS from CAT_VARIABLES WHERE CAT_VA_DESCRIPCION = ?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("FECHA")})))); - BA.debugLineNum = 327;BA.debugLine="c.Position =0"; -Debug.ShouldStop(64); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 328;BA.debugLine="If c.GetString(\"CUANTOS\") = 0 Then"; -Debug.ShouldStop(128); -if (true) break; - -case 21: -//if -this.state = 30; -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS"))),BA.NumberToString(0))) { -this.state = 23; -}else { -this.state = 25; -}if (true) break; - -case 23: -//C -this.state = 30; - BA.debugLineNum = 329;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(256); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 330;BA.debugLine="cmd.Name = \"select_fecha\""; -Debug.ShouldStop(512); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_fecha")); - BA.debugLineNum = 331;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd ,"; -Debug.ShouldStop(1024); -parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("fecha")))); - BA.debugLineNum = 332;BA.debugLine="Msgbox(\"AJUSTAR FECHA\",\"AVISO\") 'ignore"; -Debug.ShouldStop(2048); -parent.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("AJUSTAR FECHA")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("AVISO"))),__ref.getField(false, "ba")); - BA.debugLineNum = 333;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(4096); -__ref.runClassMethod (keymon.lat.medicomed.c_principal.class, "_b4xpage_appear" /*void*/ ); - if (true) break; - -case 25: -//C -this.state = 26; - BA.debugLineNum = 335;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"select CAT_"; -Debug.ShouldStop(16384); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select CAT_VA_VALOR from CAT_VARIABLES WHERE CAT_VA_DESCRIPCION = ?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("FECHA")})))); - BA.debugLineNum = 336;BA.debugLine="c.Position=0"; -Debug.ShouldStop(32768); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 337;BA.debugLine="Dim sDate,sTime As String"; -Debug.ShouldStop(65536); -parent._sdate = RemoteObject.createImmutable("");__ref.setField("_sdate",parent._sdate); -parent._stime = RemoteObject.createImmutable("");__ref.setField("_stime",parent._stime); - BA.debugLineNum = 338;BA.debugLine="DateTime.DateFormat = \"yyyyMMdd\""; -Debug.ShouldStop(131072); -parent.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("yyyyMMdd")); - BA.debugLineNum = 339;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(262144); -__ref.setField ("_sdate" /*RemoteObject*/ ,parent.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(parent.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 340;BA.debugLine="If c.GetString(\"CAT_VA_VALOR\") > sDate Then"; -Debug.ShouldStop(524288); -if (true) break; - -case 26: -//if -this.state = 29; -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_VA_VALOR")))),BA.numberCast(double.class, __ref.getField(true,"_sdate" /*RemoteObject*/ )))) { -this.state = 28; -}if (true) break; - -case 28: -//C -this.state = 29; - BA.debugLineNum = 341;BA.debugLine="Msgbox(\"AJUSTAR LA FECHA YA QUE ES MENOR AL SIS"; -Debug.ShouldStop(1048576); -parent.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("AJUSTAR LA FECHA YA QUE ES MENOR AL SISTEMA")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("AVISO"))),__ref.getField(false, "ba")); - BA.debugLineNum = 342;BA.debugLine="c.Close"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 343;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(4194304); -__ref.runClassMethod (keymon.lat.medicomed.c_principal.class, "_b4xpage_appear" /*void*/ ); - if (true) break; - -case 29: -//C -this.state = 30; -; - BA.debugLineNum = 345;BA.debugLine="c.Close"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - if (true) break; - -case 30: -//C -this.state = 31; -; - BA.debugLineNum = 347;BA.debugLine="c.Close"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 348;BA.debugLine="If EJECUTANDO =0 Then"; -Debug.ShouldStop(134217728); -if (true) break; - -case 31: -//if -this.state = 34; -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_ejecutando" /*RemoteObject*/ ),BA.NumberToString(0))) { -this.state = 33; -}if (true) break; - -case 33: -//C -this.state = 34; - BA.debugLineNum = 349;BA.debugLine="Listo1 = 0"; -Debug.ShouldStop(268435456); -__ref.setField ("_listo1" /*RemoteObject*/ ,BA.NumberToString(0)); - BA.debugLineNum = 350;BA.debugLine="Listo2 = 0"; -Debug.ShouldStop(536870912); -__ref.setField ("_listo2" /*RemoteObject*/ ,BA.NumberToString(0)); - BA.debugLineNum = 351;BA.debugLine="Listo3 = 0"; -Debug.ShouldStop(1073741824); -__ref.setField ("_listo3" /*RemoteObject*/ ,BA.NumberToString(0)); - BA.debugLineNum = 352;BA.debugLine="Listo4 = 0"; -Debug.ShouldStop(-2147483648); -__ref.setField ("_listo4" /*RemoteObject*/ ,BA.NumberToString(0)); - BA.debugLineNum = 353;BA.debugLine="Listo5 = 0"; -Debug.ShouldStop(1); -__ref.setField ("_listo5" /*RemoteObject*/ ,BA.NumberToString(0)); - BA.debugLineNum = 354;BA.debugLine="inve = 0"; -Debug.ShouldStop(2); -__ref.setField ("_inve" /*RemoteObject*/ ,BA.NumberToString(0)); - BA.debugLineNum = 355;BA.debugLine="img2.Visible =False"; -Debug.ShouldStop(4); -__ref.getField(false,"_img2" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - if (true) break; - -case 34: -//C -this.state = 35; -; - BA.debugLineNum = 357;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; -Debug.ShouldStop(16); -parent.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("MM/dd/yyyy")); - BA.debugLineNum = 358;BA.debugLine="fecha=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(32); -__ref.setField ("_fecha" /*RemoteObject*/ ,parent.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(parent.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 359;BA.debugLine="b=B4XPages.MainPage.skmt.ExecQuery(\"Select count("; -Debug.ShouldStop(64); -__ref.getField(false,"_b" /*RemoteObject*/ ).setObject (parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select count(*) as CUANTOS from pedido_cliente")))); - BA.debugLineNum = 360;BA.debugLine="b.Position=0"; -Debug.ShouldStop(128); -__ref.getField(false,"_b" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 361;BA.debugLine="Cuantos = b.GetString(\"CUANTOS\")"; -Debug.ShouldStop(256); -__ref.setField ("_cuantos" /*RemoteObject*/ ,__ref.getField(false,"_b" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))); - BA.debugLineNum = 362;BA.debugLine="b.Close"; -Debug.ShouldStop(512); -__ref.getField(false,"_b" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 364;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"select count("; -Debug.ShouldStop(2048); -__ref.getField(false,"_d" /*RemoteObject*/ ).setObject (parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select count(*) as TOTAL_VISITAR from kmt_info where gestion = 0")))); - BA.debugLineNum = 365;BA.debugLine="d.Position=0"; -Debug.ShouldStop(4096); -__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 366;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery(\"select count("; -Debug.ShouldStop(8192); -__ref.getField(false,"_e" /*RemoteObject*/ ).setObject (parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select count(*) as POR_VISITAR from kmt_info")))); - BA.debugLineNum = 367;BA.debugLine="e.Position=0"; -Debug.ShouldStop(16384); -__ref.getField(false,"_e" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 368;BA.debugLine="f=B4XPages.MainPage.skmt.ExecQuery(\"select count("; -Debug.ShouldStop(32768); -__ref.getField(false,"_f" /*RemoteObject*/ ).setObject (parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select count(*) as CAT_CL_RUTA from kmt_info")))); - BA.debugLineNum = 369;BA.debugLine="f.Position=0"; -Debug.ShouldStop(65536); -__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 370;BA.debugLine="l_ruta.Text = f.GetString(\"CAT_CL_RUTA\")"; -Debug.ShouldStop(131072); -__ref.getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_RUTA"))))); - BA.debugLineNum = 371;BA.debugLine="f.Close"; -Debug.ShouldStop(262144); -__ref.getField(false,"_f" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 372;BA.debugLine="If l_ruta.Text = 0 Then"; -Debug.ShouldStop(524288); -if (true) break; - -case 35: -//if -this.state = 40; -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"getText"),BA.NumberToString(0))) { -this.state = 37; -}else { -this.state = 39; -}if (true) break; - -case 37: -//C -this.state = 40; - BA.debugLineNum = 373;BA.debugLine="l_ruta.Text =0"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(0)); - if (true) break; - -case 39: -//C -this.state = 40; - BA.debugLineNum = 375;BA.debugLine="f=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_C"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_f" /*RemoteObject*/ ).setObject (parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_CL_RUTA from kmt_info")))); - BA.debugLineNum = 376;BA.debugLine="f.Position=0"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 377;BA.debugLine="l_ruta.Text = f.GetString(\"CAT_CL_RUTA\")"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_RUTA"))))); - BA.debugLineNum = 378;BA.debugLine="f.Close"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_f" /*RemoteObject*/ ).runVoidMethod ("Close"); - if (true) break; -; - BA.debugLineNum = 380;BA.debugLine="If Cuantos = 0 Then"; -Debug.ShouldStop(134217728); - -case 40: -//if -this.state = 61; -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_cuantos" /*RemoteObject*/ ),BA.NumberToString(0))) { -this.state = 42; -}else { -this.state = 44; -}if (true) break; - -case 42: -//C -this.state = 61; - BA.debugLineNum = 381;BA.debugLine="L_MONTOD.Text =0"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_l_montod" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(0)); - BA.debugLineNum = 382;BA.debugLine="l_cuantosc.Text = 0"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_l_cuantosc" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(0)); - BA.debugLineNum = 383;BA.debugLine="l_cuantosn.Text = 0"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_l_cuantosn" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(0)); - BA.debugLineNum = 384;BA.debugLine="L_CUANTOST.Text = 0"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_l_cuantost" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(0)); - BA.debugLineNum = 385;BA.debugLine="drop = 0"; -Debug.ShouldStop(1); -__ref.setField ("_drop" /*RemoteObject*/ ,BA.numberCast(double.class, 0)); - BA.debugLineNum = 386;BA.debugLine="l_drop.Text = 0"; -Debug.ShouldStop(2); -__ref.getField(false,"_l_drop" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(0)); - BA.debugLineNum = 387;BA.debugLine="efectiva = 0"; -Debug.ShouldStop(4); -__ref.setField ("_efectiva" /*RemoteObject*/ ,BA.numberCast(double.class, 0)); - BA.debugLineNum = 388;BA.debugLine="l_efectiva.text =0"; -Debug.ShouldStop(8); -__ref.getField(false,"_l_efectiva" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(0)); - BA.debugLineNum = 389;BA.debugLine="l_ctast.Text = d.GetString(\"TOTAL_VISITAR\")"; -Debug.ShouldStop(16); -__ref.getField(false,"_l_ctast" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_VISITAR"))))); - BA.debugLineNum = 390;BA.debugLine="l_porvisitar.Text = e.GetString(\"POR_VISITAR\")"; -Debug.ShouldStop(32); -__ref.getField(false,"_l_porvisitar" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_e" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("POR_VISITAR"))))); - BA.debugLineNum = 391;BA.debugLine="d.Close"; -Debug.ShouldStop(64); -__ref.getField(false,"_d" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 392;BA.debugLine="e.Close"; -Debug.ShouldStop(128); -__ref.getField(false,"_e" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 393;BA.debugLine="b=B4XPages.MainPage.skmt.ExecQuery(\"select count"; -Debug.ShouldStop(256); -__ref.getField(false,"_b" /*RemoteObject*/ ).setObject (parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select count(*) as CUANTOS from noventa")))); - BA.debugLineNum = 394;BA.debugLine="b.Position=0"; -Debug.ShouldStop(512); -__ref.getField(false,"_b" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 395;BA.debugLine="l_cuantosn.Text = b.GetString(\"CUANTOS\")"; -Debug.ShouldStop(1024); -__ref.getField(false,"_l_cuantosn" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_b" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS"))))); - BA.debugLineNum = 396;BA.debugLine="b.close"; -Debug.ShouldStop(2048); -__ref.getField(false,"_b" /*RemoteObject*/ ).runVoidMethod ("Close"); - if (true) break; - -case 44: -//C -this.state = 45; - BA.debugLineNum = 398;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select SUM("; -Debug.ShouldStop(8192); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select SUM(PE_COSTO_TOT) as MONTO_DIA, COUNT(DISTINCT(PE_CLIENTE)) AS CLIENTES_DIA from PEDIDO ")))); - BA.debugLineNum = 399;BA.debugLine="b=B4XPages.MainPage.skmt.ExecQuery(\"select count"; -Debug.ShouldStop(16384); -__ref.getField(false,"_b" /*RemoteObject*/ ).setObject (parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select count(*) as CUANTOS from noventa")))); - BA.debugLineNum = 400;BA.debugLine="c.Position=0"; -Debug.ShouldStop(32768); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 401;BA.debugLine="b.Position=0"; -Debug.ShouldStop(65536); -__ref.getField(false,"_b" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 402;BA.debugLine="L_MONTOD.Text = c.GetString(\"MONTO_DIA\")"; -Debug.ShouldStop(131072); -__ref.getField(false,"_l_montod" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("MONTO_DIA"))))); - BA.debugLineNum = 403;BA.debugLine="l_cuantosc.Text = c.GetString(\"CLIENTES_DIA\")"; -Debug.ShouldStop(262144); -__ref.getField(false,"_l_cuantosc" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CLIENTES_DIA"))))); - BA.debugLineNum = 405;BA.debugLine="D2=B4XPages.MainPage.skmt.ExecQuery(\"select COU"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_d2" /*RemoteObject*/ ).setObject (parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select COUNT(*) AS CUANTOS from PEDIDO ")))); - BA.debugLineNum = 406;BA.debugLine="D2.Position = 0"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_d2" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 407;BA.debugLine="LPT = D2.GetString(\"CUANTOS\") / l_cuantosc.Text"; -Debug.ShouldStop(4194304); -__ref.setField ("_lpt" /*RemoteObject*/ ,BA.NumberToString(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_d2" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))),BA.numberCast(double.class, __ref.getField(false,"_l_cuantosc" /*RemoteObject*/ ).runMethod(true,"getText"))}, "/",0, 0))); - BA.debugLineNum = 408;BA.debugLine="D2.Close"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_d2" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 410;BA.debugLine="l_cuantosn.Text = b.GetString(\"CUANTOS\")"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_l_cuantosn" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_b" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS"))))); - BA.debugLineNum = 411;BA.debugLine="efectiva = c.GetString(\"CLIENTES_DIA\") / e.GetSt"; -Debug.ShouldStop(67108864); -__ref.setField ("_efectiva" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CLIENTES_DIA")))),BA.numberCast(double.class, __ref.getField(false,"_e" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("POR_VISITAR"))))}, "/",0, 0)); - BA.debugLineNum = 412;BA.debugLine="l_efectiva.text = Round2(efectiva*100,2)"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_l_efectiva" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(parent.__c.runMethod(true,"Round2",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_efectiva" /*RemoteObject*/ ),RemoteObject.createImmutable(100)}, "*",0, 0)),(Object)(BA.numberCast(int.class, 2))))); - BA.debugLineNum = 413;BA.debugLine="l_ctast.Text = d.GetString(\"TOTAL_VISITAR\")"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_l_ctast" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_VISITAR"))))); - BA.debugLineNum = 414;BA.debugLine="d.Close"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_d" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 415;BA.debugLine="l_porvisitar.Text = e.GetString(\"POR_VISITAR\")"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_l_porvisitar" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_e" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("POR_VISITAR"))))); - BA.debugLineNum = 416;BA.debugLine="L_CUANTOST.Text = l_cuantosc.Text + l_cuantosn.T"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_l_cuantost" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_l_cuantosc" /*RemoteObject*/ ).runMethod(true,"getText")),BA.numberCast(double.class, __ref.getField(false,"_l_cuantosn" /*RemoteObject*/ ).runMethod(true,"getText"))}, "+",1, 0))); - BA.debugLineNum = 417;BA.debugLine="drop = L_CUANTOST.Text / l_porvisitar.Text"; -Debug.ShouldStop(1); -__ref.setField ("_drop" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_l_cuantost" /*RemoteObject*/ ).runMethod(true,"getText")),BA.numberCast(double.class, __ref.getField(false,"_l_porvisitar" /*RemoteObject*/ ).runMethod(true,"getText"))}, "/",0, 0)); - BA.debugLineNum = 418;BA.debugLine="l_drop.Text = Round(drop * 100)"; -Debug.ShouldStop(2); -__ref.getField(false,"_l_drop" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(parent.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_drop" /*RemoteObject*/ ),RemoteObject.createImmutable(100)}, "*",0, 0))))); - BA.debugLineNum = 419;BA.debugLine="If L_CUANTOST.Text < 40 Then"; -Debug.ShouldStop(4); -if (true) break; - -case 45: -//if -this.state = 52; -if (RemoteObject.solveBoolean("<",BA.numberCast(double.class, __ref.getField(false,"_l_cuantost" /*RemoteObject*/ ).runMethod(true,"getText")),BA.numberCast(double.class, 40))) { -this.state = 47; -}else -{ BA.debugLineNum = 421;BA.debugLine="Else If L_CUANTOST.Text > = 40 And L_CUANTOST."; -Debug.ShouldStop(16); -if (RemoteObject.solveBoolean("g",BA.numberCast(double.class, __ref.getField(false,"_l_cuantost" /*RemoteObject*/ ).runMethod(true,"getText")),BA.numberCast(double.class, 40)) && RemoteObject.solveBoolean("<",BA.numberCast(double.class, __ref.getField(false,"_l_cuantost" /*RemoteObject*/ ).runMethod(true,"getText")),BA.numberCast(double.class, 50))) { -this.state = 49; -}else { -this.state = 51; -}} -if (true) break; - -case 47: -//C -this.state = 52; - BA.debugLineNum = 420;BA.debugLine="ImageView3.Bitmap = LoadBitmap(File.DirAssets,"; -Debug.ShouldStop(8); -__ref.getField(false,"_imageview3" /*RemoteObject*/ ).runMethod(false,"setBitmap",(parent.__c.runMethod(false,"LoadBitmap",(Object)(parent.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(RemoteObject.createImmutable("tache_rojo.png"))).getObject())); - if (true) break; - -case 49: -//C -this.state = 52; - BA.debugLineNum = 422;BA.debugLine="ImageView3.bitmap = LoadBitmap(File.DirAssets,"; -Debug.ShouldStop(32); -__ref.getField(false,"_imageview3" /*RemoteObject*/ ).runMethod(false,"setBitmap",(parent.__c.runMethod(false,"LoadBitmap",(Object)(parent.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(RemoteObject.createImmutable("alerta_amarilla.png"))).getObject())); - if (true) break; - -case 51: -//C -this.state = 52; - BA.debugLineNum = 424;BA.debugLine="ImageView3.Bitmap = LoadBitmap(File.DirAssets,"; -Debug.ShouldStop(128); -__ref.getField(false,"_imageview3" /*RemoteObject*/ ).runMethod(false,"setBitmap",(parent.__c.runMethod(false,"LoadBitmap",(Object)(parent.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(RemoteObject.createImmutable("palomita_verde.png"))).getObject())); - if (true) break; - -case 52: -//C -this.state = 53; -; - BA.debugLineNum = 426;BA.debugLine="L_TICKPROM.Text = Round2((c.GetString(\"MONTO_DI"; -Debug.ShouldStop(512); -__ref.getField(false,"_l_tickprom" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(parent.__c.runMethod(true,"Round2",(Object)((RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("MONTO_DIA")))),BA.numberCast(double.class, __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CLIENTES_DIA"))))}, "/",0, 0))),(Object)(BA.numberCast(int.class, 2))))); - BA.debugLineNum = 427;BA.debugLine="If c.GetString(\"MONTO_DIA\") < 4000 Then"; -Debug.ShouldStop(1024); -if (true) break; - -case 53: -//if -this.state = 60; -if (RemoteObject.solveBoolean("<",BA.numberCast(double.class, __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("MONTO_DIA")))),BA.numberCast(double.class, 4000))) { -this.state = 55; -}else -{ BA.debugLineNum = 429;BA.debugLine="Else if c.GetString(\"MONTO_DIA\") > = 4000 And"; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean("g",BA.numberCast(double.class, __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("MONTO_DIA")))),BA.numberCast(double.class, 4000)) && RemoteObject.solveBoolean("<",BA.numberCast(double.class, __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("MONTO_DIA")))),BA.numberCast(double.class, 6250))) { -this.state = 57; -}else { -this.state = 59; -}} -if (true) break; - -case 55: -//C -this.state = 60; - BA.debugLineNum = 428;BA.debugLine="ImageView5.Bitmap = LoadBitmap(File.DirAssets,"; -Debug.ShouldStop(2048); -__ref.getField(false,"_imageview5" /*RemoteObject*/ ).runMethod(false,"setBitmap",(parent.__c.runMethod(false,"LoadBitmap",(Object)(parent.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(RemoteObject.createImmutable("tache_rojo.png"))).getObject())); - if (true) break; - -case 57: -//C -this.state = 60; - BA.debugLineNum = 430;BA.debugLine="ImageView5.bitmap = LoadBitmap(File.DirAssets,"; -Debug.ShouldStop(8192); -__ref.getField(false,"_imageview5" /*RemoteObject*/ ).runMethod(false,"setBitmap",(parent.__c.runMethod(false,"LoadBitmap",(Object)(parent.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(RemoteObject.createImmutable("alerta_amarilla.png"))).getObject())); - if (true) break; - -case 59: -//C -this.state = 60; - BA.debugLineNum = 432;BA.debugLine="ImageView5.Bitmap = LoadBitmap(File.DirAssets,"; -Debug.ShouldStop(32768); -__ref.getField(false,"_imageview5" /*RemoteObject*/ ).runMethod(false,"setBitmap",(parent.__c.runMethod(false,"LoadBitmap",(Object)(parent.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(RemoteObject.createImmutable("palomita_verde.png"))).getObject())); - if (true) break; - -case 60: -//C -this.state = 61; -; - BA.debugLineNum = 434;BA.debugLine="b.Close"; -Debug.ShouldStop(131072); -__ref.getField(false,"_b" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 435;BA.debugLine="c.Close"; -Debug.ShouldStop(262144); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - if (true) break; - -case 61: -//C -this.state = 62; -; - BA.debugLineNum = 437;BA.debugLine="c.Close"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 438;BA.debugLine="b.Close"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_b" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 439;BA.debugLine="e.Close"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_e" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 440;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select ID_AL"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select ID_ALMACEN from CAT_ALMACEN")))); - BA.debugLineNum = 441;BA.debugLine="C.Position =0"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 442;BA.debugLine="ALMACEN = C.GetString(\"ID_ALMACEN\")"; -Debug.ShouldStop(33554432); -__ref.setField ("_almacen" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("ID_ALMACEN")))); - BA.debugLineNum = 443;BA.debugLine="c.Close"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 444;BA.debugLine="bu.Initialize"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_bu" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.batteryutilities.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 445;BA.debugLine="batterystatus = bu.BatteryInformation"; -Debug.ShouldStop(268435456); -__ref.setField ("_batterystatus" /*RemoteObject*/ ,__ref.getField(false,"_bu" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.batteryutilities.class, "_getbatteryinformation" /*RemoteObject*/ )); - BA.debugLineNum = 448;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select usuari"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select usuario from usuarioa")))); - BA.debugLineNum = 449;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(1); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 450;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(2); -__ref.setField ("_usuario" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")))); - BA.debugLineNum = 451;BA.debugLine="c.Close"; -Debug.ShouldStop(4); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 452;BA.debugLine="B4XPages.MainPage.batt = batterystatus(0)"; -Debug.ShouldStop(8); -parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).setField ("_batt" /*RemoteObject*/ ,__ref.getField(false,"_batterystatus" /*RemoteObject*/ ).getArrayElement(true,BA.numberCast(int.class, 0))); - BA.debugLineNum = 453;BA.debugLine="B4XPages.MainPage.montoActual = L_MONTOD.Text"; -Debug.ShouldStop(16); -parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).setField ("_montoactual" /*RemoteObject*/ ,__ref.getField(false,"_l_montod" /*RemoteObject*/ ).runMethod(true,"getText")); - BA.debugLineNum = 454;BA.debugLine="B4XPages.MainPage.clientestotal = L_CUANTOST.Text"; -Debug.ShouldStop(32); -parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).setField ("_clientestotal" /*RemoteObject*/ ,__ref.getField(false,"_l_cuantost" /*RemoteObject*/ ).runMethod(true,"getText")); - BA.debugLineNum = 455;BA.debugLine="B4XPages.MainPage.clientesventa = l_cuantosc.Tex"; -Debug.ShouldStop(64); -parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).setField ("_clientesventa" /*RemoteObject*/ ,__ref.getField(false,"_l_cuantosc" /*RemoteObject*/ ).runMethod(true,"getText")); - BA.debugLineNum = 456;BA.debugLine="B4XPages.MainPage.clientesvisitados = l_porvisita"; -Debug.ShouldStop(128); -parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).setField ("_clientesvisitados" /*RemoteObject*/ ,__ref.getField(false,"_l_porvisitar" /*RemoteObject*/ ).runMethod(true,"getText")); - BA.debugLineNum = 457;BA.debugLine="B4XPages.MainPage.ALMACEN = ALMACEN"; -Debug.ShouldStop(256); -parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).setField ("_almacen" /*RemoteObject*/ ,__ref.getField(true,"_almacen" /*RemoteObject*/ )); - BA.debugLineNum = 458;BA.debugLine="B4XPages.MainPage.rutapreventa = l_ruta.text"; -Debug.ShouldStop(512); -parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).setField ("_rutapreventa" /*RemoteObject*/ ,__ref.getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"getText")); - BA.debugLineNum = 461;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select usuari"; -Debug.ShouldStop(4096); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select usuario from usuarioa")))); - BA.debugLineNum = 462;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(8192); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 463;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(16384); -__ref.setField ("_usuario" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")))); - BA.debugLineNum = 464;BA.debugLine="B4XPages.MainPage.usuario = usuario"; -Debug.ShouldStop(32768); -parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).setField ("_usuario" /*RemoteObject*/ ,__ref.getField(true,"_usuario" /*RemoteObject*/ )); - BA.debugLineNum = 465;BA.debugLine="c.Close"; -Debug.ShouldStop(65536); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 467;BA.debugLine="CallSub(Starter, \"ENVIA_ULTIMA_GPS\")"; -Debug.ShouldStop(262144); -parent.__c.runMethodAndSync(false,"CallSubNew",__ref.getField(false, "ba"),(Object)((parent._starter.getObject())),(Object)(RemoteObject.createImmutable("ENVIA_ULTIMA_GPS"))); - BA.debugLineNum = 469;BA.debugLine="If l_ruta.Text = 0 Then"; -Debug.ShouldStop(1048576); -if (true) break; - -case 62: -//if -this.state = 67; -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"getText"),BA.NumberToString(0))) { -this.state = 64; -}else { -this.state = 66; -}if (true) break; - -case 64: -//C -this.state = 67; - BA.debugLineNum = 470;BA.debugLine="resdia.Enabled = False"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_resdia" /*RemoteObject*/ ).runMethod(true,"setEnabled",parent.__c.getField(true,"False")); - BA.debugLineNum = 471;BA.debugLine="hacer_ped.Enabled = False"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_hacer_ped" /*RemoteObject*/ ).runMethod(true,"setEnabled",parent.__c.getField(true,"False")); - BA.debugLineNum = 472;BA.debugLine="nvo_cliente.Enabled = False"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_nvo_cliente" /*RemoteObject*/ ).runMethod(true,"setEnabled",parent.__c.getField(true,"False")); - BA.debugLineNum = 473;BA.debugLine="Btn_Ubicar.Enabled = False"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_btn_ubicar" /*RemoteObject*/ ).runMethod(true,"setEnabled",parent.__c.getField(true,"False")); - BA.debugLineNum = 474;BA.debugLine="tickets_dia.Enabled = False"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_tickets_dia" /*RemoteObject*/ ).runMethod(true,"setEnabled",parent.__c.getField(true,"False")); - if (true) break; - -case 66: -//C -this.state = 67; - BA.debugLineNum = 476;BA.debugLine="resdia.Enabled = True"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_resdia" /*RemoteObject*/ ).runMethod(true,"setEnabled",parent.__c.getField(true,"True")); - BA.debugLineNum = 477;BA.debugLine="hacer_ped.Enabled = True"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_hacer_ped" /*RemoteObject*/ ).runMethod(true,"setEnabled",parent.__c.getField(true,"True")); - BA.debugLineNum = 478;BA.debugLine="nvo_cliente.Enabled = True"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_nvo_cliente" /*RemoteObject*/ ).runMethod(true,"setEnabled",parent.__c.getField(true,"True")); - BA.debugLineNum = 479;BA.debugLine="Btn_Ubicar.Enabled = True"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_btn_ubicar" /*RemoteObject*/ ).runMethod(true,"setEnabled",parent.__c.getField(true,"True")); - BA.debugLineNum = 480;BA.debugLine="tickets_dia.Enabled = True"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_tickets_dia" /*RemoteObject*/ ).runMethod(true,"setEnabled",parent.__c.getField(true,"True")); - if (true) break; - -case 67: -//C -this.state = -1; -; - BA.debugLineNum = 482;BA.debugLine="End Sub"; -Debug.ShouldStop(2); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static void _b4xpage_permissionresult(RemoteObject __ref,RemoteObject _permission,RemoteObject _result) throws Exception{ -} -public static RemoteObject _b4xpage_closerequest(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_CloseRequest (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,1686); -if (RapidSub.canDelegate("b4xpage_closerequest")) { return __ref.runUserSub(false, "c_principal","b4xpage_closerequest", __ref);} -ResumableSub_B4XPage_CloseRequest rsub = new ResumableSub_B4XPage_CloseRequest(null,__ref); -rsub.remoteResumableSub = anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSubForFilter(); -rsub.resume(null, null); -return RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.keywords.Common.ResumableSubWrapper"), rsub.remoteResumableSub); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_B4XPage_CloseRequest extends BA.ResumableSub { -public ResumableSub_B4XPage_CloseRequest(keymon.lat.medicomed.c_principal parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.c_principal parent; - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_CloseRequest (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,1686); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -{ -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,RemoteObject.createImmutable(null));return;} -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 1688;BA.debugLine="If SCROLL_RESDIA.Visible Then"; -Debug.ShouldStop(8388608); -if (true) break; - -case 1: -//if -this.state = 8; -if (__ref.getField(false,"_scroll_resdia" /*RemoteObject*/ ).runMethod(true,"getVisible").get().booleanValue()) { -this.state = 3; -}else -{ BA.debugLineNum = 1692;BA.debugLine="Else if Panel5.Visible Then"; -Debug.ShouldStop(134217728); -if (__ref.getField(false,"_panel5" /*RemoteObject*/ ).runMethod(true,"getVisible").get().booleanValue()) { -this.state = 5; -}else { -this.state = 7; -}} -if (true) break; - -case 3: -//C -this.state = 8; - BA.debugLineNum = 1689;BA.debugLine="SCROLL_RESDIA.Visible = False"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_scroll_resdia" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 1690;BA.debugLine="B_OK_RES_Click"; -Debug.ShouldStop(33554432); -__ref.runClassMethod (keymon.lat.medicomed.c_principal.class, "_b_ok_res_click" /*RemoteObject*/ ); - BA.debugLineNum = 1691;BA.debugLine="Return False"; -Debug.ShouldStop(67108864); -if (true) { -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,(parent.__c.getField(true,"False")));return;}; - if (true) break; - -case 5: -//C -this.state = 8; - BA.debugLineNum = 1693;BA.debugLine="B_OK_PANEL5_Click"; -Debug.ShouldStop(268435456); -__ref.runClassMethod (keymon.lat.medicomed.c_principal.class, "_b_ok_panel5_click" /*RemoteObject*/ ); - BA.debugLineNum = 1694;BA.debugLine="Return False"; -Debug.ShouldStop(536870912); -if (true) { -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,(parent.__c.getField(true,"False")));return;}; - if (true) break; - -case 7: -//C -this.state = 8; - BA.debugLineNum = 1696;BA.debugLine="B4XPages.ShowPage(\"login\")"; -Debug.ShouldStop(-2147483648); -parent._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("login"))); - if (true) break; - -case 8: -//C -this.state = -1; -; - BA.debugLineNum = 1698;BA.debugLine="Return False"; -Debug.ShouldStop(2); -if (true) { -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,(parent.__c.getField(true,"False")));return;}; - BA.debugLineNum = 1699;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _b4xpage_created(RemoteObject __ref,RemoteObject _root1) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Created (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,227); -if (RapidSub.canDelegate("b4xpage_created")) { return __ref.runUserSub(false, "c_principal","b4xpage_created", __ref, _root1);} -RemoteObject _ruta = RemoteObject.createImmutable(""); -RemoteObject _ds = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -Debug.locals.put("Root1", _root1); - BA.debugLineNum = 227;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -Debug.ShouldStop(4); - BA.debugLineNum = 228;BA.debugLine="Root = Root1"; -Debug.ShouldStop(8); -__ref.setField ("_root" /*RemoteObject*/ ,_root1); - BA.debugLineNum = 230;BA.debugLine="Root.LoadLayout(\"principal\")"; -Debug.ShouldStop(32); -__ref.getField(false,"_root" /*RemoteObject*/ ).runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("principal")),__ref.getField(false, "ba")); - BA.debugLineNum = 231;BA.debugLine="EJECUTANDO=1"; -Debug.ShouldStop(64); -__ref.setField ("_ejecutando" /*RemoteObject*/ ,BA.NumberToString(1)); - BA.debugLineNum = 232;BA.debugLine="Dim ruta As String"; -Debug.ShouldStop(128); -_ruta = RemoteObject.createImmutable("");Debug.locals.put("ruta", _ruta); - BA.debugLineNum = 233;BA.debugLine="img2.Visible =False"; -Debug.ShouldStop(256); -__ref.getField(false,"_img2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 234;BA.debugLine="ruta = File.DirInternal"; -Debug.ShouldStop(512); -_ruta = c_principal.__c.getField(false,"File").runMethod(true,"getDirInternal");Debug.locals.put("ruta", _ruta); - BA.debugLineNum = 235;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("=",c_principal.__c.getField(false,"File").runMethod(true,"Exists",(Object)(_ruta),(Object)(RemoteObject.createImmutable("kmt.db"))),c_principal.__c.getField(true,"False"))) { - BA.debugLineNum = 236;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; -Debug.ShouldStop(2048); -c_principal.__c.getField(false,"File").runVoidMethod ("Copy",(Object)(c_principal.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(BA.ObjectToString("kmt.db")),(Object)(_ruta),(Object)(RemoteObject.createImmutable("kmt.db"))); - }; - BA.debugLineNum = 238;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; -Debug.ShouldStop(8192); -c_principal.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("MM/dd/yyyy")); - BA.debugLineNum = 239;BA.debugLine="fecha=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(16384); -__ref.setField ("_fecha" /*RemoteObject*/ ,c_principal.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(c_principal.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 240;BA.debugLine="B4XPages.MainPage.skmt.Initialize(ruta,\"kmt.db\","; -Debug.ShouldStop(32768); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(_ruta),(Object)(BA.ObjectToString("kmt.db")),(Object)(c_principal.__c.getField(true,"True"))); - BA.debugLineNum = 241;BA.debugLine="b=B4XPages.MainPage.skmt.ExecQuery(\"Select count("; -Debug.ShouldStop(65536); -__ref.getField(false,"_b" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select count(*) as CUANTOS from pedido_cliente")))); - BA.debugLineNum = 242;BA.debugLine="b.Position=0"; -Debug.ShouldStop(131072); -__ref.getField(false,"_b" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 243;BA.debugLine="Cuantos = b.GetString(\"CUANTOS\")"; -Debug.ShouldStop(262144); -__ref.setField ("_cuantos" /*RemoteObject*/ ,__ref.getField(false,"_b" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))); - BA.debugLineNum = 244;BA.debugLine="b.Close"; -Debug.ShouldStop(524288); -__ref.getField(false,"_b" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 245;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"select count("; -Debug.ShouldStop(1048576); -__ref.getField(false,"_d" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select count(*) as TOTAL_VISITAR from kmt_info where gestion = 0")))); - BA.debugLineNum = 246;BA.debugLine="d.Position=0"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 247;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery(\"select count("; -Debug.ShouldStop(4194304); -__ref.getField(false,"_e" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select count(*) as POR_VISITAR from kmt_info")))); - BA.debugLineNum = 248;BA.debugLine="e.Position=0"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_e" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 249;BA.debugLine="f=B4XPages.MainPage.skmt.ExecQuery(\"select count("; -Debug.ShouldStop(16777216); -__ref.getField(false,"_f" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select count(*) as CAT_CL_RUTA from kmt_info")))); - BA.debugLineNum = 250;BA.debugLine="f.Position=0"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 251;BA.debugLine="l_ruta.Text = f.GetString(\"CAT_CL_RUTA\")"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_RUTA"))))); - BA.debugLineNum = 252;BA.debugLine="f.Close"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_f" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 253;BA.debugLine="If l_ruta.Text = 0 Then"; -Debug.ShouldStop(268435456); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"getText"),BA.NumberToString(0))) { - BA.debugLineNum = 254;BA.debugLine="l_ruta.Text =0"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(0)); - }else { - BA.debugLineNum = 256;BA.debugLine="f=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_C"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_f" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_CL_RUTA from kmt_info")))); - BA.debugLineNum = 257;BA.debugLine="f.Position=0"; -Debug.ShouldStop(1); -__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 258;BA.debugLine="l_ruta.Text = f.GetString(\"CAT_CL_RUTA\")"; -Debug.ShouldStop(2); -__ref.getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_f" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_RUTA"))))); - BA.debugLineNum = 259;BA.debugLine="f.Close"; -Debug.ShouldStop(4); -__ref.getField(false,"_f" /*RemoteObject*/ ).runVoidMethod ("Close"); - }; - BA.debugLineNum = 261;BA.debugLine="If Cuantos = 0 Then"; -Debug.ShouldStop(16); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_cuantos" /*RemoteObject*/ ),BA.NumberToString(0))) { - BA.debugLineNum = 262;BA.debugLine="L_MONTOD.Text =0"; -Debug.ShouldStop(32); -__ref.getField(false,"_l_montod" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(0)); - BA.debugLineNum = 263;BA.debugLine="l_cuantosc.Text = 0"; -Debug.ShouldStop(64); -__ref.getField(false,"_l_cuantosc" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(0)); - BA.debugLineNum = 264;BA.debugLine="l_cuantosn.Text = 0"; -Debug.ShouldStop(128); -__ref.getField(false,"_l_cuantosn" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(0)); - BA.debugLineNum = 265;BA.debugLine="drop = 0"; -Debug.ShouldStop(256); -__ref.setField ("_drop" /*RemoteObject*/ ,BA.numberCast(double.class, 0)); - BA.debugLineNum = 266;BA.debugLine="l_drop.Text = 0"; -Debug.ShouldStop(512); -__ref.getField(false,"_l_drop" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(0)); - BA.debugLineNum = 267;BA.debugLine="efectiva = 0"; -Debug.ShouldStop(1024); -__ref.setField ("_efectiva" /*RemoteObject*/ ,BA.numberCast(double.class, 0)); - BA.debugLineNum = 268;BA.debugLine="l_efectiva.text =0"; -Debug.ShouldStop(2048); -__ref.getField(false,"_l_efectiva" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(0)); - BA.debugLineNum = 269;BA.debugLine="l_ctast.Text = d.GetString(\"TOTAL_VISITAR\")"; -Debug.ShouldStop(4096); -__ref.getField(false,"_l_ctast" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_VISITAR"))))); - BA.debugLineNum = 270;BA.debugLine="l_porvisitar.Text = e.GetString(\"POR_VISITAR\")"; -Debug.ShouldStop(8192); -__ref.getField(false,"_l_porvisitar" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_e" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("POR_VISITAR"))))); - }else { - BA.debugLineNum = 272;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(p"; -Debug.ShouldStop(32768); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select sum(pc_monto) as MONTO_DIA, count(pc_cliente) AS CLIENTES_DIA from pedido_cliente ")))); - BA.debugLineNum = 273;BA.debugLine="b=B4XPages.MainPage.skmt.ExecQuery(\"select count"; -Debug.ShouldStop(65536); -__ref.getField(false,"_b" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select count(*) as CUANTOS from noventa")))); - BA.debugLineNum = 275;BA.debugLine="c.Position=0"; -Debug.ShouldStop(262144); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 276;BA.debugLine="b.Position=0"; -Debug.ShouldStop(524288); -__ref.getField(false,"_b" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 277;BA.debugLine="L_MONTOD.Text = c.GetString(\"MONTO_DIA\")"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_l_montod" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("MONTO_DIA"))))); - BA.debugLineNum = 278;BA.debugLine="l_cuantosc.Text = c.GetString(\"CLIENTES_DIA\")"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_l_cuantosc" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CLIENTES_DIA"))))); - BA.debugLineNum = 279;BA.debugLine="l_cuantosn.Text = b.GetString(\"CUANTOS\")"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_l_cuantosn" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_b" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS"))))); - BA.debugLineNum = 280;BA.debugLine="drop = c.GetString(\"MONTO_DIA\") / c.GetString(\"C"; -Debug.ShouldStop(8388608); -__ref.setField ("_drop" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("MONTO_DIA")))),BA.numberCast(double.class, __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CLIENTES_DIA"))))}, "/",0, 0)); - BA.debugLineNum = 281;BA.debugLine="l_drop.Text = Round2(drop,2)"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_l_drop" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(c_principal.__c.runMethod(true,"Round2",(Object)(__ref.getField(true,"_drop" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 2))))); - BA.debugLineNum = 282;BA.debugLine="efectiva = c.GetString(\"CLIENTES_DIA\") / e.GetSt"; -Debug.ShouldStop(33554432); -__ref.setField ("_efectiva" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CLIENTES_DIA")))),BA.numberCast(double.class, __ref.getField(false,"_e" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("POR_VISITAR"))))}, "/",0, 0)); - BA.debugLineNum = 283;BA.debugLine="l_efectiva.text = Round2(efectiva*100,2)"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_l_efectiva" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(c_principal.__c.runMethod(true,"Round2",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_efectiva" /*RemoteObject*/ ),RemoteObject.createImmutable(100)}, "*",0, 0)),(Object)(BA.numberCast(int.class, 2))))); - BA.debugLineNum = 284;BA.debugLine="l_ctast.Text = d.GetString(\"TOTAL_VISITAR\")"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_l_ctast" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_VISITAR"))))); - BA.debugLineNum = 285;BA.debugLine="l_porvisitar.Text = e.GetString(\"POR_VISITAR\")"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_l_porvisitar" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_e" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("POR_VISITAR"))))); - BA.debugLineNum = 286;BA.debugLine="b.Close"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_b" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 287;BA.debugLine="c.Close"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - }; - BA.debugLineNum = 289;BA.debugLine="d.Close"; -Debug.ShouldStop(1); -__ref.getField(false,"_d" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 290;BA.debugLine="e.Close"; -Debug.ShouldStop(2); -__ref.getField(false,"_e" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 291;BA.debugLine="Private ds As Cursor = B4XPages.MainPage.skmt.Exe"; -Debug.ShouldStop(4); -_ds = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -_ds = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select cat_cl_diasemana from kmt_info"))));Debug.locals.put("ds", _ds);Debug.locals.put("ds", _ds); - BA.debugLineNum = 292;BA.debugLine="If ds.RowCount > 0 Then"; -Debug.ShouldStop(8); -if (RemoteObject.solveBoolean(">",_ds.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 293;BA.debugLine="ds.Position = 0"; -Debug.ShouldStop(16); -_ds.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 294;BA.debugLine="Starter.dia_semana = ds.GetString(\"CAT_CL_DIASEM"; -Debug.ShouldStop(32); -c_principal._starter._dia_semana /*RemoteObject*/ = _ds.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_DIASEMANA"))); - }; - BA.debugLineNum = 299;BA.debugLine="End Sub"; -Debug.ShouldStop(1024); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _btn_ubicar_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Btn_Ubicar_Click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,2161); -if (RapidSub.canDelegate("btn_ubicar_click")) { __ref.runUserSub(false, "c_principal","btn_ubicar_click", __ref); return;} -ResumableSub_Btn_Ubicar_Click rsub = new ResumableSub_Btn_Ubicar_Click(null,__ref); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_Btn_Ubicar_Click extends BA.ResumableSub { -public ResumableSub_Btn_Ubicar_Click(keymon.lat.medicomed.c_principal parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.c_principal parent; -RemoteObject _permission = RemoteObject.createImmutable(""); -RemoteObject _result = RemoteObject.createImmutable(false); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("Btn_Ubicar_Click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,2161); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 2162;BA.debugLine="rp.CheckAndRequest(rp.PERMISSION_ACCESS_FINE_LOCA"; -Debug.ShouldStop(131072); -__ref.getField(false,"_rp" /*RemoteObject*/ ).runVoidMethod ("CheckAndRequest",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_rp" /*RemoteObject*/ ).getField(true,"PERMISSION_ACCESS_FINE_LOCATION"))); - BA.debugLineNum = 2163;BA.debugLine="Wait For B4XPage_PermissionResult (Permission As"; -Debug.ShouldStop(262144); -parent.__c.runVoidMethod ("WaitFor","b4xpage_permissionresult", __ref.getField(false, "ba"), anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "c_principal", "btn_ubicar_click"), null); -this.state = 5; -return; -case 5: -//C -this.state = 1; -_permission = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(1));Debug.locals.put("Permission", _permission); -_result = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(2));Debug.locals.put("Result", _result); -; - BA.debugLineNum = 2164;BA.debugLine="If Result Then"; -Debug.ShouldStop(524288); -if (true) break; - -case 1: -//if -this.state = 4; -if (_result.get().booleanValue()) { -this.state = 3; -}if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 2165;BA.debugLine="StartActivity(MAPA_RUTAS)"; -Debug.ShouldStop(1048576); -parent.__c.runVoidMethod ("StartActivity",__ref.getField(false, "ba"),(Object)((parent._mapa_rutas.getObject()))); - if (true) break; - -case 4: -//C -this.state = -1; -; - BA.debugLineNum = 2167;BA.debugLine="End Sub"; -Debug.ShouldStop(4194304); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _busca_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("BUSCA_Click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,1763); -if (RapidSub.canDelegate("busca_click")) { return __ref.runUserSub(false, "c_principal","busca_click", __ref);} - BA.debugLineNum = 1763;BA.debugLine="Sub BUSCA_Click"; -Debug.ShouldStop(4); - BA.debugLineNum = 1764;BA.debugLine="B4XPages.ShowPage(\"TicketsDia\")"; -Debug.ShouldStop(8); -c_principal._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("TicketsDia"))); - BA.debugLineNum = 1765;BA.debugLine="End Sub"; -Debug.ShouldStop(16); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _carga_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("CARGA_Click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,1979); -if (RapidSub.canDelegate("carga_click")) { return __ref.runUserSub(false, "c_principal","carga_click", __ref);} - BA.debugLineNum = 1979;BA.debugLine="Sub CARGA_Click"; -Debug.ShouldStop(67108864); - BA.debugLineNum = 1980;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; -Debug.ShouldStop(134217728); -c_principal._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Productos"))); - BA.debugLineNum = 1981;BA.debugLine="End Sub"; -Debug.ShouldStop(268435456); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _cargar_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("cargar_Click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,777); -if (RapidSub.canDelegate("cargar_click")) { return __ref.runUserSub(false, "c_principal","cargar_click", __ref);} - BA.debugLineNum = 777;BA.debugLine="Sub cargar_Click"; -Debug.ShouldStop(256); - BA.debugLineNum = 778;BA.debugLine="CARGA = \"CARGAR\""; -Debug.ShouldStop(512); -__ref.setField ("_carga" /*RemoteObject*/ ,BA.ObjectToString("CARGAR")); - BA.debugLineNum = 779;BA.debugLine="p_mandaInfo.Width = Root.Width"; -Debug.ShouldStop(1024); -__ref.getField(false,"_p_mandainfo" /*RemoteObject*/ ).runMethod(true,"setWidth",__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth")); - BA.debugLineNum = 780;BA.debugLine="p_mandaInfo.Height = Root.Height"; -Debug.ShouldStop(2048); -__ref.getField(false,"_p_mandainfo" /*RemoteObject*/ ).runMethod(true,"setHeight",__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getHeight")); - BA.debugLineNum = 781;BA.debugLine="P1.Left = (p_mandaInfo.Width/2) - (P1.Width/2)"; -Debug.ShouldStop(4096); -__ref.getField(false,"_p1" /*RemoteObject*/ ).runMethod(true,"setLeft",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_p_mandainfo" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0)),(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_p1" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0))}, "-",1, 0))); - BA.debugLineNum = 782;BA.debugLine="P1.top = (p_mandaInfo.Height/2) - (P1.Height/2)"; -Debug.ShouldStop(8192); -__ref.getField(false,"_p1" /*RemoteObject*/ ).runMethod(true,"setTop",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_p_mandainfo" /*RemoteObject*/ ).runMethod(true,"getHeight"),RemoteObject.createImmutable(2)}, "/",0, 0)),(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_p1" /*RemoteObject*/ ).runMethod(true,"getHeight"),RemoteObject.createImmutable(2)}, "/",0, 0))}, "-",1, 0))); - BA.debugLineNum = 783;BA.debugLine="img2.Visible =True"; -Debug.ShouldStop(16384); -__ref.getField(false,"_img2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 784;BA.debugLine="L_P_1.Visible = True"; -Debug.ShouldStop(32768); -__ref.getField(false,"_l_p_1" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 785;BA.debugLine="S_CC.Visible = True"; -Debug.ShouldStop(65536); -__ref.getField(false,"_s_cc" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 786;BA.debugLine="Btn_Ubicar.Visible=False"; -Debug.ShouldStop(131072); -__ref.getField(false,"_btn_ubicar" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 787;BA.debugLine="P1.Visible = True"; -Debug.ShouldStop(262144); -__ref.getField(false,"_p1" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 788;BA.debugLine="p_mandaInfo.Visible = True"; -Debug.ShouldStop(524288); -__ref.getField(false,"_p_mandainfo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 789;BA.debugLine="p_principal.Visible = False"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_p_principal" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 790;BA.debugLine="Subs.panelVisible(P1, 0, 0)"; -Debug.ShouldStop(2097152); -c_principal._subs.runVoidMethod ("_panelvisible" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_p1" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 791;BA.debugLine="Subs.centraPanel(P1, Root.Width)"; -Debug.ShouldStop(4194304); -c_principal._subs.runVoidMethod ("_centrapanel" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_p1" /*RemoteObject*/ )),(Object)(__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"))); - BA.debugLineNum = 792;BA.debugLine="Subs.centraPanelV(P1, Root.Height)"; -Debug.ShouldStop(8388608); -c_principal._subs.runVoidMethod ("_centrapanelv" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_p1" /*RemoteObject*/ )),(Object)(__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getHeight"))); - BA.debugLineNum = 794;BA.debugLine="NUEVO.Visible =False"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_nuevo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 795;BA.debugLine="BUSCA.Visible=False"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_busca" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 796;BA.debugLine="connecta.Visible=False"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_connecta" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 797;BA.debugLine="L_P_3.Visible = True"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_l_p_3" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 798;BA.debugLine="S_CH.Visible = True"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_s_ch" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 799;BA.debugLine="PB1.Visible = True"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_pb1" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 800;BA.debugLine="Resumen.Visible= False"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_resumen" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 802;BA.debugLine="L_P_1.Text = \"Catalogo de Clientes\""; -Debug.ShouldStop(2); -__ref.getField(false,"_l_p_1" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("Catalogo de Clientes")); - BA.debugLineNum = 803;BA.debugLine="L_P_2.Text = \"Catalogos de Productos\""; -Debug.ShouldStop(4); -__ref.getField(false,"_l_p_2" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("Catalogos de Productos")); - BA.debugLineNum = 804;BA.debugLine="L_P_3.Text = \"Catalogos Historicos\""; -Debug.ShouldStop(8); -__ref.getField(false,"_l_p_3" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("Catalogos Historicos")); - BA.debugLineNum = 805;BA.debugLine="S_CC.Text = \"EN PROCESO\""; -Debug.ShouldStop(16); -__ref.getField(false,"_s_cc" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("EN PROCESO")); - BA.debugLineNum = 806;BA.debugLine="S_CH.Text = \"EN PROCESO\""; -Debug.ShouldStop(32); -__ref.getField(false,"_s_ch" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("EN PROCESO")); - BA.debugLineNum = 807;BA.debugLine="S_CP.Text = \"EN PROCESO\""; -Debug.ShouldStop(64); -__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("EN PROCESO")); - BA.debugLineNum = 808;BA.debugLine="PB1.Progress = 0"; -Debug.ShouldStop(128); -__ref.getField(false,"_pb1" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 0)); - BA.debugLineNum = 809;BA.debugLine="PB2.Progress = 0"; -Debug.ShouldStop(256); -__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 0)); - BA.debugLineNum = 810;BA.debugLine="EJECUTANDO = 1"; -Debug.ShouldStop(512); -__ref.setField ("_ejecutando" /*RemoteObject*/ ,BA.NumberToString(1)); - BA.debugLineNum = 813;BA.debugLine="TOPE = 0"; -Debug.ShouldStop(4096); -__ref.setField ("_tope" /*RemoteObject*/ ,BA.numberCast(int.class, 0)); - BA.debugLineNum = 816;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(32768); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from kmt_info"))); - BA.debugLineNum = 817;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(65536); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from cod_result"))); - BA.debugLineNum = 818;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(131072); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from hist_gest"))); - BA.debugLineNum = 819;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(262144); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from cat_gunaprod"))); - BA.debugLineNum = 820;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(524288); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from CAT_DETALLES_PAQ"))); - BA.debugLineNum = 821;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(1048576); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from telefonos"))); - BA.debugLineNum = 822;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(2097152); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from HIST_VENTAS"))); - BA.debugLineNum = 823;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(4194304); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from HIST_PROMOS"))); - BA.debugLineNum = 824;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(8388608); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from HIST_CLIENTE_CANT_PROMOS"))); - BA.debugLineNum = 825;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(16777216); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from PROMOS_COMP"))); - BA.debugLineNum = 826;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(33554432); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from CAT_VERIFICACION"))); - BA.debugLineNum = 827;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FROM"; -Debug.ShouldStop(67108864); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("DELETE FROM MARCAS_RUTAS"))); - BA.debugLineNum = 828;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FROM"; -Debug.ShouldStop(134217728); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("DELETE FROM HIST_STAY_STORE"))); - BA.debugLineNum = 829;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FROM"; -Debug.ShouldStop(268435456); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("DELETE FROM HIST_GEOCERCA"))); - BA.debugLineNum = 830;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FROM"; -Debug.ShouldStop(536870912); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("DELETE FROM HIST_MARCAS_CUOTAS"))); - BA.debugLineNum = 831;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FROM"; -Debug.ShouldStop(1073741824); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("DELETE FROM HIST_AVANCE"))); - BA.debugLineNum = 833;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery2(\"select cou"; -Debug.ShouldStop(1); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select count(CAT_VA_DESCRIPCION) as HoraIngreso from cat_variables where CAT_VA_DESCRIPCION = ? ")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("HoraIngreso")})))); - BA.debugLineNum = 834;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(2); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 835;BA.debugLine="DateTime.TimeFormat = \"HHmmss\""; -Debug.ShouldStop(4); -c_principal.__c.getField(false,"DateTime").runMethod(true,"setTimeFormat",BA.ObjectToString("HHmmss")); - BA.debugLineNum = 837;BA.debugLine="If c.GetString(\"HoraIngreso\") > 0 Then"; -Debug.ShouldStop(16); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HoraIngreso")))),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 838;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"Update cat"; -Debug.ShouldStop(32); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("Update cat_variables set CAT_VA_VALOR = ? WHERE CAT_VA_DESCRIPCION = ?")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("String",new int[] {2},new Object[] {c_principal.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_principal.__c.getField(false,"DateTime").runMethod(true,"getNow"))),RemoteObject.createImmutable("HoraIngreso")}))))); - }else { - BA.debugLineNum = 840;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -Debug.ShouldStop(128); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO CAT_VARIABLES(CAT_VA_VALOR,CAT_VA_DESCRIPCION) VALUES (?,?)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("String",new int[] {2},new Object[] {c_principal.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_principal.__c.getField(false,"DateTime").runMethod(true,"getNow"))),RemoteObject.createImmutable("HoraIngreso")}))))); - }; - BA.debugLineNum = 842;BA.debugLine="c.Close"; -Debug.ShouldStop(512); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 843;BA.debugLine="DateTime.TimeFormat = \"HH:mm:ss\""; -Debug.ShouldStop(1024); -c_principal.__c.getField(false,"DateTime").runMethod(true,"setTimeFormat",BA.ObjectToString("HH:mm:ss")); - BA.debugLineNum = 844;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select usuari"; -Debug.ShouldStop(2048); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select usuario from usuarioa")))); - BA.debugLineNum = 845;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(4096); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 846;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(8192); -__ref.setField ("_usuario" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")))); - BA.debugLineNum = 847;BA.debugLine="c.Close"; -Debug.ShouldStop(16384); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 849;BA.debugLine="Dim sDate,sTime As String"; -Debug.ShouldStop(65536); -c_principal._sdate = RemoteObject.createImmutable("");__ref.setField("_sdate",c_principal._sdate); -c_principal._stime = RemoteObject.createImmutable("");__ref.setField("_stime",c_principal._stime); - BA.debugLineNum = 850;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; -Debug.ShouldStop(131072); -c_principal.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("MM/dd/yyyy")); - BA.debugLineNum = 851;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(262144); -__ref.setField ("_sdate" /*RemoteObject*/ ,c_principal.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(c_principal.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 852;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -Debug.ShouldStop(524288); -__ref.setField ("_stime" /*RemoteObject*/ ,c_principal.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_principal.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 854;BA.debugLine="Dim P As PhoneId"; -Debug.ShouldStop(2097152); -c_principal._p = RemoteObject.createNew ("anywheresoftware.b4a.phone.Phone.PhoneId");__ref.setField("_p",c_principal._p); - BA.debugLineNum = 856;BA.debugLine="imei = \"yyyy\""; -Debug.ShouldStop(8388608); -__ref.setField ("_imei" /*RemoteObject*/ ,BA.ObjectToString("yyyy")); - BA.debugLineNum = 857;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 858;BA.debugLine="cmd.Name =\"insert_drop_MEDI_2\""; -Debug.ShouldStop(33554432); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("insert_drop_MEDI_2")); - BA.debugLineNum = 859;BA.debugLine="cmd.Parameters = Array As Object(usuario,l_ruta.T"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {11},new Object[] {(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(__ref.getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"getText")),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(__ref.getField(false,"_l_porvisitar" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_drop" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_efectiva" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_cuantosc" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_cuantosn" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_montod" /*RemoteObject*/ ).runMethod(true,"getText")),RemoteObject.createImmutable(("CARGA")),(__ref.getField(true,"_almacen" /*RemoteObject*/ ))})); - BA.debugLineNum = 860;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cmd ,"; -Debug.ShouldStop(134217728); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)((RemoteObject.createImmutable("inst_noventa")))); - BA.debugLineNum = 862;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 863;BA.debugLine="cmd.Name = \"select_cat_gunaprod_MEDI\""; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_cat_gunaprod_MEDI")); - BA.debugLineNum = 864;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(true,"_almacen" /*RemoteObject*/ ))})); - BA.debugLineNum = 865;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -Debug.ShouldStop(1); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("gunaprod")))); - BA.debugLineNum = 872;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(128); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 873;BA.debugLine="cmd.Name = \"select_cat_paquetes_MEDI3\""; -Debug.ShouldStop(256); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_cat_paquetes_MEDI3")); - BA.debugLineNum = 874;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; -Debug.ShouldStop(512); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(true,"_almacen" /*RemoteObject*/ ))})); - BA.debugLineNum = 875;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -Debug.ShouldStop(1024); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("gunaprodp")))); - BA.debugLineNum = 877;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(4096); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 878;BA.debugLine="cmd.Name = \"select_cat_paquetess_MEDI\""; -Debug.ShouldStop(8192); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_cat_paquetess_MEDI")); - BA.debugLineNum = 879;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; -Debug.ShouldStop(16384); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(true,"_almacen" /*RemoteObject*/ ))})); - BA.debugLineNum = 880;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -Debug.ShouldStop(32768); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("gunaprodp")))); - BA.debugLineNum = 882;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(131072); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 883;BA.debugLine="cmd.Name = \"select_cat_detallepa_MEDI\""; -Debug.ShouldStop(262144); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_cat_detallepa_MEDI")); - BA.debugLineNum = 884;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; -Debug.ShouldStop(524288); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(true,"_almacen" /*RemoteObject*/ ))})); - BA.debugLineNum = 885;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -Debug.ShouldStop(1048576); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("detallepaq")))); - BA.debugLineNum = 887;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 888;BA.debugLine="cmd.Name = \"select_cat_clientes_MEDI\""; -Debug.ShouldStop(8388608); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_cat_clientes_MEDI")); - BA.debugLineNum = 889;BA.debugLine="cmd.Parameters = Array As Object(e_ruta.text, ALM"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_e_ruta" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(true,"_almacen" /*RemoteObject*/ ))})); - BA.debugLineNum = 890;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -Debug.ShouldStop(33554432); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("kmt_datos")))); - BA.debugLineNum = 892;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 893;BA.debugLine="cmd.Name = \"select_hist_datos_MEDI_2\""; -Debug.ShouldStop(268435456); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_hist_datos_MEDI_2")); - BA.debugLineNum = 894;BA.debugLine="cmd.Parameters = Array As Object(e_ruta.text, ALM"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {4},new Object[] {(__ref.getField(false,"_e_ruta" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(__ref.getField(false,"_e_ruta" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(true,"_almacen" /*RemoteObject*/ ))})); - BA.debugLineNum = 895;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -Debug.ShouldStop(1073741824); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("hist_datos")))); - BA.debugLineNum = 897;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(1); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 898;BA.debugLine="cmd.Name = \"select_hist_promos_MEDI\""; -Debug.ShouldStop(2); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_hist_promos_MEDI")); - BA.debugLineNum = 899;BA.debugLine="cmd.Parameters = Array As Object(e_ruta.text, ALM"; -Debug.ShouldStop(4); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_e_ruta" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(true,"_almacen" /*RemoteObject*/ ))})); - BA.debugLineNum = 900;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -Debug.ShouldStop(8); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("hist_promos")))); - BA.debugLineNum = 902;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(32); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 903;BA.debugLine="cmd.Name = \"select_hist_cliente_promos_MEDI\""; -Debug.ShouldStop(64); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_hist_cliente_promos_MEDI")); - BA.debugLineNum = 904;BA.debugLine="cmd.Parameters = Array As Object(e_ruta.text, ALM"; -Debug.ShouldStop(128); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_e_ruta" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(true,"_almacen" /*RemoteObject*/ ))})); - BA.debugLineNum = 905;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -Debug.ShouldStop(256); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("hist_cliente_promos")))); - BA.debugLineNum = 912;BA.debugLine="If E_RUTA2.text <> \"\" Then"; -Debug.ShouldStop(32768); -if (RemoteObject.solveBoolean("!",__ref.getField(false,"_e_ruta2" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString(""))) { - BA.debugLineNum = 913;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(65536); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 914;BA.debugLine="cmd.Name = \"select_cat_clientes_MEDI\""; -Debug.ShouldStop(131072); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_cat_clientes_MEDI")); - BA.debugLineNum = 915;BA.debugLine="cmd.Parameters = Array As Object(E_RUTA2.text, A"; -Debug.ShouldStop(262144); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_e_ruta2" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(true,"_almacen" /*RemoteObject*/ ))})); - BA.debugLineNum = 916;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd ,"; -Debug.ShouldStop(524288); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("kmt_datos")))); - BA.debugLineNum = 918;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 919;BA.debugLine="cmd.Name = \"select_hist_datos_MEDI\""; -Debug.ShouldStop(4194304); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_hist_datos_MEDI")); - BA.debugLineNum = 920;BA.debugLine="cmd.Parameters = Array As Object(E_RUTA2.text, A"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_e_ruta2" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(true,"_almacen" /*RemoteObject*/ ))})); - BA.debugLineNum = 921;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd ,"; -Debug.ShouldStop(16777216); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("hist_datos")))); - BA.debugLineNum = 923;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 924;BA.debugLine="cmd.Name = \"select_hist_promos_MEDI\""; -Debug.ShouldStop(134217728); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_hist_promos_MEDI")); - BA.debugLineNum = 925;BA.debugLine="cmd.Parameters = Array As Object(E_RUTA2.text, A"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_e_ruta2" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(true,"_almacen" /*RemoteObject*/ ))})); - BA.debugLineNum = 926;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd ,"; -Debug.ShouldStop(536870912); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("hist_promos")))); - BA.debugLineNum = 928;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 929;BA.debugLine="cmd.Name = \"select_hist_cliente_promos_MEDI\""; -Debug.ShouldStop(1); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_hist_cliente_promos_MEDI")); - BA.debugLineNum = 930;BA.debugLine="cmd.Parameters = Array As Object(E_RUTA2.text, A"; -Debug.ShouldStop(2); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_e_ruta2" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(true,"_almacen" /*RemoteObject*/ ))})); - BA.debugLineNum = 931;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd ,"; -Debug.ShouldStop(4); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("hist_cliente_promos")))); - }; - BA.debugLineNum = 934;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(32); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 935;BA.debugLine="cmd.Name = \"select_promo_comp_MEDI\""; -Debug.ShouldStop(64); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_promo_comp_MEDI")); - BA.debugLineNum = 936;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; -Debug.ShouldStop(128); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(true,"_almacen" /*RemoteObject*/ ))})); - BA.debugLineNum = 937;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -Debug.ShouldStop(256); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("hist_comp_promos")))); - BA.debugLineNum = 944;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(32768); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 945;BA.debugLine="cmd.Name = \"select_fecha\""; -Debug.ShouldStop(65536); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_fecha")); - BA.debugLineNum = 946;BA.debugLine="cmd.Parameters = Array As Object(e_ruta.text, ALM"; -Debug.ShouldStop(131072); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_e_ruta" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(true,"_almacen" /*RemoteObject*/ ))})); - BA.debugLineNum = 947;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -Debug.ShouldStop(262144); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("fecha")))); - BA.debugLineNum = 949;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 950;BA.debugLine="cmd.Name = \"select_folio_MEDI\""; -Debug.ShouldStop(2097152); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_folio_MEDI")); - BA.debugLineNum = 951;BA.debugLine="cmd.Parameters = Array As Object(e_ruta.text, ALM"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_e_ruta" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(true,"_almacen" /*RemoteObject*/ ))})); - BA.debugLineNum = 952;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -Debug.ShouldStop(8388608); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("folio")))); - BA.debugLineNum = 954;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 955;BA.debugLine="cmd.Name = \"select_marcas_rutas_MEDI\""; -Debug.ShouldStop(67108864); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_marcas_rutas_MEDI")); - BA.debugLineNum = 956;BA.debugLine="cmd.Parameters = Array As Object( ALMACEN, e_ruta"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(__ref.getField(false,"_e_ruta" /*RemoteObject*/ ).runMethod(true,"getText"))})); - BA.debugLineNum = 957;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -Debug.ShouldStop(268435456); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("marcas_rutas")))); - BA.debugLineNum = 980;BA.debugLine="cargar.Visible = False"; -Debug.ShouldStop(524288); -__ref.getField(false,"_cargar" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 981;BA.debugLine="Subir.Visible = False"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_subir" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 982;BA.debugLine="inv.Visible = False"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_inv" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 983;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessageSh"; -Debug.ShouldStop(4194304); -if (RemoteObject.solveBoolean("!",c_principal._starter._marcacel /*RemoteObject*/ ,BA.ObjectToString("Sony"))) { -c_principal.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Se Actualizaran los datos, Este proceso podria tardar hasta un minuto, gracias")),(Object)(c_principal.__c.getField(true,"True")));}; - BA.debugLineNum = 984;BA.debugLine="End Sub"; -Debug.ShouldStop(8388608); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Public rp As RuntimePermissions"; -c_principal._rp = RemoteObject.createNew ("anywheresoftware.b4a.objects.RuntimePermissions");__ref.setField("_rp",c_principal._rp); - //BA.debugLineNum = 3;BA.debugLine="Private Root As B4XView 'ignore"; -c_principal._root = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_root",c_principal._root); - //BA.debugLineNum = 4;BA.debugLine="Private xui As XUI 'ignore"; -c_principal._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",c_principal._xui); - //BA.debugLineNum = 5;BA.debugLine="Dim reqManager As DBRequestManager"; -c_principal._reqmanager = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager");__ref.setField("_reqmanager",c_principal._reqmanager); - //BA.debugLineNum = 6;BA.debugLine="Dim conectado As String"; -c_principal._conectado = RemoteObject.createImmutable("");__ref.setField("_conectado",c_principal._conectado); - //BA.debugLineNum = 7;BA.debugLine="Dim t1 As Timer"; -c_principal._t1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.Timer");__ref.setField("_t1",c_principal._t1); - //BA.debugLineNum = 8;BA.debugLine="Dim sb As StringBuilder"; -c_principal._sb = RemoteObject.createNew ("anywheresoftware.b4a.keywords.StringBuilderWrapper");__ref.setField("_sb",c_principal._sb); - //BA.debugLineNum = 9;BA.debugLine="Dim PHONE As Phone"; -c_principal._phone = RemoteObject.createNew ("anywheresoftware.b4a.phone.Phone");__ref.setField("_phone",c_principal._phone); - //BA.debugLineNum = 10;BA.debugLine="Dim g As GPS"; -c_principal._g = RemoteObject.createNew ("anywheresoftware.b4a.gps.GPS");__ref.setField("_g",c_principal._g); - //BA.debugLineNum = 11;BA.debugLine="Dim trabajar As Button"; -c_principal._trabajar = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_trabajar",c_principal._trabajar); - //BA.debugLineNum = 13;BA.debugLine="Dim c As Cursor"; -c_principal._c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_c",c_principal._c); - //BA.debugLineNum = 14;BA.debugLine="Dim d As Cursor"; -c_principal._d = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_d",c_principal._d); - //BA.debugLineNum = 15;BA.debugLine="Dim b As Cursor"; -c_principal._b = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_b",c_principal._b); - //BA.debugLineNum = 16;BA.debugLine="Dim e As Cursor"; -c_principal._e = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_e",c_principal._e); - //BA.debugLineNum = 17;BA.debugLine="Dim f As Cursor"; -c_principal._f = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_f",c_principal._f); - //BA.debugLineNum = 18;BA.debugLine="Dim D2 As Cursor"; -c_principal._d2 = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_d2",c_principal._d2); - //BA.debugLineNum = 19;BA.debugLine="Dim dd As Cursor"; -c_principal._dd = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_dd",c_principal._dd); - //BA.debugLineNum = 20;BA.debugLine="Dim lv As ListView"; -c_principal._lv = RemoteObject.createNew ("anywheresoftware.b4a.objects.ListViewWrapper");__ref.setField("_lv",c_principal._lv); - //BA.debugLineNum = 21;BA.debugLine="Dim cargar As Button"; -c_principal._cargar = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_cargar",c_principal._cargar); - //BA.debugLineNum = 22;BA.debugLine="Dim pendiente As Button"; -c_principal._pendiente = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_pendiente",c_principal._pendiente); - //BA.debugLineNum = 23;BA.debugLine="Dim foto1() As Byte"; -c_principal._foto1 = RemoteObject.createNewArray ("byte", new int[] {0}, new Object[]{});__ref.setField("_foto1",c_principal._foto1); - //BA.debugLineNum = 24;BA.debugLine="Dim usuario As String"; -c_principal._usuario = RemoteObject.createImmutable("");__ref.setField("_usuario",c_principal._usuario); - //BA.debugLineNum = 25;BA.debugLine="Dim connecta As Button"; -c_principal._connecta = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_connecta",c_principal._connecta); - //BA.debugLineNum = 26;BA.debugLine="Dim conn As String"; -c_principal._conn = RemoteObject.createImmutable("");__ref.setField("_conn",c_principal._conn); - //BA.debugLineNum = 27;BA.debugLine="Dim Subir As Button"; -c_principal._subir = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_subir",c_principal._subir); - //BA.debugLineNum = 28;BA.debugLine="Dim cmd As DBCommand"; -c_principal._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",c_principal._cmd); - //BA.debugLineNum = 29;BA.debugLine="Dim TOPE As Int"; -c_principal._tope = RemoteObject.createImmutable(0);__ref.setField("_tope",c_principal._tope); - //BA.debugLineNum = 30;BA.debugLine="Dim COUNT_CLIE As Int"; -c_principal._count_clie = RemoteObject.createImmutable(0);__ref.setField("_count_clie",c_principal._count_clie); - //BA.debugLineNum = 31;BA.debugLine="Dim fecha As String"; -c_principal._fecha = RemoteObject.createImmutable("");__ref.setField("_fecha",c_principal._fecha); - //BA.debugLineNum = 32;BA.debugLine="Dim drop As Double"; -c_principal._drop = RemoteObject.createImmutable(0);__ref.setField("_drop",c_principal._drop); - //BA.debugLineNum = 33;BA.debugLine="Dim efectiva As Double"; -c_principal._efectiva = RemoteObject.createImmutable(0);__ref.setField("_efectiva",c_principal._efectiva); - //BA.debugLineNum = 34;BA.debugLine="Dim L_MONTOD As Label"; -c_principal._l_montod = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_montod",c_principal._l_montod); - //BA.debugLineNum = 35;BA.debugLine="Dim l_cuantosc As Label"; -c_principal._l_cuantosc = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_cuantosc",c_principal._l_cuantosc); - //BA.debugLineNum = 36;BA.debugLine="Dim l_drop As Label"; -c_principal._l_drop = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_drop",c_principal._l_drop); - //BA.debugLineNum = 37;BA.debugLine="Dim l_efectiva As Label"; -c_principal._l_efectiva = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_efectiva",c_principal._l_efectiva); - //BA.debugLineNum = 38;BA.debugLine="Dim l_ctast As Label"; -c_principal._l_ctast = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_ctast",c_principal._l_ctast); - //BA.debugLineNum = 39;BA.debugLine="Dim BUSCA As Button"; -c_principal._busca = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_busca",c_principal._busca); - //BA.debugLineNum = 40;BA.debugLine="Dim Cuantos As String"; -c_principal._cuantos = RemoteObject.createImmutable("");__ref.setField("_cuantos",c_principal._cuantos); - //BA.debugLineNum = 41;BA.debugLine="Dim l_cuantosn As Label"; -c_principal._l_cuantosn = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_cuantosn",c_principal._l_cuantosn); - //BA.debugLineNum = 42;BA.debugLine="Dim e_ruta As EditText"; -c_principal._e_ruta = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");__ref.setField("_e_ruta",c_principal._e_ruta); - //BA.debugLineNum = 43;BA.debugLine="Dim l_porvisitar As Label"; -c_principal._l_porvisitar = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_porvisitar",c_principal._l_porvisitar); - //BA.debugLineNum = 44;BA.debugLine="Dim b_mapa As Button"; -c_principal._b_mapa = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_mapa",c_principal._b_mapa); - //BA.debugLineNum = 45;BA.debugLine="Dim l_ruta As Label"; -c_principal._l_ruta = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_ruta",c_principal._l_ruta); - //BA.debugLineNum = 46;BA.debugLine="Dim ALMACEN As String"; -c_principal._almacen = RemoteObject.createImmutable("");__ref.setField("_almacen",c_principal._almacen); - //BA.debugLineNum = 47;BA.debugLine="Private img2 As ImageView"; -c_principal._img2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");__ref.setField("_img2",c_principal._img2); - //BA.debugLineNum = 48;BA.debugLine="Dim Listo1 As String"; -c_principal._listo1 = RemoteObject.createImmutable("");__ref.setField("_listo1",c_principal._listo1); - //BA.debugLineNum = 49;BA.debugLine="Dim Listo2 As String"; -c_principal._listo2 = RemoteObject.createImmutable("");__ref.setField("_listo2",c_principal._listo2); - //BA.debugLineNum = 50;BA.debugLine="Dim Listo3 As String"; -c_principal._listo3 = RemoteObject.createImmutable("");__ref.setField("_listo3",c_principal._listo3); - //BA.debugLineNum = 51;BA.debugLine="Dim Listo4 As String"; -c_principal._listo4 = RemoteObject.createImmutable("");__ref.setField("_listo4",c_principal._listo4); - //BA.debugLineNum = 52;BA.debugLine="Dim Listo5 As String"; -c_principal._listo5 = RemoteObject.createImmutable("");__ref.setField("_listo5",c_principal._listo5); - //BA.debugLineNum = 53;BA.debugLine="Dim EJECUTANDO As String"; -c_principal._ejecutando = RemoteObject.createImmutable("");__ref.setField("_ejecutando",c_principal._ejecutando); - //BA.debugLineNum = 54;BA.debugLine="Dim RES As String"; -c_principal._res = RemoteObject.createImmutable("");__ref.setField("_res",c_principal._res); - //BA.debugLineNum = 55;BA.debugLine="Dim inve As String"; -c_principal._inve = RemoteObject.createImmutable("");__ref.setField("_inve",c_principal._inve); - //BA.debugLineNum = 56;BA.debugLine="Dim cuantos_pedidosc As String"; -c_principal._cuantos_pedidosc = RemoteObject.createImmutable("");__ref.setField("_cuantos_pedidosc",c_principal._cuantos_pedidosc); - //BA.debugLineNum = 57;BA.debugLine="Dim cuantos_pedido As String"; -c_principal._cuantos_pedido = RemoteObject.createImmutable("");__ref.setField("_cuantos_pedido",c_principal._cuantos_pedido); - //BA.debugLineNum = 58;BA.debugLine="Dim cuantos_noventa As String"; -c_principal._cuantos_noventa = RemoteObject.createImmutable("");__ref.setField("_cuantos_noventa",c_principal._cuantos_noventa); - //BA.debugLineNum = 59;BA.debugLine="Dim datos_iguales As String"; -c_principal._datos_iguales = RemoteObject.createImmutable("");__ref.setField("_datos_iguales",c_principal._datos_iguales); - //BA.debugLineNum = 60;BA.debugLine="Dim p As PhoneId"; -c_principal._p = RemoteObject.createNew ("anywheresoftware.b4a.phone.Phone.PhoneId");__ref.setField("_p",c_principal._p); - //BA.debugLineNum = 61;BA.debugLine="Dim imei As String"; -c_principal._imei = RemoteObject.createImmutable("");__ref.setField("_imei",c_principal._imei); - //BA.debugLineNum = 64;BA.debugLine="Private inv As Button"; -c_principal._inv = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_inv",c_principal._inv); - //BA.debugLineNum = 65;BA.debugLine="Private P1 As Panel"; -c_principal._p1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p1",c_principal._p1); - //BA.debugLineNum = 66;BA.debugLine="Private CLAVE As EditText"; -c_principal._clave = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");__ref.setField("_clave",c_principal._clave); - //BA.debugLineNum = 67;BA.debugLine="Private B_OK_PAS As Button"; -c_principal._b_ok_pas = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_ok_pas",c_principal._b_ok_pas); - //BA.debugLineNum = 68;BA.debugLine="Dim PASO As String"; -c_principal._paso = RemoteObject.createImmutable("");__ref.setField("_paso",c_principal._paso); - //BA.debugLineNum = 69;BA.debugLine="Private USUARIO1 As EditText"; -c_principal._usuario1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");__ref.setField("_usuario1",c_principal._usuario1); - //BA.debugLineNum = 70;BA.debugLine="Dim connecta1 As Double"; -c_principal._connecta1 = RemoteObject.createImmutable(0);__ref.setField("_connecta1",c_principal._connecta1); - //BA.debugLineNum = 71;BA.debugLine="Dim armafolio As String"; -c_principal._armafolio = RemoteObject.createImmutable("");__ref.setField("_armafolio",c_principal._armafolio); - //BA.debugLineNum = 72;BA.debugLine="Private NUEVO As Button"; -c_principal._nuevo = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_nuevo",c_principal._nuevo); - //BA.debugLineNum = 73;BA.debugLine="Private S_CC As Label"; -c_principal._s_cc = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_s_cc",c_principal._s_cc); - //BA.debugLineNum = 74;BA.debugLine="Private S_CP As Label"; -c_principal._s_cp = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_s_cp",c_principal._s_cp); - //BA.debugLineNum = 75;BA.debugLine="Private S_CH As Label"; -c_principal._s_ch = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_s_ch",c_principal._s_ch); - //BA.debugLineNum = 76;BA.debugLine="Private PB2 As ProgressBar"; -c_principal._pb2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ProgressBarWrapper");__ref.setField("_pb2",c_principal._pb2); - //BA.debugLineNum = 77;BA.debugLine="Private PB1 As ProgressBar"; -c_principal._pb1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ProgressBarWrapper");__ref.setField("_pb1",c_principal._pb1); - //BA.debugLineNum = 78;BA.debugLine="Private L_P_1 As Label"; -c_principal._l_p_1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_p_1",c_principal._l_p_1); - //BA.debugLineNum = 79;BA.debugLine="Private L_P_2 As Label"; -c_principal._l_p_2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_p_2",c_principal._l_p_2); - //BA.debugLineNum = 80;BA.debugLine="Private L_P_3 As Label"; -c_principal._l_p_3 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_p_3",c_principal._l_p_3); - //BA.debugLineNum = 81;BA.debugLine="Private CARGA As String"; -c_principal._carga = RemoteObject.createImmutable("");__ref.setField("_carga",c_principal._carga); - //BA.debugLineNum = 82;BA.debugLine="Private PORCENTAJE As String"; -c_principal._porcentaje = RemoteObject.createImmutable("");__ref.setField("_porcentaje",c_principal._porcentaje); - //BA.debugLineNum = 83;BA.debugLine="Private P_RESUMEN As Panel"; -c_principal._p_resumen = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_resumen",c_principal._p_resumen); - //BA.debugLineNum = 84;BA.debugLine="Private B_OK_RES As Button"; -c_principal._b_ok_res = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_ok_res",c_principal._b_ok_res); - //BA.debugLineNum = 85;BA.debugLine="Private Resumen As Button"; -c_principal._resumen = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_resumen",c_principal._resumen); - //BA.debugLineNum = 86;BA.debugLine="Private L_CUANTOST As Label"; -c_principal._l_cuantost = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_cuantost",c_principal._l_cuantost); - //BA.debugLineNum = 87;BA.debugLine="Private img3 As ImageView"; -c_principal._img3 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");__ref.setField("_img3",c_principal._img3); - //BA.debugLineNum = 89;BA.debugLine="Private ImageView3 As ImageView"; -c_principal._imageview3 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");__ref.setField("_imageview3",c_principal._imageview3); - //BA.debugLineNum = 90;BA.debugLine="Private ImageView5 As ImageView"; -c_principal._imageview5 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");__ref.setField("_imageview5",c_principal._imageview5); - //BA.debugLineNum = 91;BA.debugLine="Private L_TICKPROM As Label"; -c_principal._l_tickprom = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_tickprom",c_principal._l_tickprom); - //BA.debugLineNum = 92;BA.debugLine="Private L_MARCAS As ListView"; -c_principal._l_marcas = RemoteObject.createNew ("anywheresoftware.b4a.objects.ListViewWrapper");__ref.setField("_l_marcas",c_principal._l_marcas); - //BA.debugLineNum = 93;BA.debugLine="Private ImageView9 As ImageView"; -c_principal._imageview9 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");__ref.setField("_imageview9",c_principal._imageview9); - //BA.debugLineNum = 94;BA.debugLine="Private E_RUTA2 As EditText"; -c_principal._e_ruta2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");__ref.setField("_e_ruta2",c_principal._e_ruta2); - //BA.debugLineNum = 95;BA.debugLine="Private resdia As ImageView"; -c_principal._resdia = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");__ref.setField("_resdia",c_principal._resdia); - //BA.debugLineNum = 96;BA.debugLine="Private hacer_ped As ImageView"; -c_principal._hacer_ped = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");__ref.setField("_hacer_ped",c_principal._hacer_ped); - //BA.debugLineNum = 97;BA.debugLine="Private nvo_cliente As ImageView"; -c_principal._nvo_cliente = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");__ref.setField("_nvo_cliente",c_principal._nvo_cliente); - //BA.debugLineNum = 98;BA.debugLine="Private tickets_dia As ImageView"; -c_principal._tickets_dia = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");__ref.setField("_tickets_dia",c_principal._tickets_dia); - //BA.debugLineNum = 100;BA.debugLine="Private l_monto_ks As Label"; -c_principal._l_monto_ks = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_monto_ks",c_principal._l_monto_ks); - //BA.debugLineNum = 101;BA.debugLine="Private l_monto_kp As Label"; -c_principal._l_monto_kp = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_monto_kp",c_principal._l_monto_kp); - //BA.debugLineNum = 102;BA.debugLine="Private l_monto_k As Label"; -c_principal._l_monto_k = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_monto_k",c_principal._l_monto_k); - //BA.debugLineNum = 104;BA.debugLine="Private l_monto_c1 As Label"; -c_principal._l_monto_c1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_monto_c1",c_principal._l_monto_c1); - //BA.debugLineNum = 105;BA.debugLine="Private l_monto_c2 As Label"; -c_principal._l_monto_c2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_monto_c2",c_principal._l_monto_c2); - //BA.debugLineNum = 106;BA.debugLine="Private l_monto_c3 As Label"; -c_principal._l_monto_c3 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_monto_c3",c_principal._l_monto_c3); - //BA.debugLineNum = 108;BA.debugLine="Private l_encuesta As Label"; -c_principal._l_encuesta = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_encuesta",c_principal._l_encuesta); - //BA.debugLineNum = 111;BA.debugLine="Private bpv1 As BatteryProgressView"; -c_principal._bpv1 = RemoteObject.createNew ("batteryprogressviewwrapper.batteryprogressviewWrapper");__ref.setField("_bpv1",c_principal._bpv1); - //BA.debugLineNum = 112;BA.debugLine="Dim batterystatus(11) As Int"; -c_principal._batterystatus = RemoteObject.createNewArray ("int", new int[] {11}, new Object[]{});__ref.setField("_batterystatus",c_principal._batterystatus); - //BA.debugLineNum = 113;BA.debugLine="Private bu As BatteryUtilities"; -c_principal._bu = RemoteObject.createNew ("keymon.lat.medicomed.batteryutilities");__ref.setField("_bu",c_principal._bu); - //BA.debugLineNum = 116;BA.debugLine="Private Panel4 As Panel"; -c_principal._panel4 = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_panel4",c_principal._panel4); - //BA.debugLineNum = 117;BA.debugLine="Private L_NES As Label"; -c_principal._l_nes = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_nes",c_principal._l_nes); - //BA.debugLineNum = 118;BA.debugLine="Private L_REAL As Label"; -c_principal._l_real = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_real",c_principal._l_real); - //BA.debugLineNum = 119;BA.debugLine="Private L_ALCANCE As Label"; -c_principal._l_alcance = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_alcance",c_principal._l_alcance); - //BA.debugLineNum = 120;BA.debugLine="Private L_VPLAN As Label"; -c_principal._l_vplan = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_vplan",c_principal._l_vplan); - //BA.debugLineNum = 121;BA.debugLine="Private L_VREAL As Label"; -c_principal._l_vreal = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_vreal",c_principal._l_vreal); - //BA.debugLineNum = 122;BA.debugLine="Private L_EFEC_VIS As Label"; -c_principal._l_efec_vis = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_efec_vis",c_principal._l_efec_vis); - //BA.debugLineNum = 123;BA.debugLine="Private L_VISITCC As Label"; -c_principal._l_visitcc = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_visitcc",c_principal._l_visitcc); - //BA.debugLineNum = 124;BA.debugLine="Private L_EFEC_PV As Label"; -c_principal._l_efec_pv = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_efec_pv",c_principal._l_efec_pv); - //BA.debugLineNum = 125;BA.debugLine="Private L_EFEC_PURA As Label"; -c_principal._l_efec_pura = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_efec_pura",c_principal._l_efec_pura); - //BA.debugLineNum = 126;BA.debugLine="Private L_CTE_PROMO As Label"; -c_principal._l_cte_promo = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_cte_promo",c_principal._l_cte_promo); - //BA.debugLineNum = 127;BA.debugLine="Private L_REDEN_PROMO As Label"; -c_principal._l_reden_promo = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_reden_promo",c_principal._l_reden_promo); - //BA.debugLineNum = 128;BA.debugLine="Private L_LIN_TICK As Label"; -c_principal._l_lin_tick = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_lin_tick",c_principal._l_lin_tick); - //BA.debugLineNum = 129;BA.debugLine="Private SCROLL_RESDIA As ScrollView"; -c_principal._scroll_resdia = RemoteObject.createNew ("anywheresoftware.b4a.objects.ScrollViewWrapper");__ref.setField("_scroll_resdia",c_principal._scroll_resdia); - //BA.debugLineNum = 130;BA.debugLine="Private L_ACUMULADO As Label"; -c_principal._l_acumulado = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_acumulado",c_principal._l_acumulado); - //BA.debugLineNum = 131;BA.debugLine="Private L_UNILEVER As Label"; -c_principal._l_unilever = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_unilever",c_principal._l_unilever); - //BA.debugLineNum = 132;BA.debugLine="Private L_RECHAZOP As Label"; -c_principal._l_rechazop = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_rechazop",c_principal._l_rechazop); - //BA.debugLineNum = 133;BA.debugLine="Private L_RECHAZOM As Label"; -c_principal._l_rechazom = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_rechazom",c_principal._l_rechazom); - //BA.debugLineNum = 134;BA.debugLine="Private L_VTA_3MES As Label"; -c_principal._l_vta_3mes = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_vta_3mes",c_principal._l_vta_3mes); - //BA.debugLineNum = 135;BA.debugLine="Private L_VTA_2MES As Label"; -c_principal._l_vta_2mes = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_vta_2mes",c_principal._l_vta_2mes); - //BA.debugLineNum = 136;BA.debugLine="Private L_VTA_1MES As Label"; -c_principal._l_vta_1mes = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_vta_1mes",c_principal._l_vta_1mes); - //BA.debugLineNum = 137;BA.debugLine="Private L_MES_PY As Label"; -c_principal._l_mes_py = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_mes_py",c_principal._l_mes_py); - //BA.debugLineNum = 138;BA.debugLine="Private L_FREC_DE_CREAL As Label"; -c_principal._l_frec_de_creal = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_frec_de_creal",c_principal._l_frec_de_creal); - //BA.debugLineNum = 139;BA.debugLine="Private L_FREC_DE_COBJ As Label"; -c_principal._l_frec_de_cobj = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_frec_de_cobj",c_principal._l_frec_de_cobj); - //BA.debugLineNum = 140;BA.debugLine="Private L_COB_VISIT As Label"; -c_principal._l_cob_visit = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_cob_visit",c_principal._l_cob_visit); - //BA.debugLineNum = 141;BA.debugLine="Private L_VISIT_REAL As Label"; -c_principal._l_visit_real = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_visit_real",c_principal._l_visit_real); - //BA.debugLineNum = 142;BA.debugLine="Private L_VISIT_PLAN As Label"; -c_principal._l_visit_plan = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_visit_plan",c_principal._l_visit_plan); - //BA.debugLineNum = 143;BA.debugLine="Private L_ECO As Label"; -c_principal._l_eco = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_eco",c_principal._l_eco); - //BA.debugLineNum = 144;BA.debugLine="Private L_COB_CCC As Label"; -c_principal._l_cob_ccc = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_cob_ccc",c_principal._l_cob_ccc); - //BA.debugLineNum = 145;BA.debugLine="Private L_CTES As Label"; -c_principal._l_ctes = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_ctes",c_principal._l_ctes); - //BA.debugLineNum = 146;BA.debugLine="Private L_VPO_VTA As Label"; -c_principal._l_vpo_vta = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_vpo_vta",c_principal._l_vpo_vta); - //BA.debugLineNum = 147;BA.debugLine="Private L_VPO_OBJ As Label"; -c_principal._l_vpo_obj = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_vpo_obj",c_principal._l_vpo_obj); - //BA.debugLineNum = 148;BA.debugLine="Private L_DS_VTA As Label"; -c_principal._l_ds_vta = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_ds_vta",c_principal._l_ds_vta); - //BA.debugLineNum = 149;BA.debugLine="Private L_DS_OBJ As Label"; -c_principal._l_ds_obj = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_ds_obj",c_principal._l_ds_obj); - //BA.debugLineNum = 150;BA.debugLine="Private L_DRA_VTA As Label"; -c_principal._l_dra_vta = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_dra_vta",c_principal._l_dra_vta); - //BA.debugLineNum = 151;BA.debugLine="Private L_DRA_OBJ As Label"; -c_principal._l_dra_obj = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_dra_obj",c_principal._l_dra_obj); - //BA.debugLineNum = 152;BA.debugLine="Private L_ALCANCEM As Label"; -c_principal._l_alcancem = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_alcancem",c_principal._l_alcancem); - //BA.debugLineNum = 153;BA.debugLine="Private L_TENDENCIA As Label"; -c_principal._l_tendencia = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_tendencia",c_principal._l_tendencia); - //BA.debugLineNum = 154;BA.debugLine="Private L_VTA_ACUM As Label"; -c_principal._l_vta_acum = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_vta_acum",c_principal._l_vta_acum); - //BA.debugLineNum = 155;BA.debugLine="Private L_OBJ_MES As Label"; -c_principal._l_obj_mes = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_obj_mes",c_principal._l_obj_mes); - //BA.debugLineNum = 156;BA.debugLine="Private L_DS_OBJD As Label"; -c_principal._l_ds_objd = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_ds_objd",c_principal._l_ds_objd); - //BA.debugLineNum = 157;BA.debugLine="Private L_DS_VTAD As Label"; -c_principal._l_ds_vtad = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_ds_vtad",c_principal._l_ds_vtad); - //BA.debugLineNum = 158;BA.debugLine="Private LPT As String"; -c_principal._lpt = RemoteObject.createImmutable("");__ref.setField("_lpt",c_principal._lpt); - //BA.debugLineNum = 159;BA.debugLine="Private STEYIN As String"; -c_principal._steyin = RemoteObject.createImmutable("");__ref.setField("_steyin",c_principal._steyin); - //BA.debugLineNum = 160;BA.debugLine="Private STEYOUT As String"; -c_principal._steyout = RemoteObject.createImmutable("");__ref.setField("_steyout",c_principal._steyout); - //BA.debugLineNum = 162;BA.debugLine="Private L_PRIO As Label"; -c_principal._l_prio = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_prio",c_principal._l_prio); - //BA.debugLineNum = 163;BA.debugLine="Private L_SECUND As Label"; -c_principal._l_secund = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_secund",c_principal._l_secund); - //BA.debugLineNum = 164;BA.debugLine="Private L_COMP As Label"; -c_principal._l_comp = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_comp",c_principal._l_comp); - //BA.debugLineNum = 167;BA.debugLine="Private stay_hh As String"; -c_principal._stay_hh = RemoteObject.createImmutable("");__ref.setField("_stay_hh",c_principal._stay_hh); - //BA.debugLineNum = 168;BA.debugLine="Private stay_mi As String"; -c_principal._stay_mi = RemoteObject.createImmutable("");__ref.setField("_stay_mi",c_principal._stay_mi); - //BA.debugLineNum = 169;BA.debugLine="Private stay_ss As String"; -c_principal._stay_ss = RemoteObject.createImmutable("");__ref.setField("_stay_ss",c_principal._stay_ss); - //BA.debugLineNum = 171;BA.debugLine="Dim sDate,sTime As String"; -c_principal._sdate = RemoteObject.createImmutable("");__ref.setField("_sdate",c_principal._sdate); -c_principal._stime = RemoteObject.createImmutable("");__ref.setField("_stime",c_principal._stime); - //BA.debugLineNum = 172;BA.debugLine="Dim HORAINGRESO As String"; -c_principal._horaingreso = RemoteObject.createImmutable("");__ref.setField("_horaingreso",c_principal._horaingreso); - //BA.debugLineNum = 174;BA.debugLine="Private L_QUALA As Label"; -c_principal._l_quala = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_quala",c_principal._l_quala); - //BA.debugLineNum = 175;BA.debugLine="Private L_FERRERO As Label"; -c_principal._l_ferrero = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_ferrero",c_principal._l_ferrero); - //BA.debugLineNum = 176;BA.debugLine="Private L_SANMARCOS As Label"; -c_principal._l_sanmarcos = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_sanmarcos",c_principal._l_sanmarcos); - //BA.debugLineNum = 177;BA.debugLine="Private L_CAMPARI As Label"; -c_principal._l_campari = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_campari",c_principal._l_campari); - //BA.debugLineNum = 178;BA.debugLine="Private L_IBERIA As Label"; -c_principal._l_iberia = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_iberia",c_principal._l_iberia); - //BA.debugLineNum = 179;BA.debugLine="Private L_BEPENSA As Label"; -c_principal._l_bepensa = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_bepensa",c_principal._l_bepensa); - //BA.debugLineNum = 180;BA.debugLine="Private L_SCJ As Label"; -c_principal._l_scj = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_scj",c_principal._l_scj); - //BA.debugLineNum = 181;BA.debugLine="Private L_MEDJ As Label"; -c_principal._l_medj = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_medj",c_principal._l_medj); - //BA.debugLineNum = 182;BA.debugLine="Private L_DURACELL As Label"; -c_principal._l_duracell = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_duracell",c_principal._l_duracell); - //BA.debugLineNum = 183;BA.debugLine="Private L_GUNA As Label"; -c_principal._l_guna = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_guna",c_principal._l_guna); - //BA.debugLineNum = 184;BA.debugLine="Private L_KIMB As Label"; -c_principal._l_kimb = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_kimb",c_principal._l_kimb); - //BA.debugLineNum = 185;BA.debugLine="Private L_TRESM As Label"; -c_principal._l_tresm = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_tresm",c_principal._l_tresm); - //BA.debugLineNum = 186;BA.debugLine="Private L_REDB As Label"; -c_principal._l_redb = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_redb",c_principal._l_redb); - //BA.debugLineNum = 187;BA.debugLine="Private Btn_Ubicar As Button"; -c_principal._btn_ubicar = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_btn_ubicar",c_principal._btn_ubicar); - //BA.debugLineNum = 188;BA.debugLine="Private B_COMM As Button"; -c_principal._b_comm = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_comm",c_principal._b_comm); - //BA.debugLineNum = 189;BA.debugLine="Private L_TOTAL_MM As Label"; -c_principal._l_total_mm = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_total_mm",c_principal._l_total_mm); - //BA.debugLineNum = 190;BA.debugLine="Private L_TOTAL_VIVE As Label"; -c_principal._l_total_vive = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_total_vive",c_principal._l_total_vive); - //BA.debugLineNum = 191;BA.debugLine="Private L_TOTAL_GUNA As Label"; -c_principal._l_total_guna = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_total_guna",c_principal._l_total_guna); - //BA.debugLineNum = 192;BA.debugLine="Private L_TOTAL_BA As Label"; -c_principal._l_total_ba = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_total_ba",c_principal._l_total_ba); - //BA.debugLineNum = 193;BA.debugLine="Private L_TOTAL_COMIS As Label"; -c_principal._l_total_comis = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_total_comis",c_principal._l_total_comis); - //BA.debugLineNum = 194;BA.debugLine="Private L_TOTAL_MM_1 As Label"; -c_principal._l_total_mm_1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_total_mm_1",c_principal._l_total_mm_1); - //BA.debugLineNum = 195;BA.debugLine="Private L_TOTAL_VIVE_1 As Label"; -c_principal._l_total_vive_1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_total_vive_1",c_principal._l_total_vive_1); - //BA.debugLineNum = 196;BA.debugLine="Private L_TOTAL_GUNA_1 As Label"; -c_principal._l_total_guna_1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_total_guna_1",c_principal._l_total_guna_1); - //BA.debugLineNum = 197;BA.debugLine="Private L_TOTAL_BA_1 As Label"; -c_principal._l_total_ba_1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_total_ba_1",c_principal._l_total_ba_1); - //BA.debugLineNum = 198;BA.debugLine="Private L_TOTAL_COMIS_1 As Label"; -c_principal._l_total_comis_1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_total_comis_1",c_principal._l_total_comis_1); - //BA.debugLineNum = 199;BA.debugLine="Private B_OK_COMISS As Button"; -c_principal._b_ok_comiss = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_ok_comiss",c_principal._b_ok_comiss); - //BA.debugLineNum = 200;BA.debugLine="Private Panel_C As Panel"; -c_principal._panel_c = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_panel_c",c_principal._panel_c); - //BA.debugLineNum = 202;BA.debugLine="Private TitleHeight As Int = 50dip"; -c_principal._titleheight = c_principal.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 50)));__ref.setField("_titleheight",c_principal._titleheight); - //BA.debugLineNum = 203;BA.debugLine="Private Title2Height As Int = 100dip"; -c_principal._title2height = c_principal.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 100)));__ref.setField("_title2height",c_principal._title2height); - //BA.debugLineNum = 205;BA.debugLine="Private DividerHeight As Int = 5dip"; -c_principal._dividerheight = c_principal.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 5)));__ref.setField("_dividerheight",c_principal._dividerheight); - //BA.debugLineNum = 206;BA.debugLine="Private CLV1 As CustomListView"; -c_principal._clv1 = RemoteObject.createNew ("b4a.example3.customlistview");__ref.setField("_clv1",c_principal._clv1); - //BA.debugLineNum = 207;BA.debugLine="Private pnlTitle As B4XView"; -c_principal._pnltitle = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_pnltitle",c_principal._pnltitle); - //BA.debugLineNum = 208;BA.debugLine="Private xui As XUI"; -c_principal._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",c_principal._xui); - //BA.debugLineNum = 209;BA.debugLine="Type TitleData (Title As String)"; -; - //BA.debugLineNum = 211;BA.debugLine="Private B_MARCAS As Button"; -c_principal._b_marcas = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_marcas",c_principal._b_marcas); - //BA.debugLineNum = 212;BA.debugLine="Private Panel5 As Panel"; -c_principal._panel5 = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_panel5",c_principal._panel5); - //BA.debugLineNum = 213;BA.debugLine="Private lblTitle As Label"; -c_principal._lbltitle = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_lbltitle",c_principal._lbltitle); - //BA.debugLineNum = 214;BA.debugLine="Private B_OK_PANEL5 As Button"; -c_principal._b_ok_panel5 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_ok_panel5",c_principal._b_ok_panel5); - //BA.debugLineNum = 217;BA.debugLine="Private p_principal As Panel"; -c_principal._p_principal = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_principal",c_principal._p_principal); - //BA.debugLineNum = 218;BA.debugLine="Private p_mandaInfo As Panel"; -c_principal._p_mandainfo = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_mandainfo",c_principal._p_mandainfo); - //BA.debugLineNum = 219;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _connecta_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("connecta_Click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,1701); -if (RapidSub.canDelegate("connecta_click")) { return __ref.runUserSub(false, "c_principal","connecta_click", __ref);} -RemoteObject _usrt = RemoteObject.createImmutable(""); -RemoteObject _passt = RemoteObject.createImmutable(""); - BA.debugLineNum = 1701;BA.debugLine="Sub connecta_Click"; -Debug.ShouldStop(16); - BA.debugLineNum = 1702;BA.debugLine="B4XPages.MainPage.reqManager.Initialize(Me, Start"; -Debug.ShouldStop(32); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref),(Object)(c_principal._starter._server /*RemoteObject*/ )); - BA.debugLineNum = 1703;BA.debugLine="Log(Starter.server)"; -Debug.ShouldStop(64); -c_principal.__c.runVoidMethod ("LogImpl","33538946",c_principal._starter._server /*RemoteObject*/ ,0); - BA.debugLineNum = 1704;BA.debugLine="connecta1 = connecta1 + 1"; -Debug.ShouldStop(128); -__ref.setField ("_connecta1" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_connecta1" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "+",1, 0)); - BA.debugLineNum = 1706;BA.debugLine="imei = \"\""; -Debug.ShouldStop(512); -__ref.setField ("_imei" /*RemoteObject*/ ,BA.ObjectToString("")); - BA.debugLineNum = 1707;BA.debugLine="conn = \"1\""; -Debug.ShouldStop(1024); -__ref.setField ("_conn" /*RemoteObject*/ ,BA.ObjectToString("1")); - BA.debugLineNum = 1708;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(2048); -c_principal._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",c_principal._cmd); - BA.debugLineNum = 1709;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(4096); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 1710;BA.debugLine="cmd.Name = \"select_version_MEDI\""; -Debug.ShouldStop(8192); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_version_MEDI")); - BA.debugLineNum = 1711;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -Debug.ShouldStop(16384); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("version")))); - BA.debugLineNum = 1714;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"select USUA"; -Debug.ShouldStop(131072); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select USUARIO, PASS from usuarioa")))); - BA.debugLineNum = 1715;BA.debugLine="c.Position=0"; -Debug.ShouldStop(262144); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 1716;BA.debugLine="If c.RowCount > 0 And c.GetString(\"USUARIO\") <>"; -Debug.ShouldStop(524288); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0)) && RemoteObject.solveBoolean("!",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO"))),BA.ObjectToString("KMTS1"))) { - BA.debugLineNum = 1717;BA.debugLine="Private usrT As String = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(1048576); -_usrt = __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")));Debug.locals.put("usrT", _usrt);Debug.locals.put("usrT", _usrt); - BA.debugLineNum = 1718;BA.debugLine="Private passT As String = c.GetString(\"PASS\")"; -Debug.ShouldStop(2097152); -_passt = __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PASS")));Debug.locals.put("passT", _passt);Debug.locals.put("passT", _passt); - BA.debugLineNum = 1719;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 1720;BA.debugLine="cmd.Name = \"select_usuario_guna_MEDI_1\""; -Debug.ShouldStop(8388608); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_usuario_guna_MEDI_1")); - BA.debugLineNum = 1721;BA.debugLine="cmd.Parameters = Array As Object(usrT, passT)"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(_usrt),(_passt)})); - BA.debugLineNum = 1722;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd ,"; -Debug.ShouldStop(33554432); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("usuarioA")))); - }; - BA.debugLineNum = 1724;BA.debugLine="c.Close"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 1727;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(1073741824); -c_principal._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",c_principal._cmd); - BA.debugLineNum = 1728;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 1729;BA.debugLine="cmd.Name = \"select_ruta_MEDI_6\""; -Debug.ShouldStop(1); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_ruta_MEDI_6")); - BA.debugLineNum = 1730;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN,e_ruta.t"; -Debug.ShouldStop(2); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(__ref.getField(false,"_e_ruta" /*RemoteObject*/ ).runMethod(true,"getText"))})); - BA.debugLineNum = 1731;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -Debug.ShouldStop(4); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("ruta")))); - BA.debugLineNum = 1733;BA.debugLine="If e_ruta.Text = \"KMTS1\" Then"; -Debug.ShouldStop(16); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_e_ruta" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("KMTS1"))) { - BA.debugLineNum = 1734;BA.debugLine="cargar.Visible = True"; -Debug.ShouldStop(32); -__ref.getField(false,"_cargar" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1735;BA.debugLine="Subir.Visible = True"; -Debug.ShouldStop(64); -__ref.getField(false,"_subir" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1736;BA.debugLine="e_ruta.Text = \"\""; -Debug.ShouldStop(128); -__ref.getField(false,"_e_ruta" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("")); - }; - BA.debugLineNum = 1739;BA.debugLine="If e_ruta.Text = \"BERNA1\" Then"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_e_ruta" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("BERNA1"))) { - BA.debugLineNum = 1740;BA.debugLine="cargar.Visible = True"; -Debug.ShouldStop(2048); -__ref.getField(false,"_cargar" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1741;BA.debugLine="Subir.Visible = True"; -Debug.ShouldStop(4096); -__ref.getField(false,"_subir" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1742;BA.debugLine="e_ruta.Text = \"\""; -Debug.ShouldStop(8192); -__ref.getField(false,"_e_ruta" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("")); - }; - BA.debugLineNum = 1745;BA.debugLine="ToastMessageShow(\"Validando Conexión.\" , True)"; -Debug.ShouldStop(65536); -c_principal.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Validando Conexión.")),(Object)(c_principal.__c.getField(true,"True"))); - BA.debugLineNum = 1761;BA.debugLine="End Sub"; -Debug.ShouldStop(1); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _e_ruta_enterpressed(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("e_ruta_EnterPressed (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,1772); -if (RapidSub.canDelegate("e_ruta_enterpressed")) { return __ref.runUserSub(false, "c_principal","e_ruta_enterpressed", __ref);} - BA.debugLineNum = 1772;BA.debugLine="Sub e_ruta_EnterPressed"; -Debug.ShouldStop(2048); - BA.debugLineNum = 1773;BA.debugLine="If e_ruta.Text = \"FIN DIA\" Then"; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_e_ruta" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("FIN DIA"))) { - BA.debugLineNum = 1774;BA.debugLine="RES = Msgbox2(\"Seguro que desea hacer el cierre"; -Debug.ShouldStop(8192); -__ref.setField ("_res" /*RemoteObject*/ ,BA.NumberToString(c_principal.__c.runMethodAndSync(true,"Msgbox2",(Object)(BA.ObjectToCharSequence("Seguro que desea hacer el cierre todos los datos se borraran?")),(Object)(BA.ObjectToCharSequence("Cierre")),(Object)(BA.ObjectToString("Si")),(Object)(BA.ObjectToString("")),(Object)(BA.ObjectToString("No")),(Object)((c_principal.__c.runMethod(false,"LoadBitmap",(Object)(c_principal.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(RemoteObject.createImmutable("alert2.png"))).getObject())),__ref.getField(false, "ba")))); - BA.debugLineNum = 1775;BA.debugLine="If RES = DialogResponse.POSITIVE Then"; -Debug.ShouldStop(16384); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_res" /*RemoteObject*/ ),BA.NumberToString(c_principal.__c.getField(false,"DialogResponse").getField(true,"POSITIVE")))) { - BA.debugLineNum = 1776;BA.debugLine="e_ruta.Text = \"\""; -Debug.ShouldStop(32768); -__ref.getField(false,"_e_ruta" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("")); - BA.debugLineNum = 1777;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(65536); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido_cliente"))); - BA.debugLineNum = 1778;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(131072); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido"))); - BA.debugLineNum = 1779;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(262144); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from noventa"))); - BA.debugLineNum = 1780;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(524288); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from clie_act"))); - BA.debugLineNum = 1781;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(1048576); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from kmt_info"))); - BA.debugLineNum = 1782;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(2097152); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from cat_gunaprod"))); - BA.debugLineNum = 1783;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(4194304); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from CAT_DETALLES_PAQ"))); - BA.debugLineNum = 1784;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(8388608); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from HIST_VENTAS"))); - BA.debugLineNum = 1785;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -Debug.ShouldStop(16777216); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from HIST_VERIFICACION"))); - BA.debugLineNum = 1786;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; -Debug.ShouldStop(33554432); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("DELETE FROM HIST_ENCUESTA"))); - BA.debugLineNum = 1787;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; -Debug.ShouldStop(67108864); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("DELETE FROM HIST_STAY_OUT"))); - BA.debugLineNum = 1788;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; -Debug.ShouldStop(134217728); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("DELETE FROM HIST_GPS"))); - BA.debugLineNum = 1789;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; -Debug.ShouldStop(268435456); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("DELETE FROM HIST_FACE"))); - BA.debugLineNum = 1790;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"INSERT INT"; -Debug.ShouldStop(536870912); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("INSERT INTO HIST_STAY_OUT(HSO_INI, HSO_FIN) VALUES (0,0)"))); - BA.debugLineNum = 1791;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; -Debug.ShouldStop(1073741824); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("DELETE FROM HIST_CODIGO_BARRAS"))); - BA.debugLineNum = 1792;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; -Debug.ShouldStop(-2147483648); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("DELETE FROM HIST_FOTO_CLIENTE"))); - BA.debugLineNum = 1793;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; -Debug.ShouldStop(1); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("DELETE FROM CLIENTES_NUEVOS"))); - BA.debugLineNum = 1794;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; -Debug.ShouldStop(2); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("DELETE FROM BITACORAGPS"))); - BA.debugLineNum = 1795;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; -Debug.ShouldStop(4); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("DELETE FROM VENTA_No_VENTA"))); - BA.debugLineNum = 1796;BA.debugLine="Subs.bitacora(Subs.fechanormal(DateTime.Now),us"; -Debug.ShouldStop(8); -c_principal._subs.runVoidMethod ("_bitacora" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(c_principal._subs.runMethod(true,"_fechanormal" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.NumberToString(c_principal.__c.getField(false,"DateTime").runMethod(true,"getNow"))))),(Object)(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(Object)(__ref.getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"getText")),(Object)(BA.ObjectToString("Fin Día")),(Object)(BA.ObjectToString("")),(Object)(c_principal._subs.runMethod(true,"_fechanormal" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.NumberToString(c_principal.__c.getField(false,"DateTime").runMethod(true,"getNow"))))),(Object)(c_principal._subs.runMethod(true,"_fechanormal" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.NumberToString(c_principal.__c.getField(false,"DateTime").runMethod(true,"getNow"))))),(Object)(c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ )),(Object)(c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lon_gps" /*RemoteObject*/ )),(Object)(BA.ObjectToString("2")),(Object)(BA.ObjectToString("")),(Object)(RemoteObject.createImmutable(""))); - BA.debugLineNum = 1797;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(16); -__ref.runClassMethod (keymon.lat.medicomed.c_principal.class, "_b4xpage_appear" /*void*/ ); - }; - }; - BA.debugLineNum = 1800;BA.debugLine="If e_ruta.Text = \"IWL\" Then"; -Debug.ShouldStop(128); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_e_ruta" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("IWL"))) { - BA.debugLineNum = 1802;BA.debugLine="NUEVO.Visible =False"; -Debug.ShouldStop(512); -__ref.getField(false,"_nuevo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1803;BA.debugLine="BUSCA.Visible=False"; -Debug.ShouldStop(1024); -__ref.getField(false,"_busca" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1804;BA.debugLine="connecta.Visible=False"; -Debug.ShouldStop(2048); -__ref.getField(false,"_connecta" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1805;BA.debugLine="img3.Visible =True"; -Debug.ShouldStop(4096); -__ref.getField(false,"_img3" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1806;BA.debugLine="Resumen.Visible= False"; -Debug.ShouldStop(8192); -__ref.getField(false,"_resumen" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - }; - BA.debugLineNum = 1808;BA.debugLine="If e_ruta.Text = \"SUPLENCIA\" Then"; -Debug.ShouldStop(32768); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_e_ruta" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("SUPLENCIA"))) { - BA.debugLineNum = 1809;BA.debugLine="E_RUTA2.Visible = True"; -Debug.ShouldStop(65536); -__ref.getField(false,"_e_ruta2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1810;BA.debugLine="ImageView9.Visible = True"; -Debug.ShouldStop(131072); -__ref.getField(false,"_imageview9" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - }; - BA.debugLineNum = 1812;BA.debugLine="End Sub"; -Debug.ShouldStop(524288); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _e_ruta_textchanged(RemoteObject __ref,RemoteObject _old,RemoteObject _new) throws Exception{ -try { - Debug.PushSubsStack("e_ruta_TextChanged (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,2170); -if (RapidSub.canDelegate("e_ruta_textchanged")) { return __ref.runUserSub(false, "c_principal","e_ruta_textchanged", __ref, _old, _new);} -RemoteObject _validchars = RemoteObject.createImmutable(""); -Debug.locals.put("Old", _old); -Debug.locals.put("New", _new); - BA.debugLineNum = 2170;BA.debugLine="Sub e_ruta_TextChanged (Old As String, New As Stri"; -Debug.ShouldStop(33554432); - BA.debugLineNum = 2171;BA.debugLine="Dim validChars As String =\"ABCDEFGHIJKLMNOPQRSTUV"; -Debug.ShouldStop(67108864); -_validchars = BA.ObjectToString("ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789 ");Debug.locals.put("validChars", _validchars);Debug.locals.put("validChars", _validchars); - BA.debugLineNum = 2173;BA.debugLine="If Old <> \"KMTS1\" Then"; -Debug.ShouldStop(268435456); -if (RemoteObject.solveBoolean("!",_old,BA.ObjectToString("KMTS1"))) { - BA.debugLineNum = 2175;BA.debugLine="Try"; -Debug.ShouldStop(1073741824); -try { BA.debugLineNum = 2176;BA.debugLine="If validChars.Contains(New.SubString(New.Length"; -Debug.ShouldStop(-2147483648); -if (RemoteObject.solveBoolean("=",_validchars.runMethod(true,"contains",(Object)(_new.runMethod(true,"substring",(Object)(RemoteObject.solve(new RemoteObject[] {_new.runMethod(true,"length"),RemoteObject.createImmutable(1)}, "-",1, 1))))),c_principal.__c.getField(true,"False"))) { - BA.debugLineNum = 2177;BA.debugLine="e_ruta.Text = New.SubString2(0, New.Length-1)"; -Debug.ShouldStop(1); -__ref.getField(false,"_e_ruta" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence(_new.runMethod(true,"substring",(Object)(BA.numberCast(int.class, 0)),(Object)(RemoteObject.solve(new RemoteObject[] {_new.runMethod(true,"length"),RemoteObject.createImmutable(1)}, "-",1, 1))))); - BA.debugLineNum = 2178;BA.debugLine="e_ruta.SelectionStart = e_ruta.Text.Length"; -Debug.ShouldStop(2); -__ref.getField(false,"_e_ruta" /*RemoteObject*/ ).runMethod(true,"setSelectionStart",__ref.getField(false,"_e_ruta" /*RemoteObject*/ ).runMethod(true,"getText").runMethod(true,"length")); - }; - Debug.CheckDeviceExceptions(); -} - catch (Exception e9) { - BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e9.toString()); BA.debugLineNum = 2181;BA.debugLine="Log(LastException)"; -Debug.ShouldStop(16); -c_principal.__c.runVoidMethod ("LogImpl","34718603",BA.ObjectToString(c_principal.__c.runMethod(false,"LastException",__ref.getField(false, "ba"))),0); - }; - }; - BA.debugLineNum = 2184;BA.debugLine="End Sub"; -Debug.ShouldStop(128); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _gps_locationchanged(RemoteObject __ref,RemoteObject _location1) throws Exception{ -try { - Debug.PushSubsStack("GPS_LocationChanged (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,2157); -if (RapidSub.canDelegate("gps_locationchanged")) { return __ref.runUserSub(false, "c_principal","gps_locationchanged", __ref, _location1);} -Debug.locals.put("Location1", _location1); - BA.debugLineNum = 2157;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; -Debug.ShouldStop(4096); - BA.debugLineNum = 2159;BA.debugLine="End Sub"; -Debug.ShouldStop(16384); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _hacer_ped_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("hacer_ped_Click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,2145); -if (RapidSub.canDelegate("hacer_ped_click")) { return __ref.runUserSub(false, "c_principal","hacer_ped_click", __ref);} - BA.debugLineNum = 2145;BA.debugLine="Sub hacer_ped_Click"; -Debug.ShouldStop(1); - BA.debugLineNum = 2146;BA.debugLine="B4XPages.ShowPage(\"Clientes\")"; -Debug.ShouldStop(2); -c_principal._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Clientes"))); - BA.debugLineNum = 2147;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,222); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "c_principal","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 222;BA.debugLine="Public Sub Initialize As Object"; -Debug.ShouldStop(536870912); - BA.debugLineNum = 223;BA.debugLine="Return Me"; -Debug.ShouldStop(1073741824); -if (true) return __ref; - BA.debugLineNum = 224;BA.debugLine="End Sub"; -Debug.ShouldStop(-2147483648); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _inv_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("inv_Click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,1814); -if (RapidSub.canDelegate("inv_click")) { return __ref.runUserSub(false, "c_principal","inv_click", __ref);} - BA.debugLineNum = 1814;BA.debugLine="Sub inv_Click"; -Debug.ShouldStop(2097152); - BA.debugLineNum = 1815;BA.debugLine="img2.Visible =True"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_img2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1816;BA.debugLine="EJECUTANDO = 1"; -Debug.ShouldStop(8388608); -__ref.setField ("_ejecutando" /*RemoteObject*/ ,BA.NumberToString(1)); - BA.debugLineNum = 1817;BA.debugLine="inve = 1"; -Debug.ShouldStop(16777216); -__ref.setField ("_inve" /*RemoteObject*/ ,BA.NumberToString(1)); - BA.debugLineNum = 1818;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(33554432); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from cat_gunaprod"))); - BA.debugLineNum = 1819;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(67108864); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from CAT_DETALLES_PAQ"))); - BA.debugLineNum = 1820;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select usuari"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select usuario from usuarioa")))); - BA.debugLineNum = 1821;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 1822;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(536870912); -__ref.setField ("_usuario" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")))); - BA.debugLineNum = 1823;BA.debugLine="c.Close"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 1824;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 1825;BA.debugLine="cmd.Name = \"select_cat_gunaprod_MEDI\""; -Debug.ShouldStop(1); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_cat_gunaprod_MEDI")); - BA.debugLineNum = 1826;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; -Debug.ShouldStop(2); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(true,"_almacen" /*RemoteObject*/ ))})); - BA.debugLineNum = 1827;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -Debug.ShouldStop(4); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("gunaprod")))); - BA.debugLineNum = 1828;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(8); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 1829;BA.debugLine="cmd.Name = \"select_cat_paquetes_MARDS\""; -Debug.ShouldStop(16); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_cat_paquetes_MARDS")); - BA.debugLineNum = 1830;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; -Debug.ShouldStop(32); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(true,"_almacen" /*RemoteObject*/ ))})); - BA.debugLineNum = 1831;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -Debug.ShouldStop(64); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("gunaprodp")))); - BA.debugLineNum = 1833;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(256); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 1834;BA.debugLine="cmd.Name = \"select_cat_detallepa_MEDI\""; -Debug.ShouldStop(512); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_cat_detallepa_MEDI")); - BA.debugLineNum = 1835;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; -Debug.ShouldStop(1024); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(true,"_almacen" /*RemoteObject*/ ))})); - BA.debugLineNum = 1836;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -Debug.ShouldStop(2048); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("detallepaq")))); - BA.debugLineNum = 1838;BA.debugLine="cargar.Visible = False"; -Debug.ShouldStop(8192); -__ref.getField(false,"_cargar" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1839;BA.debugLine="Subir.Visible = False"; -Debug.ShouldStop(16384); -__ref.getField(false,"_subir" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1840;BA.debugLine="connecta.Visible = True"; -Debug.ShouldStop(32768); -__ref.getField(false,"_connecta" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1841;BA.debugLine="inv.Visible = False"; -Debug.ShouldStop(65536); -__ref.getField(false,"_inv" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1842;BA.debugLine="ToastMessageShow(\"Se Actualizaran los datos, Este"; -Debug.ShouldStop(131072); -c_principal.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Se Actualizaran los datos, Este proceso podria tardar hasta un minuto, gracias")),(Object)(c_principal.__c.getField(true,"True"))); - BA.debugLineNum = 1843;BA.debugLine="End Sub"; -Debug.ShouldStop(262144); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _jobdone(RemoteObject __ref,RemoteObject _job) throws Exception{ -try { - Debug.PushSubsStack("JobDone (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,986); -if (RapidSub.canDelegate("jobdone")) { return __ref.runUserSub(false, "c_principal","jobdone", __ref, _job);} -RemoteObject _result = RemoteObject.declareNull("keymon.lat.medicomed.dbrequestmanager._dbresult"); -RemoteObject _records = null; -RemoteObject _k = RemoteObject.createImmutable(""); -RemoteObject _n = RemoteObject.createImmutable(""); -RemoteObject _cat_cl_codigo = RemoteObject.createImmutable(""); -RemoteObject _cat_cl_ruta = RemoteObject.createImmutable(""); -RemoteObject _cat_cl_nombre = RemoteObject.createImmutable(""); -RemoteObject _cat_cl_atiende1 = RemoteObject.createImmutable(""); -RemoteObject _cat_cl_atiente2 = RemoteObject.createImmutable(""); -RemoteObject _cat_cl_telefono = RemoteObject.createImmutable(""); -RemoteObject _cat_cl_email = RemoteObject.createImmutable(""); -RemoteObject _cat_cl_calle = RemoteObject.createImmutable(""); -RemoteObject _cat_cl_noext = RemoteObject.createImmutable(""); -RemoteObject _cat_cl_noint = RemoteObject.createImmutable(""); -RemoteObject _cat_cl_calle1 = RemoteObject.createImmutable(""); -RemoteObject _cat_cl_calle2 = RemoteObject.createImmutable(""); -RemoteObject _cat_cl_colonia = RemoteObject.createImmutable(""); -RemoteObject _cat_cl_muni = RemoteObject.createImmutable(""); -RemoteObject _cat_cl_edo = RemoteObject.createImmutable(""); -RemoteObject _cat_cl_cp = RemoteObject.createImmutable(""); -RemoteObject _cat_cl_long = RemoteObject.createImmutable(""); -RemoteObject _cat_cl_lat = RemoteObject.createImmutable(""); -RemoteObject _cat_cl_mtocompra = RemoteObject.createImmutable(""); -RemoteObject _cat_cl_num_seriefisico = RemoteObject.createImmutable(""); -RemoteObject _cat_cl_diasemana = RemoteObject.createImmutable(""); -RemoteObject _cat_cl_secuencia = RemoteObject.createImmutable(0); -RemoteObject _hist_ra_objmes = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_venta = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_tendencia = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_alcance = RemoteObject.createImmutable(""); -RemoteObject _hisr_ra_draobj = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_dravta = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_dsobj = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_dsvta = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_vpoobj = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_vpovta = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_ctes = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_cobccc = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_eco = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_visitplan = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_visireal = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_cobvisit = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_freccompobj = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_freccomreal = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_ventames1 = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_ventames2 = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_ventames3 = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_ventames4 = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_rechazo = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_rechazoporcen = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_semana1 = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_semana1_dias = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_semana1_dra = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_semana2 = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_semana2_dias = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_semana2_dra = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_semana3 = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_semana3_dias = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_semana3_dra = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_semana4 = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_semana4_dias = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_semana4_dra = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_semana5 = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_semana5_dias = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_semana5_dra = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_semana1_lpt = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_semana2_lpt = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_semana3_lpt = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_semana4_lpt = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_semana5_lpt = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_ruta = RemoteObject.createImmutable(""); -RemoteObject _hist_ra_idalmacen = RemoteObject.createImmutable(""); -RemoteObject _hp_cliente = RemoteObject.createImmutable(""); -RemoteObject _hp_codigo_promocion = RemoteObject.createImmutable(""); -RemoteObject _hccp_cliente = RemoteObject.createImmutable(""); -RemoteObject _hccp_promo = RemoteObject.createImmutable(""); -RemoteObject _hccp_cant = RemoteObject.createImmutable(""); -RemoteObject _hmc_marca = RemoteObject.createImmutable(""); -RemoteObject _hmc_total = RemoteObject.createImmutable(""); -RemoteObject _cat_pa_id = RemoteObject.createImmutable(""); -RemoteObject _cat_pa_maxprom = RemoteObject.createImmutable(""); -RemoteObject _cat_pa_maxpromrec = RemoteObject.createImmutable(""); -RemoteObject _cat_pa_maxpromclie = RemoteObject.createImmutable(""); -RemoteObject _cat_ve_idprod = RemoteObject.createImmutable(""); -RemoteObject _cat_ve_nombre = RemoteObject.createImmutable(""); -RemoteObject _cat_ve_orden = RemoteObject.createImmutable(""); -RemoteObject _hvd_marca = RemoteObject.createImmutable(""); -RemoteObject _clientes = RemoteObject.createImmutable(""); -RemoteObject _hc_ruta = RemoteObject.createImmutable(""); -RemoteObject _hc_cuota1 = RemoteObject.createImmutable(""); -RemoteObject _hc_cuota2 = RemoteObject.createImmutable(""); -RemoteObject _hc_cuota3 = RemoteObject.createImmutable(""); -RemoteObject _hc_cuota4 = RemoteObject.createImmutable(""); -RemoteObject _hc_cuota5 = RemoteObject.createImmutable(""); -RemoteObject _hc_cuota6 = RemoteObject.createImmutable(""); -RemoteObject _hc_meta1 = RemoteObject.createImmutable(""); -RemoteObject _hc_meta2 = RemoteObject.createImmutable(""); -RemoteObject _hc_meta3 = RemoteObject.createImmutable(""); -RemoteObject _hc_meta4 = RemoteObject.createImmutable(""); -RemoteObject _hc_meta5 = RemoteObject.createImmutable(""); -RemoteObject _hc_meta6 = RemoteObject.createImmutable(""); -RemoteObject _hcm_total_v = RemoteObject.createImmutable(""); -RemoteObject _hcm_total_vive = RemoteObject.createImmutable(""); -RemoteObject _hcm_total_guna = RemoteObject.createImmutable(""); -RemoteObject _hcm_total_beb = RemoteObject.createImmutable(""); -RemoteObject _cat_gp_id = RemoteObject.createImmutable(""); -RemoteObject _cat_gp_nombre = RemoteObject.createImmutable(""); -RemoteObject _cat_gp_imp1 = RemoteObject.createImmutable(""); -RemoteObject _cat_gp_imp2 = RemoteObject.createImmutable(""); -RemoteObject _cat_gp_precio = RemoteObject.createImmutable(""); -RemoteObject _cat_gp_clasif = RemoteObject.createImmutable(""); -RemoteObject _cat_gp_sts = RemoteObject.createImmutable(""); -RemoteObject _cat_gp_tipo = RemoteObject.createImmutable(""); -RemoteObject _cat_gp_subtipo = RemoteObject.createImmutable(""); -RemoteObject _cat_gp_img = null; -RemoteObject _cat_gp_almacen = RemoteObject.createImmutable(0); -RemoteObject _cat_gp_tipoprod = RemoteObject.createImmutable(0); -RemoteObject _cat_gp_iniciativa = RemoteObject.createImmutable(0); -RemoteObject _cat_gp_tipoprod2 = RemoteObject.createImmutable(""); -int _i = 0; -RemoteObject _cat_dp_almacen = RemoteObject.createImmutable(""); -RemoteObject _cat_dp_id = RemoteObject.createImmutable(""); -RemoteObject _cat_dp_idprod = RemoteObject.createImmutable(""); -RemoteObject _cat_dp_tipo = RemoteObject.createImmutable(""); -RemoteObject _cat_dp_pzas = RemoteObject.createImmutable(""); -RemoteObject _cat_dp_usuario = RemoteObject.createImmutable(""); -RemoteObject _cat_dp_fecha = RemoteObject.createImmutable(""); -RemoteObject _cat_dp_regalo = RemoteObject.createImmutable(""); -RemoteObject _cat_dp_clasif = RemoteObject.createImmutable(""); -RemoteObject _cat_dp_precio = RemoteObject.createImmutable(""); -RemoteObject _cat_dp_precio_simptos = RemoteObject.createImmutable(""); -RemoteObject _hvd_cliente = RemoteObject.createImmutable(""); -RemoteObject _hvd_pronombre = RemoteObject.createImmutable(""); -RemoteObject _hvd_cant = RemoteObject.createImmutable(""); -RemoteObject _hvd_costo_tot = RemoteObject.createImmutable(""); -RemoteObject _cat_va_descripcion = RemoteObject.createImmutable(""); -RemoteObject _cat_va_valor = RemoteObject.createImmutable(""); -RemoteObject _cuantosp = RemoteObject.createImmutable(0); -RemoteObject _cuantosc = RemoteObject.createImmutable(0); -RemoteObject _cuantosn = RemoteObject.createImmutable(0); -RemoteObject _cat_ve_version = RemoteObject.createImmutable(""); -RemoteObject _valido = RemoteObject.createImmutable(""); -RemoteObject _name2 = RemoteObject.createImmutable(""); -RemoteObject _fecha_hoy = RemoteObject.createImmutable(""); -RemoteObject _folio = RemoteObject.createImmutable(""); -RemoteObject _marca = RemoteObject.createImmutable(""); -RemoteObject _avance = RemoteObject.createImmutable(""); -RemoteObject _objetivo = RemoteObject.createImmutable(""); -RemoteObject _porcentaje1 = RemoteObject.createImmutable(""); -Debug.locals.put("Job", _job); - BA.debugLineNum = 986;BA.debugLine="Sub JobDone(Job As HttpJob)"; -Debug.ShouldStop(33554432); - BA.debugLineNum = 992;BA.debugLine="If Job.Success = False Then"; -Debug.ShouldStop(-2147483648); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_success" /*RemoteObject*/ ),c_principal.__c.getField(true,"False"))) { - BA.debugLineNum = 994;BA.debugLine="If Job.ErrorMessage = \"STREAM\" Then"; -Debug.ShouldStop(2); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_errormessage" /*RemoteObject*/ ),BA.ObjectToString("STREAM"))) { - BA.debugLineNum = 995;BA.debugLine="If CARGA = \"SUBIR\" Then"; -Debug.ShouldStop(4); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_carga" /*RemoteObject*/ ),BA.ObjectToString("SUBIR"))) { - BA.debugLineNum = 996;BA.debugLine="PB2.Progress = PB2.Progress + PORCENTAJE"; -Debug.ShouldStop(8); -__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, __ref.getField(true,"_porcentaje" /*RemoteObject*/ ))}, "+",1, 0))); - BA.debugLineNum = 997;BA.debugLine="S_CP.Text = \"SUBIENDO\""; -Debug.ShouldStop(16); -__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("SUBIENDO")); - BA.debugLineNum = 998;BA.debugLine="If PB2.Progress > 99 Then"; -Debug.ShouldStop(32); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 99))) { - BA.debugLineNum = 999;BA.debugLine="S_CP.Text = \"VALIDANDO\""; -Debug.ShouldStop(64); -__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("VALIDANDO")); - }; - }; - }; - }else { - BA.debugLineNum = 1004;BA.debugLine="LogColor(\"JobDone: '\" & B4XPages.MainPage.reqMan"; -Debug.ShouldStop(2048); -c_principal.__c.runVoidMethod ("LogImpl","33407890",RemoteObject.concat(RemoteObject.createImmutable("JobDone: '"),c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job)).getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable("' - Registros: "),c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job)).getField(false,"Rows" /*RemoteObject*/ ).runMethod(true,"getSize")),c_principal.__c.getField(false,"Colors").getField(true,"Green")); - BA.debugLineNum = 1006;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(8192); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1007;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(16384); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1009;BA.debugLine="If RESULT.Tag = \"update_gps\" Then"; -Debug.ShouldStop(65536); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("update_gps")))) { - BA.debugLineNum = 1010;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(131072); -{ -final RemoteObject group16 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen16 = group16.runMethod(true,"getSize").get() -;int index16 = 0; -; -for (; index16 < groupLen16;index16++){ -_records = (group16.runMethod(false,"Get",index16));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1011;BA.debugLine="Log(\"==========================REGISTROS=\"&RE"; -Debug.ShouldStop(262144); -c_principal.__c.runVoidMethod ("LogImpl","33407897",RemoteObject.concat(RemoteObject.createImmutable("==========================REGISTROS="),_result.getField(false,"Rows" /*RemoteObject*/ )),0); - BA.debugLineNum = 1012;BA.debugLine="For Each k As String In RESULT.Columns.Keys"; -Debug.ShouldStop(524288); -{ -final RemoteObject group18 = _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Keys"); -final int groupLen18 = group18.runMethod(true,"getSize").get() -;int index18 = 0; -; -for (; index18 < groupLen18;index18++){ -_k = BA.ObjectToString(group18.runMethod(false,"Get",index18));Debug.locals.put("k", _k); -Debug.locals.put("k", _k); - BA.debugLineNum = 1013;BA.debugLine="Log(RESULT.Tag & \": \" & k & \": \" & records(R"; -Debug.ShouldStop(1048576); -c_principal.__c.runVoidMethod ("LogImpl","33407899",RemoteObject.concat(_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(": "),_k,RemoteObject.createImmutable(": "),_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((_k)))))),0); - } -}Debug.locals.put("k", _k); -; - } -}Debug.locals.put("records", _records); -; - }; - BA.debugLineNum = 1017;BA.debugLine="If RESULT.Tag = \"ins_pedidos\" Then"; -Debug.ShouldStop(16777216); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("ins_pedidos")))) { - BA.debugLineNum = 1018;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(33554432); -{ -final RemoteObject group24 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen24 = group24.runMethod(true,"getSize").get() -;int index24 = 0; -; -for (; index24 < groupLen24;index24++){ -_records = (group24.runMethod(false,"Get",index24));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1019;BA.debugLine="Log(\"==========================REGISTROS=\"&RE"; -Debug.ShouldStop(67108864); -c_principal.__c.runVoidMethod ("LogImpl","33407905",RemoteObject.concat(RemoteObject.createImmutable("==========================REGISTROS="),_result.getField(false,"Rows" /*RemoteObject*/ )),0); - BA.debugLineNum = 1020;BA.debugLine="For Each k As String In RESULT.Columns.Keys"; -Debug.ShouldStop(134217728); -{ -final RemoteObject group26 = _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Keys"); -final int groupLen26 = group26.runMethod(true,"getSize").get() -;int index26 = 0; -; -for (; index26 < groupLen26;index26++){ -_k = BA.ObjectToString(group26.runMethod(false,"Get",index26));Debug.locals.put("k", _k); -Debug.locals.put("k", _k); - BA.debugLineNum = 1021;BA.debugLine="Log(RESULT.Tag & \": \" & k & \": \" & records(R"; -Debug.ShouldStop(268435456); -c_principal.__c.runVoidMethod ("LogImpl","33407907",RemoteObject.concat(_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(": "),_k,RemoteObject.createImmutable(": "),_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((_k)))))),0); - } -}Debug.locals.put("k", _k); -; - } -}Debug.locals.put("records", _records); -; - }; - BA.debugLineNum = 1025;BA.debugLine="If RESULT.Tag = \"usuarioA\" Then 'query tag"; -Debug.ShouldStop(1); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("usuarioA")))) { - BA.debugLineNum = 1026;BA.debugLine="Private n As String = \"Sin Usuario\""; -Debug.ShouldStop(2); -_n = BA.ObjectToString("Sin Usuario");Debug.locals.put("n", _n);Debug.locals.put("n", _n); - BA.debugLineNum = 1027;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(4); -{ -final RemoteObject group33 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen33 = group33.runMethod(true,"getSize").get() -;int index33 = 0; -; -for (; index33 < groupLen33;index33++){ -_records = (group33.runMethod(false,"Get",index33));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1028;BA.debugLine="n = records(RESULT.Columns.Get(\"USUARIO\"))"; -Debug.ShouldStop(8); -_n = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("USUARIO")))))));Debug.locals.put("n", _n); - } -}Debug.locals.put("records", _records); -; - BA.debugLineNum = 1030;BA.debugLine="LogColor(\"**************************\"&n, Color"; -Debug.ShouldStop(32); -c_principal.__c.runVoidMethod ("LogImpl","33407916",RemoteObject.concat(RemoteObject.createImmutable("**************************"),_n),c_principal.__c.getField(false,"Colors").getField(true,"Green")); - BA.debugLineNum = 1031;BA.debugLine="If n = \"OKActivo\" Then"; -Debug.ShouldStop(64); -if (RemoteObject.solveBoolean("=",_n,BA.ObjectToString("OKActivo"))) { - BA.debugLineNum = 1032;BA.debugLine="Log(\"Usuario guardado en BD es 'Valido'\")"; -Debug.ShouldStop(128); -c_principal.__c.runVoidMethod ("LogImpl","33407918",RemoteObject.createImmutable("Usuario guardado en BD es 'Valido'"),0); - }else -{ BA.debugLineNum = 1033;BA.debugLine="Else If n = \"OKExpirado\" Then"; -Debug.ShouldStop(256); -if (RemoteObject.solveBoolean("=",_n,BA.ObjectToString("OKExpirado"))) { - BA.debugLineNum = 1034;BA.debugLine="Msgbox(\"Usuario Expirado llamar al administra"; -Debug.ShouldStop(512); -c_principal.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("Usuario Expirado llamar al administrador")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable(""))),__ref.getField(false, "ba")); - BA.debugLineNum = 1035;BA.debugLine="B4XPages.ShowPage(\"B4XMainPage\")"; -Debug.ShouldStop(1024); -c_principal._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("B4XMainPage"))); - }else -{ BA.debugLineNum = 1036;BA.debugLine="Else If n = \"OKCancelado\" Then"; -Debug.ShouldStop(2048); -if (RemoteObject.solveBoolean("=",_n,BA.ObjectToString("OKCancelado"))) { - BA.debugLineNum = 1037;BA.debugLine="Msgbox(\"Usuario Cancelado llamar al administr"; -Debug.ShouldStop(4096); -c_principal.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("Usuario Cancelado llamar al administrador")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable(""))),__ref.getField(false, "ba")); - BA.debugLineNum = 1038;BA.debugLine="B4XPages.ShowPage(\"B4XMainPage\")"; -Debug.ShouldStop(8192); -c_principal._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("B4XMainPage"))); - }else { - BA.debugLineNum = 1040;BA.debugLine="Msgbox(\"Usuario o password No validos\",\"\") 'i"; -Debug.ShouldStop(32768); -c_principal.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("Usuario o password No validos")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable(""))),__ref.getField(false, "ba")); - BA.debugLineNum = 1041;BA.debugLine="B4XPages.ShowPage(\"B4XMainPage\")"; -Debug.ShouldStop(65536); -c_principal._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("B4XMainPage"))); - }}} -; - BA.debugLineNum = 1043;BA.debugLine="Log(\"***************** \"&n)"; -Debug.ShouldStop(262144); -c_principal.__c.runVoidMethod ("LogImpl","33407929",RemoteObject.concat(RemoteObject.createImmutable("***************** "),_n),0); - }; - }; - BA.debugLineNum = 1047;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(4194304); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1048;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(8388608); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1049;BA.debugLine="If RESULT.Tag = \"kmt_datos\" Then 'query tag"; -Debug.ShouldStop(16777216); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("kmt_datos")))) { - BA.debugLineNum = 1050;BA.debugLine="S_CC.TEXT = \"CARGANDO\""; -Debug.ShouldStop(33554432); -__ref.getField(false,"_s_cc" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("CARGANDO")); - BA.debugLineNum = 1051;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(67108864); -{ -final RemoteObject group56 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen56 = group56.runMethod(true,"getSize").get() -;int index56 = 0; -; -for (; index56 < groupLen56;index56++){ -_records = (group56.runMethod(false,"Get",index56));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1052;BA.debugLine="Dim CAT_CL_CODIGO As String = records(RESULT."; -Debug.ShouldStop(134217728); -_cat_cl_codigo = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_CL_CODIGO")))))));Debug.locals.put("CAT_CL_CODIGO", _cat_cl_codigo);Debug.locals.put("CAT_CL_CODIGO", _cat_cl_codigo); - BA.debugLineNum = 1053;BA.debugLine="Dim CAT_CL_RUTA As String = records(RESULT.Co"; -Debug.ShouldStop(268435456); -_cat_cl_ruta = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_CL_RUTA")))))));Debug.locals.put("CAT_CL_RUTA", _cat_cl_ruta);Debug.locals.put("CAT_CL_RUTA", _cat_cl_ruta); - BA.debugLineNum = 1054;BA.debugLine="Dim CAT_CL_NOMBRE As String = records(RESULT."; -Debug.ShouldStop(536870912); -_cat_cl_nombre = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_CL_NOMBRE")))))));Debug.locals.put("CAT_CL_NOMBRE", _cat_cl_nombre);Debug.locals.put("CAT_CL_NOMBRE", _cat_cl_nombre); - BA.debugLineNum = 1055;BA.debugLine="Dim CAT_CL_ATIENDE1 As String = records(RESUL"; -Debug.ShouldStop(1073741824); -_cat_cl_atiende1 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_CL_ATIENDE1")))))));Debug.locals.put("CAT_CL_ATIENDE1", _cat_cl_atiende1);Debug.locals.put("CAT_CL_ATIENDE1", _cat_cl_atiende1); - BA.debugLineNum = 1056;BA.debugLine="Dim CAT_CL_ATIENTE2 As String = records(RESUL"; -Debug.ShouldStop(-2147483648); -_cat_cl_atiente2 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_CL_ATIENTE2")))))));Debug.locals.put("CAT_CL_ATIENTE2", _cat_cl_atiente2);Debug.locals.put("CAT_CL_ATIENTE2", _cat_cl_atiente2); - BA.debugLineNum = 1057;BA.debugLine="Dim CAT_CL_TELEFONO As String = records(RESUL"; -Debug.ShouldStop(1); -_cat_cl_telefono = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_CL_TELEFONO")))))));Debug.locals.put("CAT_CL_TELEFONO", _cat_cl_telefono);Debug.locals.put("CAT_CL_TELEFONO", _cat_cl_telefono); - BA.debugLineNum = 1058;BA.debugLine="Dim CAT_CL_EMAIL As String = records(RESULT.C"; -Debug.ShouldStop(2); -_cat_cl_email = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_CL_EMAIL")))))));Debug.locals.put("CAT_CL_EMAIL", _cat_cl_email);Debug.locals.put("CAT_CL_EMAIL", _cat_cl_email); - BA.debugLineNum = 1059;BA.debugLine="Dim CAT_CL_CALLE As String = records(RESULT.C"; -Debug.ShouldStop(4); -_cat_cl_calle = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_CL_CALLE")))))));Debug.locals.put("CAT_CL_CALLE", _cat_cl_calle);Debug.locals.put("CAT_CL_CALLE", _cat_cl_calle); - BA.debugLineNum = 1060;BA.debugLine="Dim CAT_CL_NOEXT As String = records(RESULT.C"; -Debug.ShouldStop(8); -_cat_cl_noext = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_CL_NOEXT")))))));Debug.locals.put("CAT_CL_NOEXT", _cat_cl_noext);Debug.locals.put("CAT_CL_NOEXT", _cat_cl_noext); - BA.debugLineNum = 1061;BA.debugLine="Dim CAT_CL_NOINT As String = records(RESULT.C"; -Debug.ShouldStop(16); -_cat_cl_noint = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_CL_NOINT")))))));Debug.locals.put("CAT_CL_NOINT", _cat_cl_noint);Debug.locals.put("CAT_CL_NOINT", _cat_cl_noint); - BA.debugLineNum = 1062;BA.debugLine="Dim CAT_CL_CALLE1 As String = records(RESULT."; -Debug.ShouldStop(32); -_cat_cl_calle1 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_CL_CALLE1")))))));Debug.locals.put("CAT_CL_CALLE1", _cat_cl_calle1);Debug.locals.put("CAT_CL_CALLE1", _cat_cl_calle1); - BA.debugLineNum = 1063;BA.debugLine="Dim CAT_CL_CALLE2 As String = records(RESULT."; -Debug.ShouldStop(64); -_cat_cl_calle2 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_CL_CALLE2")))))));Debug.locals.put("CAT_CL_CALLE2", _cat_cl_calle2);Debug.locals.put("CAT_CL_CALLE2", _cat_cl_calle2); - BA.debugLineNum = 1064;BA.debugLine="Dim CAT_CL_COLONIA As String = records(RESULT"; -Debug.ShouldStop(128); -_cat_cl_colonia = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_CL_COLONIA")))))));Debug.locals.put("CAT_CL_COLONIA", _cat_cl_colonia);Debug.locals.put("CAT_CL_COLONIA", _cat_cl_colonia); - BA.debugLineNum = 1065;BA.debugLine="Dim CAT_CL_MUNI As String = records(RESULT.Co"; -Debug.ShouldStop(256); -_cat_cl_muni = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_CL_MUNI")))))));Debug.locals.put("CAT_CL_MUNI", _cat_cl_muni);Debug.locals.put("CAT_CL_MUNI", _cat_cl_muni); - BA.debugLineNum = 1066;BA.debugLine="Dim CAT_CL_EDO As String = records(RESULT.Col"; -Debug.ShouldStop(512); -_cat_cl_edo = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_CL_EDO")))))));Debug.locals.put("CAT_CL_EDO", _cat_cl_edo);Debug.locals.put("CAT_CL_EDO", _cat_cl_edo); - BA.debugLineNum = 1067;BA.debugLine="Dim CAT_CL_CP As String = records(RESULT.Colu"; -Debug.ShouldStop(1024); -_cat_cl_cp = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_CL_CP")))))));Debug.locals.put("CAT_CL_CP", _cat_cl_cp);Debug.locals.put("CAT_CL_CP", _cat_cl_cp); - BA.debugLineNum = 1068;BA.debugLine="Dim CAT_CL_LONG As String = records(RESULT.Co"; -Debug.ShouldStop(2048); -_cat_cl_long = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_CL_LONG")))))));Debug.locals.put("CAT_CL_LONG", _cat_cl_long);Debug.locals.put("CAT_CL_LONG", _cat_cl_long); - BA.debugLineNum = 1069;BA.debugLine="Dim CAT_CL_LAT As String = records(RESULT.Col"; -Debug.ShouldStop(4096); -_cat_cl_lat = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_CL_LAT")))))));Debug.locals.put("CAT_CL_LAT", _cat_cl_lat);Debug.locals.put("CAT_CL_LAT", _cat_cl_lat); - BA.debugLineNum = 1070;BA.debugLine="Dim CAT_CL_MTOCOMPRA As String = records(RESU"; -Debug.ShouldStop(8192); -_cat_cl_mtocompra = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_CL_MTOCOMPRA")))))));Debug.locals.put("CAT_CL_MTOCOMPRA", _cat_cl_mtocompra);Debug.locals.put("CAT_CL_MTOCOMPRA", _cat_cl_mtocompra); - BA.debugLineNum = 1071;BA.debugLine="Dim CAT_CL_NUM_SERIEFISICO As String = record"; -Debug.ShouldStop(16384); -_cat_cl_num_seriefisico = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_CL_NUM_SERIEFISICO")))))));Debug.locals.put("CAT_CL_NUM_SERIEFISICO", _cat_cl_num_seriefisico);Debug.locals.put("CAT_CL_NUM_SERIEFISICO", _cat_cl_num_seriefisico); - BA.debugLineNum = 1072;BA.debugLine="Dim CAT_CL_DIASEMANA As String = records(RESU"; -Debug.ShouldStop(32768); -_cat_cl_diasemana = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_CL_DIAS_VISITA")))))));Debug.locals.put("CAT_CL_DIASEMANA", _cat_cl_diasemana);Debug.locals.put("CAT_CL_DIASEMANA", _cat_cl_diasemana); - BA.debugLineNum = 1073;BA.debugLine="Dim CAT_CL_SECUENCIA As Int = records(RESULT."; -Debug.ShouldStop(65536); -_cat_cl_secuencia = BA.numberCast(int.class, _records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_CL_SECUENCIA")))))));Debug.locals.put("CAT_CL_SECUENCIA", _cat_cl_secuencia);Debug.locals.put("CAT_CL_SECUENCIA", _cat_cl_secuencia); - BA.debugLineNum = 1074;BA.debugLine="Starter.dia_semana = CAT_CL_DIASEMANA"; -Debug.ShouldStop(131072); -c_principal._starter._dia_semana /*RemoteObject*/ = _cat_cl_diasemana; - BA.debugLineNum = 1075;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(262144); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("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, CAT_CL_DIASEMANA, CAT_CL_SECUENCIA) VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,0,?,?)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {22},new Object[] {(_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),(_cat_cl_diasemana),(_cat_cl_secuencia)}))))); - BA.debugLineNum = 1076;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(524288); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO HIST_STAY_STORE(HSS_CODIGO, HSS_IN , HSS_OUT , HSS_TOT) VALUES (?,0,0,0)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(_cat_cl_codigo)}))))); - } -}Debug.locals.put("records", _records); -; - BA.debugLineNum = 1078;BA.debugLine="Listo1 = 1"; -Debug.ShouldStop(2097152); -__ref.setField ("_listo1" /*RemoteObject*/ ,BA.NumberToString(1)); - BA.debugLineNum = 1079;BA.debugLine="S_CC.Text = \"LISTO\""; -Debug.ShouldStop(4194304); -__ref.getField(false,"_s_cc" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("LISTO")); - BA.debugLineNum = 1080;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; -Debug.ShouldStop(8388608); -if (RemoteObject.solveBoolean("!",c_principal._starter._marcacel /*RemoteObject*/ ,BA.ObjectToString("Sony"))) { -c_principal.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Catalogo Clientes Actualizados.")),(Object)(c_principal.__c.getField(true,"True")));}; - BA.debugLineNum = 1081;BA.debugLine="If Listo1 = 1 And Listo2 = 1 And Listo3 = 1 An"; -Debug.ShouldStop(16777216); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_listo1" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_listo2" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_listo3" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_listo4" /*RemoteObject*/ ),BA.NumberToString(1))) { - BA.debugLineNum = 1082;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(33554432); -__ref.runClassMethod (keymon.lat.medicomed.c_principal.class, "_b4xpage_appear" /*void*/ ); - BA.debugLineNum = 1083;BA.debugLine="img2.Visible=False"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_img2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1084;BA.debugLine="EJECUTANDO = 0"; -Debug.ShouldStop(134217728); -__ref.setField ("_ejecutando" /*RemoteObject*/ ,BA.NumberToString(0)); - }; - }; - }; - BA.debugLineNum = 1089;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(1); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1090;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(2); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1091;BA.debugLine="If RESULT.Tag = \"resum_apk\" Then 'query tag"; -Debug.ShouldStop(4); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("resum_apk")))) { - BA.debugLineNum = 1092;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(8); -{ -final RemoteObject group96 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen96 = group96.runMethod(true,"getSize").get() -;int index96 = 0; -; -for (; index96 < groupLen96;index96++){ -_records = (group96.runMethod(false,"Get",index96));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1093;BA.debugLine="Dim HIST_RA_OBJMES As String = records(RESULT"; -Debug.ShouldStop(16); -_hist_ra_objmes = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_OBJMES")))))));Debug.locals.put("HIST_RA_OBJMES", _hist_ra_objmes);Debug.locals.put("HIST_RA_OBJMES", _hist_ra_objmes); - BA.debugLineNum = 1094;BA.debugLine="Dim HIST_RA_VENTA As String = records(RESULT."; -Debug.ShouldStop(32); -_hist_ra_venta = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_VENTA")))))));Debug.locals.put("HIST_RA_VENTA", _hist_ra_venta);Debug.locals.put("HIST_RA_VENTA", _hist_ra_venta); - BA.debugLineNum = 1095;BA.debugLine="Dim HIST_RA_TENDENCIA As String = records(RES"; -Debug.ShouldStop(64); -_hist_ra_tendencia = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_TENDENCIA")))))));Debug.locals.put("HIST_RA_TENDENCIA", _hist_ra_tendencia);Debug.locals.put("HIST_RA_TENDENCIA", _hist_ra_tendencia); - BA.debugLineNum = 1096;BA.debugLine="Dim HIST_RA_ALCANCE As String = records(RESUL"; -Debug.ShouldStop(128); -_hist_ra_alcance = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_ALCANCE")))))));Debug.locals.put("HIST_RA_ALCANCE", _hist_ra_alcance);Debug.locals.put("HIST_RA_ALCANCE", _hist_ra_alcance); - BA.debugLineNum = 1097;BA.debugLine="Dim HISR_RA_DRAOBJ As String = records(RESULT"; -Debug.ShouldStop(256); -_hisr_ra_draobj = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HISR_RA_DRAOBJ")))))));Debug.locals.put("HISR_RA_DRAOBJ", _hisr_ra_draobj);Debug.locals.put("HISR_RA_DRAOBJ", _hisr_ra_draobj); - BA.debugLineNum = 1098;BA.debugLine="Dim HIST_RA_DRAVTA As String = records(RESULT"; -Debug.ShouldStop(512); -_hist_ra_dravta = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_DRAVTA")))))));Debug.locals.put("HIST_RA_DRAVTA", _hist_ra_dravta);Debug.locals.put("HIST_RA_DRAVTA", _hist_ra_dravta); - BA.debugLineNum = 1099;BA.debugLine="Dim HIST_RA_DSOBJ As String = records(RESULT."; -Debug.ShouldStop(1024); -_hist_ra_dsobj = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_DSOBJ")))))));Debug.locals.put("HIST_RA_DSOBJ", _hist_ra_dsobj);Debug.locals.put("HIST_RA_DSOBJ", _hist_ra_dsobj); - BA.debugLineNum = 1100;BA.debugLine="Dim HIST_RA_DSVTA As String = records(RESULT."; -Debug.ShouldStop(2048); -_hist_ra_dsvta = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_DSVTA")))))));Debug.locals.put("HIST_RA_DSVTA", _hist_ra_dsvta);Debug.locals.put("HIST_RA_DSVTA", _hist_ra_dsvta); - BA.debugLineNum = 1101;BA.debugLine="Dim HIST_RA_VPOOBJ As String = records(RESULT"; -Debug.ShouldStop(4096); -_hist_ra_vpoobj = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_VPOOBJ")))))));Debug.locals.put("HIST_RA_VPOOBJ", _hist_ra_vpoobj);Debug.locals.put("HIST_RA_VPOOBJ", _hist_ra_vpoobj); - BA.debugLineNum = 1102;BA.debugLine="Dim HIST_RA_VPOVTA As String = records(RESULT"; -Debug.ShouldStop(8192); -_hist_ra_vpovta = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_VPOVTA")))))));Debug.locals.put("HIST_RA_VPOVTA", _hist_ra_vpovta);Debug.locals.put("HIST_RA_VPOVTA", _hist_ra_vpovta); - BA.debugLineNum = 1103;BA.debugLine="Dim HIST_RA_CTES As String = records(RESULT.C"; -Debug.ShouldStop(16384); -_hist_ra_ctes = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_CTES")))))));Debug.locals.put("HIST_RA_CTES", _hist_ra_ctes);Debug.locals.put("HIST_RA_CTES", _hist_ra_ctes); - BA.debugLineNum = 1104;BA.debugLine="Dim HIST_RA_COBCCC As String = records(RESULT"; -Debug.ShouldStop(32768); -_hist_ra_cobccc = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_COBCCC")))))));Debug.locals.put("HIST_RA_COBCCC", _hist_ra_cobccc);Debug.locals.put("HIST_RA_COBCCC", _hist_ra_cobccc); - BA.debugLineNum = 1105;BA.debugLine="Dim HIST_RA_ECO As String = records(RESULT.Co"; -Debug.ShouldStop(65536); -_hist_ra_eco = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_ECO")))))));Debug.locals.put("HIST_RA_ECO", _hist_ra_eco);Debug.locals.put("HIST_RA_ECO", _hist_ra_eco); - BA.debugLineNum = 1106;BA.debugLine="Dim HIST_RA_VISITPLAN As String = records(RES"; -Debug.ShouldStop(131072); -_hist_ra_visitplan = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_VISITPLAN")))))));Debug.locals.put("HIST_RA_VISITPLAN", _hist_ra_visitplan);Debug.locals.put("HIST_RA_VISITPLAN", _hist_ra_visitplan); - BA.debugLineNum = 1107;BA.debugLine="Dim HIST_RA_VISIREAL As String = records(RESU"; -Debug.ShouldStop(262144); -_hist_ra_visireal = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_VISIREAL")))))));Debug.locals.put("HIST_RA_VISIREAL", _hist_ra_visireal);Debug.locals.put("HIST_RA_VISIREAL", _hist_ra_visireal); - BA.debugLineNum = 1108;BA.debugLine="Dim HIST_RA_COBVISIT As String = records(RESU"; -Debug.ShouldStop(524288); -_hist_ra_cobvisit = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_COBVISIT")))))));Debug.locals.put("HIST_RA_COBVISIT", _hist_ra_cobvisit);Debug.locals.put("HIST_RA_COBVISIT", _hist_ra_cobvisit); - BA.debugLineNum = 1109;BA.debugLine="Dim HIST_RA_FRECCOMPOBJ As String = records(R"; -Debug.ShouldStop(1048576); -_hist_ra_freccompobj = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_FRECCOMPOBJ")))))));Debug.locals.put("HIST_RA_FRECCOMPOBJ", _hist_ra_freccompobj);Debug.locals.put("HIST_RA_FRECCOMPOBJ", _hist_ra_freccompobj); - BA.debugLineNum = 1110;BA.debugLine="Dim HIST_RA_FRECCOMREAL As String = records(R"; -Debug.ShouldStop(2097152); -_hist_ra_freccomreal = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_FRECCOMREAL")))))));Debug.locals.put("HIST_RA_FRECCOMREAL", _hist_ra_freccomreal);Debug.locals.put("HIST_RA_FRECCOMREAL", _hist_ra_freccomreal); - BA.debugLineNum = 1111;BA.debugLine="Dim HIST_RA_VENTAMES1 As String = records(RES"; -Debug.ShouldStop(4194304); -_hist_ra_ventames1 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_VENTAMES1")))))));Debug.locals.put("HIST_RA_VENTAMES1", _hist_ra_ventames1);Debug.locals.put("HIST_RA_VENTAMES1", _hist_ra_ventames1); - BA.debugLineNum = 1112;BA.debugLine="Dim HIST_RA_VENTAMES2 As String = records(RES"; -Debug.ShouldStop(8388608); -_hist_ra_ventames2 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_VENTAMES2")))))));Debug.locals.put("HIST_RA_VENTAMES2", _hist_ra_ventames2);Debug.locals.put("HIST_RA_VENTAMES2", _hist_ra_ventames2); - BA.debugLineNum = 1113;BA.debugLine="Dim HIST_RA_VENTAMES3 As String = records(RES"; -Debug.ShouldStop(16777216); -_hist_ra_ventames3 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_VENTAMES3")))))));Debug.locals.put("HIST_RA_VENTAMES3", _hist_ra_ventames3);Debug.locals.put("HIST_RA_VENTAMES3", _hist_ra_ventames3); - BA.debugLineNum = 1114;BA.debugLine="Dim HIST_RA_VENTAMES4 As String = records(RES"; -Debug.ShouldStop(33554432); -_hist_ra_ventames4 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_VENTAMES4")))))));Debug.locals.put("HIST_RA_VENTAMES4", _hist_ra_ventames4);Debug.locals.put("HIST_RA_VENTAMES4", _hist_ra_ventames4); - BA.debugLineNum = 1115;BA.debugLine="Dim HIST_RA_RECHAZO As String = records(RESUL"; -Debug.ShouldStop(67108864); -_hist_ra_rechazo = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_RECHAZO")))))));Debug.locals.put("HIST_RA_RECHAZO", _hist_ra_rechazo);Debug.locals.put("HIST_RA_RECHAZO", _hist_ra_rechazo); - BA.debugLineNum = 1116;BA.debugLine="Dim HIST_RA_RECHAZOPORCEN As String = records"; -Debug.ShouldStop(134217728); -_hist_ra_rechazoporcen = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_RECHAZOPORCEN")))))));Debug.locals.put("HIST_RA_RECHAZOPORCEN", _hist_ra_rechazoporcen);Debug.locals.put("HIST_RA_RECHAZOPORCEN", _hist_ra_rechazoporcen); - BA.debugLineNum = 1117;BA.debugLine="Dim HIST_RA_SEMANA1 As String = records(RESUL"; -Debug.ShouldStop(268435456); -_hist_ra_semana1 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_SEMANA1")))))));Debug.locals.put("HIST_RA_SEMANA1", _hist_ra_semana1);Debug.locals.put("HIST_RA_SEMANA1", _hist_ra_semana1); - BA.debugLineNum = 1118;BA.debugLine="Dim HIST_RA_SEMANA1_DIAS As String = records("; -Debug.ShouldStop(536870912); -_hist_ra_semana1_dias = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_SEMANA1_DIAS")))))));Debug.locals.put("HIST_RA_SEMANA1_DIAS", _hist_ra_semana1_dias);Debug.locals.put("HIST_RA_SEMANA1_DIAS", _hist_ra_semana1_dias); - BA.debugLineNum = 1119;BA.debugLine="Dim HIST_RA_SEMANA1_DRA As String = records(R"; -Debug.ShouldStop(1073741824); -_hist_ra_semana1_dra = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_SEMANA1_DRA")))))));Debug.locals.put("HIST_RA_SEMANA1_DRA", _hist_ra_semana1_dra);Debug.locals.put("HIST_RA_SEMANA1_DRA", _hist_ra_semana1_dra); - BA.debugLineNum = 1120;BA.debugLine="Dim HIST_RA_SEMANA2 As String = records(RESUL"; -Debug.ShouldStop(-2147483648); -_hist_ra_semana2 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_SEMANA2")))))));Debug.locals.put("HIST_RA_SEMANA2", _hist_ra_semana2);Debug.locals.put("HIST_RA_SEMANA2", _hist_ra_semana2); - BA.debugLineNum = 1121;BA.debugLine="Dim HIST_RA_SEMANA2_DIAS As String = records("; -Debug.ShouldStop(1); -_hist_ra_semana2_dias = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_SEMANA2_DIAS")))))));Debug.locals.put("HIST_RA_SEMANA2_DIAS", _hist_ra_semana2_dias);Debug.locals.put("HIST_RA_SEMANA2_DIAS", _hist_ra_semana2_dias); - BA.debugLineNum = 1122;BA.debugLine="Dim HIST_RA_SEMANA2_DRA As String = records(R"; -Debug.ShouldStop(2); -_hist_ra_semana2_dra = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_SEMANA2_DRA")))))));Debug.locals.put("HIST_RA_SEMANA2_DRA", _hist_ra_semana2_dra);Debug.locals.put("HIST_RA_SEMANA2_DRA", _hist_ra_semana2_dra); - BA.debugLineNum = 1123;BA.debugLine="Dim HIST_RA_SEMANA3 As String = records(RESUL"; -Debug.ShouldStop(4); -_hist_ra_semana3 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_SEMANA3")))))));Debug.locals.put("HIST_RA_SEMANA3", _hist_ra_semana3);Debug.locals.put("HIST_RA_SEMANA3", _hist_ra_semana3); - BA.debugLineNum = 1124;BA.debugLine="Dim HIST_RA_SEMANA3_DIAS As String = records("; -Debug.ShouldStop(8); -_hist_ra_semana3_dias = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_SEMANA3_DIAS")))))));Debug.locals.put("HIST_RA_SEMANA3_DIAS", _hist_ra_semana3_dias);Debug.locals.put("HIST_RA_SEMANA3_DIAS", _hist_ra_semana3_dias); - BA.debugLineNum = 1125;BA.debugLine="Dim HIST_RA_SEMANA3_DRA As String = records(R"; -Debug.ShouldStop(16); -_hist_ra_semana3_dra = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_SEMANA3_DRA")))))));Debug.locals.put("HIST_RA_SEMANA3_DRA", _hist_ra_semana3_dra);Debug.locals.put("HIST_RA_SEMANA3_DRA", _hist_ra_semana3_dra); - BA.debugLineNum = 1126;BA.debugLine="Dim HIST_RA_SEMANA4 As String = records(RESUL"; -Debug.ShouldStop(32); -_hist_ra_semana4 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_SEMANA4")))))));Debug.locals.put("HIST_RA_SEMANA4", _hist_ra_semana4);Debug.locals.put("HIST_RA_SEMANA4", _hist_ra_semana4); - BA.debugLineNum = 1127;BA.debugLine="Dim HIST_RA_SEMANA4_DIAS As String = records("; -Debug.ShouldStop(64); -_hist_ra_semana4_dias = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_SEMANA4_DIAS")))))));Debug.locals.put("HIST_RA_SEMANA4_DIAS", _hist_ra_semana4_dias);Debug.locals.put("HIST_RA_SEMANA4_DIAS", _hist_ra_semana4_dias); - BA.debugLineNum = 1128;BA.debugLine="Dim HIST_RA_SEMANA4_DRA As String = records(R"; -Debug.ShouldStop(128); -_hist_ra_semana4_dra = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_SEMANA4_DRA")))))));Debug.locals.put("HIST_RA_SEMANA4_DRA", _hist_ra_semana4_dra);Debug.locals.put("HIST_RA_SEMANA4_DRA", _hist_ra_semana4_dra); - BA.debugLineNum = 1129;BA.debugLine="Dim HIST_RA_SEMANA5 As String = records(RESUL"; -Debug.ShouldStop(256); -_hist_ra_semana5 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_SEMANA5")))))));Debug.locals.put("HIST_RA_SEMANA5", _hist_ra_semana5);Debug.locals.put("HIST_RA_SEMANA5", _hist_ra_semana5); - BA.debugLineNum = 1130;BA.debugLine="Dim HIST_RA_SEMANA5_DIAS As String = records("; -Debug.ShouldStop(512); -_hist_ra_semana5_dias = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_SEMANA5_DIAS")))))));Debug.locals.put("HIST_RA_SEMANA5_DIAS", _hist_ra_semana5_dias);Debug.locals.put("HIST_RA_SEMANA5_DIAS", _hist_ra_semana5_dias); - BA.debugLineNum = 1131;BA.debugLine="Dim HIST_RA_SEMANA5_DRA As String = records(R"; -Debug.ShouldStop(1024); -_hist_ra_semana5_dra = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_SEMANA5_DRA")))))));Debug.locals.put("HIST_RA_SEMANA5_DRA", _hist_ra_semana5_dra);Debug.locals.put("HIST_RA_SEMANA5_DRA", _hist_ra_semana5_dra); - BA.debugLineNum = 1132;BA.debugLine="Dim HIST_RA_SEMANA1_LPT As String = records(R"; -Debug.ShouldStop(2048); -_hist_ra_semana1_lpt = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_SEMANA1_LPT")))))));Debug.locals.put("HIST_RA_SEMANA1_LPT", _hist_ra_semana1_lpt);Debug.locals.put("HIST_RA_SEMANA1_LPT", _hist_ra_semana1_lpt); - BA.debugLineNum = 1133;BA.debugLine="Dim HIST_RA_SEMANA2_LPT As String = records(R"; -Debug.ShouldStop(4096); -_hist_ra_semana2_lpt = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_SEMANA2_LPT")))))));Debug.locals.put("HIST_RA_SEMANA2_LPT", _hist_ra_semana2_lpt);Debug.locals.put("HIST_RA_SEMANA2_LPT", _hist_ra_semana2_lpt); - BA.debugLineNum = 1134;BA.debugLine="Dim HIST_RA_SEMANA3_LPT As String = records(R"; -Debug.ShouldStop(8192); -_hist_ra_semana3_lpt = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_SEMANA3_LPT")))))));Debug.locals.put("HIST_RA_SEMANA3_LPT", _hist_ra_semana3_lpt);Debug.locals.put("HIST_RA_SEMANA3_LPT", _hist_ra_semana3_lpt); - BA.debugLineNum = 1135;BA.debugLine="Dim HIST_RA_SEMANA4_LPT As String = records(R"; -Debug.ShouldStop(16384); -_hist_ra_semana4_lpt = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_SEMANA4_LPT")))))));Debug.locals.put("HIST_RA_SEMANA4_LPT", _hist_ra_semana4_lpt);Debug.locals.put("HIST_RA_SEMANA4_LPT", _hist_ra_semana4_lpt); - BA.debugLineNum = 1136;BA.debugLine="Dim HIST_RA_SEMANA5_LPT As String = records(R"; -Debug.ShouldStop(32768); -_hist_ra_semana5_lpt = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_SEMANA5_LPT")))))));Debug.locals.put("HIST_RA_SEMANA5_LPT", _hist_ra_semana5_lpt);Debug.locals.put("HIST_RA_SEMANA5_LPT", _hist_ra_semana5_lpt); - BA.debugLineNum = 1137;BA.debugLine="Dim HIST_RA_RUTA As String = records(RESULT.C"; -Debug.ShouldStop(65536); -_hist_ra_ruta = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_RUTA")))))));Debug.locals.put("HIST_RA_RUTA", _hist_ra_ruta);Debug.locals.put("HIST_RA_RUTA", _hist_ra_ruta); - BA.debugLineNum = 1138;BA.debugLine="Dim HIST_RA_IDALMACEN As String = records(RES"; -Debug.ShouldStop(131072); -_hist_ra_idalmacen = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_RA_IDALMACEN")))))));Debug.locals.put("HIST_RA_IDALMACEN", _hist_ra_idalmacen);Debug.locals.put("HIST_RA_IDALMACEN", _hist_ra_idalmacen); - BA.debugLineNum = 1140;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(524288); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO HIST_RESUM_APK(HIST_RA_OBJMES,HIST_RA_VENTA,HIST_RA_TENDENCIA,HIST_RA_ALCANCE,HISR_RA_DRAOBJ,HIST_RA_DRAVTA,HIST_RA_DSOBJ,HIST_RA_DSVTA,HIST_RA_VPOOBJ,HIST_RA_VPOVTA,HIST_RA_CTES,HIST_RA_COBCCC,HIST_RA_ECO,HIST_RA_VISITPLAN,HIST_RA_VISIREAL,HIST_RA_COBVISIT,HIST_RA_FRECCOMPOBJ,HIST_RA_FRECCOMREAL,HIST_RA_VENTAMES1,HIST_RA_VENTAMES2,HIST_RA_VENTAMES3,HIST_RA_VENTAMES4,HIST_RA_RECHAZO,HIST_RA_RECHAZOPORCEN,HIST_RA_SEMANA1,HIST_RA_SEMANA1_DIAS,HIST_RA_SEMANA1_DRA,HIST_RA_SEMANA2,HIST_RA_SEMANA2_DIAS,HIST_RA_SEMANA2_DRA,HIST_RA_SEMANA3,HIST_RA_SEMANA3_DIAS,HIST_RA_SEMANA3_DRA,HIST_RA_SEMANA4,HIST_RA_SEMANA4_DIAS,HIST_RA_SEMANA4_DRA,HIST_RA_SEMANA5,HIST_RA_SEMANA5_DIAS,HIST_RA_SEMANA5_DRA,HIST_RA_SEMANA1_LPT,HIST_RA_SEMANA2_LPT,HIST_RA_SEMANA3_LPT,HIST_RA_SEMANA4_LPT,HIST_RA_SEMANA5_LPT,HIST_RA_RUTA,HIST_RA_IDALMACEN) VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {46},new Object[] {(_hist_ra_objmes),(_hist_ra_venta),(_hist_ra_tendencia),(_hist_ra_alcance),(_hisr_ra_draobj),(_hist_ra_dravta),(_hist_ra_dsobj),(_hist_ra_dsvta),(_hist_ra_vpoobj),(_hist_ra_vpovta),(_hist_ra_ctes),(_hist_ra_cobccc),(_hist_ra_eco),(_hist_ra_visitplan),(_hist_ra_visireal),(_hist_ra_cobvisit),(_hist_ra_freccompobj),(_hist_ra_freccomreal),(_hist_ra_ventames1),(_hist_ra_ventames2),(_hist_ra_ventames3),(_hist_ra_ventames4),(_hist_ra_rechazo),(_hist_ra_rechazoporcen),(_hist_ra_semana1),(_hist_ra_semana1_dias),(_hist_ra_semana1_dra),(_hist_ra_semana2),(_hist_ra_semana2_dias),(_hist_ra_semana2_dra),(_hist_ra_semana3),(_hist_ra_semana3_dias),(_hist_ra_semana3_dra),(_hist_ra_semana4),(_hist_ra_semana4_dias),(_hist_ra_semana4_dra),(_hist_ra_semana5),(_hist_ra_semana5_dias),(_hist_ra_semana5_dra),(_hist_ra_semana1_lpt),(_hist_ra_semana2_lpt),(_hist_ra_semana3_lpt),(_hist_ra_semana4_lpt),(_hist_ra_semana5_lpt),(_hist_ra_ruta),(_hist_ra_idalmacen)}))))); - } -}Debug.locals.put("records", _records); -; - BA.debugLineNum = 1143;BA.debugLine="Listo1 = 1"; -Debug.ShouldStop(4194304); -__ref.setField ("_listo1" /*RemoteObject*/ ,BA.NumberToString(1)); - BA.debugLineNum = 1144;BA.debugLine="S_CC.Text = \"LISTO\""; -Debug.ShouldStop(8388608); -__ref.getField(false,"_s_cc" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("LISTO")); - BA.debugLineNum = 1145;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; -Debug.ShouldStop(16777216); -if (RemoteObject.solveBoolean("!",c_principal._starter._marcacel /*RemoteObject*/ ,BA.ObjectToString("Sony"))) { -c_principal.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Catalogo Resumen Actualizado.")),(Object)(c_principal.__c.getField(true,"True")));}; - }; - }; - BA.debugLineNum = 1149;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(268435456); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1150;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(536870912); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1151;BA.debugLine="If RESULT.Tag = \"hist_promos\" Then 'query tag"; -Debug.ShouldStop(1073741824); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("hist_promos")))) { - BA.debugLineNum = 1152;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(-2147483648); -{ -final RemoteObject group153 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen153 = group153.runMethod(true,"getSize").get() -;int index153 = 0; -; -for (; index153 < groupLen153;index153++){ -_records = (group153.runMethod(false,"Get",index153));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1153;BA.debugLine="Dim HP_CLIENTE As String = records(RESULT.Col"; -Debug.ShouldStop(1); -_hp_cliente = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HP_CLIENTE")))))));Debug.locals.put("HP_CLIENTE", _hp_cliente);Debug.locals.put("HP_CLIENTE", _hp_cliente); - BA.debugLineNum = 1154;BA.debugLine="Dim HP_CODIGO_PROMOCION As String = records(R"; -Debug.ShouldStop(2); -_hp_codigo_promocion = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HP_CODIGO_PROMOCION")))))));Debug.locals.put("HP_CODIGO_PROMOCION", _hp_codigo_promocion);Debug.locals.put("HP_CODIGO_PROMOCION", _hp_codigo_promocion); - BA.debugLineNum = 1155;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(4); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO HIST_PROMOS(HP_CLIENTE, HP_CODIGO_PROMOCION) VALUES (?,?)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(_hp_cliente),(_hp_codigo_promocion)}))))); - } -}Debug.locals.put("records", _records); -; - BA.debugLineNum = 1157;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; -Debug.ShouldStop(16); -if (RemoteObject.solveBoolean("!",c_principal._starter._marcacel /*RemoteObject*/ ,BA.ObjectToString("Sony"))) { -c_principal.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Historico Promociones Actualizado.")),(Object)(c_principal.__c.getField(true,"True")));}; - BA.debugLineNum = 1158;BA.debugLine="If PB1.Progress = 0 Then"; -Debug.ShouldStop(32); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_pb1" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 1159;BA.debugLine="PB1.Progress = 30"; -Debug.ShouldStop(64); -__ref.getField(false,"_pb1" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 30)); - BA.debugLineNum = 1160;BA.debugLine="S_CH.Text = \"CARGANDO\""; -Debug.ShouldStop(128); -__ref.getField(false,"_s_ch" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("CARGANDO")); - }else -{ BA.debugLineNum = 1161;BA.debugLine="ELSE If PB1.Progress = 30 Then"; -Debug.ShouldStop(256); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_pb1" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 30))) { - BA.debugLineNum = 1162;BA.debugLine="PB1.Progress = 60"; -Debug.ShouldStop(512); -__ref.getField(false,"_pb1" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 60)); - }else -{ BA.debugLineNum = 1163;BA.debugLine="ELSE IF PB1.Progress = 60 Then"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_pb1" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 60))) { - BA.debugLineNum = 1164;BA.debugLine="PB1.Progress = 100"; -Debug.ShouldStop(2048); -__ref.getField(false,"_pb1" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 100)); - BA.debugLineNum = 1165;BA.debugLine="S_CH.Text = \"LISTO\""; -Debug.ShouldStop(4096); -__ref.getField(false,"_s_ch" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("LISTO")); - }}} -; - }; - }; - BA.debugLineNum = 1170;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(131072); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1171;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(262144); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1172;BA.debugLine="If RESULT.Tag = \"hist_cliente_promos\" Then 'que"; -Debug.ShouldStop(524288); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("hist_cliente_promos")))) { - BA.debugLineNum = 1173;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(1048576); -{ -final RemoteObject group173 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen173 = group173.runMethod(true,"getSize").get() -;int index173 = 0; -; -for (; index173 < groupLen173;index173++){ -_records = (group173.runMethod(false,"Get",index173));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1174;BA.debugLine="Dim HCCP_CLIENTE As String = records(RESULT.C"; -Debug.ShouldStop(2097152); -_hccp_cliente = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HCCP_CLIENTE")))))));Debug.locals.put("HCCP_CLIENTE", _hccp_cliente);Debug.locals.put("HCCP_CLIENTE", _hccp_cliente); - BA.debugLineNum = 1175;BA.debugLine="Dim HCCP_PROMO As String = records(RESULT.Col"; -Debug.ShouldStop(4194304); -_hccp_promo = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HCCP_PROMO")))))));Debug.locals.put("HCCP_PROMO", _hccp_promo);Debug.locals.put("HCCP_PROMO", _hccp_promo); - BA.debugLineNum = 1176;BA.debugLine="Dim HCCP_CANT As String = records(RESULT.Colu"; -Debug.ShouldStop(8388608); -_hccp_cant = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HCCP_CANT")))))));Debug.locals.put("HCCP_CANT", _hccp_cant);Debug.locals.put("HCCP_CANT", _hccp_cant); - BA.debugLineNum = 1177;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(16777216); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO HIST_CLIENTE_CANT_PROMOS(HCCP_CLIENTE, HCCP_PROMO, HCCP_CANT) VALUES (?,?,?)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {3},new Object[] {(_hccp_cliente),(_hccp_promo),(_hccp_cant)}))))); - } -}Debug.locals.put("records", _records); -; - BA.debugLineNum = 1179;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; -Debug.ShouldStop(67108864); -if (RemoteObject.solveBoolean("!",c_principal._starter._marcacel /*RemoteObject*/ ,BA.ObjectToString("Sony"))) { -c_principal.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence(" Historico Clientes Promociones Actualizado.")),(Object)(c_principal.__c.getField(true,"True")));}; - }; - }; - BA.debugLineNum = 1183;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(1073741824); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1184;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(-2147483648); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1185;BA.debugLine="If RESULT.Tag = \"HIST_MARCAS_CUOTAS\" Then 'quer"; -Debug.ShouldStop(1); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("HIST_MARCAS_CUOTAS")))) { - BA.debugLineNum = 1186;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(2); -{ -final RemoteObject group185 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen185 = group185.runMethod(true,"getSize").get() -;int index185 = 0; -; -for (; index185 < groupLen185;index185++){ -_records = (group185.runMethod(false,"Get",index185));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1187;BA.debugLine="Dim HMC_MARCA As String = records(RESULT.Colu"; -Debug.ShouldStop(4); -_hmc_marca = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HMC_MARCA")))))));Debug.locals.put("HMC_MARCA", _hmc_marca);Debug.locals.put("HMC_MARCA", _hmc_marca); - BA.debugLineNum = 1188;BA.debugLine="Dim HMC_TOTAL As String = records(RESULT.Colu"; -Debug.ShouldStop(8); -_hmc_total = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HMC_TOTAL")))))));Debug.locals.put("HMC_TOTAL", _hmc_total);Debug.locals.put("HMC_TOTAL", _hmc_total); - BA.debugLineNum = 1189;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(16); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO HIST_MARCAS_CUOTAS(HMC_MARCA, HMC_TOTAL) VALUES (?,?)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(_hmc_marca),(_hmc_total)}))))); - } -}Debug.locals.put("records", _records); -; - BA.debugLineNum = 1191;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; -Debug.ShouldStop(64); -if (RemoteObject.solveBoolean("!",c_principal._starter._marcacel /*RemoteObject*/ ,BA.ObjectToString("Sony"))) { -c_principal.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence(" Historico Marcas")),(Object)(c_principal.__c.getField(true,"True")));}; - }; - }; - BA.debugLineNum = 1195;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1196;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(2048); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1197;BA.debugLine="If RESULT.Tag = \"hist_comp_promos\" Then 'query"; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("hist_comp_promos")))) { - BA.debugLineNum = 1198;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(8192); -{ -final RemoteObject group196 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen196 = group196.runMethod(true,"getSize").get() -;int index196 = 0; -; -for (; index196 < groupLen196;index196++){ -_records = (group196.runMethod(false,"Get",index196));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1199;BA.debugLine="Dim CAT_PA_ID As String = records(RESULT.Colu"; -Debug.ShouldStop(16384); -_cat_pa_id = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_PA_ID")))))));Debug.locals.put("CAT_PA_ID", _cat_pa_id);Debug.locals.put("CAT_PA_ID", _cat_pa_id); - BA.debugLineNum = 1200;BA.debugLine="Dim CAT_PA_MAXPROM As String = records(RESULT"; -Debug.ShouldStop(32768); -_cat_pa_maxprom = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_PA_MAXPROM")))))));Debug.locals.put("CAT_PA_MAXPROM", _cat_pa_maxprom);Debug.locals.put("CAT_PA_MAXPROM", _cat_pa_maxprom); - BA.debugLineNum = 1201;BA.debugLine="Dim CAT_PA_MAXPROMREC As String = records(RES"; -Debug.ShouldStop(65536); -_cat_pa_maxpromrec = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_PA_MAXPROMREC")))))));Debug.locals.put("CAT_PA_MAXPROMREC", _cat_pa_maxpromrec);Debug.locals.put("CAT_PA_MAXPROMREC", _cat_pa_maxpromrec); - BA.debugLineNum = 1202;BA.debugLine="Dim CAT_PA_MAXPROMCLIE As String = records(RE"; -Debug.ShouldStop(131072); -_cat_pa_maxpromclie = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_PA_MAXPROMCLIE")))))));Debug.locals.put("CAT_PA_MAXPROMCLIE", _cat_pa_maxpromclie);Debug.locals.put("CAT_PA_MAXPROMCLIE", _cat_pa_maxpromclie); - BA.debugLineNum = 1203;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(262144); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO PROMOS_COMP(CAT_PA_ID, CAT_PA_MAXPROM, CAT_PA_MAXPROMREC, CAT_PA_MAXPROMCLIE) VALUES (?,?,?,?)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {4},new Object[] {(_cat_pa_id),(_cat_pa_maxprom),(_cat_pa_maxpromrec),(_cat_pa_maxpromclie)}))))); - } -}Debug.locals.put("records", _records); -; - BA.debugLineNum = 1205;BA.debugLine="If PB1.Progress = 0 Then"; -Debug.ShouldStop(1048576); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_pb1" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 1206;BA.debugLine="PB1.Progress = 30"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_pb1" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 30)); - BA.debugLineNum = 1207;BA.debugLine="S_CH.Text = \"CARGANDO\""; -Debug.ShouldStop(4194304); -__ref.getField(false,"_s_ch" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("CARGANDO")); - }else -{ BA.debugLineNum = 1208;BA.debugLine="ELSE If PB1.Progress = 30 Then"; -Debug.ShouldStop(8388608); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_pb1" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 30))) { - BA.debugLineNum = 1209;BA.debugLine="PB1.Progress = 60"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_pb1" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 60)); - }else -{ BA.debugLineNum = 1210;BA.debugLine="ELSE IF PB1.Progress = 60 Then"; -Debug.ShouldStop(33554432); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_pb1" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 60))) { - BA.debugLineNum = 1211;BA.debugLine="PB1.Progress = 100"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_pb1" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 100)); - BA.debugLineNum = 1212;BA.debugLine="S_CH.Text = \"LISTO\""; -Debug.ShouldStop(134217728); -__ref.getField(false,"_s_ch" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("LISTO")); - }}} -; - }; - }; - BA.debugLineNum = 1217;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(1); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1218;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(2); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1219;BA.debugLine="If RESULT.Tag = \"cat_verificacion\" Then 'query"; -Debug.ShouldStop(4); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("cat_verificacion")))) { - BA.debugLineNum = 1220;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(8); -{ -final RemoteObject group217 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen217 = group217.runMethod(true,"getSize").get() -;int index217 = 0; -; -for (; index217 < groupLen217;index217++){ -_records = (group217.runMethod(false,"Get",index217));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1221;BA.debugLine="Dim CAT_VE_IDPROD As String = records(RESULT."; -Debug.ShouldStop(16); -_cat_ve_idprod = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_VE_IDPROD")))))));Debug.locals.put("CAT_VE_IDPROD", _cat_ve_idprod);Debug.locals.put("CAT_VE_IDPROD", _cat_ve_idprod); - BA.debugLineNum = 1222;BA.debugLine="Dim CAT_VE_NOMBRE As String = records(RESULT."; -Debug.ShouldStop(32); -_cat_ve_nombre = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_VE_NOMBRE")))))));Debug.locals.put("CAT_VE_NOMBRE", _cat_ve_nombre);Debug.locals.put("CAT_VE_NOMBRE", _cat_ve_nombre); - BA.debugLineNum = 1223;BA.debugLine="Dim CAT_VE_ORDEN As String = records(RESULT.C"; -Debug.ShouldStop(64); -_cat_ve_orden = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_VE_ORDEN")))))));Debug.locals.put("CAT_VE_ORDEN", _cat_ve_orden);Debug.locals.put("CAT_VE_ORDEN", _cat_ve_orden); - BA.debugLineNum = 1224;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(128); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO CAT_VERIFICACION(CAT_VE_IDPROD, CAT_VE_NOMBRE,CAT_VE_ORDEN) VALUES (?,?,?)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {3},new Object[] {(_cat_ve_idprod),(_cat_ve_nombre),(_cat_ve_orden)}))))); - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 1229;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1230;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(8192); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1231;BA.debugLine="If RESULT.Tag = \"marcas_rutas\" Then 'query tag"; -Debug.ShouldStop(16384); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("marcas_rutas")))) { - BA.debugLineNum = 1232;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(32768); -{ -final RemoteObject group228 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen228 = group228.runMethod(true,"getSize").get() -;int index228 = 0; -; -for (; index228 < groupLen228;index228++){ -_records = (group228.runMethod(false,"Get",index228));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1233;BA.debugLine="Dim HVD_MARCA As String = records(RESULT.Colu"; -Debug.ShouldStop(65536); -_hvd_marca = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HVD_MARCA")))))));Debug.locals.put("HVD_MARCA", _hvd_marca);Debug.locals.put("HVD_MARCA", _hvd_marca); - BA.debugLineNum = 1234;BA.debugLine="Dim CLIENTES As String = records(RESULT.Colum"; -Debug.ShouldStop(131072); -_clientes = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CLIENTES")))))));Debug.locals.put("CLIENTES", _clientes);Debug.locals.put("CLIENTES", _clientes); - BA.debugLineNum = 1235;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(262144); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO MARCAS_RUTAS(HVD_MARCA, CLIENTES) VALUES (?,?)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(_hvd_marca),(_clientes)}))))); - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 1241;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(16777216); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1242;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(33554432); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1243;BA.debugLine="If RESULT.Tag = \"CUOTAS\" Then 'query tag"; -Debug.ShouldStop(67108864); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("CUOTAS")))) { - BA.debugLineNum = 1244;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(134217728); -{ -final RemoteObject group238 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen238 = group238.runMethod(true,"getSize").get() -;int index238 = 0; -; -for (; index238 < groupLen238;index238++){ -_records = (group238.runMethod(false,"Get",index238));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1245;BA.debugLine="Dim HC_RUTA As String = records(RESULT.Column"; -Debug.ShouldStop(268435456); -_hc_ruta = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HC_RUTA")))))));Debug.locals.put("HC_RUTA", _hc_ruta);Debug.locals.put("HC_RUTA", _hc_ruta); - BA.debugLineNum = 1246;BA.debugLine="Dim HC_CUOTA1 As String = records(RESULT.Colu"; -Debug.ShouldStop(536870912); -_hc_cuota1 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HC_CUOTA1")))))));Debug.locals.put("HC_CUOTA1", _hc_cuota1);Debug.locals.put("HC_CUOTA1", _hc_cuota1); - BA.debugLineNum = 1247;BA.debugLine="Dim HC_CUOTA2 As String = records(RESULT.Colu"; -Debug.ShouldStop(1073741824); -_hc_cuota2 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HC_CUOTA2")))))));Debug.locals.put("HC_CUOTA2", _hc_cuota2);Debug.locals.put("HC_CUOTA2", _hc_cuota2); - BA.debugLineNum = 1248;BA.debugLine="Dim HC_CUOTA3 As String = records(RESULT.Colu"; -Debug.ShouldStop(-2147483648); -_hc_cuota3 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HC_CUOTA3")))))));Debug.locals.put("HC_CUOTA3", _hc_cuota3);Debug.locals.put("HC_CUOTA3", _hc_cuota3); - BA.debugLineNum = 1249;BA.debugLine="Dim HC_CUOTA4 As String = records(RESULT.Colu"; -Debug.ShouldStop(1); -_hc_cuota4 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HC_CUOTA4")))))));Debug.locals.put("HC_CUOTA4", _hc_cuota4);Debug.locals.put("HC_CUOTA4", _hc_cuota4); - BA.debugLineNum = 1250;BA.debugLine="Dim HC_CUOTA5 As String = records(RESULT.Colu"; -Debug.ShouldStop(2); -_hc_cuota5 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HC_CUOTA5")))))));Debug.locals.put("HC_CUOTA5", _hc_cuota5);Debug.locals.put("HC_CUOTA5", _hc_cuota5); - BA.debugLineNum = 1251;BA.debugLine="Dim HC_CUOTA6 As String = records(RESULT.Colu"; -Debug.ShouldStop(4); -_hc_cuota6 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HC_CUOTA6")))))));Debug.locals.put("HC_CUOTA6", _hc_cuota6);Debug.locals.put("HC_CUOTA6", _hc_cuota6); - BA.debugLineNum = 1252;BA.debugLine="Dim HC_META1 As String = records(RESULT.Colum"; -Debug.ShouldStop(8); -_hc_meta1 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HC_META1")))))));Debug.locals.put("HC_META1", _hc_meta1);Debug.locals.put("HC_META1", _hc_meta1); - BA.debugLineNum = 1253;BA.debugLine="Dim HC_META2 As String = records(RESULT.Colum"; -Debug.ShouldStop(16); -_hc_meta2 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HC_META2")))))));Debug.locals.put("HC_META2", _hc_meta2);Debug.locals.put("HC_META2", _hc_meta2); - BA.debugLineNum = 1254;BA.debugLine="Dim HC_META3 As String = records(RESULT.Colum"; -Debug.ShouldStop(32); -_hc_meta3 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HC_META3")))))));Debug.locals.put("HC_META3", _hc_meta3);Debug.locals.put("HC_META3", _hc_meta3); - BA.debugLineNum = 1255;BA.debugLine="Dim HC_META4 As String = records(RESULT.Colum"; -Debug.ShouldStop(64); -_hc_meta4 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HC_META4")))))));Debug.locals.put("HC_META4", _hc_meta4);Debug.locals.put("HC_META4", _hc_meta4); - BA.debugLineNum = 1256;BA.debugLine="Dim HC_META5 As String = records(RESULT.Colum"; -Debug.ShouldStop(128); -_hc_meta5 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HC_META5")))))));Debug.locals.put("HC_META5", _hc_meta5);Debug.locals.put("HC_META5", _hc_meta5); - BA.debugLineNum = 1257;BA.debugLine="Dim HC_META6 As String = records(RESULT.Colum"; -Debug.ShouldStop(256); -_hc_meta6 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HC_META6")))))));Debug.locals.put("HC_META6", _hc_meta6);Debug.locals.put("HC_META6", _hc_meta6); - BA.debugLineNum = 1258;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(512); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO HIST_CUOTAS(HC_RUTA, HC_CUOTA1,HC_CUOTA2,HC_CUOTA3,HC_CUOTA4,HC_CUOTA5,HC_CUOTA6,HC_META1,HC_META2,HC_META3,HC_META4,HC_META5,HC_META6) VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {13},new Object[] {(_hc_ruta),(_hc_cuota1),(_hc_cuota2),(_hc_cuota3),(_hc_cuota4),(_hc_cuota5),(_hc_cuota6),(_hc_meta1),(_hc_meta2),(_hc_meta3),(_hc_meta4),(_hc_meta5),(_hc_meta6)}))))); - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 1265;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(65536); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1266;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(131072); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1267;BA.debugLine="If RESULT.Tag = \"COMISIONES\" Then 'query tag"; -Debug.ShouldStop(262144); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("COMISIONES")))) { - BA.debugLineNum = 1268;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(524288); -{ -final RemoteObject group259 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen259 = group259.runMethod(true,"getSize").get() -;int index259 = 0; -; -for (; index259 < groupLen259;index259++){ -_records = (group259.runMethod(false,"Get",index259));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1269;BA.debugLine="Dim HCM_TOTAL_V As String = records(RESULT.Co"; -Debug.ShouldStop(1048576); -_hcm_total_v = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HCM_TOTAL_V")))))));Debug.locals.put("HCM_TOTAL_V", _hcm_total_v);Debug.locals.put("HCM_TOTAL_V", _hcm_total_v); - BA.debugLineNum = 1270;BA.debugLine="Dim HCM_TOTAL_VIVE As String = records(RESULT"; -Debug.ShouldStop(2097152); -_hcm_total_vive = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HCM_TOTAL_VIVE")))))));Debug.locals.put("HCM_TOTAL_VIVE", _hcm_total_vive);Debug.locals.put("HCM_TOTAL_VIVE", _hcm_total_vive); - BA.debugLineNum = 1271;BA.debugLine="Dim HCM_TOTAL_GUNA As String = records(RESULT"; -Debug.ShouldStop(4194304); -_hcm_total_guna = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HCM_TOTAL_GUNA")))))));Debug.locals.put("HCM_TOTAL_GUNA", _hcm_total_guna);Debug.locals.put("HCM_TOTAL_GUNA", _hcm_total_guna); - BA.debugLineNum = 1272;BA.debugLine="Dim HCM_TOTAL_BEB As String = records(RESULT."; -Debug.ShouldStop(8388608); -_hcm_total_beb = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HCM_TOTAL_BEB")))))));Debug.locals.put("HCM_TOTAL_BEB", _hcm_total_beb);Debug.locals.put("HCM_TOTAL_BEB", _hcm_total_beb); - BA.debugLineNum = 1273;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(16777216); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO HIST_COMISIONES_MOVIL (HCM_TOTAL_V , HCM_TOTAL_VIVE , HCM_TOTAL_GUNA , HCM_TOTAL_BEB) VALUES (?,?,?,?)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {4},new Object[] {(_hcm_total_v),(_hcm_total_vive),(_hcm_total_guna),(_hcm_total_beb)}))))); - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 1278;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(536870912); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1279;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(1073741824); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1280;BA.debugLine="If RESULT.Tag = \"gunaprod\" Then 'query tag"; -Debug.ShouldStop(-2147483648); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("gunaprod")))) { - BA.debugLineNum = 1281;BA.debugLine="If PB2.Progress < 30 Then S_CP.Text = \"CARGAND"; -Debug.ShouldStop(1); -if (RemoteObject.solveBoolean("<",__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 30))) { -__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("CARGANDO"));}; - BA.debugLineNum = 1282;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(2); -{ -final RemoteObject group272 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen272 = group272.runMethod(true,"getSize").get() -;int index272 = 0; -; -for (; index272 < groupLen272;index272++){ -_records = (group272.runMethod(false,"Get",index272));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1283;BA.debugLine="Dim CAT_GP_ID As String = records(RESULT.Colu"; -Debug.ShouldStop(4); -_cat_gp_id = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_ID")))))));Debug.locals.put("CAT_GP_ID", _cat_gp_id);Debug.locals.put("CAT_GP_ID", _cat_gp_id); - BA.debugLineNum = 1284;BA.debugLine="Dim CAT_GP_NOMBRE As String = records(RESULT."; -Debug.ShouldStop(8); -_cat_gp_nombre = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_NOMBRE")))))));Debug.locals.put("CAT_GP_NOMBRE", _cat_gp_nombre);Debug.locals.put("CAT_GP_NOMBRE", _cat_gp_nombre); - BA.debugLineNum = 1285;BA.debugLine="Dim CAT_GP_IMP1 As String = records(RESULT.Co"; -Debug.ShouldStop(16); -_cat_gp_imp1 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_IMP1")))))));Debug.locals.put("CAT_GP_IMP1", _cat_gp_imp1);Debug.locals.put("CAT_GP_IMP1", _cat_gp_imp1); - BA.debugLineNum = 1286;BA.debugLine="Dim CAT_GP_IMP2 As String = records(RESULT.Co"; -Debug.ShouldStop(32); -_cat_gp_imp2 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_IMP2")))))));Debug.locals.put("CAT_GP_IMP2", _cat_gp_imp2);Debug.locals.put("CAT_GP_IMP2", _cat_gp_imp2); - BA.debugLineNum = 1287;BA.debugLine="Dim CAT_GP_PRECIO As String = records(RESULT."; -Debug.ShouldStop(64); -_cat_gp_precio = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_PRECIO")))))));Debug.locals.put("CAT_GP_PRECIO", _cat_gp_precio);Debug.locals.put("CAT_GP_PRECIO", _cat_gp_precio); - BA.debugLineNum = 1288;BA.debugLine="Dim CAT_GP_CLASIF As String = records(RESULT."; -Debug.ShouldStop(128); -_cat_gp_clasif = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_CLASIF")))))));Debug.locals.put("CAT_GP_CLASIF", _cat_gp_clasif);Debug.locals.put("CAT_GP_CLASIF", _cat_gp_clasif); - BA.debugLineNum = 1289;BA.debugLine="Dim CAT_GP_STS As String = records(RESULT.Col"; -Debug.ShouldStop(256); -_cat_gp_sts = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_STS")))))));Debug.locals.put("CAT_GP_STS", _cat_gp_sts);Debug.locals.put("CAT_GP_STS", _cat_gp_sts); - BA.debugLineNum = 1290;BA.debugLine="Dim CAT_GP_TIPO As String = records(RESULT.Co"; -Debug.ShouldStop(512); -_cat_gp_tipo = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_TIPO")))))));Debug.locals.put("CAT_GP_TIPO", _cat_gp_tipo);Debug.locals.put("CAT_GP_TIPO", _cat_gp_tipo); - BA.debugLineNum = 1291;BA.debugLine="Dim CAT_GP_SUBTIPO As String = records(RESULT"; -Debug.ShouldStop(1024); -_cat_gp_subtipo = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_SUBTIPO")))))));Debug.locals.put("CAT_GP_SUBTIPO", _cat_gp_subtipo);Debug.locals.put("CAT_GP_SUBTIPO", _cat_gp_subtipo); - BA.debugLineNum = 1292;BA.debugLine="Dim CAT_GP_IMG() As Byte = records(RESULT.Col"; -Debug.ShouldStop(2048); -_cat_gp_img = (_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_IMG")))))));Debug.locals.put("CAT_GP_IMG", _cat_gp_img);Debug.locals.put("CAT_GP_IMG", _cat_gp_img); - BA.debugLineNum = 1293;BA.debugLine="Dim CAT_GP_ALMACEN As Int = records(RESULT.Co"; -Debug.ShouldStop(4096); -_cat_gp_almacen = BA.numberCast(int.class, _records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_ALMACEN")))))));Debug.locals.put("CAT_GP_ALMACEN", _cat_gp_almacen);Debug.locals.put("CAT_GP_ALMACEN", _cat_gp_almacen); - BA.debugLineNum = 1295;BA.debugLine="Dim CAT_GP_TIPOPROD As Int = records(RESULT.C"; -Debug.ShouldStop(16384); -_cat_gp_tipoprod = BA.numberCast(int.class, _records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_TIPOPROD")))))));Debug.locals.put("CAT_GP_TIPOPROD", _cat_gp_tipoprod);Debug.locals.put("CAT_GP_TIPOPROD", _cat_gp_tipoprod); - BA.debugLineNum = 1296;BA.debugLine="Dim CAT_GP_INICIATIVA As Int = records(RESULT"; -Debug.ShouldStop(32768); -_cat_gp_iniciativa = BA.numberCast(int.class, _records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_INICIATIVA")))))));Debug.locals.put("CAT_GP_INICIATIVA", _cat_gp_iniciativa);Debug.locals.put("CAT_GP_INICIATIVA", _cat_gp_iniciativa); - BA.debugLineNum = 1299;BA.debugLine="Dim CAT_GP_TIPOPROD2 As String = records(RESU"; -Debug.ShouldStop(262144); -_cat_gp_tipoprod2 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_DP_TIPOPROD2")))))));Debug.locals.put("CAT_GP_TIPOPROD2", _cat_gp_tipoprod2);Debug.locals.put("CAT_GP_TIPOPROD2", _cat_gp_tipoprod2); - BA.debugLineNum = 1302;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(2097152); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO CAT_GUNAPROD(CAT_GP_ID,CAT_GP_NOMBRE,CAT_GP_IMP1,CAT_GP_IMP2,CAT_GP_PRECIO,CAT_GP_CLASIF,CAT_GP_STS,CAT_GP_TIPO,CAT_GP_SUBTIPO,CAT_GP_IMG,CAT_GP_ALMACEN,CAT_GP_TIPOPROD,CAT_GP_INICIATIVA,CAT_GP_TIPOPROD2) VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {14},new Object[] {(_cat_gp_id),(_cat_gp_nombre),(_cat_gp_imp1),(_cat_gp_imp2),(_cat_gp_precio),(_cat_gp_clasif),(_cat_gp_sts),(_cat_gp_tipo),(_cat_gp_subtipo),(_cat_gp_img),(_cat_gp_almacen),(_cat_gp_tipoprod),(_cat_gp_iniciativa),(_cat_gp_tipoprod2)}))))); - } -}Debug.locals.put("records", _records); -; - BA.debugLineNum = 1304;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQUERY(\"SELECT COU"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("SELECT COUNT(*) AS CUANTOS FROM PEDIDO WHERE PE_CLIENTE <> 0")))); - BA.debugLineNum = 1305;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 1307;BA.debugLine="cuantos_pedidosc = c.GetString(\"CUANTOS\")"; -Debug.ShouldStop(67108864); -__ref.setField ("_cuantos_pedidosc" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))); - BA.debugLineNum = 1308;BA.debugLine="c.Close"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 1309;BA.debugLine="If cuantos_pedidosc > 0 Then"; -Debug.ShouldStop(268435456); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(true,"_cuantos_pedidosc" /*RemoteObject*/ )),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 1310;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQUERY(\"SELECT PE"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("SELECT PE_PROID, SUM(PE_CANT) AS PE_CANT FROM PEDIDO WHERE PE_CLIENTE <> 0 GROUP BY PE_PROID")))); - BA.debugLineNum = 1311;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(1073741824); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 1312;BA.debugLine="For i=0 To c.RowCount -1"; -Debug.ShouldStop(-2147483648); -{ -final int step296 = 1; -final int limit296 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step296 > 0 && _i <= limit296) || (step296 < 0 && _i >= limit296) ;_i = ((int)(0 + _i + step296)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 1313;BA.debugLine="c.Position=i"; -Debug.ShouldStop(1); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 1314;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"updat"; -Debug.ShouldStop(2); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("update CAT_GUNAPROD set CAT_GP_ALMACEN = CAT_GP_ALMACEN - ? where CAT_GP_ID = ? ")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CANT")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_PROID"))))}))))); - } -}Debug.locals.put("i", _i); -; - }; - }; - BA.debugLineNum = 1319;BA.debugLine="Listo2=1"; -Debug.ShouldStop(64); -__ref.setField ("_listo2" /*RemoteObject*/ ,BA.NumberToString(1)); - BA.debugLineNum = 1320;BA.debugLine="If PB2.Progress = 0 Then"; -Debug.ShouldStop(128); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 1321;BA.debugLine="PB2.Progress = 30"; -Debug.ShouldStop(256); -__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 30)); - BA.debugLineNum = 1322;BA.debugLine="S_CP.Text = \"CARGANDO\""; -Debug.ShouldStop(512); -__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("CARGANDO")); - }else -{ BA.debugLineNum = 1323;BA.debugLine="ELSE If PB2.Progress = 30 Then"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 30))) { - BA.debugLineNum = 1324;BA.debugLine="PB2.Progress = 60"; -Debug.ShouldStop(2048); -__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 60)); - }else -{ BA.debugLineNum = 1325;BA.debugLine="ELSE IF PB2.Progress = 60 Then"; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 60))) { - BA.debugLineNum = 1326;BA.debugLine="PB2.Progress = 100"; -Debug.ShouldStop(8192); -__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 100)); - BA.debugLineNum = 1327;BA.debugLine="S_CP.Text = \"LISTO\""; -Debug.ShouldStop(16384); -__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("LISTO")); - }}} -; - BA.debugLineNum = 1329;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; -Debug.ShouldStop(65536); -if (RemoteObject.solveBoolean("!",c_principal._starter._marcacel /*RemoteObject*/ ,BA.ObjectToString("Sony"))) { -c_principal.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Productos Actualizados.")),(Object)(c_principal.__c.getField(true,"True")));}; - BA.debugLineNum = 1330;BA.debugLine="If Listo1 =1 And Listo2 =1 And Listo3 = 1 And"; -Debug.ShouldStop(131072); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_listo1" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_listo2" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_listo3" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_listo4" /*RemoteObject*/ ),BA.NumberToString(1))) { - BA.debugLineNum = 1331;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(262144); -__ref.runClassMethod (keymon.lat.medicomed.c_principal.class, "_b4xpage_appear" /*void*/ ); - BA.debugLineNum = 1332;BA.debugLine="img2.Visible=False"; -Debug.ShouldStop(524288); -__ref.getField(false,"_img2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1333;BA.debugLine="EJECUTANDO=0"; -Debug.ShouldStop(1048576); -__ref.setField ("_ejecutando" /*RemoteObject*/ ,BA.NumberToString(0)); - }; - }; - }; - BA.debugLineNum = 1338;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(33554432); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1339;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(67108864); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1340;BA.debugLine="If RESULT.Tag = \"gunaprodp\" Then 'query tag"; -Debug.ShouldStop(134217728); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("gunaprodp")))) { - BA.debugLineNum = 1341;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(268435456); -{ -final RemoteObject group323 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen323 = group323.runMethod(true,"getSize").get() -;int index323 = 0; -; -for (; index323 < groupLen323;index323++){ -_records = (group323.runMethod(false,"Get",index323));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1342;BA.debugLine="Dim CAT_GP_ID As String = records(RESULT.Colu"; -Debug.ShouldStop(536870912); -_cat_gp_id = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_ID")))))));Debug.locals.put("CAT_GP_ID", _cat_gp_id);Debug.locals.put("CAT_GP_ID", _cat_gp_id); - BA.debugLineNum = 1343;BA.debugLine="Dim CAT_GP_NOMBRE As String = records(RESULT."; -Debug.ShouldStop(1073741824); -_cat_gp_nombre = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_NOMBRE")))))));Debug.locals.put("CAT_GP_NOMBRE", _cat_gp_nombre);Debug.locals.put("CAT_GP_NOMBRE", _cat_gp_nombre); - BA.debugLineNum = 1344;BA.debugLine="Dim CAT_GP_IMP1 As String = records(RESULT.Co"; -Debug.ShouldStop(-2147483648); -_cat_gp_imp1 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_IMP1")))))));Debug.locals.put("CAT_GP_IMP1", _cat_gp_imp1);Debug.locals.put("CAT_GP_IMP1", _cat_gp_imp1); - BA.debugLineNum = 1345;BA.debugLine="Dim CAT_GP_IMP2 As String = records(RESULT.Co"; -Debug.ShouldStop(1); -_cat_gp_imp2 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_IMP2")))))));Debug.locals.put("CAT_GP_IMP2", _cat_gp_imp2);Debug.locals.put("CAT_GP_IMP2", _cat_gp_imp2); - BA.debugLineNum = 1346;BA.debugLine="Dim CAT_GP_PRECIO As String = records(RESULT."; -Debug.ShouldStop(2); -_cat_gp_precio = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_PRECIO")))))));Debug.locals.put("CAT_GP_PRECIO", _cat_gp_precio);Debug.locals.put("CAT_GP_PRECIO", _cat_gp_precio); - BA.debugLineNum = 1347;BA.debugLine="Dim CAT_GP_CLASIF As String = records(RESULT."; -Debug.ShouldStop(4); -_cat_gp_clasif = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_CLASIF")))))));Debug.locals.put("CAT_GP_CLASIF", _cat_gp_clasif);Debug.locals.put("CAT_GP_CLASIF", _cat_gp_clasif); - BA.debugLineNum = 1348;BA.debugLine="Dim CAT_GP_STS As String = records(RESULT.Col"; -Debug.ShouldStop(8); -_cat_gp_sts = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_STS")))))));Debug.locals.put("CAT_GP_STS", _cat_gp_sts);Debug.locals.put("CAT_GP_STS", _cat_gp_sts); - BA.debugLineNum = 1349;BA.debugLine="Dim CAT_GP_TIPO As String = records(RESULT.Co"; -Debug.ShouldStop(16); -_cat_gp_tipo = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_TIPO")))))));Debug.locals.put("CAT_GP_TIPO", _cat_gp_tipo);Debug.locals.put("CAT_GP_TIPO", _cat_gp_tipo); - BA.debugLineNum = 1350;BA.debugLine="Dim CAT_GP_SUBTIPO As String = records(RESULT"; -Debug.ShouldStop(32); -_cat_gp_subtipo = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_SUBTIPO")))))));Debug.locals.put("CAT_GP_SUBTIPO", _cat_gp_subtipo);Debug.locals.put("CAT_GP_SUBTIPO", _cat_gp_subtipo); - BA.debugLineNum = 1351;BA.debugLine="Dim CAT_GP_IMG() As Byte = records(RESULT.Col"; -Debug.ShouldStop(64); -_cat_gp_img = (_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_IMG")))))));Debug.locals.put("CAT_GP_IMG", _cat_gp_img);Debug.locals.put("CAT_GP_IMG", _cat_gp_img); - BA.debugLineNum = 1352;BA.debugLine="Dim CAT_GP_ALMACEN As Int = records(RESULT.Co"; -Debug.ShouldStop(128); -_cat_gp_almacen = BA.numberCast(int.class, _records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_ALMACEN")))))));Debug.locals.put("CAT_GP_ALMACEN", _cat_gp_almacen);Debug.locals.put("CAT_GP_ALMACEN", _cat_gp_almacen); - BA.debugLineNum = 1353;BA.debugLine="Dim CAT_GP_TIPOPROD As Int = records(RESULT.C"; -Debug.ShouldStop(256); -_cat_gp_tipoprod = BA.numberCast(int.class, _records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_TIPOPROD")))))));Debug.locals.put("CAT_GP_TIPOPROD", _cat_gp_tipoprod);Debug.locals.put("CAT_GP_TIPOPROD", _cat_gp_tipoprod); - BA.debugLineNum = 1354;BA.debugLine="CAT_GP_TIPOPROD = \"5\""; -Debug.ShouldStop(512); -_cat_gp_tipoprod = BA.numberCast(int.class, "5");Debug.locals.put("CAT_GP_TIPOPROD", _cat_gp_tipoprod); - BA.debugLineNum = 1355;BA.debugLine="If CAT_GP_ID = \"PAQUNI003\" Then"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("=",_cat_gp_id,BA.ObjectToString("PAQUNI003"))) { - BA.debugLineNum = 1356;BA.debugLine="CAT_GP_ALMACEN = 60"; -Debug.ShouldStop(2048); -_cat_gp_almacen = BA.numberCast(int.class, 60);Debug.locals.put("CAT_GP_ALMACEN", _cat_gp_almacen); - }; - BA.debugLineNum = 1358;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(8192); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO CAT_GUNAPROD(CAT_GP_ID,CAT_GP_NOMBRE,CAT_GP_IMP1,CAT_GP_IMP2,CAT_GP_PRECIO,CAT_GP_CLASIF,CAT_GP_STS,CAT_GP_TIPO,CAT_GP_SUBTIPO,CAT_GP_IMG,CAT_GP_ALMACEN,CAT_GP_TIPOPROD) VALUES (?,?,?,?,?,?,?,?,?,?,?,?)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {12},new Object[] {(_cat_gp_id),(_cat_gp_nombre),(_cat_gp_imp1),(_cat_gp_imp2),(_cat_gp_precio),(_cat_gp_clasif),(_cat_gp_sts),(_cat_gp_tipo),(_cat_gp_subtipo),(_cat_gp_img),(_cat_gp_almacen),(_cat_gp_tipoprod)}))))); - } -}Debug.locals.put("records", _records); -; - BA.debugLineNum = 1360;BA.debugLine="If PB2.Progress = 0 Then"; -Debug.ShouldStop(32768); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 1361;BA.debugLine="PB2.Progress = 30"; -Debug.ShouldStop(65536); -__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 30)); - BA.debugLineNum = 1362;BA.debugLine="S_CP.Text = \"CARGANDO\""; -Debug.ShouldStop(131072); -__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("CARGANDO")); - }else -{ BA.debugLineNum = 1363;BA.debugLine="ELSE If PB2.Progress = 30 Then"; -Debug.ShouldStop(262144); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 30))) { - BA.debugLineNum = 1364;BA.debugLine="PB2.Progress = 60"; -Debug.ShouldStop(524288); -__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 60)); - }else -{ BA.debugLineNum = 1365;BA.debugLine="ELSE IF PB2.Progress = 60 Then"; -Debug.ShouldStop(1048576); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 60))) { - BA.debugLineNum = 1366;BA.debugLine="PB2.Progress = 100"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 100)); - BA.debugLineNum = 1367;BA.debugLine="S_CP.Text = \"LISTO\""; -Debug.ShouldStop(4194304); -__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("LISTO")); - }}} -; - BA.debugLineNum = 1369;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; -Debug.ShouldStop(16777216); -if (RemoteObject.solveBoolean("!",c_principal._starter._marcacel /*RemoteObject*/ ,BA.ObjectToString("Sony"))) { -c_principal.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Promociones Actualizados.")),(Object)(c_principal.__c.getField(true,"True")));}; - BA.debugLineNum = 1370;BA.debugLine="Listo4=1"; -Debug.ShouldStop(33554432); -__ref.setField ("_listo4" /*RemoteObject*/ ,BA.NumberToString(1)); - BA.debugLineNum = 1371;BA.debugLine="If Listo1 =1 And Listo2 =1 And Listo3 = 1 And"; -Debug.ShouldStop(67108864); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_listo1" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_listo2" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_listo3" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_listo4" /*RemoteObject*/ ),BA.NumberToString(1))) { - BA.debugLineNum = 1372;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(134217728); -__ref.runClassMethod (keymon.lat.medicomed.c_principal.class, "_b4xpage_appear" /*void*/ ); - BA.debugLineNum = 1373;BA.debugLine="img2.Visible=False"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_img2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1374;BA.debugLine="EJECUTANDO=0"; -Debug.ShouldStop(536870912); -__ref.setField ("_ejecutando" /*RemoteObject*/ ,BA.NumberToString(0)); - }else -{ BA.debugLineNum = 1375;BA.debugLine="Else If Listo4 = 1 And Listo3 = 1 And inve = 1"; -Debug.ShouldStop(1073741824); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_listo4" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_listo3" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_inve" /*RemoteObject*/ ),BA.NumberToString(1))) { - BA.debugLineNum = 1376;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(-2147483648); -__ref.runClassMethod (keymon.lat.medicomed.c_principal.class, "_b4xpage_appear" /*void*/ ); - BA.debugLineNum = 1377;BA.debugLine="img2.Visible=False"; -Debug.ShouldStop(1); -__ref.getField(false,"_img2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1378;BA.debugLine="EJECUTANDO=0"; -Debug.ShouldStop(2); -__ref.setField ("_ejecutando" /*RemoteObject*/ ,BA.NumberToString(0)); - }} -; - }; - }; - BA.debugLineNum = 1383;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(64); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1384;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(128); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1385;BA.debugLine="If RESULT.Tag = \"gunaprodps\" Then 'query tag"; -Debug.ShouldStop(256); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("gunaprodps")))) { - BA.debugLineNum = 1386;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(512); -{ -final RemoteObject group367 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen367 = group367.runMethod(true,"getSize").get() -;int index367 = 0; -; -for (; index367 < groupLen367;index367++){ -_records = (group367.runMethod(false,"Get",index367));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1388;BA.debugLine="Dim CAT_GP_ID As String = records(RESULT.Colu"; -Debug.ShouldStop(2048); -_cat_gp_id = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_ID")))))));Debug.locals.put("CAT_GP_ID", _cat_gp_id);Debug.locals.put("CAT_GP_ID", _cat_gp_id); - BA.debugLineNum = 1389;BA.debugLine="Dim CAT_GP_NOMBRE As String = records(RESULT."; -Debug.ShouldStop(4096); -_cat_gp_nombre = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_NOMBRE")))))));Debug.locals.put("CAT_GP_NOMBRE", _cat_gp_nombre);Debug.locals.put("CAT_GP_NOMBRE", _cat_gp_nombre); - BA.debugLineNum = 1390;BA.debugLine="Dim CAT_GP_IMP1 As String = records(RESULT.Co"; -Debug.ShouldStop(8192); -_cat_gp_imp1 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_IMP1")))))));Debug.locals.put("CAT_GP_IMP1", _cat_gp_imp1);Debug.locals.put("CAT_GP_IMP1", _cat_gp_imp1); - BA.debugLineNum = 1391;BA.debugLine="Dim CAT_GP_IMP2 As String = records(RESULT.Co"; -Debug.ShouldStop(16384); -_cat_gp_imp2 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_IMP2")))))));Debug.locals.put("CAT_GP_IMP2", _cat_gp_imp2);Debug.locals.put("CAT_GP_IMP2", _cat_gp_imp2); - BA.debugLineNum = 1392;BA.debugLine="Dim CAT_GP_PRECIO As String = records(RESULT."; -Debug.ShouldStop(32768); -_cat_gp_precio = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_PRECIO")))))));Debug.locals.put("CAT_GP_PRECIO", _cat_gp_precio);Debug.locals.put("CAT_GP_PRECIO", _cat_gp_precio); - BA.debugLineNum = 1393;BA.debugLine="Dim CAT_GP_CLASIF As String = records(RESULT."; -Debug.ShouldStop(65536); -_cat_gp_clasif = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_CLASIF")))))));Debug.locals.put("CAT_GP_CLASIF", _cat_gp_clasif);Debug.locals.put("CAT_GP_CLASIF", _cat_gp_clasif); - BA.debugLineNum = 1394;BA.debugLine="Dim CAT_GP_STS As String = records(RESULT.Col"; -Debug.ShouldStop(131072); -_cat_gp_sts = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_STS")))))));Debug.locals.put("CAT_GP_STS", _cat_gp_sts);Debug.locals.put("CAT_GP_STS", _cat_gp_sts); - BA.debugLineNum = 1395;BA.debugLine="Dim CAT_GP_TIPO As String = records(RESULT.Co"; -Debug.ShouldStop(262144); -_cat_gp_tipo = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_TIPO")))))));Debug.locals.put("CAT_GP_TIPO", _cat_gp_tipo);Debug.locals.put("CAT_GP_TIPO", _cat_gp_tipo); - BA.debugLineNum = 1396;BA.debugLine="Dim CAT_GP_SUBTIPO As String = records(RESULT"; -Debug.ShouldStop(524288); -_cat_gp_subtipo = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_SUBTIPO")))))));Debug.locals.put("CAT_GP_SUBTIPO", _cat_gp_subtipo);Debug.locals.put("CAT_GP_SUBTIPO", _cat_gp_subtipo); - BA.debugLineNum = 1397;BA.debugLine="Dim CAT_GP_IMG() As Byte = records(RESULT.Col"; -Debug.ShouldStop(1048576); -_cat_gp_img = (_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_IMG")))))));Debug.locals.put("CAT_GP_IMG", _cat_gp_img);Debug.locals.put("CAT_GP_IMG", _cat_gp_img); - BA.debugLineNum = 1398;BA.debugLine="Dim CAT_GP_ALMACEN As Int = records(RESULT.Co"; -Debug.ShouldStop(2097152); -_cat_gp_almacen = BA.numberCast(int.class, _records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_ALMACEN")))))));Debug.locals.put("CAT_GP_ALMACEN", _cat_gp_almacen);Debug.locals.put("CAT_GP_ALMACEN", _cat_gp_almacen); - BA.debugLineNum = 1399;BA.debugLine="Dim CAT_GP_TIPOPROD As Int = records(RESULT.C"; -Debug.ShouldStop(4194304); -_cat_gp_tipoprod = BA.numberCast(int.class, _records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_GP_TIPOPROD")))))));Debug.locals.put("CAT_GP_TIPOPROD", _cat_gp_tipoprod);Debug.locals.put("CAT_GP_TIPOPROD", _cat_gp_tipoprod); - BA.debugLineNum = 1401;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(16777216); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO CAT_GUNAPROD(CAT_GP_ID,CAT_GP_NOMBRE,CAT_GP_IMP1,CAT_GP_IMP2,CAT_GP_PRECIO,CAT_GP_CLASIF,CAT_GP_STS,CAT_GP_TIPO,CAT_GP_SUBTIPO,CAT_GP_IMG,CAT_GP_ALMACEN,CAT_GP_TIPOPROD) VALUES (?,?,?,?,?,?,?,?,?,?,?,?)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {12},new Object[] {(_cat_gp_id),(_cat_gp_nombre),(_cat_gp_imp1),(_cat_gp_imp2),(_cat_gp_precio),(_cat_gp_clasif),(_cat_gp_sts),(_cat_gp_tipo),(_cat_gp_subtipo),(_cat_gp_img),(_cat_gp_almacen),(_cat_gp_tipoprod)}))))); - } -}Debug.locals.put("records", _records); -; - BA.debugLineNum = 1403;BA.debugLine="If PB2.Progress = 0 Then"; -Debug.ShouldStop(67108864); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 1404;BA.debugLine="PB2.Progress = 30"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 30)); - BA.debugLineNum = 1405;BA.debugLine="S_CP.Text = \"CARGANDO\""; -Debug.ShouldStop(268435456); -__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("CARGANDO")); - BA.debugLineNum = 1406;BA.debugLine="Log(\"C4\")"; -Debug.ShouldStop(536870912); -c_principal.__c.runVoidMethod ("LogImpl","33408292",RemoteObject.createImmutable("C4"),0); - }else -{ BA.debugLineNum = 1407;BA.debugLine="ELSE If PB2.Progress = 30 Then"; -Debug.ShouldStop(1073741824); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 30))) { - BA.debugLineNum = 1408;BA.debugLine="PB2.Progress = 60"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 60)); - }else -{ BA.debugLineNum = 1409;BA.debugLine="ELSE IF PB2.Progress = 60 Then"; -Debug.ShouldStop(1); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 60))) { - BA.debugLineNum = 1410;BA.debugLine="PB2.Progress = 100"; -Debug.ShouldStop(2); -__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 100)); - BA.debugLineNum = 1411;BA.debugLine="S_CP.Text = \"LISTO\""; -Debug.ShouldStop(4); -__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("LISTO")); - BA.debugLineNum = 1412;BA.debugLine="Log(\"3\")"; -Debug.ShouldStop(8); -c_principal.__c.runVoidMethod ("LogImpl","33408298",RemoteObject.createImmutable("3"),0); - }}} -; - BA.debugLineNum = 1414;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; -Debug.ShouldStop(32); -if (RemoteObject.solveBoolean("!",c_principal._starter._marcacel /*RemoteObject*/ ,BA.ObjectToString("Sony"))) { -c_principal.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Promociones especiales Actualizados.")),(Object)(c_principal.__c.getField(true,"True")));}; - BA.debugLineNum = 1416;BA.debugLine="Listo4=1"; -Debug.ShouldStop(128); -__ref.setField ("_listo4" /*RemoteObject*/ ,BA.NumberToString(1)); - BA.debugLineNum = 1417;BA.debugLine="If Listo1 =1 And Listo2 =1 And Listo3 = 1 And"; -Debug.ShouldStop(256); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_listo1" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_listo2" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_listo3" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_listo4" /*RemoteObject*/ ),BA.NumberToString(1))) { - BA.debugLineNum = 1418;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(512); -__ref.runClassMethod (keymon.lat.medicomed.c_principal.class, "_b4xpage_appear" /*void*/ ); - BA.debugLineNum = 1419;BA.debugLine="img2.Visible=False"; -Debug.ShouldStop(1024); -__ref.getField(false,"_img2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1420;BA.debugLine="EJECUTANDO=0"; -Debug.ShouldStop(2048); -__ref.setField ("_ejecutando" /*RemoteObject*/ ,BA.NumberToString(0)); - }else -{ BA.debugLineNum = 1421;BA.debugLine="Else If Listo4 = 1 And Listo3 = 1 And inve = 1"; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_listo4" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_listo3" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_inve" /*RemoteObject*/ ),BA.NumberToString(1))) { - BA.debugLineNum = 1422;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(8192); -__ref.runClassMethod (keymon.lat.medicomed.c_principal.class, "_b4xpage_appear" /*void*/ ); - BA.debugLineNum = 1423;BA.debugLine="img2.Visible=False"; -Debug.ShouldStop(16384); -__ref.getField(false,"_img2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1424;BA.debugLine="EJECUTANDO=0"; -Debug.ShouldStop(32768); -__ref.setField ("_ejecutando" /*RemoteObject*/ ,BA.NumberToString(0)); - }} -; - }; - }; - BA.debugLineNum = 1429;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(1048576); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1430;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(2097152); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1431;BA.debugLine="If RESULT.Tag = \"detallepaq\" Then 'query tag"; -Debug.ShouldStop(4194304); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("detallepaq")))) { - BA.debugLineNum = 1432;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(8388608); -{ -final RemoteObject group409 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen409 = group409.runMethod(true,"getSize").get() -;int index409 = 0; -; -for (; index409 < groupLen409;index409++){ -_records = (group409.runMethod(false,"Get",index409));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1433;BA.debugLine="Dim CAT_DP_ALMACEN As String = records(RESUL"; -Debug.ShouldStop(16777216); -_cat_dp_almacen = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_DP_ALMACEN")))))));Debug.locals.put("CAT_DP_ALMACEN", _cat_dp_almacen);Debug.locals.put("CAT_DP_ALMACEN", _cat_dp_almacen); - BA.debugLineNum = 1434;BA.debugLine="Dim CAT_DP_ID As String = records(RESULT.Colu"; -Debug.ShouldStop(33554432); -_cat_dp_id = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_DP_ID")))))));Debug.locals.put("CAT_DP_ID", _cat_dp_id);Debug.locals.put("CAT_DP_ID", _cat_dp_id); - BA.debugLineNum = 1435;BA.debugLine="Dim CAT_DP_IDPROD As String = records(RESULT."; -Debug.ShouldStop(67108864); -_cat_dp_idprod = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_DP_IDPROD")))))));Debug.locals.put("CAT_DP_IDPROD", _cat_dp_idprod);Debug.locals.put("CAT_DP_IDPROD", _cat_dp_idprod); - BA.debugLineNum = 1436;BA.debugLine="Dim CAT_DP_TIPO As String = records(RESULT.Co"; -Debug.ShouldStop(134217728); -_cat_dp_tipo = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_DP_TIPO")))))));Debug.locals.put("CAT_DP_TIPO", _cat_dp_tipo);Debug.locals.put("CAT_DP_TIPO", _cat_dp_tipo); - BA.debugLineNum = 1437;BA.debugLine="Dim CAT_DP_PZAS As String = records(RESULT.Co"; -Debug.ShouldStop(268435456); -_cat_dp_pzas = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_DP_PZAS")))))));Debug.locals.put("CAT_DP_PZAS", _cat_dp_pzas);Debug.locals.put("CAT_DP_PZAS", _cat_dp_pzas); - BA.debugLineNum = 1438;BA.debugLine="Dim CAT_DP_USUARIO As String = records(RESUL"; -Debug.ShouldStop(536870912); -_cat_dp_usuario = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_DP_USUARIO")))))));Debug.locals.put("CAT_DP_USUARIO", _cat_dp_usuario);Debug.locals.put("CAT_DP_USUARIO", _cat_dp_usuario); - BA.debugLineNum = 1439;BA.debugLine="Dim CAT_DP_FECHA As String = records(RESULT.C"; -Debug.ShouldStop(1073741824); -_cat_dp_fecha = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_DP_FECHA")))))));Debug.locals.put("CAT_DP_FECHA", _cat_dp_fecha);Debug.locals.put("CAT_DP_FECHA", _cat_dp_fecha); - BA.debugLineNum = 1440;BA.debugLine="Dim CAT_DP_REGALO As String = records(RESULT"; -Debug.ShouldStop(-2147483648); -_cat_dp_regalo = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_DP_REGALO")))))));Debug.locals.put("CAT_DP_REGALO", _cat_dp_regalo);Debug.locals.put("CAT_DP_REGALO", _cat_dp_regalo); - BA.debugLineNum = 1441;BA.debugLine="Dim CAT_DP_CLASIF As String = records(RESULT"; -Debug.ShouldStop(1); -_cat_dp_clasif = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_DP_CLASIF")))))));Debug.locals.put("CAT_DP_CLASIF", _cat_dp_clasif);Debug.locals.put("CAT_DP_CLASIF", _cat_dp_clasif); - BA.debugLineNum = 1442;BA.debugLine="Dim CAT_DP_PRECIO As String = records(RESULT."; -Debug.ShouldStop(2); -_cat_dp_precio = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_DP_PRECIO")))))));Debug.locals.put("CAT_DP_PRECIO", _cat_dp_precio);Debug.locals.put("CAT_DP_PRECIO", _cat_dp_precio); - BA.debugLineNum = 1443;BA.debugLine="Dim CAT_DP_PRECIO_SIMPTOS As String = records"; -Debug.ShouldStop(4); -_cat_dp_precio_simptos = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_DP_PRECIO_SIMPTOS")))))));Debug.locals.put("CAT_DP_PRECIO_SIMPTOS", _cat_dp_precio_simptos);Debug.locals.put("CAT_DP_PRECIO_SIMPTOS", _cat_dp_precio_simptos); - BA.debugLineNum = 1444;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(8); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO CAT_DETALLES_PAQ(CAT_DP_ALMACEN,CAT_DP_ID,CAT_DP_IDPROD,CAT_DP_TIPO,CAT_DP_PZAS,CAT_DP_USUARIO,CAT_DP_FECHA,CAT_DP_REGALO,CAT_DP_CLASIF,CAT_DP_PRECIO,CAT_DP_PRECIO_SIMPTOS) VALUES (?,?,?,?,?,?,?,?,?,?,?)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {11},new Object[] {(_cat_dp_almacen),(_cat_dp_id),(_cat_dp_idprod),(_cat_dp_tipo),(_cat_dp_pzas),(_cat_dp_usuario),(_cat_dp_fecha),(_cat_dp_regalo),(_cat_dp_clasif),(_cat_dp_precio),(_cat_dp_precio_simptos)}))))); - } -}Debug.locals.put("records", _records); -; - BA.debugLineNum = 1446;BA.debugLine="If PB2.Progress = 0 Then"; -Debug.ShouldStop(32); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 1447;BA.debugLine="PB2.Progress = 30"; -Debug.ShouldStop(64); -__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 30)); - BA.debugLineNum = 1448;BA.debugLine="S_CP.Text = \"CARGANDO\""; -Debug.ShouldStop(128); -__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("CARGANDO")); - }else -{ BA.debugLineNum = 1449;BA.debugLine="ELSE If PB2.Progress = 30 Then"; -Debug.ShouldStop(256); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 30))) { - BA.debugLineNum = 1450;BA.debugLine="PB2.Progress = 60"; -Debug.ShouldStop(512); -__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 60)); - }else -{ BA.debugLineNum = 1451;BA.debugLine="ELSE IF PB2.Progress = 60 Then"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 60))) { - BA.debugLineNum = 1452;BA.debugLine="PB2.Progress = 100"; -Debug.ShouldStop(2048); -__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 100)); - BA.debugLineNum = 1453;BA.debugLine="S_CP.Text = \"LISTO\""; -Debug.ShouldStop(4096); -__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("LISTO")); - }}} -; - BA.debugLineNum = 1455;BA.debugLine="Listo3 =1"; -Debug.ShouldStop(16384); -__ref.setField ("_listo3" /*RemoteObject*/ ,BA.NumberToString(1)); - BA.debugLineNum = 1456;BA.debugLine="If Listo1 =1 And Listo2 =1 And Listo3 = 1 And"; -Debug.ShouldStop(32768); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_listo1" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_listo2" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_listo3" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_listo4" /*RemoteObject*/ ),BA.NumberToString(1))) { - BA.debugLineNum = 1457;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(65536); -__ref.runClassMethod (keymon.lat.medicomed.c_principal.class, "_b4xpage_appear" /*void*/ ); - BA.debugLineNum = 1458;BA.debugLine="img2.Visible=False"; -Debug.ShouldStop(131072); -__ref.getField(false,"_img2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1459;BA.debugLine="EJECUTANDO=0"; -Debug.ShouldStop(262144); -__ref.setField ("_ejecutando" /*RemoteObject*/ ,BA.NumberToString(0)); - }else -{ BA.debugLineNum = 1460;BA.debugLine="Else If Listo4 = 1 And Listo3 = 1 And inve = 1"; -Debug.ShouldStop(524288); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_listo4" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_listo3" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_inve" /*RemoteObject*/ ),BA.NumberToString(1))) { - BA.debugLineNum = 1461;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(1048576); -__ref.runClassMethod (keymon.lat.medicomed.c_principal.class, "_b4xpage_appear" /*void*/ ); - BA.debugLineNum = 1462;BA.debugLine="img2.Visible=False"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_img2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1463;BA.debugLine="EJECUTANDO=0"; -Debug.ShouldStop(4194304); -__ref.setField ("_ejecutando" /*RemoteObject*/ ,BA.NumberToString(0)); - }} -; - }; - }; - BA.debugLineNum = 1469;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(268435456); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1470;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(536870912); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1471;BA.debugLine="If RESULT.Tag = \"hist_datos\" Then 'query tag"; -Debug.ShouldStop(1073741824); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("hist_datos")))) { - BA.debugLineNum = 1472;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(-2147483648); -{ -final RemoteObject group447 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen447 = group447.runMethod(true,"getSize").get() -;int index447 = 0; -; -for (; index447 < groupLen447;index447++){ -_records = (group447.runMethod(false,"Get",index447));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1473;BA.debugLine="Dim HVD_CLIENTE As String = records(RESULT.Co"; -Debug.ShouldStop(1); -_hvd_cliente = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HVD_CLIENTE")))))));Debug.locals.put("HVD_CLIENTE", _hvd_cliente);Debug.locals.put("HVD_CLIENTE", _hvd_cliente); - BA.debugLineNum = 1474;BA.debugLine="Dim HVD_PRONOMBRE As String = records(RESULT."; -Debug.ShouldStop(2); -_hvd_pronombre = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HVD_PRONOMBRE")))))));Debug.locals.put("HVD_PRONOMBRE", _hvd_pronombre);Debug.locals.put("HVD_PRONOMBRE", _hvd_pronombre); - BA.debugLineNum = 1475;BA.debugLine="Dim HVD_CANT As String = records(RESULT.Colum"; -Debug.ShouldStop(4); -_hvd_cant = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HVD_CANT")))))));Debug.locals.put("HVD_CANT", _hvd_cant);Debug.locals.put("HVD_CANT", _hvd_cant); - BA.debugLineNum = 1476;BA.debugLine="Dim HVD_COSTO_TOT As String = records(RESULT."; -Debug.ShouldStop(8); -_hvd_costo_tot = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HVD_COSTO_TOT")))))));Debug.locals.put("HVD_COSTO_TOT", _hvd_costo_tot);Debug.locals.put("HVD_COSTO_TOT", _hvd_costo_tot); - BA.debugLineNum = 1477;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(16); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO HIST_VENTAS(HVD_CLIENTE,HVD_PRONOMBRE,HVD_CANT,HVD_COSTO_TOT) VALUES (?,?,?,?)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {4},new Object[] {(_hvd_cliente),(_hvd_pronombre),(_hvd_cant),(_hvd_costo_tot)}))))); - } -}Debug.locals.put("records", _records); -; - BA.debugLineNum = 1479;BA.debugLine="Listo3 =1"; -Debug.ShouldStop(64); -__ref.setField ("_listo3" /*RemoteObject*/ ,BA.NumberToString(1)); - BA.debugLineNum = 1480;BA.debugLine="If PB1.Progress = 0 Then"; -Debug.ShouldStop(128); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_pb1" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 1481;BA.debugLine="PB1.Progress = 30"; -Debug.ShouldStop(256); -__ref.getField(false,"_pb1" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 30)); - BA.debugLineNum = 1482;BA.debugLine="S_CH.Text = \"CARGANDO\""; -Debug.ShouldStop(512); -__ref.getField(false,"_s_ch" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("CARGANDO")); - }else -{ BA.debugLineNum = 1483;BA.debugLine="ELSE If PB1.Progress = 30 Then"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_pb1" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 30))) { - BA.debugLineNum = 1484;BA.debugLine="PB1.Progress = 60"; -Debug.ShouldStop(2048); -__ref.getField(false,"_pb1" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 60)); - }else -{ BA.debugLineNum = 1485;BA.debugLine="ELSE IF PB1.Progress = 60 Then"; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_pb1" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 60))) { - BA.debugLineNum = 1486;BA.debugLine="PB1.Progress = 100"; -Debug.ShouldStop(8192); -__ref.getField(false,"_pb1" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 100)); - BA.debugLineNum = 1487;BA.debugLine="S_CH.Text = \"LISTO\""; -Debug.ShouldStop(16384); -__ref.getField(false,"_s_ch" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("LISTO")); - }}} -; - BA.debugLineNum = 1489;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; -Debug.ShouldStop(65536); -if (RemoteObject.solveBoolean("!",c_principal._starter._marcacel /*RemoteObject*/ ,BA.ObjectToString("Sony"))) { -c_principal.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Venta historico Actualizado.")),(Object)(c_principal.__c.getField(true,"True")));}; - BA.debugLineNum = 1490;BA.debugLine="If Listo1 =1 And Listo2 =1 And Listo3 = 1 And"; -Debug.ShouldStop(131072); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_listo1" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_listo2" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_listo3" /*RemoteObject*/ ),BA.NumberToString(1)) && RemoteObject.solveBoolean("=",__ref.getField(true,"_listo4" /*RemoteObject*/ ),BA.NumberToString(1))) { - BA.debugLineNum = 1491;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(262144); -__ref.runClassMethod (keymon.lat.medicomed.c_principal.class, "_b4xpage_appear" /*void*/ ); - BA.debugLineNum = 1492;BA.debugLine="img2.Visible=False"; -Debug.ShouldStop(524288); -__ref.getField(false,"_img2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1493;BA.debugLine="EJECUTANDO=0"; -Debug.ShouldStop(1048576); -__ref.setField ("_ejecutando" /*RemoteObject*/ ,BA.NumberToString(0)); - }; - }; - }; - BA.debugLineNum = 1498;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(33554432); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1499;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(67108864); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1500;BA.debugLine="If RESULT.Tag = \"variables\" Then 'query tag"; -Debug.ShouldStop(134217728); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("variables")))) { - BA.debugLineNum = 1501;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(268435456); -{ -final RemoteObject group475 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen475 = group475.runMethod(true,"getSize").get() -;int index475 = 0; -; -for (; index475 < groupLen475;index475++){ -_records = (group475.runMethod(false,"Get",index475));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1502;BA.debugLine="Dim Cat_Va_Descripcion As String = records(RE"; -Debug.ShouldStop(536870912); -_cat_va_descripcion = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_VA_DESCRIPCION")))))));Debug.locals.put("Cat_Va_Descripcion", _cat_va_descripcion);Debug.locals.put("Cat_Va_Descripcion", _cat_va_descripcion); - BA.debugLineNum = 1503;BA.debugLine="Dim Cat_Va_Valor As String = records(RESULT.C"; -Debug.ShouldStop(1073741824); -_cat_va_valor = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_VA_VALOR")))))));Debug.locals.put("Cat_Va_Valor", _cat_va_valor);Debug.locals.put("Cat_Va_Valor", _cat_va_valor); - BA.debugLineNum = 1504;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(-2147483648); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO CAT_VARIABLES(CAT_VA_DESCRIPCION, CAT_VA_VALOR) VALUES (?,?)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(_cat_va_descripcion),(_cat_va_valor)}))))); - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 1509;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(16); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1510;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(32); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1511;BA.debugLine="If RESULT.Tag = \"CUESTIONARIO\" Then 'query tag"; -Debug.ShouldStop(64); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("CUESTIONARIO")))) { - BA.debugLineNum = 1512;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(128); -{ -final RemoteObject group485 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen485 = group485.runMethod(true,"getSize").get() -;int index485 = 0; -; -for (; index485 < groupLen485;index485++){ -_records = (group485.runMethod(false,"Get",index485));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1513;BA.debugLine="Dim Cat_Va_Valor As String = records(RESULT.C"; -Debug.ShouldStop(256); -_cat_va_valor = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_VALOR")))))));Debug.locals.put("Cat_Va_Valor", _cat_va_valor);Debug.locals.put("Cat_Va_Valor", _cat_va_valor); - BA.debugLineNum = 1514;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"DELETE"; -Debug.ShouldStop(512); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("DELETE FROM CAT_VARIABLES WHERE CAT_VA_DESCRIPCION = ?")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(RemoteObject.createImmutable("CUESTIONARIO"))}))))); - BA.debugLineNum = 1515;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(1024); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO CAT_VARIABLES(CAT_VA_DESCRIPCION, CAT_VA_VALOR) VALUES (?,?)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {RemoteObject.createImmutable(("CUESTIONARIO")),(_cat_va_valor)}))))); - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 1520;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(32768); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1521;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(65536); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1522;BA.debugLine="If RESULT.Tag = \"valida_pedido\" Then 'query tag"; -Debug.ShouldStop(131072); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("valida_pedido")))) { - BA.debugLineNum = 1523;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(262144); -{ -final RemoteObject group495 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen495 = group495.runMethod(true,"getSize").get() -;int index495 = 0; -; -for (; index495 < groupLen495;index495++){ -_records = (group495.runMethod(false,"Get",index495));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1525;BA.debugLine="Dim CUANTOSP As Int = records(RESULT.Columns."; -Debug.ShouldStop(1048576); -_cuantosp = BA.numberCast(int.class, _records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CUANTOSP")))))));Debug.locals.put("CUANTOSP", _cuantosp);Debug.locals.put("CUANTOSP", _cuantosp); - BA.debugLineNum = 1527;BA.debugLine="If cuantos_pedido < = CUANTOSP Then"; -Debug.ShouldStop(4194304); -if (RemoteObject.solveBoolean("k",BA.numberCast(double.class, __ref.getField(true,"_cuantos_pedido" /*RemoteObject*/ )),BA.numberCast(double.class, _cuantosp))) { - BA.debugLineNum = 1529;BA.debugLine="datos_iguales = \"ok\""; -Debug.ShouldStop(16777216); -__ref.setField ("_datos_iguales" /*RemoteObject*/ ,BA.ObjectToString("ok")); - BA.debugLineNum = 1530;BA.debugLine="S_CP.Text = \"INFO OK\""; -Debug.ShouldStop(33554432); -__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("INFO OK")); - }else { - BA.debugLineNum = 1532;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMess"; -Debug.ShouldStop(134217728); -if (RemoteObject.solveBoolean("!",c_principal._starter._marcacel /*RemoteObject*/ ,BA.ObjectToString("Sony"))) { -c_principal.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("No se cargo bien la info P. Sync Nuevamente"),_cuantosp,RemoteObject.createImmutable(" "),__ref.getField(true,"_cuantos_pedido" /*RemoteObject*/ )))),(Object)(c_principal.__c.getField(true,"True")));}; - BA.debugLineNum = 1533;BA.debugLine="S_CP.Text = \"ENVIAR DATOS (K-2)\""; -Debug.ShouldStop(268435456); -__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("ENVIAR DATOS (K-2)")); - BA.debugLineNum = 1534;BA.debugLine="Log(\"No se cargo bien la info P. Sync Nuevam"; -Debug.ShouldStop(536870912); -c_principal.__c.runVoidMethod ("LogImpl","33408420",RemoteObject.concat(RemoteObject.createImmutable("No se cargo bien la info P. Sync Nuevamente"),_cuantosp,RemoteObject.createImmutable(" "),__ref.getField(true,"_cuantos_pedido" /*RemoteObject*/ )),0); - }; - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 1542;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(32); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1543;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(64); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1544;BA.debugLine="If RESULT.Tag = \"valida_pedidoc\" Then 'query ta"; -Debug.ShouldStop(128); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("valida_pedidoc")))) { - BA.debugLineNum = 1545;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(256); -{ -final RemoteObject group511 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen511 = group511.runMethod(true,"getSize").get() -;int index511 = 0; -; -for (; index511 < groupLen511;index511++){ -_records = (group511.runMethod(false,"Get",index511));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1547;BA.debugLine="Dim CUANTOSC As Int = records(RESULT.Columns."; -Debug.ShouldStop(1024); -_cuantosc = BA.numberCast(int.class, _records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CUANTOSC")))))));Debug.locals.put("CUANTOSC", _cuantosc);Debug.locals.put("CUANTOSC", _cuantosc); - BA.debugLineNum = 1549;BA.debugLine="If cuantos_pedidosc = CUANTOSC Then"; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_cuantos_pedidosc" /*RemoteObject*/ ),BA.NumberToString(_cuantosc))) { - BA.debugLineNum = 1551;BA.debugLine="datos_iguales = \"ok\""; -Debug.ShouldStop(16384); -__ref.setField ("_datos_iguales" /*RemoteObject*/ ,BA.ObjectToString("ok")); - }else { - BA.debugLineNum = 1553;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMess"; -Debug.ShouldStop(65536); -if (RemoteObject.solveBoolean("!",c_principal._starter._marcacel /*RemoteObject*/ ,BA.ObjectToString("Sony"))) { -c_principal.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("No se cargo bien la info C. Sync Nuevamente"),_cuantosc,RemoteObject.createImmutable(" "),__ref.getField(true,"_cuantos_pedidosc" /*RemoteObject*/ )))),(Object)(c_principal.__c.getField(true,"True")));}; - BA.debugLineNum = 1554;BA.debugLine="Log(\"No se cargo bien la info C. Sync Nuevam"; -Debug.ShouldStop(131072); -c_principal.__c.runVoidMethod ("LogImpl","33408440",RemoteObject.concat(RemoteObject.createImmutable("No se cargo bien la info C. Sync Nuevamente "),_cuantosc,RemoteObject.createImmutable(" "),__ref.getField(true,"_cuantos_pedidosc" /*RemoteObject*/ )),0); - }; - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 1560;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(8388608); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1561;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(16777216); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1562;BA.debugLine="If RESULT.Tag = \"valida_noventa\" Then 'query ta"; -Debug.ShouldStop(33554432); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("valida_noventa")))) { - BA.debugLineNum = 1563;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(67108864); -{ -final RemoteObject group525 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen525 = group525.runMethod(true,"getSize").get() -;int index525 = 0; -; -for (; index525 < groupLen525;index525++){ -_records = (group525.runMethod(false,"Get",index525));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1564;BA.debugLine="Dim CUANTOSN As Int = records(RESULT.Columns."; -Debug.ShouldStop(134217728); -_cuantosn = BA.numberCast(int.class, _records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CUANTOSN")))))));Debug.locals.put("CUANTOSN", _cuantosn);Debug.locals.put("CUANTOSN", _cuantosn); - BA.debugLineNum = 1565;BA.debugLine="If cuantos_noventa = CUANTOSN Then"; -Debug.ShouldStop(268435456); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_cuantos_noventa" /*RemoteObject*/ ),BA.NumberToString(_cuantosn))) { - BA.debugLineNum = 1567;BA.debugLine="datos_iguales = \"ok\""; -Debug.ShouldStop(1073741824); -__ref.setField ("_datos_iguales" /*RemoteObject*/ ,BA.ObjectToString("ok")); - }else { - BA.debugLineNum = 1569;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMess"; -Debug.ShouldStop(1); -if (RemoteObject.solveBoolean("!",c_principal._starter._marcacel /*RemoteObject*/ ,BA.ObjectToString("Sony"))) { -c_principal.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("No se cargo bien la info N. Sync Nuevamente"),_cuantosn,RemoteObject.createImmutable(" "),__ref.getField(true,"_cuantos_noventa" /*RemoteObject*/ )))),(Object)(c_principal.__c.getField(true,"True")));}; - BA.debugLineNum = 1570;BA.debugLine="Log(\"No se cargo bien la info N. Sync Nuevam"; -Debug.ShouldStop(2); -c_principal.__c.runVoidMethod ("LogImpl","33408456",RemoteObject.concat(RemoteObject.createImmutable("No se cargo bien la info N. Sync Nuevamente "),_cuantosn,RemoteObject.createImmutable(" "),__ref.getField(true,"_cuantos_noventa" /*RemoteObject*/ )),0); - }; - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 1576;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(128); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1577;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(256); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1578;BA.debugLine="If RESULT.Tag = \"ins_pedido\" Then 'query tag"; -Debug.ShouldStop(512); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("ins_pedido")))) { - BA.debugLineNum = 1579;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(1024); -{ -final RemoteObject group539 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen539 = group539.runMethod(true,"getSize").get() -;int index539 = 0; -; -for (; index539 < groupLen539;index539++){ -_records = (group539.runMethod(false,"Get",index539));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1580;BA.debugLine="PB2.Progress = PB2.Progress + 5"; -Debug.ShouldStop(2048); -__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"setProgress",RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"getProgress"),RemoteObject.createImmutable(5)}, "+",1, 1)); - BA.debugLineNum = 1581;BA.debugLine="S_CP.Text = \"SUBIENDO\""; -Debug.ShouldStop(4096); -__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("SUBIENDO")); - } -}Debug.locals.put("records", _records); -; - BA.debugLineNum = 1583;BA.debugLine="PB2.Progress = 100"; -Debug.ShouldStop(16384); -__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 100)); - BA.debugLineNum = 1584;BA.debugLine="S_CP.Text = \"LISTO\""; -Debug.ShouldStop(32768); -__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("LISTO")); - BA.debugLineNum = 1585;BA.debugLine="Log(\"5\")"; -Debug.ShouldStop(65536); -c_principal.__c.runVoidMethod ("LogImpl","33408471",RemoteObject.createImmutable("5"),0); - }; - }; - BA.debugLineNum = 1589;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(1048576); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1590;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(2097152); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1591;BA.debugLine="If RESULT.Tag = \"version\" Then 'query tag"; -Debug.ShouldStop(4194304); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("version")))) { - BA.debugLineNum = 1592;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(8388608); -{ -final RemoteObject group551 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen551 = group551.runMethod(true,"getSize").get() -;int index551 = 0; -; -for (; index551 < groupLen551;index551++){ -_records = (group551.runMethod(false,"Get",index551));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1593;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete f"; -Debug.ShouldStop(16777216); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from VERSION"))); - BA.debugLineNum = 1594;BA.debugLine="Dim CAT_VE_VERSION As String = records(RESULT"; -Debug.ShouldStop(33554432); -_cat_ve_version = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CAT_VE_VERSION")))))));Debug.locals.put("CAT_VE_VERSION", _cat_ve_version);Debug.locals.put("CAT_VE_VERSION", _cat_ve_version); - BA.debugLineNum = 1595;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(67108864); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO VERSION(NOVERSION) VALUES (?)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(_cat_ve_version)}))))); - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 1600;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(-2147483648); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1601;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(1); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1602;BA.debugLine="If RESULT.Tag = \"count_cli\" Then 'query tag"; -Debug.ShouldStop(2); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("count_cli")))) { - BA.debugLineNum = 1603;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(4); -{ -final RemoteObject group561 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen561 = group561.runMethod(true,"getSize").get() -;int index561 = 0; -; -for (; index561 < groupLen561;index561++){ -_records = (group561.runMethod(false,"Get",index561));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1604;BA.debugLine="COUNT_CLIE = records(RESULT.Columns.Get(\"COUN"; -Debug.ShouldStop(8); -__ref.setField ("_count_clie" /*RemoteObject*/ ,BA.numberCast(int.class, _records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("COUNT_CLIE")))))))); - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 1609;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(256); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1610;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(512); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1611;BA.debugLine="If RESULT.Tag = \"ruta\" Then 'query tag"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("ruta")))) { - BA.debugLineNum = 1612;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(2048); -{ -final RemoteObject group569 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen569 = group569.runMethod(true,"getSize").get() -;int index569 = 0; -; -for (; index569 < groupLen569;index569++){ -_records = (group569.runMethod(false,"Get",index569));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1613;BA.debugLine="Dim VALIDO As String = records(RESULT.Columns"; -Debug.ShouldStop(4096); -_valido = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("VALIDO")))))));Debug.locals.put("VALIDO", _valido);Debug.locals.put("VALIDO", _valido); - BA.debugLineNum = 1614;BA.debugLine="If VALIDO = \"OK\" Then"; -Debug.ShouldStop(8192); -if (RemoteObject.solveBoolean("=",_valido,BA.ObjectToString("OK"))) { - BA.debugLineNum = 1615;BA.debugLine="cargar.Visible = True"; -Debug.ShouldStop(16384); -__ref.getField(false,"_cargar" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1616;BA.debugLine="Subir.Visible = True"; -Debug.ShouldStop(32768); -__ref.getField(false,"_subir" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1617;BA.debugLine="inv.Visible = True"; -Debug.ShouldStop(65536); -__ref.getField(false,"_inv" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1618;BA.debugLine="connecta.Visible = False"; -Debug.ShouldStop(131072); -__ref.getField(false,"_connecta" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1619;BA.debugLine="If conn = \"1\" Then"; -Debug.ShouldStop(262144); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_conn" /*RemoteObject*/ ),BA.ObjectToString("1"))) { - BA.debugLineNum = 1620;BA.debugLine="ToastMessageShow(\"Existe Conexión con el Se"; -Debug.ShouldStop(524288); -c_principal.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Existe Conexión con el Servidor.")),(Object)(c_principal.__c.getField(true,"True"))); - }; - }else { - BA.debugLineNum = 1623;BA.debugLine="cargar.Visible = False"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_cargar" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1624;BA.debugLine="Subir.Visible = False"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_subir" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1625;BA.debugLine="inv.Visible = False"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_inv" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1626;BA.debugLine="connecta.Visible = False"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_connecta" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1627;BA.debugLine="ToastMessageShow(\"Ruta invalida.\" , True)"; -Debug.ShouldStop(67108864); -c_principal.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Ruta invalida.")),(Object)(c_principal.__c.getField(true,"True"))); - }; - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 1633;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(1); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1634;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(2); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1635;BA.debugLine="If RESULT.Tag = \"usuario\" Then 'query tag"; -Debug.ShouldStop(4); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("usuario")))) { - BA.debugLineNum = 1636;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(8); -{ -final RemoteObject group592 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen592 = group592.runMethod(true,"getSize").get() -;int index592 = 0; -; -for (; index592 < groupLen592;index592++){ -_records = (group592.runMethod(false,"Get",index592));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1637;BA.debugLine="Dim name2 As String = records(RESULT.Columns."; -Debug.ShouldStop(16); -_name2 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("VALIDO")))))));Debug.locals.put("name2", _name2);Debug.locals.put("name2", _name2); - } -}Debug.locals.put("records", _records); -; - BA.debugLineNum = 1639;BA.debugLine="If name2 = \"OK\" Then"; -Debug.ShouldStop(64); -if (RemoteObject.solveBoolean("=",_name2,BA.ObjectToString("OK"))) { - BA.debugLineNum = 1640;BA.debugLine="PASO = 1"; -Debug.ShouldStop(128); -__ref.setField ("_paso" /*RemoteObject*/ ,BA.NumberToString(1)); - }; - BA.debugLineNum = 1642;BA.debugLine="P1.Visible = False"; -Debug.ShouldStop(512); -__ref.getField(false,"_p1" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1643;BA.debugLine="p_mandaInfo.Visible = False"; -Debug.ShouldStop(1024); -__ref.getField(false,"_p_mandainfo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - }; - }; - BA.debugLineNum = 1647;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(16384); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1648;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(32768); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1649;BA.debugLine="If RESULT.Tag = \"fecha\" Then 'query tag"; -Debug.ShouldStop(65536); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("fecha")))) { - BA.debugLineNum = 1650;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(131072); -{ -final RemoteObject group605 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen605 = group605.runMethod(true,"getSize").get() -;int index605 = 0; -; -for (; index605 < groupLen605;index605++){ -_records = (group605.runMethod(false,"Get",index605));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1651;BA.debugLine="Dim FECHA_HOY As String = records(RESULT.Colu"; -Debug.ShouldStop(262144); -_fecha_hoy = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("FECHA")))))));Debug.locals.put("FECHA_HOY", _fecha_hoy);Debug.locals.put("FECHA_HOY", _fecha_hoy); - BA.debugLineNum = 1652;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete"; -Debug.ShouldStop(524288); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("delete from CAT_VARIABLES where CAT_VA_DESCRIPCION = ?")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(RemoteObject.createImmutable("FECHA"))}))))); - BA.debugLineNum = 1653;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(1048576); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO CAT_VARIABLES(CAT_VA_DESCRIPCION, CAT_VA_VALOR) VALUES (?,?)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {RemoteObject.createImmutable(("FECHA")),(_fecha_hoy)}))))); - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 1658;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(33554432); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1659;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(67108864); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1660;BA.debugLine="If RESULT.Tag = \"folio\" Then 'query tag"; -Debug.ShouldStop(134217728); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("folio")))) { - BA.debugLineNum = 1661;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(268435456); -{ -final RemoteObject group615 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen615 = group615.runMethod(true,"getSize").get() -;int index615 = 0; -; -for (; index615 < groupLen615;index615++){ -_records = (group615.runMethod(false,"Get",index615));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1662;BA.debugLine="Dim FOLIO As String = records(RESULT.Columns."; -Debug.ShouldStop(536870912); -_folio = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("FOLIO")))))));Debug.locals.put("FOLIO", _folio);Debug.locals.put("FOLIO", _folio); - BA.debugLineNum = 1663;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete"; -Debug.ShouldStop(1073741824); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("delete from CAT_VARIABLES where CAT_VA_DESCRIPCION = ?")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(RemoteObject.createImmutable("FOLIO"))}))))); - BA.debugLineNum = 1664;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(-2147483648); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO CAT_VARIABLES(CAT_VA_DESCRIPCION, CAT_VA_VALOR) VALUES (?,?)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {RemoteObject.createImmutable(("FOLIO")),(_folio)}))))); - } -}Debug.locals.put("records", _records); -; - }; - }; - BA.debugLineNum = 1669;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; -Debug.ShouldStop(16); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("DBRequest"))) { - BA.debugLineNum = 1670;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -Debug.ShouldStop(32); -_result = c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_handlejob" /*RemoteObject*/ ,(Object)(_job));Debug.locals.put("RESULT", _result);Debug.locals.put("RESULT", _result); - BA.debugLineNum = 1671;BA.debugLine="If RESULT.Tag = \"hist_avance\" Then 'query tag"; -Debug.ShouldStop(64); -if (RemoteObject.solveBoolean("=",_result.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(("hist_avance")))) { - BA.debugLineNum = 1672;BA.debugLine="For Each records() As Object In RESULT.Rows"; -Debug.ShouldStop(128); -{ -final RemoteObject group625 = _result.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen625 = group625.runMethod(true,"getSize").get() -;int index625 = 0; -; -for (; index625 < groupLen625;index625++){ -_records = (group625.runMethod(false,"Get",index625));Debug.locals.put("records", _records); -Debug.locals.put("records", _records); - BA.debugLineNum = 1673;BA.debugLine="Dim marca As String = records(RESULT.Columns."; -Debug.ShouldStop(256); -_marca = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_AM_MARCA")))))));Debug.locals.put("marca", _marca);Debug.locals.put("marca", _marca); - BA.debugLineNum = 1674;BA.debugLine="Dim avance As String = records(RESULT.Columns"; -Debug.ShouldStop(512); -_avance = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_AM_AVANCE")))))));Debug.locals.put("avance", _avance);Debug.locals.put("avance", _avance); - BA.debugLineNum = 1675;BA.debugLine="Dim objetivo As String = records(RESULT.Colum"; -Debug.ShouldStop(1024); -_objetivo = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_AM_OBJETIVO")))))));Debug.locals.put("objetivo", _objetivo);Debug.locals.put("objetivo", _objetivo); - BA.debugLineNum = 1676;BA.debugLine="Dim porcentaje1 As String = records(RESULT.Co"; -Debug.ShouldStop(2048); -_porcentaje1 = BA.ObjectToString(_records.getArrayElement(false,BA.numberCast(int.class, _result.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("HIST_AM_PORCENTAJE")))))));Debug.locals.put("porcentaje1", _porcentaje1);Debug.locals.put("porcentaje1", _porcentaje1); - BA.debugLineNum = 1677;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(4096); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO HIST_AVANCE(HA_MARCA, HA_AVANCE, HA_OBJETIVO, HA_PORCENTAJE) VALUES (?,?,?,?)")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {4},new Object[] {(_marca),(_avance),(_objetivo),(_porcentaje1)}))))); - } -}Debug.locals.put("records", _records); -; - }; - }; - }; - BA.debugLineNum = 1683;BA.debugLine="Job.Release"; -Debug.ShouldStop(262144); -_job.runClassMethod (keymon.lat.medicomed.httpjob.class, "_release" /*RemoteObject*/ ); - BA.debugLineNum = 1684;BA.debugLine="End Sub"; -Debug.ShouldStop(524288); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _nuevo_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("NUEVO_Click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,1947); -if (RapidSub.canDelegate("nuevo_click")) { return __ref.runUserSub(false, "c_principal","nuevo_click", __ref);} - BA.debugLineNum = 1947;BA.debugLine="Sub NUEVO_Click"; -Debug.ShouldStop(67108864); - BA.debugLineNum = 1948;BA.debugLine="B4XPages.ShowPage(\"NuevoCliente\")"; -Debug.ShouldStop(134217728); -c_principal._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("NuevoCliente"))); - BA.debugLineNum = 1949;BA.debugLine="End Sub"; -Debug.ShouldStop(268435456); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _nvo_cliente_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("nvo_cliente_Click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,2149); -if (RapidSub.canDelegate("nvo_cliente_click")) { return __ref.runUserSub(false, "c_principal","nvo_cliente_click", __ref);} - BA.debugLineNum = 2149;BA.debugLine="Sub nvo_cliente_Click"; -Debug.ShouldStop(16); - BA.debugLineNum = 2150;BA.debugLine="B4XPages.ShowPage(\"NuevoCliente\")"; -Debug.ShouldStop(32); -c_principal._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("NuevoCliente"))); - BA.debugLineNum = 2151;BA.debugLine="End Sub"; -Debug.ShouldStop(64); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _p_mandainfo_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("p_mandaInfo_Click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,2361); -if (RapidSub.canDelegate("p_mandainfo_click")) { return __ref.runUserSub(false, "c_principal","p_mandainfo_click", __ref);} - BA.debugLineNum = 2361;BA.debugLine="Private Sub p_mandaInfo_Click"; -Debug.ShouldStop(16777216); - BA.debugLineNum = 2363;BA.debugLine="End Sub"; -Debug.ShouldStop(67108864); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _p_resumen_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("P_RESUMEN_click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,1975); -if (RapidSub.canDelegate("p_resumen_click")) { return __ref.runUserSub(false, "c_principal","p_resumen_click", __ref);} - BA.debugLineNum = 1975;BA.debugLine="Sub P_RESUMEN_click"; -Debug.ShouldStop(4194304); - BA.debugLineNum = 1977;BA.debugLine="End Sub"; -Debug.ShouldStop(16777216); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _resdia_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("resdia_Click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,1983); -if (RapidSub.canDelegate("resdia_click")) { return __ref.runUserSub(false, "c_principal","resdia_click", __ref);} -int _i = 0; -RemoteObject _label1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _label2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _cuantos_obj = RemoteObject.createImmutable(""); - BA.debugLineNum = 1983;BA.debugLine="Sub resdia_Click"; -Debug.ShouldStop(1073741824); - BA.debugLineNum = 1984;BA.debugLine="p_principal.Visible = False"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_p_principal" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1985;BA.debugLine="Btn_Ubicar.Visible=False"; -Debug.ShouldStop(1); -__ref.getField(false,"_btn_ubicar" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1986;BA.debugLine="SCROLL_RESDIA.Visible = True"; -Debug.ShouldStop(2); -__ref.getField(false,"_scroll_resdia" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1987;BA.debugLine="SCROLL_RESDIA.Panel.LoadLayout(\"RESDIA\")"; -Debug.ShouldStop(4); -__ref.getField(false,"_scroll_resdia" /*RemoteObject*/ ).runMethod(false,"getPanel").runMethodAndSync(false,"LoadLayout",(Object)(RemoteObject.createImmutable("RESDIA")),__ref.getField(false, "ba")); - BA.debugLineNum = 1988;BA.debugLine="SCROLL_RESDIA.Panel.Height = Panel4.Height"; -Debug.ShouldStop(8); -__ref.getField(false,"_scroll_resdia" /*RemoteObject*/ ).runMethod(false,"getPanel").runMethod(true,"setHeight",__ref.getField(false,"_panel4" /*RemoteObject*/ ).runMethod(true,"getHeight")); - BA.debugLineNum = 1989;BA.debugLine="Panel4.Visible = True"; -Debug.ShouldStop(16); -__ref.getField(false,"_panel4" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1991;BA.debugLine="NUEVO.Visible =False"; -Debug.ShouldStop(64); -__ref.getField(false,"_nuevo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1992;BA.debugLine="BUSCA.Visible=False"; -Debug.ShouldStop(128); -__ref.getField(false,"_busca" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1993;BA.debugLine="connecta.Visible=False"; -Debug.ShouldStop(256); -__ref.getField(false,"_connecta" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1994;BA.debugLine="Subir.Visible=False"; -Debug.ShouldStop(512); -__ref.getField(false,"_subir" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1995;BA.debugLine="cargar.Visible=False"; -Debug.ShouldStop(1024); -__ref.getField(false,"_cargar" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1996;BA.debugLine="Resumen.Visible= False"; -Debug.ShouldStop(2048); -__ref.getField(false,"_resumen" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1998;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery2(\"select COUNT"; -Debug.ShouldStop(8192); -__ref.getField(false,"_d" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select COUNT(*) AS CUANTOS FROM HIST_ENCUESTA WHERE HE_TIPO = ?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("TELEFONO")})))); - BA.debugLineNum = 1999;BA.debugLine="d.Position = 0"; -Debug.ShouldStop(16384); -__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 2000;BA.debugLine="l_encuesta.Text = d.GetString(\"CUANTOS\")"; -Debug.ShouldStop(32768); -__ref.getField(false,"_l_encuesta" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS"))))); - BA.debugLineNum = 2001;BA.debugLine="d.Close"; -Debug.ShouldStop(65536); -__ref.getField(false,"_d" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 2003;BA.debugLine="L_MARCAS.CLEAR"; -Debug.ShouldStop(262144); -__ref.getField(false,"_l_marcas" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 2004;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery2(\"select disti"; -Debug.ShouldStop(524288); -__ref.getField(false,"_d" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select distinct HE_CLIE AS CLIENTE FROM HIST_ENCUESTA WHERE HE_TIPO = ?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("TELEFONO")})))); - BA.debugLineNum = 2005;BA.debugLine="If D.RowCount>0 Then"; -Debug.ShouldStop(1048576); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 2006;BA.debugLine="For i=0 To D.RowCount -1"; -Debug.ShouldStop(2097152); -{ -final int step20 = 1; -final int limit20 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step20 > 0 && _i <= limit20) || (step20 < 0 && _i >= limit20) ;_i = ((int)(0 + _i + step20)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 2007;BA.debugLine="D.Position=i"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 2008;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"Select HE"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("Select HE_RES from HIST_ENCUESTA where HE_CLIE = ? AND HE_TIPO = ?")),(Object)(RemoteObject.createNewArray("String",new int[] {2},new Object[] {__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CLIENTE"))),RemoteObject.createImmutable("TELEFONO")})))); - BA.debugLineNum = 2009;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 2010;BA.debugLine="Dim label1 As Label"; -Debug.ShouldStop(33554432); -_label1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label1", _label1); - BA.debugLineNum = 2011;BA.debugLine="label1 = L_MARCAS.TwoLinesLayout.Label"; -Debug.ShouldStop(67108864); -_label1 = __ref.getField(false,"_l_marcas" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").getField(false,"Label");Debug.locals.put("label1", _label1); - BA.debugLineNum = 2012;BA.debugLine="label1.TextSize = 13"; -Debug.ShouldStop(134217728); -_label1.runMethod(true,"setTextSize",BA.numberCast(float.class, 13)); - BA.debugLineNum = 2013;BA.debugLine="label1.TextColor = Colors.Black"; -Debug.ShouldStop(268435456); -_label1.runMethod(true,"setTextColor",c_principal.__c.getField(false,"Colors").getField(true,"Black")); - BA.debugLineNum = 2014;BA.debugLine="Dim label2 As Label"; -Debug.ShouldStop(536870912); -_label2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label2", _label2); - BA.debugLineNum = 2015;BA.debugLine="label2 = L_MARCAS.TwoLinesLayout.SecondLabel"; -Debug.ShouldStop(1073741824); -_label2 = __ref.getField(false,"_l_marcas" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").getField(false,"SecondLabel");Debug.locals.put("label2", _label2); - BA.debugLineNum = 2016;BA.debugLine="label2.TextSize = 13"; -Debug.ShouldStop(-2147483648); -_label2.runMethod(true,"setTextSize",BA.numberCast(float.class, 13)); - BA.debugLineNum = 2017;BA.debugLine="label2.TextColor = Colors.Black"; -Debug.ShouldStop(1); -_label2.runMethod(true,"setTextColor",c_principal.__c.getField(false,"Colors").getField(true,"Black")); - BA.debugLineNum = 2018;BA.debugLine="L_MARCAS.AddTwoLines(d.GetString(\"CLIENTE\"),\"TE"; -Debug.ShouldStop(2); -__ref.getField(false,"_l_marcas" /*RemoteObject*/ ).runVoidMethod ("AddTwoLines",(Object)(BA.ObjectToCharSequence(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CLIENTE"))))),(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("TELEFONO :"),__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HE_RES"))))))); - BA.debugLineNum = 2019;BA.debugLine="c.Close"; -Debug.ShouldStop(4); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 2022;BA.debugLine="d.Close"; -Debug.ShouldStop(32); -__ref.getField(false,"_d" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 2024;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"Select sum("; -Debug.ShouldStop(128); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("Select sum(PE_COSTO_TOT) As MONTO_DIA from pedido where PE_CLIENTE <> 0 and pe_proid in (Select CAT_GP_ID from cat_gunaprod where CAT_GP_TIPO = ? )")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("RTEC")})))); - BA.debugLineNum = 2025;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(256); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 2026;BA.debugLine="l_monto_k.Text = c.GetString(\"MONTO_DIA\")"; -Debug.ShouldStop(512); -__ref.getField(false,"_l_monto_k" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("MONTO_DIA"))))); - BA.debugLineNum = 2027;BA.debugLine="If l_monto_k.Text = \"null\" Then"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_l_monto_k" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("null"))) { - BA.debugLineNum = 2028;BA.debugLine="l_monto_k.Text = \"0\""; -Debug.ShouldStop(2048); -__ref.getField(false,"_l_monto_k" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("0")); - }; - BA.debugLineNum = 2030;BA.debugLine="c.Close"; -Debug.ShouldStop(8192); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 2032;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"Select sum("; -Debug.ShouldStop(32768); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("Select sum(PE_COSTO_TOT) As MONTO_DIA from pedido where PE_CLIENTE <> 0 and pe_proid in (Select CAT_GP_ID from cat_gunaprod where CAT_GP_TIPO = ? )")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("PING")})))); - BA.debugLineNum = 2033;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(65536); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 2034;BA.debugLine="l_monto_kp.Text = c.GetString(\"MONTO_DIA\")"; -Debug.ShouldStop(131072); -__ref.getField(false,"_l_monto_kp" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("MONTO_DIA"))))); - BA.debugLineNum = 2035;BA.debugLine="If l_monto_kp.Text = \"null\" Then"; -Debug.ShouldStop(262144); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_l_monto_kp" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("null"))) { - BA.debugLineNum = 2036;BA.debugLine="l_monto_kp.Text = \"0\""; -Debug.ShouldStop(524288); -__ref.getField(false,"_l_monto_kp" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("0")); - }; - BA.debugLineNum = 2038;BA.debugLine="c.Close"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 2048;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select sum(P"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select sum(PE_COSTO_TOT) As MONTO_DIA from pedido where PE_CLIENTE <> 0 ")))); - BA.debugLineNum = 2049;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(1); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 2050;BA.debugLine="l_monto_ks.Text = c.GetString(\"MONTO_DIA\")"; -Debug.ShouldStop(2); -__ref.getField(false,"_l_monto_ks" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("MONTO_DIA"))))); - BA.debugLineNum = 2051;BA.debugLine="If l_monto_ks.Text = \"null\" Then"; -Debug.ShouldStop(4); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_l_monto_ks" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("null"))) { - BA.debugLineNum = 2052;BA.debugLine="l_monto_ks.Text = \"0\""; -Debug.ShouldStop(8); -__ref.getField(false,"_l_monto_ks" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("0")); - }; - BA.debugLineNum = 2054;BA.debugLine="c.Close"; -Debug.ShouldStop(32); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 2055;BA.debugLine="Dim cuantos_obj As String"; -Debug.ShouldStop(64); -_cuantos_obj = RemoteObject.createImmutable("");Debug.locals.put("cuantos_obj", _cuantos_obj); - BA.debugLineNum = 2056;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select count"; -Debug.ShouldStop(128); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select count(*) AS TOTAL from HIST_MARCAS_CUOTAS ")))); - BA.debugLineNum = 2057;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(256); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 2058;BA.debugLine="cuantos_obj = c.GetString(\"TOTAL\")"; -Debug.ShouldStop(512); -_cuantos_obj = __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL")));Debug.locals.put("cuantos_obj", _cuantos_obj); - BA.debugLineNum = 2059;BA.debugLine="c.Close"; -Debug.ShouldStop(1024); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 2061;BA.debugLine="If cuantos_obj > 0 Then"; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, _cuantos_obj),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 2062;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select SUM("; -Debug.ShouldStop(8192); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select SUM( HMC_TOTAL) AS TOTAL from HIST_MARCAS_CUOTAS ")))); - BA.debugLineNum = 2063;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(16384); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 2064;BA.debugLine="L_NES.Text = c.GetString(\"TOTAL\")"; -Debug.ShouldStop(32768); -__ref.getField(false,"_l_nes" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL"))))); - BA.debugLineNum = 2065;BA.debugLine="c.Close"; -Debug.ShouldStop(65536); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - }; - BA.debugLineNum = 2067;BA.debugLine="L_REAL.Text = l_monto_ks.Text"; -Debug.ShouldStop(262144); -__ref.getField(false,"_l_real" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_l_monto_ks" /*RemoteObject*/ ).runMethod(true,"getText"))); - BA.debugLineNum = 2068;BA.debugLine="L_ALCANCE.Text = Round2((L_NES.Text / L_REAL.Text"; -Debug.ShouldStop(524288); -__ref.getField(false,"_l_alcance" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(c_principal.__c.runMethod(true,"Round2",(Object)((RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_l_nes" /*RemoteObject*/ ).runMethod(true,"getText")),BA.numberCast(double.class, __ref.getField(false,"_l_real" /*RemoteObject*/ ).runMethod(true,"getText")),RemoteObject.createImmutable(1)}, "/+",1, 0))),(Object)(BA.numberCast(int.class, 2))))); - BA.debugLineNum = 2069;BA.debugLine="L_VPLAN.Text = l_porvisitar.Text"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_l_vplan" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_l_porvisitar" /*RemoteObject*/ ).runMethod(true,"getText"))); - BA.debugLineNum = 2070;BA.debugLine="L_VREAL.Text = L_CUANTOST.text"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_l_vreal" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_l_cuantost" /*RemoteObject*/ ).runMethod(true,"getText"))); - BA.debugLineNum = 2071;BA.debugLine="L_EFEC_VIS.Text = Round2(L_VREAL.text / L_VPLAN.T"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_l_efec_vis" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(c_principal.__c.runMethod(true,"Round2",(Object)(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_l_vreal" /*RemoteObject*/ ).runMethod(true,"getText")),BA.numberCast(double.class, __ref.getField(false,"_l_vplan" /*RemoteObject*/ ).runMethod(true,"getText"))}, "/",0, 0)),(Object)(BA.numberCast(int.class, 2))))); - BA.debugLineNum = 2072;BA.debugLine="L_VISITCC.Text = l_cuantosc.text"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_l_visitcc" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_l_cuantosc" /*RemoteObject*/ ).runMethod(true,"getText"))); - BA.debugLineNum = 2073;BA.debugLine="L_EFEC_PV.Text = Round2(L_VISITCC.Text / L_VREAL."; -Debug.ShouldStop(16777216); -__ref.getField(false,"_l_efec_pv" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(c_principal.__c.runMethod(true,"Round2",(Object)(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_l_visitcc" /*RemoteObject*/ ).runMethod(true,"getText")),BA.numberCast(double.class, __ref.getField(false,"_l_vreal" /*RemoteObject*/ ).runMethod(true,"getText"))}, "/",0, 0)),(Object)(BA.numberCast(int.class, 2))))); - BA.debugLineNum = 2074;BA.debugLine="L_EFEC_PURA.Text = Round2(L_VISITCC.Text / L_VPLA"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_l_efec_pura" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(c_principal.__c.runMethod(true,"Round2",(Object)(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_l_visitcc" /*RemoteObject*/ ).runMethod(true,"getText")),BA.numberCast(double.class, __ref.getField(false,"_l_vplan" /*RemoteObject*/ ).runMethod(true,"getText"))}, "/",0, 0)),(Object)(BA.numberCast(int.class, 2))))); - BA.debugLineNum = 2075;BA.debugLine="L_LIN_TICK.Text = LPT"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_l_lin_tick" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(true,"_lpt" /*RemoteObject*/ ))); - BA.debugLineNum = 2076;BA.debugLine="If l_monto_ks.Text <> \"0\" Then"; -Debug.ShouldStop(134217728); -if (RemoteObject.solveBoolean("!",__ref.getField(false,"_l_monto_ks" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString("0"))) { - BA.debugLineNum = 2078;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"Select COU"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("Select COUNT(DISTINCT(PE_CLIENTE)) AS CUANTOS FROM PEDIDO WHERE PE_CEDIS = ? ")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {__ref.getField(true,"_almacen" /*RemoteObject*/ )})))); - BA.debugLineNum = 2079;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 2080;BA.debugLine="L_CTE_PROMO.Text = c.GetString(\"CUANTOS\")"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_l_cte_promo" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS"))))); - BA.debugLineNum = 2081;BA.debugLine="c.Close"; -Debug.ShouldStop(1); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 2082;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery2(\"Select sum("; -Debug.ShouldStop(2); -__ref.getField(false,"_d" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("Select sum(PE_COSTO_TOT) AS MONTO_DIA FROM PEDIDO WHERE PE_PROID IN (select CAT_GP_ID from cat_gunaprod where CAT_GP_TIPOPROD = ?) ")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("PRIORITARIO")})))); - BA.debugLineNum = 2083;BA.debugLine="d.Position = 0"; -Debug.ShouldStop(4); -__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 2090;BA.debugLine="Log(\"|\"&d.GetString(\"MONTO_DIA\")&\"|\")"; -Debug.ShouldStop(512); -c_principal.__c.runVoidMethod ("LogImpl","34325483",RemoteObject.concat(RemoteObject.createImmutable("|"),__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("MONTO_DIA"))),RemoteObject.createImmutable("|")),0); - BA.debugLineNum = 2092;BA.debugLine="L_PRIO.Text = d.GetString(\"MONTO_DIA\")"; -Debug.ShouldStop(2048); -__ref.getField(false,"_l_prio" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("MONTO_DIA"))))); - BA.debugLineNum = 2093;BA.debugLine="d.Close"; -Debug.ShouldStop(4096); -__ref.getField(false,"_d" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 2095;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery2(\"Select sum("; -Debug.ShouldStop(16384); -__ref.getField(false,"_d" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("Select sum(PE_COSTO_TOT) AS MONTO_DIA FROM PEDIDO WHERE PE_PROID IN (select CAT_GP_ID from cat_gunaprod where CAT_GP_TIPOPROD = ?) ")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("ESTRATEGICO")})))); - BA.debugLineNum = 2096;BA.debugLine="d.Position = 0"; -Debug.ShouldStop(32768); -__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 2097;BA.debugLine="L_SECUND.Text =d.GetString(\"MONTO_DIA\")"; -Debug.ShouldStop(65536); -__ref.getField(false,"_l_secund" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("MONTO_DIA"))))); - BA.debugLineNum = 2098;BA.debugLine="d.Close"; -Debug.ShouldStop(131072); -__ref.getField(false,"_d" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 2100;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery2(\"Select sum("; -Debug.ShouldStop(524288); -__ref.getField(false,"_d" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("Select sum(PE_COSTO_TOT) AS MONTO_DIA FROM PEDIDO WHERE PE_PROID IN (select CAT_GP_ID from cat_gunaprod where CAT_GP_TIPOPROD = ?) ")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("COMPLEMENTARIO")})))); - BA.debugLineNum = 2101;BA.debugLine="d.Position = 0"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 2102;BA.debugLine="L_COMP.Text =d.GetString(\"MONTO_DIA\")"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_l_comp" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("MONTO_DIA"))))); - BA.debugLineNum = 2103;BA.debugLine="d.Close"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_d" /*RemoteObject*/ ).runVoidMethod ("Close"); - }else { - BA.debugLineNum = 2105;BA.debugLine="L_PRIO.Text = \"0\""; -Debug.ShouldStop(16777216); -__ref.getField(false,"_l_prio" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("0")); - BA.debugLineNum = 2106;BA.debugLine="L_SECUND.Text = \"0\""; -Debug.ShouldStop(33554432); -__ref.getField(false,"_l_secund" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("0")); - BA.debugLineNum = 2107;BA.debugLine="L_COMP.Text = \"0\""; -Debug.ShouldStop(67108864); -__ref.getField(false,"_l_comp" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("0")); - }; - BA.debugLineNum = 2110;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select COUNT"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select COUNT(*) AS CUANTOS FROM PEDIDO WHERE PE_CEDIS = PE_PROID ")))); - BA.debugLineNum = 2111;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 2112;BA.debugLine="If c.GetString(\"CUANTOS\") > 0 Then"; -Debug.ShouldStop(-2147483648); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 2113;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"Select sum("; -Debug.ShouldStop(1); -__ref.getField(false,"_d" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select sum(pe_cant) AS CUANTOS FROM PEDIDO WHERE PE_CEDIS = PE_PROID ")))); - BA.debugLineNum = 2114;BA.debugLine="d.Position = 0"; -Debug.ShouldStop(2); -__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 2115;BA.debugLine="L_CTE_PROMO.Text = d.GetString(\"CUANTOS\")"; -Debug.ShouldStop(4); -__ref.getField(false,"_l_cte_promo" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS"))))); - BA.debugLineNum = 2116;BA.debugLine="d.Close"; -Debug.ShouldStop(8); -__ref.getField(false,"_d" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 2117;BA.debugLine="L_REDEN_PROMO.TEXT = Round2(L_VISITCC.Text / L_C"; -Debug.ShouldStop(16); -__ref.getField(false,"_l_reden_promo" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(c_principal.__c.runMethod(true,"Round2",(Object)(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_l_visitcc" /*RemoteObject*/ ).runMethod(true,"getText")),BA.numberCast(double.class, __ref.getField(false,"_l_cte_promo" /*RemoteObject*/ ).runMethod(true,"getText"))}, "/",0, 0)),(Object)(BA.numberCast(int.class, 2))))); - }else { - BA.debugLineNum = 2119;BA.debugLine="L_CTE_PROMO.Text = 0"; -Debug.ShouldStop(64); -__ref.getField(false,"_l_cte_promo" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(0)); - BA.debugLineNum = 2120;BA.debugLine="L_REDEN_PROMO.Text = 0"; -Debug.ShouldStop(128); -__ref.getField(false,"_l_reden_promo" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(0)); - }; - BA.debugLineNum = 2122;BA.debugLine="c.Close"; -Debug.ShouldStop(512); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 2123;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"Select COUNT"; -Debug.ShouldStop(1024); -__ref.getField(false,"_d" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select COUNT(*) AS CUANTOS FROM PEDIDO ")))); - BA.debugLineNum = 2124;BA.debugLine="d.Position = 0"; -Debug.ShouldStop(2048); -__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 2125;BA.debugLine="L_LIN_TICK.Text = Round2(d.GetString(\"CUANTOS\") /"; -Debug.ShouldStop(4096); -__ref.getField(false,"_l_lin_tick" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(c_principal.__c.runMethod(true,"Round2",(Object)(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))),BA.numberCast(double.class, __ref.getField(false,"_l_visitcc" /*RemoteObject*/ ).runMethod(true,"getText"))}, "/",0, 0)),(Object)(BA.numberCast(int.class, 2))))); - BA.debugLineNum = 2126;BA.debugLine="d.Close"; -Debug.ShouldStop(8192); -__ref.getField(false,"_d" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 2128;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"Select count"; -Debug.ShouldStop(32768); -__ref.getField(false,"_d" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select count(*) as CUANTOS from HIST_CUOTAS ")))); - BA.debugLineNum = 2129;BA.debugLine="d.Position = 0"; -Debug.ShouldStop(65536); -__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 2130;BA.debugLine="If d.GetString(\"CUANTOS\") > 0 Then"; -Debug.ShouldStop(131072); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))),BA.numberCast(double.class, 0))) { - }else { - BA.debugLineNum = 2138;BA.debugLine="l_monto_c1.Text = 4000"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_l_monto_c1" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(4000)); - BA.debugLineNum = 2139;BA.debugLine="l_monto_c2.Text = 2000"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_l_monto_c2" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(2000)); - BA.debugLineNum = 2140;BA.debugLine="l_monto_c3.Text = 1000"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_l_monto_c3" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(1000)); - }; - BA.debugLineNum = 2142;BA.debugLine="d.Close"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_d" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 2143;BA.debugLine="End Sub"; -Debug.ShouldStop(1073741824); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _resumen_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Resumen_Click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,1964); -if (RapidSub.canDelegate("resumen_click")) { return __ref.runUserSub(false, "c_principal","resumen_click", __ref);} - BA.debugLineNum = 1964;BA.debugLine="Sub Resumen_Click"; -Debug.ShouldStop(2048); - BA.debugLineNum = 1965;BA.debugLine="P_RESUMEN.Visible = True"; -Debug.ShouldStop(4096); -__ref.getField(false,"_p_resumen" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 1973;BA.debugLine="End Sub"; -Debug.ShouldStop(1048576); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _subir_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Subir_Click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,484); -if (RapidSub.canDelegate("subir_click")) { return __ref.runUserSub(false, "c_principal","subir_click", __ref);} -int _i = 0; -RemoteObject _h = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"); -RemoteObject _eventob = RemoteObject.createImmutable(""); -RemoteObject _clienteb = RemoteObject.createImmutable(""); -RemoteObject _finb = RemoteObject.createImmutable(""); -RemoteObject _nombrecliente = RemoteObject.createImmutable(""); -RemoteObject _eventov = RemoteObject.createImmutable(""); -RemoteObject _clientev = RemoteObject.createImmutable(""); -RemoteObject _nombreclientev = RemoteObject.createImmutable(""); - BA.debugLineNum = 484;BA.debugLine="Sub Subir_Click"; -Debug.ShouldStop(8); - BA.debugLineNum = 485;BA.debugLine="CARGA = \"SUBIR\""; -Debug.ShouldStop(16); -__ref.setField ("_carga" /*RemoteObject*/ ,BA.ObjectToString("SUBIR")); - BA.debugLineNum = 486;BA.debugLine="p_mandaInfo.Width = Root.Width"; -Debug.ShouldStop(32); -__ref.getField(false,"_p_mandainfo" /*RemoteObject*/ ).runMethod(true,"setWidth",__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth")); - BA.debugLineNum = 487;BA.debugLine="p_mandaInfo.Height = Root.Height"; -Debug.ShouldStop(64); -__ref.getField(false,"_p_mandainfo" /*RemoteObject*/ ).runMethod(true,"setHeight",__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getHeight")); - BA.debugLineNum = 488;BA.debugLine="P1.Visible = True"; -Debug.ShouldStop(128); -__ref.getField(false,"_p1" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 489;BA.debugLine="P1.Left = (p_mandaInfo.Width/2) - (P1.Width/2)"; -Debug.ShouldStop(256); -__ref.getField(false,"_p1" /*RemoteObject*/ ).runMethod(true,"setLeft",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_p_mandainfo" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0)),(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_p1" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0))}, "-",1, 0))); - BA.debugLineNum = 490;BA.debugLine="P1.top = (p_mandaInfo.Height/2) - (P1.Height/2)"; -Debug.ShouldStop(512); -__ref.getField(false,"_p1" /*RemoteObject*/ ).runMethod(true,"setTop",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_p_mandainfo" /*RemoteObject*/ ).runMethod(true,"getHeight"),RemoteObject.createImmutable(2)}, "/",0, 0)),(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_p1" /*RemoteObject*/ ).runMethod(true,"getHeight"),RemoteObject.createImmutable(2)}, "/",0, 0))}, "-",1, 0))); - BA.debugLineNum = 491;BA.debugLine="p_mandaInfo.Visible = True"; -Debug.ShouldStop(1024); -__ref.getField(false,"_p_mandainfo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 492;BA.debugLine="P1.BringToFront"; -Debug.ShouldStop(2048); -__ref.getField(false,"_p1" /*RemoteObject*/ ).runVoidMethod ("BringToFront"); - BA.debugLineNum = 493;BA.debugLine="p_mandaInfo.BringToFront"; -Debug.ShouldStop(4096); -__ref.getField(false,"_p_mandainfo" /*RemoteObject*/ ).runVoidMethod ("BringToFront"); - BA.debugLineNum = 495;BA.debugLine="NUEVO.Visible =False"; -Debug.ShouldStop(16384); -__ref.getField(false,"_nuevo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 496;BA.debugLine="BUSCA.Visible=False"; -Debug.ShouldStop(32768); -__ref.getField(false,"_busca" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 497;BA.debugLine="connecta.Visible=False"; -Debug.ShouldStop(65536); -__ref.getField(false,"_connecta" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 498;BA.debugLine="Subir.Visible=False"; -Debug.ShouldStop(131072); -__ref.getField(false,"_subir" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 499;BA.debugLine="cargar.Visible=False"; -Debug.ShouldStop(262144); -__ref.getField(false,"_cargar" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 500;BA.debugLine="L_P_1.Visible = False"; -Debug.ShouldStop(524288); -__ref.getField(false,"_l_p_1" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 501;BA.debugLine="S_CC.Visible = False"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_s_cc" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 502;BA.debugLine="L_P_3.Visible = False"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_l_p_3" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 503;BA.debugLine="S_CH.Visible = False"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_s_ch" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 504;BA.debugLine="PB1.Visible = False"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_pb1" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 505;BA.debugLine="Resumen.Visible= False"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_resumen" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 507;BA.debugLine="L_P_2.Text = \"Envio de Pedidos\""; -Debug.ShouldStop(67108864); -__ref.getField(false,"_l_p_2" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("Envio de Pedidos")); - BA.debugLineNum = 508;BA.debugLine="L_P_3.Text = \"Envio de Pedidos\""; -Debug.ShouldStop(134217728); -__ref.getField(false,"_l_p_3" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("Envio de Pedidos")); - BA.debugLineNum = 509;BA.debugLine="S_CH.Text = \"EN PROCESO\""; -Debug.ShouldStop(268435456); -__ref.getField(false,"_s_ch" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("EN PROCESO")); - BA.debugLineNum = 510;BA.debugLine="S_CP.Text = \"EN PROCESO\""; -Debug.ShouldStop(536870912); -__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("EN PROCESO")); - BA.debugLineNum = 511;BA.debugLine="PB1.Progress = 0"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_pb1" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 0)); - BA.debugLineNum = 512;BA.debugLine="PB2.Progress = 0"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"setProgress",BA.numberCast(int.class, 0)); - BA.debugLineNum = 518;BA.debugLine="PASO = 1"; -Debug.ShouldStop(32); -__ref.setField ("_paso" /*RemoteObject*/ ,BA.NumberToString(1)); - BA.debugLineNum = 520;BA.debugLine="If PASO =1 Then"; -Debug.ShouldStop(128); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_paso" /*RemoteObject*/ ),BA.NumberToString(1))) { - BA.debugLineNum = 521;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete fro"; -Debug.ShouldStop(256); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("delete from PEDIDO WHERE PE_PRONOMBRE = ? ")),(Object)(c_principal.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(RemoteObject.createImmutable("N/A"))}))))); - BA.debugLineNum = 522;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(512); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido_cliente where PC_CLIENTE not In (select PE_CLIENTE from pedido)"))); - BA.debugLineNum = 523;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select usuar"; -Debug.ShouldStop(1024); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select usuario from usuarioa")))); - BA.debugLineNum = 524;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(2048); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 525;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(4096); -__ref.setField ("_usuario" /*RemoteObject*/ ,__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")))); - BA.debugLineNum = 526;BA.debugLine="c.Close"; -Debug.ShouldStop(8192); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 527;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select HGDAT"; -Debug.ShouldStop(16384); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select HGDATE, HGLAT, HGLON from HIST_GPS")))); - BA.debugLineNum = 528;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(32768); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 529;BA.debugLine="For i=0 To c.RowCount -1"; -Debug.ShouldStop(65536); -{ -final int step37 = 1; -final int limit37 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step37 > 0 && _i <= limit37) || (step37 < 0 && _i >= limit37) ;_i = ((int)(0 + _i + step37)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 530;BA.debugLine="c.Position=i"; -Debug.ShouldStop(131072); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 531;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(262144); -c_principal._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",c_principal._cmd); - BA.debugLineNum = 532;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(524288); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 533;BA.debugLine="cmd.Name = \"UPDATE_MEDI_ACTUAL2_GPS\""; -Debug.ShouldStop(1048576); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("UPDATE_MEDI_ACTUAL2_GPS")); - BA.debugLineNum = 534;BA.debugLine="cmd.Parameters = Array As Object(L_MONTOD.Text"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {12},new Object[] {(__ref.getField(false,"_l_montod" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_cuantost" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_cuantosc" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_porvisitar" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("hglat")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("hglon")))),(__ref.getField(false,"_batterystatus" /*RemoteObject*/ ).getArrayElement(true,BA.numberCast(int.class, 0))),(__ref.getField(true,"_lpt" /*RemoteObject*/ )),(__ref.getField(true,"_steyin" /*RemoteObject*/ )),(__ref.getField(true,"_steyout" /*RemoteObject*/ )),(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(__ref.getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"getText"))})); - BA.debugLineNum = 535;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; -Debug.ShouldStop(4194304); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)((RemoteObject.createImmutable("update_gps")))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 538;BA.debugLine="c.Close"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 541;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT PC_CL"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("SELECT PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT, PC_COSTO_SIN, PC_RUTA, PC_ALMACEN, PC_FACTURA FROM PEDIDO_CLIENTE ")))); - BA.debugLineNum = 542;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"SELECT COUNT"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_d" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("SELECT COUNT(*) as CUANTOS_PEDIDOSC FROM PEDIDO_CLIENTE ")))); - BA.debugLineNum = 543;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(1073741824); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 544;BA.debugLine="For i=0 To c.RowCount -1"; -Debug.ShouldStop(-2147483648); -{ -final int step50 = 1; -final int limit50 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step50 > 0 && _i <= limit50) || (step50 < 0 && _i >= limit50) ;_i = ((int)(0 + _i + step50)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 545;BA.debugLine="c.Position=i"; -Debug.ShouldStop(1); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 546;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(2); -c_principal._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",c_principal._cmd); - BA.debugLineNum = 547;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(4); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 548;BA.debugLine="cmd.Name = \"insert_pedidos_MEDI\""; -Debug.ShouldStop(8); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("insert_pedidos_MEDI")); - BA.debugLineNum = 549;BA.debugLine="cmd.Parameters = Array As Object(c.GetString(\""; -Debug.ShouldStop(16); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {11},new Object[] {(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_CLIENTE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_FECHA")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_USER")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_NOART")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_MONTO")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_LON")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_LAT")))),(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(__ref.getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_COSTO_SIN")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_FACTURA"))))})); - BA.debugLineNum = 550;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; -Debug.ShouldStop(32); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)((RemoteObject.createImmutable("ins_pedidos")))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 553;BA.debugLine="c.Close"; -Debug.ShouldStop(256); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 554;BA.debugLine="d.Position=0"; -Debug.ShouldStop(512); -__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 555;BA.debugLine="cuantos_pedidosc = D.GetString(\"CUANTOS_PEDIDOSC"; -Debug.ShouldStop(1024); -__ref.setField ("_cuantos_pedidosc" /*RemoteObject*/ ,__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS_PEDIDOSC")))); - BA.debugLineNum = 556;BA.debugLine="d.Close"; -Debug.ShouldStop(2048); -__ref.getField(false,"_d" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 562;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT CODIG"; -Debug.ShouldStop(131072); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("SELECT CODIGOKMTS, CODIGOB, LAT, LON FROM HIST_CODIGO_BARRAS")))); - BA.debugLineNum = 563;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(262144); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 564;BA.debugLine="For i=0 To c.RowCount -1"; -Debug.ShouldStop(524288); -{ -final int step65 = 1; -final int limit65 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step65 > 0 && _i <= limit65) || (step65 < 0 && _i >= limit65) ;_i = ((int)(0 + _i + step65)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 565;BA.debugLine="c.Position=i"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 566;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(2097152); -c_principal._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",c_principal._cmd); - BA.debugLineNum = 567;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 568;BA.debugLine="cmd.Name = \"insert_QR_2_MEDI\""; -Debug.ShouldStop(8388608); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("insert_QR_2_MEDI")); - BA.debugLineNum = 569;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\""; -Debug.ShouldStop(16777216); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {6},new Object[] {(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CODIGOKMTS")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CODIGOB")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("LON")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("LAT")))),(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(__ref.getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"getText"))})); - BA.debugLineNum = 570;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; -Debug.ShouldStop(33554432); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)((RemoteObject.createImmutable("ins_QR")))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 573;BA.debugLine="c.Close"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 577;BA.debugLine="Private h As ResultSet = B4XPages.MainPage.skmt."; -Debug.ShouldStop(1); -_h = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"); -_h = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"), c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)((RemoteObject.createImmutable("select * from bitacoraGPS")))));Debug.locals.put("h", _h);Debug.locals.put("h", _h); - BA.debugLineNum = 578;BA.debugLine="Do While h.nextrow"; -Debug.ShouldStop(2); -while (_h.runMethod(true,"NextRow").get().booleanValue()) { - BA.debugLineNum = 579;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(4); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 580;BA.debugLine="Private eventob As String = h.GetString(\"evento"; -Debug.ShouldStop(8); -_eventob = _h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("eventob")));Debug.locals.put("eventob", _eventob);Debug.locals.put("eventob", _eventob); - BA.debugLineNum = 581;BA.debugLine="cmd.Name = \"mandaBitacora_MEDICOMED\""; -Debug.ShouldStop(16); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("mandaBitacora_MEDICOMED")); - BA.debugLineNum = 582;BA.debugLine="Log(\"BITACORA3\")"; -Debug.ShouldStop(32); -c_principal.__c.runVoidMethod ("LogImpl","33276898",RemoteObject.createImmutable("BITACORA3"),0); - BA.debugLineNum = 583;BA.debugLine="Private clienteb As String = h.GetString(\"clien"; -Debug.ShouldStop(64); -_clienteb = _h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("clienteb")));Debug.locals.put("clienteb", _clienteb);Debug.locals.put("clienteb", _clienteb); - BA.debugLineNum = 584;BA.debugLine="Private finb As String = h.GetString(\"finb\")"; -Debug.ShouldStop(128); -_finb = _h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("finb")));Debug.locals.put("finb", _finb);Debug.locals.put("finb", _finb); - BA.debugLineNum = 585;BA.debugLine="Private nombreCliente As String =Subs. traeNomb"; -Debug.ShouldStop(256); -_nombrecliente = c_principal._subs.runMethod(true,"_traenombrecliente" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(_h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("clienteb")))));Debug.locals.put("nombreCliente", _nombrecliente);Debug.locals.put("nombreCliente", _nombrecliente); - BA.debugLineNum = 586;BA.debugLine="If eventob = \"Llega a almacen\" Then"; -Debug.ShouldStop(512); -if (RemoteObject.solveBoolean("=",_eventob,BA.ObjectToString("Llega a almacen"))) { - BA.debugLineNum = 587;BA.debugLine="nombreCliente = \"BOLETA\""; -Debug.ShouldStop(1024); -_nombrecliente = BA.ObjectToString("BOLETA");Debug.locals.put("nombreCliente", _nombrecliente); - BA.debugLineNum = 588;BA.debugLine="clienteb = \"\""; -Debug.ShouldStop(2048); -_clienteb = BA.ObjectToString("");Debug.locals.put("clienteb", _clienteb); - BA.debugLineNum = 589;BA.debugLine="finb = h.GetString(\"iniciob\")"; -Debug.ShouldStop(4096); -_finb = _h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("iniciob")));Debug.locals.put("finb", _finb); - }; - BA.debugLineNum = 591;BA.debugLine="If eventob = \"Salida almacen\" Then nombreClient"; -Debug.ShouldStop(16384); -if (RemoteObject.solveBoolean("=",_eventob,BA.ObjectToString("Salida almacen"))) { -_nombrecliente = BA.ObjectToString("CHECKLIST");Debug.locals.put("nombreCliente", _nombrecliente);}; - BA.debugLineNum = 592;BA.debugLine="If eventob = \"Fin Día\" Then nombreCliente = \"FI"; -Debug.ShouldStop(32768); -if (RemoteObject.solveBoolean("=",_eventob,BA.ObjectToString("Fin Día"))) { -_nombrecliente = BA.ObjectToString("FIN DIA");Debug.locals.put("nombreCliente", _nombrecliente);}; - BA.debugLineNum = 593;BA.debugLine="If eventob = \"Carga día\" Then nombreCliente = \""; -Debug.ShouldStop(65536); -if (RemoteObject.solveBoolean("=",_eventob,BA.ObjectToString("Carga día"))) { -_nombrecliente = BA.ObjectToString("CARGA DIA");Debug.locals.put("nombreCliente", _nombrecliente);}; - BA.debugLineNum = 596;BA.debugLine="cmd.Parameters = Array As Object(h.GetString(\"a"; -Debug.ShouldStop(524288); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {14},new Object[] {(_h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("almacenb")))),(_h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("usuariob")))),(_h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("rutab")))),(_eventob),(_clienteb),(_nombrecliente),(_h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("iniciob")))),(_finb),(_h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("latitudb")))),(_h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("longitudb")))),(_h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("precision")))),(_h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("motivonoventa")))),(_h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("motivonovisita")))),(_h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("fechab"))))})); - BA.debugLineNum = 597;BA.debugLine="reqManager.ExecuteCommand(cmd , \"mandaBitacora\""; -Debug.ShouldStop(1048576); -__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)((RemoteObject.createImmutable("mandaBitacora")))); - } -; - BA.debugLineNum = 599;BA.debugLine="Log(\"MANDAMOS BITACORA\")"; -Debug.ShouldStop(4194304); -c_principal.__c.runVoidMethod ("LogImpl","33276915",RemoteObject.createImmutable("MANDAMOS BITACORA"),0); - BA.debugLineNum = 604;BA.debugLine="Private h As ResultSet = B4XPages.MainPage.skmt."; -Debug.ShouldStop(134217728); -_h = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"); -_h = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"), c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)((RemoteObject.createImmutable("select * from VENTA_No_VENTA")))));Debug.locals.put("h", _h);Debug.locals.put("h", _h); - BA.debugLineNum = 605;BA.debugLine="Do While h.nextrow"; -Debug.ShouldStop(268435456); -while (_h.runMethod(true,"NextRow").get().booleanValue()) { - BA.debugLineNum = 606;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 607;BA.debugLine="Private eventov As String = h.GetString(\"evento"; -Debug.ShouldStop(1073741824); -_eventov = _h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("eventov")));Debug.locals.put("eventov", _eventov);Debug.locals.put("eventov", _eventov); - BA.debugLineNum = 608;BA.debugLine="cmd.Name = \"insert_venta_no_venta_MEDICOMED\""; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("insert_venta_no_venta_MEDICOMED")); - BA.debugLineNum = 609;BA.debugLine="Private clientev As String = h.GetString(\"clien"; -Debug.ShouldStop(1); -_clientev = _h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("clientev")));Debug.locals.put("clientev", _clientev);Debug.locals.put("clientev", _clientev); - BA.debugLineNum = 610;BA.debugLine="Private nombreClientev As String =Subs. traeNom"; -Debug.ShouldStop(2); -_nombreclientev = c_principal._subs.runMethod(true,"_traenombrecliente" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(_h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("clientev")))));Debug.locals.put("nombreClientev", _nombreclientev);Debug.locals.put("nombreClientev", _nombreclientev); - BA.debugLineNum = 611;BA.debugLine="If eventov = \"Llega a almacen\" Then"; -Debug.ShouldStop(4); -if (RemoteObject.solveBoolean("=",_eventov,BA.ObjectToString("Llega a almacen"))) { - BA.debugLineNum = 612;BA.debugLine="nombreClientev = \"BOLETA\""; -Debug.ShouldStop(8); -_nombreclientev = BA.ObjectToString("BOLETA");Debug.locals.put("nombreClientev", _nombreclientev); - BA.debugLineNum = 613;BA.debugLine="clientev = \"\""; -Debug.ShouldStop(16); -_clientev = BA.ObjectToString("");Debug.locals.put("clientev", _clientev); - }; - BA.debugLineNum = 615;BA.debugLine="If eventov = \"Salida almacen\" Then nombreClient"; -Debug.ShouldStop(64); -if (RemoteObject.solveBoolean("=",_eventov,BA.ObjectToString("Salida almacen"))) { -_nombreclientev = BA.ObjectToString("CHECKLIST");Debug.locals.put("nombreClientev", _nombreclientev);}; - BA.debugLineNum = 616;BA.debugLine="If eventov = \"Fin Día\" Then nombreClientev = \"F"; -Debug.ShouldStop(128); -if (RemoteObject.solveBoolean("=",_eventov,BA.ObjectToString("Fin Día"))) { -_nombreclientev = BA.ObjectToString("FIN DIA");Debug.locals.put("nombreClientev", _nombreclientev);}; - BA.debugLineNum = 617;BA.debugLine="If eventov = \"Carga día\" Then nombreClientev ="; -Debug.ShouldStop(256); -if (RemoteObject.solveBoolean("=",_eventov,BA.ObjectToString("Carga día"))) { -_nombreclientev = BA.ObjectToString("CARGA DIA");Debug.locals.put("nombreClientev", _nombreclientev);}; - BA.debugLineNum = 618;BA.debugLine="cmd.Parameters = Array As Object(h.GetString(\"u"; -Debug.ShouldStop(512); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {10},new Object[] {(_h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("usuariov")))),(_h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("almacenv")))),(_h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("rutav")))),(_eventov),(_clientev),(_h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("iniciov")))),(_finb),(_h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("latitudv")))),(_h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("longitudv")))),(_nombreclientev)})); - BA.debugLineNum = 619;BA.debugLine="reqManager.ExecuteCommand(cmd , \"ventaNoVenta\")"; -Debug.ShouldStop(1024); -__ref.getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)((RemoteObject.createImmutable("ventaNoVenta")))); - } -; - BA.debugLineNum = 640;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT HE_C"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("SELECT HE_CLIE, HE_RES, HE_FECHA, HE_TIPO FROM HIST_ENCUESTA")))); - BA.debugLineNum = 641;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(1); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 642;BA.debugLine="For i=0 To c.RowCount -1"; -Debug.ShouldStop(2); -{ -final int step115 = 1; -final int limit115 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step115 > 0 && _i <= limit115) || (step115 < 0 && _i >= limit115) ;_i = ((int)(0 + _i + step115)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 643;BA.debugLine="c.Position=i"; -Debug.ShouldStop(4); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 644;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(8); -c_principal._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",c_principal._cmd); - BA.debugLineNum = 645;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(16); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 646;BA.debugLine="cmd.Name = \"insert_encuesta_MARDS\""; -Debug.ShouldStop(32); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("insert_encuesta_MARDS")); - BA.debugLineNum = 647;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\""; -Debug.ShouldStop(64); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {4},new Object[] {(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HE_CLIE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HE_RES")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HE_FECHA")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HE_TIPO"))))})); - BA.debugLineNum = 648;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; -Debug.ShouldStop(128); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)((RemoteObject.createImmutable("inst_noventa")))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 651;BA.debugLine="c.Close"; -Debug.ShouldStop(1024); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 653;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT PE_CE"; -Debug.ShouldStop(4096); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("SELECT PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO, PE_COSTO_SIN, PE_RUTA, PE_DESC, PE_FOLIO FROM PEDIDO")))); - BA.debugLineNum = 654;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"SELECT COUNT"; -Debug.ShouldStop(8192); -__ref.getField(false,"_d" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("SELECT COUNT(*) as CUANTOS_PEDIDO FROM PEDIDO")))); - BA.debugLineNum = 655;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(16384); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 656;BA.debugLine="For i=0 To c.RowCount -1"; -Debug.ShouldStop(32768); -{ -final int step128 = 1; -final int limit128 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step128 > 0 && _i <= limit128) || (step128 < 0 && _i >= limit128) ;_i = ((int)(0 + _i + step128)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 657;BA.debugLine="c.Position=i"; -Debug.ShouldStop(65536); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 658;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(131072); -c_principal._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",c_principal._cmd); - BA.debugLineNum = 659;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(262144); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 660;BA.debugLine="cmd.Name = \"insert_pedido_MEDI\""; -Debug.ShouldStop(524288); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("insert_pedido_MEDI")); - BA.debugLineNum = 661;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\""; -Debug.ShouldStop(1048576); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {14},new Object[] {(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CEDIS")))),(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_COSTO_TOT")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_COSTOU")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CANT")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_PRONOMBRE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_PROID")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CLIENTE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_FECHA")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_USUARIO")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_RUTA")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_COSTO_SIN")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_DESC")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_FOLIO"))))})); - BA.debugLineNum = 662;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; -Debug.ShouldStop(2097152); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)((RemoteObject.createImmutable("ins_pedido")))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 665;BA.debugLine="c.Close"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 666;BA.debugLine="d.Position=0"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 667;BA.debugLine="cuantos_pedido = D.GetString(\"CUANTOS_PEDIDO\")"; -Debug.ShouldStop(67108864); -__ref.setField ("_cuantos_pedido" /*RemoteObject*/ ,__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS_PEDIDO")))); - BA.debugLineNum = 668;BA.debugLine="d.Close"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_d" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 671;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT NV_C"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("SELECT NV_CLIENTE,NV_FECHA,NV_USER,NV_MOTIVO,NV_COMM,NV_LAT,NV_LON, NV_NOMBRE, NV_DIRECCION FROM NOVENTA")))); - BA.debugLineNum = 672;BA.debugLine="D=B4XPages.MainPage.skmt.ExecQuery(\"SELECT COUN"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_d" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("SELECT COUNT(*) AS CUANTOS_NOVENTA FROM NOVENTA")))); - BA.debugLineNum = 673;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(1); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 674;BA.debugLine="For i=0 To c.RowCount -1"; -Debug.ShouldStop(2); -{ -final int step144 = 1; -final int limit144 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step144 > 0 && _i <= limit144) || (step144 < 0 && _i >= limit144) ;_i = ((int)(0 + _i + step144)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 675;BA.debugLine="c.Position=i"; -Debug.ShouldStop(4); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 676;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(8); -c_principal._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",c_principal._cmd); - BA.debugLineNum = 677;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(16); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 678;BA.debugLine="cmd.Name = \"insert_noventa_MEDI\""; -Debug.ShouldStop(32); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("insert_noventa_MEDI")); - BA.debugLineNum = 679;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\""; -Debug.ShouldStop(64); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {11},new Object[] {(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_CLIENTE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_FECHA")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_USER")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_MOTIVO")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_COMM")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_LAT")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_LON")))),(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(__ref.getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_NOMBRE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("NV_DIRECCION"))))})); - BA.debugLineNum = 680;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; -Debug.ShouldStop(128); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)((RemoteObject.createImmutable("inst_noventa")))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 683;BA.debugLine="c.Close"; -Debug.ShouldStop(1024); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 684;BA.debugLine="d.Position=0"; -Debug.ShouldStop(2048); -__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 685;BA.debugLine="cuantos_noventa = D.GetString(\"CUANTOS_NOVENTA\")"; -Debug.ShouldStop(4096); -__ref.setField ("_cuantos_noventa" /*RemoteObject*/ ,__ref.getField(false,"_d" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS_NOVENTA")))); - BA.debugLineNum = 686;BA.debugLine="d.Close"; -Debug.ShouldStop(8192); -__ref.getField(false,"_d" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 691;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT CN_I"; -Debug.ShouldStop(262144); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("SELECT CN_ID, CN_FECHA , CN_USER, CN_LAT, CN_LON, CN_NOMBRE, CN_DIRECCION, COLONIA, CP, CN_ALMACEN, CN_RUTA FROM CLIENTES_NUEVOS")))); - BA.debugLineNum = 692;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(524288); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 693;BA.debugLine="For i = 0 To c.RowCount - 1"; -Debug.ShouldStop(1048576); -{ -final int step159 = 1; -final int limit159 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step159 > 0 && _i <= limit159) || (step159 < 0 && _i >= limit159) ;_i = ((int)(0 + _i + step159)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 694;BA.debugLine="c.Position = i"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 696;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(8388608); -c_principal._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",c_principal._cmd); - BA.debugLineNum = 697;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 698;BA.debugLine="cmd.Name = \"insert_clientesnuevos_MEDI\""; -Debug.ShouldStop(33554432); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("insert_clientesnuevos_MEDI")); - BA.debugLineNum = 699;BA.debugLine="cmd.Parameters = Array As Object(c.GetString(\""; -Debug.ShouldStop(67108864); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {11},new Object[] {(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CN_ID")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CN_FECHA")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CN_USER")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CN_LAT")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CN_LON")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CN_NOMBRE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CN_DIRECCION")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("COLONIA")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CP")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CN_ALMACEN")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CN_RUTA"))))})); - BA.debugLineNum = 700;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; -Debug.ShouldStop(134217728); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)((RemoteObject.createImmutable("inst_clientesn")))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 703;BA.debugLine="c.Close"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 707;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select HGCLI"; -Debug.ShouldStop(4); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select HGCLIENTE, HGDATE, HGLAT, HGLON from HIST_GEOCERCA")))); - BA.debugLineNum = 708;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(8); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 709;BA.debugLine="For i=0 To c.RowCount -1"; -Debug.ShouldStop(16); -{ -final int step171 = 1; -final int limit171 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step171 > 0 && _i <= limit171) || (step171 < 0 && _i >= limit171) ;_i = ((int)(0 + _i + step171)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 710;BA.debugLine="c.Position=i"; -Debug.ShouldStop(32); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 711;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(64); -c_principal._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",c_principal._cmd); - BA.debugLineNum = 712;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(128); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 713;BA.debugLine="cmd.Name = \"insert_geocerca_MEDI\""; -Debug.ShouldStop(256); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("insert_geocerca_MEDI")); - BA.debugLineNum = 714;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\""; -Debug.ShouldStop(512); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {4},new Object[] {(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HGCLIENTE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HGDATE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HGLAT")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HGLON"))))})); - BA.debugLineNum = 715;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; -Debug.ShouldStop(1024); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)((RemoteObject.createImmutable("inst_noventa")))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 718;BA.debugLine="c.Close"; -Debug.ShouldStop(8192); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 722;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select HFCLI"; -Debug.ShouldStop(131072); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select HFCLIENTE, HFALIAS,HFRUTA,HFALMACEN from HIST_FACE")))); - BA.debugLineNum = 723;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(262144); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 724;BA.debugLine="For i=0 To c.RowCount -1"; -Debug.ShouldStop(524288); -{ -final int step183 = 1; -final int limit183 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step183 > 0 && _i <= limit183) || (step183 < 0 && _i >= limit183) ;_i = ((int)(0 + _i + step183)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 725;BA.debugLine="c.Position=i"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 726;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(2097152); -c_principal._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",c_principal._cmd); - BA.debugLineNum = 727;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 728;BA.debugLine="cmd.Name = \"insert_face_like_MEDI\""; -Debug.ShouldStop(8388608); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("insert_face_like_MEDI")); - BA.debugLineNum = 729;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\""; -Debug.ShouldStop(16777216); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {4},new Object[] {(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HFCLIENTE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HFALIAS")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HFRUTA")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("HFALMACEN"))))})); - BA.debugLineNum = 730;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; -Debug.ShouldStop(33554432); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)((RemoteObject.createImmutable("inst_noventa")))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 760;BA.debugLine="t1.Initialize(\"T1\", 30000) ' 1000 = 1 second"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_t1" /*RemoteObject*/ ).runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(BA.ObjectToString("T1")),(Object)(BA.numberCast(long.class, 30000))); - BA.debugLineNum = 761;BA.debugLine="t1.Enabled = True"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_t1" /*RemoteObject*/ ).runMethod(true,"setEnabled",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 762;BA.debugLine="Dim sDate,sTime As String"; -Debug.ShouldStop(33554432); -c_principal._sdate = RemoteObject.createImmutable("");__ref.setField("_sdate",c_principal._sdate); -c_principal._stime = RemoteObject.createImmutable("");__ref.setField("_stime",c_principal._stime); - BA.debugLineNum = 763;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; -Debug.ShouldStop(67108864); -c_principal.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("MM/dd/yyyy")); - BA.debugLineNum = 764;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(134217728); -__ref.setField ("_sdate" /*RemoteObject*/ ,c_principal.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(c_principal.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 765;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -Debug.ShouldStop(268435456); -__ref.setField ("_stime" /*RemoteObject*/ ,c_principal.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_principal.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 766;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(536870912); -c_principal._cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");__ref.setField("_cmd",c_principal._cmd); - BA.debugLineNum = 767;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 768;BA.debugLine="cmd.Name =\"insert_drop_MEDI_2\""; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("insert_drop_MEDI_2")); - BA.debugLineNum = 769;BA.debugLine="cmd.Parameters = Array As Object(usuario,l_ruta."; -Debug.ShouldStop(1); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {11},new Object[] {(__ref.getField(true,"_usuario" /*RemoteObject*/ )),(__ref.getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"getText")),(RemoteObject.concat(__ref.getField(true,"_sdate" /*RemoteObject*/ ),__ref.getField(true,"_stime" /*RemoteObject*/ ))),(__ref.getField(false,"_l_porvisitar" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_drop" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_efectiva" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_cuantosc" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_cuantosn" /*RemoteObject*/ ).runMethod(true,"getText")),(__ref.getField(false,"_l_montod" /*RemoteObject*/ ).runMethod(true,"getText")),RemoteObject.createImmutable(("ENVIO")),(__ref.getField(true,"_almacen" /*RemoteObject*/ ))})); - BA.debugLineNum = 770;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cmd"; -Debug.ShouldStop(2); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)((RemoteObject.createImmutable("inst_noventa")))); - BA.debugLineNum = 771;BA.debugLine="img2.Visible =True"; -Debug.ShouldStop(4); -__ref.getField(false,"_img2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"True")); - BA.debugLineNum = 772;BA.debugLine="PORCENTAJE = Round(100/ (cuantos_noventa + cuant"; -Debug.ShouldStop(8); -__ref.setField ("_porcentaje" /*RemoteObject*/ ,BA.NumberToString(c_principal.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(100),(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(true,"_cuantos_noventa" /*RemoteObject*/ )),BA.numberCast(double.class, __ref.getField(true,"_cuantos_pedido" /*RemoteObject*/ )),BA.numberCast(double.class, __ref.getField(true,"_cuantos_pedidosc" /*RemoteObject*/ )),RemoteObject.createImmutable(1)}, "+++",3, 0))}, "/",0, 0))))); - BA.debugLineNum = 773;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessageS"; -Debug.ShouldStop(16); -if (RemoteObject.solveBoolean("!",c_principal._starter._marcacel /*RemoteObject*/ ,BA.ObjectToString("Sony"))) { -c_principal.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("Se Actualizaran los datos, Este proceso podria tardar hasta un minuto, gracias "),__ref.getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"getText")))),(Object)(c_principal.__c.getField(true,"True")));}; - }; - BA.debugLineNum = 775;BA.debugLine="End Sub"; -Debug.ShouldStop(64); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _t1_tick(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("t1_tick (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,1845); -if (RapidSub.canDelegate("t1_tick")) { return __ref.runUserSub(false, "c_principal","t1_tick", __ref);} - BA.debugLineNum = 1845;BA.debugLine="Sub t1_tick"; -Debug.ShouldStop(1048576); - BA.debugLineNum = 1846;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 1847;BA.debugLine="cmd.Name = \"select_cuantos_pedido_MEDI\""; -Debug.ShouldStop(4194304); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_cuantos_pedido_MEDI")); - BA.debugLineNum = 1848;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN,l_ruta.t"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(__ref.getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"getText"))})); - BA.debugLineNum = 1849;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -Debug.ShouldStop(16777216); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("valida_pedido")))); - BA.debugLineNum = 1851;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 1852;BA.debugLine="cmd.Name = \"select_cuantos_noventa_MEDI\""; -Debug.ShouldStop(134217728); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_cuantos_noventa_MEDI")); - BA.debugLineNum = 1853;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN,l_ruta.t"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(__ref.getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"getText"))})); - BA.debugLineNum = 1854;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -Debug.ShouldStop(536870912); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("valida_noventa")))); - BA.debugLineNum = 1856;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 1857;BA.debugLine="cmd.Name = \"select_cuantos_pedidoc_MEDI\""; -Debug.ShouldStop(1); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("select_cuantos_pedidoc_MEDI")); - BA.debugLineNum = 1858;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN,l_ruta.t"; -Debug.ShouldStop(2); -__ref.getField(false,"_cmd" /*RemoteObject*/ ).setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(true,"_almacen" /*RemoteObject*/ )),(__ref.getField(false,"_l_ruta" /*RemoteObject*/ ).runMethod(true,"getText"))})); - BA.debugLineNum = 1859;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -Debug.ShouldStop(4); -c_principal._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executequery" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_cmd" /*RemoteObject*/ )),(Object)(BA.numberCast(int.class, 0)),(Object)((RemoteObject.createImmutable("valida_pedidoc")))); - BA.debugLineNum = 1861;BA.debugLine="If PB2.Progress = 0 Then"; -Debug.ShouldStop(16); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_pb2" /*RemoteObject*/ ).runMethod(true,"getProgress"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 1862;BA.debugLine="S_CP.Text = \"ENVIAR DATOS (K-1)\""; -Debug.ShouldStop(32); -__ref.getField(false,"_s_cp" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("ENVIAR DATOS (K-1)")); - }; - BA.debugLineNum = 1864;BA.debugLine="img2.Visible=False"; -Debug.ShouldStop(128); -__ref.getField(false,"_img2" /*RemoteObject*/ ).runMethod(true,"setVisible",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1865;BA.debugLine="t1.Enabled = False"; -Debug.ShouldStop(256); -__ref.getField(false,"_t1" /*RemoteObject*/ ).runMethod(true,"setEnabled",c_principal.__c.getField(true,"False")); - BA.debugLineNum = 1866;BA.debugLine="End Sub"; -Debug.ShouldStop(512); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _tickets_dia_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("tickets_dia_Click (c_principal) ","c_principal",3,__ref.getField(false, "ba"),__ref,2153); -if (RapidSub.canDelegate("tickets_dia_click")) { return __ref.runUserSub(false, "c_principal","tickets_dia_click", __ref);} - BA.debugLineNum = 2153;BA.debugLine="Sub tickets_dia_Click"; -Debug.ShouldStop(256); - BA.debugLineNum = 2154;BA.debugLine="B4XPages.ShowPage(\"TicketsDia\")"; -Debug.ShouldStop(512); -c_principal._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("TicketsDia"))); - BA.debugLineNum = 2155;BA.debugLine="End Sub"; -Debug.ShouldStop(1024); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_productos.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_productos.java deleted file mode 100644 index 59b490b..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_productos.java +++ /dev/null @@ -1,103 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class c_productos { - public static RemoteObject myClass; - public c_productos() { - } - public static PCBA staticBA = new PCBA(null, c_productos.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _root = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _ruta = RemoteObject.createImmutable(""); -public static RemoteObject _q_buscar = RemoteObject.createImmutable(""); -public static RemoteObject _forzarbusqueda = RemoteObject.createImmutable(false); -public static RemoteObject _skmt = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL"); -public static RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _c2 = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _c3 = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _s = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _lv_catalogos = RemoteObject.declareNull("anywheresoftware.b4a.objects.ListViewWrapper"); -public static RemoteObject _lv_promos = RemoteObject.declareNull("anywheresoftware.b4a.objects.ListViewWrapper"); -public static RemoteObject _entro = RemoteObject.createImmutable(""); -public static RemoteObject _gest = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _lfila = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _marca = RemoteObject.createImmutable(""); -public static RemoteObject _tipo = RemoteObject.createImmutable(""); -public static RemoteObject _subtipo = RemoteObject.createImmutable(""); -public static RemoteObject _busca = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -public static RemoteObject _ya_entro = RemoteObject.createImmutable(""); -public static RemoteObject _tiene_promos = RemoteObject.createImmutable(""); -public static RemoteObject _res = RemoteObject.createImmutable(""); -public static RemoteObject _s1 = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _bmp = RemoteObject.declareNull("anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper"); -public static RemoteObject _ciclo = RemoteObject.createImmutable(""); -public static RemoteObject _b_qr = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _p_productos = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _clv_productos = RemoteObject.declareNull("b4a.example3.customlistview"); -public static RemoteObject _imageview1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -public static RemoteObject _panel3 = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _p_prods = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _i_prod = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -public static RemoteObject _l_prodx = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _b_prodmas = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _l_pcant = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _et_pcant = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -public static RemoteObject _b_prodmenos = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _b_terminar1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _b_continuar = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _l_total = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_totprods = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _totalprods = RemoteObject.createImmutable(0); -public static RemoteObject _totalcompra = RemoteObject.createImmutable(0f); -public static RemoteObject _etcanthasfocus = RemoteObject.createImmutable(false); -public static RemoteObject _prodsmap = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -public static RemoteObject _l_cargando = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_info = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _b_buscar = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _p_botonesventa = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _lv_tipo = RemoteObject.declareNull("anywheresoftware.b4a.objects.ListViewWrapper"); -public static RemoteObject _lv_subtipo = RemoteObject.declareNull("anywheresoftware.b4a.objects.ListViewWrapper"); -public static RemoteObject _p_vistapreviatrans = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _lv_prodspedido = RemoteObject.declareNull("anywheresoftware.b4a.objects.ListViewWrapper"); -public static RemoteObject _b_rechazar = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _b_aceptar = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _p_vistaprevia = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _folio = RemoteObject.createImmutable(""); -public static RemoteObject _result = RemoteObject.createImmutable(""); -public static RemoteObject _l_cant = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_total2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _prodspedidoactual = RemoteObject.createImmutable(""); -public static RemoteObject _montopedidoactual = RemoteObject.createImmutable(""); -public static RemoteObject _clv_prods_ll = RemoteObject.declareNull("b4a.example3.customlistview"); -public static RemoteObject _pclv = RemoteObject.declareNull("keymon.lat.medicomed.preoptimizedclv"); -public static RemoteObject _listaprods = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _pedidomap = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -public static RemoteObject _p_botmasmen = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _reiniciarlistaprods = RemoteObject.createImmutable(false); -public static RemoteObject _listatiempos = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _clienteid = RemoteObject.createImmutable(""); -public static RemoteObject _rutausuario = RemoteObject.createImmutable(""); -public static RemoteObject _haypedido = RemoteObject.createImmutable(false); -public static RemoteObject _listahints = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _h = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"b_aceptar",_ref.getField(false, "_b_aceptar"),"b_buscar",_ref.getField(false, "_b_buscar"),"b_continuar",_ref.getField(false, "_b_continuar"),"b_prodMas",_ref.getField(false, "_b_prodmas"),"b_prodMenos",_ref.getField(false, "_b_prodmenos"),"b_qr",_ref.getField(false, "_b_qr"),"b_rechazar",_ref.getField(false, "_b_rechazar"),"b_terminar1",_ref.getField(false, "_b_terminar1"),"bmp",_ref.getField(false, "_bmp"),"BUSCA",_ref.getField(false, "_busca"),"c",_ref.getField(false, "_c"),"c2",_ref.getField(false, "_c2"),"C3",_ref.getField(false, "_c3"),"ciclo",_ref.getField(false, "_ciclo"),"clienteId",_ref.getField(false, "_clienteid"),"clv_prods_ll",_ref.getField(false, "_clv_prods_ll"),"clv_productos",_ref.getField(false, "_clv_productos"),"DateUtils",_ref.getField(false, "_dateutils"),"entro",_ref.getField(false, "_entro"),"et_pCant",_ref.getField(false, "_et_pcant"),"etCantHasFocus",_ref.getField(false, "_etcanthasfocus"),"folio",_ref.getField(false, "_folio"),"forzarBusqueda",_ref.getField(false, "_forzarbusqueda"),"gest",_ref.getField(false, "_gest"),"h",_ref.getField(false, "_h"),"hayPedido",_ref.getField(false, "_haypedido"),"i_prod",_ref.getField(false, "_i_prod"),"ImageView1",_ref.getField(false, "_imageview1"),"l_cant",_ref.getField(false, "_l_cant"),"l_Cargando",_ref.getField(false, "_l_cargando"),"l_info",_ref.getField(false, "_l_info"),"l_pCant",_ref.getField(false, "_l_pcant"),"l_prodX",_ref.getField(false, "_l_prodx"),"l_total",_ref.getField(false, "_l_total"),"l_total2",_ref.getField(false, "_l_total2"),"l_totProds",_ref.getField(false, "_l_totprods"),"lfila",_ref.getField(false, "_lfila"),"listaHints",_ref.getField(false, "_listahints"),"listaProds",_ref.getField(false, "_listaprods"),"listaTiempos",_ref.getField(false, "_listatiempos"),"lv_catalogos",_ref.getField(false, "_lv_catalogos"),"lv_prodsPedido",_ref.getField(false, "_lv_prodspedido"),"lv_promos",_ref.getField(false, "_lv_promos"),"lv_subtipo",_ref.getField(false, "_lv_subtipo"),"lv_tipo",_ref.getField(false, "_lv_tipo"),"marca",_ref.getField(false, "_marca"),"montoPedidoActual",_ref.getField(false, "_montopedidoactual"),"p_botMasMen",_ref.getField(false, "_p_botmasmen"),"p_botonesVenta",_ref.getField(false, "_p_botonesventa"),"p_prods",_ref.getField(false, "_p_prods"),"p_productos",_ref.getField(false, "_p_productos"),"p_vistaPrevia",_ref.getField(false, "_p_vistaprevia"),"p_vistaPreviaTrans",_ref.getField(false, "_p_vistapreviatrans"),"Panel3",_ref.getField(false, "_panel3"),"PCLV",_ref.getField(false, "_pclv"),"pedidoMap",_ref.getField(false, "_pedidomap"),"prodsMap",_ref.getField(false, "_prodsmap"),"prodsPedidoActual",_ref.getField(false, "_prodspedidoactual"),"q_buscar",_ref.getField(false, "_q_buscar"),"reiniciarlistaProds",_ref.getField(false, "_reiniciarlistaprods"),"RES",_ref.getField(false, "_res"),"result",_ref.getField(false, "_result"),"Root",_ref.getField(false, "_root"),"ruta",_ref.getField(false, "_ruta"),"rutaUsuario",_ref.getField(false, "_rutausuario"),"s",_ref.getField(false, "_s"),"S1",_ref.getField(false, "_s1"),"skmt",_ref.getField(false, "_skmt"),"subtipo",_ref.getField(false, "_subtipo"),"TIENE_PROMOS",_ref.getField(false, "_tiene_promos"),"tipo",_ref.getField(false, "_tipo"),"totalCompra",_ref.getField(false, "_totalcompra"),"totalProds",_ref.getField(false, "_totalprods"),"xui",_ref.getField(false, "_xui"),"ya_entro",_ref.getField(false, "_ya_entro")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_productos_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_productos_subs_0.java deleted file mode 100644 index 7d5569d..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_productos_subs_0.java +++ /dev/null @@ -1,3083 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class c_productos_subs_0 { - - -public static RemoteObject _b_aceptar_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_aceptar_Click (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,734); -if (RapidSub.canDelegate("b_aceptar_click")) { return __ref.runUserSub(false, "c_productos","b_aceptar_click", __ref);} - BA.debugLineNum = 734;BA.debugLine="Private Sub b_aceptar_Click"; -Debug.ShouldStop(536870912); - BA.debugLineNum = 735;BA.debugLine="p_vistaPreviaTrans.Visible=False"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_p_vistapreviatrans" /*RemoteObject*/ ).runMethod(true,"setVisible",c_productos.__c.getField(true,"False")); - BA.debugLineNum = 736;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; -Debug.ShouldStop(-2147483648); -c_productos._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Cliente"))); - BA.debugLineNum = 737;BA.debugLine="End Sub"; -Debug.ShouldStop(1); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_buscar_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_buscar_Click (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,667); -if (RapidSub.canDelegate("b_buscar_click")) { return __ref.runUserSub(false, "c_productos","b_buscar_click", __ref);} - BA.debugLineNum = 667;BA.debugLine="Private Sub b_buscar_Click"; -Debug.ShouldStop(67108864); - BA.debugLineNum = 668;BA.debugLine="forzarBusqueda = True"; -Debug.ShouldStop(134217728); -__ref.setField ("_forzarbusqueda" /*RemoteObject*/ ,c_productos.__c.getField(true,"True")); - BA.debugLineNum = 669;BA.debugLine="Busca_TextChanged(\"\",BUSCA.Text)"; -Debug.ShouldStop(268435456); -__ref.runClassMethod (keymon.lat.medicomed.c_productos.class, "_busca_textchanged" /*void*/ ,(Object)(BA.ObjectToString("")),(Object)(__ref.getField(false,"_busca" /*RemoteObject*/ ).runMethod(true,"getText"))); - BA.debugLineNum = 670;BA.debugLine="End Sub"; -Debug.ShouldStop(536870912); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_continuar_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_continuar_Click (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,623); -if (RapidSub.canDelegate("b_continuar_click")) { return __ref.runUserSub(false, "c_productos","b_continuar_click", __ref);} -RemoteObject _p1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -RemoteObject _p = RemoteObject.createImmutable(""); -RemoteObject _pn = RemoteObject.createImmutable(""); -RemoteObject _m = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); - BA.debugLineNum = 623;BA.debugLine="Private Sub b_continuar_Click"; -Debug.ShouldStop(16384); - BA.debugLineNum = 624;BA.debugLine="Log(\"b_continuar_Click\")"; -Debug.ShouldStop(32768); -c_productos.__c.runVoidMethod ("LogImpl","324379393",RemoteObject.createImmutable("b_continuar_Click"),0); - BA.debugLineNum = 625;BA.debugLine="cuentaProds"; -Debug.ShouldStop(65536); -__ref.runClassMethod (keymon.lat.medicomed.c_productos.class, "_cuentaprods" /*RemoteObject*/ ); - BA.debugLineNum = 626;BA.debugLine="Private p1 As Map"; -Debug.ShouldStop(131072); -_p1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");Debug.locals.put("p1", _p1); - BA.debugLineNum = 627;BA.debugLine="For Each p As String In prodsMap.Keys"; -Debug.ShouldStop(262144); -{ -final RemoteObject group4 = __ref.getField(false,"_prodsmap" /*RemoteObject*/ ).runMethod(false,"Keys"); -final int groupLen4 = group4.runMethod(true,"getSize").get() -;int index4 = 0; -; -for (; index4 < groupLen4;index4++){ -_p = BA.ObjectToString(group4.runMethod(false,"Get",index4));Debug.locals.put("p", _p); -Debug.locals.put("p", _p); - BA.debugLineNum = 628;BA.debugLine="p1 = prodsMap.Get(p)"; -Debug.ShouldStop(524288); -_p1 = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), __ref.getField(false,"_prodsmap" /*RemoteObject*/ ).runMethod(false,"Get",(Object)((_p))));Debug.locals.put("p1", _p1); - BA.debugLineNum = 629;BA.debugLine="Log(p & \"|\" & p1)"; -Debug.ShouldStop(1048576); -c_productos.__c.runVoidMethod ("LogImpl","324379398",RemoteObject.concat(_p,RemoteObject.createImmutable("|"),_p1),0); - BA.debugLineNum = 630;BA.debugLine="Private pn As String = Subs.traeProdNombre(p)"; -Debug.ShouldStop(2097152); -_pn = c_productos._subs.runMethod(true,"_traeprodnombre" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(_p));Debug.locals.put("pn", _pn);Debug.locals.put("pn", _pn); - BA.debugLineNum = 631;BA.debugLine="Subs.guardaProductoSinGestion(Subs.traeAlmacen,"; -Debug.ShouldStop(4194304); -c_productos._subs.runVoidMethod ("_guardaproductosingestion" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(c_productos._subs.runMethod(true,"_traealmacen" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(BA.ObjectToString(_p1.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("precio")))))),(Object)(BA.ObjectToString(_p1.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("cant")))))),(Object)(_pn),(Object)(_p),(Object)(__ref.getField(true,"_clienteid" /*RemoteObject*/ )),(Object)(c_productos._subs.runMethod(true,"_traefecha" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(c_productos._subs.runMethod(true,"_traeusuariodebd" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(__ref.getField(true,"_rutausuario" /*RemoteObject*/ )),(Object)(BA.NumberToString(0)),(Object)(c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_tipo_venta" /*RemoteObject*/ ))); - } -}Debug.locals.put("p", _p); -; - BA.debugLineNum = 633;BA.debugLine="Log(\"promos-inv, prods-inv, cat-vis\")"; -Debug.ShouldStop(16777216); -c_productos.__c.runVoidMethod ("LogImpl","324379402",RemoteObject.createImmutable("promos-inv, prods-inv, cat-vis"),0); - BA.debugLineNum = 634;BA.debugLine="lv_promos.Visible = False"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_lv_promos" /*RemoteObject*/ ).runMethod(true,"setVisible",c_productos.__c.getField(true,"False")); - BA.debugLineNum = 635;BA.debugLine="clv_prods_ll.AsView.Visible = False"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"setVisible",c_productos.__c.getField(true,"False")); - BA.debugLineNum = 636;BA.debugLine="lv_subtipo.Visible = False"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_lv_subtipo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_productos.__c.getField(true,"False")); - BA.debugLineNum = 637;BA.debugLine="lv_tipo.Visible = False"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_lv_tipo" /*RemoteObject*/ ).runMethod(true,"setVisible",c_productos.__c.getField(true,"False")); - BA.debugLineNum = 638;BA.debugLine="lv_catalogos.Visible = True"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_lv_catalogos" /*RemoteObject*/ ).runMethod(true,"setVisible",c_productos.__c.getField(true,"True")); - BA.debugLineNum = 639;BA.debugLine="Log(\"Continuar\")"; -Debug.ShouldStop(1073741824); -c_productos.__c.runVoidMethod ("LogImpl","324379408",RemoteObject.createImmutable("Continuar"),0); - BA.debugLineNum = 640;BA.debugLine="Dim m As Map = Subs.traeTotalesClienteActual"; -Debug.ShouldStop(-2147483648); -_m = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_m = c_productos._subs.runMethod(false,"_traetotalesclienteactual" /*RemoteObject*/ ,__ref.getField(false, "ba"));Debug.locals.put("m", _m);Debug.locals.put("m", _m); - BA.debugLineNum = 641;BA.debugLine="prodsPedidoActual = m.Get(\"productos\")"; -Debug.ShouldStop(1); -__ref.setField ("_prodspedidoactual" /*RemoteObject*/ ,BA.ObjectToString(_m.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("productos")))))); - BA.debugLineNum = 642;BA.debugLine="montoPedidoActual = m.Get(\"monto\")"; -Debug.ShouldStop(2); -__ref.setField ("_montopedidoactual" /*RemoteObject*/ ,BA.ObjectToString(_m.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("monto")))))); - BA.debugLineNum = 643;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_prodmas_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_prodMas_Click (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,495); -if (RapidSub.canDelegate("b_prodmas_click")) { return __ref.runUserSub(false, "c_productos","b_prodmas_click", __ref);} -RemoteObject _index = RemoteObject.createImmutable(0); -RemoteObject _pnl0 = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _pnl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _lacant = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _precio = RemoteObject.createImmutable(""); -RemoteObject _inv = RemoteObject.createImmutable(""); -RemoteObject _id = RemoteObject.createImmutable(""); - BA.debugLineNum = 495;BA.debugLine="Sub b_prodMas_Click"; -Debug.ShouldStop(16384); - BA.debugLineNum = 496;BA.debugLine="etCantHasFocus = False"; -Debug.ShouldStop(32768); -__ref.setField ("_etcanthasfocus" /*RemoteObject*/ ,c_productos.__c.getField(true,"False")); - BA.debugLineNum = 498;BA.debugLine="Dim index As Int = clv_prods_ll.GetItemFromView(S"; -Debug.ShouldStop(131072); -_index = __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(true,"_getitemfromview",RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), c_productos.__c.runMethod(false,"Sender",__ref.getField(false, "ba"))));Debug.locals.put("index", _index);Debug.locals.put("index", _index); - BA.debugLineNum = 499;BA.debugLine="Dim pnl0 As B4XView = clv_prods_ll.GetPanel(index"; -Debug.ShouldStop(262144); -_pnl0 = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_pnl0 = __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getpanel",(Object)(_index));Debug.locals.put("pnl0", _pnl0);Debug.locals.put("pnl0", _pnl0); - BA.debugLineNum = 500;BA.debugLine="Dim pnl As B4XView = pnl0.GetView(0)"; -Debug.ShouldStop(524288); -_pnl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_pnl = _pnl0.runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0)));Debug.locals.put("pnl", _pnl);Debug.locals.put("pnl", _pnl); - BA.debugLineNum = 501;BA.debugLine="Dim laCant As B4XView = pnl.GetView(2).GetView(2)"; -Debug.ShouldStop(1048576); -_lacant = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_lacant = _pnl.runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 2))).runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 2)));Debug.locals.put("laCant", _lacant);Debug.locals.put("laCant", _lacant); - BA.debugLineNum = 503;BA.debugLine="Private precio As String=clv_prods_ll.GetValue(in"; -Debug.ShouldStop(4194304); -_precio = BA.ObjectToString((RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getvalue",(Object)(_index)))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("precio")))));Debug.locals.put("precio", _precio);Debug.locals.put("precio", _precio); - BA.debugLineNum = 504;BA.debugLine="Private inv As String=clv_prods_ll.GetValue(index"; -Debug.ShouldStop(8388608); -_inv = BA.ObjectToString((RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getvalue",(Object)(_index)))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("almacen")))));Debug.locals.put("inv", _inv);Debug.locals.put("inv", _inv); - BA.debugLineNum = 505;BA.debugLine="If laCant.Text = \"\" Then laCant.Text = 0"; -Debug.ShouldStop(16777216); -if (RemoteObject.solveBoolean("=",_lacant.runMethod(true,"getText"),BA.ObjectToString(""))) { -_lacant.runMethod(true,"setText",BA.ObjectToCharSequence(0));}; - BA.debugLineNum = 507;BA.debugLine="If laCant.Text + 1 <= inv Then"; -Debug.ShouldStop(67108864); -if (RemoteObject.solveBoolean("k",RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, _lacant.runMethod(true,"getText")),RemoteObject.createImmutable(1)}, "+",1, 0),BA.numberCast(double.class, _inv))) { - BA.debugLineNum = 508;BA.debugLine="Log(NumberFormat2(laCant.Text+1,0,0,0,False))"; -Debug.ShouldStop(134217728); -c_productos.__c.runVoidMethod ("LogImpl","324051725",c_productos.__c.runMethod(true,"NumberFormat2",(Object)(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, _lacant.runMethod(true,"getText")),RemoteObject.createImmutable(1)}, "+",1, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(c_productos.__c.getField(true,"False"))),0); - BA.debugLineNum = 509;BA.debugLine="laCant.Text = $\"${NumberFormat2(laCant.Text+1,0,"; -Debug.ShouldStop(268435456); -_lacant.runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable(""),c_productos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((c_productos.__c.runMethod(true,"NumberFormat2",(Object)(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, _lacant.runMethod(true,"getText")),RemoteObject.createImmutable(1)}, "+",1, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(c_productos.__c.getField(true,"False")))))),RemoteObject.createImmutable(""))))); - BA.debugLineNum = 511;BA.debugLine="Private id As String=clv_prods_ll.GetValue(index"; -Debug.ShouldStop(1073741824); -_id = BA.ObjectToString((RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getvalue",(Object)(_index)))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("id")))));Debug.locals.put("id", _id);Debug.locals.put("id", _id); - }; - BA.debugLineNum = 518;BA.debugLine="Subs.actualizaProducto(Subs.traeAlmacen, precio,"; -Debug.ShouldStop(32); -c_productos._subs.runVoidMethod ("_actualizaproducto" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(c_productos._subs.runMethod(true,"_traealmacen" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(_precio),(Object)(_lacant.runMethod(true,"getText")),(Object)(c_productos._subs.runMethod(true,"_traeprodnombre" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(_id))),(Object)(_id),(Object)(__ref.getField(true,"_clienteid" /*RemoteObject*/ )),(Object)(c_productos._subs.runMethod(true,"_traefecha" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(c_productos._subs.runMethod(true,"_traeusuariodebd" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(__ref.getField(true,"_rutausuario" /*RemoteObject*/ )),(Object)(BA.NumberToString(0)),(Object)(c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_tipo_venta" /*RemoteObject*/ ))); - BA.debugLineNum = 519;BA.debugLine="cuentaProds"; -Debug.ShouldStop(64); -__ref.runClassMethod (keymon.lat.medicomed.c_productos.class, "_cuentaprods" /*RemoteObject*/ ); - BA.debugLineNum = 521;BA.debugLine="End Sub"; -Debug.ShouldStop(256); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_prodmenos_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_prodMenos_Click (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,469); -if (RapidSub.canDelegate("b_prodmenos_click")) { return __ref.runUserSub(false, "c_productos","b_prodmenos_click", __ref);} -RemoteObject _index = RemoteObject.createImmutable(0); -RemoteObject _pnl0 = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _pnl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _lacant = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _tmpmap = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -RemoteObject _precio = RemoteObject.createImmutable(""); -RemoteObject _id = RemoteObject.createImmutable(""); - BA.debugLineNum = 469;BA.debugLine="Sub b_prodMenos_Click"; -Debug.ShouldStop(1048576); - BA.debugLineNum = 470;BA.debugLine="etCantHasFocus = False"; -Debug.ShouldStop(2097152); -__ref.setField ("_etcanthasfocus" /*RemoteObject*/ ,c_productos.__c.getField(true,"False")); - BA.debugLineNum = 472;BA.debugLine="Dim index As Int = clv_prods_ll.GetItemFromView(S"; -Debug.ShouldStop(8388608); -_index = __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(true,"_getitemfromview",RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), c_productos.__c.runMethod(false,"Sender",__ref.getField(false, "ba"))));Debug.locals.put("index", _index);Debug.locals.put("index", _index); - BA.debugLineNum = 473;BA.debugLine="Dim pnl0 As B4XView = clv_prods_ll.GetPanel(index"; -Debug.ShouldStop(16777216); -_pnl0 = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_pnl0 = __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getpanel",(Object)(_index));Debug.locals.put("pnl0", _pnl0);Debug.locals.put("pnl0", _pnl0); - BA.debugLineNum = 474;BA.debugLine="Dim pnl As B4XView = pnl0.GetView(0)"; -Debug.ShouldStop(33554432); -_pnl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_pnl = _pnl0.runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0)));Debug.locals.put("pnl", _pnl);Debug.locals.put("pnl", _pnl); - BA.debugLineNum = 475;BA.debugLine="Dim laCant As B4XView = pnl.GetView(2).GetView(2)"; -Debug.ShouldStop(67108864); -_lacant = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_lacant = _pnl.runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 2))).runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 2)));Debug.locals.put("laCant", _lacant);Debug.locals.put("laCant", _lacant); - BA.debugLineNum = 477;BA.debugLine="If laCant.Text = \"\" Then laCant.Text = 0"; -Debug.ShouldStop(268435456); -if (RemoteObject.solveBoolean("=",_lacant.runMethod(true,"getText"),BA.ObjectToString(""))) { -_lacant.runMethod(true,"setText",BA.ObjectToCharSequence(0));}; - BA.debugLineNum = 479;BA.debugLine="laCant.Text = $\"${NumberFormat2(laCant.Text-1,0,0"; -Debug.ShouldStop(1073741824); -_lacant.runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable(""),c_productos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((c_productos.__c.runMethod(true,"NumberFormat2",(Object)(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, _lacant.runMethod(true,"getText")),RemoteObject.createImmutable(1)}, "-",1, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(c_productos.__c.getField(true,"False")))))),RemoteObject.createImmutable(""))))); - BA.debugLineNum = 480;BA.debugLine="If laCant.Text < 0 Then laCant.Text = 0"; -Debug.ShouldStop(-2147483648); -if (RemoteObject.solveBoolean("<",BA.numberCast(double.class, _lacant.runMethod(true,"getText")),BA.numberCast(double.class, 0))) { -_lacant.runMethod(true,"setText",BA.ObjectToCharSequence(0));}; - BA.debugLineNum = 481;BA.debugLine="Private tmpMap As Map = clv_prods_ll.GetValue(ind"; -Debug.ShouldStop(1); -_tmpmap = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_tmpmap = (RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getvalue",(Object)(_index))));Debug.locals.put("tmpMap", _tmpmap);Debug.locals.put("tmpMap", _tmpmap); - BA.debugLineNum = 482;BA.debugLine="Private precio As String=clv_prods_ll.GetValue(in"; -Debug.ShouldStop(2); -_precio = BA.ObjectToString((RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getvalue",(Object)(_index)))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("precio")))));Debug.locals.put("precio", _precio);Debug.locals.put("precio", _precio); - BA.debugLineNum = 483;BA.debugLine="Private id As String=clv_prods_ll.GetValue(index)"; -Debug.ShouldStop(4); -_id = BA.ObjectToString((RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getvalue",(Object)(_index)))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("id")))));Debug.locals.put("id", _id);Debug.locals.put("id", _id); - BA.debugLineNum = 484;BA.debugLine="Private tmpMap As Map = CreateMap(\"precio\":precio"; -Debug.ShouldStop(8); -_tmpmap = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_tmpmap = c_productos.__c.runMethod(false, "createMap", (Object)(new RemoteObject[] {RemoteObject.createImmutable(("precio")),(_precio),RemoteObject.createImmutable(("cant")),(_lacant.runMethod(true,"getText")),RemoteObject.createImmutable(("almacen")),(c_productos._subs.runMethod(true,"_traealmacen" /*RemoteObject*/ ,__ref.getField(false, "ba")))}));Debug.locals.put("tmpMap", _tmpmap);Debug.locals.put("tmpMap", _tmpmap); - BA.debugLineNum = 487;BA.debugLine="If laCant.Text = 0 Then prodsMap.Remove(id)"; -Debug.ShouldStop(64); -if (RemoteObject.solveBoolean("=",_lacant.runMethod(true,"getText"),BA.NumberToString(0))) { -__ref.getField(false,"_prodsmap" /*RemoteObject*/ ).runVoidMethod ("Remove",(Object)((_id)));}; - BA.debugLineNum = 490;BA.debugLine="Subs.actualizaProducto(Subs.traeAlmacen, precio,"; -Debug.ShouldStop(512); -c_productos._subs.runVoidMethod ("_actualizaproducto" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(c_productos._subs.runMethod(true,"_traealmacen" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(_precio),(Object)(_lacant.runMethod(true,"getText")),(Object)(c_productos._subs.runMethod(true,"_traeprodnombre" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(_id))),(Object)(_id),(Object)(__ref.getField(true,"_clienteid" /*RemoteObject*/ )),(Object)(c_productos._subs.runMethod(true,"_traefecha" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(c_productos._subs.runMethod(true,"_traeusuariodebd" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(__ref.getField(true,"_rutausuario" /*RemoteObject*/ )),(Object)(BA.NumberToString(0)),(Object)(c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_tipo_venta" /*RemoteObject*/ ))); - BA.debugLineNum = 491;BA.debugLine="cuentaProds"; -Debug.ShouldStop(1024); -__ref.runClassMethod (keymon.lat.medicomed.c_productos.class, "_cuentaprods" /*RemoteObject*/ ); - BA.debugLineNum = 493;BA.debugLine="End Sub"; -Debug.ShouldStop(4096); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_qr_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_QR_Click (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,425); -if (RapidSub.canDelegate("b_qr_click")) { return __ref.runUserSub(false, "c_productos","b_qr_click", __ref);} - BA.debugLineNum = 425;BA.debugLine="Sub b_QR_Click"; -Debug.ShouldStop(256); - BA.debugLineNum = 426;BA.debugLine="If ciclo = 1 Then"; -Debug.ShouldStop(512); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_ciclo" /*RemoteObject*/ ),BA.NumberToString(1))) { - BA.debugLineNum = 427;BA.debugLine="ciclo = 2"; -Debug.ShouldStop(1024); -__ref.setField ("_ciclo" /*RemoteObject*/ ,BA.NumberToString(2)); - BA.debugLineNum = 428;BA.debugLine="ya_entro = \"0\""; -Debug.ShouldStop(2048); -__ref.setField ("_ya_entro" /*RemoteObject*/ ,BA.ObjectToString("0")); - BA.debugLineNum = 429;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(4096); -__ref.runClassMethod (keymon.lat.medicomed.c_productos.class, "_b4xpage_appear" /*void*/ ); - }else -{ BA.debugLineNum = 430;BA.debugLine="else if ciclo = 2 Then"; -Debug.ShouldStop(8192); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_ciclo" /*RemoteObject*/ ),BA.NumberToString(2))) { - BA.debugLineNum = 431;BA.debugLine="ciclo = 3"; -Debug.ShouldStop(16384); -__ref.setField ("_ciclo" /*RemoteObject*/ ,BA.NumberToString(3)); - BA.debugLineNum = 432;BA.debugLine="ya_entro = \"0\""; -Debug.ShouldStop(32768); -__ref.setField ("_ya_entro" /*RemoteObject*/ ,BA.ObjectToString("0")); - BA.debugLineNum = 433;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(65536); -__ref.runClassMethod (keymon.lat.medicomed.c_productos.class, "_b4xpage_appear" /*void*/ ); - }else -{ BA.debugLineNum = 434;BA.debugLine="else if ciclo = 3 Then"; -Debug.ShouldStop(131072); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_ciclo" /*RemoteObject*/ ),BA.NumberToString(3))) { - BA.debugLineNum = 435;BA.debugLine="ciclo = 4"; -Debug.ShouldStop(262144); -__ref.setField ("_ciclo" /*RemoteObject*/ ,BA.NumberToString(4)); - BA.debugLineNum = 436;BA.debugLine="ya_entro = \"0\""; -Debug.ShouldStop(524288); -__ref.setField ("_ya_entro" /*RemoteObject*/ ,BA.ObjectToString("0")); - BA.debugLineNum = 437;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(1048576); -__ref.runClassMethod (keymon.lat.medicomed.c_productos.class, "_b4xpage_appear" /*void*/ ); - }else -{ BA.debugLineNum = 438;BA.debugLine="else if ciclo = 4 Then"; -Debug.ShouldStop(2097152); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_ciclo" /*RemoteObject*/ ),BA.NumberToString(4))) { - BA.debugLineNum = 439;BA.debugLine="ciclo = 5"; -Debug.ShouldStop(4194304); -__ref.setField ("_ciclo" /*RemoteObject*/ ,BA.NumberToString(5)); - BA.debugLineNum = 440;BA.debugLine="ya_entro = \"0\""; -Debug.ShouldStop(8388608); -__ref.setField ("_ya_entro" /*RemoteObject*/ ,BA.ObjectToString("0")); - BA.debugLineNum = 441;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(16777216); -__ref.runClassMethod (keymon.lat.medicomed.c_productos.class, "_b4xpage_appear" /*void*/ ); - }else -{ BA.debugLineNum = 442;BA.debugLine="else if ciclo = 5 Then"; -Debug.ShouldStop(33554432); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_ciclo" /*RemoteObject*/ ),BA.NumberToString(5))) { - BA.debugLineNum = 443;BA.debugLine="ciclo = 1"; -Debug.ShouldStop(67108864); -__ref.setField ("_ciclo" /*RemoteObject*/ ,BA.NumberToString(1)); - BA.debugLineNum = 444;BA.debugLine="ya_entro = \"0\""; -Debug.ShouldStop(134217728); -__ref.setField ("_ya_entro" /*RemoteObject*/ ,BA.ObjectToString("0")); - BA.debugLineNum = 445;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(268435456); -__ref.runClassMethod (keymon.lat.medicomed.c_productos.class, "_b4xpage_appear" /*void*/ ); - }}}}} -; - BA.debugLineNum = 447;BA.debugLine="End Sub"; -Debug.ShouldStop(1073741824); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_rechazar_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_rechazar_Click (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,712); -if (RapidSub.canDelegate("b_rechazar_click")) { return __ref.runUserSub(false, "c_productos","b_rechazar_click", __ref);} - BA.debugLineNum = 712;BA.debugLine="Private Sub b_rechazar_Click"; -Debug.ShouldStop(128); - BA.debugLineNum = 713;BA.debugLine="If folio <> \"\" Then"; -Debug.ShouldStop(256); -if (RemoteObject.solveBoolean("!",__ref.getField(true,"_folio" /*RemoteObject*/ ),BA.ObjectToString(""))) { - BA.debugLineNum = 714;BA.debugLine="result = Msgbox2($\"Seguro que desea borrar el p"; -Debug.ShouldStop(512); -__ref.setField ("_result" /*RemoteObject*/ ,BA.NumberToString(c_productos.__c.runMethodAndSync(true,"Msgbox2",(Object)(BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("Seguro que desea borrar el pedido completo?"),c_productos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((c_productos.__c.getField(true,"CRLF")))),RemoteObject.createImmutable("Haciendo clic largo sobre un producto se pueden borrar articulos independientes."))))),(Object)(BA.ObjectToCharSequence("Rechazar Pedido")),(Object)(BA.ObjectToString("Si")),(Object)(BA.ObjectToString("")),(Object)(BA.ObjectToString("No")),(Object)((c_productos.__c.runMethod(false,"LoadBitmap",(Object)(c_productos.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(RemoteObject.createImmutable("alert2.png"))).getObject())),__ref.getField(false, "ba")))); - BA.debugLineNum = 715;BA.debugLine="If result = DialogResponse.POSITIVE Then"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_result" /*RemoteObject*/ ),BA.NumberToString(c_productos.__c.getField(false,"DialogResponse").getField(true,"POSITIVE")))) { - BA.debugLineNum = 716;BA.debugLine="Subs.borraPedidoClienteActual"; -Debug.ShouldStop(2048); -c_productos._subs.runVoidMethod ("_borrapedidoclienteactual" /*RemoteObject*/ ,__ref.getField(false, "ba")); - BA.debugLineNum = 717;BA.debugLine="prodsMap.Initialize"; -Debug.ShouldStop(4096); -__ref.getField(false,"_prodsmap" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 718;BA.debugLine="B4XPages.MainPage.promos.promosMap.Initialize"; -Debug.ShouldStop(8192); -c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_promos" /*RemoteObject*/ ).getField(false,"_promosmap" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 719;BA.debugLine="Log(\"Llamamos LlenaProdsLL\")"; -Debug.ShouldStop(16384); -c_productos.__c.runVoidMethod ("LogImpl","324903687",RemoteObject.createImmutable("Llamamos LlenaProdsLL"),0); - BA.debugLineNum = 720;BA.debugLine="LlenaProdsLL(Null)"; -Debug.ShouldStop(32768); -__ref.runClassMethod (keymon.lat.medicomed.c_productos.class, "_llenaprodsll" /*RemoteObject*/ ,RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"), c_productos.__c.getField(false,"Null"))); - BA.debugLineNum = 721;BA.debugLine="Log(\"Positivo\")"; -Debug.ShouldStop(65536); -c_productos.__c.runVoidMethod ("LogImpl","324903689",RemoteObject.createImmutable("Positivo"),0); - BA.debugLineNum = 722;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; -Debug.ShouldStop(131072); -c_productos._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Cliente"))); - }else { - BA.debugLineNum = 724;BA.debugLine="Log(\"NO Positivo\")"; -Debug.ShouldStop(524288); -c_productos.__c.runVoidMethod ("LogImpl","324903692",RemoteObject.createImmutable("NO Positivo"),0); - BA.debugLineNum = 725;BA.debugLine="p_vistaPreviaTrans.Visible = False"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_p_vistapreviatrans" /*RemoteObject*/ ).runMethod(true,"setVisible",c_productos.__c.getField(true,"False")); - }; - }else { - BA.debugLineNum = 728;BA.debugLine="Msgbox(\"CLIENTE YA SE TRANSMITIO, FAVOR DE LLAMA"; -Debug.ShouldStop(8388608); -c_productos.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence("CLIENTE YA SE TRANSMITIO, FAVOR DE LLAMAR A SOPORTE PARA ASISTENCIA")),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("AVISO"))),__ref.getField(false, "ba")); - }; - BA.debugLineNum = 730;BA.debugLine="p_vistaPreviaTrans.Visible=False"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_p_vistapreviatrans" /*RemoteObject*/ ).runMethod(true,"setVisible",c_productos.__c.getField(true,"False")); - BA.debugLineNum = 731;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; -Debug.ShouldStop(67108864); -c_productos._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Cliente"))); - BA.debugLineNum = 732;BA.debugLine="End Sub"; -Debug.ShouldStop(134217728); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_terminar1_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_terminar1_Click (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,577); -if (RapidSub.canDelegate("b_terminar1_click")) { return __ref.runUserSub(false, "c_productos","b_terminar1_click", __ref);} -RemoteObject _c_prods = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -RemoteObject _cs = RemoteObject.declareNull("anywheresoftware.b4a.objects.CSBuilder"); -int _i = 0; -RemoteObject _label1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _textcolor = RemoteObject.createImmutable(0); -RemoteObject _label2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); - BA.debugLineNum = 577;BA.debugLine="Sub b_terminar1_Click"; -Debug.ShouldStop(1); - BA.debugLineNum = 580;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete from"; -Debug.ShouldStop(8); -c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("delete from PEDIDO WHERE PE_PRONOMBRE = ? ")),(Object)(c_productos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(RemoteObject.createImmutable("N/A"))}))))); - BA.debugLineNum = 582;BA.debugLine="lv_promos.Visible = False"; -Debug.ShouldStop(32); -__ref.getField(false,"_lv_promos" /*RemoteObject*/ ).runMethod(true,"setVisible",c_productos.__c.getField(true,"False")); - BA.debugLineNum = 583;BA.debugLine="clv_prods_ll.AsView.Visible = False"; -Debug.ShouldStop(64); -__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"setVisible",c_productos.__c.getField(true,"False")); - BA.debugLineNum = 584;BA.debugLine="lv_catalogos.Visible = True"; -Debug.ShouldStop(128); -__ref.getField(false,"_lv_catalogos" /*RemoteObject*/ ).runMethod(true,"setVisible",c_productos.__c.getField(true,"True")); - BA.debugLineNum = 585;BA.debugLine="lv_prodsPedido.Clear"; -Debug.ShouldStop(256); -__ref.getField(false,"_lv_prodspedido" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 587;BA.debugLine="Private c_prods As Cursor=B4XPages.MainPage.skmt."; -Debug.ShouldStop(1024); -_c_prods = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -_c_prods = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select PE_PRONOMBRE,PE_COSTO_TOT, PE_CANT, PE_FOLIO, PE_CEDIS FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa) order by PE_CEDIS, PE_PRONOMBRE"))));Debug.locals.put("c_prods", _c_prods);Debug.locals.put("c_prods", _c_prods); - BA.debugLineNum = 588;BA.debugLine="If c_prods.RowCount > 0 Then"; -Debug.ShouldStop(2048); -if (RemoteObject.solveBoolean(">",_c_prods.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 589;BA.debugLine="Private cs As CSBuilder"; -Debug.ShouldStop(4096); -_cs = RemoteObject.createNew ("anywheresoftware.b4a.objects.CSBuilder");Debug.locals.put("cs", _cs); - BA.debugLineNum = 590;BA.debugLine="For i=0 To c_prods.RowCount -1"; -Debug.ShouldStop(8192); -{ -final int step9 = 1; -final int limit9 = RemoteObject.solve(new RemoteObject[] {_c_prods.runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step9 > 0 && _i <= limit9) || (step9 < 0 && _i >= limit9) ;_i = ((int)(0 + _i + step9)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 591;BA.debugLine="cs.Initialize"; -Debug.ShouldStop(16384); -_cs.runVoidMethod ("Initialize"); - BA.debugLineNum = 592;BA.debugLine="c_prods.Position=i"; -Debug.ShouldStop(32768); -_c_prods.runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 593;BA.debugLine="Dim label1 As Label"; -Debug.ShouldStop(65536); -_label1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label1", _label1); - BA.debugLineNum = 594;BA.debugLine="label1 = lv_prodsPedido.TwoLinesLayout.Label"; -Debug.ShouldStop(131072); -_label1 = __ref.getField(false,"_lv_prodspedido" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").getField(false,"Label");Debug.locals.put("label1", _label1); - BA.debugLineNum = 595;BA.debugLine="label1.TextSize = 15"; -Debug.ShouldStop(262144); -_label1.runMethod(true,"setTextSize",BA.numberCast(float.class, 15)); - BA.debugLineNum = 596;BA.debugLine="label1.TextColor = Colors.Black"; -Debug.ShouldStop(524288); -_label1.runMethod(true,"setTextColor",c_productos.__c.getField(false,"Colors").getField(true,"Black")); - BA.debugLineNum = 597;BA.debugLine="label1.color = Colors.White"; -Debug.ShouldStop(1048576); -_label1.runVoidMethod ("setColor",c_productos.__c.getField(false,"Colors").getField(true,"White")); - BA.debugLineNum = 598;BA.debugLine="Private textColor As Int = Colors.black"; -Debug.ShouldStop(2097152); -_textcolor = c_productos.__c.getField(false,"Colors").getField(true,"Black");Debug.locals.put("textColor", _textcolor);Debug.locals.put("textColor", _textcolor); - BA.debugLineNum = 599;BA.debugLine="If Not(IsNumber(c_prods.GetString(\"PE_CEDIS\")))"; -Debug.ShouldStop(4194304); -if (c_productos.__c.runMethod(true,"Not",(Object)(c_productos.__c.runMethod(true,"IsNumber",(Object)(_c_prods.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CEDIS"))))))).get().booleanValue()) { -_textcolor = c_productos.__c.getField(false,"Colors").runMethod(true,"RGB",(Object)(BA.numberCast(int.class, 210)),(Object)(BA.numberCast(int.class, 105)),(Object)(BA.numberCast(int.class, 30)));Debug.locals.put("textColor", _textcolor);}; - BA.debugLineNum = 601;BA.debugLine="Dim label2 As Label"; -Debug.ShouldStop(16777216); -_label2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label2", _label2); - BA.debugLineNum = 602;BA.debugLine="label2 = lv_prodsPedido.TwoLinesLayout.SecondLa"; -Debug.ShouldStop(33554432); -_label2 = __ref.getField(false,"_lv_prodspedido" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").getField(false,"SecondLabel");Debug.locals.put("label2", _label2); - BA.debugLineNum = 603;BA.debugLine="label2.TextSize = 15"; -Debug.ShouldStop(67108864); -_label2.runMethod(true,"setTextSize",BA.numberCast(float.class, 15)); - BA.debugLineNum = 604;BA.debugLine="label2.TextColor = Colors.Blue"; -Debug.ShouldStop(134217728); -_label2.runMethod(true,"setTextColor",c_productos.__c.getField(false,"Colors").getField(true,"Blue")); - BA.debugLineNum = 605;BA.debugLine="lv_prodsPedido.AddTwoLines(cs.Color(textColor)."; -Debug.ShouldStop(268435456); -__ref.getField(false,"_lv_prodspedido" /*RemoteObject*/ ).runVoidMethod ("AddTwoLines",(Object)(BA.ObjectToCharSequence(_cs.runMethod(false,"Color",(Object)(_textcolor)).runMethod(false,"Append",(Object)(BA.ObjectToCharSequence(_c_prods.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_PRONOMBRE")))))).runMethod(false,"Pop").getObject())),(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("Cantidad #"),_c_prods.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CANT"))),RemoteObject.createImmutable(" SubTotal $"),_c_prods.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_COSTO_TOT"))),RemoteObject.createImmutable(" Folio "),_c_prods.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_FOLIO"))))))); - BA.debugLineNum = 606;BA.debugLine="folio = c_prods.GetString(\"PE_FOLIO\")"; -Debug.ShouldStop(536870912); -__ref.setField ("_folio" /*RemoteObject*/ ,_c_prods.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_FOLIO")))); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 609;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(P"; -Debug.ShouldStop(1); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select sum(PE_CANT) as PC_NOART, sum (PE_COSTO_TOT) as PC_MONTO from PEDIDO where PE_CLIENTE in (Select CUENTA from cuentaa) AND PE_PROID NOT IN (SELECT CAT_PA_ID FROM PROMOS_COMP )")))); - BA.debugLineNum = 610;BA.debugLine="C.Position=0"; -Debug.ShouldStop(2); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 611;BA.debugLine="l_cant.Text = c.GetString(\"PC_NOART\")"; -Debug.ShouldStop(4); -__ref.getField(false,"_l_cant" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_NOART"))))); - BA.debugLineNum = 612;BA.debugLine="l_total2.Text = c.GetString(\"PC_MONTO\")"; -Debug.ShouldStop(8); -__ref.getField(false,"_l_total2" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_MONTO"))))); - BA.debugLineNum = 613;BA.debugLine="c.Close"; -Debug.ShouldStop(16); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - }; - BA.debugLineNum = 615;BA.debugLine="c_prods.Close"; -Debug.ShouldStop(64); -_c_prods.runVoidMethod ("Close"); - BA.debugLineNum = 616;BA.debugLine="p_vistaPreviaTrans.Width = Root.Width"; -Debug.ShouldStop(128); -__ref.getField(false,"_p_vistapreviatrans" /*RemoteObject*/ ).runMethod(true,"setWidth",__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth")); - BA.debugLineNum = 617;BA.debugLine="Subs.centraPanel(p_vistaPrevia, Root.Width)"; -Debug.ShouldStop(256); -c_productos._subs.runVoidMethod ("_centrapanel" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_p_vistaprevia" /*RemoteObject*/ )),(Object)(__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"))); - BA.debugLineNum = 618;BA.debugLine="If Subs.pedidoGuardado Then b_rechazar.Enabled ="; -Debug.ShouldStop(512); -if (c_productos._subs.runMethod(true,"_pedidoguardado" /*RemoteObject*/ ,__ref.getField(false, "ba")).get().booleanValue()) { -__ref.getField(false,"_b_rechazar" /*RemoteObject*/ ).runMethod(true,"setEnabled",c_productos.__c.getField(true,"False"));} -else { -__ref.getField(false,"_b_rechazar" /*RemoteObject*/ ).runMethod(true,"setEnabled",c_productos.__c.getField(true,"True"));}; - BA.debugLineNum = 619;BA.debugLine="p_vistaPrevia.Visible=True"; -Debug.ShouldStop(1024); -__ref.getField(false,"_p_vistaprevia" /*RemoteObject*/ ).runMethod(true,"setVisible",c_productos.__c.getField(true,"True")); - BA.debugLineNum = 620;BA.debugLine="p_vistaPreviaTrans.Visible=True"; -Debug.ShouldStop(2048); -__ref.getField(false,"_p_vistapreviatrans" /*RemoteObject*/ ).runMethod(true,"setVisible",c_productos.__c.getField(true,"True")); - BA.debugLineNum = 621;BA.debugLine="End Sub"; -Debug.ShouldStop(4096); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _b4xpage_appear(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Appear (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,126); -if (RapidSub.canDelegate("b4xpage_appear")) { __ref.runUserSub(false, "c_productos","b4xpage_appear", __ref); return;} -ResumableSub_B4XPage_Appear rsub = new ResumableSub_B4XPage_Appear(null,__ref); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_B4XPage_Appear extends BA.ResumableSub { -public ResumableSub_B4XPage_Appear(keymon.lat.medicomed.c_productos parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.c_productos parent; -RemoteObject _label1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _m = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Appear (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,126); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 127;BA.debugLine="clienteId = Subs.traeCliente"; -Debug.ShouldStop(1073741824); -__ref.setField ("_clienteid" /*RemoteObject*/ ,parent._subs.runMethod(true,"_traecliente" /*RemoteObject*/ ,__ref.getField(false, "ba"))); - BA.debugLineNum = 128;BA.debugLine="rutaUsuario = Subs.traeRuta"; -Debug.ShouldStop(-2147483648); -__ref.setField ("_rutausuario" /*RemoteObject*/ ,parent._subs.runMethod(true,"_traeruta" /*RemoteObject*/ ,__ref.getField(false, "ba"))); - BA.debugLineNum = 129;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE CAT_"; -Debug.ShouldStop(1); -parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE CAT_GUNAPROD SET CAT_GP_TIPOPROD = (?) WHERE CAT_GP_TIPOPROD = (?) ")),(Object)(parent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {RemoteObject.createImmutable(("PRIORITARIO")),(RemoteObject.createImmutable("1"))}))))); - BA.debugLineNum = 130;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE CAT_"; -Debug.ShouldStop(2); -parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE CAT_GUNAPROD SET CAT_GP_TIPOPROD = (?) WHERE CAT_GP_TIPOPROD = (?) ")),(Object)(parent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {RemoteObject.createImmutable(("ESTRATEGICO")),(RemoteObject.createImmutable("2"))}))))); - BA.debugLineNum = 131;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE CAT_"; -Debug.ShouldStop(4); -parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE CAT_GUNAPROD SET CAT_GP_TIPOPROD = (?) WHERE CAT_GP_TIPOPROD = (?) ")),(Object)(parent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {RemoteObject.createImmutable(("COMPLEMENTARIO")),(RemoteObject.createImmutable("3"))}))))); - BA.debugLineNum = 132;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE CAT_"; -Debug.ShouldStop(8); -parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE CAT_GUNAPROD SET CAT_GP_TIPOPROD = (?) WHERE CAT_GP_TIPOPROD = (?) ")),(Object)(parent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {RemoteObject.createImmutable(("CATALOGO REGULAR")),(RemoteObject.createImmutable("0"))}))))); - BA.debugLineNum = 133;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE CAT_"; -Debug.ShouldStop(16); -parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE CAT_GUNAPROD SET CAT_GP_TIPOPROD = (?) WHERE CAT_GP_CLASIF = (?) ")),(Object)(parent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {RemoteObject.createImmutable(("PROMOS")),(RemoteObject.createImmutable("PROMOS"))}))))); - BA.debugLineNum = 134;BA.debugLine="clv_prods_ll.GetBase.SetLayoutAnimated(0, 5dip, 1"; -Debug.ShouldStop(32); -__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getbase").runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(parent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 5)))),(Object)(parent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 130)))),(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(10)}, "+",1, 1)),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getHeight"),RemoteObject.createImmutable(0.68)}, "*",0, 0)))); - BA.debugLineNum = 135;BA.debugLine="clv_prods_ll.Base_Resize(clv_prods_ll.GetBase.Wid"; -Debug.ShouldStop(64); -__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runVoidMethod ("_base_resize",(Object)(BA.numberCast(double.class, __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getbase").runMethod(true,"getWidth"))),(Object)(BA.numberCast(double.class, __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getbase").runMethod(true,"getHeight")))); - BA.debugLineNum = 136;BA.debugLine="If B4XPages.MainPage.bTerminarClicked Then"; -Debug.ShouldStop(128); -if (true) break; - -case 1: -//if -this.state = 4; -if (parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_bterminarclicked" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 3; -}if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 137;BA.debugLine="lv_catalogos.Visible = True"; -Debug.ShouldStop(256); -__ref.getField(false,"_lv_catalogos" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"True")); - BA.debugLineNum = 138;BA.debugLine="lv_promos.Visible = False"; -Debug.ShouldStop(512); -__ref.getField(false,"_lv_promos" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 139;BA.debugLine="lv_tipo.Visible = False"; -Debug.ShouldStop(1024); -__ref.getField(false,"_lv_tipo" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 140;BA.debugLine="lv_subtipo.Visible = False"; -Debug.ShouldStop(2048); -__ref.getField(false,"_lv_subtipo" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 141;BA.debugLine="clv_prods_ll.AsView.Visible = False"; -Debug.ShouldStop(4096); -__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 142;BA.debugLine="B4XPages.MainPage.bTerminarClicked = False"; -Debug.ShouldStop(8192); -parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).setField ("_bterminarclicked" /*RemoteObject*/ ,parent.__c.getField(true,"False")); - if (true) break; -; - BA.debugLineNum = 144;BA.debugLine="If ya_entro <> \"1\" Then"; -Debug.ShouldStop(32768); - -case 4: -//if -this.state = 13; -if (RemoteObject.solveBoolean("!",__ref.getField(true,"_ya_entro" /*RemoteObject*/ ),BA.ObjectToString("1"))) { -this.state = 6; -}if (true) break; - -case 6: -//C -this.state = 7; - BA.debugLineNum = 145;BA.debugLine="If BUSCA.Text <> \"\" Then BUSCA.Text =\"\""; -Debug.ShouldStop(65536); -if (true) break; - -case 7: -//if -this.state = 12; -if (RemoteObject.solveBoolean("!",__ref.getField(false,"_busca" /*RemoteObject*/ ).runMethod(true,"getText"),BA.ObjectToString(""))) { -this.state = 9; -;}if (true) break; - -case 9: -//C -this.state = 12; -__ref.getField(false,"_busca" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("")); -if (true) break; - -case 12: -//C -this.state = 13; -; - BA.debugLineNum = 146;BA.debugLine="entro =\"3\""; -Debug.ShouldStop(131072); -__ref.setField ("_entro" /*RemoteObject*/ ,BA.ObjectToString("3")); - BA.debugLineNum = 147;BA.debugLine="lv_catalogos.Clear"; -Debug.ShouldStop(262144); -__ref.getField(false,"_lv_catalogos" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 148;BA.debugLine="Sleep(100)"; -Debug.ShouldStop(524288); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "c_productos", "b4xpage_appear"),BA.numberCast(int.class, 100)); -this.state = 24; -return; -case 24: -//C -this.state = 13; -; - BA.debugLineNum = 149;BA.debugLine="lfila.Text = \"CATALOGOS\""; -Debug.ShouldStop(1048576); -__ref.getField(false,"_lfila" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("CATALOGOS")); - BA.debugLineNum = 150;BA.debugLine="p_productos.Height = Root.Height"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_p_productos" /*RemoteObject*/ ).runMethod(true,"setHeight",__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getHeight")); - BA.debugLineNum = 151;BA.debugLine="clv_prods_ll.AsView.Visible = False"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 152;BA.debugLine="lv_catalogos.Visible = True"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_lv_catalogos" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"True")); - BA.debugLineNum = 153;BA.debugLine="p_botonesVenta.Visible = False"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_p_botonesventa" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 154;BA.debugLine="p_botonesVenta.Top = clv_prods_ll.AsView.top + c"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_p_botonesventa" /*RemoteObject*/ ).runMethod(true,"setTop",RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"getTop"),__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"getHeight"),RemoteObject.createImmutable(25)}, "+-",2, 1)); - BA.debugLineNum = 155;BA.debugLine="lv_promos.Visible = False"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_lv_promos" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - if (true) break; - -case 13: -//C -this.state = 14; -; - BA.debugLineNum = 157;BA.debugLine="Dim label1 As Label"; -Debug.ShouldStop(268435456); -_label1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label1", _label1); - BA.debugLineNum = 158;BA.debugLine="label1 = lv_catalogos.SingleLineLayout.Label"; -Debug.ShouldStop(536870912); -_label1 = __ref.getField(false,"_lv_catalogos" /*RemoteObject*/ ).runMethod(false,"getSingleLineLayout").getField(false,"Label");Debug.locals.put("label1", _label1); - BA.debugLineNum = 159;BA.debugLine="label1.TextSize = 17"; -Debug.ShouldStop(1073741824); -_label1.runMethod(true,"setTextSize",BA.numberCast(float.class, 17)); - BA.debugLineNum = 160;BA.debugLine="label1.TextColor = Colors.Black"; -Debug.ShouldStop(-2147483648); -_label1.runMethod(true,"setTextColor",parent.__c.getField(false,"Colors").getField(true,"Black")); - BA.debugLineNum = 161;BA.debugLine="lv_catalogos.Clear"; -Debug.ShouldStop(1); -__ref.getField(false,"_lv_catalogos" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 162;BA.debugLine="lv_catalogos.AddSingleLine(\"CATALOGO\")"; -Debug.ShouldStop(2); -__ref.getField(false,"_lv_catalogos" /*RemoteObject*/ ).runVoidMethod ("AddSingleLine",(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("CATALOGO")))); - BA.debugLineNum = 163;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"select coun"; -Debug.ShouldStop(4); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select count(*) as hayPromos from cat_gunaprod where CAT_GP_TIPOPROD = 'PROMOS'")))); - BA.debugLineNum = 164;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(8); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 165;BA.debugLine="If c.GetInt(\"hayPromos\") > 0 Then"; -Debug.ShouldStop(16); -if (true) break; - -case 14: -//if -this.state = 17; -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetInt",(Object)(RemoteObject.createImmutable("hayPromos"))),BA.numberCast(double.class, 0))) { -this.state = 16; -}if (true) break; - -case 16: -//C -this.state = 17; - BA.debugLineNum = 166;BA.debugLine="lv_catalogos.AddSingleLine(\"PROMOS\")"; -Debug.ShouldStop(32); -__ref.getField(false,"_lv_catalogos" /*RemoteObject*/ ).runVoidMethod ("AddSingleLine",(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("PROMOS")))); - if (true) break; - -case 17: -//C -this.state = 18; -; - BA.debugLineNum = 168;BA.debugLine="Sleep(100)"; -Debug.ShouldStop(128); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "c_productos", "b4xpage_appear"),BA.numberCast(int.class, 100)); -this.state = 25; -return; -case 25: -//C -this.state = 18; -; - BA.debugLineNum = 169;BA.debugLine="l_total.Visible = False"; -Debug.ShouldStop(256); -__ref.getField(false,"_l_total" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 170;BA.debugLine="l_totProds.Visible = False"; -Debug.ShouldStop(512); -__ref.getField(false,"_l_totprods" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 171;BA.debugLine="l_total.Left = 5dip"; -Debug.ShouldStop(1024); -__ref.getField(false,"_l_total" /*RemoteObject*/ ).runMethod(true,"setLeft",parent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 5)))); - BA.debugLineNum = 172;BA.debugLine="l_totProds.Width = Root.Width * 0.19"; -Debug.ShouldStop(2048); -__ref.getField(false,"_l_totprods" /*RemoteObject*/ ).runMethod(true,"setWidth",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(0.19)}, "*",0, 0))); - BA.debugLineNum = 173;BA.debugLine="l_total.Left = l_totProds.Width + 20"; -Debug.ShouldStop(4096); -__ref.getField(false,"_l_total" /*RemoteObject*/ ).runMethod(true,"setLeft",RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_l_totprods" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(20)}, "+",1, 1)); - BA.debugLineNum = 174;BA.debugLine="l_total.Width = Root.Width * 0.25"; -Debug.ShouldStop(8192); -__ref.getField(false,"_l_total" /*RemoteObject*/ ).runMethod(true,"setWidth",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(0.25)}, "*",0, 0))); - BA.debugLineNum = 176;BA.debugLine="Dim m As Map = Subs.traeTotalesClienteActual"; -Debug.ShouldStop(32768); -_m = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_m = parent._subs.runMethod(false,"_traetotalesclienteactual" /*RemoteObject*/ ,__ref.getField(false, "ba"));Debug.locals.put("m", _m);Debug.locals.put("m", _m); - BA.debugLineNum = 177;BA.debugLine="prodsPedidoActual = m.Get(\"productos\")"; -Debug.ShouldStop(65536); -__ref.setField ("_prodspedidoactual" /*RemoteObject*/ ,BA.ObjectToString(_m.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("productos")))))); - BA.debugLineNum = 178;BA.debugLine="montoPedidoActual = m.Get(\"monto\")"; -Debug.ShouldStop(131072); -__ref.setField ("_montopedidoactual" /*RemoteObject*/ ,BA.ObjectToString(_m.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("monto")))))); - BA.debugLineNum = 179;BA.debugLine="hayPedido = Subs.hayPedido"; -Debug.ShouldStop(262144); -__ref.setField ("_haypedido" /*RemoteObject*/ ,parent._subs.runMethod(true,"_haypedido" /*RemoteObject*/ ,__ref.getField(false, "ba"))); - BA.debugLineNum = 181;BA.debugLine="If reiniciarlistaProds Then"; -Debug.ShouldStop(1048576); -if (true) break; - -case 18: -//if -this.state = 23; -if (__ref.getField(true,"_reiniciarlistaprods" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 20; -}else -{ BA.debugLineNum = 184;BA.debugLine="else If hayPedido Then"; -Debug.ShouldStop(8388608); -if (__ref.getField(true,"_haypedido" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 22; -}} -if (true) break; - -case 20: -//C -this.state = 23; - BA.debugLineNum = 182;BA.debugLine="Log(\"Llamamos LlenaProdsLL\")"; -Debug.ShouldStop(2097152); -parent.__c.runVoidMethod ("LogImpl","323396408",RemoteObject.createImmutable("Llamamos LlenaProdsLL"),0); - BA.debugLineNum = 183;BA.debugLine="LlenaProdsLL(Null)"; -Debug.ShouldStop(4194304); -__ref.runClassMethod (keymon.lat.medicomed.c_productos.class, "_llenaprodsll" /*RemoteObject*/ ,RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"), parent.__c.getField(false,"Null"))); - if (true) break; - -case 22: -//C -this.state = 23; - BA.debugLineNum = 186;BA.debugLine="Log(\"Llamamos LlenaProdsLL\")"; -Debug.ShouldStop(33554432); -parent.__c.runVoidMethod ("LogImpl","323396412",RemoteObject.createImmutable("Llamamos LlenaProdsLL"),0); - BA.debugLineNum = 187;BA.debugLine="LlenaProdsLL(Null)"; -Debug.ShouldStop(67108864); -__ref.runClassMethod (keymon.lat.medicomed.c_productos.class, "_llenaprodsll" /*RemoteObject*/ ,RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"), parent.__c.getField(false,"Null"))); - if (true) break; - -case 23: -//C -this.state = -1; -; - BA.debugLineNum = 189;BA.debugLine="clv_prods_ll.JumpToItem(0) 'Vamos al primer artíc"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runVoidMethod ("_jumptoitem",(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 190;BA.debugLine="PCLV.lblHint.SetTextSizeAnimated(0,13)"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_pclv" /*RemoteObject*/ ).getField(false,"_lblhint" /*RemoteObject*/ ).runVoidMethod ("SetTextSizeAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(float.class, 13))); - BA.debugLineNum = 191;BA.debugLine="PCLV.B4XSeekBar1.Color1=Colors.DarkGray"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_pclv" /*RemoteObject*/ ).getField(false,"_b4xseekbar1" /*RemoteObject*/ ).setField ("_color1" /*RemoteObject*/ ,parent.__c.getField(false,"Colors").getField(true,"DarkGray")); - BA.debugLineNum = 192;BA.debugLine="PCLV.B4XSeekBar1.Color2=Colors.DarkGray"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_pclv" /*RemoteObject*/ ).getField(false,"_b4xseekbar1" /*RemoteObject*/ ).setField ("_color2" /*RemoteObject*/ ,parent.__c.getField(false,"Colors").getField(true,"DarkGray")); - BA.debugLineNum = 193;BA.debugLine="PCLV.B4XSeekBar1.ThumbColor=Colors.red"; -Debug.ShouldStop(1); -__ref.getField(false,"_pclv" /*RemoteObject*/ ).getField(false,"_b4xseekbar1" /*RemoteObject*/ ).setField ("_thumbcolor" /*RemoteObject*/ ,parent.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 194;BA.debugLine="PCLV.B4XSeekBar1.mBase.Left=Root.Width *0.91"; -Debug.ShouldStop(2); -__ref.getField(false,"_pclv" /*RemoteObject*/ ).getField(false,"_b4xseekbar1" /*RemoteObject*/ ).getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"setLeft",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(0.91)}, "*",0, 0))); - BA.debugLineNum = 196;BA.debugLine="PCLV.B4XSeekBar1.mBase.Height=clv_prods_ll.AsView"; -Debug.ShouldStop(8); -__ref.getField(false,"_pclv" /*RemoteObject*/ ).getField(false,"_b4xseekbar1" /*RemoteObject*/ ).getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"setHeight",__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"getHeight")); - BA.debugLineNum = 197;BA.debugLine="PCLV.pnlOverlay.Height = clv_prods_ll.AsView.Heig"; -Debug.ShouldStop(16); -__ref.getField(false,"_pclv" /*RemoteObject*/ ).getField(false,"_pnloverlay" /*RemoteObject*/ ).runMethod(true,"setHeight",__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"getHeight")); - BA.debugLineNum = 198;BA.debugLine="PCLV.B4XSeekBar1.Update"; -Debug.ShouldStop(32); -__ref.getField(false,"_pclv" /*RemoteObject*/ ).getField(false,"_b4xseekbar1" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xseekbar.class, "_update" /*RemoteObject*/ ); - BA.debugLineNum = 199;BA.debugLine="End Sub"; -Debug.ShouldStop(64); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _b4xpage_closerequest(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_CloseRequest (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,375); -if (RapidSub.canDelegate("b4xpage_closerequest")) { return __ref.runUserSub(false, "c_productos","b4xpage_closerequest", __ref);} -ResumableSub_B4XPage_CloseRequest rsub = new ResumableSub_B4XPage_CloseRequest(null,__ref); -rsub.remoteResumableSub = anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSubForFilter(); -rsub.resume(null, null); -return RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.keywords.Common.ResumableSubWrapper"), rsub.remoteResumableSub); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_B4XPage_CloseRequest extends BA.ResumableSub { -public ResumableSub_B4XPage_CloseRequest(keymon.lat.medicomed.c_productos parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.c_productos parent; - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_CloseRequest (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,375); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -{ -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,RemoteObject.createImmutable(null));return;} -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 378;BA.debugLine="If l_info.Visible Then"; -Debug.ShouldStop(33554432); -if (true) break; - -case 1: -//if -this.state = 16; -if (__ref.getField(false,"_l_info" /*RemoteObject*/ ).runMethod(true,"getVisible").get().booleanValue()) { -this.state = 3; -}else -{ BA.debugLineNum = 381;BA.debugLine="else if p_vistaPreviaTrans.Visible Then"; -Debug.ShouldStop(268435456); -if (__ref.getField(false,"_p_vistapreviatrans" /*RemoteObject*/ ).runMethod(true,"getVisible").get().booleanValue()) { -this.state = 5; -}else -{ BA.debugLineNum = 384;BA.debugLine="else if lv_promos.visible Then"; -Debug.ShouldStop(-2147483648); -if (__ref.getField(false,"_lv_promos" /*RemoteObject*/ ).runMethod(true,"getVisible").get().booleanValue()) { -this.state = 7; -}else -{ BA.debugLineNum = 391;BA.debugLine="else if clv_prods_ll.AsView.Visible Then"; -Debug.ShouldStop(64); -if (__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"getVisible").get().booleanValue()) { -this.state = 9; -}else -{ BA.debugLineNum = 410;BA.debugLine="else If entro = \"4\" Then"; -Debug.ShouldStop(33554432); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_entro" /*RemoteObject*/ ),BA.ObjectToString("4"))) { -this.state = 11; -}else -{ BA.debugLineNum = 414;BA.debugLine="Else If entro = \"3\" Then"; -Debug.ShouldStop(536870912); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_entro" /*RemoteObject*/ ),BA.ObjectToString("3"))) { -this.state = 13; -}else { -this.state = 15; -}}}}}} -if (true) break; - -case 3: -//C -this.state = 16; - BA.debugLineNum = 379;BA.debugLine="l_info.Visible = False"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_l_info" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 380;BA.debugLine="Return False"; -Debug.ShouldStop(134217728); -if (true) { -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,(parent.__c.getField(true,"False")));return;}; - if (true) break; - -case 5: -//C -this.state = 16; - BA.debugLineNum = 382;BA.debugLine="p_vistaPreviaTrans.Visible = False"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_p_vistapreviatrans" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 383;BA.debugLine="Return False"; -Debug.ShouldStop(1073741824); -if (true) { -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,(parent.__c.getField(true,"False")));return;}; - if (true) break; - -case 7: -//C -this.state = 16; - BA.debugLineNum = 385;BA.debugLine="lv_promos.Visible = False"; -Debug.ShouldStop(1); -__ref.getField(false,"_lv_promos" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 386;BA.debugLine="lv_catalogos.Visible = True"; -Debug.ShouldStop(2); -__ref.getField(false,"_lv_catalogos" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"True")); - BA.debugLineNum = 387;BA.debugLine="p_botonesVenta.Visible = False"; -Debug.ShouldStop(4); -__ref.getField(false,"_p_botonesventa" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 388;BA.debugLine="l_total.Visible = False"; -Debug.ShouldStop(8); -__ref.getField(false,"_l_total" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 389;BA.debugLine="l_totProds.Visible = False"; -Debug.ShouldStop(16); -__ref.getField(false,"_l_totprods" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 390;BA.debugLine="Return False"; -Debug.ShouldStop(32); -if (true) { -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,(parent.__c.getField(true,"False")));return;}; - if (true) break; - -case 9: -//C -this.state = 16; - BA.debugLineNum = 392;BA.debugLine="lfila.text = \"CATALOGO\""; -Debug.ShouldStop(128); -__ref.getField(false,"_lfila" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("CATALOGO")); - BA.debugLineNum = 393;BA.debugLine="clv_prods_ll.AsView.Visible = False"; -Debug.ShouldStop(256); -__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 394;BA.debugLine="lv_subtipo.Visible = False"; -Debug.ShouldStop(512); -__ref.getField(false,"_lv_subtipo" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 395;BA.debugLine="p_botonesVenta.Visible = False"; -Debug.ShouldStop(1024); -__ref.getField(false,"_p_botonesventa" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 396;BA.debugLine="l_total.Visible = False"; -Debug.ShouldStop(2048); -__ref.getField(false,"_l_total" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 397;BA.debugLine="l_totProds.Visible = False"; -Debug.ShouldStop(4096); -__ref.getField(false,"_l_totprods" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 398;BA.debugLine="lv_catalogos.Visible = True"; -Debug.ShouldStop(8192); -__ref.getField(false,"_lv_catalogos" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"True")); - BA.debugLineNum = 399;BA.debugLine="Return False"; -Debug.ShouldStop(16384); -if (true) { -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,(parent.__c.getField(true,"False")));return;}; - if (true) break; - -case 11: -//C -this.state = 16; - BA.debugLineNum = 411;BA.debugLine="entro = \"3\""; -Debug.ShouldStop(67108864); -__ref.setField ("_entro" /*RemoteObject*/ ,BA.ObjectToString("3")); - BA.debugLineNum = 412;BA.debugLine="B4XPage_Appear"; -Debug.ShouldStop(134217728); -__ref.runClassMethod (keymon.lat.medicomed.c_productos.class, "_b4xpage_appear" /*void*/ ); - BA.debugLineNum = 413;BA.debugLine="Return True"; -Debug.ShouldStop(268435456); -if (true) { -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,(parent.__c.getField(true,"True")));return;}; - if (true) break; - -case 13: -//C -this.state = 16; - BA.debugLineNum = 415;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; -Debug.ShouldStop(1073741824); -parent._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Cliente"))); - BA.debugLineNum = 416;BA.debugLine="Return False"; -Debug.ShouldStop(-2147483648); -if (true) { -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,(parent.__c.getField(true,"False")));return;}; - if (true) break; - -case 15: -//C -this.state = 16; - BA.debugLineNum = 418;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; -Debug.ShouldStop(2); -parent._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Cliente"))); - BA.debugLineNum = 419;BA.debugLine="Return False"; -Debug.ShouldStop(4); -if (true) { -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,(parent.__c.getField(true,"False")));return;}; - if (true) break; - -case 16: -//C -this.state = -1; -; - BA.debugLineNum = 421;BA.debugLine="End Sub"; -Debug.ShouldStop(16); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _b4xpage_created(RemoteObject __ref,RemoteObject _root1) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Created (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,87); -if (RapidSub.canDelegate("b4xpage_created")) { return __ref.runUserSub(false, "c_productos","b4xpage_created", __ref, _root1);} -RemoteObject _label1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -int _i = 0; -Debug.locals.put("Root1", _root1); - BA.debugLineNum = 87;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -Debug.ShouldStop(4194304); - BA.debugLineNum = 88;BA.debugLine="Root = Root1"; -Debug.ShouldStop(8388608); -__ref.setField ("_root" /*RemoteObject*/ ,_root1); - BA.debugLineNum = 91;BA.debugLine="Root.LoadLayout(\"productos\")"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_root" /*RemoteObject*/ ).runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("productos")),__ref.getField(false, "ba")); - BA.debugLineNum = 92;BA.debugLine="ruta = File.DirInternal"; -Debug.ShouldStop(134217728); -__ref.setField ("_ruta" /*RemoteObject*/ ,c_productos.__c.getField(false,"File").runMethod(true,"getDirInternal")); - BA.debugLineNum = 93;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; -Debug.ShouldStop(268435456); -if (RemoteObject.solveBoolean("=",c_productos.__c.getField(false,"File").runMethod(true,"Exists",(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(RemoteObject.createImmutable("kmt.db"))),c_productos.__c.getField(true,"False"))) { - BA.debugLineNum = 94;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; -Debug.ShouldStop(536870912); -c_productos.__c.getField(false,"File").runVoidMethod ("Copy",(Object)(c_productos.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(BA.ObjectToString("kmt.db")),(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(RemoteObject.createImmutable("kmt.db"))); - }; - BA.debugLineNum = 96;BA.debugLine="PCLV.Initialize(Me, \"PCLV\", clv_prods_ll)"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_pclv" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.preoptimizedclv.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref),(Object)(BA.ObjectToString("PCLV")),(Object)(__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ))); - BA.debugLineNum = 97;BA.debugLine="ciclo = 1"; -Debug.ShouldStop(1); -__ref.setField ("_ciclo" /*RemoteObject*/ ,BA.NumberToString(1)); - BA.debugLineNum = 98;BA.debugLine="l_info.Width = Root.Width * 0.8"; -Debug.ShouldStop(2); -__ref.getField(false,"_l_info" /*RemoteObject*/ ).runMethod(true,"setWidth",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(0.8)}, "*",0, 0))); - BA.debugLineNum = 99;BA.debugLine="l_info.Left = (Root.Width/2) - (l_info.Width/2)"; -Debug.ShouldStop(4); -__ref.getField(false,"_l_info" /*RemoteObject*/ ).runMethod(true,"setLeft",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0)),(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_l_info" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0))}, "-",1, 0))); - BA.debugLineNum = 100;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"select dist"; -Debug.ShouldStop(8); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select distinct CAT_GP_TIPO from cat_gunaprod where CAT_GP_TIPO <> 'PROMOS' order by CAT_GP_TIPO")))); - BA.debugLineNum = 101;BA.debugLine="If c.RowCount > 0 Then"; -Debug.ShouldStop(16); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 102;BA.debugLine="Dim label1 As Label"; -Debug.ShouldStop(32); -_label1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label1", _label1); - BA.debugLineNum = 103;BA.debugLine="label1 = lv_tipo.SingleLineLayout.Label"; -Debug.ShouldStop(64); -_label1 = __ref.getField(false,"_lv_tipo" /*RemoteObject*/ ).runMethod(false,"getSingleLineLayout").getField(false,"Label");Debug.locals.put("label1", _label1); - BA.debugLineNum = 104;BA.debugLine="label1.TextSize = 17"; -Debug.ShouldStop(128); -_label1.runMethod(true,"setTextSize",BA.numberCast(float.class, 17)); - BA.debugLineNum = 105;BA.debugLine="label1.TextColor = Colors.Black"; -Debug.ShouldStop(256); -_label1.runMethod(true,"setTextColor",c_productos.__c.getField(false,"Colors").getField(true,"Black")); - BA.debugLineNum = 106;BA.debugLine="lv_tipo.Clear"; -Debug.ShouldStop(512); -__ref.getField(false,"_lv_tipo" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 107;BA.debugLine="For i=0 To c.RowCount-1"; -Debug.ShouldStop(1024); -{ -final int step18 = 1; -final int limit18 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step18 > 0 && _i <= limit18) || (step18 < 0 && _i >= limit18) ;_i = ((int)(0 + _i + step18)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 108;BA.debugLine="c.Position=i"; -Debug.ShouldStop(2048); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 109;BA.debugLine="lv_tipo.AddSingleLine(c.GetString(\"CAT_GP_TIPO\""; -Debug.ShouldStop(4096); -__ref.getField(false,"_lv_tipo" /*RemoteObject*/ ).runVoidMethod ("AddSingleLine",(Object)(BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_TIPO")))))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 112;BA.debugLine="c.Close"; -Debug.ShouldStop(32768); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 115;BA.debugLine="listaTiempos.Initialize"; -Debug.ShouldStop(262144); -__ref.getField(false,"_listatiempos" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 116;BA.debugLine="listaProds.Initialize"; -Debug.ShouldStop(524288); -__ref.getField(false,"_listaprods" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 117;BA.debugLine="pedidoMap.Initialize"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_pedidomap" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 118;BA.debugLine="listaHints.Initialize"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_listahints" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 119;BA.debugLine="Log(\"Llamamos LlenaProdsLL\")"; -Debug.ShouldStop(4194304); -c_productos.__c.runVoidMethod ("LogImpl","323330848",RemoteObject.createImmutable("Llamamos LlenaProdsLL"),0); - BA.debugLineNum = 120;BA.debugLine="LlenaProdsLL(Null)"; -Debug.ShouldStop(8388608); -__ref.runClassMethod (keymon.lat.medicomed.c_productos.class, "_llenaprodsll" /*RemoteObject*/ ,RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"), c_productos.__c.getField(false,"Null"))); - BA.debugLineNum = 121;BA.debugLine="prodsMap.Initialize"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_prodsmap" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 122;BA.debugLine="End Sub"; -Debug.ShouldStop(33554432); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _busca_textchanged(RemoteObject __ref,RemoteObject _old,RemoteObject _new) throws Exception{ -try { - Debug.PushSubsStack("Busca_TextChanged (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,856); -if (RapidSub.canDelegate("busca_textchanged")) { __ref.runUserSub(false, "c_productos","busca_textchanged", __ref, _old, _new); return;} -ResumableSub_Busca_TextChanged rsub = new ResumableSub_Busca_TextChanged(null,__ref,_old,_new); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_Busca_TextChanged extends BA.ResumableSub { -public ResumableSub_Busca_TextChanged(keymon.lat.medicomed.c_productos parent,RemoteObject __ref,RemoteObject _old,RemoteObject _new) { -this.parent = parent; -this.__ref = __ref; -this._old = _old; -this._new = _new; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.c_productos parent; -RemoteObject _old; -RemoteObject _new; -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("Busca_TextChanged (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,856); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); -Debug.locals.put("Old", _old); -Debug.locals.put("New", _new); - BA.debugLineNum = 858;BA.debugLine="If Not(clv_prods_ll.AsView.Visible) Then clv_prod"; -Debug.ShouldStop(33554432); -if (true) break; - -case 1: -//if -this.state = 6; -if (parent.__c.runMethod(true,"Not",(Object)(__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"getVisible"))).get().booleanValue()) { -this.state = 3; -;}if (true) break; - -case 3: -//C -this.state = 6; -__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"setVisible",parent.__c.getField(true,"True")); -if (true) break; - -case 6: -//C -this.state = 7; -; - BA.debugLineNum = 859;BA.debugLine="If (New.Length = 1 Or New.Length = 2) And Not(for"; -Debug.ShouldStop(67108864); -if (true) break; - -case 7: -//if -this.state = 12; -if (RemoteObject.solveBoolean(".",BA.ObjectToBoolean((RemoteObject.solveBoolean("=",_new.runMethod(true,"length"),BA.numberCast(double.class, 1)) || RemoteObject.solveBoolean("=",_new.runMethod(true,"length"),BA.numberCast(double.class, 2))))) && RemoteObject.solveBoolean(".",parent.__c.runMethod(true,"Not",(Object)(__ref.getField(true,"_forzarbusqueda" /*RemoteObject*/ ))))) { -this.state = 9; -;}if (true) break; - -case 9: -//C -this.state = 12; -if (true) return ; -if (true) break; - -case 12: -//C -this.state = -1; -; - BA.debugLineNum = 860;BA.debugLine="forzarBusqueda = False"; -Debug.ShouldStop(134217728); -__ref.setField ("_forzarbusqueda" /*RemoteObject*/ ,parent.__c.getField(true,"False")); - BA.debugLineNum = 861;BA.debugLine="clv_prods_ll.Clear"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runVoidMethod ("_clear"); - BA.debugLineNum = 862;BA.debugLine="listaProds.Initialize"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_listaprods" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 863;BA.debugLine="listaHints.Initialize"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_listahints" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 864;BA.debugLine="Sleep(0)"; -Debug.ShouldStop(-2147483648); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "c_productos", "busca_textchanged"),BA.numberCast(int.class, 0)); -this.state = 13; -return; -case 13: -//C -this.state = -1; -; - BA.debugLineNum = 865;BA.debugLine="Dim p As ResultSet = B4XPages.MainPage.skmt.ExecQ"; -Debug.ShouldStop(1); -_p = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"); -_p = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"), parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("select CAT_GP_ID, CAT_GP_NOMBRE, CAT_GP_ALMACEN, CAT_GP_PRECIO, CAT_GP_TIPOPROD from CAT_GUNAPROD where CAT_GP_NOMBRE like '%"),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_new))),RemoteObject.createImmutable("%' and CAT_GP_PRECIO > 0 AND CAT_GP_ALMACEN > 0 and CAT_GP_CLASIF <> 'PROMOS' And CAT_GP_TIPOPROD2 <> '2' order by CAT_GP_NOMBRE"))))));Debug.locals.put("p", _p);Debug.locals.put("p", _p); - BA.debugLineNum = 866;BA.debugLine="Log(\"Llamamos LlenaProdsLL\")"; -Debug.ShouldStop(2); -parent.__c.runVoidMethod ("LogImpl","325296906",RemoteObject.createImmutable("Llamamos LlenaProdsLL"),0); - BA.debugLineNum = 867;BA.debugLine="LlenaProdsLL(p)"; -Debug.ShouldStop(4); -__ref.runClassMethod (keymon.lat.medicomed.c_productos.class, "_llenaprodsll" /*RemoteObject*/ ,(Object)(_p)); - BA.debugLineNum = 886;BA.debugLine="End Sub"; -Debug.ShouldStop(2097152); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Private Root As B4XView 'ignore"; -c_productos._root = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_root",c_productos._root); - //BA.debugLineNum = 3;BA.debugLine="Private xui As XUI 'ignore"; -c_productos._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",c_productos._xui); - //BA.debugLineNum = 4;BA.debugLine="Dim ruta As String"; -c_productos._ruta = RemoteObject.createImmutable("");__ref.setField("_ruta",c_productos._ruta); - //BA.debugLineNum = 5;BA.debugLine="Dim q_buscar As String"; -c_productos._q_buscar = RemoteObject.createImmutable("");__ref.setField("_q_buscar",c_productos._q_buscar); - //BA.debugLineNum = 6;BA.debugLine="Dim forzarBusqueda As Boolean = False"; -c_productos._forzarbusqueda = c_productos.__c.getField(true,"False");__ref.setField("_forzarbusqueda",c_productos._forzarbusqueda); - //BA.debugLineNum = 7;BA.debugLine="Dim skmt As SQL"; -c_productos._skmt = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL");__ref.setField("_skmt",c_productos._skmt); - //BA.debugLineNum = 8;BA.debugLine="Dim c As Cursor"; -c_productos._c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_c",c_productos._c); - //BA.debugLineNum = 9;BA.debugLine="Dim c2 As Cursor"; -c_productos._c2 = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_c2",c_productos._c2); - //BA.debugLineNum = 10;BA.debugLine="Dim C3 As Cursor"; -c_productos._c3 = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_c3",c_productos._c3); - //BA.debugLineNum = 11;BA.debugLine="Dim s As Cursor"; -c_productos._s = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_s",c_productos._s); - //BA.debugLineNum = 12;BA.debugLine="Dim lv_catalogos As ListView"; -c_productos._lv_catalogos = RemoteObject.createNew ("anywheresoftware.b4a.objects.ListViewWrapper");__ref.setField("_lv_catalogos",c_productos._lv_catalogos); - //BA.debugLineNum = 13;BA.debugLine="Dim lv_promos As ListView"; -c_productos._lv_promos = RemoteObject.createNew ("anywheresoftware.b4a.objects.ListViewWrapper");__ref.setField("_lv_promos",c_productos._lv_promos); - //BA.debugLineNum = 14;BA.debugLine="Dim entro As String"; -c_productos._entro = RemoteObject.createImmutable("");__ref.setField("_entro",c_productos._entro); - //BA.debugLineNum = 15;BA.debugLine="Dim gest As Button"; -c_productos._gest = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_gest",c_productos._gest); - //BA.debugLineNum = 16;BA.debugLine="Dim lfila As Label"; -c_productos._lfila = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_lfila",c_productos._lfila); - //BA.debugLineNum = 17;BA.debugLine="Dim marca As String"; -c_productos._marca = RemoteObject.createImmutable("");__ref.setField("_marca",c_productos._marca); - //BA.debugLineNum = 18;BA.debugLine="Dim tipo As String"; -c_productos._tipo = RemoteObject.createImmutable("");__ref.setField("_tipo",c_productos._tipo); - //BA.debugLineNum = 19;BA.debugLine="Dim subtipo As String"; -c_productos._subtipo = RemoteObject.createImmutable("");__ref.setField("_subtipo",c_productos._subtipo); - //BA.debugLineNum = 20;BA.debugLine="Private BUSCA As EditText"; -c_productos._busca = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");__ref.setField("_busca",c_productos._busca); - //BA.debugLineNum = 21;BA.debugLine="Dim ya_entro As String"; -c_productos._ya_entro = RemoteObject.createImmutable("");__ref.setField("_ya_entro",c_productos._ya_entro); - //BA.debugLineNum = 22;BA.debugLine="Dim TIENE_PROMOS As String"; -c_productos._tiene_promos = RemoteObject.createImmutable("");__ref.setField("_tiene_promos",c_productos._tiene_promos); - //BA.debugLineNum = 23;BA.debugLine="Dim RES As String"; -c_productos._res = RemoteObject.createImmutable("");__ref.setField("_res",c_productos._res); - //BA.debugLineNum = 24;BA.debugLine="Dim S1 As Cursor"; -c_productos._s1 = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_s1",c_productos._s1); - //BA.debugLineNum = 25;BA.debugLine="Dim bmp As Bitmap"; -c_productos._bmp = RemoteObject.createNew ("anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper");__ref.setField("_bmp",c_productos._bmp); - //BA.debugLineNum = 26;BA.debugLine="Dim ciclo As String"; -c_productos._ciclo = RemoteObject.createImmutable("");__ref.setField("_ciclo",c_productos._ciclo); - //BA.debugLineNum = 27;BA.debugLine="Private b_qr As Button"; -c_productos._b_qr = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_qr",c_productos._b_qr); - //BA.debugLineNum = 28;BA.debugLine="Private p_productos As Panel"; -c_productos._p_productos = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_productos",c_productos._p_productos); - //BA.debugLineNum = 29;BA.debugLine="Dim clv_productos As CustomListView"; -c_productos._clv_productos = RemoteObject.createNew ("b4a.example3.customlistview");__ref.setField("_clv_productos",c_productos._clv_productos); - //BA.debugLineNum = 30;BA.debugLine="Private ImageView1 As ImageView"; -c_productos._imageview1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");__ref.setField("_imageview1",c_productos._imageview1); - //BA.debugLineNum = 31;BA.debugLine="Private Panel3 As Panel"; -c_productos._panel3 = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_panel3",c_productos._panel3); - //BA.debugLineNum = 32;BA.debugLine="Private p_prods As Panel"; -c_productos._p_prods = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_prods",c_productos._p_prods); - //BA.debugLineNum = 33;BA.debugLine="Private i_prod As ImageView"; -c_productos._i_prod = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");__ref.setField("_i_prod",c_productos._i_prod); - //BA.debugLineNum = 34;BA.debugLine="Private l_prodX As Label"; -c_productos._l_prodx = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_prodx",c_productos._l_prodx); - //BA.debugLineNum = 35;BA.debugLine="Private b_prodMas As Button"; -c_productos._b_prodmas = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_prodmas",c_productos._b_prodmas); - //BA.debugLineNum = 36;BA.debugLine="Private l_pCant As Label"; -c_productos._l_pcant = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_pcant",c_productos._l_pcant); - //BA.debugLineNum = 37;BA.debugLine="Private et_pCant As EditText"; -c_productos._et_pcant = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");__ref.setField("_et_pcant",c_productos._et_pcant); - //BA.debugLineNum = 38;BA.debugLine="Private b_prodMenos As Button"; -c_productos._b_prodmenos = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_prodmenos",c_productos._b_prodmenos); - //BA.debugLineNum = 39;BA.debugLine="Dim b_terminar1 As Button"; -c_productos._b_terminar1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_terminar1",c_productos._b_terminar1); - //BA.debugLineNum = 40;BA.debugLine="Dim b_continuar As Button"; -c_productos._b_continuar = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_continuar",c_productos._b_continuar); - //BA.debugLineNum = 41;BA.debugLine="Private l_total As Label"; -c_productos._l_total = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_total",c_productos._l_total); - //BA.debugLineNum = 42;BA.debugLine="Private l_totProds As Label"; -c_productos._l_totprods = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_totprods",c_productos._l_totprods); - //BA.debugLineNum = 43;BA.debugLine="Dim totalProds As Int = 0"; -c_productos._totalprods = BA.numberCast(int.class, 0);__ref.setField("_totalprods",c_productos._totalprods); - //BA.debugLineNum = 44;BA.debugLine="Dim totalCompra As Float = 0"; -c_productos._totalcompra = BA.numberCast(float.class, 0);__ref.setField("_totalcompra",c_productos._totalcompra); - //BA.debugLineNum = 45;BA.debugLine="Dim etCantHasFocus As Boolean = False"; -c_productos._etcanthasfocus = c_productos.__c.getField(true,"False");__ref.setField("_etcanthasfocus",c_productos._etcanthasfocus); - //BA.debugLineNum = 46;BA.debugLine="Dim prodsMap As Map"; -c_productos._prodsmap = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");__ref.setField("_prodsmap",c_productos._prodsmap); - //BA.debugLineNum = 47;BA.debugLine="Private l_Cargando As Label"; -c_productos._l_cargando = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_cargando",c_productos._l_cargando); - //BA.debugLineNum = 48;BA.debugLine="Private l_info As Label"; -c_productos._l_info = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_info",c_productos._l_info); - //BA.debugLineNum = 49;BA.debugLine="Private b_buscar As Button"; -c_productos._b_buscar = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_buscar",c_productos._b_buscar); - //BA.debugLineNum = 50;BA.debugLine="Private p_botonesVenta As Panel"; -c_productos._p_botonesventa = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_botonesventa",c_productos._p_botonesventa); - //BA.debugLineNum = 51;BA.debugLine="Private lv_tipo As ListView"; -c_productos._lv_tipo = RemoteObject.createNew ("anywheresoftware.b4a.objects.ListViewWrapper");__ref.setField("_lv_tipo",c_productos._lv_tipo); - //BA.debugLineNum = 52;BA.debugLine="Private lv_subtipo As ListView"; -c_productos._lv_subtipo = RemoteObject.createNew ("anywheresoftware.b4a.objects.ListViewWrapper");__ref.setField("_lv_subtipo",c_productos._lv_subtipo); - //BA.debugLineNum = 53;BA.debugLine="Private p_vistaPreviaTrans As Panel"; -c_productos._p_vistapreviatrans = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_vistapreviatrans",c_productos._p_vistapreviatrans); - //BA.debugLineNum = 54;BA.debugLine="Private lv_prodsPedido As ListView"; -c_productos._lv_prodspedido = RemoteObject.createNew ("anywheresoftware.b4a.objects.ListViewWrapper");__ref.setField("_lv_prodspedido",c_productos._lv_prodspedido); - //BA.debugLineNum = 55;BA.debugLine="Private b_rechazar As Button"; -c_productos._b_rechazar = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_rechazar",c_productos._b_rechazar); - //BA.debugLineNum = 56;BA.debugLine="Private b_aceptar As Button"; -c_productos._b_aceptar = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_aceptar",c_productos._b_aceptar); - //BA.debugLineNum = 57;BA.debugLine="Private p_vistaPrevia As Panel"; -c_productos._p_vistaprevia = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_vistaprevia",c_productos._p_vistaprevia); - //BA.debugLineNum = 58;BA.debugLine="Dim folio As String"; -c_productos._folio = RemoteObject.createImmutable("");__ref.setField("_folio",c_productos._folio); - //BA.debugLineNum = 59;BA.debugLine="Dim result As String"; -c_productos._result = RemoteObject.createImmutable("");__ref.setField("_result",c_productos._result); - //BA.debugLineNum = 60;BA.debugLine="Private l_cant As Label"; -c_productos._l_cant = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_cant",c_productos._l_cant); - //BA.debugLineNum = 61;BA.debugLine="Private l_total2 As Label"; -c_productos._l_total2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_total2",c_productos._l_total2); - //BA.debugLineNum = 62;BA.debugLine="Dim prodsPedidoActual As String"; -c_productos._prodspedidoactual = RemoteObject.createImmutable("");__ref.setField("_prodspedidoactual",c_productos._prodspedidoactual); - //BA.debugLineNum = 63;BA.debugLine="Dim montoPedidoActual As String"; -c_productos._montopedidoactual = RemoteObject.createImmutable("");__ref.setField("_montopedidoactual",c_productos._montopedidoactual); - //BA.debugLineNum = 65;BA.debugLine="Private clv_prods_ll As CustomListView"; -c_productos._clv_prods_ll = RemoteObject.createNew ("b4a.example3.customlistview");__ref.setField("_clv_prods_ll",c_productos._clv_prods_ll); - //BA.debugLineNum = 66;BA.debugLine="Private PCLV As PreoptimizedCLV"; -c_productos._pclv = RemoteObject.createNew ("keymon.lat.medicomed.preoptimizedclv");__ref.setField("_pclv",c_productos._pclv); - //BA.debugLineNum = 67;BA.debugLine="Dim listaProds As List"; -c_productos._listaprods = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_listaprods",c_productos._listaprods); - //BA.debugLineNum = 69;BA.debugLine="Dim pedidoMap As Map"; -c_productos._pedidomap = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");__ref.setField("_pedidomap",c_productos._pedidomap); - //BA.debugLineNum = 70;BA.debugLine="Private p_botMasMen As Panel"; -c_productos._p_botmasmen = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_botmasmen",c_productos._p_botmasmen); - //BA.debugLineNum = 71;BA.debugLine="Dim reiniciarlistaProds As Boolean= False"; -c_productos._reiniciarlistaprods = c_productos.__c.getField(true,"False");__ref.setField("_reiniciarlistaprods",c_productos._reiniciarlistaprods); - //BA.debugLineNum = 73;BA.debugLine="Dim listaTiempos As List"; -c_productos._listatiempos = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_listatiempos",c_productos._listatiempos); - //BA.debugLineNum = 74;BA.debugLine="Dim clienteId As String"; -c_productos._clienteid = RemoteObject.createImmutable("");__ref.setField("_clienteid",c_productos._clienteid); - //BA.debugLineNum = 75;BA.debugLine="Dim rutaUsuario As String"; -c_productos._rutausuario = RemoteObject.createImmutable("");__ref.setField("_rutausuario",c_productos._rutausuario); - //BA.debugLineNum = 76;BA.debugLine="Dim hayPedido As Boolean"; -c_productos._haypedido = RemoteObject.createImmutable(false);__ref.setField("_haypedido",c_productos._haypedido); - //BA.debugLineNum = 77;BA.debugLine="Dim listaHints As List"; -c_productos._listahints = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_listahints",c_productos._listahints); - //BA.debugLineNum = 78;BA.debugLine="Dim h As Cursor"; -c_productos._h = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_h",c_productos._h); - //BA.debugLineNum = 79;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _clv_prods_ll_itemclick(RemoteObject __ref,RemoteObject _index,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("clv_prods_ll_ItemClick (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,801); -if (RapidSub.canDelegate("clv_prods_ll_itemclick")) { return __ref.runUserSub(false, "c_productos","clv_prods_ll_itemclick", __ref, _index, _value);} -Debug.locals.put("Index", _index); -Debug.locals.put("Value", _value); - BA.debugLineNum = 801;BA.debugLine="Private Sub clv_prods_ll_ItemClick (Index As Int,"; -Debug.ShouldStop(1); - BA.debugLineNum = 803;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _clv_prods_ll_visiblerangechanged(RemoteObject __ref,RemoteObject _firstindex,RemoteObject _lastindex) throws Exception{ -try { - Debug.PushSubsStack("clv_prods_ll_VisibleRangeChanged (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,815); -if (RapidSub.canDelegate("clv_prods_ll_visiblerangechanged")) { return __ref.runUserSub(false, "c_productos","clv_prods_ll_visiblerangechanged", __ref, _firstindex, _lastindex);} -RemoteObject _extrasize = RemoteObject.createImmutable(0); -int _i = 0; -RemoteObject _pnl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _cs = RemoteObject.declareNull("anywheresoftware.b4a.objects.CSBuilder"); -RemoteObject _precio = RemoteObject.createImmutable(""); -Debug.locals.put("FirstIndex", _firstindex); -Debug.locals.put("LastIndex", _lastindex); - BA.debugLineNum = 815;BA.debugLine="Private Sub clv_prods_ll_VisibleRangeChanged (Firs"; -Debug.ShouldStop(16384); - BA.debugLineNum = 818;BA.debugLine="Dim ExtraSize As Int = 30 'List size"; -Debug.ShouldStop(131072); -_extrasize = BA.numberCast(int.class, 30);Debug.locals.put("ExtraSize", _extrasize);Debug.locals.put("ExtraSize", _extrasize); - BA.debugLineNum = 819;BA.debugLine="For i = Max(0, FirstIndex - ExtraSize) To Min(Las"; -Debug.ShouldStop(262144); -{ -final int step2 = 1; -final int limit2 = (int) (0 + c_productos.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {_lastindex,_extrasize}, "+",1, 1))),(Object)(BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(true,"_getsize"),RemoteObject.createImmutable(1)}, "-",1, 1)))).get().doubleValue()); -_i = (int) (0 + c_productos.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, 0)),(Object)(BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {_firstindex,_extrasize}, "-",1, 1)))).get().doubleValue()) ; -for (;(step2 > 0 && _i <= limit2) || (step2 < 0 && _i >= limit2) ;_i = ((int)(0 + _i + step2)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 820;BA.debugLine="Dim Pnl As B4XView = clv_prods_ll.GetPanel(i)"; -Debug.ShouldStop(524288); -_pnl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_pnl = __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getpanel",(Object)(BA.numberCast(int.class, _i)));Debug.locals.put("Pnl", _pnl);Debug.locals.put("Pnl", _pnl); - BA.debugLineNum = 821;BA.debugLine="If i > FirstIndex - ExtraSize And i < LastIndex"; -Debug.ShouldStop(1048576); -if (RemoteObject.solveBoolean(">",RemoteObject.createImmutable(_i),BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {_firstindex,_extrasize}, "-",1, 1))) && RemoteObject.solveBoolean("<",RemoteObject.createImmutable(_i),BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {_lastindex,_extrasize}, "+",1, 1)))) { - BA.debugLineNum = 823;BA.debugLine="If Pnl.NumberOfViews = 0 Then 'Add each item/la"; -Debug.ShouldStop(4194304); -if (RemoteObject.solveBoolean("=",_pnl.runMethod(true,"getNumberOfViews"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 824;BA.debugLine="Pnl.LoadLayout(\"proditem\")"; -Debug.ShouldStop(8388608); -_pnl.runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("proditem")),__ref.getField(false, "ba")); - BA.debugLineNum = 825;BA.debugLine="p_prods.Width = Root.Width * 0.92"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_p_prods" /*RemoteObject*/ ).runMethod(true,"setWidth",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(0.92)}, "*",0, 0))); - BA.debugLineNum = 826;BA.debugLine="p_botMasMen.Left = p_prods.Width - (p_botMasMe"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_p_botmasmen" /*RemoteObject*/ ).runMethod(true,"setLeft",RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_p_prods" /*RemoteObject*/ ).runMethod(true,"getWidth"),(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_p_botmasmen" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(5)}, "+",1, 1))}, "-",1, 1)); - BA.debugLineNum = 827;BA.debugLine="Pnl.Height = p_prods.Height"; -Debug.ShouldStop(67108864); -_pnl.runMethod(true,"setHeight",__ref.getField(false,"_p_prods" /*RemoteObject*/ ).runMethod(true,"getHeight")); - BA.debugLineNum = 828;BA.debugLine="Private cs As CSBuilder"; -Debug.ShouldStop(134217728); -_cs = RemoteObject.createNew ("anywheresoftware.b4a.objects.CSBuilder");Debug.locals.put("cs", _cs); - BA.debugLineNum = 829;BA.debugLine="cs.Initialize"; -Debug.ShouldStop(268435456); -_cs.runVoidMethod ("Initialize"); - BA.debugLineNum = 830;BA.debugLine="l_prodX.SetTextSizeAnimated(0, 13)"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_l_prodx" /*RemoteObject*/ ).runVoidMethod ("SetTextSizeAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(float.class, 13))); - BA.debugLineNum = 831;BA.debugLine="If clv_prods_ll.GetValue(i).As(Map).Get(\"cant\""; -Debug.ShouldStop(1073741824); -if (RemoteObject.solveBoolean("N",(RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getvalue",(Object)(BA.numberCast(int.class, _i))))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("cant"))))) && RemoteObject.solveBoolean(">",BA.numberCast(double.class, (RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getvalue",(Object)(BA.numberCast(int.class, _i))))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("cant"))))),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 832;BA.debugLine="p_prods.Color=0xFFE2EEFF"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_p_prods" /*RemoteObject*/ ).runVoidMethod ("setColor",BA.numberCast(int.class, ((int)0xffe2eeff))); - BA.debugLineNum = 833;BA.debugLine="et_pCant.TextColor=Colors.Red"; -Debug.ShouldStop(1); -__ref.getField(false,"_et_pcant" /*RemoteObject*/ ).runMethod(true,"setTextColor",c_productos.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 834;BA.debugLine="If Subs.pedidoGuardado Then"; -Debug.ShouldStop(2); -if (c_productos._subs.runMethod(true,"_pedidoguardado" /*RemoteObject*/ ,__ref.getField(false, "ba")).get().booleanValue()) { - BA.debugLineNum = 835;BA.debugLine="Log(\"YA SE GUARDO\")"; -Debug.ShouldStop(4); -c_productos.__c.runVoidMethod ("LogImpl","325231380",RemoteObject.createImmutable("YA SE GUARDO"),0); - BA.debugLineNum = 836;BA.debugLine="et_pCant.Enabled = False"; -Debug.ShouldStop(8); -__ref.getField(false,"_et_pcant" /*RemoteObject*/ ).runMethod(true,"setEnabled",c_productos.__c.getField(true,"False")); - BA.debugLineNum = 838;BA.debugLine="b_prodMenos.Enabled = False"; -Debug.ShouldStop(32); -__ref.getField(false,"_b_prodmenos" /*RemoteObject*/ ).runMethod(true,"setEnabled",c_productos.__c.getField(true,"False")); - }; - }; - BA.debugLineNum = 841;BA.debugLine="Private precio As String=NumberFormat2(clv_pro"; -Debug.ShouldStop(256); -_precio = c_productos.__c.runMethod(true,"NumberFormat2",(Object)((BA.numberCast(double.class, (RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getvalue",(Object)(BA.numberCast(int.class, _i))))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("precio"))))))),(Object)(BA.numberCast(int.class, 1)),(Object)(BA.numberCast(int.class, 2)),(Object)(BA.numberCast(int.class, 2)),(Object)(c_productos.__c.getField(true,"False")));Debug.locals.put("precio", _precio);Debug.locals.put("precio", _precio); - BA.debugLineNum = 842;BA.debugLine="If clv_prods_ll.GetValue(i).As(Map).Get(\"cant\""; -Debug.ShouldStop(512); -if (RemoteObject.solveBoolean("N",(RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getvalue",(Object)(BA.numberCast(int.class, _i))))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("cant")))))) { -__ref.getField(false,"_et_pcant" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence((RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getvalue",(Object)(BA.numberCast(int.class, _i))))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("cant"))))));}; - BA.debugLineNum = 843;BA.debugLine="l_prodX.Text = cs.Color(Colors.red).append(clv"; -Debug.ShouldStop(1024); -__ref.getField(false,"_l_prodx" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(_cs.runMethod(false,"Color",(Object)(c_productos.__c.getField(false,"Colors").getField(true,"Red"))).runMethod(false,"Append",(Object)(BA.ObjectToCharSequence((RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getvalue",(Object)(BA.numberCast(int.class, _i))))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prod"))))))).runMethod(false,"Pop").runMethod(false,"Append",(Object)(BA.ObjectToCharSequence(c_productos.__c.getField(true,"CRLF")))).runMethod(false,"Append",(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("Existencias: "),(RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getvalue",(Object)(BA.numberCast(int.class, _i))))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("almacen")))))))).runMethod(false,"Color",(Object)(BA.numberCast(int.class, ((int)0xff017f01)))).runMethod(false,"Append",(Object)(BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable(" $"),c_productos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_precio))),RemoteObject.createImmutable("")))))).runMethod(false,"PopAll").getObject())); - }; - }else { - }; - BA.debugLineNum = 851;BA.debugLine="PCLV.B4XSeekBar1.Value = clv_prods_ll.Size - Fir"; -Debug.ShouldStop(262144); -__ref.getField(false,"_pclv" /*RemoteObject*/ ).getField(false,"_b4xseekbar1" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xseekbar.class, "_setvalue" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(true,"_getsize"),_firstindex}, "-",1, 1)); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 854;BA.debugLine="End Sub"; -Debug.ShouldStop(2097152); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createlistitem(RemoteObject __ref,RemoteObject _text,RemoteObject _preciou,RemoteObject _inv,RemoteObject _width,RemoteObject _height,RemoteObject _img,RemoteObject _prodid,RemoteObject _bc,RemoteObject _tc) throws Exception{ -try { - Debug.PushSubsStack("CreateListItem (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,452); -if (RapidSub.canDelegate("createlistitem")) { return __ref.runUserSub(false, "c_productos","createlistitem", __ref, _text, _preciou, _inv, _width, _height, _img, _prodid, _bc, _tc);} -Debug.locals.put("Text", _text); -Debug.locals.put("precioU", _preciou); -Debug.locals.put("inv", _inv); -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); -Debug.locals.put("img", _img); -Debug.locals.put("prodId", _prodid); -Debug.locals.put("bc", _bc); -Debug.locals.put("tc", _tc); - BA.debugLineNum = 452;BA.debugLine="Sub CreateListItem(Text As String, precioU As Stri"; -Debug.ShouldStop(8); - BA.debugLineNum = 467;BA.debugLine="End Sub"; -Debug.ShouldStop(262144); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _cuentaprods(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("cuentaProds (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,558); -if (RapidSub.canDelegate("cuentaprods")) { return __ref.runUserSub(false, "c_productos","cuentaprods", __ref);} - BA.debugLineNum = 558;BA.debugLine="Sub cuentaProds"; -Debug.ShouldStop(8192); - BA.debugLineNum = 560;BA.debugLine="Log(\"===========================\")"; -Debug.ShouldStop(32768); -c_productos.__c.runVoidMethod ("LogImpl","324182786",RemoteObject.createImmutable("==========================="),0); - BA.debugLineNum = 561;BA.debugLine="Private c As Cursor = B4XPages.MainPage.skmt.Exec"; -Debug.ShouldStop(65536); -c_productos._c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -c_productos._c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("select sum(PE_COSTO_TOT) as total, sum(PE_CANT) as cant from PEDIDO where PE_CLIENTE = '"),c_productos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_clienteid" /*RemoteObject*/ )))),RemoteObject.createImmutable("'"))))));__ref.setField("_c",c_productos._c); - BA.debugLineNum = 564;BA.debugLine="p_botonesVenta.Visible = True"; -Debug.ShouldStop(524288); -__ref.getField(false,"_p_botonesventa" /*RemoteObject*/ ).runMethod(true,"setVisible",c_productos.__c.getField(true,"True")); - BA.debugLineNum = 565;BA.debugLine="p_botonesVenta.BringToFront"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_p_botonesventa" /*RemoteObject*/ ).runVoidMethod ("BringToFront"); - BA.debugLineNum = 566;BA.debugLine="c.Position=0"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 567;BA.debugLine="Log($\"Total Prods: ${c.GetString(\"cant\")}, Total"; -Debug.ShouldStop(4194304); -c_productos.__c.runVoidMethod ("LogImpl","324182793",(RemoteObject.concat(RemoteObject.createImmutable("Total Prods: "),c_productos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("cant")))))),RemoteObject.createImmutable(", Total Compra: $"),c_productos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("1.2")),(Object)((__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("total")))))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 568;BA.debugLine="c.Close"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 569;BA.debugLine="End Sub"; -Debug.ShouldStop(16777216); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _et_pcant_focuschanged(RemoteObject __ref,RemoteObject _hasfocus) throws Exception{ -try { - Debug.PushSubsStack("et_pCant_FocusChanged (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,571); -if (RapidSub.canDelegate("et_pcant_focuschanged")) { return __ref.runUserSub(false, "c_productos","et_pcant_focuschanged", __ref, _hasfocus);} -Debug.locals.put("HasFocus", _hasfocus); - BA.debugLineNum = 571;BA.debugLine="Private Sub et_pCant_FocusChanged (HasFocus As Boo"; -Debug.ShouldStop(67108864); - BA.debugLineNum = 572;BA.debugLine="LogColor($\"focus changed=${HasFocus}\"$, Colors.Ma"; -Debug.ShouldStop(134217728); -c_productos.__c.runVoidMethod ("LogImpl","324248321",(RemoteObject.concat(RemoteObject.createImmutable("focus changed="),c_productos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_hasfocus))),RemoteObject.createImmutable(""))),c_productos.__c.getField(false,"Colors").getField(true,"Magenta")); - BA.debugLineNum = 573;BA.debugLine="etCantHasFocus = HasFocus"; -Debug.ShouldStop(268435456); -__ref.setField ("_etcanthasfocus" /*RemoteObject*/ ,_hasfocus); - BA.debugLineNum = 574;BA.debugLine="cuentaProds"; -Debug.ShouldStop(536870912); -__ref.runClassMethod (keymon.lat.medicomed.c_productos.class, "_cuentaprods" /*RemoteObject*/ ); - BA.debugLineNum = 575;BA.debugLine="End Sub"; -Debug.ShouldStop(1073741824); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _et_pcant_textchanged(RemoteObject __ref,RemoteObject _old,RemoteObject _new) throws Exception{ -try { - Debug.PushSubsStack("et_pCant_TextChanged (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,523); -if (RapidSub.canDelegate("et_pcant_textchanged")) { return __ref.runUserSub(false, "c_productos","et_pcant_textchanged", __ref, _old, _new);} -RemoteObject _index = RemoteObject.createImmutable(0); -RemoteObject _pnl0 = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _pnl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _lacant = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _id = RemoteObject.createImmutable(""); -RemoteObject _precio = RemoteObject.createImmutable(""); -RemoteObject _inv = RemoteObject.createImmutable(""); -Debug.locals.put("Old", _old); -Debug.locals.put("New", _new); - BA.debugLineNum = 523;BA.debugLine="Private Sub et_pCant_TextChanged (Old As String, N"; -Debug.ShouldStop(1024); - BA.debugLineNum = 535;BA.debugLine="If etCantHasFocus = True Then"; -Debug.ShouldStop(4194304); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_etcanthasfocus" /*RemoteObject*/ ),c_productos.__c.getField(true,"True"))) { - BA.debugLineNum = 538;BA.debugLine="Dim index As Int = clv_prods_ll.GetItemFromView("; -Debug.ShouldStop(33554432); -_index = __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(true,"_getitemfromview",RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), c_productos.__c.runMethod(false,"Sender",__ref.getField(false, "ba"))));Debug.locals.put("index", _index);Debug.locals.put("index", _index); - BA.debugLineNum = 539;BA.debugLine="Dim pnl0 As B4XView = clv_prods_ll.GetPanel(inde"; -Debug.ShouldStop(67108864); -_pnl0 = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_pnl0 = __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getpanel",(Object)(_index));Debug.locals.put("pnl0", _pnl0);Debug.locals.put("pnl0", _pnl0); - BA.debugLineNum = 540;BA.debugLine="Dim pnl As B4XView = pnl0.GetView(0)"; -Debug.ShouldStop(134217728); -_pnl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_pnl = _pnl0.runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0)));Debug.locals.put("pnl", _pnl);Debug.locals.put("pnl", _pnl); - BA.debugLineNum = 541;BA.debugLine="Dim laCant As B4XView = pnl.GetView(2).GetView(2"; -Debug.ShouldStop(268435456); -_lacant = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_lacant = _pnl.runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 2))).runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 2)));Debug.locals.put("laCant", _lacant);Debug.locals.put("laCant", _lacant); - BA.debugLineNum = 542;BA.debugLine="Private id As String=clv_prods_ll.GetValue(index"; -Debug.ShouldStop(536870912); -_id = BA.ObjectToString((RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getvalue",(Object)(_index)))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("id")))));Debug.locals.put("id", _id);Debug.locals.put("id", _id); - BA.debugLineNum = 543;BA.debugLine="Private precio As String=clv_prods_ll.GetValue(i"; -Debug.ShouldStop(1073741824); -_precio = BA.ObjectToString((RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getvalue",(Object)(_index)))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("precio")))));Debug.locals.put("precio", _precio);Debug.locals.put("precio", _precio); - BA.debugLineNum = 544;BA.debugLine="Private inv As String=clv_prods_ll.GetValue(inde"; -Debug.ShouldStop(-2147483648); -_inv = BA.ObjectToString((RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getvalue",(Object)(_index)))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("almacen")))));Debug.locals.put("inv", _inv);Debug.locals.put("inv", _inv); - BA.debugLineNum = 545;BA.debugLine="Private inv As String=clv_prods_ll.GetValue(inde"; -Debug.ShouldStop(1); -_inv = BA.ObjectToString((RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getvalue",(Object)(_index)))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("almacen")))));Debug.locals.put("inv", _inv);Debug.locals.put("inv", _inv); - BA.debugLineNum = 546;BA.debugLine="If(New = \"\" Or New = Null) Then New = 0"; -Debug.ShouldStop(2); -if ((RemoteObject.solveBoolean("=",_new,BA.ObjectToString("")) || RemoteObject.solveBoolean("n",_new))) { -_new = BA.NumberToString(0);Debug.locals.put("New", _new);}; - BA.debugLineNum = 547;BA.debugLine="If(New > inv) Then"; -Debug.ShouldStop(4); -if ((RemoteObject.solveBoolean(">",BA.numberCast(double.class, _new),BA.numberCast(double.class, _inv)))) { - BA.debugLineNum = 548;BA.debugLine="Sender.As(EditText).text = inv"; -Debug.ShouldStop(8); -(RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.EditTextWrapper"), c_productos.__c.runMethod(false,"Sender",__ref.getField(false, "ba")))).runMethodAndSync(true,"setText",BA.ObjectToCharSequence(_inv)); - }; - BA.debugLineNum = 551;BA.debugLine="If Not(Old = \"0\" And New = \"\") And laCant.Text <"; -Debug.ShouldStop(64); -if (RemoteObject.solveBoolean(".",c_productos.__c.runMethod(true,"Not",(Object)(BA.ObjectToBoolean(RemoteObject.solveBoolean("=",_old,BA.ObjectToString("0")) && RemoteObject.solveBoolean("=",_new,RemoteObject.createImmutable("")))))) && RemoteObject.solveBoolean("N",_lacant.runMethod(true,"getText")) && RemoteObject.solveBoolean("!",_lacant.runMethod(true,"getText"),BA.NumberToString(0)) && RemoteObject.solveBoolean("!",_lacant.runMethod(true,"getText"),BA.ObjectToString("")) && RemoteObject.solveBoolean(".",__ref.getField(true,"_etcanthasfocus" /*RemoteObject*/ ))) { - BA.debugLineNum = 552;BA.debugLine="Subs.actualizaProducto(Subs.traeAlmacen, precio"; -Debug.ShouldStop(128); -c_productos._subs.runVoidMethod ("_actualizaproducto" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(c_productos._subs.runMethod(true,"_traealmacen" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(_precio),(Object)(_lacant.runMethod(true,"getText")),(Object)(c_productos._subs.runMethod(true,"_traeprodnombre" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(_id))),(Object)(_id),(Object)(__ref.getField(true,"_clienteid" /*RemoteObject*/ )),(Object)(c_productos._subs.runMethod(true,"_traefecha" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(c_productos._subs.runMethod(true,"_traeusuariodebd" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(__ref.getField(true,"_rutausuario" /*RemoteObject*/ )),(Object)(BA.NumberToString(0)),(Object)(c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_tipo_venta" /*RemoteObject*/ ))); - BA.debugLineNum = 553;BA.debugLine="cuentaProds"; -Debug.ShouldStop(256); -__ref.runClassMethod (keymon.lat.medicomed.c_productos.class, "_cuentaprods" /*RemoteObject*/ ); - }; - }; - BA.debugLineNum = 556;BA.debugLine="End Sub"; -Debug.ShouldStop(2048); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,82); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "c_productos","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 82;BA.debugLine="Public Sub Initialize As Object"; -Debug.ShouldStop(131072); - BA.debugLineNum = 83;BA.debugLine="Return Me"; -Debug.ShouldStop(262144); -if (true) return __ref; - BA.debugLineNum = 84;BA.debugLine="End Sub"; -Debug.ShouldStop(524288); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _l_info_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("l_info_Click (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,651); -if (RapidSub.canDelegate("l_info_click")) { return __ref.runUserSub(false, "c_productos","l_info_click", __ref);} - BA.debugLineNum = 651;BA.debugLine="Private Sub l_info_Click"; -Debug.ShouldStop(1024); - BA.debugLineNum = 652;BA.debugLine="l_info.Visible = False"; -Debug.ShouldStop(2048); -__ref.getField(false,"_l_info" /*RemoteObject*/ ).runMethod(true,"setVisible",c_productos.__c.getField(true,"False")); - BA.debugLineNum = 653;BA.debugLine="End Sub"; -Debug.ShouldStop(4096); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _l_prodx_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("l_prodx_click (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,805); -if (RapidSub.canDelegate("l_prodx_click")) { return __ref.runUserSub(false, "c_productos","l_prodx_click", __ref);} -RemoteObject _index = RemoteObject.createImmutable(0); -RemoteObject _p0 = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _cant1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); - BA.debugLineNum = 805;BA.debugLine="Sub l_prodx_click"; -Debug.ShouldStop(16); - BA.debugLineNum = 806;BA.debugLine="Dim index As Int = clv_prods_ll.GetItemFromView(S"; -Debug.ShouldStop(32); -_index = __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(true,"_getitemfromview",RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), c_productos.__c.runMethod(false,"Sender",__ref.getField(false, "ba"))));Debug.locals.put("index", _index);Debug.locals.put("index", _index); - BA.debugLineNum = 807;BA.debugLine="Private p0 As B4XView = clv_prods_ll.GetPanel(ind"; -Debug.ShouldStop(64); -_p0 = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_p0 = __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_getpanel",(Object)(_index));Debug.locals.put("p0", _p0);Debug.locals.put("p0", _p0); - BA.debugLineNum = 808;BA.debugLine="Private p As B4XView = p0.GetView(0)"; -Debug.ShouldStop(128); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_p = _p0.runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0)));Debug.locals.put("p", _p);Debug.locals.put("p", _p); - BA.debugLineNum = 809;BA.debugLine="Private cant1 As B4XView = p.GetView(2).GetView(2"; -Debug.ShouldStop(256); -_cant1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_cant1 = _p.runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 2))).runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 2)));Debug.locals.put("cant1", _cant1);Debug.locals.put("cant1", _cant1); - BA.debugLineNum = 810;BA.debugLine="Dim index As Int = clv_prods_ll.GetItemFromView(S"; -Debug.ShouldStop(512); -_index = __ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(true,"_getitemfromview",RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), c_productos.__c.runMethod(false,"Sender",__ref.getField(false, "ba"))));Debug.locals.put("index", _index);Debug.locals.put("index", _index); - BA.debugLineNum = 812;BA.debugLine="Log(cant1.Text)"; -Debug.ShouldStop(2048); -c_productos.__c.runVoidMethod ("LogImpl","325165831",_cant1.runMethod(true,"getText"),0); - BA.debugLineNum = 813;BA.debugLine="End Sub"; -Debug.ShouldStop(4096); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _l_prodx_longclick(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("l_prodX_LongClick (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,645); -if (RapidSub.canDelegate("l_prodx_longclick")) { return __ref.runUserSub(false, "c_productos","l_prodx_longclick", __ref);} - BA.debugLineNum = 645;BA.debugLine="Private Sub l_prodX_LongClick"; -Debug.ShouldStop(16); - BA.debugLineNum = 646;BA.debugLine="Log(\"longclic = \"&Sender.as(Label).tag)"; -Debug.ShouldStop(32); -c_productos.__c.runVoidMethod ("LogImpl","324444929",RemoteObject.concat(RemoteObject.createImmutable("longclic = "),(RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.LabelWrapper"), c_productos.__c.runMethod(false,"Sender",__ref.getField(false, "ba")))).runMethod(false,"getTag")),0); - BA.debugLineNum = 647;BA.debugLine="l_info.Text = Sender.as(Label).tag"; -Debug.ShouldStop(64); -__ref.getField(false,"_l_info" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.LabelWrapper"), c_productos.__c.runMethod(false,"Sender",__ref.getField(false, "ba")))).runMethod(false,"getTag"))); - BA.debugLineNum = 648;BA.debugLine="l_info.Visible = True"; -Debug.ShouldStop(128); -__ref.getField(false,"_l_info" /*RemoteObject*/ ).runMethod(true,"setVisible",c_productos.__c.getField(true,"True")); - BA.debugLineNum = 649;BA.debugLine="End Sub"; -Debug.ShouldStop(256); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _llenacatalogo(RemoteObject __ref,RemoteObject _subtipo1) throws Exception{ -try { - Debug.PushSubsStack("llenaCatalogo (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,350); -if (RapidSub.canDelegate("llenacatalogo")) { return __ref.runUserSub(false, "c_productos","llenacatalogo", __ref, _subtipo1);} -Debug.locals.put("subtipo1", _subtipo1); - BA.debugLineNum = 350;BA.debugLine="Sub llenaCatalogo(subtipo1 As String)"; -Debug.ShouldStop(536870912); - BA.debugLineNum = 373;BA.debugLine="End Sub"; -Debug.ShouldStop(1048576); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _llenaprodsll(RemoteObject __ref,RemoteObject _p) throws Exception{ -try { - Debug.PushSubsStack("LlenaProdsLL (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,888); -if (RapidSub.canDelegate("llenaprodsll")) { return __ref.runUserSub(false, "c_productos","llenaprodsll", __ref, _p);} -RemoteObject _cantsmap = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -RemoteObject _pe = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"); -RemoteObject _cant = RemoteObject.createImmutable(0); -RemoteObject _tempmap = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -RemoteObject _listaprodsconcant = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _listaprodsconcantindex = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -int _q = 0; -RemoteObject _cont = RemoteObject.createImmutable(0); -int _pr0 = 0; -RemoteObject _pnl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -int _pr = 0; - BA.debugLineNum = 888;BA.debugLine="Sub LlenaProdsLL(p As ResultSet)"; -Debug.ShouldStop(8388608); - BA.debugLineNum = 890;BA.debugLine="listaProds.Initialize"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_listaprods" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 891;BA.debugLine="If hayPedido Then 'Si hay pedido obtenemos las ca"; -Debug.ShouldStop(67108864); -if (__ref.getField(true,"_haypedido" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 892;BA.debugLine="Dim cantsMap As Map"; -Debug.ShouldStop(134217728); -_cantsmap = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");Debug.locals.put("cantsMap", _cantsmap); - BA.debugLineNum = 893;BA.debugLine="cantsMap.Initialize"; -Debug.ShouldStop(268435456); -_cantsmap.runVoidMethod ("Initialize"); - BA.debugLineNum = 894;BA.debugLine="Dim pe As ResultSet = B4XPages.MainPage.skmt.Exe"; -Debug.ShouldStop(536870912); -_pe = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"); -_pe = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"), c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("select PE_PROID, PE_CANT from PEDIDO where PE_CLIENTE = '"),c_productos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_clienteid" /*RemoteObject*/ )))),RemoteObject.createImmutable("' and PE_CEDIS = '"),c_productos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((c_productos._subs.runMethod(true,"_traealmacen" /*RemoteObject*/ ,__ref.getField(false, "ba"))))),RemoteObject.createImmutable("'"))))));Debug.locals.put("pe", _pe);Debug.locals.put("pe", _pe); - BA.debugLineNum = 896;BA.debugLine="Do While pe.NextRow"; -Debug.ShouldStop(-2147483648); -while (_pe.runMethod(true,"NextRow").get().booleanValue()) { - BA.debugLineNum = 897;BA.debugLine="Private cant As Int = 0"; -Debug.ShouldStop(1); -_cant = BA.numberCast(int.class, 0);Debug.locals.put("cant", _cant);Debug.locals.put("cant", _cant); - BA.debugLineNum = 898;BA.debugLine="cantsMap.put(pe.GetString(\"PE_PROID\"), pe.GetSt"; -Debug.ShouldStop(2); -_cantsmap.runVoidMethod ("Put",(Object)((_pe.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_PROID"))))),(Object)((_pe.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CANT")))))); - } -; - BA.debugLineNum = 900;BA.debugLine="pe.Close"; -Debug.ShouldStop(8); -_pe.runVoidMethod ("Close"); - }; - BA.debugLineNum = 903;BA.debugLine="If p.IsInitialized Then"; -Debug.ShouldStop(64); -if (_p.runMethod(true,"IsInitialized").get().booleanValue()) { - }else { - BA.debugLineNum = 907;BA.debugLine="Dim p As ResultSet = B4XPages.MainPage.skmt.Exec"; -Debug.ShouldStop(1024); -_p = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"); -_p = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"), c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)((RemoteObject.createImmutable("select CAT_GP_ID, CAT_GP_NOMBRE, CAT_GP_ALMACEN, CAT_GP_PRECIO, CAT_GP_TIPOPROD from CAT_GUNAPROD where CAT_GP_PRECIO > 0 And CAT_GP_ALMACEN > 0 And CAT_GP_CLASIF <> 'PROMOS' And CAT_GP_TIPOPROD2 <> '2' order by CAT_GP_NOMBRE")))));Debug.locals.put("p", _p);Debug.locals.put("p", _p); - }; - BA.debugLineNum = 910;BA.debugLine="Do While p.NextRow"; -Debug.ShouldStop(8192); -while (_p.runMethod(true,"NextRow").get().booleanValue()) { - BA.debugLineNum = 911;BA.debugLine="Private cant As Int = 0"; -Debug.ShouldStop(16384); -_cant = BA.numberCast(int.class, 0);Debug.locals.put("cant", _cant);Debug.locals.put("cant", _cant); - BA.debugLineNum = 912;BA.debugLine="If hayPedido And cantsMap.ContainsKey(p.GetStrin"; -Debug.ShouldStop(32768); -if (RemoteObject.solveBoolean(".",__ref.getField(true,"_haypedido" /*RemoteObject*/ )) && RemoteObject.solveBoolean(".",_cantsmap.runMethod(true,"ContainsKey",(Object)((_p.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_ID")))))))) { -_cant = BA.numberCast(int.class, _cantsmap.runMethod(false,"Get",(Object)((_p.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_ID")))))));Debug.locals.put("cant", _cant);}; - BA.debugLineNum = 913;BA.debugLine="Dim tempMap As Map = CreateMap(\"prod\":p.GetStrin"; -Debug.ShouldStop(65536); -_tempmap = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_tempmap = c_productos.__c.runMethod(false, "createMap", (Object)(new RemoteObject[] {RemoteObject.createImmutable(("prod")),(_p.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_NOMBRE")))),RemoteObject.createImmutable(("precio")),(_p.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_PRECIO")))),RemoteObject.createImmutable(("almacen")),(_p.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_ALMACEN")))),RemoteObject.createImmutable(("id")),(_p.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_ID")))),RemoteObject.createImmutable(("cant")),(_cant)}));Debug.locals.put("tempMap", _tempmap);Debug.locals.put("tempMap", _tempmap); - BA.debugLineNum = 914;BA.debugLine="listaProds.Add(tempMap)"; -Debug.ShouldStop(131072); -__ref.getField(false,"_listaprods" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((_tempmap.getObject()))); - } -; - BA.debugLineNum = 916;BA.debugLine="p.Close"; -Debug.ShouldStop(524288); -_p.runVoidMethod ("Close"); - BA.debugLineNum = 918;BA.debugLine="PCLV.Commit"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_pclv" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.preoptimizedclv.class, "_commit" /*RemoteObject*/ ); - BA.debugLineNum = 919;BA.debugLine="clv_prods_ll.Clear"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runVoidMethod ("_clear"); - BA.debugLineNum = 920;BA.debugLine="Private listaProdsConCant, listaProdsConCantIndex"; -Debug.ShouldStop(8388608); -_listaprodsconcant = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");Debug.locals.put("listaProdsConCant", _listaprodsconcant); -_listaprodsconcantindex = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");Debug.locals.put("listaProdsConCantIndex", _listaprodsconcantindex); - BA.debugLineNum = 921;BA.debugLine="listaProdsConCant.Initialize"; -Debug.ShouldStop(16777216); -_listaprodsconcant.runVoidMethod ("Initialize"); - BA.debugLineNum = 922;BA.debugLine="listaProdsConCantIndex.Initialize"; -Debug.ShouldStop(33554432); -_listaprodsconcantindex.runVoidMethod ("Initialize"); - BA.debugLineNum = 923;BA.debugLine="listaHints.Initialize"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_listahints" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 924;BA.debugLine="For q=0 To listaProds.Size-1' Sacamos los product"; -Debug.ShouldStop(134217728); -{ -final int step29 = 1; -final int limit29 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_listaprods" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_q = 0 ; -for (;(step29 > 0 && _q <= limit29) || (step29 < 0 && _q >= limit29) ;_q = ((int)(0 + _q + step29)) ) { -Debug.locals.put("q", _q); - BA.debugLineNum = 925;BA.debugLine="If listaProds.Get(q).As(Map).Get(\"cant\").As(Int)"; -Debug.ShouldStop(268435456); -if (RemoteObject.solveBoolean("!",(BA.numberCast(int.class, (RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), __ref.getField(false,"_listaprods" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _q))))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("cant")))))),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 927;BA.debugLine="listaProdsConCant.Add(listaProds.Get(q))"; -Debug.ShouldStop(1073741824); -_listaprodsconcant.runVoidMethod ("Add",(Object)(__ref.getField(false,"_listaprods" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _q))))); - BA.debugLineNum = 928;BA.debugLine="listaProdsConCantIndex.Add(q)"; -Debug.ShouldStop(-2147483648); -_listaprodsconcantindex.runVoidMethod ("Add",(Object)(RemoteObject.createImmutable((_q)))); - }; - } -}Debug.locals.put("q", _q); -; - BA.debugLineNum = 932;BA.debugLine="Private cont As Int = 0"; -Debug.ShouldStop(8); -_cont = BA.numberCast(int.class, 0);Debug.locals.put("cont", _cont);Debug.locals.put("cont", _cont); - BA.debugLineNum = 933;BA.debugLine="For pr0=0 To listaProdsConCant.Size - 1 'Agregamo"; -Debug.ShouldStop(16); -{ -final int step36 = 1; -final int limit36 = RemoteObject.solve(new RemoteObject[] {_listaprodsconcant.runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_pr0 = 0 ; -for (;(step36 > 0 && _pr0 <= limit36) || (step36 < 0 && _pr0 >= limit36) ;_pr0 = ((int)(0 + _pr0 + step36)) ) { -Debug.locals.put("pr0", _pr0); - BA.debugLineNum = 934;BA.debugLine="Private Pnl As B4XView = xui.CreatePanel(\"\")"; -Debug.ShouldStop(32); -_pnl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_pnl = __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("")));Debug.locals.put("Pnl", _pnl);Debug.locals.put("Pnl", _pnl); - BA.debugLineNum = 935;BA.debugLine="Pnl.SetLayoutAnimated(0, 0, 0, clv_prods_ll.AsVi"; -Debug.ShouldStop(64); -_pnl.runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"getWidth")),(Object)(c_productos.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 50))))); - BA.debugLineNum = 936;BA.debugLine="clv_prods_ll.Add(Pnl, listaProdsConCant.Get(pr0)"; -Debug.ShouldStop(128); -__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runVoidMethod ("_add",(Object)(_pnl),(Object)(_listaprodsconcant.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _pr0))))); - BA.debugLineNum = 937;BA.debugLine="listaHints.Add(listaProdsConCant.get(pr0).As(Map"; -Debug.ShouldStop(256); -__ref.getField(false,"_listahints" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), _listaprodsconcant.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _pr0))))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prod")))))); - BA.debugLineNum = 938;BA.debugLine="cont = cont + 1"; -Debug.ShouldStop(512); -_cont = RemoteObject.solve(new RemoteObject[] {_cont,RemoteObject.createImmutable(1)}, "+",1, 1);Debug.locals.put("cont", _cont); - } -}Debug.locals.put("pr0", _pr0); -; - BA.debugLineNum = 942;BA.debugLine="For pr=0 To listaProds.Size-1"; -Debug.ShouldStop(8192); -{ -final int step43 = 1; -final int limit43 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_listaprods" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_pr = 0 ; -for (;(step43 > 0 && _pr <= limit43) || (step43 < 0 && _pr >= limit43) ;_pr = ((int)(0 + _pr + step43)) ) { -Debug.locals.put("pr", _pr); - BA.debugLineNum = 943;BA.debugLine="If listaProdsConCantIndex.IndexOf(pr) = -1 Then"; -Debug.ShouldStop(16384); -if (RemoteObject.solveBoolean("=",_listaprodsconcantindex.runMethod(true,"IndexOf",(Object)(RemoteObject.createImmutable((_pr)))),BA.numberCast(double.class, -(double) (0 + 1)))) { - BA.debugLineNum = 944;BA.debugLine="Private Pnl As B4XView = xui.CreatePanel(\"\")"; -Debug.ShouldStop(32768); -_pnl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_pnl = __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("")));Debug.locals.put("Pnl", _pnl);Debug.locals.put("Pnl", _pnl); - BA.debugLineNum = 945;BA.debugLine="Pnl.SetLayoutAnimated(0, 0, 0, clv_prods_ll.AsV"; -Debug.ShouldStop(65536); -_pnl.runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"getWidth")),(Object)(c_productos.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 50))))); - BA.debugLineNum = 946;BA.debugLine="clv_prods_ll.Add(Pnl, listaProds.Get(pr))"; -Debug.ShouldStop(131072); -__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runVoidMethod ("_add",(Object)(_pnl),(Object)(__ref.getField(false,"_listaprods" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _pr))))); - BA.debugLineNum = 947;BA.debugLine="listaHints.Add(listaProds.get(pr).As(Map).Get(\""; -Debug.ShouldStop(262144); -__ref.getField(false,"_listahints" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), __ref.getField(false,"_listaprods" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _pr))))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prod")))))); - BA.debugLineNum = 948;BA.debugLine="cont = cont + 1"; -Debug.ShouldStop(524288); -_cont = RemoteObject.solve(new RemoteObject[] {_cont,RemoteObject.createImmutable(1)}, "+",1, 1);Debug.locals.put("cont", _cont); - }; - } -}Debug.locals.put("pr", _pr); -; - BA.debugLineNum = 955;BA.debugLine="PCLV.B4XSeekBar1.MaxValue = clv_prods_ll.Size"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_pclv" /*RemoteObject*/ ).getField(false,"_b4xseekbar1" /*RemoteObject*/ ).setField ("_maxvalue" /*RemoteObject*/ ,__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(true,"_getsize")); - BA.debugLineNum = 956;BA.debugLine="PCLV.B4XSeekBar1.MinValue = 0"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_pclv" /*RemoteObject*/ ).getField(false,"_b4xseekbar1" /*RemoteObject*/ ).setField ("_minvalue" /*RemoteObject*/ ,BA.numberCast(int.class, 0)); - BA.debugLineNum = 957;BA.debugLine="PCLV.B4XSeekBar1.Interval = clv_prods_ll.Size/20"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_pclv" /*RemoteObject*/ ).getField(false,"_b4xseekbar1" /*RemoteObject*/ ).setField ("_interval" /*RemoteObject*/ ,BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(true,"_getsize"),RemoteObject.createImmutable(20)}, "/",0, 0))); - BA.debugLineNum = 958;BA.debugLine="PCLV.B4XSeekBar1.Value = clv_prods_ll.Size"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_pclv" /*RemoteObject*/ ).getField(false,"_b4xseekbar1" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xseekbar.class, "_setvalue" /*RemoteObject*/ ,__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(true,"_getsize")); - BA.debugLineNum = 959;BA.debugLine="PCLV.B4XSeekBar1.Update"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_pclv" /*RemoteObject*/ ).getField(false,"_b4xseekbar1" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xseekbar.class, "_update" /*RemoteObject*/ ); - BA.debugLineNum = 961;BA.debugLine="reiniciarlistaProds = False"; -Debug.ShouldStop(1); -__ref.setField ("_reiniciarlistaprods" /*RemoteObject*/ ,c_productos.__c.getField(true,"False")); - BA.debugLineNum = 962;BA.debugLine="End Sub"; -Debug.ShouldStop(2); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _lv_catalogos_itemclick(RemoteObject __ref,RemoteObject _position,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("lv_catalogos_ItemClick (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,205); -if (RapidSub.canDelegate("lv_catalogos_itemclick")) { return __ref.runUserSub(false, "c_productos","lv_catalogos_itemclick", __ref, _position, _value);} -RemoteObject _label1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _label2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _label13 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _label14 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -int _i = 0; -RemoteObject _tm = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -Debug.locals.put("Position", _position); -Debug.locals.put("Value", _value); - BA.debugLineNum = 205;BA.debugLine="Sub lv_catalogos_ItemClick (Position As Int, Value"; -Debug.ShouldStop(4096); - BA.debugLineNum = 206;BA.debugLine="If Value = \"CATALOGO\" Then"; -Debug.ShouldStop(8192); -if (RemoteObject.solveBoolean("=",_value,RemoteObject.createImmutable(("CATALOGO")))) { - BA.debugLineNum = 208;BA.debugLine="lfila.text = \"PRODUCTOS\""; -Debug.ShouldStop(32768); -__ref.getField(false,"_lfila" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("PRODUCTOS")); - BA.debugLineNum = 209;BA.debugLine="lv_catalogos.Visible = False"; -Debug.ShouldStop(65536); -__ref.getField(false,"_lv_catalogos" /*RemoteObject*/ ).runMethod(true,"setVisible",c_productos.__c.getField(true,"False")); - BA.debugLineNum = 211;BA.debugLine="clv_prods_ll.AsView.Visible = True"; -Debug.ShouldStop(262144); -__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"setVisible",c_productos.__c.getField(true,"True")); - BA.debugLineNum = 212;BA.debugLine="If hayPedido Then p_botonesVenta.Visible = True"; -Debug.ShouldStop(524288); -if (__ref.getField(true,"_haypedido" /*RemoteObject*/ ).get().booleanValue()) { -__ref.getField(false,"_p_botonesventa" /*RemoteObject*/ ).runMethod(true,"setVisible",c_productos.__c.getField(true,"True"));}; - }else { - BA.debugLineNum = 214;BA.debugLine="clv_prods_ll.AsView.Visible = False"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"setVisible",c_productos.__c.getField(true,"False")); - BA.debugLineNum = 215;BA.debugLine="lv_promos.Visible = True"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_lv_promos" /*RemoteObject*/ ).runMethod(true,"setVisible",c_productos.__c.getField(true,"True")); - BA.debugLineNum = 216;BA.debugLine="lfila.text = \"PROMOCIONES\""; -Debug.ShouldStop(8388608); -__ref.getField(false,"_lfila" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("PROMOCIONES")); - BA.debugLineNum = 217;BA.debugLine="lv_catalogos.Visible = False"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_lv_catalogos" /*RemoteObject*/ ).runMethod(true,"setVisible",c_productos.__c.getField(true,"False")); - BA.debugLineNum = 218;BA.debugLine="lv_promos.Clear"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_lv_promos" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 219;BA.debugLine="Dim label1 As Label"; -Debug.ShouldStop(67108864); -_label1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label1", _label1); - BA.debugLineNum = 220;BA.debugLine="label1 = lv_promos.TwoLinesLayout.Label"; -Debug.ShouldStop(134217728); -_label1 = __ref.getField(false,"_lv_promos" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").getField(false,"Label");Debug.locals.put("label1", _label1); - BA.debugLineNum = 221;BA.debugLine="label1.TextSize = 15"; -Debug.ShouldStop(268435456); -_label1.runMethod(true,"setTextSize",BA.numberCast(float.class, 15)); - BA.debugLineNum = 222;BA.debugLine="label1.TextColor = Colors.Black"; -Debug.ShouldStop(536870912); -_label1.runMethod(true,"setTextColor",c_productos.__c.getField(false,"Colors").getField(true,"Black")); - BA.debugLineNum = 223;BA.debugLine="Dim label2 As Label"; -Debug.ShouldStop(1073741824); -_label2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label2", _label2); - BA.debugLineNum = 224;BA.debugLine="label2 = lv_promos.TwoLinesLayout.SecondLabel"; -Debug.ShouldStop(-2147483648); -_label2 = __ref.getField(false,"_lv_promos" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").getField(false,"SecondLabel");Debug.locals.put("label2", _label2); - BA.debugLineNum = 225;BA.debugLine="label2.TextSize = 15"; -Debug.ShouldStop(1); -_label2.runMethod(true,"setTextSize",BA.numberCast(float.class, 15)); - BA.debugLineNum = 226;BA.debugLine="label2.TextColor = Colors.Black"; -Debug.ShouldStop(2); -_label2.runMethod(true,"setTextColor",c_productos.__c.getField(false,"Colors").getField(true,"Black")); - BA.debugLineNum = 227;BA.debugLine="Dim label13 As Label"; -Debug.ShouldStop(4); -_label13 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label13", _label13); - BA.debugLineNum = 228;BA.debugLine="label13 = lv_promos.TwoLinesAndBitmap.Label"; -Debug.ShouldStop(8); -_label13 = __ref.getField(false,"_lv_promos" /*RemoteObject*/ ).runMethod(false,"getTwoLinesAndBitmap").getField(false,"Label");Debug.locals.put("label13", _label13); - BA.debugLineNum = 229;BA.debugLine="label13.TextSize = 15"; -Debug.ShouldStop(16); -_label13.runMethod(true,"setTextSize",BA.numberCast(float.class, 15)); - BA.debugLineNum = 230;BA.debugLine="label13.TextColor = Colors.Black"; -Debug.ShouldStop(32); -_label13.runMethod(true,"setTextColor",c_productos.__c.getField(false,"Colors").getField(true,"Black")); - BA.debugLineNum = 231;BA.debugLine="Dim label14 As Label"; -Debug.ShouldStop(64); -_label14 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label14", _label14); - BA.debugLineNum = 232;BA.debugLine="label14 = lv_promos.TwoLinesAndBitmap.SecondLabe"; -Debug.ShouldStop(128); -_label14 = __ref.getField(false,"_lv_promos" /*RemoteObject*/ ).runMethod(false,"getTwoLinesAndBitmap").getField(false,"SecondLabel");Debug.locals.put("label14", _label14); - BA.debugLineNum = 233;BA.debugLine="label14.TextSize = 15"; -Debug.ShouldStop(256); -_label14.runMethod(true,"setTextSize",BA.numberCast(float.class, 15)); - BA.debugLineNum = 234;BA.debugLine="label14.TextColor = Colors.Black"; -Debug.ShouldStop(512); -_label14.runMethod(true,"setTextColor",c_productos.__c.getField(false,"Colors").getField(true,"Black")); - BA.debugLineNum = 235;BA.debugLine="lfila.text = \"PROMOS\""; -Debug.ShouldStop(1024); -__ref.getField(false,"_lfila" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("PROMOS")); - BA.debugLineNum = 236;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery2(\"select CA"; -Debug.ShouldStop(2048); -__ref.getField(false,"_c2" /*RemoteObject*/ ).setObject (c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select CAT_GP_ID, CAT_GP_NOMBRE, CAT_GP_PRECIO, CAT_GP_ALMACEN, CAT_GP_IMG from cat_gunaprod where CAT_GP_PRECIO > 0 AND CAT_GP_ALMACEN > 0 and CAT_GP_TIPOPROD = ? AND CAT_GP_TIPO = ? AND CAT_GP_SUBTIPO = ? AND CAT_GP_ID NOT IN (SELECT PE_PROID FROM PEDIDO WHERE PE_CLIENTE IN (Select cuenta from cuentaa) )")),(Object)(RemoteObject.createNewArray("String",new int[] {3},new Object[] {BA.ObjectToString(_value),BA.ObjectToString(_value),BA.ObjectToString(_value)})))); - BA.debugLineNum = 237;BA.debugLine="Log($\"res:${c2.RowCount}, ${Value}, ${marca}, ${"; -Debug.ShouldStop(4096); -c_productos.__c.runVoidMethod ("LogImpl","323527456",(RemoteObject.concat(RemoteObject.createImmutable("res:"),c_productos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"getRowCount")))),RemoteObject.createImmutable(", "),c_productos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)(_value)),RemoteObject.createImmutable(", "),c_productos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_marca" /*RemoteObject*/ )))),RemoteObject.createImmutable(", "),c_productos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_tipo" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 238;BA.debugLine="If c2.RowCount > 0 Then"; -Debug.ShouldStop(8192); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 239;BA.debugLine="For i=0 To c2.RowCount -1"; -Debug.ShouldStop(16384); -{ -final int step32 = 1; -final int limit32 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step32 > 0 && _i <= limit32) || (step32 < 0 && _i >= limit32) ;_i = ((int)(0 + _i + step32)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 240;BA.debugLine="c2.Position=i"; -Debug.ShouldStop(32768); -__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 241;BA.debugLine="Private tm As Map = Subs.procesaPromocion(c2.G"; -Debug.ShouldStop(65536); -_tm = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_tm = c_productos._subs.runMethod(false,"_procesapromocion" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_ID")))),(Object)(__ref.getField(true,"_clienteid" /*RemoteObject*/ )));Debug.locals.put("tm", _tm);Debug.locals.put("tm", _tm); - BA.debugLineNum = 242;BA.debugLine="If tm.Get(\"status\") = \"ok\" Then 'Solo muestral"; -Debug.ShouldStop(131072); -if (RemoteObject.solveBoolean("=",_tm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("status")))),RemoteObject.createImmutable(("ok")))) { - BA.debugLineNum = 243;BA.debugLine="lv_promos.AddTwoLines(c2.GetString(\"CAT_GP_NO"; -Debug.ShouldStop(262144); -__ref.getField(false,"_lv_promos" /*RemoteObject*/ ).runVoidMethod ("AddTwoLines",(Object)(BA.ObjectToCharSequence(__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_NOMBRE"))))),(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("# "),__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_ALMACEN"))),RemoteObject.createImmutable(" $ "),__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_PRECIO"))),RemoteObject.createImmutable(" F:"),(RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), _tm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("mp")))))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsFijosCant")))),RemoteObject.createImmutable(" V:"),(RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), _tm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("mp")))))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsVariablesCant")))))))); - }; - } -}Debug.locals.put("i", _i); -; - }else { - BA.debugLineNum = 247;BA.debugLine="ToastMessageShow(\"No hay promociones disponible"; -Debug.ShouldStop(4194304); -c_productos.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("No hay promociones disponibles.")),(Object)(c_productos.__c.getField(true,"False"))); - }; - BA.debugLineNum = 249;BA.debugLine="c2.Close"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_c2" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 250;BA.debugLine="entro = \"4\""; -Debug.ShouldStop(33554432); -__ref.setField ("_entro" /*RemoteObject*/ ,BA.ObjectToString("4")); - }; - BA.debugLineNum = 252;BA.debugLine="End Sub"; -Debug.ShouldStop(134217728); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _lv_catalogos2_itemclick(RemoteObject __ref,RemoteObject _position,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("lv_catalogos2_ItemClick (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,254); -if (RapidSub.canDelegate("lv_catalogos2_itemclick")) { __ref.runUserSub(false, "c_productos","lv_catalogos2_itemclick", __ref, _position, _value); return;} -ResumableSub_lv_catalogos2_ItemClick rsub = new ResumableSub_lv_catalogos2_ItemClick(null,__ref,_position,_value); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_lv_catalogos2_ItemClick extends BA.ResumableSub { -public ResumableSub_lv_catalogos2_ItemClick(keymon.lat.medicomed.c_productos parent,RemoteObject __ref,RemoteObject _position,RemoteObject _value) { -this.parent = parent; -this.__ref = __ref; -this._position = _position; -this._value = _value; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.c_productos parent; -RemoteObject _position; -RemoteObject _value; -RemoteObject _cliente = RemoteObject.declareNull("keymon.lat.medicomed.c_cliente"); -RemoteObject _iniciocontador = RemoteObject.createImmutable(""); -RemoteObject _label1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _label2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _label13 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _label14 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -int _i = 0; -RemoteObject _tm = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -int step57; -int limit57; - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("lv_catalogos2_ItemClick (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,254); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); -Debug.locals.put("Position", _position); -Debug.locals.put("Value", _value); - BA.debugLineNum = 255;BA.debugLine="clv_prods_ll.AsView.Visible = False"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 256;BA.debugLine="BUSCA.Text = \"\""; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_busca" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence("")); - BA.debugLineNum = 257;BA.debugLine="Dim cliente As C_Cliente = B4XPages.GetPage(\"Clie"; -Debug.ShouldStop(1); -_cliente = (parent._b4xpages.runMethod(false,"_getpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Cliente"))));Debug.locals.put("cliente", _cliente);Debug.locals.put("cliente", _cliente); - BA.debugLineNum = 258;BA.debugLine="Log($\"value=${Value}\"$)"; -Debug.ShouldStop(2); -parent.__c.runVoidMethod ("LogImpl","323592964",(RemoteObject.concat(RemoteObject.createImmutable("value="),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)(_value)),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 259;BA.debugLine="If Value = \"PROMOS\" And cliente.cuenta <> \"N\" The"; -Debug.ShouldStop(4); -if (true) break; - -case 1: -//if -this.state = 6; -if (RemoteObject.solveBoolean("=",_value,RemoteObject.createImmutable(("PROMOS"))) && RemoteObject.solveBoolean("!",_cliente.getField(true,"_cuenta" /*RemoteObject*/ ),BA.ObjectToString("N"))) { -this.state = 3; -}else -{ BA.debugLineNum = 263;BA.debugLine="Else if Value = \"PROMOS\" And cliente.cuenta = \"N\""; -Debug.ShouldStop(64); -if (RemoteObject.solveBoolean("=",_value,RemoteObject.createImmutable(("PROMOS"))) && RemoteObject.solveBoolean("=",_cliente.getField(true,"_cuenta" /*RemoteObject*/ ),BA.ObjectToString("N"))) { -this.state = 5; -}} -if (true) break; - -case 3: -//C -this.state = 6; - BA.debugLineNum = 260;BA.debugLine="entro = \"3\""; -Debug.ShouldStop(8); -__ref.setField ("_entro" /*RemoteObject*/ ,BA.ObjectToString("3")); - BA.debugLineNum = 261;BA.debugLine="marca = \"PROMOS\""; -Debug.ShouldStop(16); -__ref.setField ("_marca" /*RemoteObject*/ ,BA.ObjectToString("PROMOS")); - BA.debugLineNum = 262;BA.debugLine="tipo = \"PROMOS\""; -Debug.ShouldStop(32); -__ref.setField ("_tipo" /*RemoteObject*/ ,BA.ObjectToString("PROMOS")); - if (true) break; - -case 5: -//C -this.state = 6; - BA.debugLineNum = 264;BA.debugLine="entro = \"5\""; -Debug.ShouldStop(128); -__ref.setField ("_entro" /*RemoteObject*/ ,BA.ObjectToString("5")); - BA.debugLineNum = 265;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; -Debug.ShouldStop(256); -parent._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Cliente"))); - if (true) break; -; - BA.debugLineNum = 267;BA.debugLine="If Value = \"PROMOS\" Then"; -Debug.ShouldStop(1024); - -case 6: -//if -this.state = 11; -if (RemoteObject.solveBoolean("=",_value,RemoteObject.createImmutable(("PROMOS")))) { -this.state = 8; -}else { -this.state = 10; -}if (true) break; - -case 8: -//C -this.state = 11; - BA.debugLineNum = 268;BA.debugLine="LogColor(\"Promos\", Colors.red)"; -Debug.ShouldStop(2048); -parent.__c.runVoidMethod ("LogImpl","323592974",BA.ObjectToString("Promos"),parent.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 269;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery2(\"select CA"; -Debug.ShouldStop(4096); -__ref.getField(false,"_c2" /*RemoteObject*/ ).setObject (parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select CAT_GP_ID, CAT_GP_NOMBRE, CAT_GP_PRECIO, CAT_GP_ALMACEN, CAT_GP_IMG from cat_gunaprod where CAT_GP_PRECIO > 0 AND CAT_GP_ALMACEN > 0 and CAT_GP_TIPOPROD = ? AND CAT_GP_TIPO = ? AND CAT_GP_SUBTIPO = ? AND CAT_GP_ID NOT IN (SELECT PE_PROID FROM PEDIDO WHERE PE_CLIENTE IN (Select cuenta from cuentaa) )")),(Object)(RemoteObject.createNewArray("String",new int[] {3},new Object[] {BA.ObjectToString(_value),__ref.getField(true,"_marca" /*RemoteObject*/ ),__ref.getField(true,"_tipo" /*RemoteObject*/ )})))); - if (true) break; - -case 10: -//C -this.state = 11; - BA.debugLineNum = 271;BA.debugLine="LogColor(\"Catalogo\", Colors.red)"; -Debug.ShouldStop(16384); -parent.__c.runVoidMethod ("LogImpl","323592977",BA.ObjectToString("Catalogo"),parent.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 272;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_"; -Debug.ShouldStop(32768); -__ref.getField(false,"_c2" /*RemoteObject*/ ).setObject (parent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_GP_ID, CAT_GP_NOMBRE, CAT_GP_PRECIO, CAT_GP_ALMACEN, CAT_GP_IMG, CAT_GP_TIPOPROD, CAT_GP_INICIATIVA from cat_gunaprod where CAT_GP_PRECIO > 0 AND CAT_GP_ALMACEN > 0 and CAT_GP_TIPOPROD <> 'PROMOS' ")))); - if (true) break; -; - BA.debugLineNum = 274;BA.debugLine="If Value = \"CATALOGO\" Then"; -Debug.ShouldStop(131072); - -case 11: -//if -this.state = 28; -if (RemoteObject.solveBoolean("=",_value,RemoteObject.createImmutable(("CATALOGO")))) { -this.state = 13; -}else { -this.state = 15; -}if (true) break; - -case 13: -//C -this.state = 28; - BA.debugLineNum = 275;BA.debugLine="lv_catalogos.Visible = False"; -Debug.ShouldStop(262144); -__ref.getField(false,"_lv_catalogos" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 276;BA.debugLine="lv_promos.Visible = False"; -Debug.ShouldStop(524288); -__ref.getField(false,"_lv_promos" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 277;BA.debugLine="lfila.text = \"CATALOGO\""; -Debug.ShouldStop(1048576); -__ref.getField(false,"_lfila" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("CATALOGO")); - BA.debugLineNum = 278;BA.debugLine="Log(\"PGS\")"; -Debug.ShouldStop(2097152); -parent.__c.runVoidMethod ("LogImpl","323592984",RemoteObject.createImmutable("PGS"),0); - BA.debugLineNum = 279;BA.debugLine="ProgressDialogShow(\"Cargando catalogo ...\")"; -Debug.ShouldStop(4194304); -parent.__c.runVoidMethod ("ProgressDialogShow",__ref.getField(false, "ba"),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("Cargando catalogo ...")))); - BA.debugLineNum = 280;BA.debugLine="Sleep(100)"; -Debug.ShouldStop(8388608); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "c_productos", "lv_catalogos2_itemclick"),BA.numberCast(int.class, 100)); -this.state = 29; -return; -case 29: -//C -this.state = 28; -; - BA.debugLineNum = 281;BA.debugLine="Private inicioContador As String = DateTime.Now"; -Debug.ShouldStop(16777216); -_iniciocontador = BA.NumberToString(parent.__c.getField(false,"DateTime").runMethod(true,"getNow"));Debug.locals.put("inicioContador", _iniciocontador);Debug.locals.put("inicioContador", _iniciocontador); - BA.debugLineNum = 282;BA.debugLine="llenaCatalogo(False)"; -Debug.ShouldStop(33554432); -__ref.runClassMethod (keymon.lat.medicomed.c_productos.class, "_llenacatalogo" /*RemoteObject*/ ,(Object)(BA.ObjectToString(parent.__c.getField(true,"False")))); - BA.debugLineNum = 283;BA.debugLine="clv_prods_ll.AsView.Visible = True"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"setVisible",parent.__c.getField(true,"True")); - BA.debugLineNum = 284;BA.debugLine="Log(\"PGH\")"; -Debug.ShouldStop(134217728); -parent.__c.runVoidMethod ("LogImpl","323592990",RemoteObject.createImmutable("PGH"),0); - BA.debugLineNum = 285;BA.debugLine="LogColor(\"TIEMPO DE PROCESO DEL CATALOGO: \" & (("; -Debug.ShouldStop(268435456); -parent.__c.runVoidMethod ("LogImpl","323592991",RemoteObject.concat(RemoteObject.createImmutable("TIEMPO DE PROCESO DEL CATALOGO: "),(RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {parent.__c.getField(false,"DateTime").runMethod(true,"getNow"),BA.numberCast(double.class, _iniciocontador)}, "-",1, 0)),RemoteObject.createImmutable(1000)}, "/",0, 0))),parent.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 286;BA.debugLine="ProgressDialogHide"; -Debug.ShouldStop(536870912); -parent.__c.runVoidMethod ("ProgressDialogHide"); - BA.debugLineNum = 287;BA.debugLine="c2.Close"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_c2" /*RemoteObject*/ ).runVoidMethod ("Close"); - if (true) break; - -case 15: -//C -this.state = 16; - BA.debugLineNum = 289;BA.debugLine="clv_prods_ll.AsView.Visible = False"; -Debug.ShouldStop(1); -__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 290;BA.debugLine="lv_promos.Visible = True"; -Debug.ShouldStop(2); -__ref.getField(false,"_lv_promos" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"True")); - BA.debugLineNum = 291;BA.debugLine="lv_catalogos.Visible = False"; -Debug.ShouldStop(4); -__ref.getField(false,"_lv_catalogos" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - BA.debugLineNum = 292;BA.debugLine="lv_promos.Clear"; -Debug.ShouldStop(8); -__ref.getField(false,"_lv_promos" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 293;BA.debugLine="Dim label1 As Label"; -Debug.ShouldStop(16); -_label1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label1", _label1); - BA.debugLineNum = 294;BA.debugLine="label1 = lv_promos.TwoLinesLayout.Label"; -Debug.ShouldStop(32); -_label1 = __ref.getField(false,"_lv_promos" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").getField(false,"Label");Debug.locals.put("label1", _label1); - BA.debugLineNum = 295;BA.debugLine="label1.TextSize = 15"; -Debug.ShouldStop(64); -_label1.runMethod(true,"setTextSize",BA.numberCast(float.class, 15)); - BA.debugLineNum = 296;BA.debugLine="label1.TextColor = Colors.Black"; -Debug.ShouldStop(128); -_label1.runMethod(true,"setTextColor",parent.__c.getField(false,"Colors").getField(true,"Black")); - BA.debugLineNum = 297;BA.debugLine="Dim label2 As Label"; -Debug.ShouldStop(256); -_label2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label2", _label2); - BA.debugLineNum = 298;BA.debugLine="label2 = lv_promos.TwoLinesLayout.SecondLabel"; -Debug.ShouldStop(512); -_label2 = __ref.getField(false,"_lv_promos" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").getField(false,"SecondLabel");Debug.locals.put("label2", _label2); - BA.debugLineNum = 299;BA.debugLine="label2.TextSize = 15"; -Debug.ShouldStop(1024); -_label2.runMethod(true,"setTextSize",BA.numberCast(float.class, 15)); - BA.debugLineNum = 300;BA.debugLine="label2.TextColor = Colors.Black"; -Debug.ShouldStop(2048); -_label2.runMethod(true,"setTextColor",parent.__c.getField(false,"Colors").getField(true,"Black")); - BA.debugLineNum = 301;BA.debugLine="Dim label13 As Label"; -Debug.ShouldStop(4096); -_label13 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label13", _label13); - BA.debugLineNum = 302;BA.debugLine="label13 = lv_promos.TwoLinesAndBitmap.Label"; -Debug.ShouldStop(8192); -_label13 = __ref.getField(false,"_lv_promos" /*RemoteObject*/ ).runMethod(false,"getTwoLinesAndBitmap").getField(false,"Label");Debug.locals.put("label13", _label13); - BA.debugLineNum = 303;BA.debugLine="label13.TextSize = 15"; -Debug.ShouldStop(16384); -_label13.runMethod(true,"setTextSize",BA.numberCast(float.class, 15)); - BA.debugLineNum = 304;BA.debugLine="label13.TextColor = Colors.Black"; -Debug.ShouldStop(32768); -_label13.runMethod(true,"setTextColor",parent.__c.getField(false,"Colors").getField(true,"Black")); - BA.debugLineNum = 305;BA.debugLine="Dim label14 As Label"; -Debug.ShouldStop(65536); -_label14 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label14", _label14); - BA.debugLineNum = 306;BA.debugLine="label14 = lv_promos.TwoLinesAndBitmap.SecondLabe"; -Debug.ShouldStop(131072); -_label14 = __ref.getField(false,"_lv_promos" /*RemoteObject*/ ).runMethod(false,"getTwoLinesAndBitmap").getField(false,"SecondLabel");Debug.locals.put("label14", _label14); - BA.debugLineNum = 307;BA.debugLine="label14.TextSize = 15"; -Debug.ShouldStop(262144); -_label14.runMethod(true,"setTextSize",BA.numberCast(float.class, 15)); - BA.debugLineNum = 308;BA.debugLine="label14.TextColor = Colors.Black"; -Debug.ShouldStop(524288); -_label14.runMethod(true,"setTextColor",parent.__c.getField(false,"Colors").getField(true,"Black")); - BA.debugLineNum = 309;BA.debugLine="lfila.text = \"PROMOS\""; -Debug.ShouldStop(1048576); -__ref.getField(false,"_lfila" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("PROMOS")); - BA.debugLineNum = 310;BA.debugLine="If c2.RowCount > 0 Then"; -Debug.ShouldStop(2097152); -if (true) break; - -case 16: -//if -this.state = 27; -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { -this.state = 18; -}if (true) break; - -case 18: -//C -this.state = 19; - BA.debugLineNum = 311;BA.debugLine="For i=0 To c2.RowCount -1"; -Debug.ShouldStop(4194304); -if (true) break; - -case 19: -//for -this.state = 26; -step57 = 1; -limit57 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -Debug.locals.put("i", _i); -this.state = 30; -if (true) break; - -case 30: -//C -this.state = 26; -if ((step57 > 0 && _i <= limit57) || (step57 < 0 && _i >= limit57)) this.state = 21; -if (true) break; - -case 31: -//C -this.state = 30; -_i = ((int)(0 + _i + step57)) ; -Debug.locals.put("i", _i); -if (true) break; - -case 21: -//C -this.state = 22; - BA.debugLineNum = 312;BA.debugLine="c2.Position=i"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 313;BA.debugLine="Private tm As Map = Subs.procesaPromocion(c2.G"; -Debug.ShouldStop(16777216); -_tm = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_tm = parent._subs.runMethod(false,"_procesapromocion" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_ID")))),(Object)(__ref.getField(true,"_clienteid" /*RemoteObject*/ )));Debug.locals.put("tm", _tm);Debug.locals.put("tm", _tm); - BA.debugLineNum = 314;BA.debugLine="If tm.Get(\"status\") = \"ok\" Then 'Solo muestral"; -Debug.ShouldStop(33554432); -if (true) break; - -case 22: -//if -this.state = 25; -if (RemoteObject.solveBoolean("=",_tm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("status")))),RemoteObject.createImmutable(("ok")))) { -this.state = 24; -}if (true) break; - -case 24: -//C -this.state = 25; - BA.debugLineNum = 315;BA.debugLine="lv_promos.AddTwoLines(c2.GetString(\"CAT_GP_NO"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_lv_promos" /*RemoteObject*/ ).runVoidMethod ("AddTwoLines",(Object)(BA.ObjectToCharSequence(__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_NOMBRE"))))),(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("# "),__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_ALMACEN"))),RemoteObject.createImmutable(" $ "),__ref.getField(false,"_c2" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_PRECIO"))),RemoteObject.createImmutable(" F:"),(RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), _tm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("mp")))))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsFijosCant")))),RemoteObject.createImmutable(" V:"),(RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), _tm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("mp")))))).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsVariablesCant")))))))); - if (true) break; - -case 25: -//C -this.state = 31; -; - if (true) break; -if (true) break; - -case 26: -//C -this.state = 27; -Debug.locals.put("i", _i); -; - if (true) break; - -case 27: -//C -this.state = 28; -; - BA.debugLineNum = 319;BA.debugLine="c2.Close"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_c2" /*RemoteObject*/ ).runVoidMethod ("Close"); - if (true) break; - -case 28: -//C -this.state = -1; -; - BA.debugLineNum = 321;BA.debugLine="entro = \"4\""; -Debug.ShouldStop(1); -__ref.setField ("_entro" /*RemoteObject*/ ,BA.ObjectToString("4")); - BA.debugLineNum = 322;BA.debugLine="End Sub"; -Debug.ShouldStop(2); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _lv_prodspedido_itemlongclick(RemoteObject __ref,RemoteObject _position,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("lv_prodsPedido_ItemLongClick (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,739); -if (RapidSub.canDelegate("lv_prodspedido_itemlongclick")) { return __ref.runUserSub(false, "c_productos","lv_prodspedido_itemlongclick", __ref, _position, _value);} -RemoteObject _sdate = RemoteObject.createImmutable(""); -RemoteObject _stime = RemoteObject.createImmutable(""); -RemoteObject _clie_id = RemoteObject.createImmutable(""); -RemoteObject _usuario = RemoteObject.createImmutable(""); -Debug.locals.put("Position", _position); -Debug.locals.put("Value", _value); - BA.debugLineNum = 739;BA.debugLine="Private Sub lv_prodsPedido_ItemLongClick (Position"; -Debug.ShouldStop(4); - BA.debugLineNum = 740;BA.debugLine="Private sDate,sTime, clie_id, usuario As String"; -Debug.ShouldStop(8); -_sdate = RemoteObject.createImmutable("");Debug.locals.put("sDate", _sdate); -_stime = RemoteObject.createImmutable("");Debug.locals.put("sTime", _stime); -_clie_id = RemoteObject.createImmutable("");Debug.locals.put("clie_id", _clie_id); -_usuario = RemoteObject.createImmutable("");Debug.locals.put("usuario", _usuario); - BA.debugLineNum = 741;BA.debugLine="If Not(Subs.pedidoGuardado) Then"; -Debug.ShouldStop(16); -if (c_productos.__c.runMethod(true,"Not",(Object)(c_productos._subs.runMethod(true,"_pedidoguardado" /*RemoteObject*/ ,__ref.getField(false, "ba")))).get().booleanValue()) { - BA.debugLineNum = 742;BA.debugLine="result = Msgbox2(\"Seguro que desea borrar este"; -Debug.ShouldStop(32); -__ref.setField ("_result" /*RemoteObject*/ ,BA.NumberToString(c_productos.__c.runMethodAndSync(true,"Msgbox2",(Object)(BA.ObjectToCharSequence("Seguro que desea borrar este articulo?")),(Object)(BA.ObjectToCharSequence("Borrar Articulo")),(Object)(BA.ObjectToString("Si")),(Object)(BA.ObjectToString("")),(Object)(BA.ObjectToString("No")),(Object)((c_productos.__c.runMethod(false,"LoadBitmap",(Object)(c_productos.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(RemoteObject.createImmutable("alert2.png"))).getObject())),__ref.getField(false, "ba")))); - BA.debugLineNum = 743;BA.debugLine="If result = DialogResponse.POSITIVE Then"; -Debug.ShouldStop(64); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_result" /*RemoteObject*/ ),BA.NumberToString(c_productos.__c.getField(false,"DialogResponse").getField(true,"POSITIVE")))) { - BA.debugLineNum = 744;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"select PE_"; -Debug.ShouldStop(128); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select PE_PROID,PE_CANT FROM PEDIDO where pe_pronombre = ? and pe_cliente in (Select CUENTA from cuentaa) ")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {BA.ObjectToString(_value)})))); - BA.debugLineNum = 745;BA.debugLine="c.Position=0"; -Debug.ShouldStop(256); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 746;BA.debugLine="Log(\"aqui1\")"; -Debug.ShouldStop(512); -c_productos.__c.runVoidMethod ("LogImpl","325034759",RemoteObject.createImmutable("aqui1"),0); - BA.debugLineNum = 747;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update ca"; -Debug.ShouldStop(1024); -c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen + ? where cat_gp_id = ?")),(Object)(c_productos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CANT")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_PROID"))))}))))); - BA.debugLineNum = 748;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT IN"; -Debug.ShouldStop(2048); -c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO INVENT_X_ENVIAR (ALMACEN , PROID , CANTIDAD ) VALUES(?,?,?) ")),(Object)(c_productos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {3},new Object[] {(c_productos._subs.runMethod(true,"_traealmacen" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_PROID")))),RemoteObject.createImmutable(((double)(Double.parseDouble(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CANT"))).get()))*-(double) (0 + 1)))}))))); - BA.debugLineNum = 749;BA.debugLine="c.Close"; -Debug.ShouldStop(4096); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 750;BA.debugLine="Log(\"aqui2\")"; -Debug.ShouldStop(8192); -c_productos.__c.runVoidMethod ("LogImpl","325034763",RemoteObject.createImmutable("aqui2"),0); - BA.debugLineNum = 751;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"select cou"; -Debug.ShouldStop(16384); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select count(*) AS CUANTOS from cat_gunaprod where CAT_GP_ID in (select pe_cedis from pedido where pe_pronombre = ? and pe_cliente in (Select CUENTA from cuentaa)) and CAT_GP_CLASIF = 'PROMOS' AND CAT_GP_TIPO = 'PROMOS' AND CAT_GP_SUBTIPO = 'PROMOS'")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {BA.ObjectToString(_value)})))); - BA.debugLineNum = 752;BA.debugLine="c.Position=0"; -Debug.ShouldStop(32768); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 753;BA.debugLine="If c.GetString(\"CUANTOS\") > 0 Then"; -Debug.ShouldStop(65536); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 754;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete f"; -Debug.ShouldStop(131072); -c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("delete from pedido where pe_cedis in (select pe_cedis from pedido where pe_pronombre = ?) and pe_cliente in (Select CUENTA from cuentaa)")),(Object)(c_productos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {_value}))))); - BA.debugLineNum = 755;BA.debugLine="Log(\"aqui3\")"; -Debug.ShouldStop(262144); -c_productos.__c.runVoidMethod ("LogImpl","325034768",RemoteObject.createImmutable("aqui3"),0); - }else { - BA.debugLineNum = 757;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete f"; -Debug.ShouldStop(1048576); -c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("delete from pedido where pe_pronombre = ? and pe_cliente in (Select CUENTA from cuentaa)")),(Object)(c_productos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {_value}))))); - BA.debugLineNum = 758;BA.debugLine="Log(\"aqui4\")"; -Debug.ShouldStop(2097152); -c_productos.__c.runVoidMethod ("LogImpl","325034771",RemoteObject.createImmutable("aqui4"),0); - }; - BA.debugLineNum = 760;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; -Debug.ShouldStop(8388608); -c_productos.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("MM/dd/yyyy")); - BA.debugLineNum = 761;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(16777216); -_sdate = c_productos.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(c_productos.__c.getField(false,"DateTime").runMethod(true,"getNow")));Debug.locals.put("sDate", _sdate); - BA.debugLineNum = 762;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -Debug.ShouldStop(33554432); -_stime = c_productos.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_productos.__c.getField(false,"DateTime").runMethod(true,"getNow")));Debug.locals.put("sTime", _stime); - BA.debugLineNum = 763;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUEN"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select CUENTA from cuentaa")))); - BA.debugLineNum = 764;BA.debugLine="c.Position=0"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 765;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -Debug.ShouldStop(268435456); -_clie_id = __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUENTA")));Debug.locals.put("clie_id", _clie_id); - BA.debugLineNum = 766;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUA"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select USUARIO from usuarioa")))); - BA.debugLineNum = 767;BA.debugLine="c.Position=0"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 768;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(-2147483648); -_usuario = __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")));Debug.locals.put("usuario", _usuario); - BA.debugLineNum = 769;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum("; -Debug.ShouldStop(1); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, count(*) as CUANTOS FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)")))); - BA.debugLineNum = 770;BA.debugLine="c.Position=0"; -Debug.ShouldStop(2); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 771;BA.debugLine="If c.GetString(\"CUANTOS\") > 0 Then"; -Debug.ShouldStop(4); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS")))),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 772;BA.debugLine="Log(\"aqui5\")"; -Debug.ShouldStop(8); -c_productos.__c.runVoidMethod ("LogImpl","325034785",RemoteObject.createImmutable("aqui5"),0); - BA.debugLineNum = 773;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fr"; -Debug.ShouldStop(16); -c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"))); - BA.debugLineNum = 774;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert i"; -Debug.ShouldStop(32); -c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT) VALUES (?,?,?,?,?,?,?)")),(Object)(c_productos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {7},new Object[] {(_clie_id),(RemoteObject.concat(_sdate,_stime)),(_usuario),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CANT_CLIE")))),(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_CLIE")))),(c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lon_gps" /*RemoteObject*/ )),(c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_lat_gps" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 777;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fr"; -Debug.ShouldStop(256); -c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"))); - BA.debugLineNum = 778;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE km"; -Debug.ShouldStop(512); -c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("UPDATE kmt_info set gestion = 0 where CAT_CL_CODIGO In (select cuenta from cuentaa)"))); - BA.debugLineNum = 779;BA.debugLine="h =B4XPages.MainPage.skmt.ExecQuery(\"select su"; -Debug.ShouldStop(1024); -__ref.getField(false,"_h" /*RemoteObject*/ ).setObject (c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select sum(PE_CANT) as PC_NOART, sum (PE_COSTO_TOT) as PC_MONTO from PEDIDO where PE_CLIENTE in (Select CUENTA from cuentaa) AND PE_PROID NOT IN (SELECT CAT_PA_ID FROM PROMOS_COMP )")))); - BA.debugLineNum = 780;BA.debugLine="h.Position=0"; -Debug.ShouldStop(2048); -__ref.getField(false,"_h" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 781;BA.debugLine="l_cant.Text = h.GetString(\"PC_NOART\")"; -Debug.ShouldStop(4096); -__ref.getField(false,"_l_cant" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_h" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_NOART"))))); - BA.debugLineNum = 782;BA.debugLine="l_total2.Text = h.GetString(\"PC_MONTO\")"; -Debug.ShouldStop(8192); -__ref.getField(false,"_l_total2" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(false,"_h" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PC_MONTO"))))); - BA.debugLineNum = 783;BA.debugLine="h.Close"; -Debug.ShouldStop(16384); -__ref.getField(false,"_h" /*RemoteObject*/ ).runVoidMethod ("Close"); - }else { - BA.debugLineNum = 785;BA.debugLine="Log(\"aqui6\")"; -Debug.ShouldStop(65536); -c_productos.__c.runVoidMethod ("LogImpl","325034798",RemoteObject.createImmutable("aqui6"),0); - BA.debugLineNum = 786;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fr"; -Debug.ShouldStop(131072); -c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"))); - BA.debugLineNum = 787;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE km"; -Debug.ShouldStop(262144); -c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("UPDATE kmt_info set gestion = 0 where CAT_CL_CODIGO In (select cuenta from cuentaa)"))); - BA.debugLineNum = 788;BA.debugLine="h =B4XPages.MainPage.skmt.ExecQuery(\"select su"; -Debug.ShouldStop(524288); -__ref.getField(false,"_h" /*RemoteObject*/ ).setObject (c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select sum(PE_CANT) as PC_NOART, sum (PE_COSTO_TOT) as PC_MONTO from PEDIDO where PE_CLIENTE in (Select CUENTA from cuentaa) AND PE_PROID NOT IN (SELECT CAT_PA_ID FROM PROMOS_COMP )")))); - BA.debugLineNum = 789;BA.debugLine="h.Position=0"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_h" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 790;BA.debugLine="l_cant.Text = 0"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_l_cant" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(0)); - BA.debugLineNum = 791;BA.debugLine="l_total2.Text = 0"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_l_total2" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(0)); - BA.debugLineNum = 792;BA.debugLine="h.Close"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_h" /*RemoteObject*/ ).runVoidMethod ("Close"); - }; - BA.debugLineNum = 794;BA.debugLine="b_terminar1_Click"; -Debug.ShouldStop(33554432); -__ref.runClassMethod (keymon.lat.medicomed.c_productos.class, "_b_terminar1_click" /*RemoteObject*/ ); - }; - }else { - BA.debugLineNum = 797;BA.debugLine="ToastMessageShow(\"Esta venta ya esta guardada, n"; -Debug.ShouldStop(268435456); -c_productos.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Esta venta ya esta guardada, no se puede editar ni borrar.")),(Object)(c_productos.__c.getField(true,"False"))); - }; - BA.debugLineNum = 799;BA.debugLine="End Sub"; -Debug.ShouldStop(1073741824); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _lv_promos_itemclick(RemoteObject __ref,RemoteObject _position,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("lv_promos_ItemClick (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,324); -if (RapidSub.canDelegate("lv_promos_itemclick")) { return __ref.runUserSub(false, "c_productos","lv_promos_itemclick", __ref, _position, _value);} -RemoteObject _cliente = RemoteObject.declareNull("keymon.lat.medicomed.c_cliente"); -RemoteObject _promos = RemoteObject.declareNull("keymon.lat.medicomed.c_promos"); -Debug.locals.put("Position", _position); -Debug.locals.put("Value", _value); - BA.debugLineNum = 324;BA.debugLine="Sub lv_promos_ItemClick (Position As Int, Value As"; -Debug.ShouldStop(8); - BA.debugLineNum = 325;BA.debugLine="clv_prods_ll.AsView.Visible = False"; -Debug.ShouldStop(16); -__ref.getField(false,"_clv_prods_ll" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"setVisible",c_productos.__c.getField(true,"False")); - BA.debugLineNum = 326;BA.debugLine="Dim cliente As C_Cliente = B4XPages.GetPage(\"Clie"; -Debug.ShouldStop(32); -_cliente = (c_productos._b4xpages.runMethod(false,"_getpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Cliente"))));Debug.locals.put("cliente", _cliente);Debug.locals.put("cliente", _cliente); - BA.debugLineNum = 328;BA.debugLine="If Value = \"PROMOS\" And cliente.cuenta <> \"N\" The"; -Debug.ShouldStop(128); -if (RemoteObject.solveBoolean("=",_value,RemoteObject.createImmutable(("PROMOS"))) && RemoteObject.solveBoolean("!",_cliente.getField(true,"_cuenta" /*RemoteObject*/ ),BA.ObjectToString("N"))) { - BA.debugLineNum = 329;BA.debugLine="entro = \"3\""; -Debug.ShouldStop(256); -__ref.setField ("_entro" /*RemoteObject*/ ,BA.ObjectToString("3")); - BA.debugLineNum = 330;BA.debugLine="marca = \"PROMOS\""; -Debug.ShouldStop(512); -__ref.setField ("_marca" /*RemoteObject*/ ,BA.ObjectToString("PROMOS")); - BA.debugLineNum = 331;BA.debugLine="tipo = \"PROMOS\""; -Debug.ShouldStop(1024); -__ref.setField ("_tipo" /*RemoteObject*/ ,BA.ObjectToString("PROMOS")); - }else -{ BA.debugLineNum = 332;BA.debugLine="Else if Value = \"PROMOS\" And cliente.cuenta = \"N\""; -Debug.ShouldStop(2048); -if (RemoteObject.solveBoolean("=",_value,RemoteObject.createImmutable(("PROMOS"))) && RemoteObject.solveBoolean("=",_cliente.getField(true,"_cuenta" /*RemoteObject*/ ),BA.ObjectToString("N"))) { - BA.debugLineNum = 333;BA.debugLine="entro = \"5\""; -Debug.ShouldStop(4096); -__ref.setField ("_entro" /*RemoteObject*/ ,BA.ObjectToString("5")); - BA.debugLineNum = 334;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; -Debug.ShouldStop(8192); -c_productos._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Cliente"))); - }} -; - BA.debugLineNum = 336;BA.debugLine="If entro = \"3\" Then"; -Debug.ShouldStop(32768); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_entro" /*RemoteObject*/ ),BA.ObjectToString("3"))) { - }else -{ BA.debugLineNum = 338;BA.debugLine="Else If entro = \"4\" Then"; -Debug.ShouldStop(131072); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_entro" /*RemoteObject*/ ),BA.ObjectToString("4"))) { - BA.debugLineNum = 339;BA.debugLine="Log(\"Entro = 4\")"; -Debug.ShouldStop(262144); -c_productos.__c.runVoidMethod ("LogImpl","323658511",RemoteObject.createImmutable("Entro = 4"),0); - BA.debugLineNum = 340;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(524288); -c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from PROID"))); - BA.debugLineNum = 341;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -Debug.ShouldStop(1048576); -c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO PROID VALUES (?)")),(Object)(c_productos.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {_value}))))); - BA.debugLineNum = 342;BA.debugLine="Dim promos As C_Promos = B4XPages.GetPage(\"Promo"; -Debug.ShouldStop(2097152); -_promos = (c_productos._b4xpages.runMethod(false,"_getpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Promos"))));Debug.locals.put("promos", _promos);Debug.locals.put("promos", _promos); - BA.debugLineNum = 343;BA.debugLine="promos.laPromo = Subs.traeProdIdDeBD.Get(\"id\")"; -Debug.ShouldStop(4194304); -_promos.setField ("_lapromo" /*RemoteObject*/ ,BA.ObjectToString(c_productos._subs.runMethod(false,"_traeprodiddebd" /*RemoteObject*/ ,__ref.getField(false, "ba")).runMethod(false,"Get",(Object)((RemoteObject.createImmutable("id")))))); - BA.debugLineNum = 344;BA.debugLine="promos.elCliente = Subs.traeUsuarioDeBD"; -Debug.ShouldStop(8388608); -_promos.setField ("_elcliente" /*RemoteObject*/ ,c_productos._subs.runMethod(true,"_traeusuariodebd" /*RemoteObject*/ ,__ref.getField(false, "ba"))); - BA.debugLineNum = 345;BA.debugLine="B4XPages.ShowPage(\"Promos\")"; -Debug.ShouldStop(16777216); -c_productos._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Promos"))); - }} -; - BA.debugLineNum = 347;BA.debugLine="End Sub"; -Debug.ShouldStop(67108864); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _lv_promos_itemlongclick(RemoteObject __ref,RemoteObject _position,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("lv_promos_ItemLongClick (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,655); -if (RapidSub.canDelegate("lv_promos_itemlongclick")) { return __ref.runUserSub(false, "c_productos","lv_promos_itemlongclick", __ref, _position, _value);} -RemoteObject _id = RemoteObject.createImmutable(""); -Debug.locals.put("Position", _position); -Debug.locals.put("Value", _value); - BA.debugLineNum = 655;BA.debugLine="Private Sub lv_promos_ItemLongClick (Position As I"; -Debug.ShouldStop(16384); - BA.debugLineNum = 656;BA.debugLine="Log(\"Promo longclic = \"&Value)"; -Debug.ShouldStop(32768); -c_productos.__c.runVoidMethod ("LogImpl","324576001",RemoteObject.concat(RemoteObject.createImmutable("Promo longclic = "),_value),0); - BA.debugLineNum = 657;BA.debugLine="Private id As String = \"\""; -Debug.ShouldStop(65536); -_id = BA.ObjectToString("");Debug.locals.put("id", _id);Debug.locals.put("id", _id); - BA.debugLineNum = 658;BA.debugLine="Dim c As Cursor = B4XPages.MainPage.skmt.ExecQuer"; -Debug.ShouldStop(131072); -c_productos._c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -c_productos._c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), c_productos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("select CAT_GP_ID from cat_gunaprod where CAT_GP_TIPO = 'PROMOS' and CAT_GP_NOMBRE = '"),c_productos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)(_value)),RemoteObject.createImmutable("'"))))));__ref.setField("_c",c_productos._c); - BA.debugLineNum = 659;BA.debugLine="If c.RowCount > 0 Then"; -Debug.ShouldStop(262144); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 660;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(524288); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 661;BA.debugLine="id = c.GetString(\"CAT_GP_ID\")"; -Debug.ShouldStop(1048576); -_id = __ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_ID")));Debug.locals.put("id", _id); - }; - BA.debugLineNum = 663;BA.debugLine="l_info.Text = $\"ID: ${id}${CRLF}${Value}\"$"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_l_info" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("ID: "),c_productos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_id))),RemoteObject.createImmutable(""),c_productos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((c_productos.__c.getField(true,"CRLF")))),RemoteObject.createImmutable(""),c_productos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)(_value)),RemoteObject.createImmutable(""))))); - BA.debugLineNum = 664;BA.debugLine="l_info.Visible = True"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_l_info" /*RemoteObject*/ ).runMethod(true,"setVisible",c_productos.__c.getField(true,"True")); - BA.debugLineNum = 665;BA.debugLine="End Sub"; -Debug.ShouldStop(16777216); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _lv_subtipo_itemclick(RemoteObject __ref,RemoteObject _position,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("lv_subtipo_ItemClick (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,692); -if (RapidSub.canDelegate("lv_subtipo_itemclick")) { return __ref.runUserSub(false, "c_productos","lv_subtipo_itemclick", __ref, _position, _value);} -Debug.locals.put("Position", _position); -Debug.locals.put("Value", _value); - BA.debugLineNum = 692;BA.debugLine="Private Sub lv_subtipo_ItemClick (Position As Int,"; -Debug.ShouldStop(524288); - BA.debugLineNum = 706;BA.debugLine="End Sub"; -Debug.ShouldStop(2); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _lv_tipo_itemclick(RemoteObject __ref,RemoteObject _position,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("lv_tipo_ItemClick (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,672); -if (RapidSub.canDelegate("lv_tipo_itemclick")) { return __ref.runUserSub(false, "c_productos","lv_tipo_itemclick", __ref, _position, _value);} -Debug.locals.put("Position", _position); -Debug.locals.put("Value", _value); - BA.debugLineNum = 672;BA.debugLine="Private Sub lv_tipo_ItemClick (Position As Int, Va"; -Debug.ShouldStop(-2147483648); - BA.debugLineNum = 690;BA.debugLine="End Sub"; -Debug.ShouldStop(131072); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _p_vistapreviatrans_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("p_vistaPreviaTrans_Click (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,708); -if (RapidSub.canDelegate("p_vistapreviatrans_click")) { return __ref.runUserSub(false, "c_productos","p_vistapreviatrans_click", __ref);} - BA.debugLineNum = 708;BA.debugLine="Private Sub p_vistaPreviaTrans_Click"; -Debug.ShouldStop(8); - BA.debugLineNum = 710;BA.debugLine="End Sub"; -Debug.ShouldStop(32); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _pclv_addprods(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("PCLV_AddProds (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,201); -if (RapidSub.canDelegate("pclv_addprods")) { return __ref.runUserSub(false, "c_productos","pclv_addprods", __ref);} - BA.debugLineNum = 201;BA.debugLine="Sub PCLV_AddProds"; -Debug.ShouldStop(256); - BA.debugLineNum = 203;BA.debugLine="End Sub"; -Debug.ShouldStop(1024); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _pclv_hintrequested(RemoteObject __ref,RemoteObject _index) throws Exception{ -try { - Debug.PushSubsStack("PCLV_HintRequested (c_productos) ","c_productos",17,__ref.getField(false, "ba"),__ref,965); -if (RapidSub.canDelegate("pclv_hintrequested")) { return __ref.runUserSub(false, "c_productos","pclv_hintrequested", __ref, _index);} -RemoteObject _word = RemoteObject.createImmutable(""); -Debug.locals.put("Index", _index); - BA.debugLineNum = 965;BA.debugLine="Sub PCLV_HintRequested(Index As Int) As Object"; -Debug.ShouldStop(16); - BA.debugLineNum = 966;BA.debugLine="Dim word As String = listaHints.get(Index)"; -Debug.ShouldStop(32); -_word = BA.ObjectToString(__ref.getField(false,"_listahints" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(_index)));Debug.locals.put("word", _word);Debug.locals.put("word", _word); - BA.debugLineNum = 967;BA.debugLine="Return word"; -Debug.ShouldStop(64); -if (true) return (_word); - BA.debugLineNum = 968;BA.debugLine="End Sub"; -Debug.ShouldStop(128); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_promos.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_promos.java deleted file mode 100644 index 44684d7..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_promos.java +++ /dev/null @@ -1,74 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class c_promos { - public static RemoteObject myClass; - public c_promos() { - } - public static PCBA staticBA = new PCBA(null, c_promos.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _root = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _l_promodesc = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _lv_prodsfijos = RemoteObject.declareNull("anywheresoftware.b4a.objects.ListViewWrapper"); -public static RemoteObject _clv_prodsvariabes = RemoteObject.declareNull("b4a.example3.customlistview"); -public static RemoteObject _l_prodsfijos = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_prodsvariables = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _i_prod = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -public static RemoteObject _l_prodx = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _p_prods = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _b_prodmenos = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _et_pcant = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -public static RemoteObject _b_prodmas = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _l_pcant = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _totalprods = RemoteObject.createImmutable(0); -public static RemoteObject _prodsvarreq = RemoteObject.createImmutable(0); -public static RemoteObject _prodsvarreq2 = RemoteObject.createImmutable(0); -public static RemoteObject _totalcompra = RemoteObject.createImmutable(0f); -public static RemoteObject _prodsfijostot = RemoteObject.createImmutable(0f); -public static RemoteObject _tpf = RemoteObject.createImmutable(0); -public static RemoteObject _tpf2 = RemoteObject.createImmutable(0); -public static RemoteObject _maxcantpromos = RemoteObject.createImmutable(0); -public static RemoteObject _l_totprods = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _l_total = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _b_terminar1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _p_promociones = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _prodsids = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _prodscants = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _prodsprecios = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _prodsids2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _prodscants2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _prodsprecios2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _estapromo = RemoteObject.createImmutable(""); -public static RemoteObject _estecliente = RemoteObject.createImmutable(""); -public static RemoteObject _b_promomas = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _b_promomenos = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _et_promocant = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper"); -public static RemoteObject _l_promoscant = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -public static RemoteObject _b_continuar = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _p_prodsvariables = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _lapromo = RemoteObject.createImmutable(""); -public static RemoteObject _elcliente = RemoteObject.createImmutable(""); -public static RemoteObject _prodspedidoactual = RemoteObject.createImmutable(""); -public static RemoteObject _montopedidoactual = RemoteObject.createImmutable(""); -public static RemoteObject _promosmap = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"b_continuar",_ref.getField(false, "_b_continuar"),"b_prodMas",_ref.getField(false, "_b_prodmas"),"b_prodMenos",_ref.getField(false, "_b_prodmenos"),"b_promoMas",_ref.getField(false, "_b_promomas"),"b_promoMenos",_ref.getField(false, "_b_promomenos"),"b_terminar1",_ref.getField(false, "_b_terminar1"),"clv_prodsVariabes",_ref.getField(false, "_clv_prodsvariabes"),"DateUtils",_ref.getField(false, "_dateutils"),"elCliente",_ref.getField(false, "_elcliente"),"estaPromo",_ref.getField(false, "_estapromo"),"esteCliente",_ref.getField(false, "_estecliente"),"et_pCant",_ref.getField(false, "_et_pcant"),"et_promoCant",_ref.getField(false, "_et_promocant"),"i_prod",_ref.getField(false, "_i_prod"),"l_pCant",_ref.getField(false, "_l_pcant"),"l_prodsFijos",_ref.getField(false, "_l_prodsfijos"),"l_prodsVariables",_ref.getField(false, "_l_prodsvariables"),"l_prodX",_ref.getField(false, "_l_prodx"),"l_promoDesc",_ref.getField(false, "_l_promodesc"),"l_promosCant",_ref.getField(false, "_l_promoscant"),"l_total",_ref.getField(false, "_l_total"),"l_totProds",_ref.getField(false, "_l_totprods"),"laPromo",_ref.getField(false, "_lapromo"),"lv_prodsFijos",_ref.getField(false, "_lv_prodsfijos"),"maxCantPromos",_ref.getField(false, "_maxcantpromos"),"montoPedidoActual",_ref.getField(false, "_montopedidoactual"),"p_prods",_ref.getField(false, "_p_prods"),"p_prodsVariables",_ref.getField(false, "_p_prodsvariables"),"p_promociones",_ref.getField(false, "_p_promociones"),"prodsCants",_ref.getField(false, "_prodscants"),"prodsCants2",_ref.getField(false, "_prodscants2"),"prodsFijosTot",_ref.getField(false, "_prodsfijostot"),"prodsIds",_ref.getField(false, "_prodsids"),"prodsIds2",_ref.getField(false, "_prodsids2"),"prodsPedidoActual",_ref.getField(false, "_prodspedidoactual"),"prodsPrecios",_ref.getField(false, "_prodsprecios"),"prodsPrecios2",_ref.getField(false, "_prodsprecios2"),"prodsVarReq",_ref.getField(false, "_prodsvarreq"),"prodsVarReq2",_ref.getField(false, "_prodsvarreq2"),"promosMap",_ref.getField(false, "_promosmap"),"Root",_ref.getField(false, "_root"),"totalCompra",_ref.getField(false, "_totalcompra"),"totalProds",_ref.getField(false, "_totalprods"),"tpf",_ref.getField(false, "_tpf"),"tpf2",_ref.getField(false, "_tpf2"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_promos_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_promos_subs_0.java deleted file mode 100644 index 936f833..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_promos_subs_0.java +++ /dev/null @@ -1,1245 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class c_promos_subs_0 { - - -public static RemoteObject _agregafijosalista(RemoteObject __ref,RemoteObject _mp,RemoteObject _addlistitem) throws Exception{ -try { - Debug.PushSubsStack("agregaFijosALista (c_promos) ","c_promos",18,__ref.getField(false, "ba"),__ref,162); -if (RapidSub.canDelegate("agregafijosalista")) { return __ref.runUserSub(false, "c_promos","agregafijosalista", __ref, _mp, _addlistitem);} -RemoteObject _thislog = RemoteObject.createImmutable(false); -RemoteObject _cont = RemoteObject.createImmutable(0); -RemoteObject _pf = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _p = RemoteObject.createImmutable(""); -RemoteObject _tpi = RemoteObject.createImmutable(""); -RemoteObject _tpr = RemoteObject.createImmutable(""); -RemoteObject _ntpi = RemoteObject.createImmutable(0); -Debug.locals.put("mp", _mp); -Debug.locals.put("addListItem", _addlistitem); - BA.debugLineNum = 162;BA.debugLine="Sub agregaFijosALista(mp As Map, addListItem As Bo"; -Debug.ShouldStop(2); - BA.debugLineNum = 163;BA.debugLine="Private thisLog As Boolean = False"; -Debug.ShouldStop(4); -_thislog = c_promos.__c.getField(true,"False");Debug.locals.put("thisLog", _thislog);Debug.locals.put("thisLog", _thislog); - BA.debugLineNum = 164;BA.debugLine="Private cont As Int = 0"; -Debug.ShouldStop(8); -_cont = BA.numberCast(int.class, 0);Debug.locals.put("cont", _cont);Debug.locals.put("cont", _cont); - BA.debugLineNum = 165;BA.debugLine="prodsFijosTot = 0"; -Debug.ShouldStop(16); -__ref.setField ("_prodsfijostot" /*RemoteObject*/ ,BA.numberCast(float.class, 0)); - BA.debugLineNum = 166;BA.debugLine="Dim pf As List = mp.Get(\"prodsFijos\")"; -Debug.ShouldStop(32); -_pf = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); -_pf = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), _mp.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsFijos")))));Debug.locals.put("pf", _pf);Debug.locals.put("pf", _pf); - BA.debugLineNum = 167;BA.debugLine="If pf.Size < 1 Then pf.Add(\"Sin productos fijos.\""; -Debug.ShouldStop(64); -if (RemoteObject.solveBoolean("<",_pf.runMethod(true,"getSize"),BA.numberCast(double.class, 1))) { -_pf.runVoidMethod ("Add",(Object)((RemoteObject.createImmutable("Sin productos fijos."))));}; - BA.debugLineNum = 171;BA.debugLine="prodsIds.clear"; -Debug.ShouldStop(1024); -__ref.getField(false,"_prodsids" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 172;BA.debugLine="prodsCants.clear"; -Debug.ShouldStop(2048); -__ref.getField(false,"_prodscants" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 173;BA.debugLine="prodsPrecios.clear"; -Debug.ShouldStop(4096); -__ref.getField(false,"_prodsprecios" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 174;BA.debugLine="prodsIds.Add(estaPromo)"; -Debug.ShouldStop(8192); -__ref.getField(false,"_prodsids" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((__ref.getField(true,"_estapromo" /*RemoteObject*/ )))); - BA.debugLineNum = 175;BA.debugLine="prodsCants.Add(et_promoCant.text.As(Int))"; -Debug.ShouldStop(16384); -__ref.getField(false,"_prodscants" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)(((BA.numberCast(int.class, __ref.getField(false,"_et_promocant" /*RemoteObject*/ ).runMethod(true,"getText")))))); - BA.debugLineNum = 176;BA.debugLine="prodsPrecios.Add(0)"; -Debug.ShouldStop(32768); -__ref.getField(false,"_prodsprecios" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)(RemoteObject.createImmutable((0)))); - BA.debugLineNum = 177;BA.debugLine="For Each p As String In pf"; -Debug.ShouldStop(65536); -{ -final RemoteObject group12 = _pf; -final int groupLen12 = group12.runMethod(true,"getSize").get() -;int index12 = 0; -; -for (; index12 < groupLen12;index12++){ -_p = BA.ObjectToString(group12.runMethod(false,"Get",index12));Debug.locals.put("p", _p); -Debug.locals.put("p", _p); - BA.debugLineNum = 179;BA.debugLine="If mp.Get(\"prodsFijosPiezas\").As(List).Size > 0"; -Debug.ShouldStop(262144); -if (RemoteObject.solveBoolean(">",(RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), _mp.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsFijosPiezas")))))).runMethod(true,"getSize"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 180;BA.debugLine="Private tpi As String = mp.Get(\"prodsFijosPieza"; -Debug.ShouldStop(524288); -_tpi = BA.ObjectToString((RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), _mp.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsFijosPiezas")))))).runMethod(false,"Get",(Object)(_cont)));Debug.locals.put("tpi", _tpi);Debug.locals.put("tpi", _tpi); - }else { - BA.debugLineNum = 182;BA.debugLine="Private tpi As String = 0"; -Debug.ShouldStop(2097152); -_tpi = BA.NumberToString(0);Debug.locals.put("tpi", _tpi);Debug.locals.put("tpi", _tpi); - }; - BA.debugLineNum = 184;BA.debugLine="If mp.Get(\"prodsFijosPrecios\").As(List).Size > 0"; -Debug.ShouldStop(8388608); -if (RemoteObject.solveBoolean(">",(RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), _mp.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsFijosPrecios")))))).runMethod(true,"getSize"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 185;BA.debugLine="Private tpr As String = mp.Get(\"prodsFijosPreci"; -Debug.ShouldStop(16777216); -_tpr = BA.ObjectToString((RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), _mp.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsFijosPrecios")))))).runMethod(false,"Get",(Object)(_cont)));Debug.locals.put("tpr", _tpr);Debug.locals.put("tpr", _tpr); - }else { - BA.debugLineNum = 187;BA.debugLine="Private tpr As String = 0"; -Debug.ShouldStop(67108864); -_tpr = BA.NumberToString(0);Debug.locals.put("tpr", _tpr);Debug.locals.put("tpr", _tpr); - }; - BA.debugLineNum = 189;BA.debugLine="prodsFijosTot = prodsFijosTot + (tpi * tpr)"; -Debug.ShouldStop(268435456); -__ref.setField ("_prodsfijostot" /*RemoteObject*/ ,BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_prodsfijostot" /*RemoteObject*/ ),(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, _tpi),BA.numberCast(double.class, _tpr)}, "*",0, 0))}, "+",1, 0))); - BA.debugLineNum = 190;BA.debugLine="If thisLog Then Log(\"|\"&tpi&\"|\"&p)"; -Debug.ShouldStop(536870912); -if (_thislog.get().booleanValue()) { -c_promos.__c.runVoidMethod ("LogImpl","325886748",RemoteObject.concat(RemoteObject.createImmutable("|"),_tpi,RemoteObject.createImmutable("|"),_p),0);}; - BA.debugLineNum = 191;BA.debugLine="Private ntpi As Int = tpi * et_promoCant.text"; -Debug.ShouldStop(1073741824); -_ntpi = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, _tpi),BA.numberCast(double.class, __ref.getField(false,"_et_promocant" /*RemoteObject*/ ).runMethod(true,"getText"))}, "*",0, 0));Debug.locals.put("ntpi", _ntpi);Debug.locals.put("ntpi", _ntpi); - BA.debugLineNum = 192;BA.debugLine="If addListItem And tpi > 0 Then lv_prodsFijos.Ad"; -Debug.ShouldStop(-2147483648); -if (RemoteObject.solveBoolean(".",_addlistitem) && RemoteObject.solveBoolean(">",BA.numberCast(double.class, _tpi),BA.numberCast(double.class, 0))) { -__ref.getField(false,"_lv_prodsfijos" /*RemoteObject*/ ).runVoidMethod ("AddSingleLine",(Object)(BA.ObjectToCharSequence(RemoteObject.concat(_ntpi,RemoteObject.createImmutable(" "),c_promos._subs.runMethod(true,"_traeprodnombre" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(_p)),RemoteObject.createImmutable(" - $"),_tpr))));}; - BA.debugLineNum = 193;BA.debugLine="cont = cont+1"; -Debug.ShouldStop(1); -_cont = RemoteObject.solve(new RemoteObject[] {_cont,RemoteObject.createImmutable(1)}, "+",1, 1);Debug.locals.put("cont", _cont); - BA.debugLineNum = 196;BA.debugLine="prodsIds.Add(p)"; -Debug.ShouldStop(8); -__ref.getField(false,"_prodsids" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((_p))); - BA.debugLineNum = 197;BA.debugLine="prodsCants.Add(tpi.As(Int)*et_promoCant.text.As("; -Debug.ShouldStop(16); -__ref.getField(false,"_prodscants" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((RemoteObject.solve(new RemoteObject[] {(BA.numberCast(int.class, _tpi)),(BA.numberCast(int.class, __ref.getField(false,"_et_promocant" /*RemoteObject*/ ).runMethod(true,"getText")))}, "*",0, 1)))); - BA.debugLineNum = 198;BA.debugLine="prodsPrecios.Add(tpr) '*et_promoCant.text.As(Int"; -Debug.ShouldStop(32); -__ref.getField(false,"_prodsprecios" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((_tpr))); - } -}Debug.locals.put("p", _p); -; - BA.debugLineNum = 200;BA.debugLine="End Sub"; -Debug.ShouldStop(128); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_continuar_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_continuar_Click (c_promos) ","c_promos",18,__ref.getField(false, "ba"),__ref,394); -if (RapidSub.canDelegate("b_continuar_click")) { return __ref.runUserSub(false, "c_promos","b_continuar_click", __ref);} -int _t = 0; -RemoteObject _pn = RemoteObject.createImmutable(""); -RemoteObject _prodspage = RemoteObject.declareNull("keymon.lat.medicomed.c_productos"); - BA.debugLineNum = 394;BA.debugLine="Private Sub b_continuar_Click"; -Debug.ShouldStop(512); - BA.debugLineNum = 395;BA.debugLine="cuentaProds"; -Debug.ShouldStop(1024); -__ref.runClassMethod (keymon.lat.medicomed.c_promos.class, "_cuentaprods" /*RemoteObject*/ ); - BA.debugLineNum = 396;BA.debugLine="Log(\"============================================"; -Debug.ShouldStop(2048); -c_promos.__c.runVoidMethod ("LogImpl","326542082",RemoteObject.createImmutable("===================================================================="),0); - BA.debugLineNum = 397;BA.debugLine="For t = 0 To prodsIds.Size - 1 'Guardamos los pro"; -Debug.ShouldStop(4096); -{ -final int step3 = 1; -final int limit3 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_prodsids" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_t = 0 ; -for (;(step3 > 0 && _t <= limit3) || (step3 < 0 && _t >= limit3) ;_t = ((int)(0 + _t + step3)) ) { -Debug.locals.put("t", _t); - BA.debugLineNum = 398;BA.debugLine="Private pn As String = Subs.traeProdNombre(prods"; -Debug.ShouldStop(8192); -_pn = c_promos._subs.runMethod(true,"_traeprodnombre" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString(__ref.getField(false,"_prodsids" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _t))))));Debug.locals.put("pn", _pn);Debug.locals.put("pn", _pn); - BA.debugLineNum = 399;BA.debugLine="Subs.guardaProductoSinGestion(estaPromo, prodsPr"; -Debug.ShouldStop(16384); -c_promos._subs.runVoidMethod ("_guardaproductosingestion" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(true,"_estapromo" /*RemoteObject*/ )),(Object)(BA.ObjectToString(__ref.getField(false,"_prodsprecios" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _t))))),(Object)(BA.ObjectToString(__ref.getField(false,"_prodscants" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _t))))),(Object)(_pn),(Object)(BA.ObjectToString(__ref.getField(false,"_prodsids" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _t))))),(Object)(c_promos._subs.runMethod(true,"_traecliente" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(c_promos._subs.runMethod(true,"_traefecha" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(c_promos._subs.runMethod(true,"_traeusuariodebd" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(c_promos._subs.runMethod(true,"_traeruta" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(BA.NumberToString(0)),(Object)(c_promos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_tipo_venta" /*RemoteObject*/ ))); - } -}Debug.locals.put("t", _t); -; - BA.debugLineNum = 401;BA.debugLine="For t = 0 To prodsIds2.Size - 1 'Guardamos los pr"; -Debug.ShouldStop(65536); -{ -final int step7 = 1; -final int limit7 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_prodsids2" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_t = 0 ; -for (;(step7 > 0 && _t <= limit7) || (step7 < 0 && _t >= limit7) ;_t = ((int)(0 + _t + step7)) ) { -Debug.locals.put("t", _t); - BA.debugLineNum = 402;BA.debugLine="Private pn As String = Subs.traeProdNombre(prods"; -Debug.ShouldStop(131072); -_pn = c_promos._subs.runMethod(true,"_traeprodnombre" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString(__ref.getField(false,"_prodsids2" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _t))))));Debug.locals.put("pn", _pn);Debug.locals.put("pn", _pn); - BA.debugLineNum = 403;BA.debugLine="Subs.guardaProductoSinGestion(estaPromo, prodsPr"; -Debug.ShouldStop(262144); -c_promos._subs.runVoidMethod ("_guardaproductosingestion" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(true,"_estapromo" /*RemoteObject*/ )),(Object)(BA.ObjectToString(__ref.getField(false,"_prodsprecios2" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _t))))),(Object)(BA.ObjectToString(__ref.getField(false,"_prodscants2" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _t))))),(Object)(_pn),(Object)(BA.ObjectToString(__ref.getField(false,"_prodsids2" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _t))))),(Object)(c_promos._subs.runMethod(true,"_traecliente" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(c_promos._subs.runMethod(true,"_traefecha" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(c_promos._subs.runMethod(true,"_traeusuariodebd" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(c_promos._subs.runMethod(true,"_traeruta" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(BA.NumberToString(0)),(Object)(c_promos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_tipo_venta" /*RemoteObject*/ ))); - } -}Debug.locals.put("t", _t); -; - BA.debugLineNum = 417;BA.debugLine="lv_prodsFijos.Clear"; -Debug.ShouldStop(1); -__ref.getField(false,"_lv_prodsfijos" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 420;BA.debugLine="Private prodspage As C_Productos"; -Debug.ShouldStop(8); -_prodspage = RemoteObject.createNew ("keymon.lat.medicomed.c_productos");Debug.locals.put("prodspage", _prodspage); - BA.debugLineNum = 421;BA.debugLine="If prodspage.IsInitialized Then"; -Debug.ShouldStop(16); -if (_prodspage.runMethod(true,"IsInitialized" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 422;BA.debugLine="prodspage.lv_catalogos.Visible = True"; -Debug.ShouldStop(32); -_prodspage.getField(false,"_lv_catalogos" /*RemoteObject*/ ).runMethod(true,"setVisible",c_promos.__c.getField(true,"True")); - BA.debugLineNum = 423;BA.debugLine="prodspage.lv_promos.Visible = False"; -Debug.ShouldStop(64); -_prodspage.getField(false,"_lv_promos" /*RemoteObject*/ ).runMethod(true,"setVisible",c_promos.__c.getField(true,"False")); - BA.debugLineNum = 424;BA.debugLine="prodspage.clv_productos.AsView.Visible = False"; -Debug.ShouldStop(128); -_prodspage.getField(false,"_clv_productos" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"setVisible",c_promos.__c.getField(true,"False")); - }; - BA.debugLineNum = 426;BA.debugLine="B4XPages.MainPage.bTerminarClicked = True"; -Debug.ShouldStop(512); -c_promos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).setField ("_bterminarclicked" /*RemoteObject*/ ,c_promos.__c.getField(true,"True")); - BA.debugLineNum = 427;BA.debugLine="B4XPages.ShowPage(\"productos\")"; -Debug.ShouldStop(1024); -c_promos._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("productos"))); - BA.debugLineNum = 428;BA.debugLine="End Sub"; -Debug.ShouldStop(2048); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_prodmas_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_prodMas_Click (c_promos) ","c_promos",18,__ref.getField(false, "ba"),__ref,244); -if (RapidSub.canDelegate("b_prodmas_click")) { return __ref.runUserSub(false, "c_promos","b_prodmas_click", __ref);} -RemoteObject _index = RemoteObject.createImmutable(0); -RemoteObject _pnl0 = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _pnl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _lacant = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _estetag = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _precio = RemoteObject.createImmutable(""); -RemoteObject _prodid = RemoteObject.createImmutable(""); -RemoteObject _tmpmap = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); - BA.debugLineNum = 244;BA.debugLine="Sub b_prodMas_Click"; -Debug.ShouldStop(524288); - BA.debugLineNum = 245;BA.debugLine="If totalProds < prodsVarReq + tpf Then"; -Debug.ShouldStop(1048576); -if (RemoteObject.solveBoolean("<",__ref.getField(true,"_totalprods" /*RemoteObject*/ ),BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_prodsvarreq" /*RemoteObject*/ ),__ref.getField(true,"_tpf" /*RemoteObject*/ )}, "+",1, 1)))) { - BA.debugLineNum = 246;BA.debugLine="Dim index As Int = clv_prodsVariabes.GetItemFrom"; -Debug.ShouldStop(2097152); -_index = __ref.getField(false,"_clv_prodsvariabes" /*RemoteObject*/ ).runMethod(true,"_getitemfromview",RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), c_promos.__c.runMethod(false,"Sender",__ref.getField(false, "ba"))));Debug.locals.put("index", _index);Debug.locals.put("index", _index); - BA.debugLineNum = 247;BA.debugLine="Dim pnl0 As B4XView = clv_prodsVariabes.GetPanel"; -Debug.ShouldStop(4194304); -_pnl0 = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_pnl0 = __ref.getField(false,"_clv_prodsvariabes" /*RemoteObject*/ ).runMethod(false,"_getpanel",(Object)(_index));Debug.locals.put("pnl0", _pnl0);Debug.locals.put("pnl0", _pnl0); - BA.debugLineNum = 248;BA.debugLine="Dim pnl As B4XView = pnl0.GetView(0)"; -Debug.ShouldStop(8388608); -_pnl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_pnl = _pnl0.runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0)));Debug.locals.put("pnl", _pnl);Debug.locals.put("pnl", _pnl); - BA.debugLineNum = 250;BA.debugLine="Dim laCant As B4XView = pnl.GetView(2).GetView(4"; -Debug.ShouldStop(33554432); -_lacant = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_lacant = _pnl.runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 2))).runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 4)));Debug.locals.put("laCant", _lacant);Debug.locals.put("laCant", _lacant); - BA.debugLineNum = 253;BA.debugLine="Dim esteTag As List = Regex.Split(\"\\|\", laCant.T"; -Debug.ShouldStop(268435456); -_estetag = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); -_estetag = c_promos.__c.runMethod(false, "ArrayToList", (Object)(c_promos.__c.getField(false,"Regex").runMethod(false,"Split",(Object)(BA.ObjectToString("\\|")),(Object)(BA.ObjectToString(_lacant.runMethod(false,"getTag"))))));Debug.locals.put("esteTag", _estetag);Debug.locals.put("esteTag", _estetag); - BA.debugLineNum = 255;BA.debugLine="If laCant.Text + 1 <= esteTag.get(1) Then"; -Debug.ShouldStop(1073741824); -if (RemoteObject.solveBoolean("k",RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, _lacant.runMethod(true,"getText")),RemoteObject.createImmutable(1)}, "+",1, 0),BA.numberCast(double.class, _estetag.runMethod(false,"Get",(Object)(BA.numberCast(int.class, 1)))))) { - BA.debugLineNum = 256;BA.debugLine="laCant.Text = $\"$1.0{laCant.Text+1}\"$"; -Debug.ShouldStop(-2147483648); -_lacant.runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable(""),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("1.0")),(Object)((RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, _lacant.runMethod(true,"getText")),RemoteObject.createImmutable(1)}, "+",1, 0)))),RemoteObject.createImmutable(""))))); - BA.debugLineNum = 257;BA.debugLine="cuentaProds"; -Debug.ShouldStop(1); -__ref.runClassMethod (keymon.lat.medicomed.c_promos.class, "_cuentaprods" /*RemoteObject*/ ); - }; - BA.debugLineNum = 260;BA.debugLine="Log(Regex.Split(\"\\|\", laCant.tag)(0))"; -Debug.ShouldStop(8); -c_promos.__c.runVoidMethod ("LogImpl","326083344",c_promos.__c.getField(false,"Regex").runMethod(false,"Split",(Object)(BA.ObjectToString("\\|")),(Object)(BA.ObjectToString(_lacant.runMethod(false,"getTag")))).getArrayElement(true,BA.numberCast(int.class, 0)),0); - BA.debugLineNum = 261;BA.debugLine="Private precio As String = Regex.Split(\"\\|\", laC"; -Debug.ShouldStop(16); -_precio = c_promos.__c.getField(false,"Regex").runMethod(false,"Split",(Object)(BA.ObjectToString("\\|")),(Object)(BA.ObjectToString(_lacant.runMethod(false,"getTag")))).getArrayElement(true,BA.numberCast(int.class, 0));Debug.locals.put("precio", _precio);Debug.locals.put("precio", _precio); - BA.debugLineNum = 263;BA.debugLine="Private prodId As String = Regex.Split(\"\\|\", laC"; -Debug.ShouldStop(64); -_prodid = c_promos.__c.getField(false,"Regex").runMethod(false,"Split",(Object)(BA.ObjectToString("\\|")),(Object)(BA.ObjectToString(_lacant.runMethod(false,"getTag")))).getArrayElement(true,BA.numberCast(int.class, 2));Debug.locals.put("prodId", _prodid);Debug.locals.put("prodId", _prodid); - BA.debugLineNum = 264;BA.debugLine="Private tmpMap As Map = CreateMap(\"precio\":preci"; -Debug.ShouldStop(128); -_tmpmap = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_tmpmap = c_promos.__c.runMethod(false, "createMap", (Object)(new RemoteObject[] {RemoteObject.createImmutable(("precio")),(_precio),RemoteObject.createImmutable(("cant")),(_lacant.runMethod(true,"getText")),RemoteObject.createImmutable(("almacen")),(__ref.getField(true,"_estapromo" /*RemoteObject*/ ))}));Debug.locals.put("tmpMap", _tmpmap);Debug.locals.put("tmpMap", _tmpmap); - BA.debugLineNum = 265;BA.debugLine="Log(tmpMap)"; -Debug.ShouldStop(256); -c_promos.__c.runVoidMethod ("LogImpl","326083349",BA.ObjectToString(_tmpmap),0); - BA.debugLineNum = 266;BA.debugLine="promosMap.Put(prodId, tmpMap)"; -Debug.ShouldStop(512); -__ref.getField(false,"_promosmap" /*RemoteObject*/ ).runVoidMethod ("Put",(Object)((_prodid)),(Object)((_tmpmap.getObject()))); - BA.debugLineNum = 267;BA.debugLine="LogColor(promosMap, Colors.Magenta)"; -Debug.ShouldStop(1024); -c_promos.__c.runVoidMethod ("LogImpl","326083351",BA.ObjectToString(__ref.getField(false,"_promosmap" /*RemoteObject*/ )),c_promos.__c.getField(false,"Colors").getField(true,"Magenta")); - }; - BA.debugLineNum = 272;BA.debugLine="End Sub"; -Debug.ShouldStop(32768); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_prodmenos_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_prodMenos_Click (c_promos) ","c_promos",18,__ref.getField(false, "ba"),__ref,220); -if (RapidSub.canDelegate("b_prodmenos_click")) { return __ref.runUserSub(false, "c_promos","b_prodmenos_click", __ref);} -RemoteObject _index = RemoteObject.createImmutable(0); -RemoteObject _pnl0 = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _pnl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _lacant = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _precio = RemoteObject.createImmutable(""); -RemoteObject _prodid = RemoteObject.createImmutable(""); -RemoteObject _tmpmap = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); - BA.debugLineNum = 220;BA.debugLine="Sub b_prodMenos_Click"; -Debug.ShouldStop(134217728); - BA.debugLineNum = 221;BA.debugLine="Dim index As Int = clv_prodsVariabes.GetItemFromV"; -Debug.ShouldStop(268435456); -_index = __ref.getField(false,"_clv_prodsvariabes" /*RemoteObject*/ ).runMethod(true,"_getitemfromview",RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), c_promos.__c.runMethod(false,"Sender",__ref.getField(false, "ba"))));Debug.locals.put("index", _index);Debug.locals.put("index", _index); - BA.debugLineNum = 222;BA.debugLine="Dim pnl0 As B4XView = clv_prodsVariabes.GetPanel("; -Debug.ShouldStop(536870912); -_pnl0 = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_pnl0 = __ref.getField(false,"_clv_prodsvariabes" /*RemoteObject*/ ).runMethod(false,"_getpanel",(Object)(_index));Debug.locals.put("pnl0", _pnl0);Debug.locals.put("pnl0", _pnl0); - BA.debugLineNum = 223;BA.debugLine="Dim pnl As B4XView = pnl0.GetView(0)"; -Debug.ShouldStop(1073741824); -_pnl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_pnl = _pnl0.runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0)));Debug.locals.put("pnl", _pnl);Debug.locals.put("pnl", _pnl); - BA.debugLineNum = 225;BA.debugLine="Dim laCant As B4XView = pnl.GetView(2).GetView(4)"; -Debug.ShouldStop(1); -_lacant = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_lacant = _pnl.runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 2))).runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 4)));Debug.locals.put("laCant", _lacant);Debug.locals.put("laCant", _lacant); - BA.debugLineNum = 227;BA.debugLine="laCant.Text = $\"$1.0{laCant.Text-1}\"$"; -Debug.ShouldStop(4); -_lacant.runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable(""),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("1.0")),(Object)((RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, _lacant.runMethod(true,"getText")),RemoteObject.createImmutable(1)}, "-",1, 0)))),RemoteObject.createImmutable(""))))); - BA.debugLineNum = 228;BA.debugLine="If laCant.Text < 0 Then laCant.Text = 0"; -Debug.ShouldStop(8); -if (RemoteObject.solveBoolean("<",BA.numberCast(double.class, _lacant.runMethod(true,"getText")),BA.numberCast(double.class, 0))) { -_lacant.runMethod(true,"setText",BA.ObjectToCharSequence(0));}; - BA.debugLineNum = 230;BA.debugLine="Log(Regex.Split(\"\\|\", laCant.tag)(0))"; -Debug.ShouldStop(32); -c_promos.__c.runVoidMethod ("LogImpl","326017802",c_promos.__c.getField(false,"Regex").runMethod(false,"Split",(Object)(BA.ObjectToString("\\|")),(Object)(BA.ObjectToString(_lacant.runMethod(false,"getTag")))).getArrayElement(true,BA.numberCast(int.class, 0)),0); - BA.debugLineNum = 231;BA.debugLine="Private precio As String = Regex.Split(\"\\|\", laCa"; -Debug.ShouldStop(64); -_precio = c_promos.__c.getField(false,"Regex").runMethod(false,"Split",(Object)(BA.ObjectToString("\\|")),(Object)(BA.ObjectToString(_lacant.runMethod(false,"getTag")))).getArrayElement(true,BA.numberCast(int.class, 0));Debug.locals.put("precio", _precio);Debug.locals.put("precio", _precio); - BA.debugLineNum = 233;BA.debugLine="Private prodId As String = Regex.Split(\"\\|\", laCa"; -Debug.ShouldStop(256); -_prodid = c_promos.__c.getField(false,"Regex").runMethod(false,"Split",(Object)(BA.ObjectToString("\\|")),(Object)(BA.ObjectToString(_lacant.runMethod(false,"getTag")))).getArrayElement(true,BA.numberCast(int.class, 2));Debug.locals.put("prodId", _prodid);Debug.locals.put("prodId", _prodid); - BA.debugLineNum = 234;BA.debugLine="Private tmpMap As Map = CreateMap(\"precio\":precio"; -Debug.ShouldStop(512); -_tmpmap = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_tmpmap = c_promos.__c.runMethod(false, "createMap", (Object)(new RemoteObject[] {RemoteObject.createImmutable(("precio")),(_precio),RemoteObject.createImmutable(("cant")),(_lacant.runMethod(true,"getText")),RemoteObject.createImmutable(("almacen")),(__ref.getField(true,"_estapromo" /*RemoteObject*/ ))}));Debug.locals.put("tmpMap", _tmpmap);Debug.locals.put("tmpMap", _tmpmap); - BA.debugLineNum = 235;BA.debugLine="Log(tmpMap)"; -Debug.ShouldStop(1024); -c_promos.__c.runVoidMethod ("LogImpl","326017807",BA.ObjectToString(_tmpmap),0); - BA.debugLineNum = 236;BA.debugLine="promosMap.Put(prodId, tmpMap)"; -Debug.ShouldStop(2048); -__ref.getField(false,"_promosmap" /*RemoteObject*/ ).runVoidMethod ("Put",(Object)((_prodid)),(Object)((_tmpmap.getObject()))); - BA.debugLineNum = 237;BA.debugLine="If laCant.Text = 0 Then promosMap.Remove(prodId)"; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean("=",_lacant.runMethod(true,"getText"),BA.NumberToString(0))) { -__ref.getField(false,"_promosmap" /*RemoteObject*/ ).runVoidMethod ("Remove",(Object)((_prodid)));}; - BA.debugLineNum = 238;BA.debugLine="LogColor(promosMap, Colors.Magenta)"; -Debug.ShouldStop(8192); -c_promos.__c.runVoidMethod ("LogImpl","326017810",BA.ObjectToString(__ref.getField(false,"_promosmap" /*RemoteObject*/ )),c_promos.__c.getField(false,"Colors").getField(true,"Magenta")); - BA.debugLineNum = 239;BA.debugLine="cuentaProds"; -Debug.ShouldStop(16384); -__ref.runClassMethod (keymon.lat.medicomed.c_promos.class, "_cuentaprods" /*RemoteObject*/ ); - BA.debugLineNum = 242;BA.debugLine="End Sub"; -Debug.ShouldStop(131072); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_promomas_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_promoMas_Click (c_promos) ","c_promos",18,__ref.getField(false, "ba"),__ref,352); -if (RapidSub.canDelegate("b_promomas_click")) { return __ref.runUserSub(false, "c_promos","b_promomas_click", __ref);} - BA.debugLineNum = 352;BA.debugLine="Private Sub b_promoMas_Click"; -Debug.ShouldStop(-2147483648); - BA.debugLineNum = 353;BA.debugLine="If et_promoCant.Text < maxCantPromos Then"; -Debug.ShouldStop(1); -if (RemoteObject.solveBoolean("<",BA.numberCast(double.class, __ref.getField(false,"_et_promocant" /*RemoteObject*/ ).runMethod(true,"getText")),BA.numberCast(double.class, __ref.getField(true,"_maxcantpromos" /*RemoteObject*/ )))) { - BA.debugLineNum = 354;BA.debugLine="et_promoCant.Text = et_promoCant.Text.As(Int) +"; -Debug.ShouldStop(2); -__ref.getField(false,"_et_promocant" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence(RemoteObject.solve(new RemoteObject[] {(BA.numberCast(int.class, __ref.getField(false,"_et_promocant" /*RemoteObject*/ ).runMethod(true,"getText"))),RemoteObject.createImmutable(1)}, "+",1, 1))); - BA.debugLineNum = 355;BA.debugLine="l_prodsFijos.Text = $\"Productos fijos (${tpf2 *"; -Debug.ShouldStop(4); -__ref.getField(false,"_l_prodsfijos" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("Productos fijos ("),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_tpf2" /*RemoteObject*/ ),(BA.numberCast(int.class, __ref.getField(false,"_et_promocant" /*RemoteObject*/ ).runMethod(true,"getText")))}, "*",0, 1)))),RemoteObject.createImmutable(")"))))); - BA.debugLineNum = 356;BA.debugLine="l_prodsVariables.Text = $\"Productos variables re"; -Debug.ShouldStop(8); -__ref.getField(false,"_l_prodsvariables" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("Productos variables requeridos: "),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_prodsvarreq2" /*RemoteObject*/ ),(BA.numberCast(int.class, __ref.getField(false,"_et_promocant" /*RemoteObject*/ ).runMethod(true,"getText")))}, "*",0, 1)))),RemoteObject.createImmutable(""))))); - BA.debugLineNum = 357;BA.debugLine="tpf = tpf2 * et_promoCant.Text.As(Int)"; -Debug.ShouldStop(16); -__ref.setField ("_tpf" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_tpf2" /*RemoteObject*/ ),(BA.numberCast(int.class, __ref.getField(false,"_et_promocant" /*RemoteObject*/ ).runMethod(true,"getText")))}, "*",0, 1)); - BA.debugLineNum = 358;BA.debugLine="prodsVarReq = prodsVarReq2 * et_promoCant.Text.A"; -Debug.ShouldStop(32); -__ref.setField ("_prodsvarreq" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_prodsvarreq2" /*RemoteObject*/ ),(BA.numberCast(int.class, __ref.getField(false,"_et_promocant" /*RemoteObject*/ ).runMethod(true,"getText")))}, "*",0, 1)); - BA.debugLineNum = 359;BA.debugLine="Log($\"Max promos=${et_promoCant.Text.As(Int)}, P"; -Debug.ShouldStop(64); -c_promos.__c.runVoidMethod ("LogImpl","326411015",(RemoteObject.concat(RemoteObject.createImmutable("Max promos="),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)(((BA.numberCast(int.class, __ref.getField(false,"_et_promocant" /*RemoteObject*/ ).runMethod(true,"getText")))))),RemoteObject.createImmutable(", Prods fijos="),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_tpf" /*RemoteObject*/ )))),RemoteObject.createImmutable(", "))),0); - }; - BA.debugLineNum = 361;BA.debugLine="If et_promoCant.text > maxCantPromos Then et_prom"; -Debug.ShouldStop(256); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_et_promocant" /*RemoteObject*/ ).runMethod(true,"getText")),BA.numberCast(double.class, __ref.getField(true,"_maxcantpromos" /*RemoteObject*/ )))) { -__ref.getField(false,"_et_promocant" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence(__ref.getField(true,"_maxcantpromos" /*RemoteObject*/ )));}; - BA.debugLineNum = 362;BA.debugLine="cuentaProds"; -Debug.ShouldStop(512); -__ref.runClassMethod (keymon.lat.medicomed.c_promos.class, "_cuentaprods" /*RemoteObject*/ ); - BA.debugLineNum = 363;BA.debugLine="End Sub"; -Debug.ShouldStop(1024); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_promomenos_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_promoMenos_Click (c_promos) ","c_promos",18,__ref.getField(false, "ba"),__ref,340); -if (RapidSub.canDelegate("b_promomenos_click")) { return __ref.runUserSub(false, "c_promos","b_promomenos_click", __ref);} - BA.debugLineNum = 340;BA.debugLine="Private Sub b_promoMenos_Click"; -Debug.ShouldStop(524288); - BA.debugLineNum = 341;BA.debugLine="If et_promoCant.Text > 1 Then"; -Debug.ShouldStop(1048576); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_et_promocant" /*RemoteObject*/ ).runMethod(true,"getText")),BA.numberCast(double.class, 1))) { - BA.debugLineNum = 342;BA.debugLine="et_promoCant.Text = et_promoCant.Text.As(Int) -"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_et_promocant" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence(RemoteObject.solve(new RemoteObject[] {(BA.numberCast(int.class, __ref.getField(false,"_et_promocant" /*RemoteObject*/ ).runMethod(true,"getText"))),RemoteObject.createImmutable(1)}, "-",1, 1))); - }; - BA.debugLineNum = 344;BA.debugLine="l_prodsFijos.Text = $\"Productos fijos (${tpf2 * e"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_l_prodsfijos" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("Productos fijos ("),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_tpf2" /*RemoteObject*/ ),(BA.numberCast(int.class, __ref.getField(false,"_et_promocant" /*RemoteObject*/ ).runMethod(true,"getText")))}, "*",0, 1)))),RemoteObject.createImmutable(")"))))); - BA.debugLineNum = 345;BA.debugLine="l_prodsVariables.Text = $\"Productos variables req"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_l_prodsvariables" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("Productos variables requeridos: "),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_prodsvarreq2" /*RemoteObject*/ ),(BA.numberCast(int.class, __ref.getField(false,"_et_promocant" /*RemoteObject*/ ).runMethod(true,"getText")))}, "*",0, 1)))),RemoteObject.createImmutable(""))))); - BA.debugLineNum = 346;BA.debugLine="tpf = tpf2 * et_promoCant.Text.As(Int)"; -Debug.ShouldStop(33554432); -__ref.setField ("_tpf" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_tpf2" /*RemoteObject*/ ),(BA.numberCast(int.class, __ref.getField(false,"_et_promocant" /*RemoteObject*/ ).runMethod(true,"getText")))}, "*",0, 1)); - BA.debugLineNum = 347;BA.debugLine="prodsVarReq = prodsVarReq2 * et_promoCant.Text.As"; -Debug.ShouldStop(67108864); -__ref.setField ("_prodsvarreq" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_prodsvarreq2" /*RemoteObject*/ ),(BA.numberCast(int.class, __ref.getField(false,"_et_promocant" /*RemoteObject*/ ).runMethod(true,"getText")))}, "*",0, 1)); - BA.debugLineNum = 348;BA.debugLine="Log($\"Max promos=${et_promoCant.Text.As(Int)}, Pr"; -Debug.ShouldStop(134217728); -c_promos.__c.runVoidMethod ("LogImpl","326345480",(RemoteObject.concat(RemoteObject.createImmutable("Max promos="),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)(((BA.numberCast(int.class, __ref.getField(false,"_et_promocant" /*RemoteObject*/ ).runMethod(true,"getText")))))),RemoteObject.createImmutable(", Prods fijos="),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_tpf" /*RemoteObject*/ )))),RemoteObject.createImmutable(", "))),0); - BA.debugLineNum = 349;BA.debugLine="cuentaProds"; -Debug.ShouldStop(268435456); -__ref.runClassMethod (keymon.lat.medicomed.c_promos.class, "_cuentaprods" /*RemoteObject*/ ); - BA.debugLineNum = 350;BA.debugLine="End Sub"; -Debug.ShouldStop(536870912); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_terminar1_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_terminar1_Click (c_promos) ","c_promos",18,__ref.getField(false, "ba"),__ref,365); -if (RapidSub.canDelegate("b_terminar1_click")) { return __ref.runUserSub(false, "c_promos","b_terminar1_click", __ref);} -int _t = 0; -RemoteObject _pn = RemoteObject.createImmutable(""); - BA.debugLineNum = 365;BA.debugLine="Private Sub b_terminar1_Click"; -Debug.ShouldStop(4096); - BA.debugLineNum = 366;BA.debugLine="cuentaProds"; -Debug.ShouldStop(8192); -__ref.runClassMethod (keymon.lat.medicomed.c_promos.class, "_cuentaprods" /*RemoteObject*/ ); - BA.debugLineNum = 367;BA.debugLine="Log(\"============================================"; -Debug.ShouldStop(16384); -c_promos.__c.runVoidMethod ("LogImpl","326476546",RemoteObject.createImmutable("===================================================================="),0); - BA.debugLineNum = 368;BA.debugLine="For t = 0 To prodsIds.Size - 1 'Guardamos los pro"; -Debug.ShouldStop(32768); -{ -final int step3 = 1; -final int limit3 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_prodsids" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_t = 0 ; -for (;(step3 > 0 && _t <= limit3) || (step3 < 0 && _t >= limit3) ;_t = ((int)(0 + _t + step3)) ) { -Debug.locals.put("t", _t); - BA.debugLineNum = 369;BA.debugLine="Private pn As String = Subs.traeProdNombre(prods"; -Debug.ShouldStop(65536); -_pn = c_promos._subs.runMethod(true,"_traeprodnombre" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString(__ref.getField(false,"_prodsids" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _t))))));Debug.locals.put("pn", _pn);Debug.locals.put("pn", _pn); - BA.debugLineNum = 370;BA.debugLine="If prodsCants.Get(t) > 0 Then Subs.guardaProduct"; -Debug.ShouldStop(131072); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, __ref.getField(false,"_prodscants" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _t)))),BA.numberCast(double.class, 0))) { -c_promos._subs.runVoidMethod ("_guardaproductosingestion" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(true,"_estapromo" /*RemoteObject*/ )),(Object)(BA.ObjectToString(__ref.getField(false,"_prodsprecios" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _t))))),(Object)(BA.ObjectToString(__ref.getField(false,"_prodscants" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _t))))),(Object)(_pn),(Object)(BA.ObjectToString(__ref.getField(false,"_prodsids" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _t))))),(Object)(c_promos._subs.runMethod(true,"_traecliente" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(c_promos._subs.runMethod(true,"_traefecha" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(c_promos._subs.runMethod(true,"_traeusuariodebd" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(c_promos._subs.runMethod(true,"_traeruta" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(BA.NumberToString(0)),(Object)(c_promos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_tipo_venta" /*RemoteObject*/ )));}; - } -}Debug.locals.put("t", _t); -; - BA.debugLineNum = 372;BA.debugLine="For t = 0 To prodsIds2.Size - 1 'Guardamos los pr"; -Debug.ShouldStop(524288); -{ -final int step7 = 1; -final int limit7 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_prodsids2" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_t = 0 ; -for (;(step7 > 0 && _t <= limit7) || (step7 < 0 && _t >= limit7) ;_t = ((int)(0 + _t + step7)) ) { -Debug.locals.put("t", _t); - BA.debugLineNum = 373;BA.debugLine="Private pn As String = Subs.traeProdNombre(prods"; -Debug.ShouldStop(1048576); -_pn = c_promos._subs.runMethod(true,"_traeprodnombre" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString(__ref.getField(false,"_prodsids2" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _t))))));Debug.locals.put("pn", _pn);Debug.locals.put("pn", _pn); - BA.debugLineNum = 374;BA.debugLine="Subs.guardaProductoSinGestion(estaPromo, prodsPr"; -Debug.ShouldStop(2097152); -c_promos._subs.runVoidMethod ("_guardaproductosingestion" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(true,"_estapromo" /*RemoteObject*/ )),(Object)(BA.ObjectToString(__ref.getField(false,"_prodsprecios2" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _t))))),(Object)(BA.ObjectToString(__ref.getField(false,"_prodscants2" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _t))))),(Object)(_pn),(Object)(BA.ObjectToString(__ref.getField(false,"_prodsids2" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _t))))),(Object)(c_promos._subs.runMethod(true,"_traecliente" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(c_promos._subs.runMethod(true,"_traefecha" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(c_promos._subs.runMethod(true,"_traeusuariodebd" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(c_promos._subs.runMethod(true,"_traeruta" /*RemoteObject*/ ,__ref.getField(false, "ba"))),(Object)(BA.NumberToString(0)),(Object)(c_promos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(true,"_tipo_venta" /*RemoteObject*/ ))); - } -}Debug.locals.put("t", _t); -; - BA.debugLineNum = 388;BA.debugLine="lv_prodsFijos.Clear"; -Debug.ShouldStop(8); -__ref.getField(false,"_lv_prodsfijos" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 389;BA.debugLine="B4XPages.MainPage.bTerminarClicked = True"; -Debug.ShouldStop(16); -c_promos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).setField ("_bterminarclicked" /*RemoteObject*/ ,c_promos.__c.getField(true,"True")); - BA.debugLineNum = 390;BA.debugLine="B4XPages.ShowPage(\"productos\")"; -Debug.ShouldStop(32); -c_promos._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("productos"))); - BA.debugLineNum = 391;BA.debugLine="B4XPages.MainPage.productos.b_terminar1_Click"; -Debug.ShouldStop(64); -c_promos._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_productos" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.c_productos.class, "_b_terminar1_click" /*RemoteObject*/ ); - BA.debugLineNum = 392;BA.debugLine="End Sub"; -Debug.ShouldStop(128); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b4xpage_appear(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Appear (c_promos) ","c_promos",18,__ref.getField(false, "ba"),__ref,59); -if (RapidSub.canDelegate("b4xpage_appear")) { return __ref.runUserSub(false, "c_promos","b4xpage_appear", __ref);} -RemoteObject _m = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); - BA.debugLineNum = 59;BA.debugLine="Sub B4XPage_Appear"; -Debug.ShouldStop(67108864); - BA.debugLineNum = 61;BA.debugLine="p_promociones.Top=0"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_p_promociones" /*RemoteObject*/ ).runMethod(true,"setTop",BA.numberCast(int.class, 0)); - BA.debugLineNum = 62;BA.debugLine="p_promociones.Left=0"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_p_promociones" /*RemoteObject*/ ).runMethod(true,"setLeft",BA.numberCast(int.class, 0)); - BA.debugLineNum = 63;BA.debugLine="p_promociones.Height=Root.Height"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_p_promociones" /*RemoteObject*/ ).runMethod(true,"setHeight",__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getHeight")); - BA.debugLineNum = 64;BA.debugLine="p_promociones.Width=Root.Width"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_p_promociones" /*RemoteObject*/ ).runMethod(true,"setWidth",__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth")); - BA.debugLineNum = 65;BA.debugLine="b_terminar1.Left = Root.Width - (b_terminar1.Widt"; -Debug.ShouldStop(1); -__ref.getField(false,"_b_terminar1" /*RemoteObject*/ ).runMethod(true,"setLeft",RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"),(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_b_terminar1" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(10)}, "+",1, 1))}, "-",1, 1)); - BA.debugLineNum = 66;BA.debugLine="b_continuar.Left = Root.Width - b_terminar1.Width"; -Debug.ShouldStop(2); -__ref.getField(false,"_b_continuar" /*RemoteObject*/ ).runMethod(true,"setLeft",RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"getWidth"),__ref.getField(false,"_b_terminar1" /*RemoteObject*/ ).runMethod(true,"getWidth"),(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_b_continuar" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(20)}, "+",1, 1))}, "--",2, 1)); - BA.debugLineNum = 67;BA.debugLine="prodsIds.Initialize"; -Debug.ShouldStop(4); -__ref.getField(false,"_prodsids" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 68;BA.debugLine="prodsCants.Initialize"; -Debug.ShouldStop(8); -__ref.getField(false,"_prodscants" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 69;BA.debugLine="prodsPrecios.Initialize"; -Debug.ShouldStop(16); -__ref.getField(false,"_prodsprecios" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 70;BA.debugLine="prodsIds2.Initialize"; -Debug.ShouldStop(32); -__ref.getField(false,"_prodsids2" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 71;BA.debugLine="prodsCants2.Initialize"; -Debug.ShouldStop(64); -__ref.getField(false,"_prodscants2" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 72;BA.debugLine="prodsPrecios2.Initialize"; -Debug.ShouldStop(128); -__ref.getField(false,"_prodsprecios2" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 73;BA.debugLine="Dim m As Map = Subs.traeTotalesClienteActual"; -Debug.ShouldStop(256); -_m = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_m = c_promos._subs.runMethod(false,"_traetotalesclienteactual" /*RemoteObject*/ ,__ref.getField(false, "ba"));Debug.locals.put("m", _m);Debug.locals.put("m", _m); - BA.debugLineNum = 74;BA.debugLine="prodsPedidoActual = m.Get(\"productos\")"; -Debug.ShouldStop(512); -__ref.setField ("_prodspedidoactual" /*RemoteObject*/ ,BA.ObjectToString(_m.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("productos")))))); - BA.debugLineNum = 75;BA.debugLine="montoPedidoActual = m.Get(\"monto\")"; -Debug.ShouldStop(1024); -__ref.setField ("_montopedidoactual" /*RemoteObject*/ ,BA.ObjectToString(_m.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("monto")))))); - BA.debugLineNum = 77;BA.debugLine="If laPromo <> \"\" Then muestraPromo(laPromo, elCli"; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean("!",__ref.getField(true,"_lapromo" /*RemoteObject*/ ),BA.ObjectToString(""))) { -__ref.runClassMethod (keymon.lat.medicomed.c_promos.class, "_muestrapromo" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_lapromo" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_elcliente" /*RemoteObject*/ )));}; - BA.debugLineNum = 78;BA.debugLine="End Sub"; -Debug.ShouldStop(8192); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b4xpage_created(RemoteObject __ref,RemoteObject _root1) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Created (c_promos) ","c_promos",18,__ref.getField(false, "ba"),__ref,52); -if (RapidSub.canDelegate("b4xpage_created")) { return __ref.runUserSub(false, "c_promos","b4xpage_created", __ref, _root1);} -Debug.locals.put("Root1", _root1); - BA.debugLineNum = 52;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -Debug.ShouldStop(524288); - BA.debugLineNum = 53;BA.debugLine="Root = Root1"; -Debug.ShouldStop(1048576); -__ref.setField ("_root" /*RemoteObject*/ ,_root1); - BA.debugLineNum = 55;BA.debugLine="Root.LoadLayout(\"promociones\")"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_root" /*RemoteObject*/ ).runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("promociones")),__ref.getField(false, "ba")); - BA.debugLineNum = 56;BA.debugLine="promosMap.Initialize"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_promosmap" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 57;BA.debugLine="End Sub"; -Debug.ShouldStop(16777216); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 5;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 6;BA.debugLine="Private Root As B4XView 'ignore"; -c_promos._root = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_root",c_promos._root); - //BA.debugLineNum = 7;BA.debugLine="Private xui As XUI"; -c_promos._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",c_promos._xui); - //BA.debugLineNum = 8;BA.debugLine="Private l_promoDesc As Label"; -c_promos._l_promodesc = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_promodesc",c_promos._l_promodesc); - //BA.debugLineNum = 9;BA.debugLine="Private lv_prodsFijos As ListView"; -c_promos._lv_prodsfijos = RemoteObject.createNew ("anywheresoftware.b4a.objects.ListViewWrapper");__ref.setField("_lv_prodsfijos",c_promos._lv_prodsfijos); - //BA.debugLineNum = 10;BA.debugLine="Private clv_prodsVariabes As CustomListView"; -c_promos._clv_prodsvariabes = RemoteObject.createNew ("b4a.example3.customlistview");__ref.setField("_clv_prodsvariabes",c_promos._clv_prodsvariabes); - //BA.debugLineNum = 11;BA.debugLine="Private l_prodsFijos As Label"; -c_promos._l_prodsfijos = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_prodsfijos",c_promos._l_prodsfijos); - //BA.debugLineNum = 12;BA.debugLine="Private l_prodsVariables As Label"; -c_promos._l_prodsvariables = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_prodsvariables",c_promos._l_prodsvariables); - //BA.debugLineNum = 13;BA.debugLine="Private i_prod As ImageView"; -c_promos._i_prod = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");__ref.setField("_i_prod",c_promos._i_prod); - //BA.debugLineNum = 14;BA.debugLine="Private l_prodX As Label"; -c_promos._l_prodx = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_prodx",c_promos._l_prodx); - //BA.debugLineNum = 15;BA.debugLine="Private p_prods As Panel"; -c_promos._p_prods = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_prods",c_promos._p_prods); - //BA.debugLineNum = 16;BA.debugLine="Private b_prodMenos As Button"; -c_promos._b_prodmenos = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_prodmenos",c_promos._b_prodmenos); - //BA.debugLineNum = 17;BA.debugLine="Private et_pCant As EditText"; -c_promos._et_pcant = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");__ref.setField("_et_pcant",c_promos._et_pcant); - //BA.debugLineNum = 18;BA.debugLine="Private b_prodMas As Button"; -c_promos._b_prodmas = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_prodmas",c_promos._b_prodmas); - //BA.debugLineNum = 19;BA.debugLine="Private l_pCant As Label"; -c_promos._l_pcant = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_pcant",c_promos._l_pcant); - //BA.debugLineNum = 20;BA.debugLine="Dim totalProds As Int = 0"; -c_promos._totalprods = BA.numberCast(int.class, 0);__ref.setField("_totalprods",c_promos._totalprods); - //BA.debugLineNum = 21;BA.debugLine="Dim prodsVarReq As Int = 0"; -c_promos._prodsvarreq = BA.numberCast(int.class, 0);__ref.setField("_prodsvarreq",c_promos._prodsvarreq); - //BA.debugLineNum = 22;BA.debugLine="Dim prodsVarReq2 As Int = 0"; -c_promos._prodsvarreq2 = BA.numberCast(int.class, 0);__ref.setField("_prodsvarreq2",c_promos._prodsvarreq2); - //BA.debugLineNum = 23;BA.debugLine="Dim totalCompra As Float = 0"; -c_promos._totalcompra = BA.numberCast(float.class, 0);__ref.setField("_totalcompra",c_promos._totalcompra); - //BA.debugLineNum = 24;BA.debugLine="Dim prodsFijosTot As Float = 0"; -c_promos._prodsfijostot = BA.numberCast(float.class, 0);__ref.setField("_prodsfijostot",c_promos._prodsfijostot); - //BA.debugLineNum = 25;BA.debugLine="Dim tpf As Int = 0"; -c_promos._tpf = BA.numberCast(int.class, 0);__ref.setField("_tpf",c_promos._tpf); - //BA.debugLineNum = 26;BA.debugLine="Dim tpf2 As Int = 0"; -c_promos._tpf2 = BA.numberCast(int.class, 0);__ref.setField("_tpf2",c_promos._tpf2); - //BA.debugLineNum = 27;BA.debugLine="Dim maxCantPromos As Int = 1"; -c_promos._maxcantpromos = BA.numberCast(int.class, 1);__ref.setField("_maxcantpromos",c_promos._maxcantpromos); - //BA.debugLineNum = 28;BA.debugLine="Private l_totProds As Label"; -c_promos._l_totprods = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_totprods",c_promos._l_totprods); - //BA.debugLineNum = 29;BA.debugLine="Private l_total As Label"; -c_promos._l_total = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_total",c_promos._l_total); - //BA.debugLineNum = 30;BA.debugLine="Private b_terminar1 As Button"; -c_promos._b_terminar1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_terminar1",c_promos._b_terminar1); - //BA.debugLineNum = 31;BA.debugLine="Private p_promociones As Panel"; -c_promos._p_promociones = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_promociones",c_promos._p_promociones); - //BA.debugLineNum = 32;BA.debugLine="Dim prodsIds, prodsCants, prodsPrecios, prodsIds2"; -c_promos._prodsids = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_prodsids",c_promos._prodsids); -c_promos._prodscants = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_prodscants",c_promos._prodscants); -c_promos._prodsprecios = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_prodsprecios",c_promos._prodsprecios); -c_promos._prodsids2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_prodsids2",c_promos._prodsids2); -c_promos._prodscants2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_prodscants2",c_promos._prodscants2); -c_promos._prodsprecios2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_prodsprecios2",c_promos._prodsprecios2); - //BA.debugLineNum = 33;BA.debugLine="Dim estaPromo, esteCliente As String"; -c_promos._estapromo = RemoteObject.createImmutable("");__ref.setField("_estapromo",c_promos._estapromo); -c_promos._estecliente = RemoteObject.createImmutable("");__ref.setField("_estecliente",c_promos._estecliente); - //BA.debugLineNum = 34;BA.debugLine="Private b_promoMas As Button"; -c_promos._b_promomas = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_promomas",c_promos._b_promomas); - //BA.debugLineNum = 35;BA.debugLine="Private b_promoMenos As Button"; -c_promos._b_promomenos = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_promomenos",c_promos._b_promomenos); - //BA.debugLineNum = 36;BA.debugLine="Private et_promoCant As EditText"; -c_promos._et_promocant = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");__ref.setField("_et_promocant",c_promos._et_promocant); - //BA.debugLineNum = 37;BA.debugLine="Private l_promosCant As Label"; -c_promos._l_promoscant = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");__ref.setField("_l_promoscant",c_promos._l_promoscant); - //BA.debugLineNum = 38;BA.debugLine="Private b_continuar As Button"; -c_promos._b_continuar = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_continuar",c_promos._b_continuar); - //BA.debugLineNum = 39;BA.debugLine="Private p_prodsVariables As Panel"; -c_promos._p_prodsvariables = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_prodsvariables",c_promos._p_prodsvariables); - //BA.debugLineNum = 40;BA.debugLine="Dim laPromo = \"\", elCliente = \"\" As String"; -c_promos._lapromo = BA.ObjectToString("");__ref.setField("_lapromo",c_promos._lapromo); -c_promos._elcliente = BA.ObjectToString("");__ref.setField("_elcliente",c_promos._elcliente); - //BA.debugLineNum = 41;BA.debugLine="Dim prodsPedidoActual As String"; -c_promos._prodspedidoactual = RemoteObject.createImmutable("");__ref.setField("_prodspedidoactual",c_promos._prodspedidoactual); - //BA.debugLineNum = 42;BA.debugLine="Dim montoPedidoActual As String"; -c_promos._montopedidoactual = RemoteObject.createImmutable("");__ref.setField("_montopedidoactual",c_promos._montopedidoactual); - //BA.debugLineNum = 43;BA.debugLine="Dim promosMap As Map"; -c_promos._promosmap = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");__ref.setField("_promosmap",c_promos._promosmap); - //BA.debugLineNum = 44;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _createlistitem(RemoteObject __ref,RemoteObject _text,RemoteObject _preciou,RemoteObject _inv,RemoteObject _width,RemoteObject _height,RemoteObject _img,RemoteObject _prodid) throws Exception{ -try { - Debug.PushSubsStack("CreateListItem (c_promos) ","c_promos",18,__ref.getField(false, "ba"),__ref,202); -if (RapidSub.canDelegate("createlistitem")) { return __ref.runUserSub(false, "c_promos","createlistitem", __ref, _text, _preciou, _inv, _width, _height, _img, _prodid);} -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -Debug.locals.put("Text", _text); -Debug.locals.put("precioU", _preciou); -Debug.locals.put("inv", _inv); -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); -Debug.locals.put("img", _img); -Debug.locals.put("prodId", _prodid); - BA.debugLineNum = 202;BA.debugLine="Sub CreateListItem(Text As String, precioU As Stri"; -Debug.ShouldStop(512); - BA.debugLineNum = 203;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"\")"; -Debug.ShouldStop(1024); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_p = __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("")));Debug.locals.put("p", _p);Debug.locals.put("p", _p); - BA.debugLineNum = 204;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, Width, Height)"; -Debug.ShouldStop(2048); -_p.runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(_width),(Object)(_height)); - BA.debugLineNum = 205;BA.debugLine="p.LoadLayout(\"proditempromo\")"; -Debug.ShouldStop(4096); -_p.runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("proditempromo")),__ref.getField(false, "ba")); - BA.debugLineNum = 206;BA.debugLine="l_prodX.TextSize = 15"; -Debug.ShouldStop(8192); -__ref.getField(false,"_l_prodx" /*RemoteObject*/ ).runMethod(true,"setTextSize",BA.numberCast(float.class, 15)); - BA.debugLineNum = 207;BA.debugLine="l_prodX.Text = Text"; -Debug.ShouldStop(16384); -__ref.getField(false,"_l_prodx" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(_text)); - BA.debugLineNum = 208;BA.debugLine="l_prodX.TextSize = 15"; -Debug.ShouldStop(32768); -__ref.getField(false,"_l_prodx" /*RemoteObject*/ ).runMethod(true,"setTextSize",BA.numberCast(float.class, 15)); - BA.debugLineNum = 209;BA.debugLine="p_prods.Height = Height"; -Debug.ShouldStop(65536); -__ref.getField(false,"_p_prods" /*RemoteObject*/ ).runMethod(true,"setHeight",_height); - BA.debugLineNum = 210;BA.debugLine="p_prods.Width = clv_prodsVariabes.GetBase.Width"; -Debug.ShouldStop(131072); -__ref.getField(false,"_p_prods" /*RemoteObject*/ ).runMethod(true,"setWidth",__ref.getField(false,"_clv_prodsvariabes" /*RemoteObject*/ ).runMethod(false,"_getbase").runMethod(true,"getWidth")); - BA.debugLineNum = 211;BA.debugLine="l_prodX.Height = Height"; -Debug.ShouldStop(262144); -__ref.getField(false,"_l_prodx" /*RemoteObject*/ ).runMethod(true,"setHeight",_height); - BA.debugLineNum = 213;BA.debugLine="l_pCant.Tag = precioU&\"|\"&inv&\"|\"&prodId"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_l_pcant" /*RemoteObject*/ ).runMethod(false,"setTag",(RemoteObject.concat(_preciou,RemoteObject.createImmutable("|"),_inv,RemoteObject.createImmutable("|"),_prodid))); - BA.debugLineNum = 214;BA.debugLine="et_pCant.Tag = precioU&\"|\"&inv&\"|\"&prodId"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_et_pcant" /*RemoteObject*/ ).runMethod(false,"setTag",(RemoteObject.concat(_preciou,RemoteObject.createImmutable("|"),_inv,RemoteObject.createImmutable("|"),_prodid))); - BA.debugLineNum = 215;BA.debugLine="et_pCant.BringToFront"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_et_pcant" /*RemoteObject*/ ).runVoidMethod ("BringToFront"); - BA.debugLineNum = 217;BA.debugLine="Return p"; -Debug.ShouldStop(16777216); -if (true) return RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.PanelWrapper"), _p.getObject()); - BA.debugLineNum = 218;BA.debugLine="End Sub"; -Debug.ShouldStop(33554432); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _cuentaprods(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("cuentaProds (c_promos) ","c_promos",18,__ref.getField(false, "ba"),__ref,279); -if (RapidSub.canDelegate("cuentaprods")) { return __ref.runUserSub(false, "c_promos","cuentaprods", __ref);} -RemoteObject _thislog = RemoteObject.createImmutable(false); -RemoteObject _tcpf = RemoteObject.createImmutable(0f); -int _pf = 0; -int _i = 0; -RemoteObject _p0 = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _cant1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _estetag = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); - BA.debugLineNum = 279;BA.debugLine="Sub cuentaProds"; -Debug.ShouldStop(4194304); - BA.debugLineNum = 282;BA.debugLine="Private thisLog As Boolean = False"; -Debug.ShouldStop(33554432); -_thislog = c_promos.__c.getField(true,"False");Debug.locals.put("thisLog", _thislog);Debug.locals.put("thisLog", _thislog); - BA.debugLineNum = 283;BA.debugLine="If thisLog Then LogColor($\"ProdsFijos=${tpf}, tot"; -Debug.ShouldStop(67108864); -if (_thislog.get().booleanValue()) { -c_promos.__c.runVoidMethod ("LogImpl","326214404",(RemoteObject.concat(RemoteObject.createImmutable("ProdsFijos="),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_tpf" /*RemoteObject*/ )))),RemoteObject.createImmutable(", totalProds="),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_totalprods" /*RemoteObject*/ )))),RemoteObject.createImmutable(", totalCompra="),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_totalcompra" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))),c_promos.__c.getField(false,"Colors").getField(true,"Red"));}; - BA.debugLineNum = 284;BA.debugLine="prodsIds2.Clear"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_prodsids2" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 285;BA.debugLine="prodsCants2.Clear"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_prodscants2" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 286;BA.debugLine="prodsPrecios2.Clear"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_prodsprecios2" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 287;BA.debugLine="lv_prodsFijos.Clear"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_lv_prodsfijos" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 288;BA.debugLine="agregaFijosALista(Subs.traePromo(estaPromo, esteC"; -Debug.ShouldStop(-2147483648); -__ref.runClassMethod (keymon.lat.medicomed.c_promos.class, "_agregafijosalista" /*RemoteObject*/ ,(Object)(c_promos._subs.runMethod(false,"_traepromo" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(true,"_estapromo" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_estecliente" /*RemoteObject*/ )))),(Object)(c_promos.__c.getField(true,"True"))); - BA.debugLineNum = 290;BA.debugLine="Private tcpf As Float = 0 'Total de compra de pro"; -Debug.ShouldStop(2); -_tcpf = BA.numberCast(float.class, 0);Debug.locals.put("tcpf", _tcpf);Debug.locals.put("tcpf", _tcpf); - BA.debugLineNum = 291;BA.debugLine="For pf = 0 To prodsIds.Size - 1"; -Debug.ShouldStop(4); -{ -final int step9 = 1; -final int limit9 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_prodsids" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_pf = 0 ; -for (;(step9 > 0 && _pf <= limit9) || (step9 < 0 && _pf >= limit9) ;_pf = ((int)(0 + _pf + step9)) ) { -Debug.locals.put("pf", _pf); - BA.debugLineNum = 292;BA.debugLine="If thisLog Then Log($\"${tcpf} + ${prodsCants.Get"; -Debug.ShouldStop(8); -if (_thislog.get().booleanValue()) { -c_promos.__c.runVoidMethod ("LogImpl","326214413",(RemoteObject.concat(RemoteObject.createImmutable(""),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_tcpf))),RemoteObject.createImmutable(" + "),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)(__ref.getField(false,"_prodscants" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _pf))))),RemoteObject.createImmutable(" * "),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)(__ref.getField(false,"_prodsprecios" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _pf))))),RemoteObject.createImmutable(" = "),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)(((RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_prodsprecios" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _pf)))),BA.numberCast(double.class, __ref.getField(false,"_prodscants" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _pf))))}, "*",0, 0))))),RemoteObject.createImmutable(""))),0);}; - BA.debugLineNum = 293;BA.debugLine="tcpf = tcpf + (prodsPrecios.Get(pf) * prodsCants"; -Debug.ShouldStop(16); -_tcpf = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_tcpf,(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_prodsprecios" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _pf)))),BA.numberCast(double.class, __ref.getField(false,"_prodscants" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _pf))))}, "*",0, 0))}, "+",1, 0));Debug.locals.put("tcpf", _tcpf); - } -}Debug.locals.put("pf", _pf); -; - BA.debugLineNum = 296;BA.debugLine="totalCompra = tcpf"; -Debug.ShouldStop(128); -__ref.setField ("_totalcompra" /*RemoteObject*/ ,_tcpf); - BA.debugLineNum = 297;BA.debugLine="totalProds = tpf 'Cantidad total de productos fij"; -Debug.ShouldStop(256); -__ref.setField ("_totalprods" /*RemoteObject*/ ,__ref.getField(true,"_tpf" /*RemoteObject*/ )); - BA.debugLineNum = 298;BA.debugLine="For i = 0 To clv_prodsVariabes.GetSize - 1"; -Debug.ShouldStop(512); -{ -final int step15 = 1; -final int limit15 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_clv_prodsvariabes" /*RemoteObject*/ ).runMethod(true,"_getsize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step15 > 0 && _i <= limit15) || (step15 < 0 && _i >= limit15) ;_i = ((int)(0 + _i + step15)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 299;BA.debugLine="Private p0 As B4XView = clv_prodsVariabes.GetPan"; -Debug.ShouldStop(1024); -_p0 = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_p0 = __ref.getField(false,"_clv_prodsvariabes" /*RemoteObject*/ ).runMethod(false,"_getpanel",(Object)(BA.numberCast(int.class, _i)));Debug.locals.put("p0", _p0);Debug.locals.put("p0", _p0); - BA.debugLineNum = 300;BA.debugLine="Private p As B4XView = p0.GetView(0)"; -Debug.ShouldStop(2048); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_p = _p0.runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0)));Debug.locals.put("p", _p);Debug.locals.put("p", _p); - BA.debugLineNum = 301;BA.debugLine="Private cant1 As B4XView = p.GetView(2).GetView("; -Debug.ShouldStop(4096); -_cant1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_cant1 = _p.runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 2))).runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 4)));Debug.locals.put("cant1", _cant1);Debug.locals.put("cant1", _cant1); - BA.debugLineNum = 303;BA.debugLine="totalProds = totalProds + cant1.Text"; -Debug.ShouldStop(16384); -__ref.setField ("_totalprods" /*RemoteObject*/ ,BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_totalprods" /*RemoteObject*/ ),BA.numberCast(double.class, _cant1.runMethod(true,"getText"))}, "+",1, 0))); - BA.debugLineNum = 304;BA.debugLine="Private esteTag As List = Regex.Split(\"\\|\", cant"; -Debug.ShouldStop(32768); -_estetag = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); -_estetag = c_promos.__c.runMethod(false, "ArrayToList", (Object)(c_promos.__c.getField(false,"Regex").runMethod(false,"Split",(Object)(BA.ObjectToString("\\|")),(Object)(BA.ObjectToString(_cant1.runMethod(false,"getTag"))))));Debug.locals.put("esteTag", _estetag);Debug.locals.put("esteTag", _estetag); - BA.debugLineNum = 305;BA.debugLine="If cant1.Text > esteTag.Get(1) Then cant1.Text ="; -Debug.ShouldStop(65536); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, _cant1.runMethod(true,"getText")),BA.numberCast(double.class, _estetag.runMethod(false,"Get",(Object)(BA.numberCast(int.class, 1)))))) { -_cant1.runMethod(true,"setText",BA.ObjectToCharSequence(_estetag.runMethod(false,"Get",(Object)(BA.numberCast(int.class, 1)))));}; - BA.debugLineNum = 306;BA.debugLine="If cant1.Text > 0 Then"; -Debug.ShouldStop(131072); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, _cant1.runMethod(true,"getText")),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 307;BA.debugLine="Log(esteTag.Get(2) & \"|\" & cant1.Text)"; -Debug.ShouldStop(262144); -c_promos.__c.runVoidMethod ("LogImpl","326214428",RemoteObject.concat(_estetag.runMethod(false,"Get",(Object)(BA.numberCast(int.class, 2))),RemoteObject.createImmutable("|"),_cant1.runMethod(true,"getText")),0); - BA.debugLineNum = 308;BA.debugLine="totalCompra = totalCompra + (esteTag.get(0) * c"; -Debug.ShouldStop(524288); -__ref.setField ("_totalcompra" /*RemoteObject*/ ,BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_totalcompra" /*RemoteObject*/ ),(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, _estetag.runMethod(false,"Get",(Object)(BA.numberCast(int.class, 0)))),BA.numberCast(double.class, _cant1.runMethod(true,"getText"))}, "*",0, 0))}, "+",1, 0))); - BA.debugLineNum = 309;BA.debugLine="If thisLog Then Log($\"Cant: ${cant1.Text}, Suma"; -Debug.ShouldStop(1048576); -if (_thislog.get().booleanValue()) { -c_promos.__c.runVoidMethod ("LogImpl","326214430",(RemoteObject.concat(RemoteObject.createImmutable("Cant: "),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_cant1.runMethod(true,"getText")))),RemoteObject.createImmutable(", Suma: "),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_totalcompra" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))),0);}; - BA.debugLineNum = 310;BA.debugLine="prodsIds2.Add(esteTag.Get(2))"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_prodsids2" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)(_estetag.runMethod(false,"Get",(Object)(BA.numberCast(int.class, 2))))); - BA.debugLineNum = 311;BA.debugLine="prodsCants2.Add(cant1.Text)"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_prodscants2" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((_cant1.runMethod(true,"getText")))); - BA.debugLineNum = 312;BA.debugLine="prodsPrecios2.Add(esteTag.get(0))"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_prodsprecios2" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)(_estetag.runMethod(false,"Get",(Object)(BA.numberCast(int.class, 0))))); - }; - BA.debugLineNum = 314;BA.debugLine="l_total.Text = $\"Total: $$1.2{totalCompra}\"$"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_l_total" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("Total: $"),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("1.2")),(Object)((__ref.getField(true,"_totalcompra" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))))); - BA.debugLineNum = 315;BA.debugLine="l_totProds.text = $\"Productos: ${totalProds}\"$"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_l_totprods" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("Productos: "),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_totalprods" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))))); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 317;BA.debugLine="If thisLog Then Log($\"Total Prods: ${totalProds},"; -Debug.ShouldStop(268435456); -if (_thislog.get().booleanValue()) { -c_promos.__c.runVoidMethod ("LogImpl","326214438",(RemoteObject.concat(RemoteObject.createImmutable("Total Prods: "),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_totalprods" /*RemoteObject*/ )))),RemoteObject.createImmutable(", Total: $"),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("1.2")),(Object)((__ref.getField(true,"_totalcompra" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))),0);}; - BA.debugLineNum = 318;BA.debugLine="l_total.Text = $\"Total: $$1.2{totalCompra}\"$"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_l_total" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("Total: $"),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("1.2")),(Object)((__ref.getField(true,"_totalcompra" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))))); - BA.debugLineNum = 319;BA.debugLine="l_totProds.text = $\"Productos: ${totalProds}\"$"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_l_totprods" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("Productos: "),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_totalprods" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))))); - BA.debugLineNum = 320;BA.debugLine="If totalProds < prodsVarReq + tpf Or totalProds >"; -Debug.ShouldStop(-2147483648); -if (RemoteObject.solveBoolean("<",__ref.getField(true,"_totalprods" /*RemoteObject*/ ),BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_prodsvarreq" /*RemoteObject*/ ),__ref.getField(true,"_tpf" /*RemoteObject*/ )}, "+",1, 1))) || RemoteObject.solveBoolean(">",__ref.getField(true,"_totalprods" /*RemoteObject*/ ),BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_prodsvarreq" /*RemoteObject*/ ),__ref.getField(true,"_tpf" /*RemoteObject*/ )}, "+",1, 1)))) { - BA.debugLineNum = 322;BA.debugLine="b_terminar1.Visible = False"; -Debug.ShouldStop(2); -__ref.getField(false,"_b_terminar1" /*RemoteObject*/ ).runMethod(true,"setVisible",c_promos.__c.getField(true,"False")); - BA.debugLineNum = 323;BA.debugLine="b_continuar.Visible = False"; -Debug.ShouldStop(4); -__ref.getField(false,"_b_continuar" /*RemoteObject*/ ).runMethod(true,"setVisible",c_promos.__c.getField(true,"False")); - }else { - BA.debugLineNum = 326;BA.debugLine="b_terminar1.Visible = True"; -Debug.ShouldStop(32); -__ref.getField(false,"_b_terminar1" /*RemoteObject*/ ).runMethod(true,"setVisible",c_promos.__c.getField(true,"True")); - BA.debugLineNum = 327;BA.debugLine="b_continuar.Visible = True"; -Debug.ShouldStop(64); -__ref.getField(false,"_b_continuar" /*RemoteObject*/ ).runMethod(true,"setVisible",c_promos.__c.getField(true,"True")); - }; - BA.debugLineNum = 329;BA.debugLine="If thisLog Then LogColor($\"${prodsIds}${CRLF}${pr"; -Debug.ShouldStop(256); -if (_thislog.get().booleanValue()) { -c_promos.__c.runVoidMethod ("LogImpl","326214450",(RemoteObject.concat(RemoteObject.createImmutable(""),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(false,"_prodsids" /*RemoteObject*/ ).getObject()))),RemoteObject.createImmutable(""),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((c_promos.__c.getField(true,"CRLF")))),RemoteObject.createImmutable(""),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(false,"_prodscants" /*RemoteObject*/ ).getObject()))),RemoteObject.createImmutable(""),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((c_promos.__c.getField(true,"CRLF")))),RemoteObject.createImmutable(""),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(false,"_prodsprecios" /*RemoteObject*/ ).getObject()))),RemoteObject.createImmutable(""))),c_promos.__c.getField(false,"Colors").getField(true,"Blue"));}; - BA.debugLineNum = 330;BA.debugLine="If thisLog Then LogColor($\"${prodsIds2}${CRLF}${p"; -Debug.ShouldStop(512); -if (_thislog.get().booleanValue()) { -c_promos.__c.runVoidMethod ("LogImpl","326214451",(RemoteObject.concat(RemoteObject.createImmutable(""),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(false,"_prodsids2" /*RemoteObject*/ ).getObject()))),RemoteObject.createImmutable(""),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((c_promos.__c.getField(true,"CRLF")))),RemoteObject.createImmutable(""),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(false,"_prodscants2" /*RemoteObject*/ ).getObject()))),RemoteObject.createImmutable(""),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((c_promos.__c.getField(true,"CRLF")))),RemoteObject.createImmutable(""),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(false,"_prodsprecios2" /*RemoteObject*/ ).getObject()))),RemoteObject.createImmutable(""))),c_promos.__c.getField(false,"Colors").getField(true,"Magenta"));}; - BA.debugLineNum = 332;BA.debugLine="LogColor($\"Total Prods: ${totalProds}, Total: $$1"; -Debug.ShouldStop(2048); -c_promos.__c.runVoidMethod ("LogImpl","326214453",(RemoteObject.concat(RemoteObject.createImmutable("Total Prods: "),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_totalprods" /*RemoteObject*/ )))),RemoteObject.createImmutable(", Total: $"),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("1.2")),(Object)((__ref.getField(true,"_totalcompra" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))),c_promos.__c.getField(false,"Colors").getField(true,"Blue")); - BA.debugLineNum = 333;BA.debugLine="End Sub"; -Debug.ShouldStop(4096); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _et_pcant_focuschanged(RemoteObject __ref,RemoteObject _hasfocus) throws Exception{ -try { - Debug.PushSubsStack("et_pCant_FocusChanged (c_promos) ","c_promos",18,__ref.getField(false, "ba"),__ref,335); -if (RapidSub.canDelegate("et_pcant_focuschanged")) { return __ref.runUserSub(false, "c_promos","et_pcant_focuschanged", __ref, _hasfocus);} -Debug.locals.put("HasFocus", _hasfocus); - BA.debugLineNum = 335;BA.debugLine="Private Sub et_pCant_FocusChanged (HasFocus As Boo"; -Debug.ShouldStop(16384); - BA.debugLineNum = 336;BA.debugLine="LogColor(\"focus changed\", Colors.Magenta)"; -Debug.ShouldStop(32768); -c_promos.__c.runVoidMethod ("LogImpl","326279937",BA.ObjectToString("focus changed"),c_promos.__c.getField(false,"Colors").getField(true,"Magenta")); - BA.debugLineNum = 337;BA.debugLine="cuentaProds"; -Debug.ShouldStop(65536); -__ref.runClassMethod (keymon.lat.medicomed.c_promos.class, "_cuentaprods" /*RemoteObject*/ ); - BA.debugLineNum = 338;BA.debugLine="End Sub"; -Debug.ShouldStop(131072); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _et_pcant_textchanged(RemoteObject __ref,RemoteObject _old,RemoteObject _new) throws Exception{ -try { - Debug.PushSubsStack("et_pCant_TextChanged (c_promos) ","c_promos",18,__ref.getField(false, "ba"),__ref,274); -if (RapidSub.canDelegate("et_pcant_textchanged")) { return __ref.runUserSub(false, "c_promos","et_pcant_textchanged", __ref, _old, _new);} -Debug.locals.put("Old", _old); -Debug.locals.put("New", _new); - BA.debugLineNum = 274;BA.debugLine="Private Sub et_pCant_TextChanged (Old As String, N"; -Debug.ShouldStop(131072); - BA.debugLineNum = 276;BA.debugLine="cuentaProds"; -Debug.ShouldStop(524288); -__ref.runClassMethod (keymon.lat.medicomed.c_promos.class, "_cuentaprods" /*RemoteObject*/ ); - BA.debugLineNum = 277;BA.debugLine="End Sub"; -Debug.ShouldStop(1048576); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (c_promos) ","c_promos",18,__ref.getField(false, "ba"),__ref,47); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "c_promos","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 47;BA.debugLine="Public Sub Initialize As Object"; -Debug.ShouldStop(16384); - BA.debugLineNum = 48;BA.debugLine="Return Me"; -Debug.ShouldStop(32768); -if (true) return __ref; - BA.debugLineNum = 49;BA.debugLine="End Sub"; -Debug.ShouldStop(65536); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _mods(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Mods (c_promos) ","c_promos",18,__ref.getField(false, "ba"),__ref,1); -if (RapidSub.canDelegate("mods")) { return __ref.runUserSub(false, "c_promos","mods", __ref);} - BA.debugLineNum = 1;BA.debugLine="Sub Mods"; -Debug.ShouldStop(1); - BA.debugLineNum = 3;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _muestrapromo(RemoteObject __ref,RemoteObject _promo,RemoteObject _cliente) throws Exception{ -try { - Debug.PushSubsStack("muestraPromo (c_promos) ","c_promos",18,__ref.getField(false, "ba"),__ref,81); -if (RapidSub.canDelegate("muestrapromo")) { return __ref.runUserSub(false, "c_promos","muestrapromo", __ref, _promo, _cliente);} -RemoteObject _thislog = RemoteObject.createImmutable(false); -RemoteObject _mp = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -RemoteObject _prodspromo = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -RemoteObject _invdisppromo = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -RemoteObject _cs = RemoteObject.declareNull("anywheresoftware.b4a.objects.CSBuilder"); -RemoteObject _pv = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _pfp = RemoteObject.createImmutable(0); -RemoteObject _label1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _p = RemoteObject.createImmutable(""); -RemoteObject _thisprod = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -Debug.locals.put("promo", _promo); -Debug.locals.put("cliente", _cliente); - BA.debugLineNum = 81;BA.debugLine="Sub muestraPromo(promo As String, cliente As Strin"; -Debug.ShouldStop(65536); - BA.debugLineNum = 82;BA.debugLine="Private thisLog As Boolean = False"; -Debug.ShouldStop(131072); -_thislog = c_promos.__c.getField(true,"False");Debug.locals.put("thisLog", _thislog);Debug.locals.put("thisLog", _thislog); - BA.debugLineNum = 84;BA.debugLine="estaPromo = promo"; -Debug.ShouldStop(524288); -__ref.setField ("_estapromo" /*RemoteObject*/ ,_promo); - BA.debugLineNum = 85;BA.debugLine="esteCliente = cliente"; -Debug.ShouldStop(1048576); -__ref.setField ("_estecliente" /*RemoteObject*/ ,_cliente); - BA.debugLineNum = 86;BA.debugLine="Private mp As Map = Subs.traePromo(promo, cliente"; -Debug.ShouldStop(2097152); -_mp = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_mp = c_promos._subs.runMethod(false,"_traepromo" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(_promo),(Object)(_cliente));Debug.locals.put("mp", _mp);Debug.locals.put("mp", _mp); - BA.debugLineNum = 87;BA.debugLine="Private prodsPromo As Map = mp.Get(\"productos\") '"; -Debug.ShouldStop(4194304); -_prodspromo = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_prodspromo = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), _mp.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("productos")))));Debug.locals.put("prodsPromo", _prodspromo);Debug.locals.put("prodsPromo", _prodspromo); - BA.debugLineNum = 88;BA.debugLine="Private invDispPromo As Map = Subs.traemosInventa"; -Debug.ShouldStop(8388608); -_invdisppromo = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_invdisppromo = c_promos._subs.runMethod(false,"_traemosinventariodisponibleparapromo" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(_promo));Debug.locals.put("invDispPromo", _invdisppromo);Debug.locals.put("invDispPromo", _invdisppromo); - BA.debugLineNum = 90;BA.debugLine="If thisLog Then Log(\"Max promos por inv de prods"; -Debug.ShouldStop(33554432); -if (_thislog.get().booleanValue()) { -c_promos.__c.runVoidMethod ("LogImpl","325821193",RemoteObject.concat(RemoteObject.createImmutable("Max promos por inv de prods FIJOS: "),c_promos._subs.runMethod(true,"_revisamaxpromosprodsfijosporinventario" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(_mp))),0);}; - BA.debugLineNum = 91;BA.debugLine="If thisLog Then Log(\"Max promos por inv de prods"; -Debug.ShouldStop(67108864); -if (_thislog.get().booleanValue()) { -c_promos.__c.runVoidMethod ("LogImpl","325821194",RemoteObject.concat(RemoteObject.createImmutable("Max promos por inv de prods VARIABLES: "),c_promos._subs.runMethod(true,"_revisamaxpromosprodsvariablesporinventario" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(_mp))),0);}; - BA.debugLineNum = 92;BA.debugLine="maxCantPromos = Subs.revisaMaxPromosProdsVariable"; -Debug.ShouldStop(134217728); -__ref.setField ("_maxcantpromos" /*RemoteObject*/ ,c_promos._subs.runMethod(true,"_revisamaxpromosprodsvariablesporinventario" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(_mp))); - BA.debugLineNum = 93;BA.debugLine="et_promoCant.Text = 1"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_et_promocant" /*RemoteObject*/ ).runMethodAndSync(true,"setText",BA.ObjectToCharSequence(1)); - BA.debugLineNum = 94;BA.debugLine="l_promosCant.text = \"Max promos: \" & maxCantPromo"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_l_promoscant" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("Max promos: "),__ref.getField(true,"_maxcantpromos" /*RemoteObject*/ )))); - BA.debugLineNum = 95;BA.debugLine="Private cs As CSBuilder"; -Debug.ShouldStop(1073741824); -_cs = RemoteObject.createNew ("anywheresoftware.b4a.objects.CSBuilder");Debug.locals.put("cs", _cs); - BA.debugLineNum = 96;BA.debugLine="cs.Initialize"; -Debug.ShouldStop(-2147483648); -_cs.runVoidMethod ("Initialize"); - BA.debugLineNum = 97;BA.debugLine="If thisLog Then Log(mp)"; -Debug.ShouldStop(1); -if (_thislog.get().booleanValue()) { -c_promos.__c.runVoidMethod ("LogImpl","325821200",BA.ObjectToString(_mp),0);}; - BA.debugLineNum = 98;BA.debugLine="If thisLog Then Log(prodsPromo)"; -Debug.ShouldStop(2); -if (_thislog.get().booleanValue()) { -c_promos.__c.runVoidMethod ("LogImpl","325821201",BA.ObjectToString(_prodspromo),0);}; - BA.debugLineNum = 102;BA.debugLine="l_promoDesc.Text = cs.Color(Colors.RGB(100,149,23"; -Debug.ShouldStop(32); -__ref.getField(false,"_l_promodesc" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(_cs.runMethod(false,"Color",(Object)(c_promos.__c.getField(false,"Colors").runMethod(true,"RGB",(Object)(BA.numberCast(int.class, 100)),(Object)(BA.numberCast(int.class, 149)),(Object)(BA.numberCast(int.class, 237))))).runMethod(false,"Append",(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("Promocion: ")))).runMethod(false,"Pop").runMethod(false,"Append",(Object)(BA.ObjectToCharSequence(c_promos.__c.getField(true,"CRLF")))).runMethod(false,"Append",(Object)(BA.ObjectToCharSequence(_promo))).runMethod(false,"Append",(Object)(BA.ObjectToCharSequence(c_promos.__c.getField(true,"CRLF")))).runMethod(false,"Append",(Object)(BA.ObjectToCharSequence(_mp.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("descripcion"))))))).runMethod(false,"PopAll").getObject())); - BA.debugLineNum = 103;BA.debugLine="prodsFijosTot = 0"; -Debug.ShouldStop(64); -__ref.setField ("_prodsfijostot" /*RemoteObject*/ ,BA.numberCast(float.class, 0)); - BA.debugLineNum = 106;BA.debugLine="Dim pv As List = mp.Get(\"prodsVariables\")"; -Debug.ShouldStop(512); -_pv = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); -_pv = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), _mp.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsVariables")))));Debug.locals.put("pv", _pv);Debug.locals.put("pv", _pv); - BA.debugLineNum = 107;BA.debugLine="If thisLog Then Log(mp)"; -Debug.ShouldStop(1024); -if (_thislog.get().booleanValue()) { -c_promos.__c.runVoidMethod ("LogImpl","325821210",BA.ObjectToString(_mp),0);}; - BA.debugLineNum = 108;BA.debugLine="tpf = 0"; -Debug.ShouldStop(2048); -__ref.setField ("_tpf" /*RemoteObject*/ ,BA.numberCast(int.class, 0)); - BA.debugLineNum = 109;BA.debugLine="For Each pfp As Int In mp.Get(\"prodsFijosPiezas\")"; -Debug.ShouldStop(4096); -{ -final RemoteObject group21 = (RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), _mp.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsFijosPiezas")))))); -final int groupLen21 = group21.runMethod(true,"getSize").get() -;int index21 = 0; -; -for (; index21 < groupLen21;index21++){ -_pfp = BA.numberCast(int.class, group21.runMethod(false,"Get",index21));Debug.locals.put("pfp", _pfp); -Debug.locals.put("pfp", _pfp); - BA.debugLineNum = 110;BA.debugLine="tpf = tpf + pfp"; -Debug.ShouldStop(8192); -__ref.setField ("_tpf" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_tpf" /*RemoteObject*/ ),_pfp}, "+",1, 1)); - } -}Debug.locals.put("pfp", _pfp); -; - BA.debugLineNum = 112;BA.debugLine="tpf2 = tpf"; -Debug.ShouldStop(32768); -__ref.setField ("_tpf2" /*RemoteObject*/ ,__ref.getField(true,"_tpf" /*RemoteObject*/ )); - BA.debugLineNum = 114;BA.debugLine="l_prodsFijos.Text = $\"Productos fijos (${tpf})\"$"; -Debug.ShouldStop(131072); -__ref.getField(false,"_l_prodsfijos" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("Productos fijos ("),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_tpf" /*RemoteObject*/ )))),RemoteObject.createImmutable(")"))))); - BA.debugLineNum = 115;BA.debugLine="prodsVarReq = mp.Get(\"prodsVariablesRequeridos\")"; -Debug.ShouldStop(262144); -__ref.setField ("_prodsvarreq" /*RemoteObject*/ ,BA.numberCast(int.class, _mp.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsVariablesRequeridos")))))); - BA.debugLineNum = 116;BA.debugLine="prodsVarReq2 = prodsVarReq"; -Debug.ShouldStop(524288); -__ref.setField ("_prodsvarreq2" /*RemoteObject*/ ,__ref.getField(true,"_prodsvarreq" /*RemoteObject*/ )); - BA.debugLineNum = 117;BA.debugLine="l_prodsVariables.Text = $\"Productos variables req"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_l_prodsvariables" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("Productos variables requeridos: "),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_prodsvarreq" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))))); - BA.debugLineNum = 118;BA.debugLine="If prodsVarReq = 0 Then"; -Debug.ShouldStop(2097152); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_prodsvarreq" /*RemoteObject*/ ),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 119;BA.debugLine="p_prodsVariables.Visible = False"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_p_prodsvariables" /*RemoteObject*/ ).runMethod(true,"setVisible",c_promos.__c.getField(true,"False")); - }else { - BA.debugLineNum = 121;BA.debugLine="p_prodsVariables.Visible = True"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_p_prodsvariables" /*RemoteObject*/ ).runMethod(true,"setVisible",c_promos.__c.getField(true,"True")); - }; - BA.debugLineNum = 124;BA.debugLine="Dim label1 As Label"; -Debug.ShouldStop(134217728); -_label1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label1", _label1); - BA.debugLineNum = 125;BA.debugLine="label1 = lv_prodsFijos.SingleLineLayout.Label"; -Debug.ShouldStop(268435456); -_label1 = __ref.getField(false,"_lv_prodsfijos" /*RemoteObject*/ ).runMethod(false,"getSingleLineLayout").getField(false,"Label");Debug.locals.put("label1", _label1); - BA.debugLineNum = 126;BA.debugLine="label1.TextSize = 13"; -Debug.ShouldStop(536870912); -_label1.runMethod(true,"setTextSize",BA.numberCast(float.class, 13)); - BA.debugLineNum = 127;BA.debugLine="label1.TextColor = Colors.black"; -Debug.ShouldStop(1073741824); -_label1.runMethod(true,"setTextColor",c_promos.__c.getField(false,"Colors").getField(true,"Black")); - BA.debugLineNum = 128;BA.debugLine="lv_prodsFijos.SingleLineLayout.ItemHeight = 30dip"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_lv_prodsfijos" /*RemoteObject*/ ).runMethod(false,"getSingleLineLayout").runMethod(true,"setItemHeight",c_promos.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 30)))); - BA.debugLineNum = 129;BA.debugLine="lv_prodsFijos.Clear"; -Debug.ShouldStop(1); -__ref.getField(false,"_lv_prodsfijos" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 131;BA.debugLine="lv_prodsFijos.Clear"; -Debug.ShouldStop(4); -__ref.getField(false,"_lv_prodsfijos" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 132;BA.debugLine="agregaFijosALista(mp, True)"; -Debug.ShouldStop(8); -__ref.runClassMethod (keymon.lat.medicomed.c_promos.class, "_agregafijosalista" /*RemoteObject*/ ,(Object)(_mp),(Object)(c_promos.__c.getField(true,"True"))); - BA.debugLineNum = 133;BA.debugLine="If thisLog Then Log(\"Total prods fijos = \" & prod"; -Debug.ShouldStop(16); -if (_thislog.get().booleanValue()) { -c_promos.__c.runVoidMethod ("LogImpl","325821236",RemoteObject.concat(RemoteObject.createImmutable("Total prods fijos = "),__ref.getField(true,"_prodsfijostot" /*RemoteObject*/ )),0);}; - BA.debugLineNum = 135;BA.debugLine="l_totProds.text = $\"Productos: ${tpf}\"$"; -Debug.ShouldStop(64); -__ref.getField(false,"_l_totprods" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("Productos: "),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_tpf" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))))); - BA.debugLineNum = 136;BA.debugLine="l_total.Text = $\"Total: $$1.2{prodsFijosTot}\"$"; -Debug.ShouldStop(128); -__ref.getField(false,"_l_total" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("Total: $"),c_promos.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("1.2")),(Object)((__ref.getField(true,"_prodsfijostot" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))))); - BA.debugLineNum = 142;BA.debugLine="If thisLog Then Log(pv)"; -Debug.ShouldStop(8192); -if (_thislog.get().booleanValue()) { -c_promos.__c.runVoidMethod ("LogImpl","325821245",BA.ObjectToString(_pv),0);}; - BA.debugLineNum = 143;BA.debugLine="If thisLog Then Log(\"invDisp=\" & invDispPromo)"; -Debug.ShouldStop(16384); -if (_thislog.get().booleanValue()) { -c_promos.__c.runVoidMethod ("LogImpl","325821246",RemoteObject.concat(RemoteObject.createImmutable("invDisp="),_invdisppromo),0);}; - BA.debugLineNum = 144;BA.debugLine="clv_prodsVariabes.Clear"; -Debug.ShouldStop(32768); -__ref.getField(false,"_clv_prodsvariabes" /*RemoteObject*/ ).runVoidMethod ("_clear"); - BA.debugLineNum = 145;BA.debugLine="For Each p As String In pv"; -Debug.ShouldStop(65536); -{ -final RemoteObject group48 = _pv; -final int groupLen48 = group48.runMethod(true,"getSize").get() -;int index48 = 0; -; -for (; index48 < groupLen48;index48++){ -_p = BA.ObjectToString(group48.runMethod(false,"Get",index48));Debug.locals.put("p", _p); -Debug.locals.put("p", _p); - BA.debugLineNum = 146;BA.debugLine="If invDispPromo.ContainsKey(p) Then 'Si no esta"; -Debug.ShouldStop(131072); -if (_invdisppromo.runMethod(true,"ContainsKey",(Object)((_p))).get().booleanValue()) { - BA.debugLineNum = 151;BA.debugLine="Private thisProd As Map = prodsPromo.Get(p)"; -Debug.ShouldStop(4194304); -_thisprod = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_thisprod = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), _prodspromo.runMethod(false,"Get",(Object)((_p))));Debug.locals.put("thisProd", _thisprod);Debug.locals.put("thisProd", _thisprod); - BA.debugLineNum = 152;BA.debugLine="If thisLog Then Log(thisProd)"; -Debug.ShouldStop(8388608); -if (_thislog.get().booleanValue()) { -c_promos.__c.runVoidMethod ("LogImpl","325821255",BA.ObjectToString(_thisprod),0);}; - BA.debugLineNum = 153;BA.debugLine="clv_prodsVariabes.Add(CreateListItem(Subs.traeP"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_clv_prodsvariabes" /*RemoteObject*/ ).runVoidMethod ("_add",RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), __ref.runClassMethod (keymon.lat.medicomed.c_promos.class, "_createlistitem" /*RemoteObject*/ ,(Object)(RemoteObject.concat(c_promos._subs.runMethod(true,"_traeprodnombre" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(_p)),c_promos.__c.getField(true,"CRLF"),RemoteObject.createImmutable("Hay "),_invdisppromo.runMethod(false,"Get",(Object)((_p))),RemoteObject.createImmutable(" $"),_thisprod.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("precio")))))),(Object)(BA.ObjectToString(_thisprod.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("precio")))))),(Object)(BA.numberCast(int.class, _invdisppromo.runMethod(false,"Get",(Object)((_p))))),(Object)(__ref.getField(false,"_clv_prodsvariabes" /*RemoteObject*/ ).runMethod(false,"_asview").runMethod(true,"getWidth")),(Object)(c_promos.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 50)))),RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper"), c_promos.__c.getField(false,"Null")),(Object)(_p)).getObject()),(Object)((_p))); - }; - } -}Debug.locals.put("p", _p); -; - BA.debugLineNum = 156;BA.debugLine="b_terminar1.Visible = False"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_b_terminar1" /*RemoteObject*/ ).runMethod(true,"setVisible",c_promos.__c.getField(true,"False")); - BA.debugLineNum = 157;BA.debugLine="b_continuar.Visible = False"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_b_continuar" /*RemoteObject*/ ).runMethod(true,"setVisible",c_promos.__c.getField(true,"False")); - BA.debugLineNum = 158;BA.debugLine="cuentaProds"; -Debug.ShouldStop(536870912); -__ref.runClassMethod (keymon.lat.medicomed.c_promos.class, "_cuentaprods" /*RemoteObject*/ ); - BA.debugLineNum = 159;BA.debugLine="End Sub"; -Debug.ShouldStop(1073741824); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_ticketsdia.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_ticketsdia.java deleted file mode 100644 index 887d80b..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_ticketsdia.java +++ /dev/null @@ -1,39 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class c_ticketsdia { - public static RemoteObject myClass; - public c_ticketsdia() { - } - public static PCBA staticBA = new PCBA(null, c_ticketsdia.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _root = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _p_ticketsdia = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _s = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _ruta = RemoteObject.createImmutable(""); -public static RemoteObject _listview1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ListViewWrapper"); -public static RemoteObject _b_noventa = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _nombre_boton = RemoteObject.createImmutable(""); -public static RemoteObject _stime = RemoteObject.createImmutable(""); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"b_noventa",_ref.getField(false, "_b_noventa"),"c",_ref.getField(false, "_c"),"DateUtils",_ref.getField(false, "_dateutils"),"ListView1",_ref.getField(false, "_listview1"),"nombre_boton",_ref.getField(false, "_nombre_boton"),"p_ticketsdia",_ref.getField(false, "_p_ticketsdia"),"Root",_ref.getField(false, "_root"),"ruta",_ref.getField(false, "_ruta"),"S",_ref.getField(false, "_s"),"STIME",_ref.getField(false, "_stime"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_ticketsdia_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_ticketsdia_subs_0.java deleted file mode 100644 index 976ffa6..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_ticketsdia_subs_0.java +++ /dev/null @@ -1,465 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class c_ticketsdia_subs_0 { - - -public static RemoteObject _activity_keypress(RemoteObject __ref,RemoteObject _key) throws Exception{ -try { - Debug.PushSubsStack("Activity_KeyPress (c_ticketsdia) ","c_ticketsdia",10,__ref.getField(false, "ba"),__ref,110); -if (RapidSub.canDelegate("activity_keypress")) { return __ref.runUserSub(false, "c_ticketsdia","activity_keypress", __ref, _key);} -Debug.locals.put("key", _key); - BA.debugLineNum = 110;BA.debugLine="Sub Activity_KeyPress (key As Int) As Boolean"; -Debug.ShouldStop(8192); - BA.debugLineNum = 112;BA.debugLine="If key=KeyCodes.KEYCODE_BACK Then"; -Debug.ShouldStop(32768); -if (RemoteObject.solveBoolean("=",_key,BA.numberCast(double.class, c_ticketsdia.__c.getField(false,"KeyCodes").getField(true,"KEYCODE_BACK")))) { - BA.debugLineNum = 114;BA.debugLine="B4XPages.ShowPage(\"principal\")"; -Debug.ShouldStop(131072); -c_ticketsdia._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("principal"))); - }; - BA.debugLineNum = 118;BA.debugLine="Return False"; -Debug.ShouldStop(2097152); -if (true) return c_ticketsdia.__c.getField(true,"False"); - BA.debugLineNum = 119;BA.debugLine="End Sub"; -Debug.ShouldStop(4194304); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_noventa_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("b_noventa_Click (c_ticketsdia) ","c_ticketsdia",10,__ref.getField(false, "ba"),__ref,139); -if (RapidSub.canDelegate("b_noventa_click")) { return __ref.runUserSub(false, "c_ticketsdia","b_noventa_click", __ref);} -int _i = 0; -RemoteObject _label1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _label2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); - BA.debugLineNum = 139;BA.debugLine="Sub b_noventa_Click"; -Debug.ShouldStop(1024); - BA.debugLineNum = 140;BA.debugLine="If nombre_boton = \"NOVENTA\" Then"; -Debug.ShouldStop(2048); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_nombre_boton" /*RemoteObject*/ ),BA.ObjectToString("NOVENTA"))) { - BA.debugLineNum = 141;BA.debugLine="nombre_boton = \"VENTA\""; -Debug.ShouldStop(4096); -__ref.setField ("_nombre_boton" /*RemoteObject*/ ,BA.ObjectToString("VENTA")); - BA.debugLineNum = 142;BA.debugLine="b_noventa.Text =\"VENTA\""; -Debug.ShouldStop(8192); -__ref.getField(false,"_b_noventa" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("VENTA")); - BA.debugLineNum = 143;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"select * f"; -Debug.ShouldStop(16384); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_ticketsdia._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select * from venta_no_venta where eventov = 'SinVenta'")))); - BA.debugLineNum = 144;BA.debugLine="ListView1.Clear"; -Debug.ShouldStop(32768); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 145;BA.debugLine="If c.RowCount > 0 Then"; -Debug.ShouldStop(65536); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 146;BA.debugLine="For i = 0 To c.RowCount - 1"; -Debug.ShouldStop(131072); -{ -final int step7 = 1; -final int limit7 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step7 > 0 && _i <= limit7) || (step7 < 0 && _i >= limit7) ;_i = ((int)(0 + _i + step7)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 147;BA.debugLine="c.Position = i"; -Debug.ShouldStop(262144); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 148;BA.debugLine="Dim label1 As Label"; -Debug.ShouldStop(524288); -_label1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label1", _label1); - BA.debugLineNum = 149;BA.debugLine="label1 = ListView1.TwoLinesLayout.Label"; -Debug.ShouldStop(1048576); -_label1 = __ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").getField(false,"Label");Debug.locals.put("label1", _label1); - BA.debugLineNum = 150;BA.debugLine="label1.TextSize = 10"; -Debug.ShouldStop(2097152); -_label1.runMethod(true,"setTextSize",BA.numberCast(float.class, 10)); - BA.debugLineNum = 151;BA.debugLine="label1.TextColor = Colors.Black"; -Debug.ShouldStop(4194304); -_label1.runMethod(true,"setTextColor",c_ticketsdia.__c.getField(false,"Colors").getField(true,"Black")); - BA.debugLineNum = 152;BA.debugLine="Dim label2 As Label"; -Debug.ShouldStop(8388608); -_label2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label2", _label2); - BA.debugLineNum = 153;BA.debugLine="label2 = ListView1.TwoLinesLayout.SecondLabel"; -Debug.ShouldStop(16777216); -_label2 = __ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").getField(false,"SecondLabel");Debug.locals.put("label2", _label2); - BA.debugLineNum = 154;BA.debugLine="label2.TextSize = 15"; -Debug.ShouldStop(33554432); -_label2.runMethod(true,"setTextSize",BA.numberCast(float.class, 15)); - BA.debugLineNum = 155;BA.debugLine="label2.TextColor = Colors.Blue"; -Debug.ShouldStop(67108864); -_label2.runMethod(true,"setTextColor",c_ticketsdia.__c.getField(false,"Colors").getField(true,"Blue")); - BA.debugLineNum = 156;BA.debugLine="label2.Height = 60dip"; -Debug.ShouldStop(134217728); -_label2.runMethod(true,"setHeight",c_ticketsdia.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 60)))); - BA.debugLineNum = 157;BA.debugLine="label2.Width = ListView1.Width * 0.99"; -Debug.ShouldStop(268435456); -_label2.runMethod(true,"setWidth",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(0.99)}, "*",0, 0))); - BA.debugLineNum = 158;BA.debugLine="ListView1.TwoLinesLayout.ItemHeight = 80dip"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").runMethod(true,"setItemHeight",c_ticketsdia.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 80)))); - BA.debugLineNum = 159;BA.debugLine="ListView1.AddTwoLines(c.GetString(\"clientev\"),"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runVoidMethod ("AddTwoLines",(Object)(BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("clientev"))))),(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("SubTotal $"),__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("montoVentav"))))))); - BA.debugLineNum = 160;BA.debugLine="Log(c.GetString(\"clientev\") & \"SubTotal $\" & c"; -Debug.ShouldStop(-2147483648); -c_ticketsdia.__c.runVoidMethod ("LogImpl","315794197",RemoteObject.concat(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("clientev"))),RemoteObject.createImmutable("SubTotal $"),__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("montoVentav")))),0); - } -}Debug.locals.put("i", _i); -; - }; - }else { - BA.debugLineNum = 164;BA.debugLine="nombre_boton = \"NOVENTA\""; -Debug.ShouldStop(8); -__ref.setField ("_nombre_boton" /*RemoteObject*/ ,BA.ObjectToString("NOVENTA")); - BA.debugLineNum = 165;BA.debugLine="b_noventa.Text =\"NO VENTA\""; -Debug.ShouldStop(16); -__ref.getField(false,"_b_noventa" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("NO VENTA")); - BA.debugLineNum = 166;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"select * f"; -Debug.ShouldStop(32); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_ticketsdia._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select * from venta_no_venta where eventov <> 'SinVenta'")))); - BA.debugLineNum = 167;BA.debugLine="ListView1.Clear"; -Debug.ShouldStop(64); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 168;BA.debugLine="If c.RowCount > 0 Then"; -Debug.ShouldStop(128); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 169;BA.debugLine="For i = 0 To c.RowCount - 1"; -Debug.ShouldStop(256); -{ -final int step30 = 1; -final int limit30 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step30 > 0 && _i <= limit30) || (step30 < 0 && _i >= limit30) ;_i = ((int)(0 + _i + step30)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 170;BA.debugLine="c.Position = i"; -Debug.ShouldStop(512); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 171;BA.debugLine="Dim label1 As Label"; -Debug.ShouldStop(1024); -_label1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label1", _label1); - BA.debugLineNum = 172;BA.debugLine="label1 = ListView1.TwoLinesLayout.Label"; -Debug.ShouldStop(2048); -_label1 = __ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").getField(false,"Label");Debug.locals.put("label1", _label1); - BA.debugLineNum = 173;BA.debugLine="label1.TextSize = 10"; -Debug.ShouldStop(4096); -_label1.runMethod(true,"setTextSize",BA.numberCast(float.class, 10)); - BA.debugLineNum = 174;BA.debugLine="label1.TextColor = Colors.Black"; -Debug.ShouldStop(8192); -_label1.runMethod(true,"setTextColor",c_ticketsdia.__c.getField(false,"Colors").getField(true,"Black")); - BA.debugLineNum = 175;BA.debugLine="Dim label2 As Label"; -Debug.ShouldStop(16384); -_label2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label2", _label2); - BA.debugLineNum = 176;BA.debugLine="label2 = ListView1.TwoLinesLayout.SecondLabel"; -Debug.ShouldStop(32768); -_label2 = __ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").getField(false,"SecondLabel");Debug.locals.put("label2", _label2); - BA.debugLineNum = 177;BA.debugLine="label2.TextSize = 15"; -Debug.ShouldStop(65536); -_label2.runMethod(true,"setTextSize",BA.numberCast(float.class, 15)); - BA.debugLineNum = 178;BA.debugLine="label2.TextColor = Colors.Blue"; -Debug.ShouldStop(131072); -_label2.runMethod(true,"setTextColor",c_ticketsdia.__c.getField(false,"Colors").getField(true,"Blue")); - BA.debugLineNum = 179;BA.debugLine="label2.Height = 60dip"; -Debug.ShouldStop(262144); -_label2.runMethod(true,"setHeight",c_ticketsdia.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 60)))); - BA.debugLineNum = 180;BA.debugLine="label2.Width = ListView1.Width * 0.99"; -Debug.ShouldStop(524288); -_label2.runMethod(true,"setWidth",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(0.99)}, "*",0, 0))); - BA.debugLineNum = 181;BA.debugLine="ListView1.TwoLinesLayout.ItemHeight = 80dip"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").runMethod(true,"setItemHeight",c_ticketsdia.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 80)))); - BA.debugLineNum = 182;BA.debugLine="ListView1.AddTwoLines(c.GetString(\"clientev\"),"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runVoidMethod ("AddTwoLines",(Object)(BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("clientev"))))),(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("SubTotal $"),__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("montoVentav"))))))); - BA.debugLineNum = 183;BA.debugLine="Log(c.GetString(\"clientev\") & \"SubTotal $\" & c"; -Debug.ShouldStop(4194304); -c_ticketsdia.__c.runVoidMethod ("LogImpl","315794220",RemoteObject.concat(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("clientev"))),RemoteObject.createImmutable("SubTotal $"),__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("montoVentav")))),0); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 186;BA.debugLine="c.Close"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - }; - BA.debugLineNum = 188;BA.debugLine="End Sub"; -Debug.ShouldStop(134217728); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b4xpage_appear(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Appear (c_ticketsdia) ","c_ticketsdia",10,__ref.getField(false, "ba"),__ref,65); -if (RapidSub.canDelegate("b4xpage_appear")) { return __ref.runUserSub(false, "c_ticketsdia","b4xpage_appear", __ref);} -int _i = 0; -RemoteObject _label1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _label2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); - BA.debugLineNum = 65;BA.debugLine="Sub B4XPage_Appear"; -Debug.ShouldStop(1); - BA.debugLineNum = 66;BA.debugLine="nombre_boton = \"NOVENTA\""; -Debug.ShouldStop(2); -__ref.setField ("_nombre_boton" /*RemoteObject*/ ,BA.ObjectToString("NOVENTA")); - BA.debugLineNum = 84;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"select * fr"; -Debug.ShouldStop(524288); -__ref.getField(false,"_c" /*RemoteObject*/ ).setObject (c_ticketsdia._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select * from venta_no_venta where eventov <> 'SinVenta'")))); - BA.debugLineNum = 85;BA.debugLine="ListView1.Clear"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runVoidMethod ("Clear"); - BA.debugLineNum = 86;BA.debugLine="If c.RowCount > 0 Then"; -Debug.ShouldStop(2097152); -if (RemoteObject.solveBoolean(">",__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 87;BA.debugLine="For i = 0 To c.RowCount - 1"; -Debug.ShouldStop(4194304); -{ -final int step5 = 1; -final int limit5 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step5 > 0 && _i <= limit5) || (step5 < 0 && _i >= limit5) ;_i = ((int)(0 + _i + step5)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 88;BA.debugLine="c.Position = i"; -Debug.ShouldStop(8388608); -__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 89;BA.debugLine="Dim label1 As Label"; -Debug.ShouldStop(16777216); -_label1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label1", _label1); - BA.debugLineNum = 90;BA.debugLine="label1 = ListView1.TwoLinesLayout.Label"; -Debug.ShouldStop(33554432); -_label1 = __ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").getField(false,"Label");Debug.locals.put("label1", _label1); - BA.debugLineNum = 91;BA.debugLine="label1.TextSize = 10"; -Debug.ShouldStop(67108864); -_label1.runMethod(true,"setTextSize",BA.numberCast(float.class, 10)); - BA.debugLineNum = 92;BA.debugLine="label1.TextColor = Colors.Black"; -Debug.ShouldStop(134217728); -_label1.runMethod(true,"setTextColor",c_ticketsdia.__c.getField(false,"Colors").getField(true,"Black")); - BA.debugLineNum = 93;BA.debugLine="Dim label2 As Label"; -Debug.ShouldStop(268435456); -_label2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("label2", _label2); - BA.debugLineNum = 94;BA.debugLine="label2 = ListView1.TwoLinesLayout.SecondLabel"; -Debug.ShouldStop(536870912); -_label2 = __ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").getField(false,"SecondLabel");Debug.locals.put("label2", _label2); - BA.debugLineNum = 95;BA.debugLine="label2.TextSize = 15"; -Debug.ShouldStop(1073741824); -_label2.runMethod(true,"setTextSize",BA.numberCast(float.class, 15)); - BA.debugLineNum = 96;BA.debugLine="label2.TextColor = Colors.Blue"; -Debug.ShouldStop(-2147483648); -_label2.runMethod(true,"setTextColor",c_ticketsdia.__c.getField(false,"Colors").getField(true,"Blue")); - BA.debugLineNum = 97;BA.debugLine="label2.Height = 60dip"; -Debug.ShouldStop(1); -_label2.runMethod(true,"setHeight",c_ticketsdia.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 60)))); - BA.debugLineNum = 98;BA.debugLine="label2.Width = ListView1.Width * 0.99"; -Debug.ShouldStop(2); -_label2.runMethod(true,"setWidth",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(0.99)}, "*",0, 0))); - BA.debugLineNum = 99;BA.debugLine="ListView1.TwoLinesLayout.ItemHeight = 80dip"; -Debug.ShouldStop(4); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runMethod(false,"getTwoLinesLayout").runMethod(true,"setItemHeight",c_ticketsdia.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 80)))); - BA.debugLineNum = 100;BA.debugLine="ListView1.AddTwoLines(c.GetString(\"clientev\"),"; -Debug.ShouldStop(8); -__ref.getField(false,"_listview1" /*RemoteObject*/ ).runVoidMethod ("AddTwoLines",(Object)(BA.ObjectToCharSequence(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("clientev"))))),(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("SubTotal $"),__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("montoVentav"))))))); - BA.debugLineNum = 101;BA.debugLine="Log(c.GetString(\"clientev\") & \"SubTotal $\" & c."; -Debug.ShouldStop(16); -c_ticketsdia.__c.runVoidMethod ("LogImpl","315532068",RemoteObject.concat(__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("clientev"))),RemoteObject.createImmutable("SubTotal $"),__ref.getField(false,"_c" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("montoVentav")))),0); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 104;BA.debugLine="c.Close"; -Debug.ShouldStop(128); -__ref.getField(false,"_c" /*RemoteObject*/ ).runVoidMethod ("Close"); - BA.debugLineNum = 105;BA.debugLine="End Sub"; -Debug.ShouldStop(256); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b4xpage_created(RemoteObject __ref,RemoteObject _root1) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Created (c_ticketsdia) ","c_ticketsdia",10,__ref.getField(false, "ba"),__ref,51); -if (RapidSub.canDelegate("b4xpage_created")) { return __ref.runUserSub(false, "c_ticketsdia","b4xpage_created", __ref, _root1);} -Debug.locals.put("Root1", _root1); - BA.debugLineNum = 51;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -Debug.ShouldStop(262144); - BA.debugLineNum = 52;BA.debugLine="Root = Root1"; -Debug.ShouldStop(524288); -__ref.setField ("_root" /*RemoteObject*/ ,_root1); - BA.debugLineNum = 54;BA.debugLine="ruta = File.DirInternal"; -Debug.ShouldStop(2097152); -__ref.setField ("_ruta" /*RemoteObject*/ ,c_ticketsdia.__c.getField(false,"File").runMethod(true,"getDirInternal")); - BA.debugLineNum = 55;BA.debugLine="Root.LoadLayout(\"ticketsdia\")"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_root" /*RemoteObject*/ ).runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("ticketsdia")),__ref.getField(false, "ba")); - BA.debugLineNum = 56;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; -Debug.ShouldStop(8388608); -if (RemoteObject.solveBoolean("=",c_ticketsdia.__c.getField(false,"File").runMethod(true,"Exists",(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(RemoteObject.createImmutable("kmt.db"))),c_ticketsdia.__c.getField(true,"False"))) { - BA.debugLineNum = 57;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; -Debug.ShouldStop(16777216); -c_ticketsdia.__c.getField(false,"File").runVoidMethod ("Copy",(Object)(c_ticketsdia.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(BA.ObjectToString("kmt.db")),(Object)(__ref.getField(true,"_ruta" /*RemoteObject*/ )),(Object)(RemoteObject.createImmutable("kmt.db"))); - }; - BA.debugLineNum = 60;BA.debugLine="End Sub"; -Debug.ShouldStop(134217728); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Private Root As B4XView 'ignore"; -c_ticketsdia._root = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_root",c_ticketsdia._root); - //BA.debugLineNum = 3;BA.debugLine="Private xui As XUI 'ignore"; -c_ticketsdia._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",c_ticketsdia._xui); - //BA.debugLineNum = 4;BA.debugLine="Private p_ticketsdia As Panel"; -c_ticketsdia._p_ticketsdia = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_p_ticketsdia",c_ticketsdia._p_ticketsdia); - //BA.debugLineNum = 6;BA.debugLine="Dim c As Cursor"; -c_ticketsdia._c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_c",c_ticketsdia._c); - //BA.debugLineNum = 7;BA.debugLine="Dim S As Cursor"; -c_ticketsdia._s = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");__ref.setField("_s",c_ticketsdia._s); - //BA.debugLineNum = 8;BA.debugLine="Dim ruta As String"; -c_ticketsdia._ruta = RemoteObject.createImmutable("");__ref.setField("_ruta",c_ticketsdia._ruta); - //BA.debugLineNum = 9;BA.debugLine="Dim ListView1 As ListView"; -c_ticketsdia._listview1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ListViewWrapper");__ref.setField("_listview1",c_ticketsdia._listview1); - //BA.debugLineNum = 10;BA.debugLine="Dim b_noventa As Button"; -c_ticketsdia._b_noventa = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");__ref.setField("_b_noventa",c_ticketsdia._b_noventa); - //BA.debugLineNum = 11;BA.debugLine="Dim nombre_boton As String"; -c_ticketsdia._nombre_boton = RemoteObject.createImmutable("");__ref.setField("_nombre_boton",c_ticketsdia._nombre_boton); - //BA.debugLineNum = 12;BA.debugLine="Dim STIME As String"; -c_ticketsdia._stime = RemoteObject.createImmutable("");__ref.setField("_stime",c_ticketsdia._stime); - //BA.debugLineNum = 13;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (c_ticketsdia) ","c_ticketsdia",10,__ref.getField(false, "ba"),__ref,16); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "c_ticketsdia","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 16;BA.debugLine="Public Sub Initialize As Object"; -Debug.ShouldStop(32768); - BA.debugLineNum = 17;BA.debugLine="Return Me"; -Debug.ShouldStop(65536); -if (true) return __ref; - BA.debugLineNum = 18;BA.debugLine="End Sub"; -Debug.ShouldStop(131072); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _listview1_itemlongclick(RemoteObject __ref,RemoteObject _position,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("ListView1_ItemLongClick (c_ticketsdia) ","c_ticketsdia",10,__ref.getField(false, "ba"),__ref,120); -if (RapidSub.canDelegate("listview1_itemlongclick")) { return __ref.runUserSub(false, "c_ticketsdia","listview1_itemlongclick", __ref, _position, _value);} -Debug.locals.put("Position", _position); -Debug.locals.put("Value", _value); - BA.debugLineNum = 120;BA.debugLine="Sub ListView1_ItemLongClick (Position As Int, Valu"; -Debug.ShouldStop(8388608); - BA.debugLineNum = 121;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(16777216); -c_ticketsdia._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from CUENTAA"))); - BA.debugLineNum = 122;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; -Debug.ShouldStop(33554432); -c_ticketsdia._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO CUENTAA VALUES (?)")),(Object)(c_ticketsdia.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {_value}))))); - BA.debugLineNum = 123;BA.debugLine="DateTime.TimeFormat = \"HHmmss\""; -Debug.ShouldStop(67108864); -c_ticketsdia.__c.getField(false,"DateTime").runMethod(true,"setTimeFormat",BA.ObjectToString("HHmmss")); - BA.debugLineNum = 124;BA.debugLine="STIME=DateTime.Time(DateTime.Now)"; -Debug.ShouldStop(134217728); -__ref.setField ("_stime" /*RemoteObject*/ ,c_ticketsdia.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(c_ticketsdia.__c.getField(false,"DateTime").runMethod(true,"getNow")))); - BA.debugLineNum = 125;BA.debugLine="s=B4XPages.MainPage.skmt.ExecQuery(\"SELECT COUNT("; -Debug.ShouldStop(268435456); -__ref.getField(false,"_s" /*RemoteObject*/ ).setObject (c_ticketsdia._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("SELECT COUNT(*) AS CUANTOS FROM HIST_STAY_STORE WHERE HSS_IN = 0 AND HSS_CODIGO In (select cuenta from cuentaa)")))); - BA.debugLineNum = 126;BA.debugLine="s.Position = 0"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 127;BA.debugLine="If s.GetString(\"CUANTOS\") = 1 Then"; -Debug.ShouldStop(1073741824); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_s" /*RemoteObject*/ ).runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS"))),BA.NumberToString(1))) { - BA.debugLineNum = 128;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HIS"; -Debug.ShouldStop(-2147483648); -c_ticketsdia._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE HIST_STAY_STORE set HSS_IN = ? where HSS_IN = 0 AND HSS_CODIGO In (select cuenta from cuentaa)")),(Object)(c_ticketsdia.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(true,"_stime" /*RemoteObject*/ ))}))))); - }else { - BA.debugLineNum = 130;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -Debug.ShouldStop(2); -c_ticketsdia._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO HIST_STAY_STORE(HSS_CODIGO, HSS_IN , HSS_OUT , HSS_TOT) VALUES (?,0,0,0)")),(Object)(c_ticketsdia.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {_value}))))); - BA.debugLineNum = 131;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HIS"; -Debug.ShouldStop(4); -c_ticketsdia._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("UPDATE HIST_STAY_STORE set HSS_IN = ? where HSS_IN = 0 AND HSS_CODIGO In (select cuenta from cuentaa)")),(Object)(c_ticketsdia.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(true,"_stime" /*RemoteObject*/ ))}))))); - }; - BA.debugLineNum = 133;BA.debugLine="DateTime.TimeFormat = \"HH:mm:ss\""; -Debug.ShouldStop(16); -c_ticketsdia.__c.getField(false,"DateTime").runMethod(true,"setTimeFormat",BA.ObjectToString("HH:mm:ss")); - BA.debugLineNum = 134;BA.debugLine="Subs.guardaClienteHoraInicio(Value)"; -Debug.ShouldStop(32); -c_ticketsdia._subs.runVoidMethod ("_guardaclientehorainicio" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString(_value))); - BA.debugLineNum = 135;BA.debugLine="B4XPages.MainPage.cliente.venimosDeTicketsDia = T"; -Debug.ShouldStop(64); -c_ticketsdia._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).getField(false,"_cliente" /*RemoteObject*/ ).setField ("_venimosdeticketsdia" /*RemoteObject*/ ,c_ticketsdia.__c.getField(true,"True")); - BA.debugLineNum = 136;BA.debugLine="B4XPages.ShowPage(\"cliente\")"; -Debug.ShouldStop(128); -c_ticketsdia._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("cliente"))); - BA.debugLineNum = 137;BA.debugLine="End Sub"; -Debug.ShouldStop(256); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _p_ticketsdia_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("p_ticketsdia_Click (c_ticketsdia) ","c_ticketsdia",10,__ref.getField(false, "ba"),__ref,190); -if (RapidSub.canDelegate("p_ticketsdia_click")) { return __ref.runUserSub(false, "c_ticketsdia","p_ticketsdia_click", __ref);} - BA.debugLineNum = 190;BA.debugLine="Private Sub p_ticketsdia_Click"; -Debug.ShouldStop(536870912); - BA.debugLineNum = 192;BA.debugLine="End Sub"; -Debug.ShouldStop(-2147483648); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _regresar_click(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Regresar_Click (c_ticketsdia) ","c_ticketsdia",10,__ref.getField(false, "ba"),__ref,107); -if (RapidSub.canDelegate("regresar_click")) { return __ref.runUserSub(false, "c_ticketsdia","regresar_click", __ref);} - BA.debugLineNum = 107;BA.debugLine="Sub Regresar_Click"; -Debug.ShouldStop(1024); - BA.debugLineNum = 108;BA.debugLine="B4XPages.ShowPage(\"cliente\")"; -Debug.ShouldStop(2048); -c_ticketsdia._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("cliente"))); - BA.debugLineNum = 109;BA.debugLine="End Sub"; -Debug.ShouldStop(4096); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_updateavailable.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_updateavailable.java deleted file mode 100644 index 77a2e16..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_updateavailable.java +++ /dev/null @@ -1,31 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class c_updateavailable { - public static RemoteObject myClass; - public c_updateavailable() { - } - public static PCBA staticBA = new PCBA(null, c_updateavailable.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _root = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"DateUtils",_ref.getField(false, "_dateutils"),"Root",_ref.getField(false, "_root"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/c_updateavailable_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/c_updateavailable_subs_0.java deleted file mode 100644 index 882dc63..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/c_updateavailable_subs_0.java +++ /dev/null @@ -1,319 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class c_updateavailable_subs_0 { - - -public static void _b4xpage_appear(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Appear (c_updateavailable) ","c_updateavailable",19,__ref.getField(false, "ba"),__ref,18); -if (RapidSub.canDelegate("b4xpage_appear")) { __ref.runUserSub(false, "c_updateavailable","b4xpage_appear", __ref); return;} -ResumableSub_B4XPage_Appear rsub = new ResumableSub_B4XPage_Appear(null,__ref); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_B4XPage_Appear extends BA.ResumableSub { -public ResumableSub_B4XPage_Appear(keymon.lat.medicomed.c_updateavailable parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.c_updateavailable parent; -RemoteObject _result = RemoteObject.createImmutable(0); -RemoteObject _in = RemoteObject.declareNull("anywheresoftware.b4a.objects.IntentWrapper"); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Appear (c_updateavailable) ","c_updateavailable",19,__ref.getField(false, "ba"),__ref,18); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { -try { - - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 19;BA.debugLine="Try"; -Debug.ShouldStop(262144); -if (true) break; - -case 1: -//try -this.state = 10; -this.catchState = 9; -this.state = 3; -if (true) break; - -case 3: -//C -this.state = 4; -this.catchState = 9; - BA.debugLineNum = 20;BA.debugLine="Do While Not(CanRequestPackageInstalls)"; -Debug.ShouldStop(524288); -if (true) break; - -case 4: -//do while -this.state = 7; -while (parent.__c.runMethod(true,"Not",(Object)(__ref.runClassMethod (keymon.lat.medicomed.c_updateavailable.class, "_canrequestpackageinstalls" /*RemoteObject*/ ))).get().booleanValue()) { -this.state = 6; -if (true) break; -} -if (true) break; - -case 6: -//C -this.state = 4; - BA.debugLineNum = 21;BA.debugLine="MsgboxAsync($\"Por favor permita que ${Applicati"; -Debug.ShouldStop(1048576); -parent.__c.runVoidMethod ("MsgboxAsync",(Object)(BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("Por favor permita que "),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(false,"Application").runMethod(true,"getPackageName")))),RemoteObject.createImmutable(" instale actualizaciones"))))),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("Instalar actualización"))),__ref.getField(false, "ba")); - BA.debugLineNum = 22;BA.debugLine="Wait For Msgbox_Result(Result As Int)"; -Debug.ShouldStop(2097152); -parent.__c.runVoidMethod ("WaitFor","msgbox_result", __ref.getField(false, "ba"), anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "c_updateavailable", "b4xpage_appear"), null); -this.state = 16; -return; -case 16: -//C -this.state = 4; -_result = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(1));Debug.locals.put("Result", _result); -; - BA.debugLineNum = 23;BA.debugLine="Dim in As Intent"; -Debug.ShouldStop(4194304); -_in = RemoteObject.createNew ("anywheresoftware.b4a.objects.IntentWrapper");Debug.locals.put("in", _in); - BA.debugLineNum = 24;BA.debugLine="in.Initialize(\"android.settings.\", \"package:\" &"; -Debug.ShouldStop(8388608); -_in.runVoidMethod ("Initialize",(Object)(BA.ObjectToString("android.settings.")),(Object)(RemoteObject.concat(RemoteObject.createImmutable("package:"),parent.__c.getField(false,"Application").runMethod(true,"getPackageName")))); - BA.debugLineNum = 25;BA.debugLine="StartActivity(in)"; -Debug.ShouldStop(16777216); -parent.__c.runVoidMethod ("StartActivity",__ref.getField(false, "ba"),(Object)((_in.getObject()))); - if (true) break; - -case 7: -//C -this.state = 10; -; - Debug.CheckDeviceExceptions(); -if (true) break; - -case 9: -//C -this.state = 10; -this.catchState = 0; - BA.debugLineNum = 28;BA.debugLine="Log(\"updateAvailable() Error - \" & LastException"; -Debug.ShouldStop(134217728); -parent.__c.runVoidMethod ("LogImpl","326804234",RemoteObject.concat(RemoteObject.createImmutable("updateAvailable() Error - "),parent.__c.runMethod(false,"LastException",__ref.getField(false, "ba")).runMethod(true,"getMessage")),0); - if (true) break; -if (true) break; -; - BA.debugLineNum = 30;BA.debugLine="If appUpdater.newApp.update Then"; -Debug.ShouldStop(536870912); - -case 10: -//if -this.state = 15; -this.catchState = 0; -if (parent._appupdater._newapp /*RemoteObject*/ .getField(true,"update" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 12; -}else { -this.state = 14; -}if (true) break; - -case 12: -//C -this.state = 15; - BA.debugLineNum = 31;BA.debugLine="ofreceActualizacion"; -Debug.ShouldStop(1073741824); -__ref.runClassMethod (keymon.lat.medicomed.c_updateavailable.class, "_ofreceactualizacion" /*RemoteObject*/ ); - if (true) break; - -case 14: -//C -this.state = 15; - BA.debugLineNum = 33;BA.debugLine="sinActualizacion"; -Debug.ShouldStop(1); -__ref.runClassMethod (keymon.lat.medicomed.c_updateavailable.class, "_sinactualizacion" /*RemoteObject*/ ); - if (true) break; - -case 15: -//C -this.state = -1; -; - BA.debugLineNum = 35;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -if (true) break; -}} - catch (Exception e0) { - -if (catchState == 0) - throw e0; -else { - state = catchState; -BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e0.toString());} - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static void _msgbox_result(RemoteObject __ref,RemoteObject _result) throws Exception{ -} -public static RemoteObject _b4xpage_created(RemoteObject __ref,RemoteObject _root1) throws Exception{ -try { - Debug.PushSubsStack("B4XPage_Created (c_updateavailable) ","c_updateavailable",19,__ref.getField(false, "ba"),__ref,12); -if (RapidSub.canDelegate("b4xpage_created")) { return __ref.runUserSub(false, "c_updateavailable","b4xpage_created", __ref, _root1);} -Debug.locals.put("Root1", _root1); - BA.debugLineNum = 12;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -Debug.ShouldStop(2048); - BA.debugLineNum = 13;BA.debugLine="Root = Root1"; -Debug.ShouldStop(4096); -__ref.setField ("_root" /*RemoteObject*/ ,_root1); - BA.debugLineNum = 15;BA.debugLine="Root.Color = Colors.Transparent"; -Debug.ShouldStop(16384); -__ref.getField(false,"_root" /*RemoteObject*/ ).runMethod(true,"setColor",c_updateavailable.__c.getField(false,"Colors").getField(true,"Transparent")); - BA.debugLineNum = 16;BA.debugLine="End Sub"; -Debug.ShouldStop(32768); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _canrequestpackageinstalls(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("CanRequestPackageInstalls (c_updateavailable) ","c_updateavailable",19,__ref.getField(false, "ba"),__ref,43); -if (RapidSub.canDelegate("canrequestpackageinstalls")) { return __ref.runUserSub(false, "c_updateavailable","canrequestpackageinstalls", __ref);} -RemoteObject _ctxt = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _packagemanager = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); - BA.debugLineNum = 43;BA.debugLine="public Sub CanRequestPackageInstalls As Boolean"; -Debug.ShouldStop(1024); - BA.debugLineNum = 45;BA.debugLine="Dim ctxt As JavaObject"; -Debug.ShouldStop(4096); -_ctxt = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("ctxt", _ctxt); - BA.debugLineNum = 46;BA.debugLine="ctxt.InitializeContext"; -Debug.ShouldStop(8192); -_ctxt.runVoidMethod ("InitializeContext",__ref.getField(false, "ba")); - BA.debugLineNum = 47;BA.debugLine="Dim PackageManager As JavaObject = ctxt.RunMethod"; -Debug.ShouldStop(16384); -_packagemanager = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_packagemanager = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), _ctxt.runMethod(false,"RunMethod",(Object)(BA.ObjectToString("getPackageManager")),(Object)((c_updateavailable.__c.getField(false,"Null")))));Debug.locals.put("PackageManager", _packagemanager);Debug.locals.put("PackageManager", _packagemanager); - BA.debugLineNum = 48;BA.debugLine="Return PackageManager.RunMethod(\"canRequestPackag"; -Debug.ShouldStop(32768); -if (true) return BA.ObjectToBoolean(_packagemanager.runMethod(false,"RunMethod",(Object)(BA.ObjectToString("canRequestPackageInstalls")),(Object)((c_updateavailable.__c.getField(false,"Null"))))); - BA.debugLineNum = 49;BA.debugLine="End Sub"; -Debug.ShouldStop(65536); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Private Root As B4XView 'ignore"; -c_updateavailable._root = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_root",c_updateavailable._root); - //BA.debugLineNum = 3;BA.debugLine="Private xui As XUI 'ignore"; -c_updateavailable._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",c_updateavailable._xui); - //BA.debugLineNum = 4;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (c_updateavailable) ","c_updateavailable",19,__ref.getField(false, "ba"),__ref,7); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "c_updateavailable","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 7;BA.debugLine="Public Sub Initialize As Object"; -Debug.ShouldStop(64); - BA.debugLineNum = 8;BA.debugLine="Return Me"; -Debug.ShouldStop(128); -if (true) return __ref; - BA.debugLineNum = 9;BA.debugLine="End Sub"; -Debug.ShouldStop(256); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _ofreceactualizacion(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("ofreceActualizacion (c_updateavailable) ","c_updateavailable",19,__ref.getField(false, "ba"),__ref,51); -if (RapidSub.canDelegate("ofreceactualizacion")) { return __ref.runUserSub(false, "c_updateavailable","ofreceactualizacion", __ref);} - BA.debugLineNum = 51;BA.debugLine="Sub ofreceActualizacion"; -Debug.ShouldStop(262144); - BA.debugLineNum = 52;BA.debugLine="If Msgbox2(appUpdater.newApp.newMsg,\"Actualizació"; -Debug.ShouldStop(524288); -if (RemoteObject.solveBoolean("=",c_updateavailable.__c.runMethodAndSync(true,"Msgbox2",(Object)(BA.ObjectToCharSequence(c_updateavailable._appupdater._newapp /*RemoteObject*/ .getField(true,"newMsg" /*RemoteObject*/ ))),(Object)(BA.ObjectToCharSequence("Actualización disponible")),(Object)(BA.ObjectToString("Si")),(Object)(BA.ObjectToString("")),(Object)(BA.ObjectToString("No")),(Object)((c_updateavailable.__c.getField(false,"Null"))),__ref.getField(false, "ba")),BA.numberCast(double.class, c_updateavailable.__c.getField(false,"DialogResponse").getField(true,"POSITIVE")))) { - BA.debugLineNum = 54;BA.debugLine="CallSubDelayed(appUpdater, \"download_newApk\")"; -Debug.ShouldStop(2097152); -c_updateavailable.__c.runVoidMethod ("CallSubDelayed",__ref.getField(false, "ba"),(Object)((c_updateavailable._appupdater.getObject())),(Object)(RemoteObject.createImmutable("download_newApk"))); - }; - BA.debugLineNum = 57;BA.debugLine="B4XPages.MainPage.ocultaProgreso"; -Debug.ShouldStop(16777216); -c_updateavailable._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).runClassMethod (keymon.lat.medicomed.b4xmainpage.class, "_ocultaprogreso" /*RemoteObject*/ ); - BA.debugLineNum = 58;BA.debugLine="StartActivity(Main)"; -Debug.ShouldStop(33554432); -c_updateavailable.__c.runVoidMethod ("StartActivity",__ref.getField(false, "ba"),(Object)((c_updateavailable._main.getObject()))); - BA.debugLineNum = 60;BA.debugLine="B4XPages.ShowPage(\"Login\")"; -Debug.ShouldStop(134217728); -c_updateavailable._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Login"))); - BA.debugLineNum = 61;BA.debugLine="End Sub"; -Debug.ShouldStop(268435456); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _sinactualizacion(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("sinActualizacion (c_updateavailable) ","c_updateavailable",19,__ref.getField(false, "ba"),__ref,63); -if (RapidSub.canDelegate("sinactualizacion")) { return __ref.runUserSub(false, "c_updateavailable","sinactualizacion", __ref);} - BA.debugLineNum = 63;BA.debugLine="Sub sinActualizacion"; -Debug.ShouldStop(1073741824); - BA.debugLineNum = 64;BA.debugLine="Msgbox(appUpdater.newApp.okMsg, \"Aplicación al co"; -Debug.ShouldStop(-2147483648); -c_updateavailable.__c.runVoidMethodAndSync ("Msgbox",(Object)(BA.ObjectToCharSequence(c_updateavailable._appupdater._newapp /*RemoteObject*/ .getField(true,"okMsg" /*RemoteObject*/ ))),(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("Aplicación al corriente"))),__ref.getField(false, "ba")); - BA.debugLineNum = 66;BA.debugLine="B4XPages.MainPage.ocultaProgreso"; -Debug.ShouldStop(2); -c_updateavailable._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,__ref.getField(false, "ba")).runClassMethod (keymon.lat.medicomed.b4xmainpage.class, "_ocultaprogreso" /*RemoteObject*/ ); - BA.debugLineNum = 67;BA.debugLine="B4XPages.ShowPage(\"Login\")"; -Debug.ShouldStop(4); -c_updateavailable._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Login"))); - BA.debugLineNum = 68;BA.debugLine="End Sub"; -Debug.ShouldStop(8); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/cameraexclass2.java b/B4A/Objects/shell/src/keymon/lat/medicomed/cameraexclass2.java deleted file mode 100644 index 4c99412..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/cameraexclass2.java +++ /dev/null @@ -1,36 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class cameraexclass2 { - public static RemoteObject myClass; - public cameraexclass2() { - } - public static PCBA staticBA = new PCBA(null, cameraexclass2.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _nativecam = RemoteObject.declareNull("Object"); -public static RemoteObject _cam = RemoteObject.declareNull("anywheresoftware.b4a.objects.CameraW"); -public static RemoteObject _r = RemoteObject.declareNull("anywheresoftware.b4a.agraham.reflection.Reflection"); -public static RemoteObject _target = RemoteObject.declareNull("Object"); -public static RemoteObject _event = RemoteObject.createImmutable(""); -public static RemoteObject _front = RemoteObject.createImmutable(false); -public static RemoteObject _parameters = RemoteObject.declareNull("Object"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"cam",_ref.getField(false, "_cam"),"DateUtils",_ref.getField(false, "_dateutils"),"event",_ref.getField(false, "_event"),"Front",_ref.getField(false, "_front"),"nativeCam",_ref.getField(false, "_nativecam"),"parameters",_ref.getField(false, "_parameters"),"r",_ref.getField(false, "_r"),"target",_ref.getField(false, "_target")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/cameraexclass2_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/cameraexclass2_subs_0.java deleted file mode 100644 index d342a99..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/cameraexclass2_subs_0.java +++ /dev/null @@ -1,1528 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class cameraexclass2_subs_0 { - - -public static RemoteObject _camera_focusdone(RemoteObject __ref,RemoteObject _success) throws Exception{ -try { - Debug.PushSubsStack("Camera_FocusDone (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,318); -if (RapidSub.canDelegate("camera_focusdone")) { return __ref.runUserSub(false, "cameraexclass2","camera_focusdone", __ref, _success);} -Debug.locals.put("Success", _success); - BA.debugLineNum = 318;BA.debugLine="Private Sub Camera_FocusDone (Success As Boolean)"; -Debug.ShouldStop(536870912); - BA.debugLineNum = 319;BA.debugLine="If Success Then"; -Debug.ShouldStop(1073741824); -if (_success.get().booleanValue()) { - BA.debugLineNum = 320;BA.debugLine="TakePicture"; -Debug.ShouldStop(-2147483648); -__ref.runClassMethod (keymon.lat.medicomed.cameraexclass2.class, "_takepicture" /*RemoteObject*/ ); - }else { - BA.debugLineNum = 322;BA.debugLine="Log(\"AutoFocus error.\")"; -Debug.ShouldStop(2); -cameraexclass2.__c.runVoidMethod ("LogImpl","318415620",RemoteObject.createImmutable("AutoFocus error."),0); - }; - BA.debugLineNum = 324;BA.debugLine="End Sub"; -Debug.ShouldStop(8); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _camera_picturetaken(RemoteObject __ref,RemoteObject _data) throws Exception{ -try { - Debug.PushSubsStack("Camera_PictureTaken (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,106); -if (RapidSub.canDelegate("camera_picturetaken")) { return __ref.runUserSub(false, "cameraexclass2","camera_picturetaken", __ref, _data);} -Debug.locals.put("Data", _data); - BA.debugLineNum = 106;BA.debugLine="Private Sub Camera_PictureTaken (Data() As Byte)"; -Debug.ShouldStop(512); - BA.debugLineNum = 107;BA.debugLine="CallSub2(target, event & \"_PictureTaken\", Data)"; -Debug.ShouldStop(1024); -cameraexclass2.__c.runMethodAndSync(false,"CallSubNew2",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_target" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_event" /*RemoteObject*/ ),RemoteObject.createImmutable("_PictureTaken"))),(Object)((_data))); - BA.debugLineNum = 108;BA.debugLine="End Sub"; -Debug.ShouldStop(2048); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _camera_ready(RemoteObject __ref,RemoteObject _success) throws Exception{ -try { - Debug.PushSubsStack("Camera_Ready (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,83); -if (RapidSub.canDelegate("camera_ready")) { return __ref.runUserSub(false, "cameraexclass2","camera_ready", __ref, _success);} -Debug.locals.put("Success", _success); - BA.debugLineNum = 83;BA.debugLine="Private Sub Camera_Ready (Success As Boolean)"; -Debug.ShouldStop(262144); - BA.debugLineNum = 84;BA.debugLine="If Success Then"; -Debug.ShouldStop(524288); -if (_success.get().booleanValue()) { - BA.debugLineNum = 85;BA.debugLine="r.target = cam"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",(__ref.getField(false,"_cam" /*RemoteObject*/ ))); - BA.debugLineNum = 86;BA.debugLine="nativeCam = r.GetField(\"camera\")"; -Debug.ShouldStop(2097152); -__ref.setField ("_nativecam" /*RemoteObject*/ ,__ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"GetField",(Object)(RemoteObject.createImmutable("camera")))); - BA.debugLineNum = 87;BA.debugLine="r.target = nativeCam"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_nativecam" /*RemoteObject*/ )); - BA.debugLineNum = 88;BA.debugLine="parameters = r.RunMethod(\"getParameters\")"; -Debug.ShouldStop(8388608); -__ref.setField ("_parameters" /*RemoteObject*/ ,__ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getParameters")))); - BA.debugLineNum = 89;BA.debugLine="SetDisplayOrientation"; -Debug.ShouldStop(16777216); -__ref.runClassMethod (keymon.lat.medicomed.cameraexclass2.class, "_setdisplayorientation" /*RemoteObject*/ ); - }else { - BA.debugLineNum = 91;BA.debugLine="Log(\"success = false, \" & LastException)"; -Debug.ShouldStop(67108864); -cameraexclass2.__c.runVoidMethod ("LogImpl","316187400",RemoteObject.concat(RemoteObject.createImmutable("success = false, "),cameraexclass2.__c.runMethod(false,"LastException",__ref.getField(false, "ba"))),0); - }; - BA.debugLineNum = 93;BA.debugLine="CallSub2(target, event & \"_ready\", Success)"; -Debug.ShouldStop(268435456); -cameraexclass2.__c.runMethodAndSync(false,"CallSubNew2",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_target" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_event" /*RemoteObject*/ ),RemoteObject.createImmutable("_ready"))),(Object)((_success))); - BA.debugLineNum = 94;BA.debugLine="End Sub"; -Debug.ShouldStop(536870912); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 6;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 7;BA.debugLine="Private nativeCam As Object"; -cameraexclass2._nativecam = RemoteObject.createNew ("Object");__ref.setField("_nativecam",cameraexclass2._nativecam); - //BA.debugLineNum = 8;BA.debugLine="Private cam As Camera"; -cameraexclass2._cam = RemoteObject.createNew ("anywheresoftware.b4a.objects.CameraW");__ref.setField("_cam",cameraexclass2._cam); - //BA.debugLineNum = 9;BA.debugLine="Private r As Reflector"; -cameraexclass2._r = RemoteObject.createNew ("anywheresoftware.b4a.agraham.reflection.Reflection");__ref.setField("_r",cameraexclass2._r); - //BA.debugLineNum = 10;BA.debugLine="Private target As Object"; -cameraexclass2._target = RemoteObject.createNew ("Object");__ref.setField("_target",cameraexclass2._target); - //BA.debugLineNum = 11;BA.debugLine="Private event As String"; -cameraexclass2._event = RemoteObject.createImmutable("");__ref.setField("_event",cameraexclass2._event); - //BA.debugLineNum = 12;BA.debugLine="Public Front As Boolean"; -cameraexclass2._front = RemoteObject.createImmutable(false);__ref.setField("_front",cameraexclass2._front); - //BA.debugLineNum = 13;BA.debugLine="Private parameters As Object"; -cameraexclass2._parameters = RemoteObject.createNew ("Object");__ref.setField("_parameters",cameraexclass2._parameters); - //BA.debugLineNum = 14;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _closenow(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("CloseNow (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,307); -if (RapidSub.canDelegate("closenow")) { return __ref.runUserSub(false, "cameraexclass2","closenow", __ref);} - BA.debugLineNum = 307;BA.debugLine="Public Sub CloseNow"; -Debug.ShouldStop(262144); - BA.debugLineNum = 308;BA.debugLine="cam.Release"; -Debug.ShouldStop(524288); -__ref.getField(false,"_cam" /*RemoteObject*/ ).runVoidMethod ("Release"); - BA.debugLineNum = 309;BA.debugLine="r.target = cam"; -Debug.ShouldStop(1048576); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",(__ref.getField(false,"_cam" /*RemoteObject*/ ))); - BA.debugLineNum = 310;BA.debugLine="r.RunMethod2(\"releaseCameras\", True, \"java.lang.b"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_r" /*RemoteObject*/ ).runVoidMethod ("RunMethod2",(Object)(BA.ObjectToString("releaseCameras")),(Object)(BA.ObjectToString(cameraexclass2.__c.getField(true,"True"))),(Object)(RemoteObject.createImmutable("java.lang.boolean"))); - BA.debugLineNum = 311;BA.debugLine="End Sub"; -Debug.ShouldStop(4194304); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _commitparameters(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("CommitParameters (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,139); -if (RapidSub.canDelegate("commitparameters")) { return __ref.runUserSub(false, "cameraexclass2","commitparameters", __ref);} - BA.debugLineNum = 139;BA.debugLine="Public Sub CommitParameters"; -Debug.ShouldStop(1024); - BA.debugLineNum = 141;BA.debugLine="r.target = nativeCam"; -Debug.ShouldStop(4096); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_nativecam" /*RemoteObject*/ )); - BA.debugLineNum = 142;BA.debugLine="r.RunMethod4(\"setParameters\", Array As Object(pa"; -Debug.ShouldStop(8192); -__ref.getField(false,"_r" /*RemoteObject*/ ).runVoidMethod ("RunMethod4",(Object)(BA.ObjectToString("setParameters")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {__ref.getField(false,"_parameters" /*RemoteObject*/ )})),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("android.hardware.Camera$Parameters")}))); - BA.debugLineNum = 147;BA.debugLine="End Sub"; -Debug.ShouldStop(262144); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _facedetection_event(RemoteObject __ref,RemoteObject _methodname,RemoteObject _args) throws Exception{ -try { - Debug.PushSubsStack("FaceDetection_Event (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,372); -if (RapidSub.canDelegate("facedetection_event")) { return __ref.runUserSub(false, "cameraexclass2","facedetection_event", __ref, _methodname, _args);} -RemoteObject _faces = null; -RemoteObject _f = RemoteObject.declareNull("Object"); -RemoteObject _jo = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _facerect = RemoteObject.declareNull("anywheresoftware.b4a.objects.drawable.CanvasWrapper.RectWrapper"); -Debug.locals.put("MethodName", _methodname); -Debug.locals.put("Args", _args); - BA.debugLineNum = 372;BA.debugLine="Private Sub FaceDetection_Event (MethodName As Str"; -Debug.ShouldStop(524288); - BA.debugLineNum = 373;BA.debugLine="Dim faces() As Object = Args(0)"; -Debug.ShouldStop(1048576); -_faces = (_args.getArrayElement(false,BA.numberCast(int.class, 0)));Debug.locals.put("faces", _faces);Debug.locals.put("faces", _faces); - BA.debugLineNum = 374;BA.debugLine="For Each f As Object In faces"; -Debug.ShouldStop(2097152); -{ -final RemoteObject group2 = _faces; -final int groupLen2 = group2.getField(true,"length").get() -;int index2 = 0; -; -for (; index2 < groupLen2;index2++){ -_f = group2.getArrayElement(false,RemoteObject.createImmutable(index2));Debug.locals.put("f", _f); -Debug.locals.put("f", _f); - BA.debugLineNum = 375;BA.debugLine="Dim jo As JavaObject = f"; -Debug.ShouldStop(4194304); -_jo = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_jo = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), _f);Debug.locals.put("jo", _jo);Debug.locals.put("jo", _jo); - BA.debugLineNum = 376;BA.debugLine="Dim faceRect As Rect = jo.GetField(\"rect\")"; -Debug.ShouldStop(8388608); -_facerect = RemoteObject.createNew ("anywheresoftware.b4a.objects.drawable.CanvasWrapper.RectWrapper"); -_facerect = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.drawable.CanvasWrapper.RectWrapper"), _jo.runMethod(false,"GetField",(Object)(RemoteObject.createImmutable("rect"))));Debug.locals.put("faceRect", _facerect);Debug.locals.put("faceRect", _facerect); - BA.debugLineNum = 377;BA.debugLine="Log(faceRect)"; -Debug.ShouldStop(16777216); -cameraexclass2.__c.runVoidMethod ("LogImpl","319070981",BA.ObjectToString(_facerect),0); - } -}Debug.locals.put("f", _f); -; - BA.debugLineNum = 379;BA.debugLine="Return Null"; -Debug.ShouldStop(67108864); -if (true) return cameraexclass2.__c.getField(false,"Null"); - BA.debugLineNum = 380;BA.debugLine="End Sub"; -Debug.ShouldStop(134217728); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _findcamera(RemoteObject __ref,RemoteObject _frontcamera) throws Exception{ -try { - Debug.PushSubsStack("FindCamera (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,33); -if (RapidSub.canDelegate("findcamera")) { return __ref.runUserSub(false, "cameraexclass2","findcamera", __ref, _frontcamera);} -RemoteObject _ci = RemoteObject.declareNull("keymon.lat.medicomed.main._camerainfoandid"); -RemoteObject _camerainfo = RemoteObject.declareNull("Object"); -RemoteObject _cameravalue = RemoteObject.createImmutable(0); -RemoteObject _numberofcameras = RemoteObject.createImmutable(0); -int _i = 0; -Debug.locals.put("frontCamera", _frontcamera); - BA.debugLineNum = 33;BA.debugLine="Private Sub FindCamera (frontCamera As Boolean) As"; -Debug.ShouldStop(1); - BA.debugLineNum = 34;BA.debugLine="Dim ci As CameraInfoAndId"; -Debug.ShouldStop(2); -_ci = RemoteObject.createNew ("keymon.lat.medicomed.main._camerainfoandid");Debug.locals.put("ci", _ci); - BA.debugLineNum = 35;BA.debugLine="Dim cameraInfo As Object"; -Debug.ShouldStop(4); -_camerainfo = RemoteObject.createNew ("Object");Debug.locals.put("cameraInfo", _camerainfo); - BA.debugLineNum = 36;BA.debugLine="Dim cameraValue As Int"; -Debug.ShouldStop(8); -_cameravalue = RemoteObject.createImmutable(0);Debug.locals.put("cameraValue", _cameravalue); - BA.debugLineNum = 37;BA.debugLine="Log(\"findCamera\")"; -Debug.ShouldStop(16); -cameraexclass2.__c.runVoidMethod ("LogImpl","316056324",RemoteObject.createImmutable("findCamera"),0); - BA.debugLineNum = 38;BA.debugLine="If frontCamera Then cameraValue = 1 Else cameraVa"; -Debug.ShouldStop(32); -if (_frontcamera.get().booleanValue()) { -_cameravalue = BA.numberCast(int.class, 1);Debug.locals.put("cameraValue", _cameravalue);} -else { -_cameravalue = BA.numberCast(int.class, 0);Debug.locals.put("cameraValue", _cameravalue);}; - BA.debugLineNum = 39;BA.debugLine="cameraInfo = r.CreateObject(\"android.hardware.Cam"; -Debug.ShouldStop(64); -_camerainfo = __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"CreateObject",(Object)(RemoteObject.createImmutable("android.hardware.Camera$CameraInfo")));Debug.locals.put("cameraInfo", _camerainfo); - BA.debugLineNum = 40;BA.debugLine="Dim numberOfCameras As Int = r.RunStaticMethod(\"a"; -Debug.ShouldStop(128); -_numberofcameras = BA.numberCast(int.class, __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunStaticMethod",(Object)(BA.ObjectToString("android.hardware.Camera")),(Object)(BA.ObjectToString("getNumberOfCameras")),(Object)((cameraexclass2.__c.getField(false,"Null"))),(Object)((cameraexclass2.__c.getField(false,"Null")))));Debug.locals.put("numberOfCameras", _numberofcameras);Debug.locals.put("numberOfCameras", _numberofcameras); - BA.debugLineNum = 41;BA.debugLine="Log(r.target)"; -Debug.ShouldStop(256); -cameraexclass2.__c.runVoidMethod ("LogImpl","316056328",BA.ObjectToString(__ref.getField(false,"_r" /*RemoteObject*/ ).getField(false,"Target")),0); - BA.debugLineNum = 42;BA.debugLine="Log(numberOfCameras)"; -Debug.ShouldStop(512); -cameraexclass2.__c.runVoidMethod ("LogImpl","316056329",BA.NumberToString(_numberofcameras),0); - BA.debugLineNum = 43;BA.debugLine="For i = 0 To numberOfCameras - 1"; -Debug.ShouldStop(1024); -{ -final int step10 = 1; -final int limit10 = RemoteObject.solve(new RemoteObject[] {_numberofcameras,RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step10 > 0 && _i <= limit10) || (step10 < 0 && _i >= limit10) ;_i = ((int)(0 + _i + step10)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 44;BA.debugLine="r.RunStaticMethod(\"android.hardware.Camera\", \"ge"; -Debug.ShouldStop(2048); -__ref.getField(false,"_r" /*RemoteObject*/ ).runVoidMethod ("RunStaticMethod",(Object)(BA.ObjectToString("android.hardware.Camera")),(Object)(BA.ObjectToString("getCameraInfo")),(Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {RemoteObject.createImmutable((_i)),_camerainfo})),(Object)(RemoteObject.createNewArray("String",new int[] {2},new Object[] {BA.ObjectToString("java.lang.int"),RemoteObject.createImmutable("android.hardware.Camera$CameraInfo")}))); - BA.debugLineNum = 46;BA.debugLine="r.target = cameraInfo"; -Debug.ShouldStop(8192); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",_camerainfo); - BA.debugLineNum = 47;BA.debugLine="Log(\"facing: \" & r.GetField(\"facing\") & \", \" & c"; -Debug.ShouldStop(16384); -cameraexclass2.__c.runVoidMethod ("LogImpl","316056334",RemoteObject.concat(RemoteObject.createImmutable("facing: "),__ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"GetField",(Object)(RemoteObject.createImmutable("facing"))),RemoteObject.createImmutable(", "),_cameravalue),0); - BA.debugLineNum = 48;BA.debugLine="If r.GetField(\"facing\") = cameraValue Then"; -Debug.ShouldStop(32768); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"GetField",(Object)(RemoteObject.createImmutable("facing"))),(_cameravalue))) { - BA.debugLineNum = 49;BA.debugLine="ci.cameraInfo = r.target"; -Debug.ShouldStop(65536); -_ci.setField ("CameraInfo" /*RemoteObject*/ ,__ref.getField(false,"_r" /*RemoteObject*/ ).getField(false,"Target")); - BA.debugLineNum = 50;BA.debugLine="ci.Id = i"; -Debug.ShouldStop(131072); -_ci.setField ("Id" /*RemoteObject*/ ,BA.numberCast(int.class, _i)); - BA.debugLineNum = 51;BA.debugLine="Return ci"; -Debug.ShouldStop(262144); -if (true) return _ci; - }; - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 54;BA.debugLine="ci.id = -1"; -Debug.ShouldStop(2097152); -_ci.setField ("Id" /*RemoteObject*/ ,BA.numberCast(int.class, -(double) (0 + 1))); - BA.debugLineNum = 55;BA.debugLine="Return ci"; -Debug.ShouldStop(4194304); -if (true) return _ci; - BA.debugLineNum = 56;BA.debugLine="End Sub"; -Debug.ShouldStop(8388608); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _focusandtakepicture(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("FocusAndTakePicture (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,313); -if (RapidSub.canDelegate("focusandtakepicture")) { return __ref.runUserSub(false, "cameraexclass2","focusandtakepicture", __ref);} - BA.debugLineNum = 313;BA.debugLine="Public Sub FocusAndTakePicture"; -Debug.ShouldStop(16777216); - BA.debugLineNum = 314;BA.debugLine="cam.AutoFocus"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_cam" /*RemoteObject*/ ).runVoidMethod ("AutoFocus"); - BA.debugLineNum = 315;BA.debugLine="End Sub"; -Debug.ShouldStop(67108864); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getcoloreffect(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetColorEffect (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,149); -if (RapidSub.canDelegate("getcoloreffect")) { return __ref.runUserSub(false, "cameraexclass2","getcoloreffect", __ref);} - BA.debugLineNum = 149;BA.debugLine="Public Sub GetColorEffect As String"; -Debug.ShouldStop(1048576); - BA.debugLineNum = 150;BA.debugLine="Return GetParameter(\"effect\")"; -Debug.ShouldStop(2097152); -if (true) return __ref.runClassMethod (keymon.lat.medicomed.cameraexclass2.class, "_getparameter" /*RemoteObject*/ ,(Object)(RemoteObject.createImmutable("effect"))); - BA.debugLineNum = 151;BA.debugLine="End Sub"; -Debug.ShouldStop(4194304); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getexposurecompensation(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getExposureCompensation (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,346); -if (RapidSub.canDelegate("getexposurecompensation")) { return __ref.runUserSub(false, "cameraexclass2","getexposurecompensation", __ref);} - BA.debugLineNum = 346;BA.debugLine="Public Sub getExposureCompensation As Int"; -Debug.ShouldStop(33554432); - BA.debugLineNum = 347;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 348;BA.debugLine="Return r.RunMethod(\"getExposureCompensation\")"; -Debug.ShouldStop(134217728); -if (true) return BA.numberCast(int.class, __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getExposureCompensation")))); - BA.debugLineNum = 349;BA.debugLine="End Sub"; -Debug.ShouldStop(268435456); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getflashmode(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetFlashMode (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,200); -if (RapidSub.canDelegate("getflashmode")) { return __ref.runUserSub(false, "cameraexclass2","getflashmode", __ref);} - BA.debugLineNum = 200;BA.debugLine="Public Sub GetFlashMode As String"; -Debug.ShouldStop(128); - BA.debugLineNum = 201;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(256); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 202;BA.debugLine="Return r.RunMethod(\"getFlashMode\")"; -Debug.ShouldStop(512); -if (true) return BA.ObjectToString(__ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getFlashMode")))); - BA.debugLineNum = 203;BA.debugLine="End Sub"; -Debug.ShouldStop(1024); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getfocusdistances(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetFocusDistances (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,294); -if (RapidSub.canDelegate("getfocusdistances")) { return __ref.runUserSub(false, "cameraexclass2","getfocusdistances", __ref);} -RemoteObject _f = null; - BA.debugLineNum = 294;BA.debugLine="Public Sub GetFocusDistances As Float()"; -Debug.ShouldStop(32); - BA.debugLineNum = 295;BA.debugLine="Dim F(3) As Float"; -Debug.ShouldStop(64); -_f = RemoteObject.createNewArray ("float", new int[] {3}, new Object[]{});Debug.locals.put("F", _f); - BA.debugLineNum = 296;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(128); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 297;BA.debugLine="r.RunMethod4(\"getFocusDistances\", Array As Object"; -Debug.ShouldStop(256); -__ref.getField(false,"_r" /*RemoteObject*/ ).runVoidMethod ("RunMethod4",(Object)(BA.ObjectToString("getFocusDistances")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(_f)})),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("[F")}))); - BA.debugLineNum = 298;BA.debugLine="Return F"; -Debug.ShouldStop(512); -if (true) return _f; - BA.debugLineNum = 299;BA.debugLine="End Sub"; -Debug.ShouldStop(1024); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getmaxexposurecompensation(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getMaxExposureCompensation (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,361); -if (RapidSub.canDelegate("getmaxexposurecompensation")) { return __ref.runUserSub(false, "cameraexclass2","getmaxexposurecompensation", __ref);} - BA.debugLineNum = 361;BA.debugLine="Public Sub getMaxExposureCompensation As Int"; -Debug.ShouldStop(256); - BA.debugLineNum = 362;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(512); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 363;BA.debugLine="Return r.RunMethod(\"getMaxExposureCompensation\")"; -Debug.ShouldStop(1024); -if (true) return BA.numberCast(int.class, __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getMaxExposureCompensation")))); - BA.debugLineNum = 364;BA.debugLine="End Sub"; -Debug.ShouldStop(2048); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getmaxzoom(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetMaxZoom (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,331); -if (RapidSub.canDelegate("getmaxzoom")) { return __ref.runUserSub(false, "cameraexclass2","getmaxzoom", __ref);} - BA.debugLineNum = 331;BA.debugLine="Public Sub GetMaxZoom As Int"; -Debug.ShouldStop(1024); - BA.debugLineNum = 332;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(2048); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 333;BA.debugLine="Return r.RunMethod(\"getMaxZoom\")"; -Debug.ShouldStop(4096); -if (true) return BA.numberCast(int.class, __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getMaxZoom")))); - BA.debugLineNum = 334;BA.debugLine="End Sub"; -Debug.ShouldStop(8192); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getminexposurecompensation(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getMinExposureCompensation (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,356); -if (RapidSub.canDelegate("getminexposurecompensation")) { return __ref.runUserSub(false, "cameraexclass2","getminexposurecompensation", __ref);} - BA.debugLineNum = 356;BA.debugLine="Public Sub getMinExposureCompensation As Int"; -Debug.ShouldStop(8); - BA.debugLineNum = 357;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(16); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 358;BA.debugLine="Return r.RunMethod(\"getMinExposureCompensation\")"; -Debug.ShouldStop(32); -if (true) return BA.numberCast(int.class, __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getMinExposureCompensation")))); - BA.debugLineNum = 359;BA.debugLine="End Sub"; -Debug.ShouldStop(64); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getparameter(RemoteObject __ref,RemoteObject _key) throws Exception{ -try { - Debug.PushSubsStack("GetParameter (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,134); -if (RapidSub.canDelegate("getparameter")) { return __ref.runUserSub(false, "cameraexclass2","getparameter", __ref, _key);} -Debug.locals.put("Key", _key); - BA.debugLineNum = 134;BA.debugLine="Public Sub GetParameter(Key As String) As String"; -Debug.ShouldStop(32); - BA.debugLineNum = 135;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(64); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 136;BA.debugLine="Return r.RunMethod2(\"get\", Key, \"java.lang.String"; -Debug.ShouldStop(128); -if (true) return BA.ObjectToString(__ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod2",(Object)(BA.ObjectToString("get")),(Object)(_key),(Object)(RemoteObject.createImmutable("java.lang.String")))); - BA.debugLineNum = 137;BA.debugLine="End Sub"; -Debug.ShouldStop(256); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getpicturesize(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetPictureSize (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,242); -if (RapidSub.canDelegate("getpicturesize")) { return __ref.runUserSub(false, "cameraexclass2","getpicturesize", __ref);} -RemoteObject _cs = RemoteObject.declareNull("keymon.lat.medicomed.main._camerasize"); - BA.debugLineNum = 242;BA.debugLine="Public Sub GetPictureSize As CameraSize"; -Debug.ShouldStop(131072); - BA.debugLineNum = 243;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(262144); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 244;BA.debugLine="r.target = r.RunMethod(\"getPictureSize\")"; -Debug.ShouldStop(524288); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getPictureSize")))); - BA.debugLineNum = 245;BA.debugLine="Dim cs As CameraSize"; -Debug.ShouldStop(1048576); -_cs = RemoteObject.createNew ("keymon.lat.medicomed.main._camerasize");Debug.locals.put("cs", _cs); - BA.debugLineNum = 246;BA.debugLine="cs.Width = r.GetField(\"width\")"; -Debug.ShouldStop(2097152); -_cs.setField ("Width" /*RemoteObject*/ ,BA.numberCast(int.class, __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"GetField",(Object)(RemoteObject.createImmutable("width"))))); - BA.debugLineNum = 247;BA.debugLine="cs.Height = r.GetField(\"height\")"; -Debug.ShouldStop(4194304); -_cs.setField ("Height" /*RemoteObject*/ ,BA.numberCast(int.class, __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"GetField",(Object)(RemoteObject.createImmutable("height"))))); - BA.debugLineNum = 248;BA.debugLine="Return cs"; -Debug.ShouldStop(8388608); -if (true) return _cs; - BA.debugLineNum = 249;BA.debugLine="End Sub"; -Debug.ShouldStop(16777216); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getpreviewfpsrange(RemoteObject __ref,RemoteObject _range) throws Exception{ -try { - Debug.PushSubsStack("GetPreviewFpsRange (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,222); -if (RapidSub.canDelegate("getpreviewfpsrange")) { return __ref.runUserSub(false, "cameraexclass2","getpreviewfpsrange", __ref, _range);} -Debug.locals.put("Range", _range); - BA.debugLineNum = 222;BA.debugLine="Public Sub GetPreviewFpsRange(Range() As Int)"; -Debug.ShouldStop(536870912); - BA.debugLineNum = 223;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 224;BA.debugLine="r.RunMethod4(\"getPreviewFpsRange\", Array As Objec"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_r" /*RemoteObject*/ ).runVoidMethod ("RunMethod4",(Object)(BA.ObjectToString("getPreviewFpsRange")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(_range)})),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("[I")}))); - BA.debugLineNum = 225;BA.debugLine="End Sub"; -Debug.ShouldStop(1); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getpreviewsize(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetPreviewSize (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,233); -if (RapidSub.canDelegate("getpreviewsize")) { return __ref.runUserSub(false, "cameraexclass2","getpreviewsize", __ref);} -RemoteObject _cs = RemoteObject.declareNull("keymon.lat.medicomed.main._camerasize"); - BA.debugLineNum = 233;BA.debugLine="Public Sub GetPreviewSize As CameraSize"; -Debug.ShouldStop(256); - BA.debugLineNum = 234;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(512); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 235;BA.debugLine="r.target = r.RunMethod(\"getPreviewSize\")"; -Debug.ShouldStop(1024); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getPreviewSize")))); - BA.debugLineNum = 236;BA.debugLine="Dim cs As CameraSize"; -Debug.ShouldStop(2048); -_cs = RemoteObject.createNew ("keymon.lat.medicomed.main._camerasize");Debug.locals.put("cs", _cs); - BA.debugLineNum = 237;BA.debugLine="cs.Width = r.GetField(\"width\")"; -Debug.ShouldStop(4096); -_cs.setField ("Width" /*RemoteObject*/ ,BA.numberCast(int.class, __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"GetField",(Object)(RemoteObject.createImmutable("width"))))); - BA.debugLineNum = 238;BA.debugLine="cs.Height = r.GetField(\"height\")"; -Debug.ShouldStop(8192); -_cs.setField ("Height" /*RemoteObject*/ ,BA.numberCast(int.class, __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"GetField",(Object)(RemoteObject.createImmutable("height"))))); - BA.debugLineNum = 239;BA.debugLine="Return cs"; -Debug.ShouldStop(16384); -if (true) return _cs; - BA.debugLineNum = 240;BA.debugLine="End Sub"; -Debug.ShouldStop(32768); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getsupportedcoloreffects(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetSupportedColorEffects (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,210); -if (RapidSub.canDelegate("getsupportedcoloreffects")) { return __ref.runUserSub(false, "cameraexclass2","getsupportedcoloreffects", __ref);} - BA.debugLineNum = 210;BA.debugLine="Public Sub GetSupportedColorEffects As List"; -Debug.ShouldStop(131072); - BA.debugLineNum = 211;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(262144); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 212;BA.debugLine="Return r.RunMethod(\"getSupportedColorEffects\")"; -Debug.ShouldStop(524288); -if (true) return RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getSupportedColorEffects")))); - BA.debugLineNum = 213;BA.debugLine="End Sub"; -Debug.ShouldStop(1048576); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getsupportedflashmodes(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetSupportedFlashModes (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,205); -if (RapidSub.canDelegate("getsupportedflashmodes")) { return __ref.runUserSub(false, "cameraexclass2","getsupportedflashmodes", __ref);} - BA.debugLineNum = 205;BA.debugLine="Public Sub GetSupportedFlashModes As List"; -Debug.ShouldStop(4096); - BA.debugLineNum = 206;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(8192); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 207;BA.debugLine="Return r.RunMethod(\"getSupportedFlashModes\")"; -Debug.ShouldStop(16384); -if (true) return RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getSupportedFlashModes")))); - BA.debugLineNum = 208;BA.debugLine="End Sub"; -Debug.ShouldStop(32768); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getsupportedfocusmodes(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetSupportedFocusModes (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,273); -if (RapidSub.canDelegate("getsupportedfocusmodes")) { return __ref.runUserSub(false, "cameraexclass2","getsupportedfocusmodes", __ref);} - BA.debugLineNum = 273;BA.debugLine="Public Sub GetSupportedFocusModes As List"; -Debug.ShouldStop(65536); - BA.debugLineNum = 274;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(131072); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 275;BA.debugLine="Return r.RunMethod(\"getSupportedFocusModes\")"; -Debug.ShouldStop(262144); -if (true) return RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getSupportedFocusModes")))); - BA.debugLineNum = 276;BA.debugLine="End Sub"; -Debug.ShouldStop(524288); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getsupportedpictureformats(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetSupportedPictureFormats (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,301); -if (RapidSub.canDelegate("getsupportedpictureformats")) { return __ref.runUserSub(false, "cameraexclass2","getsupportedpictureformats", __ref);} - BA.debugLineNum = 301;BA.debugLine="Public Sub GetSupportedPictureFormats As List"; -Debug.ShouldStop(4096); - BA.debugLineNum = 302;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(8192); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 303;BA.debugLine="Return r.RunMethod(\"getSupportedPictureFormats"; -Debug.ShouldStop(16384); -if (true) return RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getSupportedPictureFormats")))); - BA.debugLineNum = 304;BA.debugLine="End Sub"; -Debug.ShouldStop(32768); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getsupportedpicturessizes(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetSupportedPicturesSizes (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,173); -if (RapidSub.canDelegate("getsupportedpicturessizes")) { return __ref.runUserSub(false, "cameraexclass2","getsupportedpicturessizes", __ref);} -RemoteObject _list1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _cs = null; -int _i = 0; - BA.debugLineNum = 173;BA.debugLine="Public Sub GetSupportedPicturesSizes As CameraSize"; -Debug.ShouldStop(4096); - BA.debugLineNum = 174;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(8192); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 175;BA.debugLine="Dim list1 As List = r.RunMethod(\"getSupportedPict"; -Debug.ShouldStop(16384); -_list1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); -_list1 = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getSupportedPictureSizes"))));Debug.locals.put("list1", _list1);Debug.locals.put("list1", _list1); - BA.debugLineNum = 176;BA.debugLine="Dim cs(list1.Size) As CameraSize"; -Debug.ShouldStop(32768); -_cs = RemoteObject.createNewArray ("keymon.lat.medicomed.main._camerasize", new int[] {_list1.runMethod(true,"getSize").get().intValue()}, new Object[]{});Debug.locals.put("cs", _cs); - BA.debugLineNum = 177;BA.debugLine="For i = 0 To list1.Size - 1"; -Debug.ShouldStop(65536); -{ -final int step4 = 1; -final int limit4 = RemoteObject.solve(new RemoteObject[] {_list1.runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step4 > 0 && _i <= limit4) || (step4 < 0 && _i >= limit4) ;_i = ((int)(0 + _i + step4)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 178;BA.debugLine="r.target = list1.get(i)"; -Debug.ShouldStop(131072); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",_list1.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i)))); - BA.debugLineNum = 179;BA.debugLine="cs(i).Width = r.GetField(\"width\")"; -Debug.ShouldStop(262144); -_cs.getArrayElement(false, /*RemoteObject*/ BA.numberCast(int.class, _i)).setField ("Width" /*RemoteObject*/ ,BA.numberCast(int.class, __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"GetField",(Object)(RemoteObject.createImmutable("width"))))); - BA.debugLineNum = 180;BA.debugLine="cs(i).Height = r.GetField(\"height\")"; -Debug.ShouldStop(524288); -_cs.getArrayElement(false, /*RemoteObject*/ BA.numberCast(int.class, _i)).setField ("Height" /*RemoteObject*/ ,BA.numberCast(int.class, __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"GetField",(Object)(RemoteObject.createImmutable("height"))))); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 182;BA.debugLine="Return cs"; -Debug.ShouldStop(2097152); -if (true) return _cs; - BA.debugLineNum = 183;BA.debugLine="End Sub"; -Debug.ShouldStop(4194304); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getsupportedpreviewfpsrange(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetSupportedPreviewFpsRange (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,216); -if (RapidSub.canDelegate("getsupportedpreviewfpsrange")) { return __ref.runUserSub(false, "cameraexclass2","getsupportedpreviewfpsrange", __ref);} - BA.debugLineNum = 216;BA.debugLine="Public Sub GetSupportedPreviewFpsRange As List"; -Debug.ShouldStop(8388608); - BA.debugLineNum = 217;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(16777216); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 218;BA.debugLine="Return r.RunMethod(\"getSupportedPreviewFpsRange\")"; -Debug.ShouldStop(33554432); -if (true) return RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getSupportedPreviewFpsRange")))); - BA.debugLineNum = 219;BA.debugLine="End Sub"; -Debug.ShouldStop(67108864); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getsupportedpreviewsizes(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetSupportedPreviewSizes (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,157); -if (RapidSub.canDelegate("getsupportedpreviewsizes")) { return __ref.runUserSub(false, "cameraexclass2","getsupportedpreviewsizes", __ref);} -RemoteObject _list1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _cs = null; -int _i = 0; - BA.debugLineNum = 157;BA.debugLine="Public Sub GetSupportedPreviewSizes As CameraSize("; -Debug.ShouldStop(268435456); - BA.debugLineNum = 158;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 159;BA.debugLine="Dim list1 As List = r.RunMethod(\"getSupportedPrev"; -Debug.ShouldStop(1073741824); -_list1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); -_list1 = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getSupportedPreviewSizes"))));Debug.locals.put("list1", _list1);Debug.locals.put("list1", _list1); - BA.debugLineNum = 160;BA.debugLine="Dim cs(list1.Size) As CameraSize"; -Debug.ShouldStop(-2147483648); -_cs = RemoteObject.createNewArray ("keymon.lat.medicomed.main._camerasize", new int[] {_list1.runMethod(true,"getSize").get().intValue()}, new Object[]{});Debug.locals.put("cs", _cs); - BA.debugLineNum = 161;BA.debugLine="For i = 0 To list1.Size - 1"; -Debug.ShouldStop(1); -{ -final int step4 = 1; -final int limit4 = RemoteObject.solve(new RemoteObject[] {_list1.runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step4 > 0 && _i <= limit4) || (step4 < 0 && _i >= limit4) ;_i = ((int)(0 + _i + step4)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 162;BA.debugLine="r.target = list1.get(i)"; -Debug.ShouldStop(2); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",_list1.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i)))); - BA.debugLineNum = 163;BA.debugLine="cs(i).Width = r.GetField(\"width\")"; -Debug.ShouldStop(4); -_cs.getArrayElement(false, /*RemoteObject*/ BA.numberCast(int.class, _i)).setField ("Width" /*RemoteObject*/ ,BA.numberCast(int.class, __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"GetField",(Object)(RemoteObject.createImmutable("width"))))); - BA.debugLineNum = 164;BA.debugLine="cs(i).Height = r.GetField(\"height\")"; -Debug.ShouldStop(8); -_cs.getArrayElement(false, /*RemoteObject*/ BA.numberCast(int.class, _i)).setField ("Height" /*RemoteObject*/ ,BA.numberCast(int.class, __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"GetField",(Object)(RemoteObject.createImmutable("height"))))); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 166;BA.debugLine="Return cs"; -Debug.ShouldStop(32); -if (true) return _cs; - BA.debugLineNum = 167;BA.debugLine="End Sub"; -Debug.ShouldStop(64); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getzoom(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getZoom (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,336); -if (RapidSub.canDelegate("getzoom")) { return __ref.runUserSub(false, "cameraexclass2","getzoom", __ref);} - BA.debugLineNum = 336;BA.debugLine="Public Sub getZoom() As Int"; -Debug.ShouldStop(32768); - BA.debugLineNum = 337;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(65536); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 338;BA.debugLine="Return r.RunMethod(\"getZoom\")"; -Debug.ShouldStop(131072); -if (true) return BA.numberCast(int.class, __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getZoom")))); - BA.debugLineNum = 339;BA.debugLine="End Sub"; -Debug.ShouldStop(262144); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _panel1,RemoteObject _frontcamera,RemoteObject _targetmodule,RemoteObject _eventname) throws Exception{ -try { - Debug.PushSubsStack("Initialize (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,16); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "cameraexclass2","initialize", __ref, _ba, _panel1, _frontcamera, _targetmodule, _eventname);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -RemoteObject _id = RemoteObject.createImmutable(0); -Debug.locals.put("ba", _ba); -Debug.locals.put("Panel1", _panel1); -Debug.locals.put("FrontCamera", _frontcamera); -Debug.locals.put("TargetModule", _targetmodule); -Debug.locals.put("EventName", _eventname); - BA.debugLineNum = 16;BA.debugLine="Public Sub Initialize (Panel1 As Panel, FrontCamer"; -Debug.ShouldStop(32768); - BA.debugLineNum = 17;BA.debugLine="target = TargetModule"; -Debug.ShouldStop(65536); -__ref.setField ("_target" /*RemoteObject*/ ,_targetmodule); - BA.debugLineNum = 18;BA.debugLine="event = EventName"; -Debug.ShouldStop(131072); -__ref.setField ("_event" /*RemoteObject*/ ,_eventname); - BA.debugLineNum = 19;BA.debugLine="Front = FrontCamera"; -Debug.ShouldStop(262144); -__ref.setField ("_front" /*RemoteObject*/ ,_frontcamera); - BA.debugLineNum = 20;BA.debugLine="Dim id As Int"; -Debug.ShouldStop(524288); -_id = RemoteObject.createImmutable(0);Debug.locals.put("id", _id); - BA.debugLineNum = 21;BA.debugLine="id = FindCamera(Front).id"; -Debug.ShouldStop(1048576); -_id = __ref.runClassMethod (keymon.lat.medicomed.cameraexclass2.class, "_findcamera" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_front" /*RemoteObject*/ ))).getField(true,"Id" /*RemoteObject*/ );Debug.locals.put("id", _id); - BA.debugLineNum = 22;BA.debugLine="If id = -1 Then"; -Debug.ShouldStop(2097152); -if (RemoteObject.solveBoolean("=",_id,BA.numberCast(double.class, -(double) (0 + 1)))) { - BA.debugLineNum = 23;BA.debugLine="Front = Not(Front) 'try different camera"; -Debug.ShouldStop(4194304); -__ref.setField ("_front" /*RemoteObject*/ ,cameraexclass2.__c.runMethod(true,"Not",(Object)(__ref.getField(true,"_front" /*RemoteObject*/ )))); - BA.debugLineNum = 24;BA.debugLine="id = FindCamera(Front).id"; -Debug.ShouldStop(8388608); -_id = __ref.runClassMethod (keymon.lat.medicomed.cameraexclass2.class, "_findcamera" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_front" /*RemoteObject*/ ))).getField(true,"Id" /*RemoteObject*/ );Debug.locals.put("id", _id); - BA.debugLineNum = 25;BA.debugLine="If id = -1 Then"; -Debug.ShouldStop(16777216); -if (RemoteObject.solveBoolean("=",_id,BA.numberCast(double.class, -(double) (0 + 1)))) { - BA.debugLineNum = 26;BA.debugLine="ToastMessageShow(\"No camera found.\", True)"; -Debug.ShouldStop(33554432); -cameraexclass2.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("No camera found.")),(Object)(cameraexclass2.__c.getField(true,"True"))); - BA.debugLineNum = 27;BA.debugLine="Return"; -Debug.ShouldStop(67108864); -if (true) return RemoteObject.createImmutable(""); - }; - }; - BA.debugLineNum = 30;BA.debugLine="cam.Initialize2(Panel1, \"camera\", id)"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_cam" /*RemoteObject*/ ).runVoidMethod ("Initialize2",__ref.getField(false, "ba"),(Object)((_panel1.getObject())),(Object)(BA.ObjectToString("camera")),(Object)(_id)); - BA.debugLineNum = 31;BA.debugLine="End Sub"; -Debug.ShouldStop(1073741824); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _iszoomsupported(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("IsZoomSupported (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,326); -if (RapidSub.canDelegate("iszoomsupported")) { return __ref.runUserSub(false, "cameraexclass2","iszoomsupported", __ref);} - BA.debugLineNum = 326;BA.debugLine="Public Sub IsZoomSupported As Boolean"; -Debug.ShouldStop(32); - BA.debugLineNum = 327;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(64); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 328;BA.debugLine="Return r.RunMethod(\"isZoomSupported\")"; -Debug.ShouldStop(128); -if (true) return BA.ObjectToBoolean(__ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("isZoomSupported")))); - BA.debugLineNum = 329;BA.debugLine="End Sub"; -Debug.ShouldStop(256); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _previewimagetojpeg(RemoteObject __ref,RemoteObject _data,RemoteObject _quality) throws Exception{ -try { - Debug.PushSubsStack("PreviewImageToJpeg (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,253); -if (RapidSub.canDelegate("previewimagetojpeg")) { return __ref.runUserSub(false, "cameraexclass2","previewimagetojpeg", __ref, _data, _quality);} -RemoteObject _size = RemoteObject.declareNull("Object"); -RemoteObject _previewformat = RemoteObject.declareNull("Object"); -RemoteObject _width = RemoteObject.createImmutable(0); -RemoteObject _height = RemoteObject.createImmutable(0); -RemoteObject _yuvimage = RemoteObject.declareNull("Object"); -RemoteObject _rect1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.drawable.CanvasWrapper.RectWrapper"); -RemoteObject _out = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -Debug.locals.put("data", _data); -Debug.locals.put("quality", _quality); - BA.debugLineNum = 253;BA.debugLine="Public Sub PreviewImageToJpeg(data() As Byte, qual"; -Debug.ShouldStop(268435456); - BA.debugLineNum = 254;BA.debugLine="Dim size, previewFormat As Object"; -Debug.ShouldStop(536870912); -_size = RemoteObject.createNew ("Object");Debug.locals.put("size", _size); -_previewformat = RemoteObject.createNew ("Object");Debug.locals.put("previewFormat", _previewformat); - BA.debugLineNum = 255;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 256;BA.debugLine="size = r.RunMethod(\"getPreviewSize\")"; -Debug.ShouldStop(-2147483648); -_size = __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getPreviewSize")));Debug.locals.put("size", _size); - BA.debugLineNum = 257;BA.debugLine="previewFormat = r.RunMethod(\"getPreviewFormat\")"; -Debug.ShouldStop(1); -_previewformat = __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getPreviewFormat")));Debug.locals.put("previewFormat", _previewformat); - BA.debugLineNum = 258;BA.debugLine="r.target = size"; -Debug.ShouldStop(2); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",_size); - BA.debugLineNum = 259;BA.debugLine="Dim width = r.GetField(\"width\"), height = r.GetFi"; -Debug.ShouldStop(4); -_width = BA.numberCast(int.class, __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"GetField",(Object)(RemoteObject.createImmutable("width"))));Debug.locals.put("width", _width);Debug.locals.put("width", _width); -_height = BA.numberCast(int.class, __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"GetField",(Object)(RemoteObject.createImmutable("height"))));Debug.locals.put("height", _height);Debug.locals.put("height", _height); - BA.debugLineNum = 260;BA.debugLine="Dim yuvImage As Object = r.CreateObject2(\"android"; -Debug.ShouldStop(8); -_yuvimage = __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"CreateObject2",(Object)(BA.ObjectToString("android.graphics.YuvImage")),(Object)(RemoteObject.createNewArray("Object",new int[] {5},new Object[] {(_data),_previewformat,(_width),(_height),cameraexclass2.__c.getField(false,"Null")})),(Object)(RemoteObject.createNewArray("String",new int[] {5},new Object[] {BA.ObjectToString("[B"),BA.ObjectToString("java.lang.int"),BA.ObjectToString("java.lang.int"),BA.ObjectToString("java.lang.int"),RemoteObject.createImmutable("[I")})));Debug.locals.put("yuvImage", _yuvimage);Debug.locals.put("yuvImage", _yuvimage); - BA.debugLineNum = 263;BA.debugLine="r.target = yuvImage"; -Debug.ShouldStop(64); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",_yuvimage); - BA.debugLineNum = 264;BA.debugLine="Dim rect1 As Rect"; -Debug.ShouldStop(128); -_rect1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.drawable.CanvasWrapper.RectWrapper");Debug.locals.put("rect1", _rect1); - BA.debugLineNum = 265;BA.debugLine="rect1.Initialize(0, 0, r.RunMethod(\"getWidth\"), r"; -Debug.ShouldStop(256); -_rect1.runVoidMethod ("Initialize",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getWidth"))))),(Object)(BA.numberCast(int.class, __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getHeight")))))); - BA.debugLineNum = 266;BA.debugLine="Dim out As OutputStream"; -Debug.ShouldStop(512); -_out = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper");Debug.locals.put("out", _out); - BA.debugLineNum = 267;BA.debugLine="out.InitializeToBytesArray(100)"; -Debug.ShouldStop(1024); -_out.runVoidMethod ("InitializeToBytesArray",(Object)(BA.numberCast(int.class, 100))); - BA.debugLineNum = 268;BA.debugLine="r.RunMethod4(\"compressToJpeg\", Array As Object(re"; -Debug.ShouldStop(2048); -__ref.getField(false,"_r" /*RemoteObject*/ ).runVoidMethod ("RunMethod4",(Object)(BA.ObjectToString("compressToJpeg")),(Object)(RemoteObject.createNewArray("Object",new int[] {3},new Object[] {(_rect1.getObject()),(_quality),(_out.getObject())})),(Object)(RemoteObject.createNewArray("String",new int[] {3},new Object[] {BA.ObjectToString("android.graphics.Rect"),BA.ObjectToString("java.lang.int"),RemoteObject.createImmutable("java.io.OutputStream")}))); - BA.debugLineNum = 270;BA.debugLine="Return out.ToBytesArray"; -Debug.ShouldStop(8192); -if (true) return _out.runMethod(false,"ToBytesArray"); - BA.debugLineNum = 271;BA.debugLine="End Sub"; -Debug.ShouldStop(16384); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _release(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Release (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,118); -if (RapidSub.canDelegate("release")) { return __ref.runUserSub(false, "cameraexclass2","release", __ref);} - BA.debugLineNum = 118;BA.debugLine="Public Sub Release"; -Debug.ShouldStop(2097152); - BA.debugLineNum = 119;BA.debugLine="cam.Release"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_cam" /*RemoteObject*/ ).runVoidMethod ("Release"); - BA.debugLineNum = 120;BA.debugLine="End Sub"; -Debug.ShouldStop(8388608); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _savepicturetofile(RemoteObject __ref,RemoteObject _data,RemoteObject _dir,RemoteObject _filename) throws Exception{ -try { - Debug.PushSubsStack("SavePictureToFile (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,123); -if (RapidSub.canDelegate("savepicturetofile")) { return __ref.runUserSub(false, "cameraexclass2","savepicturetofile", __ref, _data, _dir, _filename);} -RemoteObject _out = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -Debug.locals.put("Data", _data); -Debug.locals.put("Dir", _dir); -Debug.locals.put("FileName", _filename); - BA.debugLineNum = 123;BA.debugLine="Public Sub SavePictureToFile(Data() As Byte, Dir A"; -Debug.ShouldStop(67108864); - BA.debugLineNum = 124;BA.debugLine="Dim out As OutputStream = File.OpenOutput(Dir, Fi"; -Debug.ShouldStop(134217728); -_out = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -_out = cameraexclass2.__c.getField(false,"File").runMethod(false,"OpenOutput",(Object)(_dir),(Object)(_filename),(Object)(cameraexclass2.__c.getField(true,"False")));Debug.locals.put("out", _out);Debug.locals.put("out", _out); - BA.debugLineNum = 125;BA.debugLine="out.WriteBytes(Data, 0, Data.Length)"; -Debug.ShouldStop(268435456); -_out.runVoidMethod ("WriteBytes",(Object)(_data),(Object)(BA.numberCast(int.class, 0)),(Object)(_data.getField(true,"length"))); - BA.debugLineNum = 126;BA.debugLine="out.Close"; -Debug.ShouldStop(536870912); -_out.runVoidMethod ("Close"); - BA.debugLineNum = 127;BA.debugLine="End Sub"; -Debug.ShouldStop(1073741824); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setcoloreffect(RemoteObject __ref,RemoteObject _effect) throws Exception{ -try { - Debug.PushSubsStack("SetColorEffect (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,153); -if (RapidSub.canDelegate("setcoloreffect")) { return __ref.runUserSub(false, "cameraexclass2","setcoloreffect", __ref, _effect);} -Debug.locals.put("Effect", _effect); - BA.debugLineNum = 153;BA.debugLine="Public Sub SetColorEffect(Effect As String)"; -Debug.ShouldStop(16777216); - BA.debugLineNum = 154;BA.debugLine="SetParameter(\"effect\", Effect)"; -Debug.ShouldStop(33554432); -__ref.runClassMethod (keymon.lat.medicomed.cameraexclass2.class, "_setparameter" /*RemoteObject*/ ,(Object)(BA.ObjectToString("effect")),(Object)(_effect)); - BA.debugLineNum = 155;BA.debugLine="End Sub"; -Debug.ShouldStop(67108864); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setcontinuousautofocus(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("SetContinuousAutoFocus (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,278); -if (RapidSub.canDelegate("setcontinuousautofocus")) { return __ref.runUserSub(false, "cameraexclass2","setcontinuousautofocus", __ref);} -RemoteObject _modes = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); - BA.debugLineNum = 278;BA.debugLine="Public Sub SetContinuousAutoFocus"; -Debug.ShouldStop(2097152); - BA.debugLineNum = 279;BA.debugLine="Dim modes As List = GetSupportedFocusModes"; -Debug.ShouldStop(4194304); -_modes = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); -_modes = __ref.runClassMethod (keymon.lat.medicomed.cameraexclass2.class, "_getsupportedfocusmodes" /*RemoteObject*/ );Debug.locals.put("modes", _modes);Debug.locals.put("modes", _modes); - BA.debugLineNum = 280;BA.debugLine="If modes.IndexOf(\"continuous-picture\") > -1 Th"; -Debug.ShouldStop(8388608); -if (RemoteObject.solveBoolean(">",_modes.runMethod(true,"IndexOf",(Object)((RemoteObject.createImmutable("continuous-picture")))),BA.numberCast(double.class, -(double) (0 + 1)))) { - BA.debugLineNum = 281;BA.debugLine="SetFocusMode(\"continuous-picture\")"; -Debug.ShouldStop(16777216); -__ref.runClassMethod (keymon.lat.medicomed.cameraexclass2.class, "_setfocusmode" /*RemoteObject*/ ,(Object)(RemoteObject.createImmutable("continuous-picture"))); - }else -{ BA.debugLineNum = 282;BA.debugLine="Else If modes.IndexOf(\"continuous-video\") > -1"; -Debug.ShouldStop(33554432); -if (RemoteObject.solveBoolean(">",_modes.runMethod(true,"IndexOf",(Object)((RemoteObject.createImmutable("continuous-video")))),BA.numberCast(double.class, -(double) (0 + 1)))) { - BA.debugLineNum = 283;BA.debugLine="SetFocusMode(\"continuous-video\")"; -Debug.ShouldStop(67108864); -__ref.runClassMethod (keymon.lat.medicomed.cameraexclass2.class, "_setfocusmode" /*RemoteObject*/ ,(Object)(RemoteObject.createImmutable("continuous-video"))); - }else { - BA.debugLineNum = 285;BA.debugLine="Log(\"Continuous focus mode is not availabl"; -Debug.ShouldStop(268435456); -cameraexclass2.__c.runVoidMethod ("LogImpl","318022407",RemoteObject.createImmutable("Continuous focus mode is not available"),0); - }} -; - BA.debugLineNum = 287;BA.debugLine="End Sub"; -Debug.ShouldStop(1073741824); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setdisplayorientation(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("SetDisplayOrientation (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,58); -if (RapidSub.canDelegate("setdisplayorientation")) { return __ref.runUserSub(false, "cameraexclass2","setdisplayorientation", __ref);} -RemoteObject _previewresult = RemoteObject.createImmutable(0); -RemoteObject _result = RemoteObject.createImmutable(0); -RemoteObject _degrees = RemoteObject.createImmutable(0); -RemoteObject _ci = RemoteObject.declareNull("keymon.lat.medicomed.main._camerainfoandid"); -RemoteObject _orientation = RemoteObject.createImmutable(0); - BA.debugLineNum = 58;BA.debugLine="Private Sub SetDisplayOrientation"; -Debug.ShouldStop(33554432); - BA.debugLineNum = 59;BA.debugLine="r.target = r.GetActivity"; -Debug.ShouldStop(67108864); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",(__ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"GetActivity",__ref.getField(false, "ba")))); - BA.debugLineNum = 60;BA.debugLine="r.target = r.RunMethod(\"getWindowManager\")"; -Debug.ShouldStop(134217728); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getWindowManager")))); - BA.debugLineNum = 61;BA.debugLine="r.target = r.RunMethod(\"getDefaultDisplay\")"; -Debug.ShouldStop(268435456); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getDefaultDisplay")))); - BA.debugLineNum = 62;BA.debugLine="r.target = r.RunMethod(\"getRotation\")"; -Debug.ShouldStop(536870912); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getRotation")))); - BA.debugLineNum = 63;BA.debugLine="Dim previewResult, result, degrees As Int = r.tar"; -Debug.ShouldStop(1073741824); -_previewresult = RemoteObject.createImmutable(0);Debug.locals.put("previewResult", _previewresult); -_result = RemoteObject.createImmutable(0);Debug.locals.put("result", _result); -_degrees = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, __ref.getField(false,"_r" /*RemoteObject*/ ).getField(false,"Target")),RemoteObject.createImmutable(90)}, "*",0, 0));Debug.locals.put("degrees", _degrees);Debug.locals.put("degrees", _degrees); - BA.debugLineNum = 64;BA.debugLine="Dim ci As CameraInfoAndId = FindCamera(Front)"; -Debug.ShouldStop(-2147483648); -_ci = __ref.runClassMethod (keymon.lat.medicomed.cameraexclass2.class, "_findcamera" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_front" /*RemoteObject*/ )));Debug.locals.put("ci", _ci);Debug.locals.put("ci", _ci); - BA.debugLineNum = 65;BA.debugLine="r.target = ci.CameraInfo"; -Debug.ShouldStop(1); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",_ci.getField(false,"CameraInfo" /*RemoteObject*/ )); - BA.debugLineNum = 66;BA.debugLine="Dim orientation As Int = r.GetField(\"orientation\""; -Debug.ShouldStop(2); -_orientation = BA.numberCast(int.class, __ref.getField(false,"_r" /*RemoteObject*/ ).runMethod(false,"GetField",(Object)(RemoteObject.createImmutable("orientation"))));Debug.locals.put("orientation", _orientation);Debug.locals.put("orientation", _orientation); - BA.debugLineNum = 67;BA.debugLine="If Front Then"; -Debug.ShouldStop(4); -if (__ref.getField(true,"_front" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 68;BA.debugLine="previewResult = (orientation + degrees) Mod 360"; -Debug.ShouldStop(8); -_previewresult = RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {_orientation,_degrees}, "+",1, 1)),RemoteObject.createImmutable(360)}, "%",0, 1);Debug.locals.put("previewResult", _previewresult); - BA.debugLineNum = 69;BA.debugLine="result = previewResult"; -Debug.ShouldStop(16); -_result = _previewresult;Debug.locals.put("result", _result); - BA.debugLineNum = 70;BA.debugLine="previewResult = (360 - previewResult) Mod 360"; -Debug.ShouldStop(32); -_previewresult = RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(360),_previewresult}, "-",1, 1)),RemoteObject.createImmutable(360)}, "%",0, 1);Debug.locals.put("previewResult", _previewresult); - }else { - BA.debugLineNum = 72;BA.debugLine="previewResult = (orientation - degrees + 360) Mo"; -Debug.ShouldStop(128); -_previewresult = RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {_orientation,_degrees,RemoteObject.createImmutable(360)}, "-+",2, 1)),RemoteObject.createImmutable(360)}, "%",0, 1);Debug.locals.put("previewResult", _previewresult); - BA.debugLineNum = 73;BA.debugLine="result = previewResult"; -Debug.ShouldStop(256); -_result = _previewresult;Debug.locals.put("result", _result); - BA.debugLineNum = 74;BA.debugLine="Log(previewResult)"; -Debug.ShouldStop(512); -cameraexclass2.__c.runVoidMethod ("LogImpl","316121872",BA.NumberToString(_previewresult),0); - }; - BA.debugLineNum = 76;BA.debugLine="r.target = nativeCam"; -Debug.ShouldStop(2048); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_nativecam" /*RemoteObject*/ )); - BA.debugLineNum = 77;BA.debugLine="r.RunMethod2(\"setDisplayOrientation\", previewResu"; -Debug.ShouldStop(4096); -__ref.getField(false,"_r" /*RemoteObject*/ ).runVoidMethod ("RunMethod2",(Object)(BA.ObjectToString("setDisplayOrientation")),(Object)(BA.NumberToString(_previewresult)),(Object)(RemoteObject.createImmutable("java.lang.int"))); - BA.debugLineNum = 78;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(8192); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 79;BA.debugLine="r.RunMethod2(\"setRotation\", result, \"java.lang.in"; -Debug.ShouldStop(16384); -__ref.getField(false,"_r" /*RemoteObject*/ ).runVoidMethod ("RunMethod2",(Object)(BA.ObjectToString("setRotation")),(Object)(BA.NumberToString(_result)),(Object)(RemoteObject.createImmutable("java.lang.int"))); - BA.debugLineNum = 80;BA.debugLine="CommitParameters"; -Debug.ShouldStop(32768); -__ref.runClassMethod (keymon.lat.medicomed.cameraexclass2.class, "_commitparameters" /*RemoteObject*/ ); - BA.debugLineNum = 81;BA.debugLine="End Sub"; -Debug.ShouldStop(65536); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setexposurecompensation(RemoteObject __ref,RemoteObject _v) throws Exception{ -try { - Debug.PushSubsStack("setExposureCompensation (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,351); -if (RapidSub.canDelegate("setexposurecompensation")) { return __ref.runUserSub(false, "cameraexclass2","setexposurecompensation", __ref, _v);} -Debug.locals.put("v", _v); - BA.debugLineNum = 351;BA.debugLine="Public Sub setExposureCompensation(v As Int)"; -Debug.ShouldStop(1073741824); - BA.debugLineNum = 352;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 353;BA.debugLine="r.RunMethod2(\"setExposureCompensation\", v, \"java."; -Debug.ShouldStop(1); -__ref.getField(false,"_r" /*RemoteObject*/ ).runVoidMethod ("RunMethod2",(Object)(BA.ObjectToString("setExposureCompensation")),(Object)(BA.NumberToString(_v)),(Object)(RemoteObject.createImmutable("java.lang.int"))); - BA.debugLineNum = 354;BA.debugLine="End Sub"; -Debug.ShouldStop(2); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setfacedetectionlistener(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("SetFaceDetectionListener (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,366); -if (RapidSub.canDelegate("setfacedetectionlistener")) { return __ref.runUserSub(false, "cameraexclass2","setfacedetectionlistener", __ref);} -RemoteObject _jo = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _e = RemoteObject.declareNull("Object"); - BA.debugLineNum = 366;BA.debugLine="Public Sub SetFaceDetectionListener"; -Debug.ShouldStop(8192); - BA.debugLineNum = 367;BA.debugLine="Dim jo As JavaObject = nativeCam"; -Debug.ShouldStop(16384); -_jo = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_jo = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), __ref.getField(false,"_nativecam" /*RemoteObject*/ ));Debug.locals.put("jo", _jo);Debug.locals.put("jo", _jo); - BA.debugLineNum = 368;BA.debugLine="Dim e As Object = jo.CreateEvent(\"android.hardwar"; -Debug.ShouldStop(32768); -_e = _jo.runMethod(false,"CreateEvent",__ref.getField(false, "ba"),(Object)(BA.ObjectToString("android.hardware.Camera.FaceDetectionListener")),(Object)(BA.ObjectToString("FaceDetection")),(Object)(cameraexclass2.__c.getField(false,"Null")));Debug.locals.put("e", _e);Debug.locals.put("e", _e); - BA.debugLineNum = 369;BA.debugLine="jo.RunMethod(\"setFaceDetectionListener\", Array(e)"; -Debug.ShouldStop(65536); -_jo.runVoidMethod ("RunMethod",(Object)(BA.ObjectToString("setFaceDetectionListener")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {_e}))); - BA.debugLineNum = 370;BA.debugLine="End Sub"; -Debug.ShouldStop(131072); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setflashmode(RemoteObject __ref,RemoteObject _mode) throws Exception{ -try { - Debug.PushSubsStack("SetFlashMode (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,195); -if (RapidSub.canDelegate("setflashmode")) { return __ref.runUserSub(false, "cameraexclass2","setflashmode", __ref, _mode);} -Debug.locals.put("Mode", _mode); - BA.debugLineNum = 195;BA.debugLine="Public Sub SetFlashMode(Mode As String)"; -Debug.ShouldStop(4); - BA.debugLineNum = 196;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(8); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 197;BA.debugLine="r.RunMethod2(\"setFlashMode\", Mode, \"java.lang.Str"; -Debug.ShouldStop(16); -__ref.getField(false,"_r" /*RemoteObject*/ ).runVoidMethod ("RunMethod2",(Object)(BA.ObjectToString("setFlashMode")),(Object)(_mode),(Object)(RemoteObject.createImmutable("java.lang.String"))); - BA.debugLineNum = 198;BA.debugLine="End Sub"; -Debug.ShouldStop(32); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setfocusmode(RemoteObject __ref,RemoteObject _mode) throws Exception{ -try { - Debug.PushSubsStack("SetFocusMode (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,289); -if (RapidSub.canDelegate("setfocusmode")) { return __ref.runUserSub(false, "cameraexclass2","setfocusmode", __ref, _mode);} -Debug.locals.put("Mode", _mode); - BA.debugLineNum = 289;BA.debugLine="Public Sub SetFocusMode(Mode As String)"; -Debug.ShouldStop(1); - BA.debugLineNum = 290;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(2); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 291;BA.debugLine="r.RunMethod2(\"setFocusMode\", Mode, \"java.lang."; -Debug.ShouldStop(4); -__ref.getField(false,"_r" /*RemoteObject*/ ).runVoidMethod ("RunMethod2",(Object)(BA.ObjectToString("setFocusMode")),(Object)(_mode),(Object)(RemoteObject.createImmutable("java.lang.String"))); - BA.debugLineNum = 292;BA.debugLine="End Sub"; -Debug.ShouldStop(8); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setjpegquality(RemoteObject __ref,RemoteObject _quality) throws Exception{ -try { - Debug.PushSubsStack("SetJpegQuality (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,190); -if (RapidSub.canDelegate("setjpegquality")) { return __ref.runUserSub(false, "cameraexclass2","setjpegquality", __ref, _quality);} -Debug.locals.put("Quality", _quality); - BA.debugLineNum = 190;BA.debugLine="Public Sub SetJpegQuality(Quality As Int)"; -Debug.ShouldStop(536870912); - BA.debugLineNum = 191;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(1073741824); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 192;BA.debugLine="r.RunMethod2(\"setJpegQuality\", Quality, \"java.lan"; -Debug.ShouldStop(-2147483648); -__ref.getField(false,"_r" /*RemoteObject*/ ).runVoidMethod ("RunMethod2",(Object)(BA.ObjectToString("setJpegQuality")),(Object)(BA.NumberToString(_quality)),(Object)(RemoteObject.createImmutable("java.lang.int"))); - BA.debugLineNum = 193;BA.debugLine="End Sub"; -Debug.ShouldStop(1); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setparameter(RemoteObject __ref,RemoteObject _key,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("SetParameter (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,129); -if (RapidSub.canDelegate("setparameter")) { return __ref.runUserSub(false, "cameraexclass2","setparameter", __ref, _key, _value);} -Debug.locals.put("Key", _key); -Debug.locals.put("Value", _value); - BA.debugLineNum = 129;BA.debugLine="Public Sub SetParameter(Key As String, Value As St"; -Debug.ShouldStop(1); - BA.debugLineNum = 130;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(2); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 131;BA.debugLine="r.RunMethod3(\"set\", Key, \"java.lang.String\", Valu"; -Debug.ShouldStop(4); -__ref.getField(false,"_r" /*RemoteObject*/ ).runVoidMethod ("RunMethod3",(Object)(BA.ObjectToString("set")),(Object)(_key),(Object)(BA.ObjectToString("java.lang.String")),(Object)(_value),(Object)(RemoteObject.createImmutable("java.lang.String"))); - BA.debugLineNum = 132;BA.debugLine="End Sub"; -Debug.ShouldStop(8); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setpicturesize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("SetPictureSize (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,185); -if (RapidSub.canDelegate("setpicturesize")) { return __ref.runUserSub(false, "cameraexclass2","setpicturesize", __ref, _width, _height);} -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 185;BA.debugLine="Public Sub SetPictureSize(Width As Int, Height As"; -Debug.ShouldStop(16777216); - BA.debugLineNum = 186;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(33554432); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 187;BA.debugLine="r.RunMethod3(\"setPictureSize\", Width, \"java.lang."; -Debug.ShouldStop(67108864); -__ref.getField(false,"_r" /*RemoteObject*/ ).runVoidMethod ("RunMethod3",(Object)(BA.ObjectToString("setPictureSize")),(Object)(BA.NumberToString(_width)),(Object)(BA.ObjectToString("java.lang.int")),(Object)(BA.NumberToString(_height)),(Object)(RemoteObject.createImmutable("java.lang.int"))); - BA.debugLineNum = 188;BA.debugLine="End Sub"; -Debug.ShouldStop(134217728); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setpreviewfpsrange(RemoteObject __ref,RemoteObject _minvalue,RemoteObject _maxvalue) throws Exception{ -try { - Debug.PushSubsStack("SetPreviewFpsRange (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,227); -if (RapidSub.canDelegate("setpreviewfpsrange")) { return __ref.runUserSub(false, "cameraexclass2","setpreviewfpsrange", __ref, _minvalue, _maxvalue);} -Debug.locals.put("MinValue", _minvalue); -Debug.locals.put("MaxValue", _maxvalue); - BA.debugLineNum = 227;BA.debugLine="Public Sub SetPreviewFpsRange(MinValue As Int, Max"; -Debug.ShouldStop(4); - BA.debugLineNum = 228;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(8); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 229;BA.debugLine="r.RunMethod4(\"setPreviewFpsRange\", Array As Objec"; -Debug.ShouldStop(16); -__ref.getField(false,"_r" /*RemoteObject*/ ).runVoidMethod ("RunMethod4",(Object)(BA.ObjectToString("setPreviewFpsRange")),(Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(_minvalue),(_maxvalue)})),(Object)(RemoteObject.createNewArray("String",new int[] {2},new Object[] {BA.ObjectToString("java.lang.int"),RemoteObject.createImmutable("java.lang.int")}))); - BA.debugLineNum = 231;BA.debugLine="End Sub"; -Debug.ShouldStop(64); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setpreviewsize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("SetPreviewSize (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,169); -if (RapidSub.canDelegate("setpreviewsize")) { return __ref.runUserSub(false, "cameraexclass2","setpreviewsize", __ref, _width, _height);} -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 169;BA.debugLine="Public Sub SetPreviewSize(Width As Int, Height As"; -Debug.ShouldStop(256); - BA.debugLineNum = 170;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(512); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 171;BA.debugLine="r.RunMethod3(\"setPreviewSize\", Width, \"java.lang."; -Debug.ShouldStop(1024); -__ref.getField(false,"_r" /*RemoteObject*/ ).runVoidMethod ("RunMethod3",(Object)(BA.ObjectToString("setPreviewSize")),(Object)(BA.NumberToString(_width)),(Object)(BA.ObjectToString("java.lang.int")),(Object)(BA.NumberToString(_height)),(Object)(RemoteObject.createImmutable("java.lang.int"))); - BA.debugLineNum = 172;BA.debugLine="End Sub"; -Debug.ShouldStop(2048); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setzoom(RemoteObject __ref,RemoteObject _zoomvalue) throws Exception{ -try { - Debug.PushSubsStack("setZoom (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,341); -if (RapidSub.canDelegate("setzoom")) { return __ref.runUserSub(false, "cameraexclass2","setzoom", __ref, _zoomvalue);} -Debug.locals.put("ZoomValue", _zoomvalue); - BA.debugLineNum = 341;BA.debugLine="Public Sub setZoom(ZoomValue As Int)"; -Debug.ShouldStop(1048576); - BA.debugLineNum = 342;BA.debugLine="r.target = parameters"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_r" /*RemoteObject*/ ).setField ("Target",__ref.getField(false,"_parameters" /*RemoteObject*/ )); - BA.debugLineNum = 343;BA.debugLine="r.RunMethod2(\"setZoom\", ZoomValue, \"java.lang.in"; -Debug.ShouldStop(4194304); -__ref.getField(false,"_r" /*RemoteObject*/ ).runVoidMethod ("RunMethod2",(Object)(BA.ObjectToString("setZoom")),(Object)(BA.NumberToString(_zoomvalue)),(Object)(RemoteObject.createImmutable("java.lang.int"))); - BA.debugLineNum = 344;BA.debugLine="End Sub"; -Debug.ShouldStop(8388608); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _startfacedetection(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("StartFaceDetection (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,384); -if (RapidSub.canDelegate("startfacedetection")) { return __ref.runUserSub(false, "cameraexclass2","startfacedetection", __ref);} -RemoteObject _jo = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); - BA.debugLineNum = 384;BA.debugLine="Public Sub StartFaceDetection"; -Debug.ShouldStop(-2147483648); - BA.debugLineNum = 385;BA.debugLine="Dim jo As JavaObject = nativeCam"; -Debug.ShouldStop(1); -_jo = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_jo = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), __ref.getField(false,"_nativecam" /*RemoteObject*/ ));Debug.locals.put("jo", _jo);Debug.locals.put("jo", _jo); - BA.debugLineNum = 386;BA.debugLine="jo.RunMethod(\"startFaceDetection\", Null)"; -Debug.ShouldStop(2); -_jo.runVoidMethod ("RunMethod",(Object)(BA.ObjectToString("startFaceDetection")),(Object)((cameraexclass2.__c.getField(false,"Null")))); - BA.debugLineNum = 387;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _startpreview(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("StartPreview (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,110); -if (RapidSub.canDelegate("startpreview")) { return __ref.runUserSub(false, "cameraexclass2","startpreview", __ref);} - BA.debugLineNum = 110;BA.debugLine="Public Sub StartPreview"; -Debug.ShouldStop(8192); - BA.debugLineNum = 111;BA.debugLine="cam.StartPreview"; -Debug.ShouldStop(16384); -__ref.getField(false,"_cam" /*RemoteObject*/ ).runVoidMethod ("StartPreview"); - BA.debugLineNum = 112;BA.debugLine="End Sub"; -Debug.ShouldStop(32768); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _stopfacedetection(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("StopFaceDetection (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,389); -if (RapidSub.canDelegate("stopfacedetection")) { return __ref.runUserSub(false, "cameraexclass2","stopfacedetection", __ref);} -RemoteObject _jo = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); - BA.debugLineNum = 389;BA.debugLine="Public Sub StopFaceDetection"; -Debug.ShouldStop(16); - BA.debugLineNum = 390;BA.debugLine="Dim jo As JavaObject = nativeCam"; -Debug.ShouldStop(32); -_jo = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_jo = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), __ref.getField(false,"_nativecam" /*RemoteObject*/ ));Debug.locals.put("jo", _jo);Debug.locals.put("jo", _jo); - BA.debugLineNum = 391;BA.debugLine="jo.RunMethod(\"stopFaceDetection\", Null)"; -Debug.ShouldStop(64); -_jo.runVoidMethod ("RunMethod",(Object)(BA.ObjectToString("stopFaceDetection")),(Object)((cameraexclass2.__c.getField(false,"Null")))); - BA.debugLineNum = 392;BA.debugLine="End Sub"; -Debug.ShouldStop(128); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _stoppreview(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("StopPreview (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,114); -if (RapidSub.canDelegate("stoppreview")) { return __ref.runUserSub(false, "cameraexclass2","stoppreview", __ref);} - BA.debugLineNum = 114;BA.debugLine="Public Sub StopPreview"; -Debug.ShouldStop(131072); - BA.debugLineNum = 115;BA.debugLine="cam.StopPreview"; -Debug.ShouldStop(262144); -__ref.getField(false,"_cam" /*RemoteObject*/ ).runVoidMethod ("StopPreview"); - BA.debugLineNum = 116;BA.debugLine="End Sub"; -Debug.ShouldStop(524288); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _takepicture(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("TakePicture (cameraexclass2) ","cameraexclass2",11,__ref.getField(false, "ba"),__ref,102); -if (RapidSub.canDelegate("takepicture")) { return __ref.runUserSub(false, "cameraexclass2","takepicture", __ref);} - BA.debugLineNum = 102;BA.debugLine="Public Sub TakePicture"; -Debug.ShouldStop(32); - BA.debugLineNum = 103;BA.debugLine="cam.TakePicture"; -Debug.ShouldStop(64); -__ref.getField(false,"_cam" /*RemoteObject*/ ).runVoidMethod ("TakePicture"); - BA.debugLineNum = 104;BA.debugLine="End Sub"; -Debug.ShouldStop(128); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/cl_appupdate.java b/B4A/Objects/shell/src/keymon/lat/medicomed/cl_appupdate.java deleted file mode 100644 index e42d4ea..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/cl_appupdate.java +++ /dev/null @@ -1,65 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class cl_appupdate { - public static RemoteObject myClass; - public cl_appupdate() { - } - public static PCBA staticBA = new PCBA(null, cl_appupdate.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _err_nopkg = RemoteObject.createImmutable(0); -public static RemoteObject _err_notxt = RemoteObject.createImmutable(0); -public static RemoteObject _err_noapk = RemoteObject.createImmutable(0); -public static RemoteObject _err_txtrow = RemoteObject.createImmutable(0); -public static RemoteObject _err_html = RemoteObject.createImmutable(0); -public static RemoteObject _err_nospace = RemoteObject.createImmutable(0); -public static RemoteObject _err_noperm = RemoteObject.createImmutable(0); -public static RemoteObject _err_download = RemoteObject.createImmutable(0); -public static RemoteObject _err_http = RemoteObject.createImmutable(0); -public static RemoteObject _ok_init = RemoteObject.createImmutable(0); -public static RemoteObject _ok_curver = RemoteObject.createImmutable(0); -public static RemoteObject _ok_webver = RemoteObject.createImmutable(0); -public static RemoteObject _no_newerapk = RemoteObject.createImmutable(0); -public static RemoteObject _ok_newerapk = RemoteObject.createImmutable(0); -public static RemoteObject _ok_download = RemoteObject.createImmutable(0); -public static RemoteObject _ok_install = RemoteObject.createImmutable(0); -public static RemoteObject _callback = RemoteObject.declareNull("Object"); -public static RemoteObject _event = RemoteObject.createImmutable(""); -public static RemoteObject _spackagename = RemoteObject.createImmutable(""); -public static RemoteObject _snewvertxt = RemoteObject.createImmutable(""); -public static RemoteObject _snewverapk = RemoteObject.createImmutable(""); -public static RemoteObject _sstatuscode = RemoteObject.createImmutable(0); -public static RemoteObject _susername = RemoteObject.createImmutable(""); -public static RemoteObject _supassword = RemoteObject.createImmutable(""); -public static RemoteObject _curver = RemoteObject.createImmutable(""); -public static RemoteObject _webver = RemoteObject.createImmutable(""); -public static RemoteObject _webclog = RemoteObject.createImmutable(""); -public static RemoteObject _webfsize = RemoteObject.createImmutable(""); -public static RemoteObject _sverbose = RemoteObject.createImmutable(false); -public static RemoteObject _pnlsplash = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper"); -public static RemoteObject _splashshowing = RemoteObject.createImmutable(false); -public static RemoteObject _phone = RemoteObject.declareNull("anywheresoftware.b4a.phone.Phone"); -public static RemoteObject _rp = RemoteObject.declareNull("anywheresoftware.b4a.objects.RuntimePermissions"); -public static RemoteObject _sharedfolder = RemoteObject.createImmutable(""); -public static RemoteObject _usefileprovider = RemoteObject.createImmutable(false); -public static RemoteObject _logcolor1 = RemoteObject.createImmutable(0); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"Callback",_ref.getField(false, "_callback"),"curver",_ref.getField(false, "_curver"),"DateUtils",_ref.getField(false, "_dateutils"),"ERR_DOWNLOAD",_ref.getField(false, "_err_download"),"ERR_HTML",_ref.getField(false, "_err_html"),"ERR_HTTP",_ref.getField(false, "_err_http"),"ERR_NOAPK",_ref.getField(false, "_err_noapk"),"ERR_NOPERM",_ref.getField(false, "_err_noperm"),"ERR_NOPKG",_ref.getField(false, "_err_nopkg"),"ERR_NOSPACE",_ref.getField(false, "_err_nospace"),"ERR_NOTXT",_ref.getField(false, "_err_notxt"),"ERR_TXTROW",_ref.getField(false, "_err_txtrow"),"Event",_ref.getField(false, "_event"),"LogColor1",_ref.getField(false, "_logcolor1"),"NO_NEWERAPK",_ref.getField(false, "_no_newerapk"),"OK_CURVER",_ref.getField(false, "_ok_curver"),"OK_DOWNLOAD",_ref.getField(false, "_ok_download"),"OK_INIT",_ref.getField(false, "_ok_init"),"OK_INSTALL",_ref.getField(false, "_ok_install"),"OK_NEWERAPK",_ref.getField(false, "_ok_newerapk"),"OK_WEBVER",_ref.getField(false, "_ok_webver"),"phone",_ref.getField(false, "_phone"),"pnlSplash",_ref.getField(false, "_pnlsplash"),"rp",_ref.getField(false, "_rp"),"SharedFolder",_ref.getField(false, "_sharedfolder"),"sNewVerApk",_ref.getField(false, "_snewverapk"),"sNewVerTxt",_ref.getField(false, "_snewvertxt"),"sPackageName",_ref.getField(false, "_spackagename"),"SplashShowing",_ref.getField(false, "_splashshowing"),"sStatusCode",_ref.getField(false, "_sstatuscode"),"sUPassword",_ref.getField(false, "_supassword"),"sUserName",_ref.getField(false, "_susername"),"sVerbose",_ref.getField(false, "_sverbose"),"UseFileProvider",_ref.getField(false, "_usefileprovider"),"webclog",_ref.getField(false, "_webclog"),"webfsize",_ref.getField(false, "_webfsize"),"webver",_ref.getField(false, "_webver")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/cl_appupdate_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/cl_appupdate_subs_0.java deleted file mode 100644 index 1eb0856..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/cl_appupdate_subs_0.java +++ /dev/null @@ -1,2449 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class cl_appupdate_subs_0 { - - -public static RemoteObject _canrequestpackageinstalls(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("CanRequestPackageInstalls (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,448); -if (RapidSub.canDelegate("canrequestpackageinstalls")) { return __ref.runUserSub(false, "cl_appupdate","canrequestpackageinstalls", __ref);} -RemoteObject _ctxt = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _packagemanager = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); - BA.debugLineNum = 448;BA.debugLine="Public Sub CanRequestPackageInstalls As Boolean"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 449;BA.debugLine="Dim ctxt As JavaObject"; -Debug.JustUpdateDeviceLine(); -_ctxt = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("ctxt", _ctxt); - BA.debugLineNum = 450;BA.debugLine="ctxt.InitializeContext"; -Debug.JustUpdateDeviceLine(); -_ctxt.runVoidMethod ("InitializeContext",__ref.getField(false, "ba")); - BA.debugLineNum = 451;BA.debugLine="Dim PackageManager As JavaObject = ctxt.RunMethod"; -Debug.JustUpdateDeviceLine(); -_packagemanager = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_packagemanager = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), _ctxt.runMethod(false,"RunMethod",(Object)(BA.ObjectToString("getPackageManager")),(Object)((cl_appupdate.__c.getField(false,"Null")))));Debug.locals.put("PackageManager", _packagemanager);Debug.locals.put("PackageManager", _packagemanager); - BA.debugLineNum = 452;BA.debugLine="Return PackageManager.RunMethod(\"canRequestPackag"; -Debug.JustUpdateDeviceLine(); -if (true) return BA.ObjectToBoolean(_packagemanager.runMethod(false,"RunMethod",(Object)(BA.ObjectToString("canRequestPackageInstalls")),(Object)((cl_appupdate.__c.getField(false,"Null"))))); - BA.debugLineNum = 453;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _checknonmarketappsenabled(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("CheckNonMarketAppsEnabled (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,471); -if (RapidSub.canDelegate("checknonmarketappsenabled")) { return __ref.runUserSub(false, "cl_appupdate","checknonmarketappsenabled", __ref);} -RemoteObject _context = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _resolver = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _global = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); - BA.debugLineNum = 471;BA.debugLine="Public Sub CheckNonMarketAppsEnabled As Boolean"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 472;BA.debugLine="If phone.SdkVersion >= 26 Then Return True"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("g",__ref.getField(false,"_phone" /*RemoteObject*/ ).runMethod(true,"getSdkVersion"),BA.numberCast(double.class, 26))) { -if (true) return cl_appupdate.__c.getField(true,"True");}; - BA.debugLineNum = 473;BA.debugLine="If phone.SdkVersion < 17 Or phone.SdkVersion >= 2"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("<",__ref.getField(false,"_phone" /*RemoteObject*/ ).runMethod(true,"getSdkVersion"),BA.numberCast(double.class, 17)) || RemoteObject.solveBoolean("g",__ref.getField(false,"_phone" /*RemoteObject*/ ).runMethod(true,"getSdkVersion"),BA.numberCast(double.class, 21))) { - BA.debugLineNum = 474;BA.debugLine="Return phone.GetSettings(\"install_non_market_app"; -Debug.JustUpdateDeviceLine(); -if (true) return BA.ObjectToBoolean(RemoteObject.solveBoolean("=",__ref.getField(false,"_phone" /*RemoteObject*/ ).runMethod(true,"GetSettings",(Object)(RemoteObject.createImmutable("install_non_market_apps"))),BA.ObjectToString("1"))); - }else { - BA.debugLineNum = 476;BA.debugLine="Dim context As JavaObject"; -Debug.JustUpdateDeviceLine(); -_context = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("context", _context); - BA.debugLineNum = 477;BA.debugLine="context.InitializeContext"; -Debug.JustUpdateDeviceLine(); -_context.runVoidMethod ("InitializeContext",__ref.getField(false, "ba")); - BA.debugLineNum = 478;BA.debugLine="Dim resolver As JavaObject = context.RunMethod(\""; -Debug.JustUpdateDeviceLine(); -_resolver = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_resolver = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), _context.runMethod(false,"RunMethod",(Object)(BA.ObjectToString("getContentResolver")),(Object)((cl_appupdate.__c.getField(false,"Null")))));Debug.locals.put("resolver", _resolver);Debug.locals.put("resolver", _resolver); - BA.debugLineNum = 479;BA.debugLine="Dim global As JavaObject"; -Debug.JustUpdateDeviceLine(); -_global = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("global", _global); - BA.debugLineNum = 480;BA.debugLine="global.InitializeStatic(\"android.provider.Settin"; -Debug.JustUpdateDeviceLine(); -_global.runVoidMethod ("InitializeStatic",(Object)(RemoteObject.createImmutable("android.provider.Settings.Global"))); - BA.debugLineNum = 481;BA.debugLine="Return global.RunMethod(\"getString\", Array(resol"; -Debug.JustUpdateDeviceLine(); -if (true) return BA.ObjectToBoolean(RemoteObject.solveBoolean("=",_global.runMethod(false,"RunMethod",(Object)(BA.ObjectToString("getString")),(Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(_resolver.getObject()),(RemoteObject.createImmutable("install_non_market_apps"))}))),RemoteObject.createImmutable(("1")))); - }; - BA.debugLineNum = 483;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 6;BA.debugLine="Private Sub Class_Globals"; - //BA.debugLineNum = 8;BA.debugLine="Public ERR_NOPKG = -1 As Int 'missing package"; -cl_appupdate._err_nopkg = BA.numberCast(int.class, -(double) (0 + 1));__ref.setField("_err_nopkg",cl_appupdate._err_nopkg); - //BA.debugLineNum = 9;BA.debugLine="Public ERR_NOTXT = -2 As Int 'missing webserve"; -cl_appupdate._err_notxt = BA.numberCast(int.class, -(double) (0 + 2));__ref.setField("_err_notxt",cl_appupdate._err_notxt); - //BA.debugLineNum = 10;BA.debugLine="Public ERR_NOAPK = -3 As Int 'missing webserve"; -cl_appupdate._err_noapk = BA.numberCast(int.class, -(double) (0 + 3));__ref.setField("_err_noapk",cl_appupdate._err_noapk); - //BA.debugLineNum = 11;BA.debugLine="Public ERR_TXTROW = -4 As Int 'wrong row forma"; -cl_appupdate._err_txtrow = BA.numberCast(int.class, -(double) (0 + 4));__ref.setField("_err_txtrow",cl_appupdate._err_txtrow); - //BA.debugLineNum = 12;BA.debugLine="Public ERR_HTML = -5 As Int 'website returned"; -cl_appupdate._err_html = BA.numberCast(int.class, -(double) (0 + 5));__ref.setField("_err_html",cl_appupdate._err_html); - //BA.debugLineNum = 13;BA.debugLine="Public ERR_NOSPACE = -6 As Int 'no enough spac"; -cl_appupdate._err_nospace = BA.numberCast(int.class, -(double) (0 + 6));__ref.setField("_err_nospace",cl_appupdate._err_nospace); - //BA.debugLineNum = 14;BA.debugLine="Public ERR_NOPERM = -7 As Int 'no permissions"; -cl_appupdate._err_noperm = BA.numberCast(int.class, -(double) (0 + 7));__ref.setField("_err_noperm",cl_appupdate._err_noperm); - //BA.debugLineNum = 15;BA.debugLine="Public ERR_DOWNLOAD = -8 As Int 'failed to dow"; -cl_appupdate._err_download = BA.numberCast(int.class, -(double) (0 + 8));__ref.setField("_err_download",cl_appupdate._err_download); - //BA.debugLineNum = 16;BA.debugLine="Public ERR_HTTP = -100 As Int 'HttpUtils error"; -cl_appupdate._err_http = BA.numberCast(int.class, -(double) (0 + 100));__ref.setField("_err_http",cl_appupdate._err_http); - //BA.debugLineNum = 17;BA.debugLine="Public OK_INIT = 0 As Int"; -cl_appupdate._ok_init = BA.numberCast(int.class, 0);__ref.setField("_ok_init",cl_appupdate._ok_init); - //BA.debugLineNum = 18;BA.debugLine="Public OK_CURVER = 1 As Int 'curver has valid"; -cl_appupdate._ok_curver = BA.numberCast(int.class, 1);__ref.setField("_ok_curver",cl_appupdate._ok_curver); - //BA.debugLineNum = 19;BA.debugLine="Public OK_WEBVER = 2 As Int"; -cl_appupdate._ok_webver = BA.numberCast(int.class, 2);__ref.setField("_ok_webver",cl_appupdate._ok_webver); - //BA.debugLineNum = 20;BA.debugLine="Public NO_NEWERAPK = 3 As Int 'apk version on"; -cl_appupdate._no_newerapk = BA.numberCast(int.class, 3);__ref.setField("_no_newerapk",cl_appupdate._no_newerapk); - //BA.debugLineNum = 21;BA.debugLine="Public OK_NEWERAPK = 4 As Int 'current apk has"; -cl_appupdate._ok_newerapk = BA.numberCast(int.class, 4);__ref.setField("_ok_newerapk",cl_appupdate._ok_newerapk); - //BA.debugLineNum = 22;BA.debugLine="Public OK_DOWNLOAD = 5 As Int 'newer apk corre"; -cl_appupdate._ok_download = BA.numberCast(int.class, 5);__ref.setField("_ok_download",cl_appupdate._ok_download); - //BA.debugLineNum = 23;BA.debugLine="Public OK_INSTALL = 6 As Int 'user asked to in"; -cl_appupdate._ok_install = BA.numberCast(int.class, 6);__ref.setField("_ok_install",cl_appupdate._ok_install); - //BA.debugLineNum = 26;BA.debugLine="Private Callback As Object"; -cl_appupdate._callback = RemoteObject.createNew ("Object");__ref.setField("_callback",cl_appupdate._callback); - //BA.debugLineNum = 27;BA.debugLine="Private Event As String"; -cl_appupdate._event = RemoteObject.createImmutable("");__ref.setField("_event",cl_appupdate._event); - //BA.debugLineNum = 28;BA.debugLine="Private sPackageName As String 'ex: com.te"; -cl_appupdate._spackagename = RemoteObject.createImmutable("");__ref.setField("_spackagename",cl_appupdate._spackagename); - //BA.debugLineNum = 29;BA.debugLine="Private sNewVerTxt As String 'ex: http:/"; -cl_appupdate._snewvertxt = RemoteObject.createImmutable("");__ref.setField("_snewvertxt",cl_appupdate._snewvertxt); - //BA.debugLineNum = 30;BA.debugLine="Private sNewVerApk As String 'ex: http:/"; -cl_appupdate._snewverapk = RemoteObject.createImmutable("");__ref.setField("_snewverapk",cl_appupdate._snewverapk); - //BA.debugLineNum = 31;BA.debugLine="Private sStatusCode As Int 'negatives"; -cl_appupdate._sstatuscode = RemoteObject.createImmutable(0);__ref.setField("_sstatuscode",cl_appupdate._sstatuscode); - //BA.debugLineNum = 32;BA.debugLine="Private sUserName As String 'user name"; -cl_appupdate._susername = RemoteObject.createImmutable("");__ref.setField("_susername",cl_appupdate._susername); - //BA.debugLineNum = 33;BA.debugLine="Private sUPassword As String 'password r"; -cl_appupdate._supassword = RemoteObject.createImmutable("");__ref.setField("_supassword",cl_appupdate._supassword); - //BA.debugLineNum = 34;BA.debugLine="Private curver, webver As String 'curver = c"; -cl_appupdate._curver = RemoteObject.createImmutable("");__ref.setField("_curver",cl_appupdate._curver); -cl_appupdate._webver = RemoteObject.createImmutable("");__ref.setField("_webver",cl_appupdate._webver); - //BA.debugLineNum = 35;BA.debugLine="Private webclog As String 'webclog = optional"; -cl_appupdate._webclog = RemoteObject.createImmutable("");__ref.setField("_webclog",cl_appupdate._webclog); - //BA.debugLineNum = 36;BA.debugLine="Private webfsize As String 'webfsize = option"; -cl_appupdate._webfsize = RemoteObject.createImmutable("");__ref.setField("_webfsize",cl_appupdate._webfsize); - //BA.debugLineNum = 37;BA.debugLine="Private sVerbose As Boolean 'TRUE = a lot of"; -cl_appupdate._sverbose = RemoteObject.createImmutable(false);__ref.setField("_sverbose",cl_appupdate._sverbose); - //BA.debugLineNum = 38;BA.debugLine="Private pnlSplash As Panel 'panel used to sup"; -cl_appupdate._pnlsplash = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");__ref.setField("_pnlsplash",cl_appupdate._pnlsplash); - //BA.debugLineNum = 39;BA.debugLine="Private SplashShowing As Boolean 'True = splash"; -cl_appupdate._splashshowing = RemoteObject.createImmutable(false);__ref.setField("_splashshowing",cl_appupdate._splashshowing); - //BA.debugLineNum = 40;BA.debugLine="Private phone As Phone"; -cl_appupdate._phone = RemoteObject.createNew ("anywheresoftware.b4a.phone.Phone");__ref.setField("_phone",cl_appupdate._phone); - //BA.debugLineNum = 41;BA.debugLine="Private rp As RuntimePermissions"; -cl_appupdate._rp = RemoteObject.createNew ("anywheresoftware.b4a.objects.RuntimePermissions");__ref.setField("_rp",cl_appupdate._rp); - //BA.debugLineNum = 42;BA.debugLine="Private SharedFolder As String 'Foder where to"; -cl_appupdate._sharedfolder = RemoteObject.createImmutable("");__ref.setField("_sharedfolder",cl_appupdate._sharedfolder); - //BA.debugLineNum = 43;BA.debugLine="Private UseFileProvider As Boolean 'TRUE = SDK"; -cl_appupdate._usefileprovider = RemoteObject.createImmutable(false);__ref.setField("_usefileprovider",cl_appupdate._usefileprovider); - //BA.debugLineNum = 44;BA.debugLine="Private LogColor1 As Int = 0xFFFF8C00 'first col"; -cl_appupdate._logcolor1 = BA.numberCast(int.class, ((int)0xffff8c00));__ref.setField("_logcolor1",cl_appupdate._logcolor1); - //BA.debugLineNum = 45;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static void _downloadapk(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("DownloadApk (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,158); -if (RapidSub.canDelegate("downloadapk")) { __ref.runUserSub(false, "cl_appupdate","downloadapk", __ref); return;} -ResumableSub_DownloadApk rsub = new ResumableSub_DownloadApk(null,__ref); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_DownloadApk extends BA.ResumableSub { -public ResumableSub_DownloadApk(keymon.lat.medicomed.cl_appupdate parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.cl_appupdate parent; -RemoteObject _j = RemoteObject.declareNull("keymon.lat.medicomed.httpjob"); -RemoteObject _out = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("DownloadApk (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,158); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 159;BA.debugLine="LogColor(\"---- AppUpdating.DownloadApk\", LogColor"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("LogImpl","931260673",BA.ObjectToString("---- AppUpdating.DownloadApk"),__ref.getField(true,"_logcolor1" /*RemoteObject*/ )); - BA.debugLineNum = 161;BA.debugLine="If sNewVerApk = \"\" Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 1: -//if -this.state = 10; -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_snewverapk" /*RemoteObject*/ ),BA.ObjectToString(""))) { -this.state = 3; -}if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 162;BA.debugLine="sStatusCode = ERR_NOAPK"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sstatuscode" /*RemoteObject*/ ,__ref.getField(true,"_err_noapk" /*RemoteObject*/ )); - BA.debugLineNum = 163;BA.debugLine="If sVerbose Then Log($\"${TAB}missing apk file fu"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 4: -//if -this.state = 9; -if (__ref.getField(true,"_sverbose" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 6; -;}if (true) break; - -case 6: -//C -this.state = 9; -parent.__c.runVoidMethod ("LogImpl","931260677",(RemoteObject.concat(RemoteObject.createImmutable(""),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("missing apk file full path indication"))),0); -if (true) break; - -case 9: -//C -this.state = 10; -; - BA.debugLineNum = 164;BA.debugLine="Finito"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.cl_appupdate.class, "_finito" /*RemoteObject*/ ); - BA.debugLineNum = 165;BA.debugLine="Return"; -Debug.JustUpdateDeviceLine(); -if (true) return ; - if (true) break; - -case 10: -//C -this.state = 11; -; - BA.debugLineNum = 168;BA.debugLine="Dim j As HttpJob"; -Debug.JustUpdateDeviceLine(); -_j = RemoteObject.createNew ("keymon.lat.medicomed.httpjob");Debug.locals.put("j", _j); - BA.debugLineNum = 169;BA.debugLine="j.Initialize(\"\", Me)"; -Debug.JustUpdateDeviceLine(); -_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString("")),(Object)(__ref)); - BA.debugLineNum = 170;BA.debugLine="j.Username = sUserName"; -Debug.JustUpdateDeviceLine(); -_j.setField ("_username" /*RemoteObject*/ ,__ref.getField(true,"_susername" /*RemoteObject*/ )); - BA.debugLineNum = 171;BA.debugLine="j.Password = sUPassword"; -Debug.JustUpdateDeviceLine(); -_j.setField ("_password" /*RemoteObject*/ ,__ref.getField(true,"_supassword" /*RemoteObject*/ )); - BA.debugLineNum = 172;BA.debugLine="j.Download(sNewVerApk) 'ex: j.Download(\"htt"; -Debug.JustUpdateDeviceLine(); -_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_download" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_snewverapk" /*RemoteObject*/ ))); - BA.debugLineNum = 173;BA.debugLine="Wait For (j) JobDone(j As HttpJob)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("WaitFor","jobdone", __ref.getField(false, "ba"), anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "cl_appupdate", "downloadapk"), (_j)); -this.state = 29; -return; -case 29: -//C -this.state = 11; -_j = (RemoteObject) result.getArrayElement(false,RemoteObject.createImmutable(1));Debug.locals.put("j", _j); -; - BA.debugLineNum = 174;BA.debugLine="Log($\"Donload ok? ${j.Success}\"$)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("LogImpl","931260688",(RemoteObject.concat(RemoteObject.createImmutable("Donload ok? "),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_j.getField(true,"_success" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 175;BA.debugLine="If j.Success Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 11: -//if -this.state = 28; -if (_j.getField(true,"_success" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 13; -}else { -this.state = 21; -}if (true) break; - -case 13: -//C -this.state = 14; - BA.debugLineNum = 177;BA.debugLine="Dim out As OutputStream"; -Debug.JustUpdateDeviceLine(); -_out = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper");Debug.locals.put("out", _out); - BA.debugLineNum = 178;BA.debugLine="out = File.OpenOutput(SharedFolder,\"tmp.apk\",Fal"; -Debug.JustUpdateDeviceLine(); -_out = parent.__c.getField(false,"File").runMethod(false,"OpenOutput",(Object)(__ref.getField(true,"_sharedfolder" /*RemoteObject*/ )),(Object)(BA.ObjectToString("tmp.apk")),(Object)(parent.__c.getField(true,"False")));Debug.locals.put("out", _out); - BA.debugLineNum = 179;BA.debugLine="File.Copy2(J.GetInputStream, out)"; -Debug.JustUpdateDeviceLine(); -parent.__c.getField(false,"File").runVoidMethod ("Copy2",(Object)((_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_getinputstream" /*RemoteObject*/ ).getObject())),(Object)((_out.getObject()))); - BA.debugLineNum = 180;BA.debugLine="out.Close"; -Debug.JustUpdateDeviceLine(); -_out.runVoidMethod ("Close"); - BA.debugLineNum = 181;BA.debugLine="Log($\"Copy2 (saving) ok? TRUE\"$)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("LogImpl","931260695",(RemoteObject.createImmutable("Copy2 (saving) ok? TRUE")),0); - BA.debugLineNum = 182;BA.debugLine="sStatusCode = OK_DOWNLOAD"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sstatuscode" /*RemoteObject*/ ,__ref.getField(true,"_ok_download" /*RemoteObject*/ )); - BA.debugLineNum = 183;BA.debugLine="If sVerbose Then Log($\"${TAB}new apk version dow"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 14: -//if -this.state = 19; -if (__ref.getField(true,"_sverbose" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 16; -;}if (true) break; - -case 16: -//C -this.state = 19; -parent.__c.runVoidMethod ("LogImpl","931260697",(RemoteObject.concat(RemoteObject.createImmutable(""),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("new apk version downloaded and ready to install"))),0); -if (true) break; - -case 19: -//C -this.state = 28; -; - if (true) break; - -case 21: -//C -this.state = 22; - BA.debugLineNum = 185;BA.debugLine="Log($\"${TAB}Error: ${J.ErrorMessage}\"$)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("LogImpl","931260699",(RemoteObject.concat(RemoteObject.createImmutable(""),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("Error: "),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_j.getField(true,"_errormessage" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 186;BA.debugLine="sStatusCode = ERR_HTTP"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sstatuscode" /*RemoteObject*/ ,__ref.getField(true,"_err_http" /*RemoteObject*/ )); - BA.debugLineNum = 187;BA.debugLine="If sVerbose Then Log($\"${TAB}error in httputils2"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 22: -//if -this.state = 27; -if (__ref.getField(true,"_sverbose" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 24; -;}if (true) break; - -case 24: -//C -this.state = 27; -parent.__c.runVoidMethod ("LogImpl","931260701",(RemoteObject.concat(RemoteObject.createImmutable(""),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("error in httputils2"))),0); -if (true) break; - -case 27: -//C -this.state = 28; -; - BA.debugLineNum = 188;BA.debugLine="ToastMessageShow(\"Error: \" & J.ErrorMessage, Tru"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("Error: "),_j.getField(true,"_errormessage" /*RemoteObject*/ )))),(Object)(parent.__c.getField(true,"True"))); - if (true) break; - -case 28: -//C -this.state = -1; -; - BA.debugLineNum = 190;BA.debugLine="j.Release"; -Debug.JustUpdateDeviceLine(); -_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_release" /*RemoteObject*/ ); - BA.debugLineNum = 191;BA.debugLine="Finito"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.cl_appupdate.class, "_finito" /*RemoteObject*/ ); - BA.debugLineNum = 192;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static void _jobdone(RemoteObject __ref,RemoteObject _j) throws Exception{ -} -public static RemoteObject _extractcl(RemoteObject __ref,RemoteObject _txtrow) throws Exception{ -try { - Debug.PushSubsStack("ExtractCL (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,381); -if (RapidSub.canDelegate("extractcl")) { return __ref.runUserSub(false, "cl_appupdate","extractcl", __ref, _txtrow);} -RemoteObject _i = RemoteObject.createImmutable(0); -RemoteObject _j1 = RemoteObject.createImmutable(0); -RemoteObject _j2 = RemoteObject.createImmutable(0); -Debug.locals.put("TxtRow", _txtrow); - BA.debugLineNum = 381;BA.debugLine="Private Sub ExtractCL(TxtRow As String) As String"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 382;BA.debugLine="Dim i As Int"; -Debug.JustUpdateDeviceLine(); -_i = RemoteObject.createImmutable(0);Debug.locals.put("i", _i); - BA.debugLineNum = 383;BA.debugLine="i = TxtRow.IndexOf(\"\")"; -Debug.JustUpdateDeviceLine(); -_i = _txtrow.runMethod(true,"indexOf",(Object)(RemoteObject.createImmutable("")));Debug.locals.put("i", _i); - BA.debugLineNum = 384;BA.debugLine="If i <> -1 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("!",_i,BA.numberCast(double.class, -(double) (0 + 1)))) { - BA.debugLineNum = 385;BA.debugLine="Dim j1 As Int = TxtRow.IndexOf(\"\")"; -Debug.JustUpdateDeviceLine(); -_j1 = _txtrow.runMethod(true,"indexOf",(Object)(RemoteObject.createImmutable("")));Debug.locals.put("j1", _j1);Debug.locals.put("j1", _j1); - BA.debugLineNum = 386;BA.debugLine="If j1 = -1 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_j1,BA.numberCast(double.class, -(double) (0 + 1)))) { - BA.debugLineNum = 387;BA.debugLine="Dim j2 As Int = TxtRow.IndexOf(\"\") 'l"; -Debug.JustUpdateDeviceLine(); -_j2 = _txtrow.runMethod(true,"indexOf",(Object)(RemoteObject.createImmutable("")));Debug.locals.put("j2", _j2);Debug.locals.put("j2", _j2); - BA.debugLineNum = 388;BA.debugLine="j1 = j2"; -Debug.JustUpdateDeviceLine(); -_j1 = _j2;Debug.locals.put("j1", _j1); - BA.debugLineNum = 389;BA.debugLine="If j1 < i Then j1 = -1"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("<",_j1,BA.numberCast(double.class, _i))) { -_j1 = BA.numberCast(int.class, -(double) (0 + 1));Debug.locals.put("j1", _j1);}; - }; - BA.debugLineNum = 391;BA.debugLine="If j1 <> -1 Then Return TxtRow.SubString2(i+11,j"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("!",_j1,BA.numberCast(double.class, -(double) (0 + 1)))) { -if (true) return _txtrow.runMethod(true,"substring",(Object)(RemoteObject.solve(new RemoteObject[] {_i,RemoteObject.createImmutable(11)}, "+",1, 1)),(Object)(_j1));} -else { -if (true) return _txtrow.runMethod(true,"substring",(Object)(RemoteObject.solve(new RemoteObject[] {_i,RemoteObject.createImmutable(11)}, "+",1, 1)));}; - }else { - BA.debugLineNum = 393;BA.debugLine="Return \"\""; -Debug.JustUpdateDeviceLine(); -if (true) return BA.ObjectToString(""); - }; - BA.debugLineNum = 395;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _extractsz(RemoteObject __ref,RemoteObject _txtrow) throws Exception{ -try { - Debug.PushSubsStack("ExtractSZ (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,399); -if (RapidSub.canDelegate("extractsz")) { return __ref.runUserSub(false, "cl_appupdate","extractsz", __ref, _txtrow);} -RemoteObject _i = RemoteObject.createImmutable(0); -RemoteObject _j1 = RemoteObject.createImmutable(0); -RemoteObject _j2 = RemoteObject.createImmutable(0); -RemoteObject _s = RemoteObject.createImmutable(""); -Debug.locals.put("TxtRow", _txtrow); - BA.debugLineNum = 399;BA.debugLine="Private Sub ExtractSZ(TxtRow As String) As String"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 400;BA.debugLine="Dim i As Int"; -Debug.JustUpdateDeviceLine(); -_i = RemoteObject.createImmutable(0);Debug.locals.put("i", _i); - BA.debugLineNum = 401;BA.debugLine="i = TxtRow.IndexOf(\"\")"; -Debug.JustUpdateDeviceLine(); -_i = _txtrow.runMethod(true,"indexOf",(Object)(RemoteObject.createImmutable("")));Debug.locals.put("i", _i); - BA.debugLineNum = 402;BA.debugLine="If i <> -1 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("!",_i,BA.numberCast(double.class, -(double) (0 + 1)))) { - BA.debugLineNum = 403;BA.debugLine="Dim j1 As Int = TxtRow.IndexOf(\"\") '"; -Debug.JustUpdateDeviceLine(); -_j1 = _txtrow.runMethod(true,"indexOf",(Object)(RemoteObject.createImmutable("")));Debug.locals.put("j1", _j1);Debug.locals.put("j1", _j1); - BA.debugLineNum = 404;BA.debugLine="If j1 = -1 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_j1,BA.numberCast(double.class, -(double) (0 + 1)))) { - BA.debugLineNum = 405;BA.debugLine="Dim j2 As Int = TxtRow.IndexOf(\"\") '"; -Debug.JustUpdateDeviceLine(); -_j2 = _txtrow.runMethod(true,"indexOf",(Object)(RemoteObject.createImmutable("")));Debug.locals.put("j2", _j2);Debug.locals.put("j2", _j2); - BA.debugLineNum = 406;BA.debugLine="j1 = j2"; -Debug.JustUpdateDeviceLine(); -_j1 = _j2;Debug.locals.put("j1", _j1); - BA.debugLineNum = 407;BA.debugLine="If j1 < i Then j1 = -1"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("<",_j1,BA.numberCast(double.class, _i))) { -_j1 = BA.numberCast(int.class, -(double) (0 + 1));Debug.locals.put("j1", _j1);}; - }; - BA.debugLineNum = 409;BA.debugLine="Dim s As String"; -Debug.JustUpdateDeviceLine(); -_s = RemoteObject.createImmutable("");Debug.locals.put("s", _s); - BA.debugLineNum = 410;BA.debugLine="If j1 <> -1 Then s = TxtRow.SubString2(i+10,j1)"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("!",_j1,BA.numberCast(double.class, -(double) (0 + 1)))) { -_s = _txtrow.runMethod(true,"substring",(Object)(RemoteObject.solve(new RemoteObject[] {_i,RemoteObject.createImmutable(10)}, "+",1, 1)),(Object)(_j1));Debug.locals.put("s", _s);} -else { -_s = _txtrow.runMethod(true,"substring",(Object)(RemoteObject.solve(new RemoteObject[] {_i,RemoteObject.createImmutable(10)}, "+",1, 1)));Debug.locals.put("s", _s);}; - BA.debugLineNum = 411;BA.debugLine="s = s.Replace(CRLF,\"\")"; -Debug.JustUpdateDeviceLine(); -_s = _s.runMethod(true,"replace",(Object)(cl_appupdate.__c.getField(true,"CRLF")),(Object)(RemoteObject.createImmutable("")));Debug.locals.put("s", _s); - BA.debugLineNum = 412;BA.debugLine="s=s.Replace(Chr(13),\"\")"; -Debug.JustUpdateDeviceLine(); -_s = _s.runMethod(true,"replace",(Object)(BA.ObjectToString(cl_appupdate.__c.runMethod(true,"Chr",(Object)(BA.numberCast(int.class, 13))))),(Object)(RemoteObject.createImmutable("")));Debug.locals.put("s", _s); - BA.debugLineNum = 413;BA.debugLine="Return s"; -Debug.JustUpdateDeviceLine(); -if (true) return _s; - }else { - BA.debugLineNum = 415;BA.debugLine="Return \"\""; -Debug.JustUpdateDeviceLine(); -if (true) return BA.ObjectToString(""); - }; - BA.debugLineNum = 417;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _extractvn(RemoteObject __ref,RemoteObject _txtrow) throws Exception{ -try { - Debug.PushSubsStack("ExtractVN (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,360); -if (RapidSub.canDelegate("extractvn")) { return __ref.runUserSub(false, "cl_appupdate","extractvn", __ref, _txtrow);} -RemoteObject _i = RemoteObject.createImmutable(0); -RemoteObject _j1 = RemoteObject.createImmutable(0); -RemoteObject _j2 = RemoteObject.createImmutable(0); -RemoteObject _j = RemoteObject.createImmutable(0); -RemoteObject _s = RemoteObject.createImmutable(""); -Debug.locals.put("TxtRow", _txtrow); - BA.debugLineNum = 360;BA.debugLine="Private Sub ExtractVN(TxtRow As String) As String"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 361;BA.debugLine="Dim i As Int"; -Debug.JustUpdateDeviceLine(); -_i = RemoteObject.createImmutable(0);Debug.locals.put("i", _i); - BA.debugLineNum = 362;BA.debugLine="i = TxtRow.IndexOf(\"=\")"; -Debug.JustUpdateDeviceLine(); -_i = _txtrow.runMethod(true,"indexOf",(Object)(RemoteObject.createImmutable("=")));Debug.locals.put("i", _i); - BA.debugLineNum = 363;BA.debugLine="If i <> -1 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("!",_i,BA.numberCast(double.class, -(double) (0 + 1)))) { - BA.debugLineNum = 364;BA.debugLine="Dim j1 As Int = TxtRow.IndexOf(\"\") 'l"; -Debug.JustUpdateDeviceLine(); -_j1 = _txtrow.runMethod(true,"indexOf",(Object)(RemoteObject.createImmutable("")));Debug.locals.put("j1", _j1);Debug.locals.put("j1", _j1); - BA.debugLineNum = 365;BA.debugLine="Dim j2 As Int = TxtRow.IndexOf(\"\") 'lo"; -Debug.JustUpdateDeviceLine(); -_j2 = _txtrow.runMethod(true,"indexOf",(Object)(RemoteObject.createImmutable("")));Debug.locals.put("j2", _j2);Debug.locals.put("j2", _j2); - BA.debugLineNum = 366;BA.debugLine="Dim j As Int = Min(j1, j2)"; -Debug.JustUpdateDeviceLine(); -_j = BA.numberCast(int.class, cl_appupdate.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, _j1)),(Object)(BA.numberCast(double.class, _j2))));Debug.locals.put("j", _j);Debug.locals.put("j", _j); - BA.debugLineNum = 367;BA.debugLine="If j = -1 Then j = Max(j1,j2)"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_j,BA.numberCast(double.class, -(double) (0 + 1)))) { -_j = BA.numberCast(int.class, cl_appupdate.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, _j1)),(Object)(BA.numberCast(double.class, _j2))));Debug.locals.put("j", _j);}; - BA.debugLineNum = 368;BA.debugLine="Dim s As String"; -Debug.JustUpdateDeviceLine(); -_s = RemoteObject.createImmutable("");Debug.locals.put("s", _s); - BA.debugLineNum = 369;BA.debugLine="If j <> - 1 Then s=TxtRow.SubString2(i+1,j) Else"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("!",_j,BA.numberCast(double.class, -(double) (0 + 1)))) { -_s = _txtrow.runMethod(true,"substring",(Object)(RemoteObject.solve(new RemoteObject[] {_i,RemoteObject.createImmutable(1)}, "+",1, 1)),(Object)(_j));Debug.locals.put("s", _s);} -else { -_s = _txtrow.runMethod(true,"substring",(Object)(RemoteObject.solve(new RemoteObject[] {_i,RemoteObject.createImmutable(1)}, "+",1, 1)));Debug.locals.put("s", _s);}; - BA.debugLineNum = 370;BA.debugLine="s=s.Replace(CRLF,\"\")"; -Debug.JustUpdateDeviceLine(); -_s = _s.runMethod(true,"replace",(Object)(cl_appupdate.__c.getField(true,"CRLF")),(Object)(RemoteObject.createImmutable("")));Debug.locals.put("s", _s); - BA.debugLineNum = 371;BA.debugLine="s=s.Replace(Chr(13),\"\")"; -Debug.JustUpdateDeviceLine(); -_s = _s.runMethod(true,"replace",(Object)(BA.ObjectToString(cl_appupdate.__c.runMethod(true,"Chr",(Object)(BA.numberCast(int.class, 13))))),(Object)(RemoteObject.createImmutable("")));Debug.locals.put("s", _s); - BA.debugLineNum = 372;BA.debugLine="Return s"; -Debug.JustUpdateDeviceLine(); -if (true) return _s; - }else { - BA.debugLineNum = 374;BA.debugLine="Return \"\""; -Debug.JustUpdateDeviceLine(); -if (true) return BA.ObjectToString(""); - }; - BA.debugLineNum = 376;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _finito(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Finito (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,290); -if (RapidSub.canDelegate("finito")) { return __ref.runUserSub(false, "cl_appupdate","finito", __ref);} - BA.debugLineNum = 290;BA.debugLine="Private Sub Finito"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 291;BA.debugLine="If SubExists(Callback,Event&\"_UpdateComplete\") Th"; -Debug.JustUpdateDeviceLine(); -if (cl_appupdate.__c.runMethod(true,"SubExists",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_callback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_event" /*RemoteObject*/ ),RemoteObject.createImmutable("_UpdateComplete")))).get().booleanValue()) { - BA.debugLineNum = 292;BA.debugLine="CallSub(Callback,Event&\"_UpdateComplete\")"; -Debug.JustUpdateDeviceLine(); -cl_appupdate.__c.runMethodAndSync(false,"CallSubNew",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_callback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_event" /*RemoteObject*/ ),RemoteObject.createImmutable("_UpdateComplete")))); - }; - BA.debugLineNum = 294;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getavailablespace(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetAvailableSpace (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,137); -if (RapidSub.canDelegate("getavailablespace")) { return __ref.runUserSub(false, "cl_appupdate","getavailablespace", __ref);} - BA.debugLineNum = 137;BA.debugLine="Public Sub GetAvailableSpace As Long"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 138;BA.debugLine="Return GetFreeSpace"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.runClassMethod (keymon.lat.medicomed.cl_appupdate.class, "_getfreespace" /*RemoteObject*/ ); - BA.debugLineNum = 139;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0L); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getcurvn(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getCurVN (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,114); -if (RapidSub.canDelegate("getcurvn")) { return __ref.runUserSub(false, "cl_appupdate","getcurvn", __ref);} - BA.debugLineNum = 114;BA.debugLine="Public Sub getCurVN As String"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 115;BA.debugLine="Return curver"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_curver" /*RemoteObject*/ ); - BA.debugLineNum = 116;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getfileuri(RemoteObject __ref,RemoteObject _filename) throws Exception{ -try { - Debug.PushSubsStack("GetFileUri (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,503); -if (RapidSub.canDelegate("getfileuri")) { return __ref.runUserSub(false, "cl_appupdate","getfileuri", __ref, _filename);} -RemoteObject _uri = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _f = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _fp = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _context = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -Debug.locals.put("FileName", _filename); - BA.debugLineNum = 503;BA.debugLine="Private Sub GetFileUri (FileName As String) As Obj"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 504;BA.debugLine="If UseFileProvider = False Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_usefileprovider" /*RemoteObject*/ ),cl_appupdate.__c.getField(true,"False"))) { - BA.debugLineNum = 505;BA.debugLine="Dim uri As JavaObject"; -Debug.JustUpdateDeviceLine(); -_uri = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("uri", _uri); - BA.debugLineNum = 506;BA.debugLine="Return uri.InitializeStatic(\"android.net.Uri\").R"; -Debug.JustUpdateDeviceLine(); -if (true) return _uri.runMethod(false,"InitializeStatic",(Object)(RemoteObject.createImmutable("android.net.Uri"))).runMethod(false,"RunMethod",(Object)(BA.ObjectToString("parse")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(RemoteObject.concat(RemoteObject.createImmutable("file://"),cl_appupdate.__c.getField(false,"File").runMethod(true,"Combine",(Object)(__ref.getField(true,"_sharedfolder" /*RemoteObject*/ )),(Object)(_filename))))}))); - }else { - BA.debugLineNum = 508;BA.debugLine="Dim f As JavaObject"; -Debug.JustUpdateDeviceLine(); -_f = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("f", _f); - BA.debugLineNum = 509;BA.debugLine="f.InitializeNewInstance(\"java.io.File\", Array(Sh"; -Debug.JustUpdateDeviceLine(); -_f.runVoidMethod ("InitializeNewInstance",(Object)(BA.ObjectToString("java.io.File")),(Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(true,"_sharedfolder" /*RemoteObject*/ )),(_filename)}))); - BA.debugLineNum = 510;BA.debugLine="Dim fp As JavaObject"; -Debug.JustUpdateDeviceLine(); -_fp = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("fp", _fp); - BA.debugLineNum = 511;BA.debugLine="Dim context As JavaObject"; -Debug.JustUpdateDeviceLine(); -_context = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("context", _context); - BA.debugLineNum = 512;BA.debugLine="context.InitializeContext"; -Debug.JustUpdateDeviceLine(); -_context.runVoidMethod ("InitializeContext",__ref.getField(false, "ba")); - BA.debugLineNum = 513;BA.debugLine="fp.InitializeStatic(\"android.support.v4.content."; -Debug.JustUpdateDeviceLine(); -_fp.runVoidMethod ("InitializeStatic",(Object)(RemoteObject.createImmutable("androidx.core.content.FileProvider"))); - BA.debugLineNum = 514;BA.debugLine="Return fp.RunMethod(\"getUriForFile\", Array(conte"; -Debug.JustUpdateDeviceLine(); -if (true) return _fp.runMethod(false,"RunMethod",(Object)(BA.ObjectToString("getUriForFile")),(Object)(RemoteObject.createNewArray("Object",new int[] {3},new Object[] {(_context.getObject()),(RemoteObject.concat(cl_appupdate.__c.getField(false,"Application").runMethod(true,"getPackageName"),RemoteObject.createImmutable(".provider"))),(_f.getObject())}))); - }; - BA.debugLineNum = 516;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getfreespace(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetFreeSpace (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,421); -if (RapidSub.canDelegate("getfreespace")) { return __ref.runUserSub(false, "cl_appupdate","getfreespace", __ref);} -RemoteObject _jo = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); - BA.debugLineNum = 421;BA.debugLine="Private Sub GetFreeSpace As Long"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 422;BA.debugLine="Dim jo As JavaObject"; -Debug.JustUpdateDeviceLine(); -_jo = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("jo", _jo); - BA.debugLineNum = 423;BA.debugLine="jo.InitializeNewInstance(\"java.io.File\", Array(Sh"; -Debug.JustUpdateDeviceLine(); -_jo.runVoidMethod ("InitializeNewInstance",(Object)(BA.ObjectToString("java.io.File")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.getField(true,"_sharedfolder" /*RemoteObject*/ ))}))); - BA.debugLineNum = 424;BA.debugLine="Return jo.RunMethod(\"getFreeSpace\", Null)"; -Debug.JustUpdateDeviceLine(); -if (true) return BA.numberCast(long.class, _jo.runMethod(false,"RunMethod",(Object)(BA.ObjectToString("getFreeSpace")),(Object)((cl_appupdate.__c.getField(false,"Null"))))); - BA.debugLineNum = 425;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0L); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getnmappinst(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetNMAppInst (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,435); -if (RapidSub.canDelegate("getnmappinst")) { return __ref.runUserSub(false, "cl_appupdate","getnmappinst", __ref);} -RemoteObject _jo = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _context = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _resolver = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); - BA.debugLineNum = 435;BA.debugLine="Private Sub GetNMAppInst As String"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 436;BA.debugLine="Dim jo As JavaObject"; -Debug.JustUpdateDeviceLine(); -_jo = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("jo", _jo); - BA.debugLineNum = 437;BA.debugLine="jo.InitializeStatic(\"android.provider.Settings.Se"; -Debug.JustUpdateDeviceLine(); -_jo.runVoidMethod ("InitializeStatic",(Object)(RemoteObject.createImmutable("android.provider.Settings.Secure"))); - BA.debugLineNum = 438;BA.debugLine="Dim context As JavaObject"; -Debug.JustUpdateDeviceLine(); -_context = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("context", _context); - BA.debugLineNum = 439;BA.debugLine="context.InitializeContext"; -Debug.JustUpdateDeviceLine(); -_context.runVoidMethod ("InitializeContext",__ref.getField(false, "ba")); - BA.debugLineNum = 440;BA.debugLine="Dim resolver As JavaObject = context.RunMethod(\"g"; -Debug.JustUpdateDeviceLine(); -_resolver = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_resolver = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), _context.runMethod(false,"RunMethod",(Object)(BA.ObjectToString("getContentResolver")),(Object)((cl_appupdate.__c.getField(false,"Null")))));Debug.locals.put("resolver", _resolver);Debug.locals.put("resolver", _resolver); - BA.debugLineNum = 441;BA.debugLine="Return jo.RunMethod(\"getString\", Array(resolver,"; -Debug.JustUpdateDeviceLine(); -if (true) return BA.ObjectToString(_jo.runMethod(false,"RunMethod",(Object)(BA.ObjectToString("getString")),(Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(_resolver.getObject()),(RemoteObject.createImmutable("install_non_market_apps"))})))); - BA.debugLineNum = 442;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getpackagename(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getPackageName (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,79); -if (RapidSub.canDelegate("getpackagename")) { return __ref.runUserSub(false, "cl_appupdate","getpackagename", __ref);} - BA.debugLineNum = 79;BA.debugLine="Public Sub getPackageName As String"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 80;BA.debugLine="Return sPackageName"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_spackagename" /*RemoteObject*/ ); - BA.debugLineNum = 81;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getsdkversion(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetSDKVersion (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,428); -if (RapidSub.canDelegate("getsdkversion")) { return __ref.runUserSub(false, "cl_appupdate","getsdkversion", __ref);} -RemoteObject _jo = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); - BA.debugLineNum = 428;BA.debugLine="Private Sub GetSDKVersion As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 429;BA.debugLine="Dim jo As JavaObject"; -Debug.JustUpdateDeviceLine(); -_jo = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("jo", _jo); - BA.debugLineNum = 430;BA.debugLine="jo.InitializeStatic(\"android.os.Build.VERSION\")"; -Debug.JustUpdateDeviceLine(); -_jo.runVoidMethod ("InitializeStatic",(Object)(RemoteObject.createImmutable("android.os.Build.VERSION"))); - BA.debugLineNum = 431;BA.debugLine="Return jo.GetField(\"SDK_INT\")"; -Debug.JustUpdateDeviceLine(); -if (true) return BA.numberCast(int.class, _jo.runMethod(false,"GetField",(Object)(RemoteObject.createImmutable("SDK_INT")))); - BA.debugLineNum = 432;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getstatus(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getStatus (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,108); -if (RapidSub.canDelegate("getstatus")) { return __ref.runUserSub(false, "cl_appupdate","getstatus", __ref);} - BA.debugLineNum = 108;BA.debugLine="Public Sub getStatus As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 109;BA.debugLine="Return sStatusCode"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_sstatuscode" /*RemoteObject*/ ); - BA.debugLineNum = 110;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getwebchangelog(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getWebChangeLog (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,126); -if (RapidSub.canDelegate("getwebchangelog")) { return __ref.runUserSub(false, "cl_appupdate","getwebchangelog", __ref);} - BA.debugLineNum = 126;BA.debugLine="Public Sub getWebChangeLog As String"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 127;BA.debugLine="Return webclog"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_webclog" /*RemoteObject*/ ); - BA.debugLineNum = 128;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getwebfilesize(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getWebFileSize (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,132); -if (RapidSub.canDelegate("getwebfilesize")) { return __ref.runUserSub(false, "cl_appupdate","getwebfilesize", __ref);} - BA.debugLineNum = 132;BA.debugLine="Public Sub getWebFileSize As String"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 133;BA.debugLine="Return webfsize"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_webfsize" /*RemoteObject*/ ); - BA.debugLineNum = 134;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getwebvn(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getWebVN (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,120); -if (RapidSub.canDelegate("getwebvn")) { return __ref.runUserSub(false, "cl_appupdate","getwebvn", __ref);} - BA.debugLineNum = 120;BA.debugLine="Public Sub getWebVN As String"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 121;BA.debugLine="Return webver"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_webver" /*RemoteObject*/ ); - BA.debugLineNum = 122;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _callbackmodule,RemoteObject _eventname) throws Exception{ -try { - Debug.PushSubsStack("Initialize (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,48); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "cl_appupdate","initialize", __ref, _ba, _callbackmodule, _eventname);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.phone.Phone"); -Debug.locals.put("ba", _ba); -Debug.locals.put("CallbackModule", _callbackmodule); -Debug.locals.put("EventName", _eventname); - BA.debugLineNum = 48;BA.debugLine="Public Sub Initialize(CallbackModule As Object, Ev"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 49;BA.debugLine="Callback = CallbackModule"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_callback" /*RemoteObject*/ ,_callbackmodule); - BA.debugLineNum = 50;BA.debugLine="Event = EventName"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_event" /*RemoteObject*/ ,_eventname); - BA.debugLineNum = 51;BA.debugLine="sPackageName = \"\""; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_spackagename" /*RemoteObject*/ ,BA.ObjectToString("")); - BA.debugLineNum = 52;BA.debugLine="sNewVerTxt = \"\""; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_snewvertxt" /*RemoteObject*/ ,BA.ObjectToString("")); - BA.debugLineNum = 53;BA.debugLine="sNewVerApk = \"\""; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_snewverapk" /*RemoteObject*/ ,BA.ObjectToString("")); - BA.debugLineNum = 54;BA.debugLine="sUserName = \"\""; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_susername" /*RemoteObject*/ ,BA.ObjectToString("")); - BA.debugLineNum = 55;BA.debugLine="sUPassword = \"\""; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_supassword" /*RemoteObject*/ ,BA.ObjectToString("")); - BA.debugLineNum = 56;BA.debugLine="sStatusCode = OK_INIT"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sstatuscode" /*RemoteObject*/ ,__ref.getField(true,"_ok_init" /*RemoteObject*/ )); - BA.debugLineNum = 57;BA.debugLine="curver = \"\""; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_curver" /*RemoteObject*/ ,BA.ObjectToString("")); - BA.debugLineNum = 58;BA.debugLine="webver = \"\""; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_webver" /*RemoteObject*/ ,BA.ObjectToString("")); - BA.debugLineNum = 59;BA.debugLine="sVerbose = False"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sverbose" /*RemoteObject*/ ,cl_appupdate.__c.getField(true,"False")); - BA.debugLineNum = 60;BA.debugLine="Dim p As Phone"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.phone.Phone");Debug.locals.put("p", _p); - BA.debugLineNum = 61;BA.debugLine="If p.SdkVersion >= 24 Or File.ExternalWritable ="; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("g",_p.runMethod(true,"getSdkVersion"),BA.numberCast(double.class, 24)) || RemoteObject.solveBoolean("=",cl_appupdate.__c.getField(false,"File").runMethod(true,"getExternalWritable"),cl_appupdate.__c.getField(true,"False"))) { - BA.debugLineNum = 62;BA.debugLine="UseFileProvider = True"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_usefileprovider" /*RemoteObject*/ ,cl_appupdate.__c.getField(true,"True")); - BA.debugLineNum = 63;BA.debugLine="SharedFolder = File.Combine(File.DirInternal, \"s"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sharedfolder" /*RemoteObject*/ ,cl_appupdate.__c.getField(false,"File").runMethod(true,"Combine",(Object)(cl_appupdate.__c.getField(false,"File").runMethod(true,"getDirInternal")),(Object)(RemoteObject.createImmutable("shared")))); - BA.debugLineNum = 64;BA.debugLine="File.MakeDir(\"\", SharedFolder)"; -Debug.JustUpdateDeviceLine(); -cl_appupdate.__c.getField(false,"File").runVoidMethod ("MakeDir",(Object)(BA.ObjectToString("")),(Object)(__ref.getField(true,"_sharedfolder" /*RemoteObject*/ ))); - }else { - BA.debugLineNum = 66;BA.debugLine="UseFileProvider = False"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_usefileprovider" /*RemoteObject*/ ,cl_appupdate.__c.getField(true,"False")); - BA.debugLineNum = 67;BA.debugLine="SharedFolder = rp.GetSafeDirDefaultExternal(\"sha"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sharedfolder" /*RemoteObject*/ ,__ref.getField(false,"_rp" /*RemoteObject*/ ).runMethod(true,"GetSafeDirDefaultExternal",(Object)(RemoteObject.createImmutable("shared")))); - }; - BA.debugLineNum = 69;BA.debugLine="Log($\"SDK#: ${p.SdkVersion} - UseFP: ${UseFilePro"; -Debug.JustUpdateDeviceLine(); -cl_appupdate.__c.runVoidMethod ("LogImpl","930277653",(RemoteObject.concat(RemoteObject.createImmutable("SDK#: "),cl_appupdate.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_p.runMethod(true,"getSdkVersion")))),RemoteObject.createImmutable(" - UseFP: "),cl_appupdate.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_usefileprovider" /*RemoteObject*/ )))),RemoteObject.createImmutable(" - SharedFolder: "),cl_appupdate.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_sharedfolder" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 70;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _installapk(RemoteObject __ref,RemoteObject _pstatus) throws Exception{ -try { - Debug.PushSubsStack("InstallApk (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,195); -if (RapidSub.canDelegate("installapk")) { return __ref.runUserSub(false, "cl_appupdate","installapk", __ref, _pstatus);} -Debug.locals.put("pstatus", _pstatus); - BA.debugLineNum = 195;BA.debugLine="Public Sub InstallApk(pstatus As Boolean)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 196;BA.debugLine="LogColor(\"---- AppUpdating.InstallApk\", LogColor1"; -Debug.JustUpdateDeviceLine(); -cl_appupdate.__c.runVoidMethod ("LogImpl","931326209",BA.ObjectToString("---- AppUpdating.InstallApk"),__ref.getField(true,"_logcolor1" /*RemoteObject*/ )); - BA.debugLineNum = 197;BA.debugLine="If pstatus Then"; -Debug.JustUpdateDeviceLine(); -if (_pstatus.get().booleanValue()) { - BA.debugLineNum = 198;BA.debugLine="SendInstallIntent"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.cl_appupdate.class, "_sendinstallintent" /*RemoteObject*/ ); - BA.debugLineNum = 199;BA.debugLine="sStatusCode = OK_INSTALL"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sstatuscode" /*RemoteObject*/ ,__ref.getField(true,"_ok_install" /*RemoteObject*/ )); - BA.debugLineNum = 200;BA.debugLine="If sVerbose Then Log(TAB & \"user asked to instal"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_sverbose" /*RemoteObject*/ ).get().booleanValue()) { -cl_appupdate.__c.runVoidMethod ("LogImpl","931326213",RemoteObject.concat(cl_appupdate.__c.getField(true,"TAB"),RemoteObject.createImmutable("user asked to install new apk")),0);}; - }else { - BA.debugLineNum = 202;BA.debugLine="sStatusCode = ERR_NOPERM"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sstatuscode" /*RemoteObject*/ ,__ref.getField(true,"_err_noperm" /*RemoteObject*/ )); - BA.debugLineNum = 203;BA.debugLine="If sVerbose Then Log(TAB & \"no permissions from"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_sverbose" /*RemoteObject*/ ).get().booleanValue()) { -cl_appupdate.__c.runVoidMethod ("LogImpl","931326216",RemoteObject.concat(cl_appupdate.__c.getField(true,"TAB"),RemoteObject.createImmutable("no permissions from user to install new apk")),0);}; - }; - BA.debugLineNum = 205;BA.debugLine="Finito"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.cl_appupdate.class, "_finito" /*RemoteObject*/ ); - BA.debugLineNum = 206;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _isvalidcv(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("IsValidCV (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,297); -if (RapidSub.canDelegate("isvalidcv")) { return __ref.runUserSub(false, "cl_appupdate","isvalidcv", __ref);} -RemoteObject _pm = RemoteObject.declareNull("anywheresoftware.b4a.phone.PackageManagerWrapper"); - BA.debugLineNum = 297;BA.debugLine="Private Sub IsValidCV As Boolean"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 298;BA.debugLine="If sPackageName = \"\" Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_spackagename" /*RemoteObject*/ ),BA.ObjectToString(""))) { - BA.debugLineNum = 299;BA.debugLine="curver = \"\""; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_curver" /*RemoteObject*/ ,BA.ObjectToString("")); - BA.debugLineNum = 300;BA.debugLine="sStatusCode = ERR_NOPKG"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sstatuscode" /*RemoteObject*/ ,__ref.getField(true,"_err_nopkg" /*RemoteObject*/ )); - BA.debugLineNum = 301;BA.debugLine="If sVerbose Then Log($\"${TAB}missing package nam"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_sverbose" /*RemoteObject*/ ).get().booleanValue()) { -cl_appupdate.__c.runVoidMethod ("LogImpl","931588356",(RemoteObject.concat(RemoteObject.createImmutable(""),cl_appupdate.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((cl_appupdate.__c.getField(true,"TAB")))),RemoteObject.createImmutable("missing package name for current version check"))),0);}; - }else { - BA.debugLineNum = 303;BA.debugLine="Dim pm As PackageManager"; -Debug.JustUpdateDeviceLine(); -_pm = RemoteObject.createNew ("anywheresoftware.b4a.phone.PackageManagerWrapper");Debug.locals.put("pm", _pm); - BA.debugLineNum = 304;BA.debugLine="curver = pm.GetVersionName(sPackageName)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_curver" /*RemoteObject*/ ,_pm.runMethod(true,"GetVersionName",(Object)(__ref.getField(true,"_spackagename" /*RemoteObject*/ )))); - BA.debugLineNum = 305;BA.debugLine="sStatusCode = OK_CURVER 'got current ve"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sstatuscode" /*RemoteObject*/ ,__ref.getField(true,"_ok_curver" /*RemoteObject*/ )); - BA.debugLineNum = 306;BA.debugLine="If sVerbose Then Log($\"${TAB}Current Version: ${"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_sverbose" /*RemoteObject*/ ).get().booleanValue()) { -cl_appupdate.__c.runVoidMethod ("LogImpl","931588361",(RemoteObject.concat(RemoteObject.createImmutable(""),cl_appupdate.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((cl_appupdate.__c.getField(true,"TAB")))),RemoteObject.createImmutable("Current Version: "),cl_appupdate.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_curver" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))),0);}; - }; - BA.debugLineNum = 308;BA.debugLine="Return (sStatusCode == OK_CURVER)"; -Debug.JustUpdateDeviceLine(); -if (true) return BA.ObjectToBoolean((RemoteObject.solveBoolean("=",__ref.getField(true,"_sstatuscode" /*RemoteObject*/ ),BA.numberCast(double.class, __ref.getField(true,"_ok_curver" /*RemoteObject*/ ))))); - BA.debugLineNum = 309;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _isvalidwv(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("IsvalidWV (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,312); -if (RapidSub.canDelegate("isvalidwv")) { return __ref.runUserSub(false, "cl_appupdate","isvalidwv", __ref);} -ResumableSub_IsvalidWV rsub = new ResumableSub_IsvalidWV(null,__ref); -rsub.remoteResumableSub = anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSubForFilter(); -rsub.resume(null, null); -return RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.keywords.Common.ResumableSubWrapper"), rsub.remoteResumableSub); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_IsvalidWV extends BA.ResumableSub { -public ResumableSub_IsvalidWV(keymon.lat.medicomed.cl_appupdate parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.cl_appupdate parent; -RemoteObject _j = RemoteObject.declareNull("keymon.lat.medicomed.httpjob"); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("IsvalidWV (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,312); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -{ -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,RemoteObject.createImmutable(null));return;} -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 313;BA.debugLine="Log(\"IsValidComplete start\")"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("LogImpl","931653889",RemoteObject.createImmutable("IsValidComplete start"),0); - BA.debugLineNum = 314;BA.debugLine="If sNewVerTxt = \"\" Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 1: -//if -this.state = 60; -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_snewvertxt" /*RemoteObject*/ ),BA.ObjectToString(""))) { -this.state = 3; -}else { -this.state = 11; -}if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 315;BA.debugLine="webver = \"\""; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_webver" /*RemoteObject*/ ,BA.ObjectToString("")); - BA.debugLineNum = 316;BA.debugLine="sStatusCode = ERR_NOTXT"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sstatuscode" /*RemoteObject*/ ,__ref.getField(true,"_err_notxt" /*RemoteObject*/ )); - BA.debugLineNum = 317;BA.debugLine="If sVerbose Then Log($\"${TAB}missing info file f"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 4: -//if -this.state = 9; -if (__ref.getField(true,"_sverbose" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 6; -;}if (true) break; - -case 6: -//C -this.state = 9; -parent.__c.runVoidMethod ("LogImpl","931653893",(RemoteObject.concat(RemoteObject.createImmutable(""),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("missing info file full path indication"))),0); -if (true) break; - -case 9: -//C -this.state = 60; -; - if (true) break; - -case 11: -//C -this.state = 12; - BA.debugLineNum = 320;BA.debugLine="Dim j As HttpJob"; -Debug.JustUpdateDeviceLine(); -_j = RemoteObject.createNew ("keymon.lat.medicomed.httpjob");Debug.locals.put("j", _j); - BA.debugLineNum = 321;BA.debugLine="j.Initialize(\"\", Me)"; -Debug.JustUpdateDeviceLine(); -_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString("")),(Object)(__ref)); - BA.debugLineNum = 322;BA.debugLine="j.Username = sUserName"; -Debug.JustUpdateDeviceLine(); -_j.setField ("_username" /*RemoteObject*/ ,__ref.getField(true,"_susername" /*RemoteObject*/ )); - BA.debugLineNum = 323;BA.debugLine="j.Password = sUPassword"; -Debug.JustUpdateDeviceLine(); -_j.setField ("_password" /*RemoteObject*/ ,__ref.getField(true,"_supassword" /*RemoteObject*/ )); - BA.debugLineNum = 324;BA.debugLine="j.Download(sNewVerTxt) 'ex: jobapk.Downlo"; -Debug.JustUpdateDeviceLine(); -_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_download" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_snewvertxt" /*RemoteObject*/ ))); - BA.debugLineNum = 325;BA.debugLine="Log(\"before\")"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("LogImpl","931653901",RemoteObject.createImmutable("before"),0); - BA.debugLineNum = 326;BA.debugLine="Wait For (j) JobDone(j As HttpJob)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("WaitFor","jobdone", __ref.getField(false, "ba"), anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "cl_appupdate", "isvalidwv"), (_j)); -this.state = 61; -return; -case 61: -//C -this.state = 12; -_j = (RemoteObject) result.getArrayElement(false,RemoteObject.createImmutable(1));Debug.locals.put("j", _j); -; - BA.debugLineNum = 327;BA.debugLine="Log(\"after\")"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("LogImpl","931653903",RemoteObject.createImmutable("after"),0); - BA.debugLineNum = 328;BA.debugLine="If j.Success Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 12: -//if -this.state = 59; -if (_j.getField(true,"_success" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 14; -}else { -this.state = 52; -}if (true) break; - -case 14: -//C -this.state = 15; - BA.debugLineNum = 329;BA.debugLine="If sVerbose Then Log($\"Webserver's info file co"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 15: -//if -this.state = 20; -if (__ref.getField(true,"_sverbose" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 17; -;}if (true) break; - -case 17: -//C -this.state = 20; -parent.__c.runVoidMethod ("LogImpl","931653905",(RemoteObject.concat(RemoteObject.createImmutable("Webserver's info file content: "),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"CRLF")))),RemoteObject.createImmutable(""),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_getstring" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))),0); -if (true) break; - -case 20: -//C -this.state = 21; -; - BA.debugLineNum = 330;BA.debugLine="If Not(J.GetString.Contains(\"\"))"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 21: -//if -this.state = 50; -if (parent.__c.runMethod(true,"Not",(Object)(_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_getstring" /*RemoteObject*/ ).runMethod(true,"contains",(Object)(RemoteObject.createImmutable(""))))).get().booleanValue()) { -this.state = 23; -}else { -this.state = 43; -}if (true) break; - -case 23: -//C -this.state = 24; - BA.debugLineNum = 331;BA.debugLine="webver = ExtractVN(J.GetString)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_webver" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.cl_appupdate.class, "_extractvn" /*RemoteObject*/ ,(Object)(_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_getstring" /*RemoteObject*/ )))); - BA.debugLineNum = 332;BA.debugLine="webclog = ExtractCL(J.GetString) 'optional"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_webclog" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.cl_appupdate.class, "_extractcl" /*RemoteObject*/ ,(Object)(_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_getstring" /*RemoteObject*/ )))); - BA.debugLineNum = 333;BA.debugLine="webfsize = ExtractSZ(J.GetString) 'optiona"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_webfsize" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.cl_appupdate.class, "_extractsz" /*RemoteObject*/ ,(Object)(_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_getstring" /*RemoteObject*/ )))); - BA.debugLineNum = 334;BA.debugLine="If webver = \"\" Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 24: -//if -this.state = 41; -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_webver" /*RemoteObject*/ ),BA.ObjectToString(""))) { -this.state = 26; -}else { -this.state = 34; -}if (true) break; - -case 26: -//C -this.state = 27; - BA.debugLineNum = 335;BA.debugLine="sStatusCode = ERR_TXTROW"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sstatuscode" /*RemoteObject*/ ,__ref.getField(true,"_err_txtrow" /*RemoteObject*/ )); - BA.debugLineNum = 336;BA.debugLine="If sVerbose Then Log($\"${TAB}wrong row format"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 27: -//if -this.state = 32; -if (__ref.getField(true,"_sverbose" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 29; -;}if (true) break; - -case 29: -//C -this.state = 32; -parent.__c.runVoidMethod ("LogImpl","931653912",(RemoteObject.concat(RemoteObject.createImmutable(""),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("wrong row format in info file "))),0); -if (true) break; - -case 32: -//C -this.state = 41; -; - if (true) break; - -case 34: -//C -this.state = 35; - BA.debugLineNum = 338;BA.debugLine="sStatusCode = OK_WEBVER 'read apk's ver"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sstatuscode" /*RemoteObject*/ ,__ref.getField(true,"_ok_webver" /*RemoteObject*/ )); - BA.debugLineNum = 339;BA.debugLine="If sVerbose Then Log($\"${TAB}Web version numb"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 35: -//if -this.state = 40; -if (__ref.getField(true,"_sverbose" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 37; -;}if (true) break; - -case 37: -//C -this.state = 40; -parent.__c.runVoidMethod ("LogImpl","931653915",(RemoteObject.concat(RemoteObject.createImmutable(""),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("Web version number: "),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_webver" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))),0); -if (true) break; - -case 40: -//C -this.state = 41; -; - if (true) break; - -case 41: -//C -this.state = 50; -; - if (true) break; - -case 43: -//C -this.state = 44; - BA.debugLineNum = 342;BA.debugLine="sStatusCode = ERR_HTML 'website returne"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sstatuscode" /*RemoteObject*/ ,__ref.getField(true,"_err_html" /*RemoteObject*/ )); - BA.debugLineNum = 343;BA.debugLine="If sVerbose Then Log($\"${TAB}ERROR: website re"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 44: -//if -this.state = 49; -if (__ref.getField(true,"_sverbose" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 46; -;}if (true) break; - -case 46: -//C -this.state = 49; -parent.__c.runVoidMethod ("LogImpl","931653919",(RemoteObject.concat(RemoteObject.createImmutable(""),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("ERROR: website returned an HTML error page"))),0); -if (true) break; - -case 49: -//C -this.state = 50; -; - if (true) break; - -case 50: -//C -this.state = 59; -; - if (true) break; - -case 52: -//C -this.state = 53; - BA.debugLineNum = 346;BA.debugLine="Log($\"${TAB}Error: ${J.ErrorMessage}\"$)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("LogImpl","931653922",(RemoteObject.concat(RemoteObject.createImmutable(""),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("Error: "),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_j.getField(true,"_errormessage" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 347;BA.debugLine="sStatusCode = ERR_HTTP"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sstatuscode" /*RemoteObject*/ ,__ref.getField(true,"_err_http" /*RemoteObject*/ )); - BA.debugLineNum = 348;BA.debugLine="If sVerbose Then Log($\"${TAB}error in httputils"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 53: -//if -this.state = 58; -if (__ref.getField(true,"_sverbose" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 55; -;}if (true) break; - -case 55: -//C -this.state = 58; -parent.__c.runVoidMethod ("LogImpl","931653924",(RemoteObject.concat(RemoteObject.createImmutable(""),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("error in httputils2"))),0); -if (true) break; - -case 58: -//C -this.state = 59; -; - BA.debugLineNum = 349;BA.debugLine="ToastMessageShow(\"Error: \" & J.ErrorMessage, Tr"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("Error: "),_j.getField(true,"_errormessage" /*RemoteObject*/ )))),(Object)(parent.__c.getField(true,"True"))); - if (true) break; - -case 59: -//C -this.state = 60; -; - BA.debugLineNum = 351;BA.debugLine="j.Release"; -Debug.JustUpdateDeviceLine(); -_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_release" /*RemoteObject*/ ); - if (true) break; - -case 60: -//C -this.state = -1; -; - BA.debugLineNum = 353;BA.debugLine="Return (sStatusCode == OK_WEBVER)"; -Debug.JustUpdateDeviceLine(); -if (true) { -parent.__c.runVoidMethod ("ReturnFromResumableSub",this.remoteResumableSub,RemoteObject.createImmutable(((RemoteObject.solveBoolean("=",__ref.getField(true,"_sstatuscode" /*RemoteObject*/ ),BA.numberCast(double.class, __ref.getField(true,"_ok_webver" /*RemoteObject*/ )))))));return;}; - BA.debugLineNum = 354;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _readcurvn(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("ReadCurVN (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,143); -if (RapidSub.canDelegate("readcurvn")) { return __ref.runUserSub(false, "cl_appupdate","readcurvn", __ref);} - BA.debugLineNum = 143;BA.debugLine="Public Sub ReadCurVN"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 144;BA.debugLine="LogColor(\"---- AppUpdating.ReadCurVN\", LogColor1)"; -Debug.JustUpdateDeviceLine(); -cl_appupdate.__c.runVoidMethod ("LogImpl","931129601",BA.ObjectToString("---- AppUpdating.ReadCurVN"),__ref.getField(true,"_logcolor1" /*RemoteObject*/ )); - BA.debugLineNum = 145;BA.debugLine="IsValidCV 'we don't care about its resu"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.cl_appupdate.class, "_isvalidcv" /*RemoteObject*/ ); - BA.debugLineNum = 146;BA.debugLine="Finito"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.cl_appupdate.class, "_finito" /*RemoteObject*/ ); - BA.debugLineNum = 147;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _readwebvn(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("ReadWebVN (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,151); -if (RapidSub.canDelegate("readwebvn")) { __ref.runUserSub(false, "cl_appupdate","readwebvn", __ref); return;} -ResumableSub_ReadWebVN rsub = new ResumableSub_ReadWebVN(null,__ref); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_ReadWebVN extends BA.ResumableSub { -public ResumableSub_ReadWebVN(keymon.lat.medicomed.cl_appupdate parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.cl_appupdate parent; -RemoteObject _okwebver = RemoteObject.createImmutable(false); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("ReadWebVN (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,151); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = -1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 152;BA.debugLine="LogColor(\"---- AppUpdating.ReadWebVN\", LogColor1)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("LogImpl","931195137",BA.ObjectToString("---- AppUpdating.ReadWebVN"),__ref.getField(true,"_logcolor1" /*RemoteObject*/ )); - BA.debugLineNum = 153;BA.debugLine="Wait For(IsvalidWV) Complete (OkWebVer As Boolean"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("WaitFor","complete", __ref.getField(false, "ba"), anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "cl_appupdate", "readwebvn"), __ref.runClassMethod (keymon.lat.medicomed.cl_appupdate.class, "_isvalidwv" /*RemoteObject*/ )); -this.state = 1; -return; -case 1: -//C -this.state = -1; -_okwebver = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(1));Debug.locals.put("OkWebVer", _okwebver); -; - BA.debugLineNum = 154;BA.debugLine="Finito"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.cl_appupdate.class, "_finito" /*RemoteObject*/ ); - BA.debugLineNum = 155;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static void _complete(RemoteObject __ref,RemoteObject _okwebver) throws Exception{ -} -public static RemoteObject _sendinstallintent(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("SendInstallIntent (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,487); -if (RapidSub.canDelegate("sendinstallintent")) { return __ref.runUserSub(false, "cl_appupdate","sendinstallintent", __ref);} -RemoteObject _apkname = RemoteObject.createImmutable(""); -RemoteObject _i = RemoteObject.declareNull("anywheresoftware.b4a.objects.IntentWrapper"); - BA.debugLineNum = 487;BA.debugLine="Private Sub SendInstallIntent"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 488;BA.debugLine="Dim ApkName As String = \"tmp.apk\""; -Debug.JustUpdateDeviceLine(); -_apkname = BA.ObjectToString("tmp.apk");Debug.locals.put("ApkName", _apkname);Debug.locals.put("ApkName", _apkname); - BA.debugLineNum = 489;BA.debugLine="Dim i As Intent"; -Debug.JustUpdateDeviceLine(); -_i = RemoteObject.createNew ("anywheresoftware.b4a.objects.IntentWrapper");Debug.locals.put("i", _i); - BA.debugLineNum = 490;BA.debugLine="If phone.SdkVersion >= 24 Then 'Nouga"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("g",__ref.getField(false,"_phone" /*RemoteObject*/ ).runMethod(true,"getSdkVersion"),BA.numberCast(double.class, 24))) { - BA.debugLineNum = 491;BA.debugLine="i.Initialize(\"android.intent.action.INSTALL_PACK"; -Debug.JustUpdateDeviceLine(); -_i.runVoidMethod ("Initialize",(Object)(BA.ObjectToString("android.intent.action.INSTALL_PACKAGE")),(Object)(BA.ObjectToString(__ref.runClassMethod (keymon.lat.medicomed.cl_appupdate.class, "_getfileuri" /*RemoteObject*/ ,(Object)(_apkname))))); - BA.debugLineNum = 492;BA.debugLine="i.Flags = Bit.Or(i.Flags, 1) 'FLAG_GRANT_READ_UR"; -Debug.JustUpdateDeviceLine(); -_i.runMethod(true,"setFlags",cl_appupdate.__c.getField(false,"Bit").runMethod(true,"Or",(Object)(_i.runMethod(true,"getFlags")),(Object)(BA.numberCast(int.class, 1)))); - }else { - BA.debugLineNum = 494;BA.debugLine="i.Initialize(i.ACTION_VIEW, \"file://\" & File.Com"; -Debug.JustUpdateDeviceLine(); -_i.runVoidMethod ("Initialize",(Object)(_i.getField(true,"ACTION_VIEW")),(Object)(RemoteObject.concat(RemoteObject.createImmutable("file://"),cl_appupdate.__c.getField(false,"File").runMethod(true,"Combine",(Object)(__ref.getField(true,"_sharedfolder" /*RemoteObject*/ )),(Object)(_apkname))))); - BA.debugLineNum = 495;BA.debugLine="i.SetType(\"application/vnd.android.package-archi"; -Debug.JustUpdateDeviceLine(); -_i.runVoidMethod ("SetType",(Object)(RemoteObject.createImmutable("application/vnd.android.package-archive"))); - }; - BA.debugLineNum = 497;BA.debugLine="StartActivity(i)"; -Debug.JustUpdateDeviceLine(); -cl_appupdate.__c.runVoidMethod ("StartActivity",__ref.getField(false, "ba"),(Object)((_i.getObject()))); - BA.debugLineNum = 498;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setandstartsplashscreen(RemoteObject __ref,RemoteObject _callingact,RemoteObject _bm) throws Exception{ -try { - Debug.PushSubsStack("SetAndStartSplashScreen (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,532); -if (RapidSub.canDelegate("setandstartsplashscreen")) { return __ref.runUserSub(false, "cl_appupdate","setandstartsplashscreen", __ref, _callingact, _bm);} -RemoteObject _bitimage = RemoteObject.declareNull("anywheresoftware.b4a.objects.drawable.BitmapDrawable"); -Debug.locals.put("CallingAct", _callingact); -Debug.locals.put("BM", _bm); - BA.debugLineNum = 532;BA.debugLine="Public Sub SetAndStartSplashScreen(CallingAct As A"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 533;BA.debugLine="If BM.IsInitialized Then"; -Debug.JustUpdateDeviceLine(); -if (_bm.runMethod(true,"IsInitialized").get().booleanValue()) { - BA.debugLineNum = 534;BA.debugLine="pnlSplash.Initialize(\"pnl1\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnlsplash" /*RemoteObject*/ ).runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("pnl1"))); - BA.debugLineNum = 535;BA.debugLine="pnlSplash.Tag = \"splash\""; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnlsplash" /*RemoteObject*/ ).runMethod(false,"setTag",RemoteObject.createImmutable(("splash"))); - BA.debugLineNum = 536;BA.debugLine="Dim BitImage As BitmapDrawable"; -Debug.JustUpdateDeviceLine(); -_bitimage = RemoteObject.createNew ("anywheresoftware.b4a.objects.drawable.BitmapDrawable");Debug.locals.put("BitImage", _bitimage); - BA.debugLineNum = 537;BA.debugLine="BitImage.Initialize(BM)"; -Debug.JustUpdateDeviceLine(); -_bitimage.runVoidMethod ("Initialize",(Object)((_bm.getObject()))); - BA.debugLineNum = 538;BA.debugLine="BitImage.Gravity = Gravity.FILL"; -Debug.JustUpdateDeviceLine(); -_bitimage.runMethod(true,"setGravity",cl_appupdate.__c.getField(false,"Gravity").getField(true,"FILL")); - BA.debugLineNum = 539;BA.debugLine="CallingAct.AddView(pnlSplash, 0, 0, CallingAct.W"; -Debug.JustUpdateDeviceLine(); -_callingact.runVoidMethod ("AddView",(Object)((__ref.getField(false,"_pnlsplash" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(_callingact.runMethod(true,"getWidth")),(Object)(_callingact.runMethod(true,"getHeight"))); - BA.debugLineNum = 540;BA.debugLine="pnlSplash.Background = BitImage"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnlsplash" /*RemoteObject*/ ).runMethod(false,"setBackground",(_bitimage.getObject())); - BA.debugLineNum = 541;BA.debugLine="pnlSplash.BringToFront"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnlsplash" /*RemoteObject*/ ).runVoidMethod ("BringToFront"); - BA.debugLineNum = 542;BA.debugLine="SplashShowing = True"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_splashshowing" /*RemoteObject*/ ,cl_appupdate.__c.getField(true,"True")); - }; - BA.debugLineNum = 544;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setcredentials(RemoteObject __ref,RemoteObject _usern,RemoteObject _userp) throws Exception{ -try { - Debug.PushSubsStack("setCredentials (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,96); -if (RapidSub.canDelegate("setcredentials")) { return __ref.runUserSub(false, "cl_appupdate","setcredentials", __ref, _usern, _userp);} -Debug.locals.put("UserN", _usern); -Debug.locals.put("UserP", _userp); - BA.debugLineNum = 96;BA.debugLine="Public Sub setCredentials(UserN As String, UserP A"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 97;BA.debugLine="sUserName = UserN"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_susername" /*RemoteObject*/ ,_usern); - BA.debugLineNum = 98;BA.debugLine="sUPassword = UserP"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_supassword" /*RemoteObject*/ ,_userp); - BA.debugLineNum = 99;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setfileuriasintentdata(RemoteObject __ref,RemoteObject _intent,RemoteObject _filename) throws Exception{ -try { - Debug.PushSubsStack("SetFileUriAsIntentData (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,520); -if (RapidSub.canDelegate("setfileuriasintentdata")) { return __ref.runUserSub(false, "cl_appupdate","setfileuriasintentdata", __ref, _intent, _filename);} -RemoteObject _jo = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -Debug.locals.put("Intent", _intent); -Debug.locals.put("FileName", _filename); - BA.debugLineNum = 520;BA.debugLine="Private Sub SetFileUriAsIntentData (Intent As Inte"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 521;BA.debugLine="Dim jo As JavaObject = Intent"; -Debug.JustUpdateDeviceLine(); -_jo = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_jo = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), _intent.getObject());Debug.locals.put("jo", _jo);Debug.locals.put("jo", _jo); - BA.debugLineNum = 522;BA.debugLine="jo.RunMethod(\"setData\", Array(GetFileUri(FileName"; -Debug.JustUpdateDeviceLine(); -_jo.runVoidMethod ("RunMethod",(Object)(BA.ObjectToString("setData")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {__ref.runClassMethod (keymon.lat.medicomed.cl_appupdate.class, "_getfileuri" /*RemoteObject*/ ,(Object)(_filename))}))); - BA.debugLineNum = 523;BA.debugLine="Intent.Flags = Bit.Or(Intent.Flags, 1) 'FLAG_GRAN"; -Debug.JustUpdateDeviceLine(); -_intent.runMethod(true,"setFlags",cl_appupdate.__c.getField(false,"Bit").runMethod(true,"Or",(Object)(_intent.runMethod(true,"getFlags")),(Object)(BA.numberCast(int.class, 1)))); - BA.debugLineNum = 524;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setnewverapk(RemoteObject __ref,RemoteObject _nva) throws Exception{ -try { - Debug.PushSubsStack("setNewVerApk (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,91); -if (RapidSub.canDelegate("setnewverapk")) { return __ref.runUserSub(false, "cl_appupdate","setnewverapk", __ref, _nva);} -Debug.locals.put("NVA", _nva); - BA.debugLineNum = 91;BA.debugLine="Public Sub setNewVerApk(NVA As String)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 92;BA.debugLine="sNewVerApk = NVA"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_snewverapk" /*RemoteObject*/ ,_nva); - BA.debugLineNum = 93;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setnewvertxt(RemoteObject __ref,RemoteObject _nvt) throws Exception{ -try { - Debug.PushSubsStack("setNewVerTxt (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,86); -if (RapidSub.canDelegate("setnewvertxt")) { return __ref.runUserSub(false, "cl_appupdate","setnewvertxt", __ref, _nvt);} -Debug.locals.put("NVT", _nvt); - BA.debugLineNum = 86;BA.debugLine="Public Sub setNewVerTxt(NVT As String)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 87;BA.debugLine="sNewVerTxt = NVT"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_snewvertxt" /*RemoteObject*/ ,_nvt); - BA.debugLineNum = 88;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setpackagename(RemoteObject __ref,RemoteObject _pn) throws Exception{ -try { - Debug.PushSubsStack("setPackageName (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,74); -if (RapidSub.canDelegate("setpackagename")) { return __ref.runUserSub(false, "cl_appupdate","setpackagename", __ref, _pn);} -Debug.locals.put("PN", _pn); - BA.debugLineNum = 74;BA.debugLine="Public Sub setPackageName(PN As String)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 75;BA.debugLine="sPackageName = PN"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_spackagename" /*RemoteObject*/ ,_pn); - BA.debugLineNum = 76;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setverbose(RemoteObject __ref,RemoteObject _verbose) throws Exception{ -try { - Debug.PushSubsStack("setVerbose (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,102); -if (RapidSub.canDelegate("setverbose")) { return __ref.runUserSub(false, "cl_appupdate","setverbose", __ref, _verbose);} -Debug.locals.put("Verbose", _verbose); - BA.debugLineNum = 102;BA.debugLine="Public Sub setVerbose(Verbose As Boolean)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 103;BA.debugLine="sVerbose = Verbose"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sverbose" /*RemoteObject*/ ,_verbose); - BA.debugLineNum = 104;BA.debugLine="newinst2.svcVerbose = Verbose"; -Debug.JustUpdateDeviceLine(); -cl_appupdate._newinst2._svcverbose /*RemoteObject*/ = _verbose; - BA.debugLineNum = 105;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _stopsplashscreen(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("StopSplashScreen (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,547); -if (RapidSub.canDelegate("stopsplashscreen")) { return __ref.runUserSub(false, "cl_appupdate","stopsplashscreen", __ref);} - BA.debugLineNum = 547;BA.debugLine="Public Sub StopSplashScreen"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 548;BA.debugLine="If SplashShowing Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_splashshowing" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 549;BA.debugLine="SplashShowing = False"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_splashshowing" /*RemoteObject*/ ,cl_appupdate.__c.getField(true,"False")); - BA.debugLineNum = 550;BA.debugLine="pnlSplash.RemoveView"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnlsplash" /*RemoteObject*/ ).runVoidMethod ("RemoveView"); - }; - BA.debugLineNum = 552;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _tryapkupdate(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("TryApkUpdate (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,245); -if (RapidSub.canDelegate("tryapkupdate")) { __ref.runUserSub(false, "cl_appupdate","tryapkupdate", __ref); return;} -ResumableSub_TryApkUpdate rsub = new ResumableSub_TryApkUpdate(null,__ref); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_TryApkUpdate extends BA.ResumableSub { -public ResumableSub_TryApkUpdate(keymon.lat.medicomed.cl_appupdate parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.cl_appupdate parent; -RemoteObject _j = RemoteObject.declareNull("keymon.lat.medicomed.httpjob"); -RemoteObject _out = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("TryApkUpdate (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,245); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { -try { - - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 246;BA.debugLine="LogColor($\"${TAB}-- TryApkUpdate\"$, LogColor1)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("LogImpl","931457281",(RemoteObject.concat(RemoteObject.createImmutable(""),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("-- TryApkUpdate"))),__ref.getField(true,"_logcolor1" /*RemoteObject*/ )); - BA.debugLineNum = 248;BA.debugLine="If ((sStatusCode >= 0) And (sStatusCode <> NO_NEW"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 1: -//if -this.state = 44; -if ((RemoteObject.solveBoolean(".",BA.ObjectToBoolean((RemoteObject.solveBoolean("g",__ref.getField(true,"_sstatuscode" /*RemoteObject*/ ),BA.numberCast(double.class, 0))))) && RemoteObject.solveBoolean(".",BA.ObjectToBoolean((RemoteObject.solveBoolean("!",__ref.getField(true,"_sstatuscode" /*RemoteObject*/ ),BA.numberCast(double.class, __ref.getField(true,"_no_newerapk" /*RemoteObject*/ )))))))) { -this.state = 3; -}if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 250;BA.debugLine="Dim j As HttpJob"; -Debug.JustUpdateDeviceLine(); -_j = RemoteObject.createNew ("keymon.lat.medicomed.httpjob");Debug.locals.put("j", _j); - BA.debugLineNum = 251;BA.debugLine="j.Initialize(\"\", Me)"; -Debug.JustUpdateDeviceLine(); -_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString("")),(Object)(__ref)); - BA.debugLineNum = 252;BA.debugLine="j.Username = sUserName"; -Debug.JustUpdateDeviceLine(); -_j.setField ("_username" /*RemoteObject*/ ,__ref.getField(true,"_susername" /*RemoteObject*/ )); - BA.debugLineNum = 253;BA.debugLine="j.Password = sUPassword"; -Debug.JustUpdateDeviceLine(); -_j.setField ("_password" /*RemoteObject*/ ,__ref.getField(true,"_supassword" /*RemoteObject*/ )); - BA.debugLineNum = 254;BA.debugLine="j.Download(sNewVerApk) 'ex: jobapk.Downlo"; -Debug.JustUpdateDeviceLine(); -_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_download" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_snewverapk" /*RemoteObject*/ ))); - BA.debugLineNum = 255;BA.debugLine="Wait For (j) JobDone(j As HttpJob)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("WaitFor","jobdone", __ref.getField(false, "ba"), anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "cl_appupdate", "tryapkupdate"), (_j)); -this.state = 45; -return; -case 45: -//C -this.state = 4; -_j = (RemoteObject) result.getArrayElement(false,RemoteObject.createImmutable(1));Debug.locals.put("j", _j); -; - BA.debugLineNum = 256;BA.debugLine="Log($\"Donload ok? ${j.Success}\"$)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("LogImpl","931457291",(RemoteObject.concat(RemoteObject.createImmutable("Donload ok? "),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_j.getField(true,"_success" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 257;BA.debugLine="If j.Success Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 4: -//if -this.state = 33; -if (_j.getField(true,"_success" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 6; -}else { -this.state = 26; -}if (true) break; - -case 6: -//C -this.state = 7; - BA.debugLineNum = 258;BA.debugLine="Try"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 7: -//try -this.state = 24; -this.catchState = 17; -this.state = 9; -if (true) break; - -case 9: -//C -this.state = 10; -this.catchState = 17; - BA.debugLineNum = 260;BA.debugLine="Dim out As OutputStream"; -Debug.JustUpdateDeviceLine(); -_out = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper");Debug.locals.put("out", _out); - BA.debugLineNum = 261;BA.debugLine="out = File.OpenOutput(SharedFolder,\"tmp.apk\",F"; -Debug.JustUpdateDeviceLine(); -_out = parent.__c.getField(false,"File").runMethod(false,"OpenOutput",(Object)(__ref.getField(true,"_sharedfolder" /*RemoteObject*/ )),(Object)(BA.ObjectToString("tmp.apk")),(Object)(parent.__c.getField(true,"False")));Debug.locals.put("out", _out); - BA.debugLineNum = 262;BA.debugLine="File.Copy2(j.GetInputStream, out)"; -Debug.JustUpdateDeviceLine(); -parent.__c.getField(false,"File").runVoidMethod ("Copy2",(Object)((_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_getinputstream" /*RemoteObject*/ ).getObject())),(Object)((_out.getObject()))); - BA.debugLineNum = 263;BA.debugLine="out.Close"; -Debug.JustUpdateDeviceLine(); -_out.runVoidMethod ("Close"); - BA.debugLineNum = 264;BA.debugLine="Log($\"Copy2 (saving) ok? TRUE\"$)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("LogImpl","931457299",(RemoteObject.createImmutable("Copy2 (saving) ok? TRUE")),0); - BA.debugLineNum = 265;BA.debugLine="sStatusCode = OK_DOWNLOAD"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sstatuscode" /*RemoteObject*/ ,__ref.getField(true,"_ok_download" /*RemoteObject*/ )); - BA.debugLineNum = 266;BA.debugLine="If sVerbose Then Log($\"${TAB}new apk version d"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 10: -//if -this.state = 15; -if (__ref.getField(true,"_sverbose" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 12; -;}if (true) break; - -case 12: -//C -this.state = 15; -parent.__c.runVoidMethod ("LogImpl","931457301",(RemoteObject.concat(RemoteObject.createImmutable(""),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("new apk version downloaded and ready to install"))),0); -if (true) break; - -case 15: -//C -this.state = 24; -; - Debug.CheckDeviceExceptions(); -if (true) break; - -case 17: -//C -this.state = 18; -this.catchState = 0; - BA.debugLineNum = 268;BA.debugLine="Log($\"Copy2 (saving) ok? FALSE\"$)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("LogImpl","931457303",(RemoteObject.createImmutable("Copy2 (saving) ok? FALSE")),0); - BA.debugLineNum = 269;BA.debugLine="sStatusCode = ERR_DOWNLOAD"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sstatuscode" /*RemoteObject*/ ,__ref.getField(true,"_err_download" /*RemoteObject*/ )); - BA.debugLineNum = 270;BA.debugLine="If sVerbose Then Log($\"${TAB}failed download o"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 18: -//if -this.state = 23; -if (__ref.getField(true,"_sverbose" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 20; -;}if (true) break; - -case 20: -//C -this.state = 23; -parent.__c.runVoidMethod ("LogImpl","931457305",(RemoteObject.concat(RemoteObject.createImmutable(""),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("failed download of new apk version"))),0); -if (true) break; - -case 23: -//C -this.state = 24; -; - BA.debugLineNum = 271;BA.debugLine="ToastMessageShow(LastException, True)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence(parent.__c.runMethod(false,"LastException",__ref.getField(false, "ba")).getObject())),(Object)(parent.__c.getField(true,"True"))); - if (true) break; -if (true) break; - -case 24: -//C -this.state = 33; -this.catchState = 0; -; - if (true) break; - -case 26: -//C -this.state = 27; - BA.debugLineNum = 274;BA.debugLine="Log($\"${TAB}Error: ${J.ErrorMessage}\"$)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("LogImpl","931457309",(RemoteObject.concat(RemoteObject.createImmutable(""),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("Error: "),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_j.getField(true,"_errormessage" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 275;BA.debugLine="sStatusCode = ERR_HTTP"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sstatuscode" /*RemoteObject*/ ,__ref.getField(true,"_err_http" /*RemoteObject*/ )); - BA.debugLineNum = 276;BA.debugLine="If sVerbose Then Log($\"${TAB}error in httputils"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 27: -//if -this.state = 32; -if (__ref.getField(true,"_sverbose" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 29; -;}if (true) break; - -case 29: -//C -this.state = 32; -parent.__c.runVoidMethod ("LogImpl","931457311",(RemoteObject.concat(RemoteObject.createImmutable(""),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("error in httputils2"))),0); -if (true) break; - -case 32: -//C -this.state = 33; -; - BA.debugLineNum = 277;BA.debugLine="ToastMessageShow($\"Error: ${J.ErrorMessage}\"$,"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence((RemoteObject.concat(RemoteObject.createImmutable("Error: "),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_j.getField(true,"_errormessage" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))))),(Object)(parent.__c.getField(true,"True"))); - if (true) break; - -case 33: -//C -this.state = 34; -; - BA.debugLineNum = 279;BA.debugLine="j.Release"; -Debug.JustUpdateDeviceLine(); -_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_release" /*RemoteObject*/ ); - BA.debugLineNum = 280;BA.debugLine="If sStatusCode == OK_DOWNLOAD Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 34: -//if -this.state = 43; -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_sstatuscode" /*RemoteObject*/ ),BA.numberCast(double.class, __ref.getField(true,"_ok_download" /*RemoteObject*/ )))) { -this.state = 36; -}if (true) break; - -case 36: -//C -this.state = 37; - BA.debugLineNum = 281;BA.debugLine="SendInstallIntent"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.cl_appupdate.class, "_sendinstallintent" /*RemoteObject*/ ); - BA.debugLineNum = 282;BA.debugLine="sStatusCode = OK_INSTALL"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sstatuscode" /*RemoteObject*/ ,__ref.getField(true,"_ok_install" /*RemoteObject*/ )); - BA.debugLineNum = 283;BA.debugLine="If sVerbose Then Log($\"${TAB}user asked to inst"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 37: -//if -this.state = 42; -if (__ref.getField(true,"_sverbose" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 39; -;}if (true) break; - -case 39: -//C -this.state = 42; -parent.__c.runVoidMethod ("LogImpl","931457318",(RemoteObject.concat(RemoteObject.createImmutable(""),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("user asked to install new apk"))),0); -if (true) break; - -case 42: -//C -this.state = 43; -; - if (true) break; - -case 43: -//C -this.state = 44; -; - if (true) break; - -case 44: -//C -this.state = -1; -; - BA.debugLineNum = 286;BA.debugLine="Finito"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.cl_appupdate.class, "_finito" /*RemoteObject*/ ); - BA.debugLineNum = 287;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; -}} - catch (Exception e0) { - -if (catchState == 0) - throw e0; -else { - state = catchState; -BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e0.toString());} - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static void _updateapk(RemoteObject __ref,RemoteObject _pstatus) throws Exception{ -try { - Debug.PushSubsStack("UpdateApk (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,210); -if (RapidSub.canDelegate("updateapk")) { __ref.runUserSub(false, "cl_appupdate","updateapk", __ref, _pstatus); return;} -ResumableSub_UpdateApk rsub = new ResumableSub_UpdateApk(null,__ref,_pstatus); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_UpdateApk extends BA.ResumableSub { -public ResumableSub_UpdateApk(keymon.lat.medicomed.cl_appupdate parent,RemoteObject __ref,RemoteObject _pstatus) { -this.parent = parent; -this.__ref = __ref; -this._pstatus = _pstatus; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.cl_appupdate parent; -RemoteObject _pstatus; -RemoteObject _okwebver = RemoteObject.createImmutable(false); -RemoteObject _fsize = RemoteObject.createImmutable(0L); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("UpdateApk (cl_appupdate) ","cl_appupdate",23,__ref.getField(false, "ba"),__ref,210); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); -Debug.locals.put("pstatus", _pstatus); - BA.debugLineNum = 211;BA.debugLine="LogColor(\"---- AppUpdating.UpdateApk\", LogColor1)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("LogImpl","931391745",BA.ObjectToString("---- AppUpdating.UpdateApk"),__ref.getField(true,"_logcolor1" /*RemoteObject*/ )); - BA.debugLineNum = 212;BA.debugLine="If Not(pstatus) Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 1: -//if -this.state = 61; -if (parent.__c.runMethod(true,"Not",(Object)(_pstatus)).get().booleanValue()) { -this.state = 3; -}else { -this.state = 11; -}if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 213;BA.debugLine="sStatusCode = ERR_NOPERM"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sstatuscode" /*RemoteObject*/ ,__ref.getField(true,"_err_noperm" /*RemoteObject*/ )); - BA.debugLineNum = 214;BA.debugLine="If sVerbose Then Log(TAB & \"no permissions from"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 4: -//if -this.state = 9; -if (__ref.getField(true,"_sverbose" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 6; -;}if (true) break; - -case 6: -//C -this.state = 9; -parent.__c.runVoidMethod ("LogImpl","931391748",RemoteObject.concat(parent.__c.getField(true,"TAB"),RemoteObject.createImmutable("no permissions from user to install new apk")),0); -if (true) break; - -case 9: -//C -this.state = 61; -; - if (true) break; - -case 11: -//C -this.state = 12; - BA.debugLineNum = 216;BA.debugLine="Wait For(IsvalidWV) Complete (OkWebVer As Boolea"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("WaitFor","complete", __ref.getField(false, "ba"), anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "cl_appupdate", "updateapk"), __ref.runClassMethod (keymon.lat.medicomed.cl_appupdate.class, "_isvalidwv" /*RemoteObject*/ )); -this.state = 62; -return; -case 62: -//C -this.state = 12; -_okwebver = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(1));Debug.locals.put("OkWebVer", _okwebver); -; - BA.debugLineNum = 217;BA.debugLine="If (IsValidCV And OkWebVer) Then 'here we"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 12: -//if -this.state = 60; -if ((RemoteObject.solveBoolean(".",__ref.runClassMethod (keymon.lat.medicomed.cl_appupdate.class, "_isvalidcv" /*RemoteObject*/ )) && RemoteObject.solveBoolean(".",_okwebver))) { -this.state = 14; -}if (true) break; - -case 14: -//C -this.state = 15; - BA.debugLineNum = 218;BA.debugLine="If curver < webver Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 15: -//if -this.state = 59; -if (RemoteObject.solveBoolean("<",BA.numberCast(double.class, __ref.getField(true,"_curver" /*RemoteObject*/ )),BA.numberCast(double.class, __ref.getField(true,"_webver" /*RemoteObject*/ )))) { -this.state = 17; -}else { -this.state = 52; -}if (true) break; - -case 17: -//C -this.state = 18; - BA.debugLineNum = 220;BA.debugLine="If IsNumber(webfsize) Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 18: -//if -this.state = 31; -if (parent.__c.runMethod(true,"IsNumber",(Object)(__ref.getField(true,"_webfsize" /*RemoteObject*/ ))).get().booleanValue()) { -this.state = 20; -}if (true) break; - -case 20: -//C -this.state = 21; - BA.debugLineNum = 221;BA.debugLine="Dim fsize As Long = webfsize"; -Debug.JustUpdateDeviceLine(); -_fsize = BA.numberCast(long.class, __ref.getField(true,"_webfsize" /*RemoteObject*/ ));Debug.locals.put("fsize", _fsize);Debug.locals.put("fsize", _fsize); - BA.debugLineNum = 222;BA.debugLine="If fsize*2 > GetFreeSpace Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 21: -//if -this.state = 30; -if (RemoteObject.solveBoolean(">",RemoteObject.solve(new RemoteObject[] {_fsize,RemoteObject.createImmutable(2)}, "*",0, 2),__ref.runClassMethod (keymon.lat.medicomed.cl_appupdate.class, "_getfreespace" /*RemoteObject*/ ))) { -this.state = 23; -}if (true) break; - -case 23: -//C -this.state = 24; - BA.debugLineNum = 223;BA.debugLine="sStatusCode = ERR_NOSPACE"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sstatuscode" /*RemoteObject*/ ,__ref.getField(true,"_err_nospace" /*RemoteObject*/ )); - BA.debugLineNum = 224;BA.debugLine="If sVerbose Then Log($\"${TAB}no enough avail"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 24: -//if -this.state = 29; -if (__ref.getField(true,"_sverbose" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 26; -;}if (true) break; - -case 26: -//C -this.state = 29; -parent.__c.runVoidMethod ("LogImpl","931391758",(RemoteObject.concat(RemoteObject.createImmutable(""),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("no enough available space to download apk"))),0); -if (true) break; - -case 29: -//C -this.state = 30; -; - if (true) break; - -case 30: -//C -this.state = 31; -; - if (true) break; -; - BA.debugLineNum = 227;BA.debugLine="If sStatusCode >= 0 Then"; -Debug.JustUpdateDeviceLine(); - -case 31: -//if -this.state = 50; -if (RemoteObject.solveBoolean("g",__ref.getField(true,"_sstatuscode" /*RemoteObject*/ ),BA.numberCast(double.class, 0))) { -this.state = 33; -}if (true) break; - -case 33: -//C -this.state = 34; - BA.debugLineNum = 228;BA.debugLine="sStatusCode = OK_NEWERAPK 'info file tells"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sstatuscode" /*RemoteObject*/ ,__ref.getField(true,"_ok_newerapk" /*RemoteObject*/ )); - BA.debugLineNum = 229;BA.debugLine="If sVerbose Then Log($\"${TAB}Newer version av"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 34: -//if -this.state = 39; -if (__ref.getField(true,"_sverbose" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 36; -;}if (true) break; - -case 36: -//C -this.state = 39; -parent.__c.runVoidMethod ("LogImpl","931391763",(RemoteObject.concat(RemoteObject.createImmutable(""),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("Newer version available. Now I try its downloading"))),0); -if (true) break; - -case 39: -//C -this.state = 40; -; - BA.debugLineNum = 230;BA.debugLine="If sNewVerApk = \"\" Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 40: -//if -this.state = 49; -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_snewverapk" /*RemoteObject*/ ),BA.ObjectToString(""))) { -this.state = 42; -}if (true) break; - -case 42: -//C -this.state = 43; - BA.debugLineNum = 231;BA.debugLine="sStatusCode = ERR_NOAPK"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sstatuscode" /*RemoteObject*/ ,__ref.getField(true,"_err_noapk" /*RemoteObject*/ )); - BA.debugLineNum = 232;BA.debugLine="If sVerbose Then Log($\"${TAB}missing apk fil"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 43: -//if -this.state = 48; -if (__ref.getField(true,"_sverbose" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 45; -;}if (true) break; - -case 45: -//C -this.state = 48; -parent.__c.runVoidMethod ("LogImpl","931391766",(RemoteObject.concat(RemoteObject.createImmutable(""),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("missing apk file full path indication"))),0); -if (true) break; - -case 48: -//C -this.state = 49; -; - if (true) break; - -case 49: -//C -this.state = 50; -; - if (true) break; - -case 50: -//C -this.state = 59; -; - if (true) break; - -case 52: -//C -this.state = 53; - BA.debugLineNum = 236;BA.debugLine="sStatusCode = NO_NEWERAPK"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sstatuscode" /*RemoteObject*/ ,__ref.getField(true,"_no_newerapk" /*RemoteObject*/ )); - BA.debugLineNum = 237;BA.debugLine="If sVerbose Then Log($\"${TAB}No newer version"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 53: -//if -this.state = 58; -if (__ref.getField(true,"_sverbose" /*RemoteObject*/ ).get().booleanValue()) { -this.state = 55; -;}if (true) break; - -case 55: -//C -this.state = 58; -parent.__c.runVoidMethod ("LogImpl","931391771",(RemoteObject.concat(RemoteObject.createImmutable(""),parent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("No newer version available on webserver."))),0); -if (true) break; - -case 58: -//C -this.state = 59; -; - if (true) break; - -case 59: -//C -this.state = 60; -; - if (true) break; - -case 60: -//C -this.state = 61; -; - if (true) break; - -case 61: -//C -this.state = -1; -; - BA.debugLineNum = 241;BA.debugLine="TryApkUpdate 'if available and permitted, do"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.cl_appupdate.class, "_tryapkupdate" /*void*/ ); - BA.debugLineNum = 242;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/dbrequestmanager.java b/B4A/Objects/shell/src/keymon/lat/medicomed/dbrequestmanager.java deleted file mode 100644 index 974b04f..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/dbrequestmanager.java +++ /dev/null @@ -1,44 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class dbrequestmanager { - public static RemoteObject myClass; - public dbrequestmanager() { - } - public static PCBA staticBA = new PCBA(null, dbrequestmanager.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _mtarget = RemoteObject.declareNull("Object"); -public static RemoteObject _link = RemoteObject.createImmutable(""); -public static RemoteObject _bc = RemoteObject.declareNull("anywheresoftware.b4a.agraham.byteconverter.ByteConverter"); -public static RemoteObject _t_null = RemoteObject.createImmutable((byte)0); -public static RemoteObject _t_string = RemoteObject.createImmutable((byte)0); -public static RemoteObject _t_short = RemoteObject.createImmutable((byte)0); -public static RemoteObject _t_int = RemoteObject.createImmutable((byte)0); -public static RemoteObject _t_long = RemoteObject.createImmutable((byte)0); -public static RemoteObject _t_float = RemoteObject.createImmutable((byte)0); -public static RemoteObject _t_double = RemoteObject.createImmutable((byte)0); -public static RemoteObject _t_boolean = RemoteObject.createImmutable((byte)0); -public static RemoteObject _t_blob = RemoteObject.createImmutable((byte)0); -public static RemoteObject _version = RemoteObject.createImmutable(0f); -public static RemoteObject _temparray = null; -public static RemoteObject _jobtaganterior = RemoteObject.createImmutable(""); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"bc",_ref.getField(false, "_bc"),"DateUtils",_ref.getField(false, "_dateutils"),"jobTagAnterior",_ref.getField(false, "_jobtaganterior"),"link",_ref.getField(false, "_link"),"mTarget",_ref.getField(false, "_mtarget"),"T_BLOB",_ref.getField(false, "_t_blob"),"T_BOOLEAN",_ref.getField(false, "_t_boolean"),"T_DOUBLE",_ref.getField(false, "_t_double"),"T_FLOAT",_ref.getField(false, "_t_float"),"T_INT",_ref.getField(false, "_t_int"),"T_LONG",_ref.getField(false, "_t_long"),"T_NULL",_ref.getField(false, "_t_null"),"T_SHORT",_ref.getField(false, "_t_short"),"T_STRING",_ref.getField(false, "_t_string"),"tempArray",_ref.getField(false, "_temparray"),"VERSION",_ref.getField(false, "_version")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/dbrequestmanager_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/dbrequestmanager_subs_0.java deleted file mode 100644 index ca6f2a1..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/dbrequestmanager_subs_0.java +++ /dev/null @@ -1,991 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class dbrequestmanager_subs_0 { - - -public static RemoteObject _bytestoimage(RemoteObject __ref,RemoteObject _bytes) throws Exception{ -try { - Debug.PushSubsStack("BytesToImage (dbrequestmanager) ","dbrequestmanager",20,__ref.getField(false, "ba"),__ref,242); -if (RapidSub.canDelegate("bytestoimage")) { return __ref.runUserSub(false, "dbrequestmanager","bytestoimage", __ref, _bytes);} -RemoteObject _in = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.InputStreamWrapper"); -RemoteObject _bmp = RemoteObject.declareNull("anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper"); -Debug.locals.put("bytes", _bytes); - BA.debugLineNum = 242;BA.debugLine="Public Sub BytesToImage(bytes() As Byte) As Bitmap"; -Debug.ShouldStop(131072); - BA.debugLineNum = 243;BA.debugLine="Dim In As InputStream"; -Debug.ShouldStop(262144); -_in = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.InputStreamWrapper");Debug.locals.put("In", _in); - BA.debugLineNum = 244;BA.debugLine="In.InitializeFromBytesArray(bytes, 0, bytes.Lengt"; -Debug.ShouldStop(524288); -_in.runVoidMethod ("InitializeFromBytesArray",(Object)(_bytes),(Object)(BA.numberCast(int.class, 0)),(Object)(_bytes.getField(true,"length"))); - BA.debugLineNum = 245;BA.debugLine="Dim bmp As Bitmap"; -Debug.ShouldStop(1048576); -_bmp = RemoteObject.createNew ("anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper");Debug.locals.put("bmp", _bmp); - BA.debugLineNum = 246;BA.debugLine="bmp.Initialize2(In)"; -Debug.ShouldStop(2097152); -_bmp.runVoidMethod ("Initialize2",(Object)((_in.getObject()))); - BA.debugLineNum = 247;BA.debugLine="Return bmp"; -Debug.ShouldStop(4194304); -if (true) return _bmp; - BA.debugLineNum = 248;BA.debugLine="End Sub"; -Debug.ShouldStop(8388608); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 4;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 5;BA.debugLine="Private mTarget As Object"; -dbrequestmanager._mtarget = RemoteObject.createNew ("Object");__ref.setField("_mtarget",dbrequestmanager._mtarget); - //BA.debugLineNum = 6;BA.debugLine="Type DBResult (Tag As Object, Columns As Map, Row"; -; - //BA.debugLineNum = 7;BA.debugLine="Type DBCommand (Name As String, Parameters() As O"; -; - //BA.debugLineNum = 8;BA.debugLine="Private link As String"; -dbrequestmanager._link = RemoteObject.createImmutable("");__ref.setField("_link",dbrequestmanager._link); - //BA.debugLineNum = 9;BA.debugLine="Private bc As ByteConverter"; -dbrequestmanager._bc = RemoteObject.createNew ("anywheresoftware.b4a.agraham.byteconverter.ByteConverter");__ref.setField("_bc",dbrequestmanager._bc); - //BA.debugLineNum = 10;BA.debugLine="Private T_NULL = 0, T_STRING = 1, T_SHORT = 2, T_"; -dbrequestmanager._t_null = BA.numberCast(byte.class, 0);__ref.setField("_t_null",dbrequestmanager._t_null); -dbrequestmanager._t_string = BA.numberCast(byte.class, 1);__ref.setField("_t_string",dbrequestmanager._t_string); -dbrequestmanager._t_short = BA.numberCast(byte.class, 2);__ref.setField("_t_short",dbrequestmanager._t_short); -dbrequestmanager._t_int = BA.numberCast(byte.class, 3);__ref.setField("_t_int",dbrequestmanager._t_int); -dbrequestmanager._t_long = BA.numberCast(byte.class, 4);__ref.setField("_t_long",dbrequestmanager._t_long); -dbrequestmanager._t_float = BA.numberCast(byte.class, 5);__ref.setField("_t_float",dbrequestmanager._t_float); -dbrequestmanager._t_double = BA.numberCast(byte.class, 6);__ref.setField("_t_double",dbrequestmanager._t_double); -dbrequestmanager._t_boolean = BA.numberCast(byte.class, 7);__ref.setField("_t_boolean",dbrequestmanager._t_boolean); -dbrequestmanager._t_blob = BA.numberCast(byte.class, 8);__ref.setField("_t_blob",dbrequestmanager._t_blob); - //BA.debugLineNum = 12;BA.debugLine="Private VERSION As Float = 0.9"; -dbrequestmanager._version = BA.numberCast(float.class, 0.9);__ref.setField("_version",dbrequestmanager._version); - //BA.debugLineNum = 13;BA.debugLine="Private tempArray(1) As Object"; -dbrequestmanager._temparray = RemoteObject.createNewArray ("Object", new int[] {1}, new Object[]{});__ref.setField("_temparray",dbrequestmanager._temparray); - //BA.debugLineNum = 14;BA.debugLine="Dim jobTagAnterior As String = \"\" 'Mod por CHV -"; -dbrequestmanager._jobtaganterior = BA.ObjectToString("");__ref.setField("_jobtaganterior",dbrequestmanager._jobtaganterior); - //BA.debugLineNum = 15;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _executebatch(RemoteObject __ref,RemoteObject _listofcommands,RemoteObject _tag) throws Exception{ -try { - Debug.PushSubsStack("ExecuteBatch (dbrequestmanager) ","dbrequestmanager",20,__ref.getField(false, "ba"),__ref,43); -if (RapidSub.canDelegate("executebatch")) { return __ref.runUserSub(false, "dbrequestmanager","executebatch", __ref, _listofcommands, _tag);} -RemoteObject _j = RemoteObject.declareNull("keymon.lat.medicomed.httpjob"); -RemoteObject _ms = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -RemoteObject _out2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -RemoteObject _command = RemoteObject.declareNull("keymon.lat.medicomed.dbrequestmanager._dbcommand"); -Debug.locals.put("ListOfCommands", _listofcommands); -Debug.locals.put("Tag", _tag); - BA.debugLineNum = 43;BA.debugLine="Public Sub ExecuteBatch(ListOfCommands As List, Ta"; -Debug.ShouldStop(1024); - BA.debugLineNum = 44;BA.debugLine="Dim j As HttpJob"; -Debug.ShouldStop(2048); -_j = RemoteObject.createNew ("keymon.lat.medicomed.httpjob");Debug.locals.put("j", _j); - BA.debugLineNum = 45;BA.debugLine="Dim ms As OutputStream"; -Debug.ShouldStop(4096); -_ms = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper");Debug.locals.put("ms", _ms); - BA.debugLineNum = 46;BA.debugLine="Dim out2 As OutputStream = StartJob(j,ms, Tag)"; -Debug.ShouldStop(8192); -_out2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -_out2 = __ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_startjob" /*RemoteObject*/ ,(Object)(_j),(Object)(_ms),(Object)(_tag));Debug.locals.put("out2", _out2);Debug.locals.put("out2", _out2); - BA.debugLineNum = 47;BA.debugLine="WriteInt(ListOfCommands.Size, out2)"; -Debug.ShouldStop(16384); -__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_writeint" /*RemoteObject*/ ,(Object)(_listofcommands.runMethod(true,"getSize")),(Object)(_out2)); - BA.debugLineNum = 48;BA.debugLine="For Each Command As DBCommand In ListOfCommands"; -Debug.ShouldStop(32768); -{ -final RemoteObject group5 = _listofcommands; -final int groupLen5 = group5.runMethod(true,"getSize").get() -;int index5 = 0; -; -for (; index5 < groupLen5;index5++){ -_command = (group5.runMethod(false,"Get",index5));Debug.locals.put("Command", _command); -Debug.locals.put("Command", _command); - BA.debugLineNum = 49;BA.debugLine="WriteObject(Command.Name, out2)"; -Debug.ShouldStop(65536); -__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_writeobject" /*RemoteObject*/ ,(Object)((_command.getField(true,"Name" /*RemoteObject*/ ))),(Object)(_out2)); - BA.debugLineNum = 50;BA.debugLine="WriteList(Command.Parameters, out2)"; -Debug.ShouldStop(131072); -__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_writelist" /*RemoteObject*/ ,(Object)(dbrequestmanager.__c.runMethod(false, "ArrayToList", (Object)(_command.getField(false,"Parameters" /*RemoteObject*/ )))),(Object)(_out2)); - } -}Debug.locals.put("Command", _command); -; - BA.debugLineNum = 52;BA.debugLine="out2.Close"; -Debug.ShouldStop(524288); -_out2.runVoidMethod ("Close"); - BA.debugLineNum = 53;BA.debugLine="j.PostBytes(link & \"?method=batch\", ms.ToBytesArr"; -Debug.ShouldStop(1048576); -_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_postbytes" /*RemoteObject*/ ,(Object)(RemoteObject.concat(__ref.getField(true,"_link" /*RemoteObject*/ ),RemoteObject.createImmutable("?method=batch"))),(Object)(_ms.runMethod(false,"ToBytesArray"))); - BA.debugLineNum = 54;BA.debugLine="End Sub"; -Debug.ShouldStop(2097152); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _executecommand(RemoteObject __ref,RemoteObject _command,RemoteObject _tag) throws Exception{ -try { - Debug.PushSubsStack("ExecuteCommand (dbrequestmanager) ","dbrequestmanager",20,__ref.getField(false, "ba"),__ref,57); -if (RapidSub.canDelegate("executecommand")) { return __ref.runUserSub(false, "dbrequestmanager","executecommand", __ref, _command, _tag);} -Debug.locals.put("Command", _command); -Debug.locals.put("Tag", _tag); - BA.debugLineNum = 57;BA.debugLine="Public Sub ExecuteCommand(Command As DBCommand, Ta"; -Debug.ShouldStop(16777216); - BA.debugLineNum = 58;BA.debugLine="ExecuteBatch(Array As DBCommand(Command), Tag)"; -Debug.ShouldStop(33554432); -__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executebatch" /*RemoteObject*/ ,(Object)(dbrequestmanager.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("keymon.lat.medicomed.dbrequestmanager._dbcommand",new int[] {1},new Object[] {_command})))),(Object)(_tag)); - BA.debugLineNum = 59;BA.debugLine="End Sub"; -Debug.ShouldStop(67108864); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _executequery(RemoteObject __ref,RemoteObject _command,RemoteObject _limit,RemoteObject _tag) throws Exception{ -try { - Debug.PushSubsStack("ExecuteQuery (dbrequestmanager) ","dbrequestmanager",20,__ref.getField(false, "ba"),__ref,28); -if (RapidSub.canDelegate("executequery")) { return __ref.runUserSub(false, "dbrequestmanager","executequery", __ref, _command, _limit, _tag);} -RemoteObject _j = RemoteObject.declareNull("keymon.lat.medicomed.httpjob"); -RemoteObject _ms = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -RemoteObject _out2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -Debug.locals.put("Command", _command); -Debug.locals.put("Limit", _limit); -Debug.locals.put("Tag", _tag); - BA.debugLineNum = 28;BA.debugLine="Public Sub ExecuteQuery(Command As DBCommand, Limi"; -Debug.ShouldStop(134217728); - BA.debugLineNum = 29;BA.debugLine="Dim j As HttpJob"; -Debug.ShouldStop(268435456); -_j = RemoteObject.createNew ("keymon.lat.medicomed.httpjob");Debug.locals.put("j", _j); - BA.debugLineNum = 30;BA.debugLine="Dim ms As OutputStream"; -Debug.ShouldStop(536870912); -_ms = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper");Debug.locals.put("ms", _ms); - BA.debugLineNum = 31;BA.debugLine="Dim out2 As OutputStream = StartJob(j,ms, Tag)"; -Debug.ShouldStop(1073741824); -_out2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -_out2 = __ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_startjob" /*RemoteObject*/ ,(Object)(_j),(Object)(_ms),(Object)(_tag));Debug.locals.put("out2", _out2);Debug.locals.put("out2", _out2); - BA.debugLineNum = 33;BA.debugLine="WriteObject(Command.Name, out2)"; -Debug.ShouldStop(1); -__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_writeobject" /*RemoteObject*/ ,(Object)((_command.getField(true,"Name" /*RemoteObject*/ ))),(Object)(_out2)); - BA.debugLineNum = 34;BA.debugLine="WriteInt(Limit, out2)"; -Debug.ShouldStop(2); -__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_writeint" /*RemoteObject*/ ,(Object)(_limit),(Object)(_out2)); - BA.debugLineNum = 35;BA.debugLine="WriteList(Command.Parameters, out2)"; -Debug.ShouldStop(4); -__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_writelist" /*RemoteObject*/ ,(Object)(dbrequestmanager.__c.runMethod(false, "ArrayToList", (Object)(_command.getField(false,"Parameters" /*RemoteObject*/ )))),(Object)(_out2)); - BA.debugLineNum = 36;BA.debugLine="out2.Close"; -Debug.ShouldStop(8); -_out2.runVoidMethod ("Close"); - BA.debugLineNum = 37;BA.debugLine="j.PostBytes(link & \"?method=query\", ms.ToBytesArr"; -Debug.ShouldStop(16); -_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_postbytes" /*RemoteObject*/ ,(Object)(RemoteObject.concat(__ref.getField(true,"_link" /*RemoteObject*/ ),RemoteObject.createImmutable("?method=query"))),(Object)(_ms.runMethod(false,"ToBytesArray"))); - BA.debugLineNum = 38;BA.debugLine="End Sub"; -Debug.ShouldStop(32); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _filetobytes(RemoteObject __ref,RemoteObject _dir,RemoteObject _filename) throws Exception{ -try { - Debug.PushSubsStack("FileToBytes (dbrequestmanager) ","dbrequestmanager",20,__ref.getField(false, "ba"),__ref,223); -if (RapidSub.canDelegate("filetobytes")) { return __ref.runUserSub(false, "dbrequestmanager","filetobytes", __ref, _dir, _filename);} -RemoteObject _out = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -RemoteObject _in = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.InputStreamWrapper"); -Debug.locals.put("Dir", _dir); -Debug.locals.put("FileName", _filename); - BA.debugLineNum = 223;BA.debugLine="Public Sub FileToBytes(Dir As String, FileName As"; -Debug.ShouldStop(1073741824); - BA.debugLineNum = 224;BA.debugLine="Dim out As OutputStream"; -Debug.ShouldStop(-2147483648); -_out = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper");Debug.locals.put("out", _out); - BA.debugLineNum = 225;BA.debugLine="out.InitializeToBytesArray(0)"; -Debug.ShouldStop(1); -_out.runVoidMethod ("InitializeToBytesArray",(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 226;BA.debugLine="Dim In As InputStream = File.OpenInput(Dir, FileN"; -Debug.ShouldStop(2); -_in = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.InputStreamWrapper"); -_in = dbrequestmanager.__c.getField(false,"File").runMethod(false,"OpenInput",(Object)(_dir),(Object)(_filename));Debug.locals.put("In", _in);Debug.locals.put("In", _in); - BA.debugLineNum = 227;BA.debugLine="File.Copy2(In, out)"; -Debug.ShouldStop(4); -dbrequestmanager.__c.getField(false,"File").runVoidMethod ("Copy2",(Object)((_in.getObject())),(Object)((_out.getObject()))); - BA.debugLineNum = 228;BA.debugLine="out.Close"; -Debug.ShouldStop(8); -_out.runVoidMethod ("Close"); - BA.debugLineNum = 229;BA.debugLine="Return out.ToBytesArray"; -Debug.ShouldStop(16); -if (true) return _out.runMethod(false,"ToBytesArray"); - BA.debugLineNum = 230;BA.debugLine="End Sub"; -Debug.ShouldStop(32); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _handlejob(RemoteObject __ref,RemoteObject _job) throws Exception{ -try { - Debug.PushSubsStack("HandleJob (dbrequestmanager) ","dbrequestmanager",20,__ref.getField(false, "ba"),__ref,184); -if (RapidSub.canDelegate("handlejob")) { return __ref.runUserSub(false, "dbrequestmanager","handlejob", __ref, _job);} -RemoteObject _start = RemoteObject.createImmutable(0L); -RemoteObject _in = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.InputStreamWrapper"); -RemoteObject _cs = RemoteObject.declareNull("anywheresoftware.b4a.randomaccessfile.CompressedStreams"); -RemoteObject _serverversion = RemoteObject.createImmutable(0f); -RemoteObject _method = RemoteObject.createImmutable(""); -RemoteObject _table = RemoteObject.declareNull("keymon.lat.medicomed.dbrequestmanager._dbresult"); -RemoteObject _numberofcolumns = RemoteObject.createImmutable(0); -int _i = 0; -RemoteObject _rowobjects = null; -int _col = 0; -RemoteObject _o = RemoteObject.declareNull("Object"); -RemoteObject _rows = RemoteObject.createImmutable(0); -Debug.locals.put("Job", _job); - BA.debugLineNum = 184;BA.debugLine="Public Sub HandleJob(Job As HttpJob) As DBResult"; -Debug.ShouldStop(8388608); - BA.debugLineNum = 185;BA.debugLine="Dim start As Long = DateTime.Now"; -Debug.ShouldStop(16777216); -_start = dbrequestmanager.__c.getField(false,"DateTime").runMethod(true,"getNow");Debug.locals.put("start", _start);Debug.locals.put("start", _start); - BA.debugLineNum = 186;BA.debugLine="Dim In As InputStream = Job.GetInputStream"; -Debug.ShouldStop(33554432); -_in = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.InputStreamWrapper"); -_in = _job.runClassMethod (keymon.lat.medicomed.httpjob.class, "_getinputstream" /*RemoteObject*/ );Debug.locals.put("In", _in);Debug.locals.put("In", _in); - BA.debugLineNum = 187;BA.debugLine="Dim cs As CompressedStreams"; -Debug.ShouldStop(67108864); -_cs = RemoteObject.createNew ("anywheresoftware.b4a.randomaccessfile.CompressedStreams");Debug.locals.put("cs", _cs); - BA.debugLineNum = 188;BA.debugLine="In = cs.WrapInputStream(In, \"gzip\")"; -Debug.ShouldStop(134217728); -_in = _cs.runMethod(false,"WrapInputStream",(Object)((_in.getObject())),(Object)(RemoteObject.createImmutable("gzip")));Debug.locals.put("In", _in); - BA.debugLineNum = 189;BA.debugLine="Dim serverVersion As Float = ReadObject(In) 'igno"; -Debug.ShouldStop(268435456); -_serverversion = BA.numberCast(float.class, __ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_readobject" /*RemoteObject*/ ,(Object)(_in)));Debug.locals.put("serverVersion", _serverversion);Debug.locals.put("serverVersion", _serverversion); - BA.debugLineNum = 190;BA.debugLine="Dim method As String = ReadObject(In)"; -Debug.ShouldStop(536870912); -_method = BA.ObjectToString(__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_readobject" /*RemoteObject*/ ,(Object)(_in)));Debug.locals.put("method", _method);Debug.locals.put("method", _method); - BA.debugLineNum = 191;BA.debugLine="Dim table As DBResult"; -Debug.ShouldStop(1073741824); -_table = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbresult");Debug.locals.put("table", _table); - BA.debugLineNum = 192;BA.debugLine="table.Initialize"; -Debug.ShouldStop(-2147483648); -_table.runVoidMethod ("Initialize"); - BA.debugLineNum = 193;BA.debugLine="table.Columns.Initialize"; -Debug.ShouldStop(1); -_table.getField(false,"Columns" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 194;BA.debugLine="table.rows.Initialize"; -Debug.ShouldStop(2); -_table.getField(false,"Rows" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 195;BA.debugLine="table.Tag = Job.Tag"; -Debug.ShouldStop(4); -_table.setField ("Tag" /*RemoteObject*/ ,_job.getField(false,"_tag" /*RemoteObject*/ )); - BA.debugLineNum = 196;BA.debugLine="If jobTagAnterior <> Job.Tag Then LogColor(\"Handl"; -Debug.ShouldStop(8); -if (RemoteObject.solveBoolean("!",__ref.getField(true,"_jobtaganterior" /*RemoteObject*/ ),BA.ObjectToString(_job.getField(false,"_tag" /*RemoteObject*/ )))) { -dbrequestmanager.__c.runVoidMethod ("LogImpl","327918348",RemoteObject.concat(RemoteObject.createImmutable("HandleJob: '"),_job.getField(false,"_tag" /*RemoteObject*/ ),RemoteObject.createImmutable("'")),dbrequestmanager.__c.getField(false,"Colors").getField(true,"Blue"));}; - BA.debugLineNum = 197;BA.debugLine="jobTagAnterior = Job.Tag 'Mod por CHV - 211023"; -Debug.ShouldStop(16); -__ref.setField ("_jobtaganterior" /*RemoteObject*/ ,BA.ObjectToString(_job.getField(false,"_tag" /*RemoteObject*/ ))); - BA.debugLineNum = 198;BA.debugLine="If method = \"query\" Then"; -Debug.ShouldStop(32); -if (RemoteObject.solveBoolean("=",_method,BA.ObjectToString("query"))) { - BA.debugLineNum = 199;BA.debugLine="Dim numberOfColumns As Int = ReadInt(In)"; -Debug.ShouldStop(64); -_numberofcolumns = __ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_readint" /*RemoteObject*/ ,(Object)(_in));Debug.locals.put("numberOfColumns", _numberofcolumns);Debug.locals.put("numberOfColumns", _numberofcolumns); - BA.debugLineNum = 200;BA.debugLine="For i = 0 To numberOfColumns - 1"; -Debug.ShouldStop(128); -{ -final int step16 = 1; -final int limit16 = RemoteObject.solve(new RemoteObject[] {_numberofcolumns,RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step16 > 0 && _i <= limit16) || (step16 < 0 && _i >= limit16) ;_i = ((int)(0 + _i + step16)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 201;BA.debugLine="table.Columns.Put(ReadObject(In), i)"; -Debug.ShouldStop(256); -_table.getField(false,"Columns" /*RemoteObject*/ ).runVoidMethod ("Put",(Object)(__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_readobject" /*RemoteObject*/ ,(Object)(_in))),(Object)(RemoteObject.createImmutable((_i)))); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 203;BA.debugLine="Do While ReadByte(In) = 1"; -Debug.ShouldStop(1024); -while (RemoteObject.solveBoolean("=",__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_readbyte" /*RemoteObject*/ ,(Object)(_in)),BA.numberCast(double.class, 1))) { - BA.debugLineNum = 204;BA.debugLine="Dim rowObjects(numberOfColumns) As Object"; -Debug.ShouldStop(2048); -_rowobjects = RemoteObject.createNewArray ("Object", new int[] {_numberofcolumns.get().intValue()}, new Object[]{});Debug.locals.put("rowObjects", _rowobjects); - BA.debugLineNum = 205;BA.debugLine="table.rows.Add(rowObjects)"; -Debug.ShouldStop(4096); -_table.getField(false,"Rows" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((_rowobjects))); - BA.debugLineNum = 206;BA.debugLine="For col = 0 To numberOfColumns - 1"; -Debug.ShouldStop(8192); -{ -final int step22 = 1; -final int limit22 = RemoteObject.solve(new RemoteObject[] {_numberofcolumns,RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_col = 0 ; -for (;(step22 > 0 && _col <= limit22) || (step22 < 0 && _col >= limit22) ;_col = ((int)(0 + _col + step22)) ) { -Debug.locals.put("col", _col); - BA.debugLineNum = 207;BA.debugLine="Dim o As Object = ReadObject(In)"; -Debug.ShouldStop(16384); -_o = __ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_readobject" /*RemoteObject*/ ,(Object)(_in));Debug.locals.put("o", _o);Debug.locals.put("o", _o); - BA.debugLineNum = 208;BA.debugLine="rowObjects(col) = o"; -Debug.ShouldStop(32768); -_rowobjects.setArrayElement (_o,BA.numberCast(int.class, _col)); - } -}Debug.locals.put("col", _col); -; - } -; - }else -{ BA.debugLineNum = 211;BA.debugLine="Else If method = \"batch\" Then"; -Debug.ShouldStop(262144); -if (RemoteObject.solveBoolean("=",_method,BA.ObjectToString("batch"))) { - BA.debugLineNum = 212;BA.debugLine="table.Columns.Put(\"AffectedRows\", 0)"; -Debug.ShouldStop(524288); -_table.getField(false,"Columns" /*RemoteObject*/ ).runVoidMethod ("Put",(Object)(RemoteObject.createImmutable(("AffectedRows"))),(Object)(RemoteObject.createImmutable((0)))); - BA.debugLineNum = 213;BA.debugLine="Dim rows As Int = ReadInt(In)"; -Debug.ShouldStop(1048576); -_rows = __ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_readint" /*RemoteObject*/ ,(Object)(_in));Debug.locals.put("rows", _rows);Debug.locals.put("rows", _rows); - BA.debugLineNum = 214;BA.debugLine="For i = 0 To rows - 1"; -Debug.ShouldStop(2097152); -{ -final int step30 = 1; -final int limit30 = RemoteObject.solve(new RemoteObject[] {_rows,RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step30 > 0 && _i <= limit30) || (step30 < 0 && _i >= limit30) ;_i = ((int)(0 + _i + step30)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 215;BA.debugLine="table.rows.Add(Array As Object(ReadInt(In)))"; -Debug.ShouldStop(4194304); -_table.getField(false,"Rows" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_readint" /*RemoteObject*/ ,(Object)(_in)))})))); - } -}Debug.locals.put("i", _i); -; - }} -; - BA.debugLineNum = 218;BA.debugLine="In.Close"; -Debug.ShouldStop(33554432); -_in.runVoidMethod ("Close"); - BA.debugLineNum = 220;BA.debugLine="Return table"; -Debug.ShouldStop(134217728); -if (true) return _table; - BA.debugLineNum = 221;BA.debugLine="End Sub"; -Debug.ShouldStop(268435456); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _imagetobytes(RemoteObject __ref,RemoteObject _image) throws Exception{ -try { - Debug.PushSubsStack("ImageToBytes (dbrequestmanager) ","dbrequestmanager",20,__ref.getField(false, "ba"),__ref,233); -if (RapidSub.canDelegate("imagetobytes")) { return __ref.runUserSub(false, "dbrequestmanager","imagetobytes", __ref, _image);} -RemoteObject _out = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -Debug.locals.put("Image", _image); - BA.debugLineNum = 233;BA.debugLine="Public Sub ImageToBytes(Image As Bitmap) As Byte()"; -Debug.ShouldStop(256); - BA.debugLineNum = 234;BA.debugLine="Dim out As OutputStream"; -Debug.ShouldStop(512); -_out = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper");Debug.locals.put("out", _out); - BA.debugLineNum = 235;BA.debugLine="out.InitializeToBytesArray(0)"; -Debug.ShouldStop(1024); -_out.runVoidMethod ("InitializeToBytesArray",(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 236;BA.debugLine="Image.WriteToStream(out, 100, \"JPEG\")"; -Debug.ShouldStop(2048); -_image.runVoidMethod ("WriteToStream",(Object)((_out.getObject())),(Object)(BA.numberCast(int.class, 100)),(Object)(BA.getEnumFromString(BA.getDeviceClass("android.graphics.Bitmap.CompressFormat"),RemoteObject.createImmutable("JPEG")))); - BA.debugLineNum = 237;BA.debugLine="out.Close"; -Debug.ShouldStop(4096); -_out.runVoidMethod ("Close"); - BA.debugLineNum = 238;BA.debugLine="Return out.ToBytesArray"; -Debug.ShouldStop(8192); -if (true) return _out.runMethod(false,"ToBytesArray"); - BA.debugLineNum = 239;BA.debugLine="End Sub"; -Debug.ShouldStop(16384); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _target,RemoteObject _connectorlink) throws Exception{ -try { - Debug.PushSubsStack("Initialize (dbrequestmanager) ","dbrequestmanager",20,__ref.getField(false, "ba"),__ref,19); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "dbrequestmanager","initialize", __ref, _ba, _target, _connectorlink);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); -Debug.locals.put("Target", _target); -Debug.locals.put("ConnectorLink", _connectorlink); - BA.debugLineNum = 19;BA.debugLine="Public Sub Initialize (Target As Object, Connector"; -Debug.ShouldStop(262144); - BA.debugLineNum = 20;BA.debugLine="mTarget = Target"; -Debug.ShouldStop(524288); -__ref.setField ("_mtarget" /*RemoteObject*/ ,_target); - BA.debugLineNum = 21;BA.debugLine="link = ConnectorLink"; -Debug.ShouldStop(1048576); -__ref.setField ("_link" /*RemoteObject*/ ,_connectorlink); - BA.debugLineNum = 22;BA.debugLine="End Sub"; -Debug.ShouldStop(2097152); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _printtable(RemoteObject __ref,RemoteObject _table) throws Exception{ -try { - Debug.PushSubsStack("PrintTable (dbrequestmanager) ","dbrequestmanager",20,__ref.getField(false, "ba"),__ref,251); -if (RapidSub.canDelegate("printtable")) { return __ref.runUserSub(false, "dbrequestmanager","printtable", __ref, _table);} -RemoteObject _sb = RemoteObject.declareNull("anywheresoftware.b4a.keywords.StringBuilderWrapper"); -RemoteObject _col = RemoteObject.declareNull("Object"); -RemoteObject _row = null; -RemoteObject _record = RemoteObject.declareNull("Object"); -Debug.locals.put("Table", _table); - BA.debugLineNum = 251;BA.debugLine="Public Sub PrintTable(Table As DBResult)"; -Debug.ShouldStop(67108864); - BA.debugLineNum = 252;BA.debugLine="Log(\"Tag: \" & Table.Tag & \", Columns: \" & Table.C"; -Debug.ShouldStop(134217728); -dbrequestmanager.__c.runVoidMethod ("LogImpl","328180481",RemoteObject.concat(RemoteObject.createImmutable("Tag: "),_table.getField(false,"Tag" /*RemoteObject*/ ),RemoteObject.createImmutable(", Columns: "),_table.getField(false,"Columns" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(", Rows: "),_table.getField(false,"Rows" /*RemoteObject*/ ).runMethod(true,"getSize")),0); - BA.debugLineNum = 253;BA.debugLine="Dim sb As StringBuilder"; -Debug.ShouldStop(268435456); -_sb = RemoteObject.createNew ("anywheresoftware.b4a.keywords.StringBuilderWrapper");Debug.locals.put("sb", _sb); - BA.debugLineNum = 254;BA.debugLine="sb.Initialize"; -Debug.ShouldStop(536870912); -_sb.runVoidMethod ("Initialize"); - BA.debugLineNum = 255;BA.debugLine="For Each col In Table.Columns.Keys"; -Debug.ShouldStop(1073741824); -{ -final RemoteObject group4 = _table.getField(false,"Columns" /*RemoteObject*/ ).runMethod(false,"Keys"); -final int groupLen4 = group4.runMethod(true,"getSize").get() -;int index4 = 0; -; -for (; index4 < groupLen4;index4++){ -_col = group4.runMethod(false,"Get",index4);Debug.locals.put("col", _col); -Debug.locals.put("col", _col); - BA.debugLineNum = 256;BA.debugLine="sb.Append(col).Append(TAB)"; -Debug.ShouldStop(-2147483648); -_sb.runMethod(false,"Append",(Object)(BA.ObjectToString(_col))).runVoidMethod ("Append",(Object)(dbrequestmanager.__c.getField(true,"TAB"))); - } -}Debug.locals.put("col", _col); -; - BA.debugLineNum = 258;BA.debugLine="Log(sb.ToString)"; -Debug.ShouldStop(2); -dbrequestmanager.__c.runVoidMethod ("LogImpl","328180487",_sb.runMethod(true,"ToString"),0); - BA.debugLineNum = 259;BA.debugLine="For Each row() As Object In Table.Rows"; -Debug.ShouldStop(4); -{ -final RemoteObject group8 = _table.getField(false,"Rows" /*RemoteObject*/ ); -final int groupLen8 = group8.runMethod(true,"getSize").get() -;int index8 = 0; -; -for (; index8 < groupLen8;index8++){ -_row = (group8.runMethod(false,"Get",index8));Debug.locals.put("row", _row); -Debug.locals.put("row", _row); - BA.debugLineNum = 260;BA.debugLine="Dim sb As StringBuilder"; -Debug.ShouldStop(8); -_sb = RemoteObject.createNew ("anywheresoftware.b4a.keywords.StringBuilderWrapper");Debug.locals.put("sb", _sb); - BA.debugLineNum = 261;BA.debugLine="sb.Initialize"; -Debug.ShouldStop(16); -_sb.runVoidMethod ("Initialize"); - BA.debugLineNum = 262;BA.debugLine="For Each record As Object In row"; -Debug.ShouldStop(32); -{ -final RemoteObject group11 = _row; -final int groupLen11 = group11.getField(true,"length").get() -;int index11 = 0; -; -for (; index11 < groupLen11;index11++){ -_record = group11.getArrayElement(false,RemoteObject.createImmutable(index11));Debug.locals.put("record", _record); -Debug.locals.put("record", _record); - BA.debugLineNum = 263;BA.debugLine="sb.Append(record).Append(TAB)"; -Debug.ShouldStop(64); -_sb.runMethod(false,"Append",(Object)(BA.ObjectToString(_record))).runVoidMethod ("Append",(Object)(dbrequestmanager.__c.getField(true,"TAB"))); - } -}Debug.locals.put("record", _record); -; - BA.debugLineNum = 265;BA.debugLine="ToastMessageShow(sb.ToString, True)"; -Debug.ShouldStop(256); -dbrequestmanager.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence(_sb.runMethod(true,"ToString"))),(Object)(dbrequestmanager.__c.getField(true,"True"))); - } -}Debug.locals.put("row", _row); -; - BA.debugLineNum = 267;BA.debugLine="End Sub"; -Debug.ShouldStop(1024); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _readbyte(RemoteObject __ref,RemoteObject _in) throws Exception{ -try { - Debug.PushSubsStack("ReadByte (dbrequestmanager) ","dbrequestmanager",20,__ref.getField(false, "ba"),__ref,177); -if (RapidSub.canDelegate("readbyte")) { return __ref.runUserSub(false, "dbrequestmanager","readbyte", __ref, _in);} -RemoteObject _data = null; -Debug.locals.put("In", _in); - BA.debugLineNum = 177;BA.debugLine="Private Sub ReadByte(In As InputStream) As Byte"; -Debug.ShouldStop(65536); - BA.debugLineNum = 178;BA.debugLine="Dim data(1) As Byte"; -Debug.ShouldStop(131072); -_data = RemoteObject.createNewArray ("byte", new int[] {1}, new Object[]{});Debug.locals.put("data", _data); - BA.debugLineNum = 179;BA.debugLine="In.ReadBytes(data, 0, 1)"; -Debug.ShouldStop(262144); -_in.runVoidMethod ("ReadBytes",(Object)(_data),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 1))); - BA.debugLineNum = 180;BA.debugLine="Return data(0)"; -Debug.ShouldStop(524288); -if (true) return _data.getArrayElement(true,BA.numberCast(int.class, 0)); - BA.debugLineNum = 181;BA.debugLine="End Sub"; -Debug.ShouldStop(1048576); -return RemoteObject.createImmutable((byte)0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _readbytesfully(RemoteObject __ref,RemoteObject _in,RemoteObject _data,RemoteObject _len) throws Exception{ -try { - Debug.PushSubsStack("ReadBytesFully (dbrequestmanager) ","dbrequestmanager",20,__ref.getField(false, "ba"),__ref,157); -if (RapidSub.canDelegate("readbytesfully")) { return __ref.runUserSub(false, "dbrequestmanager","readbytesfully", __ref, _in, _data, _len);} -RemoteObject _count = RemoteObject.createImmutable(0); -RemoteObject _read = RemoteObject.createImmutable(0); -Debug.locals.put("In", _in); -Debug.locals.put("Data", _data); -Debug.locals.put("Len", _len); - BA.debugLineNum = 157;BA.debugLine="Private Sub ReadBytesFully(In As InputStream, Data"; -Debug.ShouldStop(268435456); - BA.debugLineNum = 158;BA.debugLine="Dim count = 0, read As Int"; -Debug.ShouldStop(536870912); -_count = BA.numberCast(int.class, 0);Debug.locals.put("count", _count);Debug.locals.put("count", _count); -_read = RemoteObject.createImmutable(0);Debug.locals.put("read", _read); - BA.debugLineNum = 159;BA.debugLine="Do While count < Len And read > -1"; -Debug.ShouldStop(1073741824); -while (RemoteObject.solveBoolean("<",_count,BA.numberCast(double.class, _len)) && RemoteObject.solveBoolean(">",_read,BA.numberCast(double.class, -(double) (0 + 1)))) { - BA.debugLineNum = 160;BA.debugLine="read = In.ReadBytes(Data, count, Len - count)"; -Debug.ShouldStop(-2147483648); -_read = _in.runMethod(true,"ReadBytes",(Object)(_data),(Object)(_count),(Object)(RemoteObject.solve(new RemoteObject[] {_len,_count}, "-",1, 1)));Debug.locals.put("read", _read); - BA.debugLineNum = 161;BA.debugLine="count = count + read"; -Debug.ShouldStop(1); -_count = RemoteObject.solve(new RemoteObject[] {_count,_read}, "+",1, 1);Debug.locals.put("count", _count); - } -; - BA.debugLineNum = 163;BA.debugLine="Return Data"; -Debug.ShouldStop(4); -if (true) return _data; - BA.debugLineNum = 164;BA.debugLine="End Sub"; -Debug.ShouldStop(8); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _readint(RemoteObject __ref,RemoteObject _in) throws Exception{ -try { - Debug.PushSubsStack("ReadInt (dbrequestmanager) ","dbrequestmanager",20,__ref.getField(false, "ba"),__ref,172); -if (RapidSub.canDelegate("readint")) { return __ref.runUserSub(false, "dbrequestmanager","readint", __ref, _in);} -RemoteObject _data = null; -Debug.locals.put("In", _in); - BA.debugLineNum = 172;BA.debugLine="Private Sub ReadInt(In As InputStream) As Int"; -Debug.ShouldStop(2048); - BA.debugLineNum = 173;BA.debugLine="Dim data(4) As Byte"; -Debug.ShouldStop(4096); -_data = RemoteObject.createNewArray ("byte", new int[] {4}, new Object[]{});Debug.locals.put("data", _data); - BA.debugLineNum = 174;BA.debugLine="Return bc.IntsFromBytes(ReadBytesFully(In, data,"; -Debug.ShouldStop(8192); -if (true) return __ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"IntsFromBytes",(Object)(__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_readbytesfully" /*RemoteObject*/ ,(Object)(_in),(Object)(_data),(Object)(_data.getField(true,"length"))))).getArrayElement(true,BA.numberCast(int.class, 0)); - BA.debugLineNum = 175;BA.debugLine="End Sub"; -Debug.ShouldStop(16384); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _readobject(RemoteObject __ref,RemoteObject _in) throws Exception{ -try { - Debug.PushSubsStack("ReadObject (dbrequestmanager) ","dbrequestmanager",20,__ref.getField(false, "ba"),__ref,121); -if (RapidSub.canDelegate("readobject")) { return __ref.runUserSub(false, "dbrequestmanager","readobject", __ref, _in);} -RemoteObject _data = null; -RemoteObject _b = RemoteObject.createImmutable((byte)0); -RemoteObject _len = RemoteObject.createImmutable(0); -Debug.locals.put("In", _in); - BA.debugLineNum = 121;BA.debugLine="Private Sub ReadObject(In As InputStream) As Objec"; -Debug.ShouldStop(16777216); - BA.debugLineNum = 122;BA.debugLine="Dim data(1) As Byte"; -Debug.ShouldStop(33554432); -_data = RemoteObject.createNewArray ("byte", new int[] {1}, new Object[]{});Debug.locals.put("data", _data); - BA.debugLineNum = 123;BA.debugLine="In.ReadBytes(data, 0, 1)"; -Debug.ShouldStop(67108864); -_in.runVoidMethod ("ReadBytes",(Object)(_data),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 1))); - BA.debugLineNum = 124;BA.debugLine="Select data(0)"; -Debug.ShouldStop(134217728); -switch (BA.switchObjectToInt(_data.getArrayElement(true,BA.numberCast(int.class, 0)),__ref.getField(true,"_t_null" /*RemoteObject*/ ),__ref.getField(true,"_t_short" /*RemoteObject*/ ),__ref.getField(true,"_t_int" /*RemoteObject*/ ),__ref.getField(true,"_t_long" /*RemoteObject*/ ),__ref.getField(true,"_t_float" /*RemoteObject*/ ),__ref.getField(true,"_t_double" /*RemoteObject*/ ),__ref.getField(true,"_t_boolean" /*RemoteObject*/ ),__ref.getField(true,"_t_blob" /*RemoteObject*/ ))) { -case 0: { - BA.debugLineNum = 126;BA.debugLine="Return Null"; -Debug.ShouldStop(536870912); -if (true) return dbrequestmanager.__c.getField(false,"Null"); - break; } -case 1: { - BA.debugLineNum = 128;BA.debugLine="Dim data(2) As Byte"; -Debug.ShouldStop(-2147483648); -_data = RemoteObject.createNewArray ("byte", new int[] {2}, new Object[]{});Debug.locals.put("data", _data); - BA.debugLineNum = 129;BA.debugLine="Return bc.ShortsFromBytes(ReadBytesFully(In, da"; -Debug.ShouldStop(1); -if (true) return (__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"ShortsFromBytes",(Object)(__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_readbytesfully" /*RemoteObject*/ ,(Object)(_in),(Object)(_data),(Object)(_data.getField(true,"length"))))).getArrayElement(true,BA.numberCast(int.class, 0))); - break; } -case 2: { - BA.debugLineNum = 131;BA.debugLine="Dim data(4) As Byte"; -Debug.ShouldStop(4); -_data = RemoteObject.createNewArray ("byte", new int[] {4}, new Object[]{});Debug.locals.put("data", _data); - BA.debugLineNum = 132;BA.debugLine="Return bc.IntsFromBytes(ReadBytesFully(In, data"; -Debug.ShouldStop(8); -if (true) return (__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"IntsFromBytes",(Object)(__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_readbytesfully" /*RemoteObject*/ ,(Object)(_in),(Object)(_data),(Object)(_data.getField(true,"length"))))).getArrayElement(true,BA.numberCast(int.class, 0))); - break; } -case 3: { - BA.debugLineNum = 134;BA.debugLine="Dim data(8) As Byte"; -Debug.ShouldStop(32); -_data = RemoteObject.createNewArray ("byte", new int[] {8}, new Object[]{});Debug.locals.put("data", _data); - BA.debugLineNum = 135;BA.debugLine="Return bc.LongsFromBytes(ReadBytesFully(In, dat"; -Debug.ShouldStop(64); -if (true) return (__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"LongsFromBytes",(Object)(__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_readbytesfully" /*RemoteObject*/ ,(Object)(_in),(Object)(_data),(Object)(_data.getField(true,"length"))))).getArrayElement(true,BA.numberCast(int.class, 0))); - break; } -case 4: { - BA.debugLineNum = 137;BA.debugLine="Dim data(4) As Byte"; -Debug.ShouldStop(256); -_data = RemoteObject.createNewArray ("byte", new int[] {4}, new Object[]{});Debug.locals.put("data", _data); - BA.debugLineNum = 138;BA.debugLine="Return bc.FloatsFromBytes(ReadBytesFully(In, da"; -Debug.ShouldStop(512); -if (true) return (__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"FloatsFromBytes",(Object)(__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_readbytesfully" /*RemoteObject*/ ,(Object)(_in),(Object)(_data),(Object)(_data.getField(true,"length"))))).getArrayElement(true,BA.numberCast(int.class, 0))); - break; } -case 5: { - BA.debugLineNum = 140;BA.debugLine="Dim data(8) As Byte"; -Debug.ShouldStop(2048); -_data = RemoteObject.createNewArray ("byte", new int[] {8}, new Object[]{});Debug.locals.put("data", _data); - BA.debugLineNum = 141;BA.debugLine="Return bc.DoublesFromBytes(ReadBytesFully(In, d"; -Debug.ShouldStop(4096); -if (true) return (__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"DoublesFromBytes",(Object)(__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_readbytesfully" /*RemoteObject*/ ,(Object)(_in),(Object)(_data),(Object)(_data.getField(true,"length"))))).getArrayElement(true,BA.numberCast(int.class, 0))); - break; } -case 6: { - BA.debugLineNum = 143;BA.debugLine="Dim b As Byte = ReadByte(In)"; -Debug.ShouldStop(16384); -_b = __ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_readbyte" /*RemoteObject*/ ,(Object)(_in));Debug.locals.put("b", _b);Debug.locals.put("b", _b); - BA.debugLineNum = 144;BA.debugLine="Return b = 1"; -Debug.ShouldStop(32768); -if (true) return RemoteObject.createImmutable((RemoteObject.solveBoolean("=",_b,BA.numberCast(double.class, 1)))); - break; } -case 7: { - BA.debugLineNum = 146;BA.debugLine="Dim len As Int = ReadInt(In)"; -Debug.ShouldStop(131072); -_len = __ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_readint" /*RemoteObject*/ ,(Object)(_in));Debug.locals.put("len", _len);Debug.locals.put("len", _len); - BA.debugLineNum = 147;BA.debugLine="Dim data(len) As Byte"; -Debug.ShouldStop(262144); -_data = RemoteObject.createNewArray ("byte", new int[] {_len.get().intValue()}, new Object[]{});Debug.locals.put("data", _data); - BA.debugLineNum = 148;BA.debugLine="Return ReadBytesFully(In, data, data.Length)"; -Debug.ShouldStop(524288); -if (true) return (__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_readbytesfully" /*RemoteObject*/ ,(Object)(_in),(Object)(_data),(Object)(_data.getField(true,"length")))); - break; } -default: { - BA.debugLineNum = 150;BA.debugLine="Dim len As Int = ReadInt(In)"; -Debug.ShouldStop(2097152); -_len = __ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_readint" /*RemoteObject*/ ,(Object)(_in));Debug.locals.put("len", _len);Debug.locals.put("len", _len); - BA.debugLineNum = 151;BA.debugLine="Dim data(len) As Byte"; -Debug.ShouldStop(4194304); -_data = RemoteObject.createNewArray ("byte", new int[] {_len.get().intValue()}, new Object[]{});Debug.locals.put("data", _data); - BA.debugLineNum = 152;BA.debugLine="ReadBytesFully(In, data, data.Length)"; -Debug.ShouldStop(8388608); -__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_readbytesfully" /*RemoteObject*/ ,(Object)(_in),(Object)(_data),(Object)(_data.getField(true,"length"))); - BA.debugLineNum = 153;BA.debugLine="Return BytesToString(data, 0, data.Length, \"UTF"; -Debug.ShouldStop(16777216); -if (true) return (dbrequestmanager.__c.runMethod(true,"BytesToString",(Object)(_data),(Object)(BA.numberCast(int.class, 0)),(Object)(_data.getField(true,"length")),(Object)(RemoteObject.createImmutable("UTF8")))); - break; } -} -; - BA.debugLineNum = 155;BA.debugLine="End Sub"; -Debug.ShouldStop(67108864); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _startjob(RemoteObject __ref,RemoteObject _j,RemoteObject _memorystream,RemoteObject _tag) throws Exception{ -try { - Debug.PushSubsStack("StartJob (dbrequestmanager) ","dbrequestmanager",20,__ref.getField(false, "ba"),__ref,61); -if (RapidSub.canDelegate("startjob")) { return __ref.runUserSub(false, "dbrequestmanager","startjob", __ref, _j, _memorystream, _tag);} -RemoteObject _compress = RemoteObject.declareNull("anywheresoftware.b4a.randomaccessfile.CompressedStreams"); -RemoteObject _out = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -Debug.locals.put("j", _j); -Debug.locals.put("MemoryStream", _memorystream); -Debug.locals.put("Tag", _tag); - BA.debugLineNum = 61;BA.debugLine="Private Sub StartJob(j As HttpJob, MemoryStream As"; -Debug.ShouldStop(268435456); - BA.debugLineNum = 62;BA.debugLine="j.Initialize(\"DBRequest\", mTarget)"; -Debug.ShouldStop(536870912); -_j.runClassMethod (keymon.lat.medicomed.httpjob.class, "_initialize" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(BA.ObjectToString("DBRequest")),(Object)(__ref.getField(false,"_mtarget" /*RemoteObject*/ ))); - BA.debugLineNum = 63;BA.debugLine="j.Tag = Tag"; -Debug.ShouldStop(1073741824); -_j.setField ("_tag" /*RemoteObject*/ ,_tag); - BA.debugLineNum = 64;BA.debugLine="MemoryStream.InitializeToBytesArray(0)"; -Debug.ShouldStop(-2147483648); -_memorystream.runVoidMethod ("InitializeToBytesArray",(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 65;BA.debugLine="Dim compress As CompressedStreams"; -Debug.ShouldStop(1); -_compress = RemoteObject.createNew ("anywheresoftware.b4a.randomaccessfile.CompressedStreams");Debug.locals.put("compress", _compress); - BA.debugLineNum = 66;BA.debugLine="Dim out As OutputStream = compress.WrapOutputStre"; -Debug.ShouldStop(2); -_out = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -_out = _compress.runMethod(false,"WrapOutputStream",(Object)((_memorystream.getObject())),(Object)(RemoteObject.createImmutable("gzip")));Debug.locals.put("out", _out);Debug.locals.put("out", _out); - BA.debugLineNum = 67;BA.debugLine="WriteObject(VERSION, out)"; -Debug.ShouldStop(4); -__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_writeobject" /*RemoteObject*/ ,(Object)((__ref.getField(true,"_version" /*RemoteObject*/ ))),(Object)(_out)); - BA.debugLineNum = 68;BA.debugLine="Return out"; -Debug.ShouldStop(8); -if (true) return _out; - BA.debugLineNum = 69;BA.debugLine="End Sub"; -Debug.ShouldStop(16); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _writeint(RemoteObject __ref,RemoteObject _i,RemoteObject _out) throws Exception{ -try { - Debug.PushSubsStack("WriteInt (dbrequestmanager) ","dbrequestmanager",20,__ref.getField(false, "ba"),__ref,166); -if (RapidSub.canDelegate("writeint")) { return __ref.runUserSub(false, "dbrequestmanager","writeint", __ref, _i, _out);} -RemoteObject _data = null; -Debug.locals.put("i", _i); -Debug.locals.put("out", _out); - BA.debugLineNum = 166;BA.debugLine="Private Sub WriteInt(i As Int, out As OutputStream"; -Debug.ShouldStop(32); - BA.debugLineNum = 167;BA.debugLine="Dim data() As Byte"; -Debug.ShouldStop(64); -_data = RemoteObject.createNewArray ("byte", new int[] {0}, new Object[]{});Debug.locals.put("data", _data); - BA.debugLineNum = 168;BA.debugLine="data = bc.IntsToBytes(Array As Int(i))"; -Debug.ShouldStop(128); -_data = __ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"IntsToBytes",(Object)(RemoteObject.createNewArray("int",new int[] {1},new Object[] {_i})));Debug.locals.put("data", _data); - BA.debugLineNum = 169;BA.debugLine="out.WriteBytes(data, 0, data.Length)"; -Debug.ShouldStop(256); -_out.runVoidMethod ("WriteBytes",(Object)(_data),(Object)(BA.numberCast(int.class, 0)),(Object)(_data.getField(true,"length"))); - BA.debugLineNum = 170;BA.debugLine="End Sub"; -Debug.ShouldStop(512); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _writelist(RemoteObject __ref,RemoteObject _parameters,RemoteObject _out) throws Exception{ -try { - Debug.PushSubsStack("WriteList (dbrequestmanager) ","dbrequestmanager",20,__ref.getField(false, "ba"),__ref,71); -if (RapidSub.canDelegate("writelist")) { return __ref.runUserSub(false, "dbrequestmanager","writelist", __ref, _parameters, _out);} -RemoteObject _data = null; -RemoteObject _o = RemoteObject.declareNull("Object"); -Debug.locals.put("out", _out); - BA.debugLineNum = 71;BA.debugLine="Private Sub WriteList(Parameters As List, out As O"; -Debug.ShouldStop(64); - BA.debugLineNum = 72;BA.debugLine="Dim data() As Byte"; -Debug.ShouldStop(128); -_data = RemoteObject.createNewArray ("byte", new int[] {0}, new Object[]{});Debug.locals.put("data", _data); - BA.debugLineNum = 73;BA.debugLine="If Parameters = Null Or Parameters.IsInitialized"; -Debug.ShouldStop(256); -if (RemoteObject.solveBoolean("n",_parameters) || RemoteObject.solveBoolean("=",_parameters.runMethod(true,"IsInitialized"),dbrequestmanager.__c.getField(true,"False"))) { - BA.debugLineNum = 74;BA.debugLine="Dim Parameters As List"; -Debug.ShouldStop(512); -_parameters = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");Debug.locals.put("Parameters", _parameters); - BA.debugLineNum = 75;BA.debugLine="Parameters.Initialize"; -Debug.ShouldStop(1024); -_parameters.runVoidMethod ("Initialize"); - }; - BA.debugLineNum = 77;BA.debugLine="data = bc.IntsToBytes(Array As Int(Parameters.Siz"; -Debug.ShouldStop(4096); -_data = __ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"IntsToBytes",(Object)(RemoteObject.createNewArray("int",new int[] {1},new Object[] {_parameters.runMethod(true,"getSize")})));Debug.locals.put("data", _data); - BA.debugLineNum = 78;BA.debugLine="out.WriteBytes(data, 0, data.Length)"; -Debug.ShouldStop(8192); -_out.runVoidMethod ("WriteBytes",(Object)(_data),(Object)(BA.numberCast(int.class, 0)),(Object)(_data.getField(true,"length"))); - BA.debugLineNum = 79;BA.debugLine="For Each o As Object In Parameters"; -Debug.ShouldStop(16384); -{ -final RemoteObject group8 = _parameters; -final int groupLen8 = group8.runMethod(true,"getSize").get() -;int index8 = 0; -; -for (; index8 < groupLen8;index8++){ -_o = group8.runMethod(false,"Get",index8);Debug.locals.put("o", _o); -Debug.locals.put("o", _o); - BA.debugLineNum = 80;BA.debugLine="WriteObject(o, out)"; -Debug.ShouldStop(32768); -__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_writeobject" /*RemoteObject*/ ,(Object)(_o),(Object)(_out)); - } -}Debug.locals.put("o", _o); -; - BA.debugLineNum = 82;BA.debugLine="End Sub"; -Debug.ShouldStop(131072); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _writeobject(RemoteObject __ref,RemoteObject _o,RemoteObject _out) throws Exception{ -try { - Debug.PushSubsStack("WriteObject (dbrequestmanager) ","dbrequestmanager",20,__ref.getField(false, "ba"),__ref,84); -if (RapidSub.canDelegate("writeobject")) { return __ref.runUserSub(false, "dbrequestmanager","writeobject", __ref, _o, _out);} -RemoteObject _data = null; -RemoteObject _b = RemoteObject.createImmutable(false); -Debug.locals.put("o", _o); -Debug.locals.put("out", _out); - BA.debugLineNum = 84;BA.debugLine="Private Sub WriteObject(o As Object, out As Output"; -Debug.ShouldStop(524288); - BA.debugLineNum = 85;BA.debugLine="Dim data() As Byte"; -Debug.ShouldStop(1048576); -_data = RemoteObject.createNewArray ("byte", new int[] {0}, new Object[]{});Debug.locals.put("data", _data); - BA.debugLineNum = 86;BA.debugLine="tempArray(0) = o"; -Debug.ShouldStop(2097152); -__ref.getField(false,"_temparray" /*RemoteObject*/ ).setArrayElement (_o,BA.numberCast(int.class, 0)); - BA.debugLineNum = 87;BA.debugLine="If tempArray(0) = Null Then"; -Debug.ShouldStop(4194304); -if (RemoteObject.solveBoolean("n",__ref.getField(false,"_temparray" /*RemoteObject*/ ).getArrayElement(false,BA.numberCast(int.class, 0)))) { - BA.debugLineNum = 88;BA.debugLine="out.WriteBytes(Array As Byte(T_NULL), 0, 1)"; -Debug.ShouldStop(8388608); -_out.runVoidMethod ("WriteBytes",(Object)(RemoteObject.createNewArray("byte",new int[] {1},new Object[] {__ref.getField(true,"_t_null" /*RemoteObject*/ )})),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 1))); - }else -{ BA.debugLineNum = 89;BA.debugLine="Else If tempArray(0) Is Short Then"; -Debug.ShouldStop(16777216); -if (RemoteObject.solveBoolean("i",__ref.getField(false,"_temparray" /*RemoteObject*/ ).getArrayElement(false,BA.numberCast(int.class, 0)), RemoteObject.createImmutable("Short"))) { - BA.debugLineNum = 90;BA.debugLine="out.WriteBytes(Array As Byte(T_SHORT), 0, 1)"; -Debug.ShouldStop(33554432); -_out.runVoidMethod ("WriteBytes",(Object)(RemoteObject.createNewArray("byte",new int[] {1},new Object[] {__ref.getField(true,"_t_short" /*RemoteObject*/ )})),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 1))); - BA.debugLineNum = 91;BA.debugLine="data = bc.ShortsToBytes(Array As Short(o))"; -Debug.ShouldStop(67108864); -_data = __ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"ShortsToBytes",(Object)(RemoteObject.createNewArray("short",new int[] {1},new Object[] {BA.numberCast(short.class, _o)})));Debug.locals.put("data", _data); - }else -{ BA.debugLineNum = 92;BA.debugLine="Else If tempArray(0) Is Int Then"; -Debug.ShouldStop(134217728); -if (RemoteObject.solveBoolean("i",__ref.getField(false,"_temparray" /*RemoteObject*/ ).getArrayElement(false,BA.numberCast(int.class, 0)), RemoteObject.createImmutable("Integer"))) { - BA.debugLineNum = 93;BA.debugLine="out.WriteBytes(Array As Byte(T_INT), 0, 1)"; -Debug.ShouldStop(268435456); -_out.runVoidMethod ("WriteBytes",(Object)(RemoteObject.createNewArray("byte",new int[] {1},new Object[] {__ref.getField(true,"_t_int" /*RemoteObject*/ )})),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 1))); - BA.debugLineNum = 94;BA.debugLine="data = bc.IntsToBytes(Array As Int(o))"; -Debug.ShouldStop(536870912); -_data = __ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"IntsToBytes",(Object)(RemoteObject.createNewArray("int",new int[] {1},new Object[] {BA.numberCast(int.class, _o)})));Debug.locals.put("data", _data); - }else -{ BA.debugLineNum = 95;BA.debugLine="Else If tempArray(0) Is Float Then"; -Debug.ShouldStop(1073741824); -if (RemoteObject.solveBoolean("i",__ref.getField(false,"_temparray" /*RemoteObject*/ ).getArrayElement(false,BA.numberCast(int.class, 0)), RemoteObject.createImmutable("Float"))) { - BA.debugLineNum = 96;BA.debugLine="out.WriteBytes(Array As Byte(T_FLOAT), 0, 1)"; -Debug.ShouldStop(-2147483648); -_out.runVoidMethod ("WriteBytes",(Object)(RemoteObject.createNewArray("byte",new int[] {1},new Object[] {__ref.getField(true,"_t_float" /*RemoteObject*/ )})),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 1))); - BA.debugLineNum = 97;BA.debugLine="data = bc.FloatsToBytes(Array As Float(o))"; -Debug.ShouldStop(1); -_data = __ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"FloatsToBytes",(Object)(RemoteObject.createNewArray("float",new int[] {1},new Object[] {BA.numberCast(float.class, _o)})));Debug.locals.put("data", _data); - }else -{ BA.debugLineNum = 98;BA.debugLine="Else If tempArray(0) Is Double Then"; -Debug.ShouldStop(2); -if (RemoteObject.solveBoolean("i",__ref.getField(false,"_temparray" /*RemoteObject*/ ).getArrayElement(false,BA.numberCast(int.class, 0)), RemoteObject.createImmutable("Double"))) { - BA.debugLineNum = 99;BA.debugLine="out.WriteBytes(Array As Byte(T_DOUBLE), 0, 1)"; -Debug.ShouldStop(4); -_out.runVoidMethod ("WriteBytes",(Object)(RemoteObject.createNewArray("byte",new int[] {1},new Object[] {__ref.getField(true,"_t_double" /*RemoteObject*/ )})),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 1))); - BA.debugLineNum = 100;BA.debugLine="data = bc.DoublesToBytes(Array As Double(o))"; -Debug.ShouldStop(8); -_data = __ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"DoublesToBytes",(Object)(RemoteObject.createNewArray("double",new int[] {1},new Object[] {BA.numberCast(double.class, _o)})));Debug.locals.put("data", _data); - }else -{ BA.debugLineNum = 101;BA.debugLine="Else If tempArray(0) Is Long Then"; -Debug.ShouldStop(16); -if (RemoteObject.solveBoolean("i",__ref.getField(false,"_temparray" /*RemoteObject*/ ).getArrayElement(false,BA.numberCast(int.class, 0)), RemoteObject.createImmutable("Long"))) { - BA.debugLineNum = 102;BA.debugLine="out.WriteBytes(Array As Byte(T_LONG), 0, 1)"; -Debug.ShouldStop(32); -_out.runVoidMethod ("WriteBytes",(Object)(RemoteObject.createNewArray("byte",new int[] {1},new Object[] {__ref.getField(true,"_t_long" /*RemoteObject*/ )})),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 1))); - BA.debugLineNum = 103;BA.debugLine="data = bc.LongsToBytes(Array As Long(o))"; -Debug.ShouldStop(64); -_data = __ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"LongsToBytes",(Object)(RemoteObject.createNewArray("long",new int[] {1},new Object[] {BA.numberCast(long.class, _o)})));Debug.locals.put("data", _data); - }else -{ BA.debugLineNum = 104;BA.debugLine="Else If tempArray(0) Is Boolean Then"; -Debug.ShouldStop(128); -if (RemoteObject.solveBoolean("i",__ref.getField(false,"_temparray" /*RemoteObject*/ ).getArrayElement(false,BA.numberCast(int.class, 0)), RemoteObject.createImmutable("Boolean"))) { - BA.debugLineNum = 105;BA.debugLine="out.WriteBytes(Array As Byte(T_BOOLEAN), 0, 1)"; -Debug.ShouldStop(256); -_out.runVoidMethod ("WriteBytes",(Object)(RemoteObject.createNewArray("byte",new int[] {1},new Object[] {__ref.getField(true,"_t_boolean" /*RemoteObject*/ )})),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 1))); - BA.debugLineNum = 106;BA.debugLine="Dim b As Boolean = 0"; -Debug.ShouldStop(512); -_b = BA.ObjectToBoolean(0);Debug.locals.put("b", _b);Debug.locals.put("b", _b); - BA.debugLineNum = 107;BA.debugLine="Dim data(1) As Byte"; -Debug.ShouldStop(1024); -_data = RemoteObject.createNewArray ("byte", new int[] {1}, new Object[]{});Debug.locals.put("data", _data); - BA.debugLineNum = 108;BA.debugLine="If b Then data(0) = 1 Else data(0) = 0"; -Debug.ShouldStop(2048); -if (_b.get().booleanValue()) { -_data.setArrayElement (BA.numberCast(byte.class, 1),BA.numberCast(int.class, 0));} -else { -_data.setArrayElement (BA.numberCast(byte.class, 0),BA.numberCast(int.class, 0));}; - }else -{ BA.debugLineNum = 109;BA.debugLine="Else If GetType(tempArray(0)) = \"[B\" Then"; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean("=",dbrequestmanager.__c.runMethod(true,"GetType",(Object)(__ref.getField(false,"_temparray" /*RemoteObject*/ ).getArrayElement(false,BA.numberCast(int.class, 0)))),BA.ObjectToString("[B"))) { - BA.debugLineNum = 110;BA.debugLine="data = o"; -Debug.ShouldStop(8192); -_data = (_o);Debug.locals.put("data", _data); - BA.debugLineNum = 111;BA.debugLine="out.WriteBytes(Array As Byte(T_BLOB), 0, 1)"; -Debug.ShouldStop(16384); -_out.runVoidMethod ("WriteBytes",(Object)(RemoteObject.createNewArray("byte",new int[] {1},new Object[] {__ref.getField(true,"_t_blob" /*RemoteObject*/ )})),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 1))); - BA.debugLineNum = 112;BA.debugLine="WriteInt(data.Length, out)"; -Debug.ShouldStop(32768); -__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_writeint" /*RemoteObject*/ ,(Object)(_data.getField(true,"length")),(Object)(_out)); - }else { - BA.debugLineNum = 114;BA.debugLine="out.WriteBytes(Array As Byte(T_STRING), 0, 1)"; -Debug.ShouldStop(131072); -_out.runVoidMethod ("WriteBytes",(Object)(RemoteObject.createNewArray("byte",new int[] {1},new Object[] {__ref.getField(true,"_t_string" /*RemoteObject*/ )})),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 1))); - BA.debugLineNum = 115;BA.debugLine="data = bc.StringToBytes(o, \"UTF8\")"; -Debug.ShouldStop(262144); -_data = __ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"StringToBytes",(Object)(BA.ObjectToString(_o)),(Object)(RemoteObject.createImmutable("UTF8")));Debug.locals.put("data", _data); - BA.debugLineNum = 116;BA.debugLine="WriteInt(data.Length, out)"; -Debug.ShouldStop(524288); -__ref.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_writeint" /*RemoteObject*/ ,(Object)(_data.getField(true,"length")),(Object)(_out)); - }}}}}}}} -; - BA.debugLineNum = 118;BA.debugLine="If data.Length > 0 Then out.WriteBytes(data, 0, d"; -Debug.ShouldStop(2097152); -if (RemoteObject.solveBoolean(">",_data.getField(true,"length"),BA.numberCast(double.class, 0))) { -_out.runVoidMethod ("WriteBytes",(Object)(_data),(Object)(BA.numberCast(int.class, 0)),(Object)(_data.getField(true,"length")));}; - BA.debugLineNum = 119;BA.debugLine="End Sub"; -Debug.ShouldStop(4194304); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/fileprovider.java b/B4A/Objects/shell/src/keymon/lat/medicomed/fileprovider.java deleted file mode 100644 index 18de24e..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/fileprovider.java +++ /dev/null @@ -1,32 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class fileprovider { - public static RemoteObject myClass; - public fileprovider() { - } - public static PCBA staticBA = new PCBA(null, fileprovider.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _sharedfolder = RemoteObject.createImmutable(""); -public static RemoteObject _usefileprovider = RemoteObject.createImmutable(false); -public static RemoteObject _rp = RemoteObject.declareNull("anywheresoftware.b4a.objects.RuntimePermissions"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"DateUtils",_ref.getField(false, "_dateutils"),"rp",_ref.getField(false, "_rp"),"SharedFolder",_ref.getField(false, "_sharedfolder"),"UseFileProvider",_ref.getField(false, "_usefileprovider")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/fileprovider_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/fileprovider_subs_0.java deleted file mode 100644 index e26551d..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/fileprovider_subs_0.java +++ /dev/null @@ -1,147 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class fileprovider_subs_0 { - - -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 2;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 3;BA.debugLine="Public SharedFolder As String"; -fileprovider._sharedfolder = RemoteObject.createImmutable("");__ref.setField("_sharedfolder",fileprovider._sharedfolder); - //BA.debugLineNum = 4;BA.debugLine="Public UseFileProvider As Boolean"; -fileprovider._usefileprovider = RemoteObject.createImmutable(false);__ref.setField("_usefileprovider",fileprovider._usefileprovider); - //BA.debugLineNum = 5;BA.debugLine="Private rp As RuntimePermissions"; -fileprovider._rp = RemoteObject.createNew ("anywheresoftware.b4a.objects.RuntimePermissions");__ref.setField("_rp",fileprovider._rp); - //BA.debugLineNum = 6;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _getfileuri(RemoteObject __ref,RemoteObject _filename) throws Exception{ -try { - Debug.PushSubsStack("GetFileUri (fileprovider) ","fileprovider",64,__ref.getField(false, "ba"),__ref,22); -if (RapidSub.canDelegate("getfileuri")) { return __ref.runUserSub(false, "fileprovider","getfileuri", __ref, _filename);} -RemoteObject _uri = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _f = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _fp = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _context = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -Debug.locals.put("FileName", _filename); - BA.debugLineNum = 22;BA.debugLine="Public Sub GetFileUri (FileName As String) As Obje"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 24;BA.debugLine="If UseFileProvider = False Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_usefileprovider" /*RemoteObject*/ ),fileprovider.__c.getField(true,"False"))) { - BA.debugLineNum = 25;BA.debugLine="Dim uri As JavaObject"; -Debug.JustUpdateDeviceLine(); -_uri = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("uri", _uri); - BA.debugLineNum = 26;BA.debugLine="Return uri.InitializeStatic(\"android.net.Uri\").R"; -Debug.JustUpdateDeviceLine(); -if (true) return _uri.runMethod(false,"InitializeStatic",(Object)(RemoteObject.createImmutable("android.net.Uri"))).runMethod(false,"RunMethod",(Object)(BA.ObjectToString("parse")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(RemoteObject.concat(RemoteObject.createImmutable("file://"),fileprovider.__c.getField(false,"File").runMethod(true,"Combine",(Object)(__ref.getField(true,"_sharedfolder" /*RemoteObject*/ )),(Object)(_filename))))}))); - }else { - BA.debugLineNum = 28;BA.debugLine="Dim f As JavaObject"; -Debug.JustUpdateDeviceLine(); -_f = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("f", _f); - BA.debugLineNum = 29;BA.debugLine="f.InitializeNewInstance(\"java.io.File\", Array(Sh"; -Debug.JustUpdateDeviceLine(); -_f.runVoidMethod ("InitializeNewInstance",(Object)(BA.ObjectToString("java.io.File")),(Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(__ref.getField(true,"_sharedfolder" /*RemoteObject*/ )),(_filename)}))); - BA.debugLineNum = 30;BA.debugLine="Dim fp As JavaObject"; -Debug.JustUpdateDeviceLine(); -_fp = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("fp", _fp); - BA.debugLineNum = 31;BA.debugLine="Dim context As JavaObject"; -Debug.JustUpdateDeviceLine(); -_context = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("context", _context); - BA.debugLineNum = 32;BA.debugLine="context.InitializeContext"; -Debug.JustUpdateDeviceLine(); -_context.runVoidMethod ("InitializeContext",__ref.getField(false, "ba")); - BA.debugLineNum = 33;BA.debugLine="fp.InitializeStatic(\"android.support.v4.content."; -Debug.JustUpdateDeviceLine(); -_fp.runVoidMethod ("InitializeStatic",(Object)(RemoteObject.createImmutable("androidx.core.content.FileProvider"))); - BA.debugLineNum = 34;BA.debugLine="Return fp.RunMethod(\"getUriForFile\", Array(conte"; -Debug.JustUpdateDeviceLine(); -if (true) return _fp.runMethod(false,"RunMethod",(Object)(BA.ObjectToString("getUriForFile")),(Object)(RemoteObject.createNewArray("Object",new int[] {3},new Object[] {(_context.getObject()),(RemoteObject.concat(fileprovider.__c.getField(false,"Application").runMethod(true,"getPackageName"),RemoteObject.createImmutable(".provider"))),(_f.getObject())}))); - }; - BA.debugLineNum = 36;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (fileprovider) ","fileprovider",64,__ref.getField(false, "ba"),__ref,8); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "fileprovider","initialize", __ref, _ba);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.phone.Phone"); -Debug.locals.put("ba", _ba); - BA.debugLineNum = 8;BA.debugLine="Public Sub Initialize"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 9;BA.debugLine="Dim p As Phone"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.phone.Phone");Debug.locals.put("p", _p); - BA.debugLineNum = 10;BA.debugLine="If p.SdkVersion >= 24 Or File.ExternalWritable ="; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("g",_p.runMethod(true,"getSdkVersion"),BA.numberCast(double.class, 24)) || RemoteObject.solveBoolean("=",fileprovider.__c.getField(false,"File").runMethod(true,"getExternalWritable"),fileprovider.__c.getField(true,"False"))) { - BA.debugLineNum = 11;BA.debugLine="UseFileProvider = True"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_usefileprovider" /*RemoteObject*/ ,fileprovider.__c.getField(true,"True")); - BA.debugLineNum = 12;BA.debugLine="SharedFolder = File.Combine(File.DirInternal, \"s"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sharedfolder" /*RemoteObject*/ ,fileprovider.__c.getField(false,"File").runMethod(true,"Combine",(Object)(fileprovider.__c.getField(false,"File").runMethod(true,"getDirInternal")),(Object)(RemoteObject.createImmutable("shared")))); - BA.debugLineNum = 13;BA.debugLine="File.MakeDir(\"\", SharedFolder)"; -Debug.JustUpdateDeviceLine(); -fileprovider.__c.getField(false,"File").runVoidMethod ("MakeDir",(Object)(BA.ObjectToString("")),(Object)(__ref.getField(true,"_sharedfolder" /*RemoteObject*/ ))); - }else { - BA.debugLineNum = 15;BA.debugLine="UseFileProvider = False"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_usefileprovider" /*RemoteObject*/ ,fileprovider.__c.getField(true,"False")); - BA.debugLineNum = 16;BA.debugLine="SharedFolder = rp.GetSafeDirDefaultExternal(\"sha"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sharedfolder" /*RemoteObject*/ ,__ref.getField(false,"_rp" /*RemoteObject*/ ).runMethod(true,"GetSafeDirDefaultExternal",(Object)(RemoteObject.createImmutable("shared")))); - }; - BA.debugLineNum = 18;BA.debugLine="Log($\"Using FileProvider? ${UseFileProvider}\"$)"; -Debug.JustUpdateDeviceLine(); -fileprovider.__c.runVoidMethod ("LogImpl","966322442",(RemoteObject.concat(RemoteObject.createImmutable("Using FileProvider? "),fileprovider.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((__ref.getField(true,"_usefileprovider" /*RemoteObject*/ )))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 19;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setfileuriasintentdata(RemoteObject __ref,RemoteObject _intent,RemoteObject _filename) throws Exception{ -try { - Debug.PushSubsStack("SetFileUriAsIntentData (fileprovider) ","fileprovider",64,__ref.getField(false, "ba"),__ref,40); -if (RapidSub.canDelegate("setfileuriasintentdata")) { return __ref.runUserSub(false, "fileprovider","setfileuriasintentdata", __ref, _intent, _filename);} -RemoteObject _jo = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -Debug.locals.put("Intent", _intent); -Debug.locals.put("FileName", _filename); - BA.debugLineNum = 40;BA.debugLine="Public Sub SetFileUriAsIntentData (Intent As Inten"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 41;BA.debugLine="Dim jo As JavaObject = Intent"; -Debug.JustUpdateDeviceLine(); -_jo = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_jo = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), _intent.getObject());Debug.locals.put("jo", _jo);Debug.locals.put("jo", _jo); - BA.debugLineNum = 42;BA.debugLine="jo.RunMethod(\"setData\", Array(GetFileUri(FileName"; -Debug.JustUpdateDeviceLine(); -_jo.runVoidMethod ("RunMethod",(Object)(BA.ObjectToString("setData")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {__ref.runClassMethod (keymon.lat.medicomed.fileprovider.class, "_getfileuri" /*RemoteObject*/ ,(Object)(_filename))}))); - BA.debugLineNum = 43;BA.debugLine="Intent.Flags = Bit.Or(Intent.Flags, 1) 'FLAG_GRAN"; -Debug.JustUpdateDeviceLine(); -_intent.runMethod(true,"setFlags",fileprovider.__c.getField(false,"Bit").runMethod(true,"Or",(Object)(_intent.runMethod(true,"getFlags")),(Object)(BA.numberCast(int.class, 1)))); - BA.debugLineNum = 44;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/httpjob.java b/B4A/Objects/shell/src/keymon/lat/medicomed/httpjob.java deleted file mode 100644 index 2b10981..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/httpjob.java +++ /dev/null @@ -1,41 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class httpjob { - public static RemoteObject myClass; - public httpjob() { - } - public static PCBA staticBA = new PCBA(null, httpjob.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _jobname = RemoteObject.createImmutable(""); -public static RemoteObject _success = RemoteObject.createImmutable(false); -public static RemoteObject _username = RemoteObject.createImmutable(""); -public static RemoteObject _password = RemoteObject.createImmutable(""); -public static RemoteObject _errormessage = RemoteObject.createImmutable(""); -public static RemoteObject _target = RemoteObject.declareNull("Object"); -public static RemoteObject _taskid = RemoteObject.createImmutable(""); -public static RemoteObject _req = RemoteObject.declareNull("anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest"); -public static RemoteObject _response = RemoteObject.declareNull("anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpResponse"); -public static RemoteObject _tag = RemoteObject.declareNull("Object"); -public static RemoteObject _invalidurl = RemoteObject.createImmutable(""); -public static RemoteObject _defaultscheme = RemoteObject.createImmutable(""); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"DateUtils",_ref.getField(false, "_dateutils"),"DefaultScheme",_ref.getField(false, "_defaultscheme"),"ErrorMessage",_ref.getField(false, "_errormessage"),"InvalidURL",_ref.getField(false, "_invalidurl"),"JobName",_ref.getField(false, "_jobname"),"Password",_ref.getField(false, "_password"),"req",_ref.getField(false, "_req"),"Response",_ref.getField(false, "_response"),"Success",_ref.getField(false, "_success"),"Tag",_ref.getField(false, "_tag"),"target",_ref.getField(false, "_target"),"taskId",_ref.getField(false, "_taskid"),"Username",_ref.getField(false, "_username")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/httpjob_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/httpjob_subs_0.java deleted file mode 100644 index 608c0e2..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/httpjob_subs_0.java +++ /dev/null @@ -1,969 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class httpjob_subs_0 { - - -public static RemoteObject _addscheme(RemoteObject __ref,RemoteObject _link) throws Exception{ -try { - Debug.PushSubsStack("AddScheme (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,52); -if (RapidSub.canDelegate("addscheme")) { return __ref.runUserSub(false, "httpjob","addscheme", __ref, _link);} -Debug.locals.put("Link", _link); - BA.debugLineNum = 52;BA.debugLine="Private Sub AddScheme (Link As String) As String"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 53;BA.debugLine="If DefaultScheme = \"\" Or Link.Contains(\":\") Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_defaultscheme" /*RemoteObject*/ ),BA.ObjectToString("")) || RemoteObject.solveBoolean(".",_link.runMethod(true,"contains",(Object)(RemoteObject.createImmutable(":"))))) { -if (true) return _link;}; - BA.debugLineNum = 54;BA.debugLine="Return DefaultScheme & \"://\" & Link"; -Debug.JustUpdateDeviceLine(); -if (true) return RemoteObject.concat(__ref.getField(true,"_defaultscheme" /*RemoteObject*/ ),RemoteObject.createImmutable("://"),_link); - BA.debugLineNum = 55;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 2;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 3;BA.debugLine="Public JobName As String"; -httpjob._jobname = RemoteObject.createImmutable("");__ref.setField("_jobname",httpjob._jobname); - //BA.debugLineNum = 4;BA.debugLine="Public Success As Boolean"; -httpjob._success = RemoteObject.createImmutable(false);__ref.setField("_success",httpjob._success); - //BA.debugLineNum = 5;BA.debugLine="Public Username, Password As String"; -httpjob._username = RemoteObject.createImmutable("");__ref.setField("_username",httpjob._username); -httpjob._password = RemoteObject.createImmutable("");__ref.setField("_password",httpjob._password); - //BA.debugLineNum = 6;BA.debugLine="Public ErrorMessage As String"; -httpjob._errormessage = RemoteObject.createImmutable("");__ref.setField("_errormessage",httpjob._errormessage); - //BA.debugLineNum = 7;BA.debugLine="Private target As Object"; -httpjob._target = RemoteObject.createNew ("Object");__ref.setField("_target",httpjob._target); - //BA.debugLineNum = 13;BA.debugLine="Private taskId As String"; -httpjob._taskid = RemoteObject.createImmutable("");__ref.setField("_taskid",httpjob._taskid); - //BA.debugLineNum = 15;BA.debugLine="Private req As OkHttpRequest"; -httpjob._req = RemoteObject.createNew ("anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest");__ref.setField("_req",httpjob._req); - //BA.debugLineNum = 16;BA.debugLine="Public Response As OkHttpResponse"; -httpjob._response = RemoteObject.createNew ("anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpResponse");__ref.setField("_response",httpjob._response); - //BA.debugLineNum = 25;BA.debugLine="Public Tag As Object"; -httpjob._tag = RemoteObject.createNew ("Object");__ref.setField("_tag",httpjob._tag); - //BA.debugLineNum = 26;BA.debugLine="Type MultipartFileData (Dir As String, FileName A"; -; - //BA.debugLineNum = 30;BA.debugLine="Private Const InvalidURL As String = \"https://inv"; -httpjob._invalidurl = BA.ObjectToString("https://invalid-url/");__ref.setField("_invalidurl",httpjob._invalidurl); - //BA.debugLineNum = 31;BA.debugLine="Public DefaultScheme As String = \"https\""; -httpjob._defaultscheme = BA.ObjectToString("https");__ref.setField("_defaultscheme",httpjob._defaultscheme); - //BA.debugLineNum = 32;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _complete(RemoteObject __ref,RemoteObject _id) throws Exception{ -try { - Debug.PushSubsStack("Complete (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,315); -if (RapidSub.canDelegate("complete")) { return __ref.runUserSub(false, "httpjob","complete", __ref, _id);} -Debug.locals.put("id", _id); - BA.debugLineNum = 315;BA.debugLine="Public Sub Complete (id As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 316;BA.debugLine="taskId = id"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_taskid" /*RemoteObject*/ ,BA.NumberToString(_id)); - BA.debugLineNum = 317;BA.debugLine="CallSubDelayed2(target, \"JobDone\", Me)"; -Debug.JustUpdateDeviceLine(); -httpjob.__c.runVoidMethod ("CallSubDelayed2",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_target" /*RemoteObject*/ )),(Object)(BA.ObjectToString("JobDone")),(Object)(__ref)); - BA.debugLineNum = 318;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _delete(RemoteObject __ref,RemoteObject _link) throws Exception{ -try { - Debug.PushSubsStack("Delete (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,261); -if (RapidSub.canDelegate("delete")) { return __ref.runUserSub(false, "httpjob","delete", __ref, _link);} -Debug.locals.put("Link", _link); - BA.debugLineNum = 261;BA.debugLine="Public Sub Delete(Link As String)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 262;BA.debugLine="Try"; -Debug.JustUpdateDeviceLine(); -try { BA.debugLineNum = 263;BA.debugLine="Link = AddScheme(Link)"; -Debug.JustUpdateDeviceLine(); -_link = __ref.runClassMethod (keymon.lat.medicomed.httpjob.class, "_addscheme" /*RemoteObject*/ ,(Object)(_link));Debug.locals.put("Link", _link); - BA.debugLineNum = 264;BA.debugLine="req.InitializeDelete(Link)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_req" /*RemoteObject*/ ).runVoidMethod ("InitializeDelete",(Object)(_link)); - Debug.CheckDeviceExceptions(); -} - catch (Exception e5) { - BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e5.toString()); BA.debugLineNum = 266;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; -Debug.JustUpdateDeviceLine(); -httpjob.__c.runVoidMethod ("LogImpl","943319301",(RemoteObject.concat(RemoteObject.createImmutable("Invalid link: "),httpjob.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_link))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 267;BA.debugLine="req.InitializeDelete(InvalidURL)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_req" /*RemoteObject*/ ).runVoidMethod ("InitializeDelete",(Object)(__ref.getField(true,"_invalidurl" /*RemoteObject*/ ))); - }; - BA.debugLineNum = 269;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; -Debug.JustUpdateDeviceLine(); -httpjob.__c.runVoidMethod ("CallSubDelayed2",__ref.getField(false, "ba"),(Object)((httpjob._httputils2service.getObject())),(Object)(BA.ObjectToString("SubmitJob")),(Object)(__ref)); - BA.debugLineNum = 270;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _delete2(RemoteObject __ref,RemoteObject _link,RemoteObject _parameters) throws Exception{ -try { - Debug.PushSubsStack("Delete2 (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,272); -if (RapidSub.canDelegate("delete2")) { return __ref.runUserSub(false, "httpjob","delete2", __ref, _link, _parameters);} -Debug.locals.put("Link", _link); -Debug.locals.put("Parameters", _parameters); - BA.debugLineNum = 272;BA.debugLine="Public Sub Delete2(Link As String, Parameters() As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 273;BA.debugLine="Try"; -Debug.JustUpdateDeviceLine(); -try { BA.debugLineNum = 274;BA.debugLine="Link = AddScheme(Link)"; -Debug.JustUpdateDeviceLine(); -_link = __ref.runClassMethod (keymon.lat.medicomed.httpjob.class, "_addscheme" /*RemoteObject*/ ,(Object)(_link));Debug.locals.put("Link", _link); - BA.debugLineNum = 275;BA.debugLine="req.InitializeDelete(escapeLink(Link, Parameters"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_req" /*RemoteObject*/ ).runVoidMethod ("InitializeDelete",(Object)(__ref.runClassMethod (keymon.lat.medicomed.httpjob.class, "_escapelink" /*RemoteObject*/ ,(Object)(_link),(Object)(_parameters)))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e5) { - BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e5.toString()); BA.debugLineNum = 277;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; -Debug.JustUpdateDeviceLine(); -httpjob.__c.runVoidMethod ("LogImpl","943384837",(RemoteObject.concat(RemoteObject.createImmutable("Invalid link: "),httpjob.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_link))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 278;BA.debugLine="req.InitializeDelete(escapeLink(InvalidURL, Para"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_req" /*RemoteObject*/ ).runVoidMethod ("InitializeDelete",(Object)(__ref.runClassMethod (keymon.lat.medicomed.httpjob.class, "_escapelink" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_invalidurl" /*RemoteObject*/ )),(Object)(_parameters)))); - }; - BA.debugLineNum = 280;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; -Debug.JustUpdateDeviceLine(); -httpjob.__c.runVoidMethod ("CallSubDelayed2",__ref.getField(false, "ba"),(Object)((httpjob._httputils2service.getObject())),(Object)(BA.ObjectToString("SubmitJob")),(Object)(__ref)); - BA.debugLineNum = 281;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _download(RemoteObject __ref,RemoteObject _link) throws Exception{ -try { - Debug.PushSubsStack("Download (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,219); -if (RapidSub.canDelegate("download")) { return __ref.runUserSub(false, "httpjob","download", __ref, _link);} -Debug.locals.put("Link", _link); - BA.debugLineNum = 219;BA.debugLine="Public Sub Download(Link As String)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 220;BA.debugLine="Try"; -Debug.JustUpdateDeviceLine(); -try { BA.debugLineNum = 221;BA.debugLine="Link = AddScheme(Link)"; -Debug.JustUpdateDeviceLine(); -_link = __ref.runClassMethod (keymon.lat.medicomed.httpjob.class, "_addscheme" /*RemoteObject*/ ,(Object)(_link));Debug.locals.put("Link", _link); - BA.debugLineNum = 222;BA.debugLine="req.InitializeGet(Link)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_req" /*RemoteObject*/ ).runVoidMethod ("InitializeGet",(Object)(_link)); - Debug.CheckDeviceExceptions(); -} - catch (Exception e5) { - BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e5.toString()); BA.debugLineNum = 224;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; -Debug.JustUpdateDeviceLine(); -httpjob.__c.runVoidMethod ("LogImpl","943122693",(RemoteObject.concat(RemoteObject.createImmutable("Invalid link: "),httpjob.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_link))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 225;BA.debugLine="req.InitializeGet(InvalidURL)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_req" /*RemoteObject*/ ).runVoidMethod ("InitializeGet",(Object)(__ref.getField(true,"_invalidurl" /*RemoteObject*/ ))); - }; - BA.debugLineNum = 227;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; -Debug.JustUpdateDeviceLine(); -httpjob.__c.runVoidMethod ("CallSubDelayed2",__ref.getField(false, "ba"),(Object)((httpjob._httputils2service.getObject())),(Object)(BA.ObjectToString("SubmitJob")),(Object)(__ref)); - BA.debugLineNum = 228;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _download2(RemoteObject __ref,RemoteObject _link,RemoteObject _parameters) throws Exception{ -try { - Debug.PushSubsStack("Download2 (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,235); -if (RapidSub.canDelegate("download2")) { return __ref.runUserSub(false, "httpjob","download2", __ref, _link, _parameters);} -Debug.locals.put("Link", _link); -Debug.locals.put("Parameters", _parameters); - BA.debugLineNum = 235;BA.debugLine="Public Sub Download2(Link As String, Parameters()"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 236;BA.debugLine="Try"; -Debug.JustUpdateDeviceLine(); -try { BA.debugLineNum = 237;BA.debugLine="Link = AddScheme(Link)"; -Debug.JustUpdateDeviceLine(); -_link = __ref.runClassMethod (keymon.lat.medicomed.httpjob.class, "_addscheme" /*RemoteObject*/ ,(Object)(_link));Debug.locals.put("Link", _link); - BA.debugLineNum = 238;BA.debugLine="req.InitializeGet(escapeLink(Link, Parameters))"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_req" /*RemoteObject*/ ).runVoidMethod ("InitializeGet",(Object)(__ref.runClassMethod (keymon.lat.medicomed.httpjob.class, "_escapelink" /*RemoteObject*/ ,(Object)(_link),(Object)(_parameters)))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e5) { - BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e5.toString()); BA.debugLineNum = 240;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; -Debug.JustUpdateDeviceLine(); -httpjob.__c.runVoidMethod ("LogImpl","943188229",(RemoteObject.concat(RemoteObject.createImmutable("Invalid link: "),httpjob.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_link))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 241;BA.debugLine="req.InitializeGet(escapeLink(InvalidURL, Paramet"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_req" /*RemoteObject*/ ).runVoidMethod ("InitializeGet",(Object)(__ref.runClassMethod (keymon.lat.medicomed.httpjob.class, "_escapelink" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_invalidurl" /*RemoteObject*/ )),(Object)(_parameters)))); - }; - BA.debugLineNum = 243;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; -Debug.JustUpdateDeviceLine(); -httpjob.__c.runVoidMethod ("CallSubDelayed2",__ref.getField(false, "ba"),(Object)((httpjob._httputils2service.getObject())),(Object)(BA.ObjectToString("SubmitJob")),(Object)(__ref)); - BA.debugLineNum = 244;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _escapelink(RemoteObject __ref,RemoteObject _link,RemoteObject _parameters) throws Exception{ -try { - Debug.PushSubsStack("escapeLink (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,246); -if (RapidSub.canDelegate("escapelink")) { return __ref.runUserSub(false, "httpjob","escapelink", __ref, _link, _parameters);} -RemoteObject _sb = RemoteObject.declareNull("anywheresoftware.b4a.keywords.StringBuilderWrapper"); -RemoteObject _su = RemoteObject.declareNull("anywheresoftware.b4a.objects.StringUtils"); -int _i = 0; -Debug.locals.put("Link", _link); -Debug.locals.put("Parameters", _parameters); - BA.debugLineNum = 246;BA.debugLine="Private Sub escapeLink(Link As String, Parameters("; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 247;BA.debugLine="Dim sb As StringBuilder"; -Debug.JustUpdateDeviceLine(); -_sb = RemoteObject.createNew ("anywheresoftware.b4a.keywords.StringBuilderWrapper");Debug.locals.put("sb", _sb); - BA.debugLineNum = 248;BA.debugLine="sb.Initialize"; -Debug.JustUpdateDeviceLine(); -_sb.runVoidMethod ("Initialize"); - BA.debugLineNum = 249;BA.debugLine="sb.Append(Link)"; -Debug.JustUpdateDeviceLine(); -_sb.runVoidMethod ("Append",(Object)(_link)); - BA.debugLineNum = 250;BA.debugLine="If Parameters.Length > 0 Then sb.Append(\"?\")"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",_parameters.getField(true,"length"),BA.numberCast(double.class, 0))) { -_sb.runVoidMethod ("Append",(Object)(RemoteObject.createImmutable("?")));}; - BA.debugLineNum = 251;BA.debugLine="Dim su As StringUtils"; -Debug.JustUpdateDeviceLine(); -_su = RemoteObject.createNew ("anywheresoftware.b4a.objects.StringUtils");Debug.locals.put("su", _su); - BA.debugLineNum = 252;BA.debugLine="For i = 0 To Parameters.Length - 1 Step 2"; -Debug.JustUpdateDeviceLine(); -{ -final int step6 = 2; -final int limit6 = RemoteObject.solve(new RemoteObject[] {_parameters.getField(true,"length"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step6 > 0 && _i <= limit6) || (step6 < 0 && _i >= limit6) ;_i = ((int)(0 + _i + step6)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 253;BA.debugLine="If i > 0 Then sb.Append(\"&\")"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",RemoteObject.createImmutable(_i),BA.numberCast(double.class, 0))) { -_sb.runVoidMethod ("Append",(Object)(RemoteObject.createImmutable("&")));}; - BA.debugLineNum = 254;BA.debugLine="sb.Append(su.EncodeUrl(Parameters(i), \"UTF8\")).A"; -Debug.JustUpdateDeviceLine(); -_sb.runMethod(false,"Append",(Object)(_su.runMethod(true,"EncodeUrl",(Object)(_parameters.getArrayElement(true,BA.numberCast(int.class, _i))),(Object)(RemoteObject.createImmutable("UTF8"))))).runVoidMethod ("Append",(Object)(RemoteObject.createImmutable("="))); - BA.debugLineNum = 255;BA.debugLine="sb.Append(su.EncodeUrl(Parameters(i + 1), \"UTF8\""; -Debug.JustUpdateDeviceLine(); -_sb.runVoidMethod ("Append",(Object)(_su.runMethod(true,"EncodeUrl",(Object)(_parameters.getArrayElement(true,RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_i),RemoteObject.createImmutable(1)}, "+",1, 1))),(Object)(RemoteObject.createImmutable("UTF8"))))); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 257;BA.debugLine="Return sb.ToString"; -Debug.JustUpdateDeviceLine(); -if (true) return _sb.runMethod(true,"ToString"); - BA.debugLineNum = 258;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getbitmap(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetBitmap (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,330); -if (RapidSub.canDelegate("getbitmap")) { return __ref.runUserSub(false, "httpjob","getbitmap", __ref);} -RemoteObject _b = RemoteObject.declareNull("anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper"); - BA.debugLineNum = 330;BA.debugLine="Public Sub GetBitmap As Bitmap"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 331;BA.debugLine="Dim b As Bitmap"; -Debug.JustUpdateDeviceLine(); -_b = RemoteObject.createNew ("anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper");Debug.locals.put("b", _b); - BA.debugLineNum = 332;BA.debugLine="b = LoadBitmap(HttpUtils2Service.TempFolder, task"; -Debug.JustUpdateDeviceLine(); -_b = httpjob.__c.runMethod(false,"LoadBitmap",(Object)(httpjob._httputils2service._tempfolder /*RemoteObject*/ ),(Object)(__ref.getField(true,"_taskid" /*RemoteObject*/ )));Debug.locals.put("b", _b); - BA.debugLineNum = 333;BA.debugLine="Return b"; -Debug.JustUpdateDeviceLine(); -if (true) return _b; - BA.debugLineNum = 334;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getbitmapresize(RemoteObject __ref,RemoteObject _width,RemoteObject _height,RemoteObject _keepaspectratio) throws Exception{ -try { - Debug.PushSubsStack("GetBitmapResize (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,341); -if (RapidSub.canDelegate("getbitmapresize")) { return __ref.runUserSub(false, "httpjob","getbitmapresize", __ref, _width, _height, _keepaspectratio);} -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); -Debug.locals.put("KeepAspectRatio", _keepaspectratio); - BA.debugLineNum = 341;BA.debugLine="Public Sub GetBitmapResize(Width As Int, Height As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 342;BA.debugLine="Return LoadBitmapResize(HttpUtils2Service.TempFol"; -Debug.JustUpdateDeviceLine(); -if (true) return httpjob.__c.runMethod(false,"LoadBitmapResize",(Object)(httpjob._httputils2service._tempfolder /*RemoteObject*/ ),(Object)(__ref.getField(true,"_taskid" /*RemoteObject*/ )),(Object)(_width),(Object)(_height),(Object)(_keepaspectratio)); - BA.debugLineNum = 343;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getbitmapsample(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("GetBitmapSample (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,337); -if (RapidSub.canDelegate("getbitmapsample")) { return __ref.runUserSub(false, "httpjob","getbitmapsample", __ref, _width, _height);} -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 337;BA.debugLine="Public Sub GetBitmapSample(Width As Int, Height As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 338;BA.debugLine="Return LoadBitmapSample(HttpUtils2Service.TempFol"; -Debug.JustUpdateDeviceLine(); -if (true) return httpjob.__c.runMethod(false,"LoadBitmapSample",(Object)(httpjob._httputils2service._tempfolder /*RemoteObject*/ ),(Object)(__ref.getField(true,"_taskid" /*RemoteObject*/ )),(Object)(_width),(Object)(_height)); - BA.debugLineNum = 339;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getinputstream(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetInputStream (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,347); -if (RapidSub.canDelegate("getinputstream")) { return __ref.runUserSub(false, "httpjob","getinputstream", __ref);} -RemoteObject _in = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.InputStreamWrapper"); - BA.debugLineNum = 347;BA.debugLine="Public Sub GetInputStream As InputStream"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 348;BA.debugLine="Dim In As InputStream"; -Debug.JustUpdateDeviceLine(); -_in = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.InputStreamWrapper");Debug.locals.put("In", _in); - BA.debugLineNum = 349;BA.debugLine="In = File.OpenInput(HttpUtils2Service.TempFolder,"; -Debug.JustUpdateDeviceLine(); -_in = httpjob.__c.getField(false,"File").runMethod(false,"OpenInput",(Object)(httpjob._httputils2service._tempfolder /*RemoteObject*/ ),(Object)(__ref.getField(true,"_taskid" /*RemoteObject*/ )));Debug.locals.put("In", _in); - BA.debugLineNum = 350;BA.debugLine="Return In"; -Debug.JustUpdateDeviceLine(); -if (true) return _in; - BA.debugLineNum = 351;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getrequest(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetRequest (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,310); -if (RapidSub.canDelegate("getrequest")) { return __ref.runUserSub(false, "httpjob","getrequest", __ref);} - BA.debugLineNum = 310;BA.debugLine="Public Sub GetRequest As OkHttpRequest"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 311;BA.debugLine="Return req"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_req" /*RemoteObject*/ ); - BA.debugLineNum = 312;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getstring(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetString (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,291); -if (RapidSub.canDelegate("getstring")) { return __ref.runUserSub(false, "httpjob","getstring", __ref);} - BA.debugLineNum = 291;BA.debugLine="Public Sub GetString As String"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 292;BA.debugLine="Return GetString2(\"UTF8\")"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.runClassMethod (keymon.lat.medicomed.httpjob.class, "_getstring2" /*RemoteObject*/ ,(Object)(RemoteObject.createImmutable("UTF8"))); - BA.debugLineNum = 293;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getstring2(RemoteObject __ref,RemoteObject _encoding) throws Exception{ -try { - Debug.PushSubsStack("GetString2 (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,296); -if (RapidSub.canDelegate("getstring2")) { return __ref.runUserSub(false, "httpjob","getstring2", __ref, _encoding);} -RemoteObject _tr = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.TextReaderWrapper"); -RemoteObject _res = RemoteObject.createImmutable(""); -Debug.locals.put("Encoding", _encoding); - BA.debugLineNum = 296;BA.debugLine="Public Sub GetString2(Encoding As String) As Strin"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 300;BA.debugLine="Dim tr As TextReader"; -Debug.JustUpdateDeviceLine(); -_tr = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.TextReaderWrapper");Debug.locals.put("tr", _tr); - BA.debugLineNum = 301;BA.debugLine="tr.Initialize2(File.OpenInput(HttpUtils2Service.T"; -Debug.JustUpdateDeviceLine(); -_tr.runVoidMethod ("Initialize2",(Object)((httpjob.__c.getField(false,"File").runMethod(false,"OpenInput",(Object)(httpjob._httputils2service._tempfolder /*RemoteObject*/ ),(Object)(__ref.getField(true,"_taskid" /*RemoteObject*/ ))).getObject())),(Object)(_encoding)); - BA.debugLineNum = 302;BA.debugLine="Dim res As String = tr.ReadAll"; -Debug.JustUpdateDeviceLine(); -_res = _tr.runMethod(true,"ReadAll");Debug.locals.put("res", _res);Debug.locals.put("res", _res); - BA.debugLineNum = 303;BA.debugLine="tr.Close"; -Debug.JustUpdateDeviceLine(); -_tr.runVoidMethod ("Close"); - BA.debugLineNum = 304;BA.debugLine="Return res"; -Debug.JustUpdateDeviceLine(); -if (true) return _res; - BA.debugLineNum = 306;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _head(RemoteObject __ref,RemoteObject _link) throws Exception{ -try { - Debug.PushSubsStack("Head (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,119); -if (RapidSub.canDelegate("head")) { return __ref.runUserSub(false, "httpjob","head", __ref, _link);} -Debug.locals.put("Link", _link); - BA.debugLineNum = 119;BA.debugLine="Public Sub Head(Link As String)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 120;BA.debugLine="Try"; -Debug.JustUpdateDeviceLine(); -try { BA.debugLineNum = 121;BA.debugLine="Link = AddScheme(Link)"; -Debug.JustUpdateDeviceLine(); -_link = __ref.runClassMethod (keymon.lat.medicomed.httpjob.class, "_addscheme" /*RemoteObject*/ ,(Object)(_link));Debug.locals.put("Link", _link); - BA.debugLineNum = 122;BA.debugLine="req.InitializeHead(Link)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_req" /*RemoteObject*/ ).runVoidMethod ("InitializeHead",(Object)(_link)); - Debug.CheckDeviceExceptions(); -} - catch (Exception e5) { - BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e5.toString()); BA.debugLineNum = 124;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; -Debug.JustUpdateDeviceLine(); -httpjob.__c.runVoidMethod ("LogImpl","942860549",(RemoteObject.concat(RemoteObject.createImmutable("Invalid link: "),httpjob.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_link))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 125;BA.debugLine="req.InitializeHead(InvalidURL)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_req" /*RemoteObject*/ ).runVoidMethod ("InitializeHead",(Object)(__ref.getField(true,"_invalidurl" /*RemoteObject*/ ))); - }; - BA.debugLineNum = 127;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; -Debug.JustUpdateDeviceLine(); -httpjob.__c.runVoidMethod ("CallSubDelayed2",__ref.getField(false, "ba"),(Object)((httpjob._httputils2service.getObject())),(Object)(BA.ObjectToString("SubmitJob")),(Object)(__ref)); - BA.debugLineNum = 128;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _name,RemoteObject _targetmodule) throws Exception{ -try { - Debug.PushSubsStack("Initialize (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,38); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "httpjob","initialize", __ref, _ba, _name, _targetmodule);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); -Debug.locals.put("Name", _name); -Debug.locals.put("TargetModule", _targetmodule); - BA.debugLineNum = 38;BA.debugLine="Public Sub Initialize (Name As String, TargetModul"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 39;BA.debugLine="JobName = Name"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_jobname" /*RemoteObject*/ ,_name); - BA.debugLineNum = 40;BA.debugLine="target = TargetModule"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_target" /*RemoteObject*/ ,_targetmodule); - BA.debugLineNum = 48;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _multipartstartsection(RemoteObject __ref,RemoteObject _stream,RemoteObject _empty) throws Exception{ -try { - Debug.PushSubsStack("MultipartStartSection (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,179); -if (RapidSub.canDelegate("multipartstartsection")) { return __ref.runUserSub(false, "httpjob","multipartstartsection", __ref, _stream, _empty);} -Debug.locals.put("stream", _stream); -Debug.locals.put("empty", _empty); - BA.debugLineNum = 179;BA.debugLine="Private Sub MultipartStartSection (stream As Outpu"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 180;BA.debugLine="If empty = False Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_empty,httpjob.__c.getField(true,"False"))) { - BA.debugLineNum = 181;BA.debugLine="stream.WriteBytes(Array As Byte(13, 10), 0, 2)"; -Debug.JustUpdateDeviceLine(); -_stream.runVoidMethod ("WriteBytes",(Object)(RemoteObject.createNewArray("byte",new int[] {2},new Object[] {BA.numberCast(byte.class, 13),BA.numberCast(byte.class, 10)})),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 2))); - }else { - BA.debugLineNum = 183;BA.debugLine="empty = False"; -Debug.JustUpdateDeviceLine(); -_empty = httpjob.__c.getField(true,"False");Debug.locals.put("empty", _empty); - }; - BA.debugLineNum = 185;BA.debugLine="Return empty"; -Debug.JustUpdateDeviceLine(); -if (true) return _empty; - BA.debugLineNum = 186;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _patchbytes(RemoteObject __ref,RemoteObject _link,RemoteObject _data) throws Exception{ -try { - Debug.PushSubsStack("PatchBytes (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,97); -if (RapidSub.canDelegate("patchbytes")) { return __ref.runUserSub(false, "httpjob","patchbytes", __ref, _link, _data);} -Debug.locals.put("Link", _link); -Debug.locals.put("Data", _data); - BA.debugLineNum = 97;BA.debugLine="Public Sub PatchBytes(Link As String, Data() As By"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 98;BA.debugLine="Link = AddScheme(Link)"; -Debug.JustUpdateDeviceLine(); -_link = __ref.runClassMethod (keymon.lat.medicomed.httpjob.class, "_addscheme" /*RemoteObject*/ ,(Object)(_link));Debug.locals.put("Link", _link); - BA.debugLineNum = 106;BA.debugLine="Try"; -Debug.JustUpdateDeviceLine(); -try { BA.debugLineNum = 107;BA.debugLine="req.InitializePatch2(Link, Data)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_req" /*RemoteObject*/ ).runVoidMethod ("InitializePatch2",(Object)(_link),(Object)(_data)); - Debug.CheckDeviceExceptions(); -} - catch (Exception e5) { - BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e5.toString()); BA.debugLineNum = 109;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; -Debug.JustUpdateDeviceLine(); -httpjob.__c.runVoidMethod ("LogImpl","942795020",(RemoteObject.concat(RemoteObject.createImmutable("Invalid link: "),httpjob.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_link))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 110;BA.debugLine="req.InitializePatch2(InvalidURL, Data)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_req" /*RemoteObject*/ ).runVoidMethod ("InitializePatch2",(Object)(__ref.getField(true,"_invalidurl" /*RemoteObject*/ )),(Object)(_data)); - }; - BA.debugLineNum = 114;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; -Debug.JustUpdateDeviceLine(); -httpjob.__c.runVoidMethod ("CallSubDelayed2",__ref.getField(false, "ba"),(Object)((httpjob._httputils2service.getObject())),(Object)(BA.ObjectToString("SubmitJob")),(Object)(__ref)); - BA.debugLineNum = 115;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _patchstring(RemoteObject __ref,RemoteObject _link,RemoteObject _text) throws Exception{ -try { - Debug.PushSubsStack("PatchString (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,92); -if (RapidSub.canDelegate("patchstring")) { return __ref.runUserSub(false, "httpjob","patchstring", __ref, _link, _text);} -Debug.locals.put("Link", _link); -Debug.locals.put("Text", _text); - BA.debugLineNum = 92;BA.debugLine="Public Sub PatchString(Link As String, Text As Str"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 93;BA.debugLine="PatchBytes(Link, Text.GetBytes(\"UTF8\"))"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.httpjob.class, "_patchbytes" /*RemoteObject*/ ,(Object)(_link),(Object)(_text.runMethod(false,"getBytes",(Object)(RemoteObject.createImmutable("UTF8"))))); - BA.debugLineNum = 94;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _postbytes(RemoteObject __ref,RemoteObject _link,RemoteObject _data) throws Exception{ -try { - Debug.PushSubsStack("PostBytes (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,63); -if (RapidSub.canDelegate("postbytes")) { return __ref.runUserSub(false, "httpjob","postbytes", __ref, _link, _data);} -Debug.locals.put("Link", _link); -Debug.locals.put("Data", _data); - BA.debugLineNum = 63;BA.debugLine="Public Sub PostBytes(Link As String, Data() As Byt"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 64;BA.debugLine="Try"; -Debug.JustUpdateDeviceLine(); -try { BA.debugLineNum = 65;BA.debugLine="Link = AddScheme(Link)"; -Debug.JustUpdateDeviceLine(); -_link = __ref.runClassMethod (keymon.lat.medicomed.httpjob.class, "_addscheme" /*RemoteObject*/ ,(Object)(_link));Debug.locals.put("Link", _link); - BA.debugLineNum = 66;BA.debugLine="req.InitializePost2(Link, Data)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_req" /*RemoteObject*/ ).runVoidMethod ("InitializePost2",(Object)(_link),(Object)(_data)); - Debug.CheckDeviceExceptions(); -} - catch (Exception e5) { - BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e5.toString()); BA.debugLineNum = 68;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; -Debug.JustUpdateDeviceLine(); -httpjob.__c.runVoidMethod ("LogImpl","942532869",(RemoteObject.concat(RemoteObject.createImmutable("Invalid link: "),httpjob.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_link))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 69;BA.debugLine="req.InitializePost2(InvalidURL, Data)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_req" /*RemoteObject*/ ).runVoidMethod ("InitializePost2",(Object)(__ref.getField(true,"_invalidurl" /*RemoteObject*/ )),(Object)(_data)); - }; - BA.debugLineNum = 71;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; -Debug.JustUpdateDeviceLine(); -httpjob.__c.runVoidMethod ("CallSubDelayed2",__ref.getField(false, "ba"),(Object)((httpjob._httputils2service.getObject())),(Object)(BA.ObjectToString("SubmitJob")),(Object)(__ref)); - BA.debugLineNum = 72;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _postfile(RemoteObject __ref,RemoteObject _link,RemoteObject _dir,RemoteObject _filename) throws Exception{ -try { - Debug.PushSubsStack("PostFile (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,190); -if (RapidSub.canDelegate("postfile")) { return __ref.runUserSub(false, "httpjob","postfile", __ref, _link, _dir, _filename);} -RemoteObject _length = RemoteObject.createImmutable(0); -RemoteObject _in = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.InputStreamWrapper"); -RemoteObject _out = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -Debug.locals.put("Link", _link); -Debug.locals.put("Dir", _dir); -Debug.locals.put("FileName", _filename); - BA.debugLineNum = 190;BA.debugLine="Public Sub PostFile(Link As String, Dir As String,"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 191;BA.debugLine="Link = AddScheme(Link)"; -Debug.JustUpdateDeviceLine(); -_link = __ref.runClassMethod (keymon.lat.medicomed.httpjob.class, "_addscheme" /*RemoteObject*/ ,(Object)(_link));Debug.locals.put("Link", _link); - BA.debugLineNum = 196;BA.debugLine="Dim length As Int"; -Debug.JustUpdateDeviceLine(); -_length = RemoteObject.createImmutable(0);Debug.locals.put("length", _length); - BA.debugLineNum = 197;BA.debugLine="If Dir = File.DirAssets Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_dir,httpjob.__c.getField(false,"File").runMethod(true,"getDirAssets"))) { - BA.debugLineNum = 198;BA.debugLine="Log(\"Cannot send files from the assets folder.\")"; -Debug.JustUpdateDeviceLine(); -httpjob.__c.runVoidMethod ("LogImpl","943057160",RemoteObject.createImmutable("Cannot send files from the assets folder."),0); - BA.debugLineNum = 199;BA.debugLine="Return"; -Debug.JustUpdateDeviceLine(); -if (true) return RemoteObject.createImmutable(""); - }; - BA.debugLineNum = 201;BA.debugLine="length = File.Size(Dir, FileName)"; -Debug.JustUpdateDeviceLine(); -_length = BA.numberCast(int.class, httpjob.__c.getField(false,"File").runMethod(true,"Size",(Object)(_dir),(Object)(_filename)));Debug.locals.put("length", _length); - BA.debugLineNum = 202;BA.debugLine="Dim In As InputStream"; -Debug.JustUpdateDeviceLine(); -_in = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.InputStreamWrapper");Debug.locals.put("In", _in); - BA.debugLineNum = 203;BA.debugLine="In = File.OpenInput(Dir, FileName)"; -Debug.JustUpdateDeviceLine(); -_in = httpjob.__c.getField(false,"File").runMethod(false,"OpenInput",(Object)(_dir),(Object)(_filename));Debug.locals.put("In", _in); - BA.debugLineNum = 204;BA.debugLine="If length < 1000000 Then '1mb"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("<",_length,BA.numberCast(double.class, 1000000))) { - BA.debugLineNum = 207;BA.debugLine="Dim out As OutputStream"; -Debug.JustUpdateDeviceLine(); -_out = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper");Debug.locals.put("out", _out); - BA.debugLineNum = 208;BA.debugLine="out.InitializeToBytesArray(length)"; -Debug.JustUpdateDeviceLine(); -_out.runVoidMethod ("InitializeToBytesArray",(Object)(_length)); - BA.debugLineNum = 209;BA.debugLine="File.Copy2(In, out)"; -Debug.JustUpdateDeviceLine(); -httpjob.__c.getField(false,"File").runVoidMethod ("Copy2",(Object)((_in.getObject())),(Object)((_out.getObject()))); - BA.debugLineNum = 210;BA.debugLine="PostBytes(Link, out.ToBytesArray)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.httpjob.class, "_postbytes" /*RemoteObject*/ ,(Object)(_link),(Object)(_out.runMethod(false,"ToBytesArray"))); - }else { - BA.debugLineNum = 212;BA.debugLine="req.InitializePost(Link, In, length)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_req" /*RemoteObject*/ ).runVoidMethod ("InitializePost",(Object)(_link),(Object)((_in.getObject())),(Object)(_length)); - BA.debugLineNum = 213;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\","; -Debug.JustUpdateDeviceLine(); -httpjob.__c.runVoidMethod ("CallSubDelayed2",__ref.getField(false, "ba"),(Object)((httpjob._httputils2service.getObject())),(Object)(BA.ObjectToString("SubmitJob")),(Object)(__ref)); - }; - BA.debugLineNum = 216;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _postmultipart(RemoteObject __ref,RemoteObject _link,RemoteObject _namevalues,RemoteObject _files) throws Exception{ -try { - Debug.PushSubsStack("PostMultipart (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,133); -if (RapidSub.canDelegate("postmultipart")) { return __ref.runUserSub(false, "httpjob","postmultipart", __ref, _link, _namevalues, _files);} -RemoteObject _boundary = RemoteObject.createImmutable(""); -RemoteObject _stream = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -RemoteObject _b = null; -RemoteObject _eol = RemoteObject.createImmutable(""); -RemoteObject _empty = RemoteObject.createImmutable(false); -RemoteObject _key = RemoteObject.createImmutable(""); -RemoteObject _value = RemoteObject.createImmutable(""); -RemoteObject _s = RemoteObject.createImmutable(""); -RemoteObject _fd = RemoteObject.declareNull("keymon.lat.medicomed.httpjob._multipartfiledata"); -RemoteObject _in = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.InputStreamWrapper"); -Debug.locals.put("Link", _link); -Debug.locals.put("NameValues", _namevalues); -Debug.locals.put("Files", _files); - BA.debugLineNum = 133;BA.debugLine="Public Sub PostMultipart(Link As String, NameValue"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 134;BA.debugLine="Dim boundary As String = \"-----------------------"; -Debug.JustUpdateDeviceLine(); -_boundary = BA.ObjectToString("---------------------------1461124740692");Debug.locals.put("boundary", _boundary);Debug.locals.put("boundary", _boundary); - BA.debugLineNum = 135;BA.debugLine="Dim stream As OutputStream"; -Debug.JustUpdateDeviceLine(); -_stream = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper");Debug.locals.put("stream", _stream); - BA.debugLineNum = 136;BA.debugLine="stream.InitializeToBytesArray(0)"; -Debug.JustUpdateDeviceLine(); -_stream.runVoidMethod ("InitializeToBytesArray",(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 137;BA.debugLine="Dim b() As Byte"; -Debug.JustUpdateDeviceLine(); -_b = RemoteObject.createNewArray ("byte", new int[] {0}, new Object[]{});Debug.locals.put("b", _b); - BA.debugLineNum = 138;BA.debugLine="Dim eol As String = Chr(13) & Chr(10)"; -Debug.JustUpdateDeviceLine(); -_eol = RemoteObject.concat(httpjob.__c.runMethod(true,"Chr",(Object)(BA.numberCast(int.class, 13))),httpjob.__c.runMethod(true,"Chr",(Object)(BA.numberCast(int.class, 10))));Debug.locals.put("eol", _eol);Debug.locals.put("eol", _eol); - BA.debugLineNum = 139;BA.debugLine="Dim empty As Boolean = True"; -Debug.JustUpdateDeviceLine(); -_empty = httpjob.__c.getField(true,"True");Debug.locals.put("empty", _empty);Debug.locals.put("empty", _empty); - BA.debugLineNum = 140;BA.debugLine="If NameValues <> Null And NameValues.IsInitialize"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("N",_namevalues) && RemoteObject.solveBoolean(".",_namevalues.runMethod(true,"IsInitialized"))) { - BA.debugLineNum = 141;BA.debugLine="For Each key As String In NameValues.Keys"; -Debug.JustUpdateDeviceLine(); -{ -final RemoteObject group8 = _namevalues.runMethod(false,"Keys"); -final int groupLen8 = group8.runMethod(true,"getSize").get() -;int index8 = 0; -; -for (; index8 < groupLen8;index8++){ -_key = BA.ObjectToString(group8.runMethod(false,"Get",index8));Debug.locals.put("key", _key); -Debug.locals.put("key", _key); - BA.debugLineNum = 142;BA.debugLine="Dim value As String = NameValues.Get(key)"; -Debug.JustUpdateDeviceLine(); -_value = BA.ObjectToString(_namevalues.runMethod(false,"Get",(Object)((_key))));Debug.locals.put("value", _value);Debug.locals.put("value", _value); - BA.debugLineNum = 143;BA.debugLine="empty = MultipartStartSection (stream, empty)"; -Debug.JustUpdateDeviceLine(); -_empty = __ref.runClassMethod (keymon.lat.medicomed.httpjob.class, "_multipartstartsection" /*RemoteObject*/ ,(Object)(_stream),(Object)(_empty));Debug.locals.put("empty", _empty); - BA.debugLineNum = 144;BA.debugLine="Dim s As String = _ $\"--${boundary} Content-Dis"; -Debug.JustUpdateDeviceLine(); -_s = (RemoteObject.concat(RemoteObject.createImmutable("--"),httpjob.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_boundary))),RemoteObject.createImmutable("\n"),RemoteObject.createImmutable("Content-Disposition: form-data; name=\""),httpjob.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_key))),RemoteObject.createImmutable("\"\n"),RemoteObject.createImmutable("\n"),RemoteObject.createImmutable(""),httpjob.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_value))),RemoteObject.createImmutable("")));Debug.locals.put("s", _s);Debug.locals.put("s", _s); - BA.debugLineNum = 149;BA.debugLine="b = s.Replace(CRLF, eol).GetBytes(\"UTF8\")"; -Debug.JustUpdateDeviceLine(); -_b = _s.runMethod(true,"replace",(Object)(httpjob.__c.getField(true,"CRLF")),(Object)(_eol)).runMethod(false,"getBytes",(Object)(RemoteObject.createImmutable("UTF8")));Debug.locals.put("b", _b); - BA.debugLineNum = 150;BA.debugLine="stream.WriteBytes(b, 0, b.Length)"; -Debug.JustUpdateDeviceLine(); -_stream.runVoidMethod ("WriteBytes",(Object)(_b),(Object)(BA.numberCast(int.class, 0)),(Object)(_b.getField(true,"length"))); - } -}Debug.locals.put("key", _key); -; - }; - BA.debugLineNum = 153;BA.debugLine="If Files <> Null And Files.IsInitialized Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("N",_files) && RemoteObject.solveBoolean(".",_files.runMethod(true,"IsInitialized"))) { - BA.debugLineNum = 154;BA.debugLine="For Each fd As MultipartFileData In Files"; -Debug.JustUpdateDeviceLine(); -{ -final RemoteObject group17 = _files; -final int groupLen17 = group17.runMethod(true,"getSize").get() -;int index17 = 0; -; -for (; index17 < groupLen17;index17++){ -_fd = (group17.runMethod(false,"Get",index17));Debug.locals.put("fd", _fd); -Debug.locals.put("fd", _fd); - BA.debugLineNum = 155;BA.debugLine="empty = MultipartStartSection (stream, empty)"; -Debug.JustUpdateDeviceLine(); -_empty = __ref.runClassMethod (keymon.lat.medicomed.httpjob.class, "_multipartstartsection" /*RemoteObject*/ ,(Object)(_stream),(Object)(_empty));Debug.locals.put("empty", _empty); - BA.debugLineNum = 156;BA.debugLine="Dim s As String = _ $\"--${boundary} Content-Dis"; -Debug.JustUpdateDeviceLine(); -_s = (RemoteObject.concat(RemoteObject.createImmutable("--"),httpjob.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_boundary))),RemoteObject.createImmutable("\n"),RemoteObject.createImmutable("Content-Disposition: form-data; name=\""),httpjob.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_fd.getField(true,"KeyName" /*RemoteObject*/ )))),RemoteObject.createImmutable("\"; filename=\""),httpjob.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_fd.getField(true,"FileName" /*RemoteObject*/ )))),RemoteObject.createImmutable("\"\n"),RemoteObject.createImmutable("Content-Type: "),httpjob.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_fd.getField(true,"ContentType" /*RemoteObject*/ )))),RemoteObject.createImmutable("\n"),RemoteObject.createImmutable("\n"),RemoteObject.createImmutable("")));Debug.locals.put("s", _s);Debug.locals.put("s", _s); - BA.debugLineNum = 162;BA.debugLine="b = s.Replace(CRLF, eol).GetBytes(\"UTF8\")"; -Debug.JustUpdateDeviceLine(); -_b = _s.runMethod(true,"replace",(Object)(httpjob.__c.getField(true,"CRLF")),(Object)(_eol)).runMethod(false,"getBytes",(Object)(RemoteObject.createImmutable("UTF8")));Debug.locals.put("b", _b); - BA.debugLineNum = 163;BA.debugLine="stream.WriteBytes(b, 0, b.Length)"; -Debug.JustUpdateDeviceLine(); -_stream.runVoidMethod ("WriteBytes",(Object)(_b),(Object)(BA.numberCast(int.class, 0)),(Object)(_b.getField(true,"length"))); - BA.debugLineNum = 164;BA.debugLine="Dim in As InputStream = File.OpenInput(fd.Dir,"; -Debug.JustUpdateDeviceLine(); -_in = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.InputStreamWrapper"); -_in = httpjob.__c.getField(false,"File").runMethod(false,"OpenInput",(Object)(_fd.getField(true,"Dir" /*RemoteObject*/ )),(Object)(_fd.getField(true,"FileName" /*RemoteObject*/ )));Debug.locals.put("in", _in);Debug.locals.put("in", _in); - BA.debugLineNum = 165;BA.debugLine="File.Copy2(in, stream)"; -Debug.JustUpdateDeviceLine(); -httpjob.__c.getField(false,"File").runVoidMethod ("Copy2",(Object)((_in.getObject())),(Object)((_stream.getObject()))); - } -}Debug.locals.put("fd", _fd); -; - }; - BA.debugLineNum = 168;BA.debugLine="empty = MultipartStartSection (stream, empty)"; -Debug.JustUpdateDeviceLine(); -_empty = __ref.runClassMethod (keymon.lat.medicomed.httpjob.class, "_multipartstartsection" /*RemoteObject*/ ,(Object)(_stream),(Object)(_empty));Debug.locals.put("empty", _empty); - BA.debugLineNum = 169;BA.debugLine="s = _ $\"--${boundary}-- \"$"; -Debug.JustUpdateDeviceLine(); -_s = (RemoteObject.concat(RemoteObject.createImmutable("--"),httpjob.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_boundary))),RemoteObject.createImmutable("--\n"),RemoteObject.createImmutable("")));Debug.locals.put("s", _s); - BA.debugLineNum = 172;BA.debugLine="b = s.Replace(CRLF, eol).GetBytes(\"UTF8\")"; -Debug.JustUpdateDeviceLine(); -_b = _s.runMethod(true,"replace",(Object)(httpjob.__c.getField(true,"CRLF")),(Object)(_eol)).runMethod(false,"getBytes",(Object)(RemoteObject.createImmutable("UTF8")));Debug.locals.put("b", _b); - BA.debugLineNum = 173;BA.debugLine="stream.WriteBytes(b, 0, b.Length)"; -Debug.JustUpdateDeviceLine(); -_stream.runVoidMethod ("WriteBytes",(Object)(_b),(Object)(BA.numberCast(int.class, 0)),(Object)(_b.getField(true,"length"))); - BA.debugLineNum = 174;BA.debugLine="PostBytes(Link, stream.ToBytesArray)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.httpjob.class, "_postbytes" /*RemoteObject*/ ,(Object)(_link),(Object)(_stream.runMethod(false,"ToBytesArray"))); - BA.debugLineNum = 175;BA.debugLine="req.SetContentType(\"multipart/form-data; boundary"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_req" /*RemoteObject*/ ).runVoidMethod ("SetContentType",(Object)(RemoteObject.concat(RemoteObject.createImmutable("multipart/form-data; boundary="),_boundary))); - BA.debugLineNum = 176;BA.debugLine="req.SetContentEncoding(\"UTF8\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_req" /*RemoteObject*/ ).runVoidMethod ("SetContentEncoding",(Object)(RemoteObject.createImmutable("UTF8"))); - BA.debugLineNum = 177;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _poststring(RemoteObject __ref,RemoteObject _link,RemoteObject _text) throws Exception{ -try { - Debug.PushSubsStack("PostString (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,58); -if (RapidSub.canDelegate("poststring")) { return __ref.runUserSub(false, "httpjob","poststring", __ref, _link, _text);} -Debug.locals.put("Link", _link); -Debug.locals.put("Text", _text); - BA.debugLineNum = 58;BA.debugLine="Public Sub PostString(Link As String, Text As Stri"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 59;BA.debugLine="PostBytes(Link, Text.GetBytes(\"UTF8\"))"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.httpjob.class, "_postbytes" /*RemoteObject*/ ,(Object)(_link),(Object)(_text.runMethod(false,"getBytes",(Object)(RemoteObject.createImmutable("UTF8"))))); - BA.debugLineNum = 60;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _putbytes(RemoteObject __ref,RemoteObject _link,RemoteObject _data) throws Exception{ -try { - Debug.PushSubsStack("PutBytes (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,80); -if (RapidSub.canDelegate("putbytes")) { return __ref.runUserSub(false, "httpjob","putbytes", __ref, _link, _data);} -Debug.locals.put("Link", _link); -Debug.locals.put("Data", _data); - BA.debugLineNum = 80;BA.debugLine="Public Sub PutBytes(Link As String, Data() As Byte"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 81;BA.debugLine="Try"; -Debug.JustUpdateDeviceLine(); -try { BA.debugLineNum = 82;BA.debugLine="Link = AddScheme(Link)"; -Debug.JustUpdateDeviceLine(); -_link = __ref.runClassMethod (keymon.lat.medicomed.httpjob.class, "_addscheme" /*RemoteObject*/ ,(Object)(_link));Debug.locals.put("Link", _link); - BA.debugLineNum = 83;BA.debugLine="req.InitializePut2(Link, Data)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_req" /*RemoteObject*/ ).runVoidMethod ("InitializePut2",(Object)(_link),(Object)(_data)); - Debug.CheckDeviceExceptions(); -} - catch (Exception e5) { - BA.rdebugUtils.runVoidMethod("setLastException",__ref.getField(false, "ba"), e5.toString()); BA.debugLineNum = 85;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; -Debug.JustUpdateDeviceLine(); -httpjob.__c.runVoidMethod ("LogImpl","942663941",(RemoteObject.concat(RemoteObject.createImmutable("Invalid link: "),httpjob.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_link))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 86;BA.debugLine="req.InitializePut2(InvalidURL, Data)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_req" /*RemoteObject*/ ).runVoidMethod ("InitializePut2",(Object)(__ref.getField(true,"_invalidurl" /*RemoteObject*/ )),(Object)(_data)); - }; - BA.debugLineNum = 88;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; -Debug.JustUpdateDeviceLine(); -httpjob.__c.runVoidMethod ("CallSubDelayed2",__ref.getField(false, "ba"),(Object)((httpjob._httputils2service.getObject())),(Object)(BA.ObjectToString("SubmitJob")),(Object)(__ref)); - BA.debugLineNum = 89;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _putstring(RemoteObject __ref,RemoteObject _link,RemoteObject _text) throws Exception{ -try { - Debug.PushSubsStack("PutString (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,75); -if (RapidSub.canDelegate("putstring")) { return __ref.runUserSub(false, "httpjob","putstring", __ref, _link, _text);} -Debug.locals.put("Link", _link); -Debug.locals.put("Text", _text); - BA.debugLineNum = 75;BA.debugLine="Public Sub PutString(Link As String, Text As Strin"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 76;BA.debugLine="PutBytes(Link, Text.GetBytes(\"UTF8\"))"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.httpjob.class, "_putbytes" /*RemoteObject*/ ,(Object)(_link),(Object)(_text.runMethod(false,"getBytes",(Object)(RemoteObject.createImmutable("UTF8"))))); - BA.debugLineNum = 77;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _release(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Release (httpjob) ","httpjob",36,__ref.getField(false, "ba"),__ref,284); -if (RapidSub.canDelegate("release")) { return __ref.runUserSub(false, "httpjob","release", __ref);} - BA.debugLineNum = 284;BA.debugLine="Public Sub Release"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 286;BA.debugLine="File.Delete(HttpUtils2Service.TempFolder, taskId)"; -Debug.JustUpdateDeviceLine(); -httpjob.__c.getField(false,"File").runVoidMethod ("Delete",(Object)(httpjob._httputils2service._tempfolder /*RemoteObject*/ ),(Object)(__ref.getField(true,"_taskid" /*RemoteObject*/ ))); - BA.debugLineNum = 288;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/httputils2service.java b/B4A/Objects/shell/src/keymon/lat/medicomed/httputils2service.java deleted file mode 100644 index 5773d32..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/httputils2service.java +++ /dev/null @@ -1,67 +0,0 @@ - -package keymon.lat.medicomed; - -import java.io.IOException; -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RDebug; -import anywheresoftware.b4a.pc.RemoteObject; -import anywheresoftware.b4a.pc.RDebug.IRemote; -import anywheresoftware.b4a.pc.Debug; -import anywheresoftware.b4a.pc.B4XTypes.B4XClass; -import anywheresoftware.b4a.pc.B4XTypes.DeviceClass; - -public class httputils2service implements IRemote{ - public static httputils2service mostCurrent; - public static RemoteObject processBA; - public static boolean processGlobalsRun; - public static RemoteObject myClass; - public static RemoteObject remoteMe; - public httputils2service() { - mostCurrent = this; - } - public RemoteObject getRemoteMe() { - return remoteMe; - } - -public boolean isSingleton() { - return true; - } - static { - anywheresoftware.b4a.pc.RapidSub.moduleToObject.put(new B4XClass("httputils2service"), "keymon.lat.medicomed.httputils2service"); - } - public static RemoteObject getObject() { - return myClass; - } - public RemoteObject _receiver; - private PCBA pcBA; - - public PCBA create(Object[] args) throws ClassNotFoundException{ - processBA = (RemoteObject) args[1]; - _receiver = (RemoteObject) args[2]; - remoteMe = RemoteObject.declareNull("keymon.lat.medicomed.httputils2service"); - anywheresoftware.b4a.keywords.Common.Density = (Float)args[3]; - pcBA = new PCBA(this, httputils2service.class); - main_subs_0.initializeProcessGlobals(); - return pcBA; - } -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _hc = RemoteObject.declareNull("anywheresoftware.b4h.okhttp.OkHttpClientWrapper"); -public static RemoteObject _taskidtojob = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -public static RemoteObject _tempfolder = RemoteObject.createImmutable(""); -public static RemoteObject _taskcounter = RemoteObject.createImmutable(0); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; - public Object[] GetGlobals() { - return new Object[] {"appUpdater",Debug.moduleToString(keymon.lat.medicomed.appupdater.class),"B4XCollections",Debug.moduleToString(keymon.lat.medicomed.b4xcollections.class),"B4XPages",Debug.moduleToString(keymon.lat.medicomed.b4xpages.class),"DateUtils",httputils2service.mostCurrent._dateutils,"hc",httputils2service._hc,"Main",Debug.moduleToString(keymon.lat.medicomed.main.class),"MAPA_RUTAS",Debug.moduleToString(keymon.lat.medicomed.mapa_rutas.class),"newinst2",Debug.moduleToString(keymon.lat.medicomed.newinst2.class),"Receiver",httputils2service.mostCurrent._receiver,"Starter",Debug.moduleToString(keymon.lat.medicomed.starter.class),"Subs",Debug.moduleToString(keymon.lat.medicomed.subs.class),"taskCounter",httputils2service._taskcounter,"TaskIdToJob",httputils2service._taskidtojob,"TempFolder",httputils2service._tempfolder,"Tracker",Debug.moduleToString(keymon.lat.medicomed.tracker.class),"XUIViewsUtils",Debug.moduleToString(keymon.lat.medicomed.xuiviewsutils.class)}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/httputils2service_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/httputils2service_subs_0.java deleted file mode 100644 index fa3fcd6..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/httputils2service_subs_0.java +++ /dev/null @@ -1,343 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class httputils2service_subs_0 { - - -public static RemoteObject _completejob(RemoteObject _taskid,RemoteObject _success,RemoteObject _errormessage) throws Exception{ -try { - Debug.PushSubsStack("CompleteJob (httputils2service) ","httputils2service",35,httputils2service.processBA,httputils2service.mostCurrent,152); -if (RapidSub.canDelegate("completejob")) { return keymon.lat.medicomed.httputils2service.remoteMe.runUserSub(false, "httputils2service","completejob", _taskid, _success, _errormessage);} -RemoteObject _job = RemoteObject.declareNull("keymon.lat.medicomed.httpjob"); -Debug.locals.put("TaskId", _taskid); -Debug.locals.put("success", _success); -Debug.locals.put("errorMessage", _errormessage); - BA.debugLineNum = 152;BA.debugLine="Sub CompleteJob(TaskId As Int, success As Boolean,"; -Debug.ShouldStop(8388608); - BA.debugLineNum = 156;BA.debugLine="Dim job As HttpJob = TaskIdToJob.Get(TaskId)"; -Debug.ShouldStop(134217728); -_job = (httputils2service._taskidtojob.runMethod(false,"Get",(Object)((_taskid))));Debug.locals.put("job", _job);Debug.locals.put("job", _job); - BA.debugLineNum = 157;BA.debugLine="If job = Null Then"; -Debug.ShouldStop(268435456); -if (RemoteObject.solveBoolean("n",_job)) { - BA.debugLineNum = 158;BA.debugLine="Log(\"HttpUtils2Service: job completed multiple t"; -Debug.ShouldStop(536870912); -httputils2service.mostCurrent.__c.runVoidMethod ("LogImpl","342205190",RemoteObject.concat(RemoteObject.createImmutable("HttpUtils2Service: job completed multiple times - "),_taskid),0); - BA.debugLineNum = 159;BA.debugLine="Return"; -Debug.ShouldStop(1073741824); -if (true) return RemoteObject.createImmutable(""); - }; - BA.debugLineNum = 161;BA.debugLine="TaskIdToJob.Remove(TaskId)"; -Debug.ShouldStop(1); -httputils2service._taskidtojob.runVoidMethod ("Remove",(Object)((_taskid))); - BA.debugLineNum = 162;BA.debugLine="job.success = success"; -Debug.ShouldStop(2); -_job.setField ("_success" /*RemoteObject*/ ,_success); - BA.debugLineNum = 163;BA.debugLine="job.errorMessage = errorMessage"; -Debug.ShouldStop(4); -_job.setField ("_errormessage" /*RemoteObject*/ ,_errormessage); - BA.debugLineNum = 165;BA.debugLine="job.Complete(TaskId)"; -Debug.ShouldStop(16); -_job.runClassMethod (keymon.lat.medicomed.httpjob.class, "_complete" /*RemoteObject*/ ,(Object)(_taskid)); - BA.debugLineNum = 169;BA.debugLine="End Sub"; -Debug.ShouldStop(256); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _hc_responseerror(RemoteObject _response,RemoteObject _reason,RemoteObject _statuscode,RemoteObject _taskid) throws Exception{ -try { - Debug.PushSubsStack("hc_ResponseError (httputils2service) ","httputils2service",35,httputils2service.processBA,httputils2service.mostCurrent,115); -if (RapidSub.canDelegate("hc_responseerror")) { return keymon.lat.medicomed.httputils2service.remoteMe.runUserSub(false, "httputils2service","hc_responseerror", _response, _reason, _statuscode, _taskid);} -RemoteObject _job = RemoteObject.declareNull("keymon.lat.medicomed.httpjob"); -Debug.locals.put("Response", _response); -Debug.locals.put("Reason", _reason); -Debug.locals.put("StatusCode", _statuscode); -Debug.locals.put("TaskId", _taskid); - BA.debugLineNum = 115;BA.debugLine="Sub hc_ResponseError (Response As OkHttpResponse,"; -Debug.ShouldStop(262144); - BA.debugLineNum = 117;BA.debugLine="Log($\"ResponseError. Reason: ${Reason}, Response:"; -Debug.ShouldStop(1048576); -httputils2service.mostCurrent.__c.runVoidMethod ("LogImpl","342139650",(RemoteObject.concat(RemoteObject.createImmutable("ResponseError. Reason: "),httputils2service.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_reason))),RemoteObject.createImmutable(", Response: "),httputils2service.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_response.runMethod(true,"getErrorResponse")))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 119;BA.debugLine="Response.Release"; -Debug.ShouldStop(4194304); -_response.runVoidMethod ("Release"); - BA.debugLineNum = 120;BA.debugLine="Dim job As HttpJob = TaskIdToJob.Get(TaskId)"; -Debug.ShouldStop(8388608); -_job = (httputils2service._taskidtojob.runMethod(false,"Get",(Object)((_taskid))));Debug.locals.put("job", _job);Debug.locals.put("job", _job); - BA.debugLineNum = 121;BA.debugLine="If job = Null Then"; -Debug.ShouldStop(16777216); -if (RemoteObject.solveBoolean("n",_job)) { - BA.debugLineNum = 122;BA.debugLine="Log(\"HttpUtils2Service (hc_ResponseError): job c"; -Debug.ShouldStop(33554432); -httputils2service.mostCurrent.__c.runVoidMethod ("LogImpl","342139655",RemoteObject.concat(RemoteObject.createImmutable("HttpUtils2Service (hc_ResponseError): job completed multiple times - "),_taskid),0); - BA.debugLineNum = 123;BA.debugLine="Return"; -Debug.ShouldStop(67108864); -if (true) return RemoteObject.createImmutable(""); - }; - BA.debugLineNum = 125;BA.debugLine="job.Response = Response"; -Debug.ShouldStop(268435456); -_job.setField ("_response" /*RemoteObject*/ ,_response); - BA.debugLineNum = 126;BA.debugLine="If Response.ErrorResponse <> \"\" Then"; -Debug.ShouldStop(536870912); -if (RemoteObject.solveBoolean("!",_response.runMethod(true,"getErrorResponse"),BA.ObjectToString(""))) { - BA.debugLineNum = 127;BA.debugLine="CompleteJob(TaskId, False, Response.ErrorRespons"; -Debug.ShouldStop(1073741824); -_completejob(_taskid,httputils2service.mostCurrent.__c.getField(true,"False"),_response.runMethod(true,"getErrorResponse")); - }else { - BA.debugLineNum = 129;BA.debugLine="CompleteJob(TaskId, False, Reason)"; -Debug.ShouldStop(1); -_completejob(_taskid,httputils2service.mostCurrent.__c.getField(true,"False"),_reason); - }; - BA.debugLineNum = 131;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _hc_responsesuccess(RemoteObject _response,RemoteObject _taskid) throws Exception{ -try { - Debug.PushSubsStack("hc_ResponseSuccess (httputils2service) ","httputils2service",35,httputils2service.processBA,httputils2service.mostCurrent,92); -if (RapidSub.canDelegate("hc_responsesuccess")) { return keymon.lat.medicomed.httputils2service.remoteMe.runUserSub(false, "httputils2service","hc_responsesuccess", _response, _taskid);} -RemoteObject _job = RemoteObject.declareNull("keymon.lat.medicomed.httpjob"); -RemoteObject _out = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -Debug.locals.put("Response", _response); -Debug.locals.put("TaskId", _taskid); - BA.debugLineNum = 92;BA.debugLine="Sub hc_ResponseSuccess (Response As OkHttpResponse"; -Debug.ShouldStop(134217728); - BA.debugLineNum = 93;BA.debugLine="Dim job As HttpJob = TaskIdToJob.Get(TaskId)"; -Debug.ShouldStop(268435456); -_job = (httputils2service._taskidtojob.runMethod(false,"Get",(Object)((_taskid))));Debug.locals.put("job", _job);Debug.locals.put("job", _job); - BA.debugLineNum = 94;BA.debugLine="If job = Null Then"; -Debug.ShouldStop(536870912); -if (RemoteObject.solveBoolean("n",_job)) { - BA.debugLineNum = 95;BA.debugLine="Log(\"HttpUtils2Service (hc_ResponseSuccess): job"; -Debug.ShouldStop(1073741824); -httputils2service.mostCurrent.__c.runVoidMethod ("LogImpl","342008579",RemoteObject.concat(RemoteObject.createImmutable("HttpUtils2Service (hc_ResponseSuccess): job completed multiple times - "),_taskid),0); - BA.debugLineNum = 96;BA.debugLine="Return"; -Debug.ShouldStop(-2147483648); -if (true) return RemoteObject.createImmutable(""); - }; - BA.debugLineNum = 98;BA.debugLine="job.Response = Response"; -Debug.ShouldStop(2); -_job.setField ("_response" /*RemoteObject*/ ,_response); - BA.debugLineNum = 99;BA.debugLine="Dim out As OutputStream = File.OpenOutput(TempFol"; -Debug.ShouldStop(4); -_out = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -_out = httputils2service.mostCurrent.__c.getField(false,"File").runMethod(false,"OpenOutput",(Object)(httputils2service._tempfolder),(Object)(BA.NumberToString(_taskid)),(Object)(httputils2service.mostCurrent.__c.getField(true,"False")));Debug.locals.put("out", _out);Debug.locals.put("out", _out); - BA.debugLineNum = 103;BA.debugLine="Response.GetAsynchronously(\"response\", out , _"; -Debug.ShouldStop(64); -_response.runVoidMethod ("GetAsynchronously",httputils2service.processBA,(Object)(BA.ObjectToString("response")),(Object)((_out.getObject())),(Object)(httputils2service.mostCurrent.__c.getField(true,"True")),(Object)(_taskid)); - BA.debugLineNum = 105;BA.debugLine="End Sub"; -Debug.ShouldStop(256); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _process_globals() throws Exception{ - //BA.debugLineNum = 2;BA.debugLine="Sub Process_Globals"; - //BA.debugLineNum = 12;BA.debugLine="Private hc As OkHttpClient"; -httputils2service._hc = RemoteObject.createNew ("anywheresoftware.b4h.okhttp.OkHttpClientWrapper"); - //BA.debugLineNum = 16;BA.debugLine="Private TaskIdToJob As Map"; -httputils2service._taskidtojob = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); - //BA.debugLineNum = 19;BA.debugLine="Public TempFolder As String"; -httputils2service._tempfolder = RemoteObject.createImmutable(""); - //BA.debugLineNum = 23;BA.debugLine="Private taskCounter As Int"; -httputils2service._taskcounter = RemoteObject.createImmutable(0); - //BA.debugLineNum = 25;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _receiver_receive(RemoteObject _firsttime,RemoteObject _startingintent) throws Exception{ -try { - Debug.PushSubsStack("Receiver_Receive (httputils2service) ","httputils2service",35,httputils2service.processBA,httputils2service.mostCurrent,58); -if (RapidSub.canDelegate("receiver_receive")) { return keymon.lat.medicomed.httputils2service.remoteMe.runUserSub(false, "httputils2service","receiver_receive", _firsttime, _startingintent);} -Debug.locals.put("FirstTime", _firsttime); -Debug.locals.put("StartingIntent", _startingintent); - BA.debugLineNum = 58;BA.debugLine="Private Sub Receiver_Receive (FirstTime As Boolean"; -Debug.ShouldStop(33554432); - BA.debugLineNum = 59;BA.debugLine="If FirstTime Then"; -Debug.ShouldStop(67108864); -if (_firsttime.get().booleanValue()) { - BA.debugLineNum = 60;BA.debugLine="Service_Create"; -Debug.ShouldStop(134217728); -_service_create(); - }; - BA.debugLineNum = 62;BA.debugLine="End Sub"; -Debug.ShouldStop(536870912); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _response_streamfinish(RemoteObject _success,RemoteObject _taskid) throws Exception{ -try { - Debug.PushSubsStack("Response_StreamFinish (httputils2service) ","httputils2service",35,httputils2service.processBA,httputils2service.mostCurrent,107); -if (RapidSub.canDelegate("response_streamfinish")) { return keymon.lat.medicomed.httputils2service.remoteMe.runUserSub(false, "httputils2service","response_streamfinish", _success, _taskid);} -Debug.locals.put("Success", _success); -Debug.locals.put("TaskId", _taskid); - BA.debugLineNum = 107;BA.debugLine="Private Sub Response_StreamFinish (Success As Bool"; -Debug.ShouldStop(1024); - BA.debugLineNum = 108;BA.debugLine="If Success Then"; -Debug.ShouldStop(2048); -if (_success.get().booleanValue()) { - BA.debugLineNum = 109;BA.debugLine="CompleteJob(TaskId, Success, \"\")"; -Debug.ShouldStop(4096); -_completejob(_taskid,_success,RemoteObject.createImmutable("")); - }else { - BA.debugLineNum = 111;BA.debugLine="CompleteJob(TaskId, Success, LastException.Messa"; -Debug.ShouldStop(16384); -_completejob(_taskid,_success,httputils2service.mostCurrent.__c.runMethod(false,"LastException",httputils2service.processBA).runMethod(true,"getMessage")); - }; - BA.debugLineNum = 113;BA.debugLine="End Sub"; -Debug.ShouldStop(65536); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _service_create() throws Exception{ -try { - Debug.PushSubsStack("Service_Create (httputils2service) ","httputils2service",35,httputils2service.processBA,httputils2service.mostCurrent,27); -if (RapidSub.canDelegate("service_create")) { return keymon.lat.medicomed.httputils2service.remoteMe.runUserSub(false, "httputils2service","service_create");} - BA.debugLineNum = 27;BA.debugLine="Sub Service_Create"; -Debug.ShouldStop(67108864); - BA.debugLineNum = 29;BA.debugLine="TempFolder = File.DirInternalCache"; -Debug.ShouldStop(268435456); -httputils2service._tempfolder = httputils2service.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirInternalCache"); - BA.debugLineNum = 30;BA.debugLine="Try"; -Debug.ShouldStop(536870912); -try { BA.debugLineNum = 31;BA.debugLine="File.WriteString(TempFolder, \"~test.test\", \"test"; -Debug.ShouldStop(1073741824); -httputils2service.mostCurrent.__c.getField(false,"File").runVoidMethod ("WriteString",(Object)(httputils2service._tempfolder),(Object)(BA.ObjectToString("~test.test")),(Object)(RemoteObject.createImmutable("test"))); - BA.debugLineNum = 32;BA.debugLine="File.Delete(TempFolder, \"~test.test\")"; -Debug.ShouldStop(-2147483648); -httputils2service.mostCurrent.__c.getField(false,"File").runVoidMethod ("Delete",(Object)(httputils2service._tempfolder),(Object)(RemoteObject.createImmutable("~test.test"))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e6) { - BA.rdebugUtils.runVoidMethod("setLastException",httputils2service.processBA, e6.toString()); BA.debugLineNum = 34;BA.debugLine="Log(LastException)"; -Debug.ShouldStop(2); -httputils2service.mostCurrent.__c.runVoidMethod ("LogImpl","341680903",BA.ObjectToString(httputils2service.mostCurrent.__c.runMethod(false,"LastException",httputils2service.processBA)),0); - BA.debugLineNum = 35;BA.debugLine="Log(\"Switching to File.DirInternal\")"; -Debug.ShouldStop(4); -httputils2service.mostCurrent.__c.runVoidMethod ("LogImpl","341680904",RemoteObject.createImmutable("Switching to File.DirInternal"),0); - BA.debugLineNum = 36;BA.debugLine="TempFolder = File.DirInternal"; -Debug.ShouldStop(8); -httputils2service._tempfolder = httputils2service.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirInternal"); - }; - BA.debugLineNum = 41;BA.debugLine="If hc.IsInitialized = False Then"; -Debug.ShouldStop(256); -if (RemoteObject.solveBoolean("=",httputils2service._hc.runMethod(true,"IsInitialized"),httputils2service.mostCurrent.__c.getField(true,"False"))) { - BA.debugLineNum = 46;BA.debugLine="hc.Initialize(\"hc\")"; -Debug.ShouldStop(8192); -httputils2service._hc.runVoidMethod ("Initialize",(Object)(RemoteObject.createImmutable("hc"))); - }; - BA.debugLineNum = 54;BA.debugLine="TaskIdToJob.Initialize"; -Debug.ShouldStop(2097152); -httputils2service._taskidtojob.runVoidMethod ("Initialize"); - BA.debugLineNum = 56;BA.debugLine="End Sub"; -Debug.ShouldStop(8388608); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _service_destroy() throws Exception{ -try { - Debug.PushSubsStack("Service_Destroy (httputils2service) ","httputils2service",35,httputils2service.processBA,httputils2service.mostCurrent,68); -if (RapidSub.canDelegate("service_destroy")) { return keymon.lat.medicomed.httputils2service.remoteMe.runUserSub(false, "httputils2service","service_destroy");} - BA.debugLineNum = 68;BA.debugLine="Sub Service_Destroy"; -Debug.ShouldStop(8); - BA.debugLineNum = 70;BA.debugLine="End Sub"; -Debug.ShouldStop(32); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _service_start(RemoteObject _startingintent) throws Exception{ -try { - Debug.PushSubsStack("Service_Start (httputils2service) ","httputils2service",35,httputils2service.processBA,httputils2service.mostCurrent,64); -if (RapidSub.canDelegate("service_start")) { return keymon.lat.medicomed.httputils2service.remoteMe.runUserSub(false, "httputils2service","service_start", _startingintent);} -Debug.locals.put("StartingIntent", _startingintent); - BA.debugLineNum = 64;BA.debugLine="Sub Service_Start (StartingIntent As Intent)"; -Debug.ShouldStop(-2147483648); - BA.debugLineNum = 66;BA.debugLine="End Sub"; -Debug.ShouldStop(2); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _submitjob(RemoteObject _job) throws Exception{ -try { - Debug.PushSubsStack("SubmitJob (httputils2service) ","httputils2service",35,httputils2service.processBA,httputils2service.mostCurrent,74); -if (RapidSub.canDelegate("submitjob")) { return keymon.lat.medicomed.httputils2service.remoteMe.runUserSub(false, "httputils2service","submitjob", _job);} -RemoteObject _taskid = RemoteObject.createImmutable(0); -Debug.locals.put("job", _job); - BA.debugLineNum = 74;BA.debugLine="Public Sub SubmitJob(job As HttpJob)"; -Debug.ShouldStop(512); - BA.debugLineNum = 75;BA.debugLine="If TaskIdToJob.IsInitialized = False Then Service"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("=",httputils2service._taskidtojob.runMethod(true,"IsInitialized"),httputils2service.mostCurrent.__c.getField(true,"False"))) { -_service_create();}; - BA.debugLineNum = 79;BA.debugLine="taskCounter = taskCounter + 1"; -Debug.ShouldStop(16384); -httputils2service._taskcounter = RemoteObject.solve(new RemoteObject[] {httputils2service._taskcounter,RemoteObject.createImmutable(1)}, "+",1, 1); - BA.debugLineNum = 80;BA.debugLine="Dim TaskId As Int = taskCounter"; -Debug.ShouldStop(32768); -_taskid = httputils2service._taskcounter;Debug.locals.put("TaskId", _taskid);Debug.locals.put("TaskId", _taskid); - BA.debugLineNum = 82;BA.debugLine="TaskIdToJob.Put(TaskId, job)"; -Debug.ShouldStop(131072); -httputils2service._taskidtojob.runVoidMethod ("Put",(Object)((_taskid)),(Object)((_job))); - BA.debugLineNum = 83;BA.debugLine="If job.Username <> \"\" And job.Password <> \"\" Then"; -Debug.ShouldStop(262144); -if (RemoteObject.solveBoolean("!",_job.getField(true,"_username" /*RemoteObject*/ ),BA.ObjectToString("")) && RemoteObject.solveBoolean("!",_job.getField(true,"_password" /*RemoteObject*/ ),BA.ObjectToString(""))) { - BA.debugLineNum = 84;BA.debugLine="hc.ExecuteCredentials(job.GetRequest, TaskId, jo"; -Debug.ShouldStop(524288); -httputils2service._hc.runVoidMethod ("ExecuteCredentials",httputils2service.processBA,(Object)(_job.runClassMethod (keymon.lat.medicomed.httpjob.class, "_getrequest" /*RemoteObject*/ )),(Object)(_taskid),(Object)(_job.getField(true,"_username" /*RemoteObject*/ )),(Object)(_job.getField(true,"_password" /*RemoteObject*/ ))); - }else { - BA.debugLineNum = 86;BA.debugLine="hc.Execute(job.GetRequest, TaskId)"; -Debug.ShouldStop(2097152); -httputils2service._hc.runVoidMethod ("Execute",httputils2service.processBA,(Object)(_job.runClassMethod (keymon.lat.medicomed.httpjob.class, "_getrequest" /*RemoteObject*/ )),(Object)(_taskid)); - }; - BA.debugLineNum = 88;BA.debugLine="End Sub"; -Debug.ShouldStop(8388608); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/madewithlove.java b/B4A/Objects/shell/src/keymon/lat/medicomed/madewithlove.java deleted file mode 100644 index 39c24ad..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/madewithlove.java +++ /dev/null @@ -1,34 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class madewithlove { - public static RemoteObject myClass; - public madewithlove() { - } - public static PCBA staticBA = new PCBA(null, madewithlove.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _meventname = RemoteObject.createImmutable(""); -public static RemoteObject _mcallback = RemoteObject.declareNull("Object"); -public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _tag = RemoteObject.declareNull("Object"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"DateUtils",_ref.getField(false, "_dateutils"),"mBase",_ref.getField(false, "_mbase"),"mCallBack",_ref.getField(false, "_mcallback"),"mEventName",_ref.getField(false, "_meventname"),"Tag",_ref.getField(false, "_tag"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/madewithlove_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/madewithlove_subs_0.java deleted file mode 100644 index 494fd9c..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/madewithlove_subs_0.java +++ /dev/null @@ -1,120 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class madewithlove_subs_0 { - - -public static RemoteObject _base_resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("Base_Resize (madewithlove) ","madewithlove",57,__ref.getField(false, "ba"),__ref,47); -if (RapidSub.canDelegate("base_resize")) { return __ref.runUserSub(false, "madewithlove","base_resize", __ref, _width, _height);} -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 47;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 48;BA.debugLine="mBase.GetView(0).SetLayoutAnimated(0, 0, 0, Wid"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0))).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, _width)),(Object)(BA.numberCast(int.class, _height))); - BA.debugLineNum = 49;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 2;BA.debugLine="Private mEventName As String 'ignore"; -madewithlove._meventname = RemoteObject.createImmutable("");__ref.setField("_meventname",madewithlove._meventname); - //BA.debugLineNum = 3;BA.debugLine="Private mCallBack As Object 'ignore"; -madewithlove._mcallback = RemoteObject.createNew ("Object");__ref.setField("_mcallback",madewithlove._mcallback); - //BA.debugLineNum = 4;BA.debugLine="Public mBase As B4XView"; -madewithlove._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",madewithlove._mbase); - //BA.debugLineNum = 5;BA.debugLine="Private xui As XUI 'ignore"; -madewithlove._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",madewithlove._xui); - //BA.debugLineNum = 6;BA.debugLine="Public Tag As Object"; -madewithlove._tag = RemoteObject.createNew ("Object");__ref.setField("_tag",madewithlove._tag); - //BA.debugLineNum = 7;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _designercreateview(RemoteObject __ref,RemoteObject _base,RemoteObject _lbl,RemoteObject _props) throws Exception{ -try { - Debug.PushSubsStack("DesignerCreateView (madewithlove) ","madewithlove",57,__ref.getField(false, "ba"),__ref,15); -if (RapidSub.canDelegate("designercreateview")) { return __ref.runUserSub(false, "madewithlove","designercreateview", __ref, _base, _lbl, _props);} -RemoteObject _xlbl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _cs = RemoteObject.declareNull("anywheresoftware.b4a.objects.CSBuilder"); -Debug.locals.put("Base", _base); -Debug.locals.put("Lbl", _lbl); -Debug.locals.put("Props", _props); - BA.debugLineNum = 15;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 16;BA.debugLine="mBase = Base"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).setObject (_base); - BA.debugLineNum = 17;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_tag" /*RemoteObject*/ ,__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"getTag")); - BA.debugLineNum = 17;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"setTag",__ref); - BA.debugLineNum = 18;BA.debugLine="Dim xlbl As B4XView = Lbl"; -Debug.JustUpdateDeviceLine(); -_xlbl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_xlbl = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), _lbl.getObject());Debug.locals.put("xlbl", _xlbl);Debug.locals.put("xlbl", _xlbl); - BA.debugLineNum = 33;BA.debugLine="Dim cs As CSBuilder"; -Debug.JustUpdateDeviceLine(); -_cs = RemoteObject.createNew ("anywheresoftware.b4a.objects.CSBuilder");Debug.locals.put("cs", _cs); - BA.debugLineNum = 34;BA.debugLine="cs.Initialize.Append(\"Made with \").Typeface(Typef"; -Debug.JustUpdateDeviceLine(); -_cs.runMethod(false,"Initialize").runMethod(false,"Append",(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable("Made with ")))).runMethod(false,"Typeface",(Object)(madewithlove.__c.getField(false,"Typeface").runMethod(false,"getFONTAWESOME"))).runMethod(false,"Color",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Red"))).runMethod(false,"Append",(Object)(BA.ObjectToCharSequence(madewithlove.__c.runMethod(true,"Chr",(Object)(BA.numberCast(int.class, ((int)0xf004))))))).runMethod(false,"Pop").runMethod(false,"Pop").runMethod(false,"Append",(Object)(BA.ObjectToCharSequence(RemoteObject.createImmutable(" in B4X")))).runVoidMethod ("PopAll"); - BA.debugLineNum = 35;BA.debugLine="xlbl.Text = cs"; -Debug.JustUpdateDeviceLine(); -_xlbl.runMethod(true,"setText",BA.ObjectToCharSequence(_cs.getObject())); - BA.debugLineNum = 36;BA.debugLine="xlbl.SetTextAlignment(\"CENTER\", \"CENTER\")"; -Debug.JustUpdateDeviceLine(); -_xlbl.runVoidMethod ("SetTextAlignment",(Object)(BA.ObjectToString("CENTER")),(Object)(RemoteObject.createImmutable("CENTER"))); - BA.debugLineNum = 37;BA.debugLine="mBase.AddView(xlbl, 0, 0, mBase.Width, mBase.Heig"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((_xlbl.getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"))); - BA.debugLineNum = 45;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _callback,RemoteObject _eventname) throws Exception{ -try { - Debug.PushSubsStack("Initialize (madewithlove) ","madewithlove",57,__ref.getField(false, "ba"),__ref,9); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "madewithlove","initialize", __ref, _ba, _callback, _eventname);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); -Debug.locals.put("Callback", _callback); -Debug.locals.put("EventName", _eventname); - BA.debugLineNum = 9;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 10;BA.debugLine="mEventName = EventName"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_meventname" /*RemoteObject*/ ,_eventname); - BA.debugLineNum = 11;BA.debugLine="mCallBack = Callback"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mcallback" /*RemoteObject*/ ,_callback); - BA.debugLineNum = 12;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/main.java b/B4A/Objects/shell/src/keymon/lat/medicomed/main.java deleted file mode 100644 index 8c75382..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/main.java +++ /dev/null @@ -1,73 +0,0 @@ - -package keymon.lat.medicomed; - -import java.io.IOException; -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RDebug; -import anywheresoftware.b4a.pc.RemoteObject; -import anywheresoftware.b4a.pc.RDebug.IRemote; -import anywheresoftware.b4a.pc.Debug; -import anywheresoftware.b4a.pc.B4XTypes.B4XClass; -import anywheresoftware.b4a.pc.B4XTypes.DeviceClass; - -public class main implements IRemote{ - public static main mostCurrent; - public static RemoteObject processBA; - public static boolean processGlobalsRun; - public static RemoteObject myClass; - public static RemoteObject remoteMe; - public main() { - mostCurrent = this; - } - public RemoteObject getRemoteMe() { - return remoteMe; - } - - public static void main (String[] args) throws Exception { - new RDebug(args[0], Integer.parseInt(args[1]), Integer.parseInt(args[2]), args[3]); - RDebug.INSTANCE.waitForTask(); - - } - static { - anywheresoftware.b4a.pc.RapidSub.moduleToObject.put(new B4XClass("main"), "keymon.lat.medicomed.main"); - } - -public boolean isSingleton() { - return true; - } - public static RemoteObject getObject() { - return myClass; - } - - public RemoteObject activityBA; - public RemoteObject _activity; - private PCBA pcBA; - - public PCBA create(Object[] args) throws ClassNotFoundException{ - processBA = (RemoteObject) args[1]; - activityBA = (RemoteObject) args[2]; - _activity = (RemoteObject) args[3]; - anywheresoftware.b4a.keywords.Common.Density = (Float)args[4]; - remoteMe = (RemoteObject) args[5]; - pcBA = new PCBA(this, main.class); - main_subs_0.initializeProcessGlobals(); - return pcBA; - } -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _actionbarhomeclicked = RemoteObject.createImmutable(false); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; - public Object[] GetGlobals() { - return new Object[] {"ActionBarHomeClicked",main._actionbarhomeclicked,"Activity",main.mostCurrent._activity,"appUpdater",Debug.moduleToString(keymon.lat.medicomed.appupdater.class),"B4XCollections",Debug.moduleToString(keymon.lat.medicomed.b4xcollections.class),"B4XPages",Debug.moduleToString(keymon.lat.medicomed.b4xpages.class),"DateUtils",main.mostCurrent._dateutils,"HttpUtils2Service",Debug.moduleToString(keymon.lat.medicomed.httputils2service.class),"MAPA_RUTAS",Debug.moduleToString(keymon.lat.medicomed.mapa_rutas.class),"newinst2",Debug.moduleToString(keymon.lat.medicomed.newinst2.class),"Starter",Debug.moduleToString(keymon.lat.medicomed.starter.class),"Subs",Debug.moduleToString(keymon.lat.medicomed.subs.class),"Tracker",Debug.moduleToString(keymon.lat.medicomed.tracker.class),"XUIViewsUtils",Debug.moduleToString(keymon.lat.medicomed.xuiviewsutils.class)}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/main_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/main_subs_0.java deleted file mode 100644 index 4677721..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/main_subs_0.java +++ /dev/null @@ -1,261 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class main_subs_0 { - - -public static RemoteObject _activity_actionbarhomeclick() throws Exception{ -try { - Debug.PushSubsStack("Activity_ActionBarHomeClick (main) ","main",0,main.mostCurrent.activityBA,main.mostCurrent,36); -if (RapidSub.canDelegate("activity_actionbarhomeclick")) { return keymon.lat.medicomed.main.remoteMe.runUserSub(false, "main","activity_actionbarhomeclick");} - BA.debugLineNum = 36;BA.debugLine="Sub Activity_ActionBarHomeClick"; -Debug.ShouldStop(8); - BA.debugLineNum = 37;BA.debugLine="ActionBarHomeClicked = True"; -Debug.ShouldStop(16); -main._actionbarhomeclicked = main.mostCurrent.__c.getField(true,"True"); - BA.debugLineNum = 38;BA.debugLine="B4XPages.Delegate.Activity_ActionBarHomeClick"; -Debug.ShouldStop(32); -main.mostCurrent._b4xpages._delegate /*RemoteObject*/ .runClassMethod (keymon.lat.medicomed.b4xpagesdelegator.class, "_activity_actionbarhomeclick" /*RemoteObject*/ ); - BA.debugLineNum = 39;BA.debugLine="ActionBarHomeClicked = False"; -Debug.ShouldStop(64); -main._actionbarhomeclicked = main.mostCurrent.__c.getField(true,"False"); - BA.debugLineNum = 40;BA.debugLine="End Sub"; -Debug.ShouldStop(128); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _activity_create(RemoteObject _firsttime) throws Exception{ -try { - Debug.PushSubsStack("Activity_Create (main) ","main",0,main.mostCurrent.activityBA,main.mostCurrent,28); -if (RapidSub.canDelegate("activity_create")) { return keymon.lat.medicomed.main.remoteMe.runUserSub(false, "main","activity_create", _firsttime);} -RemoteObject _pm = RemoteObject.declareNull("keymon.lat.medicomed.b4xpagesmanager"); -Debug.locals.put("FirstTime", _firsttime); - BA.debugLineNum = 28;BA.debugLine="Sub Activity_Create(FirstTime As Boolean)"; -Debug.ShouldStop(134217728); - BA.debugLineNum = 29;BA.debugLine="Dim pm As B4XPagesManager"; -Debug.ShouldStop(268435456); -_pm = RemoteObject.createNew ("keymon.lat.medicomed.b4xpagesmanager");Debug.locals.put("pm", _pm); - BA.debugLineNum = 30;BA.debugLine="pm.Initialize(Activity)"; -Debug.ShouldStop(536870912); -_pm.runClassMethod (keymon.lat.medicomed.b4xpagesmanager.class, "_initialize" /*RemoteObject*/ ,main.mostCurrent.activityBA,(Object)(main.mostCurrent._activity)); - BA.debugLineNum = 31;BA.debugLine="End Sub"; -Debug.ShouldStop(1073741824); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _activity_keypress(RemoteObject _keycode) throws Exception{ -try { - Debug.PushSubsStack("Activity_KeyPress (main) ","main",0,main.mostCurrent.activityBA,main.mostCurrent,42); -if (RapidSub.canDelegate("activity_keypress")) { return keymon.lat.medicomed.main.remoteMe.runUserSub(false, "main","activity_keypress", _keycode);} -Debug.locals.put("KeyCode", _keycode); - BA.debugLineNum = 42;BA.debugLine="Sub Activity_KeyPress (KeyCode As Int) As Boolean"; -Debug.ShouldStop(512); - BA.debugLineNum = 43;BA.debugLine="Return B4XPages.Delegate.Activity_KeyPress(KeyCod"; -Debug.ShouldStop(1024); -if (true) return main.mostCurrent._b4xpages._delegate /*RemoteObject*/ .runClassMethod (keymon.lat.medicomed.b4xpagesdelegator.class, "_activity_keypress" /*RemoteObject*/ ,(Object)(_keycode)); - BA.debugLineNum = 44;BA.debugLine="End Sub"; -Debug.ShouldStop(2048); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _activity_pause(RemoteObject _userclosed) throws Exception{ -try { - Debug.PushSubsStack("Activity_Pause (main) ","main",0,main.mostCurrent.activityBA,main.mostCurrent,50); -if (RapidSub.canDelegate("activity_pause")) { return keymon.lat.medicomed.main.remoteMe.runUserSub(false, "main","activity_pause", _userclosed);} -Debug.locals.put("UserClosed", _userclosed); - BA.debugLineNum = 50;BA.debugLine="Sub Activity_Pause (UserClosed As Boolean)"; -Debug.ShouldStop(131072); - BA.debugLineNum = 51;BA.debugLine="B4XPages.Delegate.Activity_Pause"; -Debug.ShouldStop(262144); -main.mostCurrent._b4xpages._delegate /*RemoteObject*/ .runClassMethod (keymon.lat.medicomed.b4xpagesdelegator.class, "_activity_pause" /*RemoteObject*/ ); - BA.debugLineNum = 52;BA.debugLine="End Sub"; -Debug.ShouldStop(524288); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _activity_permissionresult(RemoteObject _permission,RemoteObject _result) throws Exception{ -try { - Debug.PushSubsStack("Activity_PermissionResult (main) ","main",0,main.mostCurrent.activityBA,main.mostCurrent,54); -if (RapidSub.canDelegate("activity_permissionresult")) { return keymon.lat.medicomed.main.remoteMe.runUserSub(false, "main","activity_permissionresult", _permission, _result);} -Debug.locals.put("Permission", _permission); -Debug.locals.put("Result", _result); - BA.debugLineNum = 54;BA.debugLine="Sub Activity_PermissionResult (Permission As Strin"; -Debug.ShouldStop(2097152); - BA.debugLineNum = 55;BA.debugLine="B4XPages.Delegate.Activity_PermissionResult(Permi"; -Debug.ShouldStop(4194304); -main.mostCurrent._b4xpages._delegate /*RemoteObject*/ .runClassMethod (keymon.lat.medicomed.b4xpagesdelegator.class, "_activity_permissionresult" /*RemoteObject*/ ,(Object)(_permission),(Object)(_result)); - BA.debugLineNum = 56;BA.debugLine="End Sub"; -Debug.ShouldStop(8388608); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _activity_resume() throws Exception{ -try { - Debug.PushSubsStack("Activity_Resume (main) ","main",0,main.mostCurrent.activityBA,main.mostCurrent,46); -if (RapidSub.canDelegate("activity_resume")) { return keymon.lat.medicomed.main.remoteMe.runUserSub(false, "main","activity_resume");} - BA.debugLineNum = 46;BA.debugLine="Sub Activity_Resume"; -Debug.ShouldStop(8192); - BA.debugLineNum = 47;BA.debugLine="B4XPages.Delegate.Activity_Resume"; -Debug.ShouldStop(16384); -main.mostCurrent._b4xpages._delegate /*RemoteObject*/ .runClassMethod (keymon.lat.medicomed.b4xpagesdelegator.class, "_activity_resume" /*RemoteObject*/ ); - BA.debugLineNum = 48;BA.debugLine="End Sub"; -Debug.ShouldStop(32768); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _create_menu(RemoteObject _menu) throws Exception{ -try { - Debug.PushSubsStack("Create_Menu (main) ","main",0,main.mostCurrent.activityBA,main.mostCurrent,58); -if (RapidSub.canDelegate("create_menu")) { return keymon.lat.medicomed.main.remoteMe.runUserSub(false, "main","create_menu", _menu);} -Debug.locals.put("Menu", _menu); - BA.debugLineNum = 58;BA.debugLine="Sub Create_Menu (Menu As Object)"; -Debug.ShouldStop(33554432); - BA.debugLineNum = 59;BA.debugLine="B4XPages.Delegate.Create_Menu(Menu)"; -Debug.ShouldStop(67108864); -main.mostCurrent._b4xpages._delegate /*RemoteObject*/ .runClassMethod (keymon.lat.medicomed.b4xpagesdelegator.class, "_create_menu" /*RemoteObject*/ ,(Object)(_menu)); - BA.debugLineNum = 60;BA.debugLine="End Sub"; -Debug.ShouldStop(134217728); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _globals() throws Exception{ - //BA.debugLineNum = 23;BA.debugLine="Sub Globals"; - //BA.debugLineNum = 24;BA.debugLine="Type CameraInfoAndId (CameraInfo As Object, Id As"; -; - //BA.debugLineNum = 25;BA.debugLine="Type CameraSize (Width As Int, Height As Int)"; -; - //BA.debugLineNum = 26;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} - -public static void initializeProcessGlobals() { - - if (main.processGlobalsRun == false) { - main.processGlobalsRun = true; - try { - main_subs_0._process_globals(); -starter_subs_0._process_globals(); -subs_subs_0._process_globals(); -appupdater_subs_0._process_globals(); -mapa_rutas_subs_0._process_globals(); -tracker_subs_0._process_globals(); -newinst2_subs_0._process_globals(); -b4xpages_subs_0._process_globals(); -b4xcollections_subs_0._process_globals(); -httputils2service_subs_0._process_globals(); -xuiviewsutils_subs_0._process_globals(); -main.myClass = BA.getDeviceClass ("keymon.lat.medicomed.main"); -b4xmainpage.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xmainpage"); -starter.myClass = BA.getDeviceClass ("keymon.lat.medicomed.starter"); -c_principal.myClass = BA.getDeviceClass ("keymon.lat.medicomed.c_principal"); -c_cliente.myClass = BA.getDeviceClass ("keymon.lat.medicomed.c_cliente"); -c_clientes.myClass = BA.getDeviceClass ("keymon.lat.medicomed.c_clientes"); -c_mapas.myClass = BA.getDeviceClass ("keymon.lat.medicomed.c_mapas"); -c_nota.myClass = BA.getDeviceClass ("keymon.lat.medicomed.c_nota"); -c_noventa.myClass = BA.getDeviceClass ("keymon.lat.medicomed.c_noventa"); -subs.myClass = BA.getDeviceClass ("keymon.lat.medicomed.subs"); -c_ticketsdia.myClass = BA.getDeviceClass ("keymon.lat.medicomed.c_ticketsdia"); -cameraexclass2.myClass = BA.getDeviceClass ("keymon.lat.medicomed.cameraexclass2"); -appupdater.myClass = BA.getDeviceClass ("keymon.lat.medicomed.appupdater"); -batteryutilities.myClass = BA.getDeviceClass ("keymon.lat.medicomed.batteryutilities"); -c_historico.myClass = BA.getDeviceClass ("keymon.lat.medicomed.c_historico"); -c_nuevocliente.myClass = BA.getDeviceClass ("keymon.lat.medicomed.c_nuevocliente"); -c_pedidos.myClass = BA.getDeviceClass ("keymon.lat.medicomed.c_pedidos"); -c_productos.myClass = BA.getDeviceClass ("keymon.lat.medicomed.c_productos"); -c_promos.myClass = BA.getDeviceClass ("keymon.lat.medicomed.c_promos"); -c_updateavailable.myClass = BA.getDeviceClass ("keymon.lat.medicomed.c_updateavailable"); -dbrequestmanager.myClass = BA.getDeviceClass ("keymon.lat.medicomed.dbrequestmanager"); -mapa_rutas.myClass = BA.getDeviceClass ("keymon.lat.medicomed.mapa_rutas"); -tracker.myClass = BA.getDeviceClass ("keymon.lat.medicomed.tracker"); -cl_appupdate.myClass = BA.getDeviceClass ("keymon.lat.medicomed.cl_appupdate"); -newinst2.myClass = BA.getDeviceClass ("keymon.lat.medicomed.newinst2"); -b4xpages.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xpages"); -b4xbitset.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xbitset"); -b4xbytesbuilder.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xbytesbuilder"); -b4xcache.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xcache"); -b4xcollections.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xcollections"); -b4xcomparatorsort.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xcomparatorsort"); -b4xorderedmap.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xorderedmap"); -b4xset.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xset"); -b4xpagesdelegator.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xpagesdelegator"); -b4xpagesmanager.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xpagesmanager"); -httputils2service.myClass = BA.getDeviceClass ("keymon.lat.medicomed.httputils2service"); -httpjob.myClass = BA.getDeviceClass ("keymon.lat.medicomed.httpjob"); -animatedcounter.myClass = BA.getDeviceClass ("keymon.lat.medicomed.animatedcounter"); -anotherprogressbar.myClass = BA.getDeviceClass ("keymon.lat.medicomed.anotherprogressbar"); -b4xbreadcrumb.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xbreadcrumb"); -b4xcolortemplate.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xcolortemplate"); -b4xcombobox.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xcombobox"); -b4xdatetemplate.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xdatetemplate"); -b4xdialog.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xdialog"); -b4xfloattextfield.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xfloattextfield"); -b4ximageview.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4ximageview"); -b4xinputtemplate.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xinputtemplate"); -b4xlisttemplate.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xlisttemplate"); -b4xloadingindicator.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xloadingindicator"); -b4xlongtexttemplate.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xlongtexttemplate"); -b4xplusminus.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xplusminus"); -b4xradiobutton.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xradiobutton"); -b4xsearchtemplate.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xsearchtemplate"); -b4xseekbar.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xseekbar"); -b4xsignaturetemplate.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xsignaturetemplate"); -b4xswitch.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xswitch"); -b4xtimedtemplate.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xtimedtemplate"); -madewithlove.myClass = BA.getDeviceClass ("keymon.lat.medicomed.madewithlove"); -b4xformatter.myClass = BA.getDeviceClass ("keymon.lat.medicomed.b4xformatter"); -roundslider.myClass = BA.getDeviceClass ("keymon.lat.medicomed.roundslider"); -scrollinglabel.myClass = BA.getDeviceClass ("keymon.lat.medicomed.scrollinglabel"); -swiftbutton.myClass = BA.getDeviceClass ("keymon.lat.medicomed.swiftbutton"); -xuiviewsutils.myClass = BA.getDeviceClass ("keymon.lat.medicomed.xuiviewsutils"); -preoptimizedclv.myClass = BA.getDeviceClass ("keymon.lat.medicomed.preoptimizedclv"); -fileprovider.myClass = BA.getDeviceClass ("keymon.lat.medicomed.fileprovider"); - - } catch (Exception e) { - throw new RuntimeException(e); - } - } -}public static RemoteObject _process_globals() throws Exception{ - //BA.debugLineNum = 19;BA.debugLine="Sub Process_Globals"; - //BA.debugLineNum = 20;BA.debugLine="Public ActionBarHomeClicked As Boolean"; -main._actionbarhomeclicked = RemoteObject.createImmutable(false); - //BA.debugLineNum = 21;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/mapa_rutas.java b/B4A/Objects/shell/src/keymon/lat/medicomed/mapa_rutas.java deleted file mode 100644 index 43818bf..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/mapa_rutas.java +++ /dev/null @@ -1,116 +0,0 @@ - -package keymon.lat.medicomed; - -import java.io.IOException; -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RDebug; -import anywheresoftware.b4a.pc.RemoteObject; -import anywheresoftware.b4a.pc.RDebug.IRemote; -import anywheresoftware.b4a.pc.Debug; -import anywheresoftware.b4a.pc.B4XTypes.B4XClass; -import anywheresoftware.b4a.pc.B4XTypes.DeviceClass; - -public class mapa_rutas implements IRemote{ - public static mapa_rutas mostCurrent; - public static RemoteObject processBA; - public static boolean processGlobalsRun; - public static RemoteObject myClass; - public static RemoteObject remoteMe; - public mapa_rutas() { - mostCurrent = this; - } - public RemoteObject getRemoteMe() { - return remoteMe; - } - - public static void main (String[] args) throws Exception { - new RDebug(args[0], Integer.parseInt(args[1]), Integer.parseInt(args[2]), args[3]); - RDebug.INSTANCE.waitForTask(); - - } - static { - anywheresoftware.b4a.pc.RapidSub.moduleToObject.put(new B4XClass("mapa_rutas"), "keymon.lat.medicomed.mapa_rutas"); - } - -public boolean isSingleton() { - return true; - } - public static RemoteObject getObject() { - return myClass; - } - - public RemoteObject activityBA; - public RemoteObject _activity; - private PCBA pcBA; - - public PCBA create(Object[] args) throws ClassNotFoundException{ - processBA = (RemoteObject) args[1]; - activityBA = (RemoteObject) args[2]; - _activity = (RemoteObject) args[3]; - anywheresoftware.b4a.keywords.Common.Density = (Float)args[4]; - remoteMe = (RemoteObject) args[5]; - pcBA = new PCBA(this, mapa_rutas.class); - main_subs_0.initializeProcessGlobals(); - return pcBA; - } -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _gps = RemoteObject.declareNull("anywheresoftware.b4a.gps.GPS"); -public static RemoteObject _rp = RemoteObject.declareNull("anywheresoftware.b4a.objects.RuntimePermissions"); -public static RemoteObject _ruta = RemoteObject.createImmutable(""); -public static RemoteObject _skmt = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL"); -public static RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _c2 = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _c22 = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _c3 = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -public static RemoteObject _gmap = RemoteObject.declareNull("anywheresoftware.b4a.objects.MapFragmentWrapper.GoogleMapWrapper"); -public static RemoteObject _mapfragment1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.MapFragmentWrapper"); -public static RemoteObject _latitud = RemoteObject.createImmutable(0); -public static RemoteObject _longitud = RemoteObject.createImmutable(0); -public static RemoteObject _lat2 = RemoteObject.createImmutable(0); -public static RemoteObject _lon2 = RemoteObject.createImmutable(0); -public static RemoteObject _p1 = RemoteObject.declareNull("anywheresoftware.b4a.gps.LocationWrapper"); -public static RemoteObject _p2 = RemoteObject.declareNull("anywheresoftware.b4a.gps.LocationWrapper"); -public static RemoteObject _distance = RemoteObject.createImmutable(0f); -public static RemoteObject _boton1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _hue_blue = RemoteObject.createImmutable(0f); -public static RemoteObject _hue_red = RemoteObject.createImmutable(0f); -public static RemoteObject _hue_green = RemoteObject.createImmutable(0f); -public static RemoteObject _b_azul = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _b_rojo = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _b_verde = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _b_todos = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper"); -public static RemoteObject _tienda = RemoteObject.createImmutable(""); -public static RemoteObject _latitudru = RemoteObject.createImmutable(0); -public static RemoteObject _longitudru = RemoteObject.createImmutable(0); -public static RemoteObject _list_azul = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _list_rojo = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _list_verde = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _mark_azul = RemoteObject.declareNull("anywheresoftware.b4a.objects.MapFragmentWrapper.MarkerWrapper"); -public static RemoteObject _mark_rojo = RemoteObject.declareNull("anywheresoftware.b4a.objects.MapFragmentWrapper.MarkerWrapper"); -public static RemoteObject _mark_verde = RemoteObject.declareNull("anywheresoftware.b4a.objects.MapFragmentWrapper.MarkerWrapper"); -public static RemoteObject _mark_cedis = RemoteObject.declareNull("anywheresoftware.b4a.objects.MapFragmentWrapper.MarkerWrapper"); -public static RemoteObject _rojo = RemoteObject.createImmutable(""); -public static RemoteObject _azul = RemoteObject.createImmutable(""); -public static RemoteObject _verde = RemoteObject.createImmutable(""); -public static RemoteObject _todos = RemoteObject.createImmutable(""); -public static RemoteObject _numserie = RemoteObject.createImmutable(0); -public static RemoteObject _oninfowindowclicklistener1 = RemoteObject.declareNull("uk.co.martinpearman.b4a.com.google.android.gms.maps.googlemap.OnInfoWindowClickListener"); -public static RemoteObject _googlemapextra = RemoteObject.declareNull("uk.co.martinpearman.b4a.googlemapsextras.GoogleMapsExtras"); -public static RemoteObject _codigo = RemoteObject.createImmutable(""); -public static RemoteObject _semana = RemoteObject.createImmutable(""); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; - public Object[] GetGlobals() { - return new Object[] {"Activity",mapa_rutas.mostCurrent._activity,"appUpdater",Debug.moduleToString(keymon.lat.medicomed.appupdater.class),"azul",mapa_rutas.mostCurrent._azul,"B_AZUL",mapa_rutas.mostCurrent._b_azul,"B_ROJO",mapa_rutas.mostCurrent._b_rojo,"B_TODOS",mapa_rutas.mostCurrent._b_todos,"B_VERDE",mapa_rutas.mostCurrent._b_verde,"B4XCollections",Debug.moduleToString(keymon.lat.medicomed.b4xcollections.class),"B4XPages",Debug.moduleToString(keymon.lat.medicomed.b4xpages.class),"boton1",mapa_rutas.mostCurrent._boton1,"c",mapa_rutas._c,"c2",mapa_rutas._c2,"c22",mapa_rutas._c22,"c3",mapa_rutas._c3,"CODIGO",mapa_rutas.mostCurrent._codigo,"DateUtils",mapa_rutas.mostCurrent._dateutils,"Distance",mapa_rutas._distance,"gmap",mapa_rutas.mostCurrent._gmap,"GoogleMapEXTRA",mapa_rutas.mostCurrent._googlemapextra,"GPS",mapa_rutas._gps,"HttpUtils2Service",Debug.moduleToString(keymon.lat.medicomed.httputils2service.class),"HUE_BLUE",mapa_rutas._hue_blue,"HUE_GREEN",mapa_rutas._hue_green,"HUE_RED",mapa_rutas._hue_red,"Lat2",mapa_rutas._lat2,"Latitud",mapa_rutas._latitud,"LatitudRu",mapa_rutas._latitudru,"LIST_AZUL",mapa_rutas.mostCurrent._list_azul,"LIST_ROJO",mapa_rutas.mostCurrent._list_rojo,"LIST_VERDE",mapa_rutas.mostCurrent._list_verde,"Lon2",mapa_rutas._lon2,"Longitud",mapa_rutas._longitud,"LongitudRU",mapa_rutas._longitudru,"Main",Debug.moduleToString(keymon.lat.medicomed.main.class),"MapFragment1",mapa_rutas.mostCurrent._mapfragment1,"MARK_AZUL",mapa_rutas.mostCurrent._mark_azul,"MARK_CEDIS",mapa_rutas.mostCurrent._mark_cedis,"MARK_ROJO",mapa_rutas.mostCurrent._mark_rojo,"MARK_VERDE",mapa_rutas.mostCurrent._mark_verde,"newinst2",Debug.moduleToString(keymon.lat.medicomed.newinst2.class),"NumSerie",mapa_rutas._numserie,"OnInfoWindowClickListener1",mapa_rutas.mostCurrent._oninfowindowclicklistener1,"p1",mapa_rutas.mostCurrent._p1,"p2",mapa_rutas.mostCurrent._p2,"rojo",mapa_rutas.mostCurrent._rojo,"rp",mapa_rutas._rp,"ruta",mapa_rutas._ruta,"SEMANA",mapa_rutas.mostCurrent._semana,"skmt",mapa_rutas._skmt,"Starter",Debug.moduleToString(keymon.lat.medicomed.starter.class),"Subs",Debug.moduleToString(keymon.lat.medicomed.subs.class),"Tienda",mapa_rutas.mostCurrent._tienda,"todos",mapa_rutas.mostCurrent._todos,"Tracker",Debug.moduleToString(keymon.lat.medicomed.tracker.class),"verde",mapa_rutas.mostCurrent._verde,"XUIViewsUtils",Debug.moduleToString(keymon.lat.medicomed.xuiviewsutils.class)}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/mapa_rutas_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/mapa_rutas_subs_0.java deleted file mode 100644 index f59aa2f..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/mapa_rutas_subs_0.java +++ /dev/null @@ -1,1407 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class mapa_rutas_subs_0 { - - -public static void _activity_create(RemoteObject _firsttime) throws Exception{ -try { - Debug.PushSubsStack("Activity_Create (mapa_rutas) ","mapa_rutas",21,mapa_rutas.mostCurrent.activityBA,mapa_rutas.mostCurrent,56); -if (RapidSub.canDelegate("activity_create")) { keymon.lat.medicomed.mapa_rutas.remoteMe.runUserSub(false, "mapa_rutas","activity_create", _firsttime); return;} -ResumableSub_Activity_Create rsub = new ResumableSub_Activity_Create(null,_firsttime); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_Activity_Create extends BA.ResumableSub { -public ResumableSub_Activity_Create(keymon.lat.medicomed.mapa_rutas parent,RemoteObject _firsttime) { -this.parent = parent; -this._firsttime = _firsttime; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -keymon.lat.medicomed.mapa_rutas parent; -RemoteObject _firsttime; -RemoteObject _permission = RemoteObject.createImmutable(""); -RemoteObject _result = RemoteObject.createImmutable(false); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("Activity_Create (mapa_rutas) ","mapa_rutas",21,mapa_rutas.mostCurrent.activityBA,mapa_rutas.mostCurrent,56); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("FirstTime", _firsttime); - BA.debugLineNum = 57;BA.debugLine="Activity.LoadLayout(\"MAPA_RUTAS\")"; -Debug.ShouldStop(16777216); -parent.mostCurrent._activity.runMethodAndSync(false,"LoadLayout",(Object)(RemoteObject.createImmutable("MAPA_RUTAS")),mapa_rutas.mostCurrent.activityBA); - BA.debugLineNum = 61;BA.debugLine="ruta = File.DirInternal"; -Debug.ShouldStop(268435456); -parent._ruta = parent.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirInternal"); - BA.debugLineNum = 63;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; -Debug.ShouldStop(1073741824); -if (true) break; - -case 1: -//if -this.state = 4; -if (RemoteObject.solveBoolean("=",parent.mostCurrent.__c.getField(false,"File").runMethod(true,"Exists",(Object)(parent._ruta),(Object)(RemoteObject.createImmutable("kmt.db"))),parent.mostCurrent.__c.getField(true,"False"))) { -this.state = 3; -}if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 64;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; -Debug.ShouldStop(-2147483648); -parent.mostCurrent.__c.getField(false,"File").runVoidMethod ("Copy",(Object)(parent.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(BA.ObjectToString("kmt.db")),(Object)(parent._ruta),(Object)(RemoteObject.createImmutable("kmt.db"))); - if (true) break; - -case 4: -//C -this.state = 5; -; - BA.debugLineNum = 66;BA.debugLine="skmt.Initialize(ruta,\"kmt.db\", True)"; -Debug.ShouldStop(2); -parent._skmt.runVoidMethod ("Initialize",(Object)(parent._ruta),(Object)(BA.ObjectToString("kmt.db")),(Object)(parent.mostCurrent.__c.getField(true,"True"))); - BA.debugLineNum = 68;BA.debugLine="Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_"; -Debug.ShouldStop(8); -parent.mostCurrent._starter._rp /*RemoteObject*/ .runVoidMethod ("CheckAndRequest",mapa_rutas.processBA,(Object)(parent.mostCurrent._starter._rp /*RemoteObject*/ .getField(true,"PERMISSION_ACCESS_FINE_LOCATION"))); - BA.debugLineNum = 69;BA.debugLine="Wait For Activity_PermissionResult (Permission As"; -Debug.ShouldStop(16); -parent.mostCurrent.__c.runVoidMethod ("WaitFor","activity_permissionresult", mapa_rutas.processBA, anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "mapa_rutas", "activity_create"), null); -this.state = 19; -return; -case 19: -//C -this.state = 5; -_permission = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(0));Debug.locals.put("Permission", _permission); -_result = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(1));Debug.locals.put("Result", _result); -; - BA.debugLineNum = 70;BA.debugLine="If Result Then"; -Debug.ShouldStop(32); -if (true) break; - -case 5: -//if -this.state = 14; -if (_result.get().booleanValue()) { -this.state = 7; -}else { -this.state = 13; -}if (true) break; - -case 7: -//C -this.state = 8; - BA.debugLineNum = 71;BA.debugLine="StartService(Tracker)"; -Debug.ShouldStop(64); -parent.mostCurrent.__c.runVoidMethod ("StartService",mapa_rutas.processBA,(Object)((parent.mostCurrent._tracker.getObject()))); - BA.debugLineNum = 72;BA.debugLine="Log(\"Start Tracker\")"; -Debug.ShouldStop(128); -parent.mostCurrent.__c.runVoidMethod ("LogImpl","328377104",RemoteObject.createImmutable("Start Tracker"),0); - BA.debugLineNum = 73;BA.debugLine="If MapFragment1.IsGooglePlayServicesAvailable ="; -Debug.ShouldStop(256); -if (true) break; - -case 8: -//if -this.state = 11; -if (RemoteObject.solveBoolean("=",parent.mostCurrent._mapfragment1.runMethod(true,"IsGooglePlayServicesAvailable",mapa_rutas.mostCurrent.activityBA),parent.mostCurrent.__c.getField(true,"False"))) { -this.state = 10; -}if (true) break; - -case 10: -//C -this.state = 11; - BA.debugLineNum = 74;BA.debugLine="ToastMessageShow(\"Please install Google Play Se"; -Debug.ShouldStop(512); -parent.mostCurrent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Please install Google Play Services.")),(Object)(parent.mostCurrent.__c.getField(true,"True"))); - if (true) break; - -case 11: -//C -this.state = 14; -; - if (true) break; - -case 13: -//C -this.state = 14; - BA.debugLineNum = 77;BA.debugLine="ToastMessageShow(\"No permission\", True)"; -Debug.ShouldStop(4096); -parent.mostCurrent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("No permission")),(Object)(parent.mostCurrent.__c.getField(true,"True"))); - BA.debugLineNum = 78;BA.debugLine="B4XPages.ShowPage(\"Principal\")"; -Debug.ShouldStop(8192); -parent.mostCurrent._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,mapa_rutas.mostCurrent.activityBA,(Object)(RemoteObject.createImmutable("Principal"))); - if (true) break; - -case 14: -//C -this.state = 15; -; - BA.debugLineNum = 93;BA.debugLine="MARK_AZUL.IsInitialized"; -Debug.ShouldStop(268435456); -parent.mostCurrent._mark_azul.runVoidMethod ("IsInitialized"); - BA.debugLineNum = 94;BA.debugLine="MARK_ROJO.IsInitialized"; -Debug.ShouldStop(536870912); -parent.mostCurrent._mark_rojo.runVoidMethod ("IsInitialized"); - BA.debugLineNum = 95;BA.debugLine="MARK_VERDE.IsInitialized"; -Debug.ShouldStop(1073741824); -parent.mostCurrent._mark_verde.runVoidMethod ("IsInitialized"); - BA.debugLineNum = 97;BA.debugLine="LIST_AZUL.Initialize"; -Debug.ShouldStop(1); -parent.mostCurrent._list_azul.runVoidMethod ("Initialize"); - BA.debugLineNum = 98;BA.debugLine="LIST_ROJO.Initialize"; -Debug.ShouldStop(2); -parent.mostCurrent._list_rojo.runVoidMethod ("Initialize"); - BA.debugLineNum = 99;BA.debugLine="LIST_VERDE.Initialize"; -Debug.ShouldStop(4); -parent.mostCurrent._list_verde.runVoidMethod ("Initialize"); - BA.debugLineNum = 100;BA.debugLine="verde = 0"; -Debug.ShouldStop(8); -parent.mostCurrent._verde = BA.NumberToString(0); - BA.debugLineNum = 101;BA.debugLine="azul = 0"; -Debug.ShouldStop(16); -parent.mostCurrent._azul = BA.NumberToString(0); - BA.debugLineNum = 102;BA.debugLine="rojo = 0"; -Debug.ShouldStop(32); -parent.mostCurrent._rojo = BA.NumberToString(0); - BA.debugLineNum = 103;BA.debugLine="todos = 1"; -Debug.ShouldStop(64); -parent.mostCurrent._todos = BA.NumberToString(1); - BA.debugLineNum = 104;BA.debugLine="c=skmt.ExecQuery2(\"select count(*) AS CUANTOS fro"; -Debug.ShouldStop(128); -parent._c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), parent._skmt.runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select count(*) AS CUANTOS from CAT_VARIABLES WHERE CAT_VA_DESCRIPCION = ?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("SEMANA")})))); - BA.debugLineNum = 105;BA.debugLine="c.Position =0"; -Debug.ShouldStop(256); -parent._c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 106;BA.debugLine="SEMANA = c.GetString(\"CUANTOS\")"; -Debug.ShouldStop(512); -parent.mostCurrent._semana = parent._c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUANTOS"))); - BA.debugLineNum = 107;BA.debugLine="c.Close"; -Debug.ShouldStop(1024); -parent._c.runVoidMethod ("Close"); - BA.debugLineNum = 109;BA.debugLine="If SEMANA > 0 Then"; -Debug.ShouldStop(4096); -if (true) break; - -case 15: -//if -this.state = 18; -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, parent.mostCurrent._semana),BA.numberCast(double.class, 0))) { -this.state = 17; -}if (true) break; - -case 17: -//C -this.state = 18; - BA.debugLineNum = 110;BA.debugLine="c=skmt.ExecQuery2(\"select CAT_VA_VALOR from CAT_"; -Debug.ShouldStop(8192); -parent._c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), parent._skmt.runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select CAT_VA_VALOR from CAT_VARIABLES WHERE CAT_VA_DESCRIPCION = ?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {RemoteObject.createImmutable("SEMANA")})))); - BA.debugLineNum = 111;BA.debugLine="c.Position =0"; -Debug.ShouldStop(16384); -parent._c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 112;BA.debugLine="SEMANA = c.GetString(\"CAT_VA_VALOR\")"; -Debug.ShouldStop(32768); -parent.mostCurrent._semana = parent._c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_VA_VALOR"))); - BA.debugLineNum = 113;BA.debugLine="c.Close"; -Debug.ShouldStop(65536); -parent._c.runVoidMethod ("Close"); - if (true) break; - -case 18: -//C -this.state = -1; -; - BA.debugLineNum = 115;BA.debugLine="End Sub"; -Debug.ShouldStop(262144); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static void _activity_permissionresult(RemoteObject _permission,RemoteObject _result) throws Exception{ -} -public static RemoteObject _activity_pause(RemoteObject _userclosed) throws Exception{ -try { - Debug.PushSubsStack("Activity_Pause (mapa_rutas) ","mapa_rutas",21,mapa_rutas.mostCurrent.activityBA,mapa_rutas.mostCurrent,301); -if (RapidSub.canDelegate("activity_pause")) { return keymon.lat.medicomed.mapa_rutas.remoteMe.runUserSub(false, "mapa_rutas","activity_pause", _userclosed);} -Debug.locals.put("UserClosed", _userclosed); - BA.debugLineNum = 301;BA.debugLine="Sub Activity_Pause (UserClosed As Boolean)"; -Debug.ShouldStop(4096); - BA.debugLineNum = 302;BA.debugLine="GPS.Stop"; -Debug.ShouldStop(8192); -mapa_rutas._gps.runVoidMethod ("Stop"); - BA.debugLineNum = 303;BA.debugLine="End Sub"; -Debug.ShouldStop(16384); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _activity_resume() throws Exception{ -try { - Debug.PushSubsStack("Activity_Resume (mapa_rutas) ","mapa_rutas",21,mapa_rutas.mostCurrent.activityBA,mapa_rutas.mostCurrent,117); -if (RapidSub.canDelegate("activity_resume")) { keymon.lat.medicomed.mapa_rutas.remoteMe.runUserSub(false, "mapa_rutas","activity_resume"); return;} -ResumableSub_Activity_Resume rsub = new ResumableSub_Activity_Resume(null); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_Activity_Resume extends BA.ResumableSub { -public ResumableSub_Activity_Resume(keymon.lat.medicomed.mapa_rutas parent) { -this.parent = parent; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -keymon.lat.medicomed.mapa_rutas parent; -RemoteObject _permission = RemoteObject.createImmutable(""); -RemoteObject _result = RemoteObject.createImmutable(false); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("Activity_Resume (mapa_rutas) ","mapa_rutas",21,mapa_rutas.mostCurrent.activityBA,mapa_rutas.mostCurrent,117); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; - BA.debugLineNum = 118;BA.debugLine="Starter.rp.Check(Starter.rp.PERMISSION_ACCESS_FIN"; -Debug.ShouldStop(2097152); -parent.mostCurrent._starter._rp /*RemoteObject*/ .runVoidMethod ("Check",(Object)(parent.mostCurrent._starter._rp /*RemoteObject*/ .getField(true,"PERMISSION_ACCESS_FINE_LOCATION"))); - BA.debugLineNum = 119;BA.debugLine="Wait For Activity_PermissionResult (Permission As"; -Debug.ShouldStop(4194304); -parent.mostCurrent.__c.runVoidMethod ("WaitFor","activity_permissionresult", mapa_rutas.processBA, anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "mapa_rutas", "activity_resume"), null); -this.state = 11; -return; -case 11: -//C -this.state = 1; -_permission = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(0));Debug.locals.put("Permission", _permission); -_result = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(1));Debug.locals.put("Result", _result); -; - BA.debugLineNum = 120;BA.debugLine="If Result Then"; -Debug.ShouldStop(8388608); -if (true) break; - -case 1: -//if -this.state = 10; -if (_result.get().booleanValue()) { -this.state = 3; -}if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 121;BA.debugLine="If Starter.GPS.GPSEnabled = False Then"; -Debug.ShouldStop(16777216); -if (true) break; - -case 4: -//if -this.state = 9; -if (RemoteObject.solveBoolean("=",parent.mostCurrent._starter._gps /*RemoteObject*/ .runMethod(true,"getGPSEnabled"),parent.mostCurrent.__c.getField(true,"False"))) { -this.state = 6; -}else { -this.state = 8; -}if (true) break; - -case 6: -//C -this.state = 9; - BA.debugLineNum = 122;BA.debugLine="ToastMessageShow(\"Debe Activar el GPS del Equip"; -Debug.ShouldStop(33554432); -parent.mostCurrent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Debe Activar el GPS del Equipo.")),(Object)(parent.mostCurrent.__c.getField(true,"True"))); - BA.debugLineNum = 123;BA.debugLine="StartActivity(Starter.GPS.LocationSettingsInten"; -Debug.ShouldStop(67108864); -parent.mostCurrent.__c.runVoidMethod ("StartActivity",mapa_rutas.processBA,(Object)((parent.mostCurrent._starter._gps /*RemoteObject*/ .runMethod(false,"getLocationSettingsIntent")))); - if (true) break; - -case 8: -//C -this.state = 9; - BA.debugLineNum = 125;BA.debugLine="Starter.GPS.Start(0, 0)"; -Debug.ShouldStop(268435456); -parent.mostCurrent._starter._gps /*RemoteObject*/ .runVoidMethodAndSync ("Start",mapa_rutas.processBA,(Object)(BA.numberCast(long.class, 0)),(Object)(BA.numberCast(float.class, 0))); - if (true) break; - -case 9: -//C -this.state = 10; -; - if (true) break; - -case 10: -//C -this.state = -1; -; - BA.debugLineNum = 128;BA.debugLine="LIST_AZUL.Initialize"; -Debug.ShouldStop(-2147483648); -parent.mostCurrent._list_azul.runVoidMethod ("Initialize"); - BA.debugLineNum = 129;BA.debugLine="LIST_ROJO.Initialize"; -Debug.ShouldStop(1); -parent.mostCurrent._list_rojo.runVoidMethod ("Initialize"); - BA.debugLineNum = 130;BA.debugLine="LIST_VERDE.Initialize"; -Debug.ShouldStop(2); -parent.mostCurrent._list_verde.runVoidMethod ("Initialize"); - BA.debugLineNum = 131;BA.debugLine="verde = 0"; -Debug.ShouldStop(4); -parent.mostCurrent._verde = BA.NumberToString(0); - BA.debugLineNum = 132;BA.debugLine="azul = 1"; -Debug.ShouldStop(8); -parent.mostCurrent._azul = BA.NumberToString(1); - BA.debugLineNum = 133;BA.debugLine="rojo = 0"; -Debug.ShouldStop(16); -parent.mostCurrent._rojo = BA.NumberToString(0); - BA.debugLineNum = 134;BA.debugLine="todos = 0"; -Debug.ShouldStop(32); -parent.mostCurrent._todos = BA.NumberToString(0); - BA.debugLineNum = 135;BA.debugLine="End Sub"; -Debug.ShouldStop(64); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _b_azul_click() throws Exception{ -try { - Debug.PushSubsStack("B_AZUL_Click (mapa_rutas) ","mapa_rutas",21,mapa_rutas.mostCurrent.activityBA,mapa_rutas.mostCurrent,337); -if (RapidSub.canDelegate("b_azul_click")) { return keymon.lat.medicomed.mapa_rutas.remoteMe.runUserSub(false, "mapa_rutas","b_azul_click");} - BA.debugLineNum = 337;BA.debugLine="Sub B_AZUL_Click"; -Debug.ShouldStop(65536); - BA.debugLineNum = 338;BA.debugLine="azul = 1"; -Debug.ShouldStop(131072); -mapa_rutas.mostCurrent._azul = BA.NumberToString(1); - BA.debugLineNum = 339;BA.debugLine="verde = 0"; -Debug.ShouldStop(262144); -mapa_rutas.mostCurrent._verde = BA.NumberToString(0); - BA.debugLineNum = 340;BA.debugLine="rojo = 0"; -Debug.ShouldStop(524288); -mapa_rutas.mostCurrent._rojo = BA.NumberToString(0); - BA.debugLineNum = 341;BA.debugLine="todos = 0"; -Debug.ShouldStop(1048576); -mapa_rutas.mostCurrent._todos = BA.NumberToString(0); - BA.debugLineNum = 342;BA.debugLine="gmap.Clear"; -Debug.ShouldStop(2097152); -mapa_rutas.mostCurrent._gmap.runVoidMethod ("Clear"); - BA.debugLineNum = 344;BA.debugLine="MapFragment1_Ready"; -Debug.ShouldStop(8388608); -_mapfragment1_ready(); - BA.debugLineNum = 346;BA.debugLine="End Sub"; -Debug.ShouldStop(33554432); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_rojo_click() throws Exception{ -try { - Debug.PushSubsStack("B_ROJO_Click (mapa_rutas) ","mapa_rutas",21,mapa_rutas.mostCurrent.activityBA,mapa_rutas.mostCurrent,326); -if (RapidSub.canDelegate("b_rojo_click")) { return keymon.lat.medicomed.mapa_rutas.remoteMe.runUserSub(false, "mapa_rutas","b_rojo_click");} - BA.debugLineNum = 326;BA.debugLine="Sub B_ROJO_Click"; -Debug.ShouldStop(32); - BA.debugLineNum = 327;BA.debugLine="rojo = 1"; -Debug.ShouldStop(64); -mapa_rutas.mostCurrent._rojo = BA.NumberToString(1); - BA.debugLineNum = 328;BA.debugLine="verde = 0"; -Debug.ShouldStop(128); -mapa_rutas.mostCurrent._verde = BA.NumberToString(0); - BA.debugLineNum = 329;BA.debugLine="azul = 0"; -Debug.ShouldStop(256); -mapa_rutas.mostCurrent._azul = BA.NumberToString(0); - BA.debugLineNum = 330;BA.debugLine="todos = 0"; -Debug.ShouldStop(512); -mapa_rutas.mostCurrent._todos = BA.NumberToString(0); - BA.debugLineNum = 331;BA.debugLine="gmap.Clear"; -Debug.ShouldStop(1024); -mapa_rutas.mostCurrent._gmap.runVoidMethod ("Clear"); - BA.debugLineNum = 333;BA.debugLine="MapFragment1_Ready"; -Debug.ShouldStop(4096); -_mapfragment1_ready(); - BA.debugLineNum = 335;BA.debugLine="End Sub"; -Debug.ShouldStop(16384); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_todos_click() throws Exception{ -try { - Debug.PushSubsStack("B_TODOS_Click (mapa_rutas) ","mapa_rutas",21,mapa_rutas.mostCurrent.activityBA,mapa_rutas.mostCurrent,306); -if (RapidSub.canDelegate("b_todos_click")) { return keymon.lat.medicomed.mapa_rutas.remoteMe.runUserSub(false, "mapa_rutas","b_todos_click");} - BA.debugLineNum = 306;BA.debugLine="Sub B_TODOS_Click"; -Debug.ShouldStop(131072); - BA.debugLineNum = 307;BA.debugLine="todos =1"; -Debug.ShouldStop(262144); -mapa_rutas.mostCurrent._todos = BA.NumberToString(1); - BA.debugLineNum = 308;BA.debugLine="verde = 0"; -Debug.ShouldStop(524288); -mapa_rutas.mostCurrent._verde = BA.NumberToString(0); - BA.debugLineNum = 309;BA.debugLine="azul = 0"; -Debug.ShouldStop(1048576); -mapa_rutas.mostCurrent._azul = BA.NumberToString(0); - BA.debugLineNum = 310;BA.debugLine="rojo = 0"; -Debug.ShouldStop(2097152); -mapa_rutas.mostCurrent._rojo = BA.NumberToString(0); - BA.debugLineNum = 312;BA.debugLine="MapFragment1_Ready"; -Debug.ShouldStop(8388608); -_mapfragment1_ready(); - BA.debugLineNum = 314;BA.debugLine="End Sub"; -Debug.ShouldStop(33554432); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _b_verde_click() throws Exception{ -try { - Debug.PushSubsStack("B_VERDE_Click (mapa_rutas) ","mapa_rutas",21,mapa_rutas.mostCurrent.activityBA,mapa_rutas.mostCurrent,316); -if (RapidSub.canDelegate("b_verde_click")) { return keymon.lat.medicomed.mapa_rutas.remoteMe.runUserSub(false, "mapa_rutas","b_verde_click");} - BA.debugLineNum = 316;BA.debugLine="Sub B_VERDE_Click"; -Debug.ShouldStop(134217728); - BA.debugLineNum = 317;BA.debugLine="verde = 1"; -Debug.ShouldStop(268435456); -mapa_rutas.mostCurrent._verde = BA.NumberToString(1); - BA.debugLineNum = 318;BA.debugLine="azul = 0"; -Debug.ShouldStop(536870912); -mapa_rutas.mostCurrent._azul = BA.NumberToString(0); - BA.debugLineNum = 319;BA.debugLine="rojo = 0"; -Debug.ShouldStop(1073741824); -mapa_rutas.mostCurrent._rojo = BA.NumberToString(0); - BA.debugLineNum = 320;BA.debugLine="todos = 0"; -Debug.ShouldStop(-2147483648); -mapa_rutas.mostCurrent._todos = BA.NumberToString(0); - BA.debugLineNum = 321;BA.debugLine="gmap.Clear"; -Debug.ShouldStop(1); -mapa_rutas.mostCurrent._gmap.runVoidMethod ("Clear"); - BA.debugLineNum = 322;BA.debugLine="MapFragment1_Ready"; -Debug.ShouldStop(2); -_mapfragment1_ready(); - BA.debugLineNum = 324;BA.debugLine="End Sub"; -Debug.ShouldStop(8); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _globals() throws Exception{ - //BA.debugLineNum = 18;BA.debugLine="Sub Globals"; - //BA.debugLineNum = 19;BA.debugLine="Private gmap As GoogleMap"; -mapa_rutas.mostCurrent._gmap = RemoteObject.createNew ("anywheresoftware.b4a.objects.MapFragmentWrapper.GoogleMapWrapper"); - //BA.debugLineNum = 20;BA.debugLine="Private MapFragment1 As MapFragment"; -mapa_rutas.mostCurrent._mapfragment1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.MapFragmentWrapper"); - //BA.debugLineNum = 21;BA.debugLine="Dim Latitud As Double = 0"; -mapa_rutas._latitud = BA.numberCast(double.class, 0); - //BA.debugLineNum = 22;BA.debugLine="Dim Longitud As Double = 0"; -mapa_rutas._longitud = BA.numberCast(double.class, 0); - //BA.debugLineNum = 23;BA.debugLine="Dim Lat2 As Double = 0"; -mapa_rutas._lat2 = BA.numberCast(double.class, 0); - //BA.debugLineNum = 24;BA.debugLine="Dim Lon2 As Double = 0"; -mapa_rutas._lon2 = BA.numberCast(double.class, 0); - //BA.debugLineNum = 25;BA.debugLine="Dim p1, p2 As Location"; -mapa_rutas.mostCurrent._p1 = RemoteObject.createNew ("anywheresoftware.b4a.gps.LocationWrapper"); -mapa_rutas.mostCurrent._p2 = RemoteObject.createNew ("anywheresoftware.b4a.gps.LocationWrapper"); - //BA.debugLineNum = 26;BA.debugLine="Dim Distance As Float"; -mapa_rutas._distance = RemoteObject.createImmutable(0f); - //BA.debugLineNum = 27;BA.debugLine="Dim boton1 As Button"; -mapa_rutas.mostCurrent._boton1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper"); - //BA.debugLineNum = 28;BA.debugLine="Dim HUE_BLUE As Float"; -mapa_rutas._hue_blue = RemoteObject.createImmutable(0f); - //BA.debugLineNum = 29;BA.debugLine="Dim HUE_RED As Float"; -mapa_rutas._hue_red = RemoteObject.createImmutable(0f); - //BA.debugLineNum = 30;BA.debugLine="Dim HUE_GREEN As Float"; -mapa_rutas._hue_green = RemoteObject.createImmutable(0f); - //BA.debugLineNum = 31;BA.debugLine="Private B_AZUL As Button"; -mapa_rutas.mostCurrent._b_azul = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper"); - //BA.debugLineNum = 32;BA.debugLine="Private B_ROJO As Button"; -mapa_rutas.mostCurrent._b_rojo = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper"); - //BA.debugLineNum = 33;BA.debugLine="Private B_VERDE As Button"; -mapa_rutas.mostCurrent._b_verde = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper"); - //BA.debugLineNum = 34;BA.debugLine="Private B_TODOS As Button"; -mapa_rutas.mostCurrent._b_todos = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper"); - //BA.debugLineNum = 35;BA.debugLine="Dim Tienda As String"; -mapa_rutas.mostCurrent._tienda = RemoteObject.createImmutable(""); - //BA.debugLineNum = 36;BA.debugLine="Dim LatitudRu As Double"; -mapa_rutas._latitudru = RemoteObject.createImmutable(0); - //BA.debugLineNum = 37;BA.debugLine="Dim LongitudRU As Double"; -mapa_rutas._longitudru = RemoteObject.createImmutable(0); - //BA.debugLineNum = 38;BA.debugLine="Dim LIST_AZUL As List"; -mapa_rutas.mostCurrent._list_azul = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); - //BA.debugLineNum = 39;BA.debugLine="Dim LIST_ROJO As List"; -mapa_rutas.mostCurrent._list_rojo = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); - //BA.debugLineNum = 40;BA.debugLine="Dim LIST_VERDE As List"; -mapa_rutas.mostCurrent._list_verde = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); - //BA.debugLineNum = 41;BA.debugLine="Dim MARK_AZUL As Marker"; -mapa_rutas.mostCurrent._mark_azul = RemoteObject.createNew ("anywheresoftware.b4a.objects.MapFragmentWrapper.MarkerWrapper"); - //BA.debugLineNum = 42;BA.debugLine="Dim MARK_ROJO As Marker"; -mapa_rutas.mostCurrent._mark_rojo = RemoteObject.createNew ("anywheresoftware.b4a.objects.MapFragmentWrapper.MarkerWrapper"); - //BA.debugLineNum = 43;BA.debugLine="Dim MARK_VERDE As Marker"; -mapa_rutas.mostCurrent._mark_verde = RemoteObject.createNew ("anywheresoftware.b4a.objects.MapFragmentWrapper.MarkerWrapper"); - //BA.debugLineNum = 44;BA.debugLine="Dim MARK_CEDIS As Marker"; -mapa_rutas.mostCurrent._mark_cedis = RemoteObject.createNew ("anywheresoftware.b4a.objects.MapFragmentWrapper.MarkerWrapper"); - //BA.debugLineNum = 45;BA.debugLine="Dim rojo As String"; -mapa_rutas.mostCurrent._rojo = RemoteObject.createImmutable(""); - //BA.debugLineNum = 46;BA.debugLine="Dim azul As String"; -mapa_rutas.mostCurrent._azul = RemoteObject.createImmutable(""); - //BA.debugLineNum = 47;BA.debugLine="Dim verde As String"; -mapa_rutas.mostCurrent._verde = RemoteObject.createImmutable(""); - //BA.debugLineNum = 48;BA.debugLine="Dim todos As String"; -mapa_rutas.mostCurrent._todos = RemoteObject.createImmutable(""); - //BA.debugLineNum = 49;BA.debugLine="Dim NumSerie As Int"; -mapa_rutas._numserie = RemoteObject.createImmutable(0); - //BA.debugLineNum = 50;BA.debugLine="Dim OnInfoWindowClickListener1 As OnInfoWindowCli"; -mapa_rutas.mostCurrent._oninfowindowclicklistener1 = RemoteObject.createNew ("uk.co.martinpearman.b4a.com.google.android.gms.maps.googlemap.OnInfoWindowClickListener"); - //BA.debugLineNum = 51;BA.debugLine="Dim GoogleMapEXTRA As GoogleMapsExtras"; -mapa_rutas.mostCurrent._googlemapextra = RemoteObject.createNew ("uk.co.martinpearman.b4a.googlemapsextras.GoogleMapsExtras"); - //BA.debugLineNum = 52;BA.debugLine="Dim CODIGO As String"; -mapa_rutas.mostCurrent._codigo = RemoteObject.createImmutable(""); - //BA.debugLineNum = 53;BA.debugLine="Private SEMANA As String"; -mapa_rutas.mostCurrent._semana = RemoteObject.createImmutable(""); - //BA.debugLineNum = 54;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _gps_locationchanged(RemoteObject _parametro) throws Exception{ -try { - Debug.PushSubsStack("GPS_LocationChanged (mapa_rutas) ","mapa_rutas",21,mapa_rutas.mostCurrent.activityBA,mapa_rutas.mostCurrent,280); -if (RapidSub.canDelegate("gps_locationchanged")) { return keymon.lat.medicomed.mapa_rutas.remoteMe.runUserSub(false, "mapa_rutas","gps_locationchanged", _parametro);} -Debug.locals.put("Parametro", _parametro); - BA.debugLineNum = 280;BA.debugLine="Sub GPS_LocationChanged (Parametro As Location)"; -Debug.ShouldStop(8388608); - BA.debugLineNum = 281;BA.debugLine="MARK_CEDIS.IsInitialized"; -Debug.ShouldStop(16777216); -mapa_rutas.mostCurrent._mark_cedis.runVoidMethod ("IsInitialized"); - BA.debugLineNum = 299;BA.debugLine="End Sub"; -Debug.ShouldStop(1024); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _mapfragment1_ready() throws Exception{ -try { - Debug.PushSubsStack("MapFragment1_Ready (mapa_rutas) ","mapa_rutas",21,mapa_rutas.mostCurrent.activityBA,mapa_rutas.mostCurrent,137); -if (RapidSub.canDelegate("mapfragment1_ready")) { keymon.lat.medicomed.mapa_rutas.remoteMe.runUserSub(false, "mapa_rutas","mapfragment1_ready"); return;} -ResumableSub_MapFragment1_Ready rsub = new ResumableSub_MapFragment1_Ready(null); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_MapFragment1_Ready extends BA.ResumableSub { -public ResumableSub_MapFragment1_Ready(keymon.lat.medicomed.mapa_rutas parent) { -this.parent = parent; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -keymon.lat.medicomed.mapa_rutas parent; -RemoteObject _permission = RemoteObject.createImmutable(""); -RemoteObject _result = RemoteObject.createImmutable(false); -RemoteObject _javamapsobject = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -int _i = 0; -RemoteObject _aa = RemoteObject.declareNull("anywheresoftware.b4a.objects.MapFragmentWrapper.CameraPositionWrapper"); -int step15; -int limit15; -int step35; -int limit35; -int step52; -int limit52; -int step69; -int limit69; -int step84; -int limit84; - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("MapFragment1_Ready (mapa_rutas) ","mapa_rutas",21,mapa_rutas.mostCurrent.activityBA,mapa_rutas.mostCurrent,137); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; - BA.debugLineNum = 138;BA.debugLine="Log(\"ENTRANDO MapFragment1_Ready\")"; -Debug.ShouldStop(512); -parent.mostCurrent.__c.runVoidMethod ("LogImpl","328508161",RemoteObject.createImmutable("ENTRANDO MapFragment1_Ready"),0); - BA.debugLineNum = 139;BA.debugLine="gmap = MapFragment1.GetMap"; -Debug.ShouldStop(1024); -parent.mostCurrent._gmap = parent.mostCurrent._mapfragment1.runMethod(false,"GetMap"); - BA.debugLineNum = 140;BA.debugLine="gmap.IsInitialized"; -Debug.ShouldStop(2048); -parent.mostCurrent._gmap.runVoidMethod ("IsInitialized"); - BA.debugLineNum = 144;BA.debugLine="rp.CheckAndRequest(rp.PERMISSION_ACCESS_FINE_LOCA"; -Debug.ShouldStop(32768); -parent._rp.runVoidMethod ("CheckAndRequest",mapa_rutas.processBA,(Object)(parent._rp.getField(true,"PERMISSION_ACCESS_FINE_LOCATION"))); - BA.debugLineNum = 145;BA.debugLine="Wait For Activity_PermissionResult (Permission As"; -Debug.ShouldStop(65536); -parent.mostCurrent.__c.runVoidMethod ("WaitFor","activity_permissionresult", mapa_rutas.processBA, anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "mapa_rutas", "mapfragment1_ready"), null); -this.state = 80; -return; -case 80: -//C -this.state = 1; -_permission = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(0));Debug.locals.put("Permission", _permission); -_result = (RemoteObject) result.getArrayElement(true,RemoteObject.createImmutable(1));Debug.locals.put("Result", _result); -; - BA.debugLineNum = 146;BA.debugLine="gmap.MyLocationEnabled = Result"; -Debug.ShouldStop(131072); -parent.mostCurrent._gmap.runMethod(true,"setMyLocationEnabled",_result); - BA.debugLineNum = 148;BA.debugLine="Dim JavaMapsObject As JavaObject"; -Debug.ShouldStop(524288); -_javamapsobject = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("JavaMapsObject", _javamapsobject); - BA.debugLineNum = 149;BA.debugLine="JavaMapsObject = gmap.GetUiSettings"; -Debug.ShouldStop(1048576); -_javamapsobject = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), parent.mostCurrent._gmap.runMethod(false,"GetUiSettings").getObject());Debug.locals.put("JavaMapsObject", _javamapsobject); - BA.debugLineNum = 150;BA.debugLine="JavaMapsObject.RunMethod(\"setMapToolbarEnabled\","; -Debug.ShouldStop(2097152); -_javamapsobject.runVoidMethod ("RunMethod",(Object)(BA.ObjectToString("setMapToolbarEnabled")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(parent.mostCurrent.__c.getField(true,"True"))}))); - BA.debugLineNum = 152;BA.debugLine="If azul = 1 Or todos = 1 Then"; -Debug.ShouldStop(8388608); -if (true) break; - -case 1: -//if -this.state = 30; -if (RemoteObject.solveBoolean("=",parent.mostCurrent._azul,BA.NumberToString(1)) || RemoteObject.solveBoolean("=",parent.mostCurrent._todos,BA.NumberToString(1))) { -this.state = 3; -}if (true) break; - -case 3: -//C -this.state = 4; - BA.debugLineNum = 153;BA.debugLine="c.IsInitialized"; -Debug.ShouldStop(16777216); -parent._c.runVoidMethod ("IsInitialized"); - BA.debugLineNum = 154;BA.debugLine="c=skmt.ExecQuery(\"select CAT_CL_CODIGO,CAT_CL_NO"; -Debug.ShouldStop(33554432); -parent._c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), parent._skmt.runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_CL_CODIGO,CAT_CL_NOMBRE,CAT_CL_LAT,CAT_CL_LONG,CAT_CL_SECUENCIA from kmt_info where gestion = 0 and CAT_CL_LAT is not null and CAT_CL_LONG is not null and CAT_CL_LAT <> 0 and CAT_CL_LONG <> 0 and CAT_CL_LAT <> ' ' and CAT_CL_LONG <> ' ' ")))); - BA.debugLineNum = 156;BA.debugLine="Log($\"============== Resultados = ${c.RowCount}\""; -Debug.ShouldStop(134217728); -parent.mostCurrent.__c.runVoidMethod ("LogImpl","328508179",(RemoteObject.concat(RemoteObject.createImmutable("============== Resultados = "),parent.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent._c.runMethod(true,"getRowCount")))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 157;BA.debugLine="If c.RowCount > 0 Then"; -Debug.ShouldStop(268435456); -if (true) break; - -case 4: -//if -this.state = 23; -if (RemoteObject.solveBoolean(">",parent._c.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { -this.state = 6; -}if (true) break; - -case 6: -//C -this.state = 7; - BA.debugLineNum = 158;BA.debugLine="For i = 0 To c.RowCount - 1"; -Debug.ShouldStop(536870912); -if (true) break; - -case 7: -//for -this.state = 22; -step15 = 1; -limit15 = RemoteObject.solve(new RemoteObject[] {parent._c.runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -Debug.locals.put("i", _i); -this.state = 81; -if (true) break; - -case 81: -//C -this.state = 22; -if ((step15 > 0 && _i <= limit15) || (step15 < 0 && _i >= limit15)) this.state = 9; -if (true) break; - -case 82: -//C -this.state = 81; -_i = ((int)(0 + _i + step15)) ; -Debug.locals.put("i", _i); -if (true) break; - -case 9: -//C -this.state = 10; - BA.debugLineNum = 159;BA.debugLine="c.Position = i"; -Debug.ShouldStop(1073741824); -parent._c.runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 162;BA.debugLine="LatitudRu = 0"; -Debug.ShouldStop(2); -parent._latitudru = BA.numberCast(double.class, 0); - BA.debugLineNum = 163;BA.debugLine="If c.GetString(\"CAT_CL_LAT\") <> \"\" Then Latitu"; -Debug.ShouldStop(4); -if (true) break; - -case 10: -//if -this.state = 15; -if (RemoteObject.solveBoolean("!",parent._c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_LAT"))),BA.ObjectToString(""))) { -this.state = 12; -;}if (true) break; - -case 12: -//C -this.state = 15; -parent._latitudru = BA.numberCast(double.class, parent._c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_LAT")))); -if (true) break; - -case 15: -//C -this.state = 16; -; - BA.debugLineNum = 164;BA.debugLine="LongitudRU = 0"; -Debug.ShouldStop(8); -parent._longitudru = BA.numberCast(double.class, 0); - BA.debugLineNum = 165;BA.debugLine="If c.GetString(\"CAT_CL_LONG\") <> \"\" Then Longi"; -Debug.ShouldStop(16); -if (true) break; - -case 16: -//if -this.state = 21; -if (RemoteObject.solveBoolean("!",parent._c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_LONG"))),BA.ObjectToString(""))) { -this.state = 18; -;}if (true) break; - -case 18: -//C -this.state = 21; -parent._longitudru = BA.numberCast(double.class, parent._c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_LONG")))); -if (true) break; - -case 21: -//C -this.state = 82; -; - BA.debugLineNum = 166;BA.debugLine="CODIGO=c.GetString(\"CAT_CL_CODIGO\")"; -Debug.ShouldStop(32); -parent.mostCurrent._codigo = parent._c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_CODIGO"))); - BA.debugLineNum = 167;BA.debugLine="Tienda= c.GetString(\"CAT_CL_NOMBRE\")"; -Debug.ShouldStop(64); -parent.mostCurrent._tienda = parent._c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_NOMBRE"))); - BA.debugLineNum = 168;BA.debugLine="NumSerie=c.GetInt(\"CAT_CL_SECUENCIA\")"; -Debug.ShouldStop(128); -parent._numserie = parent._c.runMethod(true,"GetInt",(Object)(RemoteObject.createImmutable("CAT_CL_SECUENCIA"))); - BA.debugLineNum = 169;BA.debugLine="MARK_AZUL = gmap.AddMarker3(LatitudRu,Longitud"; -Debug.ShouldStop(256); -parent.mostCurrent._mark_azul = parent.mostCurrent._gmap.runMethod(false,"AddMarker3",(Object)(parent._latitudru),(Object)(parent._longitudru),(Object)(parent.mostCurrent._codigo),(Object)((parent.mostCurrent.__c.runMethod(false,"LoadBitmap",(Object)(parent.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(RemoteObject.concat(RemoteObject.createImmutable("marker-azul-"),parent._numserie,RemoteObject.createImmutable(".png")))).getObject()))); - BA.debugLineNum = 170;BA.debugLine="MARK_AZUL.Snippet = Tienda"; -Debug.ShouldStop(512); -parent.mostCurrent._mark_azul.runMethod(true,"setSnippet",parent.mostCurrent._tienda); - if (true) break; -if (true) break; - -case 22: -//C -this.state = 23; -Debug.locals.put("i", _i); -; - if (true) break; - -case 23: -//C -this.state = 24; -; - BA.debugLineNum = 173;BA.debugLine="c .Close"; -Debug.ShouldStop(4096); -parent._c.runVoidMethod ("Close"); - BA.debugLineNum = 176;BA.debugLine="If MARK_AZUL.IsInitialized Then LIST_AZUL.Add(MA"; -Debug.ShouldStop(32768); -if (true) break; - -case 24: -//if -this.state = 29; -if (parent.mostCurrent._mark_azul.runMethod(true,"IsInitialized").get().booleanValue()) { -this.state = 26; -;}if (true) break; - -case 26: -//C -this.state = 29; -parent.mostCurrent._list_azul.runVoidMethod ("Add",(Object)((parent.mostCurrent._mark_azul.getObject()))); -if (true) break; - -case 29: -//C -this.state = 30; -; - if (true) break; -; - BA.debugLineNum = 179;BA.debugLine="If verde =1 Or todos = 1 Then"; -Debug.ShouldStop(262144); - -case 30: -//if -this.state = 57; -if (RemoteObject.solveBoolean("=",parent.mostCurrent._verde,BA.NumberToString(1)) || RemoteObject.solveBoolean("=",parent.mostCurrent._todos,BA.NumberToString(1))) { -this.state = 32; -}else { -this.state = 42; -}if (true) break; - -case 32: -//C -this.state = 33; - BA.debugLineNum = 180;BA.debugLine="c2.IsInitialized"; -Debug.ShouldStop(524288); -parent._c2.runVoidMethod ("IsInitialized"); - BA.debugLineNum = 181;BA.debugLine="c2=skmt.ExecQuery(\"select CAT_CL_CODIGO, CAT_CL_"; -Debug.ShouldStop(1048576); -parent._c2 = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), parent._skmt.runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_CL_CODIGO, CAT_CL_NOMBRE,CAT_CL_LONG,CAT_CL_LAT,CAT_CL_SECUENCIA from kmt_info where gestion = 2 and CAT_CL_LAT is not null and CAT_CL_LONG is not null and CAT_CL_LAT <> 0 and CAT_CL_LONG <> 0")))); - BA.debugLineNum = 182;BA.debugLine="Log($\"============== Resultados = ${c2.RowCount}"; -Debug.ShouldStop(2097152); -parent.mostCurrent.__c.runVoidMethod ("LogImpl","328508205",(RemoteObject.concat(RemoteObject.createImmutable("============== Resultados = "),parent.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent._c2.runMethod(true,"getRowCount")))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 183;BA.debugLine="For i = 0 To c2.RowCount -1"; -Debug.ShouldStop(4194304); -if (true) break; - -case 33: -//for -this.state = 40; -step35 = 1; -limit35 = RemoteObject.solve(new RemoteObject[] {parent._c2.runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -Debug.locals.put("i", _i); -this.state = 83; -if (true) break; - -case 83: -//C -this.state = 40; -if ((step35 > 0 && _i <= limit35) || (step35 < 0 && _i >= limit35)) this.state = 35; -if (true) break; - -case 84: -//C -this.state = 83; -_i = ((int)(0 + _i + step35)) ; -Debug.locals.put("i", _i); -if (true) break; - -case 35: -//C -this.state = 36; - BA.debugLineNum = 184;BA.debugLine="c2.Position = i"; -Debug.ShouldStop(8388608); -parent._c2.runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 186;BA.debugLine="If IsNumber(c2.GetString(\"CAT_CL_LONG\")) Then"; -Debug.ShouldStop(33554432); -if (true) break; - -case 36: -//if -this.state = 39; -if (parent.mostCurrent.__c.runMethod(true,"IsNumber",(Object)(parent._c2.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_LONG"))))).get().booleanValue()) { -this.state = 38; -}if (true) break; - -case 38: -//C -this.state = 39; - BA.debugLineNum = 187;BA.debugLine="LongitudRU = c2.GetString(\"CAT_CL_LONG\")"; -Debug.ShouldStop(67108864); -parent._longitudru = BA.numberCast(double.class, parent._c2.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_LONG")))); - BA.debugLineNum = 188;BA.debugLine="LatitudRu = c2.GetString(\"CAT_CL_LAT\")"; -Debug.ShouldStop(134217728); -parent._latitudru = BA.numberCast(double.class, parent._c2.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_LAT")))); - BA.debugLineNum = 189;BA.debugLine="CODIGO=c2.GetString(\"CAT_CL_CODIGO\")"; -Debug.ShouldStop(268435456); -parent.mostCurrent._codigo = parent._c2.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_CODIGO"))); - BA.debugLineNum = 190;BA.debugLine="Tienda= c2.GetString(\"CAT_CL_NOMBRE\")"; -Debug.ShouldStop(536870912); -parent.mostCurrent._tienda = parent._c2.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_NOMBRE"))); - BA.debugLineNum = 191;BA.debugLine="NumSerie=c2.GetInt(\"CAT_CL_SECUENCIA\")"; -Debug.ShouldStop(1073741824); -parent._numserie = parent._c2.runMethod(true,"GetInt",(Object)(RemoteObject.createImmutable("CAT_CL_SECUENCIA"))); - BA.debugLineNum = 192;BA.debugLine="MARK_VERDE = gmap.AddMarker3(LatitudRu,Longitu"; -Debug.ShouldStop(-2147483648); -parent.mostCurrent._mark_verde = parent.mostCurrent._gmap.runMethod(false,"AddMarker3",(Object)(parent._latitudru),(Object)(parent._longitudru),(Object)(parent.mostCurrent._codigo),(Object)((parent.mostCurrent.__c.runMethod(false,"LoadBitmap",(Object)(parent.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(RemoteObject.concat(RemoteObject.createImmutable("marker-verde-"),parent._numserie,RemoteObject.createImmutable(".png")))).getObject()))); - BA.debugLineNum = 193;BA.debugLine="MARK_VERDE.Snippet = Tienda"; -Debug.ShouldStop(1); -parent.mostCurrent._mark_verde.runMethod(true,"setSnippet",parent.mostCurrent._tienda); - if (true) break; - -case 39: -//C -this.state = 84; -; - if (true) break; -if (true) break; - -case 40: -//C -this.state = 57; -Debug.locals.put("i", _i); -; - if (true) break; - -case 42: -//C -this.state = 43; - BA.debugLineNum = 197;BA.debugLine="If verde =1 Or todos = 1 Then"; -Debug.ShouldStop(16); -if (true) break; - -case 43: -//if -this.state = 56; -if (RemoteObject.solveBoolean("=",parent.mostCurrent._verde,BA.NumberToString(1)) || RemoteObject.solveBoolean("=",parent.mostCurrent._todos,BA.NumberToString(1))) { -this.state = 45; -}if (true) break; - -case 45: -//C -this.state = 46; - BA.debugLineNum = 198;BA.debugLine="c2.IsInitialized"; -Debug.ShouldStop(32); -parent._c2.runVoidMethod ("IsInitialized"); - BA.debugLineNum = 199;BA.debugLine="c2=skmt.ExecQuery(\"select CAT_CL_CODIGO, CAT_CL"; -Debug.ShouldStop(64); -parent._c2 = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), parent._skmt.runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_CL_CODIGO, CAT_CL_NOMBRE,CAT_CL_LONG,CAT_CL_LAT from kmt_info where gestion = 2 and CAT_CL_LAT is not null and CAT_CL_LONG is not null and CAT_CL_LAT <> 0 and CAT_CL_LONG <> 0")))); - BA.debugLineNum = 200;BA.debugLine="Log($\"============== Resultados = ${c2.RowCount"; -Debug.ShouldStop(128); -parent.mostCurrent.__c.runVoidMethod ("LogImpl","328508223",(RemoteObject.concat(RemoteObject.createImmutable("============== Resultados = "),parent.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent._c2.runMethod(true,"getRowCount")))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 201;BA.debugLine="For i = 0 To c2.RowCount -1"; -Debug.ShouldStop(256); -if (true) break; - -case 46: -//for -this.state = 49; -step52 = 1; -limit52 = RemoteObject.solve(new RemoteObject[] {parent._c2.runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -Debug.locals.put("i", _i); -this.state = 85; -if (true) break; - -case 85: -//C -this.state = 49; -if ((step52 > 0 && _i <= limit52) || (step52 < 0 && _i >= limit52)) this.state = 48; -if (true) break; - -case 86: -//C -this.state = 85; -_i = ((int)(0 + _i + step52)) ; -Debug.locals.put("i", _i); -if (true) break; - -case 48: -//C -this.state = 86; - BA.debugLineNum = 202;BA.debugLine="c2.Position = i"; -Debug.ShouldStop(512); -parent._c2.runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 204;BA.debugLine="LongitudRU = c2.GetString(\"CAT_CL_LONG\")"; -Debug.ShouldStop(2048); -parent._longitudru = BA.numberCast(double.class, parent._c2.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_LONG")))); - BA.debugLineNum = 205;BA.debugLine="LatitudRu = c2.GetString(\"CAT_CL_LAT\")"; -Debug.ShouldStop(4096); -parent._latitudru = BA.numberCast(double.class, parent._c2.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_LAT")))); - BA.debugLineNum = 206;BA.debugLine="CODIGO=c2.GetString(\"CAT_CL_CODIGO\")"; -Debug.ShouldStop(8192); -parent.mostCurrent._codigo = parent._c2.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_CODIGO"))); - BA.debugLineNum = 207;BA.debugLine="Tienda= c2.GetString(\"CAT_CL_NOMBRE\")"; -Debug.ShouldStop(16384); -parent.mostCurrent._tienda = parent._c2.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_NOMBRE"))); - BA.debugLineNum = 208;BA.debugLine="MARK_VERDE = gmap.AddMarker2(LatitudRu,Longitu"; -Debug.ShouldStop(32768); -parent.mostCurrent._mark_verde = parent.mostCurrent._gmap.runMethod(false,"AddMarker2",(Object)(parent._latitudru),(Object)(parent._longitudru),(Object)(parent.mostCurrent._codigo),(Object)(parent.mostCurrent._gmap.getField(true,"HUE_GREEN"))); - BA.debugLineNum = 209;BA.debugLine="MARK_VERDE.Snippet = Tienda"; -Debug.ShouldStop(65536); -parent.mostCurrent._mark_verde.runMethod(true,"setSnippet",parent.mostCurrent._tienda); - if (true) break; -if (true) break; - -case 49: -//C -this.state = 50; -Debug.locals.put("i", _i); -; - BA.debugLineNum = 211;BA.debugLine="c2 .Close"; -Debug.ShouldStop(262144); -parent._c2.runVoidMethod ("Close"); - BA.debugLineNum = 212;BA.debugLine="If MARK_VERDE.IsInitialized Then LIST_VERDE.Add"; -Debug.ShouldStop(524288); -if (true) break; - -case 50: -//if -this.state = 55; -if (parent.mostCurrent._mark_verde.runMethod(true,"IsInitialized").get().booleanValue()) { -this.state = 52; -;}if (true) break; - -case 52: -//C -this.state = 55; -parent.mostCurrent._list_verde.runVoidMethod ("Add",(Object)((parent.mostCurrent._mark_verde.getObject()))); -if (true) break; - -case 55: -//C -this.state = 56; -; - if (true) break; - -case 56: -//C -this.state = 57; -; - if (true) break; -; - BA.debugLineNum = 217;BA.debugLine="If rojo =1 Or todos = 1 Then"; -Debug.ShouldStop(16777216); - -case 57: -//if -this.state = 79; -if (RemoteObject.solveBoolean("=",parent.mostCurrent._rojo,BA.NumberToString(1)) || RemoteObject.solveBoolean("=",parent.mostCurrent._todos,BA.NumberToString(1))) { -this.state = 59; -}else { -this.state = 65; -}if (true) break; - -case 59: -//C -this.state = 60; - BA.debugLineNum = 218;BA.debugLine="c3.IsInitialized"; -Debug.ShouldStop(33554432); -parent._c3.runVoidMethod ("IsInitialized"); - BA.debugLineNum = 219;BA.debugLine="c3=skmt.ExecQuery(\"select CAT_CL_CODIGO, CAT_CL_"; -Debug.ShouldStop(67108864); -parent._c3 = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), parent._skmt.runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_CL_CODIGO, CAT_CL_NOMBRE,CAT_CL_LONG,CAT_CL_LAT,CAT_CL_SECUENCIA from kmt_info where gestion = 3 and CAT_CL_LAT is not null and CAT_CL_LONG is not null and CAT_CL_LAT <> 0 and CAT_CL_LONG <> 0")))); - BA.debugLineNum = 220;BA.debugLine="Log($\"============== Resultados = ${c3.RowCount}"; -Debug.ShouldStop(134217728); -parent.mostCurrent.__c.runVoidMethod ("LogImpl","328508243",(RemoteObject.concat(RemoteObject.createImmutable("============== Resultados = "),parent.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent._c3.runMethod(true,"getRowCount")))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 221;BA.debugLine="For i = 0 To c3.RowCount -1"; -Debug.ShouldStop(268435456); -if (true) break; - -case 60: -//for -this.state = 63; -step69 = 1; -limit69 = RemoteObject.solve(new RemoteObject[] {parent._c3.runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -Debug.locals.put("i", _i); -this.state = 87; -if (true) break; - -case 87: -//C -this.state = 63; -if ((step69 > 0 && _i <= limit69) || (step69 < 0 && _i >= limit69)) this.state = 62; -if (true) break; - -case 88: -//C -this.state = 87; -_i = ((int)(0 + _i + step69)) ; -Debug.locals.put("i", _i); -if (true) break; - -case 62: -//C -this.state = 88; - BA.debugLineNum = 222;BA.debugLine="c3.Position = i"; -Debug.ShouldStop(536870912); -parent._c3.runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 224;BA.debugLine="LongitudRU = c3.GetDouble(\"CAT_CL_LONG\")"; -Debug.ShouldStop(-2147483648); -parent._longitudru = parent._c3.runMethod(true,"GetDouble",(Object)(RemoteObject.createImmutable("CAT_CL_LONG"))); - BA.debugLineNum = 225;BA.debugLine="LatitudRu = c3.GetDouble(\"CAT_CL_LAT\")"; -Debug.ShouldStop(1); -parent._latitudru = parent._c3.runMethod(true,"GetDouble",(Object)(RemoteObject.createImmutable("CAT_CL_LAT"))); - BA.debugLineNum = 226;BA.debugLine="CODIGO=c3.GetString(\"CAT_CL_CODIGO\")"; -Debug.ShouldStop(2); -parent.mostCurrent._codigo = parent._c3.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_CODIGO"))); - BA.debugLineNum = 227;BA.debugLine="Tienda= c3.GetString(\"CAT_CL_NOMBRE\")"; -Debug.ShouldStop(4); -parent.mostCurrent._tienda = parent._c3.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_NOMBRE"))); - BA.debugLineNum = 228;BA.debugLine="NumSerie=c3.GetInt(\"CAT_CL_SECUENCIA\")"; -Debug.ShouldStop(8); -parent._numserie = parent._c3.runMethod(true,"GetInt",(Object)(RemoteObject.createImmutable("CAT_CL_SECUENCIA"))); - BA.debugLineNum = 229;BA.debugLine="MARK_ROJO = gmap.AddMarker3(LatitudRu,LongitudR"; -Debug.ShouldStop(16); -parent.mostCurrent._mark_rojo = parent.mostCurrent._gmap.runMethod(false,"AddMarker3",(Object)(parent._latitudru),(Object)(parent._longitudru),(Object)(parent.mostCurrent._codigo),(Object)((parent.mostCurrent.__c.runMethod(false,"LoadBitmap",(Object)(parent.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(RemoteObject.concat(RemoteObject.createImmutable("marker-rojo-"),parent._numserie,RemoteObject.createImmutable(".png")))).getObject()))); - BA.debugLineNum = 230;BA.debugLine="MARK_ROJO.Snippet = Tienda"; -Debug.ShouldStop(32); -parent.mostCurrent._mark_rojo.runMethod(true,"setSnippet",parent.mostCurrent._tienda); - if (true) break; -if (true) break; - -case 63: -//C -this.state = 79; -Debug.locals.put("i", _i); -; - if (true) break; - -case 65: -//C -this.state = 66; - BA.debugLineNum = 233;BA.debugLine="If rojo =1 Or todos = 1 Then"; -Debug.ShouldStop(256); -if (true) break; - -case 66: -//if -this.state = 78; -if (RemoteObject.solveBoolean("=",parent.mostCurrent._rojo,BA.NumberToString(1)) || RemoteObject.solveBoolean("=",parent.mostCurrent._todos,BA.NumberToString(1))) { -this.state = 68; -}if (true) break; - -case 68: -//C -this.state = 69; - BA.debugLineNum = 234;BA.debugLine="c3.IsInitialized"; -Debug.ShouldStop(512); -parent._c3.runVoidMethod ("IsInitialized"); - BA.debugLineNum = 235;BA.debugLine="c3=skmt.ExecQuery(\"select CAT_CL_CODIGO, CAT_CL"; -Debug.ShouldStop(1024); -parent._c3 = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), parent._skmt.runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_CL_CODIGO, CAT_CL_NOMBRE,CAT_CL_LONG,CAT_CL_LAT from kmt_info where gestion = 3 and CAT_CL_LAT is not null and CAT_CL_LONG is not null and CAT_CL_LAT <> 0 and CAT_CL_LONG <> 0")))); - BA.debugLineNum = 236;BA.debugLine="Log($\"============== Resultados = ${c3.RowCount"; -Debug.ShouldStop(2048); -parent.mostCurrent.__c.runVoidMethod ("LogImpl","328508259",(RemoteObject.concat(RemoteObject.createImmutable("============== Resultados = "),parent.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((parent._c3.runMethod(true,"getRowCount")))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 237;BA.debugLine="For i = 0 To c3.RowCount -1"; -Debug.ShouldStop(4096); -if (true) break; - -case 69: -//for -this.state = 72; -step84 = 1; -limit84 = RemoteObject.solve(new RemoteObject[] {parent._c3.runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -Debug.locals.put("i", _i); -this.state = 89; -if (true) break; - -case 89: -//C -this.state = 72; -if ((step84 > 0 && _i <= limit84) || (step84 < 0 && _i >= limit84)) this.state = 71; -if (true) break; - -case 90: -//C -this.state = 89; -_i = ((int)(0 + _i + step84)) ; -Debug.locals.put("i", _i); -if (true) break; - -case 71: -//C -this.state = 90; - BA.debugLineNum = 238;BA.debugLine="c3.Position = i"; -Debug.ShouldStop(8192); -parent._c3.runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 240;BA.debugLine="LongitudRU = c3.GetDouble(\"CAT_CL_LONG\")"; -Debug.ShouldStop(32768); -parent._longitudru = parent._c3.runMethod(true,"GetDouble",(Object)(RemoteObject.createImmutable("CAT_CL_LONG"))); - BA.debugLineNum = 241;BA.debugLine="LatitudRu = c3.GetDouble(\"CAT_CL_LAT\")"; -Debug.ShouldStop(65536); -parent._latitudru = parent._c3.runMethod(true,"GetDouble",(Object)(RemoteObject.createImmutable("CAT_CL_LAT"))); - BA.debugLineNum = 242;BA.debugLine="CODIGO=c3.GetString(\"CAT_CL_CODIGO\")"; -Debug.ShouldStop(131072); -parent.mostCurrent._codigo = parent._c3.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_CODIGO"))); - BA.debugLineNum = 243;BA.debugLine="Tienda= c3.GetString(\"CAT_CL_NOMBRE\")"; -Debug.ShouldStop(262144); -parent.mostCurrent._tienda = parent._c3.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_NOMBRE"))); - BA.debugLineNum = 244;BA.debugLine="MARK_ROJO = gmap.AddMarker2(LatitudRu,Longitud"; -Debug.ShouldStop(524288); -parent.mostCurrent._mark_rojo = parent.mostCurrent._gmap.runMethod(false,"AddMarker2",(Object)(parent._latitudru),(Object)(parent._longitudru),(Object)(parent.mostCurrent._tienda),(Object)(parent.mostCurrent._gmap.getField(true,"HUE_RED"))); - BA.debugLineNum = 245;BA.debugLine="MARK_ROJO.Snippet = Tienda"; -Debug.ShouldStop(1048576); -parent.mostCurrent._mark_rojo.runMethod(true,"setSnippet",parent.mostCurrent._tienda); - if (true) break; -if (true) break; -Debug.locals.put("i", _i); -; - BA.debugLineNum = 247;BA.debugLine="If MARK_ROJO.IsInitialized Then LIST_ROJO.Add(M"; -Debug.ShouldStop(4194304); - -case 72: -//if -this.state = 77; -if (parent.mostCurrent._mark_rojo.runMethod(true,"IsInitialized").get().booleanValue()) { -this.state = 74; -;}if (true) break; - -case 74: -//C -this.state = 77; -parent.mostCurrent._list_rojo.runVoidMethod ("Add",(Object)((parent.mostCurrent._mark_rojo.getObject()))); -if (true) break; - -case 77: -//C -this.state = 78; -; - BA.debugLineNum = 248;BA.debugLine="c3.Close"; -Debug.ShouldStop(8388608); -parent._c3.runVoidMethod ("Close"); - if (true) break; - -case 78: -//C -this.state = 79; -; - if (true) break; - -case 79: -//C -this.state = -1; -; - BA.debugLineNum = 257;BA.debugLine="Dim aa As CameraPosition"; -Debug.ShouldStop(1); -_aa = RemoteObject.createNew ("anywheresoftware.b4a.objects.MapFragmentWrapper.CameraPositionWrapper");Debug.locals.put("aa", _aa); - BA.debugLineNum = 258;BA.debugLine="aa.Initialize(LatitudRu,LongitudRU,15)''' RECOMEN"; -Debug.ShouldStop(2); -_aa.runVoidMethod ("Initialize",(Object)(parent._latitudru),(Object)(parent._longitudru),(Object)(BA.numberCast(float.class, 15))); - BA.debugLineNum = 259;BA.debugLine="gmap.AnimateCamera(aa)"; -Debug.ShouldStop(4); -parent.mostCurrent._gmap.runVoidMethod ("AnimateCamera",(Object)((_aa.getObject()))); - BA.debugLineNum = 262;BA.debugLine="Dim OnInfoWindowClickListener1 As OnInfoWindowCli"; -Debug.ShouldStop(32); -parent.mostCurrent._oninfowindowclicklistener1 = RemoteObject.createNew ("uk.co.martinpearman.b4a.com.google.android.gms.maps.googlemap.OnInfoWindowClickListener"); - BA.debugLineNum = 263;BA.debugLine="OnInfoWindowClickListener1.Initialize(\"OnInfoWind"; -Debug.ShouldStop(64); -parent.mostCurrent._oninfowindowclicklistener1.runVoidMethod ("Initialize",mapa_rutas.mostCurrent.activityBA,(Object)(RemoteObject.createImmutable("OnInfoWindowClickListener1"))); - BA.debugLineNum = 264;BA.debugLine="GoogleMapEXTRA.SetOnInfoWindowClickListener(gmap,"; -Debug.ShouldStop(128); -parent.mostCurrent._googlemapextra.runVoidMethod ("SetOnInfoWindowClickListener",(Object)((parent.mostCurrent._gmap.getObject())),(Object)((parent.mostCurrent._oninfowindowclicklistener1.getObject()))); - BA.debugLineNum = 266;BA.debugLine="End Sub"; -Debug.ShouldStop(512); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _oninfowindowclicklistener1_click(RemoteObject _marker1) throws Exception{ -try { - Debug.PushSubsStack("OnInfoWindowClickListener1_click (mapa_rutas) ","mapa_rutas",21,mapa_rutas.mostCurrent.activityBA,mapa_rutas.mostCurrent,271); -if (RapidSub.canDelegate("oninfowindowclicklistener1_click")) { return keymon.lat.medicomed.mapa_rutas.remoteMe.runUserSub(false, "mapa_rutas","oninfowindowclicklistener1_click", _marker1);} -Debug.locals.put("Marker1", _marker1); - BA.debugLineNum = 271;BA.debugLine="Sub OnInfoWindowClickListener1_click(Marker1 As Ma"; -Debug.ShouldStop(16384); - BA.debugLineNum = 272;BA.debugLine="skmt.ExecNonQuery(\"delete from CUENTAA\")"; -Debug.ShouldStop(32768); -mapa_rutas._skmt.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from CUENTAA"))); - BA.debugLineNum = 273;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO CUENTAA VALUES (?"; -Debug.ShouldStop(65536); -mapa_rutas._skmt.runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO CUENTAA VALUES (?) ")),(Object)(mapa_rutas.mostCurrent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(_marker1.runMethod(true,"getTitle"))}))))); - BA.debugLineNum = 274;BA.debugLine="Subs.guardaClienteHoraInicio(Marker1.Title)"; -Debug.ShouldStop(131072); -mapa_rutas.mostCurrent._subs.runVoidMethod ("_guardaclientehorainicio" /*RemoteObject*/ ,mapa_rutas.mostCurrent.activityBA,(Object)(_marker1.runMethod(true,"getTitle"))); - BA.debugLineNum = 275;BA.debugLine="Activity.Finish"; -Debug.ShouldStop(262144); -mapa_rutas.mostCurrent._activity.runVoidMethod ("Finish"); - BA.debugLineNum = 276;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; -Debug.ShouldStop(524288); -mapa_rutas.mostCurrent._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,mapa_rutas.mostCurrent.activityBA,(Object)(RemoteObject.createImmutable("Cliente"))); - BA.debugLineNum = 277;BA.debugLine="End Sub"; -Debug.ShouldStop(1048576); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _process_globals() throws Exception{ - //BA.debugLineNum = 7;BA.debugLine="Sub Process_Globals"; - //BA.debugLineNum = 8;BA.debugLine="Dim GPS As GPS"; -mapa_rutas._gps = RemoteObject.createNew ("anywheresoftware.b4a.gps.GPS"); - //BA.debugLineNum = 9;BA.debugLine="Dim rp As RuntimePermissions"; -mapa_rutas._rp = RemoteObject.createNew ("anywheresoftware.b4a.objects.RuntimePermissions"); - //BA.debugLineNum = 10;BA.debugLine="Dim ruta As String"; -mapa_rutas._ruta = RemoteObject.createImmutable(""); - //BA.debugLineNum = 11;BA.debugLine="Dim skmt As SQL"; -mapa_rutas._skmt = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL"); - //BA.debugLineNum = 12;BA.debugLine="Dim c As Cursor"; -mapa_rutas._c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); - //BA.debugLineNum = 13;BA.debugLine="Dim c2 As Cursor"; -mapa_rutas._c2 = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); - //BA.debugLineNum = 14;BA.debugLine="Dim c22 As Cursor"; -mapa_rutas._c22 = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); - //BA.debugLineNum = 15;BA.debugLine="Dim c3 As Cursor"; -mapa_rutas._c3 = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); - //BA.debugLineNum = 16;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/newinst2.java b/B4A/Objects/shell/src/keymon/lat/medicomed/newinst2.java deleted file mode 100644 index 844fb6f..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/newinst2.java +++ /dev/null @@ -1,66 +0,0 @@ - -package keymon.lat.medicomed; - -import java.io.IOException; -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RDebug; -import anywheresoftware.b4a.pc.RemoteObject; -import anywheresoftware.b4a.pc.RDebug.IRemote; -import anywheresoftware.b4a.pc.Debug; -import anywheresoftware.b4a.pc.B4XTypes.B4XClass; -import anywheresoftware.b4a.pc.B4XTypes.DeviceClass; - -public class newinst2 implements IRemote{ - public static newinst2 mostCurrent; - public static RemoteObject processBA; - public static boolean processGlobalsRun; - public static RemoteObject myClass; - public static RemoteObject remoteMe; - public newinst2() { - mostCurrent = this; - } - public RemoteObject getRemoteMe() { - return remoteMe; - } - -public boolean isSingleton() { - return true; - } - static { - anywheresoftware.b4a.pc.RapidSub.moduleToObject.put(new B4XClass("newinst2"), "keymon.lat.medicomed.newinst2"); - } - public static RemoteObject getObject() { - return myClass; - } - public RemoteObject _service; - private PCBA pcBA; - - public PCBA create(Object[] args) throws ClassNotFoundException{ - processBA = (RemoteObject) args[1]; - _service = (RemoteObject) args[2]; - remoteMe = RemoteObject.declareNull("keymon.lat.medicomed.newinst2"); - anywheresoftware.b4a.keywords.Common.Density = (Float)args[3]; - pcBA = new PCBA(this, newinst2.class); - main_subs_0.initializeProcessGlobals(); - return pcBA; - } -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _pkg = RemoteObject.createImmutable(""); -public static RemoteObject _svcverbose = RemoteObject.createImmutable(false); -public static RemoteObject _logcolor1 = RemoteObject.createImmutable(0); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; - public Object[] GetGlobals() { - return new Object[] {"appUpdater",Debug.moduleToString(keymon.lat.medicomed.appupdater.class),"B4XCollections",Debug.moduleToString(keymon.lat.medicomed.b4xcollections.class),"B4XPages",Debug.moduleToString(keymon.lat.medicomed.b4xpages.class),"DateUtils",newinst2.mostCurrent._dateutils,"HttpUtils2Service",Debug.moduleToString(keymon.lat.medicomed.httputils2service.class),"LogColor1",newinst2._logcolor1,"Main",Debug.moduleToString(keymon.lat.medicomed.main.class),"MAPA_RUTAS",Debug.moduleToString(keymon.lat.medicomed.mapa_rutas.class),"pkg",newinst2._pkg,"Service",newinst2.mostCurrent._service,"Starter",Debug.moduleToString(keymon.lat.medicomed.starter.class),"Subs",Debug.moduleToString(keymon.lat.medicomed.subs.class),"svcVerbose",newinst2._svcverbose,"Tracker",Debug.moduleToString(keymon.lat.medicomed.tracker.class),"XUIViewsUtils",Debug.moduleToString(keymon.lat.medicomed.xuiviewsutils.class)}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/newinst2_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/newinst2_subs_0.java deleted file mode 100644 index 1eeda46..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/newinst2_subs_0.java +++ /dev/null @@ -1,165 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class newinst2_subs_0 { - - -public static RemoteObject _getpackagename() throws Exception{ -try { - Debug.PushSubsStack("GetPackageName (newinst2) ","newinst2",24,newinst2.processBA,newinst2.mostCurrent,38); -if (RapidSub.canDelegate("getpackagename")) { return keymon.lat.medicomed.newinst2.remoteMe.runUserSub(false, "newinst2","getpackagename");} -RemoteObject _r = RemoteObject.declareNull("anywheresoftware.b4a.agraham.reflection.Reflection"); - BA.debugLineNum = 38;BA.debugLine="Sub GetPackageName As String"; -Debug.ShouldStop(32); - BA.debugLineNum = 39;BA.debugLine="Dim r As Reflector"; -Debug.ShouldStop(64); -_r = RemoteObject.createNew ("anywheresoftware.b4a.agraham.reflection.Reflection");Debug.locals.put("r", _r); - BA.debugLineNum = 40;BA.debugLine="Return r.GetStaticField(\"anywheresoftware.b4a.BA\""; -Debug.ShouldStop(128); -if (true) return BA.ObjectToString(_r.runMethod(false,"GetStaticField",(Object)(BA.ObjectToString("anywheresoftware.b4a.BA")),(Object)(RemoteObject.createImmutable("packageName")))); - BA.debugLineNum = 41;BA.debugLine="End Sub"; -Debug.ShouldStop(256); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _myappreload() throws Exception{ -try { - Debug.PushSubsStack("MyAppReload (newinst2) ","newinst2",24,newinst2.processBA,newinst2.mostCurrent,43); -if (RapidSub.canDelegate("myappreload")) { return keymon.lat.medicomed.newinst2.remoteMe.runUserSub(false, "newinst2","myappreload");} - BA.debugLineNum = 43;BA.debugLine="Sub MyAppReload"; -Debug.ShouldStop(1024); - BA.debugLineNum = 44;BA.debugLine="If svcVerbose Then Log(\"-- AppUpdating.NewInst2:"; -Debug.ShouldStop(2048); -if (newinst2._svcverbose.get().booleanValue()) { -newinst2.mostCurrent.__c.runVoidMethod ("LogImpl","332899073",RemoteObject.createImmutable("-- AppUpdating.NewInst2: processing MyAppReload"),0);}; - BA.debugLineNum = 45;BA.debugLine="If IsPaused(\"main\") Then"; -Debug.ShouldStop(4096); -if (newinst2.mostCurrent.__c.runMethod(true,"IsPaused",newinst2.processBA,(Object)((RemoteObject.createImmutable("main")))).get().booleanValue()) { - BA.debugLineNum = 46;BA.debugLine="StartActivity(\"main\")"; -Debug.ShouldStop(8192); -newinst2.mostCurrent.__c.runVoidMethod ("StartActivity",newinst2.processBA,(Object)((RemoteObject.createImmutable("main")))); - }; - BA.debugLineNum = 50;BA.debugLine="End Sub"; -Debug.ShouldStop(131072); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _process_globals() throws Exception{ - //BA.debugLineNum = 5;BA.debugLine="Sub Process_Globals"; - //BA.debugLineNum = 8;BA.debugLine="Dim pkg As String 'app's package name"; -newinst2._pkg = RemoteObject.createImmutable(""); - //BA.debugLineNum = 9;BA.debugLine="Dim svcVerbose As Boolean 'True = shows start"; -newinst2._svcverbose = RemoteObject.createImmutable(false); - //BA.debugLineNum = 10;BA.debugLine="Private LogColor1 As Int = 0xFFFF8C00 'color for"; -newinst2._logcolor1 = BA.numberCast(int.class, ((int)0xffff8c00)); - //BA.debugLineNum = 11;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _service_create() throws Exception{ -try { - Debug.PushSubsStack("Service_Create (newinst2) ","newinst2",24,newinst2.processBA,newinst2.mostCurrent,13); -if (RapidSub.canDelegate("service_create")) { return keymon.lat.medicomed.newinst2.remoteMe.runUserSub(false, "newinst2","service_create");} - BA.debugLineNum = 13;BA.debugLine="Sub Service_Create"; -Debug.ShouldStop(4096); - BA.debugLineNum = 14;BA.debugLine="LogColor(\"---- AppUpdating.newinst2: service crea"; -Debug.ShouldStop(8192); -newinst2.mostCurrent.__c.runVoidMethod ("LogImpl","332636929",BA.ObjectToString("---- AppUpdating.newinst2: service created"),newinst2._logcolor1); - BA.debugLineNum = 15;BA.debugLine="pkg = \"\""; -Debug.ShouldStop(16384); -newinst2._pkg = BA.ObjectToString(""); - BA.debugLineNum = 16;BA.debugLine="svcVerbose = False"; -Debug.ShouldStop(32768); -newinst2._svcverbose = newinst2.mostCurrent.__c.getField(true,"False"); - BA.debugLineNum = 17;BA.debugLine="End Sub"; -Debug.ShouldStop(65536); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _service_destroy() throws Exception{ -try { - Debug.PushSubsStack("Service_Destroy (newinst2) ","newinst2",24,newinst2.processBA,newinst2.mostCurrent,35); -if (RapidSub.canDelegate("service_destroy")) { return keymon.lat.medicomed.newinst2.remoteMe.runUserSub(false, "newinst2","service_destroy");} - BA.debugLineNum = 35;BA.debugLine="Sub Service_Destroy"; -Debug.ShouldStop(4); - BA.debugLineNum = 36;BA.debugLine="End Sub"; -Debug.ShouldStop(8); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _service_start(RemoteObject _startingintent) throws Exception{ -try { - Debug.PushSubsStack("Service_Start (newinst2) ","newinst2",24,newinst2.processBA,newinst2.mostCurrent,19); -if (RapidSub.canDelegate("service_start")) { return keymon.lat.medicomed.newinst2.remoteMe.runUserSub(false, "newinst2","service_start", _startingintent);} -Debug.locals.put("StartingIntent", _startingintent); - BA.debugLineNum = 19;BA.debugLine="Sub Service_Start (StartingIntent As Intent)"; -Debug.ShouldStop(262144); - BA.debugLineNum = 20;BA.debugLine="LogColor(\"---- AppUpdating.newinst2: service_star"; -Debug.ShouldStop(524288); -newinst2.mostCurrent.__c.runVoidMethod ("LogImpl","332702465",BA.ObjectToString("---- AppUpdating.newinst2: service_started"),newinst2._logcolor1); - BA.debugLineNum = 21;BA.debugLine="If svcVerbose Then"; -Debug.ShouldStop(1048576); -if (newinst2._svcverbose.get().booleanValue()) { - BA.debugLineNum = 22;BA.debugLine="Log($\"${TAB}intent: ${StartingIntent}\"$)"; -Debug.ShouldStop(2097152); -newinst2.mostCurrent.__c.runVoidMethod ("LogImpl","332702467",(RemoteObject.concat(RemoteObject.createImmutable(""),newinst2.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((newinst2.mostCurrent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("intent: "),newinst2.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_startingintent.getObject()))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 23;BA.debugLine="Log($\"${TAB}action: ${StartingIntent.Action}\"$)"; -Debug.ShouldStop(4194304); -newinst2.mostCurrent.__c.runVoidMethod ("LogImpl","332702468",(RemoteObject.concat(RemoteObject.createImmutable(""),newinst2.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((newinst2.mostCurrent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("action: "),newinst2.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_startingintent.runMethod(true,"getAction")))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 24;BA.debugLine="Log($\"${TAB}extra: ${StartingIntent.ExtrasToStri"; -Debug.ShouldStop(8388608); -newinst2.mostCurrent.__c.runVoidMethod ("LogImpl","332702469",(RemoteObject.concat(RemoteObject.createImmutable(""),newinst2.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((newinst2.mostCurrent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("extra: "),newinst2.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_startingintent.runMethod(true,"ExtrasToString")))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 25;BA.debugLine="Log($\"${TAB}data: ${StartingIntent.GetData}\"$)"; -Debug.ShouldStop(16777216); -newinst2.mostCurrent.__c.runVoidMethod ("LogImpl","332702470",(RemoteObject.concat(RemoteObject.createImmutable(""),newinst2.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((newinst2.mostCurrent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("data: "),newinst2.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_startingintent.runMethod(true,"GetData")))),RemoteObject.createImmutable(""))),0); - }; - BA.debugLineNum = 27;BA.debugLine="If StartingIntent.Action = \"android.intent.action"; -Debug.ShouldStop(67108864); -if (RemoteObject.solveBoolean("=",_startingintent.runMethod(true,"getAction"),BA.ObjectToString("android.intent.action.MY_PACKAGE_REPLACED"))) { - BA.debugLineNum = 28;BA.debugLine="If svcVerbose Then Log($\"${TAB}Intent MY_PACKAGE"; -Debug.ShouldStop(134217728); -if (newinst2._svcverbose.get().booleanValue()) { -newinst2.mostCurrent.__c.runVoidMethod ("LogImpl","332702473",(RemoteObject.concat(RemoteObject.createImmutable(""),newinst2.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((newinst2.mostCurrent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("Intent MY_PACKAGE_REPLACED received!"))),0);}; - BA.debugLineNum = 29;BA.debugLine="pkg = GetPackageName"; -Debug.ShouldStop(268435456); -newinst2._pkg = _getpackagename(); - BA.debugLineNum = 30;BA.debugLine="If svcVerbose Then Log($\"${TAB}package: ${pkg}\"$"; -Debug.ShouldStop(536870912); -if (newinst2._svcverbose.get().booleanValue()) { -newinst2.mostCurrent.__c.runVoidMethod ("LogImpl","332702475",(RemoteObject.concat(RemoteObject.createImmutable(""),newinst2.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((newinst2.mostCurrent.__c.getField(true,"TAB")))),RemoteObject.createImmutable("package: "),newinst2.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((newinst2._pkg))),RemoteObject.createImmutable(""))),0);}; - BA.debugLineNum = 31;BA.debugLine="MyAppReload"; -Debug.ShouldStop(1073741824); -_myappreload(); - }; - BA.debugLineNum = 33;BA.debugLine="End Sub"; -Debug.ShouldStop(1); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/preoptimizedclv.java b/B4A/Objects/shell/src/keymon/lat/medicomed/preoptimizedclv.java deleted file mode 100644 index c8722bf..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/preoptimizedclv.java +++ /dev/null @@ -1,49 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class preoptimizedclv { - public static RemoteObject myClass; - public preoptimizedclv() { - } - public static PCBA staticBA = new PCBA(null, preoptimizedclv.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _mclv = RemoteObject.declareNull("b4a.example3.customlistview"); -public static RemoteObject _items = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _panelscache = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _stubpanel = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _horizontal = RemoteObject.createImmutable(false); -public static RemoteObject _assigneditems = null; -public static RemoteObject _assigneditemsasindex = RemoteObject.createImmutable(0); -public static RemoteObject _jclv = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -public static RemoteObject _extraitems = RemoteObject.createImmutable(0); -public static RemoteObject _listofitemsthatshouldbeupdated = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _showscrollbar = RemoteObject.createImmutable(false); -public static RemoteObject _b4xseekbar1 = RemoteObject.declareNull("keymon.lat.medicomed.b4xseekbar"); -public static RemoteObject _pnloverlay = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _lblhint = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _lastuserchangeindex = RemoteObject.createImmutable(0); -public static RemoteObject _numberofsteps = RemoteObject.createImmutable(0); -public static RemoteObject _delaybeforehidingoverlay = RemoteObject.createImmutable(0); -public static RemoteObject _mcallback = RemoteObject.declareNull("Object"); -public static RemoteObject _meventname = RemoteObject.createImmutable(""); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"AssignedItems",_ref.getField(false, "_assigneditems"),"AssignedItemsAsIndex",_ref.getField(false, "_assigneditemsasindex"),"B4XSeekBar1",_ref.getField(false, "_b4xseekbar1"),"DateUtils",_ref.getField(false, "_dateutils"),"DelayBeforeHidingOverlay",_ref.getField(false, "_delaybeforehidingoverlay"),"ExtraItems",_ref.getField(false, "_extraitems"),"horizontal",_ref.getField(false, "_horizontal"),"items",_ref.getField(false, "_items"),"jclv",_ref.getField(false, "_jclv"),"LastUserChangeIndex",_ref.getField(false, "_lastuserchangeindex"),"lblHint",_ref.getField(false, "_lblhint"),"ListOfItemsThatShouldBeUpdated",_ref.getField(false, "_listofitemsthatshouldbeupdated"),"mCallback",_ref.getField(false, "_mcallback"),"mCLV",_ref.getField(false, "_mclv"),"mEventName",_ref.getField(false, "_meventname"),"NumberOfSteps",_ref.getField(false, "_numberofsteps"),"PanelsCache",_ref.getField(false, "_panelscache"),"pnlOverlay",_ref.getField(false, "_pnloverlay"),"ShowScrollBar",_ref.getField(false, "_showscrollbar"),"StubPanel",_ref.getField(false, "_stubpanel"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/preoptimizedclv_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/preoptimizedclv_subs_0.java deleted file mode 100644 index 44bf0df..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/preoptimizedclv_subs_0.java +++ /dev/null @@ -1,746 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class preoptimizedclv_subs_0 { - - -public static RemoteObject _additem(RemoteObject __ref,RemoteObject _size,RemoteObject _clr,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("AddItem (preoptimizedclv) ","preoptimizedclv",63,__ref.getField(false, "ba"),__ref,53); -if (RapidSub.canDelegate("additem")) { return __ref.runUserSub(false, "preoptimizedclv","additem", __ref, _size, _clr, _value);} -RemoteObject _newitem = RemoteObject.declareNull("b4a.example3.customlistview._clvitem"); -Debug.locals.put("Size", _size); -Debug.locals.put("Clr", _clr); -Debug.locals.put("Value", _value); - BA.debugLineNum = 53;BA.debugLine="Public Sub AddItem (Size As Int, Clr As Int, Value"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 54;BA.debugLine="Dim NewItem As CLVItem"; -Debug.JustUpdateDeviceLine(); -_newitem = RemoteObject.createNew ("b4a.example3.customlistview._clvitem");Debug.locals.put("NewItem", _newitem); - BA.debugLineNum = 55;BA.debugLine="NewItem.Color = Clr"; -Debug.JustUpdateDeviceLine(); -_newitem.setField ("Color",_clr); - BA.debugLineNum = 56;BA.debugLine="NewItem.Panel = StubPanel"; -Debug.JustUpdateDeviceLine(); -_newitem.setField ("Panel",__ref.getField(false,"_stubpanel" /*RemoteObject*/ )); - BA.debugLineNum = 57;BA.debugLine="NewItem.Value = Value"; -Debug.JustUpdateDeviceLine(); -_newitem.setField ("Value",_value); - BA.debugLineNum = 58;BA.debugLine="NewItem.Size = Size"; -Debug.JustUpdateDeviceLine(); -_newitem.setField ("Size",_size); - BA.debugLineNum = 59;BA.debugLine="items.Add(NewItem)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_items" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((_newitem))); - BA.debugLineNum = 60;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _b4xseekbar1_touchstatechanged(RemoteObject __ref,RemoteObject _pressed) throws Exception{ -try { - Debug.PushSubsStack("B4XSeekBar1_TouchStateChanged (preoptimizedclv) ","preoptimizedclv",63,__ref.getField(false, "ba"),__ref,163); -if (RapidSub.canDelegate("b4xseekbar1_touchstatechanged")) { __ref.runUserSub(false, "preoptimizedclv","b4xseekbar1_touchstatechanged", __ref, _pressed); return;} -ResumableSub_B4XSeekBar1_TouchStateChanged rsub = new ResumableSub_B4XSeekBar1_TouchStateChanged(null,__ref,_pressed); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_B4XSeekBar1_TouchStateChanged extends BA.ResumableSub { -public ResumableSub_B4XSeekBar1_TouchStateChanged(keymon.lat.medicomed.preoptimizedclv parent,RemoteObject __ref,RemoteObject _pressed) { -this.parent = parent; -this.__ref = __ref; -this._pressed = _pressed; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.preoptimizedclv parent; -RemoteObject _pressed; -RemoteObject _jo = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("B4XSeekBar1_TouchStateChanged (preoptimizedclv) ","preoptimizedclv",63,__ref.getField(false, "ba"),__ref,163); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); -Debug.locals.put("Pressed", _pressed); - BA.debugLineNum = 164;BA.debugLine="If Pressed = False Then"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 1: -//if -this.state = 6; -if (RemoteObject.solveBoolean("=",_pressed,parent.__c.getField(true,"False"))) { -this.state = 3; -}else { -this.state = 5; -}if (true) break; - -case 3: -//C -this.state = 6; - BA.debugLineNum = 165;BA.debugLine="mCLV.JumpToItem(LastUserChangeIndex)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mclv" /*RemoteObject*/ ).runVoidMethod ("_jumptoitem",(Object)(__ref.getField(true,"_lastuserchangeindex" /*RemoteObject*/ ))); - BA.debugLineNum = 166;BA.debugLine="Sleep(DelayBeforeHidingOverlay)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "preoptimizedclv", "b4xseekbar1_touchstatechanged"),__ref.getField(true,"_delaybeforehidingoverlay" /*RemoteObject*/ )); -this.state = 7; -return; -case 7: -//C -this.state = 6; -; - BA.debugLineNum = 167;BA.debugLine="pnlOverlay.Visible = False"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnloverlay" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"False")); - if (true) break; - -case 5: -//C -this.state = 6; - BA.debugLineNum = 169;BA.debugLine="pnlOverlay.Visible = True"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnloverlay" /*RemoteObject*/ ).runMethod(true,"setVisible",parent.__c.getField(true,"True")); - BA.debugLineNum = 171;BA.debugLine="Dim jo As JavaObject = mCLV.sv"; -Debug.JustUpdateDeviceLine(); -_jo = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_jo = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), __ref.getField(false,"_mclv" /*RemoteObject*/ ).getField(false,"_sv").getObject());Debug.locals.put("jo", _jo);Debug.locals.put("jo", _jo); - BA.debugLineNum = 172;BA.debugLine="jo.RunMethod(\"fling\", Array(0))"; -Debug.JustUpdateDeviceLine(); -_jo.runVoidMethod ("RunMethod",(Object)(BA.ObjectToString("fling")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {RemoteObject.createImmutable((0))}))); - if (true) break; - -case 6: -//C -this.state = -1; -; - BA.debugLineNum = 175;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _b4xseekbar1_valuechanged(RemoteObject __ref,RemoteObject _value) throws Exception{ -try { - Debug.PushSubsStack("B4XSeekBar1_ValueChanged (preoptimizedclv) ","preoptimizedclv",63,__ref.getField(false, "ba"),__ref,177); -if (RapidSub.canDelegate("b4xseekbar1_valuechanged")) { return __ref.runUserSub(false, "preoptimizedclv","b4xseekbar1_valuechanged", __ref, _value);} -RemoteObject _t = RemoteObject.declareNull("Object"); -Debug.locals.put("Value", _value); - BA.debugLineNum = 177;BA.debugLine="Sub B4XSeekBar1_ValueChanged (Value As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 178;BA.debugLine="LastUserChangeIndex = Max(0, items.Size - 1 - Val"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_lastuserchangeindex" /*RemoteObject*/ ,BA.numberCast(int.class, preoptimizedclv.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, 0)),(Object)(BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_items" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1),_value}, "--",2, 1)))))); - BA.debugLineNum = 179;BA.debugLine="If LastUserChangeIndex < B4XSeekBar1.Interval The"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("<",__ref.getField(true,"_lastuserchangeindex" /*RemoteObject*/ ),BA.numberCast(double.class, __ref.getField(false,"_b4xseekbar1" /*RemoteObject*/ ).getField(true,"_interval" /*RemoteObject*/ )))) { -__ref.setField ("_lastuserchangeindex" /*RemoteObject*/ ,BA.numberCast(int.class, 0));}; - BA.debugLineNum = 180;BA.debugLine="lblHint.Text = \"\""; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_lblhint" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence("")); - BA.debugLineNum = 181;BA.debugLine="If xui.SubExists(mCallback, mEventName & \"_HintRe"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"SubExists",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_HintRequested"))),(Object)(BA.numberCast(int.class, 1))).get().booleanValue()) { - BA.debugLineNum = 182;BA.debugLine="Dim t As Object = CallSub2(mCallback, mEventName"; -Debug.JustUpdateDeviceLine(); -_t = preoptimizedclv.__c.runMethodAndSync(false,"CallSubNew2",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_HintRequested"))),(Object)((__ref.getField(true,"_lastuserchangeindex" /*RemoteObject*/ ))));Debug.locals.put("t", _t);Debug.locals.put("t", _t); - BA.debugLineNum = 183;BA.debugLine="If t <> Null Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("N",_t)) { - BA.debugLineNum = 184;BA.debugLine="InternalSetTextOrCSBuilderToLabel(lblHint, t)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.preoptimizedclv.class, "_internalsettextorcsbuildertolabel" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_lblhint" /*RemoteObject*/ )),(Object)(_t)); - }; - }; - BA.debugLineNum = 187;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 2;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 3;BA.debugLine="Private mCLV As CustomListView"; -preoptimizedclv._mclv = RemoteObject.createNew ("b4a.example3.customlistview");__ref.setField("_mclv",preoptimizedclv._mclv); - //BA.debugLineNum = 4;BA.debugLine="Private items As List"; -preoptimizedclv._items = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_items",preoptimizedclv._items); - //BA.debugLineNum = 5;BA.debugLine="Private PanelsCache As List"; -preoptimizedclv._panelscache = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_panelscache",preoptimizedclv._panelscache); - //BA.debugLineNum = 6;BA.debugLine="Private StubPanel As B4XView"; -preoptimizedclv._stubpanel = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_stubpanel",preoptimizedclv._stubpanel); - //BA.debugLineNum = 7;BA.debugLine="Private horizontal As Boolean"; -preoptimizedclv._horizontal = RemoteObject.createImmutable(false);__ref.setField("_horizontal",preoptimizedclv._horizontal); - //BA.debugLineNum = 8;BA.debugLine="Private AssignedItems() As B4XSet"; -preoptimizedclv._assigneditems = RemoteObject.createNewArray ("keymon.lat.medicomed.b4xset", new int[] {0}, new Object[]{});__ref.setField("_assigneditems",preoptimizedclv._assigneditems); - //BA.debugLineNum = 9;BA.debugLine="Private AssignedItemsAsIndex As Int"; -preoptimizedclv._assigneditemsasindex = RemoteObject.createImmutable(0);__ref.setField("_assigneditemsasindex",preoptimizedclv._assigneditemsasindex); - //BA.debugLineNum = 13;BA.debugLine="Private jclv As JavaObject"; -preoptimizedclv._jclv = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");__ref.setField("_jclv",preoptimizedclv._jclv); - //BA.debugLineNum = 15;BA.debugLine="Public ExtraItems As Int = 3"; -preoptimizedclv._extraitems = BA.numberCast(int.class, 3);__ref.setField("_extraitems",preoptimizedclv._extraitems); - //BA.debugLineNum = 16;BA.debugLine="Private ListOfItemsThatShouldBeUpdated As List"; -preoptimizedclv._listofitemsthatshouldbeupdated = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_listofitemsthatshouldbeupdated",preoptimizedclv._listofitemsthatshouldbeupdated); - //BA.debugLineNum = 17;BA.debugLine="Private xui As XUI"; -preoptimizedclv._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",preoptimizedclv._xui); - //BA.debugLineNum = 18;BA.debugLine="Public ShowScrollBar As Boolean = True"; -preoptimizedclv._showscrollbar = preoptimizedclv.__c.getField(true,"True");__ref.setField("_showscrollbar",preoptimizedclv._showscrollbar); - //BA.debugLineNum = 19;BA.debugLine="Public B4XSeekBar1 As B4XSeekBar"; -preoptimizedclv._b4xseekbar1 = RemoteObject.createNew ("keymon.lat.medicomed.b4xseekbar");__ref.setField("_b4xseekbar1",preoptimizedclv._b4xseekbar1); - //BA.debugLineNum = 20;BA.debugLine="Public pnlOverlay As B4XView"; -preoptimizedclv._pnloverlay = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_pnloverlay",preoptimizedclv._pnloverlay); - //BA.debugLineNum = 21;BA.debugLine="Public lblHint As B4XView"; -preoptimizedclv._lblhint = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_lblhint",preoptimizedclv._lblhint); - //BA.debugLineNum = 22;BA.debugLine="Private LastUserChangeIndex As Int"; -preoptimizedclv._lastuserchangeindex = RemoteObject.createImmutable(0);__ref.setField("_lastuserchangeindex",preoptimizedclv._lastuserchangeindex); - //BA.debugLineNum = 23;BA.debugLine="Public NumberOfSteps As Int = 20"; -preoptimizedclv._numberofsteps = BA.numberCast(int.class, 20);__ref.setField("_numberofsteps",preoptimizedclv._numberofsteps); - //BA.debugLineNum = 24;BA.debugLine="Public DelayBeforeHidingOverlay As Int = 50"; -preoptimizedclv._delaybeforehidingoverlay = BA.numberCast(int.class, 50);__ref.setField("_delaybeforehidingoverlay",preoptimizedclv._delaybeforehidingoverlay); - //BA.debugLineNum = 25;BA.debugLine="Private mCallback As Object"; -preoptimizedclv._mcallback = RemoteObject.createNew ("Object");__ref.setField("_mcallback",preoptimizedclv._mcallback); - //BA.debugLineNum = 26;BA.debugLine="Private mEventName As String"; -preoptimizedclv._meventname = RemoteObject.createImmutable("");__ref.setField("_meventname",preoptimizedclv._meventname); - //BA.debugLineNum = 27;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _clearassigneditems(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("ClearAssignedItems (preoptimizedclv) ","preoptimizedclv",63,__ref.getField(false, "ba"),__ref,151); -if (RapidSub.canDelegate("clearassigneditems")) { return __ref.runUserSub(false, "preoptimizedclv","clearassigneditems", __ref);} -RemoteObject _s = RemoteObject.declareNull("keymon.lat.medicomed.b4xset"); - BA.debugLineNum = 151;BA.debugLine="Private Sub ClearAssignedItems"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 152;BA.debugLine="For Each s As B4XSet In AssignedItems"; -Debug.JustUpdateDeviceLine(); -{ -final RemoteObject group1 = __ref.getField(false,"_assigneditems" /*RemoteObject*/ ); -final int groupLen1 = group1.getField(true,"length").get() -;int index1 = 0; -; -for (; index1 < groupLen1;index1++){ -_s = group1.getArrayElement(false, /*RemoteObject*/ RemoteObject.createImmutable(index1));Debug.locals.put("s", _s); -Debug.locals.put("s", _s); - BA.debugLineNum = 153;BA.debugLine="s.Clear"; -Debug.JustUpdateDeviceLine(); -_s.runClassMethod (keymon.lat.medicomed.b4xset.class, "_clear" /*RemoteObject*/ ); - } -}Debug.locals.put("s", _s); -; - BA.debugLineNum = 155;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _commit(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Commit (preoptimizedclv) ","preoptimizedclv",63,__ref.getField(false, "ba"),__ref,62); -if (RapidSub.canDelegate("commit")) { return __ref.runUserSub(false, "preoptimizedclv","commit", __ref);} -RemoteObject _dividersize = RemoteObject.createImmutable(0); -RemoteObject _totalsize = RemoteObject.createImmutable(0); -int _i = 0; -RemoteObject _it = RemoteObject.declareNull("b4a.example3.customlistview._clvitem"); - BA.debugLineNum = 62;BA.debugLine="Public Sub Commit"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 63;BA.debugLine="ClearAssignedItems"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.preoptimizedclv.class, "_clearassigneditems" /*RemoteObject*/ ); - BA.debugLineNum = 64;BA.debugLine="Dim DividerSize As Int = mCLV.DividerSize"; -Debug.JustUpdateDeviceLine(); -_dividersize = BA.numberCast(int.class, __ref.getField(false,"_mclv" /*RemoteObject*/ ).runMethod(true,"_getdividersize"));Debug.locals.put("DividerSize", _dividersize);Debug.locals.put("DividerSize", _dividersize); - BA.debugLineNum = 65;BA.debugLine="Dim TotalSize As Int = DividerSize"; -Debug.JustUpdateDeviceLine(); -_totalsize = _dividersize;Debug.locals.put("TotalSize", _totalsize);Debug.locals.put("TotalSize", _totalsize); - BA.debugLineNum = 66;BA.debugLine="For i = 0 To items.Size - 1"; -Debug.JustUpdateDeviceLine(); -{ -final int step4 = 1; -final int limit4 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_items" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step4 > 0 && _i <= limit4) || (step4 < 0 && _i >= limit4) ;_i = ((int)(0 + _i + step4)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 67;BA.debugLine="Dim it As CLVItem = items.Get(i)"; -Debug.JustUpdateDeviceLine(); -_it = (__ref.getField(false,"_items" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))));Debug.locals.put("it", _it);Debug.locals.put("it", _it); - BA.debugLineNum = 68;BA.debugLine="it.Offset = TotalSize"; -Debug.JustUpdateDeviceLine(); -_it.setField ("Offset",_totalsize); - BA.debugLineNum = 69;BA.debugLine="TotalSize = TotalSize + it.Size + DividerSize"; -Debug.JustUpdateDeviceLine(); -_totalsize = RemoteObject.solve(new RemoteObject[] {_totalsize,_it.getField(true,"Size"),_dividersize}, "++",2, 1);Debug.locals.put("TotalSize", _totalsize); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 71;BA.debugLine="If horizontal Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_horizontal" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 72;BA.debugLine="mCLV.sv.ScrollViewContentWidth = TotalSize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mclv" /*RemoteObject*/ ).getField(false,"_sv").runMethod(true,"setScrollViewContentWidth",_totalsize); - }else { - BA.debugLineNum = 74;BA.debugLine="mCLV.sv.ScrollViewContentHeight = TotalSize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mclv" /*RemoteObject*/ ).getField(false,"_sv").runMethod(true,"setScrollViewContentHeight",_totalsize); - }; - BA.debugLineNum = 76;BA.debugLine="B4XSeekBar1.mBase.Visible = ShowScrollBar"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_b4xseekbar1" /*RemoteObject*/ ).getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"setVisible",__ref.getField(true,"_showscrollbar" /*RemoteObject*/ )); - BA.debugLineNum = 77;BA.debugLine="If ShowScrollBar Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_showscrollbar" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 78;BA.debugLine="B4XSeekBar1.MaxValue = items.Size"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_b4xseekbar1" /*RemoteObject*/ ).setField ("_maxvalue" /*RemoteObject*/ ,__ref.getField(false,"_items" /*RemoteObject*/ ).runMethod(true,"getSize")); - BA.debugLineNum = 79;BA.debugLine="B4XSeekBar1.Interval = items.Size / NumberOfStep"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_b4xseekbar1" /*RemoteObject*/ ).setField ("_interval" /*RemoteObject*/ ,BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_items" /*RemoteObject*/ ).runMethod(true,"getSize"),__ref.getField(true,"_numberofsteps" /*RemoteObject*/ )}, "/",0, 0))); - }; - BA.debugLineNum = 81;BA.debugLine="RaiseVisibleRangeEvent"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.preoptimizedclv.class, "_raisevisiblerangeevent" /*RemoteObject*/ ); - BA.debugLineNum = 83;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createpanel(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("CreatePanel (preoptimizedclv) ","preoptimizedclv",63,__ref.getField(false, "ba"),__ref,90); -if (RapidSub.canDelegate("createpanel")) { return __ref.runUserSub(false, "preoptimizedclv","createpanel", __ref);} - BA.debugLineNum = 90;BA.debugLine="Private Sub CreatePanel As B4XView"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 94;BA.debugLine="Return jclv.RunMethodJO(\"_createpanel\", Array(\"Pa"; -Debug.JustUpdateDeviceLine(); -if (true) return RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), __ref.getField(false,"_jclv" /*RemoteObject*/ ).runMethod(false,"RunMethodJO",(Object)(BA.ObjectToString("_createpanel")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(RemoteObject.createImmutable("Panel"))}))).runMethod(false,"RunMethod",(Object)(BA.ObjectToString("getObject")),(Object)((preoptimizedclv.__c.getField(false,"Null"))))); - BA.debugLineNum = 96;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getpanel(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("GetPanel (preoptimizedclv) ","preoptimizedclv",63,__ref.getField(false, "ba"),__ref,144); -if (RapidSub.canDelegate("getpanel")) { return __ref.runUserSub(false, "preoptimizedclv","getpanel", __ref);} -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); - BA.debugLineNum = 144;BA.debugLine="Private Sub GetPanel As B4XView"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 145;BA.debugLine="If PanelsCache.Size = 0 Then Return CreatePanel"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_panelscache" /*RemoteObject*/ ).runMethod(true,"getSize"),BA.numberCast(double.class, 0))) { -if (true) return __ref.runClassMethod (keymon.lat.medicomed.preoptimizedclv.class, "_createpanel" /*RemoteObject*/ );}; - BA.debugLineNum = 146;BA.debugLine="Dim p As B4XView = PanelsCache.Get(PanelsCache.Si"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_p = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), __ref.getField(false,"_panelscache" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_panelscache" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1))));Debug.locals.put("p", _p);Debug.locals.put("p", _p); - BA.debugLineNum = 147;BA.debugLine="PanelsCache.RemoveAt(PanelsCache.Size - 1)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_panelscache" /*RemoteObject*/ ).runVoidMethod ("RemoveAt",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_panelscache" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1))); - BA.debugLineNum = 148;BA.debugLine="Return p"; -Debug.JustUpdateDeviceLine(); -if (true) return _p; - BA.debugLineNum = 149;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _handlescrollbar(RemoteObject __ref,RemoteObject _firstvisible) throws Exception{ -try { - Debug.PushSubsStack("HandleScrollBar (preoptimizedclv) ","preoptimizedclv",63,__ref.getField(false, "ba"),__ref,139); -if (RapidSub.canDelegate("handlescrollbar")) { return __ref.runUserSub(false, "preoptimizedclv","handlescrollbar", __ref, _firstvisible);} -Debug.locals.put("FirstVisible", _firstvisible); - BA.debugLineNum = 139;BA.debugLine="Private Sub HandleScrollBar (FirstVisible As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 140;BA.debugLine="If ShowScrollBar = False Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_showscrollbar" /*RemoteObject*/ ),preoptimizedclv.__c.getField(true,"False"))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 141;BA.debugLine="B4XSeekBar1.Value = items.Size - FirstVisible"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_b4xseekbar1" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xseekbar.class, "_setvalue" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_items" /*RemoteObject*/ ).runMethod(true,"getSize"),_firstvisible}, "-",1, 1)); - BA.debugLineNum = 142;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _callback,RemoteObject _eventname,RemoteObject _clv) throws Exception{ -try { - Debug.PushSubsStack("Initialize (preoptimizedclv) ","preoptimizedclv",63,__ref.getField(false, "ba"),__ref,29); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "preoptimizedclv","initialize", __ref, _ba, _callback, _eventname, _clv);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); -Debug.locals.put("Callback", _callback); -Debug.locals.put("EventName", _eventname); -Debug.locals.put("CLV", _clv); - BA.debugLineNum = 29;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 30;BA.debugLine="mCLV = CLV"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mclv" /*RemoteObject*/ ,_clv); - BA.debugLineNum = 31;BA.debugLine="jclv = mCLV 'ignore"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_jclv" /*RemoteObject*/ ).setObject (__ref.getField(false,"_mclv" /*RemoteObject*/ )); - BA.debugLineNum = 36;BA.debugLine="items = jclv.GetFieldJO(\"_items\").RunMethod(\"getO"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_items" /*RemoteObject*/ ).setObject (__ref.getField(false,"_jclv" /*RemoteObject*/ ).runMethod(false,"GetFieldJO",(Object)(RemoteObject.createImmutable("_items"))).runMethod(false,"RunMethod",(Object)(BA.ObjectToString("getObject")),(Object)((preoptimizedclv.__c.getField(false,"Null"))))); - BA.debugLineNum = 37;BA.debugLine="horizontal = jclv.GetField(\"_horizontal\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_horizontal" /*RemoteObject*/ ,BA.ObjectToBoolean(__ref.getField(false,"_jclv" /*RemoteObject*/ ).runMethod(false,"GetField",(Object)(RemoteObject.createImmutable("_horizontal"))))); - BA.debugLineNum = 39;BA.debugLine="PanelsCache.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_panelscache" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 40;BA.debugLine="StubPanel = CreatePanel"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_stubpanel" /*RemoteObject*/ ,__ref.runClassMethod (keymon.lat.medicomed.preoptimizedclv.class, "_createpanel" /*RemoteObject*/ )); - BA.debugLineNum = 41;BA.debugLine="StubPanel.AddView(xui.CreatePanel(\"\"), 0, 0, 10di"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_stubpanel" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable(""))).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(preoptimizedclv.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 10)))),(Object)(preoptimizedclv.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 10))))); - BA.debugLineNum = 42;BA.debugLine="AssignedItems = Array As B4XSet(B4XCollections.Cr"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_assigneditems" /*RemoteObject*/ ,RemoteObject.createNewArray("keymon.lat.medicomed.b4xset",new int[] {2},new Object[] {preoptimizedclv._b4xcollections.runMethod(false,"_createset" /*RemoteObject*/ ,__ref.getField(false, "ba")),preoptimizedclv._b4xcollections.runMethod(false,"_createset" /*RemoteObject*/ ,__ref.getField(false, "ba"))})); - BA.debugLineNum = 43;BA.debugLine="ListOfItemsThatShouldBeUpdated.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_listofitemsthatshouldbeupdated" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 44;BA.debugLine="mCLV.AsView.LoadLayout(\"PCLVSeekBar\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mclv" /*RemoteObject*/ ).runMethod(false,"_asview").runVoidMethodAndSync ("LoadLayout",(Object)(RemoteObject.createImmutable("PCLVSeekBar")),__ref.getField(false, "ba")); - BA.debugLineNum = 45;BA.debugLine="B4XSeekBar1.Size1 = 1dip"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_b4xseekbar1" /*RemoteObject*/ ).setField ("_size1" /*RemoteObject*/ ,preoptimizedclv.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1)))); - BA.debugLineNum = 46;BA.debugLine="B4XSeekBar1.Size2 = 1dip"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_b4xseekbar1" /*RemoteObject*/ ).setField ("_size2" /*RemoteObject*/ ,preoptimizedclv.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 1)))); - BA.debugLineNum = 47;BA.debugLine="B4XSeekBar1.Radius1 = 8dip"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_b4xseekbar1" /*RemoteObject*/ ).setField ("_radius1" /*RemoteObject*/ ,preoptimizedclv.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 8)))); - BA.debugLineNum = 48;BA.debugLine="B4XSeekBar1.Update"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_b4xseekbar1" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.b4xseekbar.class, "_update" /*RemoteObject*/ ); - BA.debugLineNum = 49;BA.debugLine="mCallback = Callback"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mcallback" /*RemoteObject*/ ,_callback); - BA.debugLineNum = 50;BA.debugLine="mEventName = EventName"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_meventname" /*RemoteObject*/ ,_eventname); - BA.debugLineNum = 51;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _internalsettextorcsbuildertolabel(RemoteObject __ref,RemoteObject _xlbl,RemoteObject _text) throws Exception{ -try { - Debug.PushSubsStack("InternalSetTextOrCSBuilderToLabel (preoptimizedclv) ","preoptimizedclv",63,__ref.getField(false, "ba"),__ref,189); -if (RapidSub.canDelegate("internalsettextorcsbuildertolabel")) { return __ref.runUserSub(false, "preoptimizedclv","internalsettextorcsbuildertolabel", __ref, _xlbl, _text);} -Debug.locals.put("xlbl", _xlbl); -Debug.locals.put("Text", _text); - BA.debugLineNum = 189;BA.debugLine="Private Sub InternalSetTextOrCSBuilderToLabel(xlbl"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 191;BA.debugLine="xlbl.Text = Text"; -Debug.JustUpdateDeviceLine(); -_xlbl.runMethod(true,"setText",BA.ObjectToCharSequence(_text)); - BA.debugLineNum = 201;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _listchangedexternally(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("ListChangedExternally (preoptimizedclv) ","preoptimizedclv",63,__ref.getField(false, "ba"),__ref,157); -if (RapidSub.canDelegate("listchangedexternally")) { __ref.runUserSub(false, "preoptimizedclv","listchangedexternally", __ref); return;} -ResumableSub_ListChangedExternally rsub = new ResumableSub_ListChangedExternally(null,__ref); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_ListChangedExternally extends BA.ResumableSub { -public ResumableSub_ListChangedExternally(keymon.lat.medicomed.preoptimizedclv parent,RemoteObject __ref) { -this.parent = parent; -this.__ref = __ref; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.preoptimizedclv parent; - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("ListChangedExternally (preoptimizedclv) ","preoptimizedclv",63,__ref.getField(false, "ba"),__ref,157); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = -1; -Debug.locals.put("_ref", __ref); - BA.debugLineNum = 158;BA.debugLine="ClearAssignedItems"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.preoptimizedclv.class, "_clearassigneditems" /*RemoteObject*/ ); - BA.debugLineNum = 159;BA.debugLine="Sleep(0)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "preoptimizedclv", "listchangedexternally"),BA.numberCast(int.class, 0)); -this.state = 1; -return; -case 1: -//C -this.state = -1; -; - BA.debugLineNum = 160;BA.debugLine="RaiseVisibleRangeEvent"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.preoptimizedclv.class, "_raisevisiblerangeevent" /*RemoteObject*/ ); - BA.debugLineNum = 161;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _raisevisiblerangeevent(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("RaiseVisibleRangeEvent (preoptimizedclv) ","preoptimizedclv",63,__ref.getField(false, "ba"),__ref,85); -if (RapidSub.canDelegate("raisevisiblerangeevent")) { return __ref.runUserSub(false, "preoptimizedclv","raisevisiblerangeevent", __ref);} - BA.debugLineNum = 85;BA.debugLine="Private Sub RaiseVisibleRangeEvent"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 86;BA.debugLine="jclv.RunMethod(\"_resetvisibles\", Null)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_jclv" /*RemoteObject*/ ).runVoidMethod ("RunMethod",(Object)(BA.ObjectToString("_resetvisibles")),(Object)((preoptimizedclv.__c.getField(false,"Null")))); - BA.debugLineNum = 87;BA.debugLine="jclv.RunMethod(\"_updatevisiblerange\", Null)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_jclv" /*RemoteObject*/ ).runVoidMethod ("RunMethod",(Object)(BA.ObjectToString("_updatevisiblerange")),(Object)((preoptimizedclv.__c.getField(false,"Null")))); - BA.debugLineNum = 88;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _visiblerangechanged(RemoteObject __ref,RemoteObject _firstindex,RemoteObject _lastindex) throws Exception{ -try { - Debug.PushSubsStack("VisibleRangeChanged (preoptimizedclv) ","preoptimizedclv",63,__ref.getField(false, "ba"),__ref,98); -if (RapidSub.canDelegate("visiblerangechanged")) { return __ref.runUserSub(false, "preoptimizedclv","visiblerangechanged", __ref, _firstindex, _lastindex);} -RemoteObject _fromindex = RemoteObject.createImmutable(0); -RemoteObject _toindex = RemoteObject.createImmutable(0); -RemoteObject _prevset = RemoteObject.declareNull("keymon.lat.medicomed.b4xset"); -RemoteObject _nextset = RemoteObject.declareNull("keymon.lat.medicomed.b4xset"); -int _i = 0; -RemoteObject _it = RemoteObject.declareNull("b4a.example3.customlistview._clvitem"); -RemoteObject _pnl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -Debug.locals.put("FirstIndex", _firstindex); -Debug.locals.put("LastIndex", _lastindex); - BA.debugLineNum = 98;BA.debugLine="Public Sub VisibleRangeChanged (FirstIndex As Int,"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 99;BA.debugLine="Dim FromIndex As Int = Max(0, FirstIndex - ExtraI"; -Debug.JustUpdateDeviceLine(); -_fromindex = BA.numberCast(int.class, preoptimizedclv.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, 0)),(Object)(BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {_firstindex,__ref.getField(true,"_extraitems" /*RemoteObject*/ )}, "-",1, 1)))));Debug.locals.put("FromIndex", _fromindex);Debug.locals.put("FromIndex", _fromindex); - BA.debugLineNum = 100;BA.debugLine="Dim ToIndex As Int = Min(mCLV.Size - 1, LastIndex"; -Debug.JustUpdateDeviceLine(); -_toindex = BA.numberCast(int.class, preoptimizedclv.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mclv" /*RemoteObject*/ ).runMethod(true,"_getsize"),RemoteObject.createImmutable(1)}, "-",1, 1))),(Object)(BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {_lastindex,__ref.getField(true,"_extraitems" /*RemoteObject*/ )}, "+",1, 1)))));Debug.locals.put("ToIndex", _toindex);Debug.locals.put("ToIndex", _toindex); - BA.debugLineNum = 101;BA.debugLine="Dim PrevSet As B4XSet = AssignedItems(AssignedIte"; -Debug.JustUpdateDeviceLine(); -_prevset = __ref.getField(false,"_assigneditems" /*RemoteObject*/ ).getArrayElement(false, /*RemoteObject*/ __ref.getField(true,"_assigneditemsasindex" /*RemoteObject*/ ));Debug.locals.put("PrevSet", _prevset);Debug.locals.put("PrevSet", _prevset); - BA.debugLineNum = 102;BA.debugLine="AssignedItemsAsIndex = (AssignedItemsAsIndex + 1)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_assigneditemsasindex" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_assigneditemsasindex" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "+",1, 1)),RemoteObject.createImmutable(2)}, "%",0, 1)); - BA.debugLineNum = 103;BA.debugLine="Dim NextSet As B4XSet = AssignedItems(AssignedIte"; -Debug.JustUpdateDeviceLine(); -_nextset = __ref.getField(false,"_assigneditems" /*RemoteObject*/ ).getArrayElement(false, /*RemoteObject*/ __ref.getField(true,"_assigneditemsasindex" /*RemoteObject*/ ));Debug.locals.put("NextSet", _nextset);Debug.locals.put("NextSet", _nextset); - BA.debugLineNum = 104;BA.debugLine="NextSet.Clear"; -Debug.JustUpdateDeviceLine(); -_nextset.runClassMethod (keymon.lat.medicomed.b4xset.class, "_clear" /*RemoteObject*/ ); - BA.debugLineNum = 105;BA.debugLine="ListOfItemsThatShouldBeUpdated.Initialize"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_listofitemsthatshouldbeupdated" /*RemoteObject*/ ).runVoidMethod ("Initialize"); - BA.debugLineNum = 106;BA.debugLine="For i = FromIndex To ToIndex"; -Debug.JustUpdateDeviceLine(); -{ -final int step8 = 1; -final int limit8 = _toindex.get().intValue(); -_i = _fromindex.get().intValue() ; -for (;(step8 > 0 && _i <= limit8) || (step8 < 0 && _i >= limit8) ;_i = ((int)(0 + _i + step8)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 107;BA.debugLine="Dim it As CLVItem = items.Get(i)"; -Debug.JustUpdateDeviceLine(); -_it = (__ref.getField(false,"_items" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))));Debug.locals.put("it", _it);Debug.locals.put("it", _it); - BA.debugLineNum = 108;BA.debugLine="If it.Panel = StubPanel Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_it.getField(false,"Panel"),__ref.getField(false,"_stubpanel" /*RemoteObject*/ ))) { - BA.debugLineNum = 109;BA.debugLine="it.Panel = GetPanel"; -Debug.JustUpdateDeviceLine(); -_it.setField ("Panel",__ref.runClassMethod (keymon.lat.medicomed.preoptimizedclv.class, "_getpanel" /*RemoteObject*/ )); - BA.debugLineNum = 110;BA.debugLine="it.Panel.Tag = i"; -Debug.JustUpdateDeviceLine(); -_it.getField(false,"Panel").runMethod(false,"setTag",RemoteObject.createImmutable((_i))); - BA.debugLineNum = 111;BA.debugLine="it.Panel.Color = it.Color"; -Debug.JustUpdateDeviceLine(); -_it.getField(false,"Panel").runMethod(true,"setColor",_it.getField(true,"Color")); - BA.debugLineNum = 112;BA.debugLine="If horizontal Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_horizontal" /*RemoteObject*/ ).get().booleanValue()) { - BA.debugLineNum = 113;BA.debugLine="mCLV.sv.ScrollViewInnerPanel.AddView(it.Panel,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mclv" /*RemoteObject*/ ).getField(false,"_sv").runMethod(false,"getScrollViewInnerPanel").runVoidMethod ("AddView",(Object)((_it.getField(false,"Panel").getObject())),(Object)(_it.getField(true,"Offset")),(Object)(BA.numberCast(int.class, 0)),(Object)(_it.getField(true,"Size")),(Object)(__ref.getField(false,"_mclv" /*RemoteObject*/ ).getField(false,"_sv").runMethod(true,"getHeight"))); - }else { - BA.debugLineNum = 115;BA.debugLine="mCLV.sv.ScrollViewInnerPanel.AddView(it.Panel,"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mclv" /*RemoteObject*/ ).getField(false,"_sv").runMethod(false,"getScrollViewInnerPanel").runVoidMethod ("AddView",(Object)((_it.getField(false,"Panel").getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(_it.getField(true,"Offset")),(Object)(__ref.getField(false,"_mclv" /*RemoteObject*/ ).getField(false,"_sv").runMethod(true,"getWidth")),(Object)(_it.getField(true,"Size"))); - }; - BA.debugLineNum = 117;BA.debugLine="NextSet.Add(it.Panel)"; -Debug.JustUpdateDeviceLine(); -_nextset.runClassMethod (keymon.lat.medicomed.b4xset.class, "_add" /*RemoteObject*/ ,(Object)((_it.getField(false,"Panel").getObject()))); - BA.debugLineNum = 118;BA.debugLine="ListOfItemsThatShouldBeUpdated.Add(i)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_listofitemsthatshouldbeupdated" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)(RemoteObject.createImmutable((_i)))); - }else -{ BA.debugLineNum = 119;BA.debugLine="Else if PrevSet.Contains(it.Panel) Then"; -Debug.JustUpdateDeviceLine(); -if (_prevset.runClassMethod (keymon.lat.medicomed.b4xset.class, "_contains" /*RemoteObject*/ ,(Object)((_it.getField(false,"Panel").getObject()))).get().booleanValue()) { - BA.debugLineNum = 120;BA.debugLine="NextSet.Add(it.Panel)"; -Debug.JustUpdateDeviceLine(); -_nextset.runClassMethod (keymon.lat.medicomed.b4xset.class, "_add" /*RemoteObject*/ ,(Object)((_it.getField(false,"Panel").getObject()))); - }} -; - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 123;BA.debugLine="For Each pnl As B4XView In PrevSet.AsList"; -Debug.JustUpdateDeviceLine(); -_pnl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -{ -final RemoteObject group25 = _prevset.runClassMethod (keymon.lat.medicomed.b4xset.class, "_aslist" /*RemoteObject*/ ); -final int groupLen25 = group25.runMethod(true,"getSize").get() -;int index25 = 0; -; -for (; index25 < groupLen25;index25++){ -_pnl = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), group25.runMethod(false,"Get",index25));Debug.locals.put("pnl", _pnl); -Debug.locals.put("pnl", _pnl); - BA.debugLineNum = 124;BA.debugLine="If NextSet.Contains(pnl) = False Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_nextset.runClassMethod (keymon.lat.medicomed.b4xset.class, "_contains" /*RemoteObject*/ ,(Object)((_pnl.getObject()))),preoptimizedclv.__c.getField(true,"False"))) { - BA.debugLineNum = 125;BA.debugLine="If pnl.Parent.IsInitialized Then"; -Debug.JustUpdateDeviceLine(); -if (_pnl.runMethod(false,"getParent").runMethod(true,"IsInitialized").get().booleanValue()) { - BA.debugLineNum = 126;BA.debugLine="pnl.RemoveViewFromParent"; -Debug.JustUpdateDeviceLine(); -_pnl.runVoidMethod ("RemoveViewFromParent"); - BA.debugLineNum = 127;BA.debugLine="pnl.GetView(0).RemoveAllViews"; -Debug.JustUpdateDeviceLine(); -_pnl.runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0))).runVoidMethod ("RemoveAllViews"); - BA.debugLineNum = 128;BA.debugLine="pnl.RemoveAllViews"; -Debug.JustUpdateDeviceLine(); -_pnl.runVoidMethod ("RemoveAllViews"); - BA.debugLineNum = 129;BA.debugLine="PanelsCache.Add(pnl)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_panelscache" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((_pnl.getObject()))); - BA.debugLineNum = 130;BA.debugLine="Dim it As CLVItem = items.Get(pnl.Tag)"; -Debug.JustUpdateDeviceLine(); -_it = (__ref.getField(false,"_items" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _pnl.runMethod(false,"getTag")))));Debug.locals.put("it", _it);Debug.locals.put("it", _it); - BA.debugLineNum = 131;BA.debugLine="it.Panel = StubPanel"; -Debug.JustUpdateDeviceLine(); -_it.setField ("Panel",__ref.getField(false,"_stubpanel" /*RemoteObject*/ )); - }; - }; - } -}Debug.locals.put("pnl", _pnl); -; - BA.debugLineNum = 135;BA.debugLine="HandleScrollBar (FirstIndex)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.preoptimizedclv.class, "_handlescrollbar" /*RemoteObject*/ ,(Object)(_firstindex)); - BA.debugLineNum = 136;BA.debugLine="Return ListOfItemsThatShouldBeUpdated"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_listofitemsthatshouldbeupdated" /*RemoteObject*/ ); - BA.debugLineNum = 137;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/roundslider.java b/B4A/Objects/shell/src/keymon/lat/medicomed/roundslider.java deleted file mode 100644 index 93f7456..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/roundslider.java +++ /dev/null @@ -1,50 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class roundslider { - public static RemoteObject myClass; - public roundslider() { - } - public static PCBA staticBA = new PCBA(null, roundslider.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _meventname = RemoteObject.createImmutable(""); -public static RemoteObject _mcallback = RemoteObject.declareNull("Object"); -public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _cvs = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas"); -public static RemoteObject _mvalue = RemoteObject.createImmutable(0); -public static RemoteObject _mmin = RemoteObject.createImmutable(0); -public static RemoteObject _mmax = RemoteObject.createImmutable(0); -public static RemoteObject _thumb = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper"); -public static RemoteObject _pnl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xlbl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _circlerect = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XRect"); -public static RemoteObject _valuecolor = RemoteObject.createImmutable(0); -public static RemoteObject _stroke = RemoteObject.createImmutable(0); -public static RemoteObject _thumbsize = RemoteObject.createImmutable(0); -public static RemoteObject _tag = RemoteObject.declareNull("Object"); -public static RemoteObject _mthumbbordercolor = RemoteObject.createImmutable(0); -public static RemoteObject _mthumbinnercolor = RemoteObject.createImmutable(0); -public static RemoteObject _mcirclefillcolor = RemoteObject.createImmutable(0); -public static RemoteObject _mcirclenonvaluecolor = RemoteObject.createImmutable(0); -public static RemoteObject _mrollover = RemoteObject.createImmutable(false); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"CircleRect",_ref.getField(false, "_circlerect"),"cvs",_ref.getField(false, "_cvs"),"DateUtils",_ref.getField(false, "_dateutils"),"mBase",_ref.getField(false, "_mbase"),"mCallBack",_ref.getField(false, "_mcallback"),"mCircleFillColor",_ref.getField(false, "_mcirclefillcolor"),"mCircleNonValueColor",_ref.getField(false, "_mcirclenonvaluecolor"),"mEventName",_ref.getField(false, "_meventname"),"mMax",_ref.getField(false, "_mmax"),"mMin",_ref.getField(false, "_mmin"),"mRollOver",_ref.getField(false, "_mrollover"),"mThumbBorderColor",_ref.getField(false, "_mthumbbordercolor"),"mThumbInnerColor",_ref.getField(false, "_mthumbinnercolor"),"mValue",_ref.getField(false, "_mvalue"),"pnl",_ref.getField(false, "_pnl"),"stroke",_ref.getField(false, "_stroke"),"Tag",_ref.getField(false, "_tag"),"thumb",_ref.getField(false, "_thumb"),"ThumbSize",_ref.getField(false, "_thumbsize"),"ValueColor",_ref.getField(false, "_valuecolor"),"xlbl",_ref.getField(false, "_xlbl"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/roundslider_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/roundslider_subs_0.java deleted file mode 100644 index e4f204e..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/roundslider_subs_0.java +++ /dev/null @@ -1,576 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class roundslider_subs_0 { - - -public static RemoteObject _base_resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("Base_Resize (roundslider) ","roundslider",59,__ref.getField(false, "ba"),__ref,89); -if (RapidSub.canDelegate("base_resize")) { return __ref.runUserSub(false, "roundslider","base_resize", __ref, _width, _height);} -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 89;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 90;BA.debugLine="cvs.Resize(Width, Height)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Resize",(Object)(BA.numberCast(float.class, _width)),(Object)(BA.numberCast(float.class, _height))); - BA.debugLineNum = 91;BA.debugLine="pnl.SetLayoutAnimated(0, 0, 0, Width, Height)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_pnl" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, _width)),(Object)(BA.numberCast(int.class, _height))); - BA.debugLineNum = 92;BA.debugLine="If thumb.IsInitialized = False Then CreateThumb"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(false,"_thumb" /*RemoteObject*/ ).runMethod(true,"IsInitialized"),roundslider.__c.getField(true,"False"))) { -__ref.runClassMethod (keymon.lat.medicomed.roundslider.class, "_createthumb" /*RemoteObject*/ );}; - BA.debugLineNum = 93;BA.debugLine="CircleRect.Initialize(ThumbSize + stroke, ThumbSi"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_circlerect" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_thumbsize" /*RemoteObject*/ ),__ref.getField(true,"_stroke" /*RemoteObject*/ )}, "+",1, 1))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_thumbsize" /*RemoteObject*/ ),__ref.getField(true,"_stroke" /*RemoteObject*/ )}, "+",1, 1))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_width,__ref.getField(true,"_thumbsize" /*RemoteObject*/ ),__ref.getField(true,"_stroke" /*RemoteObject*/ )}, "--",2, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_height,__ref.getField(true,"_thumbsize" /*RemoteObject*/ ),__ref.getField(true,"_stroke" /*RemoteObject*/ )}, "--",2, 0)))); - BA.debugLineNum = 94;BA.debugLine="xlbl.SetLayoutAnimated(0, CircleRect.Left, Circle"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_xlbl" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, __ref.getField(false,"_circlerect" /*RemoteObject*/ ).runMethod(true,"getLeft"))),(Object)(BA.numberCast(int.class, __ref.getField(false,"_circlerect" /*RemoteObject*/ ).runMethod(true,"getTop"))),(Object)(BA.numberCast(int.class, __ref.getField(false,"_circlerect" /*RemoteObject*/ ).runMethod(true,"getWidth"))),(Object)(BA.numberCast(int.class, __ref.getField(false,"_circlerect" /*RemoteObject*/ ).runMethod(true,"getHeight")))); - BA.debugLineNum = 95;BA.debugLine="Draw"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.roundslider.class, "_draw" /*RemoteObject*/ ); - BA.debugLineNum = 96;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 6;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 7;BA.debugLine="Private mEventName As String 'ignore"; -roundslider._meventname = RemoteObject.createImmutable("");__ref.setField("_meventname",roundslider._meventname); - //BA.debugLineNum = 8;BA.debugLine="Private mCallBack As Object 'ignore"; -roundslider._mcallback = RemoteObject.createNew ("Object");__ref.setField("_mcallback",roundslider._mcallback); - //BA.debugLineNum = 9;BA.debugLine="Public mBase As B4XView 'ignore"; -roundslider._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",roundslider._mbase); - //BA.debugLineNum = 10;BA.debugLine="Private xui As XUI 'ignore"; -roundslider._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",roundslider._xui); - //BA.debugLineNum = 11;BA.debugLine="Private cvs As B4XCanvas"; -roundslider._cvs = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas");__ref.setField("_cvs",roundslider._cvs); - //BA.debugLineNum = 12;BA.debugLine="Private mValue As Int = 75"; -roundslider._mvalue = BA.numberCast(int.class, 75);__ref.setField("_mvalue",roundslider._mvalue); - //BA.debugLineNum = 13;BA.debugLine="Private mMin, mMax As Int"; -roundslider._mmin = RemoteObject.createImmutable(0);__ref.setField("_mmin",roundslider._mmin); -roundslider._mmax = RemoteObject.createImmutable(0);__ref.setField("_mmax",roundslider._mmax); - //BA.debugLineNum = 14;BA.debugLine="Private thumb As B4XBitmap"; -roundslider._thumb = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper");__ref.setField("_thumb",roundslider._thumb); - //BA.debugLineNum = 15;BA.debugLine="Private pnl As B4XView"; -roundslider._pnl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_pnl",roundslider._pnl); - //BA.debugLineNum = 16;BA.debugLine="Private xlbl As B4XView"; -roundslider._xlbl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_xlbl",roundslider._xlbl); - //BA.debugLineNum = 17;BA.debugLine="Private CircleRect As B4XRect"; -roundslider._circlerect = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas.B4XRect");__ref.setField("_circlerect",roundslider._circlerect); - //BA.debugLineNum = 18;BA.debugLine="Private ValueColor As Int"; -roundslider._valuecolor = RemoteObject.createImmutable(0);__ref.setField("_valuecolor",roundslider._valuecolor); - //BA.debugLineNum = 19;BA.debugLine="Private stroke As Int"; -roundslider._stroke = RemoteObject.createImmutable(0);__ref.setField("_stroke",roundslider._stroke); - //BA.debugLineNum = 20;BA.debugLine="Private ThumbSize As Int"; -roundslider._thumbsize = RemoteObject.createImmutable(0);__ref.setField("_thumbsize",roundslider._thumbsize); - //BA.debugLineNum = 21;BA.debugLine="Public Tag As Object"; -roundslider._tag = RemoteObject.createNew ("Object");__ref.setField("_tag",roundslider._tag); - //BA.debugLineNum = 22;BA.debugLine="Private mThumbBorderColor As Int = 0xFF5B5B5B"; -roundslider._mthumbbordercolor = BA.numberCast(int.class, ((int)0xff5b5b5b));__ref.setField("_mthumbbordercolor",roundslider._mthumbbordercolor); - //BA.debugLineNum = 23;BA.debugLine="Private mThumbInnerColor As Int = xui.Color_White"; -roundslider._mthumbinnercolor = __ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_White");__ref.setField("_mthumbinnercolor",roundslider._mthumbinnercolor); - //BA.debugLineNum = 24;BA.debugLine="Private mCircleFillColor As Int = xui.Color_White"; -roundslider._mcirclefillcolor = __ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_White");__ref.setField("_mcirclefillcolor",roundslider._mcirclefillcolor); - //BA.debugLineNum = 25;BA.debugLine="Private mCircleNonValueColor As Int = 0xFFB6B6B6"; -roundslider._mcirclenonvaluecolor = BA.numberCast(int.class, ((int)0xffb6b6b6));__ref.setField("_mcirclenonvaluecolor",roundslider._mcirclenonvaluecolor); - //BA.debugLineNum = 26;BA.debugLine="Private mRollOver As Boolean"; -roundslider._mrollover = RemoteObject.createImmutable(false);__ref.setField("_mrollover",roundslider._mrollover); - //BA.debugLineNum = 27;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _createthumb(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("CreateThumb (roundslider) ","roundslider",59,__ref.getField(false, "ba"),__ref,70); -if (RapidSub.canDelegate("createthumb")) { return __ref.runUserSub(false, "roundslider","createthumb", __ref);} -RemoteObject _p = RemoteObject.declareNull("b4a.example.bcpath"); -RemoteObject _r = RemoteObject.createImmutable(0); -RemoteObject _g = RemoteObject.createImmutable(0); -RemoteObject _l = RemoteObject.createImmutable(0); -RemoteObject _bc = RemoteObject.declareNull("b4a.example.bitmapcreator"); - BA.debugLineNum = 70;BA.debugLine="Private Sub CreateThumb"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 71;BA.debugLine="Dim p As BCPath"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("b4a.example.bcpath");Debug.locals.put("p", _p); - BA.debugLineNum = 72;BA.debugLine="Dim r As Int = 80dip"; -Debug.JustUpdateDeviceLine(); -_r = roundslider.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 80)));Debug.locals.put("r", _r);Debug.locals.put("r", _r); - BA.debugLineNum = 73;BA.debugLine="Dim g As Int = 8dip"; -Debug.JustUpdateDeviceLine(); -_g = roundslider.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 8)));Debug.locals.put("g", _g);Debug.locals.put("g", _g); - BA.debugLineNum = 74;BA.debugLine="Dim l As Int = 28dip"; -Debug.JustUpdateDeviceLine(); -_l = roundslider.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 28)));Debug.locals.put("l", _l);Debug.locals.put("l", _l); - BA.debugLineNum = 75;BA.debugLine="Dim bc As BitmapCreator"; -Debug.JustUpdateDeviceLine(); -_bc = RemoteObject.createNew ("b4a.example.bitmapcreator");Debug.locals.put("bc", _bc); - BA.debugLineNum = 76;BA.debugLine="bc.Initialize(2 * r + g + 3dip, 2 * r + l + g)"; -Debug.JustUpdateDeviceLine(); -_bc.runVoidMethod ("_initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(2),_r,_g,roundslider.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 3)))}, "*++",2, 1)),(Object)(RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(2),_r,_l,_g}, "*++",2, 1))); - BA.debugLineNum = 77;BA.debugLine="p.Initialize(r - l + g, 2 * r - 2dip + g)"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("_initialize",__ref.getField(false, "ba"),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_r,_l,_g}, "-+",2, 1))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(2),_r,roundslider.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2))),_g}, "*-+",2, 1)))); - BA.debugLineNum = 78;BA.debugLine="p.LineTo(r + l + g, 2 * r - 2dip + g)"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("_lineto",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_r,_l,_g}, "++",2, 1))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(2),_r,roundslider.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2))),_g}, "*-+",2, 1)))); - BA.debugLineNum = 79;BA.debugLine="p.LineTo(r + g, 2 * r + l + g)"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("_lineto",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_r,_g}, "+",1, 1))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(2),_r,_l,_g}, "*++",2, 1)))); - BA.debugLineNum = 80;BA.debugLine="p.LineTo(r - l + g, 2 * r - 2dip + g)"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("_lineto",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_r,_l,_g}, "-+",2, 1))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(2),_r,roundslider.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2))),_g}, "*-+",2, 1)))); - BA.debugLineNum = 81;BA.debugLine="bc.DrawPath(p, mThumbBorderColor, True, 0)"; -Debug.JustUpdateDeviceLine(); -_bc.runVoidMethod ("_drawpath",(Object)(_p),(Object)(__ref.getField(true,"_mthumbbordercolor" /*RemoteObject*/ )),(Object)(roundslider.__c.getField(true,"True")),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 82;BA.debugLine="bc.DrawCircle(r + g, r + g, r, mThumbInnerColor,"; -Debug.JustUpdateDeviceLine(); -_bc.runVoidMethod ("_drawcircle",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_r,_g}, "+",1, 1))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_r,_g}, "+",1, 1))),(Object)(BA.numberCast(float.class, _r)),(Object)(__ref.getField(true,"_mthumbinnercolor" /*RemoteObject*/ )),(Object)(roundslider.__c.getField(true,"True")),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 83;BA.debugLine="bc.DrawCircle(r + g, r + g, r, mThumbBorderColor,"; -Debug.JustUpdateDeviceLine(); -_bc.runVoidMethod ("_drawcircle",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_r,_g}, "+",1, 1))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_r,_g}, "+",1, 1))),(Object)(BA.numberCast(float.class, _r)),(Object)(__ref.getField(true,"_mthumbbordercolor" /*RemoteObject*/ )),(Object)(roundslider.__c.getField(true,"False")),(Object)(roundslider.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 10))))); - BA.debugLineNum = 84;BA.debugLine="thumb = bc.Bitmap"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_thumb" /*RemoteObject*/ ,_bc.runMethod(false,"_getbitmap")); - BA.debugLineNum = 85;BA.debugLine="ThumbSize = thumb.Height / 4"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_thumbsize" /*RemoteObject*/ ,BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_thumb" /*RemoteObject*/ ).runMethod(true,"getHeight"),RemoteObject.createImmutable(4)}, "/",0, 0))); - BA.debugLineNum = 86;BA.debugLine="xlbl.SetTextAlignment(\"CENTER\", \"CENTER\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_xlbl" /*RemoteObject*/ ).runVoidMethod ("SetTextAlignment",(Object)(BA.ObjectToString("CENTER")),(Object)(RemoteObject.createImmutable("CENTER"))); - BA.debugLineNum = 87;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _designercreateview(RemoteObject __ref,RemoteObject _base,RemoteObject _lbl,RemoteObject _props) throws Exception{ -try { - Debug.PushSubsStack("DesignerCreateView (roundslider) ","roundslider",59,__ref.getField(false, "ba"),__ref,35); -if (RapidSub.canDelegate("designercreateview")) { return __ref.runUserSub(false, "roundslider","designercreateview", __ref, _base, _lbl, _props);} -Debug.locals.put("Base", _base); -Debug.locals.put("Lbl", _lbl); -Debug.locals.put("Props", _props); - BA.debugLineNum = 35;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 36;BA.debugLine="mBase = Base"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).setObject (_base); - BA.debugLineNum = 37;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_tag" /*RemoteObject*/ ,__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"getTag")); - BA.debugLineNum = 37;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"setTag",__ref); - BA.debugLineNum = 38;BA.debugLine="cvs.Initialize(mBase)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ))); - BA.debugLineNum = 39;BA.debugLine="mMin = Props.Get(\"Min\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mmin" /*RemoteObject*/ ,BA.numberCast(int.class, _props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("Min")))))); - BA.debugLineNum = 40;BA.debugLine="mMax = Props.Get(\"Max\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mmax" /*RemoteObject*/ ,BA.numberCast(int.class, _props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("Max")))))); - BA.debugLineNum = 41;BA.debugLine="mValue = mMin"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mvalue" /*RemoteObject*/ ,__ref.getField(true,"_mmin" /*RemoteObject*/ )); - BA.debugLineNum = 42;BA.debugLine="pnl = xui.CreatePanel(\"pnl\")"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_pnl" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("pnl")))); - BA.debugLineNum = 43;BA.debugLine="xlbl = Lbl"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_xlbl" /*RemoteObject*/ ).setObject (_lbl.getObject()); - BA.debugLineNum = 44;BA.debugLine="xlbl.Visible = True"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_xlbl" /*RemoteObject*/ ).runMethod(true,"setVisible",roundslider.__c.getField(true,"True")); - BA.debugLineNum = 45;BA.debugLine="mBase.AddView(xlbl, 0, 0, 0, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_xlbl" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 46;BA.debugLine="mBase.AddView(pnl, 0, 0, 0, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_pnl" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 47;BA.debugLine="ValueColor = xui.PaintOrColorToColor(Props.Get(\"V"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_valuecolor" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("ValueColor"))))))); - BA.debugLineNum = 48;BA.debugLine="mRollOver = Props.GetDefault(\"RollOver\", False)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mrollover" /*RemoteObject*/ ,BA.ObjectToBoolean(_props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("RollOver"))),(Object)((roundslider.__c.getField(true,"False")))))); - BA.debugLineNum = 49;BA.debugLine="If xui.IsB4A Or xui.IsB4i Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(".",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4A")) || RemoteObject.solveBoolean(".",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4i"))) { - BA.debugLineNum = 50;BA.debugLine="stroke = 8dip"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_stroke" /*RemoteObject*/ ,roundslider.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 8)))); - }else -{ BA.debugLineNum = 51;BA.debugLine="Else If xui.IsB4J Then"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4J").get().booleanValue()) { - BA.debugLineNum = 52;BA.debugLine="stroke = 6dip"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_stroke" /*RemoteObject*/ ,roundslider.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 6)))); - }} -; - BA.debugLineNum = 54;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.roundslider.class, "_base_resize" /*RemoteObject*/ ,(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"))),(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight")))); - BA.debugLineNum = 55;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _draw(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Draw (roundslider) ","roundslider",59,__ref.getField(false, "ba"),__ref,98); -if (RapidSub.canDelegate("draw")) { return __ref.runUserSub(false, "roundslider","draw", __ref);} -RemoteObject _radius = RemoteObject.createImmutable(0); -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XPath"); -RemoteObject _angle = RemoteObject.createImmutable(0); -RemoteObject _b4jstrokeoffset = RemoteObject.createImmutable(0); -RemoteObject _dest = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XRect"); -RemoteObject _r = RemoteObject.createImmutable(0); -RemoteObject _cx = RemoteObject.createImmutable(0); -RemoteObject _cy = RemoteObject.createImmutable(0); - BA.debugLineNum = 98;BA.debugLine="Public Sub Draw"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 99;BA.debugLine="cvs.ClearRect(cvs.TargetRect)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("ClearRect",(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect"))); - BA.debugLineNum = 100;BA.debugLine="Dim radius As Int = CircleRect.Width / 2"; -Debug.JustUpdateDeviceLine(); -_radius = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_circlerect" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0));Debug.locals.put("radius", _radius);Debug.locals.put("radius", _radius); - BA.debugLineNum = 101;BA.debugLine="cvs.DrawCircle(CircleRect.CenterX, CircleRect.Cen"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawCircle",(Object)(__ref.getField(false,"_circlerect" /*RemoteObject*/ ).runMethod(true,"getCenterX")),(Object)(__ref.getField(false,"_circlerect" /*RemoteObject*/ ).runMethod(true,"getCenterY")),(Object)(BA.numberCast(float.class, _radius)),(Object)(__ref.getField(true,"_mcirclenonvaluecolor" /*RemoteObject*/ )),(Object)(roundslider.__c.getField(true,"False")),(Object)(BA.numberCast(float.class, __ref.getField(true,"_stroke" /*RemoteObject*/ )))); - BA.debugLineNum = 102;BA.debugLine="Dim p As B4XPath"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas.B4XPath");Debug.locals.put("p", _p); - BA.debugLineNum = 103;BA.debugLine="Dim angle As Int = (mValue - mMin) / (mMax - mMin"; -Debug.JustUpdateDeviceLine(); -_angle = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mvalue" /*RemoteObject*/ ),__ref.getField(true,"_mmin" /*RemoteObject*/ )}, "-",1, 1)),(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mmax" /*RemoteObject*/ ),__ref.getField(true,"_mmin" /*RemoteObject*/ )}, "-",1, 1)),RemoteObject.createImmutable(360)}, "/*",0, 0));Debug.locals.put("angle", _angle);Debug.locals.put("angle", _angle); - BA.debugLineNum = 104;BA.debugLine="Dim B4JStrokeOffset As Int"; -Debug.JustUpdateDeviceLine(); -_b4jstrokeoffset = RemoteObject.createImmutable(0);Debug.locals.put("B4JStrokeOffset", _b4jstrokeoffset); - BA.debugLineNum = 105;BA.debugLine="If xui.IsB4J Then B4JStrokeOffset = stroke / 2"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4J").get().booleanValue()) { -_b4jstrokeoffset = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_stroke" /*RemoteObject*/ ),RemoteObject.createImmutable(2)}, "/",0, 0));Debug.locals.put("B4JStrokeOffset", _b4jstrokeoffset);}; - BA.debugLineNum = 106;BA.debugLine="If mValue = mMax Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_mvalue" /*RemoteObject*/ ),BA.numberCast(double.class, __ref.getField(true,"_mmax" /*RemoteObject*/ )))) { - BA.debugLineNum = 107;BA.debugLine="cvs.DrawCircle(CircleRect.CenterX, CircleRect.Ce"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawCircle",(Object)(__ref.getField(false,"_circlerect" /*RemoteObject*/ ).runMethod(true,"getCenterX")),(Object)(__ref.getField(false,"_circlerect" /*RemoteObject*/ ).runMethod(true,"getCenterY")),(Object)(BA.numberCast(float.class, _radius)),(Object)(__ref.getField(true,"_valuecolor" /*RemoteObject*/ )),(Object)(roundslider.__c.getField(true,"False")),(Object)(BA.numberCast(float.class, __ref.getField(true,"_stroke" /*RemoteObject*/ )))); - }else { - BA.debugLineNum = 109;BA.debugLine="p.InitializeArc(CircleRect.CenterX, CircleRect.C"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("InitializeArc",(Object)(__ref.getField(false,"_circlerect" /*RemoteObject*/ ).runMethod(true,"getCenterX")),(Object)(__ref.getField(false,"_circlerect" /*RemoteObject*/ ).runMethod(true,"getCenterY")),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_radius,_b4jstrokeoffset}, "+",1, 1))),(Object)(BA.numberCast(float.class, -(double) (0 + 90))),(Object)(BA.numberCast(float.class, _angle))); - BA.debugLineNum = 110;BA.debugLine="cvs.DrawPath(p, ValueColor, False, stroke)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawPath",(Object)(_p),(Object)(__ref.getField(true,"_valuecolor" /*RemoteObject*/ )),(Object)(roundslider.__c.getField(true,"False")),(Object)(BA.numberCast(float.class, __ref.getField(true,"_stroke" /*RemoteObject*/ )))); - }; - BA.debugLineNum = 112;BA.debugLine="cvs.DrawCircle(CircleRect.CenterX, CircleRect.Cen"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawCircle",(Object)(__ref.getField(false,"_circlerect" /*RemoteObject*/ ).runMethod(true,"getCenterX")),(Object)(__ref.getField(false,"_circlerect" /*RemoteObject*/ ).runMethod(true,"getCenterY")),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_radius,_b4jstrokeoffset}, "-",1, 1))),(Object)(__ref.getField(true,"_mcirclefillcolor" /*RemoteObject*/ )),(Object)(roundslider.__c.getField(true,"True")),(Object)(BA.numberCast(float.class, 0))); - BA.debugLineNum = 113;BA.debugLine="Dim dest As B4XRect"; -Debug.JustUpdateDeviceLine(); -_dest = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas.B4XRect");Debug.locals.put("dest", _dest); - BA.debugLineNum = 114;BA.debugLine="Dim r As Int = radius + ThumbSize / 2 + stroke /"; -Debug.JustUpdateDeviceLine(); -_r = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_radius,__ref.getField(true,"_thumbsize" /*RemoteObject*/ ),RemoteObject.createImmutable(2),__ref.getField(true,"_stroke" /*RemoteObject*/ ),RemoteObject.createImmutable(2)}, "+/+/",2, 0));Debug.locals.put("r", _r);Debug.locals.put("r", _r); - BA.debugLineNum = 115;BA.debugLine="Dim cx As Int = CircleRect.CenterX + r * CosD(ang"; -Debug.JustUpdateDeviceLine(); -_cx = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_circlerect" /*RemoteObject*/ ).runMethod(true,"getCenterX"),_r,roundslider.__c.runMethod(true,"CosD",(Object)(BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {_angle,RemoteObject.createImmutable(90)}, "-",1, 1))))}, "+*",1, 0));Debug.locals.put("cx", _cx);Debug.locals.put("cx", _cx); - BA.debugLineNum = 116;BA.debugLine="Dim cy As Int = CircleRect.CenterY + r * SinD(ang"; -Debug.JustUpdateDeviceLine(); -_cy = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_circlerect" /*RemoteObject*/ ).runMethod(true,"getCenterY"),_r,roundslider.__c.runMethod(true,"SinD",(Object)(BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {_angle,RemoteObject.createImmutable(90)}, "-",1, 1))))}, "+*",1, 0));Debug.locals.put("cy", _cy);Debug.locals.put("cy", _cy); - BA.debugLineNum = 117;BA.debugLine="dest.Initialize(cx - thumb.Width / 8, cy - ThumbS"; -Debug.JustUpdateDeviceLine(); -_dest.runVoidMethod ("Initialize",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_cx,__ref.getField(false,"_thumb" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(8)}, "-/",1, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_cy,__ref.getField(true,"_thumbsize" /*RemoteObject*/ ),RemoteObject.createImmutable(2)}, "-/",1, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_cx,__ref.getField(false,"_thumb" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(8)}, "+/",1, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_cy,__ref.getField(true,"_thumbsize" /*RemoteObject*/ ),RemoteObject.createImmutable(2)}, "+/",1, 0)))); - BA.debugLineNum = 118;BA.debugLine="cvs.DrawBitmapRotated(thumb, dest, angle)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawBitmapRotated",(Object)((__ref.getField(false,"_thumb" /*RemoteObject*/ ).getObject())),(Object)(_dest),(Object)(BA.numberCast(float.class, _angle))); - BA.debugLineNum = 119;BA.debugLine="cvs.Invalidate"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Invalidate"); - BA.debugLineNum = 120;BA.debugLine="xlbl.Text = mValue"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_xlbl" /*RemoteObject*/ ).runMethod(true,"setText",BA.ObjectToCharSequence(__ref.getField(true,"_mvalue" /*RemoteObject*/ ))); - BA.debugLineNum = 121;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getvalue(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getValue (roundslider) ","roundslider",59,__ref.getField(false, "ba"),__ref,182); -if (RapidSub.canDelegate("getvalue")) { return __ref.runUserSub(false, "roundslider","getvalue", __ref);} - BA.debugLineNum = 182;BA.debugLine="Public Sub getValue As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 183;BA.debugLine="Return mValue"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_mvalue" /*RemoteObject*/ ); - BA.debugLineNum = 184;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _callback,RemoteObject _eventname) throws Exception{ -try { - Debug.PushSubsStack("Initialize (roundslider) ","roundslider",59,__ref.getField(false, "ba"),__ref,29); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "roundslider","initialize", __ref, _ba, _callback, _eventname);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); -Debug.locals.put("Callback", _callback); -Debug.locals.put("EventName", _eventname); - BA.debugLineNum = 29;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 30;BA.debugLine="mEventName = EventName"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_meventname" /*RemoteObject*/ ,_eventname); - BA.debugLineNum = 31;BA.debugLine="mCallBack = Callback"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mcallback" /*RemoteObject*/ ,_callback); - BA.debugLineNum = 32;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _pnl_touch(RemoteObject __ref,RemoteObject _action,RemoteObject _x,RemoteObject _y) throws Exception{ -try { - Debug.PushSubsStack("pnl_Touch (roundslider) ","roundslider",59,__ref.getField(false, "ba"),__ref,123); -if (RapidSub.canDelegate("pnl_touch")) { return __ref.runUserSub(false, "roundslider","pnl_touch", __ref, _action, _x, _y);} -RemoteObject _dx = RemoteObject.createImmutable(0); -RemoteObject _dy = RemoteObject.createImmutable(0); -RemoteObject _dist = RemoteObject.createImmutable(0f); -RemoteObject _angle = RemoteObject.createImmutable(0); -RemoteObject _newvalue = RemoteObject.createImmutable(0); -Debug.locals.put("Action", _action); -Debug.locals.put("X", _x); -Debug.locals.put("Y", _y); - BA.debugLineNum = 123;BA.debugLine="Private Sub pnl_Touch (Action As Int, X As Float,"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 124;BA.debugLine="If Action = pnl.TOUCH_ACTION_MOVE_NOTOUCH Then Re"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_action,BA.numberCast(double.class, __ref.getField(false,"_pnl" /*RemoteObject*/ ).getField(true,"TOUCH_ACTION_MOVE_NOTOUCH")))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 125;BA.debugLine="Dim dx As Int = x - CircleRect.CenterX"; -Debug.JustUpdateDeviceLine(); -_dx = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_x,__ref.getField(false,"_circlerect" /*RemoteObject*/ ).runMethod(true,"getCenterX")}, "-",1, 0));Debug.locals.put("dx", _dx);Debug.locals.put("dx", _dx); - BA.debugLineNum = 126;BA.debugLine="Dim dy As Int = y - CircleRect.CenterY"; -Debug.JustUpdateDeviceLine(); -_dy = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_y,__ref.getField(false,"_circlerect" /*RemoteObject*/ ).runMethod(true,"getCenterY")}, "-",1, 0));Debug.locals.put("dy", _dy);Debug.locals.put("dy", _dy); - BA.debugLineNum = 127;BA.debugLine="Dim dist As Float = Sqrt(Power(dx, 2) + Power(dy,"; -Debug.JustUpdateDeviceLine(); -_dist = BA.numberCast(float.class, roundslider.__c.runMethod(true,"Sqrt",(Object)(RemoteObject.solve(new RemoteObject[] {roundslider.__c.runMethod(true,"Power",(Object)(BA.numberCast(double.class, _dx)),(Object)(BA.numberCast(double.class, 2))),roundslider.__c.runMethod(true,"Power",(Object)(BA.numberCast(double.class, _dy)),(Object)(BA.numberCast(double.class, 2)))}, "+",1, 0))));Debug.locals.put("dist", _dist);Debug.locals.put("dist", _dist); - BA.debugLineNum = 128;BA.debugLine="If dist > CircleRect.Width / 2 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",_dist,RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_circlerect" /*RemoteObject*/ ).runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0))) { - BA.debugLineNum = 129;BA.debugLine="Dim angle As Int = Round(ATan2D(dy, dx))"; -Debug.JustUpdateDeviceLine(); -_angle = BA.numberCast(int.class, roundslider.__c.runMethod(true,"Round",(Object)(roundslider.__c.runMethod(true,"ATan2D",(Object)(BA.numberCast(double.class, _dy)),(Object)(BA.numberCast(double.class, _dx))))));Debug.locals.put("angle", _angle);Debug.locals.put("angle", _angle); - BA.debugLineNum = 130;BA.debugLine="angle = angle + 90"; -Debug.JustUpdateDeviceLine(); -_angle = RemoteObject.solve(new RemoteObject[] {_angle,RemoteObject.createImmutable(90)}, "+",1, 1);Debug.locals.put("angle", _angle); - BA.debugLineNum = 131;BA.debugLine="angle = (angle + 360) Mod 360"; -Debug.JustUpdateDeviceLine(); -_angle = RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {_angle,RemoteObject.createImmutable(360)}, "+",1, 1)),RemoteObject.createImmutable(360)}, "%",0, 1);Debug.locals.put("angle", _angle); - BA.debugLineNum = 132;BA.debugLine="Dim NewValue As Int = mMin + angle / 360 * (mMax"; -Debug.JustUpdateDeviceLine(); -_newvalue = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mmin" /*RemoteObject*/ ),_angle,RemoteObject.createImmutable(360),(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mmax" /*RemoteObject*/ ),__ref.getField(true,"_mmin" /*RemoteObject*/ )}, "-",1, 1))}, "+/*",1, 0));Debug.locals.put("NewValue", _newvalue);Debug.locals.put("NewValue", _newvalue); - BA.debugLineNum = 133;BA.debugLine="NewValue = Max(mMin, Min(mMax, NewValue))"; -Debug.JustUpdateDeviceLine(); -_newvalue = BA.numberCast(int.class, roundslider.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, __ref.getField(true,"_mmin" /*RemoteObject*/ ))),(Object)(roundslider.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, __ref.getField(true,"_mmax" /*RemoteObject*/ ))),(Object)(BA.numberCast(double.class, _newvalue))))));Debug.locals.put("NewValue", _newvalue); - BA.debugLineNum = 134;BA.debugLine="If NewValue <> mValue Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("!",_newvalue,BA.numberCast(double.class, __ref.getField(true,"_mvalue" /*RemoteObject*/ )))) { - BA.debugLineNum = 135;BA.debugLine="If mRollOver = False Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_mrollover" /*RemoteObject*/ ),roundslider.__c.getField(true,"False"))) { - BA.debugLineNum = 136;BA.debugLine="If Abs(NewValue - mValue) > (mMax - mMin) / 2"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",roundslider.__c.runMethod(true,"Abs",(Object)(BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {_newvalue,__ref.getField(true,"_mvalue" /*RemoteObject*/ )}, "-",1, 1)))),RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mmax" /*RemoteObject*/ ),__ref.getField(true,"_mmin" /*RemoteObject*/ )}, "-",1, 1)),RemoteObject.createImmutable(2)}, "/",0, 0))) { - BA.debugLineNum = 137;BA.debugLine="If mValue >= (mMax + mMin) / 2 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("g",__ref.getField(true,"_mvalue" /*RemoteObject*/ ),RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mmax" /*RemoteObject*/ ),__ref.getField(true,"_mmin" /*RemoteObject*/ )}, "+",1, 1)),RemoteObject.createImmutable(2)}, "/",0, 0))) { - BA.debugLineNum = 138;BA.debugLine="mValue = mMax"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mvalue" /*RemoteObject*/ ,__ref.getField(true,"_mmax" /*RemoteObject*/ )); - }else { - BA.debugLineNum = 140;BA.debugLine="mValue = mMin"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mvalue" /*RemoteObject*/ ,__ref.getField(true,"_mmin" /*RemoteObject*/ )); - }; - }else { - BA.debugLineNum = 143;BA.debugLine="mValue = NewValue"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mvalue" /*RemoteObject*/ ,_newvalue); - }; - }else { - BA.debugLineNum = 146;BA.debugLine="mValue = NewValue"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mvalue" /*RemoteObject*/ ,_newvalue); - }; - BA.debugLineNum = 148;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_Valu"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"SubExists",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_ValueChanged"))),(Object)(BA.numberCast(int.class, 1))).get().booleanValue()) { - BA.debugLineNum = 149;BA.debugLine="CallSub2(mCallBack, mEventName & \"_ValueChange"; -Debug.JustUpdateDeviceLine(); -roundslider.__c.runMethodAndSync(false,"CallSubNew2",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_ValueChanged"))),(Object)((__ref.getField(true,"_mvalue" /*RemoteObject*/ )))); - }; - }; - BA.debugLineNum = 152;BA.debugLine="Draw"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.roundslider.class, "_draw" /*RemoteObject*/ ); - }; - BA.debugLineNum = 154;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setcirclecolor(RemoteObject __ref,RemoteObject _nonvaluecolor,RemoteObject _innercolor) throws Exception{ -try { - Debug.PushSubsStack("SetCircleColor (roundslider) ","roundslider",59,__ref.getField(false, "ba"),__ref,64); -if (RapidSub.canDelegate("setcirclecolor")) { return __ref.runUserSub(false, "roundslider","setcirclecolor", __ref, _nonvaluecolor, _innercolor);} -Debug.locals.put("NonValueColor", _nonvaluecolor); -Debug.locals.put("InnerColor", _innercolor); - BA.debugLineNum = 64;BA.debugLine="Public Sub SetCircleColor (NonValueColor As Int, I"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 65;BA.debugLine="mCircleNonValueColor = NonValueColor"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mcirclenonvaluecolor" /*RemoteObject*/ ,_nonvaluecolor); - BA.debugLineNum = 66;BA.debugLine="mCircleFillColor = InnerColor"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mcirclefillcolor" /*RemoteObject*/ ,_innercolor); - BA.debugLineNum = 67;BA.debugLine="Draw"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.roundslider.class, "_draw" /*RemoteObject*/ ); - BA.debugLineNum = 68;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setrange(RemoteObject __ref,RemoteObject _newmin,RemoteObject _newmax) throws Exception{ -try { - Debug.PushSubsStack("SetRange (roundslider) ","roundslider",59,__ref.getField(false, "ba"),__ref,176); -if (RapidSub.canDelegate("setrange")) { return __ref.runUserSub(false, "roundslider","setrange", __ref, _newmin, _newmax);} -Debug.locals.put("NewMin", _newmin); -Debug.locals.put("NewMax", _newmax); - BA.debugLineNum = 176;BA.debugLine="Public Sub SetRange(NewMin As Int, NewMax As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 177;BA.debugLine="mMin = NewMin"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mmin" /*RemoteObject*/ ,_newmin); - BA.debugLineNum = 178;BA.debugLine="mMax = NewMax"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mmax" /*RemoteObject*/ ,_newmax); - BA.debugLineNum = 179;BA.debugLine="setValue(mValue)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.roundslider.class, "_setvalue" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_mvalue" /*RemoteObject*/ ))); - BA.debugLineNum = 180;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setthumbcolor(RemoteObject __ref,RemoteObject _bordercolor,RemoteObject _innercolor) throws Exception{ -try { - Debug.PushSubsStack("SetThumbColor (roundslider) ","roundslider",59,__ref.getField(false, "ba"),__ref,57); -if (RapidSub.canDelegate("setthumbcolor")) { return __ref.runUserSub(false, "roundslider","setthumbcolor", __ref, _bordercolor, _innercolor);} -Debug.locals.put("BorderColor", _bordercolor); -Debug.locals.put("InnerColor", _innercolor); - BA.debugLineNum = 57;BA.debugLine="Public Sub SetThumbColor(BorderColor As Int, Inner"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 58;BA.debugLine="mThumbBorderColor = BorderColor"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mthumbbordercolor" /*RemoteObject*/ ,_bordercolor); - BA.debugLineNum = 59;BA.debugLine="mThumbInnerColor = InnerColor"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mthumbinnercolor" /*RemoteObject*/ ,_innercolor); - BA.debugLineNum = 60;BA.debugLine="CreateThumb"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.roundslider.class, "_createthumb" /*RemoteObject*/ ); - BA.debugLineNum = 61;BA.debugLine="Draw"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.roundslider.class, "_draw" /*RemoteObject*/ ); - BA.debugLineNum = 62;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setvalue(RemoteObject __ref,RemoteObject _v) throws Exception{ -try { - Debug.PushSubsStack("setValue (roundslider) ","roundslider",59,__ref.getField(false, "ba"),__ref,170); -if (RapidSub.canDelegate("setvalue")) { return __ref.runUserSub(false, "roundslider","setvalue", __ref, _v);} -Debug.locals.put("v", _v); - BA.debugLineNum = 170;BA.debugLine="Public Sub setValue (v As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 171;BA.debugLine="mValue = Max(mMin, Min(mMax, v))"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mvalue" /*RemoteObject*/ ,BA.numberCast(int.class, roundslider.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, __ref.getField(true,"_mmin" /*RemoteObject*/ ))),(Object)(roundslider.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, __ref.getField(true,"_mmax" /*RemoteObject*/ ))),(Object)(BA.numberCast(double.class, _v))))))); - BA.debugLineNum = 172;BA.debugLine="Draw"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.roundslider.class, "_draw" /*RemoteObject*/ ); - BA.debugLineNum = 173;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/scrollinglabel.java b/B4A/Objects/shell/src/keymon/lat/medicomed/scrollinglabel.java deleted file mode 100644 index b1b5667..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/scrollinglabel.java +++ /dev/null @@ -1,41 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class scrollinglabel { - public static RemoteObject myClass; - public scrollinglabel() { - } - public static PCBA staticBA = new PCBA(null, scrollinglabel.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _meventname = RemoteObject.createImmutable(""); -public static RemoteObject _mcallback = RemoteObject.declareNull("Object"); -public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _mtext = RemoteObject.createImmutable(""); -public static RemoteObject _taskindex = RemoteObject.createImmutable(0); -public static RemoteObject _fnt = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont"); -public static RemoteObject _cvs = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas"); -public static RemoteObject _tag = RemoteObject.declareNull("Object"); -public static RemoteObject _widthpersecond = RemoteObject.createImmutable(0); -public static RemoteObject _startpositiondelay = RemoteObject.createImmutable(0); -public static RemoteObject _mtextcolor = RemoteObject.createImmutable(0); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"cvs",_ref.getField(false, "_cvs"),"DateUtils",_ref.getField(false, "_dateutils"),"fnt",_ref.getField(false, "_fnt"),"mBase",_ref.getField(false, "_mbase"),"mCallBack",_ref.getField(false, "_mcallback"),"mEventName",_ref.getField(false, "_meventname"),"mText",_ref.getField(false, "_mtext"),"mTextColor",_ref.getField(false, "_mtextcolor"),"StartPositionDelay",_ref.getField(false, "_startpositiondelay"),"Tag",_ref.getField(false, "_tag"),"taskIndex",_ref.getField(false, "_taskindex"),"WidthPerSecond",_ref.getField(false, "_widthpersecond"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/scrollinglabel_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/scrollinglabel_subs_0.java deleted file mode 100644 index 2bd4948..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/scrollinglabel_subs_0.java +++ /dev/null @@ -1,582 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class scrollinglabel_subs_0 { - - -public static RemoteObject _base_resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("Base_Resize (scrollinglabel) ","scrollinglabel",60,__ref.getField(false, "ba"),__ref,40); -if (RapidSub.canDelegate("base_resize")) { return __ref.runUserSub(false, "scrollinglabel","base_resize", __ref, _width, _height);} -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 40;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 41;BA.debugLine="mBase.GetView(0).SetLayoutAnimated(0, 0, 0, Width"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0))).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, _width)),(Object)(BA.numberCast(int.class, _height))); - BA.debugLineNum = 42;BA.debugLine="setText(mText)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.scrollinglabel.class, "_settext" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_mtext" /*RemoteObject*/ ))); - BA.debugLineNum = 43;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 2;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 3;BA.debugLine="Private mEventName As String 'ignore"; -scrollinglabel._meventname = RemoteObject.createImmutable("");__ref.setField("_meventname",scrollinglabel._meventname); - //BA.debugLineNum = 4;BA.debugLine="Private mCallBack As Object 'ignore"; -scrollinglabel._mcallback = RemoteObject.createNew ("Object");__ref.setField("_mcallback",scrollinglabel._mcallback); - //BA.debugLineNum = 5;BA.debugLine="Public mBase As B4XView"; -scrollinglabel._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",scrollinglabel._mbase); - //BA.debugLineNum = 6;BA.debugLine="Private xui As XUI 'ignore"; -scrollinglabel._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",scrollinglabel._xui); - //BA.debugLineNum = 7;BA.debugLine="Private mText As String"; -scrollinglabel._mtext = RemoteObject.createImmutable("");__ref.setField("_mtext",scrollinglabel._mtext); - //BA.debugLineNum = 8;BA.debugLine="Private taskIndex As Int"; -scrollinglabel._taskindex = RemoteObject.createImmutable(0);__ref.setField("_taskindex",scrollinglabel._taskindex); - //BA.debugLineNum = 9;BA.debugLine="Private fnt As B4XFont"; -scrollinglabel._fnt = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont");__ref.setField("_fnt",scrollinglabel._fnt); - //BA.debugLineNum = 10;BA.debugLine="Private cvs As B4XCanvas"; -scrollinglabel._cvs = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas");__ref.setField("_cvs",scrollinglabel._cvs); - //BA.debugLineNum = 11;BA.debugLine="Public Tag As Object"; -scrollinglabel._tag = RemoteObject.createNew ("Object");__ref.setField("_tag",scrollinglabel._tag); - //BA.debugLineNum = 12;BA.debugLine="Public WidthPerSecond As Int = 100dip"; -scrollinglabel._widthpersecond = scrollinglabel.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 100)));__ref.setField("_widthpersecond",scrollinglabel._widthpersecond); - //BA.debugLineNum = 13;BA.debugLine="Public StartPositionDelay As Int = 1000"; -scrollinglabel._startpositiondelay = BA.numberCast(int.class, 1000);__ref.setField("_startpositiondelay",scrollinglabel._startpositiondelay); - //BA.debugLineNum = 14;BA.debugLine="Private mTextColor As Int = xui.Color_Black"; -scrollinglabel._mtextcolor = __ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Black");__ref.setField("_mtextcolor",scrollinglabel._mtextcolor); - //BA.debugLineNum = 15;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _designercreateview(RemoteObject __ref,RemoteObject _base,RemoteObject _lbl,RemoteObject _props) throws Exception{ -try { - Debug.PushSubsStack("DesignerCreateView (scrollinglabel) ","scrollinglabel",60,__ref.getField(false, "ba"),__ref,23); -if (RapidSub.canDelegate("designercreateview")) { return __ref.runUserSub(false, "scrollinglabel","designercreateview", __ref, _base, _lbl, _props);} -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _l = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -Debug.locals.put("Base", _base); -Debug.locals.put("Lbl", _lbl); -Debug.locals.put("Props", _props); - BA.debugLineNum = 23;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 24;BA.debugLine="mBase = Base"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).setObject (_base); - BA.debugLineNum = 25;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_tag" /*RemoteObject*/ ,__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"getTag")); - BA.debugLineNum = 25;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"setTag",__ref); - BA.debugLineNum = 27;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"\")"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_p = __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("")));Debug.locals.put("p", _p);Debug.locals.put("p", _p); - BA.debugLineNum = 28;BA.debugLine="mBase.AddView(p, 0, 0, mBase.Width, mBase.Height)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((_p.getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"))); - BA.debugLineNum = 29;BA.debugLine="mText = Lbl.Text"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mtext" /*RemoteObject*/ ,_lbl.runMethod(true,"getText")); - BA.debugLineNum = 30;BA.debugLine="Dim l As B4XView = Lbl"; -Debug.JustUpdateDeviceLine(); -_l = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_l = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), _lbl.getObject());Debug.locals.put("l", _l);Debug.locals.put("l", _l); - BA.debugLineNum = 31;BA.debugLine="fnt = l.Font"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_fnt" /*RemoteObject*/ ,_l.runMethod(false,"getFont")); - BA.debugLineNum = 32;BA.debugLine="mTextColor = l.TextColor"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mtextcolor" /*RemoteObject*/ ,_l.runMethod(true,"getTextColor")); - BA.debugLineNum = 33;BA.debugLine="If mTextColor = xui.Color_Transparent Then mTextC"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_mtextcolor" /*RemoteObject*/ ),BA.numberCast(double.class, __ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")))) { -__ref.setField ("_mtextcolor" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Black"));}; - BA.debugLineNum = 34;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"\")"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_p = __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("")));Debug.locals.put("p", _p);Debug.locals.put("p", _p); - BA.debugLineNum = 35;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, 2dip, 2dip)"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(scrollinglabel.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)))),(Object)(scrollinglabel.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2))))); - BA.debugLineNum = 36;BA.debugLine="cvs.Initialize(p)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(_p)); - BA.debugLineNum = 37;BA.debugLine="setText(mText)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.scrollinglabel.class, "_settext" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_mtext" /*RemoteObject*/ ))); - BA.debugLineNum = 38;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _gettext(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getText (scrollinglabel) ","scrollinglabel",60,__ref.getField(false, "ba"),__ref,93); -if (RapidSub.canDelegate("gettext")) { return __ref.runUserSub(false, "scrollinglabel","gettext", __ref);} - BA.debugLineNum = 93;BA.debugLine="Public Sub getText As String"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 94;BA.debugLine="Return mText"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_mtext" /*RemoteObject*/ ); - BA.debugLineNum = 95;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _gettextcolor(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getTextColor (scrollinglabel) ","scrollinglabel",60,__ref.getField(false, "ba"),__ref,126); -if (RapidSub.canDelegate("gettextcolor")) { return __ref.runUserSub(false, "scrollinglabel","gettextcolor", __ref);} - BA.debugLineNum = 126;BA.debugLine="Public Sub getTextColor As Int"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 127;BA.debugLine="Return mTextColor"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(true,"_mtextcolor" /*RemoteObject*/ ); - BA.debugLineNum = 128;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _callback,RemoteObject _eventname) throws Exception{ -try { - Debug.PushSubsStack("Initialize (scrollinglabel) ","scrollinglabel",60,__ref.getField(false, "ba"),__ref,18); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "scrollinglabel","initialize", __ref, _ba, _callback, _eventname);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); -Debug.locals.put("Callback", _callback); -Debug.locals.put("EventName", _eventname); - BA.debugLineNum = 18;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 19;BA.debugLine="mEventName = EventName"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_meventname" /*RemoteObject*/ ,_eventname); - BA.debugLineNum = 20;BA.debugLine="mCallBack = Callback"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mcallback" /*RemoteObject*/ ,_callback); - BA.debugLineNum = 21;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _measuretextwidth(RemoteObject __ref,RemoteObject _s,RemoteObject _font1) throws Exception{ -try { - Debug.PushSubsStack("MeasureTextWidth (scrollinglabel) ","scrollinglabel",60,__ref.getField(false, "ba"),__ref,117); -if (RapidSub.canDelegate("measuretextwidth")) { return __ref.runUserSub(false, "scrollinglabel","measuretextwidth", __ref, _s, _font1);} -Debug.locals.put("s", _s); -Debug.locals.put("font1", _font1); - BA.debugLineNum = 117;BA.debugLine="Private Sub MeasureTextWidth(s As String, font1 As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 118;BA.debugLine="Return cvs.MeasureText(s, font1).Width"; -Debug.JustUpdateDeviceLine(); -if (true) return __ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"MeasureText",(Object)(_s),(Object)(_font1)).runMethod(true,"getWidth"); - BA.debugLineNum = 119;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(0f); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _settext(RemoteObject __ref,RemoteObject _t) throws Exception{ -try { - Debug.PushSubsStack("setText (scrollinglabel) ","scrollinglabel",60,__ref.getField(false, "ba"),__ref,45); -if (RapidSub.canDelegate("settext")) { return __ref.runUserSub(false, "scrollinglabel","settext", __ref, _t);} -RemoteObject _needtocreatenewlabel = RemoteObject.createImmutable(false); -RemoteObject _parent = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _xlbl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _originaltextwidth = RemoteObject.createImmutable(0f); -RemoteObject _lbl = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -RemoteObject _duplicatetext = RemoteObject.createImmutable(""); -RemoteObject _width = RemoteObject.createImmutable(0f); -Debug.locals.put("t", _t); - BA.debugLineNum = 45;BA.debugLine="Public Sub setText(t As String)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 46;BA.debugLine="Dim NeedToCreateNewLabel As Boolean = True"; -Debug.JustUpdateDeviceLine(); -_needtocreatenewlabel = scrollinglabel.__c.getField(true,"True");Debug.locals.put("NeedToCreateNewLabel", _needtocreatenewlabel);Debug.locals.put("NeedToCreateNewLabel", _needtocreatenewlabel); - BA.debugLineNum = 47;BA.debugLine="Dim parent As B4XView = mBase.GetView(0)"; -Debug.JustUpdateDeviceLine(); -_parent = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_parent = __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0)));Debug.locals.put("parent", _parent);Debug.locals.put("parent", _parent); - BA.debugLineNum = 48;BA.debugLine="If parent.NumberOfViews > 0 Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(">",_parent.runMethod(true,"getNumberOfViews"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 50;BA.debugLine="Dim p As B4XView = parent.GetView(0)"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_p = _parent.runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0)));Debug.locals.put("p", _p);Debug.locals.put("p", _p); - BA.debugLineNum = 51;BA.debugLine="If p.Tag = \"static\" Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_p.runMethod(false,"getTag"),RemoteObject.createImmutable(("static")))) { - BA.debugLineNum = 52;BA.debugLine="NeedToCreateNewLabel = False"; -Debug.JustUpdateDeviceLine(); -_needtocreatenewlabel = scrollinglabel.__c.getField(true,"False");Debug.locals.put("NeedToCreateNewLabel", _needtocreatenewlabel); - BA.debugLineNum = 53;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, parent.Width, pare"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(_parent.runMethod(true,"getWidth")),(Object)(_parent.runMethod(true,"getHeight"))); - BA.debugLineNum = 54;BA.debugLine="Dim xlbl As B4XView = p.GetView(0)"; -Debug.JustUpdateDeviceLine(); -_xlbl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_xlbl = _p.runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0)));Debug.locals.put("xlbl", _xlbl);Debug.locals.put("xlbl", _xlbl); - BA.debugLineNum = 55;BA.debugLine="xlbl.SetLayoutAnimated(0, 0, 0, parent.Width, p"; -Debug.JustUpdateDeviceLine(); -_xlbl.runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(_parent.runMethod(true,"getWidth")),(Object)(_parent.runMethod(true,"getHeight"))); - }; - }; - BA.debugLineNum = 59;BA.debugLine="Dim originalTextWidth As Float = MeasureTextWidth"; -Debug.JustUpdateDeviceLine(); -_originaltextwidth = __ref.runClassMethod (keymon.lat.medicomed.scrollinglabel.class, "_measuretextwidth" /*RemoteObject*/ ,(Object)(_t),(Object)(__ref.getField(false,"_fnt" /*RemoteObject*/ )));Debug.locals.put("originalTextWidth", _originaltextwidth);Debug.locals.put("originalTextWidth", _originaltextwidth); - BA.debugLineNum = 60;BA.debugLine="mText = t"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mtext" /*RemoteObject*/ ,_t); - BA.debugLineNum = 61;BA.debugLine="If NeedToCreateNewLabel Then"; -Debug.JustUpdateDeviceLine(); -if (_needtocreatenewlabel.get().booleanValue()) { - BA.debugLineNum = 62;BA.debugLine="parent.RemoveAllViews"; -Debug.JustUpdateDeviceLine(); -_parent.runVoidMethod ("RemoveAllViews"); - BA.debugLineNum = 63;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"\")"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_p = __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("")));Debug.locals.put("p", _p);Debug.locals.put("p", _p); - BA.debugLineNum = 64;BA.debugLine="parent.AddView(p, 0, 0, parent.Width, parent.Hei"; -Debug.JustUpdateDeviceLine(); -_parent.runVoidMethod ("AddView",(Object)((_p.getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(_parent.runMethod(true,"getWidth")),(Object)(_parent.runMethod(true,"getHeight"))); - BA.debugLineNum = 65;BA.debugLine="Dim lbl As Label"; -Debug.JustUpdateDeviceLine(); -_lbl = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("lbl", _lbl); - BA.debugLineNum = 66;BA.debugLine="lbl.Initialize(\"\")"; -Debug.JustUpdateDeviceLine(); -_lbl.runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable(""))); - BA.debugLineNum = 68;BA.debugLine="lbl.SingleLine = True"; -Debug.JustUpdateDeviceLine(); -_lbl.runVoidMethod ("setSingleLine",scrollinglabel.__c.getField(true,"True")); - BA.debugLineNum = 69;BA.debugLine="lbl.Padding = Array As Int(0, 0, 0, 0)"; -Debug.JustUpdateDeviceLine(); -_lbl.runMethod(false,"setPadding",RemoteObject.createNewArray("int",new int[] {4},new Object[] {BA.numberCast(int.class, 0),BA.numberCast(int.class, 0),BA.numberCast(int.class, 0),BA.numberCast(int.class, 0)})); - BA.debugLineNum = 71;BA.debugLine="Dim xlbl As B4XView = lbl"; -Debug.JustUpdateDeviceLine(); -_xlbl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_xlbl = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), _lbl.getObject());Debug.locals.put("xlbl", _xlbl);Debug.locals.put("xlbl", _xlbl); - BA.debugLineNum = 72;BA.debugLine="xlbl.SetTextAlignment(\"CENTER\", \"LEFT\")"; -Debug.JustUpdateDeviceLine(); -_xlbl.runVoidMethod ("SetTextAlignment",(Object)(BA.ObjectToString("CENTER")),(Object)(RemoteObject.createImmutable("LEFT"))); - BA.debugLineNum = 73;BA.debugLine="xlbl.Font = fnt"; -Debug.JustUpdateDeviceLine(); -_xlbl.runMethod(false,"setFont",__ref.getField(false,"_fnt" /*RemoteObject*/ )); - BA.debugLineNum = 75;BA.debugLine="p.AddView(xlbl, 0, 0, mBase.Width, mBase.Height)"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("AddView",(Object)((_xlbl.getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"))); - }; - BA.debugLineNum = 77;BA.debugLine="xlbl.TextColor = mTextColor"; -Debug.JustUpdateDeviceLine(); -_xlbl.runMethod(true,"setTextColor",__ref.getField(true,"_mtextcolor" /*RemoteObject*/ )); - BA.debugLineNum = 78;BA.debugLine="If originalTextWidth <= mBase.Width Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("k",_originaltextwidth,BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth")))) { - BA.debugLineNum = 79;BA.debugLine="xlbl.Text = t"; -Debug.JustUpdateDeviceLine(); -_xlbl.runMethod(true,"setText",BA.ObjectToCharSequence(_t)); - BA.debugLineNum = 80;BA.debugLine="p.Tag = \"static\""; -Debug.JustUpdateDeviceLine(); -_p.runMethod(false,"setTag",RemoteObject.createImmutable(("static"))); - BA.debugLineNum = 81;BA.debugLine="StopScrolling"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.scrollinglabel.class, "_stopscrolling" /*RemoteObject*/ ); - }else { - BA.debugLineNum = 83;BA.debugLine="p.Tag = \"\""; -Debug.JustUpdateDeviceLine(); -_p.runMethod(false,"setTag",RemoteObject.createImmutable((""))); - BA.debugLineNum = 84;BA.debugLine="Dim duplicateText As String = t & \" \" & t"; -Debug.JustUpdateDeviceLine(); -_duplicatetext = RemoteObject.concat(_t,RemoteObject.createImmutable(" "),_t);Debug.locals.put("duplicateText", _duplicatetext);Debug.locals.put("duplicateText", _duplicatetext); - BA.debugLineNum = 85;BA.debugLine="Dim Width As Float = MeasureTextWidth(duplicateT"; -Debug.JustUpdateDeviceLine(); -_width = __ref.runClassMethod (keymon.lat.medicomed.scrollinglabel.class, "_measuretextwidth" /*RemoteObject*/ ,(Object)(_duplicatetext),(Object)(__ref.getField(false,"_fnt" /*RemoteObject*/ )));Debug.locals.put("Width", _width);Debug.locals.put("Width", _width); - BA.debugLineNum = 86;BA.debugLine="p.Width = Width"; -Debug.JustUpdateDeviceLine(); -_p.runMethod(true,"setWidth",BA.numberCast(int.class, _width)); - BA.debugLineNum = 87;BA.debugLine="xlbl.Width = Width"; -Debug.JustUpdateDeviceLine(); -_xlbl.runMethod(true,"setWidth",BA.numberCast(int.class, _width)); - BA.debugLineNum = 88;BA.debugLine="xlbl.Text = duplicateText"; -Debug.JustUpdateDeviceLine(); -_xlbl.runMethod(true,"setText",BA.ObjectToCharSequence(_duplicatetext)); - BA.debugLineNum = 89;BA.debugLine="StartScrolling (p, originalTextWidth)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.scrollinglabel.class, "_startscrolling" /*void*/ ,(Object)(_p),(Object)(_originaltextwidth)); - }; - BA.debugLineNum = 91;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _settextcolor(RemoteObject __ref,RemoteObject _c) throws Exception{ -try { - Debug.PushSubsStack("setTextColor (scrollinglabel) ","scrollinglabel",60,__ref.getField(false, "ba"),__ref,121); -if (RapidSub.canDelegate("settextcolor")) { return __ref.runUserSub(false, "scrollinglabel","settextcolor", __ref, _c);} -Debug.locals.put("c", _c); - BA.debugLineNum = 121;BA.debugLine="Public Sub setTextColor(c As Int)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 122;BA.debugLine="mTextColor = c"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mtextcolor" /*RemoteObject*/ ,_c); - BA.debugLineNum = 123;BA.debugLine="setText(mText)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.scrollinglabel.class, "_settext" /*RemoteObject*/ ,(Object)(__ref.getField(true,"_mtext" /*RemoteObject*/ ))); - BA.debugLineNum = 124;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _startscrolling(RemoteObject __ref,RemoteObject _p,RemoteObject _originalwidth) throws Exception{ -try { - Debug.PushSubsStack("StartScrolling (scrollinglabel) ","scrollinglabel",60,__ref.getField(false, "ba"),__ref,101); -if (RapidSub.canDelegate("startscrolling")) { __ref.runUserSub(false, "scrollinglabel","startscrolling", __ref, _p, _originalwidth); return;} -ResumableSub_StartScrolling rsub = new ResumableSub_StartScrolling(null,__ref,_p,_originalwidth); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_StartScrolling extends BA.ResumableSub { -public ResumableSub_StartScrolling(keymon.lat.medicomed.scrollinglabel parent,RemoteObject __ref,RemoteObject _p,RemoteObject _originalwidth) { -this.parent = parent; -this.__ref = __ref; -this._p = _p; -this._originalwidth = _originalwidth; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -RemoteObject __ref; -keymon.lat.medicomed.scrollinglabel parent; -RemoteObject _p; -RemoteObject _originalwidth; -RemoteObject _myindex = RemoteObject.createImmutable(0); -RemoteObject _duration = RemoteObject.createImmutable(0); - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("StartScrolling (scrollinglabel) ","scrollinglabel",60,__ref.getField(false, "ba"),__ref,101); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -Debug.locals.put("_ref", __ref); -Debug.locals.put("p", _p); -Debug.locals.put("OriginalWidth", _originalwidth); - BA.debugLineNum = 102;BA.debugLine="taskIndex = taskIndex + 1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_taskindex" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_taskindex" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "+",1, 1)); - BA.debugLineNum = 103;BA.debugLine="Dim myIndex As Int = taskIndex"; -Debug.JustUpdateDeviceLine(); -_myindex = __ref.getField(true,"_taskindex" /*RemoteObject*/ );Debug.locals.put("myIndex", _myindex);Debug.locals.put("myIndex", _myindex); - BA.debugLineNum = 104;BA.debugLine="Dim duration As Int = p.Width / WidthPerSecond *"; -Debug.JustUpdateDeviceLine(); -_duration = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_p.runMethod(true,"getWidth"),__ref.getField(true,"_widthpersecond" /*RemoteObject*/ ),RemoteObject.createImmutable(1000)}, "/*",0, 0));Debug.locals.put("duration", _duration);Debug.locals.put("duration", _duration); - BA.debugLineNum = 105;BA.debugLine="Sleep(StartPositionDelay)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "scrollinglabel", "startscrolling"),__ref.getField(true,"_startpositiondelay" /*RemoteObject*/ )); -this.state = 23; -return; -case 23: -//C -this.state = 1; -; - BA.debugLineNum = 106;BA.debugLine="If myIndex <> taskIndex Then Return"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 1: -//if -this.state = 6; -if (RemoteObject.solveBoolean("!",_myindex,BA.numberCast(double.class, __ref.getField(true,"_taskindex" /*RemoteObject*/ )))) { -this.state = 3; -;}if (true) break; - -case 3: -//C -this.state = 6; -if (true) return ; -if (true) break; - -case 6: -//C -this.state = 7; -; - BA.debugLineNum = 107;BA.debugLine="Do While True"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 7: -//do while -this.state = 22; -while (parent.__c.getField(true,"True").get().booleanValue()) { -this.state = 9; -if (true) break; -} -if (true) break; - -case 9: -//C -this.state = 10; - BA.debugLineNum = 108;BA.debugLine="p.SetLayoutAnimated(duration, -(p.Width - Origin"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("SetLayoutAnimated",(Object)(_duration),(Object)(BA.numberCast(int.class, -(RemoteObject.solve(new RemoteObject[] {_p.runMethod(true,"getWidth"),_originalwidth}, "-",1, 0)).get().doubleValue())),(Object)(_p.runMethod(true,"getTop")),(Object)(_p.runMethod(true,"getWidth")),(Object)(_p.runMethod(true,"getHeight"))); - BA.debugLineNum = 109;BA.debugLine="Sleep(duration)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "scrollinglabel", "startscrolling"),_duration); -this.state = 24; -return; -case 24: -//C -this.state = 10; -; - BA.debugLineNum = 110;BA.debugLine="If myIndex <> taskIndex Then Return"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 10: -//if -this.state = 15; -if (RemoteObject.solveBoolean("!",_myindex,BA.numberCast(double.class, __ref.getField(true,"_taskindex" /*RemoteObject*/ )))) { -this.state = 12; -;}if (true) break; - -case 12: -//C -this.state = 15; -if (true) return ; -if (true) break; - -case 15: -//C -this.state = 16; -; - BA.debugLineNum = 111;BA.debugLine="Sleep(StartPositionDelay)"; -Debug.JustUpdateDeviceLine(); -parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "scrollinglabel", "startscrolling"),__ref.getField(true,"_startpositiondelay" /*RemoteObject*/ )); -this.state = 25; -return; -case 25: -//C -this.state = 16; -; - BA.debugLineNum = 112;BA.debugLine="If myIndex <> taskIndex Then Return"; -Debug.JustUpdateDeviceLine(); -if (true) break; - -case 16: -//if -this.state = 21; -if (RemoteObject.solveBoolean("!",_myindex,BA.numberCast(double.class, __ref.getField(true,"_taskindex" /*RemoteObject*/ )))) { -this.state = 18; -;}if (true) break; - -case 18: -//C -this.state = 21; -if (true) return ; -if (true) break; - -case 21: -//C -this.state = 7; -; - BA.debugLineNum = 113;BA.debugLine="p.SetLayoutAnimated(0, 0, p.Top, p.Width, p.Heig"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(_p.runMethod(true,"getTop")),(Object)(_p.runMethod(true,"getWidth")),(Object)(_p.runMethod(true,"getHeight"))); - if (true) break; - -case 22: -//C -this.state = -1; -; - BA.debugLineNum = 115;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _stopscrolling(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("StopScrolling (scrollinglabel) ","scrollinglabel",60,__ref.getField(false, "ba"),__ref,97); -if (RapidSub.canDelegate("stopscrolling")) { return __ref.runUserSub(false, "scrollinglabel","stopscrolling", __ref);} - BA.debugLineNum = 97;BA.debugLine="Private Sub StopScrolling"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 98;BA.debugLine="taskIndex = taskIndex + 1"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_taskindex" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_taskindex" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "+",1, 1)); - BA.debugLineNum = 99;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/starter.java b/B4A/Objects/shell/src/keymon/lat/medicomed/starter.java deleted file mode 100644 index 72da8bc..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/starter.java +++ /dev/null @@ -1,84 +0,0 @@ - -package keymon.lat.medicomed; - -import java.io.IOException; -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RDebug; -import anywheresoftware.b4a.pc.RemoteObject; -import anywheresoftware.b4a.pc.RDebug.IRemote; -import anywheresoftware.b4a.pc.Debug; -import anywheresoftware.b4a.pc.B4XTypes.B4XClass; -import anywheresoftware.b4a.pc.B4XTypes.DeviceClass; - -public class starter implements IRemote{ - public static starter mostCurrent; - public static RemoteObject processBA; - public static boolean processGlobalsRun; - public static RemoteObject myClass; - public static RemoteObject remoteMe; - public starter() { - mostCurrent = this; - } - public RemoteObject getRemoteMe() { - return remoteMe; - } - -public boolean isSingleton() { - return true; - } - static { - anywheresoftware.b4a.pc.RapidSub.moduleToObject.put(new B4XClass("starter"), "keymon.lat.medicomed.starter"); - } - public static RemoteObject getObject() { - return myClass; - } - public RemoteObject _service; - private PCBA pcBA; - - public PCBA create(Object[] args) throws ClassNotFoundException{ - processBA = (RemoteObject) args[1]; - _service = (RemoteObject) args[2]; - remoteMe = RemoteObject.declareNull("keymon.lat.medicomed.starter"); - anywheresoftware.b4a.keywords.Common.Density = (Float)args[3]; - pcBA = new PCBA(this, starter.class); - main_subs_0.initializeProcessGlobals(); - return pcBA; - }public static RemoteObject runMethod(boolean notUsed, String method, Object... args) throws Exception{ - return (RemoteObject) mostCurrent.pcBA.raiseEvent(method.substring(1), args); - } - public static void runVoidMethod(String method, Object... args) throws Exception{ - runMethod(false, method, args); - } -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _gps = RemoteObject.declareNull("anywheresoftware.b4a.gps.GPS"); -public static RemoteObject _ph = RemoteObject.declareNull("anywheresoftware.b4a.phone.Phone"); -public static RemoteObject _rp = RemoteObject.declareNull("anywheresoftware.b4a.objects.RuntimePermissions"); -public static RemoteObject _flp = RemoteObject.declareNull("uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper"); -public static RemoteObject _reqmanager = RemoteObject.declareNull("keymon.lat.medicomed.dbrequestmanager"); -public static RemoteObject _enventa = RemoteObject.createImmutable(false); -public static RemoteObject _server = RemoteObject.createImmutable(""); -public static RemoteObject _timer1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.Timer"); -public static RemoteObject _interval = RemoteObject.createImmutable(0); -public static RemoteObject _ruta = RemoteObject.createImmutable(""); -public static RemoteObject _logs = RemoteObject.declareNull("anywheresoftware.b4a.keywords.StringBuilderWrapper"); -public static RemoteObject _logcat = RemoteObject.declareNull("anywheresoftware.b4a.phone.Phone.LogCat"); -public static RemoteObject _dia_semana = RemoteObject.createImmutable(""); -public static RemoteObject _logger = RemoteObject.createImmutable(false); -public static RemoteObject _marcacel = RemoteObject.createImmutable(""); -public static RemoteObject _muestraprogreso = RemoteObject.createImmutable(""); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; - public Object[] GetGlobals() { - return new Object[] {"appUpdater",Debug.moduleToString(keymon.lat.medicomed.appupdater.class),"B4XCollections",Debug.moduleToString(keymon.lat.medicomed.b4xcollections.class),"B4XPages",Debug.moduleToString(keymon.lat.medicomed.b4xpages.class),"DateUtils",starter.mostCurrent._dateutils,"dia_semana",starter._dia_semana,"enVenta",starter._enventa,"FLP",starter._flp,"gps",starter._gps,"HttpUtils2Service",Debug.moduleToString(keymon.lat.medicomed.httputils2service.class),"Interval",starter._interval,"logcat",starter._logcat,"logger",starter._logger,"logs",starter._logs,"Main",Debug.moduleToString(keymon.lat.medicomed.main.class),"MAPA_RUTAS",Debug.moduleToString(keymon.lat.medicomed.mapa_rutas.class),"marcaCel",starter._marcacel,"muestraProgreso",starter._muestraprogreso,"newinst2",Debug.moduleToString(keymon.lat.medicomed.newinst2.class),"ph",starter._ph,"reqManager",starter._reqmanager,"rp",starter._rp,"ruta",starter._ruta,"server",starter._server,"Service",starter.mostCurrent._service,"Subs",Debug.moduleToString(keymon.lat.medicomed.subs.class),"Timer1",starter._timer1,"Tracker",Debug.moduleToString(keymon.lat.medicomed.tracker.class),"XUIViewsUtils",Debug.moduleToString(keymon.lat.medicomed.xuiviewsutils.class)}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/starter_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/starter_subs_0.java deleted file mode 100644 index 516300f..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/starter_subs_0.java +++ /dev/null @@ -1,404 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class starter_subs_0 { - - -public static RemoteObject _application_error(RemoteObject _error,RemoteObject _stacktrace) throws Exception{ -try { - Debug.PushSubsStack("Application_Error (starter) ","starter",2,starter.processBA,starter.mostCurrent,111); -if (RapidSub.canDelegate("application_error")) { return keymon.lat.medicomed.starter.remoteMe.runUserSub(false, "starter","application_error", _error, _stacktrace);} -RemoteObject _jo = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _l = RemoteObject.createImmutable(0L); -Debug.locals.put("Error", _error); -Debug.locals.put("StackTrace", _stacktrace); - BA.debugLineNum = 111;BA.debugLine="Sub Application_Error (Error As Exception, StackTr"; -Debug.ShouldStop(16384); - BA.debugLineNum = 113;BA.debugLine="Dim jo As JavaObject"; -Debug.ShouldStop(65536); -_jo = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject");Debug.locals.put("jo", _jo); - BA.debugLineNum = 114;BA.debugLine="Dim l As Long = 500: jo.InitializeStatic(\"java.la"; -Debug.ShouldStop(131072); -_l = BA.numberCast(long.class, 500);Debug.locals.put("l", _l);Debug.locals.put("l", _l); - BA.debugLineNum = 114;BA.debugLine="Dim l As Long = 500: jo.InitializeStatic(\"java.la"; -Debug.ShouldStop(131072); -_jo.runMethod(false,"InitializeStatic",(Object)(RemoteObject.createImmutable("java.lang.Thread"))).runVoidMethod ("RunMethod",(Object)(BA.ObjectToString("sleep")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(_l)}))); - BA.debugLineNum = 115;BA.debugLine="logcat.LogCatStop"; -Debug.ShouldStop(262144); -starter._logcat.runVoidMethod ("LogCatStop"); - BA.debugLineNum = 116;BA.debugLine="logs.Append(StackTrace)"; -Debug.ShouldStop(524288); -starter._logs.runVoidMethod ("Append",(Object)(_stacktrace)); - BA.debugLineNum = 117;BA.debugLine="Subs.revisaBD"; -Debug.ShouldStop(1048576); -starter.mostCurrent._subs.runVoidMethod ("_revisabd" /*RemoteObject*/ ,starter.processBA); - BA.debugLineNum = 118;BA.debugLine="Subs.errorLog.ExecNonQuery2(\"INSERT INTO errores("; -Debug.ShouldStop(2097152); -starter.mostCurrent._subs._errorlog /*RemoteObject*/ .runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO errores(fecha, error) VALUES (?,?)")),(Object)(starter.mostCurrent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(starter.mostCurrent._subs.runMethod(true,"_fechakmt" /*RemoteObject*/ ,starter.processBA,(Object)(BA.NumberToString(starter.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getNow"))))),(starter._logs.getObject())}))))); - BA.debugLineNum = 119;BA.debugLine="Return True"; -Debug.ShouldStop(4194304); -if (true) return starter.mostCurrent.__c.getField(true,"True"); - BA.debugLineNum = 120;BA.debugLine="End Sub"; -Debug.ShouldStop(8388608); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _envia_ultima_gps() throws Exception{ -try { - Debug.PushSubsStack("ENVIA_ULTIMA_GPS (starter) ","starter",2,starter.processBA,starter.mostCurrent,73); -if (RapidSub.canDelegate("envia_ultima_gps")) { return keymon.lat.medicomed.starter.remoteMe.runUserSub(false, "starter","envia_ultima_gps");} -RemoteObject _skmt = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL"); -RemoteObject _cmd = RemoteObject.declareNull("keymon.lat.medicomed.dbrequestmanager._dbcommand"); - BA.debugLineNum = 73;BA.debugLine="Sub ENVIA_ULTIMA_GPS"; -Debug.ShouldStop(256); - BA.debugLineNum = 74;BA.debugLine="If IsConnectedToInternet Or 1 = 1 Then"; -Debug.ShouldStop(512); -if (RemoteObject.solveBoolean(".",_isconnectedtointernet()) || RemoteObject.solveBoolean("=",RemoteObject.createImmutable(1),BA.numberCast(double.class, 1))) { - BA.debugLineNum = 75;BA.debugLine="Dim logger As Boolean = True"; -Debug.ShouldStop(1024); -starter._logger = starter.mostCurrent.__c.getField(true,"True"); - BA.debugLineNum = 77;BA.debugLine="Dim skmt As SQL"; -Debug.ShouldStop(4096); -_skmt = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL");Debug.locals.put("skmt", _skmt); - BA.debugLineNum = 78;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(8192); -_cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");Debug.locals.put("cmd", _cmd); - BA.debugLineNum = 79;BA.debugLine="skmt.Initialize(ruta,\"kmt.db\", False)"; -Debug.ShouldStop(16384); -_skmt.runVoidMethod ("Initialize",(Object)(starter._ruta),(Object)(BA.ObjectToString("kmt.db")),(Object)(starter.mostCurrent.__c.getField(true,"False"))); - BA.debugLineNum = 83;BA.debugLine="Dim cmd As DBCommand"; -Debug.ShouldStop(262144); -_cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");Debug.locals.put("cmd", _cmd); - BA.debugLineNum = 84;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(524288); -_cmd.runVoidMethod ("Initialize"); - BA.debugLineNum = 85;BA.debugLine="cmd.Name = \"UPDATE_MEDI_ACTUAL2_GPS\""; -Debug.ShouldStop(1048576); -_cmd.setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("UPDATE_MEDI_ACTUAL2_GPS")); - BA.debugLineNum = 86;BA.debugLine="If B4XPages.MainPage.lat_gps.Length < 15 Then B4"; -Debug.ShouldStop(2097152); -if (RemoteObject.solveBoolean("<",starter.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,starter.processBA).getField(true,"_lat_gps" /*RemoteObject*/ ).runMethod(true,"length"),BA.numberCast(double.class, 15))) { -starter.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,starter.processBA).setField ("_lat_gps" /*RemoteObject*/ ,RemoteObject.concat(starter.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,starter.processBA).getField(true,"_lat_gps" /*RemoteObject*/ ),RemoteObject.createImmutable("0")));}; - BA.debugLineNum = 88;BA.debugLine="cmd.Parameters = Array As Object(B4XPages.MainPa"; -Debug.ShouldStop(8388608); -_cmd.setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {12},new Object[] {(starter.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,starter.processBA).getField(true,"_montoactual" /*RemoteObject*/ )),(starter.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,starter.processBA).getField(true,"_clientestotal" /*RemoteObject*/ )),(starter.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,starter.processBA).getField(true,"_clientesventa" /*RemoteObject*/ )),(starter.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,starter.processBA).getField(true,"_clientesvisitados" /*RemoteObject*/ )),(starter.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,starter.processBA).getField(true,"_lat_gps" /*RemoteObject*/ )),(starter.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,starter.processBA).getField(true,"_lon_gps" /*RemoteObject*/ )),(starter.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,starter.processBA).getField(true,"_batt" /*RemoteObject*/ )),RemoteObject.createImmutable((0)),RemoteObject.createImmutable((0)),RemoteObject.createImmutable((0)),(starter.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,starter.processBA).getField(true,"_almacen" /*RemoteObject*/ )),(starter.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,starter.processBA).getField(true,"_rutapreventa" /*RemoteObject*/ ))})); - BA.debugLineNum = 90;BA.debugLine="reqManager.ExecuteCommand(cmd, \"inst_visitas\")"; -Debug.ShouldStop(33554432); -starter._reqmanager.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(_cmd),(Object)((RemoteObject.createImmutable("inst_visitas")))); - BA.debugLineNum = 91;BA.debugLine="skmt.ExecNonQuery2(\"Update cat_variables set CAT"; -Debug.ShouldStop(67108864); -_skmt.runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("Update cat_variables set CAT_VA_VALOR = ? WHERE CAT_VA_DESCRIPCION = ?")),(Object)(starter.mostCurrent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("String",new int[] {2},new Object[] {starter.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(starter.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getNow"))),RemoteObject.createImmutable("HoraIngreso")}))))); - BA.debugLineNum = 93;BA.debugLine="Timer1.Enabled = False"; -Debug.ShouldStop(268435456); -starter._timer1.runMethod(true,"setEnabled",starter.mostCurrent.__c.getField(true,"False")); - BA.debugLineNum = 94;BA.debugLine="Timer1.Interval = Interval * 1000"; -Debug.ShouldStop(536870912); -starter._timer1.runMethod(true,"setInterval",BA.numberCast(long.class, RemoteObject.solve(new RemoteObject[] {starter._interval,RemoteObject.createImmutable(1000)}, "*",0, 1))); - BA.debugLineNum = 95;BA.debugLine="Timer1.Enabled = True"; -Debug.ShouldStop(1073741824); -starter._timer1.runMethod(true,"setEnabled",starter.mostCurrent.__c.getField(true,"True")); - }else { - BA.debugLineNum = 97;BA.debugLine="Log(\"Sin conexión a internet, no se envió UTR!\")"; -Debug.ShouldStop(1); -starter.mostCurrent.__c.runVoidMethod ("LogImpl","32621464",RemoteObject.createImmutable("Sin conexión a internet, no se envió UTR!"),0); - }; - BA.debugLineNum = 100;BA.debugLine="End Sub"; -Debug.ShouldStop(8); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _gps_locationchanged(RemoteObject _location1) throws Exception{ -try { - Debug.PushSubsStack("GPS_LocationChanged (starter) ","starter",2,starter.processBA,starter.mostCurrent,61); -if (RapidSub.canDelegate("gps_locationchanged")) { return keymon.lat.medicomed.starter.remoteMe.runUserSub(false, "starter","gps_locationchanged", _location1);} -Debug.locals.put("Location1", _location1); - BA.debugLineNum = 61;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; -Debug.ShouldStop(268435456); - BA.debugLineNum = 63;BA.debugLine="End Sub"; -Debug.ShouldStop(1073741824); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _isconnectedtointernet() throws Exception{ -try { - Debug.PushSubsStack("IsConnectedToInternet (starter) ","starter",2,starter.processBA,starter.mostCurrent,143); -if (RapidSub.canDelegate("isconnectedtointernet")) { return keymon.lat.medicomed.starter.remoteMe.runUserSub(false, "starter","isconnectedtointernet");} -RemoteObject _r = RemoteObject.declareNull("anywheresoftware.b4a.agraham.reflection.Reflection"); - BA.debugLineNum = 143;BA.debugLine="Sub IsConnectedToInternet As Boolean 'ignore"; -Debug.ShouldStop(16384); - BA.debugLineNum = 144;BA.debugLine="Dim r As Reflector"; -Debug.ShouldStop(32768); -_r = RemoteObject.createNew ("anywheresoftware.b4a.agraham.reflection.Reflection");Debug.locals.put("r", _r); - BA.debugLineNum = 145;BA.debugLine="r.Target = r.GetContext"; -Debug.ShouldStop(65536); -_r.setField ("Target",(_r.runMethod(false,"GetContext",starter.processBA))); - BA.debugLineNum = 146;BA.debugLine="r.Target = r.RunMethod2(\"getSystemService\", \"conn"; -Debug.ShouldStop(131072); -_r.setField ("Target",_r.runMethod(false,"RunMethod2",(Object)(BA.ObjectToString("getSystemService")),(Object)(BA.ObjectToString("connectivity")),(Object)(RemoteObject.createImmutable("java.lang.String")))); - BA.debugLineNum = 147;BA.debugLine="r.Target = r.RunMethod(\"getActiveNetworkInfo\")"; -Debug.ShouldStop(262144); -_r.setField ("Target",_r.runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("getActiveNetworkInfo")))); - BA.debugLineNum = 148;BA.debugLine="If r.Target <> Null Then"; -Debug.ShouldStop(524288); -if (RemoteObject.solveBoolean("N",_r.getField(false,"Target"))) { - BA.debugLineNum = 149;BA.debugLine="Return r.RunMethod(\"isConnectedOrConnecting\")"; -Debug.ShouldStop(1048576); -if (true) return BA.ObjectToBoolean(_r.runMethod(false,"RunMethod",(Object)(RemoteObject.createImmutable("isConnectedOrConnecting")))); - }; - BA.debugLineNum = 151;BA.debugLine="Return False"; -Debug.ShouldStop(4194304); -if (true) return starter.mostCurrent.__c.getField(true,"False"); - BA.debugLineNum = 152;BA.debugLine="End Sub"; -Debug.ShouldStop(8388608); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _jobdone(RemoteObject _job) throws Exception{ -try { - Debug.PushSubsStack("JobDone (starter) ","starter",2,starter.processBA,starter.mostCurrent,128); -if (RapidSub.canDelegate("jobdone")) { return keymon.lat.medicomed.starter.remoteMe.runUserSub(false, "starter","jobdone", _job);} -Debug.locals.put("Job", _job); - BA.debugLineNum = 128;BA.debugLine="Sub JobDone(Job As HttpJob)"; -Debug.ShouldStop(-2147483648); - BA.debugLineNum = 132;BA.debugLine="If Job.Success = False Then"; -Debug.ShouldStop(8); -if (RemoteObject.solveBoolean("=",_job.getField(true,"_success" /*RemoteObject*/ ),starter.mostCurrent.__c.getField(true,"False"))) { - BA.debugLineNum = 134;BA.debugLine="If Job.ErrorMessage.Contains(\"failed to connect\""; -Debug.ShouldStop(32); -if (RemoteObject.solveBoolean(".",_job.getField(true,"_errormessage" /*RemoteObject*/ ).runMethod(true,"contains",(Object)(RemoteObject.createImmutable("failed to connect")))) || RemoteObject.solveBoolean(".",_job.getField(true,"_errormessage" /*RemoteObject*/ ).runMethod(true,"contains",(Object)(RemoteObject.createImmutable("Failed to connect"))))) { - BA.debugLineNum = 135;BA.debugLine="ToastMessageShow(\"¡Hubo un error contactando al"; -Debug.ShouldStop(64); -starter.mostCurrent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("¡Hubo un error contactando al servidor, por favor revise su conexión!")),(Object)(starter.mostCurrent.__c.getField(true,"True"))); - }; - }else { - }; - BA.debugLineNum = 141;BA.debugLine="End Sub"; -Debug.ShouldStop(4096); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _logcat_logcatdata(RemoteObject _buffer,RemoteObject _length) throws Exception{ -try { - Debug.PushSubsStack("logcat_LogCatData (starter) ","starter",2,starter.processBA,starter.mostCurrent,103); -if (RapidSub.canDelegate("logcat_logcatdata")) { return keymon.lat.medicomed.starter.remoteMe.runUserSub(false, "starter","logcat_logcatdata", _buffer, _length);} -Debug.locals.put("Buffer", _buffer); -Debug.locals.put("Length", _length); - BA.debugLineNum = 103;BA.debugLine="Private Sub logcat_LogCatData (Buffer() As Byte, L"; -Debug.ShouldStop(64); - BA.debugLineNum = 104;BA.debugLine="logs.Append(BytesToString(Buffer, 0, Length, \"utf"; -Debug.ShouldStop(128); -starter._logs.runVoidMethod ("Append",(Object)(starter.mostCurrent.__c.runMethod(true,"BytesToString",(Object)(_buffer),(Object)(BA.numberCast(int.class, 0)),(Object)(_length),(Object)(RemoteObject.createImmutable("utf8"))))); - BA.debugLineNum = 105;BA.debugLine="If logs.Length > 4000 Then"; -Debug.ShouldStop(256); -if (RemoteObject.solveBoolean(">",starter._logs.runMethod(true,"getLength"),BA.numberCast(double.class, 4000))) { - BA.debugLineNum = 106;BA.debugLine="logs.Remove(0, logs.Length - 2000) 'Obtenemos lo"; -Debug.ShouldStop(512); -starter._logs.runVoidMethod ("Remove",(Object)(BA.numberCast(int.class, 0)),(Object)(RemoteObject.solve(new RemoteObject[] {starter._logs.runMethod(true,"getLength"),RemoteObject.createImmutable(2000)}, "-",1, 1))); - }; - BA.debugLineNum = 108;BA.debugLine="End Sub"; -Debug.ShouldStop(2048); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _process_globals() throws Exception{ - //BA.debugLineNum = 6;BA.debugLine="Sub Process_Globals"; - //BA.debugLineNum = 9;BA.debugLine="Public gps As GPS"; -starter._gps = RemoteObject.createNew ("anywheresoftware.b4a.gps.GPS"); - //BA.debugLineNum = 10;BA.debugLine="Dim ph As Phone"; -starter._ph = RemoteObject.createNew ("anywheresoftware.b4a.phone.Phone"); - //BA.debugLineNum = 11;BA.debugLine="Public rp As RuntimePermissions"; -starter._rp = RemoteObject.createNew ("anywheresoftware.b4a.objects.RuntimePermissions"); - //BA.debugLineNum = 12;BA.debugLine="Public FLP As FusedLocationProvider"; -starter._flp = RemoteObject.createNew ("uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper"); - //BA.debugLineNum = 13;BA.debugLine="Dim reqManager As DBRequestManager"; -starter._reqmanager = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager"); - //BA.debugLineNum = 14;BA.debugLine="Dim enVenta As Boolean = False"; -starter._enventa = starter.mostCurrent.__c.getField(true,"False"); - //BA.debugLineNum = 16;BA.debugLine="Dim reqManager As DBRequestManager"; -starter._reqmanager = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager"); - //BA.debugLineNum = 17;BA.debugLine="Dim server As String = \"http://187.189.244.154:17"; -starter._server = BA.ObjectToString("http://187.189.244.154:1781"); - //BA.debugLineNum = 21;BA.debugLine="Dim Timer1 As Timer"; -starter._timer1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.Timer"); - //BA.debugLineNum = 22;BA.debugLine="Dim Interval As Int = 300"; -starter._interval = BA.numberCast(int.class, 300); - //BA.debugLineNum = 23;BA.debugLine="Dim ruta As String = File.DirInternal"; -starter._ruta = starter.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirInternal"); - //BA.debugLineNum = 25;BA.debugLine="Private logs As StringBuilder"; -starter._logs = RemoteObject.createNew ("anywheresoftware.b4a.keywords.StringBuilderWrapper"); - //BA.debugLineNum = 26;BA.debugLine="Private logcat As LogCat"; -starter._logcat = RemoteObject.createNew ("anywheresoftware.b4a.phone.Phone.LogCat"); - //BA.debugLineNum = 27;BA.debugLine="Dim dia_semana As String = \"\""; -starter._dia_semana = BA.ObjectToString(""); - //BA.debugLineNum = 28;BA.debugLine="Dim logger As Boolean = True"; -starter._logger = starter.mostCurrent.__c.getField(true,"True"); - //BA.debugLineNum = 29;BA.debugLine="Dim marcaCel As String = ph.manufacturer"; -starter._marcacel = starter._ph.runMethod(true,"getManufacturer"); - //BA.debugLineNum = 30;BA.debugLine="Public rp As RuntimePermissions"; -starter._rp = RemoteObject.createNew ("anywheresoftware.b4a.objects.RuntimePermissions"); - //BA.debugLineNum = 31;BA.debugLine="Dim muestraProgreso = 0"; -starter._muestraprogreso = BA.NumberToString(0); - //BA.debugLineNum = 32;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _reinicializareqmanager() throws Exception{ -try { - Debug.PushSubsStack("reinicializaReqManager (starter) ","starter",2,starter.processBA,starter.mostCurrent,122); -if (RapidSub.canDelegate("reinicializareqmanager")) { return keymon.lat.medicomed.starter.remoteMe.runUserSub(false, "starter","reinicializareqmanager");} - BA.debugLineNum = 122;BA.debugLine="Sub reinicializaReqManager"; -Debug.ShouldStop(33554432); - BA.debugLineNum = 123;BA.debugLine="reqManager.Initialize(Me, server)"; -Debug.ShouldStop(67108864); -starter._reqmanager.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_initialize" /*RemoteObject*/ ,starter.processBA,(Object)(starter.getObject()),(Object)(starter._server)); - BA.debugLineNum = 125;BA.debugLine="If logger Then Log(server)"; -Debug.ShouldStop(268435456); -if (starter._logger.get().booleanValue()) { -starter.mostCurrent.__c.runVoidMethod ("LogImpl","32818051",starter._server,0);}; - BA.debugLineNum = 126;BA.debugLine="End Sub"; -Debug.ShouldStop(536870912); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _service_create() throws Exception{ -try { - Debug.PushSubsStack("Service_Create (starter) ","starter",2,starter.processBA,starter.mostCurrent,34); -if (RapidSub.canDelegate("service_create")) { return keymon.lat.medicomed.starter.remoteMe.runUserSub(false, "starter","service_create");} - BA.debugLineNum = 34;BA.debugLine="Sub Service_Create"; -Debug.ShouldStop(2); - BA.debugLineNum = 37;BA.debugLine="gps.Initialize(\"GPS\")"; -Debug.ShouldStop(16); -starter._gps.runVoidMethod ("Initialize",(Object)(RemoteObject.createImmutable("GPS"))); - BA.debugLineNum = 39;BA.debugLine="Timer1.Initialize(\"Timer1\", Interval * 1000)"; -Debug.ShouldStop(64); -starter._timer1.runVoidMethod ("Initialize",starter.processBA,(Object)(BA.ObjectToString("Timer1")),(Object)(BA.numberCast(long.class, RemoteObject.solve(new RemoteObject[] {starter._interval,RemoteObject.createImmutable(1000)}, "*",0, 1)))); - BA.debugLineNum = 40;BA.debugLine="Timer1.Enabled = True"; -Debug.ShouldStop(128); -starter._timer1.runMethod(true,"setEnabled",starter.mostCurrent.__c.getField(true,"True")); - BA.debugLineNum = 45;BA.debugLine="logs.Initialize"; -Debug.ShouldStop(4096); -starter._logs.runVoidMethod ("Initialize"); - BA.debugLineNum = 47;BA.debugLine="End Sub"; -Debug.ShouldStop(16384); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _service_destroy() throws Exception{ -try { - Debug.PushSubsStack("Service_Destroy (starter) ","starter",2,starter.processBA,starter.mostCurrent,69); -if (RapidSub.canDelegate("service_destroy")) { return keymon.lat.medicomed.starter.remoteMe.runUserSub(false, "starter","service_destroy");} - BA.debugLineNum = 69;BA.debugLine="Sub Service_Destroy"; -Debug.ShouldStop(16); - BA.debugLineNum = 71;BA.debugLine="End Sub"; -Debug.ShouldStop(64); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _service_start(RemoteObject _startingintent) throws Exception{ -try { - Debug.PushSubsStack("Service_Start (starter) ","starter",2,starter.processBA,starter.mostCurrent,49); -if (RapidSub.canDelegate("service_start")) { return keymon.lat.medicomed.starter.remoteMe.runUserSub(false, "starter","service_start", _startingintent);} -Debug.locals.put("StartingIntent", _startingintent); - BA.debugLineNum = 49;BA.debugLine="Sub Service_Start (StartingIntent As Intent)"; -Debug.ShouldStop(65536); - BA.debugLineNum = 50;BA.debugLine="Service.StopAutomaticForeground 'Starter service"; -Debug.ShouldStop(131072); -starter.mostCurrent._service.runVoidMethod ("StopAutomaticForeground"); - BA.debugLineNum = 51;BA.debugLine="Subs.revisaBD"; -Debug.ShouldStop(262144); -starter.mostCurrent._subs.runVoidMethod ("_revisabd" /*RemoteObject*/ ,starter.processBA); - BA.debugLineNum = 53;BA.debugLine="reqManager.Initialize(Me, server)"; -Debug.ShouldStop(1048576); -starter._reqmanager.runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_initialize" /*RemoteObject*/ ,starter.processBA,(Object)(starter.getObject()),(Object)(starter._server)); - BA.debugLineNum = 54;BA.debugLine="End Sub"; -Debug.ShouldStop(2097152); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _service_taskremoved() throws Exception{ -try { - Debug.PushSubsStack("Service_TaskRemoved (starter) ","starter",2,starter.processBA,starter.mostCurrent,65); -if (RapidSub.canDelegate("service_taskremoved")) { return keymon.lat.medicomed.starter.remoteMe.runUserSub(false, "starter","service_taskremoved");} - BA.debugLineNum = 65;BA.debugLine="Sub Service_TaskRemoved"; -Debug.ShouldStop(1); - BA.debugLineNum = 67;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _timer1_tick() throws Exception{ -try { - Debug.PushSubsStack("Timer1_Tick (starter) ","starter",2,starter.processBA,starter.mostCurrent,56); -if (RapidSub.canDelegate("timer1_tick")) { return keymon.lat.medicomed.starter.remoteMe.runUserSub(false, "starter","timer1_tick");} - BA.debugLineNum = 56;BA.debugLine="Private Sub Timer1_Tick"; -Debug.ShouldStop(8388608); - BA.debugLineNum = 58;BA.debugLine="ENVIA_ULTIMA_GPS"; -Debug.ShouldStop(33554432); -_envia_ultima_gps(); - BA.debugLineNum = 59;BA.debugLine="End Sub"; -Debug.ShouldStop(67108864); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/subs.java b/B4A/Objects/shell/src/keymon/lat/medicomed/subs.java deleted file mode 100644 index 4218840..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/subs.java +++ /dev/null @@ -1,72 +0,0 @@ - -package keymon.lat.medicomed; - -import java.io.IOException; -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RDebug; -import anywheresoftware.b4a.pc.RemoteObject; -import anywheresoftware.b4a.pc.RDebug.IRemote; -import anywheresoftware.b4a.pc.Debug; -import anywheresoftware.b4a.pc.B4XTypes.B4XClass; -import anywheresoftware.b4a.pc.B4XTypes.DeviceClass; - -public class subs implements IRemote{ - public static subs mostCurrent; - public static RemoteObject processBA; - public static boolean processGlobalsRun; - public static RemoteObject myClass; - public static RemoteObject remoteMe; - public subs() { - mostCurrent = this; - } - public RemoteObject getRemoteMe() { - return remoteMe; - } - -public boolean isSingleton() { - return true; - } - private static PCBA pcBA = new PCBA(null, subs.class); - static { - mostCurrent = new subs(); - remoteMe = RemoteObject.declareNull("keymon.lat.medicomed.subs"); - anywheresoftware.b4a.pc.RapidSub.moduleToObject.put(new B4XClass("subs"), "keymon.lat.medicomed.subs"); - RDebug.INSTANCE.eventTargets.put(new DeviceClass("keymon.lat.medicomed.subs"), new java.lang.ref.WeakReference (pcBA)); - } - - public static RemoteObject runMethod(boolean notUsed, String method, Object... args) throws Exception{ - return (RemoteObject) pcBA.raiseEvent(method.substring(1), args); - } - public static void runVoidMethod(String method, Object... args) throws Exception{ - runMethod(false, method, args); - } - public PCBA create(Object[] args) throws ClassNotFoundException{ - throw new RuntimeException("CREATE is not supported."); - } -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _gzip = RemoteObject.declareNull("de.donmanfred.GZipStringswrapper"); -public static RemoteObject _su = RemoteObject.declareNull("anywheresoftware.b4a.objects.StringUtils"); -public static RemoteObject _phn = RemoteObject.declareNull("anywheresoftware.b4a.phone.Phone"); -public static RemoteObject _devmodel = RemoteObject.createImmutable(""); -public static RemoteObject _kmt = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL"); -public static RemoteObject _errorlog = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL"); -public static RemoteObject _ssid = RemoteObject.createImmutable(""); -public static RemoteObject _rutamaxpoints = RemoteObject.createImmutable(0); -public static RemoteObject _rutahrsatras = RemoteObject.createImmutable(0); -public static RemoteObject _subslogs = RemoteObject.createImmutable(false); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; - public Object[] GetGlobals() { - return new Object[] {"appUpdater",Debug.moduleToString(keymon.lat.medicomed.appupdater.class),"B4XCollections",Debug.moduleToString(keymon.lat.medicomed.b4xcollections.class),"B4XPages",Debug.moduleToString(keymon.lat.medicomed.b4xpages.class),"DateUtils",subs.mostCurrent._dateutils,"devModel",subs._devmodel,"errorLog",subs._errorlog,"GZip",subs._gzip,"HttpUtils2Service",Debug.moduleToString(keymon.lat.medicomed.httputils2service.class),"kmt",subs._kmt,"Main",Debug.moduleToString(keymon.lat.medicomed.main.class),"MAPA_RUTAS",Debug.moduleToString(keymon.lat.medicomed.mapa_rutas.class),"newinst2",Debug.moduleToString(keymon.lat.medicomed.newinst2.class),"phn",subs._phn,"rutaHrsAtras",subs._rutahrsatras,"rutaMaxPoints",subs._rutamaxpoints,"ssid",subs._ssid,"Starter",Debug.moduleToString(keymon.lat.medicomed.starter.class),"su",subs._su,"subsLogs",subs._subslogs,"Tracker",Debug.moduleToString(keymon.lat.medicomed.tracker.class),"XUIViewsUtils",Debug.moduleToString(keymon.lat.medicomed.xuiviewsutils.class)}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/subs_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/subs_subs_0.java deleted file mode 100644 index 9c6c04a..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/subs_subs_0.java +++ /dev/null @@ -1,4248 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class subs_subs_0 { - - -public static RemoteObject _actualizaproducto(RemoteObject _ba,RemoteObject _cedis,RemoteObject _costou,RemoteObject _cant,RemoteObject _nombre,RemoteObject _prodid,RemoteObject _clienteid,RemoteObject _fecha,RemoteObject _usuario,RemoteObject _rutav,RemoteObject _preciosin,RemoteObject _tipoventa) throws Exception{ -try { - Debug.PushSubsStack("actualizaProducto (subs) ","subs",9,_ba,subs.mostCurrent,791); -if (RapidSub.canDelegate("actualizaproducto")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","actualizaproducto", _ba, _cedis, _costou, _cant, _nombre, _prodid, _clienteid, _fecha, _usuario, _rutav, _preciosin, _tipoventa);} -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -RemoteObject _antcant = RemoteObject.createImmutable(0); -RemoteObject _difcant = RemoteObject.createImmutable(0); -RemoteObject _pe = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -; -Debug.locals.put("cedis", _cedis); -Debug.locals.put("costoU", _costou); -Debug.locals.put("cant", _cant); -Debug.locals.put("nombre", _nombre); -Debug.locals.put("prodId", _prodid); -Debug.locals.put("clienteId", _clienteid); -Debug.locals.put("fecha", _fecha); -Debug.locals.put("usuario", _usuario); -Debug.locals.put("rutaV", _rutav); -Debug.locals.put("precioSin", _preciosin); -Debug.locals.put("tipoVenta", _tipoventa); - BA.debugLineNum = 791;BA.debugLine="Sub actualizaProducto(cedis As String, costoU As S"; -Debug.ShouldStop(4194304); - BA.debugLineNum = 792;BA.debugLine="Private c As Cursor=B4XPages.MainPage.skmt.ExecQu"; -Debug.ShouldStop(8388608); -_c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("select * from pedido where pe_cedis = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_cedis))),RemoteObject.createImmutable("' and pe_proid = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_prodid))),RemoteObject.createImmutable("' and pe_cliente = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_clienteid))),RemoteObject.createImmutable("'"))))));Debug.locals.put("c", _c);Debug.locals.put("c", _c); - BA.debugLineNum = 793;BA.debugLine="If c.RowCount > 0 Then"; -Debug.ShouldStop(16777216); -if (RemoteObject.solveBoolean(">",_c.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 794;BA.debugLine="c.Position=0"; -Debug.ShouldStop(33554432); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 795;BA.debugLine="Private antCant As Int = 0"; -Debug.ShouldStop(67108864); -_antcant = BA.numberCast(int.class, 0);Debug.locals.put("antCant", _antcant);Debug.locals.put("antCant", _antcant); - BA.debugLineNum = 796;BA.debugLine="If IsNumber(c.GetInt(\"PE_CANT\")) Then antCant=c."; -Debug.ShouldStop(134217728); -if (subs.mostCurrent.__c.runMethod(true,"IsNumber",(Object)(BA.NumberToString(_c.runMethod(true,"GetInt",(Object)(RemoteObject.createImmutable("PE_CANT")))))).get().booleanValue()) { -_antcant = _c.runMethod(true,"GetInt",(Object)(RemoteObject.createImmutable("PE_CANT")));Debug.locals.put("antCant", _antcant);}; - BA.debugLineNum = 797;BA.debugLine="Private difCant As Int = cant - antCant"; -Debug.ShouldStop(268435456); -_difcant = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, _cant),_antcant}, "-",1, 0));Debug.locals.put("difCant", _difcant);Debug.locals.put("difCant", _difcant); - BA.debugLineNum = 798;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"update ped"; -Debug.ShouldStop(536870912); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("update pedido set pe_cant = "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_cant))),RemoteObject.createImmutable(", pe_costo_tot = "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)(((RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, _cant),BA.numberCast(double.class, _c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_COSTOU"))))}, "*",0, 0))))),RemoteObject.createImmutable(" where pe_cedis = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_cedis))),RemoteObject.createImmutable("' and pe_proid = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_prodid))),RemoteObject.createImmutable("' and pe_cliente = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_clienteid))),RemoteObject.createImmutable("' "))))); - BA.debugLineNum = 799;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"update cat"; -Debug.ShouldStop(1073741824); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ("),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_difcant))),RemoteObject.createImmutable(") where cat_gp_id = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_prodid))),RemoteObject.createImmutable("' "))))); - BA.debugLineNum = 800;BA.debugLine="If cant = 0 Then"; -Debug.ShouldStop(-2147483648); -if (RemoteObject.solveBoolean("=",_cant,BA.NumberToString(0))) { - BA.debugLineNum = 802;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"delete fr"; -Debug.ShouldStop(2); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("delete from pedido where pe_cedis = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_cedis))),RemoteObject.createImmutable("' and pe_proid = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_prodid))),RemoteObject.createImmutable("' and pe_cliente = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_clienteid))),RemoteObject.createImmutable("' "))))); - BA.debugLineNum = 803;BA.debugLine="Private pe As Cursor = B4XPages.MainPage.skmt.E"; -Debug.ShouldStop(4); -_pe = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -_pe = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select count(pe_cliente) as cuantosPedidos from pedido where pe_cliente In (select cuenta from cuentaa)"))));Debug.locals.put("pe", _pe);Debug.locals.put("pe", _pe); - BA.debugLineNum = 804;BA.debugLine="pe.Position=0"; -Debug.ShouldStop(8); -_pe.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 805;BA.debugLine="If pe.GetString(\"cuantosPedidos\") = 0 Then B4XP"; -Debug.ShouldStop(16); -if (RemoteObject.solveBoolean("=",_pe.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("cuantosPedidos"))),BA.NumberToString(0))) { -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)")));}; - }; - }else { - BA.debugLineNum = 809;BA.debugLine="guardaProductoSinGestion(cedis, costoU, cant, no"; -Debug.ShouldStop(256); -_guardaproductosingestion(_ba,_cedis,_costou,_cant,_nombre,_prodid,_clienteid,_fecha,_usuario,_rutav,_preciosin,_tipoventa); - }; - BA.debugLineNum = 811;BA.debugLine="c.Close"; -Debug.ShouldStop(1024); -_c.runVoidMethod ("Close"); - BA.debugLineNum = 812;BA.debugLine="End Sub"; -Debug.ShouldStop(2048); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _actualizatet(RemoteObject _ba,RemoteObject _cliente) throws Exception{ -try { - Debug.PushSubsStack("actualizaTET (subs) ","subs",9,_ba,subs.mostCurrent,1208); -if (RapidSub.canDelegate("actualizatet")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","actualizatet", _ba, _cliente);} -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -RemoteObject _total = RemoteObject.createImmutable(0L); -int _i = 0; -RemoteObject _subtotal = RemoteObject.createImmutable(0L); -; -Debug.locals.put("cliente", _cliente); - BA.debugLineNum = 1208;BA.debugLine="Sub actualizaTET(cliente As String)"; -Debug.ShouldStop(8388608); - BA.debugLineNum = 1209;BA.debugLine="Dim c As Cursor = B4XPages.MainPage.skmt.Execquer"; -Debug.ShouldStop(16777216); -_c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select * from PEDIDO_INICIO_FINAL where PIF_CLIENTE = ?")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {_cliente}))));Debug.locals.put("c", _c);Debug.locals.put("c", _c); - BA.debugLineNum = 1210;BA.debugLine="Dim total As Long = 0"; -Debug.ShouldStop(33554432); -_total = BA.numberCast(long.class, 0);Debug.locals.put("total", _total);Debug.locals.put("total", _total); - BA.debugLineNum = 1211;BA.debugLine="If c.RowCount > 0 Then"; -Debug.ShouldStop(67108864); -if (RemoteObject.solveBoolean(">",_c.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 1212;BA.debugLine="c.Position=0"; -Debug.ShouldStop(134217728); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 1213;BA.debugLine="For i = 0 To c.RowCount-1"; -Debug.ShouldStop(268435456); -{ -final int step5 = 1; -final int limit5 = RemoteObject.solve(new RemoteObject[] {_c.runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step5 > 0 && _i <= limit5) || (step5 < 0 && _i >= limit5) ;_i = ((int)(0 + _i + step5)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 1214;BA.debugLine="c.Position=i"; -Debug.ShouldStop(536870912); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 1216;BA.debugLine="Dim subtotal As Long = c.GetString(\"PIF_HORA_FI"; -Debug.ShouldStop(-2147483648); -_subtotal = BA.numberCast(long.class, RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, _c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PIF_HORA_FINAL")))),BA.numberCast(double.class, _c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PIF_HORA_INICIO"))))}, "-",1, 0));Debug.locals.put("subtotal", _subtotal);Debug.locals.put("subtotal", _subtotal); - BA.debugLineNum = 1217;BA.debugLine="total = total + subtotal"; -Debug.ShouldStop(1); -_total = RemoteObject.solve(new RemoteObject[] {_total,_subtotal}, "+",1, 2);Debug.locals.put("total", _total); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 1221;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update PED"; -Debug.ShouldStop(16); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("update PEDIDO_CLIENTE set PC_TIEMPO_TIENDA = ? where PC_CLIENTE = ?")),(Object)(subs.mostCurrent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("String",new int[] {2},new Object[] {BA.NumberToString((RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {_total,RemoteObject.createImmutable(1000)}, "/",0, 0)),RemoteObject.createImmutable(60)}, "/",0, 0))),_cliente}))))); - }; - BA.debugLineNum = 1223;BA.debugLine="End Sub"; -Debug.ShouldStop(64); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _agregacolumna(RemoteObject _ba,RemoteObject _tabla,RemoteObject _columna,RemoteObject _tipo) throws Exception{ -try { - Debug.PushSubsStack("agregaColumna (subs) ","subs",9,_ba,subs.mostCurrent,1422); -if (RapidSub.canDelegate("agregacolumna")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","agregacolumna", _ba, _tabla, _columna, _tipo);} -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -; -Debug.locals.put("tabla", _tabla); -Debug.locals.put("columna", _columna); -Debug.locals.put("tipo", _tipo); - BA.debugLineNum = 1422;BA.debugLine="Sub agregaColumna(tabla As String, columna As Stri"; -Debug.ShouldStop(8192); - BA.debugLineNum = 1423;BA.debugLine="Try 'Intentamos usar \"pragma_table_info\" para rev"; -Debug.ShouldStop(16384); -try { BA.debugLineNum = 1424;BA.debugLine="Private c As Cursor = B4XPages.MainPage.skmt.Exe"; -Debug.ShouldStop(32768); -_c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("SELECT COUNT(*) AS fCol FROM pragma_table_info('"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_tabla))),RemoteObject.createImmutable("') WHERE name='"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_columna))),RemoteObject.createImmutable("'"))))));Debug.locals.put("c", _c);Debug.locals.put("c", _c); - BA.debugLineNum = 1425;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(65536); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 1426;BA.debugLine="If c.GetString(\"fCol\") = 0 Then 'Si no esta la c"; -Debug.ShouldStop(131072); -if (RemoteObject.solveBoolean("=",_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("fCol"))),BA.NumberToString(0))) { - BA.debugLineNum = 1427;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"ALTER TAB"; -Debug.ShouldStop(262144); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("ALTER TABLE "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_tabla))),RemoteObject.createImmutable(" ADD COLUMN "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_columna))),RemoteObject.createImmutable(" "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_tipo))),RemoteObject.createImmutable(""))))); - BA.debugLineNum = 1428;BA.debugLine="Log($\"Columna \"${columna} ${tipo}\", agregada a"; -Debug.ShouldStop(524288); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","315269894",(RemoteObject.concat(RemoteObject.createImmutable("Columna \""),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_columna))),RemoteObject.createImmutable(" "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_tipo))),RemoteObject.createImmutable("\", agregada a \""),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_tabla))),RemoteObject.createImmutable("\"."))),0); - }; - BA.debugLineNum = 1430;BA.debugLine="Log(1)"; -Debug.ShouldStop(2097152); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","315269896",BA.NumberToString(1),0); - Debug.CheckDeviceExceptions(); -} - catch (Exception e10) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e10.toString()); BA.debugLineNum = 1432;BA.debugLine="Try"; -Debug.ShouldStop(8388608); -try { BA.debugLineNum = 1433;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"ALTER TAB"; -Debug.ShouldStop(16777216); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("ALTER TABLE "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_tabla))),RemoteObject.createImmutable(" ADD COLUMN "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_columna))),RemoteObject.createImmutable(" "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_tipo))),RemoteObject.createImmutable(""))))); - BA.debugLineNum = 1434;BA.debugLine="Log($\"Columna \"${columna} ${tipo}\", agregada a"; -Debug.ShouldStop(33554432); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","315269900",(RemoteObject.concat(RemoteObject.createImmutable("Columna \""),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_columna))),RemoteObject.createImmutable(" "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_tipo))),RemoteObject.createImmutable("\", agregada a \""),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_tabla))),RemoteObject.createImmutable("\".."))),0); - Debug.CheckDeviceExceptions(); -} - catch (Exception e14) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e14.toString()); BA.debugLineNum = 1436;BA.debugLine="Log(LastException)"; -Debug.ShouldStop(134217728); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","315269902",BA.ObjectToString(subs.mostCurrent.__c.runMethod(false,"LastException",_ba)),0); - }; - BA.debugLineNum = 1438;BA.debugLine="Log(2)"; -Debug.ShouldStop(536870912); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","315269904",BA.NumberToString(2),0); - }; - BA.debugLineNum = 1440;BA.debugLine="End Sub"; -Debug.ShouldStop(-2147483648); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _alcanzanlosvariablesparapromo(RemoteObject _ba,RemoteObject _promomap,RemoteObject _inventariosinfijos) throws Exception{ -try { - Debug.PushSubsStack("alcanzanLosVariablesParaPromo (subs) ","subs",9,_ba,subs.mostCurrent,943); -if (RapidSub.canDelegate("alcanzanlosvariablesparapromo")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","alcanzanlosvariablesparapromo", _ba, _promomap, _inventariosinfijos);} -RemoteObject _thislog = RemoteObject.createImmutable(false); -RemoteObject _totalprodsvariables = RemoteObject.createImmutable(0); -RemoteObject _prodsvariables = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -int _p = 0; -RemoteObject _t = RemoteObject.createImmutable(""); -RemoteObject _p2 = RemoteObject.createImmutable(""); -RemoteObject _res = RemoteObject.createImmutable(false); -; -Debug.locals.put("promoMap", _promomap); -Debug.locals.put("inventarioSinFijos", _inventariosinfijos); - BA.debugLineNum = 943;BA.debugLine="Sub alcanzanLosVariablesParaPromo(promoMap As Map,"; -Debug.ShouldStop(16384); - BA.debugLineNum = 944;BA.debugLine="Private thisLog As Boolean = False 'Si es verdade"; -Debug.ShouldStop(32768); -_thislog = subs.mostCurrent.__c.getField(true,"False");Debug.locals.put("thisLog", _thislog);Debug.locals.put("thisLog", _thislog); - BA.debugLineNum = 945;BA.debugLine="If thisLog Then LogColor(\"Inventario inicial: \"&i"; -Debug.ShouldStop(65536); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","313893634",RemoteObject.concat(RemoteObject.createImmutable("Inventario inicial: "),_inventariosinfijos),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Gray"));}; - BA.debugLineNum = 946;BA.debugLine="Private totalProdsVariables As Int = 0"; -Debug.ShouldStop(131072); -_totalprodsvariables = BA.numberCast(int.class, 0);Debug.locals.put("totalProdsVariables", _totalprodsvariables);Debug.locals.put("totalProdsVariables", _totalprodsvariables); - BA.debugLineNum = 948;BA.debugLine="Private prodsVariables As List = promoMap.get(\"pr"; -Debug.ShouldStop(524288); -_prodsvariables = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); -_prodsvariables = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), _promomap.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsVariables")))));Debug.locals.put("prodsVariables", _prodsvariables);Debug.locals.put("prodsVariables", _prodsvariables); - BA.debugLineNum = 949;BA.debugLine="For p = 0 To prodsVariables.Size - 1"; -Debug.ShouldStop(1048576); -{ -final int step5 = 1; -final int limit5 = RemoteObject.solve(new RemoteObject[] {_prodsvariables.runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_p = 0 ; -for (;(step5 > 0 && _p <= limit5) || (step5 < 0 && _p >= limit5) ;_p = ((int)(0 + _p + step5)) ) { -Debug.locals.put("p", _p); - BA.debugLineNum = 950;BA.debugLine="Private t As String = prodsVariables.Get(p) 'Obt"; -Debug.ShouldStop(2097152); -_t = BA.ObjectToString(_prodsvariables.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _p))));Debug.locals.put("t", _t);Debug.locals.put("t", _t); - BA.debugLineNum = 951;BA.debugLine="If inventarioSinFijos.ContainsKey(t) Then 'Si ex"; -Debug.ShouldStop(4194304); -if (_inventariosinfijos.runMethod(true,"ContainsKey",(Object)((_t))).get().booleanValue()) { - BA.debugLineNum = 952;BA.debugLine="Private p2 As String = inventarioSinFijos.Get(t"; -Debug.ShouldStop(8388608); -_p2 = BA.ObjectToString(_inventariosinfijos.runMethod(false,"Get",(Object)((_t))));Debug.locals.put("p2", _p2);Debug.locals.put("p2", _p2); - BA.debugLineNum = 953;BA.debugLine="totalProdsVariables = totalProdsVariables + p2"; -Debug.ShouldStop(16777216); -_totalprodsvariables = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_totalprodsvariables,BA.numberCast(double.class, _p2)}, "+",1, 0));Debug.locals.put("totalProdsVariables", _totalprodsvariables); - BA.debugLineNum = 954;BA.debugLine="If thisLog Then Log($\"prod ${t}, hay: ${p2}\"$)"; -Debug.ShouldStop(33554432); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","313893643",(RemoteObject.concat(RemoteObject.createImmutable("prod "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_t))),RemoteObject.createImmutable(", hay: "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_p2))),RemoteObject.createImmutable(""))),0);}; - }; - } -}Debug.locals.put("p", _p); -; - BA.debugLineNum = 957;BA.debugLine="If thisLog Then Log(\"Total prods variables=\" & to"; -Debug.ShouldStop(268435456); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","313893646",RemoteObject.concat(RemoteObject.createImmutable("Total prods variables="),_totalprodsvariables,RemoteObject.createImmutable(", requeridos="),_promomap.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsVariablesRequeridos"))))),0);}; - BA.debugLineNum = 958;BA.debugLine="Private res As Boolean = False"; -Debug.ShouldStop(536870912); -_res = subs.mostCurrent.__c.getField(true,"False");Debug.locals.put("res", _res);Debug.locals.put("res", _res); - BA.debugLineNum = 959;BA.debugLine="If totalProdsVariables >= promoMap.Get(\"prodsVari"; -Debug.ShouldStop(1073741824); -if (RemoteObject.solveBoolean("g",_totalprodsvariables,BA.numberCast(double.class, _promomap.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsVariablesRequeridos"))))))) { -_res = subs.mostCurrent.__c.getField(true,"True");Debug.locals.put("res", _res);}; - BA.debugLineNum = 960;BA.debugLine="Return res"; -Debug.ShouldStop(-2147483648); -if (true) return _res; - BA.debugLineNum = 961;BA.debugLine="End Sub"; -Debug.ShouldStop(1); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _bitacora(RemoteObject _ba,RemoteObject _fechab,RemoteObject _usuariob,RemoteObject _almacenb,RemoteObject _rutab,RemoteObject _eventob,RemoteObject _clienteb,RemoteObject _iniciob,RemoteObject _finb,RemoteObject _latitudb,RemoteObject _longitudb,RemoteObject _precision,RemoteObject _motivonoventa,RemoteObject _motivonovisita) throws Exception{ -try { - Debug.PushSubsStack("bitacora (subs) ","subs",9,_ba,subs.mostCurrent,1280); -if (RapidSub.canDelegate("bitacora")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","bitacora", _ba, _fechab, _usuariob, _almacenb, _rutab, _eventob, _clienteb, _iniciob, _finb, _latitudb, _longitudb, _precision, _motivonoventa, _motivonovisita);} -RemoteObject _cmd = RemoteObject.declareNull("keymon.lat.medicomed.dbrequestmanager._dbcommand"); -RemoteObject _nombrecliente = RemoteObject.createImmutable(""); -RemoteObject _e = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -; -Debug.locals.put("fechab", _fechab); -Debug.locals.put("usuariob", _usuariob); -Debug.locals.put("almacenb", _almacenb); -Debug.locals.put("rutab", _rutab); -Debug.locals.put("eventob", _eventob); -Debug.locals.put("clienteb", _clienteb); -Debug.locals.put("iniciob", _iniciob); -Debug.locals.put("finb", _finb); -Debug.locals.put("latitudb", _latitudb); -Debug.locals.put("longitudb", _longitudb); -Debug.locals.put("precision", _precision); -Debug.locals.put("motivonoventa", _motivonoventa); -Debug.locals.put("motivonovisita", _motivonovisita); - BA.debugLineNum = 1280;BA.debugLine="Sub bitacora(fechab As String, usuariob As String,"; -Debug.ShouldStop(-2147483648); - BA.debugLineNum = 1281;BA.debugLine="Log(motivonovisita)"; -Debug.ShouldStop(1); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314876673",_motivonovisita,0); - BA.debugLineNum = 1282;BA.debugLine="Log(\"bitacora\")"; -Debug.ShouldStop(2); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314876674",RemoteObject.createImmutable("bitacora"),0); - BA.debugLineNum = 1283;BA.debugLine="Log(eventob)"; -Debug.ShouldStop(4); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314876675",_eventob,0); - BA.debugLineNum = 1284;BA.debugLine="Private cmd As DBCommand"; -Debug.ShouldStop(8); -_cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");Debug.locals.put("cmd", _cmd); - BA.debugLineNum = 1285;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(16); -_cmd.runVoidMethod ("Initialize"); - BA.debugLineNum = 1286;BA.debugLine="cmd.Name = \"mandaBitacora_MEDICOMED\""; -Debug.ShouldStop(32); -_cmd.setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("mandaBitacora_MEDICOMED")); - BA.debugLineNum = 1287;BA.debugLine="Log(\"BITACORA3\")"; -Debug.ShouldStop(64); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314876679",RemoteObject.createImmutable("BITACORA3"),0); - BA.debugLineNum = 1288;BA.debugLine="Private nombreCliente As String = traeNombreClien"; -Debug.ShouldStop(128); -_nombrecliente = _traenombrecliente(_ba,_clienteb);Debug.locals.put("nombreCliente", _nombrecliente);Debug.locals.put("nombreCliente", _nombrecliente); - BA.debugLineNum = 1289;BA.debugLine="If eventob = \"Llega a almacen\" Then"; -Debug.ShouldStop(256); -if (RemoteObject.solveBoolean("=",_eventob,BA.ObjectToString("Llega a almacen"))) { - BA.debugLineNum = 1290;BA.debugLine="nombreCliente = \"BOLETA\""; -Debug.ShouldStop(512); -_nombrecliente = BA.ObjectToString("BOLETA");Debug.locals.put("nombreCliente", _nombrecliente); - BA.debugLineNum = 1291;BA.debugLine="clienteb = \"\""; -Debug.ShouldStop(1024); -_clienteb = BA.ObjectToString("");Debug.locals.put("clienteb", _clienteb); - BA.debugLineNum = 1292;BA.debugLine="finb = iniciob"; -Debug.ShouldStop(2048); -_finb = _iniciob;Debug.locals.put("finb", _finb); - }; - BA.debugLineNum = 1294;BA.debugLine="If eventob = \"Salida almacen\" Then nombreCliente"; -Debug.ShouldStop(8192); -if (RemoteObject.solveBoolean("=",_eventob,BA.ObjectToString("Salida almacen"))) { -_nombrecliente = BA.ObjectToString("CHECKLIST");Debug.locals.put("nombreCliente", _nombrecliente);}; - BA.debugLineNum = 1295;BA.debugLine="If eventob = \"Fin Día\" Then nombreCliente = \"FIN"; -Debug.ShouldStop(16384); -if (RemoteObject.solveBoolean("=",_eventob,BA.ObjectToString("Fin Día"))) { -_nombrecliente = BA.ObjectToString("FIN DIA");Debug.locals.put("nombreCliente", _nombrecliente);}; - BA.debugLineNum = 1296;BA.debugLine="If eventob = \"Carga día\" Then nombreCliente = \"CA"; -Debug.ShouldStop(32768); -if (RemoteObject.solveBoolean("=",_eventob,BA.ObjectToString("Carga día"))) { -_nombrecliente = BA.ObjectToString("CARGA DIA");Debug.locals.put("nombreCliente", _nombrecliente);}; - BA.debugLineNum = 1297;BA.debugLine="If eventob <> \"Termina Venta\" And eventob <> \"No"; -Debug.ShouldStop(65536); -if (RemoteObject.solveBoolean("!",_eventob,BA.ObjectToString("Termina Venta")) && RemoteObject.solveBoolean("!",_eventob,BA.ObjectToString("No Venta"))) { - BA.debugLineNum = 1298;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"INSERT INT"; -Debug.ShouldStop(131072); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("INSERT INTO BITACORAGPS (fechab, usuariob , almacenb , rutab , eventob , clienteb , iniciob , finb , latitudb, longitudb , precision , motivonoventa , motivonovisita) VALUES ('"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_fechab))),RemoteObject.createImmutable("' ,'"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_usuariob))),RemoteObject.createImmutable("' , '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_almacenb))),RemoteObject.createImmutable("' , '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_rutab))),RemoteObject.createImmutable("' , '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_eventob))),RemoteObject.createImmutable("' , '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_clienteb))),RemoteObject.createImmutable("' , '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_iniciob))),RemoteObject.createImmutable("' , '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_finb))),RemoteObject.createImmutable("' , '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_latitudb))),RemoteObject.createImmutable("' , '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_longitudb))),RemoteObject.createImmutable("' , '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_precision))),RemoteObject.createImmutable("' , '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_motivonoventa))),RemoteObject.createImmutable("' , '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_motivonovisita))),RemoteObject.createImmutable("')"))))); - BA.debugLineNum = 1299;BA.debugLine="Log($\"'${almacenb}', '${usuariob}', '${rutab}',"; -Debug.ShouldStop(262144); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314876691",(RemoteObject.concat(RemoteObject.createImmutable("'"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_almacenb))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_usuariob))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_rutab))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_eventob))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_clienteb))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_nombrecliente))),RemoteObject.createImmutable("','"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_iniciob))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_finb))),RemoteObject.createImmutable("','"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_latitudb))),RemoteObject.createImmutable("','"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_longitudb))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_precision))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_motivonoventa))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_motivonovisita))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_fechab))),RemoteObject.createImmutable("'"))),0); - }else { - BA.debugLineNum = 1304;BA.debugLine="Private e As Cursor = B4XPages.MainPage.skmt.Exe"; -Debug.ShouldStop(8388608); -_e = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -_e = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("select fechab from BITACORAGPS where usuariob = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_usuariob))),RemoteObject.createImmutable("' and almacenb = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_almacenb))),RemoteObject.createImmutable("' and rutab = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_rutab))),RemoteObject.createImmutable("' and clienteb = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_clienteb))),RemoteObject.createImmutable("' and eventob = 'Inicia Venta' order by fechab desc"))))));Debug.locals.put("e", _e);Debug.locals.put("e", _e); - BA.debugLineNum = 1306;BA.debugLine="If e.RowCount > 0 Then"; -Debug.ShouldStop(33554432); -if (RemoteObject.solveBoolean(">",_e.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 1307;BA.debugLine="e.Position = 0"; -Debug.ShouldStop(67108864); -_e.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 1308;BA.debugLine="Log(\"ACTUALIZA BITACORA\")"; -Debug.ShouldStop(134217728); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314876700",RemoteObject.createImmutable("ACTUALIZA BITACORA"),0); - BA.debugLineNum = 1309;BA.debugLine="If eventob = \"Termina Venta\" Then"; -Debug.ShouldStop(268435456); -if (RemoteObject.solveBoolean("=",_eventob,BA.ObjectToString("Termina Venta"))) { - BA.debugLineNum = 1310;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"update B"; -Debug.ShouldStop(536870912); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("update BITACORAGPS set finb = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_finb))),RemoteObject.createImmutable("' where rutab = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_rutab))),RemoteObject.createImmutable("' and almacenb = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_almacenb))),RemoteObject.createImmutable("' and usuariob = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_usuariob))),RemoteObject.createImmutable("' and clienteb = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_clienteb))),RemoteObject.createImmutable("' and fechab = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_e.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("fechab")))))),RemoteObject.createImmutable("' "))))); - BA.debugLineNum = 1313;BA.debugLine="cmd.Parameters = Array As Object(finb, rutab,"; -Debug.ShouldStop(1); -_cmd.setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {7},new Object[] {(_finb),(_rutab),(_almacenb),(_usuariob),(_clienteb),RemoteObject.createImmutable(("Inicia Venta")),(_e.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("fechab"))))})); - }else -{ BA.debugLineNum = 1316;BA.debugLine="else if eventob = \"No Venta\" Then"; -Debug.ShouldStop(8); -if (RemoteObject.solveBoolean("=",_eventob,BA.ObjectToString("No Venta"))) { - BA.debugLineNum = 1317;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"update B"; -Debug.ShouldStop(16); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("update BITACORAGPS set finb = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_finb))),RemoteObject.createImmutable("', motivonoventa = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_motivonoventa))),RemoteObject.createImmutable("', motivonovisita = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_motivonovisita))),RemoteObject.createImmutable("' where rutab = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_rutab))),RemoteObject.createImmutable("' and almacenb = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_almacenb))),RemoteObject.createImmutable("' and usuariob = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_usuariob))),RemoteObject.createImmutable("' and clienteb = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_clienteb))),RemoteObject.createImmutable("' and fechab = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_e.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("fechab")))))),RemoteObject.createImmutable("' "))))); - BA.debugLineNum = 1320;BA.debugLine="cmd.Parameters = Array As Object(finb, motivon"; -Debug.ShouldStop(128); -_cmd.setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {9},new Object[] {(_finb),(_motivonoventa),(_motivonovisita),(_rutab),(_almacenb),(_usuariob),(_clienteb),RemoteObject.createImmutable(("Inicia Venta")),(_e.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("fechab"))))})); - }} -; - }; - }; - BA.debugLineNum = 1326;BA.debugLine="If eventob <> \"Inicia Venta\" Then"; -Debug.ShouldStop(8192); -if (RemoteObject.solveBoolean("!",_eventob,BA.ObjectToString("Inicia Venta"))) { - BA.debugLineNum = 1327;BA.debugLine="Private c As Cursor = B4XPages.MainPage.skmt.Exe"; -Debug.ShouldStop(16384); -_c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("select * from BITACORAGPS where usuariob = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_usuariob))),RemoteObject.createImmutable("' and almacenb = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_almacenb))),RemoteObject.createImmutable("' and rutab = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_rutab))),RemoteObject.createImmutable("' and clienteb = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_clienteb))),RemoteObject.createImmutable("' order by fechab desc"))))));Debug.locals.put("c", _c);Debug.locals.put("c", _c); - BA.debugLineNum = 1328;BA.debugLine="If c.RowCount > 0 Then"; -Debug.ShouldStop(32768); -if (RemoteObject.solveBoolean(">",_c.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 1329;BA.debugLine="Log(c.RowCount)"; -Debug.ShouldStop(65536); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314876721",BA.NumberToString(_c.runMethod(true,"getRowCount")),0); - BA.debugLineNum = 1330;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(131072); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 1331;BA.debugLine="cmd.Parameters = Array As Object(c.GetString(\"a"; -Debug.ShouldStop(262144); -_cmd.setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {14},new Object[] {(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("almacenb")))),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("usuariob")))),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("rutab")))),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("eventob")))),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("clienteb")))),(_nombrecliente),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("iniciob")))),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("finb")))),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("latitudb")))),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("longitudb")))),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("precision")))),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("motivonoventa")))),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("motivonovisita")))),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("fechab"))))})); - BA.debugLineNum = 1332;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cmd"; -Debug.ShouldStop(524288); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(_cmd),(Object)((RemoteObject.createImmutable("mandaBitacora")))); - }; - }; - BA.debugLineNum = 1335;BA.debugLine="Log(\"Mandamos bitacora\")"; -Debug.ShouldStop(4194304); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314876727",RemoteObject.createImmutable("Mandamos bitacora"),0); - BA.debugLineNum = 1336;BA.debugLine="End Sub"; -Debug.ShouldStop(8388608); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _borraarribade100errores(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("borraArribaDe100Errores (subs) ","subs",9,_ba,subs.mostCurrent,495); -if (RapidSub.canDelegate("borraarribade100errores")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","borraarribade100errores", _ba);} -; - BA.debugLineNum = 495;BA.debugLine="Sub borraArribaDe100Errores 'ignore"; -Debug.ShouldStop(16384); - BA.debugLineNum = 496;BA.debugLine="revisaBD"; -Debug.ShouldStop(32768); -_revisabd(_ba); - BA.debugLineNum = 497;BA.debugLine="LogColor(\"Borramos BD de log\", Colors.Magenta)"; -Debug.ShouldStop(65536); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312189698",BA.ObjectToString("Borramos BD de log"),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Magenta")); - BA.debugLineNum = 498;BA.debugLine="errorLog.ExecNonQuery(\"DELETE FROM errores WHERE"; -Debug.ShouldStop(131072); -subs._errorlog.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("DELETE FROM errores WHERE fecha NOT in (SELECT fecha FROM errores ORDER BY fecha desc LIMIT 99 )"))); - BA.debugLineNum = 499;BA.debugLine="errorLog.ExecNonQuery(\"vacuum;\")"; -Debug.ShouldStop(262144); -subs._errorlog.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("vacuum;"))); - BA.debugLineNum = 500;BA.debugLine="Log(\"Borramos mas de 100 de errorLog\")"; -Debug.ShouldStop(524288); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312189701",RemoteObject.createImmutable("Borramos mas de 100 de errorLog"),0); - BA.debugLineNum = 501;BA.debugLine="End Sub"; -Debug.ShouldStop(1048576); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _borraarribade600renglonesbitacora(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("borraArribaDe600RenglonesBitacora (subs) ","subs",9,_ba,subs.mostCurrent,504); -if (RapidSub.canDelegate("borraarribade600renglonesbitacora")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","borraarribade600renglonesbitacora", _ba);} -; - BA.debugLineNum = 504;BA.debugLine="Sub borraArribaDe600RenglonesBitacora 'ignore"; -Debug.ShouldStop(8388608); - BA.debugLineNum = 505;BA.debugLine="revisaBD"; -Debug.ShouldStop(16777216); -_revisabd(_ba); - BA.debugLineNum = 506;BA.debugLine="LogColor(\"Borramos BD de log\", Colors.Magenta)"; -Debug.ShouldStop(33554432); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312255234",BA.ObjectToString("Borramos BD de log"),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Magenta")); - BA.debugLineNum = 507;BA.debugLine="kmt.ExecNonQuery(\"DELETE FROM bitacora WHERE fech"; -Debug.ShouldStop(67108864); -subs._kmt.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("DELETE FROM bitacora WHERE fecha NOT in (SELECT fecha FROM bitacora ORDER BY fecha desc LIMIT 599 )"))); - BA.debugLineNum = 508;BA.debugLine="kmt.ExecNonQuery(\"vacuum;\")"; -Debug.ShouldStop(134217728); -subs._kmt.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("vacuum;"))); - BA.debugLineNum = 509;BA.debugLine="Log(\"Borramos mas de 600 de bitacora\")"; -Debug.ShouldStop(268435456); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312255237",RemoteObject.createImmutable("Borramos mas de 600 de bitacora"),0); - BA.debugLineNum = 510;BA.debugLine="End Sub"; -Debug.ShouldStop(536870912); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _borralogdb(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("borraLogDB (subs) ","subs",9,_ba,subs.mostCurrent,379); -if (RapidSub.canDelegate("borralogdb")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","borralogdb", _ba);} -; - BA.debugLineNum = 379;BA.debugLine="Sub borraLogDB 'ignore"; -Debug.ShouldStop(67108864); - BA.debugLineNum = 380;BA.debugLine="LogColor(\"Borramos BD de log\", Colors.Magenta)"; -Debug.ShouldStop(134217728); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311993089",BA.ObjectToString("Borramos BD de log"),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Magenta")); - BA.debugLineNum = 381;BA.debugLine="kmt.ExecNonQuery(\"delete from bitacora\")"; -Debug.ShouldStop(268435456); -subs._kmt.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from bitacora"))); - BA.debugLineNum = 382;BA.debugLine="kmt.ExecNonQuery(\"vacuum;\")"; -Debug.ShouldStop(536870912); -subs._kmt.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("vacuum;"))); - BA.debugLineNum = 383;BA.debugLine="End Sub"; -Debug.ShouldStop(1073741824); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _borramosarchivogps(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("borramosArchivoGPS (subs) ","subs",9,_ba,subs.mostCurrent,175); -if (RapidSub.canDelegate("borramosarchivogps")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","borramosarchivogps", _ba);} -RemoteObject _out = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -RemoteObject _s = RemoteObject.createImmutable(""); -RemoteObject _t = null; -; - BA.debugLineNum = 175;BA.debugLine="Sub borramosArchivoGPS 'ignore"; -Debug.ShouldStop(16384); - BA.debugLineNum = 176;BA.debugLine="Dim out As OutputStream = File.OpenOutput(File.Di"; -Debug.ShouldStop(32768); -_out = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -_out = subs.mostCurrent.__c.getField(false,"File").runMethod(false,"OpenOutput",(Object)(subs.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirRootExternal")),(Object)(BA.ObjectToString("gps.txt")),(Object)(subs.mostCurrent.__c.getField(true,"False")));Debug.locals.put("out", _out);Debug.locals.put("out", _out); - BA.debugLineNum = 177;BA.debugLine="Dim s As String = \"\""; -Debug.ShouldStop(65536); -_s = BA.ObjectToString("");Debug.locals.put("s", _s);Debug.locals.put("s", _s); - BA.debugLineNum = 178;BA.debugLine="Dim t() As Byte = s.GetBytes(\"UTF-8\")"; -Debug.ShouldStop(131072); -_t = _s.runMethod(false,"getBytes",(Object)(RemoteObject.createImmutable("UTF-8")));Debug.locals.put("t", _t);Debug.locals.put("t", _t); - BA.debugLineNum = 179;BA.debugLine="out.WriteBytes(t, 0, t.Length)"; -Debug.ShouldStop(262144); -_out.runVoidMethod ("WriteBytes",(Object)(_t),(Object)(BA.numberCast(int.class, 0)),(Object)(_t.getField(true,"length"))); - BA.debugLineNum = 180;BA.debugLine="out.Close"; -Debug.ShouldStop(524288); -_out.runVoidMethod ("Close"); - BA.debugLineNum = 181;BA.debugLine="End Sub"; -Debug.ShouldStop(1048576); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _borrapedidoclienteactual(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("borraPedidoClienteActual (subs) ","subs",9,_ba,subs.mostCurrent,1239); -if (RapidSub.canDelegate("borrapedidoclienteactual")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","borrapedidoclienteactual", _ba);} -RemoteObject _thisc = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -int _i = 0; -; - BA.debugLineNum = 1239;BA.debugLine="Sub borraPedidoClienteActual As String"; -Debug.ShouldStop(4194304); - BA.debugLineNum = 1240;BA.debugLine="Private thisC As Cursor"; -Debug.ShouldStop(8388608); -_thisc = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");Debug.locals.put("thisC", _thisc); - BA.debugLineNum = 1241;BA.debugLine="thisC=B4XPages.MainPage.skmt.ExecQuery(\"select PE"; -Debug.ShouldStop(16777216); -_thisc = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select PE_PROID,PE_CANT FROM PEDIDO where pe_cliente in (Select CUENTA from cuentaa) "))));Debug.locals.put("thisC", _thisc); - BA.debugLineNum = 1242;BA.debugLine="If thisC.RowCount>0 Then"; -Debug.ShouldStop(33554432); -if (RemoteObject.solveBoolean(">",_thisc.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 1243;BA.debugLine="For i=0 To thisC.RowCount -1"; -Debug.ShouldStop(67108864); -{ -final int step4 = 1; -final int limit4 = RemoteObject.solve(new RemoteObject[] {_thisc.runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step4 > 0 && _i <= limit4) || (step4 < 0 && _i >= limit4) ;_i = ((int)(0 + _i + step4)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 1244;BA.debugLine="thisC.Position=i"; -Debug.ShouldStop(134217728); -_thisc.runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 1245;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update ca"; -Debug.ShouldStop(268435456); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen + ? where cat_gp_id = ?")),(Object)(subs.mostCurrent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(_thisc.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CANT")))),(_thisc.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_PROID"))))}))))); - BA.debugLineNum = 1246;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT IN"; -Debug.ShouldStop(536870912); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO INVENT_X_ENVIAR (ALMACEN , PROID , CANTIDAD ) VALUES(?,?,?) ")),(Object)(subs.mostCurrent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {3},new Object[] {(_traealmacen(_ba)),(_thisc.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_PROID")))),RemoteObject.createImmutable(((double)(Double.parseDouble(_thisc.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("PE_CANT"))).get()))*-(double) (0 + 1)))}))))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 1249;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(1); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido_cliente where pc_cliente in (Select CUENTA from cuentaa)"))); - BA.debugLineNum = 1250;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(2); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido where pe_cliente in (Select CUENTA from cuentaa)"))); - BA.debugLineNum = 1251;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_i"; -Debug.ShouldStop(4); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("UPDATE kmt_info set gestion = 0 where CAT_CL_CODIGO In (select cuenta from cuentaa)"))); - BA.debugLineNum = 1252;BA.debugLine="Return 1"; -Debug.ShouldStop(8); -if (true) return BA.NumberToString(1); - BA.debugLineNum = 1253;BA.debugLine="End Sub"; -Debug.ShouldStop(16); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _buscadbusuario(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("buscaDBUsuario (subs) ","subs",9,_ba,subs.mostCurrent,647); -if (RapidSub.canDelegate("buscadbusuario")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","buscadbusuario", _ba);} -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -RemoteObject _usuario = RemoteObject.createImmutable(""); -; - BA.debugLineNum = 647;BA.debugLine="Sub buscaDBUsuario As String 'ignore"; -Debug.ShouldStop(64); - BA.debugLineNum = 648;BA.debugLine="Private c As Cursor"; -Debug.ShouldStop(128); -_c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");Debug.locals.put("c", _c); - BA.debugLineNum = 649;BA.debugLine="Private usuario As String = \"SinUsuario\""; -Debug.ShouldStop(256); -_usuario = BA.ObjectToString("SinUsuario");Debug.locals.put("usuario", _usuario);Debug.locals.put("usuario", _usuario); - BA.debugLineNum = 650;BA.debugLine="c=kmt.ExecQuery(\"select USUARIO from usuarioa\")"; -Debug.ShouldStop(512); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs._kmt.runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select USUARIO from usuarioa"))));Debug.locals.put("c", _c); - BA.debugLineNum = 651;BA.debugLine="c.Position=0"; -Debug.ShouldStop(1024); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 652;BA.debugLine="If c.RowCount > 0 Then usuario = c.GetString(\"USU"; -Debug.ShouldStop(2048); -if (RemoteObject.solveBoolean(">",_c.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { -_usuario = _c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")));Debug.locals.put("usuario", _usuario);}; - BA.debugLineNum = 653;BA.debugLine="Return usuario"; -Debug.ShouldStop(4096); -if (true) return _usuario; - BA.debugLineNum = 654;BA.debugLine="End Sub"; -Debug.ShouldStop(8192); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _centraetiqueta(RemoteObject _ba,RemoteObject _elemento,RemoteObject _anchoelementosuperior) throws Exception{ -try { - Debug.PushSubsStack("centraEtiqueta (subs) ","subs",9,_ba,subs.mostCurrent,627); -if (RapidSub.canDelegate("centraetiqueta")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","centraetiqueta", _ba, _elemento, _anchoelementosuperior);} -; -Debug.locals.put("elemento", _elemento); -Debug.locals.put("anchoElementoSuperior", _anchoelementosuperior); - BA.debugLineNum = 627;BA.debugLine="Sub centraEtiqueta(elemento As Label, anchoElement"; -Debug.ShouldStop(262144); - BA.debugLineNum = 628;BA.debugLine="elemento.Left = Round(anchoElementoSuperior/2)-(e"; -Debug.ShouldStop(524288); -_elemento.runMethod(true,"setLeft",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {subs.mostCurrent.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {_anchoelementosuperior,RemoteObject.createImmutable(2)}, "/",0, 0))),(RemoteObject.solve(new RemoteObject[] {_elemento.runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0))}, "-",1, 0))); - BA.debugLineNum = 629;BA.debugLine="End Sub"; -Debug.ShouldStop(1048576); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _centrapanel(RemoteObject _ba,RemoteObject _elemento,RemoteObject _anchoelementosuperior) throws Exception{ -try { - Debug.PushSubsStack("centraPanel (subs) ","subs",9,_ba,subs.mostCurrent,632); -if (RapidSub.canDelegate("centrapanel")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","centrapanel", _ba, _elemento, _anchoelementosuperior);} -; -Debug.locals.put("elemento", _elemento); -Debug.locals.put("anchoElementoSuperior", _anchoelementosuperior); - BA.debugLineNum = 632;BA.debugLine="Sub centraPanel(elemento As Panel, anchoElementoSu"; -Debug.ShouldStop(8388608); - BA.debugLineNum = 633;BA.debugLine="elemento.Left = Round(anchoElementoSuperior/2)-(e"; -Debug.ShouldStop(16777216); -_elemento.runMethod(true,"setLeft",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {subs.mostCurrent.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {_anchoelementosuperior,RemoteObject.createImmutable(2)}, "/",0, 0))),(RemoteObject.solve(new RemoteObject[] {_elemento.runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0))}, "-",1, 0))); - BA.debugLineNum = 634;BA.debugLine="End Sub"; -Debug.ShouldStop(33554432); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _centrapanelv(RemoteObject _ba,RemoteObject _elemento,RemoteObject _altoelementosuperior) throws Exception{ -try { - Debug.PushSubsStack("centraPanelV (subs) ","subs",9,_ba,subs.mostCurrent,637); -if (RapidSub.canDelegate("centrapanelv")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","centrapanelv", _ba, _elemento, _altoelementosuperior);} -; -Debug.locals.put("elemento", _elemento); -Debug.locals.put("altoElementoSuperior", _altoelementosuperior); - BA.debugLineNum = 637;BA.debugLine="Sub centraPanelV(elemento As Panel, altoElementoSu"; -Debug.ShouldStop(268435456); - BA.debugLineNum = 638;BA.debugLine="elemento.Top = Round(altoElementoSuperior/2)-(ele"; -Debug.ShouldStop(536870912); -_elemento.runMethod(true,"setTop",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {subs.mostCurrent.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {_altoelementosuperior,RemoteObject.createImmutable(2)}, "/",0, 0))),(RemoteObject.solve(new RemoteObject[] {_elemento.runMethod(true,"getHeight"),RemoteObject.createImmutable(2)}, "/",0, 0))}, "-",1, 0))); - BA.debugLineNum = 639;BA.debugLine="End Sub"; -Debug.ShouldStop(1073741824); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _centraprogressbar(RemoteObject _ba,RemoteObject _elemento,RemoteObject _anchoelementosuperior) throws Exception{ -try { - Debug.PushSubsStack("centraProgressBar (subs) ","subs",9,_ba,subs.mostCurrent,642); -if (RapidSub.canDelegate("centraprogressbar")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","centraprogressbar", _ba, _elemento, _anchoelementosuperior);} -; -Debug.locals.put("elemento", _elemento); -Debug.locals.put("anchoElementoSuperior", _anchoelementosuperior); - BA.debugLineNum = 642;BA.debugLine="Sub centraProgressBar(elemento As ProgressBar, anc"; -Debug.ShouldStop(2); - BA.debugLineNum = 643;BA.debugLine="elemento.Left = Round(anchoElementoSuperior/2)-(e"; -Debug.ShouldStop(4); -_elemento.runMethod(true,"setLeft",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {subs.mostCurrent.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {_anchoelementosuperior,RemoteObject.createImmutable(2)}, "/",0, 0))),(RemoteObject.solve(new RemoteObject[] {_elemento.runMethod(true,"getWidth"),RemoteObject.createImmutable(2)}, "/",0, 0))}, "-",1, 0))); - BA.debugLineNum = 644;BA.debugLine="End Sub"; -Debug.ShouldStop(8); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _compress(RemoteObject _ba,RemoteObject _str) throws Exception{ -try { - Debug.PushSubsStack("compress (subs) ","subs",9,_ba,subs.mostCurrent,40); -if (RapidSub.canDelegate("compress")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","compress", _ba, _str);} -RemoteObject _compressed = null; -RemoteObject _base64 = RemoteObject.createImmutable(""); -; -Debug.locals.put("str", _str); - BA.debugLineNum = 40;BA.debugLine="Sub compress(str As String) As String 'ignore"; -Debug.ShouldStop(128); - BA.debugLineNum = 42;BA.debugLine="Dim compressed() As Byte = GZip.compress(str)"; -Debug.ShouldStop(512); -_compressed = subs._gzip.runMethod(false,"compress",(Object)(_str));Debug.locals.put("compressed", _compressed);Debug.locals.put("compressed", _compressed); - BA.debugLineNum = 45;BA.debugLine="Dim base64 As String = su.EncodeBase64(compressed"; -Debug.ShouldStop(4096); -_base64 = subs._su.runMethod(true,"EncodeBase64",(Object)(_compressed));Debug.locals.put("base64", _base64);Debug.locals.put("base64", _base64); - BA.debugLineNum = 46;BA.debugLine="Log($\"Comprimido: ${base64.Length}\"$)"; -Debug.ShouldStop(8192); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","310747910",(RemoteObject.concat(RemoteObject.createImmutable("Comprimido: "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_base64.runMethod(true,"length")))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 48;BA.debugLine="Return base64"; -Debug.ShouldStop(32768); -if (true) return _base64; - BA.debugLineNum = 49;BA.debugLine="End Sub"; -Debug.ShouldStop(65536); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _copiadb(RemoteObject _ba,RemoteObject _result) throws Exception{ -try { - Debug.PushSubsStack("copiaDB (subs) ","subs",9,_ba,subs.mostCurrent,585); -if (RapidSub.canDelegate("copiadb")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","copiadb", _ba, _result);} -RemoteObject _p = RemoteObject.createImmutable(""); -RemoteObject _thedir = RemoteObject.createImmutable(""); -; -Debug.locals.put("result", _result); - BA.debugLineNum = 585;BA.debugLine="Sub copiaDB(result As Boolean) 'ignore"; -Debug.ShouldStop(256); - BA.debugLineNum = 586;BA.debugLine="ToastMessageShow(\"copiaDB\", False)"; -Debug.ShouldStop(512); -subs.mostCurrent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("copiaDB")),(Object)(subs.mostCurrent.__c.getField(true,"False"))); - BA.debugLineNum = 587;BA.debugLine="If result Then"; -Debug.ShouldStop(1024); -if (_result.get().booleanValue()) { - BA.debugLineNum = 588;BA.debugLine="Dim p As String"; -Debug.ShouldStop(2048); -_p = RemoteObject.createImmutable("");Debug.locals.put("p", _p); - BA.debugLineNum = 589;BA.debugLine="If File.ExternalWritable Then"; -Debug.ShouldStop(4096); -if (subs.mostCurrent.__c.getField(false,"File").runMethod(true,"getExternalWritable").get().booleanValue()) { - BA.debugLineNum = 590;BA.debugLine="p = File.DirRootExternal"; -Debug.ShouldStop(8192); -_p = subs.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirRootExternal");Debug.locals.put("p", _p); - }else { - BA.debugLineNum = 593;BA.debugLine="p = File.DirInternal"; -Debug.ShouldStop(65536); -_p = subs.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirInternal");Debug.locals.put("p", _p); - }; - BA.debugLineNum = 596;BA.debugLine="Dim theDir As String"; -Debug.ShouldStop(524288); -_thedir = RemoteObject.createImmutable("");Debug.locals.put("theDir", _thedir); - BA.debugLineNum = 597;BA.debugLine="Try"; -Debug.ShouldStop(1048576); -try { BA.debugLineNum = 598;BA.debugLine="File.MakeDir(File.DirRootExternal,\"kmts\")"; -Debug.ShouldStop(2097152); -subs.mostCurrent.__c.getField(false,"File").runVoidMethod ("MakeDir",(Object)(subs.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirRootExternal")),(Object)(RemoteObject.createImmutable("kmts"))); - BA.debugLineNum = 599;BA.debugLine="theDir = \"/kmts\""; -Debug.ShouldStop(4194304); -_thedir = BA.ObjectToString("/kmts");Debug.locals.put("theDir", _thedir); - Debug.CheckDeviceExceptions(); -} - catch (Exception e14) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e14.toString()); BA.debugLineNum = 601;BA.debugLine="theDir = \"\""; -Debug.ShouldStop(16777216); -_thedir = BA.ObjectToString("");Debug.locals.put("theDir", _thedir); - }; - BA.debugLineNum = 603;BA.debugLine="Try"; -Debug.ShouldStop(67108864); -try { BA.debugLineNum = 604;BA.debugLine="File.Copy(File.DirInternal,\"kmt.db\",File.DirRoo"; -Debug.ShouldStop(134217728); -subs.mostCurrent.__c.getField(false,"File").runVoidMethod ("Copy",(Object)(subs.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirInternal")),(Object)(BA.ObjectToString("kmt.db")),(Object)(RemoteObject.concat(subs.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirRootExternal"),_thedir)),(Object)(RemoteObject.createImmutable("cedex_kmt.db"))); - BA.debugLineNum = 605;BA.debugLine="File.Copy(File.DirInternal,\"errorLog.db\",File.D"; -Debug.ShouldStop(268435456); -subs.mostCurrent.__c.getField(false,"File").runVoidMethod ("Copy",(Object)(subs.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirInternal")),(Object)(BA.ObjectToString("errorLog.db")),(Object)(RemoteObject.concat(subs.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirRootExternal"),_thedir)),(Object)(RemoteObject.createImmutable("cedex_errorLog.db"))); - BA.debugLineNum = 606;BA.debugLine="ToastMessageShow(\"BD copiada!\", False)"; -Debug.ShouldStop(536870912); -subs.mostCurrent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("BD copiada!")),(Object)(subs.mostCurrent.__c.getField(true,"False"))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e21) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e21.toString()); BA.debugLineNum = 608;BA.debugLine="ToastMessageShow(\"No se pudo hacer la copia: \"&"; -Debug.ShouldStop(-2147483648); -subs.mostCurrent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence(RemoteObject.concat(RemoteObject.createImmutable("No se pudo hacer la copia: "),subs.mostCurrent.__c.runMethod(false,"LastException",_ba)))),(Object)(subs.mostCurrent.__c.getField(true,"True"))); - }; - BA.debugLineNum = 610;BA.debugLine="Log(\"rootExternal=\"&p)"; -Debug.ShouldStop(2); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312582937",RemoteObject.concat(RemoteObject.createImmutable("rootExternal="),_p),0); - BA.debugLineNum = 611;BA.debugLine="Log(\"File.DirInternal=\"&File.DirInternal)"; -Debug.ShouldStop(4); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312582938",RemoteObject.concat(RemoteObject.createImmutable("File.DirInternal="),subs.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirInternal")),0); - BA.debugLineNum = 612;BA.debugLine="Log(\"File.DirRootExternal=\"&File.DirRootExternal"; -Debug.ShouldStop(8); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312582939",RemoteObject.concat(RemoteObject.createImmutable("File.DirRootExternal="),subs.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirRootExternal")),0); - }else { - BA.debugLineNum = 614;BA.debugLine="ToastMessageShow(\"Sin permisos\", False)"; -Debug.ShouldStop(32); -subs.mostCurrent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Sin permisos")),(Object)(subs.mostCurrent.__c.getField(true,"False"))); - }; - BA.debugLineNum = 616;BA.debugLine="End Sub"; -Debug.ShouldStop(128); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _cuantosvariablestengobd(RemoteObject _ba,RemoteObject _promo) throws Exception{ -try { - Debug.PushSubsStack("cuantosVariablesTengoBD (subs) ","subs",9,_ba,subs.mostCurrent,1172); -if (RapidSub.canDelegate("cuantosvariablestengobd")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","cuantosvariablestengobd", _ba, _promo);} -; -Debug.locals.put("promo", _promo); - BA.debugLineNum = 1172;BA.debugLine="Sub cuantosVariablesTengoBD(promo As String) As St"; -Debug.ShouldStop(524288); - BA.debugLineNum = 1183;BA.debugLine="End Sub"; -Debug.ShouldStop(1073741824); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _dameerroresjson(RemoteObject _ba,RemoteObject _sql,RemoteObject _maxerrores,RemoteObject _comprimido) throws Exception{ -try { - Debug.PushSubsStack("dameErroresJSON (subs) ","subs",9,_ba,subs.mostCurrent,523); -if (RapidSub.canDelegate("dameerroresjson")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","dameerroresjson", _ba, _sql, _maxerrores, _comprimido);} -RemoteObject _j = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.JSONParser.JSONGenerator"); -RemoteObject _lim = RemoteObject.createImmutable(""); -RemoteObject _cur = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"); -RemoteObject _l = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _i = RemoteObject.createImmutable(0); -RemoteObject _m = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -RemoteObject _m2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -; -Debug.locals.put("SQL", _sql); -Debug.locals.put("maxErrores", _maxerrores); -Debug.locals.put("comprimido", _comprimido); - BA.debugLineNum = 523;BA.debugLine="Sub dameErroresJSON(SQL As SQL, maxErrores As Int,"; -Debug.ShouldStop(1024); - BA.debugLineNum = 524;BA.debugLine="Log(\"dameErroresJSON\")"; -Debug.ShouldStop(2048); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312386305",RemoteObject.createImmutable("dameErroresJSON"),0); - BA.debugLineNum = 525;BA.debugLine="Private j As JSONGenerator"; -Debug.ShouldStop(4096); -_j = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.JSONParser.JSONGenerator");Debug.locals.put("j", _j); - BA.debugLineNum = 526;BA.debugLine="Private lim As String"; -Debug.ShouldStop(8192); -_lim = RemoteObject.createImmutable("");Debug.locals.put("lim", _lim); - BA.debugLineNum = 527;BA.debugLine="Private cur As ResultSet"; -Debug.ShouldStop(16384); -_cur = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.ResultSetWrapper");Debug.locals.put("cur", _cur); - BA.debugLineNum = 528;BA.debugLine="Private l As List"; -Debug.ShouldStop(32768); -_l = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");Debug.locals.put("l", _l); - BA.debugLineNum = 529;BA.debugLine="Private i As Int = 0"; -Debug.ShouldStop(65536); -_i = BA.numberCast(int.class, 0);Debug.locals.put("i", _i);Debug.locals.put("i", _i); - BA.debugLineNum = 530;BA.debugLine="l.Initialize"; -Debug.ShouldStop(131072); -_l.runVoidMethod ("Initialize"); - BA.debugLineNum = 531;BA.debugLine="Dim m, m2 As Map"; -Debug.ShouldStop(262144); -_m = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");Debug.locals.put("m", _m); -_m2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");Debug.locals.put("m2", _m2); - BA.debugLineNum = 532;BA.debugLine="m2.Initialize"; -Debug.ShouldStop(524288); -_m2.runVoidMethod ("Initialize"); - BA.debugLineNum = 533;BA.debugLine="If maxErrores = 0 Then lim = \"\" Else lim = \"limit"; -Debug.ShouldStop(1048576); -if (RemoteObject.solveBoolean("=",_maxerrores,BA.numberCast(double.class, 0))) { -_lim = BA.ObjectToString("");Debug.locals.put("lim", _lim);} -else { -_lim = RemoteObject.concat(RemoteObject.createImmutable("limit "),_maxerrores);Debug.locals.put("lim", _lim);}; - BA.debugLineNum = 534;BA.debugLine="cur = SQL.ExecQuery(\"select * from errores order"; -Debug.ShouldStop(2097152); -_cur = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"), _sql.runMethod(false,"ExecQuery",(Object)(RemoteObject.concat(RemoteObject.createImmutable("select * from errores order by fecha desc "),_lim))));Debug.locals.put("cur", _cur); - BA.debugLineNum = 535;BA.debugLine="Do While cur.NextRow"; -Debug.ShouldStop(4194304); -while (_cur.runMethod(true,"NextRow").get().booleanValue()) { - BA.debugLineNum = 536;BA.debugLine="m.Initialize"; -Debug.ShouldStop(8388608); -_m.runVoidMethod ("Initialize"); - BA.debugLineNum = 537;BA.debugLine="m.Put(\"fecha\", cur.GetString(\"fecha\"))"; -Debug.ShouldStop(16777216); -_m.runVoidMethod ("Put",(Object)(RemoteObject.createImmutable(("fecha"))),(Object)((_cur.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("fecha")))))); - BA.debugLineNum = 538;BA.debugLine="m.Put(\"error\", cur.GetString(\"error\"))"; -Debug.ShouldStop(33554432); -_m.runVoidMethod ("Put",(Object)(RemoteObject.createImmutable(("error"))),(Object)((_cur.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("error")))))); - BA.debugLineNum = 539;BA.debugLine="m2.Put(i,m)"; -Debug.ShouldStop(67108864); -_m2.runVoidMethod ("Put",(Object)((_i)),(Object)((_m.getObject()))); - BA.debugLineNum = 540;BA.debugLine="i = i + 1"; -Debug.ShouldStop(134217728); -_i = RemoteObject.solve(new RemoteObject[] {_i,RemoteObject.createImmutable(1)}, "+",1, 1);Debug.locals.put("i", _i); - } -; - BA.debugLineNum = 542;BA.debugLine="cur.Close"; -Debug.ShouldStop(536870912); -_cur.runVoidMethod ("Close"); - BA.debugLineNum = 543;BA.debugLine="j.Initialize(m2)"; -Debug.ShouldStop(1073741824); -_j.runVoidMethod ("Initialize",(Object)(_m2)); - BA.debugLineNum = 544;BA.debugLine="Log(j.ToString)"; -Debug.ShouldStop(-2147483648); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312386325",_j.runMethod(true,"ToString"),0); - BA.debugLineNum = 545;BA.debugLine="If comprimido Then"; -Debug.ShouldStop(1); -if (_comprimido.get().booleanValue()) { - BA.debugLineNum = 546;BA.debugLine="Return compress(j.ToString)"; -Debug.ShouldStop(2); -if (true) return _compress(_ba,_j.runMethod(true,"ToString")); - }else { - BA.debugLineNum = 548;BA.debugLine="Return j.ToString"; -Debug.ShouldStop(8); -if (true) return _j.runMethod(true,"ToString"); - }; - BA.debugLineNum = 550;BA.debugLine="End Sub"; -Debug.ShouldStop(32); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _dameruta(RemoteObject _ba,RemoteObject _inicioruta,RemoteObject _origenruta) throws Exception{ -try { - Debug.PushSubsStack("dameRuta (subs) ","subs",9,_ba,subs.mostCurrent,131); -if (RapidSub.canDelegate("dameruta")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","dameruta", _ba, _inicioruta, _origenruta);} -RemoteObject _fechainicio = RemoteObject.createImmutable(""); -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -RemoteObject _ruta2 = RemoteObject.createImmutable(""); -int _i = 0; -; -Debug.locals.put("inicioRuta", _inicioruta); -Debug.locals.put("origenRuta", _origenruta); - BA.debugLineNum = 131;BA.debugLine="Sub dameRuta(inicioRuta As String, origenRuta As S"; -Debug.ShouldStop(4); - BA.debugLineNum = 133;BA.debugLine="Dim fechaInicio As String"; -Debug.ShouldStop(16); -_fechainicio = RemoteObject.createImmutable("");Debug.locals.put("fechaInicio", _fechainicio); - BA.debugLineNum = 134;BA.debugLine="Try 'incioRuta es numero"; -Debug.ShouldStop(32); -try { BA.debugLineNum = 135;BA.debugLine="inicioRuta = inicioRuta * 1"; -Debug.ShouldStop(64); -_inicioruta = BA.NumberToString(RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, _inicioruta),RemoteObject.createImmutable(1)}, "*",0, 0));Debug.locals.put("inicioRuta", _inicioruta); - BA.debugLineNum = 137;BA.debugLine="fechaInicio = fechaKMT(DateTime.Now - (DateTime."; -Debug.ShouldStop(256); -_fechainicio = _fechakmt(_ba,BA.NumberToString(RemoteObject.solve(new RemoteObject[] {subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getNow"),(RemoteObject.solve(new RemoteObject[] {subs.mostCurrent.__c.getField(false,"DateTime").getField(true,"TicksPerHour"),BA.numberCast(double.class, _inicioruta)}, "*",0, 0))}, "-",1, 0)));Debug.locals.put("fechaInicio", _fechainicio); - Debug.CheckDeviceExceptions(); -} - catch (Exception e6) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e6.toString()); BA.debugLineNum = 139;BA.debugLine="fechaInicio = fechaInicioHoy"; -Debug.ShouldStop(1024); -_fechainicio = _fechainiciohoy(_ba);Debug.locals.put("fechaInicio", _fechainicio); - }; - BA.debugLineNum = 142;BA.debugLine="If subsLogs Then Log(\"fechaInicio: \"&fechaInicio&"; -Debug.ShouldStop(8192); -if (subs._subslogs.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311206667",RemoteObject.concat(RemoteObject.createImmutable("fechaInicio: "),_fechainicio,RemoteObject.createImmutable(" | rutaHrsAtras="),subs._rutahrsatras),0);}; - BA.debugLineNum = 143;BA.debugLine="Dim c As Cursor"; -Debug.ShouldStop(16384); -_c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");Debug.locals.put("c", _c); - BA.debugLineNum = 144;BA.debugLine="If kmt.IsInitialized = False Then kmt.Initialize("; -Debug.ShouldStop(32768); -if (RemoteObject.solveBoolean("=",subs._kmt.runMethod(true,"IsInitialized"),subs.mostCurrent.__c.getField(true,"False"))) { -subs._kmt.runVoidMethod ("Initialize",(Object)(subs.mostCurrent._starter._ruta /*RemoteObject*/ ),(Object)(BA.ObjectToString("kmt.db")),(Object)(subs.mostCurrent.__c.getField(true,"True")));}; - BA.debugLineNum = 145;BA.debugLine="If subsLogs Then Log(\"select FECHA, LAT, LON from"; -Debug.ShouldStop(65536); -if (subs._subslogs.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311206670",RemoteObject.concat(RemoteObject.createImmutable("select FECHA, LAT, LON from "),_origenruta,RemoteObject.createImmutable(" where FECHA > "),_fechainicio,RemoteObject.createImmutable(" order by FECHA desc limit "),subs._rutamaxpoints),0);}; - BA.debugLineNum = 146;BA.debugLine="c = kmt.ExecQuery(\"select FECHA, LAT, LON from \"&"; -Debug.ShouldStop(131072); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs._kmt.runMethod(false,"ExecQuery",(Object)(RemoteObject.concat(RemoteObject.createImmutable("select FECHA, LAT, LON from "),_origenruta,RemoteObject.createImmutable(" where FECHA > "),_fechainicio,RemoteObject.createImmutable(" order by FECHA desc limit "),subs._rutamaxpoints))));Debug.locals.put("c", _c); - BA.debugLineNum = 147;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(262144); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 148;BA.debugLine="Dim ruta2 As String = \"\""; -Debug.ShouldStop(524288); -_ruta2 = BA.ObjectToString("");Debug.locals.put("ruta2", _ruta2);Debug.locals.put("ruta2", _ruta2); - BA.debugLineNum = 149;BA.debugLine="If c.RowCount>0 Then"; -Debug.ShouldStop(1048576); -if (RemoteObject.solveBoolean(">",_c.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 150;BA.debugLine="For i=0 To c.RowCount -1"; -Debug.ShouldStop(2097152); -{ -final int step16 = 1; -final int limit16 = RemoteObject.solve(new RemoteObject[] {_c.runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step16 > 0 && _i <= limit16) || (step16 < 0 && _i >= limit16) ;_i = ((int)(0 + _i + step16)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 151;BA.debugLine="c.Position=i"; -Debug.ShouldStop(4194304); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 152;BA.debugLine="ruta2=ruta2&CRLF&c.GetString(\"LAT\")&\",\"&c.GetSt"; -Debug.ShouldStop(8388608); -_ruta2 = RemoteObject.concat(_ruta2,subs.mostCurrent.__c.getField(true,"CRLF"),_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("LAT"))),RemoteObject.createImmutable(","),_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("LON"))),RemoteObject.createImmutable(","),_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("FECHA"))));Debug.locals.put("ruta2", _ruta2); - BA.debugLineNum = 153;BA.debugLine="B4XPages.MainPage.fechaRuta = c.GetString(\"FECH"; -Debug.ShouldStop(16777216); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).setField ("_fecharuta" /*RemoteObject*/ ,_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("FECHA")))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 156;BA.debugLine="c.Close"; -Debug.ShouldStop(134217728); -_c.runVoidMethod ("Close"); - BA.debugLineNum = 157;BA.debugLine="Return compress(ruta2)"; -Debug.ShouldStop(268435456); -if (true) return _compress(_ba,_ruta2); - BA.debugLineNum = 158;BA.debugLine="End Sub"; -Debug.ShouldStop(536870912); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _dameusuariodedb(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("dameUsuarioDeDB (subs) ","subs",9,_ba,subs.mostCurrent,657); -if (RapidSub.canDelegate("dameusuariodedb")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","dameusuariodedb", _ba);} -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -RemoteObject _u = RemoteObject.createImmutable(""); -; - BA.debugLineNum = 657;BA.debugLine="Sub dameUsuarioDeDB As String 'ignore"; -Debug.ShouldStop(65536); - BA.debugLineNum = 658;BA.debugLine="Private c As Cursor"; -Debug.ShouldStop(131072); -_c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");Debug.locals.put("c", _c); - BA.debugLineNum = 659;BA.debugLine="Private u As String = \"SinUsuario\""; -Debug.ShouldStop(262144); -_u = BA.ObjectToString("SinUsuario");Debug.locals.put("u", _u);Debug.locals.put("u", _u); - BA.debugLineNum = 660;BA.debugLine="If Not(kmt.IsInitialized) Then revisaBD"; -Debug.ShouldStop(524288); -if (subs.mostCurrent.__c.runMethod(true,"Not",(Object)(subs._kmt.runMethod(true,"IsInitialized"))).get().booleanValue()) { -_revisabd(_ba);}; - BA.debugLineNum = 661;BA.debugLine="c=kmt.ExecQuery(\"select USUARIO from usuarioa\")"; -Debug.ShouldStop(1048576); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs._kmt.runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select USUARIO from usuarioa"))));Debug.locals.put("c", _c); - BA.debugLineNum = 662;BA.debugLine="c.Position=0"; -Debug.ShouldStop(2097152); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 663;BA.debugLine="If c.RowCount > 0 Then u = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(4194304); -if (RemoteObject.solveBoolean(">",_c.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { -_u = _c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")));Debug.locals.put("u", _u);}; - BA.debugLineNum = 664;BA.debugLine="c.Close"; -Debug.ShouldStop(8388608); -_c.runVoidMethod ("Close"); - BA.debugLineNum = 665;BA.debugLine="Return u"; -Debug.ShouldStop(16777216); -if (true) return _u; - BA.debugLineNum = 666;BA.debugLine="End Sub"; -Debug.ShouldStop(33554432); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _decompress(RemoteObject _ba,RemoteObject _base64) throws Exception{ -try { - Debug.PushSubsStack("decompress (subs) ","subs",9,_ba,subs.mostCurrent,52); -if (RapidSub.canDelegate("decompress")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","decompress", _ba, _base64);} -RemoteObject _decompressedbytes = null; -RemoteObject _bc = RemoteObject.declareNull("anywheresoftware.b4a.agraham.byteconverter.ByteConverter"); -RemoteObject _uncompressed = RemoteObject.createImmutable(""); -; -Debug.locals.put("base64", _base64); - BA.debugLineNum = 52;BA.debugLine="Sub decompress(base64 As String) As String 'ignore"; -Debug.ShouldStop(524288); - BA.debugLineNum = 53;BA.debugLine="Dim decompressedbytes() As Byte = su.DecodeBase64"; -Debug.ShouldStop(1048576); -_decompressedbytes = subs._su.runMethod(false,"DecodeBase64",(Object)(_base64));Debug.locals.put("decompressedbytes", _decompressedbytes);Debug.locals.put("decompressedbytes", _decompressedbytes); - BA.debugLineNum = 55;BA.debugLine="Dim bc As ByteConverter"; -Debug.ShouldStop(4194304); -_bc = RemoteObject.createNew ("anywheresoftware.b4a.agraham.byteconverter.ByteConverter");Debug.locals.put("bc", _bc); - BA.debugLineNum = 56;BA.debugLine="Dim uncompressed As String = bc.StringFromBytes(d"; -Debug.ShouldStop(8388608); -_uncompressed = _bc.runMethod(true,"StringFromBytes",(Object)(_decompressedbytes),(Object)(RemoteObject.createImmutable("UTF8")));Debug.locals.put("uncompressed", _uncompressed);Debug.locals.put("uncompressed", _uncompressed); - BA.debugLineNum = 57;BA.debugLine="Log($\"Descomprimido: ${uncompressed.Length}\"$)"; -Debug.ShouldStop(16777216); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","310813445",(RemoteObject.concat(RemoteObject.createImmutable("Descomprimido: "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_uncompressed.runMethod(true,"length")))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 59;BA.debugLine="Return uncompressed"; -Debug.ShouldStop(67108864); -if (true) return _uncompressed; - BA.debugLineNum = 60;BA.debugLine="End Sub"; -Debug.ShouldStop(134217728); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _deleteerrorlog_db(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("deleteErrorLog_DB (subs) ","subs",9,_ba,subs.mostCurrent,168); -if (RapidSub.canDelegate("deleteerrorlog_db")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","deleteerrorlog_db", _ba);} -; - BA.debugLineNum = 168;BA.debugLine="Sub deleteErrorLog_DB 'ignore"; -Debug.ShouldStop(128); - BA.debugLineNum = 169;BA.debugLine="errorLog.ExecNonQuery(\"delete from errores\")"; -Debug.ShouldStop(256); -subs._errorlog.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from errores"))); - BA.debugLineNum = 170;BA.debugLine="errorLog.ExecNonQuery(\"vacuum;\")"; -Debug.ShouldStop(512); -subs._errorlog.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("vacuum;"))); - BA.debugLineNum = 171;BA.debugLine="ToastMessageShow(\"BD Errores Borrada\", False)"; -Debug.ShouldStop(1024); -subs.mostCurrent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("BD Errores Borrada")),(Object)(subs.mostCurrent.__c.getField(true,"False"))); - BA.debugLineNum = 172;BA.debugLine="End Sub"; -Debug.ShouldStop(2048); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _deletegps_db(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("deleteGPS_DB (subs) ","subs",9,_ba,subs.mostCurrent,161); -if (RapidSub.canDelegate("deletegps_db")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","deletegps_db", _ba);} -; - BA.debugLineNum = 161;BA.debugLine="Sub deleteGPS_DB 'ignore"; -Debug.ShouldStop(1); - BA.debugLineNum = 162;BA.debugLine="kmt.ExecNonQuery(\"delete from RUTA_GPS\")"; -Debug.ShouldStop(2); -subs._kmt.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from RUTA_GPS"))); - BA.debugLineNum = 163;BA.debugLine="kmt.ExecNonQuery(\"vacuum;\")"; -Debug.ShouldStop(4); -subs._kmt.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("vacuum;"))); - BA.debugLineNum = 164;BA.debugLine="ToastMessageShow(\"Borramos BD Coords GPS\", False)"; -Debug.ShouldStop(8); -subs.mostCurrent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Borramos BD Coords GPS")),(Object)(subs.mostCurrent.__c.getField(true,"False"))); - BA.debugLineNum = 165;BA.debugLine="End Sub"; -Debug.ShouldStop(16); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _fechainiciohoy(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("fechaInicioHoy (subs) ","subs",9,_ba,subs.mostCurrent,338); -if (RapidSub.canDelegate("fechainiciohoy")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","fechainiciohoy", _ba);} -RemoteObject _origformat = RemoteObject.createImmutable(""); -RemoteObject _h = RemoteObject.createImmutable(""); -; - BA.debugLineNum = 338;BA.debugLine="Sub fechaInicioHoy As String 'ignore"; -Debug.ShouldStop(131072); - BA.debugLineNum = 339;BA.debugLine="Dim OrigFormat As String = DateTime.DateFormat"; -Debug.ShouldStop(262144); -_origformat = subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getDateFormat");Debug.locals.put("OrigFormat", _origformat);Debug.locals.put("OrigFormat", _origformat); - BA.debugLineNum = 340;BA.debugLine="DateTime.DateFormat=\"yyMMdd\""; -Debug.ShouldStop(524288); -subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("yyMMdd")); - BA.debugLineNum = 341;BA.debugLine="Private h As String = DateTime.Date(DateTime.Now"; -Debug.ShouldStop(1048576); -_h = RemoteObject.concat(subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getNow"))),RemoteObject.createImmutable("000000"));Debug.locals.put("h", _h);Debug.locals.put("h", _h); - BA.debugLineNum = 342;BA.debugLine="DateTime.DateFormat=OrigFormat 'return to orig"; -Debug.ShouldStop(2097152); -subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",_origformat); - BA.debugLineNum = 343;BA.debugLine="Log(\"Hoy=\"&h)"; -Debug.ShouldStop(4194304); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311730949",RemoteObject.concat(RemoteObject.createImmutable("Hoy="),_h),0); - BA.debugLineNum = 344;BA.debugLine="Return h"; -Debug.ShouldStop(8388608); -if (true) return _h; - BA.debugLineNum = 345;BA.debugLine="End Sub"; -Debug.ShouldStop(16777216); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _fechakmt(RemoteObject _ba,RemoteObject _fecha) throws Exception{ -try { - Debug.PushSubsStack("fechaKMT (subs) ","subs",9,_ba,subs.mostCurrent,63); -if (RapidSub.canDelegate("fechakmt")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","fechakmt", _ba, _fecha);} -RemoteObject _origformat = RemoteObject.createImmutable(""); -RemoteObject _nuevafecha = RemoteObject.createImmutable(""); -; -Debug.locals.put("fecha", _fecha); - BA.debugLineNum = 63;BA.debugLine="Sub fechaKMT(fecha As String) As String 'ignore"; -Debug.ShouldStop(1073741824); - BA.debugLineNum = 65;BA.debugLine="Dim OrigFormat As String = DateTime.DateFormat '"; -Debug.ShouldStop(1); -_origformat = subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getDateFormat");Debug.locals.put("OrigFormat", _origformat);Debug.locals.put("OrigFormat", _origformat); - BA.debugLineNum = 66;BA.debugLine="DateTime.DateFormat=\"yyMMddHHmmss\""; -Debug.ShouldStop(2); -subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("yyMMddHHmmss")); - BA.debugLineNum = 67;BA.debugLine="Dim nuevaFecha As String=DateTime.Date(fecha)"; -Debug.ShouldStop(4); -_nuevafecha = subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(BA.numberCast(long.class, _fecha)));Debug.locals.put("nuevaFecha", _nuevafecha);Debug.locals.put("nuevaFecha", _nuevafecha); - BA.debugLineNum = 68;BA.debugLine="DateTime.DateFormat=OrigFormat 'return to orig d"; -Debug.ShouldStop(8); -subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",_origformat); - BA.debugLineNum = 70;BA.debugLine="Return nuevaFecha"; -Debug.ShouldStop(32); -if (true) return _nuevafecha; - BA.debugLineNum = 71;BA.debugLine="End Sub"; -Debug.ShouldStop(64); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _fechakmt2ticks(RemoteObject _ba,RemoteObject _fkmt) throws Exception{ -try { - Debug.PushSubsStack("fechaKMT2Ticks (subs) ","subs",9,_ba,subs.mostCurrent,553); -if (RapidSub.canDelegate("fechakmt2ticks")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","fechakmt2ticks", _ba, _fkmt);} -RemoteObject _partefecha = RemoteObject.createImmutable(""); -RemoteObject _partehora = RemoteObject.createImmutable(""); -RemoteObject _origformat = RemoteObject.createImmutable(""); -RemoteObject _ticks = RemoteObject.createImmutable(0L); -; -Debug.locals.put("fKMT", _fkmt); - BA.debugLineNum = 553;BA.debugLine="Sub fechaKMT2Ticks(fKMT As String) As Long 'ignore"; -Debug.ShouldStop(256); - BA.debugLineNum = 554;BA.debugLine="Try"; -Debug.ShouldStop(512); -try { BA.debugLineNum = 555;BA.debugLine="If fKMT.Length = 12 Then"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("=",_fkmt.runMethod(true,"length"),BA.numberCast(double.class, 12))) { - BA.debugLineNum = 556;BA.debugLine="Private parteFecha As String = fKMT.SubString2("; -Debug.ShouldStop(2048); -_partefecha = _fkmt.runMethod(true,"substring",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 6)));Debug.locals.put("parteFecha", _partefecha);Debug.locals.put("parteFecha", _partefecha); - BA.debugLineNum = 557;BA.debugLine="Private parteHora As String = fKMT.SubString(6)"; -Debug.ShouldStop(4096); -_partehora = _fkmt.runMethod(true,"substring",(Object)(BA.numberCast(int.class, 6)));Debug.locals.put("parteHora", _partehora);Debug.locals.put("parteHora", _partehora); - BA.debugLineNum = 558;BA.debugLine="Private OrigFormat As String = DateTime.DateFor"; -Debug.ShouldStop(8192); -_origformat = subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getDateFormat");Debug.locals.put("OrigFormat", _origformat);Debug.locals.put("OrigFormat", _origformat); - BA.debugLineNum = 559;BA.debugLine="DateTime.DateFormat=\"yymmdd\""; -Debug.ShouldStop(16384); -subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("yymmdd")); - BA.debugLineNum = 560;BA.debugLine="DateTime.TimeFormat=\"HHmmss\""; -Debug.ShouldStop(32768); -subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"setTimeFormat",BA.ObjectToString("HHmmss")); - BA.debugLineNum = 561;BA.debugLine="Private ticks As Long = DateTime.DateTimeParse("; -Debug.ShouldStop(65536); -_ticks = subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"DateTimeParse",(Object)(_partefecha),(Object)(_partehora));Debug.locals.put("ticks", _ticks);Debug.locals.put("ticks", _ticks); - BA.debugLineNum = 562;BA.debugLine="DateTime.DateFormat=OrigFormat 'return to orig"; -Debug.ShouldStop(131072); -subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",_origformat); - BA.debugLineNum = 563;BA.debugLine="Return ticks"; -Debug.ShouldStop(262144); -Debug.CheckDeviceExceptions();if (true) return _ticks; - }else { - BA.debugLineNum = 565;BA.debugLine="Log(\"Formato de fecha incorrecto, debe de ser '"; -Debug.ShouldStop(1048576); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312451852",RemoteObject.concat(RemoteObject.createImmutable("Formato de fecha incorrecto, debe de ser 'YYMMDDHHMMSS', no '"),_fkmt,RemoteObject.createImmutable("' largo="),_fkmt.runMethod(true,"length")),0); - BA.debugLineNum = 566;BA.debugLine="Return 0"; -Debug.ShouldStop(2097152); -Debug.CheckDeviceExceptions();if (true) return BA.numberCast(long.class, 0); - }; - Debug.CheckDeviceExceptions(); -} - catch (Exception e16) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e16.toString()); BA.debugLineNum = 569;BA.debugLine="Log(LastException)"; -Debug.ShouldStop(16777216); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312451856",BA.ObjectToString(subs.mostCurrent.__c.runMethod(false,"LastException",_ba)),0); - BA.debugLineNum = 570;BA.debugLine="LogColor($\"Fecha dada: ${fKMT}, Parte Fecha: ${p"; -Debug.ShouldStop(33554432); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312451857",(RemoteObject.concat(RemoteObject.createImmutable("Fecha dada: "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_fkmt))),RemoteObject.createImmutable(", Parte Fecha: "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_partefecha))),RemoteObject.createImmutable(", Parte Hora: "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_partehora))),RemoteObject.createImmutable(""))),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 571;BA.debugLine="Return 0"; -Debug.ShouldStop(67108864); -if (true) return BA.numberCast(long.class, 0); - }; - BA.debugLineNum = 573;BA.debugLine="End Sub"; -Debug.ShouldStop(268435456); -return RemoteObject.createImmutable(0L); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _fechanormal(RemoteObject _ba,RemoteObject _fecha) throws Exception{ -try { - Debug.PushSubsStack("fechanormal (subs) ","subs",9,_ba,subs.mostCurrent,1348); -if (RapidSub.canDelegate("fechanormal")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","fechanormal", _ba, _fecha);} -RemoteObject _origformat = RemoteObject.createImmutable(""); -RemoteObject _nuevafecha = RemoteObject.createImmutable(""); -; -Debug.locals.put("fecha", _fecha); - BA.debugLineNum = 1348;BA.debugLine="Sub fechanormal(fecha As String) As String 'ignore"; -Debug.ShouldStop(8); - BA.debugLineNum = 1350;BA.debugLine="Dim OrigFormat As String = DateTime.DateFormat '"; -Debug.ShouldStop(32); -_origformat = subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getDateFormat");Debug.locals.put("OrigFormat", _origformat);Debug.locals.put("OrigFormat", _origformat); - BA.debugLineNum = 1351;BA.debugLine="DateTime.DateFormat = \"YYYY/MM/dd HH:mm:ss\""; -Debug.ShouldStop(64); -subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("YYYY/MM/dd HH:mm:ss")); - BA.debugLineNum = 1352;BA.debugLine="Dim nuevaFecha As String=DateTime.Date(fecha)"; -Debug.ShouldStop(128); -_nuevafecha = subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(BA.numberCast(long.class, _fecha)));Debug.locals.put("nuevaFecha", _nuevafecha);Debug.locals.put("nuevaFecha", _nuevafecha); - BA.debugLineNum = 1353;BA.debugLine="DateTime.DateFormat = OrigFormat 'return to orig"; -Debug.ShouldStop(256); -subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",_origformat); - BA.debugLineNum = 1355;BA.debugLine="Return nuevaFecha"; -Debug.ShouldStop(1024); -if (true) return _nuevafecha; - BA.debugLineNum = 1356;BA.debugLine="End Sub"; -Debug.ShouldStop(2048); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getphnid(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("getPhnId (subs) ","subs",9,_ba,subs.mostCurrent,20); -if (RapidSub.canDelegate("getphnid")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","getphnid", _ba);} -RemoteObject _t = RemoteObject.createImmutable(""); -RemoteObject _s = RemoteObject.createImmutable(""); -; - BA.debugLineNum = 20;BA.debugLine="Sub getPhnId As String 'ignore"; -Debug.ShouldStop(524288); - BA.debugLineNum = 22;BA.debugLine="devModel = phn.Model"; -Debug.ShouldStop(2097152); -subs._devmodel = subs._phn.runMethod(true,"getModel"); - BA.debugLineNum = 23;BA.debugLine="If devModel.Length <= 3 Then 'Si phn.Model esta e"; -Debug.ShouldStop(4194304); -if (RemoteObject.solveBoolean("k",subs._devmodel.runMethod(true,"length"),BA.numberCast(double.class, 3))) { - BA.debugLineNum = 24;BA.debugLine="Dim t As String = phn.GetSettings(\"android_id\")"; -Debug.ShouldStop(8388608); -_t = subs._phn.runMethod(true,"GetSettings",(Object)(RemoteObject.createImmutable("android_id")));Debug.locals.put("t", _t);Debug.locals.put("t", _t); - BA.debugLineNum = 25;BA.debugLine="devModel = t"; -Debug.ShouldStop(16777216); -subs._devmodel = _t; - }; - BA.debugLineNum = 27;BA.debugLine="If devModel.Length >= 3 Then 'Si tenemos valor pa"; -Debug.ShouldStop(67108864); -if (RemoteObject.solveBoolean("g",subs._devmodel.runMethod(true,"length"),BA.numberCast(double.class, 3))) { - BA.debugLineNum = 28;BA.debugLine="File.WriteString(File.DirInternal, \"phnId.txt\","; -Debug.ShouldStop(134217728); -subs.mostCurrent.__c.getField(false,"File").runVoidMethod ("WriteString",(Object)(subs.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirInternal")),(Object)(BA.ObjectToString("phnId.txt")),(Object)(subs._devmodel)); - }else -{ BA.debugLineNum = 30;BA.debugLine="Else If devModel.Length < 3 Then ' Si no tenemos"; -Debug.ShouldStop(536870912); -if (RemoteObject.solveBoolean("<",subs._devmodel.runMethod(true,"length"),BA.numberCast(double.class, 3))) { - BA.debugLineNum = 31;BA.debugLine="Dim s As String = File.ReadString(File.DirIntern"; -Debug.ShouldStop(1073741824); -_s = subs.mostCurrent.__c.getField(false,"File").runMethod(true,"ReadString",(Object)(subs.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirInternal")),(Object)(RemoteObject.createImmutable("phnId.txt")));Debug.locals.put("s", _s);Debug.locals.put("s", _s); - BA.debugLineNum = 32;BA.debugLine="devModel = s"; -Debug.ShouldStop(-2147483648); -subs._devmodel = _s; - }} -; - BA.debugLineNum = 36;BA.debugLine="Return devModel"; -Debug.ShouldStop(8); -if (true) return subs._devmodel; - BA.debugLineNum = 37;BA.debugLine="End Sub"; -Debug.ShouldStop(16); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getssid(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("getSSID (subs) ","subs",9,_ba,subs.mostCurrent,286); -if (RapidSub.canDelegate("getssid")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","getssid", _ba);} -; - BA.debugLineNum = 286;BA.debugLine="Sub getSSID 'ignore"; -Debug.ShouldStop(536870912); - BA.debugLineNum = 291;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _guardaclientehorainicio(RemoteObject _ba,RemoteObject _cliente) throws Exception{ -try { - Debug.PushSubsStack("guardaClienteHoraInicio (subs) ","subs",9,_ba,subs.mostCurrent,1202); -if (RapidSub.canDelegate("guardaclientehorainicio")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","guardaclientehorainicio", _ba, _cliente);} -; -Debug.locals.put("cliente", _cliente); - BA.debugLineNum = 1202;BA.debugLine="Sub guardaClienteHoraInicio(cliente As String)"; -Debug.ShouldStop(131072); - BA.debugLineNum = 1203;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert into"; -Debug.ShouldStop(262144); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("insert into PEDIDO_INICIO_FINAL(PIF_CLIENTE, PIF_HORA_INICIO, PIF_HORA_FINAL) VALUES(?,?,?) ")),(Object)(subs.mostCurrent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {3},new Object[] {(_cliente),(subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getNow")),RemoteObject.createImmutable((0))}))))); - BA.debugLineNum = 1205;BA.debugLine="End Sub"; -Debug.ShouldStop(1048576); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _guardainfoenarchivo(RemoteObject _ba,RemoteObject _coords) throws Exception{ -try { - Debug.PushSubsStack("guardaInfoEnArchivo (subs) ","subs",9,_ba,subs.mostCurrent,102); -if (RapidSub.canDelegate("guardainfoenarchivo")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","guardainfoenarchivo", _ba, _coords);} -RemoteObject _origformat = RemoteObject.createImmutable(""); -RemoteObject _lastupdate = RemoteObject.createImmutable(""); -RemoteObject _ubic = RemoteObject.createImmutable(""); -RemoteObject _out = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -RemoteObject _s = RemoteObject.createImmutable(""); -RemoteObject _t = null; -; -Debug.locals.put("coords", _coords); - BA.debugLineNum = 102;BA.debugLine="Sub guardaInfoEnArchivo(coords As String) 'ignore"; -Debug.ShouldStop(32); - BA.debugLineNum = 104;BA.debugLine="Dim OrigFormat As String=DateTime.DateFormat 'sa"; -Debug.ShouldStop(128); -_origformat = subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getDateFormat");Debug.locals.put("OrigFormat", _origformat);Debug.locals.put("OrigFormat", _origformat); - BA.debugLineNum = 105;BA.debugLine="DateTime.DateFormat=\"MMM-dd HH:mm:ss\""; -Debug.ShouldStop(256); -subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("MMM-dd HH:mm:ss")); - BA.debugLineNum = 106;BA.debugLine="Dim lastUpdate As String=DateTime.Date(DateTime.N"; -Debug.ShouldStop(512); -_lastupdate = subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getNow")));Debug.locals.put("lastUpdate", _lastupdate);Debug.locals.put("lastUpdate", _lastupdate); - BA.debugLineNum = 107;BA.debugLine="DateTime.DateFormat=OrigFormat 'return to orig d"; -Debug.ShouldStop(1024); -subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",_origformat); - BA.debugLineNum = 109;BA.debugLine="Dim ubic As String = coords&\",\"&lastUpdate"; -Debug.ShouldStop(4096); -_ubic = RemoteObject.concat(_coords,RemoteObject.createImmutable(","),_lastupdate);Debug.locals.put("ubic", _ubic);Debug.locals.put("ubic", _ubic); - BA.debugLineNum = 110;BA.debugLine="Dim out As OutputStream = File.OpenOutput(File.Di"; -Debug.ShouldStop(8192); -_out = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper"); -_out = subs.mostCurrent.__c.getField(false,"File").runMethod(false,"OpenOutput",(Object)(subs.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirRootExternal")),(Object)(BA.ObjectToString("gps.txt")),(Object)(subs.mostCurrent.__c.getField(true,"True")));Debug.locals.put("out", _out);Debug.locals.put("out", _out); - BA.debugLineNum = 111;BA.debugLine="Dim s As String = ubic & CRLF"; -Debug.ShouldStop(16384); -_s = RemoteObject.concat(_ubic,subs.mostCurrent.__c.getField(true,"CRLF"));Debug.locals.put("s", _s);Debug.locals.put("s", _s); - BA.debugLineNum = 112;BA.debugLine="Dim t() As Byte = s.GetBytes(\"UTF-8\")"; -Debug.ShouldStop(32768); -_t = _s.runMethod(false,"getBytes",(Object)(RemoteObject.createImmutable("UTF-8")));Debug.locals.put("t", _t);Debug.locals.put("t", _t); - BA.debugLineNum = 113;BA.debugLine="out.WriteBytes(t, 0, t.Length)"; -Debug.ShouldStop(65536); -_out.runVoidMethod ("WriteBytes",(Object)(_t),(Object)(BA.numberCast(int.class, 0)),(Object)(_t.getField(true,"length"))); - BA.debugLineNum = 114;BA.debugLine="out.Close"; -Debug.ShouldStop(131072); -_out.runVoidMethod ("Close"); - BA.debugLineNum = 115;BA.debugLine="End Sub"; -Debug.ShouldStop(262144); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _guardainfoenbd(RemoteObject _ba,RemoteObject _coords) throws Exception{ -try { - Debug.PushSubsStack("guardaInfoEnBD (subs) ","subs",9,_ba,subs.mostCurrent,118); -if (RapidSub.canDelegate("guardainfoenbd")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","guardainfoenbd", _ba, _coords);} -RemoteObject _latlon = null; -; -Debug.locals.put("coords", _coords); - BA.debugLineNum = 118;BA.debugLine="Sub guardaInfoEnBD(coords As String) 'ignore"; -Debug.ShouldStop(2097152); - BA.debugLineNum = 119;BA.debugLine="Log(\"Guardamos ubicacion en BD - \"&coords)"; -Debug.ShouldStop(4194304); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311141121",RemoteObject.concat(RemoteObject.createImmutable("Guardamos ubicacion en BD - "),_coords),0); - BA.debugLineNum = 120;BA.debugLine="Try"; -Debug.ShouldStop(8388608); -try { BA.debugLineNum = 121;BA.debugLine="Dim latlon() As String = Regex.Split(\"\\|\", coord"; -Debug.ShouldStop(16777216); -_latlon = subs.mostCurrent.__c.getField(false,"Regex").runMethod(false,"Split",(Object)(BA.ObjectToString("\\|")),(Object)(_coords));Debug.locals.put("latlon", _latlon);Debug.locals.put("latlon", _latlon); - BA.debugLineNum = 122;BA.debugLine="If latlon.Length < 2 Then latlon = Regex.Split(\""; -Debug.ShouldStop(33554432); -if (RemoteObject.solveBoolean("<",_latlon.getField(true,"length"),BA.numberCast(double.class, 2))) { -_latlon = subs.mostCurrent.__c.getField(false,"Regex").runMethod(false,"Split",(Object)(BA.ObjectToString(",")),(Object)(_coords));Debug.locals.put("latlon", _latlon);}; - BA.debugLineNum = 123;BA.debugLine="If subsLogs Then Log(\"LatLon=\"&latlon)"; -Debug.ShouldStop(67108864); -if (subs._subslogs.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311141125",RemoteObject.concat(RemoteObject.createImmutable("LatLon="),_latlon),0);}; - BA.debugLineNum = 124;BA.debugLine="kmt.ExecNonQuery2(\"INSERT INTO RUTA_GPS(FECHA, L"; -Debug.ShouldStop(134217728); -subs._kmt.runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO RUTA_GPS(FECHA, LAT, LON) VALUES (?,?,?)")),(Object)(subs.mostCurrent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {3},new Object[] {(_latlon.getArrayElement(true,BA.numberCast(int.class, 2))),(_latlon.getArrayElement(true,BA.numberCast(int.class, 0))),(_latlon.getArrayElement(true,BA.numberCast(int.class, 1)))}))))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e8) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e8.toString()); BA.debugLineNum = 126;BA.debugLine="LogColor(LastException, Colors.red)"; -Debug.ShouldStop(536870912); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311141128",BA.ObjectToString(subs.mostCurrent.__c.runMethod(false,"LastException",_ba)),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - }; - BA.debugLineNum = 128;BA.debugLine="End Sub"; -Debug.ShouldStop(-2147483648); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _guardaproducto(RemoteObject _ba,RemoteObject _cedis,RemoteObject _costou,RemoteObject _cant,RemoteObject _nombre,RemoteObject _prodid,RemoteObject _clienteid,RemoteObject _fecha,RemoteObject _usuario,RemoteObject _rutav,RemoteObject _preciosin,RemoteObject _tipoventa) throws Exception{ -try { - Debug.PushSubsStack("guardaProducto (subs) ","subs",9,_ba,subs.mostCurrent,765); -if (RapidSub.canDelegate("guardaproducto")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","guardaproducto", _ba, _cedis, _costou, _cant, _nombre, _prodid, _clienteid, _fecha, _usuario, _rutav, _preciosin, _tipoventa);} -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -; -Debug.locals.put("cedis", _cedis); -Debug.locals.put("costoU", _costou); -Debug.locals.put("cant", _cant); -Debug.locals.put("nombre", _nombre); -Debug.locals.put("prodId", _prodid); -Debug.locals.put("clienteId", _clienteid); -Debug.locals.put("fecha", _fecha); -Debug.locals.put("usuario", _usuario); -Debug.locals.put("rutaV", _rutav); -Debug.locals.put("precioSin", _preciosin); -Debug.locals.put("tipoVenta", _tipoventa); - BA.debugLineNum = 765;BA.debugLine="Sub guardaProducto(cedis As String, costoU As Stri"; -Debug.ShouldStop(268435456); - BA.debugLineNum = 766;BA.debugLine="LogColor(\"guardaProducto: \"&prodId&\", cant=\"&cant"; -Debug.ShouldStop(536870912); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","313500417",RemoteObject.concat(RemoteObject.createImmutable("guardaProducto: "),_prodid,RemoteObject.createImmutable(", cant="),_cant),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Magenta")); - BA.debugLineNum = 767;BA.debugLine="Private c As Cursor"; -Debug.ShouldStop(1073741824); -_c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");Debug.locals.put("c", _c); - BA.debugLineNum = 768;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; -Debug.ShouldStop(-2147483648); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_COSTO_SIN,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?,?) ")),(Object)(subs.mostCurrent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {12},new Object[] {(_cedis),((RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, _cant),BA.numberCast(double.class, _costou)}, "*",0, 0))),(_costou),(_cant),(_nombre),(_prodid),(_clienteid),(_fecha),(_usuario),(_rutav),(_preciosin),(_tipoventa)}))))); - BA.debugLineNum = 769;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat_"; -Debug.ShouldStop(1); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ")),(Object)(subs.mostCurrent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(_cant),(_prodid)}))))); - BA.debugLineNum = 770;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(pe"; -Debug.ShouldStop(2); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, SUM(PE_COSTO_SIN) AS TOTAL_CLIE_SIN FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))));Debug.locals.put("c", _c); - BA.debugLineNum = 771;BA.debugLine="c.Position=0"; -Debug.ShouldStop(4); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 772;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(8); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"))); - BA.debugLineNum = 773;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert into"; -Debug.ShouldStop(16); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT,PC_ALMACEN,PC_RUTA,PC_COSTO_SIN) VALUES (?,?,?,?,?,?,?,?,?,?)")),(Object)(subs.mostCurrent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {9},new Object[] {(_clienteid),(_fecha),(_usuario),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CANT_CLIE")))),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_CLIE")))),(subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(true,"_lon_gps" /*RemoteObject*/ )),(subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(true,"_lat_gps" /*RemoteObject*/ )),(_cedis),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_CLIE_SIN"))))}))))); - BA.debugLineNum = 774;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_i"; -Debug.ShouldStop(32); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("UPDATE kmt_info set gestion = 2 where CAT_CL_CODIGO In (select cuenta from cuentaa)"))); - BA.debugLineNum = 775;BA.debugLine="End Sub"; -Debug.ShouldStop(64); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _guardaproductosingestion(RemoteObject _ba,RemoteObject _cedis,RemoteObject _costou,RemoteObject _cant,RemoteObject _nombre,RemoteObject _prodid,RemoteObject _clienteid,RemoteObject _fecha,RemoteObject _usuario,RemoteObject _rutav,RemoteObject _preciosin,RemoteObject _tipoventa) throws Exception{ -try { - Debug.PushSubsStack("guardaProductoSinGestion (subs) ","subs",9,_ba,subs.mostCurrent,780); -if (RapidSub.canDelegate("guardaproductosingestion")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","guardaproductosingestion", _ba, _cedis, _costou, _cant, _nombre, _prodid, _clienteid, _fecha, _usuario, _rutav, _preciosin, _tipoventa);} -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -; -Debug.locals.put("cedis", _cedis); -Debug.locals.put("costoU", _costou); -Debug.locals.put("cant", _cant); -Debug.locals.put("nombre", _nombre); -Debug.locals.put("prodId", _prodid); -Debug.locals.put("clienteId", _clienteid); -Debug.locals.put("fecha", _fecha); -Debug.locals.put("usuario", _usuario); -Debug.locals.put("rutaV", _rutav); -Debug.locals.put("precioSin", _preciosin); -Debug.locals.put("tipoVenta", _tipoventa); - BA.debugLineNum = 780;BA.debugLine="Sub guardaProductoSinGestion(cedis As String, cost"; -Debug.ShouldStop(2048); - BA.debugLineNum = 781;BA.debugLine="LogColor(\"guardaProductoSinGestion: \"&prodId&\", c"; -Debug.ShouldStop(4096); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","313565953",RemoteObject.concat(RemoteObject.createImmutable("guardaProductoSinGestion: "),_prodid,RemoteObject.createImmutable(", cant="),_cant),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Magenta")); - BA.debugLineNum = 782;BA.debugLine="Private c As Cursor"; -Debug.ShouldStop(8192); -_c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");Debug.locals.put("c", _c); - BA.debugLineNum = 783;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; -Debug.ShouldStop(16384); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_COSTO_SIN,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?,?) ")),(Object)(subs.mostCurrent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {12},new Object[] {(_cedis),((RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, _cant),BA.numberCast(double.class, _costou)}, "*",0, 0))),(_costou),(_cant),(_nombre),(_prodid),(_clienteid),(_fecha),(_usuario),(_rutav),(_preciosin),(_tipoventa)}))))); - BA.debugLineNum = 784;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat_"; -Debug.ShouldStop(32768); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ")),(Object)(subs.mostCurrent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(_cant),(_prodid)}))))); - BA.debugLineNum = 785;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(pe"; -Debug.ShouldStop(65536); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, SUM(PE_COSTO_SIN) AS TOTAL_CLIE_SIN FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))));Debug.locals.put("c", _c); - BA.debugLineNum = 786;BA.debugLine="c.Position=0"; -Debug.ShouldStop(131072); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 787;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -Debug.ShouldStop(262144); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"))); - BA.debugLineNum = 788;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert into"; -Debug.ShouldStop(524288); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT,PC_ALMACEN,PC_RUTA,PC_COSTO_SIN) VALUES (?,?,?,?,?,?,?,?,?,?)")),(Object)(subs.mostCurrent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {9},new Object[] {(_clienteid),(_fecha),(_usuario),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CANT_CLIE")))),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_CLIE")))),(subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(true,"_lon_gps" /*RemoteObject*/ )),(subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(true,"_lat_gps" /*RemoteObject*/ )),(_cedis),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("TOTAL_CLIE_SIN"))))}))))); - BA.debugLineNum = 789;BA.debugLine="End Sub"; -Debug.ShouldStop(1048576); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _haypedido(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("hayPedido (subs) ","subs",9,_ba,subs.mostCurrent,1269); -if (RapidSub.canDelegate("haypedido")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","haypedido", _ba);} -RemoteObject _thisc = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -RemoteObject _hay = RemoteObject.createImmutable(false); -; - BA.debugLineNum = 1269;BA.debugLine="Sub hayPedido As Boolean"; -Debug.ShouldStop(1048576); - BA.debugLineNum = 1270;BA.debugLine="Private thisC As Cursor=B4XPages.MainPage.skmt.Ex"; -Debug.ShouldStop(2097152); -_thisc = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -_thisc = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("select count(PE_CLIENTE) as hayPedido from PEDIDO where PE_CLIENTE = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_traecliente(_ba)))),RemoteObject.createImmutable("'"))))));Debug.locals.put("thisC", _thisc);Debug.locals.put("thisC", _thisc); - BA.debugLineNum = 1271;BA.debugLine="thisC.Position=0"; -Debug.ShouldStop(4194304); -_thisc.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 1272;BA.debugLine="Private hay As Boolean = False"; -Debug.ShouldStop(8388608); -_hay = subs.mostCurrent.__c.getField(true,"False");Debug.locals.put("hay", _hay);Debug.locals.put("hay", _hay); - BA.debugLineNum = 1273;BA.debugLine="If thisC.GetInt(\"hayPedido\") > 0 Then hay = True"; -Debug.ShouldStop(16777216); -if (RemoteObject.solveBoolean(">",_thisc.runMethod(true,"GetInt",(Object)(RemoteObject.createImmutable("hayPedido"))),BA.numberCast(double.class, 0))) { -_hay = subs.mostCurrent.__c.getField(true,"True");Debug.locals.put("hay", _hay);}; - BA.debugLineNum = 1275;BA.debugLine="Return hay"; -Debug.ShouldStop(67108864); -if (true) return _hay; - BA.debugLineNum = 1276;BA.debugLine="End Sub"; -Debug.ShouldStop(134217728); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _iniciaactividad(RemoteObject _ba,RemoteObject _ia) throws Exception{ -try { - Debug.PushSubsStack("iniciaActividad (subs) ","subs",9,_ba,subs.mostCurrent,1359); -if (RapidSub.canDelegate("iniciaactividad")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","iniciaactividad", _ba, _ia);} -; -Debug.locals.put("ia", _ia); - BA.debugLineNum = 1359;BA.debugLine="Sub iniciaActividad(ia As String)"; -Debug.ShouldStop(16384); - BA.debugLineNum = 1360;BA.debugLine="If ia <> \"\" And ia <> Null Then"; -Debug.ShouldStop(32768); -if (RemoteObject.solveBoolean("!",_ia,BA.ObjectToString("")) && RemoteObject.solveBoolean("N",_ia)) { - BA.debugLineNum = 1362;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete fro"; -Debug.ShouldStop(131072); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("delete from CAT_VARIABLES where CAT_VA_DESCRIPCION = ?")),(Object)(subs.mostCurrent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(RemoteObject.createImmutable("ULTIMOMODULO"))}))))); - BA.debugLineNum = 1363;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -Debug.ShouldStop(262144); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO CAT_VARIABLES(CAT_VA_DESCRIPCION, CAT_VA_VALOR) VALUES (?,?)")),(Object)(subs.mostCurrent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {RemoteObject.createImmutable(("ULTIMOMODULO")),(_ia)}))))); - BA.debugLineNum = 1364;BA.debugLine="B4XPages.ShowPage(ia)"; -Debug.ShouldStop(524288); -subs.mostCurrent._b4xpages.runVoidMethod ("_showpage" /*RemoteObject*/ ,_ba,(Object)(_ia)); - }; - BA.debugLineNum = 1367;BA.debugLine="End Sub"; -Debug.ShouldStop(4194304); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _insertarenglonespruebaenerrorlog(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("insertaRenglonesPruebaEnErrorLog (subs) ","subs",9,_ba,subs.mostCurrent,513); -if (RapidSub.canDelegate("insertarenglonespruebaenerrorlog")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","insertarenglonespruebaenerrorlog", _ba);} -int _x = 0; -; - BA.debugLineNum = 513;BA.debugLine="Sub insertaRenglonesPruebaEnErrorLog 'ignore"; -Debug.ShouldStop(1); - BA.debugLineNum = 514;BA.debugLine="revisaBD"; -Debug.ShouldStop(2); -_revisabd(_ba); - BA.debugLineNum = 515;BA.debugLine="Log(\"insertamos 50 renglones a errorLog\")"; -Debug.ShouldStop(4); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312320770",RemoteObject.createImmutable("insertamos 50 renglones a errorLog"),0); - BA.debugLineNum = 516;BA.debugLine="For x = 1 To 50"; -Debug.ShouldStop(8); -{ -final int step3 = 1; -final int limit3 = 50; -_x = 1 ; -for (;(step3 > 0 && _x <= limit3) || (step3 < 0 && _x >= limit3) ;_x = ((int)(0 + _x + step3)) ) { -Debug.locals.put("x", _x); - BA.debugLineNum = 517;BA.debugLine="errorLog.ExecNonQuery2(\"INSERT INTO errores(fech"; -Debug.ShouldStop(16); -subs._errorlog.runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO errores(fecha, error) VALUES (?,?)")),(Object)(subs.mostCurrent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(_fechakmt(_ba,BA.NumberToString(subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getNow")))),(RemoteObject.createImmutable("abc"))}))))); - BA.debugLineNum = 518;BA.debugLine="Log(x)"; -Debug.ShouldStop(32); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312320773",BA.NumberToString(_x),0); - } -}Debug.locals.put("x", _x); -; - BA.debugLineNum = 520;BA.debugLine="End Sub"; -Debug.ShouldStop(128); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _installapk(RemoteObject _ba,RemoteObject _dir,RemoteObject _apk) throws Exception{ -try { - Debug.PushSubsStack("InstallAPK (subs) ","subs",9,_ba,subs.mostCurrent,575); -if (RapidSub.canDelegate("installapk")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","installapk", _ba, _dir, _apk);} -RemoteObject _i = RemoteObject.declareNull("anywheresoftware.b4a.objects.IntentWrapper"); -; -Debug.locals.put("dir", _dir); -Debug.locals.put("apk", _apk); - BA.debugLineNum = 575;BA.debugLine="Sub InstallAPK(dir As String, apk As String) 'igno"; -Debug.ShouldStop(1073741824); - BA.debugLineNum = 576;BA.debugLine="If File.Exists(dir, apk) Then"; -Debug.ShouldStop(-2147483648); -if (subs.mostCurrent.__c.getField(false,"File").runMethod(true,"Exists",(Object)(_dir),(Object)(_apk)).get().booleanValue()) { - BA.debugLineNum = 577;BA.debugLine="Dim i As Intent"; -Debug.ShouldStop(1); -_i = RemoteObject.createNew ("anywheresoftware.b4a.objects.IntentWrapper");Debug.locals.put("i", _i); - BA.debugLineNum = 578;BA.debugLine="i.Initialize(i.ACTION_VIEW, \"file://\" & File.Com"; -Debug.ShouldStop(2); -_i.runVoidMethod ("Initialize",(Object)(_i.getField(true,"ACTION_VIEW")),(Object)(RemoteObject.concat(RemoteObject.createImmutable("file://"),subs.mostCurrent.__c.getField(false,"File").runMethod(true,"Combine",(Object)(_dir),(Object)(_apk))))); - BA.debugLineNum = 579;BA.debugLine="i.SetType(\"application/vnd.android.package-archi"; -Debug.ShouldStop(4); -_i.runVoidMethod ("SetType",(Object)(RemoteObject.createImmutable("application/vnd.android.package-archive"))); - BA.debugLineNum = 580;BA.debugLine="StartActivity(i)"; -Debug.ShouldStop(8); -subs.mostCurrent.__c.runVoidMethod ("StartActivity",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba),(Object)((_i.getObject()))); - }; - BA.debugLineNum = 582;BA.debugLine="End Sub"; -Debug.ShouldStop(32); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _json2map(RemoteObject _ba,RemoteObject _thejson) throws Exception{ -try { - Debug.PushSubsStack("JSON2Map (subs) ","subs",9,_ba,subs.mostCurrent,294); -if (RapidSub.canDelegate("json2map")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","json2map", _ba, _thejson);} -RemoteObject _json = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.JSONParser"); -RemoteObject _m = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -; -Debug.locals.put("theJson", _thejson); - BA.debugLineNum = 294;BA.debugLine="Sub JSON2Map(theJson As String) As Map 'ignore"; -Debug.ShouldStop(32); - BA.debugLineNum = 296;BA.debugLine="Try"; -Debug.ShouldStop(128); -try { BA.debugLineNum = 297;BA.debugLine="Private json As JSONParser"; -Debug.ShouldStop(256); -_json = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.JSONParser");Debug.locals.put("json", _json); - BA.debugLineNum = 298;BA.debugLine="json.Initialize(theJson)"; -Debug.ShouldStop(512); -_json.runVoidMethod ("Initialize",(Object)(_thejson)); - BA.debugLineNum = 299;BA.debugLine="Return json.NextObject"; -Debug.ShouldStop(1024); -Debug.CheckDeviceExceptions();if (true) return _json.runMethod(false,"NextObject"); - Debug.CheckDeviceExceptions(); -} - catch (Exception e6) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e6.toString()); BA.debugLineNum = 301;BA.debugLine="Log(LastException)"; -Debug.ShouldStop(4096); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311599879",BA.ObjectToString(subs.mostCurrent.__c.runMethod(false,"LastException",_ba)),0); - BA.debugLineNum = 302;BA.debugLine="log2DB(\"JSON2Map: \"&LastException)"; -Debug.ShouldStop(8192); -_log2db(_ba,RemoteObject.concat(RemoteObject.createImmutable("JSON2Map: "),subs.mostCurrent.__c.runMethod(false,"LastException",_ba))); - BA.debugLineNum = 303;BA.debugLine="Private m As Map = CreateMap(\"title\":\"Error gene"; -Debug.ShouldStop(16384); -_m = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_m = subs.mostCurrent.__c.runMethod(false, "createMap", (Object)(new RemoteObject[] {RemoteObject.createImmutable(("title")),RemoteObject.createImmutable(("Error generating JSON")),RemoteObject.createImmutable(("t")),RemoteObject.createImmutable(("Error")),RemoteObject.createImmutable(("Message")),(subs.mostCurrent.__c.runMethod(false,"LastException",_ba).getObject()),RemoteObject.createImmutable(("text")),(subs.mostCurrent.__c.runMethod(false,"LastException",_ba).getObject())}));Debug.locals.put("m", _m);Debug.locals.put("m", _m); - BA.debugLineNum = 304;BA.debugLine="Return m"; -Debug.ShouldStop(32768); -if (true) return _m; - }; - BA.debugLineNum = 306;BA.debugLine="End Sub"; -Debug.ShouldStop(131072); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _log2db(RemoteObject _ba,RemoteObject _texto) throws Exception{ -try { - Debug.PushSubsStack("log2DB (subs) ","subs",9,_ba,subs.mostCurrent,348); -if (RapidSub.canDelegate("log2db")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","log2db", _ba, _texto);} -; -Debug.locals.put("texto", _texto); - BA.debugLineNum = 348;BA.debugLine="Sub log2DB(texto As String) 'ignore"; -Debug.ShouldStop(134217728); - BA.debugLineNum = 349;BA.debugLine="LogColor(fechaKMT(DateTime.Now)&\" - log2BD: '\"&te"; -Debug.ShouldStop(268435456); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311796481",RemoteObject.concat(_fechakmt(_ba,BA.NumberToString(subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getNow"))),RemoteObject.createImmutable(" - log2BD: '"),_texto,RemoteObject.createImmutable("'")),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"LightGray")); - BA.debugLineNum = 350;BA.debugLine="kmt.ExecNonQuery2(\"INSERT INTO bitacora(fecha, te"; -Debug.ShouldStop(536870912); -subs._kmt.runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO bitacora(fecha, texto) VALUES (?,?)")),(Object)(subs.mostCurrent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {2},new Object[] {(_fechakmt(_ba,BA.NumberToString(subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getNow")))),(_texto)}))))); - BA.debugLineNum = 351;BA.debugLine="End Sub"; -Debug.ShouldStop(1073741824); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _map2json(RemoteObject _ba,RemoteObject _m) throws Exception{ -try { - Debug.PushSubsStack("map2JSON (subs) ","subs",9,_ba,subs.mostCurrent,309); -if (RapidSub.canDelegate("map2json")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","map2json", _ba, _m);} -RemoteObject _jg = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.JSONParser.JSONGenerator"); -RemoteObject _t = RemoteObject.createImmutable(""); -; -Debug.locals.put("m", _m); - BA.debugLineNum = 309;BA.debugLine="Sub map2JSON(m As Map) As String 'ignore"; -Debug.ShouldStop(1048576); - BA.debugLineNum = 312;BA.debugLine="Dim jg As JSONGenerator"; -Debug.ShouldStop(8388608); -_jg = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.JSONParser.JSONGenerator");Debug.locals.put("jg", _jg); - BA.debugLineNum = 313;BA.debugLine="jg.Initialize(m)"; -Debug.ShouldStop(16777216); -_jg.runVoidMethod ("Initialize",(Object)(_m)); - BA.debugLineNum = 314;BA.debugLine="Dim t As String = jg.ToString"; -Debug.ShouldStop(33554432); -_t = _jg.runMethod(true,"ToString");Debug.locals.put("t", _t);Debug.locals.put("t", _t); - BA.debugLineNum = 315;BA.debugLine="Return t"; -Debug.ShouldStop(67108864); -if (true) return _t; - BA.debugLineNum = 316;BA.debugLine="End Sub"; -Debug.ShouldStop(134217728); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _masdexxmins(RemoteObject _ba,RemoteObject _hora,RemoteObject _mins) throws Exception{ -try { - Debug.PushSubsStack("masDeXXMins (subs) ","subs",9,_ba,subs.mostCurrent,354); -if (RapidSub.canDelegate("masdexxmins")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","masdexxmins", _ba, _hora, _mins);} -; -Debug.locals.put("hora", _hora); -Debug.locals.put("mins", _mins); - BA.debugLineNum = 354;BA.debugLine="Sub masDeXXMins(hora As Int, mins As Int) As Boole"; -Debug.ShouldStop(2); - BA.debugLineNum = 355;BA.debugLine="If (hora + mins * DateTime.TicksPerMinute) < Date"; -Debug.ShouldStop(4); -if (RemoteObject.solveBoolean("<",(RemoteObject.solve(new RemoteObject[] {_hora,_mins,subs.mostCurrent.__c.getField(false,"DateTime").getField(true,"TicksPerMinute")}, "+*",1, 2)),subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getNow"))) { - BA.debugLineNum = 356;BA.debugLine="Return True"; -Debug.ShouldStop(8); -if (true) return subs.mostCurrent.__c.getField(true,"True"); - }else { - BA.debugLineNum = 358;BA.debugLine="Return False"; -Debug.ShouldStop(32); -if (true) return subs.mostCurrent.__c.getField(true,"False"); - }; - BA.debugLineNum = 360;BA.debugLine="End Sub"; -Debug.ShouldStop(128); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _masdexxminskmt(RemoteObject _ba,RemoteObject _hora,RemoteObject _mins) throws Exception{ -try { - Debug.PushSubsStack("masDeXXMinsKMT (subs) ","subs",9,_ba,subs.mostCurrent,363); -if (RapidSub.canDelegate("masdexxminskmt")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","masdexxminskmt", _ba, _hora, _mins);} -; -Debug.locals.put("hora", _hora); -Debug.locals.put("mins", _mins); - BA.debugLineNum = 363;BA.debugLine="Sub masDeXXMinsKMT(hora As String, mins As Int) As"; -Debug.ShouldStop(1024); - BA.debugLineNum = 364;BA.debugLine="Try"; -Debug.ShouldStop(2048); -try { BA.debugLineNum = 366;BA.debugLine="If fechaKMT2Ticks(hora) + mins * DateTime.TicksP"; -Debug.ShouldStop(8192); -if (RemoteObject.solveBoolean("<",RemoteObject.solve(new RemoteObject[] {_fechakmt2ticks(_ba,_hora),_mins,subs.mostCurrent.__c.getField(false,"DateTime").getField(true,"TicksPerMinute")}, "+*",1, 2),subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getNow"))) { - BA.debugLineNum = 368;BA.debugLine="Return True"; -Debug.ShouldStop(32768); -Debug.CheckDeviceExceptions();if (true) return subs.mostCurrent.__c.getField(true,"True"); - }else { - BA.debugLineNum = 371;BA.debugLine="Return False"; -Debug.ShouldStop(262144); -Debug.CheckDeviceExceptions();if (true) return subs.mostCurrent.__c.getField(true,"False"); - }; - Debug.CheckDeviceExceptions(); -} - catch (Exception e8) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e8.toString()); BA.debugLineNum = 374;BA.debugLine="Log(LastException)"; -Debug.ShouldStop(2097152); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311927563",BA.ObjectToString(subs.mostCurrent.__c.runMethod(false,"LastException",_ba)),0); - }; - BA.debugLineNum = 376;BA.debugLine="End Sub"; -Debug.ShouldStop(8388608); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _notihigh(RemoteObject _ba,RemoteObject _title,RemoteObject _body,RemoteObject _activity) throws Exception{ -try { - Debug.PushSubsStack("notiHigh (subs) ","subs",9,_ba,subs.mostCurrent,74); -if (RapidSub.canDelegate("notihigh")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","notihigh", _ba, _title, _body, _activity);} -RemoteObject _notif = RemoteObject.declareNull("anywheresoftware.b4a.objects.NotificationWrapper"); -; -Debug.locals.put("title", _title); -Debug.locals.put("body", _body); -Debug.locals.put("activity", _activity); - BA.debugLineNum = 74;BA.debugLine="Sub notiHigh(title As String, body As String, acti"; -Debug.ShouldStop(512); - BA.debugLineNum = 75;BA.debugLine="Private notif As Notification"; -Debug.ShouldStop(1024); -_notif = RemoteObject.createNew ("anywheresoftware.b4a.objects.NotificationWrapper");Debug.locals.put("notif", _notif); - BA.debugLineNum = 76;BA.debugLine="notif.Initialize2(notif.IMPORTANCE_HIGH)"; -Debug.ShouldStop(2048); -_notif.runVoidMethod ("Initialize2",(Object)(_notif.getField(true,"IMPORTANCE_HIGH"))); - BA.debugLineNum = 77;BA.debugLine="notif.Icon = \"icon\""; -Debug.ShouldStop(4096); -_notif.runVoidMethod ("setIcon",BA.ObjectToString("icon")); - BA.debugLineNum = 78;BA.debugLine="notif.Vibrate = False"; -Debug.ShouldStop(8192); -_notif.runVoidMethod ("setVibrate",subs.mostCurrent.__c.getField(true,"False")); - BA.debugLineNum = 79;BA.debugLine="notif.Sound = False"; -Debug.ShouldStop(16384); -_notif.runVoidMethod ("setSound",subs.mostCurrent.__c.getField(true,"False")); - BA.debugLineNum = 80;BA.debugLine="notif.AutoCancel = True"; -Debug.ShouldStop(32768); -_notif.runVoidMethod ("setAutoCancel",subs.mostCurrent.__c.getField(true,"True")); - BA.debugLineNum = 81;BA.debugLine="Log(\"notiHigh: \"&title)"; -Debug.ShouldStop(65536); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","310944519",RemoteObject.concat(RemoteObject.createImmutable("notiHigh: "),_title),0); - BA.debugLineNum = 82;BA.debugLine="notif.SetInfo(title, body, activity)"; -Debug.ShouldStop(131072); -_notif.runVoidMethod ("SetInfoNew",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba),(Object)(BA.ObjectToCharSequence(_title)),(Object)(BA.ObjectToCharSequence(_body)),(Object)(_activity)); - BA.debugLineNum = 84;BA.debugLine="notif.Notify(777)"; -Debug.ShouldStop(524288); -_notif.runVoidMethod ("Notify",(Object)(BA.numberCast(int.class, 777))); - BA.debugLineNum = 85;BA.debugLine="End Sub"; -Debug.ShouldStop(1048576); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _notilowreturn(RemoteObject _ba,RemoteObject _title,RemoteObject _body,RemoteObject _id) throws Exception{ -try { - Debug.PushSubsStack("notiLowReturn (subs) ","subs",9,_ba,subs.mostCurrent,88); -if (RapidSub.canDelegate("notilowreturn")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","notilowreturn", _ba, _title, _body, _id);} -RemoteObject _notification = RemoteObject.declareNull("anywheresoftware.b4a.objects.NotificationWrapper"); -; -Debug.locals.put("title", _title); -Debug.locals.put("Body", _body); -Debug.locals.put("id", _id); - BA.debugLineNum = 88;BA.debugLine="Sub notiLowReturn(title As String, Body As String,"; -Debug.ShouldStop(8388608); - BA.debugLineNum = 89;BA.debugLine="Private notification As Notification"; -Debug.ShouldStop(16777216); -_notification = RemoteObject.createNew ("anywheresoftware.b4a.objects.NotificationWrapper");Debug.locals.put("notification", _notification); - BA.debugLineNum = 90;BA.debugLine="notification.Initialize2(notification.IMPORTANCE_"; -Debug.ShouldStop(33554432); -_notification.runVoidMethod ("Initialize2",(Object)(_notification.getField(true,"IMPORTANCE_LOW"))); - BA.debugLineNum = 91;BA.debugLine="Log(\"notiLowReturn: \"&title)"; -Debug.ShouldStop(67108864); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311010051",RemoteObject.concat(RemoteObject.createImmutable("notiLowReturn: "),_title),0); - BA.debugLineNum = 92;BA.debugLine="notification.Icon = \"icon\""; -Debug.ShouldStop(134217728); -_notification.runVoidMethod ("setIcon",BA.ObjectToString("icon")); - BA.debugLineNum = 93;BA.debugLine="notification.Sound = False"; -Debug.ShouldStop(268435456); -_notification.runVoidMethod ("setSound",subs.mostCurrent.__c.getField(true,"False")); - BA.debugLineNum = 94;BA.debugLine="notification.Vibrate = False"; -Debug.ShouldStop(536870912); -_notification.runVoidMethod ("setVibrate",subs.mostCurrent.__c.getField(true,"False")); - BA.debugLineNum = 95;BA.debugLine="notification.SetInfo(title, Body, Main)"; -Debug.ShouldStop(1073741824); -_notification.runVoidMethod ("SetInfoNew",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba),(Object)(BA.ObjectToCharSequence(_title)),(Object)(BA.ObjectToCharSequence(_body)),(Object)((subs.mostCurrent._main.getObject()))); - BA.debugLineNum = 96;BA.debugLine="notification.Notify(id)"; -Debug.ShouldStop(-2147483648); -_notification.runVoidMethod ("Notify",(Object)(_id)); - BA.debugLineNum = 98;BA.debugLine="Return notification"; -Debug.ShouldStop(2); -if (true) return _notification; - BA.debugLineNum = 99;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _panelvisible(RemoteObject _ba,RemoteObject _panel,RemoteObject _top,RemoteObject _left) throws Exception{ -try { - Debug.PushSubsStack("panelVisible (subs) ","subs",9,_ba,subs.mostCurrent,619); -if (RapidSub.canDelegate("panelvisible")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","panelvisible", _ba, _panel, _top, _left);} -; -Debug.locals.put("panel", _panel); -Debug.locals.put("top", _top); -Debug.locals.put("left", _left); - BA.debugLineNum = 619;BA.debugLine="Sub panelVisible(panel As Panel, top As Int, left"; -Debug.ShouldStop(1024); - BA.debugLineNum = 620;BA.debugLine="panel.BringToFront"; -Debug.ShouldStop(2048); -_panel.runVoidMethod ("BringToFront"); - BA.debugLineNum = 621;BA.debugLine="panel.Visible = True"; -Debug.ShouldStop(4096); -_panel.runMethod(true,"setVisible",subs.mostCurrent.__c.getField(true,"True")); - BA.debugLineNum = 622;BA.debugLine="panel.Top = top"; -Debug.ShouldStop(8192); -_panel.runMethod(true,"setTop",_top); - BA.debugLineNum = 623;BA.debugLine="panel.Left = left"; -Debug.ShouldStop(16384); -_panel.runMethod(true,"setLeft",_left); - BA.debugLineNum = 624;BA.debugLine="End Sub"; -Debug.ShouldStop(32768); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _pedidoguardado(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("pedidoGuardado (subs) ","subs",9,_ba,subs.mostCurrent,1257); -if (RapidSub.canDelegate("pedidoguardado")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","pedidoguardado", _ba);} -RemoteObject _guardado = RemoteObject.createImmutable(false); -RemoteObject _g = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -; - BA.debugLineNum = 1257;BA.debugLine="Sub pedidoGuardado As Boolean"; -Debug.ShouldStop(256); - BA.debugLineNum = 1258;BA.debugLine="Private guardado As Boolean = False"; -Debug.ShouldStop(512); -_guardado = subs.mostCurrent.__c.getField(true,"False");Debug.locals.put("guardado", _guardado);Debug.locals.put("guardado", _guardado); - BA.debugLineNum = 1259;BA.debugLine="Private g As Cursor = B4XPages.MainPage.skmt.Exec"; -Debug.ShouldStop(1024); -_g = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -_g = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select gestion from kmt_info where CAT_CL_CODIGO in (Select CUENTA from cuentaa)"))));Debug.locals.put("g", _g);Debug.locals.put("g", _g); - BA.debugLineNum = 1260;BA.debugLine="If g.RowCount > 0 Then"; -Debug.ShouldStop(2048); -if (RemoteObject.solveBoolean(">",_g.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 1261;BA.debugLine="g.Position=0"; -Debug.ShouldStop(4096); -_g.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 1262;BA.debugLine="If g.GetString(\"gestion\") = \"2\" Then guardado ="; -Debug.ShouldStop(8192); -if (RemoteObject.solveBoolean("=",_g.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("gestion"))),BA.ObjectToString("2"))) { -_guardado = subs.mostCurrent.__c.getField(true,"True");Debug.locals.put("guardado", _guardado);}; - }; - BA.debugLineNum = 1264;BA.debugLine="Log($\"Guardado=${guardado}\"$)"; -Debug.ShouldStop(32768); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314745607",(RemoteObject.concat(RemoteObject.createImmutable("Guardado="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_guardado))),RemoteObject.createImmutable(""))),0); - BA.debugLineNum = 1265;BA.debugLine="Return guardado"; -Debug.ShouldStop(65536); -if (true) return _guardado; - BA.debugLineNum = 1266;BA.debugLine="End Sub"; -Debug.ShouldStop(131072); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _procesapromocion(RemoteObject _ba,RemoteObject _idpromo,RemoteObject _cliente) throws Exception{ -try { - Debug.PushSubsStack("procesaPromocion (subs) ","subs",9,_ba,subs.mostCurrent,1002); -if (RapidSub.canDelegate("procesapromocion")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","procesapromocion", _ba, _idpromo, _cliente);} -RemoteObject _thislog = RemoteObject.createImmutable(false); -RemoteObject _iniciocontador = RemoteObject.createImmutable(""); -RemoteObject _pm = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -RemoteObject _inventariosinfijos = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -RemoteObject _pv = RemoteObject.createImmutable(false); -; -Debug.locals.put("idPromo", _idpromo); -Debug.locals.put("cliente", _cliente); - BA.debugLineNum = 1002;BA.debugLine="Sub procesaPromocion(idPromo As String, cliente As"; -Debug.ShouldStop(512); - BA.debugLineNum = 1003;BA.debugLine="Private thisLog As Boolean = False 'Si es verdad"; -Debug.ShouldStop(1024); -_thislog = subs.mostCurrent.__c.getField(true,"False");Debug.locals.put("thisLog", _thislog);Debug.locals.put("thisLog", _thislog); - BA.debugLineNum = 1004;BA.debugLine="Private inicioContador As String = DateTime.Now"; -Debug.ShouldStop(2048); -_iniciocontador = BA.NumberToString(subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getNow"));Debug.locals.put("inicioContador", _iniciocontador);Debug.locals.put("inicioContador", _iniciocontador); - BA.debugLineNum = 1005;BA.debugLine="If thisLog Then LogColor($\"********* Iniciamos re"; -Debug.ShouldStop(4096); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314090243",(RemoteObject.concat(RemoteObject.createImmutable("********* Iniciamos revision de Promo "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_idpromo))),RemoteObject.createImmutable(" *********"))),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Magenta"));}; - BA.debugLineNum = 1007;BA.debugLine="Private pm As Map = traePromo(idPromo, cliente)"; -Debug.ShouldStop(16384); -_pm = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_pm = _traepromo(_ba,_idpromo,_cliente);Debug.locals.put("pm", _pm);Debug.locals.put("pm", _pm); - BA.debugLineNum = 1008;BA.debugLine="If thisLog Then LogColor(pm, Colors.Blue)"; -Debug.ShouldStop(32768); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314090246",BA.ObjectToString(_pm),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Blue"));}; - BA.debugLineNum = 1009;BA.debugLine="If pm.Get(\"resultado\") = \"ok\" Then 'Si encontramo"; -Debug.ShouldStop(65536); -if (RemoteObject.solveBoolean("=",_pm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("resultado")))),RemoteObject.createImmutable(("ok")))) { - BA.debugLineNum = 1011;BA.debugLine="If thisLog Then LogColor($\"Promociones permitida"; -Debug.ShouldStop(262144); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314090249",(RemoteObject.concat(RemoteObject.createImmutable("Promociones permitidas="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_traemaxpromos(_ba,_pm)))),RemoteObject.createImmutable(""))),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Blue"));}; - BA.debugLineNum = 1012;BA.debugLine="If thisLog Then Log(\"Promos vendidas: \" & traePr"; -Debug.ShouldStop(524288); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314090250",RemoteObject.concat(RemoteObject.createImmutable("Promos vendidas: "),_traepromosvendidas(_ba,_idpromo,_cliente)),0);}; - BA.debugLineNum = 1013;BA.debugLine="If traePromosVendidas(idPromo, cliente) >= traeM"; -Debug.ShouldStop(1048576); -if (RemoteObject.solveBoolean("g",_traepromosvendidas(_ba,_idpromo,_cliente),BA.numberCast(double.class, _traemaxpromos(_ba,_pm)))) { - BA.debugLineNum = 1014;BA.debugLine="If thisLog Then LogColor(\"Ya se vendieron las p"; -Debug.ShouldStop(2097152); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314090252",BA.ObjectToString("Ya se vendieron las promos PERMITIDAS para el cliente"),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red"));}; - BA.debugLineNum = 1015;BA.debugLine="Return CreateMap(\"status\":\"ko\", \"mp\":pm)"; -Debug.ShouldStop(4194304); -if (true) return subs.mostCurrent.__c.runMethod(false, "createMap", (Object)(new RemoteObject[] {RemoteObject.createImmutable(("status")),RemoteObject.createImmutable(("ko")),RemoteObject.createImmutable(("mp")),(_pm.getObject())})); - }; - BA.debugLineNum = 1018;BA.debugLine="Private inventarioSinFijos As Map = restaFijosPr"; -Debug.ShouldStop(33554432); -_inventariosinfijos = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_inventariosinfijos = _restafijospromo(_ba,_pm);Debug.locals.put("inventarioSinFijos", _inventariosinfijos);Debug.locals.put("inventarioSinFijos", _inventariosinfijos); - BA.debugLineNum = 1019;BA.debugLine="If thisLog Then LogColor(\"inventariosfijos=\"&inv"; -Debug.ShouldStop(67108864); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314090257",RemoteObject.concat(RemoteObject.createImmutable("inventariosfijos="),_inventariosinfijos),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Green"));}; - BA.debugLineNum = 1021;BA.debugLine="If inventarioSinFijos.Get(\"resultado\") = \"ok\" Th"; -Debug.ShouldStop(268435456); -if (RemoteObject.solveBoolean("=",_inventariosinfijos.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("resultado")))),RemoteObject.createImmutable(("ok")))) { - BA.debugLineNum = 1023;BA.debugLine="Private pv As Boolean = alcanzanLosVariablesPa"; -Debug.ShouldStop(1073741824); -_pv = _alcanzanlosvariablesparapromo(_ba,_pm,_inventariosinfijos);Debug.locals.put("pv", _pv);Debug.locals.put("pv", _pv); - BA.debugLineNum = 1024;BA.debugLine="If thisLog Then Log(\"Alcanzan los variables? --"; -Debug.ShouldStop(-2147483648); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314090262",RemoteObject.concat(RemoteObject.createImmutable("Alcanzan los variables? --> "),_pv),0);}; - BA.debugLineNum = 1025;BA.debugLine="If pv Then Return CreateMap(\"status\":\"ok\", \"mp\""; -Debug.ShouldStop(1); -if (_pv.get().booleanValue()) { -if (true) return subs.mostCurrent.__c.runMethod(false, "createMap", (Object)(new RemoteObject[] {RemoteObject.createImmutable(("status")),RemoteObject.createImmutable(("ok")),RemoteObject.createImmutable(("mp")),(_pm.getObject())}));} -else { -if (true) return subs.mostCurrent.__c.runMethod(false, "createMap", (Object)(new RemoteObject[] {RemoteObject.createImmutable(("status")),RemoteObject.createImmutable(("ko")),RemoteObject.createImmutable(("mp")),(_pm.getObject())}));}; - }else { - BA.debugLineNum = 1027;BA.debugLine="If thisLog Then LogColor(\"NO HAY INVENTARIO SUF"; -Debug.ShouldStop(4); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314090265",RemoteObject.concat(RemoteObject.createImmutable("NO HAY INVENTARIO SUFICIENTE "),_idpromo),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red"));}; - BA.debugLineNum = 1028;BA.debugLine="Return CreateMap(\"status\":\"ko\", \"mp\":pm)"; -Debug.ShouldStop(8); -if (true) return subs.mostCurrent.__c.runMethod(false, "createMap", (Object)(new RemoteObject[] {RemoteObject.createImmutable(("status")),RemoteObject.createImmutable(("ko")),RemoteObject.createImmutable(("mp")),(_pm.getObject())})); - }; - }; - BA.debugLineNum = 1034;BA.debugLine="LogColor(\"TIEMPO DE PROCESO ESTA PROMO: \" & ((Dat"; -Debug.ShouldStop(512); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314090272",RemoteObject.concat(RemoteObject.createImmutable("TIEMPO DE PROCESO ESTA PROMO: "),(RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getNow"),BA.numberCast(double.class, _iniciocontador)}, "-",1, 0)),RemoteObject.createImmutable(1000)}, "/",0, 0))),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 1035;BA.debugLine="End Sub"; -Debug.ShouldStop(1024); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _process_globals() throws Exception{ - //BA.debugLineNum = 3;BA.debugLine="Sub Process_Globals"; - //BA.debugLineNum = 6;BA.debugLine="Public GZip As GZipStrings 'Usa la libreria Com"; -subs._gzip = RemoteObject.createNew ("de.donmanfred.GZipStringswrapper"); - //BA.debugLineNum = 7;BA.debugLine="Private su As StringUtils 'Usa la libreria Stri"; -subs._su = RemoteObject.createNew ("anywheresoftware.b4a.objects.StringUtils"); - //BA.debugLineNum = 8;BA.debugLine="Dim phn As Phone"; -subs._phn = RemoteObject.createNew ("anywheresoftware.b4a.phone.Phone"); - //BA.debugLineNum = 9;BA.debugLine="Dim devModel As String"; -subs._devmodel = RemoteObject.createImmutable(""); - //BA.debugLineNum = 10;BA.debugLine="Dim kmt, errorLog As SQL 'Requiere la libreria \"S"; -subs._kmt = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL"); -subs._errorlog = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL"); - //BA.debugLineNum = 12;BA.debugLine="Dim ssid As String 'ignore"; -subs._ssid = RemoteObject.createImmutable(""); - //BA.debugLineNum = 13;BA.debugLine="Dim rutaMaxPoints As Int = 3000"; -subs._rutamaxpoints = BA.numberCast(int.class, 3000); - //BA.debugLineNum = 14;BA.debugLine="Dim rutaHrsAtras As Int = 48"; -subs._rutahrsatras = BA.numberCast(int.class, 48); - //BA.debugLineNum = 16;BA.debugLine="Private subsLogs As Boolean = False"; -subs._subslogs = subs.mostCurrent.__c.getField(true,"False"); - //BA.debugLineNum = 17;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _restafijospromo(RemoteObject _ba,RemoteObject _promomap) throws Exception{ -try { - Debug.PushSubsStack("restaFijosPromo (subs) ","subs",9,_ba,subs.mostCurrent,908); -if (RapidSub.canDelegate("restafijospromo")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","restafijospromo", _ba, _promomap);} -RemoteObject _thislog = RemoteObject.createImmutable(false); -RemoteObject _inventariosdisponiblesparaestapromo = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -RemoteObject _i = RemoteObject.createImmutable(0); -RemoteObject _prodsmap = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -RemoteObject _prodsfijos = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -int _p = 0; -RemoteObject _t = RemoteObject.createImmutable(""); -RemoteObject _p2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -; -Debug.locals.put("promoMap", _promomap); - BA.debugLineNum = 908;BA.debugLine="Sub restaFijosPromo(promoMap As Map) As Map 'ignor"; -Debug.ShouldStop(2048); - BA.debugLineNum = 909;BA.debugLine="Private thisLog As Boolean = False 'Si es verdade"; -Debug.ShouldStop(4096); -_thislog = subs.mostCurrent.__c.getField(true,"False");Debug.locals.put("thisLog", _thislog);Debug.locals.put("thisLog", _thislog); - BA.debugLineNum = 910;BA.debugLine="Private inventariosDisponiblesParaEstaPromo As Ma"; -Debug.ShouldStop(8192); -_inventariosdisponiblesparaestapromo = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_inventariosdisponiblesparaestapromo = _traemosinventariodisponibleparapromo(_ba,BA.ObjectToString(_promomap.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("id"))))));Debug.locals.put("inventariosDisponiblesParaEstaPromo", _inventariosdisponiblesparaestapromo);Debug.locals.put("inventariosDisponiblesParaEstaPromo", _inventariosdisponiblesparaestapromo); - BA.debugLineNum = 911;BA.debugLine="If thisLog Then LogColor(inventariosDisponiblesPa"; -Debug.ShouldStop(16384); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","313828099",BA.ObjectToString(_inventariosdisponiblesparaestapromo),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red"));}; - BA.debugLineNum = 912;BA.debugLine="If thisLog Then LogColor(\"Inventario inicial ante"; -Debug.ShouldStop(32768); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","313828100",RemoteObject.concat(RemoteObject.createImmutable("Inventario inicial antes de FIJOS: "),_inventariosdisponiblesparaestapromo),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Gray"));}; - BA.debugLineNum = 913;BA.debugLine="Private i As Int"; -Debug.ShouldStop(65536); -_i = RemoteObject.createImmutable(0);Debug.locals.put("i", _i); - BA.debugLineNum = 914;BA.debugLine="Private prodsmap As Map = promoMap.Get(\"productos"; -Debug.ShouldStop(131072); -_prodsmap = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_prodsmap = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), _promomap.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("productos")))));Debug.locals.put("prodsmap", _prodsmap);Debug.locals.put("prodsmap", _prodsmap); - BA.debugLineNum = 915;BA.debugLine="Private prodsFijos As List = promoMap.get(\"prodsF"; -Debug.ShouldStop(262144); -_prodsfijos = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); -_prodsfijos = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), _promomap.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsFijos")))));Debug.locals.put("prodsFijos", _prodsfijos);Debug.locals.put("prodsFijos", _prodsfijos); - BA.debugLineNum = 916;BA.debugLine="For p = 0 To prodsFijos.Size - 1"; -Debug.ShouldStop(524288); -{ -final int step8 = 1; -final int limit8 = RemoteObject.solve(new RemoteObject[] {_prodsfijos.runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_p = 0 ; -for (;(step8 > 0 && _p <= limit8) || (step8 < 0 && _p >= limit8) ;_p = ((int)(0 + _p + step8)) ) { -Debug.locals.put("p", _p); - BA.debugLineNum = 917;BA.debugLine="Private t As String = prodsFijos.Get(p) 'Obtenem"; -Debug.ShouldStop(1048576); -_t = BA.ObjectToString(_prodsfijos.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _p))));Debug.locals.put("t", _t);Debug.locals.put("t", _t); - BA.debugLineNum = 918;BA.debugLine="Private p2 As Map = prodsmap.Get(t) 'Obtenemos u"; -Debug.ShouldStop(2097152); -_p2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_p2 = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), _prodsmap.runMethod(false,"Get",(Object)((_t))));Debug.locals.put("p2", _p2);Debug.locals.put("p2", _p2); - BA.debugLineNum = 919;BA.debugLine="If thisLog Then Log($\"T: ${t}, prod ${p2.Get(\"id"; -Debug.ShouldStop(4194304); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","313828107",(RemoteObject.concat(RemoteObject.createImmutable("T: "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_t))),RemoteObject.createImmutable(", prod "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)(_p2.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("idProducto")))))),RemoteObject.createImmutable(", piezas: "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)(_p2.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("piezas")))))),RemoteObject.createImmutable(""))),0);}; - BA.debugLineNum = 920;BA.debugLine="If thisLog Then Log(\"inventariosDisponiblesParaE"; -Debug.ShouldStop(8388608); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","313828108",RemoteObject.concat(RemoteObject.createImmutable("inventariosDisponiblesParaEstaPromo="),_inventariosdisponiblesparaestapromo),0);}; - BA.debugLineNum = 921;BA.debugLine="If inventariosDisponiblesParaEstaPromo.ContainsK"; -Debug.ShouldStop(16777216); -if (_inventariosdisponiblesparaestapromo.runMethod(true,"ContainsKey",(Object)((_t))).get().booleanValue()) { - BA.debugLineNum = 922;BA.debugLine="i = inventariosDisponiblesParaEstaPromo.get(t)"; -Debug.ShouldStop(33554432); -_i = BA.numberCast(int.class, _inventariosdisponiblesparaestapromo.runMethod(false,"Get",(Object)((_t))));Debug.locals.put("i", _i); - BA.debugLineNum = 923;BA.debugLine="If thisLog Then Log($\"Nuevo inventario de ${t}:"; -Debug.ShouldStop(67108864); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","313828111",(RemoteObject.concat(RemoteObject.createImmutable("Nuevo inventario de "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_t))),RemoteObject.createImmutable(": "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_i))),RemoteObject.createImmutable("-"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), _promomap.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsFijosPiezas")))))).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _p))))),RemoteObject.createImmutable(" = "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("1.0")),(Object)((RemoteObject.solve(new RemoteObject[] {_i,BA.numberCast(double.class, (RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), _promomap.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsFijosPiezas")))))).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _p))))}, "-",1, 0)))),RemoteObject.createImmutable(""))),0);}; - BA.debugLineNum = 924;BA.debugLine="inventariosDisponiblesParaEstaPromo.Put(t, $\"${"; -Debug.ShouldStop(134217728); -_inventariosdisponiblesparaestapromo.runVoidMethod ("Put",(Object)((_t)),(Object)(((RemoteObject.concat(RemoteObject.createImmutable(""),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((RemoteObject.solve(new RemoteObject[] {_i,BA.numberCast(double.class, (RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), _promomap.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsFijosPiezas")))))).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _p))))}, "-",1, 0)))),RemoteObject.createImmutable("")))))); - BA.debugLineNum = 925;BA.debugLine="inventariosDisponiblesParaEstaPromo.Put(\"result"; -Debug.ShouldStop(268435456); -_inventariosdisponiblesparaestapromo.runVoidMethod ("Put",(Object)(RemoteObject.createImmutable(("resultado"))),(Object)((RemoteObject.createImmutable("ok")))); - }else { - BA.debugLineNum = 927;BA.debugLine="inventariosDisponiblesParaEstaPromo.Put(\"result"; -Debug.ShouldStop(1073741824); -_inventariosdisponiblesparaestapromo.runVoidMethod ("Put",(Object)(RemoteObject.createImmutable(("resultado"))),(Object)((RemoteObject.createImmutable("No hay suficiente producto para la promocion.")))); - BA.debugLineNum = 928;BA.debugLine="LogColor(\"Sin suficiente inventario fijo: \" & t"; -Debug.ShouldStop(-2147483648); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","313828116",RemoteObject.concat(RemoteObject.createImmutable("Sin suficiente inventario fijo: "),_t),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Blue")); - BA.debugLineNum = 929;BA.debugLine="Exit"; -Debug.ShouldStop(1); -if (true) break; - }; - BA.debugLineNum = 931;BA.debugLine="If i - p2.Get(\"piezas\") < 0 Then"; -Debug.ShouldStop(4); -if (RemoteObject.solveBoolean("<",RemoteObject.solve(new RemoteObject[] {_i,BA.numberCast(double.class, _p2.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("piezas")))))}, "-",1, 0),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 932;BA.debugLine="inventariosDisponiblesParaEstaPromo.Put(\"result"; -Debug.ShouldStop(8); -_inventariosdisponiblesparaestapromo.runVoidMethod ("Put",(Object)(RemoteObject.createImmutable(("resultado"))),(Object)((RemoteObject.createImmutable("No hay suficiente producto para la promocion.")))); - BA.debugLineNum = 933;BA.debugLine="Exit"; -Debug.ShouldStop(16); -if (true) break; - }; - } -}Debug.locals.put("p", _p); -; - BA.debugLineNum = 936;BA.debugLine="If prodsFijos.Size = 0 Then inventariosDisponible"; -Debug.ShouldStop(128); -if (RemoteObject.solveBoolean("=",_prodsfijos.runMethod(true,"getSize"),BA.numberCast(double.class, 0))) { -_inventariosdisponiblesparaestapromo.runVoidMethod ("Put",(Object)(RemoteObject.createImmutable(("resultado"))),(Object)((RemoteObject.createImmutable("ok"))));}; - BA.debugLineNum = 937;BA.debugLine="If thisLog Then LogColor(\"Inventario final depues"; -Debug.ShouldStop(256); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","313828125",RemoteObject.concat(RemoteObject.createImmutable("Inventario final depues de FIJOS: "),_inventariosdisponiblesparaestapromo),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Blue"));}; - BA.debugLineNum = 938;BA.debugLine="Return inventariosDisponiblesParaEstaPromo"; -Debug.ShouldStop(512); -if (true) return _inventariosdisponiblesparaestapromo; - BA.debugLineNum = 939;BA.debugLine="End Sub"; -Debug.ShouldStop(1024); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _revisabd(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("revisaBD (subs) ","subs",9,_ba,subs.mostCurrent,184); -if (RapidSub.canDelegate("revisabd")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","revisabd", _ba);} -; - BA.debugLineNum = 184;BA.debugLine="Sub revisaBD 'ignore"; -Debug.ShouldStop(8388608); - BA.debugLineNum = 188;BA.debugLine="If Not(File.Exists(Starter.ruta, \"kmt.db\")) Then"; -Debug.ShouldStop(134217728); -if (subs.mostCurrent.__c.runMethod(true,"Not",(Object)(subs.mostCurrent.__c.getField(false,"File").runMethod(true,"Exists",(Object)(subs.mostCurrent._starter._ruta /*RemoteObject*/ ),(Object)(RemoteObject.createImmutable("kmt.db"))))).get().booleanValue()) { - BA.debugLineNum = 189;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", Starter.ruta"; -Debug.ShouldStop(268435456); -subs.mostCurrent.__c.getField(false,"File").runVoidMethod ("Copy",(Object)(subs.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirAssets")),(Object)(BA.ObjectToString("kmt.db")),(Object)(subs.mostCurrent._starter._ruta /*RemoteObject*/ ),(Object)(RemoteObject.createImmutable("kmt.db"))); - BA.debugLineNum = 190;BA.debugLine="LogColor(\"copiamos kmt.db de \"&File.DirAssets &"; -Debug.ShouldStop(536870912); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311468806",RemoteObject.concat(RemoteObject.createImmutable("copiamos kmt.db de "),subs.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirAssets"),RemoteObject.createImmutable(" a "),subs.mostCurrent._starter._ruta /*RemoteObject*/ ),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Green")); - }; - BA.debugLineNum = 192;BA.debugLine="If Not(kmt.IsInitialized) Then kmt.Initialize(Sta"; -Debug.ShouldStop(-2147483648); -if (subs.mostCurrent.__c.runMethod(true,"Not",(Object)(subs._kmt.runMethod(true,"IsInitialized"))).get().booleanValue()) { -subs._kmt.runVoidMethod ("Initialize",(Object)(subs.mostCurrent._starter._ruta /*RemoteObject*/ ),(Object)(BA.ObjectToString("kmt.db")),(Object)(subs.mostCurrent.__c.getField(true,"True")));}; - BA.debugLineNum = 193;BA.debugLine="kmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS RUTA"; -Debug.ShouldStop(1); -subs._kmt.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("CREATE TABLE IF NOT EXISTS RUTA_GPS(FECHA INTEGER, LAT TEXT, LON TEXT)"))); - BA.debugLineNum = 195;BA.debugLine="kmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS bita"; -Debug.ShouldStop(4); -subs._kmt.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("CREATE TABLE IF NOT EXISTS bitacora(fecha INTEGER, texto TEXT)"))); - BA.debugLineNum = 196;BA.debugLine="kmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIST"; -Debug.ShouldStop(8); -subs._kmt.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("CREATE TABLE IF NOT EXISTS HIST_AVANCE(HA_MARCA TEXT, HA_AVANCE TEXT, HA_OBJETIVO TEXT, HA_PORCENTAJE TEXT)"))); - BA.debugLineNum = 197;BA.debugLine="kmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIST"; -Debug.ShouldStop(16); -subs._kmt.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("CREATE TABLE IF NOT EXISTS HIST_FOTO_CLIENTE(CODIGO TEXT, ALMACEN TEXT, RUTA TEXT, NOM_FOTO TEXT)"))); - BA.debugLineNum = 199;BA.debugLine="kmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS CLIE"; -Debug.ShouldStop(64); -subs._kmt.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("CREATE TABLE IF NOT EXISTS CLIENTES_NUEVOS(CN_ID TEXT, CN_FECHA TEXT, CN_USER TEXT, CN_LAT TEXT, CN_LON TEXT, CN_NOMBRE TEXT, CN_DIRECCION TEXT, COLONIA TEXT, CP TEXT, CN_ALMACEN TEXT, CN_RUTA TEXT, CN_ENVIO TEXT)"))); - BA.debugLineNum = 201;BA.debugLine="Try 'Si no existe la columna CN_BANDERA la agrega"; -Debug.ShouldStop(256); -try { BA.debugLineNum = 202;BA.debugLine="kmt.ExecQuery(\"select count(CN_BANDERA) from CLI"; -Debug.ShouldStop(512); -subs._kmt.runVoidMethod ("ExecQuery",(Object)(RemoteObject.createImmutable("select count(CN_BANDERA) from CLIENTES_NUEVOS"))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e14) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e14.toString()); BA.debugLineNum = 204;BA.debugLine="Try"; -Debug.ShouldStop(2048); -try { BA.debugLineNum = 205;BA.debugLine="kmt.ExecNonQuery(\"ALTER TABLE CLIENTES_NUEVOS A"; -Debug.ShouldStop(4096); -subs._kmt.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("ALTER TABLE CLIENTES_NUEVOS ADD COLUMN CN_BANDERA INTEGER"))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e17) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e17.toString()); BA.debugLineNum = 207;BA.debugLine="LogColor(\"No pudimos agregar la columna CN_BAND"; -Debug.ShouldStop(16384); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311468823",BA.ObjectToString("No pudimos agregar la columna CN_BANDERA."),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 208;BA.debugLine="LogColor(LastException, Colors.Red)"; -Debug.ShouldStop(32768); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311468824",BA.ObjectToString(subs.mostCurrent.__c.runMethod(false,"LastException",_ba)),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - }; - }; - BA.debugLineNum = 212;BA.debugLine="Try 'Si no existe la columna PC_ENVIO_OK la agreg"; -Debug.ShouldStop(524288); -try { BA.debugLineNum = 213;BA.debugLine="kmt.ExecQuery(\"select count(PC_ENVIO_OK) from PE"; -Debug.ShouldStop(1048576); -subs._kmt.runVoidMethod ("ExecQuery",(Object)(RemoteObject.createImmutable("select count(PC_ENVIO_OK) from PEDIDO_CLIENTE"))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e24) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e24.toString()); BA.debugLineNum = 215;BA.debugLine="Try"; -Debug.ShouldStop(4194304); -try { BA.debugLineNum = 216;BA.debugLine="kmt.ExecNonQuery(\"ALTER TABLE PEDIDO_CLIENTE AD"; -Debug.ShouldStop(8388608); -subs._kmt.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("ALTER TABLE PEDIDO_CLIENTE ADD COLUMN PC_ENVIO_OK INTEGER"))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e27) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e27.toString()); BA.debugLineNum = 218;BA.debugLine="LogColor(\"No pudimos agregar la columna PC_ENVI"; -Debug.ShouldStop(33554432); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311468834",BA.ObjectToString("No pudimos agregar la columna PC_ENVIO_OK."),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 219;BA.debugLine="LogColor(LastException, Colors.Red)"; -Debug.ShouldStop(67108864); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311468835",BA.ObjectToString(subs.mostCurrent.__c.runMethod(false,"LastException",_ba)),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - }; - }; - BA.debugLineNum = 222;BA.debugLine="Try 'Si no existe la columna PC_ENVIO_OK la agreg"; -Debug.ShouldStop(536870912); -try { BA.debugLineNum = 223;BA.debugLine="kmt.ExecQuery(\"select count(PC_TIEMPO_TIENDA) fr"; -Debug.ShouldStop(1073741824); -subs._kmt.runVoidMethod ("ExecQuery",(Object)(RemoteObject.createImmutable("select count(PC_TIEMPO_TIENDA) from PEDIDO_CLIENTE"))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e34) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e34.toString()); BA.debugLineNum = 225;BA.debugLine="Try"; -Debug.ShouldStop(1); -try { BA.debugLineNum = 226;BA.debugLine="kmt.ExecNonQuery(\"ALTER TABLE PEDIDO_CLIENTE AD"; -Debug.ShouldStop(2); -subs._kmt.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("ALTER TABLE PEDIDO_CLIENTE ADD COLUMN PC_TIEMPO_TIENDA FLOAT"))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e37) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e37.toString()); BA.debugLineNum = 228;BA.debugLine="LogColor(\"No pudimos agregar la columna PC_TIEM"; -Debug.ShouldStop(8); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311468844",BA.ObjectToString("No pudimos agregar la columna PC_TIEMPO_TIENDA."),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 229;BA.debugLine="LogColor(LastException, Colors.Red)"; -Debug.ShouldStop(16); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311468845",BA.ObjectToString(subs.mostCurrent.__c.runMethod(false,"LastException",_ba)),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - }; - }; - BA.debugLineNum = 232;BA.debugLine="Try 'Si no existe la columna PC_FACTURA la agrega"; -Debug.ShouldStop(128); -try { BA.debugLineNum = 233;BA.debugLine="kmt.ExecQuery(\"select count(PC_FACTURA) from PED"; -Debug.ShouldStop(256); -subs._kmt.runVoidMethod ("ExecQuery",(Object)(RemoteObject.createImmutable("select count(PC_FACTURA) from PEDIDO_CLIENTE"))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e44) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e44.toString()); BA.debugLineNum = 235;BA.debugLine="Try"; -Debug.ShouldStop(1024); -try { BA.debugLineNum = 236;BA.debugLine="kmt.ExecNonQuery(\"ALTER TABLE PEDIDO_CLIENTE AD"; -Debug.ShouldStop(2048); -subs._kmt.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("ALTER TABLE PEDIDO_CLIENTE ADD COLUMN PC_FACTURA INTEGER"))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e47) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e47.toString()); BA.debugLineNum = 238;BA.debugLine="LogColor(\"No pudimos agregar la columna PC_FACT"; -Debug.ShouldStop(8192); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311468854",BA.ObjectToString("No pudimos agregar la columna PC_FACTURA."),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 239;BA.debugLine="LogColor(LastException, Colors.Red)"; -Debug.ShouldStop(16384); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311468855",BA.ObjectToString(subs.mostCurrent.__c.runMethod(false,"LastException",_ba)),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - }; - }; - BA.debugLineNum = 243;BA.debugLine="Try 'Si no existe la columna PC_ENVIO_OK la agreg"; -Debug.ShouldStop(262144); -try { BA.debugLineNum = 244;BA.debugLine="kmt.ExecQuery(\"select count(NV_NOMBRE) from NOVE"; -Debug.ShouldStop(524288); -subs._kmt.runVoidMethod ("ExecQuery",(Object)(RemoteObject.createImmutable("select count(NV_NOMBRE) from NOVENTA"))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e54) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e54.toString()); BA.debugLineNum = 246;BA.debugLine="Try"; -Debug.ShouldStop(2097152); -try { BA.debugLineNum = 247;BA.debugLine="kmt.ExecNonQuery(\"ALTER TABLE NOVENTA ADD COLUM"; -Debug.ShouldStop(4194304); -subs._kmt.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("ALTER TABLE NOVENTA ADD COLUMN NV_NOMBRE TEXT"))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e57) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e57.toString()); BA.debugLineNum = 249;BA.debugLine="LogColor(\"No pudimos agregar la columna NV_NOMB"; -Debug.ShouldStop(16777216); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311468865",BA.ObjectToString("No pudimos agregar la columna NV_NOMBRE."),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 250;BA.debugLine="LogColor(LastException, Colors.Red)"; -Debug.ShouldStop(33554432); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311468866",BA.ObjectToString(subs.mostCurrent.__c.runMethod(false,"LastException",_ba)),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - }; - }; - BA.debugLineNum = 254;BA.debugLine="Try 'Si no existe la columna PC_ENVIO_OK la agreg"; -Debug.ShouldStop(536870912); -try { BA.debugLineNum = 255;BA.debugLine="kmt.ExecQuery(\"select count(NV_DIRECCION) from N"; -Debug.ShouldStop(1073741824); -subs._kmt.runVoidMethod ("ExecQuery",(Object)(RemoteObject.createImmutable("select count(NV_DIRECCION) from NOVENTA"))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e64) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e64.toString()); BA.debugLineNum = 257;BA.debugLine="Try"; -Debug.ShouldStop(1); -try { BA.debugLineNum = 258;BA.debugLine="kmt.ExecNonQuery(\"ALTER TABLE NOVENTA ADD COLUM"; -Debug.ShouldStop(2); -subs._kmt.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("ALTER TABLE NOVENTA ADD COLUMN NV_DIRECCION TEXT"))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e67) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e67.toString()); BA.debugLineNum = 260;BA.debugLine="LogColor(\"No pudimos agregar la columna NV_NOMB"; -Debug.ShouldStop(8); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311468876",BA.ObjectToString("No pudimos agregar la columna NV_NOMBRE."),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 261;BA.debugLine="LogColor(LastException, Colors.Red)"; -Debug.ShouldStop(16); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311468877",BA.ObjectToString(subs.mostCurrent.__c.runMethod(false,"LastException",_ba)),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - }; - }; - BA.debugLineNum = 265;BA.debugLine="Try 'Si no existe la columna NV_ENVIO la agregamo"; -Debug.ShouldStop(256); -try { BA.debugLineNum = 266;BA.debugLine="kmt.ExecQuery(\"select count(NV_ENVIO) from NOVEN"; -Debug.ShouldStop(512); -subs._kmt.runVoidMethod ("ExecQuery",(Object)(RemoteObject.createImmutable("select count(NV_ENVIO) from NOVENTA"))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e74) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e74.toString()); BA.debugLineNum = 268;BA.debugLine="Try"; -Debug.ShouldStop(2048); -try { BA.debugLineNum = 269;BA.debugLine="kmt.ExecNonQuery(\"ALTER TABLE NOVENTA ADD COLUM"; -Debug.ShouldStop(4096); -subs._kmt.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("ALTER TABLE NOVENTA ADD COLUMN NV_ENVIO TEXT"))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e77) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e77.toString()); BA.debugLineNum = 271;BA.debugLine="LogColor(\"No pudimos agregar la columna NV_ENVI"; -Debug.ShouldStop(16384); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311468887",BA.ObjectToString("No pudimos agregar la columna NV_ENVIO."),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 272;BA.debugLine="LogColor(LastException, Colors.Red)"; -Debug.ShouldStop(32768); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","311468888",BA.ObjectToString(subs.mostCurrent.__c.runMethod(false,"LastException",_ba)),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - }; - }; - BA.debugLineNum = 276;BA.debugLine="kmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS bita"; -Debug.ShouldStop(524288); -subs._kmt.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("CREATE TABLE IF NOT EXISTS bitacora(fecha INTEGER, texto TEXT)"))); - BA.debugLineNum = 278;BA.debugLine="kmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS PEDI"; -Debug.ShouldStop(2097152); -subs._kmt.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("CREATE TABLE IF NOT EXISTS PEDIDO_INICIO_FINAL(PIF_CLIENTE TEXT, PIF_HORA_INICIO LONG, PIF_HORA_FINAL LONG)"))); - BA.debugLineNum = 281;BA.debugLine="If Not(errorLog.IsInitialized) Then errorLog.Init"; -Debug.ShouldStop(16777216); -if (subs.mostCurrent.__c.runMethod(true,"Not",(Object)(subs._errorlog.runMethod(true,"IsInitialized"))).get().booleanValue()) { -subs._errorlog.runVoidMethod ("Initialize",(Object)(subs.mostCurrent._starter._ruta /*RemoteObject*/ ),(Object)(BA.ObjectToString("errorLog.db")),(Object)(subs.mostCurrent.__c.getField(true,"True")));}; - BA.debugLineNum = 282;BA.debugLine="errorLog.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS"; -Debug.ShouldStop(33554432); -subs._errorlog.runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("CREATE TABLE IF NOT EXISTS errores(fecha INTEGER, error TEXT)"))); - BA.debugLineNum = 283;BA.debugLine="End Sub"; -Debug.ShouldStop(67108864); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _revisaflp(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("revisaFLP (subs) ","subs",9,_ba,subs.mostCurrent,426); -if (RapidSub.canDelegate("revisaflp")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","revisaflp", _ba);} -RemoteObject _todobienflp = RemoteObject.createImmutable(false); -; - BA.debugLineNum = 426;BA.debugLine="Sub revisaFLP 'ignore"; -Debug.ShouldStop(512); - BA.debugLineNum = 427;BA.debugLine="LogColor(\"**** **** Revisamos FLP **** ****\", Col"; -Debug.ShouldStop(1024); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312124161",BA.ObjectToString("**** **** Revisamos FLP **** ****"),subs.mostCurrent.__c.getField(false,"Colors").runMethod(true,"RGB",(Object)(BA.numberCast(int.class, 78)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 227)))); - BA.debugLineNum = 428;BA.debugLine="Private todoBienFLP As Boolean = True"; -Debug.ShouldStop(2048); -_todobienflp = subs.mostCurrent.__c.getField(true,"True");Debug.locals.put("todoBienFLP", _todobienflp);Debug.locals.put("todoBienFLP", _todobienflp); - BA.debugLineNum = 429;BA.debugLine="Try"; -Debug.ShouldStop(4096); -try { BA.debugLineNum = 430;BA.debugLine="If Not(Tracker.FLP.IsInitialized) Then"; -Debug.ShouldStop(8192); -if (subs.mostCurrent.__c.runMethod(true,"Not",(Object)(subs.mostCurrent._tracker._flp /*RemoteObject*/ .runMethod(true,"IsInitialized"))).get().booleanValue()) { - BA.debugLineNum = 431;BA.debugLine="log2DB(\"revisaFLP: No esta inicializado ... 'Re"; -Debug.ShouldStop(16384); -_log2db(_ba,RemoteObject.createImmutable("revisaFLP: No esta inicializado ... 'Reinicializando FLP'")); - BA.debugLineNum = 432;BA.debugLine="Tracker.FLP.Initialize(\"flp\")"; -Debug.ShouldStop(32768); -subs.mostCurrent._tracker._flp /*RemoteObject*/ .runVoidMethod ("Initialize",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba),(Object)(RemoteObject.createImmutable("flp"))); - BA.debugLineNum = 433;BA.debugLine="todoBienFLP = False"; -Debug.ShouldStop(65536); -_todobienflp = subs.mostCurrent.__c.getField(true,"False");Debug.locals.put("todoBienFLP", _todobienflp); - }; - Debug.CheckDeviceExceptions(); -} - catch (Exception e10) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e10.toString()); BA.debugLineNum = 436;BA.debugLine="LogColor(\"If Not(Tracker.FLP.IsInitialized) ---"; -Debug.ShouldStop(524288); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312124170",RemoteObject.concat(RemoteObject.createImmutable("If Not(Tracker.FLP.IsInitialized) --- "),subs.mostCurrent.__c.runMethod(false,"LastException",_ba)),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - }; - BA.debugLineNum = 438;BA.debugLine="Try"; -Debug.ShouldStop(2097152); -try { BA.debugLineNum = 439;BA.debugLine="If Tracker.FLP.IsInitialized Then"; -Debug.ShouldStop(4194304); -if (subs.mostCurrent._tracker._flp /*RemoteObject*/ .runMethod(true,"IsInitialized").get().booleanValue()) { - BA.debugLineNum = 440;BA.debugLine="Try"; -Debug.ShouldStop(8388608); -try { BA.debugLineNum = 441;BA.debugLine="If Not(Tracker.FLP.IsConnected) Then"; -Debug.ShouldStop(16777216); -if (subs.mostCurrent.__c.runMethod(true,"Not",(Object)(subs.mostCurrent._tracker._flp /*RemoteObject*/ .runMethod(true,"IsConnected"))).get().booleanValue()) { - BA.debugLineNum = 442;BA.debugLine="log2DB(\"revisaFLP: No esta conectado ... 'Rec"; -Debug.ShouldStop(33554432); -_log2db(_ba,RemoteObject.createImmutable("revisaFLP: No esta conectado ... 'Reconectando FLP'")); - BA.debugLineNum = 444;BA.debugLine="CallSubDelayed(Tracker,\"StartFLP\")"; -Debug.ShouldStop(134217728); -subs.mostCurrent.__c.runVoidMethod ("CallSubDelayed",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba),(Object)((subs.mostCurrent._tracker.getObject())),(Object)(RemoteObject.createImmutable("StartFLP"))); - BA.debugLineNum = 445;BA.debugLine="todoBienFLP = False"; -Debug.ShouldStop(268435456); -_todobienflp = subs.mostCurrent.__c.getField(true,"False");Debug.locals.put("todoBienFLP", _todobienflp); - }; - Debug.CheckDeviceExceptions(); -} - catch (Exception e21) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e21.toString()); BA.debugLineNum = 448;BA.debugLine="LogColor(\"If Not(Tracker.FLP.IsConnected) -->"; -Debug.ShouldStop(-2147483648); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312124182",RemoteObject.concat(RemoteObject.createImmutable("If Not(Tracker.FLP.IsConnected) --> "),subs.mostCurrent.__c.runMethod(false,"LastException",_ba)),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - }; - BA.debugLineNum = 450;BA.debugLine="Try"; -Debug.ShouldStop(2); -try { BA.debugLineNum = 451;BA.debugLine="If Tracker.FLP.IsConnected And _ Tracker."; -Debug.ShouldStop(4); -if (RemoteObject.solveBoolean(".",subs.mostCurrent._tracker._flp /*RemoteObject*/ .runMethod(true,"IsConnected")) && RemoteObject.solveBoolean(".",subs.mostCurrent._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation").runMethod(true,"IsInitialized")) && RemoteObject.solveBoolean(">",subs.mostCurrent._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation").runMethod(true,"DistanceTo",(Object)((subs.mostCurrent._tracker._uugcoords /*RemoteObject*/ .getObject()))),BA.numberCast(double.class, 500))) { - BA.debugLineNum = 454;BA.debugLine="log2DB(\"revisaFLP: 'No se esta actualizando,"; -Debug.ShouldStop(32); -_log2db(_ba,RemoteObject.createImmutable("revisaFLP: 'No se esta actualizando, lo reiniciamos ...'")); - BA.debugLineNum = 455;BA.debugLine="StartService(Tracker)"; -Debug.ShouldStop(64); -subs.mostCurrent.__c.runVoidMethod ("StartService",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba),(Object)((subs.mostCurrent._tracker.getObject()))); - BA.debugLineNum = 456;BA.debugLine="todoBienFLP = False"; -Debug.ShouldStop(128); -_todobienflp = subs.mostCurrent.__c.getField(true,"False");Debug.locals.put("todoBienFLP", _todobienflp); - }; - Debug.CheckDeviceExceptions(); -} - catch (Exception e30) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e30.toString()); BA.debugLineNum = 459;BA.debugLine="LogColor(\"If FLP.IsConnectctd and FLP.getLKL.I"; -Debug.ShouldStop(1024); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312124193",RemoteObject.concat(RemoteObject.createImmutable("If FLP.IsConnectctd and FLP.getLKL.IsInitialized --> "),subs.mostCurrent.__c.runMethod(false,"LastException",_ba)),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - }; - }; - BA.debugLineNum = 462;BA.debugLine="If todoBienFLP Then LogColor(\" +++ +++ Sin error"; -Debug.ShouldStop(8192); -if (_todobienflp.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312124196",BA.ObjectToString(" +++ +++ Sin errores en FLP"),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Green"));}; - Debug.CheckDeviceExceptions(); -} - catch (Exception e35) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e35.toString()); BA.debugLineNum = 464;BA.debugLine="LogColor(\"If Tracker.FLP.IsInitialized --> \"&Las"; -Debug.ShouldStop(32768); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312124198",RemoteObject.concat(RemoteObject.createImmutable("If Tracker.FLP.IsInitialized --> "),subs.mostCurrent.__c.runMethod(false,"LastException",_ba)),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - }; - BA.debugLineNum = 467;BA.debugLine="End Sub"; -Debug.ShouldStop(262144); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _revisamaxpromosprodsfijosporinventario(RemoteObject _ba,RemoteObject _pm) throws Exception{ -try { - Debug.PushSubsStack("revisaMaxPromosProdsFijosPorInventario (subs) ","subs",9,_ba,subs.mostCurrent,1081); -if (RapidSub.canDelegate("revisamaxpromosprodsfijosporinventario")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","revisamaxpromosprodsfijosporinventario", _ba, _pm);} -RemoteObject _thislog = RemoteObject.createImmutable(false); -RemoteObject _invfijoxpromo = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -RemoteObject _t = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _invdispparapromo = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -RemoteObject _prodsfijospiezas = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _idprodsfijos = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -int _p = 0; -RemoteObject _x = null; -; -Debug.locals.put("pm", _pm); - BA.debugLineNum = 1081;BA.debugLine="Sub revisaMaxPromosProdsFijosPorInventario(pm As M"; -Debug.ShouldStop(16777216); - BA.debugLineNum = 1082;BA.debugLine="Private thisLog As Boolean = False"; -Debug.ShouldStop(33554432); -_thislog = subs.mostCurrent.__c.getField(true,"False");Debug.locals.put("thisLog", _thislog);Debug.locals.put("thisLog", _thislog); - BA.debugLineNum = 1083;BA.debugLine="Private invFijoXpromo As Map"; -Debug.ShouldStop(67108864); -_invfijoxpromo = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");Debug.locals.put("invFijoXpromo", _invfijoxpromo); - BA.debugLineNum = 1084;BA.debugLine="Private t As List"; -Debug.ShouldStop(134217728); -_t = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");Debug.locals.put("t", _t); - BA.debugLineNum = 1085;BA.debugLine="t.Initialize"; -Debug.ShouldStop(268435456); -_t.runVoidMethod ("Initialize"); - BA.debugLineNum = 1086;BA.debugLine="t.Add(traeMaxPromos(pm)) ' Agregamos a la lista l"; -Debug.ShouldStop(536870912); -_t.runVoidMethod ("Add",(Object)((_traemaxpromos(_ba,_pm)))); - BA.debugLineNum = 1087;BA.debugLine="invFijoXpromo.Initialize"; -Debug.ShouldStop(1073741824); -_invfijoxpromo.runVoidMethod ("Initialize"); - BA.debugLineNum = 1088;BA.debugLine="If thisLog Then LogColor($\"pm=${pm}\"$, Colors.Blu"; -Debug.ShouldStop(-2147483648); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314221319",(RemoteObject.concat(RemoteObject.createImmutable("pm="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_pm.getObject()))),RemoteObject.createImmutable(""))),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Blue"));}; - BA.debugLineNum = 1089;BA.debugLine="Private invDispParaPromo As Map = traemosInventar"; -Debug.ShouldStop(1); -_invdispparapromo = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_invdispparapromo = _traemosinventariodisponibleparapromo(_ba,BA.ObjectToString(_pm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("id"))))));Debug.locals.put("invDispParaPromo", _invdispparapromo);Debug.locals.put("invDispParaPromo", _invdispparapromo); - BA.debugLineNum = 1090;BA.debugLine="If thisLog Then Log($\"invDispParaPromo=${invDispP"; -Debug.ShouldStop(2); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314221321",(RemoteObject.concat(RemoteObject.createImmutable("invDispParaPromo="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_invdispparapromo.getObject()))),RemoteObject.createImmutable(""))),0);}; - BA.debugLineNum = 1091;BA.debugLine="Private prodsFijosPiezas As List = pm.Get(\"prodsF"; -Debug.ShouldStop(4); -_prodsfijospiezas = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); -_prodsfijospiezas = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), _pm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsFijosPiezas")))));Debug.locals.put("prodsFijosPiezas", _prodsfijospiezas);Debug.locals.put("prodsFijosPiezas", _prodsfijospiezas); - BA.debugLineNum = 1092;BA.debugLine="Private idProdsFijos As List = pm.Get(\"prodsFijos"; -Debug.ShouldStop(8); -_idprodsfijos = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); -_idprodsfijos = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), _pm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsFijos")))));Debug.locals.put("idProdsFijos", _idprodsfijos);Debug.locals.put("idProdsFijos", _idprodsfijos); - BA.debugLineNum = 1093;BA.debugLine="For p = 0 To idProdsFijos.Size -1 'Generamos una"; -Debug.ShouldStop(16); -{ -final int step12 = 1; -final int limit12 = RemoteObject.solve(new RemoteObject[] {_idprodsfijos.runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_p = 0 ; -for (;(step12 > 0 && _p <= limit12) || (step12 < 0 && _p >= limit12) ;_p = ((int)(0 + _p + step12)) ) { -Debug.locals.put("p", _p); - BA.debugLineNum = 1094;BA.debugLine="If thisLog Then Log($\"id=${idProdsFijos.Get(p)},"; -Debug.ShouldStop(32); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314221325",(RemoteObject.concat(RemoteObject.createImmutable("id="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)(_idprodsfijos.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _p))))),RemoteObject.createImmutable(", inv="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)(_invdispparapromo.runMethod(false,"Get",(Object)(_idprodsfijos.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _p))))))),RemoteObject.createImmutable(", pzas="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)(_prodsfijospiezas.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _p))))),RemoteObject.createImmutable(""))),0);}; - BA.debugLineNum = 1095;BA.debugLine="If thisLog Then Log($\"${(invDispParaPromo.Get(id"; -Debug.ShouldStop(64); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314221326",(RemoteObject.concat(RemoteObject.createImmutable(""),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)(((RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, _invdispparapromo.runMethod(false,"Get",(Object)(_idprodsfijos.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _p)))))),BA.numberCast(double.class, _prodsfijospiezas.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _p))))}, "/",0, 0))))),RemoteObject.createImmutable(""))),0);}; - BA.debugLineNum = 1096;BA.debugLine="Private x() As String = Regex.Split(\"\\.\", $\"${(i"; -Debug.ShouldStop(128); -_x = subs.mostCurrent.__c.getField(false,"Regex").runMethod(false,"Split",(Object)(BA.ObjectToString("\\.")),(Object)((RemoteObject.concat(RemoteObject.createImmutable(""),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)(((RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, _invdispparapromo.runMethod(false,"Get",(Object)(_idprodsfijos.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _p)))))),BA.numberCast(double.class, _prodsfijospiezas.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _p))))}, "/",0, 0))))),RemoteObject.createImmutable("")))));Debug.locals.put("x", _x);Debug.locals.put("x", _x); - BA.debugLineNum = 1097;BA.debugLine="If thisLog Then Log(x(0))"; -Debug.ShouldStop(256); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314221328",_x.getArrayElement(true,BA.numberCast(int.class, 0)),0);}; - BA.debugLineNum = 1098;BA.debugLine="t.Add(x(0).As(Int)) 'Solo guardamos la parte del"; -Debug.ShouldStop(512); -_t.runVoidMethod ("Add",(Object)(((BA.numberCast(int.class, _x.getArrayElement(true,BA.numberCast(int.class, 0))))))); - } -}Debug.locals.put("p", _p); -; - BA.debugLineNum = 1100;BA.debugLine="t.Sort(True) 'Ordenamos la lista para que en el l"; -Debug.ShouldStop(2048); -_t.runVoidMethod ("Sort",(Object)(subs.mostCurrent.__c.getField(true,"True"))); - BA.debugLineNum = 1101;BA.debugLine="If thisLog Then LogColor($\"prodsFijos=${idProdsFi"; -Debug.ShouldStop(4096); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314221332",(RemoteObject.concat(RemoteObject.createImmutable("prodsFijos="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_idprodsfijos.getObject()))),RemoteObject.createImmutable(""))),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Blue"));}; - BA.debugLineNum = 1102;BA.debugLine="If thisLog Then LogColor($\"prodsFijosPiezasReq=${"; -Debug.ShouldStop(8192); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314221333",(RemoteObject.concat(RemoteObject.createImmutable("prodsFijosPiezasReq="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_prodsfijospiezas.getObject()))),RemoteObject.createImmutable(""))),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Blue"));}; - BA.debugLineNum = 1103;BA.debugLine="If thisLog Then LogColor($\"invFijoXpromo=${invFij"; -Debug.ShouldStop(16384); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314221334",(RemoteObject.concat(RemoteObject.createImmutable("invFijoXpromo="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_invfijoxpromo.getObject()))),RemoteObject.createImmutable(""))),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Blue"));}; - BA.debugLineNum = 1104;BA.debugLine="LogColor(\"Max promos de prodsFijos POR inventario"; -Debug.ShouldStop(32768); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314221335",RemoteObject.concat(RemoteObject.createImmutable("Max promos de prodsFijos POR inventario = "),_t.runMethod(false,"Get",(Object)(BA.numberCast(int.class, 0)))),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 1105;BA.debugLine="Return t.Get(0) 'Regresamos el resultado mas pequ"; -Debug.ShouldStop(65536); -if (true) return BA.numberCast(int.class, _t.runMethod(false,"Get",(Object)(BA.numberCast(int.class, 0)))); - BA.debugLineNum = 1106;BA.debugLine="End Sub"; -Debug.ShouldStop(131072); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _revisamaxpromosprodsfijosporinventario2(RemoteObject _ba,RemoteObject _pm) throws Exception{ -try { - Debug.PushSubsStack("revisaMaxPromosProdsFijosPorInventario2 (subs) ","subs",9,_ba,subs.mostCurrent,1038); -if (RapidSub.canDelegate("revisamaxpromosprodsfijosporinventario2")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","revisamaxpromosprodsfijosporinventario2", _ba, _pm);} -RemoteObject _thislog = RemoteObject.createImmutable(false); -RemoteObject _invdispparapromo = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -RemoteObject _maxpromos = RemoteObject.createImmutable(""); -RemoteObject _maxpromosfijosxinv = RemoteObject.createImmutable(0); -RemoteObject _fpf2 = RemoteObject.createImmutable(0); -RemoteObject _pdp2 = RemoteObject.createImmutable(0); -RemoteObject _salir = RemoteObject.createImmutable(false); -RemoteObject _pf = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _pfp = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _invfijoxpromo = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -int _p = 0; -int _i = 0; -int _q = 0; -RemoteObject _q2 = RemoteObject.createImmutable(""); -; -Debug.locals.put("pm", _pm); - BA.debugLineNum = 1038;BA.debugLine="Sub revisaMaxPromosProdsFijosPorInventario2(pm As"; -Debug.ShouldStop(8192); - BA.debugLineNum = 1039;BA.debugLine="Private thisLog As Boolean = False"; -Debug.ShouldStop(16384); -_thislog = subs.mostCurrent.__c.getField(true,"False");Debug.locals.put("thisLog", _thislog);Debug.locals.put("thisLog", _thislog); - BA.debugLineNum = 1040;BA.debugLine="If thisLog Then Log($\"pm=${pm}\"$)"; -Debug.ShouldStop(32768); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314155778",(RemoteObject.concat(RemoteObject.createImmutable("pm="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_pm.getObject()))),RemoteObject.createImmutable(""))),0);}; - BA.debugLineNum = 1042;BA.debugLine="Private invDispParaPromo As Map = traemosInventar"; -Debug.ShouldStop(131072); -_invdispparapromo = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_invdispparapromo = _traemosinventariodisponibleparapromo(_ba,BA.ObjectToString(_pm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("id"))))));Debug.locals.put("invDispParaPromo", _invdispparapromo);Debug.locals.put("invDispParaPromo", _invdispparapromo); - BA.debugLineNum = 1043;BA.debugLine="If thisLog Then Log($\"invDispParaPromo=${invDispP"; -Debug.ShouldStop(262144); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314155781",(RemoteObject.concat(RemoteObject.createImmutable("invDispParaPromo="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_invdispparapromo.getObject()))),RemoteObject.createImmutable(""))),0);}; - BA.debugLineNum = 1044;BA.debugLine="Private maxPromos As String = traeMaxPromos(pm)"; -Debug.ShouldStop(524288); -_maxpromos = BA.NumberToString(_traemaxpromos(_ba,_pm));Debug.locals.put("maxPromos", _maxpromos);Debug.locals.put("maxPromos", _maxpromos); - BA.debugLineNum = 1045;BA.debugLine="Private maxPromosFijosXinv As Int = 1"; -Debug.ShouldStop(1048576); -_maxpromosfijosxinv = BA.numberCast(int.class, 1);Debug.locals.put("maxPromosFijosXinv", _maxpromosfijosxinv);Debug.locals.put("maxPromosFijosXinv", _maxpromosfijosxinv); - BA.debugLineNum = 1046;BA.debugLine="Private fpf2, pdp2 As Int"; -Debug.ShouldStop(2097152); -_fpf2 = RemoteObject.createImmutable(0);Debug.locals.put("fpf2", _fpf2); -_pdp2 = RemoteObject.createImmutable(0);Debug.locals.put("pdp2", _pdp2); - BA.debugLineNum = 1047;BA.debugLine="Private salir As Boolean = False"; -Debug.ShouldStop(4194304); -_salir = subs.mostCurrent.__c.getField(true,"False");Debug.locals.put("salir", _salir);Debug.locals.put("salir", _salir); - BA.debugLineNum = 1048;BA.debugLine="Private pf As List = pm.Get(\"prodsFijos\")"; -Debug.ShouldStop(8388608); -_pf = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); -_pf = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), _pm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsFijos")))));Debug.locals.put("pf", _pf);Debug.locals.put("pf", _pf); - BA.debugLineNum = 1049;BA.debugLine="Private pfp As List = pm.Get(\"prodsFijosPiezas\")"; -Debug.ShouldStop(16777216); -_pfp = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); -_pfp = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), _pm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsFijosPiezas")))));Debug.locals.put("pfp", _pfp);Debug.locals.put("pfp", _pfp); - BA.debugLineNum = 1050;BA.debugLine="If thisLog Then Log($\"maxPromos=${maxPromos}, pro"; -Debug.ShouldStop(33554432); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314155788",(RemoteObject.concat(RemoteObject.createImmutable("maxPromos="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_maxpromos))),RemoteObject.createImmutable(", prodsFijos="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_pf.getObject()))),RemoteObject.createImmutable(", piezas="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_pfp.getObject()))),RemoteObject.createImmutable(""))),0);}; - BA.debugLineNum = 1051;BA.debugLine="If thisLog Then LogColor($\"InvFijo disponible=${i"; -Debug.ShouldStop(67108864); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314155789",(RemoteObject.concat(RemoteObject.createImmutable("InvFijo disponible="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_invdispparapromo.getObject()))),RemoteObject.createImmutable(""))),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Blue"));}; - BA.debugLineNum = 1052;BA.debugLine="Private invFijoXpromo As Map"; -Debug.ShouldStop(134217728); -_invfijoxpromo = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");Debug.locals.put("invFijoXpromo", _invfijoxpromo); - BA.debugLineNum = 1053;BA.debugLine="invFijoXpromo.Initialize"; -Debug.ShouldStop(268435456); -_invfijoxpromo.runVoidMethod ("Initialize"); - BA.debugLineNum = 1054;BA.debugLine="For p = 0 To pf.Size -1 'Generamos mapa con los p"; -Debug.ShouldStop(536870912); -{ -final int step15 = 1; -final int limit15 = RemoteObject.solve(new RemoteObject[] {_pf.runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_p = 0 ; -for (;(step15 > 0 && _p <= limit15) || (step15 < 0 && _p >= limit15) ;_p = ((int)(0 + _p + step15)) ) { -Debug.locals.put("p", _p); - BA.debugLineNum = 1055;BA.debugLine="invFijoXpromo.Put(pf.Get(p), pfp.Get(p))"; -Debug.ShouldStop(1073741824); -_invfijoxpromo.runVoidMethod ("Put",(Object)(_pf.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _p)))),(Object)(_pfp.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _p))))); - } -}Debug.locals.put("p", _p); -; - BA.debugLineNum = 1057;BA.debugLine="If thisLog Then LogColor(\"Inv req. de prods fijos"; -Debug.ShouldStop(1); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314155795",RemoteObject.concat(RemoteObject.createImmutable("Inv req. de prods fijos x promo"),_invfijoxpromo),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Green"));}; - BA.debugLineNum = 1058;BA.debugLine="For i = 1 To maxPromos 'Revisamos cuantas promoci"; -Debug.ShouldStop(2); -{ -final int step19 = 1; -final int limit19 = (int)(Double.parseDouble(_maxpromos.get())); -_i = 1 ; -for (;(step19 > 0 && _i <= limit19) || (step19 < 0 && _i >= limit19) ;_i = ((int)(0 + _i + step19)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 1059;BA.debugLine="If thisLog Then LogColor(\"Prods para promo \" & ("; -Debug.ShouldStop(4); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314155797",RemoteObject.concat(RemoteObject.createImmutable("Prods para promo "),(RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_i),RemoteObject.createImmutable(1)}, "+",1, 1))),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Magenta"));}; - BA.debugLineNum = 1060;BA.debugLine="For q = 0 To pf.Size - 1"; -Debug.ShouldStop(8); -{ -final int step21 = 1; -final int limit21 = RemoteObject.solve(new RemoteObject[] {_pf.runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_q = 0 ; -for (;(step21 > 0 && _q <= limit21) || (step21 < 0 && _q >= limit21) ;_q = ((int)(0 + _q + step21)) ) { -Debug.locals.put("q", _q); - BA.debugLineNum = 1061;BA.debugLine="Private q2 As String = pf.Get(q)"; -Debug.ShouldStop(16); -_q2 = BA.ObjectToString(_pf.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _q))));Debug.locals.put("q2", _q2);Debug.locals.put("q2", _q2); - BA.debugLineNum = 1062;BA.debugLine="If thisLog Then Log(\"q=\"&q2)"; -Debug.ShouldStop(32); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314155800",RemoteObject.concat(RemoteObject.createImmutable("q="),_q2),0);}; - BA.debugLineNum = 1064;BA.debugLine="fpf2 = pfp.Get(q) * i 'Multiplicamos las piezas"; -Debug.ShouldStop(128); -_fpf2 = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, _pfp.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _q)))),RemoteObject.createImmutable(_i)}, "*",0, 0));Debug.locals.put("fpf2", _fpf2); - BA.debugLineNum = 1065;BA.debugLine="pdp2 = invDispParaPromo.Get(q2)"; -Debug.ShouldStop(256); -_pdp2 = BA.numberCast(int.class, _invdispparapromo.runMethod(false,"Get",(Object)((_q2))));Debug.locals.put("pdp2", _pdp2); - BA.debugLineNum = 1066;BA.debugLine="If thisLog Then Log($\"pf=${q2}, Actual=${(i)},"; -Debug.ShouldStop(512); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314155804",(RemoteObject.concat(RemoteObject.createImmutable("pf="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_q2))),RemoteObject.createImmutable(", Actual="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)(RemoteObject.createImmutable(((_i))))),RemoteObject.createImmutable(", max promos: "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_pdp2))),RemoteObject.createImmutable("-"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_fpf2))),RemoteObject.createImmutable("="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((RemoteObject.solve(new RemoteObject[] {_pdp2,_fpf2}, "-",1, 1)))),RemoteObject.createImmutable(""))),0);}; - BA.debugLineNum = 1067;BA.debugLine="If pdp2 - fpf2 < 0 Then 'Si el inventario es ne"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("<",RemoteObject.solve(new RemoteObject[] {_pdp2,_fpf2}, "-",1, 1),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 1068;BA.debugLine="salir=True"; -Debug.ShouldStop(2048); -_salir = subs.mostCurrent.__c.getField(true,"True");Debug.locals.put("salir", _salir); - BA.debugLineNum = 1069;BA.debugLine="Exit"; -Debug.ShouldStop(4096); -if (true) break; - }; - } -}Debug.locals.put("q", _q); -; - BA.debugLineNum = 1072;BA.debugLine="If salir Then Exit"; -Debug.ShouldStop(32768); -if (_salir.get().booleanValue()) { -if (true) break;}; - BA.debugLineNum = 1073;BA.debugLine="maxPromosFijosXinv = i"; -Debug.ShouldStop(65536); -_maxpromosfijosxinv = BA.numberCast(int.class, _i);Debug.locals.put("maxPromosFijosXinv", _maxpromosfijosxinv); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 1075;BA.debugLine="If thisLog Then LogColor(\"InvFijo requerido x pro"; -Debug.ShouldStop(262144); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314155813",RemoteObject.concat(RemoteObject.createImmutable("InvFijo requerido x promo="),_invfijoxpromo),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Blue"));}; - BA.debugLineNum = 1076;BA.debugLine="LogColor(\"Maximo de promociones de prodsFijos POR"; -Debug.ShouldStop(524288); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314155814",RemoteObject.concat(RemoteObject.createImmutable("Maximo de promociones de prodsFijos POR inventario = "),_maxpromosfijosxinv),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - BA.debugLineNum = 1077;BA.debugLine="Return maxPromosFijosXinv"; -Debug.ShouldStop(1048576); -if (true) return _maxpromosfijosxinv; - BA.debugLineNum = 1078;BA.debugLine="End Sub"; -Debug.ShouldStop(2097152); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _revisamaxpromosprodsvariablesporinventario(RemoteObject _ba,RemoteObject _pm) throws Exception{ -try { - Debug.PushSubsStack("revisaMaxPromosProdsVariablesPorInventario (subs) ","subs",9,_ba,subs.mostCurrent,1113); -if (RapidSub.canDelegate("revisamaxpromosprodsvariablesporinventario")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","revisamaxpromosprodsvariablesporinventario", _ba, _pm);} -RemoteObject _thislog = RemoteObject.createImmutable(false); -RemoteObject _invfijoxpromo = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -RemoteObject _totalprodsvariablesdisponibles = RemoteObject.createImmutable(0); -RemoteObject _invdispparapromo = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -RemoteObject _maxpromos = RemoteObject.createImmutable(""); -RemoteObject _maxpromosxfijos = RemoteObject.createImmutable(0); -RemoteObject _idprodsvariables = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _prodsvariablesrequeridos = RemoteObject.createImmutable(0); -RemoteObject _prodsfijospiezas = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _idprodsfijos = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -int _p = 0; -RemoteObject _idesteprod = RemoteObject.createImmutable(""); -RemoteObject _investeprod = RemoteObject.createImmutable(0); -RemoteObject _pzasreqesteprod = RemoteObject.createImmutable(0); -RemoteObject _maxpromosxvariables = RemoteObject.createImmutable(0); -int _x = 0; -int _i = 0; -; -Debug.locals.put("pm", _pm); - BA.debugLineNum = 1113;BA.debugLine="Sub revisaMaxPromosProdsVariablesPorInventario(pm"; -Debug.ShouldStop(16777216); - BA.debugLineNum = 1114;BA.debugLine="Private thisLog As Boolean = False"; -Debug.ShouldStop(33554432); -_thislog = subs.mostCurrent.__c.getField(true,"False");Debug.locals.put("thisLog", _thislog);Debug.locals.put("thisLog", _thislog); - BA.debugLineNum = 1115;BA.debugLine="If thisLog Then Log(\"============================"; -Debug.ShouldStop(67108864); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314286850",RemoteObject.createImmutable("======================================================"),0);}; - BA.debugLineNum = 1116;BA.debugLine="If thisLog Then Log(\"============================"; -Debug.ShouldStop(134217728); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314286851",RemoteObject.createImmutable("======================================================"),0);}; - BA.debugLineNum = 1117;BA.debugLine="Private invFijoXpromo As Map"; -Debug.ShouldStop(268435456); -_invfijoxpromo = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");Debug.locals.put("invFijoXpromo", _invfijoxpromo); - BA.debugLineNum = 1118;BA.debugLine="invFijoXpromo.Initialize"; -Debug.ShouldStop(536870912); -_invfijoxpromo.runVoidMethod ("Initialize"); - BA.debugLineNum = 1119;BA.debugLine="Private totalProdsVariablesDisponibles As Int = 0"; -Debug.ShouldStop(1073741824); -_totalprodsvariablesdisponibles = BA.numberCast(int.class, 0);Debug.locals.put("totalProdsVariablesDisponibles", _totalprodsvariablesdisponibles);Debug.locals.put("totalProdsVariablesDisponibles", _totalprodsvariablesdisponibles); - BA.debugLineNum = 1120;BA.debugLine="If thisLog Then LogColor($\"pm=${pm}\"$, Colors.Blu"; -Debug.ShouldStop(-2147483648); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314286855",(RemoteObject.concat(RemoteObject.createImmutable("pm="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_pm.getObject()))),RemoteObject.createImmutable(""))),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Blue"));}; - BA.debugLineNum = 1121;BA.debugLine="Private invDispParaPromo As Map = traemosInventar"; -Debug.ShouldStop(1); -_invdispparapromo = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map"); -_invdispparapromo = _traemosinventariodisponibleparapromo(_ba,BA.ObjectToString(_pm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("id"))))));Debug.locals.put("invDispParaPromo", _invdispparapromo);Debug.locals.put("invDispParaPromo", _invdispparapromo); - BA.debugLineNum = 1122;BA.debugLine="If thisLog Then Log($\"invDispParaPromo=${invDispP"; -Debug.ShouldStop(2); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314286857",(RemoteObject.concat(RemoteObject.createImmutable("invDispParaPromo="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_invdispparapromo.getObject()))),RemoteObject.createImmutable(""))),0);}; - BA.debugLineNum = 1123;BA.debugLine="Private maxPromos As String = traeMaxPromos(pm)"; -Debug.ShouldStop(4); -_maxpromos = BA.NumberToString(_traemaxpromos(_ba,_pm));Debug.locals.put("maxPromos", _maxpromos);Debug.locals.put("maxPromos", _maxpromos); - BA.debugLineNum = 1124;BA.debugLine="Private maxPromosXFijos As Int = revisaMaxPromosP"; -Debug.ShouldStop(8); -_maxpromosxfijos = _revisamaxpromosprodsfijosporinventario(_ba,_pm);Debug.locals.put("maxPromosXFijos", _maxpromosxfijos);Debug.locals.put("maxPromosXFijos", _maxpromosxfijos); - BA.debugLineNum = 1125;BA.debugLine="Private idProdsVariables As List = pm.Get(\"prodsV"; -Debug.ShouldStop(16); -_idprodsvariables = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); -_idprodsvariables = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), _pm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsVariables")))));Debug.locals.put("idProdsVariables", _idprodsvariables);Debug.locals.put("idProdsVariables", _idprodsvariables); - BA.debugLineNum = 1126;BA.debugLine="Private prodsVariablesRequeridos As Int = pm.Get("; -Debug.ShouldStop(32); -_prodsvariablesrequeridos = BA.numberCast(int.class, _pm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsVariablesRequeridos")))));Debug.locals.put("prodsVariablesRequeridos", _prodsvariablesrequeridos);Debug.locals.put("prodsVariablesRequeridos", _prodsvariablesrequeridos); - BA.debugLineNum = 1127;BA.debugLine="Private prodsFijosPiezas As List = pm.Get(\"prodsF"; -Debug.ShouldStop(64); -_prodsfijospiezas = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); -_prodsfijospiezas = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), _pm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsFijosPiezas")))));Debug.locals.put("prodsFijosPiezas", _prodsfijospiezas);Debug.locals.put("prodsFijosPiezas", _prodsfijospiezas); - BA.debugLineNum = 1128;BA.debugLine="Private idProdsFijos As List = pm.Get(\"prodsFijos"; -Debug.ShouldStop(128); -_idprodsfijos = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List"); -_idprodsfijos = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.List"), _pm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("prodsFijos")))));Debug.locals.put("idProdsFijos", _idprodsfijos);Debug.locals.put("idProdsFijos", _idprodsfijos); - BA.debugLineNum = 1129;BA.debugLine="For p = 0 To idProdsFijos.Size -1 'Generamos mapa"; -Debug.ShouldStop(256); -{ -final int step16 = 1; -final int limit16 = RemoteObject.solve(new RemoteObject[] {_idprodsfijos.runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_p = 0 ; -for (;(step16 > 0 && _p <= limit16) || (step16 < 0 && _p >= limit16) ;_p = ((int)(0 + _p + step16)) ) { -Debug.locals.put("p", _p); - BA.debugLineNum = 1130;BA.debugLine="invFijoXpromo.Put(idProdsFijos.Get(p), prodsFijo"; -Debug.ShouldStop(512); -_invfijoxpromo.runVoidMethod ("Put",(Object)(_idprodsfijos.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _p)))),(Object)(_prodsfijospiezas.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _p))))); - BA.debugLineNum = 1131;BA.debugLine="Private idEsteProd As String = idProdsFijos.Get("; -Debug.ShouldStop(1024); -_idesteprod = BA.ObjectToString(_idprodsfijos.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _p))));Debug.locals.put("idEsteProd", _idesteprod);Debug.locals.put("idEsteProd", _idesteprod); - BA.debugLineNum = 1132;BA.debugLine="Private invEsteProd As Int = invDispParaPromo.Ge"; -Debug.ShouldStop(2048); -_investeprod = BA.numberCast(int.class, _invdispparapromo.runMethod(false,"Get",(Object)((_idesteprod))));Debug.locals.put("invEsteProd", _investeprod);Debug.locals.put("invEsteProd", _investeprod); - BA.debugLineNum = 1133;BA.debugLine="Private pzasReqEsteProd As Int = prodsFijosPieza"; -Debug.ShouldStop(4096); -_pzasreqesteprod = BA.numberCast(int.class, _prodsfijospiezas.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _p))));Debug.locals.put("pzasReqEsteProd", _pzasreqesteprod);Debug.locals.put("pzasReqEsteProd", _pzasreqesteprod); - BA.debugLineNum = 1134;BA.debugLine="If thisLog Then Log($\"id=${idEsteProd}, inv=${in"; -Debug.ShouldStop(8192); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314286869",(RemoteObject.concat(RemoteObject.createImmutable("id="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_idesteprod))),RemoteObject.createImmutable(", inv="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_investeprod))),RemoteObject.createImmutable(", pzas="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_pzasreqesteprod))),RemoteObject.createImmutable(""))),0);}; - } -}Debug.locals.put("p", _p); -; - BA.debugLineNum = 1137;BA.debugLine="If thisLog Then LogColor($\"MaxPromos=${maxPromos}"; -Debug.ShouldStop(65536); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314286872",(RemoteObject.concat(RemoteObject.createImmutable("MaxPromos="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_maxpromos))),RemoteObject.createImmutable(", promosXFijos="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_maxpromosxfijos))),RemoteObject.createImmutable(""))),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Blue"));}; - BA.debugLineNum = 1138;BA.debugLine="If thisLog Then LogColor($\"prodsFijos=${idProdsFi"; -Debug.ShouldStop(131072); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314286873",(RemoteObject.concat(RemoteObject.createImmutable("prodsFijos="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_idprodsfijos.getObject()))),RemoteObject.createImmutable(""))),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Blue"));}; - BA.debugLineNum = 1139;BA.debugLine="If thisLog Then LogColor($\"prodsFijosPiezasReq=${"; -Debug.ShouldStop(262144); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314286874",(RemoteObject.concat(RemoteObject.createImmutable("prodsFijosPiezasReq="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_prodsfijospiezas.getObject()))),RemoteObject.createImmutable(""))),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Blue"));}; - BA.debugLineNum = 1140;BA.debugLine="If thisLog Then LogColor($\"prodsVariables=${idPro"; -Debug.ShouldStop(524288); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314286875",(RemoteObject.concat(RemoteObject.createImmutable("prodsVariables="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_idprodsvariables.getObject()))),RemoteObject.createImmutable(""),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((subs.mostCurrent.__c.getField(true,"CRLF")))),RemoteObject.createImmutable("Variables Req="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_prodsvariablesrequeridos))),RemoteObject.createImmutable(" "))),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Blue"));}; - BA.debugLineNum = 1141;BA.debugLine="If thisLog Then LogColor($\"invFijoXpromo=${invFij"; -Debug.ShouldStop(1048576); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314286876",(RemoteObject.concat(RemoteObject.createImmutable("invFijoXpromo="),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_invfijoxpromo.getObject()))),RemoteObject.createImmutable(""))),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Blue"));}; - BA.debugLineNum = 1142;BA.debugLine="If thisLog Then Log($\"Prods variables disponibles"; -Debug.ShouldStop(2097152); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314286877",(RemoteObject.concat(RemoteObject.createImmutable("Prods variables disponibles = "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_totalprodsvariablesdisponibles))),RemoteObject.createImmutable(""))),0);}; - BA.debugLineNum = 1143;BA.debugLine="Private maxPromosXVariables As Int = 0"; -Debug.ShouldStop(4194304); -_maxpromosxvariables = BA.numberCast(int.class, 0);Debug.locals.put("maxPromosXVariables", _maxpromosxvariables);Debug.locals.put("maxPromosXVariables", _maxpromosxvariables); - BA.debugLineNum = 1144;BA.debugLine="For x = 1 To maxPromosXFijos"; -Debug.ShouldStop(8388608); -{ -final int step30 = 1; -final int limit30 = _maxpromosxfijos.get().intValue(); -_x = 1 ; -for (;(step30 > 0 && _x <= limit30) || (step30 < 0 && _x >= limit30) ;_x = ((int)(0 + _x + step30)) ) { -Debug.locals.put("x", _x); - BA.debugLineNum = 1145;BA.debugLine="If thisLog Then Log(\"==========================="; -Debug.ShouldStop(16777216); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314286880",RemoteObject.createImmutable("====================================================="),0);}; - BA.debugLineNum = 1146;BA.debugLine="If thisLog Then Log(\"==========================="; -Debug.ShouldStop(33554432); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314286881",RemoteObject.createImmutable("====================================================="),0);}; - BA.debugLineNum = 1147;BA.debugLine="For i = 0 To idProdsFijos.Size - 1"; -Debug.ShouldStop(67108864); -{ -final int step33 = 1; -final int limit33 = RemoteObject.solve(new RemoteObject[] {_idprodsfijos.runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step33 > 0 && _i <= limit33) || (step33 < 0 && _i >= limit33) ;_i = ((int)(0 + _i + step33)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 1148;BA.debugLine="If thisLog Then Log($\"FIJO - ${idProdsFijos.Get"; -Debug.ShouldStop(134217728); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314286883",(RemoteObject.concat(RemoteObject.createImmutable("FIJO - "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)(_idprodsfijos.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))))),RemoteObject.createImmutable(", "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)(_invdispparapromo.runMethod(false,"Get",(Object)(_idprodsfijos.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))))))),RemoteObject.createImmutable(" - "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((RemoteObject.solve(new RemoteObject[] {(BA.numberCast(int.class, _prodsfijospiezas.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))))),(RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_i),RemoteObject.createImmutable(1)}, "+",1, 1))}, "*",0, 1)))),RemoteObject.createImmutable(""))),0);}; - BA.debugLineNum = 1149;BA.debugLine="invDispParaPromo.Put(idProdsFijos.Get(i), invDi"; -Debug.ShouldStop(268435456); -_invdispparapromo.runVoidMethod ("Put",(Object)(_idprodsfijos.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i)))),(Object)((RemoteObject.solve(new RemoteObject[] {(BA.numberCast(int.class, _invdispparapromo.runMethod(false,"Get",(Object)(_idprodsfijos.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))))))),(BA.numberCast(int.class, _prodsfijospiezas.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))))),(RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_i),RemoteObject.createImmutable(1)}, "+",1, 1))}, "-*",1, 1)))); - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 1151;BA.debugLine="If thisLog Then LogColor(\"Inv disponible despues"; -Debug.ShouldStop(1073741824); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314286886",RemoteObject.concat(RemoteObject.createImmutable("Inv disponible despues de restar fijos = "),_invdispparapromo),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Blue"));}; - BA.debugLineNum = 1153;BA.debugLine="totalProdsVariablesDisponibles = 0"; -Debug.ShouldStop(1); -_totalprodsvariablesdisponibles = BA.numberCast(int.class, 0);Debug.locals.put("totalProdsVariablesDisponibles", _totalprodsvariablesdisponibles); - BA.debugLineNum = 1154;BA.debugLine="For i = 0 To idProdsVariables.Size - 1 'Obtenemo"; -Debug.ShouldStop(2); -{ -final int step39 = 1; -final int limit39 = RemoteObject.solve(new RemoteObject[] {_idprodsvariables.runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step39 > 0 && _i <= limit39) || (step39 < 0 && _i >= limit39) ;_i = ((int)(0 + _i + step39)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 1155;BA.debugLine="If invDispParaPromo.ContainsKey(idProdsVariable"; -Debug.ShouldStop(4); -if (_invdispparapromo.runMethod(true,"ContainsKey",(Object)(_idprodsvariables.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))))).get().booleanValue()) { - BA.debugLineNum = 1156;BA.debugLine="totalProdsVariablesDisponibles = totalProdsVar"; -Debug.ShouldStop(8); -_totalprodsvariablesdisponibles = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_totalprodsvariablesdisponibles,BA.numberCast(double.class, _invdispparapromo.runMethod(false,"Get",(Object)(_idprodsvariables.runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))))))}, "+",1, 0));Debug.locals.put("totalProdsVariablesDisponibles", _totalprodsvariablesdisponibles); - }; - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 1160;BA.debugLine="If thisLog Then Log($\"Var disponibles - var req"; -Debug.ShouldStop(128); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314286895",(RemoteObject.concat(RemoteObject.createImmutable("Var disponibles - var requeridos : "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_totalprodsvariablesdisponibles))),RemoteObject.createImmutable(" - "),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((RemoteObject.solve(new RemoteObject[] {_prodsvariablesrequeridos,RemoteObject.createImmutable(_x)}, "*",0, 1)))),RemoteObject.createImmutable(""))),0);}; - BA.debugLineNum = 1161;BA.debugLine="totalProdsVariablesDisponibles = totalProdsVaria"; -Debug.ShouldStop(256); -_totalprodsvariablesdisponibles = RemoteObject.solve(new RemoteObject[] {_totalprodsvariablesdisponibles,(RemoteObject.solve(new RemoteObject[] {_prodsvariablesrequeridos,RemoteObject.createImmutable(_x)}, "*",0, 1))}, "-",1, 1);Debug.locals.put("totalProdsVariablesDisponibles", _totalprodsvariablesdisponibles); - BA.debugLineNum = 1162;BA.debugLine="If thisLog Then Log(\"prodsVariables disponibles"; -Debug.ShouldStop(512); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314286897",RemoteObject.concat(RemoteObject.createImmutable("prodsVariables disponibles despues de promo = "),_totalprodsvariablesdisponibles),0);}; - BA.debugLineNum = 1163;BA.debugLine="If totalProdsVariablesDisponibles < 0 Then Exit"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("<",_totalprodsvariablesdisponibles,BA.numberCast(double.class, 0))) { -if (true) break;}; - BA.debugLineNum = 1164;BA.debugLine="maxPromosXVariables = x"; -Debug.ShouldStop(2048); -_maxpromosxvariables = BA.numberCast(int.class, _x);Debug.locals.put("maxPromosXVariables", _maxpromosxvariables); - } -}Debug.locals.put("x", _x); -; - BA.debugLineNum = 1167;BA.debugLine="If thisLog Then LogColor(\"Max promos de prodsVari"; -Debug.ShouldStop(16384); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","314286902",RemoteObject.concat(RemoteObject.createImmutable("Max promos de prodsVariables POR inventario = "),_maxpromosxvariables),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red"));}; - BA.debugLineNum = 1168;BA.debugLine="Return maxPromosXVariables"; -Debug.ShouldStop(32768); -if (true) return _maxpromosxvariables; - BA.debugLineNum = 1169;BA.debugLine="End Sub"; -Debug.ShouldStop(65536); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _revisauug(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("revisaUUG (subs) ","subs",9,_ba,subs.mostCurrent,408); -if (RapidSub.canDelegate("revisauug")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","revisauug", _ba);} -RemoteObject _daa = RemoteObject.createImmutable(0); -; - BA.debugLineNum = 408;BA.debugLine="Sub revisaUUG 'ignore"; -Debug.ShouldStop(8388608); - BA.debugLineNum = 409;BA.debugLine="Try"; -Debug.ShouldStop(16777216); -try { BA.debugLineNum = 411;BA.debugLine="If Tracker.FLP.GetLastKnownLocation.IsInitialize"; -Debug.ShouldStop(67108864); -if (subs.mostCurrent._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation").runMethod(true,"IsInitialized").get().booleanValue()) { - BA.debugLineNum = 412;BA.debugLine="Dim daa As Int = Tracker.UUGCoords.DistanceTo(T"; -Debug.ShouldStop(134217728); -_daa = BA.numberCast(int.class, subs.mostCurrent._tracker._uugcoords /*RemoteObject*/ .runMethod(true,"DistanceTo",(Object)((subs.mostCurrent._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation").getObject()))));Debug.locals.put("daa", _daa);Debug.locals.put("daa", _daa); - BA.debugLineNum = 413;BA.debugLine="If Starter.Logger Then LogColor($\"**** UUC \"${f"; -Debug.ShouldStop(268435456); -if (subs.mostCurrent._starter._logger /*RemoteObject*/ .get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312058629",(RemoteObject.concat(RemoteObject.createImmutable("**** UUC \""),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_fechakmt(_ba,BA.NumberToString(subs.mostCurrent._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation").runMethod(true,"getTime")))))),RemoteObject.createImmutable("|"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("0.2")),(Object)((subs.mostCurrent._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation").runMethod(true,"getAccuracy")))),RemoteObject.createImmutable("|"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("0.8")),(Object)((subs.mostCurrent._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation").runMethod(true,"getLatitude")))),RemoteObject.createImmutable("|"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("0.8")),(Object)((subs.mostCurrent._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation").runMethod(true,"getLongitude")))),RemoteObject.createImmutable("|"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("0.2")),(Object)((subs.mostCurrent._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation").runMethod(true,"getSpeed")))),RemoteObject.createImmutable("|"))),subs.mostCurrent.__c.getField(false,"Colors").runMethod(true,"RGB",(Object)(BA.numberCast(int.class, 255)),(Object)(BA.numberCast(int.class, 112)),(Object)(BA.numberCast(int.class, 35))));}; - BA.debugLineNum = 414;BA.debugLine="If daa > 40 And Tracker.FLP.GetLastKnownLocatio"; -Debug.ShouldStop(536870912); -if (RemoteObject.solveBoolean(">",_daa,BA.numberCast(double.class, 40)) && RemoteObject.solveBoolean("<",subs.mostCurrent._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation").runMethod(true,"getAccuracy"),BA.numberCast(double.class, 35))) { - BA.debugLineNum = 415;BA.debugLine="kmt.ExecNonQuery2(\"INSERT INTO RUTA_GPS(fecha,"; -Debug.ShouldStop(1073741824); -subs._kmt.runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO RUTA_GPS(fecha, lat, lon) VALUES (?,?,?)")),(Object)(subs.mostCurrent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {3},new Object[] {(_fechakmt(_ba,BA.NumberToString(subs.mostCurrent._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation").runMethod(true,"getTime")))),(subs.mostCurrent._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation").runMethod(true,"getLatitude")),(subs.mostCurrent._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation").runMethod(true,"getLongitude"))}))))); - BA.debugLineNum = 416;BA.debugLine="If Starter.Logger Then Log(\"++++ Distancia a a"; -Debug.ShouldStop(-2147483648); -if (subs.mostCurrent._starter._logger /*RemoteObject*/ .get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312058632",RemoteObject.concat(RemoteObject.createImmutable("++++ Distancia a anterior="),_daa,RemoteObject.createImmutable("|"),RemoteObject.createImmutable("Precision="),subs.mostCurrent._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation").runMethod(true,"getAccuracy")),0);}; - }; - BA.debugLineNum = 418;BA.debugLine="Tracker.UUGCoords = Tracker.FLP.GetLastKnownLoc"; -Debug.ShouldStop(2); -subs.mostCurrent._tracker._uugcoords /*RemoteObject*/ = subs.mostCurrent._tracker._flp /*RemoteObject*/ .runMethod(false,"GetLastKnownLocation"); - }; - Debug.CheckDeviceExceptions(); -} - catch (Exception e12) { - BA.rdebugUtils.runVoidMethod("setLastException",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba), e12.toString()); BA.debugLineNum = 421;BA.debugLine="LogColor(\"If Tracker.FLP.GetLastKnownLocation.Is"; -Debug.ShouldStop(16); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","312058637",RemoteObject.concat(RemoteObject.createImmutable("If Tracker.FLP.GetLastKnownLocation.IsInitialized --> "),subs.mostCurrent.__c.runMethod(false,"LastException",_ba)),subs.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - }; - BA.debugLineNum = 423;BA.debugLine="End Sub"; -Debug.ShouldStop(64); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _traealmacen(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("traeAlmacen (subs) ","subs",9,_ba,subs.mostCurrent,694); -if (RapidSub.canDelegate("traealmacen")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","traealmacen", _ba);} -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -RemoteObject _a = RemoteObject.createImmutable(""); -; - BA.debugLineNum = 694;BA.debugLine="Sub traeAlmacen As String 'ignore"; -Debug.ShouldStop(2097152); - BA.debugLineNum = 695;BA.debugLine="Private c As Cursor"; -Debug.ShouldStop(4194304); -_c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");Debug.locals.put("c", _c); - BA.debugLineNum = 696;BA.debugLine="Private a As String"; -Debug.ShouldStop(8388608); -_a = RemoteObject.createImmutable("");Debug.locals.put("a", _a); - BA.debugLineNum = 697;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select ID_AL"; -Debug.ShouldStop(16777216); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select ID_ALMACEN from CAT_ALMACEN"))));Debug.locals.put("c", _c); - BA.debugLineNum = 698;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(33554432); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 699;BA.debugLine="a = C.GetString(\"ID_ALMACEN\")"; -Debug.ShouldStop(67108864); -_a = _c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("ID_ALMACEN")));Debug.locals.put("a", _a); - BA.debugLineNum = 700;BA.debugLine="c.Close"; -Debug.ShouldStop(134217728); -_c.runVoidMethod ("Close"); - BA.debugLineNum = 701;BA.debugLine="Return a"; -Debug.ShouldStop(268435456); -if (true) return _a; - BA.debugLineNum = 702;BA.debugLine="End Sub"; -Debug.ShouldStop(536870912); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _traecliente(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("traeCliente (subs) ","subs",9,_ba,subs.mostCurrent,734); -if (RapidSub.canDelegate("traecliente")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","traecliente", _ba);} -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -RemoteObject _cl = RemoteObject.createImmutable(""); -; - BA.debugLineNum = 734;BA.debugLine="Sub traeCliente As String 'ignore"; -Debug.ShouldStop(536870912); - BA.debugLineNum = 735;BA.debugLine="Private c As Cursor"; -Debug.ShouldStop(1073741824); -_c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");Debug.locals.put("c", _c); - BA.debugLineNum = 736;BA.debugLine="Private cl As String"; -Debug.ShouldStop(-2147483648); -_cl = RemoteObject.createImmutable("");Debug.locals.put("cl", _cl); - BA.debugLineNum = 737;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENTA"; -Debug.ShouldStop(1); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("Select CUENTA from cuentaa"))));Debug.locals.put("c", _c); - BA.debugLineNum = 738;BA.debugLine="c.Position=0"; -Debug.ShouldStop(2); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 739;BA.debugLine="cl = c.GetString(\"CUENTA\")"; -Debug.ShouldStop(4); -_cl = _c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CUENTA")));Debug.locals.put("cl", _cl); - BA.debugLineNum = 740;BA.debugLine="c.Close"; -Debug.ShouldStop(8); -_c.runVoidMethod ("Close"); - BA.debugLineNum = 741;BA.debugLine="Return cl"; -Debug.ShouldStop(16); -if (true) return _cl; - BA.debugLineNum = 742;BA.debugLine="End Sub"; -Debug.ShouldStop(32); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _traefecha(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("traeFecha (subs) ","subs",9,_ba,subs.mostCurrent,744); -if (RapidSub.canDelegate("traefecha")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","traefecha", _ba);} -RemoteObject _sdate = RemoteObject.createImmutable(""); -RemoteObject _stime = RemoteObject.createImmutable(""); -; - BA.debugLineNum = 744;BA.debugLine="Sub traeFecha As String 'ignore"; -Debug.ShouldStop(128); - BA.debugLineNum = 745;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; -Debug.ShouldStop(256); -subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("MM/dd/yyyy")); - BA.debugLineNum = 746;BA.debugLine="Private sDate As String =DateTime.Date(DateTime.N"; -Debug.ShouldStop(512); -_sdate = subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getNow")));Debug.locals.put("sDate", _sdate);Debug.locals.put("sDate", _sdate); - BA.debugLineNum = 747;BA.debugLine="Private sTime As String =DateTime.Time(DateTime.N"; -Debug.ShouldStop(1024); -_stime = subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getNow")));Debug.locals.put("sTime", _stime);Debug.locals.put("sTime", _stime); - BA.debugLineNum = 748;BA.debugLine="Return sDate & sTime"; -Debug.ShouldStop(2048); -if (true) return RemoteObject.concat(_sdate,_stime); - BA.debugLineNum = 749;BA.debugLine="End Sub"; -Debug.ShouldStop(4096); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _traemaxpromos(RemoteObject _ba,RemoteObject _pm) throws Exception{ -try { - Debug.PushSubsStack("traeMaxPromos (subs) ","subs",9,_ba,subs.mostCurrent,964); -if (RapidSub.canDelegate("traemaxpromos")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","traemaxpromos", _ba, _pm);} -RemoteObject _thislog = RemoteObject.createImmutable(false); -RemoteObject _maxpromos = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _vendidas = RemoteObject.createImmutable(0); -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -; -Debug.locals.put("pm", _pm); - BA.debugLineNum = 964;BA.debugLine="Sub traeMaxPromos(pm As Map) As Int"; -Debug.ShouldStop(8); - BA.debugLineNum = 965;BA.debugLine="Private thisLog As Boolean = False 'Si es verdade"; -Debug.ShouldStop(16); -_thislog = subs.mostCurrent.__c.getField(true,"False");Debug.locals.put("thisLog", _thislog);Debug.locals.put("thisLog", _thislog); - BA.debugLineNum = 966;BA.debugLine="Private maxPromos As List"; -Debug.ShouldStop(32); -_maxpromos = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");Debug.locals.put("maxPromos", _maxpromos); - BA.debugLineNum = 967;BA.debugLine="Private vendidas As Int = 0"; -Debug.ShouldStop(64); -_vendidas = BA.numberCast(int.class, 0);Debug.locals.put("vendidas", _vendidas);Debug.locals.put("vendidas", _vendidas); - BA.debugLineNum = 968;BA.debugLine="maxPromos.Initialize"; -Debug.ShouldStop(128); -_maxpromos.runVoidMethod ("Initialize"); - BA.debugLineNum = 970;BA.debugLine="If thisLog Then Log(pm)"; -Debug.ShouldStop(512); -if (_thislog.get().booleanValue()) { -subs.mostCurrent.__c.runVoidMethod ("LogImpl","313959174",BA.ObjectToString(_pm),0);}; - BA.debugLineNum = 971;BA.debugLine="If pm.Get(\"historico\") = \"1\" Then maxPromos.Add(p"; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("=",_pm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("historico")))),RemoteObject.createImmutable(("1")))) { -_maxpromos.runVoidMethod ("Add",(Object)(_pm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("maxRecurrente"))))));}; - BA.debugLineNum = 972;BA.debugLine="maxPromos.Add(pm.Get(\"maxPromos\")) 'Agregamos max"; -Debug.ShouldStop(2048); -_maxpromos.runVoidMethod ("Add",(Object)(_pm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("maxPromos")))))); - BA.debugLineNum = 973;BA.debugLine="maxPromos.Add(pm.Get(\"maxXcliente\")) 'Agregamos m"; -Debug.ShouldStop(4096); -_maxpromos.runVoidMethod ("Add",(Object)(_pm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("maxXcliente")))))); - BA.debugLineNum = 974;BA.debugLine="maxPromos.Sort(True)"; -Debug.ShouldStop(8192); -_maxpromos.runVoidMethod ("Sort",(Object)(subs.mostCurrent.__c.getField(true,"True"))); - BA.debugLineNum = 977;BA.debugLine="Private c As Cursor = B4XPages.MainPage.skmt.Exec"; -Debug.ShouldStop(65536); -_c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select sum(PE_CANT) as vendidas from PEDIDO where PE_PROID = ? and PE_CLIENTE = ? ")),(Object)(RemoteObject.createNewArray("String",new int[] {2},new Object[] {(BA.ObjectToString(_pm.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("id")))))).runMethod(true,"trim"),_traecliente(_ba).runMethod(true,"trim")}))));Debug.locals.put("c", _c);Debug.locals.put("c", _c); - BA.debugLineNum = 978;BA.debugLine="If c.RowCount > 0 Then"; -Debug.ShouldStop(131072); -if (RemoteObject.solveBoolean(">",_c.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 979;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(262144); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 980;BA.debugLine="vendidas = c.GetInt(\"vendidas\")"; -Debug.ShouldStop(524288); -_vendidas = _c.runMethod(true,"GetInt",(Object)(RemoteObject.createImmutable("vendidas")));Debug.locals.put("vendidas", _vendidas); - }; - BA.debugLineNum = 987;BA.debugLine="Return maxPromos.Get(0) - vendidas 'Regresamos el"; -Debug.ShouldStop(67108864); -if (true) return BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {BA.numberCast(double.class, _maxpromos.runMethod(false,"Get",(Object)(BA.numberCast(int.class, 0)))),_vendidas}, "-",1, 0)); - BA.debugLineNum = 988;BA.debugLine="End Sub"; -Debug.ShouldStop(134217728); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _traemosinventariodisponibleparapromo(RemoteObject _ba,RemoteObject _promo) throws Exception{ -try { - Debug.PushSubsStack("traemosInventarioDisponibleParaPromo (subs) ","subs",9,_ba,subs.mostCurrent,887); -if (RapidSub.canDelegate("traemosinventariodisponibleparapromo")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","traemosinventariodisponibleparapromo", _ba, _promo);} -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -RemoteObject _prods = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -int _i = 0; -; -Debug.locals.put("promo", _promo); - BA.debugLineNum = 887;BA.debugLine="Sub traemosInventarioDisponibleParaPromo(promo As"; -Debug.ShouldStop(4194304); - BA.debugLineNum = 888;BA.debugLine="Private c As Cursor"; -Debug.ShouldStop(8388608); -_c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");Debug.locals.put("c", _c); - BA.debugLineNum = 889;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery2(\"SELECT CAT"; -Debug.ShouldStop(16777216); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("SELECT CAT_GP_ID, CAT_GP_ALMACEN FROM CAT_GUNAPROD WHERE CAT_GP_ID IN (select CAT_DP_IDPROD FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID = ?)")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {_promo}))));Debug.locals.put("c", _c); - BA.debugLineNum = 892;BA.debugLine="Private prods As Map"; -Debug.ShouldStop(134217728); -_prods = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");Debug.locals.put("prods", _prods); - BA.debugLineNum = 893;BA.debugLine="prods.Initialize"; -Debug.ShouldStop(268435456); -_prods.runVoidMethod ("Initialize"); - BA.debugLineNum = 894;BA.debugLine="If c.RowCount > 0 Then"; -Debug.ShouldStop(536870912); -if (RemoteObject.solveBoolean(">",_c.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 895;BA.debugLine="For i=0 To c.RowCount -1"; -Debug.ShouldStop(1073741824); -{ -final int step6 = 1; -final int limit6 = RemoteObject.solve(new RemoteObject[] {_c.runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step6 > 0 && _i <= limit6) || (step6 < 0 && _i >= limit6) ;_i = ((int)(0 + _i + step6)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 896;BA.debugLine="c.Position=i"; -Debug.ShouldStop(-2147483648); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 897;BA.debugLine="prods.Put(c.GetString(\"CAT_GP_ID\"), c.GetString"; -Debug.ShouldStop(1); -_prods.runVoidMethod ("Put",(Object)((_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_ID"))))),(Object)((_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_ALMACEN")))))); - } -}Debug.locals.put("i", _i); -; - }; - BA.debugLineNum = 902;BA.debugLine="Return prods"; -Debug.ShouldStop(32); -if (true) return _prods; - BA.debugLineNum = 903;BA.debugLine="End Sub"; -Debug.ShouldStop(64); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _traenombrecliente(RemoteObject _ba,RemoteObject _id) throws Exception{ -try { - Debug.PushSubsStack("traeNombreCliente (subs) ","subs",9,_ba,subs.mostCurrent,1339); -if (RapidSub.canDelegate("traenombrecliente")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","traenombrecliente", _ba, _id);} -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"); -RemoteObject _n = RemoteObject.createImmutable(""); -; -Debug.locals.put("id", _id); - BA.debugLineNum = 1339;BA.debugLine="Sub traeNombreCliente(id As String) As String"; -Debug.ShouldStop(67108864); - BA.debugLineNum = 1340;BA.debugLine="Private c As ResultSet = B4XPages.MainPage.skmt.E"; -Debug.ShouldStop(134217728); -_c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("select CAT_CL_NOMBRE from kmt_info where CAT_CL_CODIGO = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_id))),RemoteObject.createImmutable("'"))))));Debug.locals.put("c", _c);Debug.locals.put("c", _c); - BA.debugLineNum = 1341;BA.debugLine="Private n As String = \"N/A\""; -Debug.ShouldStop(268435456); -_n = BA.ObjectToString("N/A");Debug.locals.put("n", _n);Debug.locals.put("n", _n); - BA.debugLineNum = 1342;BA.debugLine="Do While c.NextRow"; -Debug.ShouldStop(536870912); -while (_c.runMethod(true,"NextRow").get().booleanValue()) { - BA.debugLineNum = 1343;BA.debugLine="n = c.GetString(\"CAT_CL_NOMBRE\")"; -Debug.ShouldStop(1073741824); -_n = _c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_NOMBRE")));Debug.locals.put("n", _n); - } -; - BA.debugLineNum = 1345;BA.debugLine="Return n"; -Debug.ShouldStop(1); -if (true) return _n; - BA.debugLineNum = 1346;BA.debugLine="End Sub"; -Debug.ShouldStop(2); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _traenombreclientev(RemoteObject _ba,RemoteObject _id) throws Exception{ -try { - Debug.PushSubsStack("traeNombreClientev (subs) ","subs",9,_ba,subs.mostCurrent,1413); -if (RapidSub.canDelegate("traenombreclientev")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","traenombreclientev", _ba, _id);} -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"); -RemoteObject _n = RemoteObject.createImmutable(""); -; -Debug.locals.put("id", _id); - BA.debugLineNum = 1413;BA.debugLine="Sub traeNombreClientev(id As String) As String"; -Debug.ShouldStop(16); - BA.debugLineNum = 1414;BA.debugLine="Private c As ResultSet = B4XPages.MainPage.skmt.E"; -Debug.ShouldStop(32); -_c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.ResultSetWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("select CAT_CL_NOMBRE from kmt_info where CAT_CL_CODIGO = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_id))),RemoteObject.createImmutable("'"))))));Debug.locals.put("c", _c);Debug.locals.put("c", _c); - BA.debugLineNum = 1415;BA.debugLine="Private n As String = \"N/A\""; -Debug.ShouldStop(64); -_n = BA.ObjectToString("N/A");Debug.locals.put("n", _n);Debug.locals.put("n", _n); - BA.debugLineNum = 1416;BA.debugLine="Do While c.NextRow"; -Debug.ShouldStop(128); -while (_c.runMethod(true,"NextRow").get().booleanValue()) { - BA.debugLineNum = 1417;BA.debugLine="n = c.GetString(\"CAT_CL_NOMBRE\")"; -Debug.ShouldStop(256); -_n = _c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_NOMBRE")));Debug.locals.put("n", _n); - } -; - BA.debugLineNum = 1419;BA.debugLine="Return n"; -Debug.ShouldStop(1024); -if (true) return _n; - BA.debugLineNum = 1420;BA.debugLine="End Sub"; -Debug.ShouldStop(2048); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _traeprodiddebd(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("traeProdIdDeBD (subs) ","subs",9,_ba,subs.mostCurrent,1187); -if (RapidSub.canDelegate("traeprodiddebd")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","traeprodiddebd", _ba);} -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -RemoteObject _m = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -; - BA.debugLineNum = 1187;BA.debugLine="Sub traeProdIdDeBD As Map 'ignore"; -Debug.ShouldStop(4); - BA.debugLineNum = 1188;BA.debugLine="Private c As Cursor"; -Debug.ShouldStop(8); -_c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");Debug.locals.put("c", _c); - BA.debugLineNum = 1189;BA.debugLine="Private m As Map"; -Debug.ShouldStop(16); -_m = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");Debug.locals.put("m", _m); - BA.debugLineNum = 1190;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_GP"; -Debug.ShouldStop(32); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_GP_ID,CAT_GP_NOMBRE,CAT_GP_TIPO,CAT_GP_SUBTIPO from CAT_GUNAPROD where CAT_GP_NOMBRE In (Select PDESC from PROID)"))));Debug.locals.put("c", _c); - BA.debugLineNum = 1191;BA.debugLine="If c.RowCount > 0 Then"; -Debug.ShouldStop(64); -if (RemoteObject.solveBoolean(">",_c.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 1192;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(128); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 1193;BA.debugLine="m = CreateMap(\"id\":c.GetString(\"CAT_GP_ID\"), \"no"; -Debug.ShouldStop(256); -_m = subs.mostCurrent.__c.runMethod(false, "createMap", (Object)(new RemoteObject[] {RemoteObject.createImmutable(("id")),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_ID")))),RemoteObject.createImmutable(("nombre")),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_NOMBRE")))),RemoteObject.createImmutable(("tipo")),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_TIPO")))),RemoteObject.createImmutable(("subtipo")),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_SUBTIPO"))))}));Debug.locals.put("m", _m); - }else { - BA.debugLineNum = 1195;BA.debugLine="m = CreateMap(\"id\":\"N/A\", \"nombre\":\"N/A\", \"tipo\""; -Debug.ShouldStop(1024); -_m = subs.mostCurrent.__c.runMethod(false, "createMap", (Object)(new RemoteObject[] {RemoteObject.createImmutable(("id")),RemoteObject.createImmutable(("N/A")),RemoteObject.createImmutable(("nombre")),RemoteObject.createImmutable(("N/A")),RemoteObject.createImmutable(("tipo")),RemoteObject.createImmutable(("N/A")),RemoteObject.createImmutable(("subtipo")),(RemoteObject.createImmutable("N/A"))}));Debug.locals.put("m", _m); - }; - BA.debugLineNum = 1197;BA.debugLine="c.Close"; -Debug.ShouldStop(4096); -_c.runVoidMethod ("Close"); - BA.debugLineNum = 1198;BA.debugLine="Return m"; -Debug.ShouldStop(8192); -if (true) return _m; - BA.debugLineNum = 1199;BA.debugLine="End Sub"; -Debug.ShouldStop(16384); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _traeprodnombre(RemoteObject _ba,RemoteObject _id) throws Exception{ -try { - Debug.PushSubsStack("traeProdNombre (subs) ","subs",9,_ba,subs.mostCurrent,705); -if (RapidSub.canDelegate("traeprodnombre")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","traeprodnombre", _ba, _id);} -RemoteObject _h = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -RemoteObject _n = RemoteObject.createImmutable(""); -; -Debug.locals.put("id", _id); - BA.debugLineNum = 705;BA.debugLine="Sub traeProdNombre(id As String) As String"; -Debug.ShouldStop(1); - BA.debugLineNum = 706;BA.debugLine="Private h As Cursor"; -Debug.ShouldStop(2); -_h = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");Debug.locals.put("h", _h); - BA.debugLineNum = 707;BA.debugLine="Private n As String"; -Debug.ShouldStop(4); -_n = RemoteObject.createImmutable("");Debug.locals.put("n", _n); - BA.debugLineNum = 708;BA.debugLine="h=B4XPages.MainPage.skmt.ExecQuery2(\"select CAT_G"; -Debug.ShouldStop(8); -_h = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery2",(Object)(BA.ObjectToString("select CAT_GP_NOMBRE from CAT_GUNAPROD where CAT_GP_ID = ? ")),(Object)(RemoteObject.createNewArray("String",new int[] {1},new Object[] {_id.runMethod(true,"trim")}))));Debug.locals.put("h", _h); - BA.debugLineNum = 709;BA.debugLine="If h.RowCount > 0 Then"; -Debug.ShouldStop(16); -if (RemoteObject.solveBoolean(">",_h.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 710;BA.debugLine="h.Position = 0"; -Debug.ShouldStop(32); -_h.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 711;BA.debugLine="n = h.GetString(\"CAT_GP_NOMBRE\")"; -Debug.ShouldStop(64); -_n = _h.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_NOMBRE")));Debug.locals.put("n", _n); - }; - BA.debugLineNum = 714;BA.debugLine="h.Close"; -Debug.ShouldStop(512); -_h.runVoidMethod ("Close"); - BA.debugLineNum = 715;BA.debugLine="If n = Null Or n=\"\" Then n = \"N/A\""; -Debug.ShouldStop(1024); -if (RemoteObject.solveBoolean("n",_n) || RemoteObject.solveBoolean("=",_n,BA.ObjectToString(""))) { -_n = BA.ObjectToString("N/A");Debug.locals.put("n", _n);}; - BA.debugLineNum = 717;BA.debugLine="Return n"; -Debug.ShouldStop(4096); -if (true) return _n; - BA.debugLineNum = 718;BA.debugLine="End Sub"; -Debug.ShouldStop(8192); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _traepromo(RemoteObject _ba,RemoteObject _promo,RemoteObject _cliente) throws Exception{ -try { - Debug.PushSubsStack("traePromo (subs) ","subs",9,_ba,subs.mostCurrent,822); -if (RapidSub.canDelegate("traepromo")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","traepromo", _ba, _promo, _cliente);} -RemoteObject _iniciocontador = RemoteObject.createImmutable(""); -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -RemoteObject _sihistorico = RemoteObject.createImmutable(""); -RemoteObject _promomap = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -RemoteObject _prodsfijos = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _prodsfijosprecios = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _prodsfijospiezas = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _prodsvariables = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List"); -RemoteObject _prods = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -RemoteObject _tipos = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -int _i = 0; -RemoteObject _pvr = RemoteObject.createImmutable(""); -; -Debug.locals.put("promo", _promo); -Debug.locals.put("cliente", _cliente); - BA.debugLineNum = 822;BA.debugLine="Sub traePromo(promo As String, cliente As String)"; -Debug.ShouldStop(2097152); - BA.debugLineNum = 823;BA.debugLine="Private inicioContador As String = DateTime.Now"; -Debug.ShouldStop(4194304); -_iniciocontador = BA.NumberToString(subs.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getNow"));Debug.locals.put("inicioContador", _iniciocontador);Debug.locals.put("inicioContador", _iniciocontador); - BA.debugLineNum = 824;BA.debugLine="Private c As Cursor = B4XPages.MainPage.skmt.Exec"; -Debug.ShouldStop(8388608); -_c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.concat(RemoteObject.createImmutable("Select * from promos_comp where cat_pa_id = '"),_promo,RemoteObject.createImmutable("'")))));Debug.locals.put("c", _c);Debug.locals.put("c", _c); - BA.debugLineNum = 825;BA.debugLine="Private siHistorico As String = 0"; -Debug.ShouldStop(16777216); -_sihistorico = BA.NumberToString(0);Debug.locals.put("siHistorico", _sihistorico);Debug.locals.put("siHistorico", _sihistorico); - BA.debugLineNum = 826;BA.debugLine="Private promoMap As Map"; -Debug.ShouldStop(33554432); -_promomap = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");Debug.locals.put("promoMap", _promomap); - BA.debugLineNum = 827;BA.debugLine="Private prodsFijos, prodsFijosPrecios, prodsFijos"; -Debug.ShouldStop(67108864); -_prodsfijos = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");Debug.locals.put("prodsFijos", _prodsfijos); -_prodsfijosprecios = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");Debug.locals.put("prodsFijosPrecios", _prodsfijosprecios); -_prodsfijospiezas = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");Debug.locals.put("prodsFijosPiezas", _prodsfijospiezas); -_prodsvariables = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");Debug.locals.put("prodsVariables", _prodsvariables); - BA.debugLineNum = 828;BA.debugLine="promoMap.Initialize"; -Debug.ShouldStop(134217728); -_promomap.runVoidMethod ("Initialize"); - BA.debugLineNum = 829;BA.debugLine="prodsFijos.Initialize"; -Debug.ShouldStop(268435456); -_prodsfijos.runVoidMethod ("Initialize"); - BA.debugLineNum = 830;BA.debugLine="prodsFijosPrecios.Initialize"; -Debug.ShouldStop(536870912); -_prodsfijosprecios.runVoidMethod ("Initialize"); - BA.debugLineNum = 831;BA.debugLine="prodsFijosPiezas.Initialize"; -Debug.ShouldStop(1073741824); -_prodsfijospiezas.runVoidMethod ("Initialize"); - BA.debugLineNum = 832;BA.debugLine="prodsVariables.Initialize"; -Debug.ShouldStop(-2147483648); -_prodsvariables.runVoidMethod ("Initialize"); - BA.debugLineNum = 833;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(1); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 834;BA.debugLine="If c.RowCount > 0 Then promoMap = CreateMap(\"id\":"; -Debug.ShouldStop(2); -if (RemoteObject.solveBoolean(">",_c.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { -_promomap = subs.mostCurrent.__c.runMethod(false, "createMap", (Object)(new RemoteObject[] {RemoteObject.createImmutable(("id")),(_promo),RemoteObject.createImmutable(("maxXcliente")),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_PA_MAXPROMCLIE")))),RemoteObject.createImmutable(("maxRecurrente")),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_PA_MAXPROMREC")))),RemoteObject.createImmutable(("maxPromos")),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_PA_MAXPROM"))))}));Debug.locals.put("promoMap", _promomap);}; - BA.debugLineNum = 835;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"Select coun"; -Debug.ShouldStop(4); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.concat(RemoteObject.createImmutable("Select count(*) as hist from HIST_PROMOS where HP_CLIENTE = '"),_cliente,RemoteObject.createImmutable("' and HP_CODIGO_PROMOCION = '"),_promo,RemoteObject.createImmutable("'")))));Debug.locals.put("c", _c); - BA.debugLineNum = 836;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(8); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 837;BA.debugLine="If c.GetString(\"hist\") > 0 Then siHistorico = 1"; -Debug.ShouldStop(16); -if (RemoteObject.solveBoolean(">",BA.numberCast(double.class, _c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("hist")))),BA.numberCast(double.class, 0))) { -_sihistorico = BA.NumberToString(1);Debug.locals.put("siHistorico", _sihistorico);}; - BA.debugLineNum = 838;BA.debugLine="promoMap.Put(\"historico\", siHistorico)"; -Debug.ShouldStop(32); -_promomap.runVoidMethod ("Put",(Object)(RemoteObject.createImmutable(("historico"))),(Object)((_sihistorico))); - BA.debugLineNum = 839;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"Select * fr"; -Debug.ShouldStop(64); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.concat(RemoteObject.createImmutable("Select * from CAT_DETALLES_PAQ where CAT_DP_ID = '"),_promo,RemoteObject.createImmutable("'")))));Debug.locals.put("c", _c); - BA.debugLineNum = 840;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(128); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 841;BA.debugLine="If c.RowCount > 0 Then"; -Debug.ShouldStop(256); -if (RemoteObject.solveBoolean(">",_c.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 842;BA.debugLine="Private prods, tipos As Map"; -Debug.ShouldStop(512); -_prods = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");Debug.locals.put("prods", _prods); -_tipos = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");Debug.locals.put("tipos", _tipos); - BA.debugLineNum = 843;BA.debugLine="prods.Initialize"; -Debug.ShouldStop(1024); -_prods.runVoidMethod ("Initialize"); - BA.debugLineNum = 844;BA.debugLine="tipos.Initialize"; -Debug.ShouldStop(2048); -_tipos.runVoidMethod ("Initialize"); - BA.debugLineNum = 845;BA.debugLine="For i=0 To c.RowCount -1"; -Debug.ShouldStop(4096); -{ -final int step23 = 1; -final int limit23 = RemoteObject.solve(new RemoteObject[] {_c.runMethod(true,"getRowCount"),RemoteObject.createImmutable(1)}, "-",1, 1).get().intValue(); -_i = 0 ; -for (;(step23 > 0 && _i <= limit23) || (step23 < 0 && _i >= limit23) ;_i = ((int)(0 + _i + step23)) ) { -Debug.locals.put("i", _i); - BA.debugLineNum = 846;BA.debugLine="c.Position=i"; -Debug.ShouldStop(8192); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, _i)); - BA.debugLineNum = 847;BA.debugLine="prods.Put(c.GetString(\"CAT_DP_IDPROD\"), CreateM"; -Debug.ShouldStop(16384); -_prods.runVoidMethod ("Put",(Object)((_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_IDPROD"))))),(Object)((subs.mostCurrent.__c.runMethod(false, "createMap", (Object)(new RemoteObject[] {RemoteObject.createImmutable(("idProducto")),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_IDPROD")))),RemoteObject.createImmutable(("precioSimptos")),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PRECIO_SIMPTOS")))),RemoteObject.createImmutable(("precio")),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PRECIO")))),RemoteObject.createImmutable(("almacen")),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_ALMACEN")))),RemoteObject.createImmutable(("tipo")),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_TIPO")))),RemoteObject.createImmutable(("piezas")),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PZAS")))),RemoteObject.createImmutable(("usuario")),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_USUARIO")))),RemoteObject.createImmutable(("regalo")),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_REGALO")))),RemoteObject.createImmutable(("clasif")),(_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_CLASIF"))))})).getObject()))); - BA.debugLineNum = 848;BA.debugLine="tipos.Put(c.GetString(\"CAT_DP_IDPROD\"), c.GetSt"; -Debug.ShouldStop(32768); -_tipos.runVoidMethod ("Put",(Object)((_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_IDPROD"))))),(Object)((_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_TIPO")))))); - BA.debugLineNum = 849;BA.debugLine="If c.GetString(\"CAT_DP_TIPO\") = \"0\" Then"; -Debug.ShouldStop(65536); -if (RemoteObject.solveBoolean("=",_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_TIPO"))),BA.ObjectToString("0"))) { - BA.debugLineNum = 850;BA.debugLine="prodsFijos.Add(c.GetString(\"CAT_DP_IDPROD\"))"; -Debug.ShouldStop(131072); -_prodsfijos.runVoidMethod ("Add",(Object)((_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_IDPROD")))))); - BA.debugLineNum = 851;BA.debugLine="prodsFijosPrecios.Add(c.GetString(\"CAT_DP_PREC"; -Debug.ShouldStop(262144); -_prodsfijosprecios.runVoidMethod ("Add",(Object)((_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PRECIO")))))); - BA.debugLineNum = 852;BA.debugLine="prodsFijosPiezas.Add(c.GetString(\"CAT_DP_PZAS\""; -Debug.ShouldStop(524288); -_prodsfijospiezas.runVoidMethod ("Add",(Object)((_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_PZAS")))))); - }; - BA.debugLineNum = 854;BA.debugLine="If c.GetString(\"CAT_DP_TIPO\") = \"1\" Then prodsV"; -Debug.ShouldStop(2097152); -if (RemoteObject.solveBoolean("=",_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_TIPO"))),BA.ObjectToString("1"))) { -_prodsvariables.runVoidMethod ("Add",(Object)((_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_DP_IDPROD"))))));}; - } -}Debug.locals.put("i", _i); -; - BA.debugLineNum = 857;BA.debugLine="promoMap.Put(\"productos\", prods) 'Mapa con los p"; -Debug.ShouldStop(16777216); -_promomap.runVoidMethod ("Put",(Object)(RemoteObject.createImmutable(("productos"))),(Object)((_prods.getObject()))); - BA.debugLineNum = 858;BA.debugLine="promoMap.Put(\"tipos\", tipos) 'Mapa con los produ"; -Debug.ShouldStop(33554432); -_promomap.runVoidMethod ("Put",(Object)(RemoteObject.createImmutable(("tipos"))),(Object)((_tipos.getObject()))); - BA.debugLineNum = 859;BA.debugLine="promoMap.Put(\"prodsFijos\", prodsFijos) 'Lista de"; -Debug.ShouldStop(67108864); -_promomap.runVoidMethod ("Put",(Object)(RemoteObject.createImmutable(("prodsFijos"))),(Object)((_prodsfijos.getObject()))); - BA.debugLineNum = 860;BA.debugLine="promoMap.Put(\"prodsVariables\", prodsVariables) '"; -Debug.ShouldStop(134217728); -_promomap.runVoidMethod ("Put",(Object)(RemoteObject.createImmutable(("prodsVariables"))),(Object)((_prodsvariables.getObject()))); - BA.debugLineNum = 861;BA.debugLine="promoMap.Put(\"prodsFijosCant\", prodsFijos.Size)"; -Debug.ShouldStop(268435456); -_promomap.runVoidMethod ("Put",(Object)(RemoteObject.createImmutable(("prodsFijosCant"))),(Object)((_prodsfijos.runMethod(true,"getSize")))); - BA.debugLineNum = 862;BA.debugLine="promoMap.Put(\"prodsFijosPrecios\", prodsFijosPrec"; -Debug.ShouldStop(536870912); -_promomap.runVoidMethod ("Put",(Object)(RemoteObject.createImmutable(("prodsFijosPrecios"))),(Object)((_prodsfijosprecios.getObject()))); - BA.debugLineNum = 863;BA.debugLine="promoMap.Put(\"prodsFijosPiezas\", prodsFijosPieza"; -Debug.ShouldStop(1073741824); -_promomap.runVoidMethod ("Put",(Object)(RemoteObject.createImmutable(("prodsFijosPiezas"))),(Object)((_prodsfijospiezas.getObject()))); - BA.debugLineNum = 864;BA.debugLine="promoMap.Put(\"prodsVariablesCant\", prodsVariable"; -Debug.ShouldStop(-2147483648); -_promomap.runVoidMethod ("Put",(Object)(RemoteObject.createImmutable(("prodsVariablesCant"))),(Object)((_prodsvariables.runMethod(true,"getSize")))); - BA.debugLineNum = 865;BA.debugLine="promoMap.Put(\"resultado\", \"ok\")"; -Debug.ShouldStop(1); -_promomap.runVoidMethod ("Put",(Object)(RemoteObject.createImmutable(("resultado"))),(Object)((RemoteObject.createImmutable("ok")))); - }else { - BA.debugLineNum = 867;BA.debugLine="promoMap.Put(\"resultado\", \"No hay datos de la pr"; -Debug.ShouldStop(4); -_promomap.runVoidMethod ("Put",(Object)(RemoteObject.createImmutable(("resultado"))),(Object)((RemoteObject.createImmutable("No hay datos de la promoción.")))); - }; - BA.debugLineNum = 869;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"Select CAT_"; -Debug.ShouldStop(16); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.concat(RemoteObject.createImmutable("Select CAT_GP_STS, CAT_GP_NOMBRE from CAT_GUNAPROD where CAT_GP_ID = '"),_promo,RemoteObject.createImmutable("'")))));Debug.locals.put("c", _c); - BA.debugLineNum = 870;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(32); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 871;BA.debugLine="Private pvr As String = 0"; -Debug.ShouldStop(64); -_pvr = BA.NumberToString(0);Debug.locals.put("pvr", _pvr);Debug.locals.put("pvr", _pvr); - BA.debugLineNum = 872;BA.debugLine="If c.RowCount > 0 Then"; -Debug.ShouldStop(128); -if (RemoteObject.solveBoolean(">",_c.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 873;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(256); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 874;BA.debugLine="pvr = c.GetString(\"CAT_GP_STS\")"; -Debug.ShouldStop(512); -_pvr = _c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_STS")));Debug.locals.put("pvr", _pvr); - BA.debugLineNum = 875;BA.debugLine="promoMap.Put(\"prodsVariablesRequeridos\", pvr) 'C"; -Debug.ShouldStop(1024); -_promomap.runVoidMethod ("Put",(Object)(RemoteObject.createImmutable(("prodsVariablesRequeridos"))),(Object)((_pvr))); - BA.debugLineNum = 876;BA.debugLine="promoMap.put(\"descripcion\", c.GetString(\"CAT_GP_"; -Debug.ShouldStop(2048); -_promomap.runVoidMethod ("Put",(Object)(RemoteObject.createImmutable(("descripcion"))),(Object)((_c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_GP_NOMBRE")))))); - }; - BA.debugLineNum = 878;BA.debugLine="c.Close"; -Debug.ShouldStop(8192); -_c.runVoidMethod ("Close"); - BA.debugLineNum = 883;BA.debugLine="Return promoMap"; -Debug.ShouldStop(262144); -if (true) return _promomap; - BA.debugLineNum = 884;BA.debugLine="End Sub"; -Debug.ShouldStop(524288); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _traepromosvendidas(RemoteObject _ba,RemoteObject _promo,RemoteObject _cliente) throws Exception{ -try { - Debug.PushSubsStack("traePromosVendidas (subs) ","subs",9,_ba,subs.mostCurrent,991); -if (RapidSub.canDelegate("traepromosvendidas")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","traepromosvendidas", _ba, _promo, _cliente);} -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -RemoteObject _pv = RemoteObject.createImmutable(0); -; -Debug.locals.put("promo", _promo); -Debug.locals.put("cliente", _cliente); - BA.debugLineNum = 991;BA.debugLine="Sub traePromosVendidas(promo As String, cliente As"; -Debug.ShouldStop(1073741824); - BA.debugLineNum = 992;BA.debugLine="Private c As Cursor"; -Debug.ShouldStop(-2147483648); -_c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");Debug.locals.put("c", _c); - BA.debugLineNum = 993;BA.debugLine="Private pv As Int = 0"; -Debug.ShouldStop(1); -_pv = BA.numberCast(int.class, 0);Debug.locals.put("pv", _pv);Debug.locals.put("pv", _pv); - BA.debugLineNum = 994;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery($\"select PE_CA"; -Debug.ShouldStop(2); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("select PE_CANT from PEDIDO where PE_PROID = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_promo))),RemoteObject.createImmutable("' and PE_CLIENTE = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_cliente))),RemoteObject.createImmutable("'"))))));Debug.locals.put("c", _c); - BA.debugLineNum = 995;BA.debugLine="If c.RowCount > 0 Then"; -Debug.ShouldStop(4); -if (RemoteObject.solveBoolean(">",_c.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 996;BA.debugLine="c.Position = 0"; -Debug.ShouldStop(8); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 997;BA.debugLine="pv = c.GetInt(\"PE_CANT\")"; -Debug.ShouldStop(16); -_pv = _c.runMethod(true,"GetInt",(Object)(RemoteObject.createImmutable("PE_CANT")));Debug.locals.put("pv", _pv); - }; - BA.debugLineNum = 999;BA.debugLine="Return pv"; -Debug.ShouldStop(64); -if (true) return _pv; - BA.debugLineNum = 1000;BA.debugLine="End Sub"; -Debug.ShouldStop(128); -return RemoteObject.createImmutable(0); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _traeruta(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("traeRuta (subs) ","subs",9,_ba,subs.mostCurrent,721); -if (RapidSub.canDelegate("traeruta")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","traeruta", _ba);} -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -RemoteObject _r = RemoteObject.createImmutable(""); -; - BA.debugLineNum = 721;BA.debugLine="Sub traeRuta As String 'ignore"; -Debug.ShouldStop(65536); - BA.debugLineNum = 722;BA.debugLine="Private c As Cursor"; -Debug.ShouldStop(131072); -_c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");Debug.locals.put("c", _c); - BA.debugLineNum = 723;BA.debugLine="Private r As String"; -Debug.ShouldStop(262144); -_r = RemoteObject.createImmutable("");Debug.locals.put("r", _r); - BA.debugLineNum = 724;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_CL"; -Debug.ShouldStop(524288); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select CAT_CL_RUTA from kmt_info where CAT_CL_CODIGO In (Select cuenta from cuentaa)"))));Debug.locals.put("c", _c); - BA.debugLineNum = 725;BA.debugLine="r = \"0\""; -Debug.ShouldStop(1048576); -_r = BA.ObjectToString("0");Debug.locals.put("r", _r); - BA.debugLineNum = 726;BA.debugLine="If c.RowCount > 0 Then"; -Debug.ShouldStop(2097152); -if (RemoteObject.solveBoolean(">",_c.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 727;BA.debugLine="c.Position=0"; -Debug.ShouldStop(4194304); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 728;BA.debugLine="r = c.GetString(\"CAT_CL_RUTA\")"; -Debug.ShouldStop(8388608); -_r = _c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("CAT_CL_RUTA")));Debug.locals.put("r", _r); - }; - BA.debugLineNum = 730;BA.debugLine="c.Close"; -Debug.ShouldStop(33554432); -_c.runVoidMethod ("Close"); - BA.debugLineNum = 731;BA.debugLine="Return r"; -Debug.ShouldStop(67108864); -if (true) return _r; - BA.debugLineNum = 732;BA.debugLine="End Sub"; -Debug.ShouldStop(134217728); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _traetotalesclienteactual(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("traeTotalesClienteActual (subs) ","subs",9,_ba,subs.mostCurrent,1226); -if (RapidSub.canDelegate("traetotalesclienteactual")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","traetotalesclienteactual", _ba);} -RemoteObject _m = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map"); -RemoteObject _c_prodsx = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -; - BA.debugLineNum = 1226;BA.debugLine="Sub traeTotalesClienteActual As Map"; -Debug.ShouldStop(512); - BA.debugLineNum = 1227;BA.debugLine="Private m As Map"; -Debug.ShouldStop(1024); -_m = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");Debug.locals.put("m", _m); - BA.debugLineNum = 1228;BA.debugLine="m.Initialize"; -Debug.ShouldStop(2048); -_m.runVoidMethod ("Initialize"); - BA.debugLineNum = 1229;BA.debugLine="Private c_prodsX As Cursor=B4XPages.MainPage.skmt"; -Debug.ShouldStop(4096); -_c_prodsx = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -_c_prodsx = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select ifnull(sum(PE_CANT), 0) as cantProds, ifnull(sum(PE_COSTO_TOT), 0) as costoTotal FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa) order by PE_PRONOMBRE asc"))));Debug.locals.put("c_prodsX", _c_prodsx);Debug.locals.put("c_prodsX", _c_prodsx); - BA.debugLineNum = 1230;BA.debugLine="c_prodsX.Position=0"; -Debug.ShouldStop(8192); -_c_prodsx.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 1232;BA.debugLine="m = CreateMap(\"productos\": c_prodsX.GetString(\"ca"; -Debug.ShouldStop(32768); -_m = subs.mostCurrent.__c.runMethod(false, "createMap", (Object)(new RemoteObject[] {RemoteObject.createImmutable(("productos")),(_c_prodsx.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("cantProds")))),RemoteObject.createImmutable(("monto")),(_c_prodsx.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("costoTotal"))))}));Debug.locals.put("m", _m); - BA.debugLineNum = 1233;BA.debugLine="Return m"; -Debug.ShouldStop(65536); -if (true) return _m; - BA.debugLineNum = 1234;BA.debugLine="End Sub"; -Debug.ShouldStop(131072); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _traeusuariodebd(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("traeUsuarioDeBD (subs) ","subs",9,_ba,subs.mostCurrent,752); -if (RapidSub.canDelegate("traeusuariodebd")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","traeusuariodebd", _ba);} -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -RemoteObject _u = RemoteObject.createImmutable(""); -; - BA.debugLineNum = 752;BA.debugLine="Sub traeUsuarioDeBD As String 'ignore"; -Debug.ShouldStop(32768); - BA.debugLineNum = 753;BA.debugLine="Private c As Cursor"; -Debug.ShouldStop(65536); -_c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper");Debug.locals.put("c", _c); - BA.debugLineNum = 754;BA.debugLine="Private u As String = \"SinUsuario\""; -Debug.ShouldStop(131072); -_u = BA.ObjectToString("SinUsuario");Debug.locals.put("u", _u);Debug.locals.put("u", _u); - BA.debugLineNum = 755;BA.debugLine="If Not(kmt.IsInitialized) Then revisaBD"; -Debug.ShouldStop(262144); -if (subs.mostCurrent.__c.runMethod(true,"Not",(Object)(subs._kmt.runMethod(true,"IsInitialized"))).get().booleanValue()) { -_revisabd(_ba);}; - BA.debugLineNum = 756;BA.debugLine="c=kmt.ExecQuery(\"select USUARIO from usuarioa\")"; -Debug.ShouldStop(524288); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs._kmt.runMethod(false,"ExecQuery",(Object)(RemoteObject.createImmutable("select USUARIO from usuarioa"))));Debug.locals.put("c", _c); - BA.debugLineNum = 757;BA.debugLine="c.Position=0"; -Debug.ShouldStop(1048576); -_c.runMethod(true,"setPosition",BA.numberCast(int.class, 0)); - BA.debugLineNum = 758;BA.debugLine="If c.RowCount > 0 Then u = c.GetString(\"USUARIO\")"; -Debug.ShouldStop(2097152); -if (RemoteObject.solveBoolean(">",_c.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { -_u = _c.runMethod(true,"GetString",(Object)(RemoteObject.createImmutable("USUARIO")));Debug.locals.put("u", _u);}; - BA.debugLineNum = 759;BA.debugLine="c.Close"; -Debug.ShouldStop(4194304); -_c.runVoidMethod ("Close"); - BA.debugLineNum = 760;BA.debugLine="Return u"; -Debug.ShouldStop(8388608); -if (true) return _u; - BA.debugLineNum = 761;BA.debugLine="End Sub"; -Debug.ShouldStop(16777216); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _ventanoventa(RemoteObject _ba,RemoteObject _usuariov,RemoteObject _almacenv,RemoteObject _rutav,RemoteObject _eventov,RemoteObject _clientev,RemoteObject _iniciov,RemoteObject _latitudv,RemoteObject _longitudv,RemoteObject _montoventav) throws Exception{ -try { - Debug.PushSubsStack("ventaNoVenta (subs) ","subs",9,_ba,subs.mostCurrent,1369); -if (RapidSub.canDelegate("ventanoventa")) { return keymon.lat.medicomed.subs.remoteMe.runUserSub(false, "subs","ventanoventa", _ba, _usuariov, _almacenv, _rutav, _eventov, _clientev, _iniciov, _latitudv, _longitudv, _montoventav);} -RemoteObject _cmd = RemoteObject.declareNull("keymon.lat.medicomed.dbrequestmanager._dbcommand"); -RemoteObject _nombreclientev = RemoteObject.createImmutable(""); -RemoteObject _c = RemoteObject.declareNull("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -; -Debug.locals.put("usuariov", _usuariov); -Debug.locals.put("almacenv", _almacenv); -Debug.locals.put("rutav", _rutav); -Debug.locals.put("eventov", _eventov); -Debug.locals.put("clientev", _clientev); -Debug.locals.put("iniciov", _iniciov); -Debug.locals.put("latitudv", _latitudv); -Debug.locals.put("longitudv", _longitudv); -Debug.locals.put("montoVentav", _montoventav); - BA.debugLineNum = 1369;BA.debugLine="Sub ventaNoVenta(usuariov As String, almacenv As S"; -Debug.ShouldStop(16777216); - BA.debugLineNum = 1370;BA.debugLine="Log(\"ventaNoVenta\")"; -Debug.ShouldStop(33554432); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","315138817",RemoteObject.createImmutable("ventaNoVenta"),0); - BA.debugLineNum = 1371;BA.debugLine="Log(eventov)"; -Debug.ShouldStop(67108864); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","315138818",_eventov,0); - BA.debugLineNum = 1373;BA.debugLine="Private cmd As DBCommand"; -Debug.ShouldStop(268435456); -_cmd = RemoteObject.createNew ("keymon.lat.medicomed.dbrequestmanager._dbcommand");Debug.locals.put("cmd", _cmd); - BA.debugLineNum = 1374;BA.debugLine="cmd.Initialize"; -Debug.ShouldStop(536870912); -_cmd.runVoidMethod ("Initialize"); - BA.debugLineNum = 1375;BA.debugLine="cmd.Name = \"insert_venta_no_venta_MEDICOMED\""; -Debug.ShouldStop(1073741824); -_cmd.setField ("Name" /*RemoteObject*/ ,BA.ObjectToString("insert_venta_no_venta_MEDICOMED")); - BA.debugLineNum = 1378;BA.debugLine="Private nombreClientev As String = traeNombreClie"; -Debug.ShouldStop(2); -_nombreclientev = _traenombreclientev(_ba,_clientev);Debug.locals.put("nombreClientev", _nombreclientev);Debug.locals.put("nombreClientev", _nombreclientev); - BA.debugLineNum = 1381;BA.debugLine="If eventov = \"Llega a almacen\" Then"; -Debug.ShouldStop(16); -if (RemoteObject.solveBoolean("=",_eventov,BA.ObjectToString("Llega a almacen"))) { - BA.debugLineNum = 1382;BA.debugLine="nombreClientev = \"BOLETA\""; -Debug.ShouldStop(32); -_nombreclientev = BA.ObjectToString("BOLETA");Debug.locals.put("nombreClientev", _nombreclientev); - BA.debugLineNum = 1383;BA.debugLine="clientev = \"\""; -Debug.ShouldStop(64); -_clientev = BA.ObjectToString("");Debug.locals.put("clientev", _clientev); - }else -{ BA.debugLineNum = 1384;BA.debugLine="Else If eventov = \"ConVenta\" Then"; -Debug.ShouldStop(128); -if (RemoteObject.solveBoolean("=",_eventov,BA.ObjectToString("ConVenta"))) { - BA.debugLineNum = 1385;BA.debugLine="nombreClientev = \"VENTA\""; -Debug.ShouldStop(256); -_nombreclientev = BA.ObjectToString("VENTA");Debug.locals.put("nombreClientev", _nombreclientev); - }else -{ BA.debugLineNum = 1386;BA.debugLine="Else If eventov = \"SinVenta\" Then"; -Debug.ShouldStop(512); -if (RemoteObject.solveBoolean("=",_eventov,BA.ObjectToString("SinVenta"))) { - BA.debugLineNum = 1387;BA.debugLine="nombreClientev = \"Sin Venta\""; -Debug.ShouldStop(1024); -_nombreclientev = BA.ObjectToString("Sin Venta");Debug.locals.put("nombreClientev", _nombreclientev); - }}} -; - BA.debugLineNum = 1391;BA.debugLine="Private c As Cursor = B4XPages.MainPage.skmt.Exec"; -Debug.ShouldStop(16384); -_c = RemoteObject.createNew ("anywheresoftware.b4a.sql.SQL.CursorWrapper"); -_c = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.sql.SQL.CursorWrapper"), subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(false,"ExecQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("SELECT * FROM VENTA_No_VENTA WHERE usuariov = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_usuariov))),RemoteObject.createImmutable("' AND almacenv = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_almacenv))),RemoteObject.createImmutable("' AND rutav = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_rutav))),RemoteObject.createImmutable("' AND clientev = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_clientev))),RemoteObject.createImmutable("' ORDER BY iniciov DESC"))))));Debug.locals.put("c", _c);Debug.locals.put("c", _c); - BA.debugLineNum = 1393;BA.debugLine="If c.RowCount > 0 Then"; -Debug.ShouldStop(65536); -if (RemoteObject.solveBoolean(">",_c.runMethod(true,"getRowCount"),BA.numberCast(double.class, 0))) { - BA.debugLineNum = 1395;BA.debugLine="Log(\"Actualizando registro existente\")"; -Debug.ShouldStop(262144); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","315138842",RemoteObject.createImmutable("Actualizando registro existente"),0); - BA.debugLineNum = 1396;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"UPDATE VEN"; -Debug.ShouldStop(524288); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("UPDATE VENTA_No_VENTA SET eventov = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_eventov))),RemoteObject.createImmutable("', montoVentav = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_montoventav))),RemoteObject.createImmutable("' WHERE usuariov = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_usuariov))),RemoteObject.createImmutable("' AND almacenv = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_almacenv))),RemoteObject.createImmutable("' AND rutav = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_rutav))),RemoteObject.createImmutable("' AND clientev = '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_clientev))),RemoteObject.createImmutable("'"))))); - }else { - BA.debugLineNum = 1399;BA.debugLine="Log(\"Insertando nuevo registro\")"; -Debug.ShouldStop(4194304); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","315138846",RemoteObject.createImmutable("Insertando nuevo registro"),0); - BA.debugLineNum = 1400;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"INSERT INT"; -Debug.ShouldStop(8388608); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)((RemoteObject.concat(RemoteObject.createImmutable("INSERT INTO VENTA_No_VENTA (usuariov, almacenv, rutav, eventov, clientev, iniciov, latitudv, longitudv, montoVentav) VALUES ('"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_usuariov))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_almacenv))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_rutav))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_eventov))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_clientev))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_iniciov))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_latitudv))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_longitudv))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_montoventav))),RemoteObject.createImmutable("')"))))); - }; - BA.debugLineNum = 1404;BA.debugLine="cmd.Parameters = Array As Object(usuariov, almace"; -Debug.ShouldStop(134217728); -_cmd.setField ("Parameters" /*RemoteObject*/ ,RemoteObject.createNewArray("Object",new int[] {9},new Object[] {(_usuariov),(_almacenv),(_rutav),(_eventov),(_clientev),(_iniciov),(_latitudv),(_longitudv),(_montoventav)})); - BA.debugLineNum = 1405;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cmd,"; -Debug.ShouldStop(268435456); -subs.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,_ba).getField(false,"_reqmanager" /*RemoteObject*/ ).runClassMethod (keymon.lat.medicomed.dbrequestmanager.class, "_executecommand" /*RemoteObject*/ ,(Object)(_cmd),(Object)((RemoteObject.createImmutable("ventaNoVenta")))); - BA.debugLineNum = 1407;BA.debugLine="Log($\"Datos procesados: '${usuariov}', '${almacen"; -Debug.ShouldStop(1073741824); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","315138854",(RemoteObject.concat(RemoteObject.createImmutable("Datos procesados: '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_usuariov))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_almacenv))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_rutav))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_eventov))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_clientev))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_iniciov))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_latitudv))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_longitudv))),RemoteObject.createImmutable("', '"),subs.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((_montoventav))),RemoteObject.createImmutable("'"))),0); - BA.debugLineNum = 1408;BA.debugLine="Log(\"Mandamos Venta_No_Venta\")"; -Debug.ShouldStop(-2147483648); -subs.mostCurrent.__c.runVoidMethod ("LogImpl","315138855",RemoteObject.createImmutable("Mandamos Venta_No_Venta"),0); - BA.debugLineNum = 1409;BA.debugLine="End Sub"; -Debug.ShouldStop(1); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/swiftbutton.java b/B4A/Objects/shell/src/keymon/lat/medicomed/swiftbutton.java deleted file mode 100644 index e055a47..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/swiftbutton.java +++ /dev/null @@ -1,44 +0,0 @@ - -package keymon.lat.medicomed; - -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RemoteObject; - -public class swiftbutton { - public static RemoteObject myClass; - public swiftbutton() { - } - public static PCBA staticBA = new PCBA(null, swiftbutton.class); - -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _meventname = RemoteObject.createImmutable(""); -public static RemoteObject _mcallback = RemoteObject.declareNull("Object"); -public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _cvs = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas"); -public static RemoteObject _xlbl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -public static RemoteObject _clr1 = RemoteObject.createImmutable(0); -public static RemoteObject _clr2 = RemoteObject.createImmutable(0); -public static RemoteObject _disabledcolor = RemoteObject.createImmutable(0); -public static RemoteObject _pressed = RemoteObject.createImmutable(false); -public static RemoteObject _tag = RemoteObject.declareNull("Object"); -public static RemoteObject _mdisabled = RemoteObject.createImmutable(false); -public static RemoteObject _cornersradius = RemoteObject.createImmutable(0); -public static RemoteObject _sideheight = RemoteObject.createImmutable(0); -public static RemoteObject _mhaptic = RemoteObject.createImmutable(false); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static Object[] GetGlobals(RemoteObject _ref) throws Exception { - return new Object[] {"clr1",_ref.getField(false, "_clr1"),"clr2",_ref.getField(false, "_clr2"),"CornersRadius",_ref.getField(false, "_cornersradius"),"cvs",_ref.getField(false, "_cvs"),"DateUtils",_ref.getField(false, "_dateutils"),"disabledColor",_ref.getField(false, "_disabledcolor"),"mBase",_ref.getField(false, "_mbase"),"mCallBack",_ref.getField(false, "_mcallback"),"mDisabled",_ref.getField(false, "_mdisabled"),"mEventName",_ref.getField(false, "_meventname"),"mHaptic",_ref.getField(false, "_mhaptic"),"pressed",_ref.getField(false, "_pressed"),"SideHeight",_ref.getField(false, "_sideheight"),"Tag",_ref.getField(false, "_tag"),"xLBL",_ref.getField(false, "_xlbl"),"xui",_ref.getField(false, "_xui")}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/swiftbutton_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/swiftbutton_subs_0.java deleted file mode 100644 index 69c01ef..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/swiftbutton_subs_0.java +++ /dev/null @@ -1,466 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class swiftbutton_subs_0 { - - -public static RemoteObject _base_resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{ -try { - Debug.PushSubsStack("Base_Resize (swiftbutton) ","swiftbutton",61,__ref.getField(false, "ba"),__ref,54); -if (RapidSub.canDelegate("base_resize")) { return __ref.runUserSub(false, "swiftbutton","base_resize", __ref, _width, _height);} -RemoteObject _v = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -Debug.locals.put("Width", _width); -Debug.locals.put("Height", _height); - BA.debugLineNum = 54;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 55;BA.debugLine="cvs.Resize(Width, Height)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Resize",(Object)(BA.numberCast(float.class, _width)),(Object)(BA.numberCast(float.class, _height))); - BA.debugLineNum = 56;BA.debugLine="For Each v As B4XView In mBase.GetAllViewsRecursi"; -Debug.JustUpdateDeviceLine(); -_v = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -{ -final RemoteObject group2 = __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"GetAllViewsRecursive"); -final int groupLen2 = group2.runMethod(true,"getSize").get() -;int index2 = 0; -; -for (; index2 < groupLen2;index2++){ -_v = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), group2.runMethod(false,"Get",index2));Debug.locals.put("v", _v); -Debug.locals.put("v", _v); - BA.debugLineNum = 57;BA.debugLine="v.SetLayoutAnimated(0, 0, 0, Width, Height)"; -Debug.JustUpdateDeviceLine(); -_v.runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, _width)),(Object)(BA.numberCast(int.class, _height))); - } -}Debug.locals.put("v", _v); -; - BA.debugLineNum = 59;BA.debugLine="Draw"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.swiftbutton.class, "_draw" /*RemoteObject*/ ); - BA.debugLineNum = 60;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{ - //BA.debugLineNum = 12;BA.debugLine="Sub Class_Globals"; - //BA.debugLineNum = 13;BA.debugLine="Private mEventName As String 'ignore"; -swiftbutton._meventname = RemoteObject.createImmutable("");__ref.setField("_meventname",swiftbutton._meventname); - //BA.debugLineNum = 14;BA.debugLine="Private mCallBack As Object 'ignore"; -swiftbutton._mcallback = RemoteObject.createNew ("Object");__ref.setField("_mcallback",swiftbutton._mcallback); - //BA.debugLineNum = 15;BA.debugLine="Public mBase As B4XView 'ignore"; -swiftbutton._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",swiftbutton._mbase); - //BA.debugLineNum = 16;BA.debugLine="Private xui As XUI 'ignore"; -swiftbutton._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",swiftbutton._xui); - //BA.debugLineNum = 17;BA.debugLine="Private cvs As B4XCanvas"; -swiftbutton._cvs = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas");__ref.setField("_cvs",swiftbutton._cvs); - //BA.debugLineNum = 18;BA.debugLine="Public xLBL As B4XView"; -swiftbutton._xlbl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_xlbl",swiftbutton._xlbl); - //BA.debugLineNum = 19;BA.debugLine="Public clr1, clr2, disabledColor As Int"; -swiftbutton._clr1 = RemoteObject.createImmutable(0);__ref.setField("_clr1",swiftbutton._clr1); -swiftbutton._clr2 = RemoteObject.createImmutable(0);__ref.setField("_clr2",swiftbutton._clr2); -swiftbutton._disabledcolor = RemoteObject.createImmutable(0);__ref.setField("_disabledcolor",swiftbutton._disabledcolor); - //BA.debugLineNum = 20;BA.debugLine="Private pressed As Boolean"; -swiftbutton._pressed = RemoteObject.createImmutable(false);__ref.setField("_pressed",swiftbutton._pressed); - //BA.debugLineNum = 21;BA.debugLine="Public Tag As Object"; -swiftbutton._tag = RemoteObject.createNew ("Object");__ref.setField("_tag",swiftbutton._tag); - //BA.debugLineNum = 22;BA.debugLine="Private mDisabled As Boolean"; -swiftbutton._mdisabled = RemoteObject.createImmutable(false);__ref.setField("_mdisabled",swiftbutton._mdisabled); - //BA.debugLineNum = 23;BA.debugLine="Public CornersRadius, SideHeight As Int"; -swiftbutton._cornersradius = RemoteObject.createImmutable(0);__ref.setField("_cornersradius",swiftbutton._cornersradius); -swiftbutton._sideheight = RemoteObject.createImmutable(0);__ref.setField("_sideheight",swiftbutton._sideheight); - //BA.debugLineNum = 24;BA.debugLine="Public mHaptic As Boolean"; -swiftbutton._mhaptic = RemoteObject.createImmutable(false);__ref.setField("_mhaptic",swiftbutton._mhaptic); - //BA.debugLineNum = 25;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _designercreateview(RemoteObject __ref,RemoteObject _base,RemoteObject _lbl,RemoteObject _props) throws Exception{ -try { - Debug.PushSubsStack("DesignerCreateView (swiftbutton) ","swiftbutton",61,__ref.getField(false, "ba"),__ref,32); -if (RapidSub.canDelegate("designercreateview")) { return __ref.runUserSub(false, "swiftbutton","designercreateview", __ref, _base, _lbl, _props);} -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -Debug.locals.put("Base", _base); -Debug.locals.put("Lbl", _lbl); -Debug.locals.put("Props", _props); - BA.debugLineNum = 32;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 33;BA.debugLine="mBase = Base"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).setObject (_base); - BA.debugLineNum = 34;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_tag" /*RemoteObject*/ ,__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"getTag")); - BA.debugLineNum = 34;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"setTag",__ref); - BA.debugLineNum = 35;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"p\")"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_p = __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("p")));Debug.locals.put("p", _p);Debug.locals.put("p", _p); - BA.debugLineNum = 36;BA.debugLine="p.Color = xui.Color_Transparent"; -Debug.JustUpdateDeviceLine(); -_p.runMethod(true,"setColor",__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")); - BA.debugLineNum = 37;BA.debugLine="clr1 = xui.PaintOrColorToColor(Props.Get(\"Primary"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_clr1" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("PrimaryColor"))))))); - BA.debugLineNum = 38;BA.debugLine="clr2 = xui.PaintOrColorToColor(Props.Get(\"Seconda"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_clr2" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("SecondaryColor"))))))); - BA.debugLineNum = 39;BA.debugLine="disabledColor = xui.PaintOrColorToColor(Props.Get"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_disabledcolor" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)(_props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("DisabledColor"))),(Object)(RemoteObject.createImmutable((((int)0xff999999)))))))); - BA.debugLineNum = 40;BA.debugLine="CornersRadius = DipToCurrent(Props.GetDefault(\"Co"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_cornersradius" /*RemoteObject*/ ,swiftbutton.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, _props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("CornersRadius"))),(Object)(RemoteObject.createImmutable((15)))))))); - BA.debugLineNum = 41;BA.debugLine="SideHeight = DipToCurrent(Props.GetDefault(\"SideH"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_sideheight" /*RemoteObject*/ ,swiftbutton.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, _props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("SideHeight"))),(Object)(RemoteObject.createImmutable((5)))))))); - BA.debugLineNum = 42;BA.debugLine="mDisabled = Not(Props.GetDefault(\"ButtonEnabled\","; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mdisabled" /*RemoteObject*/ ,swiftbutton.__c.runMethod(true,"Not",(Object)(BA.ObjectToBoolean(_props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("ButtonEnabled"))),(Object)((swiftbutton.__c.getField(true,"True")))))))); - BA.debugLineNum = 43;BA.debugLine="mHaptic = Props.GetDefault(\"HapticFeedback\", Fals"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mhaptic" /*RemoteObject*/ ,BA.ObjectToBoolean(_props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("HapticFeedback"))),(Object)((swiftbutton.__c.getField(true,"False")))))); - BA.debugLineNum = 44;BA.debugLine="pressed = mDisabled"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_pressed" /*RemoteObject*/ ,__ref.getField(true,"_mdisabled" /*RemoteObject*/ )); - BA.debugLineNum = 45;BA.debugLine="xLBL = Lbl"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_xlbl" /*RemoteObject*/ ).setObject (_lbl.getObject()); - BA.debugLineNum = 46;BA.debugLine="xLBL.Visible = True"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_xlbl" /*RemoteObject*/ ).runMethod(true,"setVisible",swiftbutton.__c.getField(true,"True")); - BA.debugLineNum = 47;BA.debugLine="mBase.AddView(xLBL, 0, 0, 0, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_xlbl" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 48;BA.debugLine="mBase.AddView(p, 0, 0, 0, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((_p.getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0))); - BA.debugLineNum = 49;BA.debugLine="xLBL.SetTextAlignment(\"CENTER\", \"CENTER\")"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_xlbl" /*RemoteObject*/ ).runVoidMethod ("SetTextAlignment",(Object)(BA.ObjectToString("CENTER")),(Object)(RemoteObject.createImmutable("CENTER"))); - BA.debugLineNum = 50;BA.debugLine="cvs.Initialize(mBase)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ))); - BA.debugLineNum = 51;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.swiftbutton.class, "_base_resize" /*RemoteObject*/ ,(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"))),(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight")))); - BA.debugLineNum = 52;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _draw(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Draw (swiftbutton) ","swiftbutton",61,__ref.getField(false, "ba"),__ref,121); -if (RapidSub.canDelegate("draw")) { return __ref.runUserSub(false, "swiftbutton","draw", __ref);} -RemoteObject _r = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XRect"); -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XPath"); -RemoteObject _c = RemoteObject.createImmutable(0); - BA.debugLineNum = 121;BA.debugLine="Private Sub Draw"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 122;BA.debugLine="cvs.ClearRect(cvs.TargetRect)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("ClearRect",(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect"))); - BA.debugLineNum = 123;BA.debugLine="Dim r As B4XRect"; -Debug.JustUpdateDeviceLine(); -_r = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas.B4XRect");Debug.locals.put("r", _r); - BA.debugLineNum = 124;BA.debugLine="Dim p As B4XPath"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas.B4XPath");Debug.locals.put("p", _p); - BA.debugLineNum = 125;BA.debugLine="r.Initialize(0, SideHeight, mBase.Width, mBase.He"; -Debug.JustUpdateDeviceLine(); -_r.runVoidMethod ("Initialize",(Object)(BA.numberCast(float.class, 0)),(Object)(BA.numberCast(float.class, __ref.getField(true,"_sideheight" /*RemoteObject*/ ))),(Object)(BA.numberCast(float.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"))),(Object)(BA.numberCast(float.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight")))); - BA.debugLineNum = 126;BA.debugLine="If pressed = False Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_pressed" /*RemoteObject*/ ),swiftbutton.__c.getField(true,"False"))) { - BA.debugLineNum = 127;BA.debugLine="xLBL.Top = 0"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_xlbl" /*RemoteObject*/ ).runMethod(true,"setTop",BA.numberCast(int.class, 0)); - BA.debugLineNum = 128;BA.debugLine="p.InitializeRoundedRect(r, CornersRadius)"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("InitializeRoundedRect",(Object)(_r),(Object)(BA.numberCast(float.class, __ref.getField(true,"_cornersradius" /*RemoteObject*/ )))); - BA.debugLineNum = 129;BA.debugLine="cvs.DrawPath(p, clr2, True, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawPath",(Object)(_p),(Object)(__ref.getField(true,"_clr2" /*RemoteObject*/ )),(Object)(swiftbutton.__c.getField(true,"True")),(Object)(BA.numberCast(float.class, 0))); - BA.debugLineNum = 130;BA.debugLine="r.Initialize(0, 0, mBase.Width, mBase.Height - S"; -Debug.JustUpdateDeviceLine(); -_r.runVoidMethod ("Initialize",(Object)(BA.numberCast(float.class, 0)),(Object)(BA.numberCast(float.class, 0)),(Object)(BA.numberCast(float.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"),__ref.getField(true,"_sideheight" /*RemoteObject*/ )}, "-",1, 1)))); - BA.debugLineNum = 131;BA.debugLine="p.InitializeRoundedRect(r, CornersRadius)"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("InitializeRoundedRect",(Object)(_r),(Object)(BA.numberCast(float.class, __ref.getField(true,"_cornersradius" /*RemoteObject*/ )))); - BA.debugLineNum = 132;BA.debugLine="cvs.DrawPath(p, clr1, True, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawPath",(Object)(_p),(Object)(__ref.getField(true,"_clr1" /*RemoteObject*/ )),(Object)(swiftbutton.__c.getField(true,"True")),(Object)(BA.numberCast(float.class, 0))); - }else { - BA.debugLineNum = 134;BA.debugLine="xLBL.Top = SideHeight"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_xlbl" /*RemoteObject*/ ).runMethod(true,"setTop",__ref.getField(true,"_sideheight" /*RemoteObject*/ )); - BA.debugLineNum = 135;BA.debugLine="p.InitializeRoundedRect(r, CornersRadius)"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("InitializeRoundedRect",(Object)(_r),(Object)(BA.numberCast(float.class, __ref.getField(true,"_cornersradius" /*RemoteObject*/ )))); - BA.debugLineNum = 136;BA.debugLine="Dim c As Int"; -Debug.JustUpdateDeviceLine(); -_c = RemoteObject.createImmutable(0);Debug.locals.put("c", _c); - BA.debugLineNum = 137;BA.debugLine="If mDisabled Then c = disabledColor Else c = clr"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_mdisabled" /*RemoteObject*/ ).get().booleanValue()) { -_c = __ref.getField(true,"_disabledcolor" /*RemoteObject*/ );Debug.locals.put("c", _c);} -else { -_c = __ref.getField(true,"_clr1" /*RemoteObject*/ );Debug.locals.put("c", _c);}; - BA.debugLineNum = 138;BA.debugLine="cvs.DrawPath(p, c, True, 0)"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawPath",(Object)(_p),(Object)(_c),(Object)(swiftbutton.__c.getField(true,"True")),(Object)(BA.numberCast(float.class, 0))); - }; - BA.debugLineNum = 141;BA.debugLine="cvs.Invalidate"; -Debug.JustUpdateDeviceLine(); -__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Invalidate"); - BA.debugLineNum = 142;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _getenabled(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("getEnabled (swiftbutton) ","swiftbutton",61,__ref.getField(false, "ba"),__ref,62); -if (RapidSub.canDelegate("getenabled")) { return __ref.runUserSub(false, "swiftbutton","getenabled", __ref);} - BA.debugLineNum = 62;BA.debugLine="Public Sub getEnabled As Boolean"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 63;BA.debugLine="Return Not(mDisabled)"; -Debug.JustUpdateDeviceLine(); -if (true) return swiftbutton.__c.runMethod(true,"Not",(Object)(__ref.getField(true,"_mdisabled" /*RemoteObject*/ ))); - BA.debugLineNum = 64;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(false); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _callback,RemoteObject _eventname) throws Exception{ -try { - Debug.PushSubsStack("Initialize (swiftbutton) ","swiftbutton",61,__ref.getField(false, "ba"),__ref,27); -if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "swiftbutton","initialize", __ref, _ba, _callback, _eventname);} -__ref.runVoidMethodAndSync("innerInitializeHelper", _ba); -Debug.locals.put("ba", _ba); -Debug.locals.put("Callback", _callback); -Debug.locals.put("EventName", _eventname); - BA.debugLineNum = 27;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 28;BA.debugLine="mEventName = EventName"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_meventname" /*RemoteObject*/ ,_eventname); - BA.debugLineNum = 29;BA.debugLine="mCallBack = Callback"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mcallback" /*RemoteObject*/ ,_callback); - BA.debugLineNum = 30;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _p_touch(RemoteObject __ref,RemoteObject _action,RemoteObject _x,RemoteObject _y) throws Exception{ -try { - Debug.PushSubsStack("p_Touch (swiftbutton) ","swiftbutton",61,__ref.getField(false, "ba"),__ref,72); -if (RapidSub.canDelegate("p_touch")) { return __ref.runUserSub(false, "swiftbutton","p_touch", __ref, _action, _x, _y);} -RemoteObject _inside = RemoteObject.createImmutable(false); -Debug.locals.put("Action", _action); -Debug.locals.put("X", _x); -Debug.locals.put("Y", _y); - BA.debugLineNum = 72;BA.debugLine="Private Sub p_Touch (Action As Int, X As Float, Y"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 73;BA.debugLine="If mDisabled Then Return"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_mdisabled" /*RemoteObject*/ ).get().booleanValue()) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 74;BA.debugLine="Dim Inside As Boolean = x > 0 And x < mBase.Width"; -Debug.JustUpdateDeviceLine(); -_inside = BA.ObjectToBoolean(RemoteObject.solveBoolean(">",_x,BA.numberCast(double.class, 0)) && RemoteObject.solveBoolean("<",_x,BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"))) && RemoteObject.solveBoolean(">",_y,BA.numberCast(double.class, 0)) && RemoteObject.solveBoolean("<",_y,BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"))));Debug.locals.put("Inside", _inside);Debug.locals.put("Inside", _inside); - BA.debugLineNum = 75;BA.debugLine="Select Action"; -Debug.JustUpdateDeviceLine(); -switch (BA.switchObjectToInt(_action,__ref.getField(false,"_mbase" /*RemoteObject*/ ).getField(true,"TOUCH_ACTION_DOWN"),__ref.getField(false,"_mbase" /*RemoteObject*/ ).getField(true,"TOUCH_ACTION_MOVE"),__ref.getField(false,"_mbase" /*RemoteObject*/ ).getField(true,"TOUCH_ACTION_UP"),BA.numberCast(int.class, 3))) { -case 0: { - BA.debugLineNum = 77;BA.debugLine="SetPressedState(True)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.swiftbutton.class, "_setpressedstate" /*RemoteObject*/ ,(Object)(swiftbutton.__c.getField(true,"True"))); - BA.debugLineNum = 78;BA.debugLine="Draw"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.swiftbutton.class, "_draw" /*RemoteObject*/ ); - break; } -case 1: { - BA.debugLineNum = 80;BA.debugLine="If pressed <> Inside Then"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("!",__ref.getField(true,"_pressed" /*RemoteObject*/ ),_inside)) { - BA.debugLineNum = 81;BA.debugLine="SetPressedState(Inside)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.swiftbutton.class, "_setpressedstate" /*RemoteObject*/ ,(Object)(_inside)); - BA.debugLineNum = 82;BA.debugLine="Draw"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.swiftbutton.class, "_draw" /*RemoteObject*/ ); - }; - break; } -case 2: -case 3: { - BA.debugLineNum = 85;BA.debugLine="SetPressedState(False)"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.swiftbutton.class, "_setpressedstate" /*RemoteObject*/ ,(Object)(swiftbutton.__c.getField(true,"False"))); - BA.debugLineNum = 86;BA.debugLine="Draw"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.swiftbutton.class, "_draw" /*RemoteObject*/ ); - BA.debugLineNum = 87;BA.debugLine="If Inside Then"; -Debug.JustUpdateDeviceLine(); -if (_inside.get().booleanValue()) { - BA.debugLineNum = 88;BA.debugLine="If mHaptic Then XUIViewsUtils.PerformHapticFee"; -Debug.JustUpdateDeviceLine(); -if (__ref.getField(true,"_mhaptic" /*RemoteObject*/ ).get().booleanValue()) { -swiftbutton._xuiviewsutils.runVoidMethod ("_performhapticfeedback" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ )));}; - BA.debugLineNum = 89;BA.debugLine="CallSubDelayed(mCallBack, mEventName & \"_Click"; -Debug.JustUpdateDeviceLine(); -swiftbutton.__c.runVoidMethod ("CallSubDelayed",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_Click")))); - }; - break; } -} -; - BA.debugLineNum = 92;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setcolors(RemoteObject __ref,RemoteObject _primary,RemoteObject _secondary) throws Exception{ -try { - Debug.PushSubsStack("SetColors (swiftbutton) ","swiftbutton",61,__ref.getField(false, "ba"),__ref,111); -if (RapidSub.canDelegate("setcolors")) { return __ref.runUserSub(false, "swiftbutton","setcolors", __ref, _primary, _secondary);} -Debug.locals.put("Primary", _primary); -Debug.locals.put("Secondary", _secondary); - BA.debugLineNum = 111;BA.debugLine="Public Sub SetColors(Primary As Int, Secondary As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 112;BA.debugLine="clr1 = Primary"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_clr1" /*RemoteObject*/ ,_primary); - BA.debugLineNum = 113;BA.debugLine="clr2 = Secondary"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_clr2" /*RemoteObject*/ ,_secondary); - BA.debugLineNum = 114;BA.debugLine="Draw"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.swiftbutton.class, "_draw" /*RemoteObject*/ ); - BA.debugLineNum = 115;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setenabled(RemoteObject __ref,RemoteObject _b) throws Exception{ -try { - Debug.PushSubsStack("setEnabled (swiftbutton) ","swiftbutton",61,__ref.getField(false, "ba"),__ref,66); -if (RapidSub.canDelegate("setenabled")) { return __ref.runUserSub(false, "swiftbutton","setenabled", __ref, _b);} -Debug.locals.put("b", _b); - BA.debugLineNum = 66;BA.debugLine="Public Sub setEnabled(b As Boolean)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 67;BA.debugLine="mDisabled = Not(b)"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_mdisabled" /*RemoteObject*/ ,swiftbutton.__c.runMethod(true,"Not",(Object)(_b))); - BA.debugLineNum = 68;BA.debugLine="pressed = mDisabled"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_pressed" /*RemoteObject*/ ,__ref.getField(true,"_mdisabled" /*RemoteObject*/ )); - BA.debugLineNum = 69;BA.debugLine="Draw"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.swiftbutton.class, "_draw" /*RemoteObject*/ ); - BA.debugLineNum = 70;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setpressedstate(RemoteObject __ref,RemoteObject _newstate) throws Exception{ -try { - Debug.PushSubsStack("SetPressedState (swiftbutton) ","swiftbutton",61,__ref.getField(false, "ba"),__ref,94); -if (RapidSub.canDelegate("setpressedstate")) { return __ref.runUserSub(false, "swiftbutton","setpressedstate", __ref, _newstate);} -Debug.locals.put("NewState", _newstate); - BA.debugLineNum = 94;BA.debugLine="Private Sub SetPressedState(NewState As Boolean)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 95;BA.debugLine="If pressed = NewState Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",__ref.getField(true,"_pressed" /*RemoteObject*/ ),_newstate)) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 96;BA.debugLine="If NewState And xui.SubExists(mCallBack, mEventNa"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean(".",_newstate) && RemoteObject.solveBoolean(".",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"SubExists",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_ButtonDown"))),(Object)(BA.numberCast(int.class, 0))))) { - BA.debugLineNum = 97;BA.debugLine="CallSubDelayed(mCallBack, mEventName & \"_ButtonD"; -Debug.JustUpdateDeviceLine(); -swiftbutton.__c.runVoidMethod ("CallSubDelayed",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_ButtonDown")))); - }; - BA.debugLineNum = 99;BA.debugLine="If NewState = False And xui.SubExists(mCallBack,"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_newstate,swiftbutton.__c.getField(true,"False")) && RemoteObject.solveBoolean(".",__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"SubExists",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_ButtonUp"))),(Object)(BA.numberCast(int.class, 0))))) { - BA.debugLineNum = 100;BA.debugLine="CallSubDelayed(mCallBack, mEventName & \"_ButtonU"; -Debug.JustUpdateDeviceLine(); -swiftbutton.__c.runVoidMethod ("CallSubDelayed",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_ButtonUp")))); - }; - BA.debugLineNum = 102;BA.debugLine="pressed= NewState"; -Debug.JustUpdateDeviceLine(); -__ref.setField ("_pressed" /*RemoteObject*/ ,_newstate); - BA.debugLineNum = 103;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _update(RemoteObject __ref) throws Exception{ -try { - Debug.PushSubsStack("Update (swiftbutton) ","swiftbutton",61,__ref.getField(false, "ba"),__ref,117); -if (RapidSub.canDelegate("update")) { return __ref.runUserSub(false, "swiftbutton","update", __ref);} - BA.debugLineNum = 117;BA.debugLine="Public Sub Update"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 118;BA.debugLine="Draw"; -Debug.JustUpdateDeviceLine(); -__ref.runClassMethod (keymon.lat.medicomed.swiftbutton.class, "_draw" /*RemoteObject*/ ); - BA.debugLineNum = 119;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/tracker.java b/B4A/Objects/shell/src/keymon/lat/medicomed/tracker.java deleted file mode 100644 index c3a689e..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/tracker.java +++ /dev/null @@ -1,70 +0,0 @@ - -package keymon.lat.medicomed; - -import java.io.IOException; -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RDebug; -import anywheresoftware.b4a.pc.RemoteObject; -import anywheresoftware.b4a.pc.RDebug.IRemote; -import anywheresoftware.b4a.pc.Debug; -import anywheresoftware.b4a.pc.B4XTypes.B4XClass; -import anywheresoftware.b4a.pc.B4XTypes.DeviceClass; - -public class tracker implements IRemote{ - public static tracker mostCurrent; - public static RemoteObject processBA; - public static boolean processGlobalsRun; - public static RemoteObject myClass; - public static RemoteObject remoteMe; - public tracker() { - mostCurrent = this; - } - public RemoteObject getRemoteMe() { - return remoteMe; - } - -public boolean isSingleton() { - return true; - } - static { - anywheresoftware.b4a.pc.RapidSub.moduleToObject.put(new B4XClass("tracker"), "keymon.lat.medicomed.tracker"); - } - public static RemoteObject getObject() { - return myClass; - } - public RemoteObject _service; - private PCBA pcBA; - - public PCBA create(Object[] args) throws ClassNotFoundException{ - processBA = (RemoteObject) args[1]; - _service = (RemoteObject) args[2]; - remoteMe = RemoteObject.declareNull("keymon.lat.medicomed.tracker"); - anywheresoftware.b4a.keywords.Common.Density = (Float)args[3]; - pcBA = new PCBA(this, tracker.class); - main_subs_0.initializeProcessGlobals(); - return pcBA; - } -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _nid = RemoteObject.createImmutable(0); -public static RemoteObject _tracking = RemoteObject.createImmutable(false); -public static RemoteObject _lock = RemoteObject.declareNull("anywheresoftware.b4a.phone.Phone.PhoneWakeState"); -public static RemoteObject _flp = RemoteObject.declareNull("uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper"); -public static RemoteObject _actuallr = RemoteObject.declareNull("uk.co.martinpearman.b4a.fusedlocationprovider.LocationRequest"); -public static RemoteObject _flpstarted = RemoteObject.createImmutable(false); -public static RemoteObject _uugcoords = RemoteObject.declareNull("anywheresoftware.b4a.gps.LocationWrapper"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; -public static keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; - public Object[] GetGlobals() { - return new Object[] {"actualLR",tracker._actuallr,"appUpdater",Debug.moduleToString(keymon.lat.medicomed.appupdater.class),"B4XCollections",Debug.moduleToString(keymon.lat.medicomed.b4xcollections.class),"B4XPages",Debug.moduleToString(keymon.lat.medicomed.b4xpages.class),"DateUtils",tracker.mostCurrent._dateutils,"FLP",tracker._flp,"flpStarted",tracker._flpstarted,"HttpUtils2Service",Debug.moduleToString(keymon.lat.medicomed.httputils2service.class),"lock",tracker._lock,"Main",Debug.moduleToString(keymon.lat.medicomed.main.class),"MAPA_RUTAS",Debug.moduleToString(keymon.lat.medicomed.mapa_rutas.class),"newinst2",Debug.moduleToString(keymon.lat.medicomed.newinst2.class),"nid",tracker._nid,"Service",tracker.mostCurrent._service,"Starter",Debug.moduleToString(keymon.lat.medicomed.starter.class),"Subs",Debug.moduleToString(keymon.lat.medicomed.subs.class),"Tracking",tracker._tracking,"UUGCoords",tracker._uugcoords,"XUIViewsUtils",Debug.moduleToString(keymon.lat.medicomed.xuiviewsutils.class)}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/tracker_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/tracker_subs_0.java deleted file mode 100644 index 1bfb757..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/tracker_subs_0.java +++ /dev/null @@ -1,830 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class tracker_subs_0 { - - -public static RemoteObject _createlocationrequest() throws Exception{ -try { - Debug.PushSubsStack("CreateLocationRequest (tracker) ","tracker",22,tracker.processBA,tracker.mostCurrent,111); -if (RapidSub.canDelegate("createlocationrequest")) { return keymon.lat.medicomed.tracker.remoteMe.runUserSub(false, "tracker","createlocationrequest");} -RemoteObject _lr = RemoteObject.declareNull("uk.co.martinpearman.b4a.fusedlocationprovider.LocationRequest"); - BA.debugLineNum = 111;BA.debugLine="Private Sub CreateLocationRequest As LocationReque"; -Debug.ShouldStop(16384); - BA.debugLineNum = 113;BA.debugLine="Dim lr As LocationRequest"; -Debug.ShouldStop(65536); -_lr = RemoteObject.createNew ("uk.co.martinpearman.b4a.fusedlocationprovider.LocationRequest");Debug.locals.put("lr", _lr); - BA.debugLineNum = 114;BA.debugLine="lr.Initialize"; -Debug.ShouldStop(131072); -_lr.runVoidMethod ("Initialize"); - BA.debugLineNum = 115;BA.debugLine="lr.SetInterval(10000) 'Intervalo deseado para act"; -Debug.ShouldStop(262144); -_lr.runVoidMethod ("SetInterval",(Object)(BA.numberCast(long.class, 10000))); - BA.debugLineNum = 116;BA.debugLine="lr.SetFastestInterval(lr.GetInterval / 2) 'Interv"; -Debug.ShouldStop(524288); -_lr.runVoidMethod ("SetFastestInterval",(Object)(BA.numberCast(long.class, RemoteObject.solve(new RemoteObject[] {_lr.runMethod(true,"GetInterval"),RemoteObject.createImmutable(2)}, "/",0, 0)))); - BA.debugLineNum = 117;BA.debugLine="lr.SetSmallestDisplacement(50) 'Solo registra cam"; -Debug.ShouldStop(1048576); -_lr.runVoidMethod ("SetSmallestDisplacement",(Object)(BA.numberCast(float.class, 50))); - BA.debugLineNum = 118;BA.debugLine="lr.SetPriority(lr.Priority.PRIORITY_HIGH_ACCURACY"; -Debug.ShouldStop(2097152); -_lr.runVoidMethod ("SetPriority",(Object)(_lr.getField(false,"Priority").getField(true,"PRIORITY_HIGH_ACCURACY"))); - BA.debugLineNum = 119;BA.debugLine="actualLR=lr"; -Debug.ShouldStop(4194304); -tracker._actuallr = _lr; - BA.debugLineNum = 120;BA.debugLine="Return lr"; -Debug.ShouldStop(8388608); -if (true) return _lr; - BA.debugLineNum = 121;BA.debugLine="End Sub"; -Debug.ShouldStop(16777216); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createlocationrequestsmalld() throws Exception{ -try { - Debug.PushSubsStack("CreateLocationRequestSmallD (tracker) ","tracker",22,tracker.processBA,tracker.mostCurrent,123); -if (RapidSub.canDelegate("createlocationrequestsmalld")) { return keymon.lat.medicomed.tracker.remoteMe.runUserSub(false, "tracker","createlocationrequestsmalld");} -RemoteObject _lr = RemoteObject.declareNull("uk.co.martinpearman.b4a.fusedlocationprovider.LocationRequest"); - BA.debugLineNum = 123;BA.debugLine="Private Sub CreateLocationRequestSmallD As Locatio"; -Debug.ShouldStop(67108864); - BA.debugLineNum = 125;BA.debugLine="Dim lr As LocationRequest"; -Debug.ShouldStop(268435456); -_lr = RemoteObject.createNew ("uk.co.martinpearman.b4a.fusedlocationprovider.LocationRequest");Debug.locals.put("lr", _lr); - BA.debugLineNum = 126;BA.debugLine="lr.Initialize"; -Debug.ShouldStop(536870912); -_lr.runVoidMethod ("Initialize"); - BA.debugLineNum = 127;BA.debugLine="lr.SetInterval(2000) 'Intervalo deseado para actu"; -Debug.ShouldStop(1073741824); -_lr.runVoidMethod ("SetInterval",(Object)(BA.numberCast(long.class, 2000))); - BA.debugLineNum = 128;BA.debugLine="lr.SetFastestInterval(lr.GetInterval / 2) 'Interv"; -Debug.ShouldStop(-2147483648); -_lr.runVoidMethod ("SetFastestInterval",(Object)(BA.numberCast(long.class, RemoteObject.solve(new RemoteObject[] {_lr.runMethod(true,"GetInterval"),RemoteObject.createImmutable(2)}, "/",0, 0)))); - BA.debugLineNum = 129;BA.debugLine="lr.setNumUpdates(2) 'Solicitamos solo 2 actualiza"; -Debug.ShouldStop(1); -_lr.runVoidMethod ("SetNumUpdates",(Object)(BA.numberCast(int.class, 2))); - BA.debugLineNum = 130;BA.debugLine="lr.SetSmallestDisplacement(0) 'Solo registra camb"; -Debug.ShouldStop(2); -_lr.runVoidMethod ("SetSmallestDisplacement",(Object)(BA.numberCast(float.class, 0))); - BA.debugLineNum = 131;BA.debugLine="lr.SetPriority(lr.Priority.PRIORITY_HIGH_ACCURACY"; -Debug.ShouldStop(4); -_lr.runVoidMethod ("SetPriority",(Object)(_lr.getField(false,"Priority").getField(true,"PRIORITY_HIGH_ACCURACY"))); - BA.debugLineNum = 132;BA.debugLine="actualLR=lr"; -Debug.ShouldStop(8); -tracker._actuallr = _lr; - BA.debugLineNum = 133;BA.debugLine="Return lr"; -Debug.ShouldStop(16); -if (true) return _lr; - BA.debugLineNum = 134;BA.debugLine="End Sub"; -Debug.ShouldStop(32); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createnotification(RemoteObject _body) throws Exception{ -try { - Debug.PushSubsStack("CreateNotification (tracker) ","tracker",22,tracker.processBA,tracker.mostCurrent,194); -if (RapidSub.canDelegate("createnotification")) { return keymon.lat.medicomed.tracker.remoteMe.runUserSub(false, "tracker","createnotification", _body);} -RemoteObject _notification = RemoteObject.declareNull("anywheresoftware.b4a.objects.NotificationWrapper"); -Debug.locals.put("Body", _body); - BA.debugLineNum = 194;BA.debugLine="Sub CreateNotification (Body As String) As Notific"; -Debug.ShouldStop(2); - BA.debugLineNum = 195;BA.debugLine="Dim notification As Notification"; -Debug.ShouldStop(4); -_notification = RemoteObject.createNew ("anywheresoftware.b4a.objects.NotificationWrapper");Debug.locals.put("notification", _notification); - BA.debugLineNum = 196;BA.debugLine="notification.Initialize2(notification.IMPORTANCE_"; -Debug.ShouldStop(8); -_notification.runVoidMethod ("Initialize2",(Object)(_notification.getField(true,"IMPORTANCE_LOW"))); - BA.debugLineNum = 197;BA.debugLine="notification.Icon = \"icon\""; -Debug.ShouldStop(16); -_notification.runVoidMethod ("setIcon",BA.ObjectToString("icon")); - BA.debugLineNum = 198;BA.debugLine="notification.SetInfo(\"Medicomed\", Body, Main)"; -Debug.ShouldStop(32); -_notification.runVoidMethod ("SetInfoNew",tracker.processBA,(Object)(BA.ObjectToCharSequence("Medicomed")),(Object)(BA.ObjectToCharSequence(_body)),(Object)((tracker.mostCurrent._main.getObject()))); - BA.debugLineNum = 199;BA.debugLine="Return notification"; -Debug.ShouldStop(64); -if (true) return _notification; - BA.debugLineNum = 200;BA.debugLine="End Sub"; -Debug.ShouldStop(128); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _dameultimaubicacionconocida() throws Exception{ -try { - Debug.PushSubsStack("dameUltimaUbicacionConocida (tracker) ","tracker",22,tracker.processBA,tracker.mostCurrent,136); -if (RapidSub.canDelegate("dameultimaubicacionconocida")) { return keymon.lat.medicomed.tracker.remoteMe.runUserSub(false, "tracker","dameultimaubicacionconocida");} -RemoteObject _coords = RemoteObject.createImmutable(""); - BA.debugLineNum = 136;BA.debugLine="Sub dameUltimaUbicacionConocida"; -Debug.ShouldStop(128); - BA.debugLineNum = 137;BA.debugLine="If FLP.GetLastKnownLocation.IsInitialized Then 'M"; -Debug.ShouldStop(256); -if (tracker._flp.runMethod(false,"GetLastKnownLocation").runMethod(true,"IsInitialized").get().booleanValue()) { - BA.debugLineNum = 139;BA.debugLine="If Starter.Logger Then LogColor($\"Mandamos UUC \""; -Debug.ShouldStop(1024); -if (tracker.mostCurrent._starter._logger /*RemoteObject*/ .get().booleanValue()) { -tracker.mostCurrent.__c.runVoidMethod ("LogImpl","329687811",(RemoteObject.concat(RemoteObject.createImmutable("Mandamos UUC \""),tracker.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((tracker.mostCurrent._subs.runMethod(true,"_fechakmt" /*RemoteObject*/ ,tracker.processBA,(Object)(BA.NumberToString(tracker._flp.runMethod(false,"GetLastKnownLocation").runMethod(true,"getTime"))))))),RemoteObject.createImmutable("|Acc:"),tracker.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("0.2")),(Object)((tracker._flp.runMethod(false,"GetLastKnownLocation").runMethod(true,"getAccuracy")))),RemoteObject.createImmutable("|"),tracker.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("0.8")),(Object)((tracker._flp.runMethod(false,"GetLastKnownLocation").runMethod(true,"getLatitude")))),RemoteObject.createImmutable("|"),tracker.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("0.8")),(Object)((tracker._flp.runMethod(false,"GetLastKnownLocation").runMethod(true,"getLongitude")))),RemoteObject.createImmutable("|Spd:"),tracker.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("0.2")),(Object)((tracker._flp.runMethod(false,"GetLastKnownLocation").runMethod(true,"getSpeed")))),RemoteObject.createImmutable("|"))),tracker.mostCurrent.__c.getField(false,"Colors").runMethod(true,"RGB",(Object)(BA.numberCast(int.class, 255)),(Object)(BA.numberCast(int.class, 112)),(Object)(BA.numberCast(int.class, 35))));}; - BA.debugLineNum = 140;BA.debugLine="Dim coords As String = FLP.GetLastKnownLocation."; -Debug.ShouldStop(2048); -_coords = RemoteObject.concat(tracker._flp.runMethod(false,"GetLastKnownLocation").runMethod(true,"getLatitude"),RemoteObject.createImmutable(","),tracker._flp.runMethod(false,"GetLastKnownLocation").runMethod(true,"getLongitude"),RemoteObject.createImmutable(","),_formatofecha(BA.NumberToString(tracker._flp.runMethod(false,"GetLastKnownLocation").runMethod(true,"getTime"))));Debug.locals.put("coords", _coords);Debug.locals.put("coords", _coords); - }; - BA.debugLineNum = 144;BA.debugLine="End Sub"; -Debug.ShouldStop(32768); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _flp_connectionfailed(RemoteObject _connectionresult1) throws Exception{ -try { - Debug.PushSubsStack("flp_ConnectionFailed (tracker) ","tracker",22,tracker.processBA,tracker.mostCurrent,55); -if (RapidSub.canDelegate("flp_connectionfailed")) { return keymon.lat.medicomed.tracker.remoteMe.runUserSub(false, "tracker","flp_connectionfailed", _connectionresult1);} -Debug.locals.put("ConnectionResult1", _connectionresult1); - BA.debugLineNum = 55;BA.debugLine="Sub flp_ConnectionFailed(ConnectionResult1 As Int)"; -Debug.ShouldStop(4194304); - BA.debugLineNum = 56;BA.debugLine="Log(\"Failed to connect to location provider\")"; -Debug.ShouldStop(8388608); -tracker.mostCurrent.__c.runVoidMethod ("LogImpl","329229057",RemoteObject.createImmutable("Failed to connect to location provider"),0); - BA.debugLineNum = 57;BA.debugLine="End Sub"; -Debug.ShouldStop(16777216); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _flp_connectionsuccess() throws Exception{ -try { - Debug.PushSubsStack("flp_ConnectionSuccess (tracker) ","tracker",22,tracker.processBA,tracker.mostCurrent,50); -if (RapidSub.canDelegate("flp_connectionsuccess")) { return keymon.lat.medicomed.tracker.remoteMe.runUserSub(false, "tracker","flp_connectionsuccess");} - BA.debugLineNum = 50;BA.debugLine="Sub flp_ConnectionSuccess"; -Debug.ShouldStop(131072); - BA.debugLineNum = 53;BA.debugLine="End Sub"; -Debug.ShouldStop(1048576); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _flp_locationchanged(RemoteObject _location1) throws Exception{ -try { - Debug.PushSubsStack("flp_LocationChanged (tracker) ","tracker",22,tracker.processBA,tracker.mostCurrent,154); -if (RapidSub.canDelegate("flp_locationchanged")) { return keymon.lat.medicomed.tracker.remoteMe.runUserSub(false, "tracker","flp_locationchanged", _location1);} -RemoteObject _sdate = RemoteObject.createImmutable(""); -RemoteObject _stime = RemoteObject.createImmutable(""); -RemoteObject _coords = RemoteObject.createImmutable(""); -Debug.locals.put("Location1", _location1); - BA.debugLineNum = 154;BA.debugLine="Sub flp_LocationChanged (Location1 As Location)"; -Debug.ShouldStop(33554432); - BA.debugLineNum = 157;BA.debugLine="B4XPages.MainPage.lat_gps = Location1.Latitude"; -Debug.ShouldStop(268435456); -tracker.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,tracker.processBA).setField ("_lat_gps" /*RemoteObject*/ ,BA.NumberToString(_location1.runMethod(true,"getLatitude"))); - BA.debugLineNum = 158;BA.debugLine="B4XPages.MainPage.lon_gps = Location1.Longitude"; -Debug.ShouldStop(536870912); -tracker.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,tracker.processBA).setField ("_lon_gps" /*RemoteObject*/ ,BA.NumberToString(_location1.runMethod(true,"getLongitude"))); - BA.debugLineNum = 159;BA.debugLine="UUGCoords = Location1"; -Debug.ShouldStop(1073741824); -tracker._uugcoords = _location1; - BA.debugLineNum = 167;BA.debugLine="Dim sDate,sTime As String"; -Debug.ShouldStop(64); -_sdate = RemoteObject.createImmutable("");Debug.locals.put("sDate", _sdate); -_stime = RemoteObject.createImmutable("");Debug.locals.put("sTime", _stime); - BA.debugLineNum = 168;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; -Debug.ShouldStop(128); -tracker.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("MM/dd/yyyy")); - BA.debugLineNum = 169;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -Debug.ShouldStop(256); -_sdate = tracker.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(tracker.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getNow")));Debug.locals.put("sDate", _sdate); - BA.debugLineNum = 170;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -Debug.ShouldStop(512); -_stime = tracker.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"Time",(Object)(tracker.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getNow")));Debug.locals.put("sTime", _stime); - BA.debugLineNum = 171;BA.debugLine="If Not(B4XPages.MainPage.skmt.IsInitialized) Then"; -Debug.ShouldStop(1024); -if (tracker.mostCurrent.__c.runMethod(true,"Not",(Object)(tracker.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,tracker.processBA).getField(false,"_skmt" /*RemoteObject*/ ).runMethod(true,"IsInitialized"))).get().booleanValue()) { -tracker.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,tracker.processBA).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(tracker.mostCurrent._starter._ruta /*RemoteObject*/ ),(Object)(BA.ObjectToString("kmt.db")),(Object)(tracker.mostCurrent.__c.getField(true,"True")));}; - BA.debugLineNum = 172;BA.debugLine="Try"; -Debug.ShouldStop(2048); -try { BA.debugLineNum = 173;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -Debug.ShouldStop(4096); -tracker.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,tracker.processBA).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO HIST_GPS (HGDATE, HGLAT, HGLON) VALUES(?,?,?) ")),(Object)(tracker.mostCurrent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {3},new Object[] {(RemoteObject.concat(_sdate,_stime)),(tracker.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,tracker.processBA).getField(true,"_lat_gps" /*RemoteObject*/ )),(tracker.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,tracker.processBA).getField(true,"_lon_gps" /*RemoteObject*/ ))}))))); - BA.debugLineNum = 174;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FROM"; -Debug.ShouldStop(8192); -tracker.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,tracker.processBA).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery",(Object)(RemoteObject.createImmutable("DELETE FROM HIST_GPS"))); - Debug.CheckDeviceExceptions(); -} - catch (Exception e13) { - BA.rdebugUtils.runVoidMethod("setLastException",tracker.processBA, e13.toString()); BA.debugLineNum = 176;BA.debugLine="LogColor(LastException, Colors.Red)"; -Debug.ShouldStop(32768); -tracker.mostCurrent.__c.runVoidMethod ("LogImpl","329818902",BA.ObjectToString(tracker.mostCurrent.__c.runMethod(false,"LastException",tracker.processBA)),tracker.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - }; - BA.debugLineNum = 179;BA.debugLine="Dim coords As String = Location1.Latitude&\",\"&Loc"; -Debug.ShouldStop(262144); -_coords = RemoteObject.concat(_location1.runMethod(true,"getLatitude"),RemoteObject.createImmutable(","),_location1.runMethod(true,"getLongitude"),RemoteObject.createImmutable(","),_formatofecha(BA.NumberToString(_location1.runMethod(true,"getTime"))));Debug.locals.put("coords", _coords);Debug.locals.put("coords", _coords); - BA.debugLineNum = 184;BA.debugLine="If Location1.Accuracy < 100 Then"; -Debug.ShouldStop(8388608); -if (RemoteObject.solveBoolean("<",_location1.runMethod(true,"getAccuracy"),BA.numberCast(double.class, 100))) { - }; - BA.debugLineNum = 188;BA.debugLine="CallSub2(Starter, \"GPS_LocationChanged\", Location"; -Debug.ShouldStop(134217728); -tracker.mostCurrent.__c.runMethodAndSync(false,"CallSubNew2",tracker.processBA,(Object)((tracker.mostCurrent._starter.getObject())),(Object)(BA.ObjectToString("GPS_LocationChanged")),(Object)((_location1))); - BA.debugLineNum = 192;BA.debugLine="End Sub"; -Debug.ShouldStop(-2147483648); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _formatofecha(RemoteObject _fecha) throws Exception{ -try { - Debug.PushSubsStack("formatoFecha (tracker) ","tracker",22,tracker.processBA,tracker.mostCurrent,210); -if (RapidSub.canDelegate("formatofecha")) { return keymon.lat.medicomed.tracker.remoteMe.runUserSub(false, "tracker","formatofecha", _fecha);} -RemoteObject _origformat = RemoteObject.createImmutable(""); -RemoteObject _lastupdate = RemoteObject.createImmutable(""); -Debug.locals.put("fecha", _fecha); - BA.debugLineNum = 210;BA.debugLine="Sub formatoFecha(fecha As String) As String 'Convi"; -Debug.ShouldStop(131072); - BA.debugLineNum = 212;BA.debugLine="Dim OrigFormat As String = DateTime.DateFormat '"; -Debug.ShouldStop(524288); -_origformat = tracker.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getDateFormat");Debug.locals.put("OrigFormat", _origformat);Debug.locals.put("OrigFormat", _origformat); - BA.debugLineNum = 213;BA.debugLine="DateTime.DateFormat=\"yyMMddHHmmss\""; -Debug.ShouldStop(1048576); -tracker.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",BA.ObjectToString("yyMMddHHmmss")); - BA.debugLineNum = 214;BA.debugLine="Dim lastUpdate As String=DateTime.Date(fecha)"; -Debug.ShouldStop(2097152); -_lastupdate = tracker.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"Date",(Object)(BA.numberCast(long.class, _fecha)));Debug.locals.put("lastUpdate", _lastupdate);Debug.locals.put("lastUpdate", _lastupdate); - BA.debugLineNum = 215;BA.debugLine="DateTime.DateFormat=OrigFormat 'return to orig d"; -Debug.ShouldStop(4194304); -tracker.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"setDateFormat",_origformat); - BA.debugLineNum = 217;BA.debugLine="Return lastUpdate"; -Debug.ShouldStop(16777216); -if (true) return _lastupdate; - BA.debugLineNum = 218;BA.debugLine="End Sub"; -Debug.ShouldStop(33554432); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _process_globals() throws Exception{ - //BA.debugLineNum = 29;BA.debugLine="Sub Process_Globals"; - //BA.debugLineNum = 30;BA.debugLine="Private nid As Int = 51042"; -tracker._nid = BA.numberCast(int.class, 51042); - //BA.debugLineNum = 31;BA.debugLine="Private Tracking As Boolean"; -tracker._tracking = RemoteObject.createImmutable(false); - //BA.debugLineNum = 32;BA.debugLine="Private lock As PhoneWakeState"; -tracker._lock = RemoteObject.createNew ("anywheresoftware.b4a.phone.Phone.PhoneWakeState"); - //BA.debugLineNum = 34;BA.debugLine="Public FLP As FusedLocationProvider"; -tracker._flp = RemoteObject.createNew ("uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper"); - //BA.debugLineNum = 35;BA.debugLine="Dim actualLR As LocationRequest"; -tracker._actuallr = RemoteObject.createNew ("uk.co.martinpearman.b4a.fusedlocationprovider.LocationRequest"); - //BA.debugLineNum = 36;BA.debugLine="Private flpStarted As Boolean"; -tracker._flpstarted = RemoteObject.createImmutable(false); - //BA.debugLineNum = 38;BA.debugLine="Dim UUGCoords As Location 'Ultima Ubicacion Guard"; -tracker._uugcoords = RemoteObject.createNew ("anywheresoftware.b4a.gps.LocationWrapper"); - //BA.debugLineNum = 39;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _revisaflp() throws Exception{ -try { - Debug.PushSubsStack("revisaFLP (tracker) ","tracker",22,tracker.processBA,tracker.mostCurrent,221); -if (RapidSub.canDelegate("revisaflp")) { return keymon.lat.medicomed.tracker.remoteMe.runUserSub(false, "tracker","revisaflp");} -RemoteObject _todobienflp = RemoteObject.createImmutable(false); - BA.debugLineNum = 221;BA.debugLine="Sub revisaFLP 'ignore"; -Debug.ShouldStop(268435456); - BA.debugLineNum = 222;BA.debugLine="LogColor(\"**** **** Revisamos FLP **** ****\", Col"; -Debug.ShouldStop(536870912); -tracker.mostCurrent.__c.runVoidMethod ("LogImpl","330081025",BA.ObjectToString("**** **** Revisamos FLP **** ****"),tracker.mostCurrent.__c.getField(false,"Colors").runMethod(true,"RGB",(Object)(BA.numberCast(int.class, 78)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 227)))); - BA.debugLineNum = 223;BA.debugLine="Private todoBienFLP As Boolean = True"; -Debug.ShouldStop(1073741824); -_todobienflp = tracker.mostCurrent.__c.getField(true,"True");Debug.locals.put("todoBienFLP", _todobienflp);Debug.locals.put("todoBienFLP", _todobienflp); - BA.debugLineNum = 224;BA.debugLine="Try"; -Debug.ShouldStop(-2147483648); -try { BA.debugLineNum = 225;BA.debugLine="If Not(FLP.IsInitialized) Then"; -Debug.ShouldStop(1); -if (tracker.mostCurrent.__c.runMethod(true,"Not",(Object)(tracker._flp.runMethod(true,"IsInitialized"))).get().booleanValue()) { - BA.debugLineNum = 226;BA.debugLine="Subs.log2DB(\"revisaFLP: No esta inicializado .."; -Debug.ShouldStop(2); -tracker.mostCurrent._subs.runVoidMethod ("_log2db" /*RemoteObject*/ ,tracker.processBA,(Object)(RemoteObject.createImmutable("revisaFLP: No esta inicializado ... 'Reinicializando FLP'"))); - BA.debugLineNum = 227;BA.debugLine="FLP.Initialize(\"flp\")"; -Debug.ShouldStop(4); -tracker._flp.runVoidMethod ("Initialize",tracker.processBA,(Object)(RemoteObject.createImmutable("flp"))); - BA.debugLineNum = 228;BA.debugLine="todoBienFLP = False"; -Debug.ShouldStop(8); -_todobienflp = tracker.mostCurrent.__c.getField(true,"False");Debug.locals.put("todoBienFLP", _todobienflp); - }; - Debug.CheckDeviceExceptions(); -} - catch (Exception e10) { - BA.rdebugUtils.runVoidMethod("setLastException",tracker.processBA, e10.toString()); BA.debugLineNum = 231;BA.debugLine="LogColor(\"If Not(Tracker.FLP.IsInitialized) -->"; -Debug.ShouldStop(64); -tracker.mostCurrent.__c.runVoidMethod ("LogImpl","330081034",RemoteObject.concat(RemoteObject.createImmutable("If Not(Tracker.FLP.IsInitialized) --> "),tracker.mostCurrent.__c.runMethod(false,"LastException",tracker.processBA)),tracker.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - }; - BA.debugLineNum = 233;BA.debugLine="Try"; -Debug.ShouldStop(256); -try { BA.debugLineNum = 234;BA.debugLine="If FLP.IsInitialized Then"; -Debug.ShouldStop(512); -if (tracker._flp.runMethod(true,"IsInitialized").get().booleanValue()) { - BA.debugLineNum = 235;BA.debugLine="Try"; -Debug.ShouldStop(1024); -try { BA.debugLineNum = 236;BA.debugLine="If Not(FLP.IsConnected) Then"; -Debug.ShouldStop(2048); -if (tracker.mostCurrent.__c.runMethod(true,"Not",(Object)(tracker._flp.runMethod(true,"IsConnected"))).get().booleanValue()) { - BA.debugLineNum = 237;BA.debugLine="Subs.log2DB(\"revisaFLP: No esta conectado ..."; -Debug.ShouldStop(4096); -tracker.mostCurrent._subs.runVoidMethod ("_log2db" /*RemoteObject*/ ,tracker.processBA,(Object)(RemoteObject.createImmutable("revisaFLP: No esta conectado ... 'Reconectando FLP'"))); - BA.debugLineNum = 239;BA.debugLine="StartFLP"; -Debug.ShouldStop(16384); -_startflp(); - BA.debugLineNum = 240;BA.debugLine="todoBienFLP = False"; -Debug.ShouldStop(32768); -_todobienflp = tracker.mostCurrent.__c.getField(true,"False");Debug.locals.put("todoBienFLP", _todobienflp); - }; - Debug.CheckDeviceExceptions(); -} - catch (Exception e21) { - BA.rdebugUtils.runVoidMethod("setLastException",tracker.processBA, e21.toString()); BA.debugLineNum = 243;BA.debugLine="LogColor(\"If Not(Tracker.FLP.IsConnected) -->"; -Debug.ShouldStop(262144); -tracker.mostCurrent.__c.runVoidMethod ("LogImpl","330081046",RemoteObject.concat(RemoteObject.createImmutable("If Not(Tracker.FLP.IsConnected) --> "),tracker.mostCurrent.__c.runMethod(false,"LastException",tracker.processBA)),tracker.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - }; - BA.debugLineNum = 245;BA.debugLine="Try"; -Debug.ShouldStop(1048576); -try { BA.debugLineNum = 246;BA.debugLine="If FLP.IsConnected And _ FLP.GetLastKnown"; -Debug.ShouldStop(2097152); -if (RemoteObject.solveBoolean(".",tracker._flp.runMethod(true,"IsConnected")) && RemoteObject.solveBoolean(".",tracker._flp.runMethod(false,"GetLastKnownLocation").runMethod(true,"IsInitialized")) && RemoteObject.solveBoolean(">",tracker._flp.runMethod(false,"GetLastKnownLocation").runMethod(true,"DistanceTo",(Object)((tracker._uugcoords.getObject()))),BA.numberCast(double.class, 500))) { - BA.debugLineNum = 249;BA.debugLine="Subs.log2DB(\"revisaFLP: 'No se esta actualiza"; -Debug.ShouldStop(16777216); -tracker.mostCurrent._subs.runVoidMethod ("_log2db" /*RemoteObject*/ ,tracker.processBA,(Object)(RemoteObject.createImmutable("revisaFLP: 'No se esta actualizando, lo reiniciamos ...'"))); - BA.debugLineNum = 250;BA.debugLine="StartService(Me)"; -Debug.ShouldStop(33554432); -tracker.mostCurrent.__c.runVoidMethod ("StartService",tracker.processBA,(Object)(tracker.getObject())); - BA.debugLineNum = 251;BA.debugLine="todoBienFLP = False"; -Debug.ShouldStop(67108864); -_todobienflp = tracker.mostCurrent.__c.getField(true,"False");Debug.locals.put("todoBienFLP", _todobienflp); - }; - Debug.CheckDeviceExceptions(); -} - catch (Exception e30) { - BA.rdebugUtils.runVoidMethod("setLastException",tracker.processBA, e30.toString()); BA.debugLineNum = 254;BA.debugLine="LogColor(\"If FLP.IsConnectctd and FLP.getLKL.I"; -Debug.ShouldStop(536870912); -tracker.mostCurrent.__c.runVoidMethod ("LogImpl","330081057",RemoteObject.concat(RemoteObject.createImmutable("If FLP.IsConnectctd and FLP.getLKL.IsInitialized --> "),tracker.mostCurrent.__c.runMethod(false,"LastException",tracker.processBA)),tracker.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - }; - }; - BA.debugLineNum = 257;BA.debugLine="If todoBienFLP Then LogColor(\" +++ +++ Sin error"; -Debug.ShouldStop(1); -if (_todobienflp.get().booleanValue()) { -tracker.mostCurrent.__c.runVoidMethod ("LogImpl","330081060",BA.ObjectToString(" +++ +++ Sin errores en FLP"),tracker.mostCurrent.__c.getField(false,"Colors").getField(true,"Green"));}; - Debug.CheckDeviceExceptions(); -} - catch (Exception e35) { - BA.rdebugUtils.runVoidMethod("setLastException",tracker.processBA, e35.toString()); BA.debugLineNum = 259;BA.debugLine="LogColor(\"If Tracker.FLP.IsInitialized --> \"&Las"; -Debug.ShouldStop(4); -tracker.mostCurrent.__c.runVoidMethod ("LogImpl","330081062",RemoteObject.concat(RemoteObject.createImmutable("If Tracker.FLP.IsInitialized --> "),tracker.mostCurrent.__c.runMethod(false,"LastException",tracker.processBA)),tracker.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - }; - BA.debugLineNum = 262;BA.debugLine="End Sub"; -Debug.ShouldStop(32); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _revisauug() throws Exception{ -try { - Debug.PushSubsStack("revisaUUG (tracker) ","tracker",22,tracker.processBA,tracker.mostCurrent,266); -if (RapidSub.canDelegate("revisauug")) { return keymon.lat.medicomed.tracker.remoteMe.runUserSub(false, "tracker","revisauug");} -RemoteObject _daa = RemoteObject.createImmutable(0); - BA.debugLineNum = 266;BA.debugLine="Sub revisaUUG 'ignore"; -Debug.ShouldStop(512); - BA.debugLineNum = 267;BA.debugLine="Try"; -Debug.ShouldStop(1024); -try { BA.debugLineNum = 269;BA.debugLine="If FLP.IsInitialized And FLP.IsConnected Then"; -Debug.ShouldStop(4096); -if (RemoteObject.solveBoolean(".",tracker._flp.runMethod(true,"IsInitialized")) && RemoteObject.solveBoolean(".",tracker._flp.runMethod(true,"IsConnected"))) { - BA.debugLineNum = 270;BA.debugLine="Try"; -Debug.ShouldStop(8192); -try { BA.debugLineNum = 271;BA.debugLine="If FLP.GetLastKnownLocation.IsInitialized Then"; -Debug.ShouldStop(16384); -if (tracker._flp.runMethod(false,"GetLastKnownLocation").runMethod(true,"IsInitialized").get().booleanValue()) { - BA.debugLineNum = 273;BA.debugLine="Dim daa As Int = UUGCoords.DistanceTo(FLP.Get"; -Debug.ShouldStop(65536); -_daa = BA.numberCast(int.class, tracker._uugcoords.runMethod(true,"DistanceTo",(Object)((tracker._flp.runMethod(false,"GetLastKnownLocation").getObject()))));Debug.locals.put("daa", _daa);Debug.locals.put("daa", _daa); - BA.debugLineNum = 274;BA.debugLine="If Starter.Logger Then LogColor($\"**** UUC \"$"; -Debug.ShouldStop(131072); -if (tracker.mostCurrent._starter._logger /*RemoteObject*/ .get().booleanValue()) { -tracker.mostCurrent.__c.runVoidMethod ("LogImpl","330146568",(RemoteObject.concat(RemoteObject.createImmutable("**** UUC \""),tracker.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("")),(Object)((tracker.mostCurrent._subs.runMethod(true,"_fechakmt" /*RemoteObject*/ ,tracker.processBA,(Object)(BA.NumberToString(tracker._flp.runMethod(false,"GetLastKnownLocation").runMethod(true,"getTime"))))))),RemoteObject.createImmutable("|"),tracker.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("0.2")),(Object)((tracker._flp.runMethod(false,"GetLastKnownLocation").runMethod(true,"getAccuracy")))),RemoteObject.createImmutable("|"),tracker.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("0.8")),(Object)((tracker._flp.runMethod(false,"GetLastKnownLocation").runMethod(true,"getLatitude")))),RemoteObject.createImmutable("|"),tracker.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("0.8")),(Object)((tracker._flp.runMethod(false,"GetLastKnownLocation").runMethod(true,"getLongitude")))),RemoteObject.createImmutable("|"),tracker.mostCurrent.__c.runMethod(true,"SmartStringFormatter",(Object)(BA.ObjectToString("0.2")),(Object)((tracker._flp.runMethod(false,"GetLastKnownLocation").runMethod(true,"getSpeed")))),RemoteObject.createImmutable("|"))),tracker.mostCurrent.__c.getField(false,"Colors").runMethod(true,"RGB",(Object)(BA.numberCast(int.class, 255)),(Object)(BA.numberCast(int.class, 112)),(Object)(BA.numberCast(int.class, 35))));}; - BA.debugLineNum = 275;BA.debugLine="If daa > 40 And FLP.GetLastKnownLocation.Accu"; -Debug.ShouldStop(262144); -if (RemoteObject.solveBoolean(">",_daa,BA.numberCast(double.class, 40)) && RemoteObject.solveBoolean("<",tracker._flp.runMethod(false,"GetLastKnownLocation").runMethod(true,"getAccuracy"),BA.numberCast(double.class, 35))) { - BA.debugLineNum = 276;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -Debug.ShouldStop(524288); -tracker.mostCurrent._b4xpages.runMethod(false,"_mainpage" /*RemoteObject*/ ,tracker.processBA).getField(false,"_skmt" /*RemoteObject*/ ).runVoidMethod ("ExecNonQuery2",(Object)(BA.ObjectToString("INSERT INTO RUTA_GPS(fecha, lat, lon) VALUES (?,?,?)")),(Object)(tracker.mostCurrent.__c.runMethod(false, "ArrayToList", (Object)(RemoteObject.createNewArray("Object",new int[] {3},new Object[] {(tracker.mostCurrent._subs.runMethod(true,"_fechakmt" /*RemoteObject*/ ,tracker.processBA,(Object)(BA.NumberToString(tracker._flp.runMethod(false,"GetLastKnownLocation").runMethod(true,"getTime"))))),(tracker._flp.runMethod(false,"GetLastKnownLocation").runMethod(true,"getLatitude")),(tracker._flp.runMethod(false,"GetLastKnownLocation").runMethod(true,"getLongitude"))}))))); - BA.debugLineNum = 277;BA.debugLine="If Starter.Logger Then Log(\"++++ Distancia a"; -Debug.ShouldStop(1048576); -if (tracker.mostCurrent._starter._logger /*RemoteObject*/ .get().booleanValue()) { -tracker.mostCurrent.__c.runVoidMethod ("LogImpl","330146571",RemoteObject.concat(RemoteObject.createImmutable("++++ Distancia a anterior="),_daa,RemoteObject.createImmutable("|"),RemoteObject.createImmutable("Precision="),tracker._flp.runMethod(false,"GetLastKnownLocation").runMethod(true,"getAccuracy")),0);}; - }; - BA.debugLineNum = 279;BA.debugLine="UUGCoords = FLP.GetLastKnownLocation"; -Debug.ShouldStop(4194304); -tracker._uugcoords = tracker._flp.runMethod(false,"GetLastKnownLocation"); - }; - Debug.CheckDeviceExceptions(); -} - catch (Exception e14) { - BA.rdebugUtils.runVoidMethod("setLastException",tracker.processBA, e14.toString()); BA.debugLineNum = 282;BA.debugLine="LogColor(\"FLP.GetLastKnownLocation.IsInitializ"; -Debug.ShouldStop(33554432); -tracker.mostCurrent.__c.runVoidMethod ("LogImpl","330146576",RemoteObject.concat(RemoteObject.createImmutable("FLP.GetLastKnownLocation.IsInitialized --> "),tracker.mostCurrent.__c.runMethod(false,"LastException",tracker.processBA)),tracker.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - }; - }else { - BA.debugLineNum = 285;BA.debugLine="Log(\"StartFLP\")"; -Debug.ShouldStop(268435456); -tracker.mostCurrent.__c.runVoidMethod ("LogImpl","330146579",RemoteObject.createImmutable("StartFLP"),0); - BA.debugLineNum = 286;BA.debugLine="StartFLP"; -Debug.ShouldStop(536870912); -_startflp(); - }; - Debug.CheckDeviceExceptions(); -} - catch (Exception e21) { - BA.rdebugUtils.runVoidMethod("setLastException",tracker.processBA, e21.toString()); BA.debugLineNum = 289;BA.debugLine="LogColor(\"If FLP.IsInitialized --> \"&LastExcepti"; -Debug.ShouldStop(1); -tracker.mostCurrent.__c.runVoidMethod ("LogImpl","330146583",RemoteObject.concat(RemoteObject.createImmutable("If FLP.IsInitialized --> "),tracker.mostCurrent.__c.runMethod(false,"LastException",tracker.processBA)),tracker.mostCurrent.__c.getField(false,"Colors").getField(true,"Red")); - }; - BA.debugLineNum = 291;BA.debugLine="End Sub"; -Debug.ShouldStop(4); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _service_create() throws Exception{ -try { - Debug.PushSubsStack("Service_Create (tracker) ","tracker",22,tracker.processBA,tracker.mostCurrent,41); -if (RapidSub.canDelegate("service_create")) { return keymon.lat.medicomed.tracker.remoteMe.runUserSub(false, "tracker","service_create");} - BA.debugLineNum = 41;BA.debugLine="Sub Service_Create"; -Debug.ShouldStop(256); - BA.debugLineNum = 42;BA.debugLine="Service.AutomaticForegroundMode = Service.AUTOMAT"; -Debug.ShouldStop(512); -tracker.mostCurrent._service.setField ("AutomaticForegroundMode",tracker.mostCurrent._service.getField(true,"AUTOMATIC_FOREGROUND_NEVER")); - BA.debugLineNum = 44;BA.debugLine="FLP.Initialize(\"flp\")"; -Debug.ShouldStop(2048); -tracker._flp.runVoidMethod ("Initialize",tracker.processBA,(Object)(RemoteObject.createImmutable("flp"))); - BA.debugLineNum = 45;BA.debugLine="FLP.Connect"; -Debug.ShouldStop(4096); -tracker._flp.runVoidMethod ("Connect"); - BA.debugLineNum = 46;BA.debugLine="lock.PartialLock"; -Debug.ShouldStop(8192); -tracker._lock.runVoidMethod ("PartialLock",tracker.processBA); - BA.debugLineNum = 47;BA.debugLine="StartFLP"; -Debug.ShouldStop(16384); -_startflp(); - BA.debugLineNum = 48;BA.debugLine="End Sub"; -Debug.ShouldStop(32768); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _service_destroy() throws Exception{ -try { - Debug.PushSubsStack("Service_Destroy (tracker) ","tracker",22,tracker.processBA,tracker.mostCurrent,202); -if (RapidSub.canDelegate("service_destroy")) { return keymon.lat.medicomed.tracker.remoteMe.runUserSub(false, "tracker","service_destroy");} - BA.debugLineNum = 202;BA.debugLine="Sub Service_Destroy"; -Debug.ShouldStop(512); - BA.debugLineNum = 203;BA.debugLine="If Tracking Then"; -Debug.ShouldStop(1024); -if (tracker._tracking.get().booleanValue()) { - BA.debugLineNum = 204;BA.debugLine="StopFLP"; -Debug.ShouldStop(2048); -_stopflp(); - }; - BA.debugLineNum = 206;BA.debugLine="Tracking = False"; -Debug.ShouldStop(8192); -tracker._tracking = tracker.mostCurrent.__c.getField(true,"False"); - BA.debugLineNum = 207;BA.debugLine="lock.ReleasePartialLock"; -Debug.ShouldStop(16384); -tracker._lock.runVoidMethod ("ReleasePartialLock"); - BA.debugLineNum = 208;BA.debugLine="End Sub"; -Debug.ShouldStop(32768); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _service_start(RemoteObject _startingintent) throws Exception{ -try { - Debug.PushSubsStack("Service_Start (tracker) ","tracker",22,tracker.processBA,tracker.mostCurrent,59); -if (RapidSub.canDelegate("service_start")) { return keymon.lat.medicomed.tracker.remoteMe.runUserSub(false, "tracker","service_start", _startingintent);} -Debug.locals.put("StartingIntent", _startingintent); - BA.debugLineNum = 59;BA.debugLine="Sub Service_Start (StartingIntent As Intent)"; -Debug.ShouldStop(67108864); - BA.debugLineNum = 61;BA.debugLine="Service.StopAutomaticForeground"; -Debug.ShouldStop(268435456); -tracker.mostCurrent._service.runVoidMethod ("StopAutomaticForeground"); - BA.debugLineNum = 62;BA.debugLine="Service.StartForeground(nid, CreateNotification(\""; -Debug.ShouldStop(536870912); -tracker.mostCurrent._service.runVoidMethod ("StartForeground",(Object)(tracker._nid),(Object)((_createnotification(RemoteObject.createImmutable("...")).getObject()))); - BA.debugLineNum = 63;BA.debugLine="Track"; -Debug.ShouldStop(1073741824); -_track(); - BA.debugLineNum = 64;BA.debugLine="StartServiceAt(Me, DateTime.Now + 5 * DateTime.Ti"; -Debug.ShouldStop(-2147483648); -tracker.mostCurrent.__c.runVoidMethod ("StartServiceAt",tracker.processBA,(Object)(tracker.getObject()),(Object)(RemoteObject.solve(new RemoteObject[] {tracker.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getNow"),RemoteObject.createImmutable(5),tracker.mostCurrent.__c.getField(false,"DateTime").getField(true,"TicksPerMinute")}, "+*",1, 2)),(Object)(tracker.mostCurrent.__c.getField(true,"True"))); - BA.debugLineNum = 65;BA.debugLine="FLP.GetLastKnownLocation.Initialize"; -Debug.ShouldStop(1); -tracker._flp.runMethod(false,"GetLastKnownLocation").runVoidMethod ("Initialize"); - BA.debugLineNum = 66;BA.debugLine="End Sub"; -Debug.ShouldStop(2); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static void _startflp() throws Exception{ -try { - Debug.PushSubsStack("StartFLP (tracker) ","tracker",22,tracker.processBA,tracker.mostCurrent,84); -if (RapidSub.canDelegate("startflp")) { keymon.lat.medicomed.tracker.remoteMe.runUserSub(false, "tracker","startflp"); return;} -ResumableSub_StartFLP rsub = new ResumableSub_StartFLP(null); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_StartFLP extends BA.ResumableSub { -public ResumableSub_StartFLP(keymon.lat.medicomed.tracker parent) { -this.parent = parent; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -keymon.lat.medicomed.tracker parent; - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("StartFLP (tracker) ","tracker",22,tracker.processBA,tracker.mostCurrent,84); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; - BA.debugLineNum = 86;BA.debugLine="Do While FLP.IsConnected = False"; -Debug.ShouldStop(2097152); -if (true) break; - -case 1: -//do while -this.state = 4; -while (RemoteObject.solveBoolean("=",parent._flp.runMethod(true,"IsConnected"),parent.mostCurrent.__c.getField(true,"False"))) { -this.state = 3; -if (true) break; -} -if (true) break; - -case 3: -//C -this.state = 1; - BA.debugLineNum = 87;BA.debugLine="Sleep(500)"; -Debug.ShouldStop(4194304); -parent.mostCurrent.__c.runVoidMethod ("Sleep",tracker.processBA,anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "tracker", "startflp"),BA.numberCast(int.class, 500)); -this.state = 5; -return; -case 5: -//C -this.state = 1; -; - if (true) break; - -case 4: -//C -this.state = -1; -; - BA.debugLineNum = 92;BA.debugLine="FLP.RequestLocationUpdates(CreateLocationRequest)"; -Debug.ShouldStop(134217728); -parent._flp.runVoidMethod ("RequestLocationUpdates",(Object)((_createlocationrequest().getObject()))); - BA.debugLineNum = 95;BA.debugLine="flpStarted = True"; -Debug.ShouldStop(1073741824); -parent._flpstarted = parent.mostCurrent.__c.getField(true,"True"); - BA.debugLineNum = 97;BA.debugLine="End Sub"; -Debug.ShouldStop(1); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static void _startflpsmall() throws Exception{ -try { - Debug.PushSubsStack("StartFLPSmall (tracker) ","tracker",22,tracker.processBA,tracker.mostCurrent,99); -if (RapidSub.canDelegate("startflpsmall")) { keymon.lat.medicomed.tracker.remoteMe.runUserSub(false, "tracker","startflpsmall"); return;} -ResumableSub_StartFLPSmall rsub = new ResumableSub_StartFLPSmall(null); -rsub.resume(null, null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static class ResumableSub_StartFLPSmall extends BA.ResumableSub { -public ResumableSub_StartFLPSmall(keymon.lat.medicomed.tracker parent) { -this.parent = parent; -} -java.util.LinkedHashMap rsLocals = new java.util.LinkedHashMap(); -keymon.lat.medicomed.tracker parent; - -@Override -public void resume(BA ba, RemoteObject result) throws Exception{ -try { - Debug.PushSubsStack("StartFLPSmall (tracker) ","tracker",22,tracker.processBA,tracker.mostCurrent,99); -Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; - BA.debugLineNum = 101;BA.debugLine="Do While FLP.IsConnected = False"; -Debug.ShouldStop(16); -if (true) break; - -case 1: -//do while -this.state = 4; -while (RemoteObject.solveBoolean("=",parent._flp.runMethod(true,"IsConnected"),parent.mostCurrent.__c.getField(true,"False"))) { -this.state = 3; -if (true) break; -} -if (true) break; - -case 3: -//C -this.state = 1; - BA.debugLineNum = 102;BA.debugLine="Sleep(500)"; -Debug.ShouldStop(32); -parent.mostCurrent.__c.runVoidMethod ("Sleep",tracker.processBA,anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "tracker", "startflpsmall"),BA.numberCast(int.class, 500)); -this.state = 5; -return; -case 5: -//C -this.state = 1; -; - BA.debugLineNum = 103;BA.debugLine="Log(\"sleeping\")"; -Debug.ShouldStop(64); -parent.mostCurrent.__c.runVoidMethod ("LogImpl","329491204",RemoteObject.createImmutable("sleeping"),0); - if (true) break; - -case 4: -//C -this.state = -1; -; - BA.debugLineNum = 105;BA.debugLine="dameUltimaUbicacionConocida 'Regresamos ultima ub"; -Debug.ShouldStop(256); -_dameultimaubicacionconocida(); - BA.debugLineNum = 106;BA.debugLine="FLP.RequestLocationUpdates(CreateLocationRequestS"; -Debug.ShouldStop(512); -parent._flp.runVoidMethod ("RequestLocationUpdates",(Object)((_createlocationrequestsmalld().getObject()))); - BA.debugLineNum = 109;BA.debugLine="End Sub"; -Debug.ShouldStop(4096); -if (true) break; - - } - } - } -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} -public static RemoteObject _stopflp() throws Exception{ -try { - Debug.PushSubsStack("StopFLP (tracker) ","tracker",22,tracker.processBA,tracker.mostCurrent,146); -if (RapidSub.canDelegate("stopflp")) { return keymon.lat.medicomed.tracker.remoteMe.runUserSub(false, "tracker","stopflp");} - BA.debugLineNum = 146;BA.debugLine="Public Sub StopFLP"; -Debug.ShouldStop(131072); - BA.debugLineNum = 148;BA.debugLine="If flpStarted Then"; -Debug.ShouldStop(524288); -if (tracker._flpstarted.get().booleanValue()) { - BA.debugLineNum = 149;BA.debugLine="FLP.RemoveLocationUpdates 'Eliminamos todas las"; -Debug.ShouldStop(1048576); -tracker._flp.runVoidMethod ("RemoveLocationUpdates"); - BA.debugLineNum = 150;BA.debugLine="flpStarted = False"; -Debug.ShouldStop(2097152); -tracker._flpstarted = tracker.mostCurrent.__c.getField(true,"False"); - }; - BA.debugLineNum = 152;BA.debugLine="End Sub"; -Debug.ShouldStop(8388608); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _track() throws Exception{ -try { - Debug.PushSubsStack("Track (tracker) ","tracker",22,tracker.processBA,tracker.mostCurrent,68); -if (RapidSub.canDelegate("track")) { return keymon.lat.medicomed.tracker.remoteMe.runUserSub(false, "tracker","track");} - BA.debugLineNum = 68;BA.debugLine="Public Sub Track"; -Debug.ShouldStop(8); - BA.debugLineNum = 70;BA.debugLine="If Not(FLP.IsInitialized) Then FLP.Initialize(\"fl"; -Debug.ShouldStop(32); -if (tracker.mostCurrent.__c.runMethod(true,"Not",(Object)(tracker._flp.runMethod(true,"IsInitialized"))).get().booleanValue()) { -tracker._flp.runVoidMethod ("Initialize",tracker.processBA,(Object)(RemoteObject.createImmutable("flp")));}; - BA.debugLineNum = 71;BA.debugLine="If Not(FLP.IsConnected) Then FLP.Connect"; -Debug.ShouldStop(64); -if (tracker.mostCurrent.__c.runMethod(true,"Not",(Object)(tracker._flp.runMethod(true,"IsConnected"))).get().booleanValue()) { -tracker._flp.runVoidMethod ("Connect");}; - BA.debugLineNum = 72;BA.debugLine="If Tracking And actualLR.IsInitialized Then"; -Debug.ShouldStop(128); -if (RemoteObject.solveBoolean(".",tracker._tracking) && RemoteObject.solveBoolean(".",tracker._actuallr.runMethod(true,"IsInitialized"))) { - BA.debugLineNum = 74;BA.debugLine="Return 'Si ya estamos \"rastreando\" no hacemos na"; -Debug.ShouldStop(512); -if (true) return RemoteObject.createImmutable(""); - }; - BA.debugLineNum = 76;BA.debugLine="If Starter.rp.Check(Starter.rp.PERMISSION_ACCESS_"; -Debug.ShouldStop(2048); -if (RemoteObject.solveBoolean("=",tracker.mostCurrent._starter._rp /*RemoteObject*/ .runMethod(true,"Check",(Object)(tracker.mostCurrent._starter._rp /*RemoteObject*/ .getField(true,"PERMISSION_ACCESS_FINE_LOCATION"))),tracker.mostCurrent.__c.getField(true,"False"))) { - BA.debugLineNum = 77;BA.debugLine="Log(\"No permission\")"; -Debug.ShouldStop(4096); -tracker.mostCurrent.__c.runVoidMethod ("LogImpl","329360137",RemoteObject.createImmutable("No permission"),0); - BA.debugLineNum = 78;BA.debugLine="Return"; -Debug.ShouldStop(8192); -if (true) return RemoteObject.createImmutable(""); - }; - BA.debugLineNum = 80;BA.debugLine="StartFLP 'Iniciamos FusedLocationProvider"; -Debug.ShouldStop(32768); -_startflp(); - BA.debugLineNum = 81;BA.debugLine="Tracking = True"; -Debug.ShouldStop(65536); -tracker._tracking = tracker.mostCurrent.__c.getField(true,"True"); - BA.debugLineNum = 82;BA.debugLine="End Sub"; -Debug.ShouldStop(131072); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/xuiviewsutils.java b/B4A/Objects/shell/src/keymon/lat/medicomed/xuiviewsutils.java deleted file mode 100644 index f6660a0..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/xuiviewsutils.java +++ /dev/null @@ -1,64 +0,0 @@ - -package keymon.lat.medicomed; - -import java.io.IOException; -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.PCBA; -import anywheresoftware.b4a.pc.RDebug; -import anywheresoftware.b4a.pc.RemoteObject; -import anywheresoftware.b4a.pc.RDebug.IRemote; -import anywheresoftware.b4a.pc.Debug; -import anywheresoftware.b4a.pc.B4XTypes.B4XClass; -import anywheresoftware.b4a.pc.B4XTypes.DeviceClass; - -public class xuiviewsutils implements IRemote{ - public static xuiviewsutils mostCurrent; - public static RemoteObject processBA; - public static boolean processGlobalsRun; - public static RemoteObject myClass; - public static RemoteObject remoteMe; - public xuiviewsutils() { - mostCurrent = this; - } - public RemoteObject getRemoteMe() { - return remoteMe; - } - -public boolean isSingleton() { - return true; - } - private static PCBA pcBA = new PCBA(null, xuiviewsutils.class); - static { - mostCurrent = new xuiviewsutils(); - remoteMe = RemoteObject.declareNull("keymon.lat.medicomed.xuiviewsutils"); - anywheresoftware.b4a.pc.RapidSub.moduleToObject.put(new B4XClass("xuiviewsutils"), "keymon.lat.medicomed.xuiviewsutils"); - RDebug.INSTANCE.eventTargets.put(new DeviceClass("keymon.lat.medicomed.xuiviewsutils"), new java.lang.ref.WeakReference (pcBA)); - } - - public static RemoteObject runMethod(boolean notUsed, String method, Object... args) throws Exception{ - return (RemoteObject) pcBA.raiseEvent(method.substring(1), args); - } - public static void runVoidMethod(String method, Object... args) throws Exception{ - runMethod(false, method, args); - } - public PCBA create(Object[] args) throws ClassNotFoundException{ - throw new RuntimeException("CREATE is not supported."); - } -public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common"); -public static RemoteObject _utilsinitialized = RemoteObject.createImmutable(false); -public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); -public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils"); -public static keymon.lat.medicomed.main _main = null; -public static keymon.lat.medicomed.starter _starter = null; -public static keymon.lat.medicomed.subs _subs = null; -public static keymon.lat.medicomed.appupdater _appupdater = null; -public static keymon.lat.medicomed.mapa_rutas _mapa_rutas = null; -public static keymon.lat.medicomed.tracker _tracker = null; -public static keymon.lat.medicomed.newinst2 _newinst2 = null; -public static keymon.lat.medicomed.b4xpages _b4xpages = null; -public static keymon.lat.medicomed.b4xcollections _b4xcollections = null; -public static keymon.lat.medicomed.httputils2service _httputils2service = null; - public Object[] GetGlobals() { - return new Object[] {"appUpdater",Debug.moduleToString(keymon.lat.medicomed.appupdater.class),"B4XCollections",Debug.moduleToString(keymon.lat.medicomed.b4xcollections.class),"B4XPages",Debug.moduleToString(keymon.lat.medicomed.b4xpages.class),"DateUtils",xuiviewsutils.mostCurrent._dateutils,"HttpUtils2Service",Debug.moduleToString(keymon.lat.medicomed.httputils2service.class),"Main",Debug.moduleToString(keymon.lat.medicomed.main.class),"MAPA_RUTAS",Debug.moduleToString(keymon.lat.medicomed.mapa_rutas.class),"newinst2",Debug.moduleToString(keymon.lat.medicomed.newinst2.class),"Starter",Debug.moduleToString(keymon.lat.medicomed.starter.class),"Subs",Debug.moduleToString(keymon.lat.medicomed.subs.class),"Tracker",Debug.moduleToString(keymon.lat.medicomed.tracker.class),"UtilsInitialized",xuiviewsutils._utilsinitialized,"xui",xuiviewsutils._xui}; -} -} \ No newline at end of file diff --git a/B4A/Objects/shell/src/keymon/lat/medicomed/xuiviewsutils_subs_0.java b/B4A/Objects/shell/src/keymon/lat/medicomed/xuiviewsutils_subs_0.java deleted file mode 100644 index 14b96dc..0000000 --- a/B4A/Objects/shell/src/keymon/lat/medicomed/xuiviewsutils_subs_0.java +++ /dev/null @@ -1,275 +0,0 @@ -package keymon.lat.medicomed; - -import anywheresoftware.b4a.BA; -import anywheresoftware.b4a.pc.*; - -public class xuiviewsutils_subs_0 { - - -public static RemoteObject _addstubtoclvifneeded(RemoteObject _ba,RemoteObject _customlistview1,RemoteObject _color) throws Exception{ -try { - Debug.PushSubsStack("AddStubToCLVIfNeeded (xuiviewsutils) ","xuiviewsutils",62,_ba,xuiviewsutils.mostCurrent,34); -if (RapidSub.canDelegate("addstubtoclvifneeded")) { return keymon.lat.medicomed.xuiviewsutils.remoteMe.runUserSub(false, "xuiviewsutils","addstubtoclvifneeded", _ba, _customlistview1, _color);} -RemoteObject _lastitem = RemoteObject.declareNull("b4a.example3.customlistview._clvitem"); -RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -RemoteObject _height = RemoteObject.createImmutable(0); -; -Debug.locals.put("CustomListView1", _customlistview1); -Debug.locals.put("Color", _color); - BA.debugLineNum = 34;BA.debugLine="Public Sub AddStubToCLVIfNeeded(CustomListView1 As"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 35;BA.debugLine="If CustomListView1.Size = 0 Then Return"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("=",_customlistview1.runMethod(true,"_getsize"),BA.numberCast(double.class, 0))) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 36;BA.debugLine="Dim LastItem As CLVItem = CustomListView1.GetRawL"; -Debug.JustUpdateDeviceLine(); -_lastitem = _customlistview1.runMethod(false,"_getrawlistitem",(Object)(RemoteObject.solve(new RemoteObject[] {_customlistview1.runMethod(true,"_getsize"),RemoteObject.createImmutable(1)}, "-",1, 1)));Debug.locals.put("LastItem", _lastitem);Debug.locals.put("LastItem", _lastitem); - BA.debugLineNum = 37;BA.debugLine="If LastItem.Offset + LastItem.Panel.Height < Cust"; -Debug.JustUpdateDeviceLine(); -if (RemoteObject.solveBoolean("<",RemoteObject.solve(new RemoteObject[] {_lastitem.getField(true,"Offset"),_lastitem.getField(false,"Panel").runMethod(true,"getHeight")}, "+",1, 1),BA.numberCast(double.class, _customlistview1.runMethod(false,"_asview").runMethod(true,"getHeight")))) { - BA.debugLineNum = 39;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"stub\")"; -Debug.JustUpdateDeviceLine(); -_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_p = xuiviewsutils._xui.runMethod(false,"CreatePanel",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba),(Object)(RemoteObject.createImmutable("stub")));Debug.locals.put("p", _p);Debug.locals.put("p", _p); - BA.debugLineNum = 40;BA.debugLine="p.Color = Color"; -Debug.JustUpdateDeviceLine(); -_p.runMethod(true,"setColor",_color); - BA.debugLineNum = 41;BA.debugLine="Dim Height As Int = CustomListView1.AsView.Heigh"; -Debug.JustUpdateDeviceLine(); -_height = RemoteObject.solve(new RemoteObject[] {_customlistview1.runMethod(false,"_asview").runMethod(true,"getHeight"),_lastitem.getField(true,"Offset"),_lastitem.getField(false,"Panel").runMethod(true,"getHeight"),xuiviewsutils.mostCurrent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 3)))}, "---",3, 1);Debug.locals.put("Height", _height);Debug.locals.put("Height", _height); - BA.debugLineNum = 42;BA.debugLine="If xui.IsB4J Then Height = Height + 5"; -Debug.JustUpdateDeviceLine(); -if (xuiviewsutils._xui.runMethod(true,"getIsB4J").get().booleanValue()) { -_height = RemoteObject.solve(new RemoteObject[] {_height,RemoteObject.createImmutable(5)}, "+",1, 1);Debug.locals.put("Height", _height);}; - BA.debugLineNum = 43;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, CustomListView1.AsV"; -Debug.JustUpdateDeviceLine(); -_p.runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(_customlistview1.runMethod(false,"_asview").runMethod(true,"getWidth")),(Object)(_height)); - BA.debugLineNum = 44;BA.debugLine="CustomListView1.Add(p, \"\")"; -Debug.JustUpdateDeviceLine(); -_customlistview1.runVoidMethod ("_add",(Object)(_p),(Object)((RemoteObject.createImmutable("")))); - BA.debugLineNum = 45;BA.debugLine="CustomListView1.sv.ScrollViewContentHeight = Cus"; -Debug.JustUpdateDeviceLine(); -_customlistview1.getField(false,"_sv").runMethod(true,"setScrollViewContentHeight",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_customlistview1.getField(false,"_sv").runMethod(true,"getScrollViewContentHeight"),_customlistview1.runMethod(true,"_getdividersize")}, "-",1, 0))); - }; - BA.debugLineNum = 47;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createb4ximageview(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("CreateB4XImageView (xuiviewsutils) ","xuiviewsutils",62,_ba,xuiviewsutils.mostCurrent,85); -if (RapidSub.canDelegate("createb4ximageview")) { return keymon.lat.medicomed.xuiviewsutils.remoteMe.runUserSub(false, "xuiviewsutils","createb4ximageview", _ba);} -RemoteObject _iv = RemoteObject.declareNull("keymon.lat.medicomed.b4ximageview"); -RemoteObject _base = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper"); -; - BA.debugLineNum = 85;BA.debugLine="Public Sub CreateB4XImageView As B4XImageView"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 86;BA.debugLine="Dim iv As B4XImageView"; -Debug.JustUpdateDeviceLine(); -_iv = RemoteObject.createNew ("keymon.lat.medicomed.b4ximageview");Debug.locals.put("iv", _iv); - BA.debugLineNum = 87;BA.debugLine="iv.Initialize(Null, \"\")"; -Debug.JustUpdateDeviceLine(); -_iv.runClassMethod (keymon.lat.medicomed.b4ximageview.class, "_initialize" /*RemoteObject*/ ,_ba,(Object)(xuiviewsutils.mostCurrent.__c.getField(false,"Null")),(Object)(RemoteObject.createImmutable(""))); - BA.debugLineNum = 88;BA.debugLine="Dim base As B4XView = xui.CreatePanel(\"\")"; -Debug.JustUpdateDeviceLine(); -_base = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper"); -_base = xuiviewsutils._xui.runMethod(false,"CreatePanel",BA.rdebugUtils.runMethod(false, "processBAFromBA", _ba),(Object)(RemoteObject.createImmutable("")));Debug.locals.put("base", _base);Debug.locals.put("base", _base); - BA.debugLineNum = 89;BA.debugLine="base.SetLayoutAnimated(0, 0, 0, 100dip, 100dip)"; -Debug.JustUpdateDeviceLine(); -_base.runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(xuiviewsutils.mostCurrent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 100)))),(Object)(xuiviewsutils.mostCurrent.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 100))))); - BA.debugLineNum = 90;BA.debugLine="iv.DesignerCreateView(base, Null, CreateMap(\"Roun"; -Debug.JustUpdateDeviceLine(); -_iv.runClassMethod (keymon.lat.medicomed.b4ximageview.class, "_designercreateview" /*RemoteObject*/ ,(Object)((_base.getObject())),RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.LabelWrapper"), xuiviewsutils.mostCurrent.__c.getField(false,"Null")),(Object)(xuiviewsutils.mostCurrent.__c.runMethod(false, "createMap", (Object)(new RemoteObject[] {RemoteObject.createImmutable(("Round")),(xuiviewsutils.mostCurrent.__c.getField(true,"False")),RemoteObject.createImmutable(("ResizeMode")),RemoteObject.createImmutable(("FIT")),RemoteObject.createImmutable(("BackgroundColor")),RemoteObject.createImmutable((((int)0xffaaaaaa))),RemoteObject.createImmutable(("CornersRadius")),RemoteObject.createImmutable((0))})))); - BA.debugLineNum = 91;BA.debugLine="Return iv"; -Debug.JustUpdateDeviceLine(); -if (true) return _iv; - BA.debugLineNum = 92;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _createlabel(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("CreateLabel (xuiviewsutils) ","xuiviewsutils",62,_ba,xuiviewsutils.mostCurrent,78); -if (RapidSub.canDelegate("createlabel")) { return keymon.lat.medicomed.xuiviewsutils.remoteMe.runUserSub(false, "xuiviewsutils","createlabel", _ba);} -RemoteObject _lbl = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper"); -; - BA.debugLineNum = 78;BA.debugLine="Public Sub CreateLabel As B4XView"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 79;BA.debugLine="Dim lbl As Label"; -Debug.JustUpdateDeviceLine(); -_lbl = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");Debug.locals.put("lbl", _lbl); - BA.debugLineNum = 80;BA.debugLine="lbl.Initialize(\"\")"; -Debug.JustUpdateDeviceLine(); -_lbl.runVoidMethod ("Initialize",_ba,(Object)(RemoteObject.createImmutable(""))); - BA.debugLineNum = 81;BA.debugLine="Return lbl"; -Debug.JustUpdateDeviceLine(); -if (true) return RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), _lbl.getObject()); - BA.debugLineNum = 82;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(null); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _initialize(RemoteObject _ba) throws Exception{ -try { - Debug.PushSubsStack("Initialize (xuiviewsutils) ","xuiviewsutils",62,_ba,xuiviewsutils.mostCurrent,10); -if (RapidSub.canDelegate("initialize")) { return keymon.lat.medicomed.xuiviewsutils.remoteMe.runUserSub(false, "xuiviewsutils","initialize", _ba);} -; - BA.debugLineNum = 10;BA.debugLine="Private Sub Initialize"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 11;BA.debugLine="If UtilsInitialized Then Return"; -Debug.JustUpdateDeviceLine(); -if (xuiviewsutils._utilsinitialized.get().booleanValue()) { -if (true) return RemoteObject.createImmutable("");}; - BA.debugLineNum = 12;BA.debugLine="UtilsInitialized = True"; -Debug.JustUpdateDeviceLine(); -xuiviewsutils._utilsinitialized = xuiviewsutils.mostCurrent.__c.getField(true,"True"); - BA.debugLineNum = 19;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _performhapticfeedback(RemoteObject _ba,RemoteObject _view) throws Exception{ -try { - Debug.PushSubsStack("PerformHapticFeedback (xuiviewsutils) ","xuiviewsutils",62,_ba,xuiviewsutils.mostCurrent,21); -if (RapidSub.canDelegate("performhapticfeedback")) { return keymon.lat.medicomed.xuiviewsutils.remoteMe.runUserSub(false, "xuiviewsutils","performhapticfeedback", _ba, _view);} -RemoteObject _jo = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -; -Debug.locals.put("View", _view); - BA.debugLineNum = 21;BA.debugLine="Public Sub PerformHapticFeedback (View As B4XView)"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 22;BA.debugLine="Initialize"; -Debug.JustUpdateDeviceLine(); -_initialize(_ba); - BA.debugLineNum = 24;BA.debugLine="Dim jo As JavaObject = View"; -Debug.JustUpdateDeviceLine(); -_jo = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_jo = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), _view.getObject());Debug.locals.put("jo", _jo);Debug.locals.put("jo", _jo); - BA.debugLineNum = 25;BA.debugLine="jo.RunMethod(\"performHapticFeedback\", Array(1))"; -Debug.JustUpdateDeviceLine(); -_jo.runVoidMethod ("RunMethod",(Object)(BA.ObjectToString("performHapticFeedback")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {RemoteObject.createImmutable((1))}))); - BA.debugLineNum = 31;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _process_globals() throws Exception{ - //BA.debugLineNum = 2;BA.debugLine="Sub Process_Globals"; - //BA.debugLineNum = 6;BA.debugLine="Private UtilsInitialized As Boolean"; -xuiviewsutils._utilsinitialized = RemoteObject.createImmutable(false); - //BA.debugLineNum = 7;BA.debugLine="Private xui As XUI"; -xuiviewsutils._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI"); - //BA.debugLineNum = 8;BA.debugLine="End Sub"; -return RemoteObject.createImmutable(""); -} -public static RemoteObject _setalpha(RemoteObject _ba,RemoteObject _view,RemoteObject _level) throws Exception{ -try { - Debug.PushSubsStack("SetAlpha (xuiviewsutils) ","xuiviewsutils",62,_ba,xuiviewsutils.mostCurrent,95); -if (RapidSub.canDelegate("setalpha")) { return keymon.lat.medicomed.xuiviewsutils.remoteMe.runUserSub(false, "xuiviewsutils","setalpha", _ba, _view, _level);} -RemoteObject _jo = RemoteObject.declareNull("anywheresoftware.b4j.object.JavaObject"); -RemoteObject _alpha = RemoteObject.createImmutable(0f); -; -Debug.locals.put("View", _view); -Debug.locals.put("Level", _level); - BA.debugLineNum = 95;BA.debugLine="Public Sub SetAlpha (View As B4XView, Level As Flo"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 97;BA.debugLine="Dim jo As JavaObject = View"; -Debug.JustUpdateDeviceLine(); -_jo = RemoteObject.createNew ("anywheresoftware.b4j.object.JavaObject"); -_jo = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4j.object.JavaObject"), _view.getObject());Debug.locals.put("jo", _jo);Debug.locals.put("jo", _jo); - BA.debugLineNum = 98;BA.debugLine="Dim alpha As Float = Level"; -Debug.JustUpdateDeviceLine(); -_alpha = _level;Debug.locals.put("alpha", _alpha);Debug.locals.put("alpha", _alpha); - BA.debugLineNum = 99;BA.debugLine="jo.RunMethod(\"setAlpha\", Array(alpha))"; -Debug.JustUpdateDeviceLine(); -_jo.runVoidMethod ("RunMethod",(Object)(BA.ObjectToString("setAlpha")),(Object)(RemoteObject.createNewArray("Object",new int[] {1},new Object[] {(_alpha)}))); - BA.debugLineNum = 107;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _setbitmapandfill(RemoteObject _ba,RemoteObject _imageview,RemoteObject _bmp) throws Exception{ -try { - Debug.PushSubsStack("SetBitmapAndFill (xuiviewsutils) ","xuiviewsutils",62,_ba,xuiviewsutils.mostCurrent,65); -if (RapidSub.canDelegate("setbitmapandfill")) { return keymon.lat.medicomed.xuiviewsutils.remoteMe.runUserSub(false, "xuiviewsutils","setbitmapandfill", _ba, _imageview, _bmp);} -RemoteObject _iiv = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper"); -; -Debug.locals.put("ImageView", _imageview); -Debug.locals.put("Bmp", _bmp); - BA.debugLineNum = 65;BA.debugLine="Public Sub SetBitmapAndFill (ImageView As B4XView,"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 66;BA.debugLine="ImageView.SetBitmap(Bmp)"; -Debug.JustUpdateDeviceLine(); -_imageview.runVoidMethod ("SetBitmap",(Object)((_bmp.getObject()))); - BA.debugLineNum = 67;BA.debugLine="Dim iiv As ImageView = ImageView"; -Debug.JustUpdateDeviceLine(); -_iiv = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper"); -_iiv = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.ImageViewWrapper"), _imageview.getObject());Debug.locals.put("iiv", _iiv);Debug.locals.put("iiv", _iiv); - BA.debugLineNum = 69;BA.debugLine="iiv.Gravity = Gravity.FILL"; -Debug.JustUpdateDeviceLine(); -_iiv.runMethod(true,"setGravity",xuiviewsutils.mostCurrent.__c.getField(false,"Gravity").getField(true,"FILL")); - BA.debugLineNum = 75;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -public static RemoteObject _settextorcsbuildertolabel(RemoteObject _ba,RemoteObject _xlbl,RemoteObject _text) throws Exception{ -try { - Debug.PushSubsStack("SetTextOrCSBuilderToLabel (xuiviewsutils) ","xuiviewsutils",62,_ba,xuiviewsutils.mostCurrent,50); -if (RapidSub.canDelegate("settextorcsbuildertolabel")) { return keymon.lat.medicomed.xuiviewsutils.remoteMe.runUserSub(false, "xuiviewsutils","settextorcsbuildertolabel", _ba, _xlbl, _text);} -; -Debug.locals.put("xlbl", _xlbl); -Debug.locals.put("Text", _text); - BA.debugLineNum = 50;BA.debugLine="Public Sub SetTextOrCSBuilderToLabel(xlbl As B4XVi"; -Debug.JustUpdateDeviceLine(); - BA.debugLineNum = 52;BA.debugLine="xlbl.Text = Text"; -Debug.JustUpdateDeviceLine(); -_xlbl.runMethod(true,"setText",BA.ObjectToCharSequence(_text)); - BA.debugLineNum = 62;BA.debugLine="End Sub"; -Debug.JustUpdateDeviceLine(); -return RemoteObject.createImmutable(""); -} -catch (Exception e) { - throw Debug.ErrorCaught(e); - } -finally { - Debug.PopSubsStack(); - }} -} \ No newline at end of file diff --git a/B4A/Objects/src/keymon/lat/medicomed/animatedcounter.java b/B4A/Objects/src/keymon/lat/medicomed/animatedcounter.java index 7315694..9340265 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/animatedcounter.java +++ b/B4A/Objects/src/keymon/lat/medicomed/animatedcounter.java @@ -10,7 +10,7 @@ public class animatedcounter extends B4AClass.ImplB4AClass implements BA.SubDele private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.animatedcounter"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.animatedcounter"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class animatedcounter extends B4AClass.ImplB4AClass implements BA.SubDele 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.keywords.Common __c = null; public String _meventname = ""; public Object _mcallback = null; public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null; @@ -57,421 +50,287 @@ 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 _base_resize(keymon.lat.medicomed.animatedcounter __ref,double _width,double _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="animatedcounter"; -if (Debug.shouldDelegate(ba, "base_resize", true)) - {return ((String) Debug.delegate(ba, "base_resize", new Object[] {_width,_height}));} +public String _base_resize(double _width,double _height) throws Exception{ int _columns = 0; anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _bmp = null; int _left = 0; int _i = 0; anywheresoftware.b4a.objects.B4XViewWrapper _iv = null; -RDebugUtils.currentLine=44302336; - //BA.debugLineNum = 44302336;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; -RDebugUtils.currentLine=44302337; - //BA.debugLineNum = 44302337;BA.debugLine="mBase.GetView(0).SetLayoutAnimated(0, 0, 0, Width"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .GetView((int) (0)).SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); -RDebugUtils.currentLine=44302338; - //BA.debugLineNum = 44302338;BA.debugLine="xfadeIv.SetLayoutAnimated(0, 0, 0, Width, Height)"; -__ref._xfadeiv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); -RDebugUtils.currentLine=44302339; - //BA.debugLineNum = 44302339;BA.debugLine="xfadeIv.SetBitmap(fade.Resize(Width, Height, Fals"; -__ref._xfadeiv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetBitmap((android.graphics.Bitmap)(__ref._fade /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ .Resize((int) (_width),(int) (_height),__c.False).getObject())); -RDebugUtils.currentLine=44302340; - //BA.debugLineNum = 44302340;BA.debugLine="DigitHeight = Height"; -__ref._digitheight /*int*/ = (int) (_height); -RDebugUtils.currentLine=44302341; - //BA.debugLineNum = 44302341;BA.debugLine="Dim Columns As Int = mdigits"; -_columns = __ref._mdigits /*int*/ ; -RDebugUtils.currentLine=44302342; - //BA.debugLineNum = 44302342;BA.debugLine="DigitWidth = Width / Columns"; -__ref._digitwidth /*int*/ = (int) (_width/(double)_columns); -RDebugUtils.currentLine=44302343; - //BA.debugLineNum = 44302343;BA.debugLine="Dim bmp As B4XBitmap = CreateBitmap(lblTemplate)"; + //BA.debugLineNum = 70;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; + //BA.debugLineNum = 71;BA.debugLine="mBase.GetView(0).SetLayoutAnimated(0, 0, 0, Width"; +_mbase.GetView((int) (0)).SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); + //BA.debugLineNum = 72;BA.debugLine="xfadeIv.SetLayoutAnimated(0, 0, 0, Width, Height)"; +_xfadeiv.SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); + //BA.debugLineNum = 73;BA.debugLine="xfadeIv.SetBitmap(fade.Resize(Width, Height, Fals"; +_xfadeiv.SetBitmap((android.graphics.Bitmap)(_fade.Resize((int) (_width),(int) (_height),__c.False).getObject())); + //BA.debugLineNum = 74;BA.debugLine="DigitHeight = Height"; +_digitheight = (int) (_height); + //BA.debugLineNum = 75;BA.debugLine="Dim Columns As Int = mdigits"; +_columns = _mdigits; + //BA.debugLineNum = 76;BA.debugLine="DigitWidth = Width / Columns"; +_digitwidth = (int) (_width/(double)_columns); + //BA.debugLineNum = 77;BA.debugLine="Dim bmp As B4XBitmap = CreateBitmap(lblTemplate)"; _bmp = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper(); -_bmp = __ref._createbitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ (null,__ref._lbltemplate /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ); -RDebugUtils.currentLine=44302344; - //BA.debugLineNum = 44302344;BA.debugLine="Dim left As Int = Width"; +_bmp = _createbitmap(_lbltemplate); + //BA.debugLineNum = 78;BA.debugLine="Dim left As Int = Width"; _left = (int) (_width); -RDebugUtils.currentLine=44302345; - //BA.debugLineNum = 44302345;BA.debugLine="For i = 0 To ImageViews.Size - 1"; + //BA.debugLineNum = 79;BA.debugLine="For i = 0 To ImageViews.Size - 1"; { final int step9 = 1; -final int limit9 = (int) (__ref._imageviews /*anywheresoftware.b4a.objects.collections.List*/ .getSize()-1); +final int limit9 = (int) (_imageviews.getSize()-1); _i = (int) (0) ; for (;_i <= limit9 ;_i = _i + step9 ) { -RDebugUtils.currentLine=44302346; - //BA.debugLineNum = 44302346;BA.debugLine="Dim iv As B4XView = ImageViews.Get(i)"; + //BA.debugLineNum = 80;BA.debugLine="Dim iv As B4XView = ImageViews.Get(i)"; _iv = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_iv = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__ref._imageviews /*anywheresoftware.b4a.objects.collections.List*/ .Get(_i))); -RDebugUtils.currentLine=44302348; - //BA.debugLineNum = 44302348;BA.debugLine="left = left - DigitWidth"; -_left = (int) (_left-__ref._digitwidth /*int*/ ); -RDebugUtils.currentLine=44302349; - //BA.debugLineNum = 44302349;BA.debugLine="iv.SetLayoutAnimated(0, left, TopFromValue(i), D"; -_iv.SetLayoutAnimated((int) (0),_left,__ref._topfromvalue /*int*/ (null,_i),__ref._digitwidth /*int*/ ,(int) (__ref._digitheight /*int*/ *10)); -RDebugUtils.currentLine=44302350; - //BA.debugLineNum = 44302350;BA.debugLine="iv.SetBitmap(bmp)"; +_iv = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_imageviews.Get(_i))); + //BA.debugLineNum = 82;BA.debugLine="left = left - DigitWidth"; +_left = (int) (_left-_digitwidth); + //BA.debugLineNum = 83;BA.debugLine="iv.SetLayoutAnimated(0, left, TopFromValue(i), D"; +_iv.SetLayoutAnimated((int) (0),_left,_topfromvalue(_i),_digitwidth,(int) (_digitheight*10)); + //BA.debugLineNum = 84;BA.debugLine="iv.SetBitmap(bmp)"; _iv.SetBitmap((android.graphics.Bitmap)(_bmp.getObject())); } }; -RDebugUtils.currentLine=44302352; - //BA.debugLineNum = 44302352;BA.debugLine="End Sub"; + //BA.debugLineNum = 86;BA.debugLine="End Sub"; return ""; } -public anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _createbitmap(keymon.lat.medicomed.animatedcounter __ref,anywheresoftware.b4a.objects.B4XViewWrapper _lbl) throws Exception{ -__ref = this; -RDebugUtils.currentModule="animatedcounter"; -if (Debug.shouldDelegate(ba, "createbitmap", true)) - {return ((anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper) Debug.delegate(ba, "createbitmap", new Object[] {_lbl}));} +public String _class_globals() throws Exception{ + //BA.debugLineNum = 5;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 6;BA.debugLine="Private mEventName As String 'ignore"; +_meventname = ""; + //BA.debugLineNum = 7;BA.debugLine="Private mCallBack As Object 'ignore"; +_mcallback = new Object(); + //BA.debugLineNum = 8;BA.debugLine="Public mBase As B4XView 'ignore"; +_mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 9;BA.debugLine="Private xui As XUI 'ignore"; +_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); + //BA.debugLineNum = 10;BA.debugLine="Private ImageViews As List"; +_imageviews = new anywheresoftware.b4a.objects.collections.List(); + //BA.debugLineNum = 11;BA.debugLine="Private mdigits As Int"; +_mdigits = 0; + //BA.debugLineNum = 12;BA.debugLine="Private lblTemplate As B4XView"; +_lbltemplate = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 13;BA.debugLine="Private mValue As List"; +_mvalue = new anywheresoftware.b4a.objects.collections.List(); + //BA.debugLineNum = 14;BA.debugLine="Private DigitHeight, DigitWidth As Int"; +_digitheight = 0; +_digitwidth = 0; + //BA.debugLineNum = 15;BA.debugLine="Private mDuration As Int"; +_mduration = 0; + //BA.debugLineNum = 16;BA.debugLine="Private fade As B4XBitmap"; +_fade = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper(); + //BA.debugLineNum = 17;BA.debugLine="Private xfadeIv As B4XView"; +_xfadeiv = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 18;BA.debugLine="Public Tag As Object"; +_tag = new Object(); + //BA.debugLineNum = 20;BA.debugLine="End Sub"; +return ""; +} +public anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _createbitmap(anywheresoftware.b4a.objects.B4XViewWrapper _lbl) throws Exception{ anywheresoftware.b4a.objects.B4XViewWrapper _p = null; anywheresoftware.b4a.objects.B4XCanvas _cvs = null; anywheresoftware.b4a.objects.B4XCanvas.B4XRect _r = null; int _baseline = 0; int _i = 0; anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _res = null; -RDebugUtils.currentLine=44433408; - //BA.debugLineNum = 44433408;BA.debugLine="Private Sub CreateBitmap (lbl As B4XView) As B4XBi"; -RDebugUtils.currentLine=44433409; - //BA.debugLineNum = 44433409;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"\")"; + //BA.debugLineNum = 93;BA.debugLine="Private Sub CreateBitmap (lbl As B4XView) As B4XBi"; + //BA.debugLineNum = 94;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"\")"; _p = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_p = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,""); -RDebugUtils.currentLine=44433410; - //BA.debugLineNum = 44433410;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, DigitWidth, DigitHei"; -_p.SetLayoutAnimated((int) (0),(int) (0),(int) (0),__ref._digitwidth /*int*/ ,(int) (__ref._digitheight /*int*/ *10)); -RDebugUtils.currentLine=44433411; - //BA.debugLineNum = 44433411;BA.debugLine="Dim cvs As B4XCanvas"; +_p = _xui.CreatePanel(ba,""); + //BA.debugLineNum = 95;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, DigitWidth, DigitHei"; +_p.SetLayoutAnimated((int) (0),(int) (0),(int) (0),_digitwidth,(int) (_digitheight*10)); + //BA.debugLineNum = 96;BA.debugLine="Dim cvs As B4XCanvas"; _cvs = new anywheresoftware.b4a.objects.B4XCanvas(); -RDebugUtils.currentLine=44433412; - //BA.debugLineNum = 44433412;BA.debugLine="cvs.Initialize(p)"; + //BA.debugLineNum = 97;BA.debugLine="cvs.Initialize(p)"; _cvs.Initialize(_p); -RDebugUtils.currentLine=44433413; - //BA.debugLineNum = 44433413;BA.debugLine="Dim r As B4XRect = cvs.MeasureText(\"5\", lbl.Font)"; + //BA.debugLineNum = 98;BA.debugLine="Dim r As B4XRect = cvs.MeasureText(\"5\", lbl.Font)"; _r = _cvs.MeasureText("5",_lbl.getFont()); -RDebugUtils.currentLine=44433414; - //BA.debugLineNum = 44433414;BA.debugLine="Dim BaseLine As Int = DigitHeight / 2 - r.Height"; -_baseline = (int) (__ref._digitheight /*int*/ /(double)2-_r.getHeight()/(double)2-_r.getTop()); -RDebugUtils.currentLine=44433415; - //BA.debugLineNum = 44433415;BA.debugLine="For i = 0 To 9"; + //BA.debugLineNum = 99;BA.debugLine="Dim BaseLine As Int = DigitHeight / 2 - r.Height"; +_baseline = (int) (_digitheight/(double)2-_r.getHeight()/(double)2-_r.getTop()); + //BA.debugLineNum = 100;BA.debugLine="For i = 0 To 9"; { final int step7 = 1; final int limit7 = (int) (9); _i = (int) (0) ; for (;_i <= limit7 ;_i = _i + step7 ) { -RDebugUtils.currentLine=44433416; - //BA.debugLineNum = 44433416;BA.debugLine="cvs.DrawText(i, DigitWidth / 2, i * DigitHeight"; -_cvs.DrawText(ba,BA.NumberToString(_i),(float) (__ref._digitwidth /*int*/ /(double)2),(float) (_i*__ref._digitheight /*int*/ +_baseline),_lbl.getFont(),_lbl.getTextColor(),BA.getEnumFromString(android.graphics.Paint.Align.class,"CENTER")); + //BA.debugLineNum = 101;BA.debugLine="cvs.DrawText(i, DigitWidth / 2, i * DigitHeight"; +_cvs.DrawText(ba,BA.NumberToString(_i),(float) (_digitwidth/(double)2),(float) (_i*_digitheight+_baseline),_lbl.getFont(),_lbl.getTextColor(),BA.getEnumFromString(android.graphics.Paint.Align.class,"CENTER")); } }; -RDebugUtils.currentLine=44433418; - //BA.debugLineNum = 44433418;BA.debugLine="cvs.Invalidate"; + //BA.debugLineNum = 103;BA.debugLine="cvs.Invalidate"; _cvs.Invalidate(); -RDebugUtils.currentLine=44433419; - //BA.debugLineNum = 44433419;BA.debugLine="Dim res As B4XBitmap = cvs.CreateBitmap"; + //BA.debugLineNum = 104;BA.debugLine="Dim res As B4XBitmap = cvs.CreateBitmap"; _res = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper(); _res = _cvs.CreateBitmap(); -RDebugUtils.currentLine=44433420; - //BA.debugLineNum = 44433420;BA.debugLine="cvs.Release"; + //BA.debugLineNum = 105;BA.debugLine="cvs.Release"; _cvs.Release(); -RDebugUtils.currentLine=44433421; - //BA.debugLineNum = 44433421;BA.debugLine="Return res"; + //BA.debugLineNum = 106;BA.debugLine="Return res"; if (true) return _res; -RDebugUtils.currentLine=44433422; - //BA.debugLineNum = 44433422;BA.debugLine="End Sub"; + //BA.debugLineNum = 107;BA.debugLine="End Sub"; return null; } -public int _topfromvalue(keymon.lat.medicomed.animatedcounter __ref,int _digit) throws Exception{ -__ref = this; -RDebugUtils.currentModule="animatedcounter"; -if (Debug.shouldDelegate(ba, "topfromvalue", true)) - {return ((Integer) Debug.delegate(ba, "topfromvalue", new Object[] {_digit}));} -int _d = 0; -RDebugUtils.currentLine=44367872; - //BA.debugLineNum = 44367872;BA.debugLine="Private Sub TopFromValue (Digit As Int) As Int"; -RDebugUtils.currentLine=44367873; - //BA.debugLineNum = 44367873;BA.debugLine="Dim d As Int = mValue.Get(Digit)"; -_d = (int)(BA.ObjectToNumber(__ref._mvalue /*anywheresoftware.b4a.objects.collections.List*/ .Get(_digit))); -RDebugUtils.currentLine=44367874; - //BA.debugLineNum = 44367874;BA.debugLine="Return -d * DigitHeight"; -if (true) return (int) (-_d*__ref._digitheight /*int*/ ); -RDebugUtils.currentLine=44367875; - //BA.debugLineNum = 44367875;BA.debugLine="End Sub"; -return 0; -} -public String _class_globals(keymon.lat.medicomed.animatedcounter __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="animatedcounter"; -RDebugUtils.currentLine=44040192; - //BA.debugLineNum = 44040192;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=44040193; - //BA.debugLineNum = 44040193;BA.debugLine="Private mEventName As String 'ignore"; -_meventname = ""; -RDebugUtils.currentLine=44040194; - //BA.debugLineNum = 44040194;BA.debugLine="Private mCallBack As Object 'ignore"; -_mcallback = new Object(); -RDebugUtils.currentLine=44040195; - //BA.debugLineNum = 44040195;BA.debugLine="Public mBase As B4XView 'ignore"; -_mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=44040196; - //BA.debugLineNum = 44040196;BA.debugLine="Private xui As XUI 'ignore"; -_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=44040197; - //BA.debugLineNum = 44040197;BA.debugLine="Private ImageViews As List"; -_imageviews = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=44040198; - //BA.debugLineNum = 44040198;BA.debugLine="Private mdigits As Int"; -_mdigits = 0; -RDebugUtils.currentLine=44040199; - //BA.debugLineNum = 44040199;BA.debugLine="Private lblTemplate As B4XView"; -_lbltemplate = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=44040200; - //BA.debugLineNum = 44040200;BA.debugLine="Private mValue As List"; -_mvalue = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=44040201; - //BA.debugLineNum = 44040201;BA.debugLine="Private DigitHeight, DigitWidth As Int"; -_digitheight = 0; -_digitwidth = 0; -RDebugUtils.currentLine=44040202; - //BA.debugLineNum = 44040202;BA.debugLine="Private mDuration As Int"; -_mduration = 0; -RDebugUtils.currentLine=44040203; - //BA.debugLineNum = 44040203;BA.debugLine="Private fade As B4XBitmap"; -_fade = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper(); -RDebugUtils.currentLine=44040204; - //BA.debugLineNum = 44040204;BA.debugLine="Private xfadeIv As B4XView"; -_xfadeiv = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=44040205; - //BA.debugLineNum = 44040205;BA.debugLine="Public Tag As Object"; -_tag = new Object(); -RDebugUtils.currentLine=44040207; - //BA.debugLineNum = 44040207;BA.debugLine="End Sub"; -return ""; -} -public anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _createfadebitmap(keymon.lat.medicomed.animatedcounter __ref,int _clr) throws Exception{ -__ref = this; -RDebugUtils.currentModule="animatedcounter"; -if (Debug.shouldDelegate(ba, "createfadebitmap", true)) - {return ((anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper) Debug.delegate(ba, "createfadebitmap", new Object[] {_clr}));} +public anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _createfadebitmap(int _clr) throws Exception{ b4a.example.bitmapcreator _bc = null; anywheresoftware.b4a.objects.B4XCanvas.B4XRect _r = null; int _tclr = 0; -RDebugUtils.currentLine=44236800; - //BA.debugLineNum = 44236800;BA.debugLine="Private Sub CreateFadeBitmap (clr As Int) As B4XBi"; -RDebugUtils.currentLine=44236801; - //BA.debugLineNum = 44236801;BA.debugLine="Dim bc As BitmapCreator"; + //BA.debugLineNum = 56;BA.debugLine="Private Sub CreateFadeBitmap (clr As Int) As B4XBi"; + //BA.debugLineNum = 57;BA.debugLine="Dim bc As BitmapCreator"; _bc = new b4a.example.bitmapcreator(); -RDebugUtils.currentLine=44236802; - //BA.debugLineNum = 44236802;BA.debugLine="bc.Initialize(200, 50)"; + //BA.debugLineNum = 58;BA.debugLine="bc.Initialize(200, 50)"; _bc._initialize(ba,(int) (200),(int) (50)); -RDebugUtils.currentLine=44236803; - //BA.debugLineNum = 44236803;BA.debugLine="Dim r As B4XRect"; + //BA.debugLineNum = 59;BA.debugLine="Dim r As B4XRect"; _r = new anywheresoftware.b4a.objects.B4XCanvas.B4XRect(); -RDebugUtils.currentLine=44236804; - //BA.debugLineNum = 44236804;BA.debugLine="r.Initialize(0, 0, bc.mWidth, bc.mHeight / 3)"; + //BA.debugLineNum = 60;BA.debugLine="r.Initialize(0, 0, bc.mWidth, bc.mHeight / 3)"; _r.Initialize((float) (0),(float) (0),(float) (_bc._mwidth),(float) (_bc._mheight/(double)3)); -RDebugUtils.currentLine=44236805; - //BA.debugLineNum = 44236805;BA.debugLine="Dim tclr As Int = Bit.And(0x00ffffff, clr)"; + //BA.debugLineNum = 61;BA.debugLine="Dim tclr As Int = Bit.And(0x00ffffff, clr)"; _tclr = __c.Bit.And(((int)0x00ffffff),_clr); -RDebugUtils.currentLine=44236806; - //BA.debugLineNum = 44236806;BA.debugLine="bc.FillGradient(Array As Int(clr, tclr), r, \"TOP_"; + //BA.debugLineNum = 62;BA.debugLine="bc.FillGradient(Array As Int(clr, tclr), r, \"TOP_"; _bc._fillgradient(new int[]{_clr,_tclr},_r,"TOP_BOTTOM"); -RDebugUtils.currentLine=44236807; - //BA.debugLineNum = 44236807;BA.debugLine="r.Top = bc.mHeight * 2 / 3"; + //BA.debugLineNum = 63;BA.debugLine="r.Top = bc.mHeight * 2 / 3"; _r.setTop((float) (_bc._mheight*2/(double)3)); -RDebugUtils.currentLine=44236808; - //BA.debugLineNum = 44236808;BA.debugLine="r.Bottom = bc.mHeight"; + //BA.debugLineNum = 64;BA.debugLine="r.Bottom = bc.mHeight"; _r.setBottom((float) (_bc._mheight)); -RDebugUtils.currentLine=44236809; - //BA.debugLineNum = 44236809;BA.debugLine="bc.FillGradient(Array As Int(clr, tclr), r, \"BOTT"; + //BA.debugLineNum = 65;BA.debugLine="bc.FillGradient(Array As Int(clr, tclr), r, \"BOTT"; _bc._fillgradient(new int[]{_clr,_tclr},_r,"BOTTOM_TOP"); -RDebugUtils.currentLine=44236810; - //BA.debugLineNum = 44236810;BA.debugLine="Return bc.Bitmap"; + //BA.debugLineNum = 66;BA.debugLine="Return bc.Bitmap"; if (true) return _bc._getbitmap(); -RDebugUtils.currentLine=44236811; - //BA.debugLineNum = 44236811;BA.debugLine="End Sub"; + //BA.debugLineNum = 67;BA.debugLine="End Sub"; return null; } -public String _designercreateview(keymon.lat.medicomed.animatedcounter __ref,Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ -__ref = this; -RDebugUtils.currentModule="animatedcounter"; -if (Debug.shouldDelegate(ba, "designercreateview", true)) - {return ((String) Debug.delegate(ba, "designercreateview", new Object[] {_base,_lbl,_props}));} +public String _designercreateview(Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ anywheresoftware.b4a.objects.B4XViewWrapper _pnl = null; int _i = 0; anywheresoftware.b4a.objects.ImageViewWrapper _iv = null; anywheresoftware.b4a.objects.ImageViewWrapper _fadeiv = null; -RDebugUtils.currentLine=44171264; - //BA.debugLineNum = 44171264;BA.debugLine="Public Sub DesignerCreateView (Base As Object, lbl"; -RDebugUtils.currentLine=44171265; - //BA.debugLineNum = 44171265;BA.debugLine="mBase = Base"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); -RDebugUtils.currentLine=44171266; - //BA.debugLineNum = 44171266;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._tag /*Object*/ = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getTag(); -RDebugUtils.currentLine=44171266; - //BA.debugLineNum = 44171266;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag(this); -RDebugUtils.currentLine=44171267; - //BA.debugLineNum = 44171267;BA.debugLine="Dim pnl As B4XView = xui.CreatePanel(\"\") 'needed"; + //BA.debugLineNum = 30;BA.debugLine="Public Sub DesignerCreateView (Base As Object, lbl"; + //BA.debugLineNum = 31;BA.debugLine="mBase = Base"; +_mbase = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); + //BA.debugLineNum = 32;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_tag = _mbase.getTag(); + //BA.debugLineNum = 32;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_mbase.setTag(this); + //BA.debugLineNum = 33;BA.debugLine="Dim pnl As B4XView = xui.CreatePanel(\"\") 'needed"; _pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_pnl = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,""); -RDebugUtils.currentLine=44171268; - //BA.debugLineNum = 44171268;BA.debugLine="mBase.AddView(pnl, 0, 0, 0, 0)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(_pnl.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=44171269; - //BA.debugLineNum = 44171269;BA.debugLine="mdigits = Props.Get(\"Digits\")"; -__ref._mdigits /*int*/ = (int)(BA.ObjectToNumber(_props.Get((Object)("Digits")))); -RDebugUtils.currentLine=44171270; - //BA.debugLineNum = 44171270;BA.debugLine="mDuration = Props.Get(\"Duration\")"; -__ref._mduration /*int*/ = (int)(BA.ObjectToNumber(_props.Get((Object)("Duration")))); -RDebugUtils.currentLine=44171271; - //BA.debugLineNum = 44171271;BA.debugLine="lblTemplate = lbl"; -__ref._lbltemplate /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lbl.getObject())); -RDebugUtils.currentLine=44171272; - //BA.debugLineNum = 44171272;BA.debugLine="fade = CreateFadeBitmap(xui.PaintOrColorToColor(P"; -__ref._fade /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ = __ref._createfadebitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ (null,__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor(_props.GetDefault((Object)("FadeColor"),(Object)(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_White)))); -RDebugUtils.currentLine=44171273; - //BA.debugLineNum = 44171273;BA.debugLine="For i = 0 To mdigits - 1"; +_pnl = _xui.CreatePanel(ba,""); + //BA.debugLineNum = 34;BA.debugLine="mBase.AddView(pnl, 0, 0, 0, 0)"; +_mbase.AddView((android.view.View)(_pnl.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 35;BA.debugLine="mdigits = Props.Get(\"Digits\")"; +_mdigits = (int)(BA.ObjectToNumber(_props.Get((Object)("Digits")))); + //BA.debugLineNum = 36;BA.debugLine="mDuration = Props.Get(\"Duration\")"; +_mduration = (int)(BA.ObjectToNumber(_props.Get((Object)("Duration")))); + //BA.debugLineNum = 37;BA.debugLine="lblTemplate = lbl"; +_lbltemplate = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lbl.getObject())); + //BA.debugLineNum = 38;BA.debugLine="fade = CreateFadeBitmap(xui.PaintOrColorToColor(P"; +_fade = _createfadebitmap(_xui.PaintOrColorToColor(_props.GetDefault((Object)("FadeColor"),(Object)(_xui.Color_White)))); + //BA.debugLineNum = 39;BA.debugLine="For i = 0 To mdigits - 1"; { final int step10 = 1; -final int limit10 = (int) (__ref._mdigits /*int*/ -1); +final int limit10 = (int) (_mdigits-1); _i = (int) (0) ; for (;_i <= limit10 ;_i = _i + step10 ) { -RDebugUtils.currentLine=44171274; - //BA.debugLineNum = 44171274;BA.debugLine="Dim iv As ImageView"; + //BA.debugLineNum = 40;BA.debugLine="Dim iv As ImageView"; _iv = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=44171275; - //BA.debugLineNum = 44171275;BA.debugLine="iv.Initialize(\"\")"; + //BA.debugLineNum = 41;BA.debugLine="iv.Initialize(\"\")"; _iv.Initialize(ba,""); -RDebugUtils.currentLine=44171276; - //BA.debugLineNum = 44171276;BA.debugLine="ImageViews.Add(iv)"; -__ref._imageviews /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(_iv.getObject())); -RDebugUtils.currentLine=44171277; - //BA.debugLineNum = 44171277;BA.debugLine="mBase.GetView(0).AddView(iv, 0, 0, 0, 0)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .GetView((int) (0)).AddView((android.view.View)(_iv.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 42;BA.debugLine="ImageViews.Add(iv)"; +_imageviews.Add((Object)(_iv.getObject())); + //BA.debugLineNum = 43;BA.debugLine="mBase.GetView(0).AddView(iv, 0, 0, 0, 0)"; +_mbase.GetView((int) (0)).AddView((android.view.View)(_iv.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); } }; -RDebugUtils.currentLine=44171279; - //BA.debugLineNum = 44171279;BA.debugLine="Dim fadeIv As ImageView"; + //BA.debugLineNum = 45;BA.debugLine="Dim fadeIv As ImageView"; _fadeiv = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=44171280; - //BA.debugLineNum = 44171280;BA.debugLine="fadeIv.Initialize(\"\")"; + //BA.debugLineNum = 46;BA.debugLine="fadeIv.Initialize(\"\")"; _fadeiv.Initialize(ba,""); -RDebugUtils.currentLine=44171281; - //BA.debugLineNum = 44171281;BA.debugLine="xfadeIv = fadeIv"; -__ref._xfadeiv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_fadeiv.getObject())); -RDebugUtils.currentLine=44171282; - //BA.debugLineNum = 44171282;BA.debugLine="mBase.GetView(0).AddView(fadeIv, 0, 0, 0, 0)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .GetView((int) (0)).AddView((android.view.View)(_fadeiv.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=44171283; - //BA.debugLineNum = 44171283;BA.debugLine="setValue(0)"; -__ref._setvalue /*String*/ (null,(int) (0)); -RDebugUtils.currentLine=44171284; - //BA.debugLineNum = 44171284;BA.debugLine="If xui.IsB4A Then"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4A()) { -RDebugUtils.currentLine=44171285; - //BA.debugLineNum = 44171285;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; -__ref._base_resize /*String*/ (null,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=44171286; - //BA.debugLineNum = 44171286;BA.debugLine="setValue(getValue)"; -__ref._setvalue /*String*/ (null,__ref._getvalue /*int*/ (null)); + //BA.debugLineNum = 47;BA.debugLine="xfadeIv = fadeIv"; +_xfadeiv = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_fadeiv.getObject())); + //BA.debugLineNum = 48;BA.debugLine="mBase.GetView(0).AddView(fadeIv, 0, 0, 0, 0)"; +_mbase.GetView((int) (0)).AddView((android.view.View)(_fadeiv.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 49;BA.debugLine="setValue(0)"; +_setvalue((int) (0)); + //BA.debugLineNum = 50;BA.debugLine="If xui.IsB4A Then"; +if (_xui.getIsB4A()) { + //BA.debugLineNum = 51;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; +_base_resize(_mbase.getWidth(),_mbase.getHeight()); + //BA.debugLineNum = 52;BA.debugLine="setValue(getValue)"; +_setvalue(_getvalue()); }; -RDebugUtils.currentLine=44171288; - //BA.debugLineNum = 44171288;BA.debugLine="End Sub"; + //BA.debugLineNum = 54;BA.debugLine="End Sub"; return ""; } -public String _setvalue(keymon.lat.medicomed.animatedcounter __ref,int _v) throws Exception{ -__ref = this; -RDebugUtils.currentModule="animatedcounter"; -if (Debug.shouldDelegate(ba, "setvalue", true)) - {return ((String) Debug.delegate(ba, "setvalue", new Object[] {_v}));} -int _i = 0; -anywheresoftware.b4a.objects.B4XViewWrapper _iv = null; -RDebugUtils.currentLine=44498944; - //BA.debugLineNum = 44498944;BA.debugLine="Public Sub setValue(v As Int)"; -RDebugUtils.currentLine=44498945; - //BA.debugLineNum = 44498945;BA.debugLine="mValue.Clear"; -__ref._mvalue /*anywheresoftware.b4a.objects.collections.List*/ .Clear(); -RDebugUtils.currentLine=44498946; - //BA.debugLineNum = 44498946;BA.debugLine="For i = 0 To mdigits - 1"; -{ -final int step2 = 1; -final int limit2 = (int) (__ref._mdigits /*int*/ -1); -_i = (int) (0) ; -for (;_i <= limit2 ;_i = _i + step2 ) { -RDebugUtils.currentLine=44498947; - //BA.debugLineNum = 44498947;BA.debugLine="mValue.Add(v Mod 10)"; -__ref._mvalue /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(_v%10)); -RDebugUtils.currentLine=44498948; - //BA.debugLineNum = 44498948;BA.debugLine="v = v / 10"; -_v = (int) (_v/(double)10); -RDebugUtils.currentLine=44498949; - //BA.debugLineNum = 44498949;BA.debugLine="Dim iv As B4XView = ImageViews.Get(i)"; -_iv = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_iv = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__ref._imageviews /*anywheresoftware.b4a.objects.collections.List*/ .Get(_i))); -RDebugUtils.currentLine=44498950; - //BA.debugLineNum = 44498950;BA.debugLine="iv.SetLayoutAnimated(mDuration, iv.Left, TopFrom"; -_iv.SetLayoutAnimated(__ref._mduration /*int*/ ,_iv.getLeft(),__ref._topfromvalue /*int*/ (null,_i),(int) (__c.Max(1,_iv.getWidth())),(int) (__c.Max(1,_iv.getHeight()))); - } -}; -RDebugUtils.currentLine=44498953; - //BA.debugLineNum = 44498953;BA.debugLine="End Sub"; -return ""; -} -public int _getvalue(keymon.lat.medicomed.animatedcounter __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="animatedcounter"; -if (Debug.shouldDelegate(ba, "getvalue", true)) - {return ((Integer) Debug.delegate(ba, "getvalue", null));} +public int _getvalue() throws Exception{ int _res = 0; int _i = 0; -RDebugUtils.currentLine=44564480; - //BA.debugLineNum = 44564480;BA.debugLine="Public Sub getValue As Int"; -RDebugUtils.currentLine=44564481; - //BA.debugLineNum = 44564481;BA.debugLine="Dim res As Int"; + //BA.debugLineNum = 120;BA.debugLine="Public Sub getValue As Int"; + //BA.debugLineNum = 121;BA.debugLine="Dim res As Int"; _res = 0; -RDebugUtils.currentLine=44564482; - //BA.debugLineNum = 44564482;BA.debugLine="For i = 0 To mValue.Size - 1"; + //BA.debugLineNum = 122;BA.debugLine="For i = 0 To mValue.Size - 1"; { final int step2 = 1; -final int limit2 = (int) (__ref._mvalue /*anywheresoftware.b4a.objects.collections.List*/ .getSize()-1); +final int limit2 = (int) (_mvalue.getSize()-1); _i = (int) (0) ; for (;_i <= limit2 ;_i = _i + step2 ) { -RDebugUtils.currentLine=44564483; - //BA.debugLineNum = 44564483;BA.debugLine="res = res + mValue.Get(i) * Power(10, i)"; -_res = (int) (_res+(double)(BA.ObjectToNumber(__ref._mvalue /*anywheresoftware.b4a.objects.collections.List*/ .Get(_i)))*__c.Power(10,_i)); + //BA.debugLineNum = 123;BA.debugLine="res = res + mValue.Get(i) * Power(10, i)"; +_res = (int) (_res+(double)(BA.ObjectToNumber(_mvalue.Get(_i)))*__c.Power(10,_i)); } }; -RDebugUtils.currentLine=44564485; - //BA.debugLineNum = 44564485;BA.debugLine="Return res"; + //BA.debugLineNum = 125;BA.debugLine="Return res"; if (true) return _res; -RDebugUtils.currentLine=44564486; - //BA.debugLineNum = 44564486;BA.debugLine="End Sub"; + //BA.debugLineNum = 126;BA.debugLine="End Sub"; return 0; } -public String _initialize(keymon.lat.medicomed.animatedcounter __ref,anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ -__ref = this; +public String _initialize(anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ innerInitialize(_ba); -RDebugUtils.currentModule="animatedcounter"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_callback,_eventname}));} -RDebugUtils.currentLine=44105728; - //BA.debugLineNum = 44105728;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -RDebugUtils.currentLine=44105729; - //BA.debugLineNum = 44105729;BA.debugLine="mEventName = EventName"; -__ref._meventname /*String*/ = _eventname; -RDebugUtils.currentLine=44105730; - //BA.debugLineNum = 44105730;BA.debugLine="mCallBack = Callback"; -__ref._mcallback /*Object*/ = _callback; -RDebugUtils.currentLine=44105731; - //BA.debugLineNum = 44105731;BA.debugLine="ImageViews.Initialize"; -__ref._imageviews /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=44105732; - //BA.debugLineNum = 44105732;BA.debugLine="mValue.Initialize"; -__ref._mvalue /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=44105733; - //BA.debugLineNum = 44105733;BA.debugLine="End Sub"; + //BA.debugLineNum = 22;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; + //BA.debugLineNum = 23;BA.debugLine="mEventName = EventName"; +_meventname = _eventname; + //BA.debugLineNum = 24;BA.debugLine="mCallBack = Callback"; +_mcallback = _callback; + //BA.debugLineNum = 25;BA.debugLine="ImageViews.Initialize"; +_imageviews.Initialize(); + //BA.debugLineNum = 26;BA.debugLine="mValue.Initialize"; +_mvalue.Initialize(); + //BA.debugLineNum = 27;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +public String _setvalue(int _v) throws Exception{ +int _i = 0; +anywheresoftware.b4a.objects.B4XViewWrapper _iv = null; + //BA.debugLineNum = 109;BA.debugLine="Public Sub setValue(v As Int)"; + //BA.debugLineNum = 110;BA.debugLine="mValue.Clear"; +_mvalue.Clear(); + //BA.debugLineNum = 111;BA.debugLine="For i = 0 To mdigits - 1"; +{ +final int step2 = 1; +final int limit2 = (int) (_mdigits-1); +_i = (int) (0) ; +for (;_i <= limit2 ;_i = _i + step2 ) { + //BA.debugLineNum = 112;BA.debugLine="mValue.Add(v Mod 10)"; +_mvalue.Add((Object)(_v%10)); + //BA.debugLineNum = 113;BA.debugLine="v = v / 10"; +_v = (int) (_v/(double)10); + //BA.debugLineNum = 114;BA.debugLine="Dim iv As B4XView = ImageViews.Get(i)"; +_iv = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_iv = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_imageviews.Get(_i))); + //BA.debugLineNum = 115;BA.debugLine="iv.SetLayoutAnimated(mDuration, iv.Left, TopFrom"; +_iv.SetLayoutAnimated(_mduration,_iv.getLeft(),_topfromvalue(_i),(int) (__c.Max(1,_iv.getWidth())),(int) (__c.Max(1,_iv.getHeight()))); + } +}; + //BA.debugLineNum = 118;BA.debugLine="End Sub"; +return ""; +} +public int _topfromvalue(int _digit) throws Exception{ +int _d = 0; + //BA.debugLineNum = 88;BA.debugLine="Private Sub TopFromValue (Digit As Int) As Int"; + //BA.debugLineNum = 89;BA.debugLine="Dim d As Int = mValue.Get(Digit)"; +_d = (int)(BA.ObjectToNumber(_mvalue.Get(_digit))); + //BA.debugLineNum = 90;BA.debugLine="Return -d * DigitHeight"; +if (true) return (int) (-_d*_digitheight); + //BA.debugLineNum = 91;BA.debugLine="End Sub"; +return 0; +} +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/anotherprogressbar.java b/B4A/Objects/src/keymon/lat/medicomed/anotherprogressbar.java index 0e3fa1b..7d8f0ab 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/anotherprogressbar.java +++ b/B4A/Objects/src/keymon/lat/medicomed/anotherprogressbar.java @@ -10,7 +10,7 @@ public class anotherprogressbar extends B4AClass.ImplB4AClass implements BA.SubD private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.anotherprogressbar"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.anotherprogressbar"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class anotherprogressbar extends B4AClass.ImplB4AClass implements BA.SubD 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.keywords.Common __c = null; public String _meventname = ""; public Object _mcallback = null; public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null; @@ -62,142 +55,39 @@ 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 _base_resize(keymon.lat.medicomed.anotherprogressbar __ref,double _width,double _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="anotherprogressbar"; -if (Debug.shouldDelegate(ba, "base_resize", true)) - {return ((String) Debug.delegate(ba, "base_resize", new Object[] {_width,_height}));} +public String _base_resize(double _width,double _height) throws Exception{ anywheresoftware.b4a.objects.B4XViewWrapper _v = null; -RDebugUtils.currentLine=44826624; - //BA.debugLineNum = 44826624;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; -RDebugUtils.currentLine=44826625; - //BA.debugLineNum = 44826625;BA.debugLine="For Each v As B4XView In mBase.GetAllViewsRecursi"; + //BA.debugLineNum = 49;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; + //BA.debugLineNum = 50;BA.debugLine="For Each v As B4XView In mBase.GetAllViewsRecursi"; _v = new anywheresoftware.b4a.objects.B4XViewWrapper(); { -final anywheresoftware.b4a.BA.IterableList group1 = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .GetAllViewsRecursive(); +final anywheresoftware.b4a.BA.IterableList group1 = _mbase.GetAllViewsRecursive(); final int groupLen1 = group1.getSize() ;int index1 = 0; ; for (; index1 < groupLen1;index1++){ _v = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(group1.Get(index1))); -RDebugUtils.currentLine=44826626; - //BA.debugLineNum = 44826626;BA.debugLine="v.SetLayoutAnimated(0, 0, 0, Width, Height)"; + //BA.debugLineNum = 51;BA.debugLine="v.SetLayoutAnimated(0, 0, 0, Width, Height)"; _v.SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); } }; -RDebugUtils.currentLine=44826628; - //BA.debugLineNum = 44826628;BA.debugLine="bc.Initialize(mBase.Width / xui.Scale, mBase.Heig"; -__ref._bc /*b4a.example.bitmapcreator*/ ._initialize(ba,(int) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getScale()),(int) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()/(double)__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getScale())); -RDebugUtils.currentLine=44826629; - //BA.debugLineNum = 44826629;BA.debugLine="Vertical = mBase.Height > mBase.Width"; -__ref._vertical /*boolean*/ = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()>__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(); -RDebugUtils.currentLine=44826630; - //BA.debugLineNum = 44826630;BA.debugLine="UpdateGraphics"; -__ref._updategraphics /*String*/ (null); -RDebugUtils.currentLine=44826632; - //BA.debugLineNum = 44826632;BA.debugLine="End Sub"; + //BA.debugLineNum = 53;BA.debugLine="bc.Initialize(mBase.Width / xui.Scale, mBase.Heig"; +_bc._initialize(ba,(int) (_mbase.getWidth()/(double)_xui.getScale()),(int) (_mbase.getHeight()/(double)_xui.getScale())); + //BA.debugLineNum = 54;BA.debugLine="Vertical = mBase.Height > mBase.Width"; +_vertical = _mbase.getHeight()>_mbase.getWidth(); + //BA.debugLineNum = 55;BA.debugLine="UpdateGraphics"; +_updategraphics(); + //BA.debugLineNum = 57;BA.debugLine="End Sub"; return ""; } -public String _updategraphics(keymon.lat.medicomed.anotherprogressbar __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="anotherprogressbar"; -if (Debug.shouldDelegate(ba, "updategraphics", true)) - {return ((String) Debug.delegate(ba, "updategraphics", null));} -int _width = 0; -b4a.example.bitmapcreator _template = null; -b4a.example.bitmapcreator._argbcolor _bcolor = null; -RDebugUtils.currentLine=45088768; - //BA.debugLineNum = 45088768;BA.debugLine="Public Sub UpdateGraphics"; -RDebugUtils.currentLine=45088769; - //BA.debugLineNum = 45088769;BA.debugLine="EmptyBrush = bc.CreateBrushFromColor(EmptyColor)"; -__ref._emptybrush /*b4a.example.bcpath._bcbrush*/ = __ref._bc /*b4a.example.bitmapcreator*/ ._createbrushfromcolor(__ref._emptycolor /*int*/ ); -RDebugUtils.currentLine=45088770; - //BA.debugLineNum = 45088770;BA.debugLine="TransparentBrush = bc.CreateBrushFromColor(xui.Co"; -__ref._transparentbrush /*b4a.example.bcpath._bcbrush*/ = __ref._bc /*b4a.example.bitmapcreator*/ ._createbrushfromcolor(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent); -RDebugUtils.currentLine=45088771; - //BA.debugLineNum = 45088771;BA.debugLine="Dim Width As Int = 40"; -_width = (int) (40); -RDebugUtils.currentLine=45088772; - //BA.debugLineNum = 45088772;BA.debugLine="Dim Template As BitmapCreator"; -_template = new b4a.example.bitmapcreator(); -RDebugUtils.currentLine=45088773; - //BA.debugLineNum = 45088773;BA.debugLine="Dim bcolor As ARGBColor"; -_bcolor = new b4a.example.bitmapcreator._argbcolor(); -RDebugUtils.currentLine=45088774; - //BA.debugLineNum = 45088774;BA.debugLine="bc.ColorToARGB(BackgroundColor, bcolor)"; -__ref._bc /*b4a.example.bitmapcreator*/ ._colortoargb(__ref._backgroundcolor /*int*/ ,_bcolor); -RDebugUtils.currentLine=45088775; - //BA.debugLineNum = 45088775;BA.debugLine="bcolor.r = Min(255, bcolor.r * 1.5)"; -_bcolor.r = (int) (__c.Min(255,_bcolor.r*1.5)); -RDebugUtils.currentLine=45088776; - //BA.debugLineNum = 45088776;BA.debugLine="bcolor.g = Min(255, bcolor.g * 1.5)"; -_bcolor.g = (int) (__c.Min(255,_bcolor.g*1.5)); -RDebugUtils.currentLine=45088777; - //BA.debugLineNum = 45088777;BA.debugLine="bcolor.b = Min(255, bcolor.b * 1.5)"; -_bcolor.b = (int) (__c.Min(255,_bcolor.b*1.5)); -RDebugUtils.currentLine=45088778; - //BA.debugLineNum = 45088778;BA.debugLine="If Vertical Then"; -if (__ref._vertical /*boolean*/ ) { -RDebugUtils.currentLine=45088779; - //BA.debugLineNum = 45088779;BA.debugLine="Template.Initialize(mBase.Width / xui.Scale, mBa"; -_template._initialize(ba,(int) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getScale()),(int) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getScale()+_width)); - }else { -RDebugUtils.currentLine=45088781; - //BA.debugLineNum = 45088781;BA.debugLine="Template.Initialize(mBase.Height / xui.Scale + W"; -_template._initialize(ba,(int) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()/(double)__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getScale()+_width),(int) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()/(double)__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getScale())); - }; -RDebugUtils.currentLine=45088784; - //BA.debugLineNum = 45088784;BA.debugLine="Template.DrawRect(Template.TargetRect, Background"; -_template._drawrect(_template._targetrect,__ref._backgroundcolor /*int*/ ,__c.True,(int) (0)); -RDebugUtils.currentLine=45088785; - //BA.debugLineNum = 45088785;BA.debugLine="If Vertical Then"; -if (__ref._vertical /*boolean*/ ) { -RDebugUtils.currentLine=45088786; - //BA.debugLineNum = 45088786;BA.debugLine="Template.DrawLine(-Width / 2, Width / 2, Templat"; -_template._drawline((float) (-_width/(double)2),(float) (_width/(double)2),(float) (_template._mwidth+_width/(double)2),(float) (_template._mheight-_width/(double)2),__ref._bc /*b4a.example.bitmapcreator*/ ._argbtocolor(_bcolor),_width); - }else { -RDebugUtils.currentLine=45088788; - //BA.debugLineNum = 45088788;BA.debugLine="Template.DrawLine(Width / 2, -Width / 2, Templat"; -_template._drawline((float) (_width/(double)2),(float) (-_width/(double)2),(float) (_template._mwidth-_width/(double)2),(float) (_template._mheight+_width/(double)2),__ref._bc /*b4a.example.bitmapcreator*/ ._argbtocolor(_bcolor),_width); - }; -RDebugUtils.currentLine=45088790; - //BA.debugLineNum = 45088790;BA.debugLine="BusyBrush = bc.CreateBrushFromBitmapCreator(Templ"; -__ref._busybrush /*b4a.example.bcpath._bcbrush*/ = __ref._bc /*b4a.example.bitmapcreator*/ ._createbrushfrombitmapcreator(_template); -RDebugUtils.currentLine=45088791; - //BA.debugLineNum = 45088791;BA.debugLine="If mValue = 100 Then"; -if (__ref._mvalue /*int*/ ==100) { -RDebugUtils.currentLine=45088792; - //BA.debugLineNum = 45088792;BA.debugLine="bc.DrawRectRounded(bc.TargetRect, BackgroundColo"; -__ref._bc /*b4a.example.bitmapcreator*/ ._drawrectrounded(__ref._bc /*b4a.example.bitmapcreator*/ ._targetrect,__ref._backgroundcolor /*int*/ ,__c.True,(int) (0),(int) (15)); - }else { -RDebugUtils.currentLine=45088794; - //BA.debugLineNum = 45088794;BA.debugLine="bc.DrawRectRounded2(bc.TargetRect, EmptyBrush, T"; -__ref._bc /*b4a.example.bitmapcreator*/ ._drawrectrounded2(__ref._bc /*b4a.example.bitmapcreator*/ ._targetrect,__ref._emptybrush /*b4a.example.bcpath._bcbrush*/ ,__c.True,(int) (0),(int) (15)); - }; -RDebugUtils.currentLine=45088796; - //BA.debugLineNum = 45088796;BA.debugLine="bc.SetBitmapToImageView(bc.Bitmap, mIV)"; -__ref._bc /*b4a.example.bitmapcreator*/ ._setbitmaptoimageview(__ref._bc /*b4a.example.bitmapcreator*/ ._getbitmap(),__ref._miv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ); -RDebugUtils.currentLine=45088797; - //BA.debugLineNum = 45088797;BA.debugLine="setVisible(mBase.Visible)"; -__ref._setvisible /*String*/ (null,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getVisible()); -RDebugUtils.currentLine=45088798; - //BA.debugLineNum = 45088798;BA.debugLine="End Sub"; -return ""; -} -public void _busyloop(keymon.lat.medicomed.anotherprogressbar __ref) throws Exception{ -RDebugUtils.currentModule="anotherprogressbar"; -if (Debug.shouldDelegate(ba, "busyloop", true)) - {Debug.delegate(ba, "busyloop", null); return;} -ResumableSub_BusyLoop rsub = new ResumableSub_BusyLoop(this,__ref); +public void _busyloop() throws Exception{ +ResumableSub_BusyLoop rsub = new ResumableSub_BusyLoop(this); rsub.resume(ba, null); } public static class ResumableSub_BusyLoop extends BA.ResumableSub { -public ResumableSub_BusyLoop(keymon.lat.medicomed.anotherprogressbar parent,keymon.lat.medicomed.anotherprogressbar __ref) { +public ResumableSub_BusyLoop(keymon.lat.medicomed.anotherprogressbar parent) { this.parent = parent; -this.__ref = __ref; -this.__ref = parent; } -keymon.lat.medicomed.anotherprogressbar __ref; keymon.lat.medicomed.anotherprogressbar parent; int _myindex = 0; anywheresoftware.b4a.objects.B4XCanvas.B4XRect _r = null; @@ -209,7 +99,6 @@ anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _bmp = null; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="anotherprogressbar"; while (true) { switch (state) { @@ -219,26 +108,21 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=44892161; - //BA.debugLineNum = 44892161;BA.debugLine="Dim MyIndex As Int = BusyIndex"; -_myindex = __ref._busyindex /*int*/ ; -RDebugUtils.currentLine=44892162; - //BA.debugLineNum = 44892162;BA.debugLine="Dim r As B4XRect"; + //BA.debugLineNum = 60;BA.debugLine="Dim MyIndex As Int = BusyIndex"; +_myindex = parent._busyindex; + //BA.debugLineNum = 61;BA.debugLine="Dim r As B4XRect"; _r = new anywheresoftware.b4a.objects.B4XCanvas.B4XRect(); -RDebugUtils.currentLine=44892163; - //BA.debugLineNum = 44892163;BA.debugLine="r.Initialize(0, 0, bc.mWidth, bc.mHeight)"; -_r.Initialize((float) (0),(float) (0),(float) (__ref._bc /*b4a.example.bitmapcreator*/ ._mwidth),(float) (__ref._bc /*b4a.example.bitmapcreator*/ ._mheight)); -RDebugUtils.currentLine=44892164; - //BA.debugLineNum = 44892164;BA.debugLine="Dim LastTime As Long = DateTime.Now"; + //BA.debugLineNum = 62;BA.debugLine="r.Initialize(0, 0, bc.mWidth, bc.mHeight)"; +_r.Initialize((float) (0),(float) (0),(float) (parent._bc._mwidth),(float) (parent._bc._mheight)); + //BA.debugLineNum = 63;BA.debugLine="Dim LastTime As Long = DateTime.Now"; _lasttime = parent.__c.DateTime.getNow(); -RDebugUtils.currentLine=44892165; - //BA.debugLineNum = 44892165;BA.debugLine="Do While MyIndex = BusyIndex"; + //BA.debugLineNum = 64;BA.debugLine="Do While MyIndex = BusyIndex"; if (true) break; case 1: //do while this.state = 37; -while (_myindex==__ref._busyindex /*int*/ ) { +while (_myindex==parent._busyindex) { this.state = 3; if (true) break; } @@ -247,14 +131,13 @@ if (true) break; case 3: //C this.state = 4; -RDebugUtils.currentLine=44892166; - //BA.debugLineNum = 44892166;BA.debugLine="If Vertical Then"; + //BA.debugLineNum = 65;BA.debugLine="If Vertical Then"; if (true) break; case 4: //if this.state = 9; -if (__ref._vertical /*boolean*/ ) { +if (parent._vertical) { this.state = 6; }else { this.state = 8; @@ -263,37 +146,30 @@ this.state = 8; case 6: //C this.state = 9; -RDebugUtils.currentLine=44892167; - //BA.debugLineNum = 44892167;BA.debugLine="BusyBrush.SrcOffsetY = BusyBrush.SrcOffsetY + B"; -__ref._busybrush /*b4a.example.bcpath._bcbrush*/ .SrcOffsetY = (int) (__ref._busybrush /*b4a.example.bcpath._bcbrush*/ .SrcOffsetY+__ref._brushoffsetdelta /*int*/ ); + //BA.debugLineNum = 66;BA.debugLine="BusyBrush.SrcOffsetY = BusyBrush.SrcOffsetY + B"; +parent._busybrush.SrcOffsetY = (int) (parent._busybrush.SrcOffsetY+parent._brushoffsetdelta); if (true) break; case 8: //C this.state = 9; -RDebugUtils.currentLine=44892169; - //BA.debugLineNum = 44892169;BA.debugLine="BusyBrush.SrcOffsetX = BusyBrush.SrcOffsetX + B"; -__ref._busybrush /*b4a.example.bcpath._bcbrush*/ .SrcOffsetX = (int) (__ref._busybrush /*b4a.example.bcpath._bcbrush*/ .SrcOffsetX+__ref._brushoffsetdelta /*int*/ ); + //BA.debugLineNum = 68;BA.debugLine="BusyBrush.SrcOffsetX = BusyBrush.SrcOffsetX + B"; +parent._busybrush.SrcOffsetX = (int) (parent._busybrush.SrcOffsetX+parent._brushoffsetdelta); if (true) break; case 9: //C this.state = 10; ; -RDebugUtils.currentLine=44892171; - //BA.debugLineNum = 44892171;BA.debugLine="Dim tasks As List"; + //BA.debugLineNum = 70;BA.debugLine="Dim tasks As List"; _tasks = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=44892172; - //BA.debugLineNum = 44892172;BA.debugLine="tasks.Initialize"; + //BA.debugLineNum = 71;BA.debugLine="tasks.Initialize"; _tasks.Initialize(); -RDebugUtils.currentLine=44892173; - //BA.debugLineNum = 44892173;BA.debugLine="tasks.Add(bc.AsyncDrawRect(bc.TargetRect, Transp"; -_tasks.Add((Object)(__ref._bc /*b4a.example.bitmapcreator*/ ._asyncdrawrect(__ref._bc /*b4a.example.bitmapcreator*/ ._targetrect,__ref._transparentbrush /*b4a.example.bcpath._bcbrush*/ ,parent.__c.True,(int) (0)))); -RDebugUtils.currentLine=44892174; - //BA.debugLineNum = 44892174;BA.debugLine="Dim delta As Float = mValue - CurrentValue"; -_delta = (float) (__ref._mvalue /*int*/ -__ref._currentvalue /*float*/ ); -RDebugUtils.currentLine=44892175; - //BA.debugLineNum = 44892175;BA.debugLine="If Abs(delta) <= 1 Then"; + //BA.debugLineNum = 72;BA.debugLine="tasks.Add(bc.AsyncDrawRect(bc.TargetRect, Transp"; +_tasks.Add((Object)(parent._bc._asyncdrawrect(parent._bc._targetrect,parent._transparentbrush,parent.__c.True,(int) (0)))); + //BA.debugLineNum = 73;BA.debugLine="Dim delta As Float = mValue - CurrentValue"; +_delta = (float) (parent._mvalue-parent._currentvalue); + //BA.debugLineNum = 74;BA.debugLine="If Abs(delta) <= 1 Then"; if (true) break; case 10: @@ -308,19 +184,16 @@ this.state = 14; case 12: //C this.state = 21; -RDebugUtils.currentLine=44892176; - //BA.debugLineNum = 44892176;BA.debugLine="CurrentValue = mValue"; -__ref._currentvalue /*float*/ = (float) (__ref._mvalue /*int*/ ); + //BA.debugLineNum = 75;BA.debugLine="CurrentValue = mValue"; +parent._currentvalue = (float) (parent._mvalue); if (true) break; case 14: //C this.state = 15; -RDebugUtils.currentLine=44892178; - //BA.debugLineNum = 44892178;BA.debugLine="Dim change As Float = (DateTime.Now - LastTime)"; -_change = (float) ((parent.__c.DateTime.getNow()-_lasttime)/(double)1000*__ref._valuechangepersecond /*float*/ ); -RDebugUtils.currentLine=44892179; - //BA.debugLineNum = 44892179;BA.debugLine="If delta > 0 Then"; + //BA.debugLineNum = 77;BA.debugLine="Dim change As Float = (DateTime.Now - LastTime)"; +_change = (float) ((parent.__c.DateTime.getNow()-_lasttime)/(double)1000*parent._valuechangepersecond); + //BA.debugLineNum = 78;BA.debugLine="If delta > 0 Then"; if (true) break; case 15: @@ -335,17 +208,15 @@ this.state = 19; case 17: //C this.state = 20; -RDebugUtils.currentLine=44892180; - //BA.debugLineNum = 44892180;BA.debugLine="CurrentValue = CurrentValue + Min(change, mVal"; -__ref._currentvalue /*float*/ = (float) (__ref._currentvalue /*float*/ +parent.__c.Min(_change,__ref._mvalue /*int*/ -__ref._currentvalue /*float*/ )); + //BA.debugLineNum = 79;BA.debugLine="CurrentValue = CurrentValue + Min(change, mVal"; +parent._currentvalue = (float) (parent._currentvalue+parent.__c.Min(_change,parent._mvalue-parent._currentvalue)); if (true) break; case 19: //C this.state = 20; -RDebugUtils.currentLine=44892182; - //BA.debugLineNum = 44892182;BA.debugLine="CurrentValue = CurrentValue - Min(change, Curr"; -__ref._currentvalue /*float*/ = (float) (__ref._currentvalue /*float*/ -parent.__c.Min(_change,__ref._currentvalue /*float*/ -__ref._mvalue /*int*/ )); + //BA.debugLineNum = 81;BA.debugLine="CurrentValue = CurrentValue - Min(change, Curr"; +parent._currentvalue = (float) (parent._currentvalue-parent.__c.Min(_change,parent._currentvalue-parent._mvalue)); if (true) break; case 20: @@ -358,35 +229,31 @@ case 21: //C this.state = 22; ; -RDebugUtils.currentLine=44892185; - //BA.debugLineNum = 44892185;BA.debugLine="LastTime = DateTime.Now"; + //BA.debugLineNum = 84;BA.debugLine="LastTime = DateTime.Now"; _lasttime = parent.__c.DateTime.getNow(); -RDebugUtils.currentLine=44892186; - //BA.debugLineNum = 44892186;BA.debugLine="If CurrentValue < 100 Then"; + //BA.debugLineNum = 85;BA.debugLine="If CurrentValue < 100 Then"; if (true) break; case 22: //if this.state = 25; -if (__ref._currentvalue /*float*/ <100) { +if (parent._currentvalue<100) { this.state = 24; }if (true) break; case 24: //C this.state = 25; -RDebugUtils.currentLine=44892187; - //BA.debugLineNum = 44892187;BA.debugLine="tasks.Add(bc.AsyncDrawRectRounded(bc.TargetRect"; -_tasks.Add((Object)(__ref._bc /*b4a.example.bitmapcreator*/ ._asyncdrawrectrounded(__ref._bc /*b4a.example.bitmapcreator*/ ._targetrect,__ref._emptybrush /*b4a.example.bcpath._bcbrush*/ ,parent.__c.True,(int) (0),__ref._cornerradius /*int*/ ))); + //BA.debugLineNum = 86;BA.debugLine="tasks.Add(bc.AsyncDrawRectRounded(bc.TargetRect"; +_tasks.Add((Object)(parent._bc._asyncdrawrectrounded(parent._bc._targetrect,parent._emptybrush,parent.__c.True,(int) (0),parent._cornerradius))); if (true) break; ; -RDebugUtils.currentLine=44892189; - //BA.debugLineNum = 44892189;BA.debugLine="If Vertical Then"; + //BA.debugLineNum = 88;BA.debugLine="If Vertical Then"; case 25: //if this.state = 30; -if (__ref._vertical /*boolean*/ ) { +if (parent._vertical) { this.state = 27; }else { this.state = 29; @@ -395,66 +262,58 @@ this.state = 29; case 27: //C this.state = 30; -RDebugUtils.currentLine=44892190; - //BA.debugLineNum = 44892190;BA.debugLine="r.Bottom = Round(CurrentValue / 100 * bc.mHeigh"; -_r.setBottom((float) (parent.__c.Round(__ref._currentvalue /*float*/ /(double)100*__ref._bc /*b4a.example.bitmapcreator*/ ._mheight))); + //BA.debugLineNum = 89;BA.debugLine="r.Bottom = Round(CurrentValue / 100 * bc.mHeigh"; +_r.setBottom((float) (parent.__c.Round(parent._currentvalue/(double)100*parent._bc._mheight))); if (true) break; case 29: //C this.state = 30; -RDebugUtils.currentLine=44892192; - //BA.debugLineNum = 44892192;BA.debugLine="r.Right = Round(CurrentValue / 100 * bc.mWidth)"; -_r.setRight((float) (parent.__c.Round(__ref._currentvalue /*float*/ /(double)100*__ref._bc /*b4a.example.bitmapcreator*/ ._mwidth))); + //BA.debugLineNum = 91;BA.debugLine="r.Right = Round(CurrentValue / 100 * bc.mWidth)"; +_r.setRight((float) (parent.__c.Round(parent._currentvalue/(double)100*parent._bc._mwidth))); if (true) break; case 30: //C this.state = 31; ; -RDebugUtils.currentLine=44892195; - //BA.debugLineNum = 44892195;BA.debugLine="tasks.Add(bc.AsyncDrawRectRounded(r, BusyBrush,"; -_tasks.Add((Object)(__ref._bc /*b4a.example.bitmapcreator*/ ._asyncdrawrectrounded(_r,__ref._busybrush /*b4a.example.bcpath._bcbrush*/ ,parent.__c.True,(int) (0),__ref._cornerradius /*int*/ ))); -RDebugUtils.currentLine=44892196; - //BA.debugLineNum = 44892196;BA.debugLine="bc.DrawBitmapCreatorsAsync(Me, \"BC\", tasks)"; -__ref._bc /*b4a.example.bitmapcreator*/ ._drawbitmapcreatorsasync(parent,"BC",_tasks); -RDebugUtils.currentLine=44892197; - //BA.debugLineNum = 44892197;BA.debugLine="Wait For BC_BitmapReady (bmp As B4XBitmap)"; -parent.__c.WaitFor("bc_bitmapready", ba, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "anotherprogressbar", "busyloop"), null); + //BA.debugLineNum = 94;BA.debugLine="tasks.Add(bc.AsyncDrawRectRounded(r, BusyBrush,"; +_tasks.Add((Object)(parent._bc._asyncdrawrectrounded(_r,parent._busybrush,parent.__c.True,(int) (0),parent._cornerradius))); + //BA.debugLineNum = 95;BA.debugLine="bc.DrawBitmapCreatorsAsync(Me, \"BC\", tasks)"; +parent._bc._drawbitmapcreatorsasync(parent,"BC",_tasks); + //BA.debugLineNum = 96;BA.debugLine="Wait For BC_BitmapReady (bmp As B4XBitmap)"; +parent.__c.WaitFor("bc_bitmapready", ba, this, null); this.state = 38; return; case 38: //C this.state = 31; -_bmp = (anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper) result[1]; +_bmp = (anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper) result[0]; ; -RDebugUtils.currentLine=44892198; - //BA.debugLineNum = 44892198;BA.debugLine="If xui.IsB4J Then bmp = bc.Bitmap"; + //BA.debugLineNum = 97;BA.debugLine="If xui.IsB4J Then bmp = bc.Bitmap"; if (true) break; case 31: //if this.state = 36; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4J()) { +if (parent._xui.getIsB4J()) { this.state = 33; ;}if (true) break; case 33: //C this.state = 36; -_bmp = __ref._bc /*b4a.example.bitmapcreator*/ ._getbitmap(); +_bmp = parent._bc._getbitmap(); if (true) break; case 36: //C this.state = 1; ; -RDebugUtils.currentLine=44892199; - //BA.debugLineNum = 44892199;BA.debugLine="bc.SetBitmapToImageView(bmp, mIV)"; -__ref._bc /*b4a.example.bitmapcreator*/ ._setbitmaptoimageview(_bmp,__ref._miv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ); -RDebugUtils.currentLine=44892200; - //BA.debugLineNum = 44892200;BA.debugLine="Sleep(30)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "anotherprogressbar", "busyloop"),(int) (30)); + //BA.debugLineNum = 98;BA.debugLine="bc.SetBitmapToImageView(bmp, mIV)"; +parent._bc._setbitmaptoimageview(_bmp,parent._miv); + //BA.debugLineNum = 99;BA.debugLine="Sleep(30)"; +parent.__c.Sleep(ba,this,(int) (30)); this.state = 39; return; case 39: @@ -467,267 +326,224 @@ case 37: //C this.state = -1; ; -RDebugUtils.currentLine=44892202; - //BA.debugLineNum = 44892202;BA.debugLine="End Sub"; + //BA.debugLineNum = 101;BA.debugLine="End Sub"; if (true) break; } } } } -public String _class_globals(keymon.lat.medicomed.anotherprogressbar __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="anotherprogressbar"; -RDebugUtils.currentLine=44630016; - //BA.debugLineNum = 44630016;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=44630017; - //BA.debugLineNum = 44630017;BA.debugLine="Private mEventName As String 'ignore"; +public void _bc_bitmapready(anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _bmp) throws Exception{ +} +public String _class_globals() throws Exception{ + //BA.debugLineNum = 4;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 5;BA.debugLine="Private mEventName As String 'ignore"; _meventname = ""; -RDebugUtils.currentLine=44630018; - //BA.debugLineNum = 44630018;BA.debugLine="Private mCallBack As Object 'ignore"; + //BA.debugLineNum = 6;BA.debugLine="Private mCallBack As Object 'ignore"; _mcallback = new Object(); -RDebugUtils.currentLine=44630019; - //BA.debugLineNum = 44630019;BA.debugLine="Public mBase As B4XView 'ignore"; + //BA.debugLineNum = 7;BA.debugLine="Public mBase As B4XView 'ignore"; _mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=44630020; - //BA.debugLineNum = 44630020;BA.debugLine="Private xui As XUI 'ignore"; + //BA.debugLineNum = 8;BA.debugLine="Private xui As XUI 'ignore"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=44630021; - //BA.debugLineNum = 44630021;BA.debugLine="Private BusyBrush As BCBrush"; + //BA.debugLineNum = 9;BA.debugLine="Private BusyBrush As BCBrush"; _busybrush = new b4a.example.bcpath._bcbrush(); -RDebugUtils.currentLine=44630022; - //BA.debugLineNum = 44630022;BA.debugLine="Private BackgroundColor As Int"; + //BA.debugLineNum = 10;BA.debugLine="Private BackgroundColor As Int"; _backgroundcolor = 0; -RDebugUtils.currentLine=44630023; - //BA.debugLineNum = 44630023;BA.debugLine="Private BusyIndex As Int"; + //BA.debugLineNum = 11;BA.debugLine="Private BusyIndex As Int"; _busyindex = 0; -RDebugUtils.currentLine=44630024; - //BA.debugLineNum = 44630024;BA.debugLine="Private bc As BitmapCreator"; + //BA.debugLineNum = 12;BA.debugLine="Private bc As BitmapCreator"; _bc = new b4a.example.bitmapcreator(); -RDebugUtils.currentLine=44630025; - //BA.debugLineNum = 44630025;BA.debugLine="Private mIV As B4XView"; + //BA.debugLineNum = 13;BA.debugLine="Private mIV As B4XView"; _miv = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=44630026; - //BA.debugLineNum = 44630026;BA.debugLine="Private TransparentBrush As BCBrush"; + //BA.debugLineNum = 14;BA.debugLine="Private TransparentBrush As BCBrush"; _transparentbrush = new b4a.example.bcpath._bcbrush(); -RDebugUtils.currentLine=44630027; - //BA.debugLineNum = 44630027;BA.debugLine="Private Vertical As Boolean"; + //BA.debugLineNum = 15;BA.debugLine="Private Vertical As Boolean"; _vertical = false; -RDebugUtils.currentLine=44630028; - //BA.debugLineNum = 44630028;BA.debugLine="Private CurrentValue As Float"; + //BA.debugLineNum = 16;BA.debugLine="Private CurrentValue As Float"; _currentvalue = 0f; -RDebugUtils.currentLine=44630029; - //BA.debugLineNum = 44630029;BA.debugLine="Public EmptyColor As Int = xui.Color_White"; -_emptycolor = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_White; -RDebugUtils.currentLine=44630030; - //BA.debugLineNum = 44630030;BA.debugLine="Private EmptyBrush As BCBrush"; + //BA.debugLineNum = 17;BA.debugLine="Public EmptyColor As Int = xui.Color_White"; +_emptycolor = _xui.Color_White; + //BA.debugLineNum = 18;BA.debugLine="Private EmptyBrush As BCBrush"; _emptybrush = new b4a.example.bcpath._bcbrush(); -RDebugUtils.currentLine=44630031; - //BA.debugLineNum = 44630031;BA.debugLine="Private mValue As Int"; + //BA.debugLineNum = 19;BA.debugLine="Private mValue As Int"; _mvalue = 0; -RDebugUtils.currentLine=44630032; - //BA.debugLineNum = 44630032;BA.debugLine="Public Tag As Object"; + //BA.debugLineNum = 20;BA.debugLine="Public Tag As Object"; _tag = new Object(); -RDebugUtils.currentLine=44630033; - //BA.debugLineNum = 44630033;BA.debugLine="Public ValueChangePerSecond As Float = 60"; + //BA.debugLineNum = 21;BA.debugLine="Public ValueChangePerSecond As Float = 60"; _valuechangepersecond = (float) (60); -RDebugUtils.currentLine=44630034; - //BA.debugLineNum = 44630034;BA.debugLine="Public CornerRadius As Int"; + //BA.debugLineNum = 22;BA.debugLine="Public CornerRadius As Int"; _cornerradius = 0; -RDebugUtils.currentLine=44630035; - //BA.debugLineNum = 44630035;BA.debugLine="Public BrushOffsetDelta As Int = 3"; + //BA.debugLineNum = 23;BA.debugLine="Public BrushOffsetDelta As Int = 3"; _brushoffsetdelta = (int) (3); -RDebugUtils.currentLine=44630036; - //BA.debugLineNum = 44630036;BA.debugLine="End Sub"; + //BA.debugLineNum = 24;BA.debugLine="End Sub"; return ""; } -public String _designercreateview(keymon.lat.medicomed.anotherprogressbar __ref,Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ -__ref = this; -RDebugUtils.currentModule="anotherprogressbar"; -if (Debug.shouldDelegate(ba, "designercreateview", true)) - {return ((String) Debug.delegate(ba, "designercreateview", new Object[] {_base,_lbl,_props}));} +public String _designercreateview(Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ anywheresoftware.b4a.objects.ImageViewWrapper _iv = null; -RDebugUtils.currentLine=44761088; - //BA.debugLineNum = 44761088;BA.debugLine="Public Sub DesignerCreateView (Base As Object, lbl"; -RDebugUtils.currentLine=44761089; - //BA.debugLineNum = 44761089;BA.debugLine="mBase = Base"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); -RDebugUtils.currentLine=44761090; - //BA.debugLineNum = 44761090;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._tag /*Object*/ = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getTag(); -RDebugUtils.currentLine=44761090; - //BA.debugLineNum = 44761090;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag(this); -RDebugUtils.currentLine=44761091; - //BA.debugLineNum = 44761091;BA.debugLine="Dim iv As ImageView"; + //BA.debugLineNum = 32;BA.debugLine="Public Sub DesignerCreateView (Base As Object, lbl"; + //BA.debugLineNum = 33;BA.debugLine="mBase = Base"; +_mbase = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); + //BA.debugLineNum = 34;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_tag = _mbase.getTag(); + //BA.debugLineNum = 34;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_mbase.setTag(this); + //BA.debugLineNum = 35;BA.debugLine="Dim iv As ImageView"; _iv = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=44761092; - //BA.debugLineNum = 44761092;BA.debugLine="iv.Initialize(\"\")"; + //BA.debugLineNum = 36;BA.debugLine="iv.Initialize(\"\")"; _iv.Initialize(ba,""); -RDebugUtils.currentLine=44761093; - //BA.debugLineNum = 44761093;BA.debugLine="mIV = iv"; -__ref._miv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_iv.getObject())); -RDebugUtils.currentLine=44761094; - //BA.debugLineNum = 44761094;BA.debugLine="mIV.Color = xui.Color_Transparent"; -__ref._miv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setColor(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent); -RDebugUtils.currentLine=44761095; - //BA.debugLineNum = 44761095;BA.debugLine="setValue(Props.GetDefault(\"Value\", 100))"; -__ref._setvalue /*String*/ (null,(int)(BA.ObjectToNumber(_props.GetDefault((Object)("Value"),(Object)(100))))); -RDebugUtils.currentLine=44761096; - //BA.debugLineNum = 44761096;BA.debugLine="CurrentValue = mValue"; -__ref._currentvalue /*float*/ = (float) (__ref._mvalue /*int*/ ); -RDebugUtils.currentLine=44761097; - //BA.debugLineNum = 44761097;BA.debugLine="mBase.AddView(mIV, 0, 0, 0, 0)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._miv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=44761098; - //BA.debugLineNum = 44761098;BA.debugLine="mBase.AddView(lbl, 0, 0, mBase.Width, mBase.Heigh"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(_lbl.getObject()),(int) (0),(int) (0),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=44761099; - //BA.debugLineNum = 44761099;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0,"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetColorAndBorder(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent,(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=44761100; - //BA.debugLineNum = 44761100;BA.debugLine="BackgroundColor = xui.PaintOrColorToColor(Props.G"; -__ref._backgroundcolor /*int*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor(_props.Get((Object)("ProgressColor"))); -RDebugUtils.currentLine=44761101; - //BA.debugLineNum = 44761101;BA.debugLine="CornerRadius = Props.GetDefault(\"CornerRadius\", 1"; -__ref._cornerradius /*int*/ = (int)(BA.ObjectToNumber(_props.GetDefault((Object)("CornerRadius"),(Object)(15)))); -RDebugUtils.currentLine=44761102; - //BA.debugLineNum = 44761102;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; -__ref._base_resize /*String*/ (null,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=44761103; - //BA.debugLineNum = 44761103;BA.debugLine="End Sub"; + //BA.debugLineNum = 37;BA.debugLine="mIV = iv"; +_miv = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_iv.getObject())); + //BA.debugLineNum = 38;BA.debugLine="mIV.Color = xui.Color_Transparent"; +_miv.setColor(_xui.Color_Transparent); + //BA.debugLineNum = 39;BA.debugLine="setValue(Props.GetDefault(\"Value\", 100))"; +_setvalue((int)(BA.ObjectToNumber(_props.GetDefault((Object)("Value"),(Object)(100))))); + //BA.debugLineNum = 40;BA.debugLine="CurrentValue = mValue"; +_currentvalue = (float) (_mvalue); + //BA.debugLineNum = 41;BA.debugLine="mBase.AddView(mIV, 0, 0, 0, 0)"; +_mbase.AddView((android.view.View)(_miv.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 42;BA.debugLine="mBase.AddView(lbl, 0, 0, mBase.Width, mBase.Heigh"; +_mbase.AddView((android.view.View)(_lbl.getObject()),(int) (0),(int) (0),_mbase.getWidth(),_mbase.getHeight()); + //BA.debugLineNum = 43;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0,"; +_mbase.SetColorAndBorder(_xui.Color_Transparent,(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 44;BA.debugLine="BackgroundColor = xui.PaintOrColorToColor(Props.G"; +_backgroundcolor = _xui.PaintOrColorToColor(_props.Get((Object)("ProgressColor"))); + //BA.debugLineNum = 45;BA.debugLine="CornerRadius = Props.GetDefault(\"CornerRadius\", 1"; +_cornerradius = (int)(BA.ObjectToNumber(_props.GetDefault((Object)("CornerRadius"),(Object)(15)))); + //BA.debugLineNum = 46;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; +_base_resize(_mbase.getWidth(),_mbase.getHeight()); + //BA.debugLineNum = 47;BA.debugLine="End Sub"; return ""; } -public String _setvalue(keymon.lat.medicomed.anotherprogressbar __ref,int _v) throws Exception{ -__ref = this; -RDebugUtils.currentModule="anotherprogressbar"; -if (Debug.shouldDelegate(ba, "setvalue", true)) - {return ((String) Debug.delegate(ba, "setvalue", new Object[] {_v}));} -RDebugUtils.currentLine=45350912; - //BA.debugLineNum = 45350912;BA.debugLine="Public Sub setValue (v As Int)"; -RDebugUtils.currentLine=45350913; - //BA.debugLineNum = 45350913;BA.debugLine="mValue = Max(0, Min(100, v))"; -__ref._mvalue /*int*/ = (int) (__c.Max(0,__c.Min(100,_v))); -RDebugUtils.currentLine=45350914; - //BA.debugLineNum = 45350914;BA.debugLine="End Sub"; -return ""; -} -public int _getprogresscolor(keymon.lat.medicomed.anotherprogressbar __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="anotherprogressbar"; -if (Debug.shouldDelegate(ba, "getprogresscolor", true)) - {return ((Integer) Debug.delegate(ba, "getprogresscolor", null));} -RDebugUtils.currentLine=44957696; - //BA.debugLineNum = 44957696;BA.debugLine="Public Sub getProgressColor As Int"; -RDebugUtils.currentLine=44957697; - //BA.debugLineNum = 44957697;BA.debugLine="Return BackgroundColor"; -if (true) return __ref._backgroundcolor /*int*/ ; -RDebugUtils.currentLine=44957698; - //BA.debugLineNum = 44957698;BA.debugLine="End Sub"; +public int _getprogresscolor() throws Exception{ + //BA.debugLineNum = 103;BA.debugLine="Public Sub getProgressColor As Int"; + //BA.debugLineNum = 104;BA.debugLine="Return BackgroundColor"; +if (true) return _backgroundcolor; + //BA.debugLineNum = 105;BA.debugLine="End Sub"; return 0; } -public int _getvalue(keymon.lat.medicomed.anotherprogressbar __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="anotherprogressbar"; -if (Debug.shouldDelegate(ba, "getvalue", true)) - {return ((Integer) Debug.delegate(ba, "getvalue", null));} -RDebugUtils.currentLine=45285376; - //BA.debugLineNum = 45285376;BA.debugLine="Public Sub getValue As Int"; -RDebugUtils.currentLine=45285377; - //BA.debugLineNum = 45285377;BA.debugLine="Return mValue"; -if (true) return __ref._mvalue /*int*/ ; -RDebugUtils.currentLine=45285378; - //BA.debugLineNum = 45285378;BA.debugLine="End Sub"; +public int _getvalue() throws Exception{ + //BA.debugLineNum = 157;BA.debugLine="Public Sub getValue As Int"; + //BA.debugLineNum = 158;BA.debugLine="Return mValue"; +if (true) return _mvalue; + //BA.debugLineNum = 159;BA.debugLine="End Sub"; return 0; } -public boolean _getvisible(keymon.lat.medicomed.anotherprogressbar __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="anotherprogressbar"; -if (Debug.shouldDelegate(ba, "getvisible", true)) - {return ((Boolean) Debug.delegate(ba, "getvisible", null));} -RDebugUtils.currentLine=45219840; - //BA.debugLineNum = 45219840;BA.debugLine="Public Sub getVisible As Boolean"; -RDebugUtils.currentLine=45219841; - //BA.debugLineNum = 45219841;BA.debugLine="Return mBase.Visible"; -if (true) return __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getVisible(); -RDebugUtils.currentLine=45219842; - //BA.debugLineNum = 45219842;BA.debugLine="End Sub"; +public boolean _getvisible() throws Exception{ + //BA.debugLineNum = 153;BA.debugLine="Public Sub getVisible As Boolean"; + //BA.debugLineNum = 154;BA.debugLine="Return mBase.Visible"; +if (true) return _mbase.getVisible(); + //BA.debugLineNum = 155;BA.debugLine="End Sub"; return false; } -public String _initialize(keymon.lat.medicomed.anotherprogressbar __ref,anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ -__ref = this; +public String _initialize(anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ innerInitialize(_ba); -RDebugUtils.currentModule="anotherprogressbar"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_callback,_eventname}));} -RDebugUtils.currentLine=44695552; - //BA.debugLineNum = 44695552;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -RDebugUtils.currentLine=44695553; - //BA.debugLineNum = 44695553;BA.debugLine="mEventName = EventName"; -__ref._meventname /*String*/ = _eventname; -RDebugUtils.currentLine=44695554; - //BA.debugLineNum = 44695554;BA.debugLine="mCallBack = Callback"; -__ref._mcallback /*Object*/ = _callback; -RDebugUtils.currentLine=44695555; - //BA.debugLineNum = 44695555;BA.debugLine="End Sub"; + //BA.debugLineNum = 26;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; + //BA.debugLineNum = 27;BA.debugLine="mEventName = EventName"; +_meventname = _eventname; + //BA.debugLineNum = 28;BA.debugLine="mCallBack = Callback"; +_mcallback = _callback; + //BA.debugLineNum = 29;BA.debugLine="End Sub"; return ""; } -public String _setprogresscolor(keymon.lat.medicomed.anotherprogressbar __ref,int _c) throws Exception{ -__ref = this; -RDebugUtils.currentModule="anotherprogressbar"; -if (Debug.shouldDelegate(ba, "setprogresscolor", true)) - {return ((String) Debug.delegate(ba, "setprogresscolor", new Object[] {_c}));} -RDebugUtils.currentLine=45023232; - //BA.debugLineNum = 45023232;BA.debugLine="Public Sub setProgressColor (c As Int)"; -RDebugUtils.currentLine=45023233; - //BA.debugLineNum = 45023233;BA.debugLine="BackgroundColor = c"; -__ref._backgroundcolor /*int*/ = _c; -RDebugUtils.currentLine=45023234; - //BA.debugLineNum = 45023234;BA.debugLine="UpdateGraphics"; -__ref._updategraphics /*String*/ (null); -RDebugUtils.currentLine=45023235; - //BA.debugLineNum = 45023235;BA.debugLine="End Sub"; +public String _setprogresscolor(int _c) throws Exception{ + //BA.debugLineNum = 107;BA.debugLine="Public Sub setProgressColor (c As Int)"; + //BA.debugLineNum = 108;BA.debugLine="BackgroundColor = c"; +_backgroundcolor = _c; + //BA.debugLineNum = 109;BA.debugLine="UpdateGraphics"; +_updategraphics(); + //BA.debugLineNum = 110;BA.debugLine="End Sub"; return ""; } -public String _setvaluenoanimation(keymon.lat.medicomed.anotherprogressbar __ref,int _v) throws Exception{ -__ref = this; -RDebugUtils.currentModule="anotherprogressbar"; -if (Debug.shouldDelegate(ba, "setvaluenoanimation", true)) - {return ((String) Debug.delegate(ba, "setvaluenoanimation", new Object[] {_v}));} -RDebugUtils.currentLine=45416448; - //BA.debugLineNum = 45416448;BA.debugLine="Public Sub SetValueNoAnimation (v As Int)"; -RDebugUtils.currentLine=45416449; - //BA.debugLineNum = 45416449;BA.debugLine="setValue(v)"; -__ref._setvalue /*String*/ (null,_v); -RDebugUtils.currentLine=45416450; - //BA.debugLineNum = 45416450;BA.debugLine="CurrentValue = mValue"; -__ref._currentvalue /*float*/ = (float) (__ref._mvalue /*int*/ ); -RDebugUtils.currentLine=45416451; - //BA.debugLineNum = 45416451;BA.debugLine="End Sub"; +public String _setvalue(int _v) throws Exception{ + //BA.debugLineNum = 161;BA.debugLine="Public Sub setValue (v As Int)"; + //BA.debugLineNum = 162;BA.debugLine="mValue = Max(0, Min(100, v))"; +_mvalue = (int) (__c.Max(0,__c.Min(100,_v))); + //BA.debugLineNum = 163;BA.debugLine="End Sub"; return ""; } -public String _setvisible(keymon.lat.medicomed.anotherprogressbar __ref,boolean _b) throws Exception{ -__ref = this; -RDebugUtils.currentModule="anotherprogressbar"; -if (Debug.shouldDelegate(ba, "setvisible", true)) - {return ((String) Debug.delegate(ba, "setvisible", new Object[] {_b}));} -RDebugUtils.currentLine=45154304; - //BA.debugLineNum = 45154304;BA.debugLine="Public Sub setVisible(b As Boolean)"; -RDebugUtils.currentLine=45154305; - //BA.debugLineNum = 45154305;BA.debugLine="BusyIndex = BusyIndex + 1"; -__ref._busyindex /*int*/ = (int) (__ref._busyindex /*int*/ +1); -RDebugUtils.currentLine=45154306; - //BA.debugLineNum = 45154306;BA.debugLine="If b Then"; +public String _setvaluenoanimation(int _v) throws Exception{ + //BA.debugLineNum = 165;BA.debugLine="Public Sub SetValueNoAnimation (v As Int)"; + //BA.debugLineNum = 166;BA.debugLine="setValue(v)"; +_setvalue(_v); + //BA.debugLineNum = 167;BA.debugLine="CurrentValue = mValue"; +_currentvalue = (float) (_mvalue); + //BA.debugLineNum = 168;BA.debugLine="End Sub"; +return ""; +} +public String _setvisible(boolean _b) throws Exception{ + //BA.debugLineNum = 145;BA.debugLine="Public Sub setVisible(b As Boolean)"; + //BA.debugLineNum = 146;BA.debugLine="BusyIndex = BusyIndex + 1"; +_busyindex = (int) (_busyindex+1); + //BA.debugLineNum = 147;BA.debugLine="If b Then"; if (_b) { -RDebugUtils.currentLine=45154307; - //BA.debugLineNum = 45154307;BA.debugLine="BusyLoop"; -__ref._busyloop /*void*/ (null); + //BA.debugLineNum = 148;BA.debugLine="BusyLoop"; +_busyloop(); }; -RDebugUtils.currentLine=45154309; - //BA.debugLineNum = 45154309;BA.debugLine="mBase.Visible = b"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setVisible(_b); -RDebugUtils.currentLine=45154310; - //BA.debugLineNum = 45154310;BA.debugLine="End Sub"; + //BA.debugLineNum = 150;BA.debugLine="mBase.Visible = b"; +_mbase.setVisible(_b); + //BA.debugLineNum = 151;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +public String _updategraphics() throws Exception{ +int _width = 0; +b4a.example.bitmapcreator _template = null; +b4a.example.bitmapcreator._argbcolor _bcolor = null; + //BA.debugLineNum = 112;BA.debugLine="Public Sub UpdateGraphics"; + //BA.debugLineNum = 113;BA.debugLine="EmptyBrush = bc.CreateBrushFromColor(EmptyColor)"; +_emptybrush = _bc._createbrushfromcolor(_emptycolor); + //BA.debugLineNum = 114;BA.debugLine="TransparentBrush = bc.CreateBrushFromColor(xui.Co"; +_transparentbrush = _bc._createbrushfromcolor(_xui.Color_Transparent); + //BA.debugLineNum = 115;BA.debugLine="Dim Width As Int = 40"; +_width = (int) (40); + //BA.debugLineNum = 116;BA.debugLine="Dim Template As BitmapCreator"; +_template = new b4a.example.bitmapcreator(); + //BA.debugLineNum = 117;BA.debugLine="Dim bcolor As ARGBColor"; +_bcolor = new b4a.example.bitmapcreator._argbcolor(); + //BA.debugLineNum = 118;BA.debugLine="bc.ColorToARGB(BackgroundColor, bcolor)"; +_bc._colortoargb(_backgroundcolor,_bcolor); + //BA.debugLineNum = 119;BA.debugLine="bcolor.r = Min(255, bcolor.r * 1.5)"; +_bcolor.r = (int) (__c.Min(255,_bcolor.r*1.5)); + //BA.debugLineNum = 120;BA.debugLine="bcolor.g = Min(255, bcolor.g * 1.5)"; +_bcolor.g = (int) (__c.Min(255,_bcolor.g*1.5)); + //BA.debugLineNum = 121;BA.debugLine="bcolor.b = Min(255, bcolor.b * 1.5)"; +_bcolor.b = (int) (__c.Min(255,_bcolor.b*1.5)); + //BA.debugLineNum = 122;BA.debugLine="If Vertical Then"; +if (_vertical) { + //BA.debugLineNum = 123;BA.debugLine="Template.Initialize(mBase.Width / xui.Scale, mBa"; +_template._initialize(ba,(int) (_mbase.getWidth()/(double)_xui.getScale()),(int) (_mbase.getWidth()/(double)_xui.getScale()+_width)); + }else { + //BA.debugLineNum = 125;BA.debugLine="Template.Initialize(mBase.Height / xui.Scale + W"; +_template._initialize(ba,(int) (_mbase.getHeight()/(double)_xui.getScale()+_width),(int) (_mbase.getHeight()/(double)_xui.getScale())); + }; + //BA.debugLineNum = 128;BA.debugLine="Template.DrawRect(Template.TargetRect, Background"; +_template._drawrect(_template._targetrect,_backgroundcolor,__c.True,(int) (0)); + //BA.debugLineNum = 129;BA.debugLine="If Vertical Then"; +if (_vertical) { + //BA.debugLineNum = 130;BA.debugLine="Template.DrawLine(-Width / 2, Width / 2, Templat"; +_template._drawline((float) (-_width/(double)2),(float) (_width/(double)2),(float) (_template._mwidth+_width/(double)2),(float) (_template._mheight-_width/(double)2),_bc._argbtocolor(_bcolor),_width); + }else { + //BA.debugLineNum = 132;BA.debugLine="Template.DrawLine(Width / 2, -Width / 2, Templat"; +_template._drawline((float) (_width/(double)2),(float) (-_width/(double)2),(float) (_template._mwidth-_width/(double)2),(float) (_template._mheight+_width/(double)2),_bc._argbtocolor(_bcolor),_width); + }; + //BA.debugLineNum = 134;BA.debugLine="BusyBrush = bc.CreateBrushFromBitmapCreator(Templ"; +_busybrush = _bc._createbrushfrombitmapcreator(_template); + //BA.debugLineNum = 135;BA.debugLine="If mValue = 100 Then"; +if (_mvalue==100) { + //BA.debugLineNum = 136;BA.debugLine="bc.DrawRectRounded(bc.TargetRect, BackgroundColo"; +_bc._drawrectrounded(_bc._targetrect,_backgroundcolor,__c.True,(int) (0),(int) (15)); + }else { + //BA.debugLineNum = 138;BA.debugLine="bc.DrawRectRounded2(bc.TargetRect, EmptyBrush, T"; +_bc._drawrectrounded2(_bc._targetrect,_emptybrush,__c.True,(int) (0),(int) (15)); + }; + //BA.debugLineNum = 140;BA.debugLine="bc.SetBitmapToImageView(bc.Bitmap, mIV)"; +_bc._setbitmaptoimageview(_bc._getbitmap(),_miv); + //BA.debugLineNum = 141;BA.debugLine="setVisible(mBase.Visible)"; +_setvisible(_mbase.getVisible()); + //BA.debugLineNum = 142;BA.debugLine="End Sub"; +return ""; +} +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/appupdater.java b/B4A/Objects/src/keymon/lat/medicomed/appupdater.java index e3873de..d9eafe3 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/appupdater.java +++ b/B4A/Objects/src/keymon/lat/medicomed/appupdater.java @@ -14,7 +14,7 @@ public class appupdater extends android.app.Service{ android.content.Intent in = new android.content.Intent(context, appupdater.class); if (intent != null) in.putExtra("b4a_internal_intent", intent); - ServiceHelper.StarterHelper.startServiceFromReceiver (context, in, false, anywheresoftware.b4a.ShellBA.class); + ServiceHelper.StarterHelper.startServiceFromReceiver (context, in, false, BA.class); } } @@ -29,7 +29,7 @@ public class appupdater extends android.app.Service{ super.onCreate(); mostCurrent = this; if (processBA == null) { - processBA = new anywheresoftware.b4a.ShellBA(this, null, null, "keymon.lat.medicomed", "keymon.lat.medicomed.appupdater"); + processBA = new BA(this, null, null, "keymon.lat.medicomed", "keymon.lat.medicomed.appupdater"); if (BA.isShellModeRuntimeCheck(processBA)) { processBA.raiseEvent2(null, true, "SHELL", false); } @@ -127,7 +127,28 @@ public class appupdater extends android.app.Service{ @Override public android.os.IBinder onBind(android.content.Intent intent) { return null; - } + }public anywheresoftware.b4a.keywords.Common __c = null; +public static String _lnk = ""; +public static anywheresoftware.b4a.objects.NotificationWrapper _nnewapp = null; +public static int _nnewappnid = 0; +public static anywheresoftware.b4j.object.JavaObject _nativeme = null; +public static anywheresoftware.b4a.objects.NotificationWrapper _n2 = null; +public static int _n2id = 0; +public static String _sharedfolder = ""; +public static boolean _usefileprovider = false; +public static anywheresoftware.b4a.objects.RuntimePermissions _rp = null; +public static keymon.lat.medicomed.appupdater._mnewversion _newapp = null; +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.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 static class _mnewversion{ public boolean IsInitialized; public boolean update; @@ -151,139 +172,72 @@ appLink = ""; public String toString() { return BA.TypeToString(this, false); }} -public anywheresoftware.b4a.keywords.Common __c = null; -public static String _lnk = ""; -public static anywheresoftware.b4a.objects.NotificationWrapper _nnewapp = null; -public static int _nnewappnid = 0; -public static anywheresoftware.b4j.object.JavaObject _nativeme = null; -public static anywheresoftware.b4a.objects.NotificationWrapper _n2 = null; -public static int _n2id = 0; -public static String _sharedfolder = ""; -public static boolean _usefileprovider = false; -public static anywheresoftware.b4a.objects.RuntimePermissions _rp = null; -public static keymon.lat.medicomed.appupdater._mnewversion _newapp = null; -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.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 static anywheresoftware.b4a.objects.NotificationWrapper _createnotification(String _title,String _content,String _icon,Object _targetactivity,boolean _sound,boolean _vibrate) throws Exception{ -RDebugUtils.currentModule="appupdater"; -if (Debug.shouldDelegate(processBA, "createnotification", false)) - {return ((anywheresoftware.b4a.objects.NotificationWrapper) Debug.delegate(processBA, "createnotification", new Object[] {_title,_content,_icon,_targetactivity,_sound,_vibrate}));} -RDebugUtils.currentLine=19791872; - //BA.debugLineNum = 19791872;BA.debugLine="Private Sub CreateNotification(Title As String, Co"; -RDebugUtils.currentLine=19791873; - //BA.debugLineNum = 19791873;BA.debugLine="n2.Initialize"; + //BA.debugLineNum = 220;BA.debugLine="Private Sub CreateNotification(Title As String, Co"; + //BA.debugLineNum = 221;BA.debugLine="n2.Initialize"; _n2.Initialize(); -RDebugUtils.currentLine=19791874; - //BA.debugLineNum = 19791874;BA.debugLine="n2.Light = False"; + //BA.debugLineNum = 222;BA.debugLine="n2.Light = False"; _n2.setLight(anywheresoftware.b4a.keywords.Common.False); -RDebugUtils.currentLine=19791875; - //BA.debugLineNum = 19791875;BA.debugLine="n2.Vibrate = Vibrate"; + //BA.debugLineNum = 223;BA.debugLine="n2.Vibrate = Vibrate"; _n2.setVibrate(_vibrate); -RDebugUtils.currentLine=19791876; - //BA.debugLineNum = 19791876;BA.debugLine="n2.Sound = Sound"; + //BA.debugLineNum = 224;BA.debugLine="n2.Sound = Sound"; _n2.setSound(_sound); -RDebugUtils.currentLine=19791877; - //BA.debugLineNum = 19791877;BA.debugLine="n2.OnGoingEvent = True"; + //BA.debugLineNum = 225;BA.debugLine="n2.OnGoingEvent = True"; _n2.setOnGoingEvent(anywheresoftware.b4a.keywords.Common.True); -RDebugUtils.currentLine=19791878; - //BA.debugLineNum = 19791878;BA.debugLine="n2.Icon = Icon"; + //BA.debugLineNum = 226;BA.debugLine="n2.Icon = Icon"; _n2.setIcon(_icon); -RDebugUtils.currentLine=19791879; - //BA.debugLineNum = 19791879;BA.debugLine="n2.SetInfo(Title, Content, TargetActivity)"; + //BA.debugLineNum = 227;BA.debugLine="n2.SetInfo(Title, Content, TargetActivity)"; _n2.SetInfoNew(processBA,BA.ObjectToCharSequence(_title),BA.ObjectToCharSequence(_content),_targetactivity); -RDebugUtils.currentLine=19791880; - //BA.debugLineNum = 19791880;BA.debugLine="n2.Notify(nNewAppnID)"; + //BA.debugLineNum = 228;BA.debugLine="n2.Notify(nNewAppnID)"; _n2.Notify(_nnewappnid); -RDebugUtils.currentLine=19791881; - //BA.debugLineNum = 19791881;BA.debugLine="End Sub"; + //BA.debugLineNum = 229;BA.debugLine="End Sub"; return null; } public static anywheresoftware.b4a.objects.NotificationWrapper _createnotification2(String _title,String _content,String _icon,Object _targetactivity,boolean _sound,boolean _vibrate,anywheresoftware.b4a.objects.NotificationWrapper _pn,int _pnid) throws Exception{ -RDebugUtils.currentModule="appupdater"; -if (Debug.shouldDelegate(processBA, "createnotification2", false)) - {return ((anywheresoftware.b4a.objects.NotificationWrapper) Debug.delegate(processBA, "createnotification2", new Object[] {_title,_content,_icon,_targetactivity,_sound,_vibrate,_pn,_pnid}));} -RDebugUtils.currentLine=19726336; - //BA.debugLineNum = 19726336;BA.debugLine="Private Sub CreateNotification2(Title As String, C"; -RDebugUtils.currentLine=19726339; - //BA.debugLineNum = 19726339;BA.debugLine="pN.Initialize2(pN.IMPORTANCE_HIGH)"; + //BA.debugLineNum = 204;BA.debugLine="Private Sub CreateNotification2(Title As String, C"; + //BA.debugLineNum = 207;BA.debugLine="pN.Initialize2(pN.IMPORTANCE_HIGH)"; _pn.Initialize2(_pn.IMPORTANCE_HIGH); -RDebugUtils.currentLine=19726342; - //BA.debugLineNum = 19726342;BA.debugLine="pN.Vibrate = Vibrate"; + //BA.debugLineNum = 210;BA.debugLine="pN.Vibrate = Vibrate"; _pn.setVibrate(_vibrate); -RDebugUtils.currentLine=19726343; - //BA.debugLineNum = 19726343;BA.debugLine="pN.Sound = Sound"; + //BA.debugLineNum = 211;BA.debugLine="pN.Sound = Sound"; _pn.setSound(_sound); -RDebugUtils.currentLine=19726345; - //BA.debugLineNum = 19726345;BA.debugLine="pN.Icon = Icon"; + //BA.debugLineNum = 213;BA.debugLine="pN.Icon = Icon"; _pn.setIcon(_icon); -RDebugUtils.currentLine=19726346; - //BA.debugLineNum = 19726346;BA.debugLine="pN.AutoCancel = True"; + //BA.debugLineNum = 214;BA.debugLine="pN.AutoCancel = True"; _pn.setAutoCancel(anywheresoftware.b4a.keywords.Common.True); -RDebugUtils.currentLine=19726347; - //BA.debugLineNum = 19726347;BA.debugLine="pN.SetInfo(Title, Content, TargetActivity)"; + //BA.debugLineNum = 215;BA.debugLine="pN.SetInfo(Title, Content, TargetActivity)"; _pn.SetInfoNew(processBA,BA.ObjectToCharSequence(_title),BA.ObjectToCharSequence(_content),_targetactivity); -RDebugUtils.currentLine=19726348; - //BA.debugLineNum = 19726348;BA.debugLine="pN.Notify(pNID)"; + //BA.debugLineNum = 216;BA.debugLine="pN.Notify(pNID)"; _pn.Notify(_pnid); -RDebugUtils.currentLine=19726349; - //BA.debugLineNum = 19726349;BA.debugLine="Return pN"; + //BA.debugLineNum = 217;BA.debugLine="Return pN"; if (true) return _pn; -RDebugUtils.currentLine=19726350; - //BA.debugLineNum = 19726350;BA.debugLine="End Sub"; + //BA.debugLineNum = 218;BA.debugLine="End Sub"; return null; } public static keymon.lat.medicomed.httpjob _download(Object _callback,String _link) throws Exception{ -RDebugUtils.currentModule="appupdater"; -if (Debug.shouldDelegate(processBA, "download", false)) - {return ((keymon.lat.medicomed.httpjob) Debug.delegate(processBA, "download", new Object[] {_callback,_link}));} keymon.lat.medicomed.httpjob _j = null; -RDebugUtils.currentLine=19660800; - //BA.debugLineNum = 19660800;BA.debugLine="Sub Download (Callback As Object, link As String)"; -RDebugUtils.currentLine=19660801; - //BA.debugLineNum = 19660801;BA.debugLine="Dim j As HttpJob"; + //BA.debugLineNum = 197;BA.debugLine="Sub Download (Callback As Object, link As String)"; + //BA.debugLineNum = 198;BA.debugLine="Dim j As HttpJob"; _j = new keymon.lat.medicomed.httpjob(); -RDebugUtils.currentLine=19660802; - //BA.debugLineNum = 19660802;BA.debugLine="j.Initialize(\"\", Callback)"; -_j._initialize /*String*/ (null,processBA,"",_callback); -RDebugUtils.currentLine=19660803; - //BA.debugLineNum = 19660803;BA.debugLine="j.Download(link)"; -_j._download /*String*/ (null,_link); -RDebugUtils.currentLine=19660804; - //BA.debugLineNum = 19660804;BA.debugLine="Return j"; + //BA.debugLineNum = 199;BA.debugLine="j.Initialize(\"\", Callback)"; +_j._initialize /*String*/ (processBA,"",_callback); + //BA.debugLineNum = 200;BA.debugLine="j.Download(link)"; +_j._download /*String*/ (_link); + //BA.debugLineNum = 201;BA.debugLine="Return j"; if (true) return _j; -RDebugUtils.currentLine=19660805; - //BA.debugLineNum = 19660805;BA.debugLine="End Sub"; + //BA.debugLineNum = 202;BA.debugLine="End Sub"; return null; } public static String _download_destroy() throws Exception{ -RDebugUtils.currentModule="appupdater"; -if (Debug.shouldDelegate(processBA, "download_destroy", false)) - {return ((String) Debug.delegate(processBA, "download_destroy", null));} -RDebugUtils.currentLine=19595264; - //BA.debugLineNum = 19595264;BA.debugLine="Sub download_Destroy"; -RDebugUtils.currentLine=19595265; - //BA.debugLineNum = 19595265;BA.debugLine="n2.Cancel(n2ID)"; + //BA.debugLineNum = 192;BA.debugLine="Sub download_Destroy"; + //BA.debugLineNum = 193;BA.debugLine="n2.Cancel(n2ID)"; _n2.Cancel(_n2id); -RDebugUtils.currentLine=19595266; - //BA.debugLineNum = 19595266;BA.debugLine="Service.StopForeground(n2ID)"; + //BA.debugLineNum = 194;BA.debugLine="Service.StopForeground(n2ID)"; mostCurrent._service.StopForeground(_n2id); -RDebugUtils.currentLine=19595267; - //BA.debugLineNum = 19595267;BA.debugLine="End Sub"; + //BA.debugLineNum = 195;BA.debugLine="End Sub"; return ""; } public static void _download_newapk() throws Exception{ -RDebugUtils.currentModule="appupdater"; -if (Debug.shouldDelegate(processBA, "download_newapk", false)) - {Debug.delegate(processBA, "download_newapk", null); return;} ResumableSub_download_newApk rsub = new ResumableSub_download_newApk(null); rsub.resume(processBA, null); } @@ -298,7 +252,6 @@ anywheresoftware.b4a.objects.IntentWrapper _in = null; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="appupdater"; while (true) { switch (state) { @@ -308,27 +261,20 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=19529731; - //BA.debugLineNum = 19529731;BA.debugLine="Log(\"Descargando actualización\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("319529731","Descargando actualización",0); -RDebugUtils.currentLine=19529732; - //BA.debugLineNum = 19529732;BA.debugLine="B4XPages.ShowPage(\"login\")"; + //BA.debugLineNum = 159;BA.debugLine="Log(\"Descargando actualización\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("353084163","Descargando actualización",0); + //BA.debugLineNum = 160;BA.debugLine="B4XPages.ShowPage(\"login\")"; parent.mostCurrent._b4xpages._showpage /*String*/ (processBA,"login"); -RDebugUtils.currentLine=19529733; - //BA.debugLineNum = 19529733;BA.debugLine="Starter.muestraProgreso = 1"; + //BA.debugLineNum = 161;BA.debugLine="Starter.muestraProgreso = 1"; parent.mostCurrent._starter._muestraprogreso /*String*/ = BA.NumberToString(1); -RDebugUtils.currentLine=19529734; - //BA.debugLineNum = 19529734;BA.debugLine="Dim job_newAPP As HttpJob"; + //BA.debugLineNum = 162;BA.debugLine="Dim job_newAPP As HttpJob"; _job_newapp = new keymon.lat.medicomed.httpjob(); -RDebugUtils.currentLine=19529735; - //BA.debugLineNum = 19529735;BA.debugLine="job_newAPP.Initialize(\"job_newAPP\",Me)"; -_job_newapp._initialize /*String*/ (null,processBA,"job_newAPP",appupdater.getObject()); -RDebugUtils.currentLine=19529736; - //BA.debugLineNum = 19529736;BA.debugLine="job_newAPP.Download(newApp.appLink)"; -_job_newapp._download /*String*/ (null,parent._newapp.appLink /*String*/ ); -RDebugUtils.currentLine=19529737; - //BA.debugLineNum = 19529737;BA.debugLine="Wait for (job_newAPP) JobDone (job_newAPP As Http"; -anywheresoftware.b4a.keywords.Common.WaitFor("jobdone", processBA, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "appupdater", "download_newapk"), (Object)(_job_newapp)); + //BA.debugLineNum = 163;BA.debugLine="job_newAPP.Initialize(\"job_newAPP\",Me)"; +_job_newapp._initialize /*String*/ (processBA,"job_newAPP",appupdater.getObject()); + //BA.debugLineNum = 164;BA.debugLine="job_newAPP.Download(newApp.appLink)"; +_job_newapp._download /*String*/ (parent._newapp.appLink /*String*/ ); + //BA.debugLineNum = 165;BA.debugLine="Wait for (job_newAPP) JobDone (job_newAPP As Http"; +anywheresoftware.b4a.keywords.Common.WaitFor("jobdone", processBA, this, (Object)(_job_newapp)); this.state = 15; return; case 15: @@ -336,8 +282,7 @@ case 15: this.state = 1; _job_newapp = (keymon.lat.medicomed.httpjob) result[0]; ; -RDebugUtils.currentLine=19529738; - //BA.debugLineNum = 19529738;BA.debugLine="If job_newAPP.Success = True Then"; + //BA.debugLineNum = 166;BA.debugLine="If job_newAPP.Success = True Then"; if (true) break; case 1: @@ -350,8 +295,7 @@ this.state = 3; case 3: //C this.state = 4; -RDebugUtils.currentLine=19529740; - //BA.debugLineNum = 19529740;BA.debugLine="If File.Exists(SharedFolder,\"newapp.apk\") Then"; + //BA.debugLineNum = 168;BA.debugLine="If File.Exists(SharedFolder,\"newapp.apk\") Then"; if (true) break; case 4: @@ -364,8 +308,7 @@ this.state = 6; case 6: //C this.state = 7; -RDebugUtils.currentLine=19529741; - //BA.debugLineNum = 19529741;BA.debugLine="File.Delete(SharedFolder,\"newapp.apk\")"; + //BA.debugLineNum = 169;BA.debugLine="File.Delete(SharedFolder,\"newapp.apk\")"; anywheresoftware.b4a.keywords.Common.File.Delete(parent._sharedfolder,"newapp.apk"); if (true) break; @@ -373,18 +316,14 @@ case 7: //C this.state = 8; ; -RDebugUtils.currentLine=19529744; - //BA.debugLineNum = 19529744;BA.debugLine="Dim outNewAPK As OutputStream = File.OpenOutput("; + //BA.debugLineNum = 172;BA.debugLine="Dim outNewAPK As OutputStream = File.OpenOutput("; _outnewapk = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); _outnewapk = anywheresoftware.b4a.keywords.Common.File.OpenOutput(parent._sharedfolder,"newapp.apk",anywheresoftware.b4a.keywords.Common.False); -RDebugUtils.currentLine=19529745; - //BA.debugLineNum = 19529745;BA.debugLine="File.Copy2(job_newAPP.GetInputStream, outNewAPK)"; -anywheresoftware.b4a.keywords.Common.File.Copy2((java.io.InputStream)(_job_newapp._getinputstream /*anywheresoftware.b4a.objects.streams.File.InputStreamWrapper*/ (null).getObject()),(java.io.OutputStream)(_outnewapk.getObject())); -RDebugUtils.currentLine=19529746; - //BA.debugLineNum = 19529746;BA.debugLine="outNewAPK.Close"; + //BA.debugLineNum = 173;BA.debugLine="File.Copy2(job_newAPP.GetInputStream, outNewAPK)"; +anywheresoftware.b4a.keywords.Common.File.Copy2((java.io.InputStream)(_job_newapp._getinputstream /*anywheresoftware.b4a.objects.streams.File.InputStreamWrapper*/ ().getObject()),(java.io.OutputStream)(_outnewapk.getObject())); + //BA.debugLineNum = 174;BA.debugLine="outNewAPK.Close"; _outnewapk.Close(); -RDebugUtils.currentLine=19529747; - //BA.debugLineNum = 19529747;BA.debugLine="If Starter.Logger Then Log(\"APK dir: \"&SharedFol"; + //BA.debugLineNum = 175;BA.debugLine="If Starter.Logger Then Log(\"APK dir: \"&SharedFol"; if (true) break; case 8: @@ -397,7 +336,7 @@ this.state = 10; case 10: //C this.state = 13; -anywheresoftware.b4a.keywords.Common.LogImpl("319529747","APK dir: "+parent._sharedfolder,0); +anywheresoftware.b4a.keywords.Common.LogImpl("353084179","APK dir: "+parent._sharedfolder,0); if (true) break; case 13: @@ -410,214 +349,155 @@ case 14: //C this.state = -1; ; -RDebugUtils.currentLine=19529749; - //BA.debugLineNum = 19529749;BA.debugLine="job_newAPP.Release"; -_job_newapp._release /*String*/ (null); -RDebugUtils.currentLine=19529751; - //BA.debugLineNum = 19529751;BA.debugLine="Dim in As Intent"; + //BA.debugLineNum = 177;BA.debugLine="job_newAPP.Release"; +_job_newapp._release /*String*/ (); + //BA.debugLineNum = 179;BA.debugLine="Dim in As Intent"; _in = new anywheresoftware.b4a.objects.IntentWrapper(); -RDebugUtils.currentLine=19529752; - //BA.debugLineNum = 19529752;BA.debugLine="in.Initialize(in.ACTION_VIEW,\"\" )"; + //BA.debugLineNum = 180;BA.debugLine="in.Initialize(in.ACTION_VIEW,\"\" )"; _in.Initialize(_in.ACTION_VIEW,""); -RDebugUtils.currentLine=19529753; - //BA.debugLineNum = 19529753;BA.debugLine="SetFileUriAsIntentData(in, \"newapp.apk\")"; + //BA.debugLineNum = 181;BA.debugLine="SetFileUriAsIntentData(in, \"newapp.apk\")"; _setfileuriasintentdata(_in,"newapp.apk"); -RDebugUtils.currentLine=19529755; - //BA.debugLineNum = 19529755;BA.debugLine="in.SetType(\"application/vnd.android.package-archi"; + //BA.debugLineNum = 183;BA.debugLine="in.SetType(\"application/vnd.android.package-archi"; _in.SetType("application/vnd.android.package-archive"); -RDebugUtils.currentLine=19529756; - //BA.debugLineNum = 19529756;BA.debugLine="StartActivity(in)"; + //BA.debugLineNum = 184;BA.debugLine="StartActivity(in)"; anywheresoftware.b4a.keywords.Common.StartActivity(processBA,(Object)(_in.getObject())); -RDebugUtils.currentLine=19529757; - //BA.debugLineNum = 19529757;BA.debugLine="n2.Cancel(nNewAppnID)"; + //BA.debugLineNum = 185;BA.debugLine="n2.Cancel(nNewAppnID)"; parent._n2.Cancel(parent._nnewappnid); -RDebugUtils.currentLine=19529758; - //BA.debugLineNum = 19529758;BA.debugLine="B4XPages.MainPage.ocultaProgreso"; -parent.mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._ocultaprogreso /*String*/ (null); -RDebugUtils.currentLine=19529760; - //BA.debugLineNum = 19529760;BA.debugLine="StopService(Me)"; + //BA.debugLineNum = 186;BA.debugLine="B4XPages.MainPage.ocultaProgreso"; +parent.mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._ocultaprogreso /*String*/ (); + //BA.debugLineNum = 188;BA.debugLine="StopService(Me)"; anywheresoftware.b4a.keywords.Common.StopService(processBA,appupdater.getObject()); -RDebugUtils.currentLine=19529762; - //BA.debugLineNum = 19529762;BA.debugLine="End Sub"; + //BA.debugLineNum = 190;BA.debugLine="End Sub"; if (true) break; } } } } -public static String _setfileuriasintentdata(anywheresoftware.b4a.objects.IntentWrapper _intent,String _filename) throws Exception{ -RDebugUtils.currentModule="appupdater"; -if (Debug.shouldDelegate(processBA, "setfileuriasintentdata", false)) - {return ((String) Debug.delegate(processBA, "setfileuriasintentdata", new Object[] {_intent,_filename}));} -anywheresoftware.b4j.object.JavaObject _jo = null; -RDebugUtils.currentLine=20054016; - //BA.debugLineNum = 20054016;BA.debugLine="Sub SetFileUriAsIntentData (Intent As Intent, File"; -RDebugUtils.currentLine=20054017; - //BA.debugLineNum = 20054017;BA.debugLine="Dim jo As JavaObject = Intent"; -_jo = new anywheresoftware.b4j.object.JavaObject(); -_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_intent.getObject())); -RDebugUtils.currentLine=20054018; - //BA.debugLineNum = 20054018;BA.debugLine="jo.RunMethod(\"setData\", Array(GetFileUri(FileName"; -_jo.RunMethod("setData",new Object[]{_getfileuri(_filename)}); -RDebugUtils.currentLine=20054019; - //BA.debugLineNum = 20054019;BA.debugLine="Intent.Flags = Bit.Or(Intent.Flags, 1) 'FLAG_GRAN"; -_intent.setFlags(anywheresoftware.b4a.keywords.Common.Bit.Or(_intent.getFlags(),(int) (1))); -RDebugUtils.currentLine=20054020; - //BA.debugLineNum = 20054020;BA.debugLine="End Sub"; -return ""; +public static void _jobdone(keymon.lat.medicomed.httpjob _job_newapp) throws Exception{ } public static String _download_start(anywheresoftware.b4a.objects.IntentWrapper _startingintent) throws Exception{ -RDebugUtils.currentModule="appupdater"; -if (Debug.shouldDelegate(processBA, "download_start", false)) - {return ((String) Debug.delegate(processBA, "download_start", new Object[] {_startingintent}));} -RDebugUtils.currentLine=19464192; - //BA.debugLineNum = 19464192;BA.debugLine="Sub download_Start (StartingIntent As Intent)"; -RDebugUtils.currentLine=19464193; - //BA.debugLineNum = 19464193;BA.debugLine="download_newApk"; + //BA.debugLineNum = 152;BA.debugLine="Sub download_Start (StartingIntent As Intent)"; + //BA.debugLineNum = 153;BA.debugLine="download_newApk"; _download_newapk(); -RDebugUtils.currentLine=19464194; - //BA.debugLineNum = 19464194;BA.debugLine="End Sub"; + //BA.debugLineNum = 154;BA.debugLine="End Sub"; return ""; } public static String _fileprovider_init() throws Exception{ -RDebugUtils.currentModule="appupdater"; -if (Debug.shouldDelegate(processBA, "fileprovider_init", false)) - {return ((String) Debug.delegate(processBA, "fileprovider_init", null));} anywheresoftware.b4a.phone.Phone _p = null; -RDebugUtils.currentLine=19922944; - //BA.debugLineNum = 19922944;BA.debugLine="Sub fileProvider_init"; -RDebugUtils.currentLine=19922945; - //BA.debugLineNum = 19922945;BA.debugLine="Dim p As Phone"; + //BA.debugLineNum = 235;BA.debugLine="Sub fileProvider_init"; + //BA.debugLineNum = 236;BA.debugLine="Dim p As Phone"; _p = new anywheresoftware.b4a.phone.Phone(); -RDebugUtils.currentLine=19922946; - //BA.debugLineNum = 19922946;BA.debugLine="If p.SdkVersion >= 24 Or File.ExternalWritable ="; + //BA.debugLineNum = 237;BA.debugLine="If p.SdkVersion >= 24 Or File.ExternalWritable ="; if (_p.getSdkVersion()>=24 || anywheresoftware.b4a.keywords.Common.File.getExternalWritable()==anywheresoftware.b4a.keywords.Common.False) { -RDebugUtils.currentLine=19922947; - //BA.debugLineNum = 19922947;BA.debugLine="UseFileProvider = True"; + //BA.debugLineNum = 238;BA.debugLine="UseFileProvider = True"; _usefileprovider = anywheresoftware.b4a.keywords.Common.True; -RDebugUtils.currentLine=19922948; - //BA.debugLineNum = 19922948;BA.debugLine="SharedFolder = File.Combine(File.DirInternal, \"s"; + //BA.debugLineNum = 239;BA.debugLine="SharedFolder = File.Combine(File.DirInternal, \"s"; _sharedfolder = anywheresoftware.b4a.keywords.Common.File.Combine(anywheresoftware.b4a.keywords.Common.File.getDirInternal(),"shared"); -RDebugUtils.currentLine=19922949; - //BA.debugLineNum = 19922949;BA.debugLine="If Not(File.IsDirectory(File.DirInternal,\"shared"; + //BA.debugLineNum = 240;BA.debugLine="If Not(File.IsDirectory(File.DirInternal,\"shared"; if (anywheresoftware.b4a.keywords.Common.Not(anywheresoftware.b4a.keywords.Common.File.IsDirectory(anywheresoftware.b4a.keywords.Common.File.getDirInternal(),"shared"))) { -RDebugUtils.currentLine=19922950; - //BA.debugLineNum = 19922950;BA.debugLine="File.MakeDir(\"\", SharedFolder)"; + //BA.debugLineNum = 241;BA.debugLine="File.MakeDir(\"\", SharedFolder)"; anywheresoftware.b4a.keywords.Common.File.MakeDir("",_sharedfolder); }; }else { -RDebugUtils.currentLine=19922953; - //BA.debugLineNum = 19922953;BA.debugLine="UseFileProvider = False"; + //BA.debugLineNum = 244;BA.debugLine="UseFileProvider = False"; _usefileprovider = anywheresoftware.b4a.keywords.Common.False; -RDebugUtils.currentLine=19922954; - //BA.debugLineNum = 19922954;BA.debugLine="SharedFolder = rp.GetSafeDirDefaultExternal(\"sha"; + //BA.debugLineNum = 245;BA.debugLine="SharedFolder = rp.GetSafeDirDefaultExternal(\"sha"; _sharedfolder = _rp.GetSafeDirDefaultExternal("shared"); }; -RDebugUtils.currentLine=19922956; - //BA.debugLineNum = 19922956;BA.debugLine="Log($\"Using FileProvider? ${UseFileProvider}\"$)"; -anywheresoftware.b4a.keywords.Common.LogImpl("319922956",("Using FileProvider? "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_usefileprovider))+""),0); -RDebugUtils.currentLine=19922957; - //BA.debugLineNum = 19922957;BA.debugLine="End Sub"; + //BA.debugLineNum = 247;BA.debugLine="Log($\"Using FileProvider? ${UseFileProvider}\"$)"; +anywheresoftware.b4a.keywords.Common.LogImpl("353477388",("Using FileProvider? "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_usefileprovider))+""),0); + //BA.debugLineNum = 248;BA.debugLine="End Sub"; return ""; } public static Object _getfileuri(String _filename) throws Exception{ -RDebugUtils.currentModule="appupdater"; -if (Debug.shouldDelegate(processBA, "getfileuri", false)) - {return ((Object) Debug.delegate(processBA, "getfileuri", new Object[] {_filename}));} anywheresoftware.b4j.object.JavaObject _uri = null; anywheresoftware.b4j.object.JavaObject _f = null; anywheresoftware.b4j.object.JavaObject _fp = null; anywheresoftware.b4j.object.JavaObject _context = null; -RDebugUtils.currentLine=19988480; - //BA.debugLineNum = 19988480;BA.debugLine="Sub GetFileUri (FileName As String) As Object"; -RDebugUtils.currentLine=19988481; - //BA.debugLineNum = 19988481;BA.debugLine="Try"; -try {RDebugUtils.currentLine=19988482; - //BA.debugLineNum = 19988482;BA.debugLine="If Not(UseFileProvider) Then"; + //BA.debugLineNum = 251;BA.debugLine="Sub GetFileUri (FileName As String) As Object"; + //BA.debugLineNum = 252;BA.debugLine="Try"; +try { //BA.debugLineNum = 253;BA.debugLine="If Not(UseFileProvider) Then"; if (anywheresoftware.b4a.keywords.Common.Not(_usefileprovider)) { -RDebugUtils.currentLine=19988483; - //BA.debugLineNum = 19988483;BA.debugLine="Dim uri As JavaObject"; + //BA.debugLineNum = 254;BA.debugLine="Dim uri As JavaObject"; _uri = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=19988484; - //BA.debugLineNum = 19988484;BA.debugLine="Return uri.InitializeStatic(\"android.net.Uri\")."; + //BA.debugLineNum = 255;BA.debugLine="Return uri.InitializeStatic(\"android.net.Uri\")."; if (true) return _uri.InitializeStatic("android.net.Uri").RunMethod("parse",new Object[]{(Object)("file://"+anywheresoftware.b4a.keywords.Common.File.Combine(_sharedfolder,_filename))}); }; -RDebugUtils.currentLine=19988486; - //BA.debugLineNum = 19988486;BA.debugLine="Dim f As JavaObject"; + //BA.debugLineNum = 257;BA.debugLine="Dim f As JavaObject"; _f = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=19988487; - //BA.debugLineNum = 19988487;BA.debugLine="f.InitializeNewInstance(\"java.io.File\", Array(Sh"; + //BA.debugLineNum = 258;BA.debugLine="f.InitializeNewInstance(\"java.io.File\", Array(Sh"; _f.InitializeNewInstance("java.io.File",new Object[]{(Object)(_sharedfolder),(Object)(_filename)}); -RDebugUtils.currentLine=19988488; - //BA.debugLineNum = 19988488;BA.debugLine="Dim fp As JavaObject"; + //BA.debugLineNum = 259;BA.debugLine="Dim fp As JavaObject"; _fp = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=19988489; - //BA.debugLineNum = 19988489;BA.debugLine="Dim context As JavaObject"; + //BA.debugLineNum = 260;BA.debugLine="Dim context As JavaObject"; _context = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=19988490; - //BA.debugLineNum = 19988490;BA.debugLine="context.InitializeContext"; + //BA.debugLineNum = 261;BA.debugLine="context.InitializeContext"; _context.InitializeContext(processBA); -RDebugUtils.currentLine=19988491; - //BA.debugLineNum = 19988491;BA.debugLine="fp.InitializeStatic(\"android.support.v4.content."; + //BA.debugLineNum = 262;BA.debugLine="fp.InitializeStatic(\"android.support.v4.content."; _fp.InitializeStatic("androidx.core.content.FileProvider"); -RDebugUtils.currentLine=19988492; - //BA.debugLineNum = 19988492;BA.debugLine="Return fp.RunMethod(\"getUriForFile\", Array(conte"; + //BA.debugLineNum = 263;BA.debugLine="Return fp.RunMethod(\"getUriForFile\", Array(conte"; if (true) return _fp.RunMethod("getUriForFile",new Object[]{(Object)(_context.getObject()),(Object)(anywheresoftware.b4a.keywords.Common.Application.getPackageName()+".provider"),(Object)(_f.getObject())}); } catch (Exception e14) { - processBA.setLastException(e14);RDebugUtils.currentLine=19988494; - //BA.debugLineNum = 19988494;BA.debugLine="Log(\"FileProvider::GetFileUri - error - \" & Last"; -anywheresoftware.b4a.keywords.Common.LogImpl("319988494","FileProvider::GetFileUri - error - "+anywheresoftware.b4a.keywords.Common.LastException(processBA).getMessage(),0); -RDebugUtils.currentLine=19988495; - //BA.debugLineNum = 19988495;BA.debugLine="Return \"\""; + processBA.setLastException(e14); //BA.debugLineNum = 265;BA.debugLine="Log(\"FileProvider::GetFileUri - error - \" & Last"; +anywheresoftware.b4a.keywords.Common.LogImpl("353542926","FileProvider::GetFileUri - error - "+anywheresoftware.b4a.keywords.Common.LastException(processBA).getMessage(),0); + //BA.debugLineNum = 266;BA.debugLine="Return \"\""; if (true) return (Object)(""); }; -RDebugUtils.currentLine=19988497; - //BA.debugLineNum = 19988497;BA.debugLine="End Sub"; + //BA.debugLineNum = 268;BA.debugLine="End Sub"; return null; } +public static String _process_globals() throws Exception{ + //BA.debugLineNum = 70;BA.debugLine="Sub Process_Globals"; + //BA.debugLineNum = 75;BA.debugLine="Public lnk As String = \"https://keymon.lat/movil/"; +_lnk = "https://keymon.lat/movil/medicomed/medicomed.ver"; + //BA.debugLineNum = 85;BA.debugLine="Public nNewApp As Notification"; +_nnewapp = new anywheresoftware.b4a.objects.NotificationWrapper(); + //BA.debugLineNum = 86;BA.debugLine="Public nNewAppnID As Int = 16"; +_nnewappnid = (int) (16); + //BA.debugLineNum = 88;BA.debugLine="Dim nativeMe As JavaObject"; +_nativeme = new anywheresoftware.b4j.object.JavaObject(); + //BA.debugLineNum = 89;BA.debugLine="Dim n2 As Notification"; +_n2 = new anywheresoftware.b4a.objects.NotificationWrapper(); + //BA.debugLineNum = 90;BA.debugLine="Dim n2ID As Int = 16"; +_n2id = (int) (16); + //BA.debugLineNum = 92;BA.debugLine="Public SharedFolder As String"; +_sharedfolder = ""; + //BA.debugLineNum = 93;BA.debugLine="Public UseFileProvider As Boolean"; +_usefileprovider = false; + //BA.debugLineNum = 94;BA.debugLine="Private rp As RuntimePermissions"; +_rp = new anywheresoftware.b4a.objects.RuntimePermissions(); + //BA.debugLineNum = 96;BA.debugLine="Type mNewVersion(update As Boolean, nonewAPP As B"; +; + //BA.debugLineNum = 98;BA.debugLine="Public newApp As mNewVersion"; +_newapp = new keymon.lat.medicomed.appupdater._mnewversion(); + //BA.debugLineNum = 99;BA.debugLine="End Sub"; +return ""; +} public static String _service_create() throws Exception{ -RDebugUtils.currentModule="appupdater"; -if (Debug.shouldDelegate(processBA, "service_create", false)) - {return ((String) Debug.delegate(processBA, "service_create", null));} -RDebugUtils.currentLine=19333120; - //BA.debugLineNum = 19333120;BA.debugLine="Sub Service_Create"; -RDebugUtils.currentLine=19333121; - //BA.debugLineNum = 19333121;BA.debugLine="Log(\"appUpdater(), Service_Create\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("319333121","appUpdater(), Service_Create",0); -RDebugUtils.currentLine=19333122; - //BA.debugLineNum = 19333122;BA.debugLine="newApp.Initialize"; + //BA.debugLineNum = 101;BA.debugLine="Sub Service_Create"; + //BA.debugLineNum = 102;BA.debugLine="Log(\"appUpdater(), Service_Create\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("352887553","appUpdater(), Service_Create",0); + //BA.debugLineNum = 103;BA.debugLine="newApp.Initialize"; _newapp.Initialize(); -RDebugUtils.currentLine=19333123; - //BA.debugLineNum = 19333123;BA.debugLine="Service.AutomaticForegroundMode = Service.AUTOMAT"; + //BA.debugLineNum = 104;BA.debugLine="Service.AutomaticForegroundMode = Service.AUTOMAT"; mostCurrent._service.AutomaticForegroundMode = mostCurrent._service.AUTOMATIC_FOREGROUND_NEVER; -RDebugUtils.currentLine=19333124; - //BA.debugLineNum = 19333124;BA.debugLine="n2.Initialize"; + //BA.debugLineNum = 105;BA.debugLine="n2.Initialize"; _n2.Initialize(); -RDebugUtils.currentLine=19333125; - //BA.debugLineNum = 19333125;BA.debugLine="nativeMe.InitializeContext"; + //BA.debugLineNum = 106;BA.debugLine="nativeMe.InitializeContext"; _nativeme.InitializeContext(processBA); -RDebugUtils.currentLine=19333126; - //BA.debugLineNum = 19333126;BA.debugLine="End Sub"; + //BA.debugLineNum = 107;BA.debugLine="End Sub"; return ""; } public static String _service_destroy() throws Exception{ -RDebugUtils.currentModule="appupdater"; -if (Debug.shouldDelegate(processBA, "service_destroy", false)) - {return ((String) Debug.delegate(processBA, "service_destroy", null));} -RDebugUtils.currentLine=19857408; - //BA.debugLineNum = 19857408;BA.debugLine="Sub Service_Destroy"; -RDebugUtils.currentLine=19857409; - //BA.debugLineNum = 19857409;BA.debugLine="Log(\"appUpdater(), Service_Destroy\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("319857409","appUpdater(), Service_Destroy",0); -RDebugUtils.currentLine=19857410; - //BA.debugLineNum = 19857410;BA.debugLine="End Sub"; + //BA.debugLineNum = 231;BA.debugLine="Sub Service_Destroy"; + //BA.debugLineNum = 232;BA.debugLine="Log(\"appUpdater(), Service_Destroy\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("353411841","appUpdater(), Service_Destroy",0); + //BA.debugLineNum = 233;BA.debugLine="End Sub"; return ""; } public static void _service_start(anywheresoftware.b4a.objects.IntentWrapper _startingintent) throws Exception{ -RDebugUtils.currentModule="appupdater"; -if (Debug.shouldDelegate(processBA, "service_start", false)) - {Debug.delegate(processBA, "service_start", new Object[] {_startingintent}); return;} ResumableSub_Service_Start rsub = new ResumableSub_Service_Start(null,_startingintent); rsub.resume(processBA, null); } @@ -633,7 +513,6 @@ String[] _app = null; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="appupdater"; while (true) { try { @@ -645,21 +524,16 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=19398657; - //BA.debugLineNum = 19398657;BA.debugLine="Log(\"appUpdater(), Service_Start\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("319398657","appUpdater(), Service_Start",0); -RDebugUtils.currentLine=19398659; - //BA.debugLineNum = 19398659;BA.debugLine="B4XPages.MainPage.muestraProgreso(\"Buscando actua"; -parent.mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._muestraprogreso /*String*/ (null,"Buscando actualización"); -RDebugUtils.currentLine=19398660; - //BA.debugLineNum = 19398660;BA.debugLine="Log(\"Buscando actualización\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("319398660","Buscando actualización",0); -RDebugUtils.currentLine=19398661; - //BA.debugLineNum = 19398661;BA.debugLine="fileProvider_init"; + //BA.debugLineNum = 110;BA.debugLine="Log(\"appUpdater(), Service_Start\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("352953089","appUpdater(), Service_Start",0); + //BA.debugLineNum = 112;BA.debugLine="B4XPages.MainPage.muestraProgreso(\"Buscando actua"; +parent.mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._muestraprogreso /*String*/ ("Buscando actualización"); + //BA.debugLineNum = 113;BA.debugLine="Log(\"Buscando actualización\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("352953092","Buscando actualización",0); + //BA.debugLineNum = 114;BA.debugLine="fileProvider_init"; _fileprovider_init(); -RDebugUtils.currentLine=19398662; - //BA.debugLineNum = 19398662;BA.debugLine="Wait For (Download(Me, lnk)) JobDone (j As HttpJo"; -anywheresoftware.b4a.keywords.Common.WaitFor("jobdone", processBA, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "appupdater", "service_start"), (Object)(_download(appupdater.getObject(),parent._lnk))); + //BA.debugLineNum = 115;BA.debugLine="Wait For (Download(Me, lnk)) JobDone (j As HttpJo"; +anywheresoftware.b4a.keywords.Common.WaitFor("jobdone", processBA, this, (Object)(_download(appupdater.getObject(),parent._lnk))); this.state = 20; return; case 20: @@ -667,8 +541,7 @@ case 20: this.state = 1; _j = (keymon.lat.medicomed.httpjob) result[0]; ; -RDebugUtils.currentLine=19398663; - //BA.debugLineNum = 19398663;BA.debugLine="If j.Success Then"; + //BA.debugLineNum = 116;BA.debugLine="If j.Success Then"; if (true) break; case 1: @@ -683,8 +556,7 @@ this.state = 18; case 3: //C this.state = 4; -RDebugUtils.currentLine=19398664; - //BA.debugLineNum = 19398664;BA.debugLine="Try"; + //BA.debugLineNum = 117;BA.debugLine="Try"; if (true) break; case 4: @@ -698,26 +570,19 @@ case 6: //C this.state = 7; this.catchState = 15; -RDebugUtils.currentLine=19398665; - //BA.debugLineNum = 19398665;BA.debugLine="Dim app() As String = Regex.Split(Chr(9),j.GetS"; -_app = anywheresoftware.b4a.keywords.Common.Regex.Split(BA.ObjectToString(anywheresoftware.b4a.keywords.Common.Chr((int) (9))),_j._getstring /*String*/ (null)); -RDebugUtils.currentLine=19398667; - //BA.debugLineNum = 19398667;BA.debugLine="newApp.appLink = app(3) 'Liga a nueva app"; + //BA.debugLineNum = 118;BA.debugLine="Dim app() As String = Regex.Split(Chr(9),j.GetS"; +_app = anywheresoftware.b4a.keywords.Common.Regex.Split(BA.ObjectToString(anywheresoftware.b4a.keywords.Common.Chr((int) (9))),_j._getstring /*String*/ ()); + //BA.debugLineNum = 120;BA.debugLine="newApp.appLink = app(3) 'Liga a nueva app"; parent._newapp.appLink /*String*/ = _app[(int) (3)]; -RDebugUtils.currentLine=19398668; - //BA.debugLineNum = 19398668;BA.debugLine="newApp.newMsg = app(1) 'Texto de que hay actual"; + //BA.debugLineNum = 121;BA.debugLine="newApp.newMsg = app(1) 'Texto de que hay actual"; parent._newapp.newMsg /*String*/ = _app[(int) (1)]; -RDebugUtils.currentLine=19398669; - //BA.debugLineNum = 19398669;BA.debugLine="newApp.okMsg = app(2) 'Texto de app al corrient"; + //BA.debugLineNum = 122;BA.debugLine="newApp.okMsg = app(2) 'Texto de app al corrient"; parent._newapp.okMsg /*String*/ = _app[(int) (2)]; -RDebugUtils.currentLine=19398670; - //BA.debugLineNum = 19398670;BA.debugLine="newApp.version = app(0) 'Version actual"; + //BA.debugLineNum = 123;BA.debugLine="newApp.version = app(0) 'Version actual"; parent._newapp.version /*String*/ = _app[(int) (0)]; -RDebugUtils.currentLine=19398672; - //BA.debugLineNum = 19398672;BA.debugLine="Log($\"Application.VersionName=${Application.Ver"; -anywheresoftware.b4a.keywords.Common.LogImpl("319398672",("Application.VersionName="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(anywheresoftware.b4a.keywords.Common.Application.getVersionName()))+", newApp="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(parent._newapp))+""),0); -RDebugUtils.currentLine=19398675; - //BA.debugLineNum = 19398675;BA.debugLine="If newApp.version = Application.VersionName Th"; + //BA.debugLineNum = 125;BA.debugLine="Log($\"Application.VersionName=${Application.Ver"; +anywheresoftware.b4a.keywords.Common.LogImpl("352953104",("Application.VersionName="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(anywheresoftware.b4a.keywords.Common.Application.getVersionName()))+", newApp="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(parent._newapp))+""),0); + //BA.debugLineNum = 128;BA.debugLine="If newApp.version = Application.VersionName Th"; if (true) break; case 7: @@ -730,22 +595,17 @@ this.state = 9; case 9: //C this.state = 10; -RDebugUtils.currentLine=19398676; - //BA.debugLineNum = 19398676;BA.debugLine="newApp.update = False"; + //BA.debugLineNum = 129;BA.debugLine="newApp.update = False"; parent._newapp.update /*boolean*/ = anywheresoftware.b4a.keywords.Common.False; -RDebugUtils.currentLine=19398677; - //BA.debugLineNum = 19398677;BA.debugLine="Log(\"No new app\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("319398677","No new app",0); -RDebugUtils.currentLine=19398678; - //BA.debugLineNum = 19398678;BA.debugLine="B4XPages.ShowPage(\"updateAvailable\")"; + //BA.debugLineNum = 130;BA.debugLine="Log(\"No new app\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("352953109","No new app",0); + //BA.debugLineNum = 131;BA.debugLine="B4XPages.ShowPage(\"updateAvailable\")"; parent.mostCurrent._b4xpages._showpage /*String*/ (processBA,"updateAvailable"); -RDebugUtils.currentLine=19398680; - //BA.debugLineNum = 19398680;BA.debugLine="CreateNotification2(\"Aplicacion al corriente\","; + //BA.debugLineNum = 133;BA.debugLine="CreateNotification2(\"Aplicacion al corriente\","; _createnotification2("Aplicacion al corriente","No hay actualizaciones disponibles","ic_file_download_white_24dp",(Object)(parent.mostCurrent._main.getObject()),anywheresoftware.b4a.keywords.Common.True,anywheresoftware.b4a.keywords.Common.True,parent._nnewapp,parent._nnewappnid); if (true) break; ; -RDebugUtils.currentLine=19398682; - //BA.debugLineNum = 19398682;BA.debugLine="If newApp.version <> Application.VersionName T"; + //BA.debugLineNum = 135;BA.debugLine="If newApp.version <> Application.VersionName T"; case 10: //if @@ -757,14 +617,11 @@ this.state = 12; case 12: //C this.state = 13; -RDebugUtils.currentLine=19398683; - //BA.debugLineNum = 19398683;BA.debugLine="newApp.update = True"; + //BA.debugLineNum = 136;BA.debugLine="newApp.update = True"; parent._newapp.update /*boolean*/ = anywheresoftware.b4a.keywords.Common.True; -RDebugUtils.currentLine=19398684; - //BA.debugLineNum = 19398684;BA.debugLine="Log(\"New app true\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("319398684","New app true",0); -RDebugUtils.currentLine=19398685; - //BA.debugLineNum = 19398685;BA.debugLine="B4XPages.ShowPage(\"updateAvailable\")"; + //BA.debugLineNum = 137;BA.debugLine="Log(\"New app true\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("352953116","New app true",0); + //BA.debugLineNum = 138;BA.debugLine="B4XPages.ShowPage(\"updateAvailable\")"; parent.mostCurrent._b4xpages._showpage /*String*/ (processBA,"updateAvailable"); if (true) break; @@ -778,9 +635,8 @@ case 15: //C this.state = 16; this.catchState = 0; -RDebugUtils.currentLine=19398690; - //BA.debugLineNum = 19398690;BA.debugLine="Log(\"appUpdater(), Job Failed, error \" & LastE"; -anywheresoftware.b4a.keywords.Common.LogImpl("319398690","appUpdater(), Job Failed, error "+anywheresoftware.b4a.keywords.Common.LastException(processBA).getMessage(),0); + //BA.debugLineNum = 143;BA.debugLine="Log(\"appUpdater(), Job Failed, error \" & LastE"; +anywheresoftware.b4a.keywords.Common.LogImpl("352953122","appUpdater(), Job Failed, error "+anywheresoftware.b4a.keywords.Common.LastException(processBA).getMessage(),0); if (true) break; if (true) break; @@ -794,20 +650,17 @@ this.catchState = 0; case 18: //C this.state = 19; -RDebugUtils.currentLine=19398693; - //BA.debugLineNum = 19398693;BA.debugLine="Log(\"appUpdater(), Job Failed \" & lnk)"; -anywheresoftware.b4a.keywords.Common.LogImpl("319398693","appUpdater(), Job Failed "+parent._lnk,0); + //BA.debugLineNum = 146;BA.debugLine="Log(\"appUpdater(), Job Failed \" & lnk)"; +anywheresoftware.b4a.keywords.Common.LogImpl("352953125","appUpdater(), Job Failed "+parent._lnk,0); if (true) break; case 19: //C this.state = -1; ; -RDebugUtils.currentLine=19398695; - //BA.debugLineNum = 19398695;BA.debugLine="j.Release"; -_j._release /*String*/ (null); -RDebugUtils.currentLine=19398697; - //BA.debugLineNum = 19398697;BA.debugLine="End Sub"; + //BA.debugLineNum = 148;BA.debugLine="j.Release"; +_j._release /*String*/ (); + //BA.debugLineNum = 150;BA.debugLine="End Sub"; if (true) break; }} catch (Exception e0) { @@ -821,4 +674,17 @@ processBA.setLastException(e0);} } } } -} \ No newline at end of file +public static String _setfileuriasintentdata(anywheresoftware.b4a.objects.IntentWrapper _intent,String _filename) throws Exception{ +anywheresoftware.b4j.object.JavaObject _jo = null; + //BA.debugLineNum = 272;BA.debugLine="Sub SetFileUriAsIntentData (Intent As Intent, File"; + //BA.debugLineNum = 273;BA.debugLine="Dim jo As JavaObject = Intent"; +_jo = new anywheresoftware.b4j.object.JavaObject(); +_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_intent.getObject())); + //BA.debugLineNum = 274;BA.debugLine="jo.RunMethod(\"setData\", Array(GetFileUri(FileName"; +_jo.RunMethod("setData",new Object[]{_getfileuri(_filename)}); + //BA.debugLineNum = 275;BA.debugLine="Intent.Flags = Bit.Or(Intent.Flags, 1) 'FLAG_GRAN"; +_intent.setFlags(anywheresoftware.b4a.keywords.Common.Bit.Or(_intent.getFlags(),(int) (1))); + //BA.debugLineNum = 276;BA.debugLine="End Sub"; +return ""; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xbitset.java b/B4A/Objects/src/keymon/lat/medicomed/b4xbitset.java index 788fc6f..7dde707 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xbitset.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xbitset.java @@ -10,7 +10,7 @@ public class b4xbitset extends B4AClass.ImplB4AClass implements BA.SubDelegator{ private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xbitset"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xbitset"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xbitset extends B4AClass.ImplB4AClass implements BA.SubDelegator{ 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.keywords.Common __c = null; public int[] _data = null; public int _msize = 0; public b4a.example.dateutils _dateutils = null; @@ -45,134 +38,86 @@ 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 _class_globals(keymon.lat.medicomed.b4xbitset __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbitset"; -RDebugUtils.currentLine=33947648; - //BA.debugLineNum = 33947648;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=33947652; - //BA.debugLineNum = 33947652;BA.debugLine="Private data() As Int"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 5;BA.debugLine="Private data() As Int"; _data = new int[(int) (0)]; ; -RDebugUtils.currentLine=33947654; - //BA.debugLineNum = 33947654;BA.debugLine="Private mSize As Int"; + //BA.debugLineNum = 7;BA.debugLine="Private mSize As Int"; _msize = 0; -RDebugUtils.currentLine=33947655; - //BA.debugLineNum = 33947655;BA.debugLine="End Sub"; + //BA.debugLineNum = 8;BA.debugLine="End Sub"; return ""; } -public String _clear(keymon.lat.medicomed.b4xbitset __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbitset"; -if (Debug.shouldDelegate(ba, "clear", true)) - {return ((String) Debug.delegate(ba, "clear", null));} -RDebugUtils.currentLine=34275328; - //BA.debugLineNum = 34275328;BA.debugLine="Public Sub Clear"; -RDebugUtils.currentLine=34275332; - //BA.debugLineNum = 34275332;BA.debugLine="Dim data(Bit.ShiftRight(mSize, 5) + 1) As Int"; -_data = new int[(int) (__c.Bit.ShiftRight(__ref._msize /*int*/ ,(int) (5))+1)]; +public String _clear() throws Exception{ + //BA.debugLineNum = 54;BA.debugLine="Public Sub Clear"; + //BA.debugLineNum = 58;BA.debugLine="Dim data(Bit.ShiftRight(mSize, 5) + 1) As Int"; +_data = new int[(int) (__c.Bit.ShiftRight(_msize,(int) (5))+1)]; ; -RDebugUtils.currentLine=34275334; - //BA.debugLineNum = 34275334;BA.debugLine="End Sub"; + //BA.debugLineNum = 60;BA.debugLine="End Sub"; return ""; } -public boolean _get(keymon.lat.medicomed.b4xbitset __ref,int _index) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbitset"; -if (Debug.shouldDelegate(ba, "get", true)) - {return ((Boolean) Debug.delegate(ba, "get", new Object[] {_index}));} +public boolean _get(int _index) throws Exception{ int _dindex = 0; int _offset = 0; int _blockvalue = 0; -RDebugUtils.currentLine=34144256; - //BA.debugLineNum = 34144256;BA.debugLine="Public Sub Get(Index As Int) As Boolean"; -RDebugUtils.currentLine=34144257; - //BA.debugLineNum = 34144257;BA.debugLine="Dim dindex As Int = Bit.ShiftRight(Index, 5)"; + //BA.debugLineNum = 38;BA.debugLine="Public Sub Get(Index As Int) As Boolean"; + //BA.debugLineNum = 39;BA.debugLine="Dim dindex As Int = Bit.ShiftRight(Index, 5)"; _dindex = __c.Bit.ShiftRight(_index,(int) (5)); -RDebugUtils.currentLine=34144258; - //BA.debugLineNum = 34144258;BA.debugLine="Dim offset As Int = Bit.And(0x0000001f, Index)"; + //BA.debugLineNum = 40;BA.debugLine="Dim offset As Int = Bit.And(0x0000001f, Index)"; _offset = __c.Bit.And(((int)0x0000001f),_index); -RDebugUtils.currentLine=34144262; - //BA.debugLineNum = 34144262;BA.debugLine="Dim BlockValue As Int = data(dindex)"; -_blockvalue = __ref._data /*int[]*/ [_dindex]; -RDebugUtils.currentLine=34144264; - //BA.debugLineNum = 34144264;BA.debugLine="Return Bit.And(BlockValue, Bit.ShiftLeft(1, offse"; + //BA.debugLineNum = 44;BA.debugLine="Dim BlockValue As Int = data(dindex)"; +_blockvalue = _data[_dindex]; + //BA.debugLineNum = 46;BA.debugLine="Return Bit.And(BlockValue, Bit.ShiftLeft(1, offse"; if (true) return __c.Bit.And(_blockvalue,__c.Bit.ShiftLeft((int) (1),_offset))!=0; -RDebugUtils.currentLine=34144265; - //BA.debugLineNum = 34144265;BA.debugLine="End Sub"; + //BA.debugLineNum = 47;BA.debugLine="End Sub"; return false; } -public int _getsize(keymon.lat.medicomed.b4xbitset __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbitset"; -if (Debug.shouldDelegate(ba, "getsize", true)) - {return ((Integer) Debug.delegate(ba, "getsize", null));} -RDebugUtils.currentLine=34209792; - //BA.debugLineNum = 34209792;BA.debugLine="Public Sub getSize As Int"; -RDebugUtils.currentLine=34209793; - //BA.debugLineNum = 34209793;BA.debugLine="Return mSize"; -if (true) return __ref._msize /*int*/ ; -RDebugUtils.currentLine=34209794; - //BA.debugLineNum = 34209794;BA.debugLine="End Sub"; +public int _getsize() throws Exception{ + //BA.debugLineNum = 49;BA.debugLine="Public Sub getSize As Int"; + //BA.debugLineNum = 50;BA.debugLine="Return mSize"; +if (true) return _msize; + //BA.debugLineNum = 51;BA.debugLine="End Sub"; return 0; } -public String _initialize(keymon.lat.medicomed.b4xbitset __ref,anywheresoftware.b4a.BA _ba,int _size) throws Exception{ -__ref = this; +public String _initialize(anywheresoftware.b4a.BA _ba,int _size) throws Exception{ innerInitialize(_ba); -RDebugUtils.currentModule="b4xbitset"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_size}));} -RDebugUtils.currentLine=34013184; - //BA.debugLineNum = 34013184;BA.debugLine="Public Sub Initialize (Size As Int)"; -RDebugUtils.currentLine=34013185; - //BA.debugLineNum = 34013185;BA.debugLine="mSize = Size"; -__ref._msize /*int*/ = _size; -RDebugUtils.currentLine=34013186; - //BA.debugLineNum = 34013186;BA.debugLine="Clear"; -__ref._clear /*String*/ (null); -RDebugUtils.currentLine=34013187; - //BA.debugLineNum = 34013187;BA.debugLine="End Sub"; + //BA.debugLineNum = 10;BA.debugLine="Public Sub Initialize (Size As Int)"; + //BA.debugLineNum = 11;BA.debugLine="mSize = Size"; +_msize = _size; + //BA.debugLineNum = 12;BA.debugLine="Clear"; +_clear(); + //BA.debugLineNum = 13;BA.debugLine="End Sub"; return ""; } -public String _set(keymon.lat.medicomed.b4xbitset __ref,int _index,boolean _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbitset"; -if (Debug.shouldDelegate(ba, "set", true)) - {return ((String) Debug.delegate(ba, "set", new Object[] {_index,_value}));} +public String _set(int _index,boolean _value) throws Exception{ int _dindex = 0; int _offset = 0; int _blockvalue = 0; int _newblockvalue = 0; -RDebugUtils.currentLine=34078720; - //BA.debugLineNum = 34078720;BA.debugLine="Public Sub Set(Index As Int, Value As Boolean)"; -RDebugUtils.currentLine=34078721; - //BA.debugLineNum = 34078721;BA.debugLine="Dim dindex As Int = Bit.ShiftRight(Index, 5)"; + //BA.debugLineNum = 16;BA.debugLine="Public Sub Set(Index As Int, Value As Boolean)"; + //BA.debugLineNum = 17;BA.debugLine="Dim dindex As Int = Bit.ShiftRight(Index, 5)"; _dindex = __c.Bit.ShiftRight(_index,(int) (5)); -RDebugUtils.currentLine=34078722; - //BA.debugLineNum = 34078722;BA.debugLine="Dim offset As Int = Bit.And(0x0000001f, Index)"; + //BA.debugLineNum = 18;BA.debugLine="Dim offset As Int = Bit.And(0x0000001f, Index)"; _offset = __c.Bit.And(((int)0x0000001f),_index); -RDebugUtils.currentLine=34078726; - //BA.debugLineNum = 34078726;BA.debugLine="Dim BlockValue As Int = data(dindex)"; -_blockvalue = __ref._data /*int[]*/ [_dindex]; -RDebugUtils.currentLine=34078728; - //BA.debugLineNum = 34078728;BA.debugLine="Dim NewBlockValue As Int"; + //BA.debugLineNum = 22;BA.debugLine="Dim BlockValue As Int = data(dindex)"; +_blockvalue = _data[_dindex]; + //BA.debugLineNum = 24;BA.debugLine="Dim NewBlockValue As Int"; _newblockvalue = 0; -RDebugUtils.currentLine=34078729; - //BA.debugLineNum = 34078729;BA.debugLine="If Value Then"; + //BA.debugLineNum = 25;BA.debugLine="If Value Then"; if (_value) { -RDebugUtils.currentLine=34078730; - //BA.debugLineNum = 34078730;BA.debugLine="NewBlockValue = Bit.Or(BlockValue, Bit.ShiftLeft"; + //BA.debugLineNum = 26;BA.debugLine="NewBlockValue = Bit.Or(BlockValue, Bit.ShiftLeft"; _newblockvalue = __c.Bit.Or(_blockvalue,__c.Bit.ShiftLeft((int) (1),_offset)); }else { -RDebugUtils.currentLine=34078732; - //BA.debugLineNum = 34078732;BA.debugLine="NewBlockValue = Bit.And(BlockValue, Bit.Not(Bit."; + //BA.debugLineNum = 28;BA.debugLine="NewBlockValue = Bit.And(BlockValue, Bit.Not(Bit."; _newblockvalue = __c.Bit.And(_blockvalue,__c.Bit.Not(__c.Bit.ShiftLeft((int) (1),_offset))); }; -RDebugUtils.currentLine=34078737; - //BA.debugLineNum = 34078737;BA.debugLine="data(dindex) = NewBlockValue"; -__ref._data /*int[]*/ [_dindex] = _newblockvalue; -RDebugUtils.currentLine=34078739; - //BA.debugLineNum = 34078739;BA.debugLine="End Sub"; + //BA.debugLineNum = 33;BA.debugLine="data(dindex) = NewBlockValue"; +_data[_dindex] = _newblockvalue; + //BA.debugLineNum = 35;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xbreadcrumb.java b/B4A/Objects/src/keymon/lat/medicomed/b4xbreadcrumb.java index 0eeb4b0..2c81bf3 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xbreadcrumb.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xbreadcrumb.java @@ -10,7 +10,7 @@ public class b4xbreadcrumb extends B4AClass.ImplB4AClass implements BA.SubDelega private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xbreadcrumb"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xbreadcrumb"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xbreadcrumb extends B4AClass.ImplB4AClass implements BA.SubDelega 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.keywords.Common __c = null; public String _meventname = ""; public Object _mcallback = null; public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null; @@ -59,226 +52,85 @@ 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 _base_resize(keymon.lat.medicomed.b4xbreadcrumb __ref,double _width,double _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbreadcrumb"; -if (Debug.shouldDelegate(ba, "base_resize", true)) - {return ((String) Debug.delegate(ba, "base_resize", new Object[] {_width,_height}));} -RDebugUtils.currentLine=45678592; - //BA.debugLineNum = 45678592;BA.debugLine="Public Sub Base_Resize (Width As Double, Height As"; -RDebugUtils.currentLine=45678593; - //BA.debugLineNum = 45678593;BA.debugLine="cvs.Resize(Width, Height)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Resize((float) (_width),(float) (_height)); -RDebugUtils.currentLine=45678594; - //BA.debugLineNum = 45678594;BA.debugLine="TouchPanel.SetLayoutAnimated(0, 0, 0, Width, Heig"; -__ref._touchpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); -RDebugUtils.currentLine=45678595; - //BA.debugLineNum = 45678595;BA.debugLine="Draw"; -__ref._draw /*String*/ (null); -RDebugUtils.currentLine=45678596; - //BA.debugLineNum = 45678596;BA.debugLine="End Sub"; +public String _base_resize(double _width,double _height) throws Exception{ + //BA.debugLineNum = 51;BA.debugLine="Public Sub Base_Resize (Width As Double, Height As"; + //BA.debugLineNum = 52;BA.debugLine="cvs.Resize(Width, Height)"; +_cvs.Resize((float) (_width),(float) (_height)); + //BA.debugLineNum = 53;BA.debugLine="TouchPanel.SetLayoutAnimated(0, 0, 0, Width, Heig"; +_touchpanel.SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); + //BA.debugLineNum = 54;BA.debugLine="Draw"; +_draw(); + //BA.debugLineNum = 55;BA.debugLine="End Sub"; return ""; } -public String _draw(keymon.lat.medicomed.b4xbreadcrumb __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbreadcrumb"; -if (Debug.shouldDelegate(ba, "draw", true)) - {return ((String) Debug.delegate(ba, "draw", null));} -b4a.example.bitmapcreator._argbcolor _bcolor = null; -int _strokecolor = 0; -int[] _clrs = null; -int _left = 0; -int _i = 0; -int _sc = 0; -int _width = 0; -RDebugUtils.currentLine=45744128; - //BA.debugLineNum = 45744128;BA.debugLine="Private Sub Draw"; -RDebugUtils.currentLine=45744129; - //BA.debugLineNum = 45744129;BA.debugLine="cvs.ClearRect(cvs.TargetRect)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .ClearRect(__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect()); -RDebugUtils.currentLine=45744130; - //BA.debugLineNum = 45744130;BA.debugLine="Dim bcolor As ARGBColor"; -_bcolor = new b4a.example.bitmapcreator._argbcolor(); -RDebugUtils.currentLine=45744131; - //BA.debugLineNum = 45744131;BA.debugLine="bc.ColorToARGB(CrumbColor, bcolor)"; -__ref._bc /*b4a.example.bitmapcreator*/ ._colortoargb(__ref._crumbcolor /*int*/ ,_bcolor); -RDebugUtils.currentLine=45744132; - //BA.debugLineNum = 45744132;BA.debugLine="bcolor.r = Min(255, bcolor.r * 2)"; -_bcolor.r = (int) (__c.Min(255,_bcolor.r*2)); -RDebugUtils.currentLine=45744133; - //BA.debugLineNum = 45744133;BA.debugLine="bcolor.g = Min(255, bcolor.g * 2)"; -_bcolor.g = (int) (__c.Min(255,_bcolor.g*2)); -RDebugUtils.currentLine=45744134; - //BA.debugLineNum = 45744134;BA.debugLine="bcolor.b = Min(255, bcolor.b * 2)"; -_bcolor.b = (int) (__c.Min(255,_bcolor.b*2)); -RDebugUtils.currentLine=45744135; - //BA.debugLineNum = 45744135;BA.debugLine="Dim strokeColor As Int = bc.ARGBToColor(bcolor)"; -_strokecolor = __ref._bc /*b4a.example.bitmapcreator*/ ._argbtocolor(_bcolor); -RDebugUtils.currentLine=45744137; - //BA.debugLineNum = 45744137;BA.debugLine="bc.ColorToARGB(CrumbColor, bcolor)"; -__ref._bc /*b4a.example.bitmapcreator*/ ._colortoargb(__ref._crumbcolor /*int*/ ,_bcolor); -RDebugUtils.currentLine=45744138; - //BA.debugLineNum = 45744138;BA.debugLine="bcolor.r = bcolor.r * 0.8"; -_bcolor.r = (int) (_bcolor.r*0.8); -RDebugUtils.currentLine=45744139; - //BA.debugLineNum = 45744139;BA.debugLine="bcolor.g = bcolor.g * 0.8"; -_bcolor.g = (int) (_bcolor.g*0.8); -RDebugUtils.currentLine=45744140; - //BA.debugLineNum = 45744140;BA.debugLine="bcolor.b = bcolor.b * 0.8"; -_bcolor.b = (int) (_bcolor.b*0.8); -RDebugUtils.currentLine=45744141; - //BA.debugLineNum = 45744141;BA.debugLine="Dim Clrs() As Int = Array As Int(CrumbColor, bc.A"; -_clrs = new int[]{__ref._crumbcolor /*int*/ ,__ref._bc /*b4a.example.bitmapcreator*/ ._argbtocolor(_bcolor)}; -RDebugUtils.currentLine=45744143; - //BA.debugLineNum = 45744143;BA.debugLine="RightPositions.Clear"; -__ref._rightpositions /*anywheresoftware.b4a.objects.collections.List*/ .Clear(); -RDebugUtils.currentLine=45744144; - //BA.debugLineNum = 45744144;BA.debugLine="If mItems.Size = 0 Then Return"; -if (__ref._mitems /*anywheresoftware.b4a.objects.collections.List*/ .getSize()==0) { -if (true) return "";}; -RDebugUtils.currentLine=45744145; - //BA.debugLineNum = 45744145;BA.debugLine="Dim Left As Int = 0"; -_left = (int) (0); -RDebugUtils.currentLine=45744146; - //BA.debugLineNum = 45744146;BA.debugLine="For i = 0 To mItems.Size - 1"; -{ -final int step16 = 1; -final int limit16 = (int) (__ref._mitems /*anywheresoftware.b4a.objects.collections.List*/ .getSize()-1); -_i = (int) (0) ; -for (;_i <= limit16 ;_i = _i + step16 ) { -RDebugUtils.currentLine=45744147; - //BA.debugLineNum = 45744147;BA.debugLine="Dim sc As Int"; -_sc = 0; -RDebugUtils.currentLine=45744148; - //BA.debugLineNum = 45744148;BA.debugLine="If PressedItem = i Then sc = strokeColor Else sc"; -if (__ref._presseditem /*int*/ ==_i) { -_sc = _strokecolor;} -else { -_sc = (int) (0);}; -RDebugUtils.currentLine=45744149; - //BA.debugLineNum = 45744149;BA.debugLine="Dim width As Int = DrawItem(Left, mItems.Get(i),"; -_width = __ref._drawitem /*int*/ (null,_left,BA.ObjectToString(__ref._mitems /*anywheresoftware.b4a.objects.collections.List*/ .Get(_i)),_i==0,_i==__ref._mitems /*anywheresoftware.b4a.objects.collections.List*/ .getSize()-1,_clrs[(int) (_i%_clrs.length)],_sc); -RDebugUtils.currentLine=45744150; - //BA.debugLineNum = 45744150;BA.debugLine="Left = Left + width + offset + 2dip"; -_left = (int) (_left+_width+__ref._offset /*int*/ +__c.DipToCurrent((int) (2))); -RDebugUtils.currentLine=45744151; - //BA.debugLineNum = 45744151;BA.debugLine="RightPositions.Add(Left)"; -__ref._rightpositions /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(_left)); - } -}; -RDebugUtils.currentLine=45744153; - //BA.debugLineNum = 45744153;BA.debugLine="cvs.Invalidate"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Invalidate(); -RDebugUtils.currentLine=45744154; - //BA.debugLineNum = 45744154;BA.debugLine="End Sub"; -return ""; -} -public String _class_globals(keymon.lat.medicomed.b4xbreadcrumb __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbreadcrumb"; -RDebugUtils.currentLine=45481984; - //BA.debugLineNum = 45481984;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=45481985; - //BA.debugLineNum = 45481985;BA.debugLine="Private mEventName As String 'ignore"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 5;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 6;BA.debugLine="Private mEventName As String 'ignore"; _meventname = ""; -RDebugUtils.currentLine=45481986; - //BA.debugLineNum = 45481986;BA.debugLine="Private mCallBack As Object 'ignore"; + //BA.debugLineNum = 7;BA.debugLine="Private mCallBack As Object 'ignore"; _mcallback = new Object(); -RDebugUtils.currentLine=45481987; - //BA.debugLineNum = 45481987;BA.debugLine="Public mBase As B4XView 'ignore"; + //BA.debugLineNum = 8;BA.debugLine="Public mBase As B4XView 'ignore"; _mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=45481988; - //BA.debugLineNum = 45481988;BA.debugLine="Private xui As XUI 'ignore"; + //BA.debugLineNum = 9;BA.debugLine="Private xui As XUI 'ignore"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=45481989; - //BA.debugLineNum = 45481989;BA.debugLine="Private cvs As B4XCanvas"; + //BA.debugLineNum = 10;BA.debugLine="Private cvs As B4XCanvas"; _cvs = new anywheresoftware.b4a.objects.B4XCanvas(); -RDebugUtils.currentLine=45481990; - //BA.debugLineNum = 45481990;BA.debugLine="Private mItems As List"; + //BA.debugLineNum = 11;BA.debugLine="Private mItems As List"; _mitems = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=45481991; - //BA.debugLineNum = 45481991;BA.debugLine="Private RightPositions As List"; + //BA.debugLineNum = 12;BA.debugLine="Private RightPositions As List"; _rightpositions = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=45481992; - //BA.debugLineNum = 45481992;BA.debugLine="Public TextColor As Int"; + //BA.debugLineNum = 13;BA.debugLine="Public TextColor As Int"; _textcolor = 0; -RDebugUtils.currentLine=45481993; - //BA.debugLineNum = 45481993;BA.debugLine="Public fnt As B4XFont"; + //BA.debugLineNum = 14;BA.debugLine="Public fnt As B4XFont"; _fnt = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont(); -RDebugUtils.currentLine=45481994; - //BA.debugLineNum = 45481994;BA.debugLine="Private offset As Int = 10dip"; + //BA.debugLineNum = 15;BA.debugLine="Private offset As Int = 10dip"; _offset = __c.DipToCurrent((int) (10)); -RDebugUtils.currentLine=45481995; - //BA.debugLineNum = 45481995;BA.debugLine="Private bc As BitmapCreator"; + //BA.debugLineNum = 16;BA.debugLine="Private bc As BitmapCreator"; _bc = new b4a.example.bitmapcreator(); -RDebugUtils.currentLine=45481996; - //BA.debugLineNum = 45481996;BA.debugLine="Public CrumbColor As Int"; + //BA.debugLineNum = 17;BA.debugLine="Public CrumbColor As Int"; _crumbcolor = 0; -RDebugUtils.currentLine=45481997; - //BA.debugLineNum = 45481997;BA.debugLine="Private TouchPanel As B4XView"; + //BA.debugLineNum = 18;BA.debugLine="Private TouchPanel As B4XView"; _touchpanel = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=45481998; - //BA.debugLineNum = 45481998;BA.debugLine="Private PressedItem As Int = -1"; + //BA.debugLineNum = 19;BA.debugLine="Private PressedItem As Int = -1"; _presseditem = (int) (-1); -RDebugUtils.currentLine=45481999; - //BA.debugLineNum = 45481999;BA.debugLine="Public Tag As Object"; + //BA.debugLineNum = 20;BA.debugLine="Public Tag As Object"; _tag = new Object(); -RDebugUtils.currentLine=45482000; - //BA.debugLineNum = 45482000;BA.debugLine="Public mHaptic As Boolean"; + //BA.debugLineNum = 21;BA.debugLine="Public mHaptic As Boolean"; _mhaptic = false; -RDebugUtils.currentLine=45482001; - //BA.debugLineNum = 45482001;BA.debugLine="End Sub"; + //BA.debugLineNum = 22;BA.debugLine="End Sub"; return ""; } -public String _designercreateview(keymon.lat.medicomed.b4xbreadcrumb __ref,Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbreadcrumb"; -if (Debug.shouldDelegate(ba, "designercreateview", true)) - {return ((String) Debug.delegate(ba, "designercreateview", new Object[] {_base,_lbl,_props}));} +public String _designercreateview(Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ anywheresoftware.b4a.objects.B4XViewWrapper _xlbl = null; String _items = ""; String _s = ""; -RDebugUtils.currentLine=45613056; - //BA.debugLineNum = 45613056;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; -RDebugUtils.currentLine=45613057; - //BA.debugLineNum = 45613057;BA.debugLine="mBase = Base"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); -RDebugUtils.currentLine=45613058; - //BA.debugLineNum = 45613058;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._tag /*Object*/ = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getTag(); -RDebugUtils.currentLine=45613058; - //BA.debugLineNum = 45613058;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag(this); -RDebugUtils.currentLine=45613059; - //BA.debugLineNum = 45613059;BA.debugLine="cvs.Initialize(mBase)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Initialize(__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ); -RDebugUtils.currentLine=45613060; - //BA.debugLineNum = 45613060;BA.debugLine="Dim xlbl As B4XView = Lbl"; + //BA.debugLineNum = 33;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; + //BA.debugLineNum = 34;BA.debugLine="mBase = Base"; +_mbase = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); + //BA.debugLineNum = 35;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_tag = _mbase.getTag(); + //BA.debugLineNum = 35;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_mbase.setTag(this); + //BA.debugLineNum = 36;BA.debugLine="cvs.Initialize(mBase)"; +_cvs.Initialize(_mbase); + //BA.debugLineNum = 37;BA.debugLine="Dim xlbl As B4XView = Lbl"; _xlbl = new anywheresoftware.b4a.objects.B4XViewWrapper(); _xlbl = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lbl.getObject())); -RDebugUtils.currentLine=45613061; - //BA.debugLineNum = 45613061;BA.debugLine="fnt = xlbl.Font"; -__ref._fnt /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ = _xlbl.getFont(); -RDebugUtils.currentLine=45613062; - //BA.debugLineNum = 45613062;BA.debugLine="TextColor = xlbl.TextColor"; -__ref._textcolor /*int*/ = _xlbl.getTextColor(); -RDebugUtils.currentLine=45613063; - //BA.debugLineNum = 45613063;BA.debugLine="CrumbColor = xui.PaintOrColorToColor(Props.Get(\"C"; -__ref._crumbcolor /*int*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor(_props.Get((Object)("CrumbColor"))); -RDebugUtils.currentLine=45613064; - //BA.debugLineNum = 45613064;BA.debugLine="mHaptic = Props.GetDefault(\"HapticFeedback\", Fals"; -__ref._mhaptic /*boolean*/ = BA.ObjectToBoolean(_props.GetDefault((Object)("HapticFeedback"),(Object)(__c.False))); -RDebugUtils.currentLine=45613065; - //BA.debugLineNum = 45613065;BA.debugLine="TouchPanel = xui.CreatePanel(\"Touch\")"; -__ref._touchpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,"Touch"); -RDebugUtils.currentLine=45613066; - //BA.debugLineNum = 45613066;BA.debugLine="mBase.AddView(TouchPanel, 0, 0, mBase.Width, mBas"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._touchpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(int) (0),(int) (0),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=45613067; - //BA.debugLineNum = 45613067;BA.debugLine="Dim items As String = Props.Get(\"Items\")"; + //BA.debugLineNum = 38;BA.debugLine="fnt = xlbl.Font"; +_fnt = _xlbl.getFont(); + //BA.debugLineNum = 39;BA.debugLine="TextColor = xlbl.TextColor"; +_textcolor = _xlbl.getTextColor(); + //BA.debugLineNum = 40;BA.debugLine="CrumbColor = xui.PaintOrColorToColor(Props.Get(\"C"; +_crumbcolor = _xui.PaintOrColorToColor(_props.Get((Object)("CrumbColor"))); + //BA.debugLineNum = 41;BA.debugLine="mHaptic = Props.GetDefault(\"HapticFeedback\", Fals"; +_mhaptic = BA.ObjectToBoolean(_props.GetDefault((Object)("HapticFeedback"),(Object)(__c.False))); + //BA.debugLineNum = 42;BA.debugLine="TouchPanel = xui.CreatePanel(\"Touch\")"; +_touchpanel = _xui.CreatePanel(ba,"Touch"); + //BA.debugLineNum = 43;BA.debugLine="mBase.AddView(TouchPanel, 0, 0, mBase.Width, mBas"; +_mbase.AddView((android.view.View)(_touchpanel.getObject()),(int) (0),(int) (0),_mbase.getWidth(),_mbase.getHeight()); + //BA.debugLineNum = 44;BA.debugLine="Dim items As String = Props.Get(\"Items\")"; _items = BA.ObjectToString(_props.Get((Object)("Items"))); -RDebugUtils.currentLine=45613068; - //BA.debugLineNum = 45613068;BA.debugLine="For Each s As String In Regex.Split(\"\\|\", items)"; + //BA.debugLineNum = 45;BA.debugLine="For Each s As String In Regex.Split(\"\\|\", items)"; { final String[] group13 = __c.Regex.Split("\\|",_items); final int groupLen13 = group13.length @@ -286,277 +138,257 @@ final int groupLen13 = group13.length ; for (; index13 < groupLen13;index13++){ _s = group13[index13]; -RDebugUtils.currentLine=45613069; - //BA.debugLineNum = 45613069;BA.debugLine="mItems.Add(s)"; -__ref._mitems /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(_s)); + //BA.debugLineNum = 46;BA.debugLine="mItems.Add(s)"; +_mitems.Add((Object)(_s)); } }; -RDebugUtils.currentLine=45613071; - //BA.debugLineNum = 45613071;BA.debugLine="Draw"; -__ref._draw /*String*/ (null); -RDebugUtils.currentLine=45613072; - //BA.debugLineNum = 45613072;BA.debugLine="End Sub"; + //BA.debugLineNum = 48;BA.debugLine="Draw"; +_draw(); + //BA.debugLineNum = 49;BA.debugLine="End Sub"; return ""; } -public int _drawitem(keymon.lat.medicomed.b4xbreadcrumb __ref,int _left,String _text,boolean _first,boolean _last,int _clr,int _strokecolor) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbreadcrumb"; -if (Debug.shouldDelegate(ba, "drawitem", true)) - {return ((Integer) Debug.delegate(ba, "drawitem", new Object[] {_left,_text,_first,_last,_clr,_strokecolor}));} +public String _draw() throws Exception{ +b4a.example.bitmapcreator._argbcolor _bcolor = null; +int _strokecolor = 0; +int[] _clrs = null; +int _left = 0; +int _i = 0; +int _sc = 0; +int _width = 0; + //BA.debugLineNum = 57;BA.debugLine="Private Sub Draw"; + //BA.debugLineNum = 58;BA.debugLine="cvs.ClearRect(cvs.TargetRect)"; +_cvs.ClearRect(_cvs.getTargetRect()); + //BA.debugLineNum = 59;BA.debugLine="Dim bcolor As ARGBColor"; +_bcolor = new b4a.example.bitmapcreator._argbcolor(); + //BA.debugLineNum = 60;BA.debugLine="bc.ColorToARGB(CrumbColor, bcolor)"; +_bc._colortoargb(_crumbcolor,_bcolor); + //BA.debugLineNum = 61;BA.debugLine="bcolor.r = Min(255, bcolor.r * 2)"; +_bcolor.r = (int) (__c.Min(255,_bcolor.r*2)); + //BA.debugLineNum = 62;BA.debugLine="bcolor.g = Min(255, bcolor.g * 2)"; +_bcolor.g = (int) (__c.Min(255,_bcolor.g*2)); + //BA.debugLineNum = 63;BA.debugLine="bcolor.b = Min(255, bcolor.b * 2)"; +_bcolor.b = (int) (__c.Min(255,_bcolor.b*2)); + //BA.debugLineNum = 64;BA.debugLine="Dim strokeColor As Int = bc.ARGBToColor(bcolor)"; +_strokecolor = _bc._argbtocolor(_bcolor); + //BA.debugLineNum = 66;BA.debugLine="bc.ColorToARGB(CrumbColor, bcolor)"; +_bc._colortoargb(_crumbcolor,_bcolor); + //BA.debugLineNum = 67;BA.debugLine="bcolor.r = bcolor.r * 0.8"; +_bcolor.r = (int) (_bcolor.r*0.8); + //BA.debugLineNum = 68;BA.debugLine="bcolor.g = bcolor.g * 0.8"; +_bcolor.g = (int) (_bcolor.g*0.8); + //BA.debugLineNum = 69;BA.debugLine="bcolor.b = bcolor.b * 0.8"; +_bcolor.b = (int) (_bcolor.b*0.8); + //BA.debugLineNum = 70;BA.debugLine="Dim Clrs() As Int = Array As Int(CrumbColor, bc.A"; +_clrs = new int[]{_crumbcolor,_bc._argbtocolor(_bcolor)}; + //BA.debugLineNum = 72;BA.debugLine="RightPositions.Clear"; +_rightpositions.Clear(); + //BA.debugLineNum = 73;BA.debugLine="If mItems.Size = 0 Then Return"; +if (_mitems.getSize()==0) { +if (true) return "";}; + //BA.debugLineNum = 74;BA.debugLine="Dim Left As Int = 0"; +_left = (int) (0); + //BA.debugLineNum = 75;BA.debugLine="For i = 0 To mItems.Size - 1"; +{ +final int step16 = 1; +final int limit16 = (int) (_mitems.getSize()-1); +_i = (int) (0) ; +for (;_i <= limit16 ;_i = _i + step16 ) { + //BA.debugLineNum = 76;BA.debugLine="Dim sc As Int"; +_sc = 0; + //BA.debugLineNum = 77;BA.debugLine="If PressedItem = i Then sc = strokeColor Else sc"; +if (_presseditem==_i) { +_sc = _strokecolor;} +else { +_sc = (int) (0);}; + //BA.debugLineNum = 78;BA.debugLine="Dim width As Int = DrawItem(Left, mItems.Get(i),"; +_width = _drawitem(_left,BA.ObjectToString(_mitems.Get(_i)),_i==0,_i==_mitems.getSize()-1,_clrs[(int) (_i%_clrs.length)],_sc); + //BA.debugLineNum = 79;BA.debugLine="Left = Left + width + offset + 2dip"; +_left = (int) (_left+_width+_offset+__c.DipToCurrent((int) (2))); + //BA.debugLineNum = 80;BA.debugLine="RightPositions.Add(Left)"; +_rightpositions.Add((Object)(_left)); + } +}; + //BA.debugLineNum = 82;BA.debugLine="cvs.Invalidate"; +_cvs.Invalidate(); + //BA.debugLineNum = 83;BA.debugLine="End Sub"; +return ""; +} +public int _drawitem(int _left,String _text,boolean _first,boolean _last,int _clr,int _strokecolor) throws Exception{ anywheresoftware.b4a.objects.B4XCanvas.B4XRect _r = null; int _itemwidth = 0; int _itemheight = 0; int _baseline = 0; anywheresoftware.b4a.objects.B4XCanvas.B4XPath _p = null; -RDebugUtils.currentLine=45809664; - //BA.debugLineNum = 45809664;BA.debugLine="Private Sub DrawItem(Left As Int, Text As String,"; -RDebugUtils.currentLine=45809665; - //BA.debugLineNum = 45809665;BA.debugLine="Dim r As B4XRect = cvs.MeasureText(Text, fnt)"; -_r = __ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .MeasureText(_text,__ref._fnt /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ ); -RDebugUtils.currentLine=45809666; - //BA.debugLineNum = 45809666;BA.debugLine="Dim ItemWidth As Int = r.Width + 30dip"; + //BA.debugLineNum = 85;BA.debugLine="Private Sub DrawItem(Left As Int, Text As String,"; + //BA.debugLineNum = 86;BA.debugLine="Dim r As B4XRect = cvs.MeasureText(Text, fnt)"; +_r = _cvs.MeasureText(_text,_fnt); + //BA.debugLineNum = 87;BA.debugLine="Dim ItemWidth As Int = r.Width + 30dip"; _itemwidth = (int) (_r.getWidth()+__c.DipToCurrent((int) (30))); -RDebugUtils.currentLine=45809667; - //BA.debugLineNum = 45809667;BA.debugLine="Dim ItemHeight As Int = cvs.TargetRect.Height"; -_itemheight = (int) (__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getHeight()); -RDebugUtils.currentLine=45809668; - //BA.debugLineNum = 45809668;BA.debugLine="Dim BaseLine As Int = cvs.TargetRect.CenterY - r."; -_baseline = (int) (__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterY()-_r.getHeight()/(double)2-_r.getTop()); -RDebugUtils.currentLine=45809669; - //BA.debugLineNum = 45809669;BA.debugLine="Dim p As B4XPath"; + //BA.debugLineNum = 88;BA.debugLine="Dim ItemHeight As Int = cvs.TargetRect.Height"; +_itemheight = (int) (_cvs.getTargetRect().getHeight()); + //BA.debugLineNum = 89;BA.debugLine="Dim BaseLine As Int = cvs.TargetRect.CenterY - r."; +_baseline = (int) (_cvs.getTargetRect().getCenterY()-_r.getHeight()/(double)2-_r.getTop()); + //BA.debugLineNum = 90;BA.debugLine="Dim p As B4XPath"; _p = new anywheresoftware.b4a.objects.B4XCanvas.B4XPath(); -RDebugUtils.currentLine=45809670; - //BA.debugLineNum = 45809670;BA.debugLine="p.Initialize(Left, 0)"; + //BA.debugLineNum = 91;BA.debugLine="p.Initialize(Left, 0)"; _p.Initialize((float) (_left),(float) (0)); -RDebugUtils.currentLine=45809671; - //BA.debugLineNum = 45809671;BA.debugLine="p.LineTo(Left + ItemWidth, 0)"; + //BA.debugLineNum = 92;BA.debugLine="p.LineTo(Left + ItemWidth, 0)"; _p.LineTo((float) (_left+_itemwidth),(float) (0)); -RDebugUtils.currentLine=45809672; - //BA.debugLineNum = 45809672;BA.debugLine="If Last = False Then"; + //BA.debugLineNum = 93;BA.debugLine="If Last = False Then"; if (_last==__c.False) { -RDebugUtils.currentLine=45809673; - //BA.debugLineNum = 45809673;BA.debugLine="p.LineTo(Left + ItemWidth + offset, ItemHeight /"; -_p.LineTo((float) (_left+_itemwidth+__ref._offset /*int*/ ),(float) (_itemheight/(double)2)); + //BA.debugLineNum = 94;BA.debugLine="p.LineTo(Left + ItemWidth + offset, ItemHeight /"; +_p.LineTo((float) (_left+_itemwidth+_offset),(float) (_itemheight/(double)2)); }; -RDebugUtils.currentLine=45809675; - //BA.debugLineNum = 45809675;BA.debugLine="p.LineTo(Left + ItemWidth, ItemHeight)"; + //BA.debugLineNum = 96;BA.debugLine="p.LineTo(Left + ItemWidth, ItemHeight)"; _p.LineTo((float) (_left+_itemwidth),(float) (_itemheight)); -RDebugUtils.currentLine=45809676; - //BA.debugLineNum = 45809676;BA.debugLine="If First = False Then"; + //BA.debugLineNum = 97;BA.debugLine="If First = False Then"; if (_first==__c.False) { -RDebugUtils.currentLine=45809677; - //BA.debugLineNum = 45809677;BA.debugLine="p.LineTo(Left - offset, ItemHeight)"; -_p.LineTo((float) (_left-__ref._offset /*int*/ ),(float) (_itemheight)); -RDebugUtils.currentLine=45809678; - //BA.debugLineNum = 45809678;BA.debugLine="p.LineTo(Left, ItemHeight / 2)"; + //BA.debugLineNum = 98;BA.debugLine="p.LineTo(Left - offset, ItemHeight)"; +_p.LineTo((float) (_left-_offset),(float) (_itemheight)); + //BA.debugLineNum = 99;BA.debugLine="p.LineTo(Left, ItemHeight / 2)"; _p.LineTo((float) (_left),(float) (_itemheight/(double)2)); -RDebugUtils.currentLine=45809679; - //BA.debugLineNum = 45809679;BA.debugLine="p.LineTo(Left - offset, 0)"; -_p.LineTo((float) (_left-__ref._offset /*int*/ ),(float) (0)); + //BA.debugLineNum = 100;BA.debugLine="p.LineTo(Left - offset, 0)"; +_p.LineTo((float) (_left-_offset),(float) (0)); }else { -RDebugUtils.currentLine=45809681; - //BA.debugLineNum = 45809681;BA.debugLine="p.LineTo(Left, ItemHeight)"; + //BA.debugLineNum = 102;BA.debugLine="p.LineTo(Left, ItemHeight)"; _p.LineTo((float) (_left),(float) (_itemheight)); }; -RDebugUtils.currentLine=45809683; - //BA.debugLineNum = 45809683;BA.debugLine="p.LineTo(Left, 0)"; + //BA.debugLineNum = 104;BA.debugLine="p.LineTo(Left, 0)"; _p.LineTo((float) (_left),(float) (0)); -RDebugUtils.currentLine=45809684; - //BA.debugLineNum = 45809684;BA.debugLine="cvs.DrawPath(p, clr, True, 0)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawPath(_p,_clr,__c.True,(float) (0)); -RDebugUtils.currentLine=45809685; - //BA.debugLineNum = 45809685;BA.debugLine="If strokeColor <> 0 Then"; + //BA.debugLineNum = 105;BA.debugLine="cvs.DrawPath(p, clr, True, 0)"; +_cvs.DrawPath(_p,_clr,__c.True,(float) (0)); + //BA.debugLineNum = 106;BA.debugLine="If strokeColor <> 0 Then"; if (_strokecolor!=0) { -RDebugUtils.currentLine=45809686; - //BA.debugLineNum = 45809686;BA.debugLine="cvs.DrawPath(p, strokeColor, False, 3dip)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawPath(_p,_strokecolor,__c.False,(float) (__c.DipToCurrent((int) (3)))); + //BA.debugLineNum = 107;BA.debugLine="cvs.DrawPath(p, strokeColor, False, 3dip)"; +_cvs.DrawPath(_p,_strokecolor,__c.False,(float) (__c.DipToCurrent((int) (3)))); }; -RDebugUtils.currentLine=45809689; - //BA.debugLineNum = 45809689;BA.debugLine="cvs.DrawText(Text, Left + ItemWidth / 2, BaseLine"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawText(ba,_text,(float) (_left+_itemwidth/(double)2),(float) (_baseline),__ref._fnt /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ ,__ref._textcolor /*int*/ ,BA.getEnumFromString(android.graphics.Paint.Align.class,"CENTER")); -RDebugUtils.currentLine=45809690; - //BA.debugLineNum = 45809690;BA.debugLine="Return ItemWidth"; + //BA.debugLineNum = 110;BA.debugLine="cvs.DrawText(Text, Left + ItemWidth / 2, BaseLine"; +_cvs.DrawText(ba,_text,(float) (_left+_itemwidth/(double)2),(float) (_baseline),_fnt,_textcolor,BA.getEnumFromString(android.graphics.Paint.Align.class,"CENTER")); + //BA.debugLineNum = 111;BA.debugLine="Return ItemWidth"; if (true) return _itemwidth; -RDebugUtils.currentLine=45809691; - //BA.debugLineNum = 45809691;BA.debugLine="End Sub"; + //BA.debugLineNum = 112;BA.debugLine="End Sub"; return 0; } -public int _finditem(keymon.lat.medicomed.b4xbreadcrumb __ref,int _x,int _y) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbreadcrumb"; -if (Debug.shouldDelegate(ba, "finditem", true)) - {return ((Integer) Debug.delegate(ba, "finditem", new Object[] {_x,_y}));} +public int _finditem(int _x,int _y) throws Exception{ int _r = 0; int _i = 0; -RDebugUtils.currentLine=45940736; - //BA.debugLineNum = 45940736;BA.debugLine="Private Sub FindItem (x As Int, y As Int) As Int"; -RDebugUtils.currentLine=45940737; - //BA.debugLineNum = 45940737;BA.debugLine="If RightPositions.Size = 0 Then Return -1"; -if (__ref._rightpositions /*anywheresoftware.b4a.objects.collections.List*/ .getSize()==0) { + //BA.debugLineNum = 136;BA.debugLine="Private Sub FindItem (x As Int, y As Int) As Int"; + //BA.debugLineNum = 137;BA.debugLine="If RightPositions.Size = 0 Then Return -1"; +if (_rightpositions.getSize()==0) { if (true) return (int) (-1);}; -RDebugUtils.currentLine=45940738; - //BA.debugLineNum = 45940738;BA.debugLine="If y < 0 Or y > cvs.TargetRect.Height Then Return"; -if (_y<0 || _y>__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getHeight()) { + //BA.debugLineNum = 138;BA.debugLine="If y < 0 Or y > cvs.TargetRect.Height Then Return"; +if (_y<0 || _y>_cvs.getTargetRect().getHeight()) { if (true) return (int) (-1);}; -RDebugUtils.currentLine=45940739; - //BA.debugLineNum = 45940739;BA.debugLine="Dim r As Int = RightPositions.Get(RightPositions."; -_r = (int)(BA.ObjectToNumber(__ref._rightpositions /*anywheresoftware.b4a.objects.collections.List*/ .Get((int) (__ref._rightpositions /*anywheresoftware.b4a.objects.collections.List*/ .getSize()-1)))); -RDebugUtils.currentLine=45940740; - //BA.debugLineNum = 45940740;BA.debugLine="If x > r Then Return -1"; + //BA.debugLineNum = 139;BA.debugLine="Dim r As Int = RightPositions.Get(RightPositions."; +_r = (int)(BA.ObjectToNumber(_rightpositions.Get((int) (_rightpositions.getSize()-1)))); + //BA.debugLineNum = 140;BA.debugLine="If x > r Then Return -1"; if (_x>_r) { if (true) return (int) (-1);}; -RDebugUtils.currentLine=45940741; - //BA.debugLineNum = 45940741;BA.debugLine="For i = RightPositions.Size - 2 To 0 Step -1"; + //BA.debugLineNum = 141;BA.debugLine="For i = RightPositions.Size - 2 To 0 Step -1"; { final int step5 = -1; final int limit5 = (int) (0); -_i = (int) (__ref._rightpositions /*anywheresoftware.b4a.objects.collections.List*/ .getSize()-2) ; +_i = (int) (_rightpositions.getSize()-2) ; for (;_i >= limit5 ;_i = _i + step5 ) { -RDebugUtils.currentLine=45940742; - //BA.debugLineNum = 45940742;BA.debugLine="Dim r As Int = RightPositions.Get(i)"; -_r = (int)(BA.ObjectToNumber(__ref._rightpositions /*anywheresoftware.b4a.objects.collections.List*/ .Get(_i))); -RDebugUtils.currentLine=45940743; - //BA.debugLineNum = 45940743;BA.debugLine="If x > r Then Return i + 1"; + //BA.debugLineNum = 142;BA.debugLine="Dim r As Int = RightPositions.Get(i)"; +_r = (int)(BA.ObjectToNumber(_rightpositions.Get(_i))); + //BA.debugLineNum = 143;BA.debugLine="If x > r Then Return i + 1"; if (_x>_r) { if (true) return (int) (_i+1);}; } }; -RDebugUtils.currentLine=45940745; - //BA.debugLineNum = 45940745;BA.debugLine="Return 0"; + //BA.debugLineNum = 145;BA.debugLine="Return 0"; if (true) return (int) (0); -RDebugUtils.currentLine=45940746; - //BA.debugLineNum = 45940746;BA.debugLine="End Sub"; + //BA.debugLineNum = 146;BA.debugLine="End Sub"; return 0; } -public anywheresoftware.b4a.objects.collections.List _getitems(keymon.lat.medicomed.b4xbreadcrumb __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbreadcrumb"; -if (Debug.shouldDelegate(ba, "getitems", true)) - {return ((anywheresoftware.b4a.objects.collections.List) Debug.delegate(ba, "getitems", null));} -RDebugUtils.currentLine=46071808; - //BA.debugLineNum = 46071808;BA.debugLine="Public Sub getItems As List"; -RDebugUtils.currentLine=46071809; - //BA.debugLineNum = 46071809;BA.debugLine="Return mItems"; -if (true) return __ref._mitems /*anywheresoftware.b4a.objects.collections.List*/ ; -RDebugUtils.currentLine=46071810; - //BA.debugLineNum = 46071810;BA.debugLine="End Sub"; +public anywheresoftware.b4a.objects.collections.List _getitems() throws Exception{ + //BA.debugLineNum = 153;BA.debugLine="Public Sub getItems As List"; + //BA.debugLineNum = 154;BA.debugLine="Return mItems"; +if (true) return _mitems; + //BA.debugLineNum = 155;BA.debugLine="End Sub"; return null; } -public String _initialize(keymon.lat.medicomed.b4xbreadcrumb __ref,anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ -__ref = this; +public String _initialize(anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ innerInitialize(_ba); -RDebugUtils.currentModule="b4xbreadcrumb"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_callback,_eventname}));} -RDebugUtils.currentLine=45547520; - //BA.debugLineNum = 45547520;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -RDebugUtils.currentLine=45547521; - //BA.debugLineNum = 45547521;BA.debugLine="mEventName = EventName"; -__ref._meventname /*String*/ = _eventname; -RDebugUtils.currentLine=45547522; - //BA.debugLineNum = 45547522;BA.debugLine="mCallBack = Callback"; -__ref._mcallback /*Object*/ = _callback; -RDebugUtils.currentLine=45547523; - //BA.debugLineNum = 45547523;BA.debugLine="mItems.Initialize"; -__ref._mitems /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=45547524; - //BA.debugLineNum = 45547524;BA.debugLine="RightPositions.Initialize"; -__ref._rightpositions /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=45547525; - //BA.debugLineNum = 45547525;BA.debugLine="bc.Initialize(1, 1)"; -__ref._bc /*b4a.example.bitmapcreator*/ ._initialize(ba,(int) (1),(int) (1)); -RDebugUtils.currentLine=45547526; - //BA.debugLineNum = 45547526;BA.debugLine="End Sub"; + //BA.debugLineNum = 24;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; + //BA.debugLineNum = 25;BA.debugLine="mEventName = EventName"; +_meventname = _eventname; + //BA.debugLineNum = 26;BA.debugLine="mCallBack = Callback"; +_mcallback = _callback; + //BA.debugLineNum = 27;BA.debugLine="mItems.Initialize"; +_mitems.Initialize(); + //BA.debugLineNum = 28;BA.debugLine="RightPositions.Initialize"; +_rightpositions.Initialize(); + //BA.debugLineNum = 29;BA.debugLine="bc.Initialize(1, 1)"; +_bc._initialize(ba,(int) (1),(int) (1)); + //BA.debugLineNum = 30;BA.debugLine="End Sub"; return ""; } -public String _setitems(keymon.lat.medicomed.b4xbreadcrumb __ref,anywheresoftware.b4a.objects.collections.List _i) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbreadcrumb"; -if (Debug.shouldDelegate(ba, "setitems", true)) - {return ((String) Debug.delegate(ba, "setitems", new Object[] {_i}));} -RDebugUtils.currentLine=46006272; - //BA.debugLineNum = 46006272;BA.debugLine="Public Sub setItems (i As List)"; -RDebugUtils.currentLine=46006273; - //BA.debugLineNum = 46006273;BA.debugLine="mItems = i"; -__ref._mitems /*anywheresoftware.b4a.objects.collections.List*/ = _i; -RDebugUtils.currentLine=46006274; - //BA.debugLineNum = 46006274;BA.debugLine="Draw"; -__ref._draw /*String*/ (null); -RDebugUtils.currentLine=46006275; - //BA.debugLineNum = 46006275;BA.debugLine="End Sub"; +public String _setitems(anywheresoftware.b4a.objects.collections.List _i) throws Exception{ + //BA.debugLineNum = 148;BA.debugLine="Public Sub setItems (i As List)"; + //BA.debugLineNum = 149;BA.debugLine="mItems = i"; +_mitems = _i; + //BA.debugLineNum = 150;BA.debugLine="Draw"; +_draw(); + //BA.debugLineNum = 151;BA.debugLine="End Sub"; return ""; } -public String _touch_touch(keymon.lat.medicomed.b4xbreadcrumb __ref,int _action,float _x,float _y) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbreadcrumb"; -if (Debug.shouldDelegate(ba, "touch_touch", true)) - {return ((String) Debug.delegate(ba, "touch_touch", new Object[] {_action,_x,_y}));} +public String _touch_touch(int _action,float _x,float _y) throws Exception{ int _prev = 0; int _index = 0; anywheresoftware.b4a.objects.collections.List _items = null; int _i = 0; -RDebugUtils.currentLine=45875200; - //BA.debugLineNum = 45875200;BA.debugLine="Private Sub Touch_Touch (Action As Int, X As Float"; -RDebugUtils.currentLine=45875201; - //BA.debugLineNum = 45875201;BA.debugLine="Select Action"; -switch (BA.switchObjectToInt(_action,__ref._touchpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .TOUCH_ACTION_DOWN,__ref._touchpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .TOUCH_ACTION_MOVE,__ref._touchpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .TOUCH_ACTION_UP)) { + //BA.debugLineNum = 114;BA.debugLine="Private Sub Touch_Touch (Action As Int, X As Float"; + //BA.debugLineNum = 115;BA.debugLine="Select Action"; +switch (BA.switchObjectToInt(_action,_touchpanel.TOUCH_ACTION_DOWN,_touchpanel.TOUCH_ACTION_MOVE,_touchpanel.TOUCH_ACTION_UP)) { case 0: case 1: { -RDebugUtils.currentLine=45875203; - //BA.debugLineNum = 45875203;BA.debugLine="Dim prev As Int = PressedItem"; -_prev = __ref._presseditem /*int*/ ; -RDebugUtils.currentLine=45875204; - //BA.debugLineNum = 45875204;BA.debugLine="PressedItem = FindItem(X, Y)"; -__ref._presseditem /*int*/ = __ref._finditem /*int*/ (null,(int) (_x),(int) (_y)); -RDebugUtils.currentLine=45875205; - //BA.debugLineNum = 45875205;BA.debugLine="If prev <> PressedItem Then Draw"; -if (_prev!=__ref._presseditem /*int*/ ) { -__ref._draw /*String*/ (null);}; + //BA.debugLineNum = 117;BA.debugLine="Dim prev As Int = PressedItem"; +_prev = _presseditem; + //BA.debugLineNum = 118;BA.debugLine="PressedItem = FindItem(X, Y)"; +_presseditem = _finditem((int) (_x),(int) (_y)); + //BA.debugLineNum = 119;BA.debugLine="If prev <> PressedItem Then Draw"; +if (_prev!=_presseditem) { +_draw();}; break; } case 2: { -RDebugUtils.currentLine=45875207; - //BA.debugLineNum = 45875207;BA.debugLine="Dim index As Int = FindItem(X, Y)"; -_index = __ref._finditem /*int*/ (null,(int) (_x),(int) (_y)); -RDebugUtils.currentLine=45875208; - //BA.debugLineNum = 45875208;BA.debugLine="If index = PressedItem And index > -1 Then"; -if (_index==__ref._presseditem /*int*/ && _index>-1) { -RDebugUtils.currentLine=45875209; - //BA.debugLineNum = 45875209;BA.debugLine="Dim Items As List"; + //BA.debugLineNum = 121;BA.debugLine="Dim index As Int = FindItem(X, Y)"; +_index = _finditem((int) (_x),(int) (_y)); + //BA.debugLineNum = 122;BA.debugLine="If index = PressedItem And index > -1 Then"; +if (_index==_presseditem && _index>-1) { + //BA.debugLineNum = 123;BA.debugLine="Dim Items As List"; _items = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=45875210; - //BA.debugLineNum = 45875210;BA.debugLine="Items.Initialize"; + //BA.debugLineNum = 124;BA.debugLine="Items.Initialize"; _items.Initialize(); -RDebugUtils.currentLine=45875211; - //BA.debugLineNum = 45875211;BA.debugLine="For i = 0 To index"; + //BA.debugLineNum = 125;BA.debugLine="For i = 0 To index"; { final int step11 = 1; final int limit11 = _index; _i = (int) (0) ; for (;_i <= limit11 ;_i = _i + step11 ) { -RDebugUtils.currentLine=45875212; - //BA.debugLineNum = 45875212;BA.debugLine="Items.Add(mItems.Get(i))"; -_items.Add(__ref._mitems /*anywheresoftware.b4a.objects.collections.List*/ .Get(_i)); + //BA.debugLineNum = 126;BA.debugLine="Items.Add(mItems.Get(i))"; +_items.Add(_mitems.Get(_i)); } }; -RDebugUtils.currentLine=45875214; - //BA.debugLineNum = 45875214;BA.debugLine="If mHaptic Then XUIViewsUtils.PerformHapticFee"; -if (__ref._mhaptic /*boolean*/ ) { -_xuiviewsutils._performhapticfeedback /*String*/ (ba,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ );}; -RDebugUtils.currentLine=45875215; - //BA.debugLineNum = 45875215;BA.debugLine="CallSub2(mCallBack, mEventName & \"_CrumbClick\""; -__c.CallSubNew2(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_CrumbClick",(Object)(_items)); + //BA.debugLineNum = 128;BA.debugLine="If mHaptic Then XUIViewsUtils.PerformHapticFee"; +if (_mhaptic) { +_xuiviewsutils._performhapticfeedback /*String*/ (ba,_mbase);}; + //BA.debugLineNum = 129;BA.debugLine="CallSub2(mCallBack, mEventName & \"_CrumbClick\""; +__c.CallSubNew2(ba,_mcallback,_meventname+"_CrumbClick",(Object)(_items)); }; -RDebugUtils.currentLine=45875217; - //BA.debugLineNum = 45875217;BA.debugLine="PressedItem = -1"; -__ref._presseditem /*int*/ = (int) (-1); -RDebugUtils.currentLine=45875218; - //BA.debugLineNum = 45875218;BA.debugLine="Draw"; -__ref._draw /*String*/ (null); + //BA.debugLineNum = 131;BA.debugLine="PressedItem = -1"; +_presseditem = (int) (-1); + //BA.debugLineNum = 132;BA.debugLine="Draw"; +_draw(); break; } } ; -RDebugUtils.currentLine=45875220; - //BA.debugLineNum = 45875220;BA.debugLine="End Sub"; + //BA.debugLineNum = 134;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xbytesbuilder.java b/B4A/Objects/src/keymon/lat/medicomed/b4xbytesbuilder.java index c5b0ab9..db3fbd2 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xbytesbuilder.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xbytesbuilder.java @@ -10,7 +10,7 @@ public class b4xbytesbuilder extends B4AClass.ImplB4AClass implements BA.SubDele private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xbytesbuilder"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xbytesbuilder"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xbytesbuilder extends B4AClass.ImplB4AClass implements BA.SubDele 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.keywords.Common __c = null; public byte[] _mbuffer = null; public int _mlength = 0; public b4a.example.dateutils _dateutils = null; @@ -45,376 +38,230 @@ 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 keymon.lat.medicomed.b4xbytesbuilder _append(keymon.lat.medicomed.b4xbytesbuilder __ref,byte[] _data) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbytesbuilder"; -if (Debug.shouldDelegate(ba, "append", true)) - {return ((keymon.lat.medicomed.b4xbytesbuilder) Debug.delegate(ba, "append", new Object[] {_data}));} -RDebugUtils.currentLine=34537472; - //BA.debugLineNum = 34537472;BA.debugLine="Public Sub Append(Data() As Byte) As B4XBytesBuild"; -RDebugUtils.currentLine=34537473; - //BA.debugLineNum = 34537473;BA.debugLine="Return Append2(Data, 0, Data.Length)"; -if (true) return __ref._append2 /*keymon.lat.medicomed.b4xbytesbuilder*/ (null,_data,(int) (0),_data.length); -RDebugUtils.currentLine=34537474; - //BA.debugLineNum = 34537474;BA.debugLine="End Sub"; +public keymon.lat.medicomed.b4xbytesbuilder _append(byte[] _data) throws Exception{ + //BA.debugLineNum = 24;BA.debugLine="Public Sub Append(Data() As Byte) As B4XBytesBuild"; + //BA.debugLineNum = 25;BA.debugLine="Return Append2(Data, 0, Data.Length)"; +if (true) return _append2(_data,(int) (0),_data.length); + //BA.debugLineNum = 26;BA.debugLine="End Sub"; return null; } -public keymon.lat.medicomed.b4xbytesbuilder _append2(keymon.lat.medicomed.b4xbytesbuilder __ref,byte[] _data,int _startindex,int _length) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbytesbuilder"; -if (Debug.shouldDelegate(ba, "append2", true)) - {return ((keymon.lat.medicomed.b4xbytesbuilder) Debug.delegate(ba, "append2", new Object[] {_data,_startindex,_length}));} +public keymon.lat.medicomed.b4xbytesbuilder _append2(byte[] _data,int _startindex,int _length) throws Exception{ int _oldlength = 0; -RDebugUtils.currentLine=34603008; - //BA.debugLineNum = 34603008;BA.debugLine="Public Sub Append2(Data() As Byte, StartIndex As I"; -RDebugUtils.currentLine=34603009; - //BA.debugLineNum = 34603009;BA.debugLine="Dim OldLength As Int = ChangeLength(mLength + Len"; -_oldlength = __ref._changelength /*int*/ (null,(int) (__ref._mlength /*int*/ +_length)); -RDebugUtils.currentLine=34603010; - //BA.debugLineNum = 34603010;BA.debugLine="Bit.ArrayCopy(Data, StartIndex, mBuffer, OldLengt"; -__c.Bit.ArrayCopy((Object)(_data),_startindex,(Object)(__ref._mbuffer /*byte[]*/ ),_oldlength,_length); -RDebugUtils.currentLine=34603011; - //BA.debugLineNum = 34603011;BA.debugLine="Return Me"; + //BA.debugLineNum = 31;BA.debugLine="Public Sub Append2(Data() As Byte, StartIndex As I"; + //BA.debugLineNum = 32;BA.debugLine="Dim OldLength As Int = ChangeLength(mLength + Len"; +_oldlength = _changelength((int) (_mlength+_length)); + //BA.debugLineNum = 33;BA.debugLine="Bit.ArrayCopy(Data, StartIndex, mBuffer, OldLengt"; +__c.Bit.ArrayCopy((Object)(_data),_startindex,(Object)(_mbuffer),_oldlength,_length); + //BA.debugLineNum = 34;BA.debugLine="Return Me"; if (true) return (keymon.lat.medicomed.b4xbytesbuilder)(this); -RDebugUtils.currentLine=34603012; - //BA.debugLineNum = 34603012;BA.debugLine="End Sub"; + //BA.debugLineNum = 35;BA.debugLine="End Sub"; return null; } -public int _changelength(keymon.lat.medicomed.b4xbytesbuilder __ref,int _newlength) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbytesbuilder"; -if (Debug.shouldDelegate(ba, "changelength", true)) - {return ((Integer) Debug.delegate(ba, "changelength", new Object[] {_newlength}));} +public int _changelength(int _newlength) throws Exception{ int _oldlength = 0; byte[] _b = null; -RDebugUtils.currentLine=34471936; - //BA.debugLineNum = 34471936;BA.debugLine="Private Sub ChangeLength (NewLength As Int) As Int"; -RDebugUtils.currentLine=34471937; - //BA.debugLineNum = 34471937;BA.debugLine="Dim OldLength As Int = mLength"; -_oldlength = __ref._mlength /*int*/ ; -RDebugUtils.currentLine=34471938; - //BA.debugLineNum = 34471938;BA.debugLine="mLength = NewLength"; -__ref._mlength /*int*/ = _newlength; -RDebugUtils.currentLine=34471939; - //BA.debugLineNum = 34471939;BA.debugLine="If mBuffer.Length < mLength Then"; -if (__ref._mbuffer /*byte[]*/ .length<__ref._mlength /*int*/ ) { -RDebugUtils.currentLine=34471940; - //BA.debugLineNum = 34471940;BA.debugLine="Dim b(Max(mBuffer.Length * 2, NewLength)) As Byt"; -_b = new byte[(int) (__c.Max(__ref._mbuffer /*byte[]*/ .length*2,_newlength))]; + //BA.debugLineNum = 12;BA.debugLine="Private Sub ChangeLength (NewLength As Int) As Int"; + //BA.debugLineNum = 13;BA.debugLine="Dim OldLength As Int = mLength"; +_oldlength = _mlength; + //BA.debugLineNum = 14;BA.debugLine="mLength = NewLength"; +_mlength = _newlength; + //BA.debugLineNum = 15;BA.debugLine="If mBuffer.Length < mLength Then"; +if (_mbuffer.length<_mlength) { + //BA.debugLineNum = 16;BA.debugLine="Dim b(Max(mBuffer.Length * 2, NewLength)) As Byt"; +_b = new byte[(int) (__c.Max(_mbuffer.length*2,_newlength))]; ; -RDebugUtils.currentLine=34471941; - //BA.debugLineNum = 34471941;BA.debugLine="Bit.ArrayCopy(mBuffer, 0, b, 0, mBuffer.Length)"; -__c.Bit.ArrayCopy((Object)(__ref._mbuffer /*byte[]*/ ),(int) (0),(Object)(_b),(int) (0),__ref._mbuffer /*byte[]*/ .length); -RDebugUtils.currentLine=34471942; - //BA.debugLineNum = 34471942;BA.debugLine="mBuffer = b"; -__ref._mbuffer /*byte[]*/ = _b; + //BA.debugLineNum = 17;BA.debugLine="Bit.ArrayCopy(mBuffer, 0, b, 0, mBuffer.Length)"; +__c.Bit.ArrayCopy((Object)(_mbuffer),(int) (0),(Object)(_b),(int) (0),_mbuffer.length); + //BA.debugLineNum = 18;BA.debugLine="mBuffer = b"; +_mbuffer = _b; }; -RDebugUtils.currentLine=34471944; - //BA.debugLineNum = 34471944;BA.debugLine="Return OldLength"; + //BA.debugLineNum = 20;BA.debugLine="Return OldLength"; if (true) return _oldlength; -RDebugUtils.currentLine=34471945; - //BA.debugLineNum = 34471945;BA.debugLine="End Sub"; + //BA.debugLineNum = 21;BA.debugLine="End Sub"; return 0; } -public String _class_globals(keymon.lat.medicomed.b4xbytesbuilder __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbytesbuilder"; -RDebugUtils.currentLine=34340864; - //BA.debugLineNum = 34340864;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=34340865; - //BA.debugLineNum = 34340865;BA.debugLine="Private mBuffer() As Byte"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Private mBuffer() As Byte"; _mbuffer = new byte[(int) (0)]; ; -RDebugUtils.currentLine=34340866; - //BA.debugLineNum = 34340866;BA.debugLine="Private mLength As Int"; + //BA.debugLineNum = 3;BA.debugLine="Private mLength As Int"; _mlength = 0; -RDebugUtils.currentLine=34340867; - //BA.debugLineNum = 34340867;BA.debugLine="End Sub"; + //BA.debugLineNum = 4;BA.debugLine="End Sub"; return ""; } -public String _clear(keymon.lat.medicomed.b4xbytesbuilder __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbytesbuilder"; -if (Debug.shouldDelegate(ba, "clear", true)) - {return ((String) Debug.delegate(ba, "clear", null));} -RDebugUtils.currentLine=34668544; - //BA.debugLineNum = 34668544;BA.debugLine="Public Sub Clear"; -RDebugUtils.currentLine=34668545; - //BA.debugLineNum = 34668545;BA.debugLine="ChangeLength(0)"; -__ref._changelength /*int*/ (null,(int) (0)); -RDebugUtils.currentLine=34668546; - //BA.debugLineNum = 34668546;BA.debugLine="End Sub"; +public String _clear() throws Exception{ + //BA.debugLineNum = 37;BA.debugLine="Public Sub Clear"; + //BA.debugLineNum = 38;BA.debugLine="ChangeLength(0)"; +_changelength((int) (0)); + //BA.debugLineNum = 39;BA.debugLine="End Sub"; return ""; } -public byte[] _getbuffer(keymon.lat.medicomed.b4xbytesbuilder __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbytesbuilder"; -if (Debug.shouldDelegate(ba, "getbuffer", true)) - {return ((byte[]) Debug.delegate(ba, "getbuffer", null));} -RDebugUtils.currentLine=35192832; - //BA.debugLineNum = 35192832;BA.debugLine="Private Sub getBuffer As Byte() 'ignore"; -RDebugUtils.currentLine=35192833; - //BA.debugLineNum = 35192833;BA.debugLine="End Sub"; +public byte[] _getbuffer() throws Exception{ + //BA.debugLineNum = 103;BA.debugLine="Private Sub getBuffer As Byte() 'ignore"; + //BA.debugLineNum = 104;BA.debugLine="End Sub"; return null; } -public byte[] _getinternalbuffer(keymon.lat.medicomed.b4xbytesbuilder __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbytesbuilder"; -if (Debug.shouldDelegate(ba, "getinternalbuffer", true)) - {return ((byte[]) Debug.delegate(ba, "getinternalbuffer", null));} -RDebugUtils.currentLine=35389440; - //BA.debugLineNum = 35389440;BA.debugLine="Public Sub getInternalBuffer As Byte()"; -RDebugUtils.currentLine=35389441; - //BA.debugLineNum = 35389441;BA.debugLine="Return mBuffer"; -if (true) return __ref._mbuffer /*byte[]*/ ; -RDebugUtils.currentLine=35389442; - //BA.debugLineNum = 35389442;BA.debugLine="End Sub"; +public byte[] _getinternalbuffer() throws Exception{ + //BA.debugLineNum = 127;BA.debugLine="Public Sub getInternalBuffer As Byte()"; + //BA.debugLineNum = 128;BA.debugLine="Return mBuffer"; +if (true) return _mbuffer; + //BA.debugLineNum = 129;BA.debugLine="End Sub"; return null; } -public int _getlength(keymon.lat.medicomed.b4xbytesbuilder __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbytesbuilder"; -if (Debug.shouldDelegate(ba, "getlength", true)) - {return ((Integer) Debug.delegate(ba, "getlength", null));} -RDebugUtils.currentLine=35061760; - //BA.debugLineNum = 35061760;BA.debugLine="Public Sub getLength As Int"; -RDebugUtils.currentLine=35061761; - //BA.debugLineNum = 35061761;BA.debugLine="Return mLength"; -if (true) return __ref._mlength /*int*/ ; -RDebugUtils.currentLine=35061762; - //BA.debugLineNum = 35061762;BA.debugLine="End Sub"; +public int _getlength() throws Exception{ + //BA.debugLineNum = 92;BA.debugLine="Public Sub getLength As Int"; + //BA.debugLineNum = 93;BA.debugLine="Return mLength"; +if (true) return _mlength; + //BA.debugLineNum = 94;BA.debugLine="End Sub"; return 0; } -public int _indexof(keymon.lat.medicomed.b4xbytesbuilder __ref,byte[] _searchfor) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbytesbuilder"; -if (Debug.shouldDelegate(ba, "indexof", true)) - {return ((Integer) Debug.delegate(ba, "indexof", new Object[] {_searchfor}));} -RDebugUtils.currentLine=35258368; - //BA.debugLineNum = 35258368;BA.debugLine="Public Sub IndexOf(SearchFor() As Byte) As Int"; -RDebugUtils.currentLine=35258369; - //BA.debugLineNum = 35258369;BA.debugLine="Return IndexOf2(SearchFor, 0)"; -if (true) return __ref._indexof2 /*int*/ (null,_searchfor,(int) (0)); -RDebugUtils.currentLine=35258370; - //BA.debugLineNum = 35258370;BA.debugLine="End Sub"; +public int _indexof(byte[] _searchfor) throws Exception{ + //BA.debugLineNum = 107;BA.debugLine="Public Sub IndexOf(SearchFor() As Byte) As Int"; + //BA.debugLineNum = 108;BA.debugLine="Return IndexOf2(SearchFor, 0)"; +if (true) return _indexof2(_searchfor,(int) (0)); + //BA.debugLineNum = 109;BA.debugLine="End Sub"; return 0; } -public int _indexof2(keymon.lat.medicomed.b4xbytesbuilder __ref,byte[] _searchfor,int _index) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbytesbuilder"; -if (Debug.shouldDelegate(ba, "indexof2", true)) - {return ((Integer) Debug.delegate(ba, "indexof2", new Object[] {_searchfor,_index}));} +public int _indexof2(byte[] _searchfor,int _index) throws Exception{ int _i1 = 0; int _i2 = 0; -RDebugUtils.currentLine=35323904; - //BA.debugLineNum = 35323904;BA.debugLine="Public Sub IndexOf2(SearchFor() As Byte, Index As"; -RDebugUtils.currentLine=35323905; - //BA.debugLineNum = 35323905;BA.debugLine="For i1 = Index To mLength - SearchFor.Length"; + //BA.debugLineNum = 112;BA.debugLine="Public Sub IndexOf2(SearchFor() As Byte, Index As"; + //BA.debugLineNum = 113;BA.debugLine="For i1 = Index To mLength - SearchFor.Length"; { final int step1 = 1; -final int limit1 = (int) (__ref._mlength /*int*/ -_searchfor.length); +final int limit1 = (int) (_mlength-_searchfor.length); _i1 = _index ; for (;_i1 <= limit1 ;_i1 = _i1 + step1 ) { -RDebugUtils.currentLine=35323906; - //BA.debugLineNum = 35323906;BA.debugLine="For i2 = 0 To SearchFor.Length - 1"; + //BA.debugLineNum = 114;BA.debugLine="For i2 = 0 To SearchFor.Length - 1"; { final int step2 = 1; final int limit2 = (int) (_searchfor.length-1); _i2 = (int) (0) ; for (;_i2 <= limit2 ;_i2 = _i2 + step2 ) { -RDebugUtils.currentLine=35323907; - //BA.debugLineNum = 35323907;BA.debugLine="If SearchFor(i2) <> mBuffer(i1 + i2) Then"; -if (_searchfor[_i2]!=__ref._mbuffer /*byte[]*/ [(int) (_i1+_i2)]) { -RDebugUtils.currentLine=35323908; - //BA.debugLineNum = 35323908;BA.debugLine="Exit"; + //BA.debugLineNum = 115;BA.debugLine="If SearchFor(i2) <> mBuffer(i1 + i2) Then"; +if (_searchfor[_i2]!=_mbuffer[(int) (_i1+_i2)]) { + //BA.debugLineNum = 116;BA.debugLine="Exit"; if (true) break; }; } }; -RDebugUtils.currentLine=35323911; - //BA.debugLineNum = 35323911;BA.debugLine="If i2 = SearchFor.Length Then"; + //BA.debugLineNum = 119;BA.debugLine="If i2 = SearchFor.Length Then"; if (_i2==_searchfor.length) { -RDebugUtils.currentLine=35323912; - //BA.debugLineNum = 35323912;BA.debugLine="Return i1"; + //BA.debugLineNum = 120;BA.debugLine="Return i1"; if (true) return _i1; }; } }; -RDebugUtils.currentLine=35323915; - //BA.debugLineNum = 35323915;BA.debugLine="Return -1"; + //BA.debugLineNum = 123;BA.debugLine="Return -1"; if (true) return (int) (-1); -RDebugUtils.currentLine=35323916; - //BA.debugLineNum = 35323916;BA.debugLine="End Sub"; + //BA.debugLineNum = 124;BA.debugLine="End Sub"; return 0; } -public String _initialize(keymon.lat.medicomed.b4xbytesbuilder __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; +public String _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ innerInitialize(_ba); -RDebugUtils.currentModule="b4xbytesbuilder"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=34406400; - //BA.debugLineNum = 34406400;BA.debugLine="Public Sub Initialize"; -RDebugUtils.currentLine=34406401; - //BA.debugLineNum = 34406401;BA.debugLine="Dim mBuffer(100) As Byte"; + //BA.debugLineNum = 6;BA.debugLine="Public Sub Initialize"; + //BA.debugLineNum = 7;BA.debugLine="Dim mBuffer(100) As Byte"; _mbuffer = new byte[(int) (100)]; ; -RDebugUtils.currentLine=34406402; - //BA.debugLineNum = 34406402;BA.debugLine="mLength = 0"; -__ref._mlength /*int*/ = (int) (0); -RDebugUtils.currentLine=34406403; - //BA.debugLineNum = 34406403;BA.debugLine="End Sub"; + //BA.debugLineNum = 8;BA.debugLine="mLength = 0"; +_mlength = (int) (0); + //BA.debugLineNum = 9;BA.debugLine="End Sub"; return ""; } -public String _insert(keymon.lat.medicomed.b4xbytesbuilder __ref,int _index,byte[] _data) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbytesbuilder"; -if (Debug.shouldDelegate(ba, "insert", true)) - {return ((String) Debug.delegate(ba, "insert", new Object[] {_index,_data}));} +public String _insert(int _index,byte[] _data) throws Exception{ byte[] _afterindex = null; -RDebugUtils.currentLine=34734080; - //BA.debugLineNum = 34734080;BA.debugLine="Public Sub Insert(Index As Int, Data() As Byte)"; -RDebugUtils.currentLine=34734081; - //BA.debugLineNum = 34734081;BA.debugLine="If Index >= mLength Then"; -if (_index>=__ref._mlength /*int*/ ) { -RDebugUtils.currentLine=34734082; - //BA.debugLineNum = 34734082;BA.debugLine="If Index > mLength Then Log(\"Index too large\")"; -if (_index>__ref._mlength /*int*/ ) { -__c.LogImpl("934734082","Index too large",0);}; -RDebugUtils.currentLine=34734083; - //BA.debugLineNum = 34734083;BA.debugLine="Append(Data)"; -__ref._append /*keymon.lat.medicomed.b4xbytesbuilder*/ (null,_data); + //BA.debugLineNum = 43;BA.debugLine="Public Sub Insert(Index As Int, Data() As Byte)"; + //BA.debugLineNum = 44;BA.debugLine="If Index >= mLength Then"; +if (_index>=_mlength) { + //BA.debugLineNum = 45;BA.debugLine="If Index > mLength Then Log(\"Index too large\")"; +if (_index>_mlength) { +__c.LogImpl("96422530","Index too large",0);}; + //BA.debugLineNum = 46;BA.debugLine="Append(Data)"; +_append(_data); }else { -RDebugUtils.currentLine=34734085; - //BA.debugLineNum = 34734085;BA.debugLine="Dim AfterIndex() As Byte = SubArray(Index)"; -_afterindex = __ref._subarray /*byte[]*/ (null,_index); -RDebugUtils.currentLine=34734086; - //BA.debugLineNum = 34734086;BA.debugLine="ChangeLength(mLength + Data.Length)"; -__ref._changelength /*int*/ (null,(int) (__ref._mlength /*int*/ +_data.length)); -RDebugUtils.currentLine=34734087; - //BA.debugLineNum = 34734087;BA.debugLine="Bit.ArrayCopy(Data, 0, mBuffer, Index, Data.Leng"; -__c.Bit.ArrayCopy((Object)(_data),(int) (0),(Object)(__ref._mbuffer /*byte[]*/ ),_index,_data.length); -RDebugUtils.currentLine=34734088; - //BA.debugLineNum = 34734088;BA.debugLine="Bit.ArrayCopy(AfterIndex, 0, mBuffer, Index + Da"; -__c.Bit.ArrayCopy((Object)(_afterindex),(int) (0),(Object)(__ref._mbuffer /*byte[]*/ ),(int) (_index+_data.length),_afterindex.length); + //BA.debugLineNum = 48;BA.debugLine="Dim AfterIndex() As Byte = SubArray(Index)"; +_afterindex = _subarray(_index); + //BA.debugLineNum = 49;BA.debugLine="ChangeLength(mLength + Data.Length)"; +_changelength((int) (_mlength+_data.length)); + //BA.debugLineNum = 50;BA.debugLine="Bit.ArrayCopy(Data, 0, mBuffer, Index, Data.Leng"; +__c.Bit.ArrayCopy((Object)(_data),(int) (0),(Object)(_mbuffer),_index,_data.length); + //BA.debugLineNum = 51;BA.debugLine="Bit.ArrayCopy(AfterIndex, 0, mBuffer, Index + Da"; +__c.Bit.ArrayCopy((Object)(_afterindex),(int) (0),(Object)(_mbuffer),(int) (_index+_data.length),_afterindex.length); }; -RDebugUtils.currentLine=34734090; - //BA.debugLineNum = 34734090;BA.debugLine="End Sub"; + //BA.debugLineNum = 53;BA.debugLine="End Sub"; return ""; } -public byte[] _subarray(keymon.lat.medicomed.b4xbytesbuilder __ref,int _beginindex) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbytesbuilder"; -if (Debug.shouldDelegate(ba, "subarray", true)) - {return ((byte[]) Debug.delegate(ba, "subarray", new Object[] {_beginindex}));} -RDebugUtils.currentLine=34930688; - //BA.debugLineNum = 34930688;BA.debugLine="Public Sub SubArray(BeginIndex As Int) As Byte()"; -RDebugUtils.currentLine=34930689; - //BA.debugLineNum = 34930689;BA.debugLine="Return SubArray2(BeginIndex, mLength)"; -if (true) return __ref._subarray2 /*byte[]*/ (null,_beginindex,__ref._mlength /*int*/ ); -RDebugUtils.currentLine=34930690; - //BA.debugLineNum = 34930690;BA.debugLine="End Sub"; -return null; -} -public byte[] _remove(keymon.lat.medicomed.b4xbytesbuilder __ref,int _beginindex,int _endindex) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbytesbuilder"; -if (Debug.shouldDelegate(ba, "remove", true)) - {return ((byte[]) Debug.delegate(ba, "remove", new Object[] {_beginindex,_endindex}));} +public byte[] _remove(int _beginindex,int _endindex) throws Exception{ byte[] _res = null; byte[] _afterendindex = null; -RDebugUtils.currentLine=34865152; - //BA.debugLineNum = 34865152;BA.debugLine="Public Sub Remove(BeginIndex As Int, EndIndex As I"; -RDebugUtils.currentLine=34865153; - //BA.debugLineNum = 34865153;BA.debugLine="Dim res() As Byte = SubArray2(BeginIndex, EndInde"; -_res = __ref._subarray2 /*byte[]*/ (null,_beginindex,_endindex); -RDebugUtils.currentLine=34865154; - //BA.debugLineNum = 34865154;BA.debugLine="If EndIndex <= mLength Then"; -if (_endindex<=__ref._mlength /*int*/ ) { -RDebugUtils.currentLine=34865155; - //BA.debugLineNum = 34865155;BA.debugLine="Dim AfterEndIndex() As Byte = SubArray(EndIndex)"; -_afterendindex = __ref._subarray /*byte[]*/ (null,_endindex); -RDebugUtils.currentLine=34865156; - //BA.debugLineNum = 34865156;BA.debugLine="Bit.ArrayCopy(AfterEndIndex, 0, mBuffer, BeginIn"; -__c.Bit.ArrayCopy((Object)(_afterendindex),(int) (0),(Object)(__ref._mbuffer /*byte[]*/ ),_beginindex,_afterendindex.length); + //BA.debugLineNum = 69;BA.debugLine="Public Sub Remove(BeginIndex As Int, EndIndex As I"; + //BA.debugLineNum = 70;BA.debugLine="Dim res() As Byte = SubArray2(BeginIndex, EndInde"; +_res = _subarray2(_beginindex,_endindex); + //BA.debugLineNum = 71;BA.debugLine="If EndIndex <= mLength Then"; +if (_endindex<=_mlength) { + //BA.debugLineNum = 72;BA.debugLine="Dim AfterEndIndex() As Byte = SubArray(EndIndex)"; +_afterendindex = _subarray(_endindex); + //BA.debugLineNum = 73;BA.debugLine="Bit.ArrayCopy(AfterEndIndex, 0, mBuffer, BeginIn"; +__c.Bit.ArrayCopy((Object)(_afterendindex),(int) (0),(Object)(_mbuffer),_beginindex,_afterendindex.length); }; -RDebugUtils.currentLine=34865158; - //BA.debugLineNum = 34865158;BA.debugLine="ChangeLength(mLength - (EndIndex - BeginIndex))"; -__ref._changelength /*int*/ (null,(int) (__ref._mlength /*int*/ -(_endindex-_beginindex))); -RDebugUtils.currentLine=34865159; - //BA.debugLineNum = 34865159;BA.debugLine="Return res"; + //BA.debugLineNum = 75;BA.debugLine="ChangeLength(mLength - (EndIndex - BeginIndex))"; +_changelength((int) (_mlength-(_endindex-_beginindex))); + //BA.debugLineNum = 76;BA.debugLine="Return res"; if (true) return _res; -RDebugUtils.currentLine=34865160; - //BA.debugLineNum = 34865160;BA.debugLine="End Sub"; + //BA.debugLineNum = 77;BA.debugLine="End Sub"; return null; } -public byte[] _subarray2(keymon.lat.medicomed.b4xbytesbuilder __ref,int _beginindex,int _endindex) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbytesbuilder"; -if (Debug.shouldDelegate(ba, "subarray2", true)) - {return ((byte[]) Debug.delegate(ba, "subarray2", new Object[] {_beginindex,_endindex}));} -byte[] _b = null; -RDebugUtils.currentLine=34996224; - //BA.debugLineNum = 34996224;BA.debugLine="Public Sub SubArray2(BeginIndex As Int, EndIndex A"; -RDebugUtils.currentLine=34996225; - //BA.debugLineNum = 34996225;BA.debugLine="Dim b(EndIndex - BeginIndex) As Byte"; -_b = new byte[(int) (_endindex-_beginindex)]; -; -RDebugUtils.currentLine=34996226; - //BA.debugLineNum = 34996226;BA.debugLine="Bit.ArrayCopy(mBuffer, BeginIndex, b, 0, b.Length"; -__c.Bit.ArrayCopy((Object)(__ref._mbuffer /*byte[]*/ ),_beginindex,(Object)(_b),(int) (0),_b.length); -RDebugUtils.currentLine=34996227; - //BA.debugLineNum = 34996227;BA.debugLine="Return b"; -if (true) return _b; -RDebugUtils.currentLine=34996228; - //BA.debugLineNum = 34996228;BA.debugLine="End Sub"; -return null; -} -public String _set(keymon.lat.medicomed.b4xbytesbuilder __ref,int _index,byte[] _data) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbytesbuilder"; -if (Debug.shouldDelegate(ba, "set", true)) - {return ((String) Debug.delegate(ba, "set", new Object[] {_index,_data}));} -RDebugUtils.currentLine=34799616; - //BA.debugLineNum = 34799616;BA.debugLine="Public Sub Set(Index As Int, Data() As Byte)"; -RDebugUtils.currentLine=34799617; - //BA.debugLineNum = 34799617;BA.debugLine="If Index >= mLength Then"; -if (_index>=__ref._mlength /*int*/ ) { -RDebugUtils.currentLine=34799618; - //BA.debugLineNum = 34799618;BA.debugLine="If Index > mLength Then Log(\"Index too large\")"; -if (_index>__ref._mlength /*int*/ ) { -__c.LogImpl("934799618","Index too large",0);}; -RDebugUtils.currentLine=34799619; - //BA.debugLineNum = 34799619;BA.debugLine="Append(Data)"; -__ref._append /*keymon.lat.medicomed.b4xbytesbuilder*/ (null,_data); +public String _set(int _index,byte[] _data) throws Exception{ + //BA.debugLineNum = 56;BA.debugLine="Public Sub Set(Index As Int, Data() As Byte)"; + //BA.debugLineNum = 57;BA.debugLine="If Index >= mLength Then"; +if (_index>=_mlength) { + //BA.debugLineNum = 58;BA.debugLine="If Index > mLength Then Log(\"Index too large\")"; +if (_index>_mlength) { +__c.LogImpl("96488066","Index too large",0);}; + //BA.debugLineNum = 59;BA.debugLine="Append(Data)"; +_append(_data); }else { -RDebugUtils.currentLine=34799621; - //BA.debugLineNum = 34799621;BA.debugLine="If Data.Length + Index > mLength Then"; -if (_data.length+_index>__ref._mlength /*int*/ ) { -RDebugUtils.currentLine=34799622; - //BA.debugLineNum = 34799622;BA.debugLine="ChangeLength(Data.Length + Index)"; -__ref._changelength /*int*/ (null,(int) (_data.length+_index)); + //BA.debugLineNum = 61;BA.debugLine="If Data.Length + Index > mLength Then"; +if (_data.length+_index>_mlength) { + //BA.debugLineNum = 62;BA.debugLine="ChangeLength(Data.Length + Index)"; +_changelength((int) (_data.length+_index)); }; -RDebugUtils.currentLine=34799624; - //BA.debugLineNum = 34799624;BA.debugLine="Bit.ArrayCopy(Data, 0, mBuffer, Index, Data.Leng"; -__c.Bit.ArrayCopy((Object)(_data),(int) (0),(Object)(__ref._mbuffer /*byte[]*/ ),_index,_data.length); + //BA.debugLineNum = 64;BA.debugLine="Bit.ArrayCopy(Data, 0, mBuffer, Index, Data.Leng"; +__c.Bit.ArrayCopy((Object)(_data),(int) (0),(Object)(_mbuffer),_index,_data.length); }; -RDebugUtils.currentLine=34799626; - //BA.debugLineNum = 34799626;BA.debugLine="End Sub"; + //BA.debugLineNum = 66;BA.debugLine="End Sub"; return ""; } -public byte[] _toarray(keymon.lat.medicomed.b4xbytesbuilder __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xbytesbuilder"; -if (Debug.shouldDelegate(ba, "toarray", true)) - {return ((byte[]) Debug.delegate(ba, "toarray", null));} -RDebugUtils.currentLine=35127296; - //BA.debugLineNum = 35127296;BA.debugLine="Public Sub ToArray() As Byte()"; -RDebugUtils.currentLine=35127297; - //BA.debugLineNum = 35127297;BA.debugLine="Return SubArray(0)"; -if (true) return __ref._subarray /*byte[]*/ (null,(int) (0)); -RDebugUtils.currentLine=35127298; - //BA.debugLineNum = 35127298;BA.debugLine="End Sub"; +public byte[] _subarray(int _beginindex) throws Exception{ + //BA.debugLineNum = 80;BA.debugLine="Public Sub SubArray(BeginIndex As Int) As Byte()"; + //BA.debugLineNum = 81;BA.debugLine="Return SubArray2(BeginIndex, mLength)"; +if (true) return _subarray2(_beginindex,_mlength); + //BA.debugLineNum = 82;BA.debugLine="End Sub"; return null; } -} \ No newline at end of file +public byte[] _subarray2(int _beginindex,int _endindex) throws Exception{ +byte[] _b = null; + //BA.debugLineNum = 86;BA.debugLine="Public Sub SubArray2(BeginIndex As Int, EndIndex A"; + //BA.debugLineNum = 87;BA.debugLine="Dim b(EndIndex - BeginIndex) As Byte"; +_b = new byte[(int) (_endindex-_beginindex)]; +; + //BA.debugLineNum = 88;BA.debugLine="Bit.ArrayCopy(mBuffer, BeginIndex, b, 0, b.Length"; +__c.Bit.ArrayCopy((Object)(_mbuffer),_beginindex,(Object)(_b),(int) (0),_b.length); + //BA.debugLineNum = 89;BA.debugLine="Return b"; +if (true) return _b; + //BA.debugLineNum = 90;BA.debugLine="End Sub"; +return null; +} +public byte[] _toarray() throws Exception{ + //BA.debugLineNum = 97;BA.debugLine="Public Sub ToArray() As Byte()"; + //BA.debugLineNum = 98;BA.debugLine="Return SubArray(0)"; +if (true) return _subarray((int) (0)); + //BA.debugLineNum = 99;BA.debugLine="End Sub"; +return null; +} +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xcache.java b/B4A/Objects/src/keymon/lat/medicomed/b4xcache.java index 614f148..9138126 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xcache.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xcache.java @@ -10,7 +10,7 @@ public class b4xcache extends B4AClass.ImplB4AClass implements BA.SubDelegator{ private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xcache"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xcache"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,13 +23,23 @@ public class b4xcache extends B4AClass.ImplB4AClass implements BA.SubDelegator{ 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 keymon.lat.medicomed.b4xorderedmap _data = null; +public int _mmaxsize = 0; +public float _removethreshold = 0f; +public int _eternalcounts = 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 static class _b4xcacheitem{ public boolean IsInitialized; public Object Value; @@ -47,316 +57,152 @@ Eternal = false; public String toString() { return BA.TypeToString(this, false); }} -public anywheresoftware.b4a.keywords.Common __c = null; -public keymon.lat.medicomed.b4xorderedmap _data = null; -public int _mmaxsize = 0; -public float _removethreshold = 0f; -public int _eternalcounts = 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 String _class_globals(keymon.lat.medicomed.b4xcache __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcache"; -RDebugUtils.currentLine=35454976; - //BA.debugLineNum = 35454976;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=35454977; - //BA.debugLineNum = 35454977;BA.debugLine="Type B4XCacheItem (Value As Object, LastAccessedT"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Type B4XCacheItem (Value As Object, LastAccessedT"; ; -RDebugUtils.currentLine=35454978; - //BA.debugLineNum = 35454978;BA.debugLine="Private Data As B4XOrderedMap"; + //BA.debugLineNum = 3;BA.debugLine="Private Data As B4XOrderedMap"; _data = new keymon.lat.medicomed.b4xorderedmap(); -RDebugUtils.currentLine=35454979; - //BA.debugLineNum = 35454979;BA.debugLine="Private mMaxSize As Int = 100"; + //BA.debugLineNum = 4;BA.debugLine="Private mMaxSize As Int = 100"; _mmaxsize = (int) (100); -RDebugUtils.currentLine=35454980; - //BA.debugLineNum = 35454980;BA.debugLine="Private RemoveThreshold As Float = 0.3"; + //BA.debugLineNum = 5;BA.debugLine="Private RemoveThreshold As Float = 0.3"; _removethreshold = (float) (0.3); -RDebugUtils.currentLine=35454981; - //BA.debugLineNum = 35454981;BA.debugLine="Private EternalCounts As Int"; + //BA.debugLineNum = 6;BA.debugLine="Private EternalCounts As Int"; _eternalcounts = 0; -RDebugUtils.currentLine=35454982; - //BA.debugLineNum = 35454982;BA.debugLine="End Sub"; + //BA.debugLineNum = 7;BA.debugLine="End Sub"; return ""; } -public boolean _containskey(keymon.lat.medicomed.b4xcache __ref,String _key) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcache"; -if (Debug.shouldDelegate(ba, "containskey", true)) - {return ((Boolean) Debug.delegate(ba, "containskey", new Object[] {_key}));} -RDebugUtils.currentLine=36044800; - //BA.debugLineNum = 36044800;BA.debugLine="Public Sub ContainsKey(Key As String) As Boolean"; -RDebugUtils.currentLine=36044801; - //BA.debugLineNum = 36044801;BA.debugLine="Return Data.ContainsKey(Key)"; -if (true) return __ref._data /*keymon.lat.medicomed.b4xorderedmap*/ ._containskey /*boolean*/ (null,(Object)(_key)); -RDebugUtils.currentLine=36044802; - //BA.debugLineNum = 36044802;BA.debugLine="End Sub"; +public boolean _containskey(String _key) throws Exception{ + //BA.debugLineNum = 66;BA.debugLine="Public Sub ContainsKey(Key As String) As Boolean"; + //BA.debugLineNum = 67;BA.debugLine="Return Data.ContainsKey(Key)"; +if (true) return _data._containskey /*boolean*/ ((Object)(_key)); + //BA.debugLineNum = 68;BA.debugLine="End Sub"; return false; } -public keymon.lat.medicomed.b4xcache._b4xcacheitem _createb4xcacheitem(keymon.lat.medicomed.b4xcache __ref,Object _value,String _key) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcache"; -if (Debug.shouldDelegate(ba, "createb4xcacheitem", true)) - {return ((keymon.lat.medicomed.b4xcache._b4xcacheitem) Debug.delegate(ba, "createb4xcacheitem", new Object[] {_value,_key}));} +public keymon.lat.medicomed.b4xcache._b4xcacheitem _createb4xcacheitem(Object _value,String _key) throws Exception{ keymon.lat.medicomed.b4xcache._b4xcacheitem _t1 = null; -RDebugUtils.currentLine=36372480; - //BA.debugLineNum = 36372480;BA.debugLine="Private Sub CreateB4XCacheItem (Value As Object, K"; -RDebugUtils.currentLine=36372481; - //BA.debugLineNum = 36372481;BA.debugLine="Dim t1 As B4XCacheItem"; + //BA.debugLineNum = 102;BA.debugLine="Private Sub CreateB4XCacheItem (Value As Object, K"; + //BA.debugLineNum = 103;BA.debugLine="Dim t1 As B4XCacheItem"; _t1 = new keymon.lat.medicomed.b4xcache._b4xcacheitem(); -RDebugUtils.currentLine=36372482; - //BA.debugLineNum = 36372482;BA.debugLine="t1.Initialize"; + //BA.debugLineNum = 104;BA.debugLine="t1.Initialize"; _t1.Initialize(); -RDebugUtils.currentLine=36372483; - //BA.debugLineNum = 36372483;BA.debugLine="t1.Value = Value"; + //BA.debugLineNum = 105;BA.debugLine="t1.Value = Value"; _t1.Value /*Object*/ = _value; -RDebugUtils.currentLine=36372484; - //BA.debugLineNum = 36372484;BA.debugLine="t1.LastAccessedTime = DateTime.Now"; + //BA.debugLineNum = 106;BA.debugLine="t1.LastAccessedTime = DateTime.Now"; _t1.LastAccessedTime /*long*/ = __c.DateTime.getNow(); -RDebugUtils.currentLine=36372485; - //BA.debugLineNum = 36372485;BA.debugLine="t1.Key = Key"; + //BA.debugLineNum = 107;BA.debugLine="t1.Key = Key"; _t1.Key /*String*/ = _key; -RDebugUtils.currentLine=36372486; - //BA.debugLineNum = 36372486;BA.debugLine="Return t1"; + //BA.debugLineNum = 108;BA.debugLine="Return t1"; if (true) return _t1; -RDebugUtils.currentLine=36372487; - //BA.debugLineNum = 36372487;BA.debugLine="End Sub"; + //BA.debugLineNum = 109;BA.debugLine="End Sub"; return null; } -public Object _get(keymon.lat.medicomed.b4xcache __ref,String _key) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcache"; -if (Debug.shouldDelegate(ba, "get", true)) - {return ((Object) Debug.delegate(ba, "get", new Object[] {_key}));} +public Object _get(String _key) throws Exception{ keymon.lat.medicomed.b4xcache._b4xcacheitem _ci = null; -RDebugUtils.currentLine=35717120; - //BA.debugLineNum = 35717120;BA.debugLine="Public Sub Get (Key As String) As Object"; -RDebugUtils.currentLine=35717121; - //BA.debugLineNum = 35717121;BA.debugLine="Dim ci As B4XCacheItem = Data.Get(Key)"; -_ci = (keymon.lat.medicomed.b4xcache._b4xcacheitem)(__ref._data /*keymon.lat.medicomed.b4xorderedmap*/ ._get /*Object*/ (null,(Object)(_key))); -RDebugUtils.currentLine=35717122; - //BA.debugLineNum = 35717122;BA.debugLine="If ci <> Null Then"; + //BA.debugLineNum = 24;BA.debugLine="Public Sub Get (Key As String) As Object"; + //BA.debugLineNum = 25;BA.debugLine="Dim ci As B4XCacheItem = Data.Get(Key)"; +_ci = (keymon.lat.medicomed.b4xcache._b4xcacheitem)(_data._get /*Object*/ ((Object)(_key))); + //BA.debugLineNum = 26;BA.debugLine="If ci <> Null Then"; if (_ci!= null) { -RDebugUtils.currentLine=35717123; - //BA.debugLineNum = 35717123;BA.debugLine="If ci.Eternal = False Then ci.LastAccessedTime ="; + //BA.debugLineNum = 27;BA.debugLine="If ci.Eternal = False Then ci.LastAccessedTime ="; if (_ci.Eternal /*boolean*/ ==__c.False) { _ci.LastAccessedTime /*long*/ = __c.DateTime.getNow();}; -RDebugUtils.currentLine=35717124; - //BA.debugLineNum = 35717124;BA.debugLine="Return ci.Value"; + //BA.debugLineNum = 28;BA.debugLine="Return ci.Value"; if (true) return _ci.Value /*Object*/ ; }; -RDebugUtils.currentLine=35717126; - //BA.debugLineNum = 35717126;BA.debugLine="Return Null"; + //BA.debugLineNum = 30;BA.debugLine="Return Null"; if (true) return __c.Null; -RDebugUtils.currentLine=35717127; - //BA.debugLineNum = 35717127;BA.debugLine="End Sub"; + //BA.debugLineNum = 31;BA.debugLine="End Sub"; return null; } -public int _getmaxsize(keymon.lat.medicomed.b4xcache __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcache"; -if (Debug.shouldDelegate(ba, "getmaxsize", true)) - {return ((Integer) Debug.delegate(ba, "getmaxsize", null));} -RDebugUtils.currentLine=35651584; - //BA.debugLineNum = 35651584;BA.debugLine="Public Sub getMaxSize As Int"; -RDebugUtils.currentLine=35651585; - //BA.debugLineNum = 35651585;BA.debugLine="Return mMaxSize"; -if (true) return __ref._mmaxsize /*int*/ ; -RDebugUtils.currentLine=35651586; - //BA.debugLineNum = 35651586;BA.debugLine="End Sub"; +public int _getmaxsize() throws Exception{ + //BA.debugLineNum = 19;BA.debugLine="Public Sub getMaxSize As Int"; + //BA.debugLineNum = 20;BA.debugLine="Return mMaxSize"; +if (true) return _mmaxsize; + //BA.debugLineNum = 21;BA.debugLine="End Sub"; return 0; } -public String _initialize(keymon.lat.medicomed.b4xcache __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; +public String _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ innerInitialize(_ba); -RDebugUtils.currentModule="b4xcache"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=35520512; - //BA.debugLineNum = 35520512;BA.debugLine="Public Sub Initialize"; -RDebugUtils.currentLine=35520513; - //BA.debugLineNum = 35520513;BA.debugLine="Data.Initialize"; -__ref._data /*keymon.lat.medicomed.b4xorderedmap*/ ._initialize /*String*/ (null,ba); -RDebugUtils.currentLine=35520514; - //BA.debugLineNum = 35520514;BA.debugLine="End Sub"; + //BA.debugLineNum = 9;BA.debugLine="Public Sub Initialize"; + //BA.debugLineNum = 10;BA.debugLine="Data.Initialize"; +_data._initialize /*String*/ (ba); + //BA.debugLineNum = 11;BA.debugLine="End Sub"; return ""; } -public boolean _iseternal(keymon.lat.medicomed.b4xcache __ref,String _key) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcache"; -if (Debug.shouldDelegate(ba, "iseternal", true)) - {return ((Boolean) Debug.delegate(ba, "iseternal", new Object[] {_key}));} +public boolean _iseternal(String _key) throws Exception{ keymon.lat.medicomed.b4xcache._b4xcacheitem _ci = null; -RDebugUtils.currentLine=35979264; - //BA.debugLineNum = 35979264;BA.debugLine="Private Sub IsEternal(Key As String) As Boolean"; -RDebugUtils.currentLine=35979265; - //BA.debugLineNum = 35979265;BA.debugLine="Dim ci As B4XCacheItem = Data.Get(Key)"; -_ci = (keymon.lat.medicomed.b4xcache._b4xcacheitem)(__ref._data /*keymon.lat.medicomed.b4xorderedmap*/ ._get /*Object*/ (null,(Object)(_key))); -RDebugUtils.currentLine=35979266; - //BA.debugLineNum = 35979266;BA.debugLine="Return IIf(ci = Null, False, ci.Eternal)"; + //BA.debugLineNum = 60;BA.debugLine="Private Sub IsEternal(Key As String) As Boolean"; + //BA.debugLineNum = 61;BA.debugLine="Dim ci As B4XCacheItem = Data.Get(Key)"; +_ci = (keymon.lat.medicomed.b4xcache._b4xcacheitem)(_data._get /*Object*/ ((Object)(_key))); + //BA.debugLineNum = 62;BA.debugLine="Return IIf(ci = Null, False, ci.Eternal)"; if (true) return BA.ObjectToBoolean(((_ci== null) ? ((Object)(__c.False)) : ((Object)(_ci.Eternal /*boolean*/ )))); -RDebugUtils.currentLine=35979267; - //BA.debugLineNum = 35979267;BA.debugLine="End Sub"; + //BA.debugLineNum = 63;BA.debugLine="End Sub"; return false; } -public anywheresoftware.b4a.objects.collections.List _keys(keymon.lat.medicomed.b4xcache __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcache"; -if (Debug.shouldDelegate(ba, "keys", true)) - {return ((anywheresoftware.b4a.objects.collections.List) Debug.delegate(ba, "keys", null));} -RDebugUtils.currentLine=36306944; - //BA.debugLineNum = 36306944;BA.debugLine="Public Sub Keys As List"; -RDebugUtils.currentLine=36306945; - //BA.debugLineNum = 36306945;BA.debugLine="Return Data.Keys"; -if (true) return __ref._data /*keymon.lat.medicomed.b4xorderedmap*/ ._getkeys /*anywheresoftware.b4a.objects.collections.List*/ (null); -RDebugUtils.currentLine=36306946; - //BA.debugLineNum = 36306946;BA.debugLine="End Sub"; +public anywheresoftware.b4a.objects.collections.List _keys() throws Exception{ + //BA.debugLineNum = 98;BA.debugLine="Public Sub Keys As List"; + //BA.debugLineNum = 99;BA.debugLine="Return Data.Keys"; +if (true) return _data._getkeys /*anywheresoftware.b4a.objects.collections.List*/ (); + //BA.debugLineNum = 100;BA.debugLine="End Sub"; return null; } -public Object _put(keymon.lat.medicomed.b4xcache __ref,String _key,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcache"; -if (Debug.shouldDelegate(ba, "put", true)) - {return ((Object) Debug.delegate(ba, "put", new Object[] {_key,_value}));} -RDebugUtils.currentLine=35782656; - //BA.debugLineNum = 35782656;BA.debugLine="Public Sub Put (Key As String, Value As Object) As"; -RDebugUtils.currentLine=35782657; - //BA.debugLineNum = 35782657;BA.debugLine="If IsEternal(Key) Then EternalCounts = EternalCou"; -if (__ref._iseternal /*boolean*/ (null,_key)) { -__ref._eternalcounts /*int*/ = (int) (__ref._eternalcounts /*int*/ -1);}; -RDebugUtils.currentLine=35782658; - //BA.debugLineNum = 35782658;BA.debugLine="Data.Put(Key, CreateB4XCacheItem(Value, Key))"; -__ref._data /*keymon.lat.medicomed.b4xorderedmap*/ ._put /*String*/ (null,(Object)(_key),(Object)(__ref._createb4xcacheitem /*keymon.lat.medicomed.b4xcache._b4xcacheitem*/ (null,_value,_key))); -RDebugUtils.currentLine=35782659; - //BA.debugLineNum = 35782659;BA.debugLine="TrimIfOversize"; -__ref._trimifoversize /*String*/ (null); -RDebugUtils.currentLine=35782660; - //BA.debugLineNum = 35782660;BA.debugLine="Return Value"; +public Object _put(String _key,Object _value) throws Exception{ + //BA.debugLineNum = 35;BA.debugLine="Public Sub Put (Key As String, Value As Object) As"; + //BA.debugLineNum = 36;BA.debugLine="If IsEternal(Key) Then EternalCounts = EternalCou"; +if (_iseternal(_key)) { +_eternalcounts = (int) (_eternalcounts-1);}; + //BA.debugLineNum = 37;BA.debugLine="Data.Put(Key, CreateB4XCacheItem(Value, Key))"; +_data._put /*String*/ ((Object)(_key),(Object)(_createb4xcacheitem(_value,_key))); + //BA.debugLineNum = 38;BA.debugLine="TrimIfOversize"; +_trimifoversize(); + //BA.debugLineNum = 39;BA.debugLine="Return Value"; if (true) return _value; -RDebugUtils.currentLine=35782661; - //BA.debugLineNum = 35782661;BA.debugLine="End Sub"; + //BA.debugLineNum = 40;BA.debugLine="End Sub"; return null; } -public String _trimifoversize(keymon.lat.medicomed.b4xcache __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcache"; -if (Debug.shouldDelegate(ba, "trimifoversize", true)) - {return ((String) Debug.delegate(ba, "trimifoversize", null));} -anywheresoftware.b4a.objects.collections.List _values = null; -int _numberofitemstoremove = 0; -int _i = 0; -RDebugUtils.currentLine=36110336; - //BA.debugLineNum = 36110336;BA.debugLine="Private Sub TrimIfOversize"; -RDebugUtils.currentLine=36110337; - //BA.debugLineNum = 36110337;BA.debugLine="If Data.Size - EternalCounts > mMaxSize Then"; -if (__ref._data /*keymon.lat.medicomed.b4xorderedmap*/ ._getsize /*int*/ (null)-__ref._eternalcounts /*int*/ >__ref._mmaxsize /*int*/ ) { -RDebugUtils.currentLine=36110338; - //BA.debugLineNum = 36110338;BA.debugLine="Dim values As List = Data.Values"; -_values = new anywheresoftware.b4a.objects.collections.List(); -_values = __ref._data /*keymon.lat.medicomed.b4xorderedmap*/ ._getvalues /*anywheresoftware.b4a.objects.collections.List*/ (null); -RDebugUtils.currentLine=36110339; - //BA.debugLineNum = 36110339;BA.debugLine="values.SortType(\"LastAccessedTime\", True)"; -_values.SortType("LastAccessedTime",__c.True); -RDebugUtils.currentLine=36110340; - //BA.debugLineNum = 36110340;BA.debugLine="Dim NumberOfItemsToRemove As Int = Ceil(mMaxSize"; -_numberofitemstoremove = (int) (__c.Ceil(__ref._mmaxsize /*int*/ *__ref._removethreshold /*float*/ )); -RDebugUtils.currentLine=36110341; - //BA.debugLineNum = 36110341;BA.debugLine="For i = 0 To NumberOfItemsToRemove"; -{ -final int step5 = 1; -final int limit5 = _numberofitemstoremove; -_i = (int) (0) ; -for (;_i <= limit5 ;_i = _i + step5 ) { -RDebugUtils.currentLine=36110342; - //BA.debugLineNum = 36110342;BA.debugLine="Data.Remove(values.Get(i).As(B4XCacheItem).Key)"; -__ref._data /*keymon.lat.medicomed.b4xorderedmap*/ ._remove /*String*/ (null,(Object)(((keymon.lat.medicomed.b4xcache._b4xcacheitem)(_values.Get(_i))).Key /*String*/ )); - } -}; - }; -RDebugUtils.currentLine=36110345; - //BA.debugLineNum = 36110345;BA.debugLine="End Sub"; -return ""; -} -public Object _puteternal(keymon.lat.medicomed.b4xcache __ref,String _key,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcache"; -if (Debug.shouldDelegate(ba, "puteternal", true)) - {return ((Object) Debug.delegate(ba, "puteternal", new Object[] {_key,_value}));} +public Object _puteternal(String _key,Object _value) throws Exception{ keymon.lat.medicomed.b4xcache._b4xcacheitem _ci = null; -RDebugUtils.currentLine=35848192; - //BA.debugLineNum = 35848192;BA.debugLine="Public Sub PutEternal (Key As String, Value As Obj"; -RDebugUtils.currentLine=35848193; - //BA.debugLineNum = 35848193;BA.debugLine="If IsEternal(Key) Then EternalCounts = EternalCou"; -if (__ref._iseternal /*boolean*/ (null,_key)) { -__ref._eternalcounts /*int*/ = (int) (__ref._eternalcounts /*int*/ -1);}; -RDebugUtils.currentLine=35848194; - //BA.debugLineNum = 35848194;BA.debugLine="Dim ci As B4XCacheItem = CreateB4XCacheItem(Value"; -_ci = __ref._createb4xcacheitem /*keymon.lat.medicomed.b4xcache._b4xcacheitem*/ (null,_value,_key); -RDebugUtils.currentLine=35848195; - //BA.debugLineNum = 35848195;BA.debugLine="ci.Eternal = True"; + //BA.debugLineNum = 44;BA.debugLine="Public Sub PutEternal (Key As String, Value As Obj"; + //BA.debugLineNum = 45;BA.debugLine="If IsEternal(Key) Then EternalCounts = EternalCou"; +if (_iseternal(_key)) { +_eternalcounts = (int) (_eternalcounts-1);}; + //BA.debugLineNum = 46;BA.debugLine="Dim ci As B4XCacheItem = CreateB4XCacheItem(Value"; +_ci = _createb4xcacheitem(_value,_key); + //BA.debugLineNum = 47;BA.debugLine="ci.Eternal = True"; _ci.Eternal /*boolean*/ = __c.True; -RDebugUtils.currentLine=35848196; - //BA.debugLineNum = 35848196;BA.debugLine="ci.LastAccessedTime = 9223372036854775807"; + //BA.debugLineNum = 48;BA.debugLine="ci.LastAccessedTime = 9223372036854775807"; _ci.LastAccessedTime /*long*/ = (long) (9223372036854775807L); -RDebugUtils.currentLine=35848197; - //BA.debugLineNum = 35848197;BA.debugLine="EternalCounts = EternalCounts + 1"; -__ref._eternalcounts /*int*/ = (int) (__ref._eternalcounts /*int*/ +1); -RDebugUtils.currentLine=35848198; - //BA.debugLineNum = 35848198;BA.debugLine="Data.Put(Key, ci)"; -__ref._data /*keymon.lat.medicomed.b4xorderedmap*/ ._put /*String*/ (null,(Object)(_key),(Object)(_ci)); -RDebugUtils.currentLine=35848199; - //BA.debugLineNum = 35848199;BA.debugLine="Return Value"; + //BA.debugLineNum = 49;BA.debugLine="EternalCounts = EternalCounts + 1"; +_eternalcounts = (int) (_eternalcounts+1); + //BA.debugLineNum = 50;BA.debugLine="Data.Put(Key, ci)"; +_data._put /*String*/ ((Object)(_key),(Object)(_ci)); + //BA.debugLineNum = 51;BA.debugLine="Return Value"; if (true) return _value; -RDebugUtils.currentLine=35848200; - //BA.debugLineNum = 35848200;BA.debugLine="End Sub"; + //BA.debugLineNum = 52;BA.debugLine="End Sub"; return null; } -public String _remove(keymon.lat.medicomed.b4xcache __ref,String _key) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcache"; -if (Debug.shouldDelegate(ba, "remove", true)) - {return ((String) Debug.delegate(ba, "remove", new Object[] {_key}));} -RDebugUtils.currentLine=35913728; - //BA.debugLineNum = 35913728;BA.debugLine="Public Sub Remove (Key As String)"; -RDebugUtils.currentLine=35913729; - //BA.debugLineNum = 35913729;BA.debugLine="If IsEternal(Key) Then EternalCounts = EternalCou"; -if (__ref._iseternal /*boolean*/ (null,_key)) { -__ref._eternalcounts /*int*/ = (int) (__ref._eternalcounts /*int*/ -1);}; -RDebugUtils.currentLine=35913730; - //BA.debugLineNum = 35913730;BA.debugLine="Data.Remove(Key)"; -__ref._data /*keymon.lat.medicomed.b4xorderedmap*/ ._remove /*String*/ (null,(Object)(_key)); -RDebugUtils.currentLine=35913731; - //BA.debugLineNum = 35913731;BA.debugLine="End Sub"; +public String _remove(String _key) throws Exception{ + //BA.debugLineNum = 55;BA.debugLine="Public Sub Remove (Key As String)"; + //BA.debugLineNum = 56;BA.debugLine="If IsEternal(Key) Then EternalCounts = EternalCou"; +if (_iseternal(_key)) { +_eternalcounts = (int) (_eternalcounts-1);}; + //BA.debugLineNum = 57;BA.debugLine="Data.Remove(Key)"; +_data._remove /*String*/ ((Object)(_key)); + //BA.debugLineNum = 58;BA.debugLine="End Sub"; return ""; } -public String _removeolditems(keymon.lat.medicomed.b4xcache __ref,long _agems) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcache"; -if (Debug.shouldDelegate(ba, "removeolditems", true)) - {return ((String) Debug.delegate(ba, "removeolditems", new Object[] {_agems}));} +public String _removeolditems(long _agems) throws Exception{ anywheresoftware.b4a.objects.collections.List _values = null; long _level = 0L; keymon.lat.medicomed.b4xcache._b4xcacheitem _ci = null; -RDebugUtils.currentLine=36175872; - //BA.debugLineNum = 36175872;BA.debugLine="Public Sub RemoveOldItems (AgeMs As Long)"; -RDebugUtils.currentLine=36175873; - //BA.debugLineNum = 36175873;BA.debugLine="Dim values As List = Data.Values"; + //BA.debugLineNum = 82;BA.debugLine="Public Sub RemoveOldItems (AgeMs As Long)"; + //BA.debugLineNum = 83;BA.debugLine="Dim values As List = Data.Values"; _values = new anywheresoftware.b4a.objects.collections.List(); -_values = __ref._data /*keymon.lat.medicomed.b4xorderedmap*/ ._getvalues /*anywheresoftware.b4a.objects.collections.List*/ (null); -RDebugUtils.currentLine=36175874; - //BA.debugLineNum = 36175874;BA.debugLine="Dim level As Long = DateTime.Now - AgeMs"; +_values = _data._getvalues /*anywheresoftware.b4a.objects.collections.List*/ (); + //BA.debugLineNum = 84;BA.debugLine="Dim level As Long = DateTime.Now - AgeMs"; _level = (long) (__c.DateTime.getNow()-_agems); -RDebugUtils.currentLine=36175875; - //BA.debugLineNum = 36175875;BA.debugLine="For Each ci As B4XCacheItem In values"; + //BA.debugLineNum = 85;BA.debugLine="For Each ci As B4XCacheItem In values"; { final anywheresoftware.b4a.BA.IterableList group3 = _values; final int groupLen3 = group3.getSize() @@ -364,48 +210,62 @@ final int groupLen3 = group3.getSize() ; for (; index3 < groupLen3;index3++){ _ci = (keymon.lat.medicomed.b4xcache._b4xcacheitem)(group3.Get(index3)); -RDebugUtils.currentLine=36175876; - //BA.debugLineNum = 36175876;BA.debugLine="If ci.LastAccessedTime <= level Then"; + //BA.debugLineNum = 86;BA.debugLine="If ci.LastAccessedTime <= level Then"; if (_ci.LastAccessedTime /*long*/ <=_level) { -RDebugUtils.currentLine=36175877; - //BA.debugLineNum = 36175877;BA.debugLine="Data.Remove(ci.Key)"; -__ref._data /*keymon.lat.medicomed.b4xorderedmap*/ ._remove /*String*/ (null,(Object)(_ci.Key /*String*/ )); + //BA.debugLineNum = 87;BA.debugLine="Data.Remove(ci.Key)"; +_data._remove /*String*/ ((Object)(_ci.Key /*String*/ )); }; } }; -RDebugUtils.currentLine=36175880; - //BA.debugLineNum = 36175880;BA.debugLine="End Sub"; + //BA.debugLineNum = 90;BA.debugLine="End Sub"; return ""; } -public String _setmaxsize(keymon.lat.medicomed.b4xcache __ref,int _s) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcache"; -if (Debug.shouldDelegate(ba, "setmaxsize", true)) - {return ((String) Debug.delegate(ba, "setmaxsize", new Object[] {_s}));} -RDebugUtils.currentLine=35586048; - //BA.debugLineNum = 35586048;BA.debugLine="Public Sub setMaxSize(s As Int)"; -RDebugUtils.currentLine=35586049; - //BA.debugLineNum = 35586049;BA.debugLine="mMaxSize = s"; -__ref._mmaxsize /*int*/ = _s; -RDebugUtils.currentLine=35586050; - //BA.debugLineNum = 35586050;BA.debugLine="TrimIfOversize"; -__ref._trimifoversize /*String*/ (null); -RDebugUtils.currentLine=35586051; - //BA.debugLineNum = 35586051;BA.debugLine="End Sub"; +public String _setmaxsize(int _s) throws Exception{ + //BA.debugLineNum = 14;BA.debugLine="Public Sub setMaxSize(s As Int)"; + //BA.debugLineNum = 15;BA.debugLine="mMaxSize = s"; +_mmaxsize = _s; + //BA.debugLineNum = 16;BA.debugLine="TrimIfOversize"; +_trimifoversize(); + //BA.debugLineNum = 17;BA.debugLine="End Sub"; return ""; } -public int _size(keymon.lat.medicomed.b4xcache __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcache"; -if (Debug.shouldDelegate(ba, "size", true)) - {return ((Integer) Debug.delegate(ba, "size", null));} -RDebugUtils.currentLine=36241408; - //BA.debugLineNum = 36241408;BA.debugLine="Public Sub Size As Int"; -RDebugUtils.currentLine=36241409; - //BA.debugLineNum = 36241409;BA.debugLine="Return Data.Size"; -if (true) return __ref._data /*keymon.lat.medicomed.b4xorderedmap*/ ._getsize /*int*/ (null); -RDebugUtils.currentLine=36241410; - //BA.debugLineNum = 36241410;BA.debugLine="End Sub"; +public int _size() throws Exception{ + //BA.debugLineNum = 93;BA.debugLine="Public Sub Size As Int"; + //BA.debugLineNum = 94;BA.debugLine="Return Data.Size"; +if (true) return _data._getsize /*int*/ (); + //BA.debugLineNum = 95;BA.debugLine="End Sub"; return 0; } -} \ No newline at end of file +public String _trimifoversize() throws Exception{ +anywheresoftware.b4a.objects.collections.List _values = null; +int _numberofitemstoremove = 0; +int _i = 0; + //BA.debugLineNum = 70;BA.debugLine="Private Sub TrimIfOversize"; + //BA.debugLineNum = 71;BA.debugLine="If Data.Size - EternalCounts > mMaxSize Then"; +if (_data._getsize /*int*/ ()-_eternalcounts>_mmaxsize) { + //BA.debugLineNum = 72;BA.debugLine="Dim values As List = Data.Values"; +_values = new anywheresoftware.b4a.objects.collections.List(); +_values = _data._getvalues /*anywheresoftware.b4a.objects.collections.List*/ (); + //BA.debugLineNum = 73;BA.debugLine="values.SortType(\"LastAccessedTime\", True)"; +_values.SortType("LastAccessedTime",__c.True); + //BA.debugLineNum = 74;BA.debugLine="Dim NumberOfItemsToRemove As Int = Ceil(mMaxSize"; +_numberofitemstoremove = (int) (__c.Ceil(_mmaxsize*_removethreshold)); + //BA.debugLineNum = 75;BA.debugLine="For i = 0 To NumberOfItemsToRemove"; +{ +final int step5 = 1; +final int limit5 = _numberofitemstoremove; +_i = (int) (0) ; +for (;_i <= limit5 ;_i = _i + step5 ) { + //BA.debugLineNum = 76;BA.debugLine="Data.Remove(values.Get(i).As(B4XCacheItem).Key)"; +_data._remove /*String*/ ((Object)(((keymon.lat.medicomed.b4xcache._b4xcacheitem)(_values.Get(_i))).Key /*String*/ )); + } +}; + }; + //BA.debugLineNum = 79;BA.debugLine="End Sub"; +return ""; +} +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xcollections.java b/B4A/Objects/src/keymon/lat/medicomed/b4xcollections.java index 77bd9b4..f5b52fa 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xcollections.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xcollections.java @@ -10,8 +10,7 @@ private static b4xcollections mostCurrent = new b4xcollections(); public static Object getObject() { throw new RuntimeException("Code module does not support this method."); } - -public anywheresoftware.b4a.keywords.Common __c = null; + public anywheresoftware.b4a.keywords.Common __c = null; public b4a.example.dateutils _dateutils = null; public keymon.lat.medicomed.main _main = null; public keymon.lat.medicomed.starter _starter = null; @@ -24,107 +23,68 @@ public keymon.lat.medicomed.b4xpages _b4xpages = null; public keymon.lat.medicomed.httputils2service _httputils2service = null; public keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; public static keymon.lat.medicomed.b4xbitset _createbitset(anywheresoftware.b4a.BA _ba,int _size) throws Exception{ -RDebugUtils.currentModule="b4xcollections"; -if (Debug.shouldDelegate(null, "createbitset", true)) - {return ((keymon.lat.medicomed.b4xbitset) Debug.delegate(null, "createbitset", new Object[] {_ba,_size}));} keymon.lat.medicomed.b4xbitset _s = null; -RDebugUtils.currentLine=36765696; - //BA.debugLineNum = 36765696;BA.debugLine="Public Sub CreateBitSet (Size As Int) As B4XBitSet"; -RDebugUtils.currentLine=36765697; - //BA.debugLineNum = 36765697;BA.debugLine="Dim s As B4XBitSet"; + //BA.debugLineNum = 52;BA.debugLine="Public Sub CreateBitSet (Size As Int) As B4XBitSet"; + //BA.debugLineNum = 53;BA.debugLine="Dim s As B4XBitSet"; _s = new keymon.lat.medicomed.b4xbitset(); -RDebugUtils.currentLine=36765698; - //BA.debugLineNum = 36765698;BA.debugLine="s.Initialize(Size)"; -_s._initialize /*String*/ (null,(_ba.processBA == null ? _ba : _ba.processBA),_size); -RDebugUtils.currentLine=36765699; - //BA.debugLineNum = 36765699;BA.debugLine="Return s"; + //BA.debugLineNum = 54;BA.debugLine="s.Initialize(Size)"; +_s._initialize /*String*/ ((_ba.processBA == null ? _ba : _ba.processBA),_size); + //BA.debugLineNum = 55;BA.debugLine="Return s"; if (true) return _s; -RDebugUtils.currentLine=36765700; - //BA.debugLineNum = 36765700;BA.debugLine="End Sub"; + //BA.debugLineNum = 56;BA.debugLine="End Sub"; return null; } public static keymon.lat.medicomed.b4xorderedmap _createorderedmap(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="b4xcollections"; -if (Debug.shouldDelegate(null, "createorderedmap", true)) - {return ((keymon.lat.medicomed.b4xorderedmap) Debug.delegate(null, "createorderedmap", new Object[] {_ba}));} -RDebugUtils.currentLine=36634624; - //BA.debugLineNum = 36634624;BA.debugLine="Public Sub CreateOrderedMap As B4XOrderedMap"; -RDebugUtils.currentLine=36634625; - //BA.debugLineNum = 36634625;BA.debugLine="Return CreateOrderedMap2(Null, Null)"; + //BA.debugLineNum = 30;BA.debugLine="Public Sub CreateOrderedMap As B4XOrderedMap"; + //BA.debugLineNum = 31;BA.debugLine="Return CreateOrderedMap2(Null, Null)"; if (true) return _createorderedmap2(_ba,(anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(anywheresoftware.b4a.keywords.Common.Null)),(anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(anywheresoftware.b4a.keywords.Common.Null))); -RDebugUtils.currentLine=36634626; - //BA.debugLineNum = 36634626;BA.debugLine="End Sub"; + //BA.debugLineNum = 32;BA.debugLine="End Sub"; return null; } public static keymon.lat.medicomed.b4xorderedmap _createorderedmap2(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.collections.List _keys,anywheresoftware.b4a.objects.collections.List _values) throws Exception{ -RDebugUtils.currentModule="b4xcollections"; -if (Debug.shouldDelegate(null, "createorderedmap2", true)) - {return ((keymon.lat.medicomed.b4xorderedmap) Debug.delegate(null, "createorderedmap2", new Object[] {_ba,_keys,_values}));} keymon.lat.medicomed.b4xorderedmap _m = null; int _i = 0; -RDebugUtils.currentLine=36700160; - //BA.debugLineNum = 36700160;BA.debugLine="Public Sub CreateOrderedMap2 (Keys As List, Values"; -RDebugUtils.currentLine=36700161; - //BA.debugLineNum = 36700161;BA.debugLine="Dim m As B4XOrderedMap"; + //BA.debugLineNum = 38;BA.debugLine="Public Sub CreateOrderedMap2 (Keys As List, Values"; + //BA.debugLineNum = 39;BA.debugLine="Dim m As B4XOrderedMap"; _m = new keymon.lat.medicomed.b4xorderedmap(); -RDebugUtils.currentLine=36700162; - //BA.debugLineNum = 36700162;BA.debugLine="m.Initialize"; -_m._initialize /*String*/ (null,(_ba.processBA == null ? _ba : _ba.processBA)); -RDebugUtils.currentLine=36700163; - //BA.debugLineNum = 36700163;BA.debugLine="If Keys <> Null And Values <> Null And Keys.IsIni"; + //BA.debugLineNum = 40;BA.debugLine="m.Initialize"; +_m._initialize /*String*/ ((_ba.processBA == null ? _ba : _ba.processBA)); + //BA.debugLineNum = 41;BA.debugLine="If Keys <> Null And Values <> Null And Keys.IsIni"; if (_keys!= null && _values!= null && _keys.IsInitialized() && _values.IsInitialized()) { -RDebugUtils.currentLine=36700164; - //BA.debugLineNum = 36700164;BA.debugLine="For i = 0 To Keys.Size - 1"; + //BA.debugLineNum = 42;BA.debugLine="For i = 0 To Keys.Size - 1"; { final int step4 = 1; final int limit4 = (int) (_keys.getSize()-1); _i = (int) (0) ; for (;_i <= limit4 ;_i = _i + step4 ) { -RDebugUtils.currentLine=36700165; - //BA.debugLineNum = 36700165;BA.debugLine="m.Put(Keys.Get(i), Values.Get(i))"; -_m._put /*String*/ (null,_keys.Get(_i),_values.Get(_i)); + //BA.debugLineNum = 43;BA.debugLine="m.Put(Keys.Get(i), Values.Get(i))"; +_m._put /*String*/ (_keys.Get(_i),_values.Get(_i)); } }; }; -RDebugUtils.currentLine=36700168; - //BA.debugLineNum = 36700168;BA.debugLine="Return m"; + //BA.debugLineNum = 46;BA.debugLine="Return m"; if (true) return _m; -RDebugUtils.currentLine=36700169; - //BA.debugLineNum = 36700169;BA.debugLine="End Sub"; + //BA.debugLineNum = 47;BA.debugLine="End Sub"; return null; } public static keymon.lat.medicomed.b4xset _createset(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="b4xcollections"; -if (Debug.shouldDelegate(null, "createset", true)) - {return ((keymon.lat.medicomed.b4xset) Debug.delegate(null, "createset", new Object[] {_ba}));} -RDebugUtils.currentLine=36503552; - //BA.debugLineNum = 36503552;BA.debugLine="Public Sub CreateSet As B4XSet"; -RDebugUtils.currentLine=36503553; - //BA.debugLineNum = 36503553;BA.debugLine="Return CreateSet2(Null)"; + //BA.debugLineNum = 9;BA.debugLine="Public Sub CreateSet As B4XSet"; + //BA.debugLineNum = 10;BA.debugLine="Return CreateSet2(Null)"; if (true) return _createset2(_ba,(anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(anywheresoftware.b4a.keywords.Common.Null))); -RDebugUtils.currentLine=36503554; - //BA.debugLineNum = 36503554;BA.debugLine="End Sub"; + //BA.debugLineNum = 11;BA.debugLine="End Sub"; return null; } public static keymon.lat.medicomed.b4xset _createset2(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.collections.List _values) throws Exception{ -RDebugUtils.currentModule="b4xcollections"; -if (Debug.shouldDelegate(null, "createset2", true)) - {return ((keymon.lat.medicomed.b4xset) Debug.delegate(null, "createset2", new Object[] {_ba,_values}));} keymon.lat.medicomed.b4xset _s = null; Object _v = null; -RDebugUtils.currentLine=36569088; - //BA.debugLineNum = 36569088;BA.debugLine="Public Sub CreateSet2 (Values As List) As B4XSet"; -RDebugUtils.currentLine=36569089; - //BA.debugLineNum = 36569089;BA.debugLine="Dim s As B4XSet"; + //BA.debugLineNum = 16;BA.debugLine="Public Sub CreateSet2 (Values As List) As B4XSet"; + //BA.debugLineNum = 17;BA.debugLine="Dim s As B4XSet"; _s = new keymon.lat.medicomed.b4xset(); -RDebugUtils.currentLine=36569090; - //BA.debugLineNum = 36569090;BA.debugLine="s.Initialize"; -_s._initialize /*String*/ (null,(_ba.processBA == null ? _ba : _ba.processBA)); -RDebugUtils.currentLine=36569091; - //BA.debugLineNum = 36569091;BA.debugLine="If Values <> Null And Values.IsInitialized Then"; + //BA.debugLineNum = 18;BA.debugLine="s.Initialize"; +_s._initialize /*String*/ ((_ba.processBA == null ? _ba : _ba.processBA)); + //BA.debugLineNum = 19;BA.debugLine="If Values <> Null And Values.IsInitialized Then"; if (_values!= null && _values.IsInitialized()) { -RDebugUtils.currentLine=36569092; - //BA.debugLineNum = 36569092;BA.debugLine="For Each v As Object In Values"; + //BA.debugLineNum = 20;BA.debugLine="For Each v As Object In Values"; { final anywheresoftware.b4a.BA.IterableList group4 = _values; final int groupLen4 = group4.getSize() @@ -132,17 +92,19 @@ final int groupLen4 = group4.getSize() ; for (; index4 < groupLen4;index4++){ _v = group4.Get(index4); -RDebugUtils.currentLine=36569093; - //BA.debugLineNum = 36569093;BA.debugLine="s.Add(v)"; -_s._add /*String*/ (null,_v); + //BA.debugLineNum = 21;BA.debugLine="s.Add(v)"; +_s._add /*String*/ (_v); } }; }; -RDebugUtils.currentLine=36569096; - //BA.debugLineNum = 36569096;BA.debugLine="Return s"; + //BA.debugLineNum = 24;BA.debugLine="Return s"; if (true) return _s; -RDebugUtils.currentLine=36569097; - //BA.debugLineNum = 36569097;BA.debugLine="End Sub"; + //BA.debugLineNum = 25;BA.debugLine="End Sub"; return null; } -} \ No newline at end of file +public static String _process_globals() throws Exception{ + //BA.debugLineNum = 2;BA.debugLine="Sub Process_Globals"; + //BA.debugLineNum = 4;BA.debugLine="End Sub"; +return ""; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xcolortemplate.java b/B4A/Objects/src/keymon/lat/medicomed/b4xcolortemplate.java index b52313f..d61fb35 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xcolortemplate.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xcolortemplate.java @@ -10,7 +10,7 @@ public class b4xcolortemplate extends B4AClass.ImplB4AClass implements BA.SubDel private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xcolortemplate"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xcolortemplate"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,33 +23,7 @@ public class b4xcolortemplate extends B4AClass.ImplB4AClass implements BA.SubDel 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 static class _colorpickerpart{ -public boolean IsInitialized; -public anywheresoftware.b4a.objects.B4XCanvas cvs; -public anywheresoftware.b4a.objects.B4XViewWrapper pnl; -public anywheresoftware.b4a.objects.B4XViewWrapper iv; -public anywheresoftware.b4a.objects.B4XCanvas checkersCanvas; -public boolean DrawCheckers; -public void Initialize() { -IsInitialized = true; -cvs = new anywheresoftware.b4a.objects.B4XCanvas(); -pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); -iv = new anywheresoftware.b4a.objects.B4XViewWrapper(); -checkersCanvas = new anywheresoftware.b4a.objects.B4XCanvas(); -DrawCheckers = false; -} -@Override - public String toString() { - return BA.TypeToString(this, false); - }} -public anywheresoftware.b4a.keywords.Common __c = null; + public anywheresoftware.b4a.keywords.Common __c = null; public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null; public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; public int _selectedalpha = 0; @@ -79,428 +53,154 @@ 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 _alpha_touch(keymon.lat.medicomed.b4xcolortemplate __ref,int _action,float _x,float _y) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "alpha_touch", true)) - {return ((String) Debug.delegate(ba, "alpha_touch", new Object[] {_action,_x,_y}));} -RDebugUtils.currentLine=47644672; - //BA.debugLineNum = 47644672;BA.debugLine="Private Sub Alpha_Touch (Action As Int, X As Float"; -RDebugUtils.currentLine=47644673; - //BA.debugLineNum = 47644673;BA.debugLine="If Action = mBase.TOUCH_ACTION_MOVE_NOTOUCH Then"; -if (_action==__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .TOUCH_ACTION_MOVE_NOTOUCH) { +public static class _colorpickerpart{ +public boolean IsInitialized; +public anywheresoftware.b4a.objects.B4XCanvas cvs; +public anywheresoftware.b4a.objects.B4XViewWrapper pnl; +public anywheresoftware.b4a.objects.B4XViewWrapper iv; +public anywheresoftware.b4a.objects.B4XCanvas checkersCanvas; +public boolean DrawCheckers; +public void Initialize() { +IsInitialized = true; +cvs = new anywheresoftware.b4a.objects.B4XCanvas(); +pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); +iv = new anywheresoftware.b4a.objects.B4XViewWrapper(); +checkersCanvas = new anywheresoftware.b4a.objects.B4XCanvas(); +DrawCheckers = false; +} +@Override + public String toString() { + return BA.TypeToString(this, false); + }} +public String _alpha_touch(int _action,float _x,float _y) throws Exception{ + //BA.debugLineNum = 263;BA.debugLine="Private Sub Alpha_Touch (Action As Int, X As Float"; + //BA.debugLineNum = 264;BA.debugLine="If Action = mBase.TOUCH_ACTION_MOVE_NOTOUCH Then"; +if (_action==_mbase.TOUCH_ACTION_MOVE_NOTOUCH) { if (true) return "";}; -RDebugUtils.currentLine=47644674; - //BA.debugLineNum = 47644674;BA.debugLine="AlphaBarSelectedChange(x)"; -__ref._alphabarselectedchange /*String*/ (null,_x); -RDebugUtils.currentLine=47644675; - //BA.debugLineNum = 47644675;BA.debugLine="End Sub"; + //BA.debugLineNum = 265;BA.debugLine="AlphaBarSelectedChange(x)"; +_alphabarselectedchange(_x); + //BA.debugLineNum = 266;BA.debugLine="End Sub"; return ""; } -public String _alphabarselectedchange(keymon.lat.medicomed.b4xcolortemplate __ref,float _x) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "alphabarselectedchange", true)) - {return ((String) Debug.delegate(ba, "alphabarselectedchange", new Object[] {_x}));} +public String _alphabarselectedchange(float _x) throws Exception{ anywheresoftware.b4a.objects.B4XCanvas.B4XRect _r = null; -RDebugUtils.currentLine=46727168; - //BA.debugLineNum = 46727168;BA.debugLine="Private Sub AlphaBarSelectedChange(x As Float)"; -RDebugUtils.currentLine=46727169; - //BA.debugLineNum = 46727169;BA.debugLine="SelectedAlpha = 255 * Max(0, Min(1, x / AlphaBar."; -__ref._selectedalpha /*int*/ = (int) (255*__c.Max(0,__c.Min(1,_x/(double)__ref._alphabar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()))); -RDebugUtils.currentLine=46727170; - //BA.debugLineNum = 46727170;BA.debugLine="x = SelectedAlpha / 255 * AlphaBar.pnl.Width"; -_x = (float) (__ref._selectedalpha /*int*/ /(double)255*__ref._alphabar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()); -RDebugUtils.currentLine=46727171; - //BA.debugLineNum = 46727171;BA.debugLine="AlphaBar.cvs.ClearRect(AlphaBar.cvs.TargetRect)"; -__ref._alphabar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .ClearRect(__ref._alphabar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect()); -RDebugUtils.currentLine=46727172; - //BA.debugLineNum = 46727172;BA.debugLine="Dim r As B4XRect"; + //BA.debugLineNum = 147;BA.debugLine="Private Sub AlphaBarSelectedChange(x As Float)"; + //BA.debugLineNum = 148;BA.debugLine="SelectedAlpha = 255 * Max(0, Min(1, x / AlphaBar."; +_selectedalpha = (int) (255*__c.Max(0,__c.Min(1,_x/(double)_alphabar.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()))); + //BA.debugLineNum = 149;BA.debugLine="x = SelectedAlpha / 255 * AlphaBar.pnl.Width"; +_x = (float) (_selectedalpha/(double)255*_alphabar.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()); + //BA.debugLineNum = 150;BA.debugLine="AlphaBar.cvs.ClearRect(AlphaBar.cvs.TargetRect)"; +_alphabar.cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .ClearRect(_alphabar.cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect()); + //BA.debugLineNum = 151;BA.debugLine="Dim r As B4XRect"; _r = new anywheresoftware.b4a.objects.B4XCanvas.B4XRect(); -RDebugUtils.currentLine=46727173; - //BA.debugLineNum = 46727173;BA.debugLine="r.Initialize(x - 3dip, 1dip, x + 3dip, AlphaBar.c"; -_r.Initialize((float) (_x-__c.DipToCurrent((int) (3))),(float) (__c.DipToCurrent((int) (1))),(float) (_x+__c.DipToCurrent((int) (3))),(float) (__ref._alphabar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getBottom()-__c.DipToCurrent((int) (1)))); -RDebugUtils.currentLine=46727174; - //BA.debugLineNum = 46727174;BA.debugLine="AlphaBar.cvs.DrawRect(r, xui.Color_Black, True, 2"; -__ref._alphabar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawRect(_r,__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Black,__c.True,(float) (__c.DipToCurrent((int) (2)))); -RDebugUtils.currentLine=46727175; - //BA.debugLineNum = 46727175;BA.debugLine="AlphaBar.cvs.Invalidate"; -__ref._alphabar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Invalidate(); -RDebugUtils.currentLine=46727176; - //BA.debugLineNum = 46727176;BA.debugLine="Update"; -__ref._update /*String*/ (null); -RDebugUtils.currentLine=46727177; - //BA.debugLineNum = 46727177;BA.debugLine="End Sub"; + //BA.debugLineNum = 152;BA.debugLine="r.Initialize(x - 3dip, 1dip, x + 3dip, AlphaBar.c"; +_r.Initialize((float) (_x-__c.DipToCurrent((int) (3))),(float) (__c.DipToCurrent((int) (1))),(float) (_x+__c.DipToCurrent((int) (3))),(float) (_alphabar.cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getBottom()-__c.DipToCurrent((int) (1)))); + //BA.debugLineNum = 153;BA.debugLine="AlphaBar.cvs.DrawRect(r, xui.Color_Black, True, 2"; +_alphabar.cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawRect(_r,_xui.Color_Black,__c.True,(float) (__c.DipToCurrent((int) (2)))); + //BA.debugLineNum = 154;BA.debugLine="AlphaBar.cvs.Invalidate"; +_alphabar.cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Invalidate(); + //BA.debugLineNum = 155;BA.debugLine="Update"; +_update(); + //BA.debugLineNum = 156;BA.debugLine="End Sub"; return ""; } -public String _update(keymon.lat.medicomed.b4xcolortemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "update", true)) - {return ((String) Debug.delegate(ba, "update", null));} -RDebugUtils.currentLine=46792704; - //BA.debugLineNum = 46792704;BA.debugLine="Private Sub Update"; -RDebugUtils.currentLine=46792705; - //BA.debugLineNum = 46792705;BA.debugLine="DrawColors"; -__ref._drawcolors /*String*/ (null); -RDebugUtils.currentLine=46792706; - //BA.debugLineNum = 46792706;BA.debugLine="HandleSelectedColorChanged(DONT_CHANGE, DONT_CHAN"; -__ref._handleselectedcolorchanged /*String*/ (null,__ref._dont_change /*int*/ ,__ref._dont_change /*int*/ ); -RDebugUtils.currentLine=46792707; - //BA.debugLineNum = 46792707;BA.debugLine="End Sub"; -return ""; -} -public String _base_resize(keymon.lat.medicomed.b4xcolortemplate __ref,double _width,double _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "base_resize", true)) - {return ((String) Debug.delegate(ba, "base_resize", new Object[] {_width,_height}));} +public String _base_resize(double _width,double _height) throws Exception{ int _r = 0; int _w = 0; keymon.lat.medicomed.b4xcolortemplate._colorpickerpart _cpp = null; int _i = 0; -RDebugUtils.currentLine=46333952; - //BA.debugLineNum = 46333952;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; -RDebugUtils.currentLine=46333954; - //BA.debugLineNum = 46333954;BA.debugLine="ColorScale = Max(1, Max(Width, Height) / 100 / De"; -__ref._colorscale /*float*/ = (float) (__c.Max(1,__c.Max(_width,_height)/(double)100/(double)__ref._devicescale /*float*/ )); -RDebugUtils.currentLine=46333955; - //BA.debugLineNum = 46333955;BA.debugLine="HueBar.pnl.SetLayoutAnimated(0, 1dip, 1dip, 30dip"; -__ref._huebar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),__c.DipToCurrent((int) (1)),__c.DipToCurrent((int) (1)),__c.DipToCurrent((int) (30)),(int) (_height-__c.DipToCurrent((int) (2)))); -RDebugUtils.currentLine=46333956; - //BA.debugLineNum = 46333956;BA.debugLine="Dim r As Int = HueBar.pnl.Width + HueBar.pnl.Left"; -_r = (int) (__ref._huebar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()+__ref._huebar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getLeft()+__c.DipToCurrent((int) (1))); -RDebugUtils.currentLine=46333957; - //BA.debugLineNum = 46333957;BA.debugLine="Dim w As Int = Width - r - 1dip"; + //BA.debugLineNum = 51;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; + //BA.debugLineNum = 53;BA.debugLine="ColorScale = Max(1, Max(Width, Height) / 100 / De"; +_colorscale = (float) (__c.Max(1,__c.Max(_width,_height)/(double)100/(double)_devicescale)); + //BA.debugLineNum = 54;BA.debugLine="HueBar.pnl.SetLayoutAnimated(0, 1dip, 1dip, 30dip"; +_huebar.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),__c.DipToCurrent((int) (1)),__c.DipToCurrent((int) (1)),__c.DipToCurrent((int) (30)),(int) (_height-__c.DipToCurrent((int) (2)))); + //BA.debugLineNum = 55;BA.debugLine="Dim r As Int = HueBar.pnl.Width + HueBar.pnl.Left"; +_r = (int) (_huebar.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()+_huebar.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getLeft()+__c.DipToCurrent((int) (1))); + //BA.debugLineNum = 56;BA.debugLine="Dim w As Int = Width - r - 1dip"; _w = (int) (_width-_r-__c.DipToCurrent((int) (1))); -RDebugUtils.currentLine=46333958; - //BA.debugLineNum = 46333958;BA.debugLine="If xui.IsB4i Then"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4i()) { -RDebugUtils.currentLine=46333959; - //BA.debugLineNum = 46333959;BA.debugLine="r = r - 1"; + //BA.debugLineNum = 57;BA.debugLine="If xui.IsB4i Then"; +if (_xui.getIsB4i()) { + //BA.debugLineNum = 58;BA.debugLine="r = r - 1"; _r = (int) (_r-1); -RDebugUtils.currentLine=46333960; - //BA.debugLineNum = 46333960;BA.debugLine="w = w + 1"; + //BA.debugLineNum = 59;BA.debugLine="w = w + 1"; _w = (int) (_w+1); }; -RDebugUtils.currentLine=46333962; - //BA.debugLineNum = 46333962;BA.debugLine="AlphaBar.pnl.SetLayoutAnimated(0, r, Height - 31d"; -__ref._alphabar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),_r,(int) (_height-__c.DipToCurrent((int) (31))),_w,__c.DipToCurrent((int) (30))); -RDebugUtils.currentLine=46333963; - //BA.debugLineNum = 46333963;BA.debugLine="ColorPicker.pnl.SetLayoutAnimated(0, r, 1dip, w,"; -__ref._colorpicker /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),_r,__c.DipToCurrent((int) (1)),_w,(int) (_height-__c.DipToCurrent((int) (3))-__ref._alphabar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight())); -RDebugUtils.currentLine=46333964; - //BA.debugLineNum = 46333964;BA.debugLine="bcColors.Initialize(ColorPicker.pnl.Width / Color"; -__ref._bccolors /*b4a.example.bitmapcreator*/ ._initialize(ba,(int) (__ref._colorpicker /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)__ref._colorscale /*float*/ ),(int) (__ref._colorpicker /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()/(double)__ref._colorscale /*float*/ )); -RDebugUtils.currentLine=46333965; - //BA.debugLineNum = 46333965;BA.debugLine="For Each cpp As ColorPickerPart In Array(HueBar,"; + //BA.debugLineNum = 61;BA.debugLine="AlphaBar.pnl.SetLayoutAnimated(0, r, Height - 31d"; +_alphabar.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),_r,(int) (_height-__c.DipToCurrent((int) (31))),_w,__c.DipToCurrent((int) (30))); + //BA.debugLineNum = 62;BA.debugLine="ColorPicker.pnl.SetLayoutAnimated(0, r, 1dip, w,"; +_colorpicker.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),_r,__c.DipToCurrent((int) (1)),_w,(int) (_height-__c.DipToCurrent((int) (3))-_alphabar.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight())); + //BA.debugLineNum = 63;BA.debugLine="bcColors.Initialize(ColorPicker.pnl.Width / Color"; +_bccolors._initialize(ba,(int) (_colorpicker.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)_colorscale),(int) (_colorpicker.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()/(double)_colorscale)); + //BA.debugLineNum = 64;BA.debugLine="For Each cpp As ColorPickerPart In Array(HueBar,"; { -final Object[] group12 = new Object[]{(Object)(__ref._huebar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ ),(Object)(__ref._colorpicker /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ ),(Object)(__ref._alphabar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ )}; +final Object[] group12 = new Object[]{(Object)(_huebar),(Object)(_colorpicker),(Object)(_alphabar)}; final int groupLen12 = group12.length ;int index12 = 0; ; for (; index12 < groupLen12;index12++){ _cpp = (keymon.lat.medicomed.b4xcolortemplate._colorpickerpart)(group12[index12]); -RDebugUtils.currentLine=46333966; - //BA.debugLineNum = 46333966;BA.debugLine="For i = 0 To cpp.pnl.NumberOfViews - 1"; + //BA.debugLineNum = 65;BA.debugLine="For i = 0 To cpp.pnl.NumberOfViews - 1"; { final int step13 = 1; final int limit13 = (int) (_cpp.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getNumberOfViews()-1); _i = (int) (0) ; for (;_i <= limit13 ;_i = _i + step13 ) { -RDebugUtils.currentLine=46333967; - //BA.debugLineNum = 46333967;BA.debugLine="cpp.pnl.GetView(i).SetLayoutAnimated(0, 0, 0, c"; + //BA.debugLineNum = 66;BA.debugLine="cpp.pnl.GetView(i).SetLayoutAnimated(0, 0, 0, c"; _cpp.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .GetView(_i).SetLayoutAnimated((int) (0),(int) (0),(int) (0),_cpp.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),_cpp.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); } }; -RDebugUtils.currentLine=46333969; - //BA.debugLineNum = 46333969;BA.debugLine="cpp.cvs.Resize(cpp.pnl.Width, cpp.pnl.Height)"; + //BA.debugLineNum = 68;BA.debugLine="cpp.cvs.Resize(cpp.pnl.Width, cpp.pnl.Height)"; _cpp.cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Resize((float) (_cpp.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()),(float) (_cpp.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight())); -RDebugUtils.currentLine=46333970; - //BA.debugLineNum = 46333970;BA.debugLine="If cpp.DrawCheckers Then"; + //BA.debugLineNum = 69;BA.debugLine="If cpp.DrawCheckers Then"; if (_cpp.DrawCheckers /*boolean*/ ) { -RDebugUtils.currentLine=46333971; - //BA.debugLineNum = 46333971;BA.debugLine="DrawCheckers(cpp)"; -__ref._drawcheckers /*String*/ (null,_cpp); + //BA.debugLineNum = 70;BA.debugLine="DrawCheckers(cpp)"; +_drawcheckers(_cpp); }; } }; -RDebugUtils.currentLine=46333974; - //BA.debugLineNum = 46333974;BA.debugLine="DrawHueBar"; -__ref._drawhuebar /*String*/ (null); -RDebugUtils.currentLine=46333975; - //BA.debugLineNum = 46333975;BA.debugLine="DrawAlphaBar"; -__ref._drawalphabar /*String*/ (null); -RDebugUtils.currentLine=46333976; - //BA.debugLineNum = 46333976;BA.debugLine="HueBarSelectedChanged (selectedH / 360 * HueBar.p"; -__ref._huebarselectedchanged /*String*/ (null,(float) (__ref._selectedh /*float*/ /(double)360*__ref._huebar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight())); -RDebugUtils.currentLine=46333977; - //BA.debugLineNum = 46333977;BA.debugLine="AlphaBarSelectedChange (SelectedAlpha / 255 * Alp"; -__ref._alphabarselectedchange /*String*/ (null,(float) (__ref._selectedalpha /*int*/ /(double)255*__ref._alphabar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth())); -RDebugUtils.currentLine=46333978; - //BA.debugLineNum = 46333978;BA.debugLine="End Sub"; + //BA.debugLineNum = 73;BA.debugLine="DrawHueBar"; +_drawhuebar(); + //BA.debugLineNum = 74;BA.debugLine="DrawAlphaBar"; +_drawalphabar(); + //BA.debugLineNum = 75;BA.debugLine="HueBarSelectedChanged (selectedH / 360 * HueBar.p"; +_huebarselectedchanged((float) (_selectedh/(double)360*_huebar.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight())); + //BA.debugLineNum = 76;BA.debugLine="AlphaBarSelectedChange (SelectedAlpha / 255 * Alp"; +_alphabarselectedchange((float) (_selectedalpha/(double)255*_alphabar.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth())); + //BA.debugLineNum = 77;BA.debugLine="End Sub"; return ""; } -public String _drawcheckers(keymon.lat.medicomed.b4xcolortemplate __ref,keymon.lat.medicomed.b4xcolortemplate._colorpickerpart _cpp) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "drawcheckers", true)) - {return ((String) Debug.delegate(ba, "drawcheckers", new Object[] {_cpp}));} -int _size = 0; -int[] _clrs = null; -int _clr = 0; -anywheresoftware.b4a.objects.B4XCanvas.B4XRect _r = null; -int _x = 0; -int _xx = 0; -int _y = 0; -RDebugUtils.currentLine=46399488; - //BA.debugLineNum = 46399488;BA.debugLine="Private Sub DrawCheckers (cpp As ColorPickerPart)"; -RDebugUtils.currentLine=46399489; - //BA.debugLineNum = 46399489;BA.debugLine="cpp.checkersCanvas.Resize(cpp.pnl.Width, cpp.pnl."; -_cpp.checkersCanvas /*anywheresoftware.b4a.objects.B4XCanvas*/ .Resize((float) (_cpp.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()),(float) (_cpp.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight())); -RDebugUtils.currentLine=46399490; - //BA.debugLineNum = 46399490;BA.debugLine="cpp.checkersCanvas.ClearRect(cpp.checkersCanvas.T"; -_cpp.checkersCanvas /*anywheresoftware.b4a.objects.B4XCanvas*/ .ClearRect(_cpp.checkersCanvas /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect()); -RDebugUtils.currentLine=46399491; - //BA.debugLineNum = 46399491;BA.debugLine="Dim size As Int = 10dip"; -_size = __c.DipToCurrent((int) (10)); -RDebugUtils.currentLine=46399492; - //BA.debugLineNum = 46399492;BA.debugLine="Dim clrs() As Int = Array As Int(0xFFC0C0C0, 0xFF"; -_clrs = new int[]{((int)0xffc0c0c0),((int)0xff757575)}; -RDebugUtils.currentLine=46399493; - //BA.debugLineNum = 46399493;BA.debugLine="Dim clr As Int = 0"; -_clr = (int) (0); -RDebugUtils.currentLine=46399494; - //BA.debugLineNum = 46399494;BA.debugLine="Dim r As B4XRect"; -_r = new anywheresoftware.b4a.objects.B4XCanvas.B4XRect(); -RDebugUtils.currentLine=46399495; - //BA.debugLineNum = 46399495;BA.debugLine="For x = 0 To cpp.checkersCanvas.TargetRect.Right"; -{ -final int step7 = _size; -final int limit7 = (int) (_cpp.checkersCanvas /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getRight()-__c.DipToCurrent((int) (1))); -_x = (int) (0) ; -for (;(step7 > 0 && _x <= limit7) || (step7 < 0 && _x >= limit7) ;_x = ((int)(0 + _x + step7)) ) { -RDebugUtils.currentLine=46399496; - //BA.debugLineNum = 46399496;BA.debugLine="Dim xx As Int = x / size"; -_xx = (int) (_x/(double)_size); -RDebugUtils.currentLine=46399497; - //BA.debugLineNum = 46399497;BA.debugLine="clr = xx Mod 2"; -_clr = (int) (_xx%2); -RDebugUtils.currentLine=46399498; - //BA.debugLineNum = 46399498;BA.debugLine="For y = 0 To cpp.checkersCanvas.TargetRect.Botto"; -{ -final int step10 = _size; -final int limit10 = (int) (_cpp.checkersCanvas /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getBottom()-__c.DipToCurrent((int) (1))); -_y = (int) (0) ; -for (;(step10 > 0 && _y <= limit10) || (step10 < 0 && _y >= limit10) ;_y = ((int)(0 + _y + step10)) ) { -RDebugUtils.currentLine=46399499; - //BA.debugLineNum = 46399499;BA.debugLine="clr = (clr + 1) Mod 2"; -_clr = (int) ((_clr+1)%2); -RDebugUtils.currentLine=46399500; - //BA.debugLineNum = 46399500;BA.debugLine="r.Initialize(x, y, x + size, y + size)"; -_r.Initialize((float) (_x),(float) (_y),(float) (_x+_size),(float) (_y+_size)); -RDebugUtils.currentLine=46399501; - //BA.debugLineNum = 46399501;BA.debugLine="cpp.checkersCanvas.DrawRect(r, clrs(clr), True,"; -_cpp.checkersCanvas /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawRect(_r,_clrs[_clr],__c.True,(float) (0)); - } -}; - } -}; -RDebugUtils.currentLine=46399504; - //BA.debugLineNum = 46399504;BA.debugLine="cpp.checkersCanvas.Invalidate"; -_cpp.checkersCanvas /*anywheresoftware.b4a.objects.B4XCanvas*/ .Invalidate(); -RDebugUtils.currentLine=46399505; - //BA.debugLineNum = 46399505;BA.debugLine="End Sub"; -return ""; -} -public String _drawhuebar(keymon.lat.medicomed.b4xcolortemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "drawhuebar", true)) - {return ((String) Debug.delegate(ba, "drawhuebar", null));} -b4a.example.bitmapcreator _bchue = null; -int _y = 0; -int _x = 0; -RDebugUtils.currentLine=46465024; - //BA.debugLineNum = 46465024;BA.debugLine="Private Sub DrawHueBar"; -RDebugUtils.currentLine=46465025; - //BA.debugLineNum = 46465025;BA.debugLine="Dim bcHue As BitmapCreator"; -_bchue = new b4a.example.bitmapcreator(); -RDebugUtils.currentLine=46465026; - //BA.debugLineNum = 46465026;BA.debugLine="bcHue.Initialize(HueBar.pnl.Width / DeviceScale,"; -_bchue._initialize(ba,(int) (__ref._huebar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)__ref._devicescale /*float*/ ),(int) (__ref._huebar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()/(double)__ref._devicescale /*float*/ )); -RDebugUtils.currentLine=46465027; - //BA.debugLineNum = 46465027;BA.debugLine="For y = 0 To bcHue.mHeight - 1"; -{ -final int step3 = 1; -final int limit3 = (int) (_bchue._mheight-1); -_y = (int) (0) ; -for (;_y <= limit3 ;_y = _y + step3 ) { -RDebugUtils.currentLine=46465028; - //BA.debugLineNum = 46465028;BA.debugLine="For x = 0 To bcHue.mWidth - 1"; -{ -final int step4 = 1; -final int limit4 = (int) (_bchue._mwidth-1); -_x = (int) (0) ; -for (;_x <= limit4 ;_x = _x + step4 ) { -RDebugUtils.currentLine=46465029; - //BA.debugLineNum = 46465029;BA.debugLine="bcHue.SetHSV(x, y, 255, 360 / bcHue.mHeight * y"; -_bchue._sethsv(_x,_y,(int) (255),(int) (360/(double)_bchue._mheight*_y),(float) (1),(float) (1)); - } -}; - } -}; -RDebugUtils.currentLine=46465032; - //BA.debugLineNum = 46465032;BA.debugLine="HueBar.iv.SetBitmap(bcHue.Bitmap)"; -__ref._huebar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .iv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetBitmap((android.graphics.Bitmap)(_bchue._getbitmap().getObject())); -RDebugUtils.currentLine=46465033; - //BA.debugLineNum = 46465033;BA.debugLine="End Sub"; -return ""; -} -public String _drawalphabar(keymon.lat.medicomed.b4xcolortemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "drawalphabar", true)) - {return ((String) Debug.delegate(ba, "drawalphabar", null));} -b4a.example.bitmapcreator _bc = null; -b4a.example.bitmapcreator._argbcolor _argb = null; -int _y = 0; -int _x = 0; -RDebugUtils.currentLine=46530560; - //BA.debugLineNum = 46530560;BA.debugLine="Private Sub DrawAlphaBar"; -RDebugUtils.currentLine=46530561; - //BA.debugLineNum = 46530561;BA.debugLine="Dim bc As BitmapCreator"; -_bc = new b4a.example.bitmapcreator(); -RDebugUtils.currentLine=46530562; - //BA.debugLineNum = 46530562;BA.debugLine="bc.Initialize(AlphaBar.pnl.Width / DeviceScale, A"; -_bc._initialize(ba,(int) (__ref._alphabar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)__ref._devicescale /*float*/ ),(int) (__ref._alphabar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()/(double)__ref._devicescale /*float*/ )); -RDebugUtils.currentLine=46530563; - //BA.debugLineNum = 46530563;BA.debugLine="Dim argb As ARGBColor"; -_argb = new b4a.example.bitmapcreator._argbcolor(); -RDebugUtils.currentLine=46530564; - //BA.debugLineNum = 46530564;BA.debugLine="argb.r = 0xcc"; -_argb.r = ((int)0xcc); -RDebugUtils.currentLine=46530565; - //BA.debugLineNum = 46530565;BA.debugLine="argb.g = 0xcc"; -_argb.g = ((int)0xcc); -RDebugUtils.currentLine=46530566; - //BA.debugLineNum = 46530566;BA.debugLine="argb.b = 0xcc"; -_argb.b = ((int)0xcc); -RDebugUtils.currentLine=46530568; - //BA.debugLineNum = 46530568;BA.debugLine="For y = 0 To bc.mHeight - 1"; -{ -final int step7 = 1; -final int limit7 = (int) (_bc._mheight-1); -_y = (int) (0) ; -for (;_y <= limit7 ;_y = _y + step7 ) { -RDebugUtils.currentLine=46530569; - //BA.debugLineNum = 46530569;BA.debugLine="For x = 0 To bc.mWidth - 1"; -{ -final int step8 = 1; -final int limit8 = (int) (_bc._mwidth-1); -_x = (int) (0) ; -for (;_x <= limit8 ;_x = _x + step8 ) { -RDebugUtils.currentLine=46530570; - //BA.debugLineNum = 46530570;BA.debugLine="argb.a = x / bc.mWidth * 255"; -_argb.a = (int) (_x/(double)_bc._mwidth*255); -RDebugUtils.currentLine=46530571; - //BA.debugLineNum = 46530571;BA.debugLine="bc.SetARGB(x, y, argb)"; -_bc._setargb(_x,_y,_argb); - } -}; - } -}; -RDebugUtils.currentLine=46530574; - //BA.debugLineNum = 46530574;BA.debugLine="AlphaBar.iv.SetBitmap(bc.Bitmap)"; -__ref._alphabar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .iv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetBitmap((android.graphics.Bitmap)(_bc._getbitmap().getObject())); -RDebugUtils.currentLine=46530575; - //BA.debugLineNum = 46530575;BA.debugLine="End Sub"; -return ""; -} -public String _huebarselectedchanged(keymon.lat.medicomed.b4xcolortemplate __ref,float _y) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "huebarselectedchanged", true)) - {return ((String) Debug.delegate(ba, "huebarselectedchanged", new Object[] {_y}));} -anywheresoftware.b4a.objects.B4XCanvas.B4XRect _r = null; -RDebugUtils.currentLine=46661632; - //BA.debugLineNum = 46661632;BA.debugLine="Private Sub HueBarSelectedChanged (y As Float)"; -RDebugUtils.currentLine=46661633; - //BA.debugLineNum = 46661633;BA.debugLine="selectedH = Max(0, Min(360, 360 * y / HueBar.pnl."; -__ref._selectedh /*float*/ = (float) (__c.Max(0,__c.Min(360,360*_y/(double)__ref._huebar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()))); -RDebugUtils.currentLine=46661634; - //BA.debugLineNum = 46661634;BA.debugLine="y = selectedH * HueBar.pnl.Height / 360"; -_y = (float) (__ref._selectedh /*float*/ *__ref._huebar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()/(double)360); -RDebugUtils.currentLine=46661635; - //BA.debugLineNum = 46661635;BA.debugLine="HueBar.cvs.ClearRect(HueBar.cvs.TargetRect)"; -__ref._huebar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .ClearRect(__ref._huebar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect()); -RDebugUtils.currentLine=46661636; - //BA.debugLineNum = 46661636;BA.debugLine="Dim r As B4XRect"; -_r = new anywheresoftware.b4a.objects.B4XCanvas.B4XRect(); -RDebugUtils.currentLine=46661637; - //BA.debugLineNum = 46661637;BA.debugLine="r.Initialize(0, y - 3dip, HueBar.cvs.TargetRect.R"; -_r.Initialize((float) (0),(float) (_y-__c.DipToCurrent((int) (3))),__ref._huebar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getRight(),(float) (_y+__c.DipToCurrent((int) (3)))); -RDebugUtils.currentLine=46661638; - //BA.debugLineNum = 46661638;BA.debugLine="HueBar.cvs.DrawRect(r, xui.Color_White, False, 2d"; -__ref._huebar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawRect(_r,__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_White,__c.False,(float) (__c.DipToCurrent((int) (2)))); -RDebugUtils.currentLine=46661639; - //BA.debugLineNum = 46661639;BA.debugLine="HueBar.cvs.Invalidate"; -__ref._huebar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Invalidate(); -RDebugUtils.currentLine=46661640; - //BA.debugLineNum = 46661640;BA.debugLine="Update"; -__ref._update /*String*/ (null); -RDebugUtils.currentLine=46661641; - //BA.debugLineNum = 46661641;BA.debugLine="End Sub"; -return ""; -} -public String _class_globals(keymon.lat.medicomed.b4xcolortemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcolortemplate"; -RDebugUtils.currentLine=46137344; - //BA.debugLineNum = 46137344;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=46137345; - //BA.debugLineNum = 46137345;BA.debugLine="Public mBase As B4XView 'ignore"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Public mBase As B4XView 'ignore"; _mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=46137346; - //BA.debugLineNum = 46137346;BA.debugLine="Private xui As XUI 'ignore"; + //BA.debugLineNum = 3;BA.debugLine="Private xui As XUI 'ignore"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=46137347; - //BA.debugLineNum = 46137347;BA.debugLine="Private SelectedAlpha As Int = 255"; + //BA.debugLineNum = 4;BA.debugLine="Private SelectedAlpha As Int = 255"; _selectedalpha = (int) (255); -RDebugUtils.currentLine=46137348; - //BA.debugLineNum = 46137348;BA.debugLine="Private bcColors As BitmapCreator"; + //BA.debugLineNum = 5;BA.debugLine="Private bcColors As BitmapCreator"; _bccolors = new b4a.example.bitmapcreator(); -RDebugUtils.currentLine=46137349; - //BA.debugLineNum = 46137349;BA.debugLine="Private selectedH = 60, selectedS = 0.5, selected"; + //BA.debugLineNum = 6;BA.debugLine="Private selectedH = 60, selectedS = 0.5, selected"; _selectedh = (float) (60); _selecteds = (float) (0.5); _selectedv = (float) (0.5); -RDebugUtils.currentLine=46137350; - //BA.debugLineNum = 46137350;BA.debugLine="Private DeviceScale, ColorScale As Float"; + //BA.debugLineNum = 7;BA.debugLine="Private DeviceScale, ColorScale As Float"; _devicescale = 0f; _colorscale = 0f; -RDebugUtils.currentLine=46137351; - //BA.debugLineNum = 46137351;BA.debugLine="Private tempBC As BitmapCreator"; + //BA.debugLineNum = 8;BA.debugLine="Private tempBC As BitmapCreator"; _tempbc = new b4a.example.bitmapcreator(); -RDebugUtils.currentLine=46137352; - //BA.debugLineNum = 46137352;BA.debugLine="Private const DONT_CHANGE As Int = -999999999"; + //BA.debugLineNum = 9;BA.debugLine="Private const DONT_CHANGE As Int = -999999999"; _dont_change = (int) (-999999999); -RDebugUtils.currentLine=46137353; - //BA.debugLineNum = 46137353;BA.debugLine="Type ColorPickerPart (cvs As B4XCanvas, pnl As B4"; + //BA.debugLineNum = 10;BA.debugLine="Type ColorPickerPart (cvs As B4XCanvas, pnl As B4"; ; -RDebugUtils.currentLine=46137354; - //BA.debugLineNum = 46137354;BA.debugLine="Private HueBar, ColorPicker, AlphaBar As ColorPic"; + //BA.debugLineNum = 11;BA.debugLine="Private HueBar, ColorPicker, AlphaBar As ColorPic"; _huebar = new keymon.lat.medicomed.b4xcolortemplate._colorpickerpart(); _colorpicker = new keymon.lat.medicomed.b4xcolortemplate._colorpickerpart(); _alphabar = new keymon.lat.medicomed.b4xcolortemplate._colorpickerpart(); -RDebugUtils.currentLine=46137355; - //BA.debugLineNum = 46137355;BA.debugLine="Private BordersColor As Int"; + //BA.debugLineNum = 12;BA.debugLine="Private BordersColor As Int"; _borderscolor = 0; -RDebugUtils.currentLine=46137356; - //BA.debugLineNum = 46137356;BA.debugLine="Private xDialog As B4XDialog"; + //BA.debugLineNum = 13;BA.debugLine="Private xDialog As B4XDialog"; _xdialog = new keymon.lat.medicomed.b4xdialog(); -RDebugUtils.currentLine=46137357; - //BA.debugLineNum = 46137357;BA.debugLine="Private InitialColor() As Object"; + //BA.debugLineNum = 14;BA.debugLine="Private InitialColor() As Object"; _initialcolor = new Object[(int) (0)]; { int d0 = _initialcolor.length; @@ -509,66 +209,20 @@ _initialcolor[i0] = new Object(); } } ; -RDebugUtils.currentLine=46137358; - //BA.debugLineNum = 46137358;BA.debugLine="End Sub"; + //BA.debugLineNum = 15;BA.debugLine="End Sub"; return ""; } -public String _colors_touch(keymon.lat.medicomed.b4xcolortemplate __ref,int _action,float _x,float _y) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "colors_touch", true)) - {return ((String) Debug.delegate(ba, "colors_touch", new Object[] {_action,_x,_y}));} -RDebugUtils.currentLine=47513600; - //BA.debugLineNum = 47513600;BA.debugLine="Private Sub Colors_Touch (Action As Int, X As Floa"; -RDebugUtils.currentLine=47513601; - //BA.debugLineNum = 47513601;BA.debugLine="If Action = mBase.TOUCH_ACTION_MOVE_NOTOUCH Then"; -if (_action==__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .TOUCH_ACTION_MOVE_NOTOUCH) { +public String _colors_touch(int _action,float _x,float _y) throws Exception{ + //BA.debugLineNum = 253;BA.debugLine="Private Sub Colors_Touch (Action As Int, X As Floa"; + //BA.debugLineNum = 254;BA.debugLine="If Action = mBase.TOUCH_ACTION_MOVE_NOTOUCH Then"; +if (_action==_mbase.TOUCH_ACTION_MOVE_NOTOUCH) { if (true) return "";}; -RDebugUtils.currentLine=47513602; - //BA.debugLineNum = 47513602;BA.debugLine="HandleSelectedColorChanged(X, Y)"; -__ref._handleselectedcolorchanged /*String*/ (null,(int) (_x),(int) (_y)); -RDebugUtils.currentLine=47513603; - //BA.debugLineNum = 47513603;BA.debugLine="End Sub"; + //BA.debugLineNum = 255;BA.debugLine="HandleSelectedColorChanged(X, Y)"; +_handleselectedcolorchanged((int) (_x),(int) (_y)); + //BA.debugLineNum = 256;BA.debugLine="End Sub"; return ""; } -public String _handleselectedcolorchanged(keymon.lat.medicomed.b4xcolortemplate __ref,int _x,int _y) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "handleselectedcolorchanged", true)) - {return ((String) Debug.delegate(ba, "handleselectedcolorchanged", new Object[] {_x,_y}));} -RDebugUtils.currentLine=46858240; - //BA.debugLineNum = 46858240;BA.debugLine="Private Sub HandleSelectedColorChanged (x As Int,"; -RDebugUtils.currentLine=46858241; - //BA.debugLineNum = 46858241;BA.debugLine="If x <> DONT_CHANGE Then"; -if (_x!=__ref._dont_change /*int*/ ) { -RDebugUtils.currentLine=46858242; - //BA.debugLineNum = 46858242;BA.debugLine="selectedS = Max(0, Min(1, x / ColorPicker.pnl.Wi"; -__ref._selecteds /*float*/ = (float) (__c.Max(0,__c.Min(1,_x/(double)__ref._colorpicker /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()))); -RDebugUtils.currentLine=46858243; - //BA.debugLineNum = 46858243;BA.debugLine="selectedV = Max(0, Min(1, (ColorPicker.pnl.Heigh"; -__ref._selectedv /*float*/ = (float) (__c.Max(0,__c.Min(1,(__ref._colorpicker /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()-_y)/(double)__ref._colorpicker /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()))); - }; -RDebugUtils.currentLine=46858245; - //BA.debugLineNum = 46858245;BA.debugLine="ColorPicker.cvs.ClearRect(ColorPicker.cvs.TargetR"; -__ref._colorpicker /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .ClearRect(__ref._colorpicker /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect()); -RDebugUtils.currentLine=46858246; - //BA.debugLineNum = 46858246;BA.debugLine="ColorPicker.cvs.DrawCircle(selectedS * ColorPicke"; -__ref._colorpicker /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawCircle((float) (__ref._selecteds /*float*/ *__ref._colorpicker /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()),(float) (__ref._colorpicker /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()-__ref._selectedv /*float*/ *__ref._colorpicker /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()),(float) (__c.DipToCurrent((int) (10))),__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_White,__c.False,(float) (__c.DipToCurrent((int) (2)))); -RDebugUtils.currentLine=46858248; - //BA.debugLineNum = 46858248;BA.debugLine="ColorPicker.cvs.Invalidate"; -__ref._colorpicker /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Invalidate(); -RDebugUtils.currentLine=46858249; - //BA.debugLineNum = 46858249;BA.debugLine="UpdateBarColor"; -__ref._updatebarcolor /*String*/ (null); -RDebugUtils.currentLine=46858250; - //BA.debugLineNum = 46858250;BA.debugLine="End Sub"; -return ""; -} -public Object[] _colortohsv(keymon.lat.medicomed.b4xcolortemplate __ref,int _clr) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "colortohsv", true)) - {return ((Object[]) Debug.delegate(ba, "colortohsv", new Object[] {_clr}));} +public Object[] _colortohsv(int _clr) throws Exception{ int _a = 0; int _r = 0; int _g = 0; @@ -581,404 +235,413 @@ int _cmin = 0; float _rc = 0f; float _gc = 0f; float _bc = 0f; -RDebugUtils.currentLine=47185920; - //BA.debugLineNum = 47185920;BA.debugLine="Public Sub ColorToHSV(clr As Int) As Object()"; -RDebugUtils.currentLine=47185921; - //BA.debugLineNum = 47185921;BA.debugLine="Dim a As Int = Bit.And(0xff, Bit.UnsignedShiftRig"; + //BA.debugLineNum = 199;BA.debugLine="Public Sub ColorToHSV(clr As Int) As Object()"; + //BA.debugLineNum = 200;BA.debugLine="Dim a As Int = Bit.And(0xff, Bit.UnsignedShiftRig"; _a = __c.Bit.And(((int)0xff),__c.Bit.UnsignedShiftRight(_clr,(int) (24))); -RDebugUtils.currentLine=47185922; - //BA.debugLineNum = 47185922;BA.debugLine="Dim r As Int = Bit.And(0xff, Bit.UnsignedShiftRig"; + //BA.debugLineNum = 201;BA.debugLine="Dim r As Int = Bit.And(0xff, Bit.UnsignedShiftRig"; _r = __c.Bit.And(((int)0xff),__c.Bit.UnsignedShiftRight(_clr,(int) (16))); -RDebugUtils.currentLine=47185923; - //BA.debugLineNum = 47185923;BA.debugLine="Dim g As Int = Bit.And(0xff, Bit.UnsignedShiftRig"; + //BA.debugLineNum = 202;BA.debugLine="Dim g As Int = Bit.And(0xff, Bit.UnsignedShiftRig"; _g = __c.Bit.And(((int)0xff),__c.Bit.UnsignedShiftRight(_clr,(int) (8))); -RDebugUtils.currentLine=47185924; - //BA.debugLineNum = 47185924;BA.debugLine="Dim b As Int = Bit.And(0xff, Bit.UnsignedShiftRig"; + //BA.debugLineNum = 203;BA.debugLine="Dim b As Int = Bit.And(0xff, Bit.UnsignedShiftRig"; _b = __c.Bit.And(((int)0xff),__c.Bit.UnsignedShiftRight(_clr,(int) (0))); -RDebugUtils.currentLine=47185925; - //BA.debugLineNum = 47185925;BA.debugLine="Dim h, s, v As Float"; + //BA.debugLineNum = 204;BA.debugLine="Dim h, s, v As Float"; _h = 0f; _s = 0f; _v = 0f; -RDebugUtils.currentLine=47185926; - //BA.debugLineNum = 47185926;BA.debugLine="Dim cmax As Int = Max(Max(r, g), b)"; + //BA.debugLineNum = 205;BA.debugLine="Dim cmax As Int = Max(Max(r, g), b)"; _cmax = (int) (__c.Max(__c.Max(_r,_g),_b)); -RDebugUtils.currentLine=47185927; - //BA.debugLineNum = 47185927;BA.debugLine="Dim cmin As Int = Min(Min(r, g), b)"; + //BA.debugLineNum = 206;BA.debugLine="Dim cmin As Int = Min(Min(r, g), b)"; _cmin = (int) (__c.Min(__c.Min(_r,_g),_b)); -RDebugUtils.currentLine=47185928; - //BA.debugLineNum = 47185928;BA.debugLine="v = cmax / 255"; + //BA.debugLineNum = 207;BA.debugLine="v = cmax / 255"; _v = (float) (_cmax/(double)255); -RDebugUtils.currentLine=47185929; - //BA.debugLineNum = 47185929;BA.debugLine="If cmax <> 0 Then"; + //BA.debugLineNum = 208;BA.debugLine="If cmax <> 0 Then"; if (_cmax!=0) { -RDebugUtils.currentLine=47185930; - //BA.debugLineNum = 47185930;BA.debugLine="s = (cmax - cmin) / cmax"; + //BA.debugLineNum = 209;BA.debugLine="s = (cmax - cmin) / cmax"; _s = (float) ((_cmax-_cmin)/(double)_cmax); }; -RDebugUtils.currentLine=47185932; - //BA.debugLineNum = 47185932;BA.debugLine="If s = 0 Then"; + //BA.debugLineNum = 211;BA.debugLine="If s = 0 Then"; if (_s==0) { -RDebugUtils.currentLine=47185933; - //BA.debugLineNum = 47185933;BA.debugLine="h = 0"; + //BA.debugLineNum = 212;BA.debugLine="h = 0"; _h = (float) (0); }else { -RDebugUtils.currentLine=47185935; - //BA.debugLineNum = 47185935;BA.debugLine="Dim rc As Float = (cmax - r) / (cmax - cmin)"; + //BA.debugLineNum = 214;BA.debugLine="Dim rc As Float = (cmax - r) / (cmax - cmin)"; _rc = (float) ((_cmax-_r)/(double)(_cmax-_cmin)); -RDebugUtils.currentLine=47185936; - //BA.debugLineNum = 47185936;BA.debugLine="Dim gc As Float = (cmax - g) / (cmax - cmin)"; + //BA.debugLineNum = 215;BA.debugLine="Dim gc As Float = (cmax - g) / (cmax - cmin)"; _gc = (float) ((_cmax-_g)/(double)(_cmax-_cmin)); -RDebugUtils.currentLine=47185937; - //BA.debugLineNum = 47185937;BA.debugLine="Dim bc As Float = (cmax - b) / (cmax - cmin)"; + //BA.debugLineNum = 216;BA.debugLine="Dim bc As Float = (cmax - b) / (cmax - cmin)"; _bc = (float) ((_cmax-_b)/(double)(_cmax-_cmin)); -RDebugUtils.currentLine=47185938; - //BA.debugLineNum = 47185938;BA.debugLine="If r = cmax Then"; + //BA.debugLineNum = 217;BA.debugLine="If r = cmax Then"; if (_r==_cmax) { -RDebugUtils.currentLine=47185939; - //BA.debugLineNum = 47185939;BA.debugLine="h = bc - gc"; + //BA.debugLineNum = 218;BA.debugLine="h = bc - gc"; _h = (float) (_bc-_gc); - }else -{RDebugUtils.currentLine=47185940; - //BA.debugLineNum = 47185940;BA.debugLine="Else If g = cmax Then"; -if (_g==_cmax) { -RDebugUtils.currentLine=47185941; - //BA.debugLineNum = 47185941;BA.debugLine="h = 2 + rc - bc"; + }else if(_g==_cmax) { + //BA.debugLineNum = 220;BA.debugLine="h = 2 + rc - bc"; _h = (float) (2+_rc-_bc); }else { -RDebugUtils.currentLine=47185943; - //BA.debugLineNum = 47185943;BA.debugLine="h = 4 + gc - rc"; + //BA.debugLineNum = 222;BA.debugLine="h = 4 + gc - rc"; _h = (float) (4+_gc-_rc); - }} -; -RDebugUtils.currentLine=47185945; - //BA.debugLineNum = 47185945;BA.debugLine="h = h / 6"; + }; + //BA.debugLineNum = 224;BA.debugLine="h = h / 6"; _h = (float) (_h/(double)6); -RDebugUtils.currentLine=47185946; - //BA.debugLineNum = 47185946;BA.debugLine="If h < 0 Then h = h + 1"; + //BA.debugLineNum = 225;BA.debugLine="If h < 0 Then h = h + 1"; if (_h<0) { _h = (float) (_h+1);}; }; -RDebugUtils.currentLine=47185948; - //BA.debugLineNum = 47185948;BA.debugLine="Return Array (h * 360, s, v, a)"; + //BA.debugLineNum = 227;BA.debugLine="Return Array (h * 360, s, v, a)"; if (true) return new Object[]{(Object)(_h*360),(Object)(_s),(Object)(_v),(Object)(_a)}; -RDebugUtils.currentLine=47185949; - //BA.debugLineNum = 47185949;BA.debugLine="End Sub"; + //BA.debugLineNum = 228;BA.debugLine="End Sub"; return null; } -public keymon.lat.medicomed.b4xcolortemplate._colorpickerpart _createpanelforbitmapcreator(keymon.lat.medicomed.b4xcolortemplate __ref,String _eventname,boolean _withcheckers) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "createpanelforbitmapcreator", true)) - {return ((keymon.lat.medicomed.b4xcolortemplate._colorpickerpart) Debug.delegate(ba, "createpanelforbitmapcreator", new Object[] {_eventname,_withcheckers}));} +public keymon.lat.medicomed.b4xcolortemplate._colorpickerpart _createpanelforbitmapcreator(String _eventname,boolean _withcheckers) throws Exception{ keymon.lat.medicomed.b4xcolortemplate._colorpickerpart _cpp = null; anywheresoftware.b4a.objects.ImageViewWrapper _iv = null; anywheresoftware.b4a.objects.B4XViewWrapper _overlay = null; -RDebugUtils.currentLine=46268416; - //BA.debugLineNum = 46268416;BA.debugLine="Private Sub CreatePanelForBitmapCreator (EventName"; -RDebugUtils.currentLine=46268417; - //BA.debugLineNum = 46268417;BA.debugLine="Dim cpp As ColorPickerPart"; + //BA.debugLineNum = 30;BA.debugLine="Private Sub CreatePanelForBitmapCreator (EventName"; + //BA.debugLineNum = 31;BA.debugLine="Dim cpp As ColorPickerPart"; _cpp = new keymon.lat.medicomed.b4xcolortemplate._colorpickerpart(); -RDebugUtils.currentLine=46268418; - //BA.debugLineNum = 46268418;BA.debugLine="cpp.Initialize"; + //BA.debugLineNum = 32;BA.debugLine="cpp.Initialize"; _cpp.Initialize(); -RDebugUtils.currentLine=46268419; - //BA.debugLineNum = 46268419;BA.debugLine="cpp.pnl = xui.CreatePanel(\"\")"; -_cpp.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,""); -RDebugUtils.currentLine=46268420; - //BA.debugLineNum = 46268420;BA.debugLine="cpp.pnl.SetColorAndBorder(BordersColor, 1dip, Bor"; -_cpp.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetColorAndBorder(__ref._borderscolor /*int*/ ,__c.DipToCurrent((int) (1)),__ref._borderscolor /*int*/ ,(int) (0)); -RDebugUtils.currentLine=46268421; - //BA.debugLineNum = 46268421;BA.debugLine="cpp.pnl.SetLayoutAnimated(0, 1dip, 1dip, 1dip, 1d"; + //BA.debugLineNum = 33;BA.debugLine="cpp.pnl = xui.CreatePanel(\"\")"; +_cpp.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = _xui.CreatePanel(ba,""); + //BA.debugLineNum = 34;BA.debugLine="cpp.pnl.SetColorAndBorder(BordersColor, 1dip, Bor"; +_cpp.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetColorAndBorder(_borderscolor,__c.DipToCurrent((int) (1)),_borderscolor,(int) (0)); + //BA.debugLineNum = 35;BA.debugLine="cpp.pnl.SetLayoutAnimated(0, 1dip, 1dip, 1dip, 1d"; _cpp.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),__c.DipToCurrent((int) (1)),__c.DipToCurrent((int) (1)),__c.DipToCurrent((int) (1)),__c.DipToCurrent((int) (1))); -RDebugUtils.currentLine=46268422; - //BA.debugLineNum = 46268422;BA.debugLine="If WithCheckers Then"; + //BA.debugLineNum = 36;BA.debugLine="If WithCheckers Then"; if (_withcheckers) { -RDebugUtils.currentLine=46268423; - //BA.debugLineNum = 46268423;BA.debugLine="cpp.checkersCanvas.Initialize(cpp.pnl)"; + //BA.debugLineNum = 37;BA.debugLine="cpp.checkersCanvas.Initialize(cpp.pnl)"; _cpp.checkersCanvas /*anywheresoftware.b4a.objects.B4XCanvas*/ .Initialize(_cpp.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ); -RDebugUtils.currentLine=46268424; - //BA.debugLineNum = 46268424;BA.debugLine="cpp.DrawCheckers = True"; + //BA.debugLineNum = 38;BA.debugLine="cpp.DrawCheckers = True"; _cpp.DrawCheckers /*boolean*/ = __c.True; }; -RDebugUtils.currentLine=46268426; - //BA.debugLineNum = 46268426;BA.debugLine="Dim iv As ImageView"; + //BA.debugLineNum = 40;BA.debugLine="Dim iv As ImageView"; _iv = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=46268427; - //BA.debugLineNum = 46268427;BA.debugLine="iv.Initialize(\"\")"; + //BA.debugLineNum = 41;BA.debugLine="iv.Initialize(\"\")"; _iv.Initialize(ba,""); -RDebugUtils.currentLine=46268428; - //BA.debugLineNum = 46268428;BA.debugLine="cpp.iv = iv"; + //BA.debugLineNum = 42;BA.debugLine="cpp.iv = iv"; _cpp.iv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_iv.getObject())); -RDebugUtils.currentLine=46268429; - //BA.debugLineNum = 46268429;BA.debugLine="Dim overlay As B4XView = xui.CreatePanel(EventNam"; + //BA.debugLineNum = 43;BA.debugLine="Dim overlay As B4XView = xui.CreatePanel(EventNam"; _overlay = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_overlay = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,_eventname); -RDebugUtils.currentLine=46268430; - //BA.debugLineNum = 46268430;BA.debugLine="cpp.pnl.AddView(iv, 0, 0, 0, 0)"; +_overlay = _xui.CreatePanel(ba,_eventname); + //BA.debugLineNum = 44;BA.debugLine="cpp.pnl.AddView(iv, 0, 0, 0, 0)"; _cpp.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(_iv.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=46268431; - //BA.debugLineNum = 46268431;BA.debugLine="cpp.pnl.AddView(overlay, 1dip, 1dip, 1dip, 1dip)"; + //BA.debugLineNum = 45;BA.debugLine="cpp.pnl.AddView(overlay, 1dip, 1dip, 1dip, 1dip)"; _cpp.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(_overlay.getObject()),__c.DipToCurrent((int) (1)),__c.DipToCurrent((int) (1)),__c.DipToCurrent((int) (1)),__c.DipToCurrent((int) (1))); -RDebugUtils.currentLine=46268432; - //BA.debugLineNum = 46268432;BA.debugLine="cpp.cvs.Initialize(overlay)"; + //BA.debugLineNum = 46;BA.debugLine="cpp.cvs.Initialize(overlay)"; _cpp.cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Initialize(_overlay); -RDebugUtils.currentLine=46268433; - //BA.debugLineNum = 46268433;BA.debugLine="mBase.AddView(cpp.pnl, 0, 0, 0, 0)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(_cpp.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=46268434; - //BA.debugLineNum = 46268434;BA.debugLine="Return cpp"; + //BA.debugLineNum = 47;BA.debugLine="mBase.AddView(cpp.pnl, 0, 0, 0, 0)"; +_mbase.AddView((android.view.View)(_cpp.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 48;BA.debugLine="Return cpp"; if (true) return _cpp; -RDebugUtils.currentLine=46268435; - //BA.debugLineNum = 46268435;BA.debugLine="End Sub"; + //BA.debugLineNum = 49;BA.debugLine="End Sub"; return null; } -public String _dialogclosed(keymon.lat.medicomed.b4xcolortemplate __ref,int _result) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "dialogclosed", true)) - {return ((String) Debug.delegate(ba, "dialogclosed", new Object[] {_result}));} -RDebugUtils.currentLine=47382528; - //BA.debugLineNum = 47382528;BA.debugLine="Private Sub DialogClosed(Result As Int)"; -RDebugUtils.currentLine=47382529; - //BA.debugLineNum = 47382529;BA.debugLine="If Result <> xui.DialogResponse_Positive Then"; -if (_result!=__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .DialogResponse_Positive) { -RDebugUtils.currentLine=47382530; - //BA.debugLineNum = 47382530;BA.debugLine="setSelectedHSVColor(InitialColor)"; -__ref._setselectedhsvcolor /*String*/ (null,__ref._initialcolor /*Object[]*/ ); +public String _dialogclosed(int _result) throws Exception{ + //BA.debugLineNum = 241;BA.debugLine="Private Sub DialogClosed(Result As Int)"; + //BA.debugLineNum = 242;BA.debugLine="If Result <> xui.DialogResponse_Positive Then"; +if (_result!=_xui.DialogResponse_Positive) { + //BA.debugLineNum = 243;BA.debugLine="setSelectedHSVColor(InitialColor)"; +_setselectedhsvcolor(_initialcolor); }; -RDebugUtils.currentLine=47382532; - //BA.debugLineNum = 47382532;BA.debugLine="End Sub"; + //BA.debugLineNum = 245;BA.debugLine="End Sub"; return ""; } -public String _setselectedhsvcolor(keymon.lat.medicomed.b4xcolortemplate __ref,Object[] _hsv) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "setselectedhsvcolor", true)) - {return ((String) Debug.delegate(ba, "setselectedhsvcolor", new Object[] {_hsv}));} -RDebugUtils.currentLine=47120384; - //BA.debugLineNum = 47120384;BA.debugLine="Public Sub setSelectedHSVColor (HSV() As Object)"; -RDebugUtils.currentLine=47120385; - //BA.debugLineNum = 47120385;BA.debugLine="selectedH = HSV(0)"; -__ref._selectedh /*float*/ = (float)(BA.ObjectToNumber(_hsv[(int) (0)])); -RDebugUtils.currentLine=47120386; - //BA.debugLineNum = 47120386;BA.debugLine="selectedS = HSV(1)"; -__ref._selecteds /*float*/ = (float)(BA.ObjectToNumber(_hsv[(int) (1)])); -RDebugUtils.currentLine=47120387; - //BA.debugLineNum = 47120387;BA.debugLine="selectedV = HSV(2)"; -__ref._selectedv /*float*/ = (float)(BA.ObjectToNumber(_hsv[(int) (2)])); -RDebugUtils.currentLine=47120388; - //BA.debugLineNum = 47120388;BA.debugLine="SelectedAlpha = HSV(3)"; -__ref._selectedalpha /*int*/ = (int)(BA.ObjectToNumber(_hsv[(int) (3)])); -RDebugUtils.currentLine=47120389; - //BA.debugLineNum = 47120389;BA.debugLine="HueBarSelectedChanged(selectedH / 360 * HueBar.pn"; -__ref._huebarselectedchanged /*String*/ (null,(float) (__ref._selectedh /*float*/ /(double)360*__ref._huebar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight())); -RDebugUtils.currentLine=47120390; - //BA.debugLineNum = 47120390;BA.debugLine="AlphaBarSelectedChange(SelectedAlpha / 255 * Alph"; -__ref._alphabarselectedchange /*String*/ (null,(float) (__ref._selectedalpha /*int*/ /(double)255*__ref._alphabar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth())); -RDebugUtils.currentLine=47120391; - //BA.debugLineNum = 47120391;BA.debugLine="End Sub"; +public String _drawalphabar() throws Exception{ +b4a.example.bitmapcreator _bc = null; +b4a.example.bitmapcreator._argbcolor _argb = null; +int _y = 0; +int _x = 0; + //BA.debugLineNum = 109;BA.debugLine="Private Sub DrawAlphaBar"; + //BA.debugLineNum = 110;BA.debugLine="Dim bc As BitmapCreator"; +_bc = new b4a.example.bitmapcreator(); + //BA.debugLineNum = 111;BA.debugLine="bc.Initialize(AlphaBar.pnl.Width / DeviceScale, A"; +_bc._initialize(ba,(int) (_alphabar.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)_devicescale),(int) (_alphabar.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()/(double)_devicescale)); + //BA.debugLineNum = 112;BA.debugLine="Dim argb As ARGBColor"; +_argb = new b4a.example.bitmapcreator._argbcolor(); + //BA.debugLineNum = 113;BA.debugLine="argb.r = 0xcc"; +_argb.r = ((int)0xcc); + //BA.debugLineNum = 114;BA.debugLine="argb.g = 0xcc"; +_argb.g = ((int)0xcc); + //BA.debugLineNum = 115;BA.debugLine="argb.b = 0xcc"; +_argb.b = ((int)0xcc); + //BA.debugLineNum = 117;BA.debugLine="For y = 0 To bc.mHeight - 1"; +{ +final int step7 = 1; +final int limit7 = (int) (_bc._mheight-1); +_y = (int) (0) ; +for (;_y <= limit7 ;_y = _y + step7 ) { + //BA.debugLineNum = 118;BA.debugLine="For x = 0 To bc.mWidth - 1"; +{ +final int step8 = 1; +final int limit8 = (int) (_bc._mwidth-1); +_x = (int) (0) ; +for (;_x <= limit8 ;_x = _x + step8 ) { + //BA.debugLineNum = 119;BA.debugLine="argb.a = x / bc.mWidth * 255"; +_argb.a = (int) (_x/(double)_bc._mwidth*255); + //BA.debugLineNum = 120;BA.debugLine="bc.SetARGB(x, y, argb)"; +_bc._setargb(_x,_y,_argb); + } +}; + } +}; + //BA.debugLineNum = 123;BA.debugLine="AlphaBar.iv.SetBitmap(bc.Bitmap)"; +_alphabar.iv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetBitmap((android.graphics.Bitmap)(_bc._getbitmap().getObject())); + //BA.debugLineNum = 124;BA.debugLine="End Sub"; return ""; } -public String _drawcolors(keymon.lat.medicomed.b4xcolortemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "drawcolors", true)) - {return ((String) Debug.delegate(ba, "drawcolors", null));} +public String _drawcheckers(keymon.lat.medicomed.b4xcolortemplate._colorpickerpart _cpp) throws Exception{ +int _size = 0; +int[] _clrs = null; +int _clr = 0; +anywheresoftware.b4a.objects.B4XCanvas.B4XRect _r = null; +int _x = 0; +int _xx = 0; +int _y = 0; + //BA.debugLineNum = 79;BA.debugLine="Private Sub DrawCheckers (cpp As ColorPickerPart)"; + //BA.debugLineNum = 80;BA.debugLine="cpp.checkersCanvas.Resize(cpp.pnl.Width, cpp.pnl."; +_cpp.checkersCanvas /*anywheresoftware.b4a.objects.B4XCanvas*/ .Resize((float) (_cpp.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()),(float) (_cpp.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight())); + //BA.debugLineNum = 81;BA.debugLine="cpp.checkersCanvas.ClearRect(cpp.checkersCanvas.T"; +_cpp.checkersCanvas /*anywheresoftware.b4a.objects.B4XCanvas*/ .ClearRect(_cpp.checkersCanvas /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect()); + //BA.debugLineNum = 82;BA.debugLine="Dim size As Int = 10dip"; +_size = __c.DipToCurrent((int) (10)); + //BA.debugLineNum = 83;BA.debugLine="Dim clrs() As Int = Array As Int(0xFFC0C0C0, 0xFF"; +_clrs = new int[]{((int)0xffc0c0c0),((int)0xff757575)}; + //BA.debugLineNum = 84;BA.debugLine="Dim clr As Int = 0"; +_clr = (int) (0); + //BA.debugLineNum = 85;BA.debugLine="Dim r As B4XRect"; +_r = new anywheresoftware.b4a.objects.B4XCanvas.B4XRect(); + //BA.debugLineNum = 86;BA.debugLine="For x = 0 To cpp.checkersCanvas.TargetRect.Right"; +{ +final int step7 = _size; +final int limit7 = (int) (_cpp.checkersCanvas /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getRight()-__c.DipToCurrent((int) (1))); +_x = (int) (0) ; +for (;(step7 > 0 && _x <= limit7) || (step7 < 0 && _x >= limit7) ;_x = ((int)(0 + _x + step7)) ) { + //BA.debugLineNum = 87;BA.debugLine="Dim xx As Int = x / size"; +_xx = (int) (_x/(double)_size); + //BA.debugLineNum = 88;BA.debugLine="clr = xx Mod 2"; +_clr = (int) (_xx%2); + //BA.debugLineNum = 89;BA.debugLine="For y = 0 To cpp.checkersCanvas.TargetRect.Botto"; +{ +final int step10 = _size; +final int limit10 = (int) (_cpp.checkersCanvas /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getBottom()-__c.DipToCurrent((int) (1))); +_y = (int) (0) ; +for (;(step10 > 0 && _y <= limit10) || (step10 < 0 && _y >= limit10) ;_y = ((int)(0 + _y + step10)) ) { + //BA.debugLineNum = 90;BA.debugLine="clr = (clr + 1) Mod 2"; +_clr = (int) ((_clr+1)%2); + //BA.debugLineNum = 91;BA.debugLine="r.Initialize(x, y, x + size, y + size)"; +_r.Initialize((float) (_x),(float) (_y),(float) (_x+_size),(float) (_y+_size)); + //BA.debugLineNum = 92;BA.debugLine="cpp.checkersCanvas.DrawRect(r, clrs(clr), True,"; +_cpp.checkersCanvas /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawRect(_r,_clrs[_clr],__c.True,(float) (0)); + } +}; + } +}; + //BA.debugLineNum = 95;BA.debugLine="cpp.checkersCanvas.Invalidate"; +_cpp.checkersCanvas /*anywheresoftware.b4a.objects.B4XCanvas*/ .Invalidate(); + //BA.debugLineNum = 96;BA.debugLine="End Sub"; +return ""; +} +public String _drawcolors() throws Exception{ int _x = 0; int _y = 0; -RDebugUtils.currentLine=46596096; - //BA.debugLineNum = 46596096;BA.debugLine="Private Sub DrawColors"; -RDebugUtils.currentLine=46596097; - //BA.debugLineNum = 46596097;BA.debugLine="For x = 0 To bcColors.mWidth - 1"; + //BA.debugLineNum = 126;BA.debugLine="Private Sub DrawColors"; + //BA.debugLineNum = 127;BA.debugLine="For x = 0 To bcColors.mWidth - 1"; { final int step1 = 1; -final int limit1 = (int) (__ref._bccolors /*b4a.example.bitmapcreator*/ ._mwidth-1); +final int limit1 = (int) (_bccolors._mwidth-1); _x = (int) (0) ; for (;_x <= limit1 ;_x = _x + step1 ) { -RDebugUtils.currentLine=46596098; - //BA.debugLineNum = 46596098;BA.debugLine="For y = 0 To bcColors.mHeight - 1"; + //BA.debugLineNum = 128;BA.debugLine="For y = 0 To bcColors.mHeight - 1"; { final int step2 = 1; -final int limit2 = (int) (__ref._bccolors /*b4a.example.bitmapcreator*/ ._mheight-1); +final int limit2 = (int) (_bccolors._mheight-1); _y = (int) (0) ; for (;_y <= limit2 ;_y = _y + step2 ) { -RDebugUtils.currentLine=46596099; - //BA.debugLineNum = 46596099;BA.debugLine="bcColors.SetHSV(x, y, SelectedAlpha, selectedH,"; -__ref._bccolors /*b4a.example.bitmapcreator*/ ._sethsv(_x,_y,__ref._selectedalpha /*int*/ ,(int) (__ref._selectedh /*float*/ ),(float) (_x/(double)__ref._bccolors /*b4a.example.bitmapcreator*/ ._mwidth),(float) ((__ref._bccolors /*b4a.example.bitmapcreator*/ ._mheight-_y)/(double)__ref._bccolors /*b4a.example.bitmapcreator*/ ._mheight)); + //BA.debugLineNum = 129;BA.debugLine="bcColors.SetHSV(x, y, SelectedAlpha, selectedH,"; +_bccolors._sethsv(_x,_y,_selectedalpha,(int) (_selectedh),(float) (_x/(double)_bccolors._mwidth),(float) ((_bccolors._mheight-_y)/(double)_bccolors._mheight)); } }; } }; -RDebugUtils.currentLine=46596103; - //BA.debugLineNum = 46596103;BA.debugLine="ColorPicker.iv.SetBitmap(bcColors.Bitmap.Resize(C"; -__ref._colorpicker /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .iv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetBitmap((android.graphics.Bitmap)(__ref._bccolors /*b4a.example.bitmapcreator*/ ._getbitmap().Resize(__ref._colorpicker /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .iv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._colorpicker /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ .iv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight(),__c.False).getObject())); -RDebugUtils.currentLine=46596104; - //BA.debugLineNum = 46596104;BA.debugLine="End Sub"; + //BA.debugLineNum = 133;BA.debugLine="ColorPicker.iv.SetBitmap(bcColors.Bitmap.Resize(C"; +_colorpicker.iv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetBitmap((android.graphics.Bitmap)(_bccolors._getbitmap().Resize(_colorpicker.iv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),_colorpicker.iv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight(),__c.False).getObject())); + //BA.debugLineNum = 134;BA.debugLine="End Sub"; return ""; } -public anywheresoftware.b4a.objects.B4XViewWrapper _getpanel(keymon.lat.medicomed.b4xcolortemplate __ref,keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "getpanel", true)) - {return ((anywheresoftware.b4a.objects.B4XViewWrapper) Debug.delegate(ba, "getpanel", new Object[] {_dialog}));} -RDebugUtils.currentLine=47251456; - //BA.debugLineNum = 47251456;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; -RDebugUtils.currentLine=47251457; - //BA.debugLineNum = 47251457;BA.debugLine="Return mBase"; -if (true) return __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ; -RDebugUtils.currentLine=47251458; - //BA.debugLineNum = 47251458;BA.debugLine="End Sub"; +public String _drawhuebar() throws Exception{ +b4a.example.bitmapcreator _bchue = null; +int _y = 0; +int _x = 0; + //BA.debugLineNum = 98;BA.debugLine="Private Sub DrawHueBar"; + //BA.debugLineNum = 99;BA.debugLine="Dim bcHue As BitmapCreator"; +_bchue = new b4a.example.bitmapcreator(); + //BA.debugLineNum = 100;BA.debugLine="bcHue.Initialize(HueBar.pnl.Width / DeviceScale,"; +_bchue._initialize(ba,(int) (_huebar.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)_devicescale),(int) (_huebar.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()/(double)_devicescale)); + //BA.debugLineNum = 101;BA.debugLine="For y = 0 To bcHue.mHeight - 1"; +{ +final int step3 = 1; +final int limit3 = (int) (_bchue._mheight-1); +_y = (int) (0) ; +for (;_y <= limit3 ;_y = _y + step3 ) { + //BA.debugLineNum = 102;BA.debugLine="For x = 0 To bcHue.mWidth - 1"; +{ +final int step4 = 1; +final int limit4 = (int) (_bchue._mwidth-1); +_x = (int) (0) ; +for (;_x <= limit4 ;_x = _x + step4 ) { + //BA.debugLineNum = 103;BA.debugLine="bcHue.SetHSV(x, y, 255, 360 / bcHue.mHeight * y"; +_bchue._sethsv(_x,_y,(int) (255),(int) (360/(double)_bchue._mheight*_y),(float) (1),(float) (1)); + } +}; + } +}; + //BA.debugLineNum = 106;BA.debugLine="HueBar.iv.SetBitmap(bcHue.Bitmap)"; +_huebar.iv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetBitmap((android.graphics.Bitmap)(_bchue._getbitmap().getObject())); + //BA.debugLineNum = 107;BA.debugLine="End Sub"; +return ""; +} +public anywheresoftware.b4a.objects.B4XViewWrapper _getpanel(keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ + //BA.debugLineNum = 230;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; + //BA.debugLineNum = 231;BA.debugLine="Return mBase"; +if (true) return _mbase; + //BA.debugLineNum = 232;BA.debugLine="End Sub"; return null; } -public int _getselectedcolor(keymon.lat.medicomed.b4xcolortemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "getselectedcolor", true)) - {return ((Integer) Debug.delegate(ba, "getselectedcolor", null));} +public int _getselectedcolor() throws Exception{ Object[] _hsv = null; -RDebugUtils.currentLine=46923776; - //BA.debugLineNum = 46923776;BA.debugLine="Public Sub getSelectedColor As Int"; -RDebugUtils.currentLine=46923777; - //BA.debugLineNum = 46923777;BA.debugLine="Dim hsv() As Object = getSelectedHSVColor"; -_hsv = __ref._getselectedhsvcolor /*Object[]*/ (null); -RDebugUtils.currentLine=46923778; - //BA.debugLineNum = 46923778;BA.debugLine="tempBC.SetHSV(0, 0, SelectedAlpha, hsv(0), hsv(1)"; -__ref._tempbc /*b4a.example.bitmapcreator*/ ._sethsv((int) (0),(int) (0),__ref._selectedalpha /*int*/ ,(int)(BA.ObjectToNumber(_hsv[(int) (0)])),(float)(BA.ObjectToNumber(_hsv[(int) (1)])),(float)(BA.ObjectToNumber(_hsv[(int) (2)]))); -RDebugUtils.currentLine=46923779; - //BA.debugLineNum = 46923779;BA.debugLine="Return tempBC.GetColor(0, 0)"; -if (true) return __ref._tempbc /*b4a.example.bitmapcreator*/ ._getcolor((int) (0),(int) (0)); -RDebugUtils.currentLine=46923780; - //BA.debugLineNum = 46923780;BA.debugLine="End Sub"; + //BA.debugLineNum = 175;BA.debugLine="Public Sub getSelectedColor As Int"; + //BA.debugLineNum = 176;BA.debugLine="Dim hsv() As Object = getSelectedHSVColor"; +_hsv = _getselectedhsvcolor(); + //BA.debugLineNum = 177;BA.debugLine="tempBC.SetHSV(0, 0, SelectedAlpha, hsv(0), hsv(1)"; +_tempbc._sethsv((int) (0),(int) (0),_selectedalpha,(int)(BA.ObjectToNumber(_hsv[(int) (0)])),(float)(BA.ObjectToNumber(_hsv[(int) (1)])),(float)(BA.ObjectToNumber(_hsv[(int) (2)]))); + //BA.debugLineNum = 178;BA.debugLine="Return tempBC.GetColor(0, 0)"; +if (true) return _tempbc._getcolor((int) (0),(int) (0)); + //BA.debugLineNum = 179;BA.debugLine="End Sub"; return 0; } -public Object[] _getselectedhsvcolor(keymon.lat.medicomed.b4xcolortemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "getselectedhsvcolor", true)) - {return ((Object[]) Debug.delegate(ba, "getselectedhsvcolor", null));} -RDebugUtils.currentLine=47054848; - //BA.debugLineNum = 47054848;BA.debugLine="Public Sub getSelectedHSVColor As Object()"; -RDebugUtils.currentLine=47054849; - //BA.debugLineNum = 47054849;BA.debugLine="Return Array (selectedH, selectedS, selectedV, Se"; -if (true) return new Object[]{(Object)(__ref._selectedh /*float*/ ),(Object)(__ref._selecteds /*float*/ ),(Object)(__ref._selectedv /*float*/ ),(Object)(__ref._selectedalpha /*int*/ )}; -RDebugUtils.currentLine=47054850; - //BA.debugLineNum = 47054850;BA.debugLine="End Sub"; +public Object[] _getselectedhsvcolor() throws Exception{ + //BA.debugLineNum = 186;BA.debugLine="Public Sub getSelectedHSVColor As Object()"; + //BA.debugLineNum = 187;BA.debugLine="Return Array (selectedH, selectedS, selectedV, Se"; +if (true) return new Object[]{(Object)(_selectedh),(Object)(_selecteds),(Object)(_selectedv),(Object)(_selectedalpha)}; + //BA.debugLineNum = 188;BA.debugLine="End Sub"; return null; } -public String _updatebarcolor(keymon.lat.medicomed.b4xcolortemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "updatebarcolor", true)) - {return ((String) Debug.delegate(ba, "updatebarcolor", null));} -RDebugUtils.currentLine=47448064; - //BA.debugLineNum = 47448064;BA.debugLine="Private Sub UpdateBarColor"; -RDebugUtils.currentLine=47448065; - //BA.debugLineNum = 47448065;BA.debugLine="If xDialog.IsInitialized And xDialog.TitleBar.IsI"; -if (__ref._xdialog /*keymon.lat.medicomed.b4xdialog*/ .IsInitialized /*boolean*/ () && __ref._xdialog /*keymon.lat.medicomed.b4xdialog*/ ._titlebar /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .IsInitialized()) { -RDebugUtils.currentLine=47448066; - //BA.debugLineNum = 47448066;BA.debugLine="xDialog.TitleBar.Color = getSelectedColor"; -__ref._xdialog /*keymon.lat.medicomed.b4xdialog*/ ._titlebar /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setColor(__ref._getselectedcolor /*int*/ (null)); +public String _handleselectedcolorchanged(int _x,int _y) throws Exception{ + //BA.debugLineNum = 163;BA.debugLine="Private Sub HandleSelectedColorChanged (x As Int,"; + //BA.debugLineNum = 164;BA.debugLine="If x <> DONT_CHANGE Then"; +if (_x!=_dont_change) { + //BA.debugLineNum = 165;BA.debugLine="selectedS = Max(0, Min(1, x / ColorPicker.pnl.Wi"; +_selecteds = (float) (__c.Max(0,__c.Min(1,_x/(double)_colorpicker.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()))); + //BA.debugLineNum = 166;BA.debugLine="selectedV = Max(0, Min(1, (ColorPicker.pnl.Heigh"; +_selectedv = (float) (__c.Max(0,__c.Min(1,(_colorpicker.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()-_y)/(double)_colorpicker.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()))); }; -RDebugUtils.currentLine=47448068; - //BA.debugLineNum = 47448068;BA.debugLine="End Sub"; + //BA.debugLineNum = 168;BA.debugLine="ColorPicker.cvs.ClearRect(ColorPicker.cvs.TargetR"; +_colorpicker.cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .ClearRect(_colorpicker.cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect()); + //BA.debugLineNum = 169;BA.debugLine="ColorPicker.cvs.DrawCircle(selectedS * ColorPicke"; +_colorpicker.cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawCircle((float) (_selecteds*_colorpicker.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()),(float) (_colorpicker.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()-_selectedv*_colorpicker.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()),(float) (__c.DipToCurrent((int) (10))),_xui.Color_White,__c.False,(float) (__c.DipToCurrent((int) (2)))); + //BA.debugLineNum = 171;BA.debugLine="ColorPicker.cvs.Invalidate"; +_colorpicker.cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Invalidate(); + //BA.debugLineNum = 172;BA.debugLine="UpdateBarColor"; +_updatebarcolor(); + //BA.debugLineNum = 173;BA.debugLine="End Sub"; return ""; } -public String _huebar_touch(keymon.lat.medicomed.b4xcolortemplate __ref,int _action,float _x,float _y) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "huebar_touch", true)) - {return ((String) Debug.delegate(ba, "huebar_touch", new Object[] {_action,_x,_y}));} -RDebugUtils.currentLine=47579136; - //BA.debugLineNum = 47579136;BA.debugLine="Private Sub HueBar_Touch (Action As Int, X As Floa"; -RDebugUtils.currentLine=47579137; - //BA.debugLineNum = 47579137;BA.debugLine="If Action = mBase.TOUCH_ACTION_MOVE_NOTOUCH Then"; -if (_action==__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .TOUCH_ACTION_MOVE_NOTOUCH) { +public String _huebar_touch(int _action,float _x,float _y) throws Exception{ + //BA.debugLineNum = 258;BA.debugLine="Private Sub HueBar_Touch (Action As Int, X As Floa"; + //BA.debugLineNum = 259;BA.debugLine="If Action = mBase.TOUCH_ACTION_MOVE_NOTOUCH Then"; +if (_action==_mbase.TOUCH_ACTION_MOVE_NOTOUCH) { if (true) return "";}; -RDebugUtils.currentLine=47579138; - //BA.debugLineNum = 47579138;BA.debugLine="HueBarSelectedChanged(Y)"; -__ref._huebarselectedchanged /*String*/ (null,_y); -RDebugUtils.currentLine=47579139; - //BA.debugLineNum = 47579139;BA.debugLine="End Sub"; + //BA.debugLineNum = 260;BA.debugLine="HueBarSelectedChanged(Y)"; +_huebarselectedchanged(_y); + //BA.debugLineNum = 261;BA.debugLine="End Sub"; return ""; } -public String _initialize(keymon.lat.medicomed.b4xcolortemplate __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; +public String _huebarselectedchanged(float _y) throws Exception{ +anywheresoftware.b4a.objects.B4XCanvas.B4XRect _r = null; + //BA.debugLineNum = 136;BA.debugLine="Private Sub HueBarSelectedChanged (y As Float)"; + //BA.debugLineNum = 137;BA.debugLine="selectedH = Max(0, Min(360, 360 * y / HueBar.pnl."; +_selectedh = (float) (__c.Max(0,__c.Min(360,360*_y/(double)_huebar.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()))); + //BA.debugLineNum = 138;BA.debugLine="y = selectedH * HueBar.pnl.Height / 360"; +_y = (float) (_selectedh*_huebar.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()/(double)360); + //BA.debugLineNum = 139;BA.debugLine="HueBar.cvs.ClearRect(HueBar.cvs.TargetRect)"; +_huebar.cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .ClearRect(_huebar.cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect()); + //BA.debugLineNum = 140;BA.debugLine="Dim r As B4XRect"; +_r = new anywheresoftware.b4a.objects.B4XCanvas.B4XRect(); + //BA.debugLineNum = 141;BA.debugLine="r.Initialize(0, y - 3dip, HueBar.cvs.TargetRect.R"; +_r.Initialize((float) (0),(float) (_y-__c.DipToCurrent((int) (3))),_huebar.cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getRight(),(float) (_y+__c.DipToCurrent((int) (3)))); + //BA.debugLineNum = 142;BA.debugLine="HueBar.cvs.DrawRect(r, xui.Color_White, False, 2d"; +_huebar.cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawRect(_r,_xui.Color_White,__c.False,(float) (__c.DipToCurrent((int) (2)))); + //BA.debugLineNum = 143;BA.debugLine="HueBar.cvs.Invalidate"; +_huebar.cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Invalidate(); + //BA.debugLineNum = 144;BA.debugLine="Update"; +_update(); + //BA.debugLineNum = 145;BA.debugLine="End Sub"; +return ""; +} +public String _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ innerInitialize(_ba); -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=46202880; - //BA.debugLineNum = 46202880;BA.debugLine="Public Sub Initialize"; -RDebugUtils.currentLine=46202881; - //BA.debugLineNum = 46202881;BA.debugLine="tempBC.Initialize(1, 1)"; -__ref._tempbc /*b4a.example.bitmapcreator*/ ._initialize(ba,(int) (1),(int) (1)); -RDebugUtils.currentLine=46202882; - //BA.debugLineNum = 46202882;BA.debugLine="DeviceScale = 100dip / 100"; -__ref._devicescale /*float*/ = (float) (__c.DipToCurrent((int) (100))/(double)100); -RDebugUtils.currentLine=46202883; - //BA.debugLineNum = 46202883;BA.debugLine="mBase = xui.CreatePanel(\"\")"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,""); -RDebugUtils.currentLine=46202884; - //BA.debugLineNum = 46202884;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, 300dip, 250dip)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),__c.DipToCurrent((int) (300)),__c.DipToCurrent((int) (250))); -RDebugUtils.currentLine=46202885; - //BA.debugLineNum = 46202885;BA.debugLine="BordersColor = xui.Color_Black"; -__ref._borderscolor /*int*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Black; -RDebugUtils.currentLine=46202886; - //BA.debugLineNum = 46202886;BA.debugLine="mBase.SetColorAndBorder(BordersColor, 1dip, Borde"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetColorAndBorder(__ref._borderscolor /*int*/ ,__c.DipToCurrent((int) (1)),__ref._borderscolor /*int*/ ,__c.DipToCurrent((int) (2))); -RDebugUtils.currentLine=46202887; - //BA.debugLineNum = 46202887;BA.debugLine="HueBar = CreatePanelForBitmapCreator(\"hueBar\", Fa"; -__ref._huebar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ = __ref._createpanelforbitmapcreator /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ (null,"hueBar",__c.False); -RDebugUtils.currentLine=46202888; - //BA.debugLineNum = 46202888;BA.debugLine="ColorPicker = CreatePanelForBitmapCreator(\"colors"; -__ref._colorpicker /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ = __ref._createpanelforbitmapcreator /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ (null,"colors",__c.True); -RDebugUtils.currentLine=46202889; - //BA.debugLineNum = 46202889;BA.debugLine="AlphaBar = CreatePanelForBitmapCreator(\"alpha\", T"; -__ref._alphabar /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ = __ref._createpanelforbitmapcreator /*keymon.lat.medicomed.b4xcolortemplate._colorpickerpart*/ (null,"alpha",__c.True); -RDebugUtils.currentLine=46202890; - //BA.debugLineNum = 46202890;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; -__ref._base_resize /*String*/ (null,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=46202891; - //BA.debugLineNum = 46202891;BA.debugLine="End Sub"; + //BA.debugLineNum = 17;BA.debugLine="Public Sub Initialize"; + //BA.debugLineNum = 18;BA.debugLine="tempBC.Initialize(1, 1)"; +_tempbc._initialize(ba,(int) (1),(int) (1)); + //BA.debugLineNum = 19;BA.debugLine="DeviceScale = 100dip / 100"; +_devicescale = (float) (__c.DipToCurrent((int) (100))/(double)100); + //BA.debugLineNum = 20;BA.debugLine="mBase = xui.CreatePanel(\"\")"; +_mbase = _xui.CreatePanel(ba,""); + //BA.debugLineNum = 21;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, 300dip, 250dip)"; +_mbase.SetLayoutAnimated((int) (0),(int) (0),(int) (0),__c.DipToCurrent((int) (300)),__c.DipToCurrent((int) (250))); + //BA.debugLineNum = 22;BA.debugLine="BordersColor = xui.Color_Black"; +_borderscolor = _xui.Color_Black; + //BA.debugLineNum = 23;BA.debugLine="mBase.SetColorAndBorder(BordersColor, 1dip, Borde"; +_mbase.SetColorAndBorder(_borderscolor,__c.DipToCurrent((int) (1)),_borderscolor,__c.DipToCurrent((int) (2))); + //BA.debugLineNum = 24;BA.debugLine="HueBar = CreatePanelForBitmapCreator(\"hueBar\", Fa"; +_huebar = _createpanelforbitmapcreator("hueBar",__c.False); + //BA.debugLineNum = 25;BA.debugLine="ColorPicker = CreatePanelForBitmapCreator(\"colors"; +_colorpicker = _createpanelforbitmapcreator("colors",__c.True); + //BA.debugLineNum = 26;BA.debugLine="AlphaBar = CreatePanelForBitmapCreator(\"alpha\", T"; +_alphabar = _createpanelforbitmapcreator("alpha",__c.True); + //BA.debugLineNum = 27;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; +_base_resize(_mbase.getWidth(),_mbase.getHeight()); + //BA.debugLineNum = 28;BA.debugLine="End Sub"; return ""; } -public String _setselectedcolor(keymon.lat.medicomed.b4xcolortemplate __ref,int _i) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "setselectedcolor", true)) - {return ((String) Debug.delegate(ba, "setselectedcolor", new Object[] {_i}));} -RDebugUtils.currentLine=46989312; - //BA.debugLineNum = 46989312;BA.debugLine="Public Sub setSelectedColor(i As Int)"; -RDebugUtils.currentLine=46989313; - //BA.debugLineNum = 46989313;BA.debugLine="setSelectedHSVColor(ColorToHSV(i))"; -__ref._setselectedhsvcolor /*String*/ (null,__ref._colortohsv /*Object[]*/ (null,_i)); -RDebugUtils.currentLine=46989314; - //BA.debugLineNum = 46989314;BA.debugLine="End Sub"; +public String _setselectedcolor(int _i) throws Exception{ + //BA.debugLineNum = 181;BA.debugLine="Public Sub setSelectedColor(i As Int)"; + //BA.debugLineNum = 182;BA.debugLine="setSelectedHSVColor(ColorToHSV(i))"; +_setselectedhsvcolor(_colortohsv(_i)); + //BA.debugLineNum = 183;BA.debugLine="End Sub"; return ""; } -public void _show(keymon.lat.medicomed.b4xcolortemplate __ref,keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ -RDebugUtils.currentModule="b4xcolortemplate"; -if (Debug.shouldDelegate(ba, "show", true)) - {Debug.delegate(ba, "show", new Object[] {_dialog}); return;} -ResumableSub_Show rsub = new ResumableSub_Show(this,__ref,_dialog); +public String _setselectedhsvcolor(Object[] _hsv) throws Exception{ + //BA.debugLineNum = 190;BA.debugLine="Public Sub setSelectedHSVColor (HSV() As Object)"; + //BA.debugLineNum = 191;BA.debugLine="selectedH = HSV(0)"; +_selectedh = (float)(BA.ObjectToNumber(_hsv[(int) (0)])); + //BA.debugLineNum = 192;BA.debugLine="selectedS = HSV(1)"; +_selecteds = (float)(BA.ObjectToNumber(_hsv[(int) (1)])); + //BA.debugLineNum = 193;BA.debugLine="selectedV = HSV(2)"; +_selectedv = (float)(BA.ObjectToNumber(_hsv[(int) (2)])); + //BA.debugLineNum = 194;BA.debugLine="SelectedAlpha = HSV(3)"; +_selectedalpha = (int)(BA.ObjectToNumber(_hsv[(int) (3)])); + //BA.debugLineNum = 195;BA.debugLine="HueBarSelectedChanged(selectedH / 360 * HueBar.pn"; +_huebarselectedchanged((float) (_selectedh/(double)360*_huebar.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight())); + //BA.debugLineNum = 196;BA.debugLine="AlphaBarSelectedChange(SelectedAlpha / 255 * Alph"; +_alphabarselectedchange((float) (_selectedalpha/(double)255*_alphabar.pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth())); + //BA.debugLineNum = 197;BA.debugLine="End Sub"; +return ""; +} +public void _show(keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ +ResumableSub_Show rsub = new ResumableSub_Show(this,_dialog); rsub.resume(ba, null); } public static class ResumableSub_Show extends BA.ResumableSub { -public ResumableSub_Show(keymon.lat.medicomed.b4xcolortemplate parent,keymon.lat.medicomed.b4xcolortemplate __ref,keymon.lat.medicomed.b4xdialog _dialog) { +public ResumableSub_Show(keymon.lat.medicomed.b4xcolortemplate parent,keymon.lat.medicomed.b4xdialog _dialog) { this.parent = parent; -this.__ref = __ref; this._dialog = _dialog; -this.__ref = parent; } -keymon.lat.medicomed.b4xcolortemplate __ref; keymon.lat.medicomed.b4xcolortemplate parent; keymon.lat.medicomed.b4xdialog _dialog; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="b4xcolortemplate"; while (true) { switch (state) { @@ -988,30 +651,52 @@ return; case 0: //C this.state = -1; -RDebugUtils.currentLine=47316993; - //BA.debugLineNum = 47316993;BA.debugLine="InitialColor = getSelectedHSVColor"; -__ref._initialcolor /*Object[]*/ = __ref._getselectedhsvcolor /*Object[]*/ (null); -RDebugUtils.currentLine=47316994; - //BA.debugLineNum = 47316994;BA.debugLine="xDialog = Dialog"; -__ref._xdialog /*keymon.lat.medicomed.b4xdialog*/ = _dialog; -RDebugUtils.currentLine=47316995; - //BA.debugLineNum = 47316995;BA.debugLine="Sleep(0)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "b4xcolortemplate", "show"),(int) (0)); + //BA.debugLineNum = 235;BA.debugLine="InitialColor = getSelectedHSVColor"; +parent._initialcolor = parent._getselectedhsvcolor(); + //BA.debugLineNum = 236;BA.debugLine="xDialog = Dialog"; +parent._xdialog = _dialog; + //BA.debugLineNum = 237;BA.debugLine="Sleep(0)"; +parent.__c.Sleep(ba,this,(int) (0)); this.state = 1; return; case 1: //C this.state = -1; ; -RDebugUtils.currentLine=47316996; - //BA.debugLineNum = 47316996;BA.debugLine="UpdateBarColor"; -__ref._updatebarcolor /*String*/ (null); -RDebugUtils.currentLine=47316997; - //BA.debugLineNum = 47316997;BA.debugLine="End Sub"; + //BA.debugLineNum = 238;BA.debugLine="UpdateBarColor"; +parent._updatebarcolor(); + //BA.debugLineNum = 239;BA.debugLine="End Sub"; if (true) break; } } } } -} \ No newline at end of file +public String _update() throws Exception{ + //BA.debugLineNum = 158;BA.debugLine="Private Sub Update"; + //BA.debugLineNum = 159;BA.debugLine="DrawColors"; +_drawcolors(); + //BA.debugLineNum = 160;BA.debugLine="HandleSelectedColorChanged(DONT_CHANGE, DONT_CHAN"; +_handleselectedcolorchanged(_dont_change,_dont_change); + //BA.debugLineNum = 161;BA.debugLine="End Sub"; +return ""; +} +public String _updatebarcolor() throws Exception{ + //BA.debugLineNum = 247;BA.debugLine="Private Sub UpdateBarColor"; + //BA.debugLineNum = 248;BA.debugLine="If xDialog.IsInitialized And xDialog.TitleBar.IsI"; +if (_xdialog.IsInitialized /*boolean*/ () && _xdialog._titlebar /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .IsInitialized()) { + //BA.debugLineNum = 249;BA.debugLine="xDialog.TitleBar.Color = getSelectedColor"; +_xdialog._titlebar /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setColor(_getselectedcolor()); + }; + //BA.debugLineNum = 251;BA.debugLine="End Sub"; +return ""; +} +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +if (BA.fastSubCompare(sub, "DIALOGCLOSED")) + return _dialogclosed(((Number)args[0]).intValue()); +if (BA.fastSubCompare(sub, "GETPANEL")) + return _getpanel((keymon.lat.medicomed.b4xdialog) args[0]); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xcombobox.java b/B4A/Objects/src/keymon/lat/medicomed/b4xcombobox.java index 8785b72..49dbc38 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xcombobox.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xcombobox.java @@ -10,7 +10,7 @@ public class b4xcombobox extends B4AClass.ImplB4AClass implements BA.SubDelegato private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xcombobox"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xcombobox"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xcombobox extends B4AClass.ImplB4AClass implements BA.SubDelegato 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.keywords.Common __c = null; public String _meventname = ""; public Object _mcallback = null; public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null; @@ -53,94 +46,136 @@ 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 _base_resize(keymon.lat.medicomed.b4xcombobox __ref,double _width,double _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcombobox"; -if (Debug.shouldDelegate(ba, "base_resize", true)) - {return ((String) Debug.delegate(ba, "base_resize", new Object[] {_width,_height}));} -RDebugUtils.currentLine=47906816; - //BA.debugLineNum = 47906816;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; -RDebugUtils.currentLine=47906817; - //BA.debugLineNum = 47906817;BA.debugLine="mBase.GetView(0).SetLayoutAnimated(0, 0, 0, Width"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .GetView((int) (0)).SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); -RDebugUtils.currentLine=47906818; - //BA.debugLineNum = 47906818;BA.debugLine="End Sub"; +public String _base_resize(double _width,double _height) throws Exception{ + //BA.debugLineNum = 55;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; + //BA.debugLineNum = 56;BA.debugLine="mBase.GetView(0).SetLayoutAnimated(0, 0, 0, Width"; +_mbase.GetView((int) (0)).SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); + //BA.debugLineNum = 57;BA.debugLine="End Sub"; return ""; } -public String _class_globals(keymon.lat.medicomed.b4xcombobox __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcombobox"; -RDebugUtils.currentLine=47710208; - //BA.debugLineNum = 47710208;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=47710209; - //BA.debugLineNum = 47710209;BA.debugLine="Private mEventName As String 'ignore"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 2;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 3;BA.debugLine="Private mEventName As String 'ignore"; _meventname = ""; -RDebugUtils.currentLine=47710210; - //BA.debugLineNum = 47710210;BA.debugLine="Private mCallBack As Object 'ignore"; + //BA.debugLineNum = 4;BA.debugLine="Private mCallBack As Object 'ignore"; _mcallback = new Object(); -RDebugUtils.currentLine=47710211; - //BA.debugLineNum = 47710211;BA.debugLine="Public mBase As B4XView"; + //BA.debugLineNum = 5;BA.debugLine="Public mBase As B4XView"; _mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=47710212; - //BA.debugLineNum = 47710212;BA.debugLine="Private xui As XUI 'ignore"; + //BA.debugLineNum = 6;BA.debugLine="Private xui As XUI 'ignore"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=47710213; - //BA.debugLineNum = 47710213;BA.debugLine="Private LastSelectedIndex As Int"; + //BA.debugLineNum = 7;BA.debugLine="Private LastSelectedIndex As Int"; _lastselectedindex = 0; -RDebugUtils.currentLine=47710217; - //BA.debugLineNum = 47710217;BA.debugLine="Public cmbBox As Spinner"; + //BA.debugLineNum = 11;BA.debugLine="Public cmbBox As Spinner"; _cmbbox = new anywheresoftware.b4a.objects.SpinnerWrapper(); -RDebugUtils.currentLine=47710223; - //BA.debugLineNum = 47710223;BA.debugLine="Public DelayBeforeChangeEvent As Int"; + //BA.debugLineNum = 17;BA.debugLine="Public DelayBeforeChangeEvent As Int"; _delaybeforechangeevent = 0; -RDebugUtils.currentLine=47710225; - //BA.debugLineNum = 47710225;BA.debugLine="Private DelayIndex As Int"; + //BA.debugLineNum = 19;BA.debugLine="Private DelayIndex As Int"; _delayindex = 0; -RDebugUtils.currentLine=47710226; - //BA.debugLineNum = 47710226;BA.debugLine="Public Tag As Object"; + //BA.debugLineNum = 20;BA.debugLine="Public Tag As Object"; _tag = new Object(); -RDebugUtils.currentLine=47710227; - //BA.debugLineNum = 47710227;BA.debugLine="Public B4iCancelButton As String = \"Cancel\""; + //BA.debugLineNum = 21;BA.debugLine="Public B4iCancelButton As String = \"Cancel\""; _b4icancelbutton = "Cancel"; -RDebugUtils.currentLine=47710228; - //BA.debugLineNum = 47710228;BA.debugLine="End Sub"; + //BA.debugLineNum = 22;BA.debugLine="End Sub"; return ""; } -public String _cmbbox_itemclick(keymon.lat.medicomed.b4xcombobox __ref,int _position,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcombobox"; -if (Debug.shouldDelegate(ba, "cmbbox_itemclick", true)) - {return ((String) Debug.delegate(ba, "cmbbox_itemclick", new Object[] {_position,_value}));} -RDebugUtils.currentLine=48496640; - //BA.debugLineNum = 48496640;BA.debugLine="Private Sub CmbBox_ItemClick (Position As Int, Val"; -RDebugUtils.currentLine=48496641; - //BA.debugLineNum = 48496641;BA.debugLine="RaiseEvent"; -__ref._raiseevent /*void*/ (null); -RDebugUtils.currentLine=48496642; - //BA.debugLineNum = 48496642;BA.debugLine="End Sub"; +public String _cmbbox_itemclick(int _position,Object _value) throws Exception{ + //BA.debugLineNum = 157;BA.debugLine="Private Sub CmbBox_ItemClick (Position As Int, Val"; + //BA.debugLineNum = 158;BA.debugLine="RaiseEvent"; +_raiseevent(); + //BA.debugLineNum = 159;BA.debugLine="End Sub"; return ""; } -public void _raiseevent(keymon.lat.medicomed.b4xcombobox __ref) throws Exception{ -RDebugUtils.currentModule="b4xcombobox"; -if (Debug.shouldDelegate(ba, "raiseevent", true)) - {Debug.delegate(ba, "raiseevent", null); return;} -ResumableSub_RaiseEvent rsub = new ResumableSub_RaiseEvent(this,__ref); +public String _designercreateview(Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ +anywheresoftware.b4a.objects.B4XViewWrapper _xlbl = null; + //BA.debugLineNum = 32;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; + //BA.debugLineNum = 33;BA.debugLine="mBase = Base"; +_mbase = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); + //BA.debugLineNum = 34;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_tag = _mbase.getTag(); + //BA.debugLineNum = 34;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_mbase.setTag(this); + //BA.debugLineNum = 35;BA.debugLine="Dim xlbl As B4XView = Lbl"; +_xlbl = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_xlbl = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lbl.getObject())); + //BA.debugLineNum = 42;BA.debugLine="cmbBox.Initialize(\"cmbBox\")"; +_cmbbox.Initialize(ba,"cmbBox"); + //BA.debugLineNum = 43;BA.debugLine="cmbBox.TextSize = xlbl.TextSize"; +_cmbbox.setTextSize(_xlbl.getTextSize()); + //BA.debugLineNum = 44;BA.debugLine="mBase.AddView(cmbBox, 0, 0, mBase.Width, mBase.He"; +_mbase.AddView((android.view.View)(_cmbbox.getObject()),(int) (0),(int) (0),_mbase.getWidth(),_mbase.getHeight()); + //BA.debugLineNum = 53;BA.debugLine="End Sub"; +return ""; +} +public String _getitem(int _index) throws Exception{ + //BA.debugLineNum = 127;BA.debugLine="Public Sub GetItem(Index As Int) As String"; + //BA.debugLineNum = 131;BA.debugLine="Return cmbBox.GetItem(Index)"; +if (true) return _cmbbox.GetItem(_index); + //BA.debugLineNum = 135;BA.debugLine="End Sub"; +return ""; +} +public int _getselectedindex() throws Exception{ + //BA.debugLineNum = 98;BA.debugLine="Public Sub getSelectedIndex As Int"; + //BA.debugLineNum = 100;BA.debugLine="Return cmbBox.SelectedIndex"; +if (true) return _cmbbox.getSelectedIndex(); + //BA.debugLineNum = 104;BA.debugLine="End Sub"; +return 0; +} +public String _getselecteditem() throws Exception{ +int _i = 0; + //BA.debugLineNum = 121;BA.debugLine="Public Sub getSelectedItem As String"; + //BA.debugLineNum = 122;BA.debugLine="Dim i As Int = getSelectedIndex"; +_i = _getselectedindex(); + //BA.debugLineNum = 123;BA.debugLine="If i = -1 Then Return \"\""; +if (_i==-1) { +if (true) return "";}; + //BA.debugLineNum = 124;BA.debugLine="Return GetItem(i)"; +if (true) return _getitem(_i); + //BA.debugLineNum = 125;BA.debugLine="End Sub"; +return ""; +} +public int _getsize() throws Exception{ + //BA.debugLineNum = 76;BA.debugLine="Public Sub getSize As Int"; + //BA.debugLineNum = 80;BA.debugLine="Return cmbBox.Size"; +if (true) return _cmbbox.getSize(); + //BA.debugLineNum = 84;BA.debugLine="End Sub"; +return 0; +} +public int _indexof(String _item) throws Exception{ + //BA.debugLineNum = 87;BA.debugLine="Public Sub IndexOf(Item As String) As Int"; + //BA.debugLineNum = 91;BA.debugLine="Return cmbBox.IndexOf(Item)"; +if (true) return _cmbbox.IndexOf(_item); + //BA.debugLineNum = 95;BA.debugLine="End Sub"; +return 0; +} +public String _initialize(anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 24;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; + //BA.debugLineNum = 25;BA.debugLine="mEventName = EventName"; +_meventname = _eventname; + //BA.debugLineNum = 26;BA.debugLine="mCallBack = Callback"; +_mcallback = _callback; + //BA.debugLineNum = 27;BA.debugLine="LastSelectedIndex = -1"; +_lastselectedindex = (int) (-1); + //BA.debugLineNum = 28;BA.debugLine="If xui.IsB4J Then DelayBeforeChangeEvent = 500"; +if (_xui.getIsB4J()) { +_delaybeforechangeevent = (int) (500);}; + //BA.debugLineNum = 29;BA.debugLine="End Sub"; +return ""; +} +public void _raiseevent() throws Exception{ +ResumableSub_RaiseEvent rsub = new ResumableSub_RaiseEvent(this); rsub.resume(ba, null); } public static class ResumableSub_RaiseEvent extends BA.ResumableSub { -public ResumableSub_RaiseEvent(keymon.lat.medicomed.b4xcombobox parent,keymon.lat.medicomed.b4xcombobox __ref) { +public ResumableSub_RaiseEvent(keymon.lat.medicomed.b4xcombobox parent) { this.parent = parent; -this.__ref = __ref; -this.__ref = parent; } -keymon.lat.medicomed.b4xcombobox __ref; keymon.lat.medicomed.b4xcombobox parent; int _index = 0; int _myindex = 0; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="b4xcombobox"; while (true) { switch (state) { @@ -150,17 +185,15 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=48431105; - //BA.debugLineNum = 48431105;BA.debugLine="Dim index As Int = getSelectedIndex"; -_index = __ref._getselectedindex /*int*/ (null); -RDebugUtils.currentLine=48431106; - //BA.debugLineNum = 48431106;BA.debugLine="If LastSelectedIndex = index Then Return"; + //BA.debugLineNum = 138;BA.debugLine="Dim index As Int = getSelectedIndex"; +_index = parent._getselectedindex(); + //BA.debugLineNum = 139;BA.debugLine="If LastSelectedIndex = index Then Return"; if (true) break; case 1: //if this.state = 6; -if (__ref._lastselectedindex /*int*/ ==_index) { +if (parent._lastselectedindex==_index) { this.state = 3; ;}if (true) break; @@ -174,43 +207,38 @@ case 6: //C this.state = 7; ; -RDebugUtils.currentLine=48431107; - //BA.debugLineNum = 48431107;BA.debugLine="If DelayBeforeChangeEvent > 0 Then"; + //BA.debugLineNum = 140;BA.debugLine="If DelayBeforeChangeEvent > 0 Then"; if (true) break; case 7: //if this.state = 16; -if (__ref._delaybeforechangeevent /*int*/ >0) { +if (parent._delaybeforechangeevent>0) { this.state = 9; }if (true) break; case 9: //C this.state = 10; -RDebugUtils.currentLine=48431108; - //BA.debugLineNum = 48431108;BA.debugLine="DelayIndex = DelayIndex + 1"; -__ref._delayindex /*int*/ = (int) (__ref._delayindex /*int*/ +1); -RDebugUtils.currentLine=48431109; - //BA.debugLineNum = 48431109;BA.debugLine="Dim MyIndex As Int = DelayIndex"; -_myindex = __ref._delayindex /*int*/ ; -RDebugUtils.currentLine=48431110; - //BA.debugLineNum = 48431110;BA.debugLine="Sleep(DelayBeforeChangeEvent)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "b4xcombobox", "raiseevent"),__ref._delaybeforechangeevent /*int*/ ); + //BA.debugLineNum = 141;BA.debugLine="DelayIndex = DelayIndex + 1"; +parent._delayindex = (int) (parent._delayindex+1); + //BA.debugLineNum = 142;BA.debugLine="Dim MyIndex As Int = DelayIndex"; +_myindex = parent._delayindex; + //BA.debugLineNum = 143;BA.debugLine="Sleep(DelayBeforeChangeEvent)"; +parent.__c.Sleep(ba,this,parent._delaybeforechangeevent); this.state = 21; return; case 21: //C this.state = 10; ; -RDebugUtils.currentLine=48431111; - //BA.debugLineNum = 48431111;BA.debugLine="If MyIndex <> DelayIndex Then Return"; + //BA.debugLineNum = 144;BA.debugLine="If MyIndex <> DelayIndex Then Return"; if (true) break; case 10: //if this.state = 15; -if (_myindex!=__ref._delayindex /*int*/ ) { +if (_myindex!=parent._delayindex) { this.state = 12; ;}if (true) break; @@ -230,213 +258,59 @@ case 16: //C this.state = 17; ; -RDebugUtils.currentLine=48431113; - //BA.debugLineNum = 48431113;BA.debugLine="LastSelectedIndex = index"; -__ref._lastselectedindex /*int*/ = _index; -RDebugUtils.currentLine=48431114; - //BA.debugLineNum = 48431114;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_Select"; + //BA.debugLineNum = 146;BA.debugLine="LastSelectedIndex = index"; +parent._lastselectedindex = _index; + //BA.debugLineNum = 147;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_Select"; if (true) break; case 17: //if this.state = 20; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .SubExists(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_SelectedIndexChanged",(int) (1))) { +if (parent._xui.SubExists(ba,parent._mcallback,parent._meventname+"_SelectedIndexChanged",(int) (1))) { this.state = 19; }if (true) break; case 19: //C this.state = 20; -RDebugUtils.currentLine=48431115; - //BA.debugLineNum = 48431115;BA.debugLine="CallSub2(mCallBack, mEventName & \"_SelectedIndex"; -parent.__c.CallSubNew2(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_SelectedIndexChanged",(Object)(_index)); + //BA.debugLineNum = 148;BA.debugLine="CallSub2(mCallBack, mEventName & \"_SelectedIndex"; +parent.__c.CallSubNew2(ba,parent._mcallback,parent._meventname+"_SelectedIndexChanged",(Object)(_index)); if (true) break; case 20: //C this.state = -1; ; -RDebugUtils.currentLine=48431117; - //BA.debugLineNum = 48431117;BA.debugLine="End Sub"; + //BA.debugLineNum = 150;BA.debugLine="End Sub"; if (true) break; } } } } -public String _designercreateview(keymon.lat.medicomed.b4xcombobox __ref,Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcombobox"; -if (Debug.shouldDelegate(ba, "designercreateview", true)) - {return ((String) Debug.delegate(ba, "designercreateview", new Object[] {_base,_lbl,_props}));} -anywheresoftware.b4a.objects.B4XViewWrapper _xlbl = null; -RDebugUtils.currentLine=47841280; - //BA.debugLineNum = 47841280;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; -RDebugUtils.currentLine=47841281; - //BA.debugLineNum = 47841281;BA.debugLine="mBase = Base"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); -RDebugUtils.currentLine=47841282; - //BA.debugLineNum = 47841282;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._tag /*Object*/ = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getTag(); -RDebugUtils.currentLine=47841282; - //BA.debugLineNum = 47841282;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag(this); -RDebugUtils.currentLine=47841283; - //BA.debugLineNum = 47841283;BA.debugLine="Dim xlbl As B4XView = Lbl"; -_xlbl = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_xlbl = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lbl.getObject())); -RDebugUtils.currentLine=47841290; - //BA.debugLineNum = 47841290;BA.debugLine="cmbBox.Initialize(\"cmbBox\")"; -__ref._cmbbox /*anywheresoftware.b4a.objects.SpinnerWrapper*/ .Initialize(ba,"cmbBox"); -RDebugUtils.currentLine=47841291; - //BA.debugLineNum = 47841291;BA.debugLine="cmbBox.TextSize = xlbl.TextSize"; -__ref._cmbbox /*anywheresoftware.b4a.objects.SpinnerWrapper*/ .setTextSize(_xlbl.getTextSize()); -RDebugUtils.currentLine=47841292; - //BA.debugLineNum = 47841292;BA.debugLine="mBase.AddView(cmbBox, 0, 0, mBase.Width, mBase.He"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._cmbbox /*anywheresoftware.b4a.objects.SpinnerWrapper*/ .getObject()),(int) (0),(int) (0),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=47841301; - //BA.debugLineNum = 47841301;BA.debugLine="End Sub"; -return ""; -} -public String _getitem(keymon.lat.medicomed.b4xcombobox __ref,int _index) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcombobox"; -if (Debug.shouldDelegate(ba, "getitem", true)) - {return ((String) Debug.delegate(ba, "getitem", new Object[] {_index}));} -RDebugUtils.currentLine=48365568; - //BA.debugLineNum = 48365568;BA.debugLine="Public Sub GetItem(Index As Int) As String"; -RDebugUtils.currentLine=48365572; - //BA.debugLineNum = 48365572;BA.debugLine="Return cmbBox.GetItem(Index)"; -if (true) return __ref._cmbbox /*anywheresoftware.b4a.objects.SpinnerWrapper*/ .GetItem(_index); -RDebugUtils.currentLine=48365576; - //BA.debugLineNum = 48365576;BA.debugLine="End Sub"; -return ""; -} -public int _getselectedindex(keymon.lat.medicomed.b4xcombobox __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcombobox"; -if (Debug.shouldDelegate(ba, "getselectedindex", true)) - {return ((Integer) Debug.delegate(ba, "getselectedindex", null));} -RDebugUtils.currentLine=48168960; - //BA.debugLineNum = 48168960;BA.debugLine="Public Sub getSelectedIndex As Int"; -RDebugUtils.currentLine=48168962; - //BA.debugLineNum = 48168962;BA.debugLine="Return cmbBox.SelectedIndex"; -if (true) return __ref._cmbbox /*anywheresoftware.b4a.objects.SpinnerWrapper*/ .getSelectedIndex(); -RDebugUtils.currentLine=48168966; - //BA.debugLineNum = 48168966;BA.debugLine="End Sub"; -return 0; -} -public String _getselecteditem(keymon.lat.medicomed.b4xcombobox __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcombobox"; -if (Debug.shouldDelegate(ba, "getselecteditem", true)) - {return ((String) Debug.delegate(ba, "getselecteditem", null));} -int _i = 0; -RDebugUtils.currentLine=48300032; - //BA.debugLineNum = 48300032;BA.debugLine="Public Sub getSelectedItem As String"; -RDebugUtils.currentLine=48300033; - //BA.debugLineNum = 48300033;BA.debugLine="Dim i As Int = getSelectedIndex"; -_i = __ref._getselectedindex /*int*/ (null); -RDebugUtils.currentLine=48300034; - //BA.debugLineNum = 48300034;BA.debugLine="If i = -1 Then Return \"\""; -if (_i==-1) { -if (true) return "";}; -RDebugUtils.currentLine=48300035; - //BA.debugLineNum = 48300035;BA.debugLine="Return GetItem(i)"; -if (true) return __ref._getitem /*String*/ (null,_i); -RDebugUtils.currentLine=48300036; - //BA.debugLineNum = 48300036;BA.debugLine="End Sub"; -return ""; -} -public int _getsize(keymon.lat.medicomed.b4xcombobox __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcombobox"; -if (Debug.shouldDelegate(ba, "getsize", true)) - {return ((Integer) Debug.delegate(ba, "getsize", null));} -RDebugUtils.currentLine=48037888; - //BA.debugLineNum = 48037888;BA.debugLine="Public Sub getSize As Int"; -RDebugUtils.currentLine=48037892; - //BA.debugLineNum = 48037892;BA.debugLine="Return cmbBox.Size"; -if (true) return __ref._cmbbox /*anywheresoftware.b4a.objects.SpinnerWrapper*/ .getSize(); -RDebugUtils.currentLine=48037896; - //BA.debugLineNum = 48037896;BA.debugLine="End Sub"; -return 0; -} -public int _indexof(keymon.lat.medicomed.b4xcombobox __ref,String _item) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcombobox"; -if (Debug.shouldDelegate(ba, "indexof", true)) - {return ((Integer) Debug.delegate(ba, "indexof", new Object[] {_item}));} -RDebugUtils.currentLine=48103424; - //BA.debugLineNum = 48103424;BA.debugLine="Public Sub IndexOf(Item As String) As Int"; -RDebugUtils.currentLine=48103428; - //BA.debugLineNum = 48103428;BA.debugLine="Return cmbBox.IndexOf(Item)"; -if (true) return __ref._cmbbox /*anywheresoftware.b4a.objects.SpinnerWrapper*/ .IndexOf(_item); -RDebugUtils.currentLine=48103432; - //BA.debugLineNum = 48103432;BA.debugLine="End Sub"; -return 0; -} -public String _initialize(keymon.lat.medicomed.b4xcombobox __ref,anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="b4xcombobox"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_callback,_eventname}));} -RDebugUtils.currentLine=47775744; - //BA.debugLineNum = 47775744;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -RDebugUtils.currentLine=47775745; - //BA.debugLineNum = 47775745;BA.debugLine="mEventName = EventName"; -__ref._meventname /*String*/ = _eventname; -RDebugUtils.currentLine=47775746; - //BA.debugLineNum = 47775746;BA.debugLine="mCallBack = Callback"; -__ref._mcallback /*Object*/ = _callback; -RDebugUtils.currentLine=47775747; - //BA.debugLineNum = 47775747;BA.debugLine="LastSelectedIndex = -1"; -__ref._lastselectedindex /*int*/ = (int) (-1); -RDebugUtils.currentLine=47775748; - //BA.debugLineNum = 47775748;BA.debugLine="If xui.IsB4J Then DelayBeforeChangeEvent = 500"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4J()) { -__ref._delaybeforechangeevent /*int*/ = (int) (500);}; -RDebugUtils.currentLine=47775749; - //BA.debugLineNum = 47775749;BA.debugLine="End Sub"; -return ""; -} -public String _setitems(keymon.lat.medicomed.b4xcombobox __ref,anywheresoftware.b4a.objects.collections.List _items) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcombobox"; -if (Debug.shouldDelegate(ba, "setitems", true)) - {return ((String) Debug.delegate(ba, "setitems", new Object[] {_items}));} -RDebugUtils.currentLine=47972352; - //BA.debugLineNum = 47972352;BA.debugLine="Public Sub SetItems(Items As List)"; -RDebugUtils.currentLine=47972357; - //BA.debugLineNum = 47972357;BA.debugLine="cmbBox.Clear"; -__ref._cmbbox /*anywheresoftware.b4a.objects.SpinnerWrapper*/ .Clear(); -RDebugUtils.currentLine=47972358; - //BA.debugLineNum = 47972358;BA.debugLine="cmbBox.AddAll(Items)"; -__ref._cmbbox /*anywheresoftware.b4a.objects.SpinnerWrapper*/ .AddAll(_items); -RDebugUtils.currentLine=47972365; - //BA.debugLineNum = 47972365;BA.debugLine="If Items.Size > 0 Then setSelectedIndex(0)"; +public String _setitems(anywheresoftware.b4a.objects.collections.List _items) throws Exception{ + //BA.debugLineNum = 59;BA.debugLine="Public Sub SetItems(Items As List)"; + //BA.debugLineNum = 64;BA.debugLine="cmbBox.Clear"; +_cmbbox.Clear(); + //BA.debugLineNum = 65;BA.debugLine="cmbBox.AddAll(Items)"; +_cmbbox.AddAll(_items); + //BA.debugLineNum = 72;BA.debugLine="If Items.Size > 0 Then setSelectedIndex(0)"; if (_items.getSize()>0) { -__ref._setselectedindex /*String*/ (null,(int) (0));}; -RDebugUtils.currentLine=47972366; - //BA.debugLineNum = 47972366;BA.debugLine="End Sub"; +_setselectedindex((int) (0));}; + //BA.debugLineNum = 73;BA.debugLine="End Sub"; return ""; } -public String _setselectedindex(keymon.lat.medicomed.b4xcombobox __ref,int _i) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcombobox"; -if (Debug.shouldDelegate(ba, "setselectedindex", true)) - {return ((String) Debug.delegate(ba, "setselectedindex", new Object[] {_i}));} -RDebugUtils.currentLine=48234496; - //BA.debugLineNum = 48234496;BA.debugLine="Public Sub setSelectedIndex(i As Int)"; -RDebugUtils.currentLine=48234497; - //BA.debugLineNum = 48234497;BA.debugLine="LastSelectedIndex = i"; -__ref._lastselectedindex /*int*/ = _i; -RDebugUtils.currentLine=48234499; - //BA.debugLineNum = 48234499;BA.debugLine="cmbBox.SelectedIndex = i"; -__ref._cmbbox /*anywheresoftware.b4a.objects.SpinnerWrapper*/ .setSelectedIndex(_i); -RDebugUtils.currentLine=48234508; - //BA.debugLineNum = 48234508;BA.debugLine="End Sub"; +public String _setselectedindex(int _i) throws Exception{ + //BA.debugLineNum = 106;BA.debugLine="Public Sub setSelectedIndex(i As Int)"; + //BA.debugLineNum = 107;BA.debugLine="LastSelectedIndex = i"; +_lastselectedindex = _i; + //BA.debugLineNum = 109;BA.debugLine="cmbBox.SelectedIndex = i"; +_cmbbox.setSelectedIndex(_i); + //BA.debugLineNum = 118;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xcomparatorsort.java b/B4A/Objects/src/keymon/lat/medicomed/b4xcomparatorsort.java index 3db9300..5bc0263 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xcomparatorsort.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xcomparatorsort.java @@ -10,7 +10,7 @@ public class b4xcomparatorsort extends B4AClass.ImplB4AClass implements BA.SubDe private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xcomparatorsort"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xcomparatorsort"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xcomparatorsort extends B4AClass.ImplB4AClass implements BA.SubDe 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.keywords.Common __c = null; public b4a.example.dateutils _dateutils = null; public keymon.lat.medicomed.main _main = null; public keymon.lat.medicomed.starter _starter = null; @@ -43,137 +36,89 @@ 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 _class_globals(keymon.lat.medicomed.b4xcomparatorsort __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcomparatorsort"; -RDebugUtils.currentLine=36831232; - //BA.debugLineNum = 36831232;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=36831233; - //BA.debugLineNum = 36831233;BA.debugLine="End Sub"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="End Sub"; return ""; } -public String _initialize(keymon.lat.medicomed.b4xcomparatorsort __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; +public String _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ innerInitialize(_ba); -RDebugUtils.currentModule="b4xcomparatorsort"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=36896768; - //BA.debugLineNum = 36896768;BA.debugLine="Public Sub Initialize"; -RDebugUtils.currentLine=36896769; - //BA.debugLineNum = 36896769;BA.debugLine="End Sub"; + //BA.debugLineNum = 4;BA.debugLine="Public Sub Initialize"; + //BA.debugLineNum = 5;BA.debugLine="End Sub"; return ""; } -public int _partition(keymon.lat.medicomed.b4xcomparatorsort __ref,anywheresoftware.b4a.objects.collections.List _data,int _startindex,int _length,int _pivotindex,Object _comparator) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcomparatorsort"; -if (Debug.shouldDelegate(ba, "partition", true)) - {return ((Integer) Debug.delegate(ba, "partition", new Object[] {_data,_startindex,_length,_pivotindex,_comparator}));} +public int _partition(anywheresoftware.b4a.objects.collections.List _data,int _startindex,int _length,int _pivotindex,Object _comparator) throws Exception{ Object _pivotvalue = null; int _l = 0; int _i = 0; -RDebugUtils.currentLine=37093376; - //BA.debugLineNum = 37093376;BA.debugLine="Private Sub Partition(Data As List, StartIndex As"; -RDebugUtils.currentLine=37093377; - //BA.debugLineNum = 37093377;BA.debugLine="Dim PivotValue As Object = Data.Get(StartIndex +"; + //BA.debugLineNum = 30;BA.debugLine="Private Sub Partition(Data As List, StartIndex As"; + //BA.debugLineNum = 31;BA.debugLine="Dim PivotValue As Object = Data.Get(StartIndex +"; _pivotvalue = _data.Get((int) (_startindex+_pivotindex)); -RDebugUtils.currentLine=37093378; - //BA.debugLineNum = 37093378;BA.debugLine="Swap(Data, StartIndex, PivotIndex, Length - 1)"; -__ref._swap /*String*/ (null,_data,_startindex,_pivotindex,(int) (_length-1)); -RDebugUtils.currentLine=37093379; - //BA.debugLineNum = 37093379;BA.debugLine="Dim L As Int = 0"; + //BA.debugLineNum = 32;BA.debugLine="Swap(Data, StartIndex, PivotIndex, Length - 1)"; +_swap(_data,_startindex,_pivotindex,(int) (_length-1)); + //BA.debugLineNum = 33;BA.debugLine="Dim L As Int = 0"; _l = (int) (0); -RDebugUtils.currentLine=37093380; - //BA.debugLineNum = 37093380;BA.debugLine="For i = 0 To Length - 2"; + //BA.debugLineNum = 34;BA.debugLine="For i = 0 To Length - 2"; { final int step4 = 1; final int limit4 = (int) (_length-2); _i = (int) (0) ; for (;_i <= limit4 ;_i = _i + step4 ) { -RDebugUtils.currentLine=37093381; - //BA.debugLineNum = 37093381;BA.debugLine="If CallSub3(Comparator, \"Compare\", Data.Get(Star"; -if (((int)(BA.ObjectToNumber(__c.CallSubDebug3(ba,_comparator,"Compare",_data.Get((int) (_startindex+_i)),_pivotvalue))))<0) { -RDebugUtils.currentLine=37093382; - //BA.debugLineNum = 37093382;BA.debugLine="L = L + 1"; + //BA.debugLineNum = 35;BA.debugLine="If CallSub3(Comparator, \"Compare\", Data.Get(Star"; +if (((int)(BA.ObjectToNumber(__c.CallSubNew3(ba,_comparator,"Compare",_data.Get((int) (_startindex+_i)),_pivotvalue))))<0) { + //BA.debugLineNum = 36;BA.debugLine="L = L + 1"; _l = (int) (_l+1); -RDebugUtils.currentLine=37093383; - //BA.debugLineNum = 37093383;BA.debugLine="Swap(Data, StartIndex, L - 1, i)"; -__ref._swap /*String*/ (null,_data,_startindex,(int) (_l-1),_i); + //BA.debugLineNum = 37;BA.debugLine="Swap(Data, StartIndex, L - 1, i)"; +_swap(_data,_startindex,(int) (_l-1),_i); }; } }; -RDebugUtils.currentLine=37093386; - //BA.debugLineNum = 37093386;BA.debugLine="Swap(Data, StartIndex, Length - 1, L)"; -__ref._swap /*String*/ (null,_data,_startindex,(int) (_length-1),_l); -RDebugUtils.currentLine=37093387; - //BA.debugLineNum = 37093387;BA.debugLine="Return L"; + //BA.debugLineNum = 40;BA.debugLine="Swap(Data, StartIndex, Length - 1, L)"; +_swap(_data,_startindex,(int) (_length-1),_l); + //BA.debugLineNum = 41;BA.debugLine="Return L"; if (true) return _l; -RDebugUtils.currentLine=37093388; - //BA.debugLineNum = 37093388;BA.debugLine="End Sub"; + //BA.debugLineNum = 42;BA.debugLine="End Sub"; return 0; } -public String _swap(keymon.lat.medicomed.b4xcomparatorsort __ref,anywheresoftware.b4a.objects.collections.List _data,int _startindex,int _i1,int _i2) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcomparatorsort"; -if (Debug.shouldDelegate(ba, "swap", true)) - {return ((String) Debug.delegate(ba, "swap", new Object[] {_data,_startindex,_i1,_i2}));} -Object _o = null; -RDebugUtils.currentLine=37158912; - //BA.debugLineNum = 37158912;BA.debugLine="Private Sub Swap (Data As List, StartIndex As Int,"; -RDebugUtils.currentLine=37158913; - //BA.debugLineNum = 37158913;BA.debugLine="Dim o As Object = Data.Get(StartIndex + i1)"; -_o = _data.Get((int) (_startindex+_i1)); -RDebugUtils.currentLine=37158914; - //BA.debugLineNum = 37158914;BA.debugLine="Data.Set(StartIndex + i1, Data.Get(StartIndex + i"; -_data.Set((int) (_startindex+_i1),_data.Get((int) (_startindex+_i2))); -RDebugUtils.currentLine=37158915; - //BA.debugLineNum = 37158915;BA.debugLine="Data.Set(StartIndex + i2, o)"; -_data.Set((int) (_startindex+_i2),_o); -RDebugUtils.currentLine=37158916; - //BA.debugLineNum = 37158916;BA.debugLine="End Sub"; -return ""; -} -public String _quicksort(keymon.lat.medicomed.b4xcomparatorsort __ref,anywheresoftware.b4a.objects.collections.List _data,int _startindex,int _length,Object _comparator) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcomparatorsort"; -if (Debug.shouldDelegate(ba, "quicksort", true)) - {return ((String) Debug.delegate(ba, "quicksort", new Object[] {_data,_startindex,_length,_comparator}));} +public String _quicksort(anywheresoftware.b4a.objects.collections.List _data,int _startindex,int _length,Object _comparator) throws Exception{ int _pivotindex = 0; int _r = 0; -RDebugUtils.currentLine=37027840; - //BA.debugLineNum = 37027840;BA.debugLine="Private Sub QuickSort (Data As List, StartIndex As"; -RDebugUtils.currentLine=37027841; - //BA.debugLineNum = 37027841;BA.debugLine="If Length > 1 Then"; + //BA.debugLineNum = 21;BA.debugLine="Private Sub QuickSort (Data As List, StartIndex As"; + //BA.debugLineNum = 22;BA.debugLine="If Length > 1 Then"; if (_length>1) { -RDebugUtils.currentLine=37027842; - //BA.debugLineNum = 37027842;BA.debugLine="Dim PivotIndex As Int = Rnd(0, Length)"; + //BA.debugLineNum = 23;BA.debugLine="Dim PivotIndex As Int = Rnd(0, Length)"; _pivotindex = __c.Rnd((int) (0),_length); -RDebugUtils.currentLine=37027843; - //BA.debugLineNum = 37027843;BA.debugLine="Dim r As Int = Partition(Data, StartIndex, Lengt"; -_r = __ref._partition /*int*/ (null,_data,_startindex,_length,_pivotindex,_comparator); -RDebugUtils.currentLine=37027844; - //BA.debugLineNum = 37027844;BA.debugLine="QuickSort(Data, StartIndex, r, Comparator)"; -__ref._quicksort /*String*/ (null,_data,_startindex,_r,_comparator); -RDebugUtils.currentLine=37027845; - //BA.debugLineNum = 37027845;BA.debugLine="QuickSort(Data, StartIndex + r + 1, Length - r -"; -__ref._quicksort /*String*/ (null,_data,(int) (_startindex+_r+1),(int) (_length-_r-1),_comparator); + //BA.debugLineNum = 24;BA.debugLine="Dim r As Int = Partition(Data, StartIndex, Lengt"; +_r = _partition(_data,_startindex,_length,_pivotindex,_comparator); + //BA.debugLineNum = 25;BA.debugLine="QuickSort(Data, StartIndex, r, Comparator)"; +_quicksort(_data,_startindex,_r,_comparator); + //BA.debugLineNum = 26;BA.debugLine="QuickSort(Data, StartIndex + r + 1, Length - r -"; +_quicksort(_data,(int) (_startindex+_r+1),(int) (_length-_r-1),_comparator); }; -RDebugUtils.currentLine=37027847; - //BA.debugLineNum = 37027847;BA.debugLine="End Sub"; + //BA.debugLineNum = 28;BA.debugLine="End Sub"; return ""; } -public String _sort(keymon.lat.medicomed.b4xcomparatorsort __ref,anywheresoftware.b4a.objects.collections.List _data,Object _comparator) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xcomparatorsort"; -if (Debug.shouldDelegate(ba, "sort", true)) - {return ((String) Debug.delegate(ba, "sort", new Object[] {_data,_comparator}));} -RDebugUtils.currentLine=36962304; - //BA.debugLineNum = 36962304;BA.debugLine="Public Sub Sort (Data As List, Comparator As Objec"; -RDebugUtils.currentLine=36962306; - //BA.debugLineNum = 36962306;BA.debugLine="QuickSort(Data, 0, Data.Size, Comparator)"; -__ref._quicksort /*String*/ (null,_data,(int) (0),_data.getSize(),_comparator); -RDebugUtils.currentLine=36962310; - //BA.debugLineNum = 36962310;BA.debugLine="End Sub"; +public String _sort(anywheresoftware.b4a.objects.collections.List _data,Object _comparator) throws Exception{ + //BA.debugLineNum = 12;BA.debugLine="Public Sub Sort (Data As List, Comparator As Objec"; + //BA.debugLineNum = 14;BA.debugLine="QuickSort(Data, 0, Data.Size, Comparator)"; +_quicksort(_data,(int) (0),_data.getSize(),_comparator); + //BA.debugLineNum = 18;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +public String _swap(anywheresoftware.b4a.objects.collections.List _data,int _startindex,int _i1,int _i2) throws Exception{ +Object _o = null; + //BA.debugLineNum = 44;BA.debugLine="Private Sub Swap (Data As List, StartIndex As Int,"; + //BA.debugLineNum = 45;BA.debugLine="Dim o As Object = Data.Get(StartIndex + i1)"; +_o = _data.Get((int) (_startindex+_i1)); + //BA.debugLineNum = 46;BA.debugLine="Data.Set(StartIndex + i1, Data.Get(StartIndex + i"; +_data.Set((int) (_startindex+_i1),_data.Get((int) (_startindex+_i2))); + //BA.debugLineNum = 47;BA.debugLine="Data.Set(StartIndex + i2, o)"; +_data.Set((int) (_startindex+_i2),_o); + //BA.debugLineNum = 48;BA.debugLine="End Sub"; +return ""; +} +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xdatetemplate.java b/B4A/Objects/src/keymon/lat/medicomed/b4xdatetemplate.java index 26493ff..319995a 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xdatetemplate.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xdatetemplate.java @@ -10,7 +10,7 @@ public class b4xdatetemplate extends B4AClass.ImplB4AClass implements BA.SubDele private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xdatetemplate"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xdatetemplate"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xdatetemplate extends B4AClass.ImplB4AClass implements BA.SubDele 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.keywords.Common __c = null; public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; public int _month = 0; public int _year = 0; @@ -81,562 +74,355 @@ 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 _btnmonth_click(keymon.lat.medicomed.b4xdatetemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdatetemplate"; -if (Debug.shouldDelegate(ba, "btnmonth_click", true)) - {return ((String) Debug.delegate(ba, "btnmonth_click", null));} +public String _btnmonth_click() throws Exception{ anywheresoftware.b4a.objects.B4XViewWrapper _btn = null; int _m = 0; -RDebugUtils.currentLine=49283072; - //BA.debugLineNum = 49283072;BA.debugLine="Private Sub btnMonth_Click"; -RDebugUtils.currentLine=49283073; - //BA.debugLineNum = 49283073;BA.debugLine="Dim btn As B4XView = Sender"; + //BA.debugLineNum = 160;BA.debugLine="Private Sub btnMonth_Click"; + //BA.debugLineNum = 161;BA.debugLine="Dim btn As B4XView = Sender"; _btn = new anywheresoftware.b4a.objects.B4XViewWrapper(); _btn = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba))); -RDebugUtils.currentLine=49283074; - //BA.debugLineNum = 49283074;BA.debugLine="Dim m As Int = 12 + month - 1 + btn.Tag"; -_m = (int) (12+__ref._month /*int*/ -1+(double)(BA.ObjectToNumber(_btn.getTag()))); -RDebugUtils.currentLine=49283075; - //BA.debugLineNum = 49283075;BA.debugLine="month = (m Mod 12) + 1"; -__ref._month /*int*/ = (int) ((_m%12)+1); -RDebugUtils.currentLine=49283076; - //BA.debugLineNum = 49283076;BA.debugLine="DrawDays"; -__ref._drawdays /*String*/ (null); -RDebugUtils.currentLine=49283077; - //BA.debugLineNum = 49283077;BA.debugLine="End Sub"; + //BA.debugLineNum = 162;BA.debugLine="Dim m As Int = 12 + month - 1 + btn.Tag"; +_m = (int) (12+_month-1+(double)(BA.ObjectToNumber(_btn.getTag()))); + //BA.debugLineNum = 163;BA.debugLine="month = (m Mod 12) + 1"; +_month = (int) ((_m%12)+1); + //BA.debugLineNum = 164;BA.debugLine="DrawDays"; +_drawdays(); + //BA.debugLineNum = 165;BA.debugLine="End Sub"; return ""; } -public String _drawdays(keymon.lat.medicomed.b4xdatetemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdatetemplate"; -if (Debug.shouldDelegate(ba, "drawdays", true)) - {return ((String) Debug.delegate(ba, "drawdays", null));} +public String _btnyear_click() throws Exception{ +anywheresoftware.b4a.objects.B4XViewWrapper _btn = null; + //BA.debugLineNum = 154;BA.debugLine="Private Sub btnYear_Click"; + //BA.debugLineNum = 155;BA.debugLine="Dim btn As B4XView = Sender"; +_btn = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_btn = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba))); + //BA.debugLineNum = 156;BA.debugLine="year = year + btn.Tag"; +_year = (int) (_year+(double)(BA.ObjectToNumber(_btn.getTag()))); + //BA.debugLineNum = 157;BA.debugLine="DrawDays"; +_drawdays(); + //BA.debugLineNum = 158;BA.debugLine="End Sub"; +return ""; +} +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Private xui As XUI"; +_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); + //BA.debugLineNum = 3;BA.debugLine="Private month, year As Int"; +_month = 0; +_year = 0; + //BA.debugLineNum = 4;BA.debugLine="Private boxW, boxH As Float"; +_boxw = 0f; +_boxh = 0f; + //BA.debugLineNum = 5;BA.debugLine="Private vCorrection As Float"; +_vcorrection = 0f; + //BA.debugLineNum = 6;BA.debugLine="Private tempSelectedDay As Int"; +_tempselectedday = 0; + //BA.debugLineNum = 7;BA.debugLine="Private dayOfWeekOffset As Int"; +_dayofweekoffset = 0; + //BA.debugLineNum = 8;BA.debugLine="Private daysInMonth As Int"; +_daysinmonth = 0; + //BA.debugLineNum = 9;BA.debugLine="Private DaysPaneBg As B4XView"; +_dayspanebg = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 10;BA.debugLine="Private DaysPaneFg As B4XView"; +_dayspanefg = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 11;BA.debugLine="Private cvs As B4XCanvas"; +_cvs = new anywheresoftware.b4a.objects.B4XCanvas(); + //BA.debugLineNum = 12;BA.debugLine="Private cvsBackground As B4XCanvas"; +_cvsbackground = new anywheresoftware.b4a.objects.B4XCanvas(); + //BA.debugLineNum = 13;BA.debugLine="Private selectedDate As Long"; +_selecteddate = 0L; + //BA.debugLineNum = 14;BA.debugLine="Private PreviousSelectedDate As Long"; +_previousselecteddate = 0L; + //BA.debugLineNum = 15;BA.debugLine="Private selectedYear, selectedMonth, selectedDay"; +_selectedyear = 0; +_selectedmonth = 0; +_selectedday = 0; + //BA.debugLineNum = 16;BA.debugLine="Public HighlightedColor As Int = 0xFF001BBD"; +_highlightedcolor = ((int)0xff001bbd); + //BA.debugLineNum = 17;BA.debugLine="Public SelectedColor As Int = 0xFF0BA29B"; +_selectedcolor = ((int)0xff0ba29b); + //BA.debugLineNum = 18;BA.debugLine="Public DaysInMonthColor As Int = xui.Color_White"; +_daysinmonthcolor = _xui.Color_White; + //BA.debugLineNum = 19;BA.debugLine="Public DaysInWeekColor As Int = xui.Color_Gray"; +_daysinweekcolor = _xui.Color_Gray; + //BA.debugLineNum = 20;BA.debugLine="Private cvsDays As B4XCanvas"; +_cvsdays = new anywheresoftware.b4a.objects.B4XCanvas(); + //BA.debugLineNum = 21;BA.debugLine="Private DaysTitlesPane As B4XView"; +_daystitlespane = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 22;BA.debugLine="Public FirstDay As Int = 0"; +_firstday = (int) (0); + //BA.debugLineNum = 23;BA.debugLine="Public MinYear = 1970, MaxYear = 2030 As Int"; +_minyear = (int) (1970); +_maxyear = (int) (2030); + //BA.debugLineNum = 24;BA.debugLine="Public btnMonthLeft As B4XView"; +_btnmonthleft = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 25;BA.debugLine="Public btnMonthRight As B4XView"; +_btnmonthright = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 26;BA.debugLine="Public btnYearLeft As B4XView"; +_btnyearleft = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 27;BA.debugLine="Public btnYearRight As B4XView"; +_btnyearright = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 28;BA.debugLine="Public lblMonth As B4XView"; +_lblmonth = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 29;BA.debugLine="Public lblYear As B4XView"; +_lblyear = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 30;BA.debugLine="Private pnlDialog As B4XView"; +_pnldialog = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 31;BA.debugLine="Private months As List"; +_months = new anywheresoftware.b4a.objects.collections.List(); + //BA.debugLineNum = 32;BA.debugLine="Private mDialog As B4XDialog"; +_mdialog = new keymon.lat.medicomed.b4xdialog(); + //BA.debugLineNum = 33;BA.debugLine="Public CloseOnSelection As Boolean = True"; +_closeonselection = __c.True; + //BA.debugLineNum = 34;BA.debugLine="Public DaysOfWeekNames As List"; +_daysofweeknames = new anywheresoftware.b4a.objects.collections.List(); + //BA.debugLineNum = 35;BA.debugLine="End Sub"; +return ""; +} +public String _dayspanefg_touch(int _action,float _x,float _y) throws Exception{ +anywheresoftware.b4a.objects.B4XViewWrapper _p = null; + //BA.debugLineNum = 167;BA.debugLine="Private Sub DaysPaneFg_Touch (Action As Int, X As"; + //BA.debugLineNum = 168;BA.debugLine="Dim p As B4XView = DaysPaneFg"; +_p = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_p = _dayspanefg; + //BA.debugLineNum = 169;BA.debugLine="HandleMouse(X, Y, Action <> p.TOUCH_ACTION_UP)"; +_handlemouse(_x,_y,_action!=_p.TOUCH_ACTION_UP); + //BA.debugLineNum = 170;BA.debugLine="End Sub"; +return ""; +} +public String _dialogclosed(int _result) throws Exception{ + //BA.debugLineNum = 193;BA.debugLine="Private Sub DialogClosed(Result As Int) 'ignore"; + //BA.debugLineNum = 194;BA.debugLine="If Result <> xui.DialogResponse_Positive Then"; +if (_result!=_xui.DialogResponse_Positive) { + //BA.debugLineNum = 195;BA.debugLine="setDate(PreviousSelectedDate)"; +_setdate(_previousselecteddate); + }; + //BA.debugLineNum = 197;BA.debugLine="End Sub"; +return ""; +} +public String _drawbox(anywheresoftware.b4a.objects.B4XCanvas _c,int _clr,int _x,int _y) throws Exception{ +anywheresoftware.b4a.objects.B4XCanvas.B4XRect _r = null; + //BA.debugLineNum = 91;BA.debugLine="Private Sub DrawBox(c As B4XCanvas, clr As Int, x"; + //BA.debugLineNum = 92;BA.debugLine="Dim r As B4XRect"; +_r = new anywheresoftware.b4a.objects.B4XCanvas.B4XRect(); + //BA.debugLineNum = 93;BA.debugLine="r.Initialize(x * boxW, y * boxH, x * boxW + boxW,"; +_r.Initialize((float) (_x*_boxw),(float) (_y*_boxh),(float) (_x*_boxw+_boxw),(float) (_y*_boxh+_boxh)); + //BA.debugLineNum = 94;BA.debugLine="c.DrawRect(r, clr, True, 1dip)"; +_c.DrawRect(_r,_clr,__c.True,(float) (__c.DipToCurrent((int) (1)))); + //BA.debugLineNum = 95;BA.debugLine="End Sub"; +return ""; +} +public String _drawdays() throws Exception{ long _firstdayofmonth = 0L; anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont _daysfont = null; int _day = 0; int _row = 0; -RDebugUtils.currentLine=48693248; - //BA.debugLineNum = 48693248;BA.debugLine="Private Sub DrawDays"; -RDebugUtils.currentLine=48693249; - //BA.debugLineNum = 48693249;BA.debugLine="lblMonth.Text = months.Get(month - 1)"; -__ref._lblmonth /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setText(BA.ObjectToCharSequence(__ref._months /*anywheresoftware.b4a.objects.collections.List*/ .Get((int) (__ref._month /*int*/ -1)))); -RDebugUtils.currentLine=48693250; - //BA.debugLineNum = 48693250;BA.debugLine="lblYear.Text = year"; -__ref._lblyear /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setText(BA.ObjectToCharSequence(__ref._year /*int*/ )); -RDebugUtils.currentLine=48693251; - //BA.debugLineNum = 48693251;BA.debugLine="SetYearsButtonState"; -__ref._setyearsbuttonstate /*String*/ (null); -RDebugUtils.currentLine=48693252; - //BA.debugLineNum = 48693252;BA.debugLine="cvs.ClearRect(cvs.TargetRect)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .ClearRect(__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect()); -RDebugUtils.currentLine=48693253; - //BA.debugLineNum = 48693253;BA.debugLine="cvsBackground.ClearRect(cvsBackground.TargetRect)"; -__ref._cvsbackground /*anywheresoftware.b4a.objects.B4XCanvas*/ .ClearRect(__ref._cvsbackground /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect()); -RDebugUtils.currentLine=48693254; - //BA.debugLineNum = 48693254;BA.debugLine="Dim firstDayOfMonth As Long = DateUtils.setDate(y"; -_firstdayofmonth = (long) (_dateutils._setdate(ba,__ref._year /*int*/ ,__ref._month /*int*/ ,(int) (1))-1); -RDebugUtils.currentLine=48693255; - //BA.debugLineNum = 48693255;BA.debugLine="dayOfWeekOffset = (7 + DateTime.GetDayOfWeek(firs"; -__ref._dayofweekoffset /*int*/ = (int) ((7+__c.DateTime.GetDayOfWeek(_firstdayofmonth)-__ref._firstday /*int*/ )%7); -RDebugUtils.currentLine=48693256; - //BA.debugLineNum = 48693256;BA.debugLine="daysInMonth = DateUtils.NumberOfDaysInMonth(month"; -__ref._daysinmonth /*int*/ = _dateutils._numberofdaysinmonth(ba,__ref._month /*int*/ ,__ref._year /*int*/ ); -RDebugUtils.currentLine=48693257; - //BA.debugLineNum = 48693257;BA.debugLine="If year = selectedYear And month = selectedMonth"; -if (__ref._year /*int*/ ==__ref._selectedyear /*int*/ && __ref._month /*int*/ ==__ref._selectedmonth /*int*/ ) { -RDebugUtils.currentLine=48693259; - //BA.debugLineNum = 48693259;BA.debugLine="DrawBox(cvs, SelectedColor, (selectedDay - 1 + d"; -__ref._drawbox /*String*/ (null,__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ ,__ref._selectedcolor /*int*/ ,(int) ((__ref._selectedday /*int*/ -1+__ref._dayofweekoffset /*int*/ )%7),(int) ((__ref._selectedday /*int*/ -1+__ref._dayofweekoffset /*int*/ )/(double)7)); + //BA.debugLineNum = 62;BA.debugLine="Private Sub DrawDays"; + //BA.debugLineNum = 63;BA.debugLine="lblMonth.Text = months.Get(month - 1)"; +_lblmonth.setText(BA.ObjectToCharSequence(_months.Get((int) (_month-1)))); + //BA.debugLineNum = 64;BA.debugLine="lblYear.Text = year"; +_lblyear.setText(BA.ObjectToCharSequence(_year)); + //BA.debugLineNum = 65;BA.debugLine="SetYearsButtonState"; +_setyearsbuttonstate(); + //BA.debugLineNum = 66;BA.debugLine="cvs.ClearRect(cvs.TargetRect)"; +_cvs.ClearRect(_cvs.getTargetRect()); + //BA.debugLineNum = 67;BA.debugLine="cvsBackground.ClearRect(cvsBackground.TargetRect)"; +_cvsbackground.ClearRect(_cvsbackground.getTargetRect()); + //BA.debugLineNum = 68;BA.debugLine="Dim firstDayOfMonth As Long = DateUtils.setDate(y"; +_firstdayofmonth = (long) (_dateutils._setdate(ba,_year,_month,(int) (1))-1); + //BA.debugLineNum = 69;BA.debugLine="dayOfWeekOffset = (7 + DateTime.GetDayOfWeek(firs"; +_dayofweekoffset = (int) ((7+__c.DateTime.GetDayOfWeek(_firstdayofmonth)-_firstday)%7); + //BA.debugLineNum = 70;BA.debugLine="daysInMonth = DateUtils.NumberOfDaysInMonth(month"; +_daysinmonth = _dateutils._numberofdaysinmonth(ba,_month,_year); + //BA.debugLineNum = 71;BA.debugLine="If year = selectedYear And month = selectedMonth"; +if (_year==_selectedyear && _month==_selectedmonth) { + //BA.debugLineNum = 73;BA.debugLine="DrawBox(cvs, SelectedColor, (selectedDay - 1 + d"; +_drawbox(_cvs,_selectedcolor,(int) ((_selectedday-1+_dayofweekoffset)%7),(int) ((_selectedday-1+_dayofweekoffset)/(double)7)); }; -RDebugUtils.currentLine=48693262; - //BA.debugLineNum = 48693262;BA.debugLine="Dim daysFont As B4XFont = xui.CreateDefaultBoldFo"; -_daysfont = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreateDefaultBoldFont((float) (14)); -RDebugUtils.currentLine=48693263; - //BA.debugLineNum = 48693263;BA.debugLine="For day = 1 To daysInMonth"; + //BA.debugLineNum = 76;BA.debugLine="Dim daysFont As B4XFont = xui.CreateDefaultBoldFo"; +_daysfont = _xui.CreateDefaultBoldFont((float) (14)); + //BA.debugLineNum = 77;BA.debugLine="For day = 1 To daysInMonth"; { final int step13 = 1; -final int limit13 = __ref._daysinmonth /*int*/ ; +final int limit13 = _daysinmonth; _day = (int) (1) ; for (;_day <= limit13 ;_day = _day + step13 ) { -RDebugUtils.currentLine=48693264; - //BA.debugLineNum = 48693264;BA.debugLine="Dim row As Int = (day - 1 + dayOfWeekOffset) / 7"; -_row = (int) ((_day-1+__ref._dayofweekoffset /*int*/ )/(double)7); -RDebugUtils.currentLine=48693265; - //BA.debugLineNum = 48693265;BA.debugLine="cvs.DrawText(day, (((dayOfWeekOffset + day - 1)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawText(ba,BA.NumberToString(_day),(float) ((((__ref._dayofweekoffset /*int*/ +_day-1)%7)+0.5)*__ref._boxw /*float*/ ),(float) ((_row+0.5)*__ref._boxh /*float*/ +__ref._vcorrection /*float*/ ),_daysfont,__ref._daysinmonthcolor /*int*/ ,BA.getEnumFromString(android.graphics.Paint.Align.class,"CENTER")); + //BA.debugLineNum = 78;BA.debugLine="Dim row As Int = (day - 1 + dayOfWeekOffset) / 7"; +_row = (int) ((_day-1+_dayofweekoffset)/(double)7); + //BA.debugLineNum = 79;BA.debugLine="cvs.DrawText(day, (((dayOfWeekOffset + day - 1)"; +_cvs.DrawText(ba,BA.NumberToString(_day),(float) ((((_dayofweekoffset+_day-1)%7)+0.5)*_boxw),(float) ((_row+0.5)*_boxh+_vcorrection),_daysfont,_daysinmonthcolor,BA.getEnumFromString(android.graphics.Paint.Align.class,"CENTER")); } }; -RDebugUtils.currentLine=48693268; - //BA.debugLineNum = 48693268;BA.debugLine="cvsBackground.Invalidate"; -__ref._cvsbackground /*anywheresoftware.b4a.objects.B4XCanvas*/ .Invalidate(); -RDebugUtils.currentLine=48693269; - //BA.debugLineNum = 48693269;BA.debugLine="cvs.Invalidate"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Invalidate(); -RDebugUtils.currentLine=48693270; - //BA.debugLineNum = 48693270;BA.debugLine="End Sub"; + //BA.debugLineNum = 82;BA.debugLine="cvsBackground.Invalidate"; +_cvsbackground.Invalidate(); + //BA.debugLineNum = 83;BA.debugLine="cvs.Invalidate"; +_cvs.Invalidate(); + //BA.debugLineNum = 84;BA.debugLine="End Sub"; return ""; } -public String _btnyear_click(keymon.lat.medicomed.b4xdatetemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdatetemplate"; -if (Debug.shouldDelegate(ba, "btnyear_click", true)) - {return ((String) Debug.delegate(ba, "btnyear_click", null));} -anywheresoftware.b4a.objects.B4XViewWrapper _btn = null; -RDebugUtils.currentLine=49217536; - //BA.debugLineNum = 49217536;BA.debugLine="Private Sub btnYear_Click"; -RDebugUtils.currentLine=49217537; - //BA.debugLineNum = 49217537;BA.debugLine="Dim btn As B4XView = Sender"; -_btn = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_btn = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba))); -RDebugUtils.currentLine=49217538; - //BA.debugLineNum = 49217538;BA.debugLine="year = year + btn.Tag"; -__ref._year /*int*/ = (int) (__ref._year /*int*/ +(double)(BA.ObjectToNumber(_btn.getTag()))); -RDebugUtils.currentLine=49217539; - //BA.debugLineNum = 49217539;BA.debugLine="DrawDays"; -__ref._drawdays /*String*/ (null); -RDebugUtils.currentLine=49217540; - //BA.debugLineNum = 49217540;BA.debugLine="End Sub"; -return ""; +public long _getdate() throws Exception{ + //BA.debugLineNum = 98;BA.debugLine="Public Sub getDate As Long"; + //BA.debugLineNum = 99;BA.debugLine="Return selectedDate"; +if (true) return _selecteddate; + //BA.debugLineNum = 100;BA.debugLine="End Sub"; +return 0L; } -public String _class_globals(keymon.lat.medicomed.b4xdatetemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdatetemplate"; -RDebugUtils.currentLine=48562176; - //BA.debugLineNum = 48562176;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=48562177; - //BA.debugLineNum = 48562177;BA.debugLine="Private xui As XUI"; -_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=48562178; - //BA.debugLineNum = 48562178;BA.debugLine="Private month, year As Int"; -_month = 0; -_year = 0; -RDebugUtils.currentLine=48562179; - //BA.debugLineNum = 48562179;BA.debugLine="Private boxW, boxH As Float"; -_boxw = 0f; -_boxh = 0f; -RDebugUtils.currentLine=48562180; - //BA.debugLineNum = 48562180;BA.debugLine="Private vCorrection As Float"; -_vcorrection = 0f; -RDebugUtils.currentLine=48562181; - //BA.debugLineNum = 48562181;BA.debugLine="Private tempSelectedDay As Int"; -_tempselectedday = 0; -RDebugUtils.currentLine=48562182; - //BA.debugLineNum = 48562182;BA.debugLine="Private dayOfWeekOffset As Int"; -_dayofweekoffset = 0; -RDebugUtils.currentLine=48562183; - //BA.debugLineNum = 48562183;BA.debugLine="Private daysInMonth As Int"; -_daysinmonth = 0; -RDebugUtils.currentLine=48562184; - //BA.debugLineNum = 48562184;BA.debugLine="Private DaysPaneBg As B4XView"; -_dayspanebg = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=48562185; - //BA.debugLineNum = 48562185;BA.debugLine="Private DaysPaneFg As B4XView"; -_dayspanefg = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=48562186; - //BA.debugLineNum = 48562186;BA.debugLine="Private cvs As B4XCanvas"; -_cvs = new anywheresoftware.b4a.objects.B4XCanvas(); -RDebugUtils.currentLine=48562187; - //BA.debugLineNum = 48562187;BA.debugLine="Private cvsBackground As B4XCanvas"; -_cvsbackground = new anywheresoftware.b4a.objects.B4XCanvas(); -RDebugUtils.currentLine=48562188; - //BA.debugLineNum = 48562188;BA.debugLine="Private selectedDate As Long"; -_selecteddate = 0L; -RDebugUtils.currentLine=48562189; - //BA.debugLineNum = 48562189;BA.debugLine="Private PreviousSelectedDate As Long"; -_previousselecteddate = 0L; -RDebugUtils.currentLine=48562190; - //BA.debugLineNum = 48562190;BA.debugLine="Private selectedYear, selectedMonth, selectedDay"; -_selectedyear = 0; -_selectedmonth = 0; -_selectedday = 0; -RDebugUtils.currentLine=48562191; - //BA.debugLineNum = 48562191;BA.debugLine="Public HighlightedColor As Int = 0xFF001BBD"; -_highlightedcolor = ((int)0xff001bbd); -RDebugUtils.currentLine=48562192; - //BA.debugLineNum = 48562192;BA.debugLine="Public SelectedColor As Int = 0xFF0BA29B"; -_selectedcolor = ((int)0xff0ba29b); -RDebugUtils.currentLine=48562193; - //BA.debugLineNum = 48562193;BA.debugLine="Public DaysInMonthColor As Int = xui.Color_White"; -_daysinmonthcolor = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_White; -RDebugUtils.currentLine=48562194; - //BA.debugLineNum = 48562194;BA.debugLine="Public DaysInWeekColor As Int = xui.Color_Gray"; -_daysinweekcolor = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Gray; -RDebugUtils.currentLine=48562195; - //BA.debugLineNum = 48562195;BA.debugLine="Private cvsDays As B4XCanvas"; -_cvsdays = new anywheresoftware.b4a.objects.B4XCanvas(); -RDebugUtils.currentLine=48562196; - //BA.debugLineNum = 48562196;BA.debugLine="Private DaysTitlesPane As B4XView"; -_daystitlespane = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=48562197; - //BA.debugLineNum = 48562197;BA.debugLine="Public FirstDay As Int = 0"; -_firstday = (int) (0); -RDebugUtils.currentLine=48562198; - //BA.debugLineNum = 48562198;BA.debugLine="Public MinYear = 1970, MaxYear = 2030 As Int"; -_minyear = (int) (1970); -_maxyear = (int) (2030); -RDebugUtils.currentLine=48562199; - //BA.debugLineNum = 48562199;BA.debugLine="Public btnMonthLeft As B4XView"; -_btnmonthleft = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=48562200; - //BA.debugLineNum = 48562200;BA.debugLine="Public btnMonthRight As B4XView"; -_btnmonthright = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=48562201; - //BA.debugLineNum = 48562201;BA.debugLine="Public btnYearLeft As B4XView"; -_btnyearleft = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=48562202; - //BA.debugLineNum = 48562202;BA.debugLine="Public btnYearRight As B4XView"; -_btnyearright = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=48562203; - //BA.debugLineNum = 48562203;BA.debugLine="Public lblMonth As B4XView"; -_lblmonth = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=48562204; - //BA.debugLineNum = 48562204;BA.debugLine="Public lblYear As B4XView"; -_lblyear = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=48562205; - //BA.debugLineNum = 48562205;BA.debugLine="Private pnlDialog As B4XView"; -_pnldialog = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=48562206; - //BA.debugLineNum = 48562206;BA.debugLine="Private months As List"; -_months = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=48562207; - //BA.debugLineNum = 48562207;BA.debugLine="Private mDialog As B4XDialog"; -_mdialog = new keymon.lat.medicomed.b4xdialog(); -RDebugUtils.currentLine=48562208; - //BA.debugLineNum = 48562208;BA.debugLine="Public CloseOnSelection As Boolean = True"; -_closeonselection = __c.True; -RDebugUtils.currentLine=48562209; - //BA.debugLineNum = 48562209;BA.debugLine="Public DaysOfWeekNames As List"; -_daysofweeknames = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=48562210; - //BA.debugLineNum = 48562210;BA.debugLine="End Sub"; -return ""; +public anywheresoftware.b4a.objects.B4XViewWrapper _getpanel(keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ + //BA.debugLineNum = 172;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; + //BA.debugLineNum = 173;BA.debugLine="Return pnlDialog"; +if (true) return _pnldialog; + //BA.debugLineNum = 174;BA.debugLine="End Sub"; +return null; } -public String _dayspanefg_touch(keymon.lat.medicomed.b4xdatetemplate __ref,int _action,float _x,float _y) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdatetemplate"; -if (Debug.shouldDelegate(ba, "dayspanefg_touch", true)) - {return ((String) Debug.delegate(ba, "dayspanefg_touch", new Object[] {_action,_x,_y}));} -anywheresoftware.b4a.objects.B4XViewWrapper _p = null; -RDebugUtils.currentLine=49348608; - //BA.debugLineNum = 49348608;BA.debugLine="Private Sub DaysPaneFg_Touch (Action As Int, X As"; -RDebugUtils.currentLine=49348609; - //BA.debugLineNum = 49348609;BA.debugLine="Dim p As B4XView = DaysPaneFg"; -_p = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_p = __ref._dayspanefg /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ; -RDebugUtils.currentLine=49348610; - //BA.debugLineNum = 49348610;BA.debugLine="HandleMouse(X, Y, Action <> p.TOUCH_ACTION_UP)"; -__ref._handlemouse /*String*/ (null,_x,_y,_action!=_p.TOUCH_ACTION_UP); -RDebugUtils.currentLine=49348611; - //BA.debugLineNum = 49348611;BA.debugLine="End Sub"; -return ""; -} -public String _handlemouse(keymon.lat.medicomed.b4xdatetemplate __ref,double _x,double _y,boolean _move) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdatetemplate"; -if (Debug.shouldDelegate(ba, "handlemouse", true)) - {return ((String) Debug.delegate(ba, "handlemouse", new Object[] {_x,_y,_move}));} +public String _handlemouse(double _x,double _y,boolean _move) throws Exception{ int _boxx = 0; int _boxy = 0; int _newselectedday = 0; boolean _validday = false; -RDebugUtils.currentLine=49086464; - //BA.debugLineNum = 49086464;BA.debugLine="Private Sub HandleMouse(x As Double, y As Double,"; -RDebugUtils.currentLine=49086465; - //BA.debugLineNum = 49086465;BA.debugLine="Dim boxX = x / boxW, boxY = y / boxH As Int"; -_boxx = (int) (_x/(double)__ref._boxw /*float*/ ); -_boxy = (int) (_y/(double)__ref._boxh /*float*/ ); -RDebugUtils.currentLine=49086466; - //BA.debugLineNum = 49086466;BA.debugLine="Dim newSelectedDay As Int = boxY * 7 + boxX + 1 -"; -_newselectedday = (int) (_boxy*7+_boxx+1-__ref._dayofweekoffset /*int*/ ); -RDebugUtils.currentLine=49086467; - //BA.debugLineNum = 49086467;BA.debugLine="Dim validDay As Boolean = newSelectedDay > 0 And"; -_validday = _newselectedday>0 && _newselectedday<=__ref._daysinmonth /*int*/ ; -RDebugUtils.currentLine=49086468; - //BA.debugLineNum = 49086468;BA.debugLine="If move Then"; + //BA.debugLineNum = 123;BA.debugLine="Private Sub HandleMouse(x As Double, y As Double,"; + //BA.debugLineNum = 124;BA.debugLine="Dim boxX = x / boxW, boxY = y / boxH As Int"; +_boxx = (int) (_x/(double)_boxw); +_boxy = (int) (_y/(double)_boxh); + //BA.debugLineNum = 125;BA.debugLine="Dim newSelectedDay As Int = boxY * 7 + boxX + 1 -"; +_newselectedday = (int) (_boxy*7+_boxx+1-_dayofweekoffset); + //BA.debugLineNum = 126;BA.debugLine="Dim validDay As Boolean = newSelectedDay > 0 And"; +_validday = _newselectedday>0 && _newselectedday<=_daysinmonth; + //BA.debugLineNum = 127;BA.debugLine="If move Then"; if (_move) { -RDebugUtils.currentLine=49086469; - //BA.debugLineNum = 49086469;BA.debugLine="If newSelectedDay = tempSelectedDay Then Return"; -if (_newselectedday==__ref._tempselectedday /*int*/ ) { + //BA.debugLineNum = 128;BA.debugLine="If newSelectedDay = tempSelectedDay Then Return"; +if (_newselectedday==_tempselectedday) { if (true) return "";}; -RDebugUtils.currentLine=49086470; - //BA.debugLineNum = 49086470;BA.debugLine="cvsBackground.ClearRect(cvsBackground.TargetRect"; -__ref._cvsbackground /*anywheresoftware.b4a.objects.B4XCanvas*/ .ClearRect(__ref._cvsbackground /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect()); -RDebugUtils.currentLine=49086471; - //BA.debugLineNum = 49086471;BA.debugLine="tempSelectedDay = newSelectedDay"; -__ref._tempselectedday /*int*/ = _newselectedday; -RDebugUtils.currentLine=49086472; - //BA.debugLineNum = 49086472;BA.debugLine="If validDay Then"; + //BA.debugLineNum = 129;BA.debugLine="cvsBackground.ClearRect(cvsBackground.TargetRect"; +_cvsbackground.ClearRect(_cvsbackground.getTargetRect()); + //BA.debugLineNum = 130;BA.debugLine="tempSelectedDay = newSelectedDay"; +_tempselectedday = _newselectedday; + //BA.debugLineNum = 131;BA.debugLine="If validDay Then"; if (_validday) { -RDebugUtils.currentLine=49086473; - //BA.debugLineNum = 49086473;BA.debugLine="DrawBox(cvsBackground, HighlightedColor, boxX,"; -__ref._drawbox /*String*/ (null,__ref._cvsbackground /*anywheresoftware.b4a.objects.B4XCanvas*/ ,__ref._highlightedcolor /*int*/ ,_boxx,_boxy); + //BA.debugLineNum = 132;BA.debugLine="DrawBox(cvsBackground, HighlightedColor, boxX,"; +_drawbox(_cvsbackground,_highlightedcolor,_boxx,_boxy); }; }else { -RDebugUtils.currentLine=49086476; - //BA.debugLineNum = 49086476;BA.debugLine="cvsBackground.ClearRect(cvsBackground.TargetRect"; -__ref._cvsbackground /*anywheresoftware.b4a.objects.B4XCanvas*/ .ClearRect(__ref._cvsbackground /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect()); -RDebugUtils.currentLine=49086477; - //BA.debugLineNum = 49086477;BA.debugLine="If validDay Then"; + //BA.debugLineNum = 135;BA.debugLine="cvsBackground.ClearRect(cvsBackground.TargetRect"; +_cvsbackground.ClearRect(_cvsbackground.getTargetRect()); + //BA.debugLineNum = 136;BA.debugLine="If validDay Then"; if (_validday) { -RDebugUtils.currentLine=49086478; - //BA.debugLineNum = 49086478;BA.debugLine="SelectDay(newSelectedDay)"; -__ref._selectday /*String*/ (null,_newselectedday); -RDebugUtils.currentLine=49086479; - //BA.debugLineNum = 49086479;BA.debugLine="If CloseOnSelection Then"; -if (__ref._closeonselection /*boolean*/ ) { -RDebugUtils.currentLine=49086480; - //BA.debugLineNum = 49086480;BA.debugLine="Hide"; -__ref._hide /*String*/ (null); + //BA.debugLineNum = 137;BA.debugLine="SelectDay(newSelectedDay)"; +_selectday(_newselectedday); + //BA.debugLineNum = 138;BA.debugLine="If CloseOnSelection Then"; +if (_closeonselection) { + //BA.debugLineNum = 139;BA.debugLine="Hide"; +_hide(); }else { -RDebugUtils.currentLine=49086482; - //BA.debugLineNum = 49086482;BA.debugLine="DrawDays"; -__ref._drawdays /*String*/ (null); + //BA.debugLineNum = 141;BA.debugLine="DrawDays"; +_drawdays(); }; }; }; -RDebugUtils.currentLine=49086487; - //BA.debugLineNum = 49086487;BA.debugLine="cvsBackground.Invalidate"; -__ref._cvsbackground /*anywheresoftware.b4a.objects.B4XCanvas*/ .Invalidate(); -RDebugUtils.currentLine=49086488; - //BA.debugLineNum = 49086488;BA.debugLine="End Sub"; + //BA.debugLineNum = 146;BA.debugLine="cvsBackground.Invalidate"; +_cvsbackground.Invalidate(); + //BA.debugLineNum = 147;BA.debugLine="End Sub"; return ""; } -public String _dialogclosed(keymon.lat.medicomed.b4xdatetemplate __ref,int _result) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdatetemplate"; -if (Debug.shouldDelegate(ba, "dialogclosed", true)) - {return ((String) Debug.delegate(ba, "dialogclosed", new Object[] {_result}));} -RDebugUtils.currentLine=49545216; - //BA.debugLineNum = 49545216;BA.debugLine="Private Sub DialogClosed(Result As Int) 'ignore"; -RDebugUtils.currentLine=49545217; - //BA.debugLineNum = 49545217;BA.debugLine="If Result <> xui.DialogResponse_Positive Then"; -if (_result!=__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .DialogResponse_Positive) { -RDebugUtils.currentLine=49545218; - //BA.debugLineNum = 49545218;BA.debugLine="setDate(PreviousSelectedDate)"; -__ref._setdate /*String*/ (null,__ref._previousselecteddate /*long*/ ); - }; -RDebugUtils.currentLine=49545220; - //BA.debugLineNum = 49545220;BA.debugLine="End Sub"; +public String _hide() throws Exception{ + //BA.debugLineNum = 149;BA.debugLine="Private Sub Hide"; + //BA.debugLineNum = 150;BA.debugLine="mDialog.Close(xui.DialogResponse_Positive)"; +_mdialog._close /*boolean*/ (_xui.DialogResponse_Positive); + //BA.debugLineNum = 151;BA.debugLine="End Sub"; return ""; } -public String _setdate(keymon.lat.medicomed.b4xdatetemplate __ref,long _date) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdatetemplate"; -if (Debug.shouldDelegate(ba, "setdate", true)) - {return ((String) Debug.delegate(ba, "setdate", new Object[] {_date}));} -RDebugUtils.currentLine=48955392; - //BA.debugLineNum = 48955392;BA.debugLine="Public Sub setDate(date As Long)"; -RDebugUtils.currentLine=48955394; - //BA.debugLineNum = 48955394;BA.debugLine="If lblYear.IsInitialized = False Then"; -if (__ref._lblyear /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .IsInitialized()==__c.False) { -RDebugUtils.currentLine=48955395; - //BA.debugLineNum = 48955395;BA.debugLine="selectedDate = date"; -__ref._selecteddate /*long*/ = _date; -RDebugUtils.currentLine=48955396; - //BA.debugLineNum = 48955396;BA.debugLine="Return 'the date will be set after the layout is"; +public String _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 37;BA.debugLine="Public Sub Initialize"; + //BA.debugLineNum = 38;BA.debugLine="pnlDialog = xui.CreatePanel(\"\")"; +_pnldialog = _xui.CreatePanel(ba,""); + //BA.debugLineNum = 39;BA.debugLine="pnlDialog.SetLayoutAnimated(0, 0, 0, 320dip,300di"; +_pnldialog.SetLayoutAnimated((int) (0),(int) (0),(int) (0),__c.DipToCurrent((int) (320)),__c.DipToCurrent((int) (300))); + //BA.debugLineNum = 40;BA.debugLine="pnlDialog.LoadLayout(\"DateTemplate\")"; +_pnldialog.LoadLayout("DateTemplate",ba); + //BA.debugLineNum = 41;BA.debugLine="pnlDialog.Tag = Me"; +_pnldialog.setTag(this); + //BA.debugLineNum = 42;BA.debugLine="month = DateTime.GetMonth(DateTime.Now)"; +_month = __c.DateTime.GetMonth(__c.DateTime.getNow()); + //BA.debugLineNum = 43;BA.debugLine="year = DateTime.GetYear(DateTime.Now)"; +_year = __c.DateTime.GetYear(__c.DateTime.getNow()); + //BA.debugLineNum = 44;BA.debugLine="months = DateUtils.GetMonthsNames"; +_months = _dateutils._getmonthsnames(ba); + //BA.debugLineNum = 45;BA.debugLine="selectedDate = DateTime.Now"; +_selecteddate = __c.DateTime.getNow(); + //BA.debugLineNum = 46;BA.debugLine="setDate(selectedDate)"; +_setdate(_selecteddate); + //BA.debugLineNum = 47;BA.debugLine="cvs.Initialize(DaysPaneFg)"; +_cvs.Initialize(_dayspanefg); + //BA.debugLineNum = 48;BA.debugLine="cvsBackground.Initialize(DaysPaneBg)"; +_cvsbackground.Initialize(_dayspanebg); + //BA.debugLineNum = 49;BA.debugLine="boxW = cvs.TargetRect.Width / 7"; +_boxw = (float) (_cvs.getTargetRect().getWidth()/(double)7); + //BA.debugLineNum = 50;BA.debugLine="boxH = cvs.TargetRect.Height / 6"; +_boxh = (float) (_cvs.getTargetRect().getHeight()/(double)6); + //BA.debugLineNum = 51;BA.debugLine="vCorrection = 5dip"; +_vcorrection = (float) (__c.DipToCurrent((int) (5))); + //BA.debugLineNum = 52;BA.debugLine="cvsDays.Initialize(DaysTitlesPane)"; +_cvsdays.Initialize(_daystitlespane); + //BA.debugLineNum = 58;BA.debugLine="DaysOfWeekNames.Initialize"; +_daysofweeknames.Initialize(); + //BA.debugLineNum = 59;BA.debugLine="DaysOfWeekNames.AddAll(DateUtils.GetDaysNames)"; +_daysofweeknames.AddAll(_dateutils._getdaysnames(ba)); + //BA.debugLineNum = 60;BA.debugLine="End Sub"; +return ""; +} +public String _selectday(int _day) throws Exception{ + //BA.debugLineNum = 115;BA.debugLine="Private Sub SelectDay(day As Int)"; + //BA.debugLineNum = 116;BA.debugLine="selectedDate = DateUtils.setDate(year, month, day"; +_selecteddate = _dateutils._setdate(ba,_year,_month,_day); + //BA.debugLineNum = 117;BA.debugLine="selectedDay = day"; +_selectedday = _day; + //BA.debugLineNum = 118;BA.debugLine="selectedMonth = month"; +_selectedmonth = _month; + //BA.debugLineNum = 119;BA.debugLine="selectedYear = year"; +_selectedyear = _year; + //BA.debugLineNum = 120;BA.debugLine="End Sub"; +return ""; +} +public String _setdate(long _date) throws Exception{ + //BA.debugLineNum = 102;BA.debugLine="Public Sub setDate(date As Long)"; + //BA.debugLineNum = 104;BA.debugLine="If lblYear.IsInitialized = False Then"; +if (_lblyear.IsInitialized()==__c.False) { + //BA.debugLineNum = 105;BA.debugLine="selectedDate = date"; +_selecteddate = _date; + //BA.debugLineNum = 106;BA.debugLine="Return 'the date will be set after the layout is"; if (true) return ""; }; -RDebugUtils.currentLine=48955398; - //BA.debugLineNum = 48955398;BA.debugLine="year = DateTime.GetYear(date)"; -__ref._year /*int*/ = __c.DateTime.GetYear(_date); -RDebugUtils.currentLine=48955399; - //BA.debugLineNum = 48955399;BA.debugLine="month = DateTime.GetMonth(date)"; -__ref._month /*int*/ = __c.DateTime.GetMonth(_date); -RDebugUtils.currentLine=48955400; - //BA.debugLineNum = 48955400;BA.debugLine="SelectDay(DateTime.GetDayOfMonth(date))"; -__ref._selectday /*String*/ (null,__c.DateTime.GetDayOfMonth(_date)); -RDebugUtils.currentLine=48955401; - //BA.debugLineNum = 48955401;BA.debugLine="lblYear.Text = year"; -__ref._lblyear /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setText(BA.ObjectToCharSequence(__ref._year /*int*/ )); -RDebugUtils.currentLine=48955402; - //BA.debugLineNum = 48955402;BA.debugLine="lblMonth.Text = months.Get(month - 1)"; -__ref._lblmonth /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setText(BA.ObjectToCharSequence(__ref._months /*anywheresoftware.b4a.objects.collections.List*/ .Get((int) (__ref._month /*int*/ -1)))); -RDebugUtils.currentLine=48955403; - //BA.debugLineNum = 48955403;BA.debugLine="End Sub"; + //BA.debugLineNum = 108;BA.debugLine="year = DateTime.GetYear(date)"; +_year = __c.DateTime.GetYear(_date); + //BA.debugLineNum = 109;BA.debugLine="month = DateTime.GetMonth(date)"; +_month = __c.DateTime.GetMonth(_date); + //BA.debugLineNum = 110;BA.debugLine="SelectDay(DateTime.GetDayOfMonth(date))"; +_selectday(__c.DateTime.GetDayOfMonth(_date)); + //BA.debugLineNum = 111;BA.debugLine="lblYear.Text = year"; +_lblyear.setText(BA.ObjectToCharSequence(_year)); + //BA.debugLineNum = 112;BA.debugLine="lblMonth.Text = months.Get(month - 1)"; +_lblmonth.setText(BA.ObjectToCharSequence(_months.Get((int) (_month-1)))); + //BA.debugLineNum = 113;BA.debugLine="End Sub"; return ""; } -public String _drawbox(keymon.lat.medicomed.b4xdatetemplate __ref,anywheresoftware.b4a.objects.B4XCanvas _c,int _clr,int _x,int _y) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdatetemplate"; -if (Debug.shouldDelegate(ba, "drawbox", true)) - {return ((String) Debug.delegate(ba, "drawbox", new Object[] {_c,_clr,_x,_y}));} -anywheresoftware.b4a.objects.B4XCanvas.B4XRect _r = null; -RDebugUtils.currentLine=48824320; - //BA.debugLineNum = 48824320;BA.debugLine="Private Sub DrawBox(c As B4XCanvas, clr As Int, x"; -RDebugUtils.currentLine=48824321; - //BA.debugLineNum = 48824321;BA.debugLine="Dim r As B4XRect"; -_r = new anywheresoftware.b4a.objects.B4XCanvas.B4XRect(); -RDebugUtils.currentLine=48824322; - //BA.debugLineNum = 48824322;BA.debugLine="r.Initialize(x * boxW, y * boxH, x * boxW + boxW,"; -_r.Initialize((float) (_x*__ref._boxw /*float*/ ),(float) (_y*__ref._boxh /*float*/ ),(float) (_x*__ref._boxw /*float*/ +__ref._boxw /*float*/ ),(float) (_y*__ref._boxh /*float*/ +__ref._boxh /*float*/ )); -RDebugUtils.currentLine=48824323; - //BA.debugLineNum = 48824323;BA.debugLine="c.DrawRect(r, clr, True, 1dip)"; -_c.DrawRect(_r,_clr,__c.True,(float) (__c.DipToCurrent((int) (1)))); -RDebugUtils.currentLine=48824324; - //BA.debugLineNum = 48824324;BA.debugLine="End Sub"; +public String _setyearsbuttonstate() throws Exception{ + //BA.debugLineNum = 86;BA.debugLine="Private Sub SetYearsButtonState"; + //BA.debugLineNum = 87;BA.debugLine="btnYearLeft.Enabled = year > MinYear"; +_btnyearleft.setEnabled(_year>_minyear); + //BA.debugLineNum = 88;BA.debugLine="btnYearRight.Enabled = year < MaxYear"; +_btnyearright.setEnabled(_year<_maxyear); + //BA.debugLineNum = 89;BA.debugLine="End Sub"; return ""; } -public String _setyearsbuttonstate(keymon.lat.medicomed.b4xdatetemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdatetemplate"; -if (Debug.shouldDelegate(ba, "setyearsbuttonstate", true)) - {return ((String) Debug.delegate(ba, "setyearsbuttonstate", null));} -RDebugUtils.currentLine=48758784; - //BA.debugLineNum = 48758784;BA.debugLine="Private Sub SetYearsButtonState"; -RDebugUtils.currentLine=48758785; - //BA.debugLineNum = 48758785;BA.debugLine="btnYearLeft.Enabled = year > MinYear"; -__ref._btnyearleft /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setEnabled(__ref._year /*int*/ >__ref._minyear /*int*/ ); -RDebugUtils.currentLine=48758786; - //BA.debugLineNum = 48758786;BA.debugLine="btnYearRight.Enabled = year < MaxYear"; -__ref._btnyearright /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setEnabled(__ref._year /*int*/ <__ref._maxyear /*int*/ ); -RDebugUtils.currentLine=48758787; - //BA.debugLineNum = 48758787;BA.debugLine="End Sub"; -return ""; -} -public long _getdate(keymon.lat.medicomed.b4xdatetemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdatetemplate"; -if (Debug.shouldDelegate(ba, "getdate", true)) - {return ((Long) Debug.delegate(ba, "getdate", null));} -RDebugUtils.currentLine=48889856; - //BA.debugLineNum = 48889856;BA.debugLine="Public Sub getDate As Long"; -RDebugUtils.currentLine=48889857; - //BA.debugLineNum = 48889857;BA.debugLine="Return selectedDate"; -if (true) return __ref._selecteddate /*long*/ ; -RDebugUtils.currentLine=48889858; - //BA.debugLineNum = 48889858;BA.debugLine="End Sub"; -return 0L; -} -public anywheresoftware.b4a.objects.B4XViewWrapper _getpanel(keymon.lat.medicomed.b4xdatetemplate __ref,keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdatetemplate"; -if (Debug.shouldDelegate(ba, "getpanel", true)) - {return ((anywheresoftware.b4a.objects.B4XViewWrapper) Debug.delegate(ba, "getpanel", new Object[] {_dialog}));} -RDebugUtils.currentLine=49414144; - //BA.debugLineNum = 49414144;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; -RDebugUtils.currentLine=49414145; - //BA.debugLineNum = 49414145;BA.debugLine="Return pnlDialog"; -if (true) return __ref._pnldialog /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ; -RDebugUtils.currentLine=49414146; - //BA.debugLineNum = 49414146;BA.debugLine="End Sub"; -return null; -} -public String _selectday(keymon.lat.medicomed.b4xdatetemplate __ref,int _day) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdatetemplate"; -if (Debug.shouldDelegate(ba, "selectday", true)) - {return ((String) Debug.delegate(ba, "selectday", new Object[] {_day}));} -RDebugUtils.currentLine=49020928; - //BA.debugLineNum = 49020928;BA.debugLine="Private Sub SelectDay(day As Int)"; -RDebugUtils.currentLine=49020929; - //BA.debugLineNum = 49020929;BA.debugLine="selectedDate = DateUtils.setDate(year, month, day"; -__ref._selecteddate /*long*/ = _dateutils._setdate(ba,__ref._year /*int*/ ,__ref._month /*int*/ ,_day); -RDebugUtils.currentLine=49020930; - //BA.debugLineNum = 49020930;BA.debugLine="selectedDay = day"; -__ref._selectedday /*int*/ = _day; -RDebugUtils.currentLine=49020931; - //BA.debugLineNum = 49020931;BA.debugLine="selectedMonth = month"; -__ref._selectedmonth /*int*/ = __ref._month /*int*/ ; -RDebugUtils.currentLine=49020932; - //BA.debugLineNum = 49020932;BA.debugLine="selectedYear = year"; -__ref._selectedyear /*int*/ = __ref._year /*int*/ ; -RDebugUtils.currentLine=49020933; - //BA.debugLineNum = 49020933;BA.debugLine="End Sub"; -return ""; -} -public String _hide(keymon.lat.medicomed.b4xdatetemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdatetemplate"; -if (Debug.shouldDelegate(ba, "hide", true)) - {return ((String) Debug.delegate(ba, "hide", null));} -RDebugUtils.currentLine=49152000; - //BA.debugLineNum = 49152000;BA.debugLine="Private Sub Hide"; -RDebugUtils.currentLine=49152001; - //BA.debugLineNum = 49152001;BA.debugLine="mDialog.Close(xui.DialogResponse_Positive)"; -__ref._mdialog /*keymon.lat.medicomed.b4xdialog*/ ._close /*boolean*/ (null,__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .DialogResponse_Positive); -RDebugUtils.currentLine=49152002; - //BA.debugLineNum = 49152002;BA.debugLine="End Sub"; -return ""; -} -public String _initialize(keymon.lat.medicomed.b4xdatetemplate __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="b4xdatetemplate"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=48627712; - //BA.debugLineNum = 48627712;BA.debugLine="Public Sub Initialize"; -RDebugUtils.currentLine=48627713; - //BA.debugLineNum = 48627713;BA.debugLine="pnlDialog = xui.CreatePanel(\"\")"; -__ref._pnldialog /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,""); -RDebugUtils.currentLine=48627714; - //BA.debugLineNum = 48627714;BA.debugLine="pnlDialog.SetLayoutAnimated(0, 0, 0, 320dip,300di"; -__ref._pnldialog /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),__c.DipToCurrent((int) (320)),__c.DipToCurrent((int) (300))); -RDebugUtils.currentLine=48627715; - //BA.debugLineNum = 48627715;BA.debugLine="pnlDialog.LoadLayout(\"DateTemplate\")"; -__ref._pnldialog /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .LoadLayout("DateTemplate",ba); -RDebugUtils.currentLine=48627716; - //BA.debugLineNum = 48627716;BA.debugLine="pnlDialog.Tag = Me"; -__ref._pnldialog /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag(this); -RDebugUtils.currentLine=48627717; - //BA.debugLineNum = 48627717;BA.debugLine="month = DateTime.GetMonth(DateTime.Now)"; -__ref._month /*int*/ = __c.DateTime.GetMonth(__c.DateTime.getNow()); -RDebugUtils.currentLine=48627718; - //BA.debugLineNum = 48627718;BA.debugLine="year = DateTime.GetYear(DateTime.Now)"; -__ref._year /*int*/ = __c.DateTime.GetYear(__c.DateTime.getNow()); -RDebugUtils.currentLine=48627719; - //BA.debugLineNum = 48627719;BA.debugLine="months = DateUtils.GetMonthsNames"; -__ref._months /*anywheresoftware.b4a.objects.collections.List*/ = _dateutils._getmonthsnames(ba); -RDebugUtils.currentLine=48627720; - //BA.debugLineNum = 48627720;BA.debugLine="selectedDate = DateTime.Now"; -__ref._selecteddate /*long*/ = __c.DateTime.getNow(); -RDebugUtils.currentLine=48627721; - //BA.debugLineNum = 48627721;BA.debugLine="setDate(selectedDate)"; -__ref._setdate /*String*/ (null,__ref._selecteddate /*long*/ ); -RDebugUtils.currentLine=48627722; - //BA.debugLineNum = 48627722;BA.debugLine="cvs.Initialize(DaysPaneFg)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Initialize(__ref._dayspanefg /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ); -RDebugUtils.currentLine=48627723; - //BA.debugLineNum = 48627723;BA.debugLine="cvsBackground.Initialize(DaysPaneBg)"; -__ref._cvsbackground /*anywheresoftware.b4a.objects.B4XCanvas*/ .Initialize(__ref._dayspanebg /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ); -RDebugUtils.currentLine=48627724; - //BA.debugLineNum = 48627724;BA.debugLine="boxW = cvs.TargetRect.Width / 7"; -__ref._boxw /*float*/ = (float) (__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getWidth()/(double)7); -RDebugUtils.currentLine=48627725; - //BA.debugLineNum = 48627725;BA.debugLine="boxH = cvs.TargetRect.Height / 6"; -__ref._boxh /*float*/ = (float) (__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getHeight()/(double)6); -RDebugUtils.currentLine=48627726; - //BA.debugLineNum = 48627726;BA.debugLine="vCorrection = 5dip"; -__ref._vcorrection /*float*/ = (float) (__c.DipToCurrent((int) (5))); -RDebugUtils.currentLine=48627727; - //BA.debugLineNum = 48627727;BA.debugLine="cvsDays.Initialize(DaysTitlesPane)"; -__ref._cvsdays /*anywheresoftware.b4a.objects.B4XCanvas*/ .Initialize(__ref._daystitlespane /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ); -RDebugUtils.currentLine=48627733; - //BA.debugLineNum = 48627733;BA.debugLine="DaysOfWeekNames.Initialize"; -__ref._daysofweeknames /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=48627734; - //BA.debugLineNum = 48627734;BA.debugLine="DaysOfWeekNames.AddAll(DateUtils.GetDaysNames)"; -__ref._daysofweeknames /*anywheresoftware.b4a.objects.collections.List*/ .AddAll(_dateutils._getdaysnames(ba)); -RDebugUtils.currentLine=48627735; - //BA.debugLineNum = 48627735;BA.debugLine="End Sub"; -return ""; -} -public void _show(keymon.lat.medicomed.b4xdatetemplate __ref,keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ -RDebugUtils.currentModule="b4xdatetemplate"; -if (Debug.shouldDelegate(ba, "show", true)) - {Debug.delegate(ba, "show", new Object[] {_dialog}); return;} -ResumableSub_Show rsub = new ResumableSub_Show(this,__ref,_dialog); +public void _show(keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ +ResumableSub_Show rsub = new ResumableSub_Show(this,_dialog); rsub.resume(ba, null); } public static class ResumableSub_Show extends BA.ResumableSub { -public ResumableSub_Show(keymon.lat.medicomed.b4xdatetemplate parent,keymon.lat.medicomed.b4xdatetemplate __ref,keymon.lat.medicomed.b4xdialog _dialog) { +public ResumableSub_Show(keymon.lat.medicomed.b4xdatetemplate parent,keymon.lat.medicomed.b4xdialog _dialog) { this.parent = parent; -this.__ref = __ref; this._dialog = _dialog; -this.__ref = parent; } -keymon.lat.medicomed.b4xdatetemplate __ref; keymon.lat.medicomed.b4xdatetemplate parent; keymon.lat.medicomed.b4xdialog _dialog; anywheresoftware.b4a.objects.collections.List _days = null; @@ -648,7 +434,6 @@ int limit4; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="b4xdatetemplate"; while (true) { switch (state) { @@ -658,26 +443,22 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=49479681; - //BA.debugLineNum = 49479681;BA.debugLine="Dim days As List = DaysOfWeekNames"; + //BA.debugLineNum = 177;BA.debugLine="Dim days As List = DaysOfWeekNames"; _days = new anywheresoftware.b4a.objects.collections.List(); -_days = __ref._daysofweeknames /*anywheresoftware.b4a.objects.collections.List*/ ; -RDebugUtils.currentLine=49479682; - //BA.debugLineNum = 49479682;BA.debugLine="Dim daysFont As B4XFont = xui.CreateDefaultBoldFo"; -_daysfont = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreateDefaultBoldFont((float) (14)); -RDebugUtils.currentLine=49479683; - //BA.debugLineNum = 49479683;BA.debugLine="cvsDays.ClearRect(cvsDays.TargetRect)"; -__ref._cvsdays /*anywheresoftware.b4a.objects.B4XCanvas*/ .ClearRect(__ref._cvsdays /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect()); -RDebugUtils.currentLine=49479684; - //BA.debugLineNum = 49479684;BA.debugLine="For i = FirstDay To FirstDay + 7 - 1"; +_days = parent._daysofweeknames; + //BA.debugLineNum = 178;BA.debugLine="Dim daysFont As B4XFont = xui.CreateDefaultBoldFo"; +_daysfont = parent._xui.CreateDefaultBoldFont((float) (14)); + //BA.debugLineNum = 179;BA.debugLine="cvsDays.ClearRect(cvsDays.TargetRect)"; +parent._cvsdays.ClearRect(parent._cvsdays.getTargetRect()); + //BA.debugLineNum = 180;BA.debugLine="For i = FirstDay To FirstDay + 7 - 1"; if (true) break; case 1: //for this.state = 10; step4 = 1; -limit4 = (int) (__ref._firstday /*int*/ +7-1); -_i = __ref._firstday /*int*/ ; +limit4 = (int) (parent._firstday+7-1); +_i = parent._firstday ; this.state = 11; if (true) break; @@ -696,11 +477,9 @@ if (true) break; case 3: //C this.state = 4; -RDebugUtils.currentLine=49479685; - //BA.debugLineNum = 49479685;BA.debugLine="Dim d As String = days.Get(i Mod 7)"; + //BA.debugLineNum = 181;BA.debugLine="Dim d As String = days.Get(i Mod 7)"; _d = BA.ObjectToString(_days.Get((int) (_i%7))); -RDebugUtils.currentLine=49479686; - //BA.debugLineNum = 49479686;BA.debugLine="If d.Length > 2 Then d = d.SubString2(0, 2)"; + //BA.debugLineNum = 182;BA.debugLine="If d.Length > 2 Then d = d.SubString2(0, 2)"; if (true) break; case 4: @@ -720,9 +499,8 @@ case 9: //C this.state = 12; ; -RDebugUtils.currentLine=49479687; - //BA.debugLineNum = 49479687;BA.debugLine="cvsDays.DrawText(d, (i - FirstDay + 0.5) * boxW,"; -__ref._cvsdays /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawText(ba,_d,(float) ((_i-__ref._firstday /*int*/ +0.5)*__ref._boxw /*float*/ ),(float) (parent.__c.DipToCurrent((int) (20))),_daysfont,__ref._daysinweekcolor /*int*/ ,BA.getEnumFromString(android.graphics.Paint.Align.class,"CENTER")); + //BA.debugLineNum = 183;BA.debugLine="cvsDays.DrawText(d, (i - FirstDay + 0.5) * boxW,"; +parent._cvsdays.DrawText(ba,_d,(float) ((_i-parent._firstday+0.5)*parent._boxw),(float) (parent.__c.DipToCurrent((int) (20))),_daysfont,parent._daysinweekcolor,BA.getEnumFromString(android.graphics.Paint.Align.class,"CENTER")); if (true) break; if (true) break; @@ -730,36 +508,37 @@ case 10: //C this.state = -1; ; -RDebugUtils.currentLine=49479689; - //BA.debugLineNum = 49479689;BA.debugLine="cvsDays.Invalidate"; -__ref._cvsdays /*anywheresoftware.b4a.objects.B4XCanvas*/ .Invalidate(); -RDebugUtils.currentLine=49479690; - //BA.debugLineNum = 49479690;BA.debugLine="mDialog = Dialog"; -__ref._mdialog /*keymon.lat.medicomed.b4xdialog*/ = _dialog; -RDebugUtils.currentLine=49479691; - //BA.debugLineNum = 49479691;BA.debugLine="DrawDays"; -__ref._drawdays /*String*/ (null); -RDebugUtils.currentLine=49479692; - //BA.debugLineNum = 49479692;BA.debugLine="PreviousSelectedDate = selectedDate"; -__ref._previousselecteddate /*long*/ = __ref._selecteddate /*long*/ ; -RDebugUtils.currentLine=49479693; - //BA.debugLineNum = 49479693;BA.debugLine="Sleep(0)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "b4xdatetemplate", "show"),(int) (0)); + //BA.debugLineNum = 185;BA.debugLine="cvsDays.Invalidate"; +parent._cvsdays.Invalidate(); + //BA.debugLineNum = 186;BA.debugLine="mDialog = Dialog"; +parent._mdialog = _dialog; + //BA.debugLineNum = 187;BA.debugLine="DrawDays"; +parent._drawdays(); + //BA.debugLineNum = 188;BA.debugLine="PreviousSelectedDate = selectedDate"; +parent._previousselecteddate = parent._selecteddate; + //BA.debugLineNum = 189;BA.debugLine="Sleep(0)"; +parent.__c.Sleep(ba,this,(int) (0)); this.state = 13; return; case 13: //C this.state = -1; ; -RDebugUtils.currentLine=49479694; - //BA.debugLineNum = 49479694;BA.debugLine="SetYearsButtonState"; -__ref._setyearsbuttonstate /*String*/ (null); -RDebugUtils.currentLine=49479695; - //BA.debugLineNum = 49479695;BA.debugLine="End Sub"; + //BA.debugLineNum = 190;BA.debugLine="SetYearsButtonState"; +parent._setyearsbuttonstate(); + //BA.debugLineNum = 191;BA.debugLine="End Sub"; if (true) break; } } } } -} \ No newline at end of file +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +if (BA.fastSubCompare(sub, "DIALOGCLOSED")) + return _dialogclosed(((Number)args[0]).intValue()); +if (BA.fastSubCompare(sub, "GETPANEL")) + return _getpanel((keymon.lat.medicomed.b4xdialog) args[0]); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xdialog.java b/B4A/Objects/src/keymon/lat/medicomed/b4xdialog.java index 18816d9..41d08f2 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xdialog.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xdialog.java @@ -10,7 +10,7 @@ public class b4xdialog extends B4AClass.ImplB4AClass implements BA.SubDelegator{ private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xdialog"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xdialog"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xdialog extends B4AClass.ImplB4AClass implements BA.SubDelegator{ 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.keywords.Common __c = null; public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; public int _buttonsheight = 0; public int _titlebarheight = 0; @@ -72,57 +65,17 @@ 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 boolean _close(keymon.lat.medicomed.b4xdialog __ref,int _result) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdialog"; -if (Debug.shouldDelegate(ba, "close", true)) - {return ((Boolean) Debug.delegate(ba, "close", new Object[] {_result}));} -RDebugUtils.currentLine=50266112; - //BA.debugLineNum = 50266112;BA.debugLine="Public Sub Close (Result As Int) As Boolean"; -RDebugUtils.currentLine=50266113; - //BA.debugLineNum = 50266113;BA.debugLine="If getVisible Then"; -if (__ref._getvisible /*boolean*/ (null)) { -RDebugUtils.currentLine=50266114; - //BA.debugLineNum = 50266114;BA.debugLine="CallSubDelayed2(Me, \"CloseMessage\", Result)"; -__c.CallSubDelayed2(ba,this,"CloseMessage",(Object)(_result)); -RDebugUtils.currentLine=50266115; - //BA.debugLineNum = 50266115;BA.debugLine="Return True"; -if (true) return __c.True; - }; -RDebugUtils.currentLine=50266117; - //BA.debugLineNum = 50266117;BA.debugLine="Return False"; -if (true) return __c.False; -RDebugUtils.currentLine=50266118; - //BA.debugLineNum = 50266118;BA.debugLine="End Sub"; -return false; -} -public String _background_click(keymon.lat.medicomed.b4xdialog __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdialog"; -if (Debug.shouldDelegate(ba, "background_click", true)) - {return ((String) Debug.delegate(ba, "background_click", null));} -RDebugUtils.currentLine=50397184; - //BA.debugLineNum = 50397184;BA.debugLine="Private Sub Background_Click"; -RDebugUtils.currentLine=50397186; - //BA.debugLineNum = 50397186;BA.debugLine="End Sub"; +public String _background_click() throws Exception{ + //BA.debugLineNum = 258;BA.debugLine="Private Sub Background_Click"; + //BA.debugLineNum = 260;BA.debugLine="End Sub"; return ""; } -public String _background_touch(keymon.lat.medicomed.b4xdialog __ref,int _action,float _x,float _y) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdialog"; -if (Debug.shouldDelegate(ba, "background_touch", true)) - {return ((String) Debug.delegate(ba, "background_touch", new Object[] {_action,_x,_y}));} -RDebugUtils.currentLine=50331648; - //BA.debugLineNum = 50331648;BA.debugLine="Private Sub Background_Touch (Action As Int, X As"; -RDebugUtils.currentLine=50331650; - //BA.debugLineNum = 50331650;BA.debugLine="End Sub"; +public String _background_touch(int _action,float _x,float _y) throws Exception{ + //BA.debugLineNum = 253;BA.debugLine="Private Sub Background_Touch (Action As Int, X As"; + //BA.debugLineNum = 255;BA.debugLine="End Sub"; return ""; } -public b4a.example.bitmapcreator _blur(keymon.lat.medicomed.b4xdialog __ref,anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _bmp) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdialog"; -if (Debug.shouldDelegate(ba, "blur", true)) - {return ((b4a.example.bitmapcreator) Debug.delegate(ba, "blur", new Object[] {_bmp}));} +public b4a.example.bitmapcreator _blur(anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _bmp) throws Exception{ b4a.example.bitmapcreator _bc = null; int _reducescale = 0; int _count = 0; @@ -132,25 +85,18 @@ int _m = 0; int _steps = 0; int _y = 0; int _x = 0; -RDebugUtils.currentLine=50593792; - //BA.debugLineNum = 50593792;BA.debugLine="Private Sub Blur (bmp As B4XBitmap) As BitmapCreat"; -RDebugUtils.currentLine=50593793; - //BA.debugLineNum = 50593793;BA.debugLine="Dim bc As BitmapCreator"; + //BA.debugLineNum = 287;BA.debugLine="Private Sub Blur (bmp As B4XBitmap) As BitmapCreat"; + //BA.debugLineNum = 288;BA.debugLine="Dim bc As BitmapCreator"; _bc = new b4a.example.bitmapcreator(); -RDebugUtils.currentLine=50593794; - //BA.debugLineNum = 50593794;BA.debugLine="Dim ReduceScale As Int = BlurReduceScale"; -_reducescale = __ref._blurreducescale /*int*/ ; -RDebugUtils.currentLine=50593795; - //BA.debugLineNum = 50593795;BA.debugLine="bc.Initialize(bmp.Width / ReduceScale / bmp.Scale"; + //BA.debugLineNum = 289;BA.debugLine="Dim ReduceScale As Int = BlurReduceScale"; +_reducescale = _blurreducescale; + //BA.debugLineNum = 290;BA.debugLine="bc.Initialize(bmp.Width / ReduceScale / bmp.Scale"; _bc._initialize(ba,(int) (_bmp.getWidth()/(double)_reducescale/(double)_bmp.getScale()),(int) (_bmp.getHeight()/(double)_reducescale/(double)_bmp.getScale())); -RDebugUtils.currentLine=50593796; - //BA.debugLineNum = 50593796;BA.debugLine="bc.CopyPixelsFromBitmap(bmp)"; + //BA.debugLineNum = 291;BA.debugLine="bc.CopyPixelsFromBitmap(bmp)"; _bc._copypixelsfrombitmap(_bmp); -RDebugUtils.currentLine=50593797; - //BA.debugLineNum = 50593797;BA.debugLine="Dim count As Int = 2"; + //BA.debugLineNum = 292;BA.debugLine="Dim count As Int = 2"; _count = (int) (2); -RDebugUtils.currentLine=50593798; - //BA.debugLineNum = 50593798;BA.debugLine="Dim clrs(3) As ARGBColor"; + //BA.debugLineNum = 293;BA.debugLine="Dim clrs(3) As ARGBColor"; _clrs = new b4a.example.bitmapcreator._argbcolor[(int) (3)]; { int d0 = _clrs.length; @@ -159,131 +105,321 @@ _clrs[i0] = new b4a.example.bitmapcreator._argbcolor(); } } ; -RDebugUtils.currentLine=50593799; - //BA.debugLineNum = 50593799;BA.debugLine="Dim temp As ARGBColor"; + //BA.debugLineNum = 294;BA.debugLine="Dim temp As ARGBColor"; _temp = new b4a.example.bitmapcreator._argbcolor(); -RDebugUtils.currentLine=50593800; - //BA.debugLineNum = 50593800;BA.debugLine="Dim m As Int"; + //BA.debugLineNum = 295;BA.debugLine="Dim m As Int"; _m = 0; -RDebugUtils.currentLine=50593801; - //BA.debugLineNum = 50593801;BA.debugLine="For steps = 1 To count"; + //BA.debugLineNum = 296;BA.debugLine="For steps = 1 To count"; { final int step9 = 1; final int limit9 = _count; _steps = (int) (1) ; for (;_steps <= limit9 ;_steps = _steps + step9 ) { -RDebugUtils.currentLine=50593802; - //BA.debugLineNum = 50593802;BA.debugLine="For y = 0 To bc.mHeight - 1"; + //BA.debugLineNum = 297;BA.debugLine="For y = 0 To bc.mHeight - 1"; { final int step10 = 1; final int limit10 = (int) (_bc._mheight-1); _y = (int) (0) ; for (;_y <= limit10 ;_y = _y + step10 ) { -RDebugUtils.currentLine=50593803; - //BA.debugLineNum = 50593803;BA.debugLine="For x = 0 To 2"; + //BA.debugLineNum = 298;BA.debugLine="For x = 0 To 2"; { final int step11 = 1; final int limit11 = (int) (2); _x = (int) (0) ; for (;_x <= limit11 ;_x = _x + step11 ) { -RDebugUtils.currentLine=50593804; - //BA.debugLineNum = 50593804;BA.debugLine="bc.GetARGB(x, y, clrs(x))"; + //BA.debugLineNum = 299;BA.debugLine="bc.GetARGB(x, y, clrs(x))"; _bc._getargb(_x,_y,_clrs[_x]); } }; -RDebugUtils.currentLine=50593806; - //BA.debugLineNum = 50593806;BA.debugLine="SetAvg(bc, 1, y, clrs, temp)"; -__ref._setavg /*String*/ (null,_bc,(int) (1),_y,_clrs,_temp); -RDebugUtils.currentLine=50593807; - //BA.debugLineNum = 50593807;BA.debugLine="m = 0"; + //BA.debugLineNum = 301;BA.debugLine="SetAvg(bc, 1, y, clrs, temp)"; +_setavg(_bc,(int) (1),_y,_clrs,_temp); + //BA.debugLineNum = 302;BA.debugLine="m = 0"; _m = (int) (0); -RDebugUtils.currentLine=50593808; - //BA.debugLineNum = 50593808;BA.debugLine="For x = 2 To bc.mWidth - 2"; + //BA.debugLineNum = 303;BA.debugLine="For x = 2 To bc.mWidth - 2"; { final int step16 = 1; final int limit16 = (int) (_bc._mwidth-2); _x = (int) (2) ; for (;_x <= limit16 ;_x = _x + step16 ) { -RDebugUtils.currentLine=50593809; - //BA.debugLineNum = 50593809;BA.debugLine="bc.GetARGB(x + 1, y, clrs(m))"; + //BA.debugLineNum = 304;BA.debugLine="bc.GetARGB(x + 1, y, clrs(m))"; _bc._getargb((int) (_x+1),_y,_clrs[_m]); -RDebugUtils.currentLine=50593810; - //BA.debugLineNum = 50593810;BA.debugLine="m = (m + 1) Mod 3"; + //BA.debugLineNum = 305;BA.debugLine="m = (m + 1) Mod 3"; _m = (int) ((_m+1)%3); -RDebugUtils.currentLine=50593811; - //BA.debugLineNum = 50593811;BA.debugLine="SetAvg(bc, x, y, clrs, temp)"; -__ref._setavg /*String*/ (null,_bc,_x,_y,_clrs,_temp); + //BA.debugLineNum = 306;BA.debugLine="SetAvg(bc, x, y, clrs, temp)"; +_setavg(_bc,_x,_y,_clrs,_temp); } }; } }; -RDebugUtils.currentLine=50593814; - //BA.debugLineNum = 50593814;BA.debugLine="For x = 0 To bc.mWidth - 1"; + //BA.debugLineNum = 309;BA.debugLine="For x = 0 To bc.mWidth - 1"; { final int step22 = 1; final int limit22 = (int) (_bc._mwidth-1); _x = (int) (0) ; for (;_x <= limit22 ;_x = _x + step22 ) { -RDebugUtils.currentLine=50593815; - //BA.debugLineNum = 50593815;BA.debugLine="For y = 0 To 2"; + //BA.debugLineNum = 310;BA.debugLine="For y = 0 To 2"; { final int step23 = 1; final int limit23 = (int) (2); _y = (int) (0) ; for (;_y <= limit23 ;_y = _y + step23 ) { -RDebugUtils.currentLine=50593816; - //BA.debugLineNum = 50593816;BA.debugLine="bc.GetARGB(x, y, clrs(y))"; + //BA.debugLineNum = 311;BA.debugLine="bc.GetARGB(x, y, clrs(y))"; _bc._getargb(_x,_y,_clrs[_y]); } }; -RDebugUtils.currentLine=50593818; - //BA.debugLineNum = 50593818;BA.debugLine="SetAvg(bc, x, 1, clrs, temp)"; -__ref._setavg /*String*/ (null,_bc,_x,(int) (1),_clrs,_temp); -RDebugUtils.currentLine=50593819; - //BA.debugLineNum = 50593819;BA.debugLine="m = 0"; + //BA.debugLineNum = 313;BA.debugLine="SetAvg(bc, x, 1, clrs, temp)"; +_setavg(_bc,_x,(int) (1),_clrs,_temp); + //BA.debugLineNum = 314;BA.debugLine="m = 0"; _m = (int) (0); -RDebugUtils.currentLine=50593820; - //BA.debugLineNum = 50593820;BA.debugLine="For y = 2 To bc.mHeight - 2"; + //BA.debugLineNum = 315;BA.debugLine="For y = 2 To bc.mHeight - 2"; { final int step28 = 1; final int limit28 = (int) (_bc._mheight-2); _y = (int) (2) ; for (;_y <= limit28 ;_y = _y + step28 ) { -RDebugUtils.currentLine=50593821; - //BA.debugLineNum = 50593821;BA.debugLine="bc.GetARGB(x, y + 1, clrs(m))"; + //BA.debugLineNum = 316;BA.debugLine="bc.GetARGB(x, y + 1, clrs(m))"; _bc._getargb(_x,(int) (_y+1),_clrs[_m]); -RDebugUtils.currentLine=50593822; - //BA.debugLineNum = 50593822;BA.debugLine="m = (m + 1) Mod 3"; + //BA.debugLineNum = 317;BA.debugLine="m = (m + 1) Mod 3"; _m = (int) ((_m+1)%3); -RDebugUtils.currentLine=50593823; - //BA.debugLineNum = 50593823;BA.debugLine="SetAvg(bc, x, y, clrs, temp)"; -__ref._setavg /*String*/ (null,_bc,_x,_y,_clrs,_temp); + //BA.debugLineNum = 318;BA.debugLine="SetAvg(bc, x, y, clrs, temp)"; +_setavg(_bc,_x,_y,_clrs,_temp); } }; } }; } }; -RDebugUtils.currentLine=50593827; - //BA.debugLineNum = 50593827;BA.debugLine="Return bc"; + //BA.debugLineNum = 322;BA.debugLine="Return bc"; if (true) return _bc; -RDebugUtils.currentLine=50593828; - //BA.debugLineNum = 50593828;BA.debugLine="End Sub"; + //BA.debugLineNum = 323;BA.debugLine="End Sub"; return null; } -public String _setavg(keymon.lat.medicomed.b4xdialog __ref,b4a.example.bitmapcreator _bc,int _x,int _y,b4a.example.bitmapcreator._argbcolor[] _clrs,b4a.example.bitmapcreator._argbcolor _temp) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdialog"; -if (Debug.shouldDelegate(ba, "setavg", true)) - {return ((String) Debug.delegate(ba, "setavg", new Object[] {_bc,_x,_y,_clrs,_temp}));} +public String _button_click() throws Exception{ +anywheresoftware.b4a.objects.B4XViewWrapper _b = null; + //BA.debugLineNum = 233;BA.debugLine="Private Sub Button_Click"; + //BA.debugLineNum = 234;BA.debugLine="Dim b As B4XView = Sender"; +_b = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_b = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba))); + //BA.debugLineNum = 235;BA.debugLine="If ButtonsState.GetDefault(b.Tag, True) = False T"; +if ((_buttonsstate.GetDefault(_b.getTag(),(Object)(__c.True))).equals((Object)(__c.False))) { +if (true) return "";}; + //BA.debugLineNum = 236;BA.debugLine="Close(b.Tag)"; +_close((int)(BA.ObjectToNumber(_b.getTag()))); + //BA.debugLineNum = 237;BA.debugLine="End Sub"; +return ""; +} +public String _class_globals() throws Exception{ + //BA.debugLineNum = 4;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 5;BA.debugLine="Private xui As XUI"; +_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); + //BA.debugLineNum = 6;BA.debugLine="Public ButtonsHeight As Int = 40dip"; +_buttonsheight = __c.DipToCurrent((int) (40)); + //BA.debugLineNum = 7;BA.debugLine="Public TitleBarHeight As Int = 30dip"; +_titlebarheight = __c.DipToCurrent((int) (30)); + //BA.debugLineNum = 8;BA.debugLine="Private ButtonWidth As Int = 80dip"; +_buttonwidth = __c.DipToCurrent((int) (80)); + //BA.debugLineNum = 9;BA.debugLine="Public Base As B4XView"; +_base = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 10;BA.debugLine="Public BackgroundColor As Int = 0xFF555555 'base"; +_backgroundcolor = ((int)0xff555555); + //BA.debugLineNum = 11;BA.debugLine="Public OverlayColor As Int = 0xaa000000"; +_overlaycolor = ((int)0xaa000000); + //BA.debugLineNum = 12;BA.debugLine="Public BorderColor As Int = 0xff000000"; +_bordercolor = ((int)0xff000000); + //BA.debugLineNum = 13;BA.debugLine="Public BorderCornersRadius As Int = 2dip"; +_bordercornersradius = __c.DipToCurrent((int) (2)); + //BA.debugLineNum = 14;BA.debugLine="Public BorderWidth As Int = 2dip"; +_borderwidth = __c.DipToCurrent((int) (2)); + //BA.debugLineNum = 15;BA.debugLine="Public ButtonsColor As Int = 0xFF555555"; +_buttonscolor = ((int)0xff555555); + //BA.debugLineNum = 16;BA.debugLine="Public ButtonsTextColor As Int = 0xFF89D5FF"; +_buttonstextcolor = ((int)0xff89d5ff); + //BA.debugLineNum = 17;BA.debugLine="Private Background As B4XView"; +_background = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 18;BA.debugLine="Private BlurImageView As B4XView"; +_blurimageview = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 19;BA.debugLine="Public BlurBackground As Boolean"; +_blurbackground = false; + //BA.debugLineNum = 20;BA.debugLine="Private BlurReduceScale As Int"; +_blurreducescale = 0; + //BA.debugLineNum = 21;BA.debugLine="Public mParent As B4XView"; +_mparent = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 22;BA.debugLine="Public Title As Object = \"\""; +_title = (Object)(""); + //BA.debugLineNum = 23;BA.debugLine="Public TitleBarColor As Int = 0xFF0083B8"; +_titlebarcolor = ((int)0xff0083b8); + //BA.debugLineNum = 24;BA.debugLine="Public TitleBarTextColor As Int"; +_titlebartextcolor = 0; + //BA.debugLineNum = 25;BA.debugLine="Public BodyTextColor As Int = xui.Color_White"; +_bodytextcolor = _xui.Color_White; + //BA.debugLineNum = 26;BA.debugLine="Public TitleBar As B4XView"; +_titlebar = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 27;BA.debugLine="Public PutAtTop As Boolean"; +_putattop = false; + //BA.debugLineNum = 28;BA.debugLine="Public TitleBarFont As B4XFont"; +_titlebarfont = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont(); + //BA.debugLineNum = 29;BA.debugLine="Public ButtonsFont As B4XFont"; +_buttonsfont = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont(); + //BA.debugLineNum = 30;BA.debugLine="Public ButtonsTextColorDisabled As Int = 0xFF8080"; +_buttonstextcolordisabled = ((int)0xff808080); + //BA.debugLineNum = 31;BA.debugLine="Public VisibleAnimationDuration As Int = 100"; +_visibleanimationduration = (int) (100); + //BA.debugLineNum = 32;BA.debugLine="Public ButtonsOrder() As Int = Array As Int(xui.D"; +_buttonsorder = new int[]{_xui.DialogResponse_Positive,_xui.DialogResponse_Negative,_xui.DialogResponse_Cancel}; + //BA.debugLineNum = 33;BA.debugLine="Public ButtonsState As Map"; +_buttonsstate = new anywheresoftware.b4a.objects.collections.Map(); + //BA.debugLineNum = 34;BA.debugLine="End Sub"; +return ""; +} +public boolean _close(int _result) throws Exception{ + //BA.debugLineNum = 239;BA.debugLine="Public Sub Close (Result As Int) As Boolean"; + //BA.debugLineNum = 240;BA.debugLine="If getVisible Then"; +if (_getvisible()) { + //BA.debugLineNum = 241;BA.debugLine="CallSubDelayed2(Me, \"CloseMessage\", Result)"; +__c.CallSubDelayed2(ba,this,"CloseMessage",(Object)(_result)); + //BA.debugLineNum = 242;BA.debugLine="Return True"; +if (true) return __c.True; + }; + //BA.debugLineNum = 244;BA.debugLine="Return False"; +if (true) return __c.False; + //BA.debugLineNum = 245;BA.debugLine="End Sub"; +return false; +} +public String _createbutton(Object _text,int _code) throws Exception{ +anywheresoftware.b4a.objects.LabelWrapper _btn = null; +anywheresoftware.b4a.objects.B4XViewWrapper _xbtn = null; +int _numberofbuttons = 0; + //BA.debugLineNum = 193;BA.debugLine="Private Sub CreateButton (Text As Object, Code As"; + //BA.debugLineNum = 194;BA.debugLine="If Text = \"\" Then Return"; +if ((_text).equals((Object)(""))) { +if (true) return "";}; + //BA.debugLineNum = 198;BA.debugLine="Dim btn As Label"; +_btn = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 200;BA.debugLine="btn.Initialize(\"Button\")"; +_btn.Initialize(ba,"Button"); + //BA.debugLineNum = 201;BA.debugLine="Dim xbtn As B4XView = btn"; +_xbtn = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_xbtn = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_btn.getObject())); + //BA.debugLineNum = 202;BA.debugLine="XUIViewsUtils.SetTextOrCSBuilderToLabel(xbtn, Tex"; +_xuiviewsutils._settextorcsbuildertolabel /*String*/ (ba,_xbtn,_text); + //BA.debugLineNum = 203;BA.debugLine="xbtn.Tag = Code"; +_xbtn.setTag((Object)(_code)); + //BA.debugLineNum = 204;BA.debugLine="xbtn.SetColorAndBorder(ButtonsColor, 0dip, Border"; +_xbtn.SetColorAndBorder(_buttonscolor,__c.DipToCurrent((int) (0)),_bordercolor,__c.DipToCurrent((int) (5))); + //BA.debugLineNum = 205;BA.debugLine="xbtn.SetTextAlignment(\"CENTER\", \"CENTER\")"; +_xbtn.SetTextAlignment("CENTER","CENTER"); + //BA.debugLineNum = 206;BA.debugLine="xbtn.TextColor = ButtonsTextColor"; +_xbtn.setTextColor(_buttonstextcolor); + //BA.debugLineNum = 207;BA.debugLine="xbtn.Font = ButtonsFont"; +_xbtn.setFont(_buttonsfont); + //BA.debugLineNum = 208;BA.debugLine="Dim numberOfButtons As Int = Base.NumberOfViews '"; +_numberofbuttons = _base.getNumberOfViews(); + //BA.debugLineNum = 209;BA.debugLine="Base.AddView(xbtn, Base.Width - 4dip - numberOfBu"; +_base.AddView((android.view.View)(_xbtn.getObject()),(int) (_base.getWidth()-__c.DipToCurrent((int) (4))-_numberofbuttons*(_buttonwidth+__c.DipToCurrent((int) (5)))-_buttonwidth),(int) (_base.getHeight()-_buttonsheight-__c.DipToCurrent((int) (4))),_buttonwidth,_buttonsheight); + //BA.debugLineNum = 211;BA.debugLine="If Code = xui.DialogResponse_Cancel Then xbtn.Req"; +if (_code==_xui.DialogResponse_Cancel) { +_xbtn.RequestFocus();}; + //BA.debugLineNum = 212;BA.debugLine="End Sub"; +return ""; +} +public anywheresoftware.b4a.objects.B4XViewWrapper _getbutton(int _resultcode) throws Exception{ +anywheresoftware.b4a.objects.B4XViewWrapper _b = null; + //BA.debugLineNum = 215;BA.debugLine="Public Sub GetButton (ResultCode As Int) As B4XVie"; + //BA.debugLineNum = 216;BA.debugLine="For Each b As B4XView In Base.GetAllViewsRecursiv"; +_b = new anywheresoftware.b4a.objects.B4XViewWrapper(); +{ +final anywheresoftware.b4a.BA.IterableList group1 = _base.GetAllViewsRecursive(); +final int groupLen1 = group1.getSize() +;int index1 = 0; +; +for (; index1 < groupLen1;index1++){ +_b = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(group1.Get(index1))); + //BA.debugLineNum = 217;BA.debugLine="If b.Tag = ResultCode Then Return b 'ignore"; +if ((_b.getTag()).equals((Object)(_resultcode))) { +if (true) return _b;}; + } +}; + //BA.debugLineNum = 219;BA.debugLine="Return Null"; +if (true) return (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Null)); + //BA.debugLineNum = 220;BA.debugLine="End Sub"; +return null; +} +public boolean _getvisible() throws Exception{ + //BA.debugLineNum = 189;BA.debugLine="Public Sub getVisible As Boolean"; + //BA.debugLineNum = 190;BA.debugLine="Return Background.IsInitialized And Background.Pa"; +if (true) return _background.IsInitialized() && _background.getParent().IsInitialized(); + //BA.debugLineNum = 191;BA.debugLine="End Sub"; +return false; +} +public String _initialize(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.B4XViewWrapper _parent) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 36;BA.debugLine="Public Sub Initialize (Parent As B4XView)"; + //BA.debugLineNum = 37;BA.debugLine="BlurBackground = False"; +_blurbackground = __c.False; + //BA.debugLineNum = 38;BA.debugLine="If xui.IsB4i Then"; +if (_xui.getIsB4i()) { + //BA.debugLineNum = 39;BA.debugLine="BlurReduceScale = 3"; +_blurreducescale = (int) (3); + }else if(_xui.getIsB4J()) { + //BA.debugLineNum = 41;BA.debugLine="BlurReduceScale = 1"; +_blurreducescale = (int) (1); + }else if(_xui.getIsB4A()) { + //BA.debugLineNum = 43;BA.debugLine="BlurReduceScale = 3"; +_blurreducescale = (int) (3); + }; + //BA.debugLineNum = 45;BA.debugLine="mParent = Parent"; +_mparent = _parent; + //BA.debugLineNum = 51;BA.debugLine="TitleBarFont = xui.CreateDefaultBoldFont(16)"; +_titlebarfont = _xui.CreateDefaultBoldFont((float) (16)); + //BA.debugLineNum = 52;BA.debugLine="ButtonsFont = xui.CreateDefaultBoldFont(15)"; +_buttonsfont = _xui.CreateDefaultBoldFont((float) (15)); + //BA.debugLineNum = 53;BA.debugLine="TitleBarTextColor = xui.Color_White"; +_titlebartextcolor = _xui.Color_White; + //BA.debugLineNum = 54;BA.debugLine="ButtonsState.Initialize"; +_buttonsstate.Initialize(); + //BA.debugLineNum = 55;BA.debugLine="End Sub"; +return ""; +} +public String _internaladdstubtoclvifneeded(b4a.example3.customlistview _customlistview1,int _color) throws Exception{ + //BA.debugLineNum = 343;BA.debugLine="Public Sub InternalAddStubToCLVIfNeeded(CustomList"; + //BA.debugLineNum = 344;BA.debugLine="XUIViewsUtils.AddStubToCLVIfNeeded(CustomListView"; +_xuiviewsutils._addstubtoclvifneeded /*String*/ (ba,_customlistview1,_color); + //BA.debugLineNum = 345;BA.debugLine="End Sub"; +return ""; +} +public String _internalsettextorcsbuildertolabel(anywheresoftware.b4a.objects.B4XViewWrapper _xlbl,Object _text) throws Exception{ + //BA.debugLineNum = 339;BA.debugLine="Public Sub InternalSetTextOrCSBuilderToLabel(xlbl"; + //BA.debugLineNum = 340;BA.debugLine="XUIViewsUtils.SetTextOrCSBuilderToLabel(xlbl, Tex"; +_xuiviewsutils._settextorcsbuildertolabel /*String*/ (ba,_xlbl,_text); + //BA.debugLineNum = 341;BA.debugLine="End Sub"; +return ""; +} +public String _resize(int _width,int _height) throws Exception{ +int _top = 0; + //BA.debugLineNum = 263;BA.debugLine="Public Sub Resize (Width As Int, Height As Int)"; + //BA.debugLineNum = 265;BA.debugLine="Dim Top As Int = Round(Background.Height / 2 - Ba"; +_top = (int) (__c.Round(_background.getHeight()/(double)2-_base.getHeight()/(double)2)); + //BA.debugLineNum = 266;BA.debugLine="If PutAtTop Then Top = 20dip"; +if (_putattop) { +_top = __c.DipToCurrent((int) (20));}; + //BA.debugLineNum = 267;BA.debugLine="Background.SetLayoutAnimated(0, 0, 0, Width, Heig"; +_background.SetLayoutAnimated((int) (0),(int) (0),(int) (0),_width,_height); + //BA.debugLineNum = 268;BA.debugLine="Base.SetLayoutAnimated(200, Round(Background.Widt"; +_base.SetLayoutAnimated((int) (200),(int) (__c.Round(_background.getWidth()/(double)2-_base.getWidth()/(double)2)),_top,_base.getWidth(),_base.getHeight()); + //BA.debugLineNum = 269;BA.debugLine="If xui.IsB4J Then"; +if (_xui.getIsB4J()) { + //BA.debugLineNum = 270;BA.debugLine="UpdateBlur"; +_updateblur(); + }; + //BA.debugLineNum = 272;BA.debugLine="End Sub"; +return ""; +} +public String _setavg(b4a.example.bitmapcreator _bc,int _x,int _y,b4a.example.bitmapcreator._argbcolor[] _clrs,b4a.example.bitmapcreator._argbcolor _temp) throws Exception{ b4a.example.bitmapcreator._argbcolor _c = null; -RDebugUtils.currentLine=50659328; - //BA.debugLineNum = 50659328;BA.debugLine="Private Sub SetAvg(bc As BitmapCreator, x As Int,"; -RDebugUtils.currentLine=50659329; - //BA.debugLineNum = 50659329;BA.debugLine="temp.Initialize"; + //BA.debugLineNum = 325;BA.debugLine="Private Sub SetAvg(bc As BitmapCreator, x As Int,"; + //BA.debugLineNum = 326;BA.debugLine="temp.Initialize"; _temp.Initialize(); -RDebugUtils.currentLine=50659330; - //BA.debugLineNum = 50659330;BA.debugLine="For Each c As ARGBColor In clrs"; + //BA.debugLineNum = 327;BA.debugLine="For Each c As ARGBColor In clrs"; { final b4a.example.bitmapcreator._argbcolor[] group2 = _clrs; final int groupLen2 = group2.length @@ -291,462 +427,61 @@ final int groupLen2 = group2.length ; for (; index2 < groupLen2;index2++){ _c = group2[index2]; -RDebugUtils.currentLine=50659331; - //BA.debugLineNum = 50659331;BA.debugLine="temp.r = temp.r + c.r"; + //BA.debugLineNum = 328;BA.debugLine="temp.r = temp.r + c.r"; _temp.r = (int) (_temp.r+_c.r); -RDebugUtils.currentLine=50659332; - //BA.debugLineNum = 50659332;BA.debugLine="temp.g = temp.g + c.g"; + //BA.debugLineNum = 329;BA.debugLine="temp.g = temp.g + c.g"; _temp.g = (int) (_temp.g+_c.g); -RDebugUtils.currentLine=50659333; - //BA.debugLineNum = 50659333;BA.debugLine="temp.b = temp.b + c.b"; + //BA.debugLineNum = 330;BA.debugLine="temp.b = temp.b + c.b"; _temp.b = (int) (_temp.b+_c.b); } }; -RDebugUtils.currentLine=50659335; - //BA.debugLineNum = 50659335;BA.debugLine="temp.a = 255"; + //BA.debugLineNum = 332;BA.debugLine="temp.a = 255"; _temp.a = (int) (255); -RDebugUtils.currentLine=50659336; - //BA.debugLineNum = 50659336;BA.debugLine="temp.r = temp.r / 3"; + //BA.debugLineNum = 333;BA.debugLine="temp.r = temp.r / 3"; _temp.r = (int) (_temp.r/(double)3); -RDebugUtils.currentLine=50659337; - //BA.debugLineNum = 50659337;BA.debugLine="temp.g = temp.g / 3"; + //BA.debugLineNum = 334;BA.debugLine="temp.g = temp.g / 3"; _temp.g = (int) (_temp.g/(double)3); -RDebugUtils.currentLine=50659338; - //BA.debugLineNum = 50659338;BA.debugLine="temp.b = temp.b / 3"; + //BA.debugLineNum = 335;BA.debugLine="temp.b = temp.b / 3"; _temp.b = (int) (_temp.b/(double)3); -RDebugUtils.currentLine=50659339; - //BA.debugLineNum = 50659339;BA.debugLine="bc.SetARGB(x, y, temp)"; + //BA.debugLineNum = 336;BA.debugLine="bc.SetARGB(x, y, temp)"; _bc._setargb(_x,_y,_temp); -RDebugUtils.currentLine=50659340; - //BA.debugLineNum = 50659340;BA.debugLine="End Sub"; + //BA.debugLineNum = 337;BA.debugLine="End Sub"; return ""; } -public String _button_click(keymon.lat.medicomed.b4xdialog __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdialog"; -if (Debug.shouldDelegate(ba, "button_click", true)) - {return ((String) Debug.delegate(ba, "button_click", null));} +public String _setbuttonstate(int _resultcode,boolean _enabled) throws Exception{ anywheresoftware.b4a.objects.B4XViewWrapper _b = null; -RDebugUtils.currentLine=50200576; - //BA.debugLineNum = 50200576;BA.debugLine="Private Sub Button_Click"; -RDebugUtils.currentLine=50200577; - //BA.debugLineNum = 50200577;BA.debugLine="Dim b As B4XView = Sender"; + //BA.debugLineNum = 223;BA.debugLine="Public Sub SetButtonState (ResultCode As Int, Enab"; + //BA.debugLineNum = 224;BA.debugLine="Dim b As B4XView = GetButton(ResultCode)"; _b = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_b = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba))); -RDebugUtils.currentLine=50200578; - //BA.debugLineNum = 50200578;BA.debugLine="If ButtonsState.GetDefault(b.Tag, True) = False T"; -if ((__ref._buttonsstate /*anywheresoftware.b4a.objects.collections.Map*/ .GetDefault(_b.getTag(),(Object)(__c.True))).equals((Object)(__c.False))) { -if (true) return "";}; -RDebugUtils.currentLine=50200579; - //BA.debugLineNum = 50200579;BA.debugLine="Close(b.Tag)"; -__ref._close /*boolean*/ (null,(int)(BA.ObjectToNumber(_b.getTag()))); -RDebugUtils.currentLine=50200580; - //BA.debugLineNum = 50200580;BA.debugLine="End Sub"; -return ""; -} -public String _class_globals(keymon.lat.medicomed.b4xdialog __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdialog"; -RDebugUtils.currentLine=49610752; - //BA.debugLineNum = 49610752;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=49610753; - //BA.debugLineNum = 49610753;BA.debugLine="Private xui As XUI"; -_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=49610754; - //BA.debugLineNum = 49610754;BA.debugLine="Public ButtonsHeight As Int = 40dip"; -_buttonsheight = __c.DipToCurrent((int) (40)); -RDebugUtils.currentLine=49610755; - //BA.debugLineNum = 49610755;BA.debugLine="Public TitleBarHeight As Int = 30dip"; -_titlebarheight = __c.DipToCurrent((int) (30)); -RDebugUtils.currentLine=49610756; - //BA.debugLineNum = 49610756;BA.debugLine="Private ButtonWidth As Int = 80dip"; -_buttonwidth = __c.DipToCurrent((int) (80)); -RDebugUtils.currentLine=49610757; - //BA.debugLineNum = 49610757;BA.debugLine="Public Base As B4XView"; -_base = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=49610758; - //BA.debugLineNum = 49610758;BA.debugLine="Public BackgroundColor As Int = 0xFF555555 'base"; -_backgroundcolor = ((int)0xff555555); -RDebugUtils.currentLine=49610759; - //BA.debugLineNum = 49610759;BA.debugLine="Public OverlayColor As Int = 0xaa000000"; -_overlaycolor = ((int)0xaa000000); -RDebugUtils.currentLine=49610760; - //BA.debugLineNum = 49610760;BA.debugLine="Public BorderColor As Int = 0xff000000"; -_bordercolor = ((int)0xff000000); -RDebugUtils.currentLine=49610761; - //BA.debugLineNum = 49610761;BA.debugLine="Public BorderCornersRadius As Int = 2dip"; -_bordercornersradius = __c.DipToCurrent((int) (2)); -RDebugUtils.currentLine=49610762; - //BA.debugLineNum = 49610762;BA.debugLine="Public BorderWidth As Int = 2dip"; -_borderwidth = __c.DipToCurrent((int) (2)); -RDebugUtils.currentLine=49610763; - //BA.debugLineNum = 49610763;BA.debugLine="Public ButtonsColor As Int = 0xFF555555"; -_buttonscolor = ((int)0xff555555); -RDebugUtils.currentLine=49610764; - //BA.debugLineNum = 49610764;BA.debugLine="Public ButtonsTextColor As Int = 0xFF89D5FF"; -_buttonstextcolor = ((int)0xff89d5ff); -RDebugUtils.currentLine=49610765; - //BA.debugLineNum = 49610765;BA.debugLine="Private Background As B4XView"; -_background = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=49610766; - //BA.debugLineNum = 49610766;BA.debugLine="Private BlurImageView As B4XView"; -_blurimageview = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=49610767; - //BA.debugLineNum = 49610767;BA.debugLine="Public BlurBackground As Boolean"; -_blurbackground = false; -RDebugUtils.currentLine=49610768; - //BA.debugLineNum = 49610768;BA.debugLine="Private BlurReduceScale As Int"; -_blurreducescale = 0; -RDebugUtils.currentLine=49610769; - //BA.debugLineNum = 49610769;BA.debugLine="Public mParent As B4XView"; -_mparent = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=49610770; - //BA.debugLineNum = 49610770;BA.debugLine="Public Title As Object = \"\""; -_title = (Object)(""); -RDebugUtils.currentLine=49610771; - //BA.debugLineNum = 49610771;BA.debugLine="Public TitleBarColor As Int = 0xFF0083B8"; -_titlebarcolor = ((int)0xff0083b8); -RDebugUtils.currentLine=49610772; - //BA.debugLineNum = 49610772;BA.debugLine="Public TitleBarTextColor As Int"; -_titlebartextcolor = 0; -RDebugUtils.currentLine=49610773; - //BA.debugLineNum = 49610773;BA.debugLine="Public BodyTextColor As Int = xui.Color_White"; -_bodytextcolor = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_White; -RDebugUtils.currentLine=49610774; - //BA.debugLineNum = 49610774;BA.debugLine="Public TitleBar As B4XView"; -_titlebar = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=49610775; - //BA.debugLineNum = 49610775;BA.debugLine="Public PutAtTop As Boolean"; -_putattop = false; -RDebugUtils.currentLine=49610776; - //BA.debugLineNum = 49610776;BA.debugLine="Public TitleBarFont As B4XFont"; -_titlebarfont = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont(); -RDebugUtils.currentLine=49610777; - //BA.debugLineNum = 49610777;BA.debugLine="Public ButtonsFont As B4XFont"; -_buttonsfont = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont(); -RDebugUtils.currentLine=49610778; - //BA.debugLineNum = 49610778;BA.debugLine="Public ButtonsTextColorDisabled As Int = 0xFF8080"; -_buttonstextcolordisabled = ((int)0xff808080); -RDebugUtils.currentLine=49610779; - //BA.debugLineNum = 49610779;BA.debugLine="Public VisibleAnimationDuration As Int = 100"; -_visibleanimationduration = (int) (100); -RDebugUtils.currentLine=49610780; - //BA.debugLineNum = 49610780;BA.debugLine="Public ButtonsOrder() As Int = Array As Int(xui.D"; -_buttonsorder = new int[]{__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .DialogResponse_Positive,__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .DialogResponse_Negative,__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .DialogResponse_Cancel}; -RDebugUtils.currentLine=49610781; - //BA.debugLineNum = 49610781;BA.debugLine="Public ButtonsState As Map"; -_buttonsstate = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=49610782; - //BA.debugLineNum = 49610782;BA.debugLine="End Sub"; -return ""; -} -public boolean _getvisible(keymon.lat.medicomed.b4xdialog __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdialog"; -if (Debug.shouldDelegate(ba, "getvisible", true)) - {return ((Boolean) Debug.delegate(ba, "getvisible", null));} -RDebugUtils.currentLine=49938432; - //BA.debugLineNum = 49938432;BA.debugLine="Public Sub getVisible As Boolean"; -RDebugUtils.currentLine=49938433; - //BA.debugLineNum = 49938433;BA.debugLine="Return Background.IsInitialized And Background.Pa"; -if (true) return __ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .IsInitialized() && __ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getParent().IsInitialized(); -RDebugUtils.currentLine=49938434; - //BA.debugLineNum = 49938434;BA.debugLine="End Sub"; -return false; -} -public String _createbutton(keymon.lat.medicomed.b4xdialog __ref,Object _text,int _code) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdialog"; -if (Debug.shouldDelegate(ba, "createbutton", true)) - {return ((String) Debug.delegate(ba, "createbutton", new Object[] {_text,_code}));} -anywheresoftware.b4a.objects.LabelWrapper _btn = null; -anywheresoftware.b4a.objects.B4XViewWrapper _xbtn = null; -int _numberofbuttons = 0; -RDebugUtils.currentLine=50003968; - //BA.debugLineNum = 50003968;BA.debugLine="Private Sub CreateButton (Text As Object, Code As"; -RDebugUtils.currentLine=50003969; - //BA.debugLineNum = 50003969;BA.debugLine="If Text = \"\" Then Return"; -if ((_text).equals((Object)(""))) { -if (true) return "";}; -RDebugUtils.currentLine=50003973; - //BA.debugLineNum = 50003973;BA.debugLine="Dim btn As Label"; -_btn = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=50003975; - //BA.debugLineNum = 50003975;BA.debugLine="btn.Initialize(\"Button\")"; -_btn.Initialize(ba,"Button"); -RDebugUtils.currentLine=50003976; - //BA.debugLineNum = 50003976;BA.debugLine="Dim xbtn As B4XView = btn"; -_xbtn = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_xbtn = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_btn.getObject())); -RDebugUtils.currentLine=50003977; - //BA.debugLineNum = 50003977;BA.debugLine="XUIViewsUtils.SetTextOrCSBuilderToLabel(xbtn, Tex"; -_xuiviewsutils._settextorcsbuildertolabel /*String*/ (ba,_xbtn,_text); -RDebugUtils.currentLine=50003978; - //BA.debugLineNum = 50003978;BA.debugLine="xbtn.Tag = Code"; -_xbtn.setTag((Object)(_code)); -RDebugUtils.currentLine=50003979; - //BA.debugLineNum = 50003979;BA.debugLine="xbtn.SetColorAndBorder(ButtonsColor, 0dip, Border"; -_xbtn.SetColorAndBorder(__ref._buttonscolor /*int*/ ,__c.DipToCurrent((int) (0)),__ref._bordercolor /*int*/ ,__c.DipToCurrent((int) (5))); -RDebugUtils.currentLine=50003980; - //BA.debugLineNum = 50003980;BA.debugLine="xbtn.SetTextAlignment(\"CENTER\", \"CENTER\")"; -_xbtn.SetTextAlignment("CENTER","CENTER"); -RDebugUtils.currentLine=50003981; - //BA.debugLineNum = 50003981;BA.debugLine="xbtn.TextColor = ButtonsTextColor"; -_xbtn.setTextColor(__ref._buttonstextcolor /*int*/ ); -RDebugUtils.currentLine=50003982; - //BA.debugLineNum = 50003982;BA.debugLine="xbtn.Font = ButtonsFont"; -_xbtn.setFont(__ref._buttonsfont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ ); -RDebugUtils.currentLine=50003983; - //BA.debugLineNum = 50003983;BA.debugLine="Dim numberOfButtons As Int = Base.NumberOfViews '"; -_numberofbuttons = __ref._base /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getNumberOfViews(); -RDebugUtils.currentLine=50003984; - //BA.debugLineNum = 50003984;BA.debugLine="Base.AddView(xbtn, Base.Width - 4dip - numberOfBu"; -__ref._base /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(_xbtn.getObject()),(int) (__ref._base /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()-__c.DipToCurrent((int) (4))-_numberofbuttons*(__ref._buttonwidth /*int*/ +__c.DipToCurrent((int) (5)))-__ref._buttonwidth /*int*/ ),(int) (__ref._base /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()-__ref._buttonsheight /*int*/ -__c.DipToCurrent((int) (4))),__ref._buttonwidth /*int*/ ,__ref._buttonsheight /*int*/ ); -RDebugUtils.currentLine=50003986; - //BA.debugLineNum = 50003986;BA.debugLine="If Code = xui.DialogResponse_Cancel Then xbtn.Req"; -if (_code==__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .DialogResponse_Cancel) { -_xbtn.RequestFocus();}; -RDebugUtils.currentLine=50003987; - //BA.debugLineNum = 50003987;BA.debugLine="End Sub"; -return ""; -} -public anywheresoftware.b4a.objects.B4XViewWrapper _getbutton(keymon.lat.medicomed.b4xdialog __ref,int _resultcode) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdialog"; -if (Debug.shouldDelegate(ba, "getbutton", true)) - {return ((anywheresoftware.b4a.objects.B4XViewWrapper) Debug.delegate(ba, "getbutton", new Object[] {_resultcode}));} -anywheresoftware.b4a.objects.B4XViewWrapper _b = null; -RDebugUtils.currentLine=50069504; - //BA.debugLineNum = 50069504;BA.debugLine="Public Sub GetButton (ResultCode As Int) As B4XVie"; -RDebugUtils.currentLine=50069505; - //BA.debugLineNum = 50069505;BA.debugLine="For Each b As B4XView In Base.GetAllViewsRecursiv"; -_b = new anywheresoftware.b4a.objects.B4XViewWrapper(); -{ -final anywheresoftware.b4a.BA.IterableList group1 = __ref._base /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .GetAllViewsRecursive(); -final int groupLen1 = group1.getSize() -;int index1 = 0; -; -for (; index1 < groupLen1;index1++){ -_b = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(group1.Get(index1))); -RDebugUtils.currentLine=50069506; - //BA.debugLineNum = 50069506;BA.debugLine="If b.Tag = ResultCode Then Return b 'ignore"; -if ((_b.getTag()).equals((Object)(_resultcode))) { -if (true) return _b;}; - } -}; -RDebugUtils.currentLine=50069508; - //BA.debugLineNum = 50069508;BA.debugLine="Return Null"; -if (true) return (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Null)); -RDebugUtils.currentLine=50069509; - //BA.debugLineNum = 50069509;BA.debugLine="End Sub"; -return null; -} -public String _initialize(keymon.lat.medicomed.b4xdialog __ref,anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.B4XViewWrapper _parent) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="b4xdialog"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_parent}));} -RDebugUtils.currentLine=49676288; - //BA.debugLineNum = 49676288;BA.debugLine="Public Sub Initialize (Parent As B4XView)"; -RDebugUtils.currentLine=49676289; - //BA.debugLineNum = 49676289;BA.debugLine="BlurBackground = False"; -__ref._blurbackground /*boolean*/ = __c.False; -RDebugUtils.currentLine=49676290; - //BA.debugLineNum = 49676290;BA.debugLine="If xui.IsB4i Then"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4i()) { -RDebugUtils.currentLine=49676291; - //BA.debugLineNum = 49676291;BA.debugLine="BlurReduceScale = 3"; -__ref._blurreducescale /*int*/ = (int) (3); - }else -{RDebugUtils.currentLine=49676292; - //BA.debugLineNum = 49676292;BA.debugLine="Else If xui.IsB4J Then"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4J()) { -RDebugUtils.currentLine=49676293; - //BA.debugLineNum = 49676293;BA.debugLine="BlurReduceScale = 1"; -__ref._blurreducescale /*int*/ = (int) (1); - }else -{RDebugUtils.currentLine=49676294; - //BA.debugLineNum = 49676294;BA.debugLine="Else if xui.IsB4A Then"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4A()) { -RDebugUtils.currentLine=49676295; - //BA.debugLineNum = 49676295;BA.debugLine="BlurReduceScale = 3"; -__ref._blurreducescale /*int*/ = (int) (3); - }}} -; -RDebugUtils.currentLine=49676297; - //BA.debugLineNum = 49676297;BA.debugLine="mParent = Parent"; -__ref._mparent /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = _parent; -RDebugUtils.currentLine=49676303; - //BA.debugLineNum = 49676303;BA.debugLine="TitleBarFont = xui.CreateDefaultBoldFont(16)"; -__ref._titlebarfont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreateDefaultBoldFont((float) (16)); -RDebugUtils.currentLine=49676304; - //BA.debugLineNum = 49676304;BA.debugLine="ButtonsFont = xui.CreateDefaultBoldFont(15)"; -__ref._buttonsfont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreateDefaultBoldFont((float) (15)); -RDebugUtils.currentLine=49676305; - //BA.debugLineNum = 49676305;BA.debugLine="TitleBarTextColor = xui.Color_White"; -__ref._titlebartextcolor /*int*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_White; -RDebugUtils.currentLine=49676306; - //BA.debugLineNum = 49676306;BA.debugLine="ButtonsState.Initialize"; -__ref._buttonsstate /*anywheresoftware.b4a.objects.collections.Map*/ .Initialize(); -RDebugUtils.currentLine=49676307; - //BA.debugLineNum = 49676307;BA.debugLine="End Sub"; -return ""; -} -public String _internaladdstubtoclvifneeded(keymon.lat.medicomed.b4xdialog __ref,b4a.example3.customlistview _customlistview1,int _color) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdialog"; -if (Debug.shouldDelegate(ba, "internaladdstubtoclvifneeded", true)) - {return ((String) Debug.delegate(ba, "internaladdstubtoclvifneeded", new Object[] {_customlistview1,_color}));} -RDebugUtils.currentLine=50790400; - //BA.debugLineNum = 50790400;BA.debugLine="Public Sub InternalAddStubToCLVIfNeeded(CustomList"; -RDebugUtils.currentLine=50790401; - //BA.debugLineNum = 50790401;BA.debugLine="XUIViewsUtils.AddStubToCLVIfNeeded(CustomListView"; -_xuiviewsutils._addstubtoclvifneeded /*String*/ (ba,_customlistview1,_color); -RDebugUtils.currentLine=50790402; - //BA.debugLineNum = 50790402;BA.debugLine="End Sub"; -return ""; -} -public String _internalsettextorcsbuildertolabel(keymon.lat.medicomed.b4xdialog __ref,anywheresoftware.b4a.objects.B4XViewWrapper _xlbl,Object _text) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdialog"; -if (Debug.shouldDelegate(ba, "internalsettextorcsbuildertolabel", true)) - {return ((String) Debug.delegate(ba, "internalsettextorcsbuildertolabel", new Object[] {_xlbl,_text}));} -RDebugUtils.currentLine=50724864; - //BA.debugLineNum = 50724864;BA.debugLine="Public Sub InternalSetTextOrCSBuilderToLabel(xlbl"; -RDebugUtils.currentLine=50724865; - //BA.debugLineNum = 50724865;BA.debugLine="XUIViewsUtils.SetTextOrCSBuilderToLabel(xlbl, Tex"; -_xuiviewsutils._settextorcsbuildertolabel /*String*/ (ba,_xlbl,_text); -RDebugUtils.currentLine=50724866; - //BA.debugLineNum = 50724866;BA.debugLine="End Sub"; -return ""; -} -public String _resize(keymon.lat.medicomed.b4xdialog __ref,int _width,int _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdialog"; -if (Debug.shouldDelegate(ba, "resize", true)) - {return ((String) Debug.delegate(ba, "resize", new Object[] {_width,_height}));} -int _top = 0; -RDebugUtils.currentLine=50462720; - //BA.debugLineNum = 50462720;BA.debugLine="Public Sub Resize (Width As Int, Height As Int)"; -RDebugUtils.currentLine=50462722; - //BA.debugLineNum = 50462722;BA.debugLine="Dim Top As Int = Round(Background.Height / 2 - Ba"; -_top = (int) (__c.Round(__ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()/(double)2-__ref._base /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()/(double)2)); -RDebugUtils.currentLine=50462723; - //BA.debugLineNum = 50462723;BA.debugLine="If PutAtTop Then Top = 20dip"; -if (__ref._putattop /*boolean*/ ) { -_top = __c.DipToCurrent((int) (20));}; -RDebugUtils.currentLine=50462724; - //BA.debugLineNum = 50462724;BA.debugLine="Background.SetLayoutAnimated(0, 0, 0, Width, Heig"; -__ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),_width,_height); -RDebugUtils.currentLine=50462725; - //BA.debugLineNum = 50462725;BA.debugLine="Base.SetLayoutAnimated(200, Round(Background.Widt"; -__ref._base /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (200),(int) (__c.Round(__ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)2-__ref._base /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)2)),_top,__ref._base /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._base /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=50462726; - //BA.debugLineNum = 50462726;BA.debugLine="If xui.IsB4J Then"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4J()) { -RDebugUtils.currentLine=50462727; - //BA.debugLineNum = 50462727;BA.debugLine="UpdateBlur"; -__ref._updateblur /*String*/ (null); - }; -RDebugUtils.currentLine=50462729; - //BA.debugLineNum = 50462729;BA.debugLine="End Sub"; -return ""; -} -public String _updateblur(keymon.lat.medicomed.b4xdialog __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdialog"; -if (Debug.shouldDelegate(ba, "updateblur", true)) - {return ((String) Debug.delegate(ba, "updateblur", null));} -anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _source = null; -b4a.example.bitmapcreator _blurred = null; -RDebugUtils.currentLine=50528256; - //BA.debugLineNum = 50528256;BA.debugLine="Private Sub UpdateBlur"; -RDebugUtils.currentLine=50528257; - //BA.debugLineNum = 50528257;BA.debugLine="If BlurBackground = False Then Return"; -if (__ref._blurbackground /*boolean*/ ==__c.False) { -if (true) return "";}; -RDebugUtils.currentLine=50528258; - //BA.debugLineNum = 50528258;BA.debugLine="Background.Visible = False"; -__ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=50528259; - //BA.debugLineNum = 50528259;BA.debugLine="Dim source As B4XBitmap = Background.Parent.Snaps"; -_source = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper(); -_source = __ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getParent().Snapshot(); -RDebugUtils.currentLine=50528260; - //BA.debugLineNum = 50528260;BA.debugLine="If source.Width > Background.Width Or source.Heig"; -if (_source.getWidth()>__ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth() || _source.getHeight()>__ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()) { -RDebugUtils.currentLine=50528261; - //BA.debugLineNum = 50528261;BA.debugLine="source = source.Crop(0, 0, Background.Width, Bac"; -_source = _source.Crop((int) (0),(int) (0),__ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); - }; -RDebugUtils.currentLine=50528263; - //BA.debugLineNum = 50528263;BA.debugLine="Background.Visible = True"; -__ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=50528264; - //BA.debugLineNum = 50528264;BA.debugLine="BlurImageView.SetLayoutAnimated(0, 0, 0, Backgrou"; -__ref._blurimageview /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),__ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=50528265; - //BA.debugLineNum = 50528265;BA.debugLine="Dim blurred As BitmapCreator = Blur(source)"; -_blurred = __ref._blur /*b4a.example.bitmapcreator*/ (null,_source); -RDebugUtils.currentLine=50528266; - //BA.debugLineNum = 50528266;BA.debugLine="blurred.SetBitmapToImageView(blurred.Bitmap, Blur"; -_blurred._setbitmaptoimageview(_blurred._getbitmap(),__ref._blurimageview /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ); -RDebugUtils.currentLine=50528267; - //BA.debugLineNum = 50528267;BA.debugLine="End Sub"; -return ""; -} -public String _setbuttonstate(keymon.lat.medicomed.b4xdialog __ref,int _resultcode,boolean _enabled) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdialog"; -if (Debug.shouldDelegate(ba, "setbuttonstate", true)) - {return ((String) Debug.delegate(ba, "setbuttonstate", new Object[] {_resultcode,_enabled}));} -anywheresoftware.b4a.objects.B4XViewWrapper _b = null; -RDebugUtils.currentLine=50135040; - //BA.debugLineNum = 50135040;BA.debugLine="Public Sub SetButtonState (ResultCode As Int, Enab"; -RDebugUtils.currentLine=50135041; - //BA.debugLineNum = 50135041;BA.debugLine="Dim b As B4XView = GetButton(ResultCode)"; -_b = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_b = __ref._getbutton /*anywheresoftware.b4a.objects.B4XViewWrapper*/ (null,_resultcode); -RDebugUtils.currentLine=50135042; - //BA.debugLineNum = 50135042;BA.debugLine="If b.IsInitialized Then"; +_b = _getbutton(_resultcode); + //BA.debugLineNum = 225;BA.debugLine="If b.IsInitialized Then"; if (_b.IsInitialized()) { -RDebugUtils.currentLine=50135043; - //BA.debugLineNum = 50135043;BA.debugLine="b.Enabled = Enabled"; + //BA.debugLineNum = 226;BA.debugLine="b.Enabled = Enabled"; _b.setEnabled(_enabled); -RDebugUtils.currentLine=50135044; - //BA.debugLineNum = 50135044;BA.debugLine="If Enabled Then b.TextColor = ButtonsTextColor E"; + //BA.debugLineNum = 227;BA.debugLine="If Enabled Then b.TextColor = ButtonsTextColor E"; if (_enabled) { -_b.setTextColor(__ref._buttonstextcolor /*int*/ );} +_b.setTextColor(_buttonstextcolor);} else { -_b.setTextColor(__ref._buttonstextcolordisabled /*int*/ );}; -RDebugUtils.currentLine=50135045; - //BA.debugLineNum = 50135045;BA.debugLine="ButtonsState.Put(ResultCode, Enabled)"; -__ref._buttonsstate /*anywheresoftware.b4a.objects.collections.Map*/ .Put((Object)(_resultcode),(Object)(_enabled)); +_b.setTextColor(_buttonstextcolordisabled);}; + //BA.debugLineNum = 228;BA.debugLine="ButtonsState.Put(ResultCode, Enabled)"; +_buttonsstate.Put((Object)(_resultcode),(Object)(_enabled)); }; -RDebugUtils.currentLine=50135047; - //BA.debugLineNum = 50135047;BA.debugLine="End Sub"; + //BA.debugLineNum = 230;BA.debugLine="End Sub"; return ""; } -public anywheresoftware.b4a.keywords.Common.ResumableSubWrapper _show(keymon.lat.medicomed.b4xdialog __ref,Object _text,Object _yes,Object _no,Object _cancel) throws Exception{ -RDebugUtils.currentModule="b4xdialog"; -if (Debug.shouldDelegate(ba, "show", true)) - {return ((anywheresoftware.b4a.keywords.Common.ResumableSubWrapper) Debug.delegate(ba, "show", new Object[] {_text,_yes,_no,_cancel}));} -ResumableSub_Show rsub = new ResumableSub_Show(this,__ref,_text,_yes,_no,_cancel); +public anywheresoftware.b4a.keywords.Common.ResumableSubWrapper _show(Object _text,Object _yes,Object _no,Object _cancel) throws Exception{ +ResumableSub_Show rsub = new ResumableSub_Show(this,_text,_yes,_no,_cancel); 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_Show extends BA.ResumableSub { -public ResumableSub_Show(keymon.lat.medicomed.b4xdialog parent,keymon.lat.medicomed.b4xdialog __ref,Object _text,Object _yes,Object _no,Object _cancel) { +public ResumableSub_Show(keymon.lat.medicomed.b4xdialog parent,Object _text,Object _yes,Object _no,Object _cancel) { this.parent = parent; -this.__ref = __ref; this._text = _text; this._yes = _yes; this._no = _no; this._cancel = _cancel; -this.__ref = parent; } -keymon.lat.medicomed.b4xdialog __ref; keymon.lat.medicomed.b4xdialog parent; Object _text; Object _yes; @@ -759,7 +494,6 @@ int _result = 0; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="b4xdialog"; while (true) { switch (state) { @@ -769,84 +503,65 @@ parent.__c.ReturnFromResumableSub(this,null);return;} case 0: //C this.state = -1; -RDebugUtils.currentLine=49807361; - //BA.debugLineNum = 49807361;BA.debugLine="Dim p As B4XView"; + //BA.debugLineNum = 75;BA.debugLine="Dim p As B4XView"; _p = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=49807362; - //BA.debugLineNum = 49807362;BA.debugLine="p = xui.CreatePanel(\"\")"; -_p = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,""); -RDebugUtils.currentLine=49807363; - //BA.debugLineNum = 49807363;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, 300dip, 100dip)"; + //BA.debugLineNum = 76;BA.debugLine="p = xui.CreatePanel(\"\")"; +_p = parent._xui.CreatePanel(ba,""); + //BA.debugLineNum = 77;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, 300dip, 100dip)"; _p.SetLayoutAnimated((int) (0),(int) (0),(int) (0),parent.__c.DipToCurrent((int) (300)),parent.__c.DipToCurrent((int) (100))); -RDebugUtils.currentLine=49807364; - //BA.debugLineNum = 49807364;BA.debugLine="Dim lbl As Label"; + //BA.debugLineNum = 78;BA.debugLine="Dim lbl As Label"; _lbl = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=49807365; - //BA.debugLineNum = 49807365;BA.debugLine="lbl.Initialize(\"\")"; + //BA.debugLineNum = 79;BA.debugLine="lbl.Initialize(\"\")"; _lbl.Initialize(ba,""); -RDebugUtils.currentLine=49807369; - //BA.debugLineNum = 49807369;BA.debugLine="lbl.SingleLine = False"; + //BA.debugLineNum = 83;BA.debugLine="lbl.SingleLine = False"; _lbl.setSingleLine(parent.__c.False); -RDebugUtils.currentLine=49807373; - //BA.debugLineNum = 49807373;BA.debugLine="Dim xlbl As B4XView = lbl"; + //BA.debugLineNum = 87;BA.debugLine="Dim xlbl As B4XView = lbl"; _xlbl = new anywheresoftware.b4a.objects.B4XViewWrapper(); _xlbl = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lbl.getObject())); -RDebugUtils.currentLine=49807374; - //BA.debugLineNum = 49807374;BA.debugLine="p.AddView(xlbl, 5dip, 0, p.Width - 10dip, p.Heigh"; + //BA.debugLineNum = 88;BA.debugLine="p.AddView(xlbl, 5dip, 0, p.Width - 10dip, p.Heigh"; _p.AddView((android.view.View)(_xlbl.getObject()),parent.__c.DipToCurrent((int) (5)),(int) (0),(int) (_p.getWidth()-parent.__c.DipToCurrent((int) (10))),_p.getHeight()); -RDebugUtils.currentLine=49807375; - //BA.debugLineNum = 49807375;BA.debugLine="xlbl.TextColor = BodyTextColor"; -_xlbl.setTextColor(__ref._bodytextcolor /*int*/ ); -RDebugUtils.currentLine=49807376; - //BA.debugLineNum = 49807376;BA.debugLine="xlbl.Font = TitleBarFont"; -_xlbl.setFont(__ref._titlebarfont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ ); -RDebugUtils.currentLine=49807377; - //BA.debugLineNum = 49807377;BA.debugLine="XUIViewsUtils.SetTextOrCSBuilderToLabel(xlbl, Tex"; + //BA.debugLineNum = 89;BA.debugLine="xlbl.TextColor = BodyTextColor"; +_xlbl.setTextColor(parent._bodytextcolor); + //BA.debugLineNum = 90;BA.debugLine="xlbl.Font = TitleBarFont"; +_xlbl.setFont(parent._titlebarfont); + //BA.debugLineNum = 91;BA.debugLine="XUIViewsUtils.SetTextOrCSBuilderToLabel(xlbl, Tex"; parent._xuiviewsutils._settextorcsbuildertolabel /*String*/ (ba,_xlbl,_text); -RDebugUtils.currentLine=49807378; - //BA.debugLineNum = 49807378;BA.debugLine="xlbl.SetTextAlignment(\"CENTER\", \"LEFT\")"; + //BA.debugLineNum = 92;BA.debugLine="xlbl.SetTextAlignment(\"CENTER\", \"LEFT\")"; _xlbl.SetTextAlignment("CENTER","LEFT"); -RDebugUtils.currentLine=49807379; - //BA.debugLineNum = 49807379;BA.debugLine="Wait For (ShowCustom(p, Yes, No, Cancel)) Complet"; -parent.__c.WaitFor("complete", ba, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "b4xdialog", "show"), __ref._showcustom /*anywheresoftware.b4a.keywords.Common.ResumableSubWrapper*/ (null,_p,_yes,_no,_cancel)); + //BA.debugLineNum = 93;BA.debugLine="Wait For (ShowCustom(p, Yes, No, Cancel)) Complet"; +parent.__c.WaitFor("complete", ba, this, parent._showcustom(_p,_yes,_no,_cancel)); this.state = 1; return; case 1: //C this.state = -1; -_result = (Integer) result[1]; +_result = (Integer) result[0]; ; -RDebugUtils.currentLine=49807380; - //BA.debugLineNum = 49807380;BA.debugLine="Return Result"; + //BA.debugLineNum = 94;BA.debugLine="Return Result"; if (true) { parent.__c.ReturnFromResumableSub(this,(Object)(_result));return;}; -RDebugUtils.currentLine=49807381; - //BA.debugLineNum = 49807381;BA.debugLine="End Sub"; + //BA.debugLineNum = 95;BA.debugLine="End Sub"; if (true) break; } } } } -public anywheresoftware.b4a.keywords.Common.ResumableSubWrapper _showcustom(keymon.lat.medicomed.b4xdialog __ref,anywheresoftware.b4a.objects.B4XViewWrapper _content,Object _yes,Object _no,Object _cancel) throws Exception{ -RDebugUtils.currentModule="b4xdialog"; -if (Debug.shouldDelegate(ba, "showcustom", true)) - {return ((anywheresoftware.b4a.keywords.Common.ResumableSubWrapper) Debug.delegate(ba, "showcustom", new Object[] {_content,_yes,_no,_cancel}));} -ResumableSub_ShowCustom rsub = new ResumableSub_ShowCustom(this,__ref,_content,_yes,_no,_cancel); +public void _complete(int _result) throws Exception{ +} +public anywheresoftware.b4a.keywords.Common.ResumableSubWrapper _showcustom(anywheresoftware.b4a.objects.B4XViewWrapper _content,Object _yes,Object _no,Object _cancel) throws Exception{ +ResumableSub_ShowCustom rsub = new ResumableSub_ShowCustom(this,_content,_yes,_no,_cancel); 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_ShowCustom extends BA.ResumableSub { -public ResumableSub_ShowCustom(keymon.lat.medicomed.b4xdialog parent,keymon.lat.medicomed.b4xdialog __ref,anywheresoftware.b4a.objects.B4XViewWrapper _content,Object _yes,Object _no,Object _cancel) { +public ResumableSub_ShowCustom(keymon.lat.medicomed.b4xdialog parent,anywheresoftware.b4a.objects.B4XViewWrapper _content,Object _yes,Object _no,Object _cancel) { this.parent = parent; -this.__ref = __ref; this._content = _content; this._yes = _yes; this._no = _no; this._cancel = _cancel; -this.__ref = parent; } -keymon.lat.medicomed.b4xdialog __ref; keymon.lat.medicomed.b4xdialog parent; anywheresoftware.b4a.objects.B4XViewWrapper _content; Object _yes; @@ -880,7 +595,6 @@ int groupLen78; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="b4xdialog"; while (true) { switch (state) { @@ -890,15 +604,14 @@ parent.__c.ReturnFromResumableSub(this,null);return;} case 0: //C this.state = 1; -RDebugUtils.currentLine=49872897; - //BA.debugLineNum = 49872897;BA.debugLine="For Each v As B4XView In mParent.GetAllViewsRecur"; + //BA.debugLineNum = 98;BA.debugLine="For Each v As B4XView In mParent.GetAllViewsRecur"; if (true) break; case 1: //for this.state = 8; _v = new anywheresoftware.b4a.objects.B4XViewWrapper(); -group1 = __ref._mparent /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .GetAllViewsRecursive(); +group1 = parent._mparent.GetAllViewsRecursive(); index1 = 0; groupLen1 = group1.getSize(); this.state = 60; @@ -921,8 +634,7 @@ if (true) break; case 3: //C this.state = 4; -RDebugUtils.currentLine=49872898; - //BA.debugLineNum = 49872898;BA.debugLine="If v.Tag <> Null And v.Tag = \"b4xdialog_backgrou"; + //BA.debugLineNum = 99;BA.debugLine="If v.Tag <> Null And v.Tag = \"b4xdialog_backgrou"; if (true) break; case 4: @@ -935,11 +647,9 @@ this.state = 6; case 6: //C this.state = 7; -RDebugUtils.currentLine=49872899; - //BA.debugLineNum = 49872899;BA.debugLine="v.RemoveViewFromParent"; + //BA.debugLineNum = 100;BA.debugLine="v.RemoveViewFromParent"; _v.RemoveViewFromParent(); -RDebugUtils.currentLine=49872900; - //BA.debugLineNum = 49872900;BA.debugLine="Exit"; + //BA.debugLineNum = 101;BA.debugLine="Exit"; this.state = 8; if (true) break; if (true) break; @@ -955,24 +665,20 @@ case 8: //C this.state = 9; ; -RDebugUtils.currentLine=49872903; - //BA.debugLineNum = 49872903;BA.debugLine="ButtonsState.Clear"; -__ref._buttonsstate /*anywheresoftware.b4a.objects.collections.Map*/ .Clear(); -RDebugUtils.currentLine=49872904; - //BA.debugLineNum = 49872904;BA.debugLine="Dim Background As B4XView = xui.CreatePanel(\"back"; + //BA.debugLineNum = 104;BA.debugLine="ButtonsState.Clear"; +parent._buttonsstate.Clear(); + //BA.debugLineNum = 105;BA.debugLine="Dim Background As B4XView = xui.CreatePanel(\"back"; parent._background = new anywheresoftware.b4a.objects.B4XViewWrapper(); -parent._background = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,"background"); -RDebugUtils.currentLine=49872905; - //BA.debugLineNum = 49872905;BA.debugLine="Background.Tag = \"b4xdialog_background\""; -__ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag((Object)("b4xdialog_background")); -RDebugUtils.currentLine=49872906; - //BA.debugLineNum = 49872906;BA.debugLine="If BlurBackground Then"; +parent._background = parent._xui.CreatePanel(ba,"background"); + //BA.debugLineNum = 106;BA.debugLine="Background.Tag = \"b4xdialog_background\""; +parent._background.setTag((Object)("b4xdialog_background")); + //BA.debugLineNum = 107;BA.debugLine="If BlurBackground Then"; if (true) break; case 9: //if this.state = 14; -if (__ref._blurbackground /*boolean*/ ) { +if (parent._blurbackground) { this.state = 11; }else { this.state = 13; @@ -981,65 +687,49 @@ this.state = 13; case 11: //C this.state = 14; -RDebugUtils.currentLine=49872907; - //BA.debugLineNum = 49872907;BA.debugLine="Dim iv As ImageView"; + //BA.debugLineNum = 108;BA.debugLine="Dim iv As ImageView"; _iv = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=49872908; - //BA.debugLineNum = 49872908;BA.debugLine="iv.Initialize(\"\")"; + //BA.debugLineNum = 109;BA.debugLine="iv.Initialize(\"\")"; _iv.Initialize(ba,""); -RDebugUtils.currentLine=49872909; - //BA.debugLineNum = 49872909;BA.debugLine="BlurImageView = iv"; -__ref._blurimageview /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_iv.getObject())); -RDebugUtils.currentLine=49872910; - //BA.debugLineNum = 49872910;BA.debugLine="Background.AddView(BlurImageView, 0, 0, Backgrou"; -__ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._blurimageview /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(int) (0),(int) (0),__ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=49872911; - //BA.debugLineNum = 49872911;BA.debugLine="Background.Color = xui.Color_Transparent"; -__ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setColor(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent); + //BA.debugLineNum = 110;BA.debugLine="BlurImageView = iv"; +parent._blurimageview = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_iv.getObject())); + //BA.debugLineNum = 111;BA.debugLine="Background.AddView(BlurImageView, 0, 0, Backgrou"; +parent._background.AddView((android.view.View)(parent._blurimageview.getObject()),(int) (0),(int) (0),parent._background.getWidth(),parent._background.getHeight()); + //BA.debugLineNum = 112;BA.debugLine="Background.Color = xui.Color_Transparent"; +parent._background.setColor(parent._xui.Color_Transparent); if (true) break; case 13: //C this.state = 14; -RDebugUtils.currentLine=49872913; - //BA.debugLineNum = 49872913;BA.debugLine="Background.Color = OverlayColor"; -__ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setColor(__ref._overlaycolor /*int*/ ); + //BA.debugLineNum = 114;BA.debugLine="Background.Color = OverlayColor"; +parent._background.setColor(parent._overlaycolor); if (true) break; case 14: //C this.state = 15; ; -RDebugUtils.currentLine=49872916; - //BA.debugLineNum = 49872916;BA.debugLine="Dim p As Panel = Background"; + //BA.debugLineNum = 117;BA.debugLine="Dim p As Panel = Background"; _p = new anywheresoftware.b4a.objects.PanelWrapper(); -_p = (anywheresoftware.b4a.objects.PanelWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.PanelWrapper(), (android.view.ViewGroup)(__ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject())); -RDebugUtils.currentLine=49872917; - //BA.debugLineNum = 49872917;BA.debugLine="p.Elevation = 4dip"; +_p = (anywheresoftware.b4a.objects.PanelWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.PanelWrapper(), (android.view.ViewGroup)(parent._background.getObject())); + //BA.debugLineNum = 118;BA.debugLine="p.Elevation = 4dip"; _p.setElevation((float) (parent.__c.DipToCurrent((int) (4)))); -RDebugUtils.currentLine=49872919; - //BA.debugLineNum = 49872919;BA.debugLine="mParent.AddView(Background, 0, 0, mParent.Width,"; -__ref._mparent /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(int) (0),(int) (0),__ref._mparent /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._mparent /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=49872920; - //BA.debugLineNum = 49872920;BA.debugLine="UpdateBlur"; -__ref._updateblur /*String*/ (null); -RDebugUtils.currentLine=49872921; - //BA.debugLineNum = 49872921;BA.debugLine="Base = xui.CreatePanel(\"\")"; -__ref._base /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,""); -RDebugUtils.currentLine=49872922; - //BA.debugLineNum = 49872922;BA.debugLine="Base.SetColorAndBorder(BackgroundColor, BorderWid"; -__ref._base /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetColorAndBorder(__ref._backgroundcolor /*int*/ ,__ref._borderwidth /*int*/ ,__ref._bordercolor /*int*/ ,__ref._bordercornersradius /*int*/ ); -RDebugUtils.currentLine=49872923; - //BA.debugLineNum = 49872923;BA.debugLine="Base.RequestFocus"; -__ref._base /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .RequestFocus(); -RDebugUtils.currentLine=49872924; - //BA.debugLineNum = 49872924;BA.debugLine="Dim IncludeTitle As Boolean = Title <> \"\""; -_includetitle = (__ref._title /*Object*/ ).equals((Object)("")) == false; -RDebugUtils.currentLine=49872925; - //BA.debugLineNum = 49872925;BA.debugLine="Dim TempTitleBarHeight As Int = 0"; + //BA.debugLineNum = 120;BA.debugLine="mParent.AddView(Background, 0, 0, mParent.Width,"; +parent._mparent.AddView((android.view.View)(parent._background.getObject()),(int) (0),(int) (0),parent._mparent.getWidth(),parent._mparent.getHeight()); + //BA.debugLineNum = 121;BA.debugLine="UpdateBlur"; +parent._updateblur(); + //BA.debugLineNum = 122;BA.debugLine="Base = xui.CreatePanel(\"\")"; +parent._base = parent._xui.CreatePanel(ba,""); + //BA.debugLineNum = 123;BA.debugLine="Base.SetColorAndBorder(BackgroundColor, BorderWid"; +parent._base.SetColorAndBorder(parent._backgroundcolor,parent._borderwidth,parent._bordercolor,parent._bordercornersradius); + //BA.debugLineNum = 124;BA.debugLine="Base.RequestFocus"; +parent._base.RequestFocus(); + //BA.debugLineNum = 125;BA.debugLine="Dim IncludeTitle As Boolean = Title <> \"\""; +_includetitle = (parent._title).equals((Object)("")) == false; + //BA.debugLineNum = 126;BA.debugLine="Dim TempTitleBarHeight As Int = 0"; _temptitlebarheight = (int) (0); -RDebugUtils.currentLine=49872926; - //BA.debugLineNum = 49872926;BA.debugLine="If IncludeTitle Then"; + //BA.debugLineNum = 127;BA.debugLine="If IncludeTitle Then"; if (true) break; case 15: @@ -1052,52 +742,44 @@ this.state = 17; case 17: //C this.state = 18; -RDebugUtils.currentLine=49872927; - //BA.debugLineNum = 49872927;BA.debugLine="TempTitleBarHeight = TitleBarHeight"; -_temptitlebarheight = __ref._titlebarheight /*int*/ ; + //BA.debugLineNum = 128;BA.debugLine="TempTitleBarHeight = TitleBarHeight"; +_temptitlebarheight = parent._titlebarheight; if (true) break; case 18: //C this.state = 19; ; -RDebugUtils.currentLine=49872929; - //BA.debugLineNum = 49872929;BA.debugLine="Dim height As Int = Content.Height + ButtonsHeigh"; -_height = (int) (_content.getHeight()+__ref._buttonsheight /*int*/ +parent.__c.DipToCurrent((int) (3))+parent.__c.DipToCurrent((int) (3))+_temptitlebarheight); -RDebugUtils.currentLine=49872930; - //BA.debugLineNum = 49872930;BA.debugLine="Dim width As Int = Content.Width + 4dip"; + //BA.debugLineNum = 130;BA.debugLine="Dim height As Int = Content.Height + ButtonsHeigh"; +_height = (int) (_content.getHeight()+parent._buttonsheight+parent.__c.DipToCurrent((int) (3))+parent.__c.DipToCurrent((int) (3))+_temptitlebarheight); + //BA.debugLineNum = 131;BA.debugLine="Dim width As Int = Content.Width + 4dip"; _width = (int) (_content.getWidth()+parent.__c.DipToCurrent((int) (4))); -RDebugUtils.currentLine=49872931; - //BA.debugLineNum = 49872931;BA.debugLine="Dim Top As Int = Round(Background.Height / 2 - he"; -_top = (int) (parent.__c.Round(__ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()/(double)2-_height/(double)2)); -RDebugUtils.currentLine=49872932; - //BA.debugLineNum = 49872932;BA.debugLine="Dim RemoveTitle As Boolean"; + //BA.debugLineNum = 132;BA.debugLine="Dim Top As Int = Round(Background.Height / 2 - he"; +_top = (int) (parent.__c.Round(parent._background.getHeight()/(double)2-_height/(double)2)); + //BA.debugLineNum = 133;BA.debugLine="Dim RemoveTitle As Boolean"; _removetitle = false; -RDebugUtils.currentLine=49872933; - //BA.debugLineNum = 49872933;BA.debugLine="If PutAtTop Then"; + //BA.debugLineNum = 134;BA.debugLine="If PutAtTop Then"; if (true) break; case 19: //if this.state = 28; -if (__ref._putattop /*boolean*/ ) { +if (parent._putattop) { this.state = 21; }if (true) break; case 21: //C this.state = 22; -RDebugUtils.currentLine=49872934; - //BA.debugLineNum = 49872934;BA.debugLine="Top = 20dip"; + //BA.debugLineNum = 135;BA.debugLine="Top = 20dip"; _top = parent.__c.DipToCurrent((int) (20)); -RDebugUtils.currentLine=49872935; - //BA.debugLineNum = 49872935;BA.debugLine="If Background.Height - Top - height < 200dip The"; + //BA.debugLineNum = 136;BA.debugLine="If Background.Height - Top - height < 200dip The"; if (true) break; case 22: //if this.state = 27; -if (__ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()-_top-_height 0 Then"; + //BA.debugLineNum = 181;BA.debugLine="Base.SetVisibleAnimated(VisibleAnimationDuration,"; +parent._base.SetVisibleAnimated(parent._visibleanimationduration,parent.__c.False); + //BA.debugLineNum = 182;BA.debugLine="If VisibleAnimationDuration > 0 Then"; if (true) break; case 56: //if this.state = 59; -if (__ref._visibleanimationduration /*int*/ >0) { +if (parent._visibleanimationduration>0) { this.state = 58; }if (true) break; case 58: //C this.state = 59; -RDebugUtils.currentLine=49872982; - //BA.debugLineNum = 49872982;BA.debugLine="Sleep(VisibleAnimationDuration)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "b4xdialog", "showcustom"),__ref._visibleanimationduration /*int*/ ); + //BA.debugLineNum = 183;BA.debugLine="Sleep(VisibleAnimationDuration)"; +parent.__c.Sleep(ba,this,parent._visibleanimationduration); this.state = 69; return; case 69: @@ -1426,40 +1072,33 @@ case 59: //C this.state = -1; ; -RDebugUtils.currentLine=49872984; - //BA.debugLineNum = 49872984;BA.debugLine="Background.RemoveViewFromParent"; -__ref._background /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .RemoveViewFromParent(); -RDebugUtils.currentLine=49872985; - //BA.debugLineNum = 49872985;BA.debugLine="Return Result"; + //BA.debugLineNum = 185;BA.debugLine="Background.RemoveViewFromParent"; +parent._background.RemoveViewFromParent(); + //BA.debugLineNum = 186;BA.debugLine="Return Result"; if (true) { parent.__c.ReturnFromResumableSub(this,(Object)(_result));return;}; -RDebugUtils.currentLine=49872986; - //BA.debugLineNum = 49872986;BA.debugLine="End Sub"; + //BA.debugLineNum = 187;BA.debugLine="End Sub"; if (true) break; } } } } -public anywheresoftware.b4a.keywords.Common.ResumableSubWrapper _showtemplate(keymon.lat.medicomed.b4xdialog __ref,Object _dialogtemplate,Object _yes,Object _no,Object _cancel) throws Exception{ -RDebugUtils.currentModule="b4xdialog"; -if (Debug.shouldDelegate(ba, "showtemplate", true)) - {return ((anywheresoftware.b4a.keywords.Common.ResumableSubWrapper) Debug.delegate(ba, "showtemplate", new Object[] {_dialogtemplate,_yes,_no,_cancel}));} -ResumableSub_ShowTemplate rsub = new ResumableSub_ShowTemplate(this,__ref,_dialogtemplate,_yes,_no,_cancel); +public void _closemessage(int _result) throws Exception{ +} +public anywheresoftware.b4a.keywords.Common.ResumableSubWrapper _showtemplate(Object _dialogtemplate,Object _yes,Object _no,Object _cancel) throws Exception{ +ResumableSub_ShowTemplate rsub = new ResumableSub_ShowTemplate(this,_dialogtemplate,_yes,_no,_cancel); 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_ShowTemplate extends BA.ResumableSub { -public ResumableSub_ShowTemplate(keymon.lat.medicomed.b4xdialog parent,keymon.lat.medicomed.b4xdialog __ref,Object _dialogtemplate,Object _yes,Object _no,Object _cancel) { +public ResumableSub_ShowTemplate(keymon.lat.medicomed.b4xdialog parent,Object _dialogtemplate,Object _yes,Object _no,Object _cancel) { this.parent = parent; -this.__ref = __ref; this._dialogtemplate = _dialogtemplate; this._yes = _yes; this._no = _no; this._cancel = _cancel; -this.__ref = parent; } -keymon.lat.medicomed.b4xdialog __ref; keymon.lat.medicomed.b4xdialog parent; Object _dialogtemplate; Object _yes; @@ -1470,7 +1109,6 @@ int _result = 0; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="b4xdialog"; while (true) { switch (state) { @@ -1480,50 +1118,69 @@ parent.__c.ReturnFromResumableSub(this,null);return;} case 0: //C this.state = -1; -RDebugUtils.currentLine=49741825; - //BA.debugLineNum = 49741825;BA.debugLine="Dim content As B4XView = CallSub2(DialogTemplate,"; + //BA.debugLineNum = 66;BA.debugLine="Dim content As B4XView = CallSub2(DialogTemplate,"; _content = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_content = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(parent.__c.CallSubDebug2(ba,_dialogtemplate,"GetPanel",parent))); -RDebugUtils.currentLine=49741826; - //BA.debugLineNum = 49741826;BA.debugLine="CallSub2(DialogTemplate, \"Show\", Me)"; -parent.__c.CallSubDebug2(ba,_dialogtemplate,"Show",parent); -RDebugUtils.currentLine=49741827; - //BA.debugLineNum = 49741827;BA.debugLine="Wait For (ShowCustom(content , Yes, No, Cancel))"; -parent.__c.WaitFor("complete", ba, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "b4xdialog", "showtemplate"), __ref._showcustom /*anywheresoftware.b4a.keywords.Common.ResumableSubWrapper*/ (null,_content,_yes,_no,_cancel)); +_content = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(parent.__c.CallSubNew2(ba,_dialogtemplate,"GetPanel",parent))); + //BA.debugLineNum = 67;BA.debugLine="CallSub2(DialogTemplate, \"Show\", Me)"; +parent.__c.CallSubNew2(ba,_dialogtemplate,"Show",parent); + //BA.debugLineNum = 68;BA.debugLine="Wait For (ShowCustom(content , Yes, No, Cancel))"; +parent.__c.WaitFor("complete", ba, this, parent._showcustom(_content,_yes,_no,_cancel)); this.state = 1; return; case 1: //C this.state = -1; -_result = (Integer) result[1]; +_result = (Integer) result[0]; ; -RDebugUtils.currentLine=49741828; - //BA.debugLineNum = 49741828;BA.debugLine="CallSub2(DialogTemplate, \"DialogClosed\", Result)"; -parent.__c.CallSubDebug2(ba,_dialogtemplate,"DialogClosed",(Object)(_result)); -RDebugUtils.currentLine=49741829; - //BA.debugLineNum = 49741829;BA.debugLine="PutAtTop = False"; -__ref._putattop /*boolean*/ = parent.__c.False; -RDebugUtils.currentLine=49741830; - //BA.debugLineNum = 49741830;BA.debugLine="Return Result"; + //BA.debugLineNum = 69;BA.debugLine="CallSub2(DialogTemplate, \"DialogClosed\", Result)"; +parent.__c.CallSubNew2(ba,_dialogtemplate,"DialogClosed",(Object)(_result)); + //BA.debugLineNum = 70;BA.debugLine="PutAtTop = False"; +parent._putattop = parent.__c.False; + //BA.debugLineNum = 71;BA.debugLine="Return Result"; if (true) { parent.__c.ReturnFromResumableSub(this,(Object)(_result));return;}; -RDebugUtils.currentLine=49741831; - //BA.debugLineNum = 49741831;BA.debugLine="End Sub"; + //BA.debugLineNum = 72;BA.debugLine="End Sub"; if (true) break; } } } } -public String _stub_click(keymon.lat.medicomed.b4xdialog __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xdialog"; -if (Debug.shouldDelegate(ba, "stub_click", true)) - {return ((String) Debug.delegate(ba, "stub_click", null));} -RDebugUtils.currentLine=50855936; - //BA.debugLineNum = 50855936;BA.debugLine="Private Sub Stub_Click"; -RDebugUtils.currentLine=50855938; - //BA.debugLineNum = 50855938;BA.debugLine="End Sub"; +public String _stub_click() throws Exception{ + //BA.debugLineNum = 349;BA.debugLine="Private Sub Stub_Click"; + //BA.debugLineNum = 351;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +public String _updateblur() throws Exception{ +anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _source = null; +b4a.example.bitmapcreator _blurred = null; + //BA.debugLineNum = 274;BA.debugLine="Private Sub UpdateBlur"; + //BA.debugLineNum = 275;BA.debugLine="If BlurBackground = False Then Return"; +if (_blurbackground==__c.False) { +if (true) return "";}; + //BA.debugLineNum = 276;BA.debugLine="Background.Visible = False"; +_background.setVisible(__c.False); + //BA.debugLineNum = 277;BA.debugLine="Dim source As B4XBitmap = Background.Parent.Snaps"; +_source = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper(); +_source = _background.getParent().Snapshot(); + //BA.debugLineNum = 278;BA.debugLine="If source.Width > Background.Width Or source.Heig"; +if (_source.getWidth()>_background.getWidth() || _source.getHeight()>_background.getHeight()) { + //BA.debugLineNum = 279;BA.debugLine="source = source.Crop(0, 0, Background.Width, Bac"; +_source = _source.Crop((int) (0),(int) (0),_background.getWidth(),_background.getHeight()); + }; + //BA.debugLineNum = 281;BA.debugLine="Background.Visible = True"; +_background.setVisible(__c.True); + //BA.debugLineNum = 282;BA.debugLine="BlurImageView.SetLayoutAnimated(0, 0, 0, Backgrou"; +_blurimageview.SetLayoutAnimated((int) (0),(int) (0),(int) (0),_background.getWidth(),_background.getHeight()); + //BA.debugLineNum = 283;BA.debugLine="Dim blurred As BitmapCreator = Blur(source)"; +_blurred = _blur(_source); + //BA.debugLineNum = 284;BA.debugLine="blurred.SetBitmapToImageView(blurred.Bitmap, Blur"; +_blurred._setbitmaptoimageview(_blurred._getbitmap(),_blurimageview); + //BA.debugLineNum = 285;BA.debugLine="End Sub"; +return ""; +} +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xfloattextfield.java b/B4A/Objects/src/keymon/lat/medicomed/b4xfloattextfield.java index afec7ed..9bed232 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xfloattextfield.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xfloattextfield.java @@ -10,7 +10,7 @@ public class b4xfloattextfield extends B4AClass.ImplB4AClass implements BA.SubDe private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xfloattextfield"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xfloattextfield"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xfloattextfield extends B4AClass.ImplB4AClass implements BA.SubDe 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.keywords.Common __c = null; public String _meventname = ""; public Object _mcallback = null; public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null; @@ -75,844 +68,465 @@ 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 _base_resize(keymon.lat.medicomed.b4xfloattextfield __ref,double _width,double _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "base_resize", true)) - {return ((String) Debug.delegate(ba, "base_resize", new Object[] {_width,_height}));} +public String _base_resize(double _width,double _height) throws Exception{ int _firstdistance = 0; -RDebugUtils.currentLine=51511296; - //BA.debugLineNum = 51511296;BA.debugLine="Public Sub Base_Resize (Width As Double, Height As"; -RDebugUtils.currentLine=51511297; - //BA.debugLineNum = 51511297;BA.debugLine="mTextField.SetLayoutAnimated(0, 0, 0, Width, Heig"; -__ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); -RDebugUtils.currentLine=51511298; - //BA.debugLineNum = 51511298;BA.debugLine="Dim FirstDistance As Int = 2dip"; + //BA.debugLineNum = 196;BA.debugLine="Public Sub Base_Resize (Width As Double, Height As"; + //BA.debugLineNum = 197;BA.debugLine="mTextField.SetLayoutAnimated(0, 0, 0, Width, Heig"; +_mtextfield.SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); + //BA.debugLineNum = 198;BA.debugLine="Dim FirstDistance As Int = 2dip"; _firstdistance = __c.DipToCurrent((int) (2)); -RDebugUtils.currentLine=51511299; - //BA.debugLineNum = 51511299;BA.debugLine="If Multiline And xui.IsB4J Then FirstDistance = 2"; -if (__ref._multiline /*boolean*/ && __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4J()) { + //BA.debugLineNum = 199;BA.debugLine="If Multiline And xui.IsB4J Then FirstDistance = 2"; +if (_multiline && _xui.getIsB4J()) { _firstdistance = __c.DipToCurrent((int) (22));}; -RDebugUtils.currentLine=51511300; - //BA.debugLineNum = 51511300;BA.debugLine="If lblV.IsInitialized Then"; -if (__ref._lblv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .IsInitialized()) { -RDebugUtils.currentLine=51511301; - //BA.debugLineNum = 51511301;BA.debugLine="lblV.SetLayoutAnimated(0, Width - lblV.Width - F"; -__ref._lblv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (_width-__ref._lblv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()-_firstdistance),(int) (0),__ref._lblv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),(int) (_height)); -RDebugUtils.currentLine=51511302; - //BA.debugLineNum = 51511302;BA.debugLine="FirstDistance = FirstDistance + lblV.Width + 2di"; -_firstdistance = (int) (_firstdistance+__ref._lblv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()+__c.DipToCurrent((int) (2))); + //BA.debugLineNum = 200;BA.debugLine="If lblV.IsInitialized Then"; +if (_lblv.IsInitialized()) { + //BA.debugLineNum = 201;BA.debugLine="lblV.SetLayoutAnimated(0, Width - lblV.Width - F"; +_lblv.SetLayoutAnimated((int) (0),(int) (_width-_lblv.getWidth()-_firstdistance),(int) (0),_lblv.getWidth(),(int) (_height)); + //BA.debugLineNum = 202;BA.debugLine="FirstDistance = FirstDistance + lblV.Width + 2di"; +_firstdistance = (int) (_firstdistance+_lblv.getWidth()+__c.DipToCurrent((int) (2))); }; -RDebugUtils.currentLine=51511304; - //BA.debugLineNum = 51511304;BA.debugLine="If lblClear.IsInitialized Then"; -if (__ref._lblclear /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .IsInitialized()) { -RDebugUtils.currentLine=51511305; - //BA.debugLineNum = 51511305;BA.debugLine="lblClear.SetLayoutAnimated(0, Width - lblClear.W"; -__ref._lblclear /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (_width-__ref._lblclear /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()-_firstdistance),(int) (0),__ref._lblclear /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),(int) (_height)); + //BA.debugLineNum = 204;BA.debugLine="If lblClear.IsInitialized Then"; +if (_lblclear.IsInitialized()) { + //BA.debugLineNum = 205;BA.debugLine="lblClear.SetLayoutAnimated(0, Width - lblClear.W"; +_lblclear.SetLayoutAnimated((int) (0),(int) (_width-_lblclear.getWidth()-_firstdistance),(int) (0),_lblclear.getWidth(),(int) (_height)); }; -RDebugUtils.currentLine=51511307; - //BA.debugLineNum = 51511307;BA.debugLine="UpdateLabel(mTextField.Text, True)"; -__ref._updatelabel /*String*/ (null,__ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getText(),__c.True); -RDebugUtils.currentLine=51511308; - //BA.debugLineNum = 51511308;BA.debugLine="End Sub"; + //BA.debugLineNum = 207;BA.debugLine="UpdateLabel(mTextField.Text, True)"; +_updatelabel(_mtextfield.getText(),__c.True); + //BA.debugLineNum = 208;BA.debugLine="End Sub"; return ""; } -public String _updatelabel(keymon.lat.medicomed.b4xfloattextfield __ref,String _txt,boolean _force) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "updatelabel", true)) - {return ((String) Debug.delegate(ba, "updatelabel", new Object[] {_txt,_force}));} -anywheresoftware.b4a.objects.B4XViewWrapper _lbl = null; -boolean _goingtolarge = false; -anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _b = null; -RDebugUtils.currentLine=51576832; - //BA.debugLineNum = 51576832;BA.debugLine="Private Sub UpdateLabel (txt As String, force As B"; -RDebugUtils.currentLine=51576833; - //BA.debugLineNum = 51576833;BA.debugLine="For Each lbl As B4XView In Array As B4XView(lblCl"; -{ -final anywheresoftware.b4a.objects.B4XViewWrapper[] group1 = new anywheresoftware.b4a.objects.B4XViewWrapper[]{__ref._lblclear /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ,__ref._lblv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ }; -final int groupLen1 = group1.length -;int index1 = 0; -; -for (; index1 < groupLen1;index1++){ -_lbl = group1[index1]; -RDebugUtils.currentLine=51576834; - //BA.debugLineNum = 51576834;BA.debugLine="If lbl.IsInitialized Then lbl.Visible = Focused"; -if (_lbl.IsInitialized()) { -_lbl.setVisible(__ref._focused /*boolean*/ && _txt.length()>0);}; - } -}; -RDebugUtils.currentLine=51576837; - //BA.debugLineNum = 51576837;BA.debugLine="Dim GoingToLarge As Boolean = txt.Length = 0"; -_goingtolarge = _txt.length()==0; -RDebugUtils.currentLine=51576838; - //BA.debugLineNum = 51576838;BA.debugLine="If GoingToLarge = LargeLabel And force = False Th"; -if (_goingtolarge==__ref._largelabel /*boolean*/ && _force==__c.False) { -if (true) return "";}; -RDebugUtils.currentLine=51576839; - //BA.debugLineNum = 51576839;BA.debugLine="Dim b As B4XBitmap"; -_b = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper(); -RDebugUtils.currentLine=51576840; - //BA.debugLineNum = 51576840;BA.debugLine="If Focused Then"; -if (__ref._focused /*boolean*/ ) { -RDebugUtils.currentLine=51576841; - //BA.debugLineNum = 51576841;BA.debugLine="If GoingToLarge Then b = LargeFocused Else b = S"; -if (_goingtolarge) { -_b = __ref._largefocused /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ ;} -else { -_b = __ref._smallfocused /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ ;}; - }else { -RDebugUtils.currentLine=51576843; - //BA.debugLineNum = 51576843;BA.debugLine="If GoingToLarge Then b = LargeNotFocused Else b"; -if (_goingtolarge) { -_b = __ref._largenotfocused /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ ;} -else { -_b = __ref._smallnotfocused /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ ;}; - }; -RDebugUtils.currentLine=51576845; - //BA.debugLineNum = 51576845;BA.debugLine="If b.IsInitialized = False Then Return"; -if (_b.IsInitialized()==__c.False) { -if (true) return "";}; -RDebugUtils.currentLine=51576846; - //BA.debugLineNum = 51576846;BA.debugLine="HintImageView.SetBitmap(b)"; -__ref._hintimageview /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetBitmap((android.graphics.Bitmap)(_b.getObject())); -RDebugUtils.currentLine=51576847; - //BA.debugLineNum = 51576847;BA.debugLine="If GoingToLarge Then"; -if (_goingtolarge) { -RDebugUtils.currentLine=51576848; - //BA.debugLineNum = 51576848;BA.debugLine="HintImageView.SetLayoutAnimated (AnimationDurati"; -__ref._hintimageview /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated(__ref._animationduration /*int*/ ,__ref._hintlabellargeoffsetx /*int*/ ,(int) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()/(double)2-_b.getHeight()/(double)2),(int) (_b.getWidth()),(int) (_b.getHeight())); -RDebugUtils.currentLine=51576849; - //BA.debugLineNum = 51576849;BA.debugLine="LargeLabel = True"; -__ref._largelabel /*boolean*/ = __c.True; - }else { -RDebugUtils.currentLine=51576851; - //BA.debugLineNum = 51576851;BA.debugLine="HintImageView.SetLayoutAnimated(AnimationDuratio"; -__ref._hintimageview /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated(__ref._animationduration /*int*/ ,__ref._hintlabelsmalloffsetx /*int*/ ,__ref._hintlabelsmalloffsety /*int*/ ,(int) (_b.getWidth()),(int) (_b.getHeight())); -RDebugUtils.currentLine=51576852; - //BA.debugLineNum = 51576852;BA.debugLine="LargeLabel = False"; -__ref._largelabel /*boolean*/ = __c.False; - }; -RDebugUtils.currentLine=51576854; - //BA.debugLineNum = 51576854;BA.debugLine="End Sub"; -return ""; -} -public String _class_globals(keymon.lat.medicomed.b4xfloattextfield __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -RDebugUtils.currentLine=50921472; - //BA.debugLineNum = 50921472;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=50921473; - //BA.debugLineNum = 50921473;BA.debugLine="Private mEventName As String 'ignore"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 16;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 17;BA.debugLine="Private mEventName As String 'ignore"; _meventname = ""; -RDebugUtils.currentLine=50921474; - //BA.debugLineNum = 50921474;BA.debugLine="Private mCallBack As Object 'ignore"; + //BA.debugLineNum = 18;BA.debugLine="Private mCallBack As Object 'ignore"; _mcallback = new Object(); -RDebugUtils.currentLine=50921475; - //BA.debugLineNum = 50921475;BA.debugLine="Public mBase As B4XView 'ignore"; + //BA.debugLineNum = 19;BA.debugLine="Public mBase As B4XView 'ignore"; _mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=50921476; - //BA.debugLineNum = 50921476;BA.debugLine="Private xui As XUI 'ignore"; + //BA.debugLineNum = 20;BA.debugLine="Private xui As XUI 'ignore"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=50921477; - //BA.debugLineNum = 50921477;BA.debugLine="Private mTextField As B4XView"; + //BA.debugLineNum = 21;BA.debugLine="Private mTextField As B4XView"; _mtextfield = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=50921478; - //BA.debugLineNum = 50921478;BA.debugLine="Public AnimationDuration As Int = 200"; + //BA.debugLineNum = 22;BA.debugLine="Public AnimationDuration As Int = 200"; _animationduration = (int) (200); -RDebugUtils.currentLine=50921479; - //BA.debugLineNum = 50921479;BA.debugLine="Public LargeLabelTextSize = 18, SmallLabelTextSiz"; + //BA.debugLineNum = 23;BA.debugLine="Public LargeLabelTextSize = 18, SmallLabelTextSiz"; _largelabeltextsize = (float) (18); _smalllabeltextsize = (float) (14); -RDebugUtils.currentLine=50921480; - //BA.debugLineNum = 50921480;BA.debugLine="Private LargeLabel As Boolean"; + //BA.debugLineNum = 24;BA.debugLine="Private LargeLabel As Boolean"; _largelabel = false; -RDebugUtils.currentLine=50921481; - //BA.debugLineNum = 50921481;BA.debugLine="Private MeasuringCanvas As B4XCanvas"; + //BA.debugLineNum = 25;BA.debugLine="Private MeasuringCanvas As B4XCanvas"; _measuringcanvas = new anywheresoftware.b4a.objects.B4XCanvas(); -RDebugUtils.currentLine=50921482; - //BA.debugLineNum = 50921482;BA.debugLine="Public HintColor As Int"; + //BA.debugLineNum = 26;BA.debugLine="Public HintColor As Int"; _hintcolor = 0; -RDebugUtils.currentLine=50921483; - //BA.debugLineNum = 50921483;BA.debugLine="Public NonFocusedHintColor As Int"; + //BA.debugLineNum = 27;BA.debugLine="Public NonFocusedHintColor As Int"; _nonfocusedhintcolor = 0; -RDebugUtils.currentLine=50921484; - //BA.debugLineNum = 50921484;BA.debugLine="Private HintImageView As B4XView"; + //BA.debugLineNum = 28;BA.debugLine="Private HintImageView As B4XView"; _hintimageview = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=50921485; - //BA.debugLineNum = 50921485;BA.debugLine="Public HintText As String"; + //BA.debugLineNum = 29;BA.debugLine="Public HintText As String"; _hinttext = ""; -RDebugUtils.currentLine=50921486; - //BA.debugLineNum = 50921486;BA.debugLine="Public HintFont As B4XFont"; + //BA.debugLineNum = 30;BA.debugLine="Public HintFont As B4XFont"; _hintfont = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont(); -RDebugUtils.currentLine=50921487; - //BA.debugLineNum = 50921487;BA.debugLine="Private LargeFocused, LargeNotFocused, SmallFocus"; + //BA.debugLineNum = 31;BA.debugLine="Private LargeFocused, LargeNotFocused, SmallFocus"; _largefocused = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper(); _largenotfocused = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper(); _smallfocused = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper(); _smallnotfocused = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper(); -RDebugUtils.currentLine=50921488; - //BA.debugLineNum = 50921488;BA.debugLine="Public Focused As Boolean"; + //BA.debugLineNum = 32;BA.debugLine="Public Focused As Boolean"; _focused = false; -RDebugUtils.currentLine=50921489; - //BA.debugLineNum = 50921489;BA.debugLine="Public lblClear As B4XView"; + //BA.debugLineNum = 33;BA.debugLine="Public lblClear As B4XView"; _lblclear = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=50921490; - //BA.debugLineNum = 50921490;BA.debugLine="Public lblV As B4XView"; + //BA.debugLineNum = 34;BA.debugLine="Public lblV As B4XView"; _lblv = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=50921491; - //BA.debugLineNum = 50921491;BA.debugLine="Private mProps As Map"; + //BA.debugLineNum = 35;BA.debugLine="Private mProps As Map"; _mprops = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=50921492; - //BA.debugLineNum = 50921492;BA.debugLine="Public Tag As Object"; + //BA.debugLineNum = 36;BA.debugLine="Public Tag As Object"; _tag = new Object(); -RDebugUtils.currentLine=50921493; - //BA.debugLineNum = 50921493;BA.debugLine="Private KeyboardType As String 'ignore"; + //BA.debugLineNum = 37;BA.debugLine="Private KeyboardType As String 'ignore"; _keyboardtype = ""; -RDebugUtils.currentLine=50921494; - //BA.debugLineNum = 50921494;BA.debugLine="Private Multiline As Boolean"; + //BA.debugLineNum = 38;BA.debugLine="Private Multiline As Boolean"; _multiline = false; -RDebugUtils.currentLine=50921495; - //BA.debugLineNum = 50921495;BA.debugLine="Private mNextTextField As B4XFloatTextField"; + //BA.debugLineNum = 39;BA.debugLine="Private mNextTextField As B4XFloatTextField"; _mnexttextfield = new keymon.lat.medicomed.b4xfloattextfield(); -RDebugUtils.currentLine=50921497; - //BA.debugLineNum = 50921497;BA.debugLine="Private IME As IME"; + //BA.debugLineNum = 41;BA.debugLine="Private IME As IME"; _ime = new anywheresoftware.b4a.objects.IME(); -RDebugUtils.currentLine=50921502; - //BA.debugLineNum = 50921502;BA.debugLine="Public HintLabelLargeOffsetX, HintLabelSmallOffse"; + //BA.debugLineNum = 46;BA.debugLine="Public HintLabelLargeOffsetX, HintLabelSmallOffse"; _hintlabellargeoffsetx = 0; _hintlabelsmalloffsety = __c.DipToCurrent((int) (2)); _hintlabelsmalloffsetx = __c.DipToCurrent((int) (2)); -RDebugUtils.currentLine=50921503; - //BA.debugLineNum = 50921503;BA.debugLine="Private LastSwitchTextFieldTime As Long"; + //BA.debugLineNum = 47;BA.debugLine="Private LastSwitchTextFieldTime As Long"; _lastswitchtextfieldtime = 0L; -RDebugUtils.currentLine=50921504; - //BA.debugLineNum = 50921504;BA.debugLine="End Sub"; + //BA.debugLineNum = 48;BA.debugLine="End Sub"; return ""; } -public String _createacceptbutton(keymon.lat.medicomed.b4xfloattextfield __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "createacceptbutton", true)) - {return ((String) Debug.delegate(ba, "createacceptbutton", null));} -RDebugUtils.currentLine=51249152; - //BA.debugLineNum = 51249152;BA.debugLine="Private Sub CreateAcceptButton"; -RDebugUtils.currentLine=51249153; - //BA.debugLineNum = 51249153;BA.debugLine="If mProps.GetDefault(\"ShowAccept\", True) = False"; -if ((__ref._mprops /*anywheresoftware.b4a.objects.collections.Map*/ .GetDefault((Object)("ShowAccept"),(Object)(__c.True))).equals((Object)(__c.False))) { +public String _createacceptbutton() throws Exception{ + //BA.debugLineNum = 125;BA.debugLine="Private Sub CreateAcceptButton"; + //BA.debugLineNum = 126;BA.debugLine="If mProps.GetDefault(\"ShowAccept\", True) = False"; +if ((_mprops.GetDefault((Object)("ShowAccept"),(Object)(__c.True))).equals((Object)(__c.False))) { if (true) return "";}; -RDebugUtils.currentLine=51249154; - //BA.debugLineNum = 51249154;BA.debugLine="lblV = CreateButton(Chr(0xE5CA))"; -__ref._lblv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._createbutton /*anywheresoftware.b4a.objects.B4XViewWrapper*/ (null,BA.ObjectToString(__c.Chr(((int)0xe5ca)))); -RDebugUtils.currentLine=51249155; - //BA.debugLineNum = 51249155;BA.debugLine="lblV.Tag = \"v\""; -__ref._lblv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag((Object)("v")); -RDebugUtils.currentLine=51249156; - //BA.debugLineNum = 51249156;BA.debugLine="End Sub"; + //BA.debugLineNum = 127;BA.debugLine="lblV = CreateButton(Chr(0xE5CA))"; +_lblv = _createbutton(BA.ObjectToString(__c.Chr(((int)0xe5ca)))); + //BA.debugLineNum = 128;BA.debugLine="lblV.Tag = \"v\""; +_lblv.setTag((Object)("v")); + //BA.debugLineNum = 129;BA.debugLine="End Sub"; return ""; } -public anywheresoftware.b4a.objects.B4XViewWrapper _createbutton(keymon.lat.medicomed.b4xfloattextfield __ref,String _text) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "createbutton", true)) - {return ((anywheresoftware.b4a.objects.B4XViewWrapper) Debug.delegate(ba, "createbutton", new Object[] {_text}));} -anywheresoftware.b4a.objects.LabelWrapper _lc = null; -anywheresoftware.b4a.objects.B4XViewWrapper _x = null; -RDebugUtils.currentLine=51445760; - //BA.debugLineNum = 51445760;BA.debugLine="Private Sub CreateButton (Text As String) As B4XVi"; -RDebugUtils.currentLine=51445761; - //BA.debugLineNum = 51445761;BA.debugLine="Dim lc As Label"; -_lc = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=51445762; - //BA.debugLineNum = 51445762;BA.debugLine="lc.Initialize(\"lc\")"; -_lc.Initialize(ba,"lc"); -RDebugUtils.currentLine=51445763; - //BA.debugLineNum = 51445763;BA.debugLine="Dim x As B4XView = lc"; -_x = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_x = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lc.getObject())); -RDebugUtils.currentLine=51445764; - //BA.debugLineNum = 51445764;BA.debugLine="x = lc"; -_x = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lc.getObject())); -RDebugUtils.currentLine=51445765; - //BA.debugLineNum = 51445765;BA.debugLine="x.Font = xui.CreateMaterialIcons(20)"; -_x.setFont(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreateMaterialIcons((float) (20))); -RDebugUtils.currentLine=51445766; - //BA.debugLineNum = 51445766;BA.debugLine="x.Text = Text"; -_x.setText(BA.ObjectToCharSequence(_text)); -RDebugUtils.currentLine=51445767; - //BA.debugLineNum = 51445767;BA.debugLine="x.TextColor = mTextField.TextColor"; -_x.setTextColor(__ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getTextColor()); -RDebugUtils.currentLine=51445768; - //BA.debugLineNum = 51445768;BA.debugLine="x.Visible = False"; -_x.setVisible(__c.False); -RDebugUtils.currentLine=51445769; - //BA.debugLineNum = 51445769;BA.debugLine="x.SetTextAlignment(\"CENTER\", \"CENTER\")"; -_x.SetTextAlignment("CENTER","CENTER"); -RDebugUtils.currentLine=51445770; - //BA.debugLineNum = 51445770;BA.debugLine="mBase.AddView(x, 0, 0, 30dip, 30dip)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(_x.getObject()),(int) (0),(int) (0),__c.DipToCurrent((int) (30)),__c.DipToCurrent((int) (30))); -RDebugUtils.currentLine=51445771; - //BA.debugLineNum = 51445771;BA.debugLine="Return x"; -if (true) return _x; -RDebugUtils.currentLine=51445772; - //BA.debugLineNum = 51445772;BA.debugLine="End Sub"; -return null; -} -public anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _createbitmap(keymon.lat.medicomed.b4xfloattextfield __ref,anywheresoftware.b4a.objects.B4XCanvas.B4XRect _r,int _color,anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont _fnt) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "createbitmap", true)) - {return ((anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper) Debug.delegate(ba, "createbitmap", new Object[] {_r,_color,_fnt}));} +public anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _createbitmap(anywheresoftware.b4a.objects.B4XCanvas.B4XRect _r,int _color,anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont _fnt) throws Exception{ anywheresoftware.b4a.objects.B4XViewWrapper _p = null; anywheresoftware.b4a.objects.B4XCanvas _c = null; int _baseline = 0; anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _bmp = null; -RDebugUtils.currentLine=51773440; - //BA.debugLineNum = 51773440;BA.debugLine="Private Sub CreateBitmap(r As B4XRect, Color As In"; -RDebugUtils.currentLine=51773441; - //BA.debugLineNum = 51773441;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"\")"; + //BA.debugLineNum = 257;BA.debugLine="Private Sub CreateBitmap(r As B4XRect, Color As In"; + //BA.debugLineNum = 258;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"\")"; _p = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_p = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,""); -RDebugUtils.currentLine=51773442; - //BA.debugLineNum = 51773442;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, Max(1, r.Width + 2di"; +_p = _xui.CreatePanel(ba,""); + //BA.debugLineNum = 259;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, Max(1, r.Width + 2di"; _p.SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (__c.Max(1,_r.getWidth()+__c.DipToCurrent((int) (2)))),(int) (__c.Max(1,_r.getHeight()+__c.DipToCurrent((int) (2))))); -RDebugUtils.currentLine=51773443; - //BA.debugLineNum = 51773443;BA.debugLine="Dim c As B4XCanvas"; + //BA.debugLineNum = 260;BA.debugLine="Dim c As B4XCanvas"; _c = new anywheresoftware.b4a.objects.B4XCanvas(); -RDebugUtils.currentLine=51773444; - //BA.debugLineNum = 51773444;BA.debugLine="c.Initialize(p)"; + //BA.debugLineNum = 261;BA.debugLine="c.Initialize(p)"; _c.Initialize(_p); -RDebugUtils.currentLine=51773445; - //BA.debugLineNum = 51773445;BA.debugLine="Dim BaseLine As Int = p.Height / 2 - r.Height / 2"; + //BA.debugLineNum = 262;BA.debugLine="Dim BaseLine As Int = p.Height / 2 - r.Height / 2"; _baseline = (int) (_p.getHeight()/(double)2-_r.getHeight()/(double)2-_r.getTop()); -RDebugUtils.currentLine=51773446; - //BA.debugLineNum = 51773446;BA.debugLine="c.DrawText(HintText, p.Width / 2, BaseLine, Fnt,"; -_c.DrawText(ba,__ref._hinttext /*String*/ ,(float) (_p.getWidth()/(double)2),(float) (_baseline),_fnt,_color,BA.getEnumFromString(android.graphics.Paint.Align.class,"CENTER")); -RDebugUtils.currentLine=51773447; - //BA.debugLineNum = 51773447;BA.debugLine="Dim bmp As B4XBitmap = c.CreateBitmap"; + //BA.debugLineNum = 263;BA.debugLine="c.DrawText(HintText, p.Width / 2, BaseLine, Fnt,"; +_c.DrawText(ba,_hinttext,(float) (_p.getWidth()/(double)2),(float) (_baseline),_fnt,_color,BA.getEnumFromString(android.graphics.Paint.Align.class,"CENTER")); + //BA.debugLineNum = 264;BA.debugLine="Dim bmp As B4XBitmap = c.CreateBitmap"; _bmp = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper(); _bmp = _c.CreateBitmap(); -RDebugUtils.currentLine=51773448; - //BA.debugLineNum = 51773448;BA.debugLine="c.Release"; + //BA.debugLineNum = 265;BA.debugLine="c.Release"; _c.Release(); -RDebugUtils.currentLine=51773449; - //BA.debugLineNum = 51773449;BA.debugLine="Return bmp"; + //BA.debugLineNum = 266;BA.debugLine="Return bmp"; if (true) return _bmp; -RDebugUtils.currentLine=51773450; - //BA.debugLineNum = 51773450;BA.debugLine="End Sub"; + //BA.debugLineNum = 267;BA.debugLine="End Sub"; return null; } -public String _createclearbutton(keymon.lat.medicomed.b4xfloattextfield __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "createclearbutton", true)) - {return ((String) Debug.delegate(ba, "createclearbutton", null));} -RDebugUtils.currentLine=51183616; - //BA.debugLineNum = 51183616;BA.debugLine="Private Sub CreateClearButton"; -RDebugUtils.currentLine=51183617; - //BA.debugLineNum = 51183617;BA.debugLine="If mProps.GetDefault(\"ShowClear\", True) = False T"; -if ((__ref._mprops /*anywheresoftware.b4a.objects.collections.Map*/ .GetDefault((Object)("ShowClear"),(Object)(__c.True))).equals((Object)(__c.False))) { +public anywheresoftware.b4a.objects.B4XViewWrapper _createbutton(String _text) throws Exception{ +anywheresoftware.b4a.objects.LabelWrapper _lc = null; +anywheresoftware.b4a.objects.B4XViewWrapper _x = null; + //BA.debugLineNum = 182;BA.debugLine="Private Sub CreateButton (Text As String) As B4XVi"; + //BA.debugLineNum = 183;BA.debugLine="Dim lc As Label"; +_lc = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 184;BA.debugLine="lc.Initialize(\"lc\")"; +_lc.Initialize(ba,"lc"); + //BA.debugLineNum = 185;BA.debugLine="Dim x As B4XView = lc"; +_x = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_x = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lc.getObject())); + //BA.debugLineNum = 186;BA.debugLine="x = lc"; +_x = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lc.getObject())); + //BA.debugLineNum = 187;BA.debugLine="x.Font = xui.CreateMaterialIcons(20)"; +_x.setFont(_xui.CreateMaterialIcons((float) (20))); + //BA.debugLineNum = 188;BA.debugLine="x.Text = Text"; +_x.setText(BA.ObjectToCharSequence(_text)); + //BA.debugLineNum = 189;BA.debugLine="x.TextColor = mTextField.TextColor"; +_x.setTextColor(_mtextfield.getTextColor()); + //BA.debugLineNum = 190;BA.debugLine="x.Visible = False"; +_x.setVisible(__c.False); + //BA.debugLineNum = 191;BA.debugLine="x.SetTextAlignment(\"CENTER\", \"CENTER\")"; +_x.SetTextAlignment("CENTER","CENTER"); + //BA.debugLineNum = 192;BA.debugLine="mBase.AddView(x, 0, 0, 30dip, 30dip)"; +_mbase.AddView((android.view.View)(_x.getObject()),(int) (0),(int) (0),__c.DipToCurrent((int) (30)),__c.DipToCurrent((int) (30))); + //BA.debugLineNum = 193;BA.debugLine="Return x"; +if (true) return _x; + //BA.debugLineNum = 194;BA.debugLine="End Sub"; +return null; +} +public String _createclearbutton() throws Exception{ + //BA.debugLineNum = 117;BA.debugLine="Private Sub CreateClearButton"; + //BA.debugLineNum = 118;BA.debugLine="If mProps.GetDefault(\"ShowClear\", True) = False T"; +if ((_mprops.GetDefault((Object)("ShowClear"),(Object)(__c.True))).equals((Object)(__c.False))) { if (true) return "";}; -RDebugUtils.currentLine=51183618; - //BA.debugLineNum = 51183618;BA.debugLine="If lblClear.IsInitialized And lblClear.Parent.IsI"; -if (__ref._lblclear /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .IsInitialized() && __ref._lblclear /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getParent().IsInitialized()) { -__ref._lblclear /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .RemoveViewFromParent();}; -RDebugUtils.currentLine=51183619; - //BA.debugLineNum = 51183619;BA.debugLine="lblClear = CreateButton(Chr(0xE14C))"; -__ref._lblclear /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._createbutton /*anywheresoftware.b4a.objects.B4XViewWrapper*/ (null,BA.ObjectToString(__c.Chr(((int)0xe14c)))); -RDebugUtils.currentLine=51183620; - //BA.debugLineNum = 51183620;BA.debugLine="lblClear.Tag = \"clear\""; -__ref._lblclear /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag((Object)("clear")); -RDebugUtils.currentLine=51183622; - //BA.debugLineNum = 51183622;BA.debugLine="End Sub"; + //BA.debugLineNum = 119;BA.debugLine="If lblClear.IsInitialized And lblClear.Parent.IsI"; +if (_lblclear.IsInitialized() && _lblclear.getParent().IsInitialized()) { +_lblclear.RemoveViewFromParent();}; + //BA.debugLineNum = 120;BA.debugLine="lblClear = CreateButton(Chr(0xE14C))"; +_lblclear = _createbutton(BA.ObjectToString(__c.Chr(((int)0xe14c)))); + //BA.debugLineNum = 121;BA.debugLine="lblClear.Tag = \"clear\""; +_lblclear.setTag((Object)("clear")); + //BA.debugLineNum = 123;BA.debugLine="End Sub"; return ""; } -public String _createrevealbutton(keymon.lat.medicomed.b4xfloattextfield __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "createrevealbutton", true)) - {return ((String) Debug.delegate(ba, "createrevealbutton", null));} -RDebugUtils.currentLine=51314688; - //BA.debugLineNum = 51314688;BA.debugLine="Private Sub CreateRevealButton"; -RDebugUtils.currentLine=51314689; - //BA.debugLineNum = 51314689;BA.debugLine="lblClear = CreateButton(Chr(0xE8F4))"; -__ref._lblclear /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._createbutton /*anywheresoftware.b4a.objects.B4XViewWrapper*/ (null,BA.ObjectToString(__c.Chr(((int)0xe8f4)))); -RDebugUtils.currentLine=51314690; - //BA.debugLineNum = 51314690;BA.debugLine="lblClear.Tag = \"reveal\""; -__ref._lblclear /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag((Object)("reveal")); -RDebugUtils.currentLine=51314691; - //BA.debugLineNum = 51314691;BA.debugLine="End Sub"; +public String _createrevealbutton() throws Exception{ + //BA.debugLineNum = 132;BA.debugLine="Private Sub CreateRevealButton"; + //BA.debugLineNum = 133;BA.debugLine="lblClear = CreateButton(Chr(0xE8F4))"; +_lblclear = _createbutton(BA.ObjectToString(__c.Chr(((int)0xe8f4)))); + //BA.debugLineNum = 134;BA.debugLine="lblClear.Tag = \"reveal\""; +_lblclear.setTag((Object)("reveal")); + //BA.debugLineNum = 135;BA.debugLine="End Sub"; return ""; } -public anywheresoftware.b4a.objects.B4XViewWrapper _createtextfield(keymon.lat.medicomed.b4xfloattextfield __ref,boolean _password) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "createtextfield", true)) - {return ((anywheresoftware.b4a.objects.B4XViewWrapper) Debug.delegate(ba, "createtextfield", new Object[] {_password}));} +public anywheresoftware.b4a.objects.B4XViewWrapper _createtextfield(boolean _password) throws Exception{ anywheresoftware.b4a.objects.EditTextWrapper _tf = null; -RDebugUtils.currentLine=52363264; - //BA.debugLineNum = 52363264;BA.debugLine="Private Sub CreateTextField (Password As Boolean)"; -RDebugUtils.currentLine=52363280; - //BA.debugLineNum = 52363280;BA.debugLine="Dim tf As EditText"; + //BA.debugLineNum = 328;BA.debugLine="Private Sub CreateTextField (Password As Boolean)"; + //BA.debugLineNum = 344;BA.debugLine="Dim tf As EditText"; _tf = new anywheresoftware.b4a.objects.EditTextWrapper(); -RDebugUtils.currentLine=52363281; - //BA.debugLineNum = 52363281;BA.debugLine="tf.Initialize(\"tf\")"; + //BA.debugLineNum = 345;BA.debugLine="tf.Initialize(\"tf\")"; _tf.Initialize(ba,"tf"); -RDebugUtils.currentLine=52363282; - //BA.debugLineNum = 52363282;BA.debugLine="tf.SingleLine = Not(Multiline)"; -_tf.setSingleLine(__c.Not(__ref._multiline /*boolean*/ )); -RDebugUtils.currentLine=52363283; - //BA.debugLineNum = 52363283;BA.debugLine="tf.PasswordMode = Password"; + //BA.debugLineNum = 346;BA.debugLine="tf.SingleLine = Not(Multiline)"; +_tf.setSingleLine(__c.Not(_multiline)); + //BA.debugLineNum = 347;BA.debugLine="tf.PasswordMode = Password"; _tf.setPasswordMode(_password); -RDebugUtils.currentLine=52363284; - //BA.debugLineNum = 52363284;BA.debugLine="If Password Then"; + //BA.debugLineNum = 348;BA.debugLine="If Password Then"; if (_password) { -RDebugUtils.currentLine=52363285; - //BA.debugLineNum = 52363285;BA.debugLine="If KeyboardType <> \"Text\" Then"; -if ((__ref._keyboardtype /*String*/ ).equals("Text") == false) { -RDebugUtils.currentLine=52363286; - //BA.debugLineNum = 52363286;BA.debugLine="tf.InputType = Bit.Or(tf.INPUT_TYPE_NUMBERS, 16"; + //BA.debugLineNum = 349;BA.debugLine="If KeyboardType <> \"Text\" Then"; +if ((_keyboardtype).equals("Text") == false) { + //BA.debugLineNum = 350;BA.debugLine="tf.InputType = Bit.Or(tf.INPUT_TYPE_NUMBERS, 16"; _tf.setInputType(__c.Bit.Or(_tf.INPUT_TYPE_NUMBERS,(int) (16))); }else { -RDebugUtils.currentLine=52363288; - //BA.debugLineNum = 52363288;BA.debugLine="tf.InputType = Bit.Or(0x00000080, 0x00080000) '"; + //BA.debugLineNum = 352;BA.debugLine="tf.InputType = Bit.Or(0x00000080, 0x00080000) '"; _tf.setInputType(__c.Bit.Or(((int)0x00000080),((int)0x00080000))); }; }else { -RDebugUtils.currentLine=52363291; - //BA.debugLineNum = 52363291;BA.debugLine="Select KeyboardType"; -switch (BA.switchObjectToInt(__ref._keyboardtype /*String*/ ,"Numbers","Decimal")) { + //BA.debugLineNum = 355;BA.debugLine="Select KeyboardType"; +switch (BA.switchObjectToInt(_keyboardtype,"Numbers","Decimal")) { case 0: { -RDebugUtils.currentLine=52363293; - //BA.debugLineNum = 52363293;BA.debugLine="tf.InputType = tf.INPUT_TYPE_NUMBERS"; + //BA.debugLineNum = 357;BA.debugLine="tf.InputType = tf.INPUT_TYPE_NUMBERS"; _tf.setInputType(_tf.INPUT_TYPE_NUMBERS); break; } case 1: { -RDebugUtils.currentLine=52363295; - //BA.debugLineNum = 52363295;BA.debugLine="tf.InputType = tf.INPUT_TYPE_DECIMAL_NUMBERS"; + //BA.debugLineNum = 359;BA.debugLine="tf.InputType = tf.INPUT_TYPE_DECIMAL_NUMBERS"; _tf.setInputType(_tf.INPUT_TYPE_DECIMAL_NUMBERS); break; } } ; }; -RDebugUtils.currentLine=52363298; - //BA.debugLineNum = 52363298;BA.debugLine="Return tf"; + //BA.debugLineNum = 362;BA.debugLine="Return tf"; if (true) return (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_tf.getObject())); -RDebugUtils.currentLine=52363322; - //BA.debugLineNum = 52363322;BA.debugLine="End Sub"; + //BA.debugLineNum = 386;BA.debugLine="End Sub"; return null; } -public String _createtextfieldall(keymon.lat.medicomed.b4xfloattextfield __ref,boolean _passwordmode,anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont _font1,int _textcolor) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "createtextfieldall", true)) - {return ((String) Debug.delegate(ba, "createtextfieldall", new Object[] {_passwordmode,_font1,_textcolor}));} -RDebugUtils.currentLine=51118080; - //BA.debugLineNum = 51118080;BA.debugLine="Private Sub CreateTextFieldAll (PasswordMode As Bo"; -RDebugUtils.currentLine=51118081; - //BA.debugLineNum = 51118081;BA.debugLine="mTextField = CreateTextField (PasswordMode)"; -__ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._createtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ (null,_passwordmode); -RDebugUtils.currentLine=51118082; - //BA.debugLineNum = 51118082;BA.debugLine="mTextField.Font = Font1"; -__ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setFont(_font1); -RDebugUtils.currentLine=51118083; - //BA.debugLineNum = 51118083;BA.debugLine="mTextField.TextColor = TextColor"; -__ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTextColor(_textcolor); -RDebugUtils.currentLine=51118084; - //BA.debugLineNum = 51118084;BA.debugLine="setNextField(mNextTextField)"; -__ref._setnextfield /*String*/ (null,__ref._mnexttextfield /*keymon.lat.medicomed.b4xfloattextfield*/ ); -RDebugUtils.currentLine=51118085; - //BA.debugLineNum = 51118085;BA.debugLine="mBase.AddView(mTextField, 0, 0, 0, 0)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=51118086; - //BA.debugLineNum = 51118086;BA.debugLine="End Sub"; +public String _createtextfieldall(boolean _passwordmode,anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont _font1,int _textcolor) throws Exception{ + //BA.debugLineNum = 109;BA.debugLine="Private Sub CreateTextFieldAll (PasswordMode As Bo"; + //BA.debugLineNum = 110;BA.debugLine="mTextField = CreateTextField (PasswordMode)"; +_mtextfield = _createtextfield(_passwordmode); + //BA.debugLineNum = 111;BA.debugLine="mTextField.Font = Font1"; +_mtextfield.setFont(_font1); + //BA.debugLineNum = 112;BA.debugLine="mTextField.TextColor = TextColor"; +_mtextfield.setTextColor(_textcolor); + //BA.debugLineNum = 113;BA.debugLine="setNextField(mNextTextField)"; +_setnextfield(_mnexttextfield); + //BA.debugLineNum = 114;BA.debugLine="mBase.AddView(mTextField, 0, 0, 0, 0)"; +_mbase.AddView((android.view.View)(_mtextfield.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 115;BA.debugLine="End Sub"; return ""; } -public String _setnextfield(keymon.lat.medicomed.b4xfloattextfield __ref,keymon.lat.medicomed.b4xfloattextfield _field) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "setnextfield", true)) - {return ((String) Debug.delegate(ba, "setnextfield", new Object[] {_field}));} -anywheresoftware.b4a.objects.EditTextWrapper _et = null; -Object _o = null; -RDebugUtils.currentLine=52166656; - //BA.debugLineNum = 52166656;BA.debugLine="Public Sub setNextField (Field As B4XFloatTextFiel"; -RDebugUtils.currentLine=52166657; - //BA.debugLineNum = 52166657;BA.debugLine="If Field.IsInitialized = False Then Return"; -if (_field.IsInitialized /*boolean*/ ()==__c.False) { -if (true) return "";}; -RDebugUtils.currentLine=52166659; - //BA.debugLineNum = 52166659;BA.debugLine="If Multiline = False Then"; -if (__ref._multiline /*boolean*/ ==__c.False) { -RDebugUtils.currentLine=52166660; - //BA.debugLineNum = 52166660;BA.debugLine="If Field <> Me Then"; -if ((_field).equals((keymon.lat.medicomed.b4xfloattextfield)(this)) == false) { -RDebugUtils.currentLine=52166661; - //BA.debugLineNum = 52166661;BA.debugLine="IME.AddHandleActionEvent(mTextField)"; -__ref._ime /*anywheresoftware.b4a.objects.IME*/ .AddHandleActionEvent((android.widget.EditText)(__ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),ba); - }; -RDebugUtils.currentLine=52166663; - //BA.debugLineNum = 52166663;BA.debugLine="Dim et As EditText = mTextField"; -_et = new anywheresoftware.b4a.objects.EditTextWrapper(); -_et = (anywheresoftware.b4a.objects.EditTextWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.EditTextWrapper(), (android.widget.EditText)(__ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject())); -RDebugUtils.currentLine=52166664; - //BA.debugLineNum = 52166664;BA.debugLine="et.ForceDoneButton = True"; -_et.setForceDoneButton(__c.True); - }; -RDebugUtils.currentLine=52166667; - //BA.debugLineNum = 52166667;BA.debugLine="Dim o As Object = Field"; -_o = (Object)(_field); -RDebugUtils.currentLine=52166668; - //BA.debugLineNum = 52166668;BA.debugLine="mNextTextField = o"; -__ref._mnexttextfield /*keymon.lat.medicomed.b4xfloattextfield*/ = (keymon.lat.medicomed.b4xfloattextfield)(_o); -RDebugUtils.currentLine=52166669; - //BA.debugLineNum = 52166669;BA.debugLine="End Sub"; -return ""; -} -public String _designercreateview(keymon.lat.medicomed.b4xfloattextfield __ref,Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "designercreateview", true)) - {return ((String) Debug.delegate(ba, "designercreateview", new Object[] {_base,_lbl,_props}));} +public String _designercreateview(Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ anywheresoftware.b4a.objects.B4XViewWrapper _passedlabel = null; anywheresoftware.b4a.objects.ImageViewWrapper _iv = null; boolean _passwordmode = false; anywheresoftware.b4a.objects.B4XViewWrapper _p = null; -RDebugUtils.currentLine=51052544; - //BA.debugLineNum = 51052544;BA.debugLine="Public Sub DesignerCreateView (Base As Object, lbl"; -RDebugUtils.currentLine=51052545; - //BA.debugLineNum = 51052545;BA.debugLine="mBase = Base"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); -RDebugUtils.currentLine=51052546; - //BA.debugLineNum = 51052546;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._tag /*Object*/ = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getTag(); -RDebugUtils.currentLine=51052546; - //BA.debugLineNum = 51052546;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag(this); -RDebugUtils.currentLine=51052547; - //BA.debugLineNum = 51052547;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0,"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetColorAndBorder(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent,(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=51052548; - //BA.debugLineNum = 51052548;BA.debugLine="mProps = Props"; -__ref._mprops /*anywheresoftware.b4a.objects.collections.Map*/ = _props; -RDebugUtils.currentLine=51052549; - //BA.debugLineNum = 51052549;BA.debugLine="Dim PassedLabel As B4XView = lbl"; + //BA.debugLineNum = 67;BA.debugLine="Public Sub DesignerCreateView (Base As Object, lbl"; + //BA.debugLineNum = 68;BA.debugLine="mBase = Base"; +_mbase = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); + //BA.debugLineNum = 69;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_tag = _mbase.getTag(); + //BA.debugLineNum = 69;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_mbase.setTag(this); + //BA.debugLineNum = 70;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0,"; +_mbase.SetColorAndBorder(_xui.Color_Transparent,(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 71;BA.debugLine="mProps = Props"; +_mprops = _props; + //BA.debugLineNum = 72;BA.debugLine="Dim PassedLabel As B4XView = lbl"; _passedlabel = new anywheresoftware.b4a.objects.B4XViewWrapper(); _passedlabel = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lbl.getObject())); -RDebugUtils.currentLine=51052550; - //BA.debugLineNum = 51052550;BA.debugLine="Dim iv As ImageView"; + //BA.debugLineNum = 73;BA.debugLine="Dim iv As ImageView"; _iv = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=51052551; - //BA.debugLineNum = 51052551;BA.debugLine="iv.Initialize(\"HintImageView\")"; + //BA.debugLineNum = 74;BA.debugLine="iv.Initialize(\"HintImageView\")"; _iv.Initialize(ba,"HintImageView"); -RDebugUtils.currentLine=51052552; - //BA.debugLineNum = 51052552;BA.debugLine="HintImageView = iv"; -__ref._hintimageview /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_iv.getObject())); -RDebugUtils.currentLine=51052553; - //BA.debugLineNum = 51052553;BA.debugLine="KeyboardType = Props.GetDefault(\"KeyboardType\", \""; -__ref._keyboardtype /*String*/ = BA.ObjectToString(_props.GetDefault((Object)("KeyboardType"),(Object)("Text"))); -RDebugUtils.currentLine=51052559; - //BA.debugLineNum = 51052559;BA.debugLine="HintColor = xui.PaintOrColorToColor(Props.Get(\"Hi"; -__ref._hintcolor /*int*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor(_props.Get((Object)("HintColor"))); -RDebugUtils.currentLine=51052560; - //BA.debugLineNum = 51052560;BA.debugLine="NonFocusedHintColor = xui.PaintOrColorToColor(Pro"; -__ref._nonfocusedhintcolor /*int*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor(_props.Get((Object)("NonFocusedHintColor"))); -RDebugUtils.currentLine=51052562; - //BA.debugLineNum = 51052562;BA.debugLine="HintText = Props.Get(\"Hint\")"; -__ref._hinttext /*String*/ = BA.ObjectToString(_props.Get((Object)("Hint"))); -RDebugUtils.currentLine=51052563; - //BA.debugLineNum = 51052563;BA.debugLine="HintFont = PassedLabel.Font"; -__ref._hintfont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ = _passedlabel.getFont(); -RDebugUtils.currentLine=51052564; - //BA.debugLineNum = 51052564;BA.debugLine="Dim PasswordMode As Boolean = Props.GetDefault(\"P"; + //BA.debugLineNum = 75;BA.debugLine="HintImageView = iv"; +_hintimageview = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_iv.getObject())); + //BA.debugLineNum = 76;BA.debugLine="KeyboardType = Props.GetDefault(\"KeyboardType\", \""; +_keyboardtype = BA.ObjectToString(_props.GetDefault((Object)("KeyboardType"),(Object)("Text"))); + //BA.debugLineNum = 82;BA.debugLine="HintColor = xui.PaintOrColorToColor(Props.Get(\"Hi"; +_hintcolor = _xui.PaintOrColorToColor(_props.Get((Object)("HintColor"))); + //BA.debugLineNum = 83;BA.debugLine="NonFocusedHintColor = xui.PaintOrColorToColor(Pro"; +_nonfocusedhintcolor = _xui.PaintOrColorToColor(_props.Get((Object)("NonFocusedHintColor"))); + //BA.debugLineNum = 85;BA.debugLine="HintText = Props.Get(\"Hint\")"; +_hinttext = BA.ObjectToString(_props.Get((Object)("Hint"))); + //BA.debugLineNum = 86;BA.debugLine="HintFont = PassedLabel.Font"; +_hintfont = _passedlabel.getFont(); + //BA.debugLineNum = 87;BA.debugLine="Dim PasswordMode As Boolean = Props.GetDefault(\"P"; _passwordmode = BA.ObjectToBoolean(_props.GetDefault((Object)("PasswordField"),(Object)(__c.False))); -RDebugUtils.currentLine=51052565; - //BA.debugLineNum = 51052565;BA.debugLine="Multiline = Props.GetDefault(\"Multiline\", False)"; -__ref._multiline /*boolean*/ = BA.ObjectToBoolean(_props.GetDefault((Object)("Multiline"),(Object)(__c.False))); -RDebugUtils.currentLine=51052566; - //BA.debugLineNum = 51052566;BA.debugLine="If PasswordMode And Multiline Then"; -if (_passwordmode && __ref._multiline /*boolean*/ ) { -RDebugUtils.currentLine=51052567; - //BA.debugLineNum = 51052567;BA.debugLine="Multiline = False"; -__ref._multiline /*boolean*/ = __c.False; -RDebugUtils.currentLine=51052568; - //BA.debugLineNum = 51052568;BA.debugLine="Log(\"Multiline not supported with password mode."; -__c.LogImpl("951052568","Multiline not supported with password mode.",0); + //BA.debugLineNum = 88;BA.debugLine="Multiline = Props.GetDefault(\"Multiline\", False)"; +_multiline = BA.ObjectToBoolean(_props.GetDefault((Object)("Multiline"),(Object)(__c.False))); + //BA.debugLineNum = 89;BA.debugLine="If PasswordMode And Multiline Then"; +if (_passwordmode && _multiline) { + //BA.debugLineNum = 90;BA.debugLine="Multiline = False"; +_multiline = __c.False; + //BA.debugLineNum = 91;BA.debugLine="Log(\"Multiline not supported with password mode."; +__c.LogImpl("922741016","Multiline not supported with password mode.",0); }; -RDebugUtils.currentLine=51052570; - //BA.debugLineNum = 51052570;BA.debugLine="CreateTextFieldAll(PasswordMode, PassedLabel.Font"; -__ref._createtextfieldall /*String*/ (null,_passwordmode,_passedlabel.getFont(),__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor((Object)(_lbl.getTextColor()))); -RDebugUtils.currentLine=51052572; - //BA.debugLineNum = 51052572;BA.debugLine="mBase.AddView(HintImageView, 0, 0, 0, 0)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._hintimageview /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=51052573; - //BA.debugLineNum = 51052573;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"\")"; + //BA.debugLineNum = 93;BA.debugLine="CreateTextFieldAll(PasswordMode, PassedLabel.Font"; +_createtextfieldall(_passwordmode,_passedlabel.getFont(),_xui.PaintOrColorToColor((Object)(_lbl.getTextColor()))); + //BA.debugLineNum = 95;BA.debugLine="mBase.AddView(HintImageView, 0, 0, 0, 0)"; +_mbase.AddView((android.view.View)(_hintimageview.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 96;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"\")"; _p = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_p = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,""); -RDebugUtils.currentLine=51052574; - //BA.debugLineNum = 51052574;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, 2dip, 2dip)"; +_p = _xui.CreatePanel(ba,""); + //BA.debugLineNum = 97;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, 2dip, 2dip)"; _p.SetLayoutAnimated((int) (0),(int) (0),(int) (0),__c.DipToCurrent((int) (2)),__c.DipToCurrent((int) (2))); -RDebugUtils.currentLine=51052575; - //BA.debugLineNum = 51052575;BA.debugLine="MeasuringCanvas.Initialize(p)"; -__ref._measuringcanvas /*anywheresoftware.b4a.objects.B4XCanvas*/ .Initialize(_p); -RDebugUtils.currentLine=51052576; - //BA.debugLineNum = 51052576;BA.debugLine="Update"; -__ref._update /*String*/ (null); -RDebugUtils.currentLine=51052577; - //BA.debugLineNum = 51052577;BA.debugLine="If PasswordMode And Props.GetDefault(\"ShowRevealB"; + //BA.debugLineNum = 98;BA.debugLine="MeasuringCanvas.Initialize(p)"; +_measuringcanvas.Initialize(_p); + //BA.debugLineNum = 99;BA.debugLine="Update"; +_update(); + //BA.debugLineNum = 100;BA.debugLine="If PasswordMode And Props.GetDefault(\"ShowRevealB"; if (_passwordmode && BA.ObjectToBoolean(_props.GetDefault((Object)("ShowRevealButton"),(Object)(__c.False)))) { -RDebugUtils.currentLine=51052578; - //BA.debugLineNum = 51052578;BA.debugLine="CreateRevealButton"; -__ref._createrevealbutton /*String*/ (null); + //BA.debugLineNum = 101;BA.debugLine="CreateRevealButton"; +_createrevealbutton(); }else { -RDebugUtils.currentLine=51052580; - //BA.debugLineNum = 51052580;BA.debugLine="CreateClearButton"; -__ref._createclearbutton /*String*/ (null); + //BA.debugLineNum = 103;BA.debugLine="CreateClearButton"; +_createclearbutton(); }; -RDebugUtils.currentLine=51052582; - //BA.debugLineNum = 51052582;BA.debugLine="CreateAcceptButton"; -__ref._createacceptbutton /*String*/ (null); -RDebugUtils.currentLine=51052583; - //BA.debugLineNum = 51052583;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; -__ref._base_resize /*String*/ (null,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=51052584; - //BA.debugLineNum = 51052584;BA.debugLine="End Sub"; + //BA.debugLineNum = 105;BA.debugLine="CreateAcceptButton"; +_createacceptbutton(); + //BA.debugLineNum = 106;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; +_base_resize(_mbase.getWidth(),_mbase.getHeight()); + //BA.debugLineNum = 107;BA.debugLine="End Sub"; return ""; } -public String _update(keymon.lat.medicomed.b4xfloattextfield __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "update", true)) - {return ((String) Debug.delegate(ba, "update", null));} -anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont _f = null; -anywheresoftware.b4a.objects.B4XCanvas.B4XRect _r = null; -RDebugUtils.currentLine=51707904; - //BA.debugLineNum = 51707904;BA.debugLine="Public Sub Update"; -RDebugUtils.currentLine=51707905; - //BA.debugLineNum = 51707905;BA.debugLine="Dim f As B4XFont = xui.CreateFont2(HintFont, Lar"; -_f = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreateFont2(__ref._hintfont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ ,__ref._largelabeltextsize /*float*/ ); -RDebugUtils.currentLine=51707906; - //BA.debugLineNum = 51707906;BA.debugLine="Dim r As B4XRect = MeasuringCanvas.MeasureText(Hi"; -_r = __ref._measuringcanvas /*anywheresoftware.b4a.objects.B4XCanvas*/ .MeasureText(__ref._hinttext /*String*/ ,_f); -RDebugUtils.currentLine=51707907; - //BA.debugLineNum = 51707907;BA.debugLine="LargeFocused = CreateBitmap(r, HintColor, f)"; -__ref._largefocused /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ = __ref._createbitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ (null,_r,__ref._hintcolor /*int*/ ,_f); -RDebugUtils.currentLine=51707908; - //BA.debugLineNum = 51707908;BA.debugLine="LargeNotFocused = CreateBitmap(r, NonFocusedHintC"; -__ref._largenotfocused /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ = __ref._createbitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ (null,_r,__ref._nonfocusedhintcolor /*int*/ ,_f); -RDebugUtils.currentLine=51707909; - //BA.debugLineNum = 51707909;BA.debugLine="f = xui.CreateFont2(HintFont, SmallLabelTextSize)"; -_f = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreateFont2(__ref._hintfont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ ,__ref._smalllabeltextsize /*float*/ ); -RDebugUtils.currentLine=51707910; - //BA.debugLineNum = 51707910;BA.debugLine="Dim r As B4XRect = MeasuringCanvas.MeasureText(Hi"; -_r = __ref._measuringcanvas /*anywheresoftware.b4a.objects.B4XCanvas*/ .MeasureText(__ref._hinttext /*String*/ ,_f); -RDebugUtils.currentLine=51707911; - //BA.debugLineNum = 51707911;BA.debugLine="SmallFocused = CreateBitmap(r, HintColor, f)"; -__ref._smallfocused /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ = __ref._createbitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ (null,_r,__ref._hintcolor /*int*/ ,_f); -RDebugUtils.currentLine=51707912; - //BA.debugLineNum = 51707912;BA.debugLine="SmallNotFocused = CreateBitmap(r, NonFocusedHintC"; -__ref._smallnotfocused /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ = __ref._createbitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ (null,_r,__ref._nonfocusedhintcolor /*int*/ ,_f); -RDebugUtils.currentLine=51707913; - //BA.debugLineNum = 51707913;BA.debugLine="UpdateLabel(mTextField.Text, True)"; -__ref._updatelabel /*String*/ (null,__ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getText(),__c.True); -RDebugUtils.currentLine=51707914; - //BA.debugLineNum = 51707914;BA.debugLine="End Sub"; -return ""; -} -public keymon.lat.medicomed.b4xfloattextfield _getnextfield(keymon.lat.medicomed.b4xfloattextfield __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "getnextfield", true)) - {return ((keymon.lat.medicomed.b4xfloattextfield) Debug.delegate(ba, "getnextfield", null));} -RDebugUtils.currentLine=52101120; - //BA.debugLineNum = 52101120;BA.debugLine="Public Sub getNextField As B4XFloatTextField"; -RDebugUtils.currentLine=52101121; - //BA.debugLineNum = 52101121;BA.debugLine="Return mNextTextField"; -if (true) return __ref._mnexttextfield /*keymon.lat.medicomed.b4xfloattextfield*/ ; -RDebugUtils.currentLine=52101122; - //BA.debugLineNum = 52101122;BA.debugLine="End Sub"; +public keymon.lat.medicomed.b4xfloattextfield _getnextfield() throws Exception{ + //BA.debugLineNum = 295;BA.debugLine="Public Sub getNextField As B4XFloatTextField"; + //BA.debugLineNum = 296;BA.debugLine="Return mNextTextField"; +if (true) return _mnexttextfield; + //BA.debugLineNum = 297;BA.debugLine="End Sub"; return null; } -public String _gettext(keymon.lat.medicomed.b4xfloattextfield __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "gettext", true)) - {return ((String) Debug.delegate(ba, "gettext", null));} -RDebugUtils.currentLine=52428800; - //BA.debugLineNum = 52428800;BA.debugLine="Public Sub getText As String"; -RDebugUtils.currentLine=52428801; - //BA.debugLineNum = 52428801;BA.debugLine="Return mTextField.Text"; -if (true) return __ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getText(); -RDebugUtils.currentLine=52428802; - //BA.debugLineNum = 52428802;BA.debugLine="End Sub"; +public String _gettext() throws Exception{ + //BA.debugLineNum = 388;BA.debugLine="Public Sub getText As String"; + //BA.debugLineNum = 389;BA.debugLine="Return mTextField.Text"; +if (true) return _mtextfield.getText(); + //BA.debugLineNum = 390;BA.debugLine="End Sub"; return ""; } -public anywheresoftware.b4a.objects.B4XViewWrapper _gettextfield(keymon.lat.medicomed.b4xfloattextfield __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "gettextfield", true)) - {return ((anywheresoftware.b4a.objects.B4XViewWrapper) Debug.delegate(ba, "gettextfield", null));} -RDebugUtils.currentLine=52625408; - //BA.debugLineNum = 52625408;BA.debugLine="Public Sub getTextField As B4XView"; -RDebugUtils.currentLine=52625409; - //BA.debugLineNum = 52625409;BA.debugLine="Return mTextField"; -if (true) return __ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ; -RDebugUtils.currentLine=52625410; - //BA.debugLineNum = 52625410;BA.debugLine="End Sub"; +public anywheresoftware.b4a.objects.B4XViewWrapper _gettextfield() throws Exception{ + //BA.debugLineNum = 445;BA.debugLine="Public Sub getTextField As B4XView"; + //BA.debugLineNum = 446;BA.debugLine="Return mTextField"; +if (true) return _mtextfield; + //BA.debugLineNum = 447;BA.debugLine="End Sub"; return null; } -public boolean _ime_handleaction(keymon.lat.medicomed.b4xfloattextfield __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "ime_handleaction", true)) - {return ((Boolean) Debug.delegate(ba, "ime_handleaction", null));} -RDebugUtils.currentLine=52232192; - //BA.debugLineNum = 52232192;BA.debugLine="Private Sub ime_HandleAction As Boolean"; -RDebugUtils.currentLine=52232193; - //BA.debugLineNum = 52232193;BA.debugLine="tf_EnterPressed"; -__ref._tf_enterpressed /*String*/ (null); -RDebugUtils.currentLine=52232194; - //BA.debugLineNum = 52232194;BA.debugLine="If mNextTextField.IsInitialized Then Return True"; -if (__ref._mnexttextfield /*keymon.lat.medicomed.b4xfloattextfield*/ .IsInitialized /*boolean*/ ()) { +public boolean _ime_handleaction() throws Exception{ + //BA.debugLineNum = 314;BA.debugLine="Private Sub ime_HandleAction As Boolean"; + //BA.debugLineNum = 315;BA.debugLine="tf_EnterPressed"; +_tf_enterpressed(); + //BA.debugLineNum = 316;BA.debugLine="If mNextTextField.IsInitialized Then Return True"; +if (_mnexttextfield.IsInitialized /*boolean*/ ()) { if (true) return __c.True;}; -RDebugUtils.currentLine=52232195; - //BA.debugLineNum = 52232195;BA.debugLine="Return False"; + //BA.debugLineNum = 317;BA.debugLine="Return False"; if (true) return __c.False; -RDebugUtils.currentLine=52232196; - //BA.debugLineNum = 52232196;BA.debugLine="End Sub"; + //BA.debugLineNum = 318;BA.debugLine="End Sub"; return false; } -public String _tf_enterpressed(keymon.lat.medicomed.b4xfloattextfield __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "tf_enterpressed", true)) - {return ((String) Debug.delegate(ba, "tf_enterpressed", null));} -RDebugUtils.currentLine=52297728; - //BA.debugLineNum = 52297728;BA.debugLine="Private Sub tf_EnterPressed"; -RDebugUtils.currentLine=52297729; - //BA.debugLineNum = 52297729;BA.debugLine="tf_Action"; -__ref._tf_action /*String*/ (null); -RDebugUtils.currentLine=52297734; - //BA.debugLineNum = 52297734;BA.debugLine="End Sub"; -return ""; -} -public String _initialize(keymon.lat.medicomed.b4xfloattextfield __ref,anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ -__ref = this; +public String _initialize(anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ innerInitialize(_ba); -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_callback,_eventname}));} -RDebugUtils.currentLine=50987008; - //BA.debugLineNum = 50987008;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -RDebugUtils.currentLine=50987009; - //BA.debugLineNum = 50987009;BA.debugLine="mEventName = EventName"; -__ref._meventname /*String*/ = _eventname; -RDebugUtils.currentLine=50987010; - //BA.debugLineNum = 50987010;BA.debugLine="mCallBack = Callback"; -__ref._mcallback /*Object*/ = _callback; -RDebugUtils.currentLine=50987011; - //BA.debugLineNum = 50987011;BA.debugLine="If xui.IsB4A Then"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4A()) { -RDebugUtils.currentLine=50987012; - //BA.debugLineNum = 50987012;BA.debugLine="HintLabelLargeOffsetX = 6dip"; -__ref._hintlabellargeoffsetx /*int*/ = __c.DipToCurrent((int) (6)); + //BA.debugLineNum = 50;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; + //BA.debugLineNum = 51;BA.debugLine="mEventName = EventName"; +_meventname = _eventname; + //BA.debugLineNum = 52;BA.debugLine="mCallBack = Callback"; +_mcallback = _callback; + //BA.debugLineNum = 53;BA.debugLine="If xui.IsB4A Then"; +if (_xui.getIsB4A()) { + //BA.debugLineNum = 54;BA.debugLine="HintLabelLargeOffsetX = 6dip"; +_hintlabellargeoffsetx = __c.DipToCurrent((int) (6)); }else { -RDebugUtils.currentLine=50987014; - //BA.debugLineNum = 50987014;BA.debugLine="HintLabelLargeOffsetX = 12dip"; -__ref._hintlabellargeoffsetx /*int*/ = __c.DipToCurrent((int) (12)); + //BA.debugLineNum = 56;BA.debugLine="HintLabelLargeOffsetX = 12dip"; +_hintlabellargeoffsetx = __c.DipToCurrent((int) (12)); }; -RDebugUtils.currentLine=50987017; - //BA.debugLineNum = 50987017;BA.debugLine="IME.Initialize(\"ime\")"; -__ref._ime /*anywheresoftware.b4a.objects.IME*/ .Initialize("ime"); -RDebugUtils.currentLine=50987023; - //BA.debugLineNum = 50987023;BA.debugLine="End Sub"; + //BA.debugLineNum = 59;BA.debugLine="IME.Initialize(\"ime\")"; +_ime.Initialize("ime"); + //BA.debugLineNum = 65;BA.debugLine="End Sub"; return ""; } -public String _lc_click(keymon.lat.medicomed.b4xfloattextfield __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "lc_click", true)) - {return ((String) Debug.delegate(ba, "lc_click", null));} +public String _lc_click() throws Exception{ anywheresoftware.b4a.objects.B4XViewWrapper _btn = null; -RDebugUtils.currentLine=52559872; - //BA.debugLineNum = 52559872;BA.debugLine="Private Sub lc_Click"; -RDebugUtils.currentLine=52559873; - //BA.debugLineNum = 52559873;BA.debugLine="Dim btn As B4XView = Sender"; + //BA.debugLineNum = 403;BA.debugLine="Private Sub lc_Click"; + //BA.debugLineNum = 404;BA.debugLine="Dim btn As B4XView = Sender"; _btn = new anywheresoftware.b4a.objects.B4XViewWrapper(); _btn = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba))); -RDebugUtils.currentLine=52559874; - //BA.debugLineNum = 52559874;BA.debugLine="Select btn.Tag"; + //BA.debugLineNum = 405;BA.debugLine="Select btn.Tag"; switch (BA.switchObjectToInt(_btn.getTag(),(Object)("clear"),(Object)("reveal"),(Object)("hide"),(Object)("v"))) { case 0: { -RDebugUtils.currentLine=52559876; - //BA.debugLineNum = 52559876;BA.debugLine="setText(\"\")"; -__ref._settext /*String*/ (null,""); + //BA.debugLineNum = 407;BA.debugLine="setText(\"\")"; +_settext(""); break; } case 1: { -RDebugUtils.currentLine=52559878; - //BA.debugLineNum = 52559878;BA.debugLine="SwitchFromPasswordToRegular (True)"; -__ref._switchfrompasswordtoregular /*void*/ (null,__c.True); + //BA.debugLineNum = 409;BA.debugLine="SwitchFromPasswordToRegular (True)"; +_switchfrompasswordtoregular(__c.True); break; } case 2: { -RDebugUtils.currentLine=52559880; - //BA.debugLineNum = 52559880;BA.debugLine="SwitchFromPasswordToRegular(False)"; -__ref._switchfrompasswordtoregular /*void*/ (null,__c.False); + //BA.debugLineNum = 411;BA.debugLine="SwitchFromPasswordToRegular(False)"; +_switchfrompasswordtoregular(__c.False); break; } case 3: { -RDebugUtils.currentLine=52559882; - //BA.debugLineNum = 52559882;BA.debugLine="tf_EnterPressed"; -__ref._tf_enterpressed /*String*/ (null); -RDebugUtils.currentLine=52559883; - //BA.debugLineNum = 52559883;BA.debugLine="If mNextTextField.IsInitialized = False Or mNex"; -if (__ref._mnexttextfield /*keymon.lat.medicomed.b4xfloattextfield*/ .IsInitialized /*boolean*/ ()==__c.False || (__ref._mnexttextfield /*keymon.lat.medicomed.b4xfloattextfield*/ ).equals((keymon.lat.medicomed.b4xfloattextfield)(this))) { -RDebugUtils.currentLine=52559885; - //BA.debugLineNum = 52559885;BA.debugLine="IME.HideKeyboard"; -__ref._ime /*anywheresoftware.b4a.objects.IME*/ .HideKeyboard(ba); + //BA.debugLineNum = 413;BA.debugLine="tf_EnterPressed"; +_tf_enterpressed(); + //BA.debugLineNum = 414;BA.debugLine="If mNextTextField.IsInitialized = False Or mNex"; +if (_mnexttextfield.IsInitialized /*boolean*/ ()==__c.False || (_mnexttextfield).equals((keymon.lat.medicomed.b4xfloattextfield)(this))) { + //BA.debugLineNum = 416;BA.debugLine="IME.HideKeyboard"; +_ime.HideKeyboard(ba); }; break; } } ; -RDebugUtils.currentLine=52559891; - //BA.debugLineNum = 52559891;BA.debugLine="End Sub"; + //BA.debugLineNum = 422;BA.debugLine="End Sub"; return ""; } -public String _settext(keymon.lat.medicomed.b4xfloattextfield __ref,String _s) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "settext", true)) - {return ((String) Debug.delegate(ba, "settext", new Object[] {_s}));} +public String _requestfocusandshowkeyboard() throws Exception{ + //BA.debugLineNum = 450;BA.debugLine="Public Sub RequestFocusAndShowKeyboard"; + //BA.debugLineNum = 451;BA.debugLine="mTextField.RequestFocus"; +_mtextfield.RequestFocus(); + //BA.debugLineNum = 453;BA.debugLine="IME.ShowKeyboard(mTextField)"; +_ime.ShowKeyboard((android.view.View)(_mtextfield.getObject())); + //BA.debugLineNum = 455;BA.debugLine="End Sub"; +return ""; +} +public String _setnextfield(keymon.lat.medicomed.b4xfloattextfield _field) throws Exception{ +anywheresoftware.b4a.objects.EditTextWrapper _et = null; +Object _o = null; + //BA.debugLineNum = 299;BA.debugLine="Public Sub setNextField (Field As B4XFloatTextFiel"; + //BA.debugLineNum = 300;BA.debugLine="If Field.IsInitialized = False Then Return"; +if (_field.IsInitialized /*boolean*/ ()==__c.False) { +if (true) return "";}; + //BA.debugLineNum = 302;BA.debugLine="If Multiline = False Then"; +if (_multiline==__c.False) { + //BA.debugLineNum = 303;BA.debugLine="If Field <> Me Then"; +if ((_field).equals((keymon.lat.medicomed.b4xfloattextfield)(this)) == false) { + //BA.debugLineNum = 304;BA.debugLine="IME.AddHandleActionEvent(mTextField)"; +_ime.AddHandleActionEvent((android.widget.EditText)(_mtextfield.getObject()),ba); + }; + //BA.debugLineNum = 306;BA.debugLine="Dim et As EditText = mTextField"; +_et = new anywheresoftware.b4a.objects.EditTextWrapper(); +_et = (anywheresoftware.b4a.objects.EditTextWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.EditTextWrapper(), (android.widget.EditText)(_mtextfield.getObject())); + //BA.debugLineNum = 307;BA.debugLine="et.ForceDoneButton = True"; +_et.setForceDoneButton(__c.True); + }; + //BA.debugLineNum = 310;BA.debugLine="Dim o As Object = Field"; +_o = (Object)(_field); + //BA.debugLineNum = 311;BA.debugLine="mNextTextField = o"; +_mnexttextfield = (keymon.lat.medicomed.b4xfloattextfield)(_o); + //BA.debugLineNum = 312;BA.debugLine="End Sub"; +return ""; +} +public String _settext(String _s) throws Exception{ String _old = ""; -RDebugUtils.currentLine=52494336; - //BA.debugLineNum = 52494336;BA.debugLine="Public Sub setText(s As String)"; -RDebugUtils.currentLine=52494337; - //BA.debugLineNum = 52494337;BA.debugLine="Dim old As String = mTextField.Text 'ignore"; -_old = __ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getText(); -RDebugUtils.currentLine=52494338; - //BA.debugLineNum = 52494338;BA.debugLine="mTextField.Text = s"; -__ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setText(BA.ObjectToCharSequence(_s)); -RDebugUtils.currentLine=52494340; - //BA.debugLineNum = 52494340;BA.debugLine="If IsPaused(Me) Then tf_TextChanged(old, s)"; + //BA.debugLineNum = 392;BA.debugLine="Public Sub setText(s As String)"; + //BA.debugLineNum = 393;BA.debugLine="Dim old As String = mTextField.Text 'ignore"; +_old = _mtextfield.getText(); + //BA.debugLineNum = 394;BA.debugLine="mTextField.Text = s"; +_mtextfield.setText(BA.ObjectToCharSequence(_s)); + //BA.debugLineNum = 396;BA.debugLine="If IsPaused(Me) Then tf_TextChanged(old, s)"; if (__c.IsPaused(ba,this)) { -__ref._tf_textchanged /*String*/ (null,_old,_s);}; -RDebugUtils.currentLine=52494344; - //BA.debugLineNum = 52494344;BA.debugLine="End Sub"; +_tf_textchanged(_old,_s);}; + //BA.debugLineNum = 400;BA.debugLine="End Sub"; return ""; } -public void _switchfrompasswordtoregular(keymon.lat.medicomed.b4xfloattextfield __ref,boolean _toregular) throws Exception{ -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "switchfrompasswordtoregular", true)) - {Debug.delegate(ba, "switchfrompasswordtoregular", new Object[] {_toregular}); return;} -ResumableSub_SwitchFromPasswordToRegular rsub = new ResumableSub_SwitchFromPasswordToRegular(this,__ref,_toregular); +public void _switchfrompasswordtoregular(boolean _toregular) throws Exception{ +ResumableSub_SwitchFromPasswordToRegular rsub = new ResumableSub_SwitchFromPasswordToRegular(this,_toregular); rsub.resume(ba, null); } public static class ResumableSub_SwitchFromPasswordToRegular extends BA.ResumableSub { -public ResumableSub_SwitchFromPasswordToRegular(keymon.lat.medicomed.b4xfloattextfield parent,keymon.lat.medicomed.b4xfloattextfield __ref,boolean _toregular) { +public ResumableSub_SwitchFromPasswordToRegular(keymon.lat.medicomed.b4xfloattextfield parent,boolean _toregular) { this.parent = parent; -this.__ref = __ref; this._toregular = _toregular; -this.__ref = parent; } -keymon.lat.medicomed.b4xfloattextfield __ref; keymon.lat.medicomed.b4xfloattextfield parent; boolean _toregular; String _text = ""; @@ -923,7 +537,6 @@ anywheresoftware.b4a.objects.EditTextWrapper _et = null; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="b4xfloattextfield"; while (true) { switch (state) { @@ -933,41 +546,33 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=51380225; - //BA.debugLineNum = 51380225;BA.debugLine="Dim text As String = mTextField.Text"; -_text = __ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getText(); -RDebugUtils.currentLine=51380226; - //BA.debugLineNum = 51380226;BA.debugLine="Dim textcolor As Int = mTextField.TextColor"; -_textcolor = __ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getTextColor(); -RDebugUtils.currentLine=51380227; - //BA.debugLineNum = 51380227;BA.debugLine="Dim Font1 As B4XFont = mTextField.Font"; -_font1 = __ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getFont(); -RDebugUtils.currentLine=51380228; - //BA.debugLineNum = 51380228;BA.debugLine="Dim oldfield As B4XView = mTextField"; + //BA.debugLineNum = 138;BA.debugLine="Dim text As String = mTextField.Text"; +_text = parent._mtextfield.getText(); + //BA.debugLineNum = 139;BA.debugLine="Dim textcolor As Int = mTextField.TextColor"; +_textcolor = parent._mtextfield.getTextColor(); + //BA.debugLineNum = 140;BA.debugLine="Dim Font1 As B4XFont = mTextField.Font"; +_font1 = parent._mtextfield.getFont(); + //BA.debugLineNum = 141;BA.debugLine="Dim oldfield As B4XView = mTextField"; _oldfield = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_oldfield = __ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ; -RDebugUtils.currentLine=51380230; - //BA.debugLineNum = 51380230;BA.debugLine="CreateTextFieldAll(Not(ToRegular), Font1, textcol"; -__ref._createtextfieldall /*String*/ (null,parent.__c.Not(_toregular),_font1,_textcolor); -RDebugUtils.currentLine=51380231; - //BA.debugLineNum = 51380231;BA.debugLine="mTextField.Text = text"; -__ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setText(BA.ObjectToCharSequence(_text)); -RDebugUtils.currentLine=51380232; - //BA.debugLineNum = 51380232;BA.debugLine="If lblClear.IsInitialized Then"; +_oldfield = parent._mtextfield; + //BA.debugLineNum = 143;BA.debugLine="CreateTextFieldAll(Not(ToRegular), Font1, textcol"; +parent._createtextfieldall(parent.__c.Not(_toregular),_font1,_textcolor); + //BA.debugLineNum = 144;BA.debugLine="mTextField.Text = text"; +parent._mtextfield.setText(BA.ObjectToCharSequence(_text)); + //BA.debugLineNum = 145;BA.debugLine="If lblClear.IsInitialized Then"; if (true) break; case 1: //if this.state = 10; -if (__ref._lblclear /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .IsInitialized()) { +if (parent._lblclear.IsInitialized()) { this.state = 3; }if (true) break; case 3: //C this.state = 4; -RDebugUtils.currentLine=51380233; - //BA.debugLineNum = 51380233;BA.debugLine="If ToRegular = False Then"; + //BA.debugLineNum = 146;BA.debugLine="If ToRegular = False Then"; if (true) break; case 4: @@ -982,268 +587,268 @@ this.state = 8; case 6: //C this.state = 9; -RDebugUtils.currentLine=51380234; - //BA.debugLineNum = 51380234;BA.debugLine="lblClear.Text = Chr(0xE8F4)"; -__ref._lblclear /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setText(BA.ObjectToCharSequence(parent.__c.Chr(((int)0xe8f4)))); -RDebugUtils.currentLine=51380235; - //BA.debugLineNum = 51380235;BA.debugLine="lblClear.Tag = \"reveal\""; -__ref._lblclear /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag((Object)("reveal")); + //BA.debugLineNum = 147;BA.debugLine="lblClear.Text = Chr(0xE8F4)"; +parent._lblclear.setText(BA.ObjectToCharSequence(parent.__c.Chr(((int)0xe8f4)))); + //BA.debugLineNum = 148;BA.debugLine="lblClear.Tag = \"reveal\""; +parent._lblclear.setTag((Object)("reveal")); if (true) break; case 8: //C this.state = 9; -RDebugUtils.currentLine=51380237; - //BA.debugLineNum = 51380237;BA.debugLine="lblClear.Tag = \"hide\""; -__ref._lblclear /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag((Object)("hide")); -RDebugUtils.currentLine=51380238; - //BA.debugLineNum = 51380238;BA.debugLine="lblClear.Text = Chr(0xE8F5)"; -__ref._lblclear /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setText(BA.ObjectToCharSequence(parent.__c.Chr(((int)0xe8f5)))); + //BA.debugLineNum = 150;BA.debugLine="lblClear.Tag = \"hide\""; +parent._lblclear.setTag((Object)("hide")); + //BA.debugLineNum = 151;BA.debugLine="lblClear.Text = Chr(0xE8F5)"; +parent._lblclear.setText(BA.ObjectToCharSequence(parent.__c.Chr(((int)0xe8f5)))); if (true) break; case 9: //C this.state = 10; ; -RDebugUtils.currentLine=51380240; - //BA.debugLineNum = 51380240;BA.debugLine="lblClear.BringToFront"; -__ref._lblclear /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .BringToFront(); + //BA.debugLineNum = 153;BA.debugLine="lblClear.BringToFront"; +parent._lblclear.BringToFront(); if (true) break; ; -RDebugUtils.currentLine=51380242; - //BA.debugLineNum = 51380242;BA.debugLine="If lblV.IsInitialized Then lblV.BringToFront"; + //BA.debugLineNum = 155;BA.debugLine="If lblV.IsInitialized Then lblV.BringToFront"; case 10: //if this.state = 15; -if (__ref._lblv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .IsInitialized()) { +if (parent._lblv.IsInitialized()) { this.state = 12; ;}if (true) break; case 12: //C this.state = 15; -__ref._lblv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .BringToFront(); +parent._lblv.BringToFront(); if (true) break; case 15: //C this.state = 16; ; -RDebugUtils.currentLine=51380243; - //BA.debugLineNum = 51380243;BA.debugLine="HintImageView.BringToFront"; -__ref._hintimageview /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .BringToFront(); -RDebugUtils.currentLine=51380244; - //BA.debugLineNum = 51380244;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; -__ref._base_resize /*String*/ (null,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=51380249; - //BA.debugLineNum = 51380249;BA.debugLine="Dim et As EditText = mTextField"; + //BA.debugLineNum = 156;BA.debugLine="HintImageView.BringToFront"; +parent._hintimageview.BringToFront(); + //BA.debugLineNum = 157;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; +parent._base_resize(parent._mbase.getWidth(),parent._mbase.getHeight()); + //BA.debugLineNum = 162;BA.debugLine="Dim et As EditText = mTextField"; _et = new anywheresoftware.b4a.objects.EditTextWrapper(); -_et = (anywheresoftware.b4a.objects.EditTextWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.EditTextWrapper(), (android.widget.EditText)(__ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject())); -RDebugUtils.currentLine=51380250; - //BA.debugLineNum = 51380250;BA.debugLine="et.SelectionStart = mTextField.Text.Length"; -_et.setSelectionStart(__ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getText().length()); -RDebugUtils.currentLine=51380252; - //BA.debugLineNum = 51380252;BA.debugLine="LastSwitchTextFieldTime = DateTime.Now"; -__ref._lastswitchtextfieldtime /*long*/ = parent.__c.DateTime.getNow(); -RDebugUtils.currentLine=51380253; - //BA.debugLineNum = 51380253;BA.debugLine="mTextField.RequestFocus"; -__ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .RequestFocus(); -RDebugUtils.currentLine=51380254; - //BA.debugLineNum = 51380254;BA.debugLine="oldfield.RemoveViewFromParent"; +_et = (anywheresoftware.b4a.objects.EditTextWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.EditTextWrapper(), (android.widget.EditText)(parent._mtextfield.getObject())); + //BA.debugLineNum = 163;BA.debugLine="et.SelectionStart = mTextField.Text.Length"; +_et.setSelectionStart(parent._mtextfield.getText().length()); + //BA.debugLineNum = 165;BA.debugLine="LastSwitchTextFieldTime = DateTime.Now"; +parent._lastswitchtextfieldtime = parent.__c.DateTime.getNow(); + //BA.debugLineNum = 166;BA.debugLine="mTextField.RequestFocus"; +parent._mtextfield.RequestFocus(); + //BA.debugLineNum = 167;BA.debugLine="oldfield.RemoveViewFromParent"; _oldfield.RemoveViewFromParent(); -RDebugUtils.currentLine=51380256; - //BA.debugLineNum = 51380256;BA.debugLine="LastSwitchTextFieldTime = DateTime.Now + 200"; -__ref._lastswitchtextfieldtime /*long*/ = (long) (parent.__c.DateTime.getNow()+200); -RDebugUtils.currentLine=51380257; - //BA.debugLineNum = 51380257;BA.debugLine="et.Enabled = False"; + //BA.debugLineNum = 169;BA.debugLine="LastSwitchTextFieldTime = DateTime.Now + 200"; +parent._lastswitchtextfieldtime = (long) (parent.__c.DateTime.getNow()+200); + //BA.debugLineNum = 170;BA.debugLine="et.Enabled = False"; _et.setEnabled(parent.__c.False); -RDebugUtils.currentLine=51380258; - //BA.debugLineNum = 51380258;BA.debugLine="Sleep(50)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "b4xfloattextfield", "switchfrompasswordtoregular"),(int) (50)); + //BA.debugLineNum = 171;BA.debugLine="Sleep(50)"; +parent.__c.Sleep(ba,this,(int) (50)); this.state = 20; return; case 20: //C this.state = 16; ; -RDebugUtils.currentLine=51380259; - //BA.debugLineNum = 51380259;BA.debugLine="et.Enabled = True"; + //BA.debugLineNum = 172;BA.debugLine="et.Enabled = True"; _et.setEnabled(parent.__c.True); -RDebugUtils.currentLine=51380260; - //BA.debugLineNum = 51380260;BA.debugLine="Sleep(50)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "b4xfloattextfield", "switchfrompasswordtoregular"),(int) (50)); + //BA.debugLineNum = 173;BA.debugLine="Sleep(50)"; +parent.__c.Sleep(ba,this,(int) (50)); this.state = 21; return; case 21: //C this.state = 16; ; -RDebugUtils.currentLine=51380261; - //BA.debugLineNum = 51380261;BA.debugLine="et.RequestFocus"; + //BA.debugLineNum = 174;BA.debugLine="et.RequestFocus"; _et.RequestFocus(); -RDebugUtils.currentLine=51380262; - //BA.debugLineNum = 51380262;BA.debugLine="IME.ShowKeyboard(mTextField)"; -__ref._ime /*anywheresoftware.b4a.objects.IME*/ .ShowKeyboard((android.view.View)(__ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject())); -RDebugUtils.currentLine=51380264; - //BA.debugLineNum = 51380264;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_Passwo"; + //BA.debugLineNum = 175;BA.debugLine="IME.ShowKeyboard(mTextField)"; +parent._ime.ShowKeyboard((android.view.View)(parent._mtextfield.getObject())); + //BA.debugLineNum = 177;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_Passwo"; if (true) break; case 16: //if this.state = 19; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .SubExists(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_PasswordRevealChanged",(int) (1))) { +if (parent._xui.SubExists(ba,parent._mcallback,parent._meventname+"_PasswordRevealChanged",(int) (1))) { this.state = 18; }if (true) break; case 18: //C this.state = 19; -RDebugUtils.currentLine=51380265; - //BA.debugLineNum = 51380265;BA.debugLine="CallSubDelayed2(mCallBack, mEventName & \"_Passwo"; -parent.__c.CallSubDelayed2(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_PasswordRevealChanged",(Object)(_toregular)); + //BA.debugLineNum = 178;BA.debugLine="CallSubDelayed2(mCallBack, mEventName & \"_Passwo"; +parent.__c.CallSubDelayed2(ba,parent._mcallback,parent._meventname+"_PasswordRevealChanged",(Object)(_toregular)); if (true) break; case 19: //C this.state = -1; ; -RDebugUtils.currentLine=51380267; - //BA.debugLineNum = 51380267;BA.debugLine="End Sub"; + //BA.debugLineNum = 180;BA.debugLine="End Sub"; if (true) break; } } } } -public String _requestfocusandshowkeyboard(keymon.lat.medicomed.b4xfloattextfield __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "requestfocusandshowkeyboard", true)) - {return ((String) Debug.delegate(ba, "requestfocusandshowkeyboard", null));} -RDebugUtils.currentLine=52690944; - //BA.debugLineNum = 52690944;BA.debugLine="Public Sub RequestFocusAndShowKeyboard"; -RDebugUtils.currentLine=52690945; - //BA.debugLineNum = 52690945;BA.debugLine="mTextField.RequestFocus"; -__ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .RequestFocus(); -RDebugUtils.currentLine=52690947; - //BA.debugLineNum = 52690947;BA.debugLine="IME.ShowKeyboard(mTextField)"; -__ref._ime /*anywheresoftware.b4a.objects.IME*/ .ShowKeyboard((android.view.View)(__ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject())); -RDebugUtils.currentLine=52690949; - //BA.debugLineNum = 52690949;BA.debugLine="End Sub"; -return ""; -} -public String _tf_textchanged(keymon.lat.medicomed.b4xfloattextfield __ref,String _old,String _new) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "tf_textchanged", true)) - {return ((String) Debug.delegate(ba, "tf_textchanged", new Object[] {_old,_new}));} -RDebugUtils.currentLine=52035584; - //BA.debugLineNum = 52035584;BA.debugLine="Private Sub tf_TextChanged (Old As String, New As"; -RDebugUtils.currentLine=52035585; - //BA.debugLineNum = 52035585;BA.debugLine="UpdateLabel(New, False)"; -__ref._updatelabel /*String*/ (null,_new,__c.False); -RDebugUtils.currentLine=52035586; - //BA.debugLineNum = 52035586;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_TextCh"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .SubExists(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_TextChanged",(int) (2)) && __ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .IsInitialized()) { -RDebugUtils.currentLine=52035587; - //BA.debugLineNum = 52035587;BA.debugLine="CallSub3(mCallBack, mEventName & \"_TextChanged\","; -__c.CallSubNew3(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_TextChanged",(Object)(_old),(Object)(_new)); +public String _tf_action() throws Exception{ + //BA.debugLineNum = 277;BA.debugLine="Private Sub tf_Action"; + //BA.debugLineNum = 278;BA.debugLine="If mNextTextField.IsInitialized And mNextTextFiel"; +if (_mnexttextfield.IsInitialized /*boolean*/ () && (_mnexttextfield).equals((keymon.lat.medicomed.b4xfloattextfield)(this)) == false) { + //BA.debugLineNum = 279;BA.debugLine="mNextTextField.TextField.RequestFocus"; +_mnexttextfield._gettextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ().RequestFocus(); }; -RDebugUtils.currentLine=52035589; - //BA.debugLineNum = 52035589;BA.debugLine="End Sub"; -return ""; -} -public String _tf_action(keymon.lat.medicomed.b4xfloattextfield __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "tf_action", true)) - {return ((String) Debug.delegate(ba, "tf_action", null));} -RDebugUtils.currentLine=51970048; - //BA.debugLineNum = 51970048;BA.debugLine="Private Sub tf_Action"; -RDebugUtils.currentLine=51970049; - //BA.debugLineNum = 51970049;BA.debugLine="If mNextTextField.IsInitialized And mNextTextFiel"; -if (__ref._mnexttextfield /*keymon.lat.medicomed.b4xfloattextfield*/ .IsInitialized /*boolean*/ () && (__ref._mnexttextfield /*keymon.lat.medicomed.b4xfloattextfield*/ ).equals((keymon.lat.medicomed.b4xfloattextfield)(this)) == false) { -RDebugUtils.currentLine=51970050; - //BA.debugLineNum = 51970050;BA.debugLine="mNextTextField.TextField.RequestFocus"; -__ref._mnexttextfield /*keymon.lat.medicomed.b4xfloattextfield*/ ._gettextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ (null).RequestFocus(); + //BA.debugLineNum = 281;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_EnterP"; +if (_xui.SubExists(ba,_mcallback,_meventname+"_EnterPressed",(int) (0))) { + //BA.debugLineNum = 282;BA.debugLine="CallSubDelayed(mCallBack, mEventName & \"_EnterPr"; +__c.CallSubDelayed(ba,_mcallback,_meventname+"_EnterPressed"); }; -RDebugUtils.currentLine=51970052; - //BA.debugLineNum = 51970052;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_EnterP"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .SubExists(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_EnterPressed",(int) (0))) { -RDebugUtils.currentLine=51970053; - //BA.debugLineNum = 51970053;BA.debugLine="CallSubDelayed(mCallBack, mEventName & \"_EnterPr"; -__c.CallSubDelayed(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_EnterPressed"); - }; -RDebugUtils.currentLine=51970055; - //BA.debugLineNum = 51970055;BA.debugLine="End Sub"; + //BA.debugLineNum = 284;BA.debugLine="End Sub"; return ""; } -public String _tf_beginedit(keymon.lat.medicomed.b4xfloattextfield __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "tf_beginedit", true)) - {return ((String) Debug.delegate(ba, "tf_beginedit", null));} -RDebugUtils.currentLine=51838976; - //BA.debugLineNum = 51838976;BA.debugLine="Private Sub tf_BeginEdit"; -RDebugUtils.currentLine=51838977; - //BA.debugLineNum = 51838977;BA.debugLine="tf_FocusChanged(True)"; -__ref._tf_focuschanged /*String*/ (null,__c.True); -RDebugUtils.currentLine=51838978; - //BA.debugLineNum = 51838978;BA.debugLine="End Sub"; +public String _tf_beginedit() throws Exception{ + //BA.debugLineNum = 269;BA.debugLine="Private Sub tf_BeginEdit"; + //BA.debugLineNum = 270;BA.debugLine="tf_FocusChanged(True)"; +_tf_focuschanged(__c.True); + //BA.debugLineNum = 271;BA.debugLine="End Sub"; return ""; } -public String _tf_focuschanged(keymon.lat.medicomed.b4xfloattextfield __ref,boolean _hasfocus) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "tf_focuschanged", true)) - {return ((String) Debug.delegate(ba, "tf_focuschanged", new Object[] {_hasfocus}));} -RDebugUtils.currentLine=51642368; - //BA.debugLineNum = 51642368;BA.debugLine="Private Sub tf_FocusChanged (HasFocus As Boolean)"; -RDebugUtils.currentLine=51642369; - //BA.debugLineNum = 51642369;BA.debugLine="Focused = HasFocus"; -__ref._focused /*boolean*/ = _hasfocus; -RDebugUtils.currentLine=51642370; - //BA.debugLineNum = 51642370;BA.debugLine="UpdateLabel(mTextField.Text, True)"; -__ref._updatelabel /*String*/ (null,__ref._mtextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getText(),__c.True); -RDebugUtils.currentLine=51642371; - //BA.debugLineNum = 51642371;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_FocusC"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .SubExists(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_FocusChanged",(int) (1))) { -RDebugUtils.currentLine=51642372; - //BA.debugLineNum = 51642372;BA.debugLine="If LastSwitchTextFieldTime + 100 < DateTime.Now"; -if (__ref._lastswitchtextfieldtime /*long*/ +100<__c.DateTime.getNow()) { -RDebugUtils.currentLine=51642373; - //BA.debugLineNum = 51642373;BA.debugLine="CallSubDelayed2(mCallBack, mEventName & \"_Focus"; -__c.CallSubDelayed2(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_FocusChanged",(Object)(__ref._focused /*boolean*/ )); +public String _tf_endedit() throws Exception{ + //BA.debugLineNum = 273;BA.debugLine="Private Sub tf_EndEdit"; + //BA.debugLineNum = 274;BA.debugLine="tf_FocusChanged(False)"; +_tf_focuschanged(__c.False); + //BA.debugLineNum = 275;BA.debugLine="End Sub"; +return ""; +} +public String _tf_enterpressed() throws Exception{ + //BA.debugLineNum = 320;BA.debugLine="Private Sub tf_EnterPressed"; + //BA.debugLineNum = 321;BA.debugLine="tf_Action"; +_tf_action(); + //BA.debugLineNum = 326;BA.debugLine="End Sub"; +return ""; +} +public String _tf_focuschanged(boolean _hasfocus) throws Exception{ + //BA.debugLineNum = 234;BA.debugLine="Private Sub tf_FocusChanged (HasFocus As Boolean)"; + //BA.debugLineNum = 235;BA.debugLine="Focused = HasFocus"; +_focused = _hasfocus; + //BA.debugLineNum = 236;BA.debugLine="UpdateLabel(mTextField.Text, True)"; +_updatelabel(_mtextfield.getText(),__c.True); + //BA.debugLineNum = 237;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_FocusC"; +if (_xui.SubExists(ba,_mcallback,_meventname+"_FocusChanged",(int) (1))) { + //BA.debugLineNum = 238;BA.debugLine="If LastSwitchTextFieldTime + 100 < DateTime.Now"; +if (_lastswitchtextfieldtime+100<__c.DateTime.getNow()) { + //BA.debugLineNum = 239;BA.debugLine="CallSubDelayed2(mCallBack, mEventName & \"_Focus"; +__c.CallSubDelayed2(ba,_mcallback,_meventname+"_FocusChanged",(Object)(_focused)); }; }; -RDebugUtils.currentLine=51642376; - //BA.debugLineNum = 51642376;BA.debugLine="End Sub"; + //BA.debugLineNum = 242;BA.debugLine="End Sub"; return ""; } -public String _tf_endedit(keymon.lat.medicomed.b4xfloattextfield __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xfloattextfield"; -if (Debug.shouldDelegate(ba, "tf_endedit", true)) - {return ((String) Debug.delegate(ba, "tf_endedit", null));} -RDebugUtils.currentLine=51904512; - //BA.debugLineNum = 51904512;BA.debugLine="Private Sub tf_EndEdit"; -RDebugUtils.currentLine=51904513; - //BA.debugLineNum = 51904513;BA.debugLine="tf_FocusChanged(False)"; -__ref._tf_focuschanged /*String*/ (null,__c.False); -RDebugUtils.currentLine=51904514; - //BA.debugLineNum = 51904514;BA.debugLine="End Sub"; +public String _tf_textchanged(String _old,String _new) throws Exception{ + //BA.debugLineNum = 287;BA.debugLine="Private Sub tf_TextChanged (Old As String, New As"; + //BA.debugLineNum = 288;BA.debugLine="UpdateLabel(New, False)"; +_updatelabel(_new,__c.False); + //BA.debugLineNum = 289;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_TextCh"; +if (_xui.SubExists(ba,_mcallback,_meventname+"_TextChanged",(int) (2)) && _mtextfield.IsInitialized()) { + //BA.debugLineNum = 290;BA.debugLine="CallSub3(mCallBack, mEventName & \"_TextChanged\","; +__c.CallSubNew3(ba,_mcallback,_meventname+"_TextChanged",(Object)(_old),(Object)(_new)); + }; + //BA.debugLineNum = 292;BA.debugLine="End Sub"; return ""; } -public void RemoveWarning() throws Exception{ - anywheresoftware.b4a.shell.Shell s = anywheresoftware.b4a.shell.Shell.INSTANCE; - java.lang.reflect.Field f = s.getClass().getDeclaredField("errorMessagesForSyncEvents"); - f.setAccessible(true); - java.util.HashSet h = (java.util.HashSet)f.get(s); - if (h == null) { - h = new java.util.HashSet(); - f.set(s, h); - } - h.add("tf_focuschanged"); +public String _update() throws Exception{ +anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont _f = null; +anywheresoftware.b4a.objects.B4XCanvas.B4XRect _r = null; + //BA.debugLineNum = 245;BA.debugLine="Public Sub Update"; + //BA.debugLineNum = 246;BA.debugLine="Dim f As B4XFont = xui.CreateFont2(HintFont, Lar"; +_f = _xui.CreateFont2(_hintfont,_largelabeltextsize); + //BA.debugLineNum = 247;BA.debugLine="Dim r As B4XRect = MeasuringCanvas.MeasureText(Hi"; +_r = _measuringcanvas.MeasureText(_hinttext,_f); + //BA.debugLineNum = 248;BA.debugLine="LargeFocused = CreateBitmap(r, HintColor, f)"; +_largefocused = _createbitmap(_r,_hintcolor,_f); + //BA.debugLineNum = 249;BA.debugLine="LargeNotFocused = CreateBitmap(r, NonFocusedHintC"; +_largenotfocused = _createbitmap(_r,_nonfocusedhintcolor,_f); + //BA.debugLineNum = 250;BA.debugLine="f = xui.CreateFont2(HintFont, SmallLabelTextSize)"; +_f = _xui.CreateFont2(_hintfont,_smalllabeltextsize); + //BA.debugLineNum = 251;BA.debugLine="Dim r As B4XRect = MeasuringCanvas.MeasureText(Hi"; +_r = _measuringcanvas.MeasureText(_hinttext,_f); + //BA.debugLineNum = 252;BA.debugLine="SmallFocused = CreateBitmap(r, HintColor, f)"; +_smallfocused = _createbitmap(_r,_hintcolor,_f); + //BA.debugLineNum = 253;BA.debugLine="SmallNotFocused = CreateBitmap(r, NonFocusedHintC"; +_smallnotfocused = _createbitmap(_r,_nonfocusedhintcolor,_f); + //BA.debugLineNum = 254;BA.debugLine="UpdateLabel(mTextField.Text, True)"; +_updatelabel(_mtextfield.getText(),__c.True); + //BA.debugLineNum = 255;BA.debugLine="End Sub"; +return ""; +} +public String _updatelabel(String _txt,boolean _force) throws Exception{ +anywheresoftware.b4a.objects.B4XViewWrapper _lbl = null; +boolean _goingtolarge = false; +anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _b = null; + //BA.debugLineNum = 210;BA.debugLine="Private Sub UpdateLabel (txt As String, force As B"; + //BA.debugLineNum = 211;BA.debugLine="For Each lbl As B4XView In Array As B4XView(lblCl"; +{ +final anywheresoftware.b4a.objects.B4XViewWrapper[] group1 = new anywheresoftware.b4a.objects.B4XViewWrapper[]{_lblclear,_lblv}; +final int groupLen1 = group1.length +;int index1 = 0; +; +for (; index1 < groupLen1;index1++){ +_lbl = group1[index1]; + //BA.debugLineNum = 212;BA.debugLine="If lbl.IsInitialized Then lbl.Visible = Focused"; +if (_lbl.IsInitialized()) { +_lbl.setVisible(_focused && _txt.length()>0);}; + } +}; + //BA.debugLineNum = 215;BA.debugLine="Dim GoingToLarge As Boolean = txt.Length = 0"; +_goingtolarge = _txt.length()==0; + //BA.debugLineNum = 216;BA.debugLine="If GoingToLarge = LargeLabel And force = False Th"; +if (_goingtolarge==_largelabel && _force==__c.False) { +if (true) return "";}; + //BA.debugLineNum = 217;BA.debugLine="Dim b As B4XBitmap"; +_b = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper(); + //BA.debugLineNum = 218;BA.debugLine="If Focused Then"; +if (_focused) { + //BA.debugLineNum = 219;BA.debugLine="If GoingToLarge Then b = LargeFocused Else b = S"; +if (_goingtolarge) { +_b = _largefocused;} +else { +_b = _smallfocused;}; + }else { + //BA.debugLineNum = 221;BA.debugLine="If GoingToLarge Then b = LargeNotFocused Else b"; +if (_goingtolarge) { +_b = _largenotfocused;} +else { +_b = _smallnotfocused;}; + }; + //BA.debugLineNum = 223;BA.debugLine="If b.IsInitialized = False Then Return"; +if (_b.IsInitialized()==__c.False) { +if (true) return "";}; + //BA.debugLineNum = 224;BA.debugLine="HintImageView.SetBitmap(b)"; +_hintimageview.SetBitmap((android.graphics.Bitmap)(_b.getObject())); + //BA.debugLineNum = 225;BA.debugLine="If GoingToLarge Then"; +if (_goingtolarge) { + //BA.debugLineNum = 226;BA.debugLine="HintImageView.SetLayoutAnimated (AnimationDurati"; +_hintimageview.SetLayoutAnimated(_animationduration,_hintlabellargeoffsetx,(int) (_mbase.getHeight()/(double)2-_b.getHeight()/(double)2),(int) (_b.getWidth()),(int) (_b.getHeight())); + //BA.debugLineNum = 227;BA.debugLine="LargeLabel = True"; +_largelabel = __c.True; + }else { + //BA.debugLineNum = 229;BA.debugLine="HintImageView.SetLayoutAnimated(AnimationDuratio"; +_hintimageview.SetLayoutAnimated(_animationduration,_hintlabelsmalloffsetx,_hintlabelsmalloffsety,(int) (_b.getWidth()),(int) (_b.getHeight())); + //BA.debugLineNum = 230;BA.debugLine="LargeLabel = False"; +_largelabel = __c.False; + }; + //BA.debugLineNum = 232;BA.debugLine="End Sub"; +return ""; +} +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} } -} \ No newline at end of file diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xformatter.java b/B4A/Objects/src/keymon/lat/medicomed/b4xformatter.java index 201d804..987899f 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xformatter.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xformatter.java @@ -10,7 +10,7 @@ public class b4xformatter extends B4AClass.ImplB4AClass implements BA.SubDelegat private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xformatter"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xformatter"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,13 +23,23 @@ public class b4xformatter extends B4AClass.ImplB4AClass implements BA.SubDelegat 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.collections.List _formats = null; +public int _max_value = 0; +public int _min_value = 0; +public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; +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 static class _b4xformatdata{ public boolean IsInitialized; public String Prefix; @@ -67,42 +77,113 @@ FractionPaddingChar = ""; public String toString() { return BA.TypeToString(this, false); }} -public anywheresoftware.b4a.keywords.Common __c = null; -public anywheresoftware.b4a.objects.collections.List _formats = null; -public int _max_value = 0; -public int _min_value = 0; -public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; -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 keymon.lat.medicomed.b4xformatter._b4xformatdata _getdefaultformat(keymon.lat.medicomed.b4xformatter __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xformatter"; -if (Debug.shouldDelegate(ba, "getdefaultformat", true)) - {return ((keymon.lat.medicomed.b4xformatter._b4xformatdata) Debug.delegate(ba, "getdefaultformat", null));} -RDebugUtils.currentLine=62259200; - //BA.debugLineNum = 62259200;BA.debugLine="Public Sub GetDefaultFormat As B4XFormatData"; -RDebugUtils.currentLine=62259201; - //BA.debugLineNum = 62259201;BA.debugLine="Return formats.Get(0)"; -if (true) return (keymon.lat.medicomed.b4xformatter._b4xformatdata)(__ref._formats /*anywheresoftware.b4a.objects.collections.List*/ .Get((int) (0))); -RDebugUtils.currentLine=62259202; - //BA.debugLineNum = 62259202;BA.debugLine="End Sub"; +public String _addformatdata(keymon.lat.medicomed.b4xformatter._b4xformatdata _data,double _rangestart,double _rangeend,boolean _includeedges) throws Exception{ +double _factor = 0; + //BA.debugLineNum = 65;BA.debugLine="Public Sub AddFormatData (Data As B4XFormatData, R"; + //BA.debugLineNum = 66;BA.debugLine="Dim factor As Double = Power(10, -Data.MaximumFra"; +_factor = __c.Power(10,-_data.MaximumFractions /*int*/ ); + //BA.debugLineNum = 67;BA.debugLine="If IncludeEdges = False Then"; +if (_includeedges==__c.False) { + //BA.debugLineNum = 68;BA.debugLine="RangeStart = RangeStart + factor"; +_rangestart = _rangestart+_factor; + //BA.debugLineNum = 69;BA.debugLine="RangeEnd = RangeEnd - factor"; +_rangeend = _rangeend-_factor; + }; + //BA.debugLineNum = 71;BA.debugLine="RangeStart = RangeStart - factor / 2"; +_rangestart = _rangestart-_factor/(double)2; + //BA.debugLineNum = 72;BA.debugLine="RangeEnd = RangeEnd + factor / 2"; +_rangeend = _rangeend+_factor/(double)2; + //BA.debugLineNum = 73;BA.debugLine="Data.RangeStart = RangeStart"; +_data.RangeStart /*double*/ = _rangestart; + //BA.debugLineNum = 74;BA.debugLine="Data.RangeEnd = RangeEnd"; +_data.RangeEnd /*double*/ = _rangeend; + //BA.debugLineNum = 75;BA.debugLine="formats.Add(Data)"; +_formats.Add((Object)(_data)); + //BA.debugLineNum = 76;BA.debugLine="End Sub"; +return ""; +} +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Type B4XFormatData (Prefix As String, Postfix As"; +; + //BA.debugLineNum = 6;BA.debugLine="Private formats As List"; +_formats = new anywheresoftware.b4a.objects.collections.List(); + //BA.debugLineNum = 7;BA.debugLine="Public Const MAX_VALUE = 0x7fffffff, MIN_VALUE ="; +_max_value = ((int)0x7fffffff); +_min_value = ((int)0x80000000); + //BA.debugLineNum = 9;BA.debugLine="Private xui As XUI"; +_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); + //BA.debugLineNum = 11;BA.debugLine="End Sub"; +return ""; +} +public keymon.lat.medicomed.b4xformatter._b4xformatdata _copyformatdata(keymon.lat.medicomed.b4xformatter._b4xformatdata _data) throws Exception{ +keymon.lat.medicomed.b4xformatter._b4xformatdata _d = null; + //BA.debugLineNum = 38;BA.debugLine="Public Sub CopyFormatData (Data As B4XFormatData)"; + //BA.debugLineNum = 39;BA.debugLine="Dim d As B4XFormatData"; +_d = new keymon.lat.medicomed.b4xformatter._b4xformatdata(); + //BA.debugLineNum = 40;BA.debugLine="d.Initialize"; +_d.Initialize(); + //BA.debugLineNum = 41;BA.debugLine="d.DecimalPoint = Data.DecimalPoint"; +_d.DecimalPoint /*String*/ = _data.DecimalPoint /*String*/ ; + //BA.debugLineNum = 42;BA.debugLine="If Data.FormatFont.IsInitialized Then"; +if (_data.FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ .getIsInitialized()) { + //BA.debugLineNum = 44;BA.debugLine="d.FormatFont = xui.CreateFont(Data.FormatFont.To"; +_d.FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ = _xui.CreateFont((android.graphics.Typeface)(_data.FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ .ToNativeFont().getObject()),_data.FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ .getSize()); + }; + //BA.debugLineNum = 47;BA.debugLine="d.GroupingCharacter = Data.GroupingCharacter"; +_d.GroupingCharacter /*String*/ = _data.GroupingCharacter /*String*/ ; + //BA.debugLineNum = 48;BA.debugLine="d.MaximumFractions = Data.MaximumFractions"; +_d.MaximumFractions /*int*/ = _data.MaximumFractions /*int*/ ; + //BA.debugLineNum = 49;BA.debugLine="d.MinimumFractions = Data.MinimumFractions"; +_d.MinimumFractions /*int*/ = _data.MinimumFractions /*int*/ ; + //BA.debugLineNum = 50;BA.debugLine="d.MinimumIntegers = Data.MinimumIntegers"; +_d.MinimumIntegers /*int*/ = _data.MinimumIntegers /*int*/ ; + //BA.debugLineNum = 51;BA.debugLine="d.Postfix = Data.Postfix"; +_d.Postfix /*String*/ = _data.Postfix /*String*/ ; + //BA.debugLineNum = 52;BA.debugLine="d.Prefix = Data.Prefix"; +_d.Prefix /*String*/ = _data.Prefix /*String*/ ; + //BA.debugLineNum = 53;BA.debugLine="d.RangeEnd = Data.RangeEnd"; +_d.RangeEnd /*double*/ = _data.RangeEnd /*double*/ ; + //BA.debugLineNum = 54;BA.debugLine="d.RangeStart = Data.RangeStart"; +_d.RangeStart /*double*/ = _data.RangeStart /*double*/ ; + //BA.debugLineNum = 55;BA.debugLine="d.RemoveMinusSign = Data.RemoveMinusSign"; +_d.RemoveMinusSign /*boolean*/ = _data.RemoveMinusSign /*boolean*/ ; + //BA.debugLineNum = 56;BA.debugLine="d.TextColor = Data.TextColor"; +_d.TextColor /*int*/ = _data.TextColor /*int*/ ; + //BA.debugLineNum = 57;BA.debugLine="d.FractionPaddingChar = Data.FractionPaddingChar"; +_d.FractionPaddingChar /*String*/ = _data.FractionPaddingChar /*String*/ ; + //BA.debugLineNum = 58;BA.debugLine="d.IntegerPaddingChar = Data.IntegerPaddingChar"; +_d.IntegerPaddingChar /*String*/ = _data.IntegerPaddingChar /*String*/ ; + //BA.debugLineNum = 59;BA.debugLine="Return d"; +if (true) return _d; + //BA.debugLineNum = 60;BA.debugLine="End Sub"; return null; } -public String _format(keymon.lat.medicomed.b4xformatter __ref,double _number) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xformatter"; -if (Debug.shouldDelegate(ba, "format", true)) - {return ((String) Debug.delegate(ba, "format", new Object[] {_number}));} +public keymon.lat.medicomed.b4xformatter._b4xformatdata _createdefaultformat() throws Exception{ +keymon.lat.medicomed.b4xformatter._b4xformatdata _d = null; + //BA.debugLineNum = 19;BA.debugLine="Private Sub CreateDefaultFormat As B4XFormatData"; + //BA.debugLineNum = 20;BA.debugLine="Dim d As B4XFormatData"; +_d = new keymon.lat.medicomed.b4xformatter._b4xformatdata(); + //BA.debugLineNum = 21;BA.debugLine="d.Initialize"; +_d.Initialize(); + //BA.debugLineNum = 22;BA.debugLine="d.GroupingCharacter = \",\""; +_d.GroupingCharacter /*String*/ = ","; + //BA.debugLineNum = 23;BA.debugLine="d.DecimalPoint = \".\""; +_d.DecimalPoint /*String*/ = "."; + //BA.debugLineNum = 24;BA.debugLine="d.MaximumFractions = 3"; +_d.MaximumFractions /*int*/ = (int) (3); + //BA.debugLineNum = 25;BA.debugLine="d.MinimumIntegers = 1"; +_d.MinimumIntegers /*int*/ = (int) (1); + //BA.debugLineNum = 26;BA.debugLine="d.IntegerPaddingChar = \"0\""; +_d.IntegerPaddingChar /*String*/ = "0"; + //BA.debugLineNum = 27;BA.debugLine="d.FractionPaddingChar = \"0\""; +_d.FractionPaddingChar /*String*/ = "0"; + //BA.debugLineNum = 28;BA.debugLine="Return d"; +if (true) return _d; + //BA.debugLineNum = 29;BA.debugLine="End Sub"; +return null; +} +public String _format(double _number) throws Exception{ keymon.lat.medicomed.b4xformatter._b4xformatdata _data = null; anywheresoftware.b4a.keywords.StringBuilderWrapper _sb = null; int _numberstartindex = 0; @@ -114,422 +195,183 @@ int _fracstartindex = 0; int _lastzerocount = 0; int _multipler = 0; int _w = 0; -RDebugUtils.currentLine=62390272; - //BA.debugLineNum = 62390272;BA.debugLine="Public Sub Format (Number As Double) As String"; -RDebugUtils.currentLine=62390273; - //BA.debugLineNum = 62390273;BA.debugLine="If Number < MIN_VALUE Or Number > MAX_VALUE Then"; -if (_number<__ref._min_value /*int*/ || _number>__ref._max_value /*int*/ ) { + //BA.debugLineNum = 92;BA.debugLine="Public Sub Format (Number As Double) As String"; + //BA.debugLineNum = 93;BA.debugLine="If Number < MIN_VALUE Or Number > MAX_VALUE Then"; +if (_number<_min_value || _number>_max_value) { if (true) return "OVERFLOW";}; -RDebugUtils.currentLine=62390274; - //BA.debugLineNum = 62390274;BA.debugLine="Dim data As B4XFormatData = GetFormatData (Number"; -_data = __ref._getformatdata /*keymon.lat.medicomed.b4xformatter._b4xformatdata*/ (null,_number); -RDebugUtils.currentLine=62390275; - //BA.debugLineNum = 62390275;BA.debugLine="Dim sb As StringBuilder"; + //BA.debugLineNum = 94;BA.debugLine="Dim data As B4XFormatData = GetFormatData (Number"; +_data = _getformatdata(_number); + //BA.debugLineNum = 95;BA.debugLine="Dim sb As StringBuilder"; _sb = new anywheresoftware.b4a.keywords.StringBuilderWrapper(); -RDebugUtils.currentLine=62390276; - //BA.debugLineNum = 62390276;BA.debugLine="sb.Initialize"; + //BA.debugLineNum = 96;BA.debugLine="sb.Initialize"; _sb.Initialize(); -RDebugUtils.currentLine=62390277; - //BA.debugLineNum = 62390277;BA.debugLine="sb.Append(data.Prefix)"; + //BA.debugLineNum = 97;BA.debugLine="sb.Append(data.Prefix)"; _sb.Append(_data.Prefix /*String*/ ); -RDebugUtils.currentLine=62390278; - //BA.debugLineNum = 62390278;BA.debugLine="Dim NumberStartIndex As Int = sb.Length"; + //BA.debugLineNum = 98;BA.debugLine="Dim NumberStartIndex As Int = sb.Length"; _numberstartindex = _sb.getLength(); -RDebugUtils.currentLine=62390279; - //BA.debugLineNum = 62390279;BA.debugLine="Dim factor As Double = Power(10, -data.MaximumFra"; + //BA.debugLineNum = 99;BA.debugLine="Dim factor As Double = Power(10, -data.MaximumFra"; _factor = __c.Power(10,-_data.MaximumFractions /*int*/ -1)*5; -RDebugUtils.currentLine=62390280; - //BA.debugLineNum = 62390280;BA.debugLine="If Number < -factor And data.RemoveMinusSign = Fa"; + //BA.debugLineNum = 100;BA.debugLine="If Number < -factor And data.RemoveMinusSign = Fa"; if (_number<-_factor && _data.RemoveMinusSign /*boolean*/ ==__c.False) { -RDebugUtils.currentLine=62390281; - //BA.debugLineNum = 62390281;BA.debugLine="sb.Append(\"-\")"; + //BA.debugLineNum = 101;BA.debugLine="sb.Append(\"-\")"; _sb.Append("-"); -RDebugUtils.currentLine=62390282; - //BA.debugLineNum = 62390282;BA.debugLine="NumberStartIndex = NumberStartIndex + 1"; + //BA.debugLineNum = 102;BA.debugLine="NumberStartIndex = NumberStartIndex + 1"; _numberstartindex = (int) (_numberstartindex+1); }; -RDebugUtils.currentLine=62390284; - //BA.debugLineNum = 62390284;BA.debugLine="Number = Abs(Number) + factor"; + //BA.debugLineNum = 104;BA.debugLine="Number = Abs(Number) + factor"; _number = __c.Abs(_number)+_factor; -RDebugUtils.currentLine=62390285; - //BA.debugLineNum = 62390285;BA.debugLine="Dim whole As Int = Number"; + //BA.debugLineNum = 105;BA.debugLine="Dim whole As Int = Number"; _whole = (int) (_number); -RDebugUtils.currentLine=62390286; - //BA.debugLineNum = 62390286;BA.debugLine="Dim frac As Double = Number - whole"; + //BA.debugLineNum = 106;BA.debugLine="Dim frac As Double = Number - whole"; _frac = _number-_whole; -RDebugUtils.currentLine=62390287; - //BA.debugLineNum = 62390287;BA.debugLine="Dim g As Int"; + //BA.debugLineNum = 107;BA.debugLine="Dim g As Int"; _g = 0; -RDebugUtils.currentLine=62390288; - //BA.debugLineNum = 62390288;BA.debugLine="Do While whole > 0"; + //BA.debugLineNum = 108;BA.debugLine="Do While whole > 0"; while (_whole>0) { -RDebugUtils.currentLine=62390289; - //BA.debugLineNum = 62390289;BA.debugLine="If g > 0 And g Mod 3 = 0 And data.GroupingCharac"; + //BA.debugLineNum = 109;BA.debugLine="If g > 0 And g Mod 3 = 0 And data.GroupingCharac"; if (_g>0 && _g%3==0 && _data.GroupingCharacter /*String*/ .length()>0) { -RDebugUtils.currentLine=62390290; - //BA.debugLineNum = 62390290;BA.debugLine="sb.Insert(NumberStartIndex, data.GroupingCharac"; + //BA.debugLineNum = 110;BA.debugLine="sb.Insert(NumberStartIndex, data.GroupingCharac"; _sb.Insert(_numberstartindex,_data.GroupingCharacter /*String*/ ); }; -RDebugUtils.currentLine=62390292; - //BA.debugLineNum = 62390292;BA.debugLine="g = g + 1"; + //BA.debugLineNum = 112;BA.debugLine="g = g + 1"; _g = (int) (_g+1); -RDebugUtils.currentLine=62390293; - //BA.debugLineNum = 62390293;BA.debugLine="sb.Insert(NumberStartIndex, whole Mod 10)"; + //BA.debugLineNum = 113;BA.debugLine="sb.Insert(NumberStartIndex, whole Mod 10)"; _sb.Insert(_numberstartindex,BA.NumberToString(_whole%10)); -RDebugUtils.currentLine=62390294; - //BA.debugLineNum = 62390294;BA.debugLine="whole = whole / 10"; + //BA.debugLineNum = 114;BA.debugLine="whole = whole / 10"; _whole = (int) (_whole/(double)10); } ; -RDebugUtils.currentLine=62390296; - //BA.debugLineNum = 62390296;BA.debugLine="Do While sb.Length - NumberStartIndex < data.Mini"; + //BA.debugLineNum = 116;BA.debugLine="Do While sb.Length - NumberStartIndex < data.Mini"; while (_sb.getLength()-_numberstartindex<_data.MinimumIntegers /*int*/ ) { -RDebugUtils.currentLine=62390297; - //BA.debugLineNum = 62390297;BA.debugLine="sb.Insert(NumberStartIndex, data.IntegerPaddingC"; + //BA.debugLineNum = 117;BA.debugLine="sb.Insert(NumberStartIndex, data.IntegerPaddingC"; _sb.Insert(_numberstartindex,_data.IntegerPaddingChar /*String*/ ); } ; -RDebugUtils.currentLine=62390299; - //BA.debugLineNum = 62390299;BA.debugLine="If data.MaximumFractions > 0 And (data.MinimumFra"; + //BA.debugLineNum = 119;BA.debugLine="If data.MaximumFractions > 0 And (data.MinimumFra"; if (_data.MaximumFractions /*int*/ >0 && (_data.MinimumFractions /*int*/ >0 || _frac>0)) { -RDebugUtils.currentLine=62390300; - //BA.debugLineNum = 62390300;BA.debugLine="Dim FracStartIndex As Int = sb.Length"; + //BA.debugLineNum = 120;BA.debugLine="Dim FracStartIndex As Int = sb.Length"; _fracstartindex = _sb.getLength(); -RDebugUtils.currentLine=62390301; - //BA.debugLineNum = 62390301;BA.debugLine="Dim LastZeroCount As Int"; + //BA.debugLineNum = 121;BA.debugLine="Dim LastZeroCount As Int"; _lastzerocount = 0; -RDebugUtils.currentLine=62390302; - //BA.debugLineNum = 62390302;BA.debugLine="Dim Multipler As Int = 10"; + //BA.debugLineNum = 122;BA.debugLine="Dim Multipler As Int = 10"; _multipler = (int) (10); -RDebugUtils.currentLine=62390303; - //BA.debugLineNum = 62390303;BA.debugLine="Do While frac >= 2 * factor And sb.Length - Frac"; + //BA.debugLineNum = 123;BA.debugLine="Do While frac >= 2 * factor And sb.Length - Frac"; while (_frac>=2*_factor && _sb.getLength()-_fracstartindex<_data.MaximumFractions /*int*/ ) { -RDebugUtils.currentLine=62390304; - //BA.debugLineNum = 62390304;BA.debugLine="Dim w As Int = (frac * Multipler)"; + //BA.debugLineNum = 124;BA.debugLine="Dim w As Int = (frac * Multipler)"; _w = (int) ((_frac*_multipler)); -RDebugUtils.currentLine=62390305; - //BA.debugLineNum = 62390305;BA.debugLine="w = w Mod 10"; + //BA.debugLineNum = 125;BA.debugLine="w = w Mod 10"; _w = (int) (_w%10); -RDebugUtils.currentLine=62390306; - //BA.debugLineNum = 62390306;BA.debugLine="If w = 0 Then LastZeroCount = LastZeroCount + 1"; + //BA.debugLineNum = 126;BA.debugLine="If w = 0 Then LastZeroCount = LastZeroCount + 1"; if (_w==0) { _lastzerocount = (int) (_lastzerocount+1);} else { _lastzerocount = (int) (0);}; -RDebugUtils.currentLine=62390307; - //BA.debugLineNum = 62390307;BA.debugLine="sb.Append(w)"; + //BA.debugLineNum = 127;BA.debugLine="sb.Append(w)"; _sb.Append(BA.NumberToString(_w)); -RDebugUtils.currentLine=62390308; - //BA.debugLineNum = 62390308;BA.debugLine="Multipler = Multipler * 10"; + //BA.debugLineNum = 128;BA.debugLine="Multipler = Multipler * 10"; _multipler = (int) (_multipler*10); } ; -RDebugUtils.currentLine=62390310; - //BA.debugLineNum = 62390310;BA.debugLine="If data.FractionPaddingChar <> \"0\" And LastZeroC"; + //BA.debugLineNum = 130;BA.debugLine="If data.FractionPaddingChar <> \"0\" And LastZeroC"; if ((_data.FractionPaddingChar /*String*/ ).equals("0") == false && _lastzerocount>0) { -RDebugUtils.currentLine=62390311; - //BA.debugLineNum = 62390311;BA.debugLine="sb.Remove(sb.Length - LastZeroCount, sb.Length)"; + //BA.debugLineNum = 131;BA.debugLine="sb.Remove(sb.Length - LastZeroCount, sb.Length)"; _sb.Remove((int) (_sb.getLength()-_lastzerocount),_sb.getLength()); -RDebugUtils.currentLine=62390312; - //BA.debugLineNum = 62390312;BA.debugLine="LastZeroCount = 0"; + //BA.debugLineNum = 132;BA.debugLine="LastZeroCount = 0"; _lastzerocount = (int) (0); }; -RDebugUtils.currentLine=62390314; - //BA.debugLineNum = 62390314;BA.debugLine="Do While sb.Length - FracStartIndex < data.Minim"; + //BA.debugLineNum = 134;BA.debugLine="Do While sb.Length - FracStartIndex < data.Minim"; while (_sb.getLength()-_fracstartindex<_data.MinimumFractions /*int*/ ) { -RDebugUtils.currentLine=62390315; - //BA.debugLineNum = 62390315;BA.debugLine="sb.Append(data.FractionPaddingChar)"; + //BA.debugLineNum = 135;BA.debugLine="sb.Append(data.FractionPaddingChar)"; _sb.Append(_data.FractionPaddingChar /*String*/ ); -RDebugUtils.currentLine=62390316; - //BA.debugLineNum = 62390316;BA.debugLine="LastZeroCount = 0"; + //BA.debugLineNum = 136;BA.debugLine="LastZeroCount = 0"; _lastzerocount = (int) (0); } ; -RDebugUtils.currentLine=62390318; - //BA.debugLineNum = 62390318;BA.debugLine="LastZeroCount = Min(LastZeroCount, sb.Length - F"; + //BA.debugLineNum = 138;BA.debugLine="LastZeroCount = Min(LastZeroCount, sb.Length - F"; _lastzerocount = (int) (__c.Min(_lastzerocount,_sb.getLength()-_fracstartindex-_data.MinimumFractions /*int*/ )); -RDebugUtils.currentLine=62390319; - //BA.debugLineNum = 62390319;BA.debugLine="If LastZeroCount > 0 Then"; + //BA.debugLineNum = 139;BA.debugLine="If LastZeroCount > 0 Then"; if (_lastzerocount>0) { -RDebugUtils.currentLine=62390320; - //BA.debugLineNum = 62390320;BA.debugLine="sb.Remove(sb.Length - LastZeroCount, sb.Length)"; + //BA.debugLineNum = 140;BA.debugLine="sb.Remove(sb.Length - LastZeroCount, sb.Length)"; _sb.Remove((int) (_sb.getLength()-_lastzerocount),_sb.getLength()); }; -RDebugUtils.currentLine=62390322; - //BA.debugLineNum = 62390322;BA.debugLine="If sb.Length > FracStartIndex Then sb.Insert(Fra"; + //BA.debugLineNum = 142;BA.debugLine="If sb.Length > FracStartIndex Then sb.Insert(Fra"; if (_sb.getLength()>_fracstartindex) { _sb.Insert(_fracstartindex,_data.DecimalPoint /*String*/ );}; }; -RDebugUtils.currentLine=62390324; - //BA.debugLineNum = 62390324;BA.debugLine="sb.Append(data.Postfix)"; + //BA.debugLineNum = 144;BA.debugLine="sb.Append(data.Postfix)"; _sb.Append(_data.Postfix /*String*/ ); -RDebugUtils.currentLine=62390325; - //BA.debugLineNum = 62390325;BA.debugLine="Return sb.ToString"; + //BA.debugLineNum = 145;BA.debugLine="Return sb.ToString"; if (true) return _sb.ToString(); -RDebugUtils.currentLine=62390326; - //BA.debugLineNum = 62390326;BA.debugLine="End Sub"; + //BA.debugLineNum = 146;BA.debugLine="End Sub"; return ""; } -public String _initialize(keymon.lat.medicomed.b4xformatter __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="b4xformatter"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -keymon.lat.medicomed.b4xformatter._b4xformatdata _d = null; -RDebugUtils.currentLine=61931520; - //BA.debugLineNum = 61931520;BA.debugLine="Public Sub Initialize"; -RDebugUtils.currentLine=61931521; - //BA.debugLineNum = 61931521;BA.debugLine="formats.Initialize"; -__ref._formats /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=61931522; - //BA.debugLineNum = 61931522;BA.debugLine="Dim d As B4XFormatData = CreateDefaultFormat"; -_d = __ref._createdefaultformat /*keymon.lat.medicomed.b4xformatter._b4xformatdata*/ (null); -RDebugUtils.currentLine=61931523; - //BA.debugLineNum = 61931523;BA.debugLine="AddFormatData(d, MIN_VALUE, MAX_VALUE, True)"; -__ref._addformatdata /*String*/ (null,_d,__ref._min_value /*int*/ ,__ref._max_value /*int*/ ,__c.True); -RDebugUtils.currentLine=61931524; - //BA.debugLineNum = 61931524;BA.debugLine="End Sub"; -return ""; -} -public String _addformatdata(keymon.lat.medicomed.b4xformatter __ref,keymon.lat.medicomed.b4xformatter._b4xformatdata _data,double _rangestart,double _rangeend,boolean _includeedges) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xformatter"; -if (Debug.shouldDelegate(ba, "addformatdata", true)) - {return ((String) Debug.delegate(ba, "addformatdata", new Object[] {_data,_rangestart,_rangeend,_includeedges}));} -double _factor = 0; -RDebugUtils.currentLine=62193664; - //BA.debugLineNum = 62193664;BA.debugLine="Public Sub AddFormatData (Data As B4XFormatData, R"; -RDebugUtils.currentLine=62193665; - //BA.debugLineNum = 62193665;BA.debugLine="Dim factor As Double = Power(10, -Data.MaximumFra"; -_factor = __c.Power(10,-_data.MaximumFractions /*int*/ ); -RDebugUtils.currentLine=62193666; - //BA.debugLineNum = 62193666;BA.debugLine="If IncludeEdges = False Then"; -if (_includeedges==__c.False) { -RDebugUtils.currentLine=62193667; - //BA.debugLineNum = 62193667;BA.debugLine="RangeStart = RangeStart + factor"; -_rangestart = _rangestart+_factor; -RDebugUtils.currentLine=62193668; - //BA.debugLineNum = 62193668;BA.debugLine="RangeEnd = RangeEnd - factor"; -_rangeend = _rangeend-_factor; - }; -RDebugUtils.currentLine=62193670; - //BA.debugLineNum = 62193670;BA.debugLine="RangeStart = RangeStart - factor / 2"; -_rangestart = _rangestart-_factor/(double)2; -RDebugUtils.currentLine=62193671; - //BA.debugLineNum = 62193671;BA.debugLine="RangeEnd = RangeEnd + factor / 2"; -_rangeend = _rangeend+_factor/(double)2; -RDebugUtils.currentLine=62193672; - //BA.debugLineNum = 62193672;BA.debugLine="Data.RangeStart = RangeStart"; -_data.RangeStart /*double*/ = _rangestart; -RDebugUtils.currentLine=62193673; - //BA.debugLineNum = 62193673;BA.debugLine="Data.RangeEnd = RangeEnd"; -_data.RangeEnd /*double*/ = _rangeend; -RDebugUtils.currentLine=62193674; - //BA.debugLineNum = 62193674;BA.debugLine="formats.Add(Data)"; -__ref._formats /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(_data)); -RDebugUtils.currentLine=62193675; - //BA.debugLineNum = 62193675;BA.debugLine="End Sub"; -return ""; -} -public String _class_globals(keymon.lat.medicomed.b4xformatter __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xformatter"; -RDebugUtils.currentLine=61865984; - //BA.debugLineNum = 61865984;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=61865985; - //BA.debugLineNum = 61865985;BA.debugLine="Type B4XFormatData (Prefix As String, Postfix As"; -; -RDebugUtils.currentLine=61865989; - //BA.debugLineNum = 61865989;BA.debugLine="Private formats As List"; -_formats = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=61865990; - //BA.debugLineNum = 61865990;BA.debugLine="Public Const MAX_VALUE = 0x7fffffff, MIN_VALUE ="; -_max_value = ((int)0x7fffffff); -_min_value = ((int)0x80000000); -RDebugUtils.currentLine=61865992; - //BA.debugLineNum = 61865992;BA.debugLine="Private xui As XUI"; -_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=61865994; - //BA.debugLineNum = 61865994;BA.debugLine="End Sub"; -return ""; -} -public keymon.lat.medicomed.b4xformatter._b4xformatdata _copyformatdata(keymon.lat.medicomed.b4xformatter __ref,keymon.lat.medicomed.b4xformatter._b4xformatdata _data) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xformatter"; -if (Debug.shouldDelegate(ba, "copyformatdata", true)) - {return ((keymon.lat.medicomed.b4xformatter._b4xformatdata) Debug.delegate(ba, "copyformatdata", new Object[] {_data}));} -keymon.lat.medicomed.b4xformatter._b4xformatdata _d = null; -RDebugUtils.currentLine=62128128; - //BA.debugLineNum = 62128128;BA.debugLine="Public Sub CopyFormatData (Data As B4XFormatData)"; -RDebugUtils.currentLine=62128129; - //BA.debugLineNum = 62128129;BA.debugLine="Dim d As B4XFormatData"; -_d = new keymon.lat.medicomed.b4xformatter._b4xformatdata(); -RDebugUtils.currentLine=62128130; - //BA.debugLineNum = 62128130;BA.debugLine="d.Initialize"; -_d.Initialize(); -RDebugUtils.currentLine=62128131; - //BA.debugLineNum = 62128131;BA.debugLine="d.DecimalPoint = Data.DecimalPoint"; -_d.DecimalPoint /*String*/ = _data.DecimalPoint /*String*/ ; -RDebugUtils.currentLine=62128132; - //BA.debugLineNum = 62128132;BA.debugLine="If Data.FormatFont.IsInitialized Then"; +public String _formatlabel(double _number,anywheresoftware.b4a.objects.B4XViewWrapper _label) throws Exception{ +keymon.lat.medicomed.b4xformatter._b4xformatdata _data = null; + //BA.debugLineNum = 150;BA.debugLine="Public Sub FormatLabel (Number As Double, Label As"; + //BA.debugLineNum = 151;BA.debugLine="Label.Text = Format(Number)"; +_label.setText(BA.ObjectToCharSequence(_format(_number))); + //BA.debugLineNum = 152;BA.debugLine="Dim data As B4XFormatData = GetFormatData(Number)"; +_data = _getformatdata(_number); + //BA.debugLineNum = 153;BA.debugLine="If data.TextColor <> 0 Then Label.TextColor = dat"; +if (_data.TextColor /*int*/ !=0) { +_label.setTextColor(_data.TextColor /*int*/ );}; + //BA.debugLineNum = 154;BA.debugLine="If data.FormatFont.IsInitialized Then Label.Font"; if (_data.FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ .getIsInitialized()) { -RDebugUtils.currentLine=62128134; - //BA.debugLineNum = 62128134;BA.debugLine="d.FormatFont = xui.CreateFont(Data.FormatFont.To"; -_d.FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreateFont((android.graphics.Typeface)(_data.FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ .ToNativeFont().getObject()),_data.FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ .getSize()); - }; -RDebugUtils.currentLine=62128137; - //BA.debugLineNum = 62128137;BA.debugLine="d.GroupingCharacter = Data.GroupingCharacter"; -_d.GroupingCharacter /*String*/ = _data.GroupingCharacter /*String*/ ; -RDebugUtils.currentLine=62128138; - //BA.debugLineNum = 62128138;BA.debugLine="d.MaximumFractions = Data.MaximumFractions"; -_d.MaximumFractions /*int*/ = _data.MaximumFractions /*int*/ ; -RDebugUtils.currentLine=62128139; - //BA.debugLineNum = 62128139;BA.debugLine="d.MinimumFractions = Data.MinimumFractions"; -_d.MinimumFractions /*int*/ = _data.MinimumFractions /*int*/ ; -RDebugUtils.currentLine=62128140; - //BA.debugLineNum = 62128140;BA.debugLine="d.MinimumIntegers = Data.MinimumIntegers"; -_d.MinimumIntegers /*int*/ = _data.MinimumIntegers /*int*/ ; -RDebugUtils.currentLine=62128141; - //BA.debugLineNum = 62128141;BA.debugLine="d.Postfix = Data.Postfix"; -_d.Postfix /*String*/ = _data.Postfix /*String*/ ; -RDebugUtils.currentLine=62128142; - //BA.debugLineNum = 62128142;BA.debugLine="d.Prefix = Data.Prefix"; -_d.Prefix /*String*/ = _data.Prefix /*String*/ ; -RDebugUtils.currentLine=62128143; - //BA.debugLineNum = 62128143;BA.debugLine="d.RangeEnd = Data.RangeEnd"; -_d.RangeEnd /*double*/ = _data.RangeEnd /*double*/ ; -RDebugUtils.currentLine=62128144; - //BA.debugLineNum = 62128144;BA.debugLine="d.RangeStart = Data.RangeStart"; -_d.RangeStart /*double*/ = _data.RangeStart /*double*/ ; -RDebugUtils.currentLine=62128145; - //BA.debugLineNum = 62128145;BA.debugLine="d.RemoveMinusSign = Data.RemoveMinusSign"; -_d.RemoveMinusSign /*boolean*/ = _data.RemoveMinusSign /*boolean*/ ; -RDebugUtils.currentLine=62128146; - //BA.debugLineNum = 62128146;BA.debugLine="d.TextColor = Data.TextColor"; -_d.TextColor /*int*/ = _data.TextColor /*int*/ ; -RDebugUtils.currentLine=62128147; - //BA.debugLineNum = 62128147;BA.debugLine="d.FractionPaddingChar = Data.FractionPaddingChar"; -_d.FractionPaddingChar /*String*/ = _data.FractionPaddingChar /*String*/ ; -RDebugUtils.currentLine=62128148; - //BA.debugLineNum = 62128148;BA.debugLine="d.IntegerPaddingChar = Data.IntegerPaddingChar"; -_d.IntegerPaddingChar /*String*/ = _data.IntegerPaddingChar /*String*/ ; -RDebugUtils.currentLine=62128149; - //BA.debugLineNum = 62128149;BA.debugLine="Return d"; -if (true) return _d; -RDebugUtils.currentLine=62128150; - //BA.debugLineNum = 62128150;BA.debugLine="End Sub"; +_label.setFont(_data.FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ );}; + //BA.debugLineNum = 155;BA.debugLine="End Sub"; +return ""; +} +public keymon.lat.medicomed.b4xformatter._b4xformatdata _getdefaultformat() throws Exception{ + //BA.debugLineNum = 78;BA.debugLine="Public Sub GetDefaultFormat As B4XFormatData"; + //BA.debugLineNum = 79;BA.debugLine="Return formats.Get(0)"; +if (true) return (keymon.lat.medicomed.b4xformatter._b4xformatdata)(_formats.Get((int) (0))); + //BA.debugLineNum = 80;BA.debugLine="End Sub"; return null; } -public keymon.lat.medicomed.b4xformatter._b4xformatdata _createdefaultformat(keymon.lat.medicomed.b4xformatter __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xformatter"; -if (Debug.shouldDelegate(ba, "createdefaultformat", true)) - {return ((keymon.lat.medicomed.b4xformatter._b4xformatdata) Debug.delegate(ba, "createdefaultformat", null));} -keymon.lat.medicomed.b4xformatter._b4xformatdata _d = null; -RDebugUtils.currentLine=61997056; - //BA.debugLineNum = 61997056;BA.debugLine="Private Sub CreateDefaultFormat As B4XFormatData"; -RDebugUtils.currentLine=61997057; - //BA.debugLineNum = 61997057;BA.debugLine="Dim d As B4XFormatData"; -_d = new keymon.lat.medicomed.b4xformatter._b4xformatdata(); -RDebugUtils.currentLine=61997058; - //BA.debugLineNum = 61997058;BA.debugLine="d.Initialize"; -_d.Initialize(); -RDebugUtils.currentLine=61997059; - //BA.debugLineNum = 61997059;BA.debugLine="d.GroupingCharacter = \",\""; -_d.GroupingCharacter /*String*/ = ","; -RDebugUtils.currentLine=61997060; - //BA.debugLineNum = 61997060;BA.debugLine="d.DecimalPoint = \".\""; -_d.DecimalPoint /*String*/ = "."; -RDebugUtils.currentLine=61997061; - //BA.debugLineNum = 61997061;BA.debugLine="d.MaximumFractions = 3"; -_d.MaximumFractions /*int*/ = (int) (3); -RDebugUtils.currentLine=61997062; - //BA.debugLineNum = 61997062;BA.debugLine="d.MinimumIntegers = 1"; -_d.MinimumIntegers /*int*/ = (int) (1); -RDebugUtils.currentLine=61997063; - //BA.debugLineNum = 61997063;BA.debugLine="d.IntegerPaddingChar = \"0\""; -_d.IntegerPaddingChar /*String*/ = "0"; -RDebugUtils.currentLine=61997064; - //BA.debugLineNum = 61997064;BA.debugLine="d.FractionPaddingChar = \"0\""; -_d.FractionPaddingChar /*String*/ = "0"; -RDebugUtils.currentLine=61997065; - //BA.debugLineNum = 61997065;BA.debugLine="Return d"; -if (true) return _d; -RDebugUtils.currentLine=61997066; - //BA.debugLineNum = 61997066;BA.debugLine="End Sub"; -return null; -} -public keymon.lat.medicomed.b4xformatter._b4xformatdata _getformatdata(keymon.lat.medicomed.b4xformatter __ref,double _number) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xformatter"; -if (Debug.shouldDelegate(ba, "getformatdata", true)) - {return ((keymon.lat.medicomed.b4xformatter._b4xformatdata) Debug.delegate(ba, "getformatdata", new Object[] {_number}));} +public keymon.lat.medicomed.b4xformatter._b4xformatdata _getformatdata(double _number) throws Exception{ int _i = 0; keymon.lat.medicomed.b4xformatter._b4xformatdata _d = null; -RDebugUtils.currentLine=62324736; - //BA.debugLineNum = 62324736;BA.debugLine="Public Sub GetFormatData (Number As Double) As B4X"; -RDebugUtils.currentLine=62324737; - //BA.debugLineNum = 62324737;BA.debugLine="For i = formats.Size - 1 To 1 Step - 1"; + //BA.debugLineNum = 83;BA.debugLine="Public Sub GetFormatData (Number As Double) As B4X"; + //BA.debugLineNum = 84;BA.debugLine="For i = formats.Size - 1 To 1 Step - 1"; { final int step1 = -1; final int limit1 = (int) (1); -_i = (int) (__ref._formats /*anywheresoftware.b4a.objects.collections.List*/ .getSize()-1) ; +_i = (int) (_formats.getSize()-1) ; for (;_i >= limit1 ;_i = _i + step1 ) { -RDebugUtils.currentLine=62324738; - //BA.debugLineNum = 62324738;BA.debugLine="Dim d As B4XFormatData = formats.Get(i)"; -_d = (keymon.lat.medicomed.b4xformatter._b4xformatdata)(__ref._formats /*anywheresoftware.b4a.objects.collections.List*/ .Get(_i)); -RDebugUtils.currentLine=62324739; - //BA.debugLineNum = 62324739;BA.debugLine="If Number <= d.RangeEnd And Number >= d.RangeSta"; + //BA.debugLineNum = 85;BA.debugLine="Dim d As B4XFormatData = formats.Get(i)"; +_d = (keymon.lat.medicomed.b4xformatter._b4xformatdata)(_formats.Get(_i)); + //BA.debugLineNum = 86;BA.debugLine="If Number <= d.RangeEnd And Number >= d.RangeSta"; if (_number<=_d.RangeEnd /*double*/ && _number>=_d.RangeStart /*double*/ ) { if (true) return _d;}; } }; -RDebugUtils.currentLine=62324741; - //BA.debugLineNum = 62324741;BA.debugLine="Return formats.Get(0)"; -if (true) return (keymon.lat.medicomed.b4xformatter._b4xformatdata)(__ref._formats /*anywheresoftware.b4a.objects.collections.List*/ .Get((int) (0))); -RDebugUtils.currentLine=62324742; - //BA.debugLineNum = 62324742;BA.debugLine="End Sub"; + //BA.debugLineNum = 88;BA.debugLine="Return formats.Get(0)"; +if (true) return (keymon.lat.medicomed.b4xformatter._b4xformatdata)(_formats.Get((int) (0))); + //BA.debugLineNum = 89;BA.debugLine="End Sub"; return null; } -public String _formatlabel(keymon.lat.medicomed.b4xformatter __ref,double _number,anywheresoftware.b4a.objects.B4XViewWrapper _label) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xformatter"; -if (Debug.shouldDelegate(ba, "formatlabel", true)) - {return ((String) Debug.delegate(ba, "formatlabel", new Object[] {_number,_label}));} -keymon.lat.medicomed.b4xformatter._b4xformatdata _data = null; -RDebugUtils.currentLine=62455808; - //BA.debugLineNum = 62455808;BA.debugLine="Public Sub FormatLabel (Number As Double, Label As"; -RDebugUtils.currentLine=62455809; - //BA.debugLineNum = 62455809;BA.debugLine="Label.Text = Format(Number)"; -_label.setText(BA.ObjectToCharSequence(__ref._format /*String*/ (null,_number))); -RDebugUtils.currentLine=62455810; - //BA.debugLineNum = 62455810;BA.debugLine="Dim data As B4XFormatData = GetFormatData(Number)"; -_data = __ref._getformatdata /*keymon.lat.medicomed.b4xformatter._b4xformatdata*/ (null,_number); -RDebugUtils.currentLine=62455811; - //BA.debugLineNum = 62455811;BA.debugLine="If data.TextColor <> 0 Then Label.TextColor = dat"; -if (_data.TextColor /*int*/ !=0) { -_label.setTextColor(_data.TextColor /*int*/ );}; -RDebugUtils.currentLine=62455812; - //BA.debugLineNum = 62455812;BA.debugLine="If data.FormatFont.IsInitialized Then Label.Font"; -if (_data.FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ .getIsInitialized()) { -_label.setFont(_data.FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ );}; -RDebugUtils.currentLine=62455813; - //BA.debugLineNum = 62455813;BA.debugLine="End Sub"; +public String _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ +innerInitialize(_ba); +keymon.lat.medicomed.b4xformatter._b4xformatdata _d = null; + //BA.debugLineNum = 13;BA.debugLine="Public Sub Initialize"; + //BA.debugLineNum = 14;BA.debugLine="formats.Initialize"; +_formats.Initialize(); + //BA.debugLineNum = 15;BA.debugLine="Dim d As B4XFormatData = CreateDefaultFormat"; +_d = _createdefaultformat(); + //BA.debugLineNum = 16;BA.debugLine="AddFormatData(d, MIN_VALUE, MAX_VALUE, True)"; +_addformatdata(_d,_min_value,_max_value,__c.True); + //BA.debugLineNum = 17;BA.debugLine="End Sub"; return ""; } -public keymon.lat.medicomed.b4xformatter._b4xformatdata _newformatdata(keymon.lat.medicomed.b4xformatter __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xformatter"; -if (Debug.shouldDelegate(ba, "newformatdata", true)) - {return ((keymon.lat.medicomed.b4xformatter._b4xformatdata) Debug.delegate(ba, "newformatdata", null));} -RDebugUtils.currentLine=62062592; - //BA.debugLineNum = 62062592;BA.debugLine="Public Sub NewFormatData As B4XFormatData"; -RDebugUtils.currentLine=62062593; - //BA.debugLineNum = 62062593;BA.debugLine="Return CopyFormatData(GetDefaultFormat)"; -if (true) return __ref._copyformatdata /*keymon.lat.medicomed.b4xformatter._b4xformatdata*/ (null,__ref._getdefaultformat /*keymon.lat.medicomed.b4xformatter._b4xformatdata*/ (null)); -RDebugUtils.currentLine=62062594; - //BA.debugLineNum = 62062594;BA.debugLine="End Sub"; +public keymon.lat.medicomed.b4xformatter._b4xformatdata _newformatdata() throws Exception{ + //BA.debugLineNum = 32;BA.debugLine="Public Sub NewFormatData As B4XFormatData"; + //BA.debugLineNum = 33;BA.debugLine="Return CopyFormatData(GetDefaultFormat)"; +if (true) return _copyformatdata(_getdefaultformat()); + //BA.debugLineNum = 34;BA.debugLine="End Sub"; return null; } -} \ No newline at end of file +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4ximageview.java b/B4A/Objects/src/keymon/lat/medicomed/b4ximageview.java index 45f282a..5733255 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4ximageview.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4ximageview.java @@ -10,7 +10,7 @@ public class b4ximageview extends B4AClass.ImplB4AClass implements BA.SubDelegat private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4ximageview"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4ximageview"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4ximageview extends B4AClass.ImplB4AClass implements BA.SubDelegat 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.keywords.Common __c = null; public String _meventname = ""; public Object _mcallback = null; public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null; @@ -54,418 +47,258 @@ 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 _base_resize(keymon.lat.medicomed.b4ximageview __ref,double _width,double _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4ximageview"; -if (Debug.shouldDelegate(ba, "base_resize", true)) - {return ((String) Debug.delegate(ba, "base_resize", new Object[] {_width,_height}));} -RDebugUtils.currentLine=52953088; - //BA.debugLineNum = 52953088;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; -RDebugUtils.currentLine=52953089; - //BA.debugLineNum = 52953089;BA.debugLine="Update"; -__ref._update /*String*/ (null); -RDebugUtils.currentLine=52953090; - //BA.debugLineNum = 52953090;BA.debugLine="End Sub"; +public String _base_resize(double _width,double _height) throws Exception{ + //BA.debugLineNum = 40;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; + //BA.debugLineNum = 41;BA.debugLine="Update"; +_update(); + //BA.debugLineNum = 42;BA.debugLine="End Sub"; return ""; } -public String _update(keymon.lat.medicomed.b4ximageview __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4ximageview"; -if (Debug.shouldDelegate(ba, "update", true)) - {return ((String) Debug.delegate(ba, "update", null));} +public String _class_globals() throws Exception{ + //BA.debugLineNum = 5;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 6;BA.debugLine="Private mEventName As String 'ignore"; +_meventname = ""; + //BA.debugLineNum = 7;BA.debugLine="Private mCallBack As Object 'ignore"; +_mcallback = new Object(); + //BA.debugLineNum = 8;BA.debugLine="Public mBase As B4XView"; +_mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 9;BA.debugLine="Private xui As XUI 'ignore"; +_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); + //BA.debugLineNum = 10;BA.debugLine="Public Tag As Object"; +_tag = new Object(); + //BA.debugLineNum = 11;BA.debugLine="Private iv As B4XView"; +_iv = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 12;BA.debugLine="Private mResizeMode As String"; +_mresizemode = ""; + //BA.debugLineNum = 13;BA.debugLine="Private mRound As Boolean"; +_mround = false; + //BA.debugLineNum = 14;BA.debugLine="Private mBitmap As B4XBitmap"; +_mbitmap = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper(); + //BA.debugLineNum = 15;BA.debugLine="Public mBackgroundColor As Int"; +_mbackgroundcolor = 0; + //BA.debugLineNum = 16;BA.debugLine="Private mCornersRadius As Int"; +_mcornersradius = 0; + //BA.debugLineNum = 17;BA.debugLine="End Sub"; +return ""; +} +public String _clear() throws Exception{ + //BA.debugLineNum = 119;BA.debugLine="Public Sub Clear"; + //BA.debugLineNum = 120;BA.debugLine="mBitmap = Null"; +_mbitmap = (anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper(), (android.graphics.Bitmap)(__c.Null)); + //BA.debugLineNum = 121;BA.debugLine="iv.SetBitmap(Null)"; +_iv.SetBitmap((android.graphics.Bitmap)(__c.Null)); + //BA.debugLineNum = 122;BA.debugLine="End Sub"; +return ""; +} +public String _designercreateview(Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ +anywheresoftware.b4a.objects.ImageViewWrapper _iiv = null; + //BA.debugLineNum = 25;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; + //BA.debugLineNum = 26;BA.debugLine="mBase = Base"; +_mbase = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); + //BA.debugLineNum = 27;BA.debugLine="Tag = mBase.Tag"; +_tag = _mbase.getTag(); + //BA.debugLineNum = 28;BA.debugLine="mBase.Tag = Me"; +_mbase.setTag(this); + //BA.debugLineNum = 29;BA.debugLine="Dim iiv As ImageView"; +_iiv = new anywheresoftware.b4a.objects.ImageViewWrapper(); + //BA.debugLineNum = 30;BA.debugLine="iiv.Initialize(\"\")"; +_iiv.Initialize(ba,""); + //BA.debugLineNum = 31;BA.debugLine="iv = iiv"; +_iv = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_iiv.getObject())); + //BA.debugLineNum = 32;BA.debugLine="mRound =Props.Get(\"Round\")"; +_mround = BA.ObjectToBoolean(_props.Get((Object)("Round"))); + //BA.debugLineNum = 33;BA.debugLine="mResizeMode = Props.Get(\"ResizeMode\")"; +_mresizemode = BA.ObjectToString(_props.Get((Object)("ResizeMode"))); + //BA.debugLineNum = 34;BA.debugLine="mBackgroundColor = xui.PaintOrColorToColor(Props."; +_mbackgroundcolor = _xui.PaintOrColorToColor(_props.Get((Object)("BackgroundColor"))); + //BA.debugLineNum = 35;BA.debugLine="mCornersRadius = DipToCurrent(Props.GetDefault(\"C"; +_mcornersradius = __c.DipToCurrent((int)(BA.ObjectToNumber(_props.GetDefault((Object)("CornersRadius"),(Object)(0))))); + //BA.debugLineNum = 36;BA.debugLine="mBase.AddView(iv, 0, 0, mBase.Width, mBase.Height"; +_mbase.AddView((android.view.View)(_iv.getObject()),(int) (0),(int) (0),_mbase.getWidth(),_mbase.getHeight()); + //BA.debugLineNum = 37;BA.debugLine="Update"; +_update(); + //BA.debugLineNum = 38;BA.debugLine="End Sub"; +return ""; +} +public anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _getbitmap() throws Exception{ + //BA.debugLineNum = 130;BA.debugLine="Public Sub getBitmap As B4XBitmap"; + //BA.debugLineNum = 131;BA.debugLine="Return mBitmap"; +if (true) return _mbitmap; + //BA.debugLineNum = 132;BA.debugLine="End Sub"; +return null; +} +public int _getcornersradius() throws Exception{ + //BA.debugLineNum = 56;BA.debugLine="Public Sub getCornersRadius As Int"; + //BA.debugLineNum = 57;BA.debugLine="Return mCornersRadius"; +if (true) return _mcornersradius; + //BA.debugLineNum = 58;BA.debugLine="End Sub"; +return 0; +} +public String _getresizemode() throws Exception{ + //BA.debugLineNum = 67;BA.debugLine="Public Sub getResizeMode As String"; + //BA.debugLineNum = 68;BA.debugLine="Return mResizeMode"; +if (true) return _mresizemode; + //BA.debugLineNum = 69;BA.debugLine="End Sub"; +return ""; +} +public boolean _getroundedimage() throws Exception{ + //BA.debugLineNum = 45;BA.debugLine="Public Sub getRoundedImage As Boolean"; + //BA.debugLineNum = 46;BA.debugLine="Return mRound"; +if (true) return _mround; + //BA.debugLineNum = 47;BA.debugLine="End Sub"; +return false; +} +public String _initialize(anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 19;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; + //BA.debugLineNum = 20;BA.debugLine="mEventName = EventName"; +_meventname = _eventname; + //BA.debugLineNum = 21;BA.debugLine="mCallBack = Callback"; +_mcallback = _callback; + //BA.debugLineNum = 22;BA.debugLine="End Sub"; +return ""; +} +public String _load(String _dir,String _filename) throws Exception{ + //BA.debugLineNum = 110;BA.debugLine="Public Sub Load (Dir As String, FileName As String"; + //BA.debugLineNum = 112;BA.debugLine="setBitmap(LoadBitmapSample(Dir, FileName, mBase.W"; +_setbitmap((anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper(), (android.graphics.Bitmap)(__c.LoadBitmapSample(_dir,_filename,_mbase.getWidth(),_mbase.getHeight()).getObject()))); + //BA.debugLineNum = 116;BA.debugLine="End Sub"; +return ""; +} +public String _setbitmap(anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _bmp) throws Exception{ + //BA.debugLineNum = 124;BA.debugLine="Public Sub setBitmap(Bmp As B4XBitmap)"; + //BA.debugLineNum = 125;BA.debugLine="mBitmap = Bmp"; +_mbitmap = _bmp; + //BA.debugLineNum = 126;BA.debugLine="XUIViewsUtils.SetBitmapAndFill(iv, Bmp)"; +_xuiviewsutils._setbitmapandfill /*String*/ (ba,_iv,_bmp); + //BA.debugLineNum = 127;BA.debugLine="Update"; +_update(); + //BA.debugLineNum = 128;BA.debugLine="End Sub"; +return ""; +} +public String _setcornersradius(int _i) throws Exception{ + //BA.debugLineNum = 60;BA.debugLine="Public Sub setCornersRadius (i As Int)"; + //BA.debugLineNum = 61;BA.debugLine="mCornersRadius = i"; +_mcornersradius = _i; + //BA.debugLineNum = 62;BA.debugLine="UpdateClip"; +_updateclip(); + //BA.debugLineNum = 63;BA.debugLine="End Sub"; +return ""; +} +public String _setresizemode(String _s) throws Exception{ + //BA.debugLineNum = 71;BA.debugLine="Public Sub setResizeMode(s As String)"; + //BA.debugLineNum = 72;BA.debugLine="If s = mResizeMode Then Return"; +if ((_s).equals(_mresizemode)) { +if (true) return "";}; + //BA.debugLineNum = 73;BA.debugLine="mResizeMode = s"; +_mresizemode = _s; + //BA.debugLineNum = 74;BA.debugLine="Update"; +_update(); + //BA.debugLineNum = 75;BA.debugLine="End Sub"; +return ""; +} +public String _setroundedimage(boolean _b) throws Exception{ + //BA.debugLineNum = 49;BA.debugLine="Public Sub setRoundedImage (b As Boolean)"; + //BA.debugLineNum = 50;BA.debugLine="If b = mRound Then Return"; +if (_b==_mround) { +if (true) return "";}; + //BA.debugLineNum = 51;BA.debugLine="mRound = b"; +_mround = _b; + //BA.debugLineNum = 52;BA.debugLine="UpdateClip"; +_updateclip(); + //BA.debugLineNum = 53;BA.debugLine="End Sub"; +return ""; +} +public String _update() throws Exception{ float _imageviewwidth = 0f; float _imageviewheight = 0f; float _bmpratio = 0f; float _r = 0f; -RDebugUtils.currentLine=53411840; - //BA.debugLineNum = 53411840;BA.debugLine="Public Sub Update"; -RDebugUtils.currentLine=53411841; - //BA.debugLineNum = 53411841;BA.debugLine="If mBitmap.IsInitialized = False Then Return"; -if (__ref._mbitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ .IsInitialized()==__c.False) { + //BA.debugLineNum = 77;BA.debugLine="Public Sub Update"; + //BA.debugLineNum = 78;BA.debugLine="If mBitmap.IsInitialized = False Then Return"; +if (_mbitmap.IsInitialized()==__c.False) { if (true) return "";}; -RDebugUtils.currentLine=53411842; - //BA.debugLineNum = 53411842;BA.debugLine="UpdateClip"; -__ref._updateclip /*String*/ (null); -RDebugUtils.currentLine=53411843; - //BA.debugLineNum = 53411843;BA.debugLine="Dim ImageViewWidth, ImageViewHeight As Float"; + //BA.debugLineNum = 79;BA.debugLine="UpdateClip"; +_updateclip(); + //BA.debugLineNum = 80;BA.debugLine="Dim ImageViewWidth, ImageViewHeight As Float"; _imageviewwidth = 0f; _imageviewheight = 0f; -RDebugUtils.currentLine=53411844; - //BA.debugLineNum = 53411844;BA.debugLine="Dim bmpRatio As Float = mBitmap.Width / mBitmap.H"; -_bmpratio = (float) (__ref._mbitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ .getWidth()/(double)__ref._mbitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ .getHeight()); -RDebugUtils.currentLine=53411845; - //BA.debugLineNum = 53411845;BA.debugLine="Select mResizeMode"; -switch (BA.switchObjectToInt(__ref._mresizemode /*String*/ ,"FILL","FIT","FILL_WIDTH","FILL_HEIGHT","FILL_NO_DISTORTIONS","NONE")) { + //BA.debugLineNum = 81;BA.debugLine="Dim bmpRatio As Float = mBitmap.Width / mBitmap.H"; +_bmpratio = (float) (_mbitmap.getWidth()/(double)_mbitmap.getHeight()); + //BA.debugLineNum = 82;BA.debugLine="Select mResizeMode"; +switch (BA.switchObjectToInt(_mresizemode,"FILL","FIT","FILL_WIDTH","FILL_HEIGHT","FILL_NO_DISTORTIONS","NONE")) { case 0: { -RDebugUtils.currentLine=53411847; - //BA.debugLineNum = 53411847;BA.debugLine="ImageViewWidth = mBase.Width"; -_imageviewwidth = (float) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()); -RDebugUtils.currentLine=53411848; - //BA.debugLineNum = 53411848;BA.debugLine="ImageViewHeight = mBase.Height"; -_imageviewheight = (float) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); + //BA.debugLineNum = 84;BA.debugLine="ImageViewWidth = mBase.Width"; +_imageviewwidth = (float) (_mbase.getWidth()); + //BA.debugLineNum = 85;BA.debugLine="ImageViewHeight = mBase.Height"; +_imageviewheight = (float) (_mbase.getHeight()); break; } case 1: { -RDebugUtils.currentLine=53411850; - //BA.debugLineNum = 53411850;BA.debugLine="Dim r As Float = Min(mBase.Width / mBitmap.Widt"; -_r = (float) (__c.Min(__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)__ref._mbitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()/(double)__ref._mbitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ .getHeight())); -RDebugUtils.currentLine=53411851; - //BA.debugLineNum = 53411851;BA.debugLine="ImageViewWidth = mBitmap.Width * r"; -_imageviewwidth = (float) (__ref._mbitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ .getWidth()*_r); -RDebugUtils.currentLine=53411852; - //BA.debugLineNum = 53411852;BA.debugLine="ImageViewHeight = mBitmap.Height * r"; -_imageviewheight = (float) (__ref._mbitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ .getHeight()*_r); + //BA.debugLineNum = 87;BA.debugLine="Dim r As Float = Min(mBase.Width / mBitmap.Widt"; +_r = (float) (__c.Min(_mbase.getWidth()/(double)_mbitmap.getWidth(),_mbase.getHeight()/(double)_mbitmap.getHeight())); + //BA.debugLineNum = 88;BA.debugLine="ImageViewWidth = mBitmap.Width * r"; +_imageviewwidth = (float) (_mbitmap.getWidth()*_r); + //BA.debugLineNum = 89;BA.debugLine="ImageViewHeight = mBitmap.Height * r"; +_imageviewheight = (float) (_mbitmap.getHeight()*_r); break; } case 2: { -RDebugUtils.currentLine=53411854; - //BA.debugLineNum = 53411854;BA.debugLine="ImageViewWidth = mBase.Width"; -_imageviewwidth = (float) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()); -RDebugUtils.currentLine=53411855; - //BA.debugLineNum = 53411855;BA.debugLine="ImageViewHeight = ImageViewWidth / bmpRatio"; + //BA.debugLineNum = 91;BA.debugLine="ImageViewWidth = mBase.Width"; +_imageviewwidth = (float) (_mbase.getWidth()); + //BA.debugLineNum = 92;BA.debugLine="ImageViewHeight = ImageViewWidth / bmpRatio"; _imageviewheight = (float) (_imageviewwidth/(double)_bmpratio); break; } case 3: { -RDebugUtils.currentLine=53411857; - //BA.debugLineNum = 53411857;BA.debugLine="ImageViewHeight = mBase.Height"; -_imageviewheight = (float) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=53411858; - //BA.debugLineNum = 53411858;BA.debugLine="ImageViewWidth = ImageViewHeight * bmpRatio"; + //BA.debugLineNum = 94;BA.debugLine="ImageViewHeight = mBase.Height"; +_imageviewheight = (float) (_mbase.getHeight()); + //BA.debugLineNum = 95;BA.debugLine="ImageViewWidth = ImageViewHeight * bmpRatio"; _imageviewwidth = (float) (_imageviewheight*_bmpratio); break; } case 4: { -RDebugUtils.currentLine=53411860; - //BA.debugLineNum = 53411860;BA.debugLine="Dim r As Float = Max(mBase.Width / mBitmap.Widt"; -_r = (float) (__c.Max(__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)__ref._mbitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()/(double)__ref._mbitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ .getHeight())); -RDebugUtils.currentLine=53411861; - //BA.debugLineNum = 53411861;BA.debugLine="ImageViewWidth = mBitmap.Width * r"; -_imageviewwidth = (float) (__ref._mbitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ .getWidth()*_r); -RDebugUtils.currentLine=53411862; - //BA.debugLineNum = 53411862;BA.debugLine="ImageViewHeight = mBitmap.Height * r"; -_imageviewheight = (float) (__ref._mbitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ .getHeight()*_r); + //BA.debugLineNum = 97;BA.debugLine="Dim r As Float = Max(mBase.Width / mBitmap.Widt"; +_r = (float) (__c.Max(_mbase.getWidth()/(double)_mbitmap.getWidth(),_mbase.getHeight()/(double)_mbitmap.getHeight())); + //BA.debugLineNum = 98;BA.debugLine="ImageViewWidth = mBitmap.Width * r"; +_imageviewwidth = (float) (_mbitmap.getWidth()*_r); + //BA.debugLineNum = 99;BA.debugLine="ImageViewHeight = mBitmap.Height * r"; +_imageviewheight = (float) (_mbitmap.getHeight()*_r); break; } case 5: { -RDebugUtils.currentLine=53411864; - //BA.debugLineNum = 53411864;BA.debugLine="ImageViewWidth = mBitmap.Width"; -_imageviewwidth = (float) (__ref._mbitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ .getWidth()); -RDebugUtils.currentLine=53411865; - //BA.debugLineNum = 53411865;BA.debugLine="ImageViewHeight = mBitmap.Height"; -_imageviewheight = (float) (__ref._mbitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ .getHeight()); + //BA.debugLineNum = 101;BA.debugLine="ImageViewWidth = mBitmap.Width"; +_imageviewwidth = (float) (_mbitmap.getWidth()); + //BA.debugLineNum = 102;BA.debugLine="ImageViewHeight = mBitmap.Height"; +_imageviewheight = (float) (_mbitmap.getHeight()); break; } default: { -RDebugUtils.currentLine=53411867; - //BA.debugLineNum = 53411867;BA.debugLine="Log(\"Invalid resize mode: \" & mResizeMode)"; -__c.LogImpl("953411867","Invalid resize mode: "+__ref._mresizemode /*String*/ ,0); + //BA.debugLineNum = 104;BA.debugLine="Log(\"Invalid resize mode: \" & mResizeMode)"; +__c.LogImpl("925100315","Invalid resize mode: "+_mresizemode,0); break; } } ; -RDebugUtils.currentLine=53411869; - //BA.debugLineNum = 53411869;BA.debugLine="iv.SetLayoutAnimated(0, Round(mBase.Width / 2 - I"; -__ref._iv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (__c.Round(__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)2-_imageviewwidth/(double)2)),(int) (__c.Round(__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()/(double)2-_imageviewheight/(double)2)),(int) (__c.Round(_imageviewwidth)),(int) (__c.Round(_imageviewheight))); -RDebugUtils.currentLine=53411870; - //BA.debugLineNum = 53411870;BA.debugLine="End Sub"; + //BA.debugLineNum = 106;BA.debugLine="iv.SetLayoutAnimated(0, Round(mBase.Width / 2 - I"; +_iv.SetLayoutAnimated((int) (0),(int) (__c.Round(_mbase.getWidth()/(double)2-_imageviewwidth/(double)2)),(int) (__c.Round(_mbase.getHeight()/(double)2-_imageviewheight/(double)2)),(int) (__c.Round(_imageviewwidth)),(int) (__c.Round(_imageviewheight))); + //BA.debugLineNum = 107;BA.debugLine="End Sub"; return ""; } -public String _class_globals(keymon.lat.medicomed.b4ximageview __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4ximageview"; -RDebugUtils.currentLine=52756480; - //BA.debugLineNum = 52756480;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=52756481; - //BA.debugLineNum = 52756481;BA.debugLine="Private mEventName As String 'ignore"; -_meventname = ""; -RDebugUtils.currentLine=52756482; - //BA.debugLineNum = 52756482;BA.debugLine="Private mCallBack As Object 'ignore"; -_mcallback = new Object(); -RDebugUtils.currentLine=52756483; - //BA.debugLineNum = 52756483;BA.debugLine="Public mBase As B4XView"; -_mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=52756484; - //BA.debugLineNum = 52756484;BA.debugLine="Private xui As XUI 'ignore"; -_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=52756485; - //BA.debugLineNum = 52756485;BA.debugLine="Public Tag As Object"; -_tag = new Object(); -RDebugUtils.currentLine=52756486; - //BA.debugLineNum = 52756486;BA.debugLine="Private iv As B4XView"; -_iv = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=52756487; - //BA.debugLineNum = 52756487;BA.debugLine="Private mResizeMode As String"; -_mresizemode = ""; -RDebugUtils.currentLine=52756488; - //BA.debugLineNum = 52756488;BA.debugLine="Private mRound As Boolean"; -_mround = false; -RDebugUtils.currentLine=52756489; - //BA.debugLineNum = 52756489;BA.debugLine="Private mBitmap As B4XBitmap"; -_mbitmap = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper(); -RDebugUtils.currentLine=52756490; - //BA.debugLineNum = 52756490;BA.debugLine="Public mBackgroundColor As Int"; -_mbackgroundcolor = 0; -RDebugUtils.currentLine=52756491; - //BA.debugLineNum = 52756491;BA.debugLine="Private mCornersRadius As Int"; -_mcornersradius = 0; -RDebugUtils.currentLine=52756492; - //BA.debugLineNum = 52756492;BA.debugLine="End Sub"; -return ""; -} -public String _clear(keymon.lat.medicomed.b4ximageview __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4ximageview"; -if (Debug.shouldDelegate(ba, "clear", true)) - {return ((String) Debug.delegate(ba, "clear", null));} -RDebugUtils.currentLine=53542912; - //BA.debugLineNum = 53542912;BA.debugLine="Public Sub Clear"; -RDebugUtils.currentLine=53542913; - //BA.debugLineNum = 53542913;BA.debugLine="mBitmap = Null"; -__ref._mbitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper(), (android.graphics.Bitmap)(__c.Null)); -RDebugUtils.currentLine=53542914; - //BA.debugLineNum = 53542914;BA.debugLine="iv.SetBitmap(Null)"; -__ref._iv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetBitmap((android.graphics.Bitmap)(__c.Null)); -RDebugUtils.currentLine=53542915; - //BA.debugLineNum = 53542915;BA.debugLine="End Sub"; -return ""; -} -public String _designercreateview(keymon.lat.medicomed.b4ximageview __ref,Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4ximageview"; -if (Debug.shouldDelegate(ba, "designercreateview", true)) - {return ((String) Debug.delegate(ba, "designercreateview", new Object[] {_base,_lbl,_props}));} -anywheresoftware.b4a.objects.ImageViewWrapper _iiv = null; -RDebugUtils.currentLine=52887552; - //BA.debugLineNum = 52887552;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; -RDebugUtils.currentLine=52887553; - //BA.debugLineNum = 52887553;BA.debugLine="mBase = Base"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); -RDebugUtils.currentLine=52887554; - //BA.debugLineNum = 52887554;BA.debugLine="Tag = mBase.Tag"; -__ref._tag /*Object*/ = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getTag(); -RDebugUtils.currentLine=52887555; - //BA.debugLineNum = 52887555;BA.debugLine="mBase.Tag = Me"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag(this); -RDebugUtils.currentLine=52887556; - //BA.debugLineNum = 52887556;BA.debugLine="Dim iiv As ImageView"; -_iiv = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=52887557; - //BA.debugLineNum = 52887557;BA.debugLine="iiv.Initialize(\"\")"; -_iiv.Initialize(ba,""); -RDebugUtils.currentLine=52887558; - //BA.debugLineNum = 52887558;BA.debugLine="iv = iiv"; -__ref._iv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_iiv.getObject())); -RDebugUtils.currentLine=52887559; - //BA.debugLineNum = 52887559;BA.debugLine="mRound =Props.Get(\"Round\")"; -__ref._mround /*boolean*/ = BA.ObjectToBoolean(_props.Get((Object)("Round"))); -RDebugUtils.currentLine=52887560; - //BA.debugLineNum = 52887560;BA.debugLine="mResizeMode = Props.Get(\"ResizeMode\")"; -__ref._mresizemode /*String*/ = BA.ObjectToString(_props.Get((Object)("ResizeMode"))); -RDebugUtils.currentLine=52887561; - //BA.debugLineNum = 52887561;BA.debugLine="mBackgroundColor = xui.PaintOrColorToColor(Props."; -__ref._mbackgroundcolor /*int*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor(_props.Get((Object)("BackgroundColor"))); -RDebugUtils.currentLine=52887562; - //BA.debugLineNum = 52887562;BA.debugLine="mCornersRadius = DipToCurrent(Props.GetDefault(\"C"; -__ref._mcornersradius /*int*/ = __c.DipToCurrent((int)(BA.ObjectToNumber(_props.GetDefault((Object)("CornersRadius"),(Object)(0))))); -RDebugUtils.currentLine=52887563; - //BA.debugLineNum = 52887563;BA.debugLine="mBase.AddView(iv, 0, 0, mBase.Width, mBase.Height"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._iv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(int) (0),(int) (0),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=52887564; - //BA.debugLineNum = 52887564;BA.debugLine="Update"; -__ref._update /*String*/ (null); -RDebugUtils.currentLine=52887565; - //BA.debugLineNum = 52887565;BA.debugLine="End Sub"; -return ""; -} -public anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _getbitmap(keymon.lat.medicomed.b4ximageview __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4ximageview"; -if (Debug.shouldDelegate(ba, "getbitmap", true)) - {return ((anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper) Debug.delegate(ba, "getbitmap", null));} -RDebugUtils.currentLine=53673984; - //BA.debugLineNum = 53673984;BA.debugLine="Public Sub getBitmap As B4XBitmap"; -RDebugUtils.currentLine=53673985; - //BA.debugLineNum = 53673985;BA.debugLine="Return mBitmap"; -if (true) return __ref._mbitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ ; -RDebugUtils.currentLine=53673986; - //BA.debugLineNum = 53673986;BA.debugLine="End Sub"; -return null; -} -public int _getcornersradius(keymon.lat.medicomed.b4ximageview __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4ximageview"; -if (Debug.shouldDelegate(ba, "getcornersradius", true)) - {return ((Integer) Debug.delegate(ba, "getcornersradius", null));} -RDebugUtils.currentLine=53149696; - //BA.debugLineNum = 53149696;BA.debugLine="Public Sub getCornersRadius As Int"; -RDebugUtils.currentLine=53149697; - //BA.debugLineNum = 53149697;BA.debugLine="Return mCornersRadius"; -if (true) return __ref._mcornersradius /*int*/ ; -RDebugUtils.currentLine=53149698; - //BA.debugLineNum = 53149698;BA.debugLine="End Sub"; -return 0; -} -public String _getresizemode(keymon.lat.medicomed.b4ximageview __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4ximageview"; -if (Debug.shouldDelegate(ba, "getresizemode", true)) - {return ((String) Debug.delegate(ba, "getresizemode", null));} -RDebugUtils.currentLine=53280768; - //BA.debugLineNum = 53280768;BA.debugLine="Public Sub getResizeMode As String"; -RDebugUtils.currentLine=53280769; - //BA.debugLineNum = 53280769;BA.debugLine="Return mResizeMode"; -if (true) return __ref._mresizemode /*String*/ ; -RDebugUtils.currentLine=53280770; - //BA.debugLineNum = 53280770;BA.debugLine="End Sub"; -return ""; -} -public boolean _getroundedimage(keymon.lat.medicomed.b4ximageview __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4ximageview"; -if (Debug.shouldDelegate(ba, "getroundedimage", true)) - {return ((Boolean) Debug.delegate(ba, "getroundedimage", null));} -RDebugUtils.currentLine=53018624; - //BA.debugLineNum = 53018624;BA.debugLine="Public Sub getRoundedImage As Boolean"; -RDebugUtils.currentLine=53018625; - //BA.debugLineNum = 53018625;BA.debugLine="Return mRound"; -if (true) return __ref._mround /*boolean*/ ; -RDebugUtils.currentLine=53018626; - //BA.debugLineNum = 53018626;BA.debugLine="End Sub"; -return false; -} -public String _initialize(keymon.lat.medicomed.b4ximageview __ref,anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="b4ximageview"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_callback,_eventname}));} -RDebugUtils.currentLine=52822016; - //BA.debugLineNum = 52822016;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -RDebugUtils.currentLine=52822017; - //BA.debugLineNum = 52822017;BA.debugLine="mEventName = EventName"; -__ref._meventname /*String*/ = _eventname; -RDebugUtils.currentLine=52822018; - //BA.debugLineNum = 52822018;BA.debugLine="mCallBack = Callback"; -__ref._mcallback /*Object*/ = _callback; -RDebugUtils.currentLine=52822019; - //BA.debugLineNum = 52822019;BA.debugLine="End Sub"; -return ""; -} -public String _load(keymon.lat.medicomed.b4ximageview __ref,String _dir,String _filename) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4ximageview"; -if (Debug.shouldDelegate(ba, "load", true)) - {return ((String) Debug.delegate(ba, "load", new Object[] {_dir,_filename}));} -RDebugUtils.currentLine=53477376; - //BA.debugLineNum = 53477376;BA.debugLine="Public Sub Load (Dir As String, FileName As String"; -RDebugUtils.currentLine=53477378; - //BA.debugLineNum = 53477378;BA.debugLine="setBitmap(LoadBitmapSample(Dir, FileName, mBase.W"; -__ref._setbitmap /*String*/ (null,(anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper(), (android.graphics.Bitmap)(__c.LoadBitmapSample(_dir,_filename,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()).getObject()))); -RDebugUtils.currentLine=53477382; - //BA.debugLineNum = 53477382;BA.debugLine="End Sub"; -return ""; -} -public String _setbitmap(keymon.lat.medicomed.b4ximageview __ref,anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _bmp) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4ximageview"; -if (Debug.shouldDelegate(ba, "setbitmap", true)) - {return ((String) Debug.delegate(ba, "setbitmap", new Object[] {_bmp}));} -RDebugUtils.currentLine=53608448; - //BA.debugLineNum = 53608448;BA.debugLine="Public Sub setBitmap(Bmp As B4XBitmap)"; -RDebugUtils.currentLine=53608449; - //BA.debugLineNum = 53608449;BA.debugLine="mBitmap = Bmp"; -__ref._mbitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ = _bmp; -RDebugUtils.currentLine=53608450; - //BA.debugLineNum = 53608450;BA.debugLine="XUIViewsUtils.SetBitmapAndFill(iv, Bmp)"; -_xuiviewsutils._setbitmapandfill /*String*/ (ba,__ref._iv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ,_bmp); -RDebugUtils.currentLine=53608451; - //BA.debugLineNum = 53608451;BA.debugLine="Update"; -__ref._update /*String*/ (null); -RDebugUtils.currentLine=53608452; - //BA.debugLineNum = 53608452;BA.debugLine="End Sub"; -return ""; -} -public String _setcornersradius(keymon.lat.medicomed.b4ximageview __ref,int _i) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4ximageview"; -if (Debug.shouldDelegate(ba, "setcornersradius", true)) - {return ((String) Debug.delegate(ba, "setcornersradius", new Object[] {_i}));} -RDebugUtils.currentLine=53215232; - //BA.debugLineNum = 53215232;BA.debugLine="Public Sub setCornersRadius (i As Int)"; -RDebugUtils.currentLine=53215233; - //BA.debugLineNum = 53215233;BA.debugLine="mCornersRadius = i"; -__ref._mcornersradius /*int*/ = _i; -RDebugUtils.currentLine=53215234; - //BA.debugLineNum = 53215234;BA.debugLine="UpdateClip"; -__ref._updateclip /*String*/ (null); -RDebugUtils.currentLine=53215235; - //BA.debugLineNum = 53215235;BA.debugLine="End Sub"; -return ""; -} -public String _updateclip(keymon.lat.medicomed.b4ximageview __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4ximageview"; -if (Debug.shouldDelegate(ba, "updateclip", true)) - {return ((String) Debug.delegate(ba, "updateclip", null));} +public String _updateclip() throws Exception{ anywheresoftware.b4j.object.JavaObject _jo = null; -RDebugUtils.currentLine=53739520; - //BA.debugLineNum = 53739520;BA.debugLine="Private Sub UpdateClip"; -RDebugUtils.currentLine=53739521; - //BA.debugLineNum = 53739521;BA.debugLine="If mRound Then"; -if (__ref._mround /*boolean*/ ) { -RDebugUtils.currentLine=53739522; - //BA.debugLineNum = 53739522;BA.debugLine="mBase.SetColorAndBorder(mBackgroundColor, 0, 0,"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetColorAndBorder(__ref._mbackgroundcolor /*int*/ ,(int) (0),(int) (0),(int) (__c.Min(__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)2,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()/(double)2))); + //BA.debugLineNum = 135;BA.debugLine="Private Sub UpdateClip"; + //BA.debugLineNum = 136;BA.debugLine="If mRound Then"; +if (_mround) { + //BA.debugLineNum = 137;BA.debugLine="mBase.SetColorAndBorder(mBackgroundColor, 0, 0,"; +_mbase.SetColorAndBorder(_mbackgroundcolor,(int) (0),(int) (0),(int) (__c.Min(_mbase.getWidth()/(double)2,_mbase.getHeight()/(double)2))); }else { -RDebugUtils.currentLine=53739524; - //BA.debugLineNum = 53739524;BA.debugLine="mBase.SetColorAndBorder(mBackgroundColor, 0, 0,"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetColorAndBorder(__ref._mbackgroundcolor /*int*/ ,(int) (0),(int) (0),__ref._mcornersradius /*int*/ ); + //BA.debugLineNum = 139;BA.debugLine="mBase.SetColorAndBorder(mBackgroundColor, 0, 0,"; +_mbase.SetColorAndBorder(_mbackgroundcolor,(int) (0),(int) (0),_mcornersradius); }; -RDebugUtils.currentLine=53739546; - //BA.debugLineNum = 53739546;BA.debugLine="Dim jo As JavaObject = mBase"; + //BA.debugLineNum = 161;BA.debugLine="Dim jo As JavaObject = mBase"; _jo = new anywheresoftware.b4j.object.JavaObject(); -_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject())); -RDebugUtils.currentLine=53739547; - //BA.debugLineNum = 53739547;BA.debugLine="jo.RunMethod(\"setClipToOutline\", Array(mRound Or"; -_jo.RunMethod("setClipToOutline",new Object[]{(Object)(__ref._mround /*boolean*/ || __ref._mcornersradius /*int*/ >0)}); -RDebugUtils.currentLine=53739549; - //BA.debugLineNum = 53739549;BA.debugLine="End Sub"; +_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_mbase.getObject())); + //BA.debugLineNum = 162;BA.debugLine="jo.RunMethod(\"setClipToOutline\", Array(mRound Or"; +_jo.RunMethod("setClipToOutline",new Object[]{(Object)(_mround || _mcornersradius>0)}); + //BA.debugLineNum = 164;BA.debugLine="End Sub"; return ""; } -public String _setresizemode(keymon.lat.medicomed.b4ximageview __ref,String _s) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4ximageview"; -if (Debug.shouldDelegate(ba, "setresizemode", true)) - {return ((String) Debug.delegate(ba, "setresizemode", new Object[] {_s}));} -RDebugUtils.currentLine=53346304; - //BA.debugLineNum = 53346304;BA.debugLine="Public Sub setResizeMode(s As String)"; -RDebugUtils.currentLine=53346305; - //BA.debugLineNum = 53346305;BA.debugLine="If s = mResizeMode Then Return"; -if ((_s).equals(__ref._mresizemode /*String*/ )) { -if (true) return "";}; -RDebugUtils.currentLine=53346306; - //BA.debugLineNum = 53346306;BA.debugLine="mResizeMode = s"; -__ref._mresizemode /*String*/ = _s; -RDebugUtils.currentLine=53346307; - //BA.debugLineNum = 53346307;BA.debugLine="Update"; -__ref._update /*String*/ (null); -RDebugUtils.currentLine=53346308; - //BA.debugLineNum = 53346308;BA.debugLine="End Sub"; -return ""; +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; } -public String _setroundedimage(keymon.lat.medicomed.b4ximageview __ref,boolean _b) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4ximageview"; -if (Debug.shouldDelegate(ba, "setroundedimage", true)) - {return ((String) Debug.delegate(ba, "setroundedimage", new Object[] {_b}));} -RDebugUtils.currentLine=53084160; - //BA.debugLineNum = 53084160;BA.debugLine="Public Sub setRoundedImage (b As Boolean)"; -RDebugUtils.currentLine=53084161; - //BA.debugLineNum = 53084161;BA.debugLine="If b = mRound Then Return"; -if (_b==__ref._mround /*boolean*/ ) { -if (true) return "";}; -RDebugUtils.currentLine=53084162; - //BA.debugLineNum = 53084162;BA.debugLine="mRound = b"; -__ref._mround /*boolean*/ = _b; -RDebugUtils.currentLine=53084163; - //BA.debugLineNum = 53084163;BA.debugLine="UpdateClip"; -__ref._updateclip /*String*/ (null); -RDebugUtils.currentLine=53084164; - //BA.debugLineNum = 53084164;BA.debugLine="End Sub"; -return ""; } -} \ No newline at end of file diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xinputtemplate.java b/B4A/Objects/src/keymon/lat/medicomed/b4xinputtemplate.java index 11033e0..aba59c0 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xinputtemplate.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xinputtemplate.java @@ -10,7 +10,7 @@ public class b4xinputtemplate extends B4AClass.ImplB4AClass implements BA.SubDel private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xinputtemplate"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xinputtemplate"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xinputtemplate extends B4AClass.ImplB4AClass implements BA.SubDel 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.keywords.Common __c = null; public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null; public String _text = ""; @@ -54,42 +47,146 @@ 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 anywheresoftware.b4a.objects.B4XViewWrapper _getpanel(keymon.lat.medicomed.b4xinputtemplate __ref,keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xinputtemplate"; -if (Debug.shouldDelegate(ba, "getpanel", true)) - {return ((anywheresoftware.b4a.objects.B4XViewWrapper) Debug.delegate(ba, "getpanel", new Object[] {_dialog}));} -RDebugUtils.currentLine=54460416; - //BA.debugLineNum = 54460416;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; -RDebugUtils.currentLine=54460417; - //BA.debugLineNum = 54460417;BA.debugLine="Return mBase"; -if (true) return __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ; -RDebugUtils.currentLine=54460418; - //BA.debugLineNum = 54460418;BA.debugLine="End Sub"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Private xui As XUI"; +_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); + //BA.debugLineNum = 3;BA.debugLine="Public mBase As B4XView"; +_mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 4;BA.debugLine="Public Text As String"; +_text = ""; + //BA.debugLineNum = 5;BA.debugLine="Private xDialog As B4XDialog"; +_xdialog = new keymon.lat.medicomed.b4xdialog(); + //BA.debugLineNum = 6;BA.debugLine="Public RegexPattern As String"; +_regexpattern = ""; + //BA.debugLineNum = 7;BA.debugLine="Public TextField1 As B4XView"; +_textfield1 = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 8;BA.debugLine="Public lblTitle As B4XView"; +_lbltitle = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 10;BA.debugLine="Private IME As IME"; +_ime = new anywheresoftware.b4a.objects.IME(); + //BA.debugLineNum = 12;BA.debugLine="Private mAllowDecimals As Boolean"; +_mallowdecimals = false; + //BA.debugLineNum = 13;BA.debugLine="Private BorderColor = xui.Color_White, BorderColo"; +_bordercolor = _xui.Color_White; +_bordercolorinvalid = _xui.Color_Red; + //BA.debugLineNum = 14;BA.debugLine="End Sub"; +return ""; +} +public String _configurefornumbers(boolean _allowdecimals,boolean _allownegative) throws Exception{ +anywheresoftware.b4a.objects.EditTextWrapper _et = null; + //BA.debugLineNum = 40;BA.debugLine="Public Sub ConfigureForNumbers (AllowDecimals As B"; + //BA.debugLineNum = 42;BA.debugLine="Dim et As EditText = TextField1"; +_et = new anywheresoftware.b4a.objects.EditTextWrapper(); +_et = (anywheresoftware.b4a.objects.EditTextWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.EditTextWrapper(), (android.widget.EditText)(_textfield1.getObject())); + //BA.debugLineNum = 43;BA.debugLine="If AllowDecimals Or AllowNegative Then"; +if (_allowdecimals || _allownegative) { + //BA.debugLineNum = 44;BA.debugLine="et.InputType = et.INPUT_TYPE_DECIMAL_NUMBERS"; +_et.setInputType(_et.INPUT_TYPE_DECIMAL_NUMBERS); + }else { + //BA.debugLineNum = 46;BA.debugLine="et.InputType = et.INPUT_TYPE_NUMBERS"; +_et.setInputType(_et.INPUT_TYPE_NUMBERS); + }; + //BA.debugLineNum = 59;BA.debugLine="If AllowDecimals And AllowNegative Then"; +if (_allowdecimals && _allownegative) { + //BA.debugLineNum = 60;BA.debugLine="RegexPattern = \"^-?(0|[1-9]\\d*)?(\\.\\d+)?(?<=\\d)$"; +_regexpattern = "^-?(0|[1-9]\\d*)?(\\.\\d+)?(?<=\\d)$"; + }else if(_allowdecimals && _allownegative==__c.False) { + //BA.debugLineNum = 62;BA.debugLine="RegexPattern = \"^(0|[1-9]\\d*)?(\\.\\d+)?(?<=\\d)$\""; +_regexpattern = "^(0|[1-9]\\d*)?(\\.\\d+)?(?<=\\d)$"; + }else if(_allowdecimals==__c.False && _allownegative==__c.True) { + //BA.debugLineNum = 64;BA.debugLine="RegexPattern = \"^-?(0|[1-9]\\d*)$\""; +_regexpattern = "^-?(0|[1-9]\\d*)$"; + }else if(_allowdecimals==__c.False && _allownegative==__c.False) { + //BA.debugLineNum = 66;BA.debugLine="RegexPattern = \"^(0|[1-9]\\d*)$\""; +_regexpattern = "^(0|[1-9]\\d*)$"; + }; + //BA.debugLineNum = 68;BA.debugLine="mAllowDecimals = AllowDecimals"; +_mallowdecimals = _allowdecimals; + //BA.debugLineNum = 69;BA.debugLine="End Sub"; +return ""; +} +public String _dialogclosed(int _result) throws Exception{ + //BA.debugLineNum = 137;BA.debugLine="Private Sub DialogClosed(Result As Int)"; + //BA.debugLineNum = 138;BA.debugLine="If Result = xui.DialogResponse_Positive Then"; +if (_result==_xui.DialogResponse_Positive) { + //BA.debugLineNum = 139;BA.debugLine="Text = TextField1.Text"; +_text = _textfield1.getText(); + }; + //BA.debugLineNum = 141;BA.debugLine="End Sub"; +return ""; +} +public anywheresoftware.b4a.objects.B4XViewWrapper _getpanel(keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ + //BA.debugLineNum = 116;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; + //BA.debugLineNum = 117;BA.debugLine="Return mBase"; +if (true) return _mbase; + //BA.debugLineNum = 118;BA.debugLine="End Sub"; return null; } -public void _show(keymon.lat.medicomed.b4xinputtemplate __ref,keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ -RDebugUtils.currentModule="b4xinputtemplate"; -if (Debug.shouldDelegate(ba, "show", true)) - {Debug.delegate(ba, "show", new Object[] {_dialog}); return;} -ResumableSub_Show rsub = new ResumableSub_Show(this,__ref,_dialog); +public String _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ +innerInitialize(_ba); +anywheresoftware.b4j.object.JavaObject _jo = null; + //BA.debugLineNum = 16;BA.debugLine="Public Sub Initialize"; + //BA.debugLineNum = 17;BA.debugLine="mBase = xui.CreatePanel(\"mBase\")"; +_mbase = _xui.CreatePanel(ba,"mBase"); + //BA.debugLineNum = 18;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, 300dip, 80dip)"; +_mbase.SetLayoutAnimated((int) (0),(int) (0),(int) (0),__c.DipToCurrent((int) (300)),__c.DipToCurrent((int) (80))); + //BA.debugLineNum = 19;BA.debugLine="mBase.LoadLayout(\"B4XInputTemplate\")"; +_mbase.LoadLayout("B4XInputTemplate",ba); + //BA.debugLineNum = 20;BA.debugLine="TextField1.TextColor = xui.Color_White"; +_textfield1.setTextColor(_xui.Color_White); + //BA.debugLineNum = 22;BA.debugLine="IME.Initialize(\"\")"; +_ime.Initialize(""); + //BA.debugLineNum = 23;BA.debugLine="Dim jo As JavaObject = TextField1"; +_jo = new anywheresoftware.b4j.object.JavaObject(); +_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_textfield1.getObject())); + //BA.debugLineNum = 24;BA.debugLine="jo.RunMethod(\"setImeOptions\", Array(Bit.Or(335544"; +_jo.RunMethod("setImeOptions",new Object[]{(Object)(__c.Bit.Or((int) (33554432),(int) (6)))}); + //BA.debugLineNum = 30;BA.debugLine="SetBorder(BorderColor)"; +_setborder(_bordercolor); + //BA.debugLineNum = 31;BA.debugLine="End Sub"; +return ""; +} +public boolean _isvalid(String _new) throws Exception{ + //BA.debugLineNum = 103;BA.debugLine="Private Sub IsValid(New As String) As Boolean"; + //BA.debugLineNum = 104;BA.debugLine="Return RegexPattern = \"\" Or Regex.IsMatch(RegexPa"; +if (true) return (_regexpattern).equals("") || __c.Regex.IsMatch(_regexpattern,_new); + //BA.debugLineNum = 105;BA.debugLine="End Sub"; +return false; +} +public String _setborder(int _bc) throws Exception{ + //BA.debugLineNum = 99;BA.debugLine="Private Sub SetBorder(bc As Int)"; + //BA.debugLineNum = 100;BA.debugLine="TextField1.SetColorAndBorder(xui.Color_Transparen"; +_textfield1.SetColorAndBorder(_xui.Color_Transparent,__c.DipToCurrent((int) (1)),_bc,__c.DipToCurrent((int) (2))); + //BA.debugLineNum = 101;BA.debugLine="End Sub"; +return ""; +} +public String _setbordercolor(int _valid,int _invalid) throws Exception{ + //BA.debugLineNum = 34;BA.debugLine="Public Sub SetBorderColor(Valid As Int, Invalid As"; + //BA.debugLineNum = 35;BA.debugLine="BorderColor = Valid"; +_bordercolor = _valid; + //BA.debugLineNum = 36;BA.debugLine="BorderColorInvalid = Invalid"; +_bordercolorinvalid = _invalid; + //BA.debugLineNum = 37;BA.debugLine="SetBorder(BorderColor)"; +_setborder(_bordercolor); + //BA.debugLineNum = 38;BA.debugLine="End Sub"; +return ""; +} +public void _show(keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ +ResumableSub_Show rsub = new ResumableSub_Show(this,_dialog); rsub.resume(ba, null); } public static class ResumableSub_Show extends BA.ResumableSub { -public ResumableSub_Show(keymon.lat.medicomed.b4xinputtemplate parent,keymon.lat.medicomed.b4xinputtemplate __ref,keymon.lat.medicomed.b4xdialog _dialog) { +public ResumableSub_Show(keymon.lat.medicomed.b4xinputtemplate parent,keymon.lat.medicomed.b4xdialog _dialog) { this.parent = parent; -this.__ref = __ref; this._dialog = _dialog; -this.__ref = parent; } -keymon.lat.medicomed.b4xinputtemplate __ref; keymon.lat.medicomed.b4xinputtemplate parent; keymon.lat.medicomed.b4xdialog _dialog; anywheresoftware.b4a.objects.EditTextWrapper _tf = null; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="b4xinputtemplate"; while (true) { switch (state) { @@ -99,349 +196,91 @@ return; case 0: //C this.state = -1; -RDebugUtils.currentLine=54525953; - //BA.debugLineNum = 54525953;BA.debugLine="xDialog = Dialog"; -__ref._xdialog /*keymon.lat.medicomed.b4xdialog*/ = _dialog; -RDebugUtils.currentLine=54525954; - //BA.debugLineNum = 54525954;BA.debugLine="xDialog.PutAtTop = xui.IsB4A Or xui.IsB4i"; -__ref._xdialog /*keymon.lat.medicomed.b4xdialog*/ ._putattop /*boolean*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4A() || __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4i(); -RDebugUtils.currentLine=54525955; - //BA.debugLineNum = 54525955;BA.debugLine="Sleep(20)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "b4xinputtemplate", "show"),(int) (20)); + //BA.debugLineNum = 121;BA.debugLine="xDialog = Dialog"; +parent._xdialog = _dialog; + //BA.debugLineNum = 122;BA.debugLine="xDialog.PutAtTop = xui.IsB4A Or xui.IsB4i"; +parent._xdialog._putattop /*boolean*/ = parent._xui.getIsB4A() || parent._xui.getIsB4i(); + //BA.debugLineNum = 123;BA.debugLine="Sleep(20)"; +parent.__c.Sleep(ba,this,(int) (20)); this.state = 1; return; case 1: //C this.state = -1; ; -RDebugUtils.currentLine=54525956; - //BA.debugLineNum = 54525956;BA.debugLine="TextField1.Text = Text"; -__ref._textfield1 /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setText(BA.ObjectToCharSequence(__ref._text /*String*/ )); -RDebugUtils.currentLine=54525957; - //BA.debugLineNum = 54525957;BA.debugLine="Validate(Text)"; -__ref._validate /*String*/ (null,__ref._text /*String*/ ); -RDebugUtils.currentLine=54525958; - //BA.debugLineNum = 54525958;BA.debugLine="TextField1.RequestFocus"; -__ref._textfield1 /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .RequestFocus(); -RDebugUtils.currentLine=54525960; - //BA.debugLineNum = 54525960;BA.debugLine="Dim tf As EditText = TextField1"; + //BA.debugLineNum = 124;BA.debugLine="TextField1.Text = Text"; +parent._textfield1.setText(BA.ObjectToCharSequence(parent._text)); + //BA.debugLineNum = 125;BA.debugLine="Validate(Text)"; +parent._validate(parent._text); + //BA.debugLineNum = 126;BA.debugLine="TextField1.RequestFocus"; +parent._textfield1.RequestFocus(); + //BA.debugLineNum = 128;BA.debugLine="Dim tf As EditText = TextField1"; _tf = new anywheresoftware.b4a.objects.EditTextWrapper(); -_tf = (anywheresoftware.b4a.objects.EditTextWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.EditTextWrapper(), (android.widget.EditText)(__ref._textfield1 /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject())); -RDebugUtils.currentLine=54525961; - //BA.debugLineNum = 54525961;BA.debugLine="tf.SelectAll"; +_tf = (anywheresoftware.b4a.objects.EditTextWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.EditTextWrapper(), (android.widget.EditText)(parent._textfield1.getObject())); + //BA.debugLineNum = 129;BA.debugLine="tf.SelectAll"; _tf.SelectAll(); -RDebugUtils.currentLine=54525962; - //BA.debugLineNum = 54525962;BA.debugLine="IME.ShowKeyboard(TextField1)"; -__ref._ime /*anywheresoftware.b4a.objects.IME*/ .ShowKeyboard((android.view.View)(__ref._textfield1 /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject())); -RDebugUtils.currentLine=54525967; - //BA.debugLineNum = 54525967;BA.debugLine="End Sub"; + //BA.debugLineNum = 130;BA.debugLine="IME.ShowKeyboard(TextField1)"; +parent._ime.ShowKeyboard((android.view.View)(parent._textfield1.getObject())); + //BA.debugLineNum = 135;BA.debugLine="End Sub"; if (true) break; } } } } -public String _dialogclosed(keymon.lat.medicomed.b4xinputtemplate __ref,int _result) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xinputtemplate"; -if (Debug.shouldDelegate(ba, "dialogclosed", true)) - {return ((String) Debug.delegate(ba, "dialogclosed", new Object[] {_result}));} -RDebugUtils.currentLine=54591488; - //BA.debugLineNum = 54591488;BA.debugLine="Private Sub DialogClosed(Result As Int)"; -RDebugUtils.currentLine=54591489; - //BA.debugLineNum = 54591489;BA.debugLine="If Result = xui.DialogResponse_Positive Then"; -if (_result==__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .DialogResponse_Positive) { -RDebugUtils.currentLine=54591490; - //BA.debugLineNum = 54591490;BA.debugLine="Text = TextField1.Text"; -__ref._text /*String*/ = __ref._textfield1 /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getText(); - }; -RDebugUtils.currentLine=54591492; - //BA.debugLineNum = 54591492;BA.debugLine="End Sub"; +public String _textfield1_action() throws Exception{ + //BA.debugLineNum = 107;BA.debugLine="Private Sub TextField1_Action"; + //BA.debugLineNum = 108;BA.debugLine="TextField1_EnterPressed"; +_textfield1_enterpressed(); + //BA.debugLineNum = 109;BA.debugLine="End Sub"; return ""; } -public String _class_globals(keymon.lat.medicomed.b4xinputtemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xinputtemplate"; -RDebugUtils.currentLine=53805056; - //BA.debugLineNum = 53805056;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=53805057; - //BA.debugLineNum = 53805057;BA.debugLine="Private xui As XUI"; -_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=53805058; - //BA.debugLineNum = 53805058;BA.debugLine="Public mBase As B4XView"; -_mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=53805059; - //BA.debugLineNum = 53805059;BA.debugLine="Public Text As String"; -_text = ""; -RDebugUtils.currentLine=53805060; - //BA.debugLineNum = 53805060;BA.debugLine="Private xDialog As B4XDialog"; -_xdialog = new keymon.lat.medicomed.b4xdialog(); -RDebugUtils.currentLine=53805061; - //BA.debugLineNum = 53805061;BA.debugLine="Public RegexPattern As String"; -_regexpattern = ""; -RDebugUtils.currentLine=53805062; - //BA.debugLineNum = 53805062;BA.debugLine="Public TextField1 As B4XView"; -_textfield1 = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=53805063; - //BA.debugLineNum = 53805063;BA.debugLine="Public lblTitle As B4XView"; -_lbltitle = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=53805065; - //BA.debugLineNum = 53805065;BA.debugLine="Private IME As IME"; -_ime = new anywheresoftware.b4a.objects.IME(); -RDebugUtils.currentLine=53805067; - //BA.debugLineNum = 53805067;BA.debugLine="Private mAllowDecimals As Boolean"; -_mallowdecimals = false; -RDebugUtils.currentLine=53805068; - //BA.debugLineNum = 53805068;BA.debugLine="Private BorderColor = xui.Color_White, BorderColo"; -_bordercolor = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_White; -_bordercolorinvalid = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Red; -RDebugUtils.currentLine=53805069; - //BA.debugLineNum = 53805069;BA.debugLine="End Sub"; +public String _textfield1_enterpressed() throws Exception{ + //BA.debugLineNum = 111;BA.debugLine="Private Sub TextField1_EnterPressed"; + //BA.debugLineNum = 112;BA.debugLine="If IsValid(TextField1.Text) Then xDialog.Close(xu"; +if (_isvalid(_textfield1.getText())) { +_xdialog._close /*boolean*/ (_xui.DialogResponse_Positive);}; + //BA.debugLineNum = 113;BA.debugLine="End Sub"; return ""; } -public String _configurefornumbers(keymon.lat.medicomed.b4xinputtemplate __ref,boolean _allowdecimals,boolean _allownegative) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xinputtemplate"; -if (Debug.shouldDelegate(ba, "configurefornumbers", true)) - {return ((String) Debug.delegate(ba, "configurefornumbers", new Object[] {_allowdecimals,_allownegative}));} -anywheresoftware.b4a.objects.EditTextWrapper _et = null; -RDebugUtils.currentLine=54001664; - //BA.debugLineNum = 54001664;BA.debugLine="Public Sub ConfigureForNumbers (AllowDecimals As B"; -RDebugUtils.currentLine=54001666; - //BA.debugLineNum = 54001666;BA.debugLine="Dim et As EditText = TextField1"; -_et = new anywheresoftware.b4a.objects.EditTextWrapper(); -_et = (anywheresoftware.b4a.objects.EditTextWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.EditTextWrapper(), (android.widget.EditText)(__ref._textfield1 /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject())); -RDebugUtils.currentLine=54001667; - //BA.debugLineNum = 54001667;BA.debugLine="If AllowDecimals Or AllowNegative Then"; -if (_allowdecimals || _allownegative) { -RDebugUtils.currentLine=54001668; - //BA.debugLineNum = 54001668;BA.debugLine="et.InputType = et.INPUT_TYPE_DECIMAL_NUMBERS"; -_et.setInputType(_et.INPUT_TYPE_DECIMAL_NUMBERS); - }else { -RDebugUtils.currentLine=54001670; - //BA.debugLineNum = 54001670;BA.debugLine="et.InputType = et.INPUT_TYPE_NUMBERS"; -_et.setInputType(_et.INPUT_TYPE_NUMBERS); - }; -RDebugUtils.currentLine=54001683; - //BA.debugLineNum = 54001683;BA.debugLine="If AllowDecimals And AllowNegative Then"; -if (_allowdecimals && _allownegative) { -RDebugUtils.currentLine=54001684; - //BA.debugLineNum = 54001684;BA.debugLine="RegexPattern = \"^-?(0|[1-9]\\d*)?(\\.\\d+)?(?<=\\d)$"; -__ref._regexpattern /*String*/ = "^-?(0|[1-9]\\d*)?(\\.\\d+)?(?<=\\d)$"; - }else -{RDebugUtils.currentLine=54001685; - //BA.debugLineNum = 54001685;BA.debugLine="Else If AllowDecimals And AllowNegative = False T"; -if (_allowdecimals && _allownegative==__c.False) { -RDebugUtils.currentLine=54001686; - //BA.debugLineNum = 54001686;BA.debugLine="RegexPattern = \"^(0|[1-9]\\d*)?(\\.\\d+)?(?<=\\d)$\""; -__ref._regexpattern /*String*/ = "^(0|[1-9]\\d*)?(\\.\\d+)?(?<=\\d)$"; - }else -{RDebugUtils.currentLine=54001687; - //BA.debugLineNum = 54001687;BA.debugLine="Else If AllowDecimals = False And AllowNegative ="; -if (_allowdecimals==__c.False && _allownegative==__c.True) { -RDebugUtils.currentLine=54001688; - //BA.debugLineNum = 54001688;BA.debugLine="RegexPattern = \"^-?(0|[1-9]\\d*)$\""; -__ref._regexpattern /*String*/ = "^-?(0|[1-9]\\d*)$"; - }else -{RDebugUtils.currentLine=54001689; - //BA.debugLineNum = 54001689;BA.debugLine="Else If AllowDecimals = False And AllowNegative ="; -if (_allowdecimals==__c.False && _allownegative==__c.False) { -RDebugUtils.currentLine=54001690; - //BA.debugLineNum = 54001690;BA.debugLine="RegexPattern = \"^(0|[1-9]\\d*)$\""; -__ref._regexpattern /*String*/ = "^(0|[1-9]\\d*)$"; - }}}} -; -RDebugUtils.currentLine=54001692; - //BA.debugLineNum = 54001692;BA.debugLine="mAllowDecimals = AllowDecimals"; -__ref._mallowdecimals /*boolean*/ = _allowdecimals; -RDebugUtils.currentLine=54001693; - //BA.debugLineNum = 54001693;BA.debugLine="End Sub"; +public String _textfield1_textchanged(String _old,String _new) throws Exception{ + //BA.debugLineNum = 71;BA.debugLine="Private Sub TextField1_TextChanged (Old As String,"; + //BA.debugLineNum = 83;BA.debugLine="Validate (New)"; +_validate(_new); + //BA.debugLineNum = 84;BA.debugLine="End Sub"; return ""; } -public String _initialize(keymon.lat.medicomed.b4xinputtemplate __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="b4xinputtemplate"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -anywheresoftware.b4j.object.JavaObject _jo = null; -RDebugUtils.currentLine=53870592; - //BA.debugLineNum = 53870592;BA.debugLine="Public Sub Initialize"; -RDebugUtils.currentLine=53870593; - //BA.debugLineNum = 53870593;BA.debugLine="mBase = xui.CreatePanel(\"mBase\")"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,"mBase"); -RDebugUtils.currentLine=53870594; - //BA.debugLineNum = 53870594;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, 300dip, 80dip)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),__c.DipToCurrent((int) (300)),__c.DipToCurrent((int) (80))); -RDebugUtils.currentLine=53870595; - //BA.debugLineNum = 53870595;BA.debugLine="mBase.LoadLayout(\"B4XInputTemplate\")"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .LoadLayout("B4XInputTemplate",ba); -RDebugUtils.currentLine=53870596; - //BA.debugLineNum = 53870596;BA.debugLine="TextField1.TextColor = xui.Color_White"; -__ref._textfield1 /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTextColor(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_White); -RDebugUtils.currentLine=53870598; - //BA.debugLineNum = 53870598;BA.debugLine="IME.Initialize(\"\")"; -__ref._ime /*anywheresoftware.b4a.objects.IME*/ .Initialize(""); -RDebugUtils.currentLine=53870599; - //BA.debugLineNum = 53870599;BA.debugLine="Dim jo As JavaObject = TextField1"; -_jo = new anywheresoftware.b4j.object.JavaObject(); -_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(__ref._textfield1 /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject())); -RDebugUtils.currentLine=53870600; - //BA.debugLineNum = 53870600;BA.debugLine="jo.RunMethod(\"setImeOptions\", Array(Bit.Or(335544"; -_jo.RunMethod("setImeOptions",new Object[]{(Object)(__c.Bit.Or((int) (33554432),(int) (6)))}); -RDebugUtils.currentLine=53870602; - //BA.debugLineNum = 53870602;BA.debugLine="Dim jo As JavaObject = Me"; -_jo = new anywheresoftware.b4j.object.JavaObject(); -_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(this)); -RDebugUtils.currentLine=53870603; - //BA.debugLineNum = 53870603;BA.debugLine="jo.RunMethod(\"RemoveWarning\", Null)"; -_jo.RunMethod("RemoveWarning",(Object[])(__c.Null)); -RDebugUtils.currentLine=53870606; - //BA.debugLineNum = 53870606;BA.debugLine="SetBorder(BorderColor)"; -__ref._setborder /*String*/ (null,__ref._bordercolor /*int*/ ); -RDebugUtils.currentLine=53870607; - //BA.debugLineNum = 53870607;BA.debugLine="End Sub"; -return ""; -} -public String _setborder(keymon.lat.medicomed.b4xinputtemplate __ref,int _bc) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xinputtemplate"; -if (Debug.shouldDelegate(ba, "setborder", true)) - {return ((String) Debug.delegate(ba, "setborder", new Object[] {_bc}));} -RDebugUtils.currentLine=54198272; - //BA.debugLineNum = 54198272;BA.debugLine="Private Sub SetBorder(bc As Int)"; -RDebugUtils.currentLine=54198273; - //BA.debugLineNum = 54198273;BA.debugLine="TextField1.SetColorAndBorder(xui.Color_Transparen"; -__ref._textfield1 /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetColorAndBorder(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent,__c.DipToCurrent((int) (1)),_bc,__c.DipToCurrent((int) (2))); -RDebugUtils.currentLine=54198274; - //BA.debugLineNum = 54198274;BA.debugLine="End Sub"; -return ""; -} -public boolean _isvalid(keymon.lat.medicomed.b4xinputtemplate __ref,String _new) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xinputtemplate"; -if (Debug.shouldDelegate(ba, "isvalid", true)) - {return ((Boolean) Debug.delegate(ba, "isvalid", new Object[] {_new}));} -RDebugUtils.currentLine=54263808; - //BA.debugLineNum = 54263808;BA.debugLine="Private Sub IsValid(New As String) As Boolean"; -RDebugUtils.currentLine=54263809; - //BA.debugLineNum = 54263809;BA.debugLine="Return RegexPattern = \"\" Or Regex.IsMatch(RegexPa"; -if (true) return (__ref._regexpattern /*String*/ ).equals("") || __c.Regex.IsMatch(__ref._regexpattern /*String*/ ,_new); -RDebugUtils.currentLine=54263810; - //BA.debugLineNum = 54263810;BA.debugLine="End Sub"; -return false; -} -public String _setbordercolor(keymon.lat.medicomed.b4xinputtemplate __ref,int _valid,int _invalid) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xinputtemplate"; -if (Debug.shouldDelegate(ba, "setbordercolor", true)) - {return ((String) Debug.delegate(ba, "setbordercolor", new Object[] {_valid,_invalid}));} -RDebugUtils.currentLine=53936128; - //BA.debugLineNum = 53936128;BA.debugLine="Public Sub SetBorderColor(Valid As Int, Invalid As"; -RDebugUtils.currentLine=53936129; - //BA.debugLineNum = 53936129;BA.debugLine="BorderColor = Valid"; -__ref._bordercolor /*int*/ = _valid; -RDebugUtils.currentLine=53936130; - //BA.debugLineNum = 53936130;BA.debugLine="BorderColorInvalid = Invalid"; -__ref._bordercolorinvalid /*int*/ = _invalid; -RDebugUtils.currentLine=53936131; - //BA.debugLineNum = 53936131;BA.debugLine="SetBorder(BorderColor)"; -__ref._setborder /*String*/ (null,__ref._bordercolor /*int*/ ); -RDebugUtils.currentLine=53936132; - //BA.debugLineNum = 53936132;BA.debugLine="End Sub"; -return ""; -} -public String _validate(keymon.lat.medicomed.b4xinputtemplate __ref,String _new) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xinputtemplate"; -if (Debug.shouldDelegate(ba, "validate", true)) - {return ((String) Debug.delegate(ba, "validate", new Object[] {_new}));} +public String _validate(String _new) throws Exception{ int _bc = 0; boolean _enabled = false; -RDebugUtils.currentLine=54132736; - //BA.debugLineNum = 54132736;BA.debugLine="Private Sub Validate (New As String)"; -RDebugUtils.currentLine=54132737; - //BA.debugLineNum = 54132737;BA.debugLine="Dim bc As Int = BorderColor"; -_bc = __ref._bordercolor /*int*/ ; -RDebugUtils.currentLine=54132738; - //BA.debugLineNum = 54132738;BA.debugLine="Dim enabled As Boolean = True"; + //BA.debugLineNum = 86;BA.debugLine="Private Sub Validate (New As String)"; + //BA.debugLineNum = 87;BA.debugLine="Dim bc As Int = BorderColor"; +_bc = _bordercolor; + //BA.debugLineNum = 88;BA.debugLine="Dim enabled As Boolean = True"; _enabled = __c.True; -RDebugUtils.currentLine=54132739; - //BA.debugLineNum = 54132739;BA.debugLine="If IsValid(New) = False Then"; -if (__ref._isvalid /*boolean*/ (null,_new)==__c.False) { -RDebugUtils.currentLine=54132740; - //BA.debugLineNum = 54132740;BA.debugLine="If New.Length > 0 Then"; + //BA.debugLineNum = 89;BA.debugLine="If IsValid(New) = False Then"; +if (_isvalid(_new)==__c.False) { + //BA.debugLineNum = 90;BA.debugLine="If New.Length > 0 Then"; if (_new.length()>0) { -RDebugUtils.currentLine=54132741; - //BA.debugLineNum = 54132741;BA.debugLine="bc = BorderColorInvalid"; -_bc = __ref._bordercolorinvalid /*int*/ ; + //BA.debugLineNum = 91;BA.debugLine="bc = BorderColorInvalid"; +_bc = _bordercolorinvalid; }; -RDebugUtils.currentLine=54132743; - //BA.debugLineNum = 54132743;BA.debugLine="enabled = False"; + //BA.debugLineNum = 93;BA.debugLine="enabled = False"; _enabled = __c.False; }; -RDebugUtils.currentLine=54132745; - //BA.debugLineNum = 54132745;BA.debugLine="xDialog.SetButtonState(xui.DialogResponse_Positiv"; -__ref._xdialog /*keymon.lat.medicomed.b4xdialog*/ ._setbuttonstate /*String*/ (null,__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .DialogResponse_Positive,_enabled); -RDebugUtils.currentLine=54132746; - //BA.debugLineNum = 54132746;BA.debugLine="SetBorder(bc)"; -__ref._setborder /*String*/ (null,_bc); -RDebugUtils.currentLine=54132747; - //BA.debugLineNum = 54132747;BA.debugLine="End Sub"; + //BA.debugLineNum = 95;BA.debugLine="xDialog.SetButtonState(xui.DialogResponse_Positiv"; +_xdialog._setbuttonstate /*String*/ (_xui.DialogResponse_Positive,_enabled); + //BA.debugLineNum = 96;BA.debugLine="SetBorder(bc)"; +_setborder(_bc); + //BA.debugLineNum = 97;BA.debugLine="End Sub"; return ""; } -public String _textfield1_action(keymon.lat.medicomed.b4xinputtemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xinputtemplate"; -if (Debug.shouldDelegate(ba, "textfield1_action", true)) - {return ((String) Debug.delegate(ba, "textfield1_action", null));} -RDebugUtils.currentLine=54329344; - //BA.debugLineNum = 54329344;BA.debugLine="Private Sub TextField1_Action"; -RDebugUtils.currentLine=54329345; - //BA.debugLineNum = 54329345;BA.debugLine="TextField1_EnterPressed"; -__ref._textfield1_enterpressed /*String*/ (null); -RDebugUtils.currentLine=54329346; - //BA.debugLineNum = 54329346;BA.debugLine="End Sub"; -return ""; +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +if (BA.fastSubCompare(sub, "DIALOGCLOSED")) + return _dialogclosed(((Number)args[0]).intValue()); +if (BA.fastSubCompare(sub, "GETPANEL")) + return _getpanel((keymon.lat.medicomed.b4xdialog) args[0]); +return BA.SubDelegator.SubNotFound; } -public String _textfield1_enterpressed(keymon.lat.medicomed.b4xinputtemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xinputtemplate"; -if (Debug.shouldDelegate(ba, "textfield1_enterpressed", true)) - {return ((String) Debug.delegate(ba, "textfield1_enterpressed", null));} -RDebugUtils.currentLine=54394880; - //BA.debugLineNum = 54394880;BA.debugLine="Private Sub TextField1_EnterPressed"; -RDebugUtils.currentLine=54394881; - //BA.debugLineNum = 54394881;BA.debugLine="If IsValid(TextField1.Text) Then xDialog.Close(xu"; -if (__ref._isvalid /*boolean*/ (null,__ref._textfield1 /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getText())) { -__ref._xdialog /*keymon.lat.medicomed.b4xdialog*/ ._close /*boolean*/ (null,__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .DialogResponse_Positive);}; -RDebugUtils.currentLine=54394882; - //BA.debugLineNum = 54394882;BA.debugLine="End Sub"; -return ""; } -public String _textfield1_textchanged(keymon.lat.medicomed.b4xinputtemplate __ref,String _old,String _new) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xinputtemplate"; -if (Debug.shouldDelegate(ba, "textfield1_textchanged", true)) - {return ((String) Debug.delegate(ba, "textfield1_textchanged", new Object[] {_old,_new}));} -RDebugUtils.currentLine=54067200; - //BA.debugLineNum = 54067200;BA.debugLine="Private Sub TextField1_TextChanged (Old As String,"; -RDebugUtils.currentLine=54067212; - //BA.debugLineNum = 54067212;BA.debugLine="Validate (New)"; -__ref._validate /*String*/ (null,_new); -RDebugUtils.currentLine=54067213; - //BA.debugLineNum = 54067213;BA.debugLine="End Sub"; -return ""; -} -public void RemoveWarning() throws Exception{ - anywheresoftware.b4a.shell.Shell s = anywheresoftware.b4a.shell.Shell.INSTANCE; - java.lang.reflect.Field f = s.getClass().getDeclaredField("errorMessagesForSyncEvents"); - f.setAccessible(true); - java.util.HashSet h = (java.util.HashSet)f.get(s); - if (h == null) { - h = new java.util.HashSet(); - f.set(s, h); - } - h.add("textfield1_textchanged"); -} -} \ No newline at end of file diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xlisttemplate.java b/B4A/Objects/src/keymon/lat/medicomed/b4xlisttemplate.java index beb764b..17257e9 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xlisttemplate.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xlisttemplate.java @@ -10,7 +10,7 @@ public class b4xlisttemplate extends B4AClass.ImplB4AClass implements BA.SubDele private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xlisttemplate"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xlisttemplate"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xlisttemplate extends B4AClass.ImplB4AClass implements BA.SubDele 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.keywords.Common __c = null; public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null; public b4a.example3.customlistview _customlistview1 = null; @@ -53,35 +46,146 @@ 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 anywheresoftware.b4a.objects.B4XViewWrapper _getpanel(keymon.lat.medicomed.b4xlisttemplate __ref,keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xlisttemplate"; -if (Debug.shouldDelegate(ba, "getpanel", true)) - {return ((anywheresoftware.b4a.objects.B4XViewWrapper) Debug.delegate(ba, "getpanel", new Object[] {_dialog}));} -RDebugUtils.currentLine=54853632; - //BA.debugLineNum = 54853632;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; -RDebugUtils.currentLine=54853633; - //BA.debugLineNum = 54853633;BA.debugLine="Return mBase"; -if (true) return __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ; -RDebugUtils.currentLine=54853634; - //BA.debugLineNum = 54853634;BA.debugLine="End Sub"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Private xui As XUI"; +_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); + //BA.debugLineNum = 3;BA.debugLine="Public mBase As B4XView"; +_mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 4;BA.debugLine="Public CustomListView1 As CustomListView"; +_customlistview1 = new b4a.example3.customlistview(); + //BA.debugLineNum = 5;BA.debugLine="Public Options As List"; +_options = new anywheresoftware.b4a.objects.collections.List(); + //BA.debugLineNum = 6;BA.debugLine="Public SelectedItem As String"; +_selecteditem = ""; + //BA.debugLineNum = 7;BA.debugLine="Private xDialog As B4XDialog"; +_xdialog = new keymon.lat.medicomed.b4xdialog(); + //BA.debugLineNum = 8;BA.debugLine="Public AllowMultiSelection As Boolean"; +_allowmultiselection = false; + //BA.debugLineNum = 9;BA.debugLine="Public SelectionColor As Int = 0xAA0086FF"; +_selectioncolor = ((int)0xaa0086ff); + //BA.debugLineNum = 10;BA.debugLine="Public SelectedItems As List"; +_selecteditems = new anywheresoftware.b4a.objects.collections.List(); + //BA.debugLineNum = 11;BA.debugLine="Public MultiSelectionMinimum As Int = 0"; +_multiselectionminimum = (int) (0); + //BA.debugLineNum = 12;BA.debugLine="End Sub"; +return ""; +} +public String _customlistview1_itemclick(int _index,Object _value) throws Exception{ +b4a.example3.customlistview._clvitem _item = null; + //BA.debugLineNum = 76;BA.debugLine="Private Sub CustomListView1_ItemClick (Index As In"; + //BA.debugLineNum = 77;BA.debugLine="If Value = \"\" Then Return"; +if ((_value).equals((Object)(""))) { +if (true) return "";}; + //BA.debugLineNum = 78;BA.debugLine="If AllowMultiSelection Then"; +if (_allowmultiselection) { + //BA.debugLineNum = 79;BA.debugLine="Dim Item As CLVItem = CustomListView1.GetRawList"; +_item = _customlistview1._getrawlistitem(_index); + //BA.debugLineNum = 80;BA.debugLine="SelectItem (Item, True)"; +_selectitem(_item,__c.True); + }else { + //BA.debugLineNum = 82;BA.debugLine="SelectedItem = Value"; +_selecteditem = BA.ObjectToString(_value); + //BA.debugLineNum = 83;BA.debugLine="SelectedItems.Clear"; +_selecteditems.Clear(); + //BA.debugLineNum = 84;BA.debugLine="SelectedItems.Add(Value)"; +_selecteditems.Add(_value); + //BA.debugLineNum = 85;BA.debugLine="xDialog.Close(xui.DialogResponse_Positive)"; +_xdialog._close /*boolean*/ (_xui.DialogResponse_Positive); + }; + //BA.debugLineNum = 87;BA.debugLine="End Sub"; +return ""; +} +public String _dialogclosed(int _result) throws Exception{ + //BA.debugLineNum = 89;BA.debugLine="Private Sub DialogClosed(Result As Int) 'ignore"; + //BA.debugLineNum = 91;BA.debugLine="End Sub"; +return ""; +} +public anywheresoftware.b4a.objects.B4XViewWrapper _getpanel(keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ + //BA.debugLineNum = 37;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; + //BA.debugLineNum = 38;BA.debugLine="Return mBase"; +if (true) return _mbase; + //BA.debugLineNum = 39;BA.debugLine="End Sub"; return null; } -public void _show(keymon.lat.medicomed.b4xlisttemplate __ref,keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ -RDebugUtils.currentModule="b4xlisttemplate"; -if (Debug.shouldDelegate(ba, "show", true)) - {Debug.delegate(ba, "show", new Object[] {_dialog}); return;} -ResumableSub_Show rsub = new ResumableSub_Show(this,__ref,_dialog); +public String _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 14;BA.debugLine="Public Sub Initialize"; + //BA.debugLineNum = 15;BA.debugLine="mBase = xui.CreatePanel(\"mBase\")"; +_mbase = _xui.CreatePanel(ba,"mBase"); + //BA.debugLineNum = 16;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, 300dip, 300dip)"; +_mbase.SetLayoutAnimated((int) (0),(int) (0),(int) (0),__c.DipToCurrent((int) (300)),__c.DipToCurrent((int) (300))); + //BA.debugLineNum = 17;BA.debugLine="mBase.LoadLayout(\"ListTemplate\")"; +_mbase.LoadLayout("ListTemplate",ba); + //BA.debugLineNum = 18;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0,"; +_mbase.SetColorAndBorder(_xui.Color_Transparent,(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 19;BA.debugLine="CustomListView1.sv.SetColorAndBorder(xui.Color_Tr"; +_customlistview1._sv.SetColorAndBorder(_xui.Color_Transparent,(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 20;BA.debugLine="CustomListView1.DefaultTextBackgroundColor = 0xFF"; +_customlistview1._defaulttextbackgroundcolor = ((int)0xff555555); + //BA.debugLineNum = 21;BA.debugLine="CustomListView1.DefaultTextColor = xui.Color_Whit"; +_customlistview1._defaulttextcolor = _xui.Color_White; + //BA.debugLineNum = 26;BA.debugLine="Options.Initialize"; +_options.Initialize(); + //BA.debugLineNum = 27;BA.debugLine="SelectedItems.Initialize"; +_selecteditems.Initialize(); + //BA.debugLineNum = 28;BA.debugLine="End Sub"; +return ""; +} +public String _resize(int _width,int _height) throws Exception{ + //BA.debugLineNum = 31;BA.debugLine="Public Sub Resize(Width As Int, Height As Int)"; + //BA.debugLineNum = 32;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, Width, Height)"; +_mbase.SetLayoutAnimated((int) (0),(int) (0),(int) (0),_width,_height); + //BA.debugLineNum = 33;BA.debugLine="CustomListView1.Base_Resize(Width, Height)"; +_customlistview1._base_resize(_width,_height); + //BA.debugLineNum = 34;BA.debugLine="End Sub"; +return ""; +} +public String _selectitem(b4a.example3.customlistview._clvitem _item,boolean _toggle) throws Exception{ +int _index = 0; +boolean _selected = false; + //BA.debugLineNum = 59;BA.debugLine="Private Sub SelectItem (Item As CLVItem, Toggle As"; + //BA.debugLineNum = 60;BA.debugLine="Dim index As Int = SelectedItems.IndexOf(Item.Val"; +_index = _selecteditems.IndexOf(_item.Value); + //BA.debugLineNum = 61;BA.debugLine="Dim Selected As Boolean = index > -1"; +_selected = _index>-1; + //BA.debugLineNum = 62;BA.debugLine="If Toggle Then Selected = Not(Selected)"; +if (_toggle) { +_selected = __c.Not(_selected);}; + //BA.debugLineNum = 63;BA.debugLine="If Selected Then"; +if (_selected) { + //BA.debugLineNum = 64;BA.debugLine="If Not(Toggle) Then Item.Panel.Color = Selection"; +if (__c.Not(_toggle)) { +_item.Panel.setColor(_selectioncolor);}; + //BA.debugLineNum = 65;BA.debugLine="Item.Color = CustomListView1.DefaultTextBackgrou"; +_item.Color = _customlistview1._defaulttextbackgroundcolor; + //BA.debugLineNum = 66;BA.debugLine="If index = -1 Then SelectedItems.Add(Item.Value)"; +if (_index==-1) { +_selecteditems.Add(_item.Value);}; + }else { + //BA.debugLineNum = 68;BA.debugLine="Item.Color = SelectionColor"; +_item.Color = _selectioncolor; + //BA.debugLineNum = 69;BA.debugLine="If Not(Toggle) Then Item.Panel.Color = CustomLis"; +if (__c.Not(_toggle)) { +_item.Panel.setColor(_customlistview1._defaulttextbackgroundcolor);}; + //BA.debugLineNum = 70;BA.debugLine="If index > -1 Then SelectedItems.RemoveAt(index)"; +if (_index>-1) { +_selecteditems.RemoveAt(_index);}; + }; + //BA.debugLineNum = 72;BA.debugLine="xDialog.SetButtonState(xui.DialogResponse_Positiv"; +_xdialog._setbuttonstate /*String*/ (_xui.DialogResponse_Positive,_selecteditems.getSize()>=_multiselectionminimum); + //BA.debugLineNum = 73;BA.debugLine="End Sub"; +return ""; +} +public void _show(keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ +ResumableSub_Show rsub = new ResumableSub_Show(this,_dialog); rsub.resume(ba, null); } public static class ResumableSub_Show extends BA.ResumableSub { -public ResumableSub_Show(keymon.lat.medicomed.b4xlisttemplate parent,keymon.lat.medicomed.b4xlisttemplate __ref,keymon.lat.medicomed.b4xdialog _dialog) { +public ResumableSub_Show(keymon.lat.medicomed.b4xlisttemplate parent,keymon.lat.medicomed.b4xdialog _dialog) { this.parent = parent; -this.__ref = __ref; this._dialog = _dialog; -this.__ref = parent; } -keymon.lat.medicomed.b4xlisttemplate __ref; keymon.lat.medicomed.b4xlisttemplate parent; keymon.lat.medicomed.b4xdialog _dialog; Object _opt = null; @@ -95,7 +199,6 @@ int limit8; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="b4xlisttemplate"; while (true) { switch (state) { @@ -105,20 +208,17 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=54919169; - //BA.debugLineNum = 54919169;BA.debugLine="xDialog = Dialog"; -__ref._xdialog /*keymon.lat.medicomed.b4xdialog*/ = _dialog; -RDebugUtils.currentLine=54919170; - //BA.debugLineNum = 54919170;BA.debugLine="CustomListView1.Clear"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._clear(); -RDebugUtils.currentLine=54919171; - //BA.debugLineNum = 54919171;BA.debugLine="For Each opt As Object In Options"; + //BA.debugLineNum = 42;BA.debugLine="xDialog = Dialog"; +parent._xdialog = _dialog; + //BA.debugLineNum = 43;BA.debugLine="CustomListView1.Clear"; +parent._customlistview1._clear(); + //BA.debugLineNum = 44;BA.debugLine="For Each opt As Object In Options"; if (true) break; case 1: //for this.state = 4; -group3 = __ref._options /*anywheresoftware.b4a.objects.collections.List*/ ; +group3 = parent._options; index3 = 0; groupLen3 = group3.getSize(); this.state = 12; @@ -141,43 +241,39 @@ if (true) break; case 3: //C this.state = 13; -RDebugUtils.currentLine=54919172; - //BA.debugLineNum = 54919172;BA.debugLine="CustomListView1.AddTextItem(opt, opt)"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._addtextitem(_opt,_opt); + //BA.debugLineNum = 45;BA.debugLine="CustomListView1.AddTextItem(opt, opt)"; +parent._customlistview1._addtextitem(_opt,_opt); if (true) break; if (true) break; ; -RDebugUtils.currentLine=54919174; - //BA.debugLineNum = 54919174;BA.debugLine="If AllowMultiSelection Then"; + //BA.debugLineNum = 47;BA.debugLine="If AllowMultiSelection Then"; case 4: //if this.state = 11; -if (__ref._allowmultiselection /*boolean*/ ) { +if (parent._allowmultiselection) { this.state = 6; }if (true) break; case 6: //C this.state = 7; -RDebugUtils.currentLine=54919175; - //BA.debugLineNum = 54919175;BA.debugLine="Sleep(20)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "b4xlisttemplate", "show"),(int) (20)); + //BA.debugLineNum = 48;BA.debugLine="Sleep(20)"; +parent.__c.Sleep(ba,this,(int) (20)); this.state = 14; return; case 14: //C this.state = 7; ; -RDebugUtils.currentLine=54919176; - //BA.debugLineNum = 54919176;BA.debugLine="For i = 0 To CustomListView1.Size - 1"; + //BA.debugLineNum = 49;BA.debugLine="For i = 0 To CustomListView1.Size - 1"; if (true) break; case 7: //for this.state = 10; step8 = 1; -limit8 = (int) (__ref._customlistview1 /*b4a.example3.customlistview*/ ._getsize()-1); +limit8 = (int) (parent._customlistview1._getsize()-1); _i = (int) (0) ; this.state = 15; if (true) break; @@ -197,12 +293,10 @@ if (true) break; case 9: //C this.state = 16; -RDebugUtils.currentLine=54919177; - //BA.debugLineNum = 54919177;BA.debugLine="Dim item As CLVItem = CustomListView1.GetRawLis"; -_item = __ref._customlistview1 /*b4a.example3.customlistview*/ ._getrawlistitem(_i); -RDebugUtils.currentLine=54919178; - //BA.debugLineNum = 54919178;BA.debugLine="SelectItem (item, False)"; -__ref._selectitem /*String*/ (null,_item,parent.__c.False); + //BA.debugLineNum = 50;BA.debugLine="Dim item As CLVItem = CustomListView1.GetRawLis"; +_item = parent._customlistview1._getrawlistitem(_i); + //BA.debugLineNum = 51;BA.debugLine="SelectItem (item, False)"; +parent._selectitem(_item,parent.__c.False); if (true) break; if (true) break; @@ -216,216 +310,23 @@ case 11: //C this.state = -1; ; -RDebugUtils.currentLine=54919181; - //BA.debugLineNum = 54919181;BA.debugLine="XUIViewsUtils.AddStubToCLVIfNeeded(CustomListView"; -parent._xuiviewsutils._addstubtoclvifneeded /*String*/ (ba,__ref._customlistview1 /*b4a.example3.customlistview*/ ,__ref._customlistview1 /*b4a.example3.customlistview*/ ._defaulttextbackgroundcolor); -RDebugUtils.currentLine=54919182; - //BA.debugLineNum = 54919182;BA.debugLine="SelectedItem = \"\""; -__ref._selecteditem /*String*/ = ""; -RDebugUtils.currentLine=54919184; - //BA.debugLineNum = 54919184;BA.debugLine="End Sub"; + //BA.debugLineNum = 54;BA.debugLine="XUIViewsUtils.AddStubToCLVIfNeeded(CustomListView"; +parent._xuiviewsutils._addstubtoclvifneeded /*String*/ (ba,parent._customlistview1,parent._customlistview1._defaulttextbackgroundcolor); + //BA.debugLineNum = 55;BA.debugLine="SelectedItem = \"\""; +parent._selecteditem = ""; + //BA.debugLineNum = 57;BA.debugLine="End Sub"; if (true) break; } } } } -public String _dialogclosed(keymon.lat.medicomed.b4xlisttemplate __ref,int _result) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xlisttemplate"; -if (Debug.shouldDelegate(ba, "dialogclosed", true)) - {return ((String) Debug.delegate(ba, "dialogclosed", new Object[] {_result}));} -RDebugUtils.currentLine=55115776; - //BA.debugLineNum = 55115776;BA.debugLine="Private Sub DialogClosed(Result As Int) 'ignore"; -RDebugUtils.currentLine=55115778; - //BA.debugLineNum = 55115778;BA.debugLine="End Sub"; -return ""; +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +if (BA.fastSubCompare(sub, "DIALOGCLOSED")) + return _dialogclosed(((Number)args[0]).intValue()); +if (BA.fastSubCompare(sub, "GETPANEL")) + return _getpanel((keymon.lat.medicomed.b4xdialog) args[0]); +return BA.SubDelegator.SubNotFound; } -public String _class_globals(keymon.lat.medicomed.b4xlisttemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xlisttemplate"; -RDebugUtils.currentLine=54657024; - //BA.debugLineNum = 54657024;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=54657025; - //BA.debugLineNum = 54657025;BA.debugLine="Private xui As XUI"; -_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=54657026; - //BA.debugLineNum = 54657026;BA.debugLine="Public mBase As B4XView"; -_mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=54657027; - //BA.debugLineNum = 54657027;BA.debugLine="Public CustomListView1 As CustomListView"; -_customlistview1 = new b4a.example3.customlistview(); -RDebugUtils.currentLine=54657028; - //BA.debugLineNum = 54657028;BA.debugLine="Public Options As List"; -_options = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=54657029; - //BA.debugLineNum = 54657029;BA.debugLine="Public SelectedItem As String"; -_selecteditem = ""; -RDebugUtils.currentLine=54657030; - //BA.debugLineNum = 54657030;BA.debugLine="Private xDialog As B4XDialog"; -_xdialog = new keymon.lat.medicomed.b4xdialog(); -RDebugUtils.currentLine=54657031; - //BA.debugLineNum = 54657031;BA.debugLine="Public AllowMultiSelection As Boolean"; -_allowmultiselection = false; -RDebugUtils.currentLine=54657032; - //BA.debugLineNum = 54657032;BA.debugLine="Public SelectionColor As Int = 0xAA0086FF"; -_selectioncolor = ((int)0xaa0086ff); -RDebugUtils.currentLine=54657033; - //BA.debugLineNum = 54657033;BA.debugLine="Public SelectedItems As List"; -_selecteditems = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=54657034; - //BA.debugLineNum = 54657034;BA.debugLine="Public MultiSelectionMinimum As Int = 0"; -_multiselectionminimum = (int) (0); -RDebugUtils.currentLine=54657035; - //BA.debugLineNum = 54657035;BA.debugLine="End Sub"; -return ""; } -public String _customlistview1_itemclick(keymon.lat.medicomed.b4xlisttemplate __ref,int _index,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xlisttemplate"; -if (Debug.shouldDelegate(ba, "customlistview1_itemclick", true)) - {return ((String) Debug.delegate(ba, "customlistview1_itemclick", new Object[] {_index,_value}));} -b4a.example3.customlistview._clvitem _item = null; -RDebugUtils.currentLine=55050240; - //BA.debugLineNum = 55050240;BA.debugLine="Private Sub CustomListView1_ItemClick (Index As In"; -RDebugUtils.currentLine=55050241; - //BA.debugLineNum = 55050241;BA.debugLine="If Value = \"\" Then Return"; -if ((_value).equals((Object)(""))) { -if (true) return "";}; -RDebugUtils.currentLine=55050242; - //BA.debugLineNum = 55050242;BA.debugLine="If AllowMultiSelection Then"; -if (__ref._allowmultiselection /*boolean*/ ) { -RDebugUtils.currentLine=55050243; - //BA.debugLineNum = 55050243;BA.debugLine="Dim Item As CLVItem = CustomListView1.GetRawList"; -_item = __ref._customlistview1 /*b4a.example3.customlistview*/ ._getrawlistitem(_index); -RDebugUtils.currentLine=55050244; - //BA.debugLineNum = 55050244;BA.debugLine="SelectItem (Item, True)"; -__ref._selectitem /*String*/ (null,_item,__c.True); - }else { -RDebugUtils.currentLine=55050246; - //BA.debugLineNum = 55050246;BA.debugLine="SelectedItem = Value"; -__ref._selecteditem /*String*/ = BA.ObjectToString(_value); -RDebugUtils.currentLine=55050247; - //BA.debugLineNum = 55050247;BA.debugLine="SelectedItems.Clear"; -__ref._selecteditems /*anywheresoftware.b4a.objects.collections.List*/ .Clear(); -RDebugUtils.currentLine=55050248; - //BA.debugLineNum = 55050248;BA.debugLine="SelectedItems.Add(Value)"; -__ref._selecteditems /*anywheresoftware.b4a.objects.collections.List*/ .Add(_value); -RDebugUtils.currentLine=55050249; - //BA.debugLineNum = 55050249;BA.debugLine="xDialog.Close(xui.DialogResponse_Positive)"; -__ref._xdialog /*keymon.lat.medicomed.b4xdialog*/ ._close /*boolean*/ (null,__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .DialogResponse_Positive); - }; -RDebugUtils.currentLine=55050251; - //BA.debugLineNum = 55050251;BA.debugLine="End Sub"; -return ""; -} -public String _selectitem(keymon.lat.medicomed.b4xlisttemplate __ref,b4a.example3.customlistview._clvitem _item,boolean _toggle) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xlisttemplate"; -if (Debug.shouldDelegate(ba, "selectitem", true)) - {return ((String) Debug.delegate(ba, "selectitem", new Object[] {_item,_toggle}));} -int _index = 0; -boolean _selected = false; -RDebugUtils.currentLine=54984704; - //BA.debugLineNum = 54984704;BA.debugLine="Private Sub SelectItem (Item As CLVItem, Toggle As"; -RDebugUtils.currentLine=54984705; - //BA.debugLineNum = 54984705;BA.debugLine="Dim index As Int = SelectedItems.IndexOf(Item.Val"; -_index = __ref._selecteditems /*anywheresoftware.b4a.objects.collections.List*/ .IndexOf(_item.Value); -RDebugUtils.currentLine=54984706; - //BA.debugLineNum = 54984706;BA.debugLine="Dim Selected As Boolean = index > -1"; -_selected = _index>-1; -RDebugUtils.currentLine=54984707; - //BA.debugLineNum = 54984707;BA.debugLine="If Toggle Then Selected = Not(Selected)"; -if (_toggle) { -_selected = __c.Not(_selected);}; -RDebugUtils.currentLine=54984708; - //BA.debugLineNum = 54984708;BA.debugLine="If Selected Then"; -if (_selected) { -RDebugUtils.currentLine=54984709; - //BA.debugLineNum = 54984709;BA.debugLine="If Not(Toggle) Then Item.Panel.Color = Selection"; -if (__c.Not(_toggle)) { -_item.Panel.setColor(__ref._selectioncolor /*int*/ );}; -RDebugUtils.currentLine=54984710; - //BA.debugLineNum = 54984710;BA.debugLine="Item.Color = CustomListView1.DefaultTextBackgrou"; -_item.Color = __ref._customlistview1 /*b4a.example3.customlistview*/ ._defaulttextbackgroundcolor; -RDebugUtils.currentLine=54984711; - //BA.debugLineNum = 54984711;BA.debugLine="If index = -1 Then SelectedItems.Add(Item.Value)"; -if (_index==-1) { -__ref._selecteditems /*anywheresoftware.b4a.objects.collections.List*/ .Add(_item.Value);}; - }else { -RDebugUtils.currentLine=54984713; - //BA.debugLineNum = 54984713;BA.debugLine="Item.Color = SelectionColor"; -_item.Color = __ref._selectioncolor /*int*/ ; -RDebugUtils.currentLine=54984714; - //BA.debugLineNum = 54984714;BA.debugLine="If Not(Toggle) Then Item.Panel.Color = CustomLis"; -if (__c.Not(_toggle)) { -_item.Panel.setColor(__ref._customlistview1 /*b4a.example3.customlistview*/ ._defaulttextbackgroundcolor);}; -RDebugUtils.currentLine=54984715; - //BA.debugLineNum = 54984715;BA.debugLine="If index > -1 Then SelectedItems.RemoveAt(index)"; -if (_index>-1) { -__ref._selecteditems /*anywheresoftware.b4a.objects.collections.List*/ .RemoveAt(_index);}; - }; -RDebugUtils.currentLine=54984717; - //BA.debugLineNum = 54984717;BA.debugLine="xDialog.SetButtonState(xui.DialogResponse_Positiv"; -__ref._xdialog /*keymon.lat.medicomed.b4xdialog*/ ._setbuttonstate /*String*/ (null,__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .DialogResponse_Positive,__ref._selecteditems /*anywheresoftware.b4a.objects.collections.List*/ .getSize()>=__ref._multiselectionminimum /*int*/ ); -RDebugUtils.currentLine=54984718; - //BA.debugLineNum = 54984718;BA.debugLine="End Sub"; -return ""; -} -public String _initialize(keymon.lat.medicomed.b4xlisttemplate __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="b4xlisttemplate"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=54722560; - //BA.debugLineNum = 54722560;BA.debugLine="Public Sub Initialize"; -RDebugUtils.currentLine=54722561; - //BA.debugLineNum = 54722561;BA.debugLine="mBase = xui.CreatePanel(\"mBase\")"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,"mBase"); -RDebugUtils.currentLine=54722562; - //BA.debugLineNum = 54722562;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, 300dip, 300dip)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),__c.DipToCurrent((int) (300)),__c.DipToCurrent((int) (300))); -RDebugUtils.currentLine=54722563; - //BA.debugLineNum = 54722563;BA.debugLine="mBase.LoadLayout(\"ListTemplate\")"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .LoadLayout("ListTemplate",ba); -RDebugUtils.currentLine=54722564; - //BA.debugLineNum = 54722564;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0,"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetColorAndBorder(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent,(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=54722565; - //BA.debugLineNum = 54722565;BA.debugLine="CustomListView1.sv.SetColorAndBorder(xui.Color_Tr"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._sv.SetColorAndBorder(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent,(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=54722566; - //BA.debugLineNum = 54722566;BA.debugLine="CustomListView1.DefaultTextBackgroundColor = 0xFF"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._defaulttextbackgroundcolor = ((int)0xff555555); -RDebugUtils.currentLine=54722567; - //BA.debugLineNum = 54722567;BA.debugLine="CustomListView1.DefaultTextColor = xui.Color_Whit"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._defaulttextcolor = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_White; -RDebugUtils.currentLine=54722572; - //BA.debugLineNum = 54722572;BA.debugLine="Options.Initialize"; -__ref._options /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=54722573; - //BA.debugLineNum = 54722573;BA.debugLine="SelectedItems.Initialize"; -__ref._selecteditems /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=54722574; - //BA.debugLineNum = 54722574;BA.debugLine="End Sub"; -return ""; -} -public String _resize(keymon.lat.medicomed.b4xlisttemplate __ref,int _width,int _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xlisttemplate"; -if (Debug.shouldDelegate(ba, "resize", true)) - {return ((String) Debug.delegate(ba, "resize", new Object[] {_width,_height}));} -RDebugUtils.currentLine=54788096; - //BA.debugLineNum = 54788096;BA.debugLine="Public Sub Resize(Width As Int, Height As Int)"; -RDebugUtils.currentLine=54788097; - //BA.debugLineNum = 54788097;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, Width, Height)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),_width,_height); -RDebugUtils.currentLine=54788098; - //BA.debugLineNum = 54788098;BA.debugLine="CustomListView1.Base_Resize(Width, Height)"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._base_resize(_width,_height); -RDebugUtils.currentLine=54788099; - //BA.debugLineNum = 54788099;BA.debugLine="End Sub"; -return ""; -} -} \ No newline at end of file diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xloadingindicator.java b/B4A/Objects/src/keymon/lat/medicomed/b4xloadingindicator.java index 936258f..67c6a23 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xloadingindicator.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xloadingindicator.java @@ -10,7 +10,7 @@ public class b4xloadingindicator extends B4AClass.ImplB4AClass implements BA.Sub private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xloadingindicator"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xloadingindicator"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xloadingindicator extends B4AClass.ImplB4AClass implements BA.Sub 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.keywords.Common __c = null; public String _meventname = ""; public Object _mcallback = null; public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null; @@ -53,37 +46,274 @@ 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 _base_resize(keymon.lat.medicomed.b4xloadingindicator __ref,double _width,double _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xloadingindicator"; -if (Debug.shouldDelegate(ba, "base_resize", true)) - {return ((String) Debug.delegate(ba, "base_resize", new Object[] {_width,_height}));} -RDebugUtils.currentLine=55377920; - //BA.debugLineNum = 55377920;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; -RDebugUtils.currentLine=55377921; - //BA.debugLineNum = 55377921;BA.debugLine="cvs.Resize(Width, Height)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Resize((float) (_width),(float) (_height)); -RDebugUtils.currentLine=55377922; - //BA.debugLineNum = 55377922;BA.debugLine="MainLoop"; -__ref._mainloop /*void*/ (null); -RDebugUtils.currentLine=55377923; - //BA.debugLineNum = 55377923;BA.debugLine="End Sub"; +public String _base_resize(double _width,double _height) throws Exception{ + //BA.debugLineNum = 37;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; + //BA.debugLineNum = 38;BA.debugLine="cvs.Resize(Width, Height)"; +_cvs.Resize((float) (_width),(float) (_height)); + //BA.debugLineNum = 39;BA.debugLine="MainLoop"; +_mainloop(); + //BA.debugLineNum = 40;BA.debugLine="End Sub"; return ""; } -public void _mainloop(keymon.lat.medicomed.b4xloadingindicator __ref) throws Exception{ -RDebugUtils.currentModule="b4xloadingindicator"; -if (Debug.shouldDelegate(ba, "mainloop", true)) - {Debug.delegate(ba, "mainloop", null); return;} -ResumableSub_MainLoop rsub = new ResumableSub_MainLoop(this,__ref); +public String _class_globals() throws Exception{ + //BA.debugLineNum = 7;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 8;BA.debugLine="Private mEventName As String 'ignore"; +_meventname = ""; + //BA.debugLineNum = 9;BA.debugLine="Private mCallBack As Object 'ignore"; +_mcallback = new Object(); + //BA.debugLineNum = 10;BA.debugLine="Public mBase As B4XView 'ignore"; +_mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 11;BA.debugLine="Private xui As XUI 'ignore"; +_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); + //BA.debugLineNum = 12;BA.debugLine="Private clr As Int"; +_clr = 0; + //BA.debugLineNum = 13;BA.debugLine="Private index As Int"; +_index = 0; + //BA.debugLineNum = 14;BA.debugLine="Private cvs As B4XCanvas"; +_cvs = new anywheresoftware.b4a.objects.B4XCanvas(); + //BA.debugLineNum = 15;BA.debugLine="Private duration As Int"; +_duration = 0; + //BA.debugLineNum = 16;BA.debugLine="Private DrawingSubName As String"; +_drawingsubname = ""; + //BA.debugLineNum = 17;BA.debugLine="Public Tag As Object"; +_tag = new Object(); + //BA.debugLineNum = 18;BA.debugLine="End Sub"; +return ""; +} +public String _designercreateview(Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ +String _style = ""; + //BA.debugLineNum = 26;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; + //BA.debugLineNum = 27;BA.debugLine="mBase = Base"; +_mbase = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); + //BA.debugLineNum = 28;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_tag = _mbase.getTag(); + //BA.debugLineNum = 28;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_mbase.setTag(this); + //BA.debugLineNum = 29;BA.debugLine="clr = xui.PaintOrColorToColor(Props.Get(\"Color\""; +_clr = _xui.PaintOrColorToColor(_props.Get((Object)("Color"))); + //BA.debugLineNum = 30;BA.debugLine="Dim style As String= Props.Get(\"IndicatorStyle\")"; +_style = BA.ObjectToString(_props.Get((Object)("IndicatorStyle"))); + //BA.debugLineNum = 31;BA.debugLine="Dim duration As Int = Props.Get(\"Duration\")"; +_duration = (int)(BA.ObjectToNumber(_props.Get((Object)("Duration")))); + //BA.debugLineNum = 32;BA.debugLine="DrawingSubName = \"Draw_\" & style.Replace(\" \", \"\")"; +_drawingsubname = "Draw_"+_style.replace(" ",""); + //BA.debugLineNum = 33;BA.debugLine="cvs.Initialize(mBase)"; +_cvs.Initialize(_mbase); + //BA.debugLineNum = 34;BA.debugLine="MainLoop"; +_mainloop(); + //BA.debugLineNum = 35;BA.debugLine="End Sub"; +return ""; +} +public String _draw_arc1(float _progress) throws Exception{ +anywheresoftware.b4a.objects.B4XCanvas.B4XPath _p = null; +float _r = 0f; + //BA.debugLineNum = 105;BA.debugLine="Private Sub Draw_Arc1 (Progress As Float)"; + //BA.debugLineNum = 106;BA.debugLine="Dim p As B4XPath"; +_p = new anywheresoftware.b4a.objects.B4XCanvas.B4XPath(); + //BA.debugLineNum = 107;BA.debugLine="Dim r As Float = cvs.TargetRect.CenterX - 5dip"; +_r = (float) (_cvs.getTargetRect().getCenterX()-__c.DipToCurrent((int) (5))); + //BA.debugLineNum = 108;BA.debugLine="If Progress < 0.5 Then"; +if (_progress<0.5) { + //BA.debugLineNum = 109;BA.debugLine="p.InitializeArc(cvs.TargetRect.CenterX, cvs.Targ"; +_p.InitializeArc(_cvs.getTargetRect().getCenterX(),_cvs.getTargetRect().getCenterY(),_r,(float) (-90),(float) (_progress*2*360)); + }else { + //BA.debugLineNum = 111;BA.debugLine="p.InitializeArc(cvs.TargetRect.CenterX, cvs.Targ"; +_p.InitializeArc(_cvs.getTargetRect().getCenterX(),_cvs.getTargetRect().getCenterY(),_r,(float) (-90),(float) (-(1-_progress)*2*360)); + }; + //BA.debugLineNum = 113;BA.debugLine="cvs.ClipPath(p)"; +_cvs.ClipPath(_p); + //BA.debugLineNum = 114;BA.debugLine="cvs.DrawRect(cvs.TargetRect, clr, True, 0)"; +_cvs.DrawRect(_cvs.getTargetRect(),_clr,__c.True,(float) (0)); + //BA.debugLineNum = 115;BA.debugLine="cvs.RemoveClip"; +_cvs.RemoveClip(); + //BA.debugLineNum = 116;BA.debugLine="End Sub"; +return ""; +} +public String _draw_arc2(float _progress) throws Exception{ +anywheresoftware.b4a.objects.B4XCanvas.B4XPath _p = null; +float _r = 0f; + //BA.debugLineNum = 118;BA.debugLine="Private Sub Draw_Arc2 (Progress As Float)"; + //BA.debugLineNum = 119;BA.debugLine="Dim p As B4XPath"; +_p = new anywheresoftware.b4a.objects.B4XCanvas.B4XPath(); + //BA.debugLineNum = 120;BA.debugLine="Dim r As Float = cvs.TargetRect.CenterX - 5dip"; +_r = (float) (_cvs.getTargetRect().getCenterX()-__c.DipToCurrent((int) (5))); + //BA.debugLineNum = 121;BA.debugLine="If Progress < 0.5 Then"; +if (_progress<0.5) { + //BA.debugLineNum = 122;BA.debugLine="p.InitializeArc(cvs.TargetRect.CenterX, cvs.Targ"; +_p.InitializeArc(_cvs.getTargetRect().getCenterX(),_cvs.getTargetRect().getCenterY(),_r,(float) (-90),(float) (_progress*2*360)); + }else { + //BA.debugLineNum = 124;BA.debugLine="p.InitializeArc(cvs.TargetRect.CenterX, cvs.Targ"; +_p.InitializeArc(_cvs.getTargetRect().getCenterX(),_cvs.getTargetRect().getCenterY(),_r,(float) (-90),(float) (360-(_progress-0.5)*2*360)); + }; + //BA.debugLineNum = 126;BA.debugLine="cvs.ClipPath(p)"; +_cvs.ClipPath(_p); + //BA.debugLineNum = 127;BA.debugLine="cvs.DrawRect(cvs.TargetRect, clr, True, 0)"; +_cvs.DrawRect(_cvs.getTargetRect(),_clr,__c.True,(float) (0)); + //BA.debugLineNum = 128;BA.debugLine="cvs.RemoveClip"; +_cvs.RemoveClip(); + //BA.debugLineNum = 129;BA.debugLine="End Sub"; +return ""; +} +public String _draw_fivelines1(float _progress) throws Exception{ +int _minr = 0; +int _maxr = 0; +int _dx = 0; +int _i = 0; +float _r = 0f; + //BA.debugLineNum = 95;BA.debugLine="Private Sub Draw_FiveLines1(Progress As Float)"; + //BA.debugLineNum = 96;BA.debugLine="Dim MinR As Int = 10dip"; +_minr = __c.DipToCurrent((int) (10)); + //BA.debugLineNum = 97;BA.debugLine="Dim MaxR As Int = cvs.TargetRect.Height / 2"; +_maxr = (int) (_cvs.getTargetRect().getHeight()/(double)2); + //BA.debugLineNum = 98;BA.debugLine="Dim dx As Int = (cvs.TargetRect.Width - 2dip) / 5"; +_dx = (int) ((_cvs.getTargetRect().getWidth()-__c.DipToCurrent((int) (2)))/(double)5); + //BA.debugLineNum = 99;BA.debugLine="For i = 0 To 4"; +{ +final int step4 = 1; +final int limit4 = (int) (4); +_i = (int) (0) ; +for (;_i <= limit4 ;_i = _i + step4 ) { + //BA.debugLineNum = 100;BA.debugLine="Dim r As Float = MinR + MaxR / 2 + MaxR / 2 * Si"; +_r = (float) (_minr+_maxr/(double)2+_maxr/(double)2*__c.SinD(_progress*360-30*_i)); + //BA.debugLineNum = 101;BA.debugLine="cvs.DrawLine(2dip + i * dx, cvs.TargetRect.Cente"; +_cvs.DrawLine((float) (__c.DipToCurrent((int) (2))+_i*_dx),(float) (_cvs.getTargetRect().getCenterY()-_r),(float) (__c.DipToCurrent((int) (2))+_i*_dx),(float) (_cvs.getTargetRect().getCenterY()+_r),_clr,(float) (__c.DipToCurrent((int) (4)))); + } +}; + //BA.debugLineNum = 103;BA.debugLine="End Sub"; +return ""; +} +public String _draw_pacman(float _progress) throws Exception{ +int _dotr = 0; +anywheresoftware.b4a.objects.B4XCanvas.B4XPath _p = null; +int _angle = 0; +int _cx = 0; +int _cy = 0; +int _r = 0; + //BA.debugLineNum = 131;BA.debugLine="Private Sub Draw_PacMan(Progress As Float)"; + //BA.debugLineNum = 132;BA.debugLine="Dim DotR As Int = 5dip"; +_dotr = __c.DipToCurrent((int) (5)); + //BA.debugLineNum = 133;BA.debugLine="cvs.DrawCircle(cvs.TargetRect.Width - DotR - Prog"; +_cvs.DrawCircle((float) (_cvs.getTargetRect().getWidth()-_dotr-_progress*(_cvs.getTargetRect().getCenterX()-__c.DipToCurrent((int) (10)))),_cvs.getTargetRect().getCenterY(),(float) (_dotr),_setalpha(_clr,(int) (255-200*_progress)),__c.True,(float) (0)); + //BA.debugLineNum = 134;BA.debugLine="Dim p As B4XPath"; +_p = new anywheresoftware.b4a.objects.B4XCanvas.B4XPath(); + //BA.debugLineNum = 135;BA.debugLine="Dim angle As Int = 70 * SinD(Progress * 180)"; +_angle = (int) (70*__c.SinD(_progress*180)); + //BA.debugLineNum = 136;BA.debugLine="Dim cx As Int = cvs.TargetRect.CenterX - 5dip"; +_cx = (int) (_cvs.getTargetRect().getCenterX()-__c.DipToCurrent((int) (5))); + //BA.debugLineNum = 137;BA.debugLine="Dim cy As Int = cvs.TargetRect.CenterY"; +_cy = (int) (_cvs.getTargetRect().getCenterY()); + //BA.debugLineNum = 138;BA.debugLine="Dim r As Int = cvs.TargetRect.CenterY - 5dip"; +_r = (int) (_cvs.getTargetRect().getCenterY()-__c.DipToCurrent((int) (5))); + //BA.debugLineNum = 139;BA.debugLine="If angle = 0 Then"; +if (_angle==0) { + //BA.debugLineNum = 140;BA.debugLine="cvs.DrawCircle(cx, cy, r, clr, True, 0)"; +_cvs.DrawCircle((float) (_cx),(float) (_cy),(float) (_r),_clr,__c.True,(float) (0)); + }else { + //BA.debugLineNum = 142;BA.debugLine="p.InitializeArc(cx, cy , r, -angle / 2, -(360-an"; +_p.InitializeArc((float) (_cx),(float) (_cy),(float) (_r),(float) (-_angle/(double)2),(float) (-(360-_angle))); + //BA.debugLineNum = 143;BA.debugLine="cvs.ClipPath(p)"; +_cvs.ClipPath(_p); + //BA.debugLineNum = 144;BA.debugLine="cvs.DrawRect(cvs.TargetRect, clr, True, 0)"; +_cvs.DrawRect(_cvs.getTargetRect(),_clr,__c.True,(float) (0)); + //BA.debugLineNum = 145;BA.debugLine="cvs.RemoveClip"; +_cvs.RemoveClip(); + }; + //BA.debugLineNum = 148;BA.debugLine="End Sub"; +return ""; +} +public String _draw_singlecircle(float _progress) throws Exception{ +int _i = 0; + //BA.debugLineNum = 85;BA.debugLine="Private Sub Draw_SingleCircle(Progress As Float)"; + //BA.debugLineNum = 86;BA.debugLine="For i = 0 To 2"; +{ +final int step1 = 1; +final int limit1 = (int) (2); +_i = (int) (0) ; +for (;_i <= limit1 ;_i = _i + step1 ) { + //BA.debugLineNum = 87;BA.debugLine="cvs.DrawCircle(cvs.TargetRect.CenterX, cvs.Targe"; +_cvs.DrawCircle(_cvs.getTargetRect().getCenterX(),_cvs.getTargetRect().getCenterY(),(float) (_cvs.getTargetRect().getCenterX()*_progress),_setalpha(_clr,(int) (255-255*_progress)),__c.True,(float) (0)); + } +}; + //BA.debugLineNum = 89;BA.debugLine="End Sub"; +return ""; +} +public String _draw_threecircles1(float _progress) throws Exception{ +float _maxr = 0f; +float _r = 0f; +int _i = 0; +int _alpha = 0; + //BA.debugLineNum = 66;BA.debugLine="Private Sub Draw_ThreeCircles1 (Progress As Float)"; + //BA.debugLineNum = 67;BA.debugLine="Dim MaxR As Float = (cvs.TargetRect.Width / 2 - 2"; +_maxr = (float) ((_cvs.getTargetRect().getWidth()/(double)2-__c.DipToCurrent((int) (20)))/(double)2); + //BA.debugLineNum = 68;BA.debugLine="Dim r As Float = 10dip + MaxR + MaxR * Sin(Progre"; +_r = (float) (__c.DipToCurrent((int) (10))+_maxr+_maxr*__c.Sin(_progress*2*__c.cPI)); + //BA.debugLineNum = 69;BA.debugLine="For i = 0 To 2"; +{ +final int step3 = 1; +final int limit3 = (int) (2); +_i = (int) (0) ; +for (;_i <= limit3 ;_i = _i + step3 ) { + //BA.debugLineNum = 70;BA.debugLine="Dim alpha As Int = i * 120 + Progress * 360"; +_alpha = (int) (_i*120+_progress*360); + //BA.debugLineNum = 72;BA.debugLine="cvs.DrawCircle(cvs.TargetRect.CenterX + r * SinD"; +_cvs.DrawCircle((float) (_cvs.getTargetRect().getCenterX()+_r*__c.SinD(_alpha)),(float) (_cvs.getTargetRect().getCenterY()+_r*__c.CosD(_alpha)),(float) (__c.DipToCurrent((int) (7))),_clr,__c.True,(float) (__c.DipToCurrent((int) (1)))); + } +}; + //BA.debugLineNum = 74;BA.debugLine="End Sub"; +return ""; +} +public String _draw_threecircles2(float _progress) throws Exception{ +int _minr = 0; +int _maxr = 0; +int _i = 0; +float _r = 0f; + //BA.debugLineNum = 76;BA.debugLine="Private Sub Draw_ThreeCircles2 (Progress As Float)"; + //BA.debugLineNum = 77;BA.debugLine="Dim MinR As Int = 5dip"; +_minr = __c.DipToCurrent((int) (5)); + //BA.debugLineNum = 78;BA.debugLine="Dim MaxR As Int = cvs.TargetRect.Width / 2 / 3 -"; +_maxr = (int) (_cvs.getTargetRect().getWidth()/(double)2/(double)3-_minr-__c.DipToCurrent((int) (2))); + //BA.debugLineNum = 79;BA.debugLine="For i = 0 To 2"; +{ +final int step3 = 1; +final int limit3 = (int) (2); +_i = (int) (0) ; +for (;_i <= limit3 ;_i = _i + step3 ) { + //BA.debugLineNum = 80;BA.debugLine="Dim r As Float = MinR + MaxR / 2 + MaxR / 2 * Si"; +_r = (float) (_minr+_maxr/(double)2+_maxr/(double)2*__c.SinD(_progress*360-60*_i)); + //BA.debugLineNum = 81;BA.debugLine="cvs.DrawCircle(MaxR + MinR + (MinR + MaxR + 2dip"; +_cvs.DrawCircle((float) (_maxr+_minr+(_minr+_maxr+__c.DipToCurrent((int) (2)))*2*_i),_cvs.getTargetRect().getCenterY(),_r,_clr,__c.True,(float) (0)); + } +}; + //BA.debugLineNum = 83;BA.debugLine="End Sub"; +return ""; +} +public String _hide() throws Exception{ + //BA.debugLineNum = 61;BA.debugLine="Public Sub Hide"; + //BA.debugLineNum = 62;BA.debugLine="mBase.Visible = False"; +_mbase.setVisible(__c.False); + //BA.debugLineNum = 63;BA.debugLine="index = index + 1"; +_index = (int) (_index+1); + //BA.debugLineNum = 64;BA.debugLine="End Sub"; +return ""; +} +public String _initialize(anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 20;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; + //BA.debugLineNum = 21;BA.debugLine="mEventName = EventName"; +_meventname = _eventname; + //BA.debugLineNum = 22;BA.debugLine="mCallBack = Callback"; +_mcallback = _callback; + //BA.debugLineNum = 23;BA.debugLine="End Sub"; +return ""; +} +public void _mainloop() throws Exception{ +ResumableSub_MainLoop rsub = new ResumableSub_MainLoop(this); rsub.resume(ba, null); } public static class ResumableSub_MainLoop extends BA.ResumableSub { -public ResumableSub_MainLoop(keymon.lat.medicomed.b4xloadingindicator parent,keymon.lat.medicomed.b4xloadingindicator __ref) { +public ResumableSub_MainLoop(keymon.lat.medicomed.b4xloadingindicator parent) { this.parent = parent; -this.__ref = __ref; -this.__ref = parent; } -keymon.lat.medicomed.b4xloadingindicator __ref; keymon.lat.medicomed.b4xloadingindicator parent; int _myindex = 0; long _n = 0L; @@ -91,7 +321,6 @@ float _progress = 0f; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="b4xloadingindicator"; while (true) { switch (state) { @@ -101,23 +330,19 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=55443457; - //BA.debugLineNum = 55443457;BA.debugLine="index = index + 1"; -__ref._index /*int*/ = (int) (__ref._index /*int*/ +1); -RDebugUtils.currentLine=55443458; - //BA.debugLineNum = 55443458;BA.debugLine="Dim MyIndex As Int = index"; -_myindex = __ref._index /*int*/ ; -RDebugUtils.currentLine=55443459; - //BA.debugLineNum = 55443459;BA.debugLine="Dim n As Long = DateTime.Now"; + //BA.debugLineNum = 43;BA.debugLine="index = index + 1"; +parent._index = (int) (parent._index+1); + //BA.debugLineNum = 44;BA.debugLine="Dim MyIndex As Int = index"; +_myindex = parent._index; + //BA.debugLineNum = 45;BA.debugLine="Dim n As Long = DateTime.Now"; _n = parent.__c.DateTime.getNow(); -RDebugUtils.currentLine=55443460; - //BA.debugLineNum = 55443460;BA.debugLine="Do While MyIndex = index"; + //BA.debugLineNum = 46;BA.debugLine="Do While MyIndex = index"; if (true) break; case 1: //do while this.state = 4; -while (_myindex==__ref._index /*int*/ ) { +while (_myindex==parent._index) { this.state = 3; if (true) break; } @@ -126,24 +351,18 @@ if (true) break; case 3: //C this.state = 1; -RDebugUtils.currentLine=55443461; - //BA.debugLineNum = 55443461;BA.debugLine="Dim progress As Float = (DateTime.Now - n) / dur"; -_progress = (float) ((parent.__c.DateTime.getNow()-_n)/(double)__ref._duration /*int*/ ); -RDebugUtils.currentLine=55443462; - //BA.debugLineNum = 55443462;BA.debugLine="progress = progress - Floor(progress)"; + //BA.debugLineNum = 47;BA.debugLine="Dim progress As Float = (DateTime.Now - n) / dur"; +_progress = (float) ((parent.__c.DateTime.getNow()-_n)/(double)parent._duration); + //BA.debugLineNum = 48;BA.debugLine="progress = progress - Floor(progress)"; _progress = (float) (_progress-parent.__c.Floor(_progress)); -RDebugUtils.currentLine=55443463; - //BA.debugLineNum = 55443463;BA.debugLine="cvs.ClearRect(cvs.TargetRect)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .ClearRect(__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect()); -RDebugUtils.currentLine=55443464; - //BA.debugLineNum = 55443464;BA.debugLine="CallSub2(Me, DrawingSubName, progress)"; -parent.__c.CallSubDebug2(ba,parent,__ref._drawingsubname /*String*/ ,(Object)(_progress)); -RDebugUtils.currentLine=55443465; - //BA.debugLineNum = 55443465;BA.debugLine="cvs.Invalidate"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Invalidate(); -RDebugUtils.currentLine=55443466; - //BA.debugLineNum = 55443466;BA.debugLine="Sleep(10)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "b4xloadingindicator", "mainloop"),(int) (10)); + //BA.debugLineNum = 49;BA.debugLine="cvs.ClearRect(cvs.TargetRect)"; +parent._cvs.ClearRect(parent._cvs.getTargetRect()); + //BA.debugLineNum = 50;BA.debugLine="CallSub2(Me, DrawingSubName, progress)"; +parent.__c.CallSubNew2(ba,parent,parent._drawingsubname,(Object)(_progress)); + //BA.debugLineNum = 51;BA.debugLine="cvs.Invalidate"; +parent._cvs.Invalidate(); + //BA.debugLineNum = 52;BA.debugLine="Sleep(10)"; +parent.__c.Sleep(ba,this,(int) (10)); this.state = 5; return; case 5: @@ -156,428 +375,33 @@ case 4: //C this.state = -1; ; -RDebugUtils.currentLine=55443468; - //BA.debugLineNum = 55443468;BA.debugLine="End Sub"; + //BA.debugLineNum = 54;BA.debugLine="End Sub"; if (true) break; } } } } -public String _class_globals(keymon.lat.medicomed.b4xloadingindicator __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xloadingindicator"; -RDebugUtils.currentLine=55181312; - //BA.debugLineNum = 55181312;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=55181313; - //BA.debugLineNum = 55181313;BA.debugLine="Private mEventName As String 'ignore"; -_meventname = ""; -RDebugUtils.currentLine=55181314; - //BA.debugLineNum = 55181314;BA.debugLine="Private mCallBack As Object 'ignore"; -_mcallback = new Object(); -RDebugUtils.currentLine=55181315; - //BA.debugLineNum = 55181315;BA.debugLine="Public mBase As B4XView 'ignore"; -_mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=55181316; - //BA.debugLineNum = 55181316;BA.debugLine="Private xui As XUI 'ignore"; -_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=55181317; - //BA.debugLineNum = 55181317;BA.debugLine="Private clr As Int"; -_clr = 0; -RDebugUtils.currentLine=55181318; - //BA.debugLineNum = 55181318;BA.debugLine="Private index As Int"; -_index = 0; -RDebugUtils.currentLine=55181319; - //BA.debugLineNum = 55181319;BA.debugLine="Private cvs As B4XCanvas"; -_cvs = new anywheresoftware.b4a.objects.B4XCanvas(); -RDebugUtils.currentLine=55181320; - //BA.debugLineNum = 55181320;BA.debugLine="Private duration As Int"; -_duration = 0; -RDebugUtils.currentLine=55181321; - //BA.debugLineNum = 55181321;BA.debugLine="Private DrawingSubName As String"; -_drawingsubname = ""; -RDebugUtils.currentLine=55181322; - //BA.debugLineNum = 55181322;BA.debugLine="Public Tag As Object"; -_tag = new Object(); -RDebugUtils.currentLine=55181323; - //BA.debugLineNum = 55181323;BA.debugLine="End Sub"; -return ""; -} -public String _designercreateview(keymon.lat.medicomed.b4xloadingindicator __ref,Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xloadingindicator"; -if (Debug.shouldDelegate(ba, "designercreateview", true)) - {return ((String) Debug.delegate(ba, "designercreateview", new Object[] {_base,_lbl,_props}));} -String _style = ""; -RDebugUtils.currentLine=55312384; - //BA.debugLineNum = 55312384;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; -RDebugUtils.currentLine=55312385; - //BA.debugLineNum = 55312385;BA.debugLine="mBase = Base"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); -RDebugUtils.currentLine=55312386; - //BA.debugLineNum = 55312386;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._tag /*Object*/ = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getTag(); -RDebugUtils.currentLine=55312386; - //BA.debugLineNum = 55312386;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag(this); -RDebugUtils.currentLine=55312387; - //BA.debugLineNum = 55312387;BA.debugLine="clr = xui.PaintOrColorToColor(Props.Get(\"Color\""; -__ref._clr /*int*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor(_props.Get((Object)("Color"))); -RDebugUtils.currentLine=55312388; - //BA.debugLineNum = 55312388;BA.debugLine="Dim style As String= Props.Get(\"IndicatorStyle\")"; -_style = BA.ObjectToString(_props.Get((Object)("IndicatorStyle"))); -RDebugUtils.currentLine=55312389; - //BA.debugLineNum = 55312389;BA.debugLine="Dim duration As Int = Props.Get(\"Duration\")"; -_duration = (int)(BA.ObjectToNumber(_props.Get((Object)("Duration")))); -RDebugUtils.currentLine=55312390; - //BA.debugLineNum = 55312390;BA.debugLine="DrawingSubName = \"Draw_\" & style.Replace(\" \", \"\")"; -__ref._drawingsubname /*String*/ = "Draw_"+_style.replace(" ",""); -RDebugUtils.currentLine=55312391; - //BA.debugLineNum = 55312391;BA.debugLine="cvs.Initialize(mBase)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Initialize(__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ); -RDebugUtils.currentLine=55312392; - //BA.debugLineNum = 55312392;BA.debugLine="MainLoop"; -__ref._mainloop /*void*/ (null); -RDebugUtils.currentLine=55312393; - //BA.debugLineNum = 55312393;BA.debugLine="End Sub"; -return ""; -} -public String _draw_arc1(keymon.lat.medicomed.b4xloadingindicator __ref,float _progress) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xloadingindicator"; -if (Debug.shouldDelegate(ba, "draw_arc1", true)) - {return ((String) Debug.delegate(ba, "draw_arc1", new Object[] {_progress}));} -anywheresoftware.b4a.objects.B4XCanvas.B4XPath _p = null; -float _r = 0f; -RDebugUtils.currentLine=55967744; - //BA.debugLineNum = 55967744;BA.debugLine="Private Sub Draw_Arc1 (Progress As Float)"; -RDebugUtils.currentLine=55967745; - //BA.debugLineNum = 55967745;BA.debugLine="Dim p As B4XPath"; -_p = new anywheresoftware.b4a.objects.B4XCanvas.B4XPath(); -RDebugUtils.currentLine=55967746; - //BA.debugLineNum = 55967746;BA.debugLine="Dim r As Float = cvs.TargetRect.CenterX - 5dip"; -_r = (float) (__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterX()-__c.DipToCurrent((int) (5))); -RDebugUtils.currentLine=55967747; - //BA.debugLineNum = 55967747;BA.debugLine="If Progress < 0.5 Then"; -if (_progress<0.5) { -RDebugUtils.currentLine=55967748; - //BA.debugLineNum = 55967748;BA.debugLine="p.InitializeArc(cvs.TargetRect.CenterX, cvs.Targ"; -_p.InitializeArc(__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterX(),__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterY(),_r,(float) (-90),(float) (_progress*2*360)); - }else { -RDebugUtils.currentLine=55967750; - //BA.debugLineNum = 55967750;BA.debugLine="p.InitializeArc(cvs.TargetRect.CenterX, cvs.Targ"; -_p.InitializeArc(__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterX(),__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterY(),_r,(float) (-90),(float) (-(1-_progress)*2*360)); - }; -RDebugUtils.currentLine=55967752; - //BA.debugLineNum = 55967752;BA.debugLine="cvs.ClipPath(p)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .ClipPath(_p); -RDebugUtils.currentLine=55967753; - //BA.debugLineNum = 55967753;BA.debugLine="cvs.DrawRect(cvs.TargetRect, clr, True, 0)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawRect(__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect(),__ref._clr /*int*/ ,__c.True,(float) (0)); -RDebugUtils.currentLine=55967754; - //BA.debugLineNum = 55967754;BA.debugLine="cvs.RemoveClip"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .RemoveClip(); -RDebugUtils.currentLine=55967755; - //BA.debugLineNum = 55967755;BA.debugLine="End Sub"; -return ""; -} -public String _draw_arc2(keymon.lat.medicomed.b4xloadingindicator __ref,float _progress) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xloadingindicator"; -if (Debug.shouldDelegate(ba, "draw_arc2", true)) - {return ((String) Debug.delegate(ba, "draw_arc2", new Object[] {_progress}));} -anywheresoftware.b4a.objects.B4XCanvas.B4XPath _p = null; -float _r = 0f; -RDebugUtils.currentLine=56033280; - //BA.debugLineNum = 56033280;BA.debugLine="Private Sub Draw_Arc2 (Progress As Float)"; -RDebugUtils.currentLine=56033281; - //BA.debugLineNum = 56033281;BA.debugLine="Dim p As B4XPath"; -_p = new anywheresoftware.b4a.objects.B4XCanvas.B4XPath(); -RDebugUtils.currentLine=56033282; - //BA.debugLineNum = 56033282;BA.debugLine="Dim r As Float = cvs.TargetRect.CenterX - 5dip"; -_r = (float) (__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterX()-__c.DipToCurrent((int) (5))); -RDebugUtils.currentLine=56033283; - //BA.debugLineNum = 56033283;BA.debugLine="If Progress < 0.5 Then"; -if (_progress<0.5) { -RDebugUtils.currentLine=56033284; - //BA.debugLineNum = 56033284;BA.debugLine="p.InitializeArc(cvs.TargetRect.CenterX, cvs.Targ"; -_p.InitializeArc(__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterX(),__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterY(),_r,(float) (-90),(float) (_progress*2*360)); - }else { -RDebugUtils.currentLine=56033286; - //BA.debugLineNum = 56033286;BA.debugLine="p.InitializeArc(cvs.TargetRect.CenterX, cvs.Targ"; -_p.InitializeArc(__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterX(),__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterY(),_r,(float) (-90),(float) (360-(_progress-0.5)*2*360)); - }; -RDebugUtils.currentLine=56033288; - //BA.debugLineNum = 56033288;BA.debugLine="cvs.ClipPath(p)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .ClipPath(_p); -RDebugUtils.currentLine=56033289; - //BA.debugLineNum = 56033289;BA.debugLine="cvs.DrawRect(cvs.TargetRect, clr, True, 0)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawRect(__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect(),__ref._clr /*int*/ ,__c.True,(float) (0)); -RDebugUtils.currentLine=56033290; - //BA.debugLineNum = 56033290;BA.debugLine="cvs.RemoveClip"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .RemoveClip(); -RDebugUtils.currentLine=56033291; - //BA.debugLineNum = 56033291;BA.debugLine="End Sub"; -return ""; -} -public String _draw_fivelines1(keymon.lat.medicomed.b4xloadingindicator __ref,float _progress) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xloadingindicator"; -if (Debug.shouldDelegate(ba, "draw_fivelines1", true)) - {return ((String) Debug.delegate(ba, "draw_fivelines1", new Object[] {_progress}));} -int _minr = 0; -int _maxr = 0; -int _dx = 0; -int _i = 0; -float _r = 0f; -RDebugUtils.currentLine=55902208; - //BA.debugLineNum = 55902208;BA.debugLine="Private Sub Draw_FiveLines1(Progress As Float)"; -RDebugUtils.currentLine=55902209; - //BA.debugLineNum = 55902209;BA.debugLine="Dim MinR As Int = 10dip"; -_minr = __c.DipToCurrent((int) (10)); -RDebugUtils.currentLine=55902210; - //BA.debugLineNum = 55902210;BA.debugLine="Dim MaxR As Int = cvs.TargetRect.Height / 2"; -_maxr = (int) (__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getHeight()/(double)2); -RDebugUtils.currentLine=55902211; - //BA.debugLineNum = 55902211;BA.debugLine="Dim dx As Int = (cvs.TargetRect.Width - 2dip) / 5"; -_dx = (int) ((__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getWidth()-__c.DipToCurrent((int) (2)))/(double)5); -RDebugUtils.currentLine=55902212; - //BA.debugLineNum = 55902212;BA.debugLine="For i = 0 To 4"; -{ -final int step4 = 1; -final int limit4 = (int) (4); -_i = (int) (0) ; -for (;_i <= limit4 ;_i = _i + step4 ) { -RDebugUtils.currentLine=55902213; - //BA.debugLineNum = 55902213;BA.debugLine="Dim r As Float = MinR + MaxR / 2 + MaxR / 2 * Si"; -_r = (float) (_minr+_maxr/(double)2+_maxr/(double)2*__c.SinD(_progress*360-30*_i)); -RDebugUtils.currentLine=55902214; - //BA.debugLineNum = 55902214;BA.debugLine="cvs.DrawLine(2dip + i * dx, cvs.TargetRect.Cente"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawLine((float) (__c.DipToCurrent((int) (2))+_i*_dx),(float) (__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterY()-_r),(float) (__c.DipToCurrent((int) (2))+_i*_dx),(float) (__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterY()+_r),__ref._clr /*int*/ ,(float) (__c.DipToCurrent((int) (4)))); - } -}; -RDebugUtils.currentLine=55902216; - //BA.debugLineNum = 55902216;BA.debugLine="End Sub"; -return ""; -} -public String _draw_pacman(keymon.lat.medicomed.b4xloadingindicator __ref,float _progress) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xloadingindicator"; -if (Debug.shouldDelegate(ba, "draw_pacman", true)) - {return ((String) Debug.delegate(ba, "draw_pacman", new Object[] {_progress}));} -int _dotr = 0; -anywheresoftware.b4a.objects.B4XCanvas.B4XPath _p = null; -int _angle = 0; -int _cx = 0; -int _cy = 0; -int _r = 0; -RDebugUtils.currentLine=56098816; - //BA.debugLineNum = 56098816;BA.debugLine="Private Sub Draw_PacMan(Progress As Float)"; -RDebugUtils.currentLine=56098817; - //BA.debugLineNum = 56098817;BA.debugLine="Dim DotR As Int = 5dip"; -_dotr = __c.DipToCurrent((int) (5)); -RDebugUtils.currentLine=56098818; - //BA.debugLineNum = 56098818;BA.debugLine="cvs.DrawCircle(cvs.TargetRect.Width - DotR - Prog"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawCircle((float) (__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getWidth()-_dotr-_progress*(__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterX()-__c.DipToCurrent((int) (10)))),__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterY(),(float) (_dotr),__ref._setalpha /*int*/ (null,__ref._clr /*int*/ ,(int) (255-200*_progress)),__c.True,(float) (0)); -RDebugUtils.currentLine=56098819; - //BA.debugLineNum = 56098819;BA.debugLine="Dim p As B4XPath"; -_p = new anywheresoftware.b4a.objects.B4XCanvas.B4XPath(); -RDebugUtils.currentLine=56098820; - //BA.debugLineNum = 56098820;BA.debugLine="Dim angle As Int = 70 * SinD(Progress * 180)"; -_angle = (int) (70*__c.SinD(_progress*180)); -RDebugUtils.currentLine=56098821; - //BA.debugLineNum = 56098821;BA.debugLine="Dim cx As Int = cvs.TargetRect.CenterX - 5dip"; -_cx = (int) (__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterX()-__c.DipToCurrent((int) (5))); -RDebugUtils.currentLine=56098822; - //BA.debugLineNum = 56098822;BA.debugLine="Dim cy As Int = cvs.TargetRect.CenterY"; -_cy = (int) (__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterY()); -RDebugUtils.currentLine=56098823; - //BA.debugLineNum = 56098823;BA.debugLine="Dim r As Int = cvs.TargetRect.CenterY - 5dip"; -_r = (int) (__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterY()-__c.DipToCurrent((int) (5))); -RDebugUtils.currentLine=56098824; - //BA.debugLineNum = 56098824;BA.debugLine="If angle = 0 Then"; -if (_angle==0) { -RDebugUtils.currentLine=56098825; - //BA.debugLineNum = 56098825;BA.debugLine="cvs.DrawCircle(cx, cy, r, clr, True, 0)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawCircle((float) (_cx),(float) (_cy),(float) (_r),__ref._clr /*int*/ ,__c.True,(float) (0)); - }else { -RDebugUtils.currentLine=56098827; - //BA.debugLineNum = 56098827;BA.debugLine="p.InitializeArc(cx, cy , r, -angle / 2, -(360-an"; -_p.InitializeArc((float) (_cx),(float) (_cy),(float) (_r),(float) (-_angle/(double)2),(float) (-(360-_angle))); -RDebugUtils.currentLine=56098828; - //BA.debugLineNum = 56098828;BA.debugLine="cvs.ClipPath(p)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .ClipPath(_p); -RDebugUtils.currentLine=56098829; - //BA.debugLineNum = 56098829;BA.debugLine="cvs.DrawRect(cvs.TargetRect, clr, True, 0)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawRect(__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect(),__ref._clr /*int*/ ,__c.True,(float) (0)); -RDebugUtils.currentLine=56098830; - //BA.debugLineNum = 56098830;BA.debugLine="cvs.RemoveClip"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .RemoveClip(); - }; -RDebugUtils.currentLine=56098833; - //BA.debugLineNum = 56098833;BA.debugLine="End Sub"; -return ""; -} -public int _setalpha(keymon.lat.medicomed.b4xloadingindicator __ref,int _c,int _alpha) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xloadingindicator"; -if (Debug.shouldDelegate(ba, "setalpha", true)) - {return ((Integer) Debug.delegate(ba, "setalpha", new Object[] {_c,_alpha}));} -RDebugUtils.currentLine=55836672; - //BA.debugLineNum = 55836672;BA.debugLine="Private Sub SetAlpha (c As Int, alpha As Int) As I"; -RDebugUtils.currentLine=55836673; - //BA.debugLineNum = 55836673;BA.debugLine="Return Bit.And(0xffffff, c) + Bit.ShiftLeft(alpha"; +public int _setalpha(int _c,int _alpha) throws Exception{ + //BA.debugLineNum = 91;BA.debugLine="Private Sub SetAlpha (c As Int, alpha As Int) As I"; + //BA.debugLineNum = 92;BA.debugLine="Return Bit.And(0xffffff, c) + Bit.ShiftLeft(alpha"; if (true) return (int) (__c.Bit.And(((int)0xffffff),_c)+__c.Bit.ShiftLeft(_alpha,(int) (24))); -RDebugUtils.currentLine=55836674; - //BA.debugLineNum = 55836674;BA.debugLine="End Sub"; + //BA.debugLineNum = 93;BA.debugLine="End Sub"; return 0; } -public String _draw_singlecircle(keymon.lat.medicomed.b4xloadingindicator __ref,float _progress) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xloadingindicator"; -if (Debug.shouldDelegate(ba, "draw_singlecircle", true)) - {return ((String) Debug.delegate(ba, "draw_singlecircle", new Object[] {_progress}));} -int _i = 0; -RDebugUtils.currentLine=55771136; - //BA.debugLineNum = 55771136;BA.debugLine="Private Sub Draw_SingleCircle(Progress As Float)"; -RDebugUtils.currentLine=55771137; - //BA.debugLineNum = 55771137;BA.debugLine="For i = 0 To 2"; -{ -final int step1 = 1; -final int limit1 = (int) (2); -_i = (int) (0) ; -for (;_i <= limit1 ;_i = _i + step1 ) { -RDebugUtils.currentLine=55771138; - //BA.debugLineNum = 55771138;BA.debugLine="cvs.DrawCircle(cvs.TargetRect.CenterX, cvs.Targe"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawCircle(__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterX(),__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterY(),(float) (__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterX()*_progress),__ref._setalpha /*int*/ (null,__ref._clr /*int*/ ,(int) (255-255*_progress)),__c.True,(float) (0)); - } -}; -RDebugUtils.currentLine=55771140; - //BA.debugLineNum = 55771140;BA.debugLine="End Sub"; +public String _show() throws Exception{ + //BA.debugLineNum = 56;BA.debugLine="Public Sub Show"; + //BA.debugLineNum = 57;BA.debugLine="mBase.Visible = True"; +_mbase.setVisible(__c.True); + //BA.debugLineNum = 58;BA.debugLine="MainLoop"; +_mainloop(); + //BA.debugLineNum = 59;BA.debugLine="End Sub"; return ""; } -public String _draw_threecircles1(keymon.lat.medicomed.b4xloadingindicator __ref,float _progress) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xloadingindicator"; -if (Debug.shouldDelegate(ba, "draw_threecircles1", true)) - {return ((String) Debug.delegate(ba, "draw_threecircles1", new Object[] {_progress}));} -float _maxr = 0f; -float _r = 0f; -int _i = 0; -int _alpha = 0; -RDebugUtils.currentLine=55640064; - //BA.debugLineNum = 55640064;BA.debugLine="Private Sub Draw_ThreeCircles1 (Progress As Float)"; -RDebugUtils.currentLine=55640065; - //BA.debugLineNum = 55640065;BA.debugLine="Dim MaxR As Float = (cvs.TargetRect.Width / 2 - 2"; -_maxr = (float) ((__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getWidth()/(double)2-__c.DipToCurrent((int) (20)))/(double)2); -RDebugUtils.currentLine=55640066; - //BA.debugLineNum = 55640066;BA.debugLine="Dim r As Float = 10dip + MaxR + MaxR * Sin(Progre"; -_r = (float) (__c.DipToCurrent((int) (10))+_maxr+_maxr*__c.Sin(_progress*2*__c.cPI)); -RDebugUtils.currentLine=55640067; - //BA.debugLineNum = 55640067;BA.debugLine="For i = 0 To 2"; -{ -final int step3 = 1; -final int limit3 = (int) (2); -_i = (int) (0) ; -for (;_i <= limit3 ;_i = _i + step3 ) { -RDebugUtils.currentLine=55640068; - //BA.debugLineNum = 55640068;BA.debugLine="Dim alpha As Int = i * 120 + Progress * 360"; -_alpha = (int) (_i*120+_progress*360); -RDebugUtils.currentLine=55640070; - //BA.debugLineNum = 55640070;BA.debugLine="cvs.DrawCircle(cvs.TargetRect.CenterX + r * SinD"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawCircle((float) (__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterX()+_r*__c.SinD(_alpha)),(float) (__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterY()+_r*__c.CosD(_alpha)),(float) (__c.DipToCurrent((int) (7))),__ref._clr /*int*/ ,__c.True,(float) (__c.DipToCurrent((int) (1)))); - } -}; -RDebugUtils.currentLine=55640072; - //BA.debugLineNum = 55640072;BA.debugLine="End Sub"; -return ""; +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +if (BA.fastSubCompare(sub, "SHOW")) + return _show(); +return BA.SubDelegator.SubNotFound; } -public String _draw_threecircles2(keymon.lat.medicomed.b4xloadingindicator __ref,float _progress) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xloadingindicator"; -if (Debug.shouldDelegate(ba, "draw_threecircles2", true)) - {return ((String) Debug.delegate(ba, "draw_threecircles2", new Object[] {_progress}));} -int _minr = 0; -int _maxr = 0; -int _i = 0; -float _r = 0f; -RDebugUtils.currentLine=55705600; - //BA.debugLineNum = 55705600;BA.debugLine="Private Sub Draw_ThreeCircles2 (Progress As Float)"; -RDebugUtils.currentLine=55705601; - //BA.debugLineNum = 55705601;BA.debugLine="Dim MinR As Int = 5dip"; -_minr = __c.DipToCurrent((int) (5)); -RDebugUtils.currentLine=55705602; - //BA.debugLineNum = 55705602;BA.debugLine="Dim MaxR As Int = cvs.TargetRect.Width / 2 / 3 -"; -_maxr = (int) (__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getWidth()/(double)2/(double)3-_minr-__c.DipToCurrent((int) (2))); -RDebugUtils.currentLine=55705603; - //BA.debugLineNum = 55705603;BA.debugLine="For i = 0 To 2"; -{ -final int step3 = 1; -final int limit3 = (int) (2); -_i = (int) (0) ; -for (;_i <= limit3 ;_i = _i + step3 ) { -RDebugUtils.currentLine=55705604; - //BA.debugLineNum = 55705604;BA.debugLine="Dim r As Float = MinR + MaxR / 2 + MaxR / 2 * Si"; -_r = (float) (_minr+_maxr/(double)2+_maxr/(double)2*__c.SinD(_progress*360-60*_i)); -RDebugUtils.currentLine=55705605; - //BA.debugLineNum = 55705605;BA.debugLine="cvs.DrawCircle(MaxR + MinR + (MinR + MaxR + 2dip"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawCircle((float) (_maxr+_minr+(_minr+_maxr+__c.DipToCurrent((int) (2)))*2*_i),__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getCenterY(),_r,__ref._clr /*int*/ ,__c.True,(float) (0)); - } -}; -RDebugUtils.currentLine=55705607; - //BA.debugLineNum = 55705607;BA.debugLine="End Sub"; -return ""; } -public String _hide(keymon.lat.medicomed.b4xloadingindicator __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xloadingindicator"; -if (Debug.shouldDelegate(ba, "hide", true)) - {return ((String) Debug.delegate(ba, "hide", null));} -RDebugUtils.currentLine=55574528; - //BA.debugLineNum = 55574528;BA.debugLine="Public Sub Hide"; -RDebugUtils.currentLine=55574529; - //BA.debugLineNum = 55574529;BA.debugLine="mBase.Visible = False"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=55574530; - //BA.debugLineNum = 55574530;BA.debugLine="index = index + 1"; -__ref._index /*int*/ = (int) (__ref._index /*int*/ +1); -RDebugUtils.currentLine=55574531; - //BA.debugLineNum = 55574531;BA.debugLine="End Sub"; -return ""; -} -public String _initialize(keymon.lat.medicomed.b4xloadingindicator __ref,anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="b4xloadingindicator"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_callback,_eventname}));} -RDebugUtils.currentLine=55246848; - //BA.debugLineNum = 55246848;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -RDebugUtils.currentLine=55246849; - //BA.debugLineNum = 55246849;BA.debugLine="mEventName = EventName"; -__ref._meventname /*String*/ = _eventname; -RDebugUtils.currentLine=55246850; - //BA.debugLineNum = 55246850;BA.debugLine="mCallBack = Callback"; -__ref._mcallback /*Object*/ = _callback; -RDebugUtils.currentLine=55246851; - //BA.debugLineNum = 55246851;BA.debugLine="End Sub"; -return ""; -} -public String _show(keymon.lat.medicomed.b4xloadingindicator __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xloadingindicator"; -if (Debug.shouldDelegate(ba, "show", true)) - {return ((String) Debug.delegate(ba, "show", null));} -RDebugUtils.currentLine=55508992; - //BA.debugLineNum = 55508992;BA.debugLine="Public Sub Show"; -RDebugUtils.currentLine=55508993; - //BA.debugLineNum = 55508993;BA.debugLine="mBase.Visible = True"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=55508994; - //BA.debugLineNum = 55508994;BA.debugLine="MainLoop"; -__ref._mainloop /*void*/ (null); -RDebugUtils.currentLine=55508995; - //BA.debugLineNum = 55508995;BA.debugLine="End Sub"; -return ""; -} -} \ No newline at end of file diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xlongtexttemplate.java b/B4A/Objects/src/keymon/lat/medicomed/b4xlongtexttemplate.java index faadb9c..7f2f6b6 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xlongtexttemplate.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xlongtexttemplate.java @@ -10,7 +10,7 @@ public class b4xlongtexttemplate extends B4AClass.ImplB4AClass implements BA.Sub private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xlongtexttemplate"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xlongtexttemplate"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xlongtexttemplate extends B4AClass.ImplB4AClass implements BA.Sub 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.keywords.Common __c = null; public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null; public b4a.example3.customlistview _customlistview1 = null; @@ -47,129 +40,85 @@ 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 anywheresoftware.b4a.objects.B4XViewWrapper _getpanel(keymon.lat.medicomed.b4xlongtexttemplate __ref,keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xlongtexttemplate"; -if (Debug.shouldDelegate(ba, "getpanel", true)) - {return ((anywheresoftware.b4a.objects.B4XViewWrapper) Debug.delegate(ba, "getpanel", new Object[] {_dialog}));} -RDebugUtils.currentLine=56360960; - //BA.debugLineNum = 56360960;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; -RDebugUtils.currentLine=56360961; - //BA.debugLineNum = 56360961;BA.debugLine="Return mBase"; -if (true) return __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ; -RDebugUtils.currentLine=56360962; - //BA.debugLineNum = 56360962;BA.debugLine="End Sub"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Private xui As XUI"; +_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); + //BA.debugLineNum = 3;BA.debugLine="Public mBase As B4XView"; +_mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 4;BA.debugLine="Public CustomListView1 As CustomListView"; +_customlistview1 = new b4a.example3.customlistview(); + //BA.debugLineNum = 5;BA.debugLine="Public Text As Object"; +_text = new Object(); + //BA.debugLineNum = 6;BA.debugLine="End Sub"; +return ""; +} +public String _dialogclosed(int _result) throws Exception{ + //BA.debugLineNum = 41;BA.debugLine="Private Sub DialogClosed(Result As Int) 'ignore"; + //BA.debugLineNum = 43;BA.debugLine="End Sub"; +return ""; +} +public anywheresoftware.b4a.objects.B4XViewWrapper _getpanel(keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ + //BA.debugLineNum = 30;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; + //BA.debugLineNum = 31;BA.debugLine="Return mBase"; +if (true) return _mbase; + //BA.debugLineNum = 32;BA.debugLine="End Sub"; return null; } -public String _show(keymon.lat.medicomed.b4xlongtexttemplate __ref,keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xlongtexttemplate"; -if (Debug.shouldDelegate(ba, "show", true)) - {return ((String) Debug.delegate(ba, "show", new Object[] {_dialog}));} -RDebugUtils.currentLine=56426496; - //BA.debugLineNum = 56426496;BA.debugLine="Private Sub Show (Dialog As B4XDialog) 'ignore"; -RDebugUtils.currentLine=56426497; - //BA.debugLineNum = 56426497;BA.debugLine="CustomListView1.Clear"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._clear(); -RDebugUtils.currentLine=56426498; - //BA.debugLineNum = 56426498;BA.debugLine="CustomListView1.AddTextItem(Text, \"\")"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._addtextitem(__ref._text /*Object*/ ,(Object)("")); -RDebugUtils.currentLine=56426499; - //BA.debugLineNum = 56426499;BA.debugLine="CustomListView1.GetPanel(0).GetView(0).SetTextAli"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._getpanel((int) (0)).GetView((int) (0)).SetTextAlignment("TOP","LEFT"); -RDebugUtils.currentLine=56426500; - //BA.debugLineNum = 56426500;BA.debugLine="XUIViewsUtils.AddStubToCLVIfNeeded(CustomListView"; -_xuiviewsutils._addstubtoclvifneeded /*String*/ (ba,__ref._customlistview1 /*b4a.example3.customlistview*/ ,__ref._customlistview1 /*b4a.example3.customlistview*/ ._defaulttextbackgroundcolor); -RDebugUtils.currentLine=56426501; - //BA.debugLineNum = 56426501;BA.debugLine="End Sub"; -return ""; -} -public String _dialogclosed(keymon.lat.medicomed.b4xlongtexttemplate __ref,int _result) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xlongtexttemplate"; -if (Debug.shouldDelegate(ba, "dialogclosed", true)) - {return ((String) Debug.delegate(ba, "dialogclosed", new Object[] {_result}));} -RDebugUtils.currentLine=56492032; - //BA.debugLineNum = 56492032;BA.debugLine="Private Sub DialogClosed(Result As Int) 'ignore"; -RDebugUtils.currentLine=56492034; - //BA.debugLineNum = 56492034;BA.debugLine="End Sub"; -return ""; -} -public String _class_globals(keymon.lat.medicomed.b4xlongtexttemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xlongtexttemplate"; -RDebugUtils.currentLine=56164352; - //BA.debugLineNum = 56164352;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=56164353; - //BA.debugLineNum = 56164353;BA.debugLine="Private xui As XUI"; -_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=56164354; - //BA.debugLineNum = 56164354;BA.debugLine="Public mBase As B4XView"; -_mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=56164355; - //BA.debugLineNum = 56164355;BA.debugLine="Public CustomListView1 As CustomListView"; -_customlistview1 = new b4a.example3.customlistview(); -RDebugUtils.currentLine=56164356; - //BA.debugLineNum = 56164356;BA.debugLine="Public Text As Object"; -_text = new Object(); -RDebugUtils.currentLine=56164357; - //BA.debugLineNum = 56164357;BA.debugLine="End Sub"; -return ""; -} -public String _initialize(keymon.lat.medicomed.b4xlongtexttemplate __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; +public String _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ innerInitialize(_ba); -RDebugUtils.currentModule="b4xlongtexttemplate"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=56229888; - //BA.debugLineNum = 56229888;BA.debugLine="Public Sub Initialize"; -RDebugUtils.currentLine=56229889; - //BA.debugLineNum = 56229889;BA.debugLine="mBase = xui.CreatePanel(\"mBase\")"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,"mBase"); -RDebugUtils.currentLine=56229890; - //BA.debugLineNum = 56229890;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, 300dip, 300dip)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),__c.DipToCurrent((int) (300)),__c.DipToCurrent((int) (300))); -RDebugUtils.currentLine=56229891; - //BA.debugLineNum = 56229891;BA.debugLine="mBase.LoadLayout(\"LongTextTemplate\")"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .LoadLayout("LongTextTemplate",ba); -RDebugUtils.currentLine=56229892; - //BA.debugLineNum = 56229892;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0,"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetColorAndBorder(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent,(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=56229893; - //BA.debugLineNum = 56229893;BA.debugLine="CustomListView1.sv.SetColorAndBorder(xui.Color_Tr"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._sv.SetColorAndBorder(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent,(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=56229894; - //BA.debugLineNum = 56229894;BA.debugLine="CustomListView1.DefaultTextBackgroundColor = 0xFF"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._defaulttextbackgroundcolor = ((int)0xff555555); -RDebugUtils.currentLine=56229895; - //BA.debugLineNum = 56229895;BA.debugLine="CustomListView1.DefaultTextColor = xui.Color_Whit"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._defaulttextcolor = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_White; -RDebugUtils.currentLine=56229896; - //BA.debugLineNum = 56229896;BA.debugLine="CustomListView1.sv.Color = 0xFF464646"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._sv.setColor(((int)0xff464646)); -RDebugUtils.currentLine=56229901; - //BA.debugLineNum = 56229901;BA.debugLine="End Sub"; + //BA.debugLineNum = 8;BA.debugLine="Public Sub Initialize"; + //BA.debugLineNum = 9;BA.debugLine="mBase = xui.CreatePanel(\"mBase\")"; +_mbase = _xui.CreatePanel(ba,"mBase"); + //BA.debugLineNum = 10;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, 300dip, 300dip)"; +_mbase.SetLayoutAnimated((int) (0),(int) (0),(int) (0),__c.DipToCurrent((int) (300)),__c.DipToCurrent((int) (300))); + //BA.debugLineNum = 11;BA.debugLine="mBase.LoadLayout(\"LongTextTemplate\")"; +_mbase.LoadLayout("LongTextTemplate",ba); + //BA.debugLineNum = 12;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0,"; +_mbase.SetColorAndBorder(_xui.Color_Transparent,(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 13;BA.debugLine="CustomListView1.sv.SetColorAndBorder(xui.Color_Tr"; +_customlistview1._sv.SetColorAndBorder(_xui.Color_Transparent,(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 14;BA.debugLine="CustomListView1.DefaultTextBackgroundColor = 0xFF"; +_customlistview1._defaulttextbackgroundcolor = ((int)0xff555555); + //BA.debugLineNum = 15;BA.debugLine="CustomListView1.DefaultTextColor = xui.Color_Whit"; +_customlistview1._defaulttextcolor = _xui.Color_White; + //BA.debugLineNum = 16;BA.debugLine="CustomListView1.sv.Color = 0xFF464646"; +_customlistview1._sv.setColor(((int)0xff464646)); + //BA.debugLineNum = 21;BA.debugLine="End Sub"; return ""; } -public String _resize(keymon.lat.medicomed.b4xlongtexttemplate __ref,int _width,int _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xlongtexttemplate"; -if (Debug.shouldDelegate(ba, "resize", true)) - {return ((String) Debug.delegate(ba, "resize", new Object[] {_width,_height}));} -RDebugUtils.currentLine=56295424; - //BA.debugLineNum = 56295424;BA.debugLine="Public Sub Resize(Width As Int, Height As Int)"; -RDebugUtils.currentLine=56295425; - //BA.debugLineNum = 56295425;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, Width, Height)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),_width,_height); -RDebugUtils.currentLine=56295426; - //BA.debugLineNum = 56295426;BA.debugLine="CustomListView1.AsView.SetLayoutAnimated(0, 0, 0,"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._asview().SetLayoutAnimated((int) (0),(int) (0),(int) (0),_width,_height); -RDebugUtils.currentLine=56295427; - //BA.debugLineNum = 56295427;BA.debugLine="CustomListView1.Base_Resize(Width, Height)"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._base_resize(_width,_height); -RDebugUtils.currentLine=56295428; - //BA.debugLineNum = 56295428;BA.debugLine="End Sub"; +public String _resize(int _width,int _height) throws Exception{ + //BA.debugLineNum = 23;BA.debugLine="Public Sub Resize(Width As Int, Height As Int)"; + //BA.debugLineNum = 24;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, Width, Height)"; +_mbase.SetLayoutAnimated((int) (0),(int) (0),(int) (0),_width,_height); + //BA.debugLineNum = 25;BA.debugLine="CustomListView1.AsView.SetLayoutAnimated(0, 0, 0,"; +_customlistview1._asview().SetLayoutAnimated((int) (0),(int) (0),(int) (0),_width,_height); + //BA.debugLineNum = 26;BA.debugLine="CustomListView1.Base_Resize(Width, Height)"; +_customlistview1._base_resize(_width,_height); + //BA.debugLineNum = 27;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +public String _show(keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ + //BA.debugLineNum = 34;BA.debugLine="Private Sub Show (Dialog As B4XDialog) 'ignore"; + //BA.debugLineNum = 35;BA.debugLine="CustomListView1.Clear"; +_customlistview1._clear(); + //BA.debugLineNum = 36;BA.debugLine="CustomListView1.AddTextItem(Text, \"\")"; +_customlistview1._addtextitem(_text,(Object)("")); + //BA.debugLineNum = 37;BA.debugLine="CustomListView1.GetPanel(0).GetView(0).SetTextAli"; +_customlistview1._getpanel((int) (0)).GetView((int) (0)).SetTextAlignment("TOP","LEFT"); + //BA.debugLineNum = 38;BA.debugLine="XUIViewsUtils.AddStubToCLVIfNeeded(CustomListView"; +_xuiviewsutils._addstubtoclvifneeded /*String*/ (ba,_customlistview1,_customlistview1._defaulttextbackgroundcolor); + //BA.debugLineNum = 39;BA.debugLine="End Sub"; +return ""; +} +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +if (BA.fastSubCompare(sub, "DIALOGCLOSED")) + return _dialogclosed(((Number)args[0]).intValue()); +if (BA.fastSubCompare(sub, "GETPANEL")) + return _getpanel((keymon.lat.medicomed.b4xdialog) args[0]); +if (BA.fastSubCompare(sub, "SHOW")) + return _show((keymon.lat.medicomed.b4xdialog) args[0]); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xmainpage.java b/B4A/Objects/src/keymon/lat/medicomed/b4xmainpage.java index f5d9854..8a8298a 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xmainpage.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xmainpage.java @@ -10,7 +10,7 @@ public class b4xmainpage extends B4AClass.ImplB4AClass implements BA.SubDelegato private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xmainpage"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xmainpage"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xmainpage extends B4AClass.ImplB4AClass implements BA.SubDelegato 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.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; @@ -112,34 +105,21 @@ 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(keymon.lat.medicomed.b4xmainpage __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "b_apk_click", false)) - {return ((String) Debug.delegate(ba, "b_apk_click", null));} -RDebugUtils.currentLine=1507328; - //BA.debugLineNum = 1507328;BA.debugLine="Sub b_apk_Click"; -RDebugUtils.currentLine=1507329; - //BA.debugLineNum = 1507329;BA.debugLine="StartService(appUpdater)"; +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())); -RDebugUtils.currentLine=1507330; - //BA.debugLineNum = 1507330;BA.debugLine="End Sub"; + //BA.debugLineNum = 623;BA.debugLine="End Sub"; return ""; } -public void _b_enviobd_click(keymon.lat.medicomed.b4xmainpage __ref) throws Exception{ -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "b_enviobd_click", false)) - {Debug.delegate(ba, "b_enviobd_click", null); return;} -ResumableSub_b_envioBD_Click rsub = new ResumableSub_b_envioBD_Click(this,__ref); +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,keymon.lat.medicomed.b4xmainpage __ref) { +public ResumableSub_b_envioBD_Click(keymon.lat.medicomed.b4xmainpage parent) { this.parent = parent; -this.__ref = __ref; -this.__ref = parent; } -keymon.lat.medicomed.b4xmainpage __ref; keymon.lat.medicomed.b4xmainpage parent; String _filename = ""; anywheresoftware.b4a.phone.Phone.Email _email = null; @@ -147,7 +127,6 @@ anywheresoftware.b4a.objects.IntentWrapper _in = null; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="b4xmainpage"; while (true) { switch (state) { @@ -157,135 +136,88 @@ return; case 0: //C this.state = -1; -RDebugUtils.currentLine=2097155; - //BA.debugLineNum = 2097155;BA.debugLine="Dim FileName As String = \"kmt.db\""; + //BA.debugLineNum = 681;BA.debugLine="Dim FileName As String = \"kmt.db\""; _filename = "kmt.db"; -RDebugUtils.currentLine=2097157; - //BA.debugLineNum = 2097157;BA.debugLine="Log(\"xxxxxx:\"&Provider.SharedFolder)"; -parent.__c.LogImpl("32097157","xxxxxx:"+__ref._provider /*keymon.lat.medicomed.fileprovider*/ ._sharedfolder /*String*/ ,0); -RDebugUtils.currentLine=2097158; - //BA.debugLineNum = 2097158;BA.debugLine="Sleep(1000)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "b4xmainpage", "b_enviobd_click"),(int) (1000)); + //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; ; -RDebugUtils.currentLine=2097159; - //BA.debugLineNum = 2097159;BA.debugLine="File.Copy(File.DirInternal, FileName, Provider.Sh"; -parent.__c.File.Copy(parent.__c.File.getDirInternal(),_filename,__ref._provider /*keymon.lat.medicomed.fileprovider*/ ._sharedfolder /*String*/ ,_filename); -RDebugUtils.currentLine=2097160; - //BA.debugLineNum = 2097160;BA.debugLine="Dim email As Email"; + //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(); -RDebugUtils.currentLine=2097161; - //BA.debugLineNum = 2097161;BA.debugLine="email.To.Add(\"cheveguerra@gmail.com\")"; + //BA.debugLineNum = 687;BA.debugLine="email.To.Add(\"cheveguerra@gmail.com\")"; _email.To.Add((Object)("cheveguerra@gmail.com")); -RDebugUtils.currentLine=2097162; - //BA.debugLineNum = 2097162;BA.debugLine="email.Subject = \"subject\""; + //BA.debugLineNum = 688;BA.debugLine="email.Subject = \"subject\""; _email.Subject = "subject"; -RDebugUtils.currentLine=2097163; - //BA.debugLineNum = 2097163;BA.debugLine="email.Attachments.Add(Provider.GetFileUri(FileNam"; -_email.Attachments.Add(__ref._provider /*keymon.lat.medicomed.fileprovider*/ ._getfileuri /*Object*/ (null,_filename)); -RDebugUtils.currentLine=2097165; - //BA.debugLineNum = 2097165;BA.debugLine="Dim in As Intent = email.GetIntent"; + //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())); -RDebugUtils.currentLine=2097166; - //BA.debugLineNum = 2097166;BA.debugLine="in.Flags = 1 'FLAG_GRANT_READ_URI_PERMISSION"; + //BA.debugLineNum = 692;BA.debugLine="in.Flags = 1 'FLAG_GRANT_READ_URI_PERMISSION"; _in.setFlags((int) (1)); -RDebugUtils.currentLine=2097167; - //BA.debugLineNum = 2097167;BA.debugLine="StartActivity(in)"; + //BA.debugLineNum = 693;BA.debugLine="StartActivity(in)"; parent.__c.StartActivity(ba,(Object)(_in.getObject())); -RDebugUtils.currentLine=2097168; - //BA.debugLineNum = 2097168;BA.debugLine="End Sub"; + //BA.debugLineNum = 694;BA.debugLine="End Sub"; if (true) break; } } } } -public String _b_menu_click(keymon.lat.medicomed.b4xmainpage __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "b_menu_click", false)) - {return ((String) Debug.delegate(ba, "b_menu_click", null));} -RDebugUtils.currentLine=1245184; - //BA.debugLineNum = 1245184;BA.debugLine="Sub b_menu_Click"; -RDebugUtils.currentLine=1245185; - //BA.debugLineNum = 1245185;BA.debugLine="PopupMenu.Show"; -__ref._popupmenu /*com.rootsoft.rspopupmenu.RSPopupMenu*/ .Show(); -RDebugUtils.currentLine=1245186; - //BA.debugLineNum = 1245186;BA.debugLine="End Sub"; +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(keymon.lat.medicomed.b4xmainpage __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "b_regesar_click", false)) - {return ((String) Debug.delegate(ba, "b_regesar_click", null));} -RDebugUtils.currentLine=1769472; - //BA.debugLineNum = 1769472;BA.debugLine="Sub b_regesar_Click"; -RDebugUtils.currentLine=1769473; - //BA.debugLineNum = 1769473;BA.debugLine="p_appUpdate.Visible = False"; -__ref._p_appupdate /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=1769474; - //BA.debugLineNum = 1769474;BA.debugLine="Subs.panelVisible(p_Main,0,0)"; -_subs._panelvisible /*String*/ (ba,__ref._p_main /*anywheresoftware.b4a.objects.PanelWrapper*/ ,(int) (0),(int) (0)); -RDebugUtils.currentLine=1769475; - //BA.debugLineNum = 1769475;BA.debugLine="End Sub"; +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(keymon.lat.medicomed.b4xmainpage __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "b_server_click", false)) - {return ((String) Debug.delegate(ba, "b_server_click", null));} -RDebugUtils.currentLine=1900544; - //BA.debugLineNum = 1900544;BA.debugLine="Sub B_SERVER_Click"; -RDebugUtils.currentLine=1900545; - //BA.debugLineNum = 1900545;BA.debugLine="skmt.ExecNonQuery2(\"delete from CAT_VARIABLES whe"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("delete from CAT_VARIABLES where CAT_VA_DESCRIPCION = ?",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("SERVER")})); -RDebugUtils.currentLine=1900546; - //BA.debugLineNum = 1900546;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO CAT_VARIABLES(CAT"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO CAT_VARIABLES(CAT_VA_DESCRIPCION, CAT_VA_VALOR) VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("SERVER"),(Object)(__ref._et_server /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText())})); -RDebugUtils.currentLine=1900547; - //BA.debugLineNum = 1900547;BA.debugLine="Starter.server = et_server.text"; -_starter._server /*String*/ = __ref._et_server /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText(); -RDebugUtils.currentLine=1900548; - //BA.debugLineNum = 1900548;BA.debugLine="If Logger Then Log(\"Inicializamos reqManager con"; -if (__ref._logger /*boolean*/ ) { -__c.LogImpl("31900548","Inicializamos reqManager con "+_starter._server /*String*/ ,0);}; -RDebugUtils.currentLine=1900549; - //BA.debugLineNum = 1900549;BA.debugLine="reqManager.Initialize(Me, Starter.server)"; -__ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._initialize /*String*/ (null,ba,this,_starter._server /*String*/ ); -RDebugUtils.currentLine=1900550; - //BA.debugLineNum = 1900550;BA.debugLine="CallSubDelayed(Starter, \"reinicializaReqManager\")"; +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"); -RDebugUtils.currentLine=1900551; - //BA.debugLineNum = 1900551;BA.debugLine="Subs.panelVisible(p_Main,0,0)"; -_subs._panelvisible /*String*/ (ba,__ref._p_main /*anywheresoftware.b4a.objects.PanelWrapper*/ ,(int) (0),(int) (0)); -RDebugUtils.currentLine=1900552; - //BA.debugLineNum = 1900552;BA.debugLine="p_appUpdate.Visible = False"; -__ref._p_appupdate /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=1900554; - //BA.debugLineNum = 1900554;BA.debugLine="End Sub"; + //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(keymon.lat.medicomed.b4xmainpage __ref) throws Exception{ -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "b4xpage_appear", false)) - {Debug.delegate(ba, "b4xpage_appear", null); return;} -ResumableSub_B4XPage_Appear rsub = new ResumableSub_B4XPage_Appear(this,__ref); +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,keymon.lat.medicomed.b4xmainpage __ref) { +public ResumableSub_B4XPage_Appear(keymon.lat.medicomed.b4xmainpage parent) { this.parent = parent; -this.__ref = __ref; -this.__ref = parent; } -keymon.lat.medicomed.b4xmainpage __ref; keymon.lat.medicomed.b4xmainpage parent; anywheresoftware.b4a.phone.Phone _ph = null; String _deviceid = ""; @@ -294,7 +226,6 @@ String _stime = ""; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="b4xmainpage"; while (true) { switch (state) { @@ -304,8 +235,7 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=786433; - //BA.debugLineNum = 786433;BA.debugLine="If Starter.muestraProgreso = 1 Then"; + //BA.debugLineNum = 245;BA.debugLine="If Starter.muestraProgreso = 1 Then"; if (true) break; case 1: @@ -318,11 +248,9 @@ this.state = 3; case 3: //C this.state = 4; -RDebugUtils.currentLine=786434; - //BA.debugLineNum = 786434;BA.debugLine="muestraProgreso(\"Descargando actualización\")"; -__ref._muestraprogreso /*String*/ (null,"Descargando actualización"); -RDebugUtils.currentLine=786435; - //BA.debugLineNum = 786435;BA.debugLine="Starter.muestraProgreso = 0"; + //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; @@ -330,26 +258,19 @@ case 4: //C this.state = 5; ; -RDebugUtils.currentLine=786437; - //BA.debugLineNum = 786437;BA.debugLine="Dim ph As Phone 'Get Id Device"; + //BA.debugLineNum = 249;BA.debugLine="Dim ph As Phone 'Get Id Device"; _ph = new anywheresoftware.b4a.phone.Phone(); -RDebugUtils.currentLine=786438; - //BA.debugLineNum = 786438;BA.debugLine="Dim DeviceID As String = ph.GetSettings(\"android_"; + //BA.debugLineNum = 250;BA.debugLine="Dim DeviceID As String = ph.GetSettings(\"android_"; _deviceid = _ph.GetSettings("android_id").toUpperCase(); -RDebugUtils.currentLine=786439; - //BA.debugLineNum = 786439;BA.debugLine="LogColor($\"////////////////// DeviceID: ${Devic"; -parent.__c.LogImpl("3786439",("////////////////// DeviceID: "+parent.__c.SmartStringFormatter("",(Object)(_deviceid))+" ////////////////// "),parent.__c.Colors.Blue); -RDebugUtils.currentLine=786440; - //BA.debugLineNum = 786440;BA.debugLine="server = Starter.server"; -__ref._server /*String*/ = parent._starter._server /*String*/ ; -RDebugUtils.currentLine=786441; - //BA.debugLineNum = 786441;BA.debugLine="reqManager.Initialize(Me, Starter.server)"; -__ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._initialize /*String*/ (null,ba,parent,parent._starter._server /*String*/ ); -RDebugUtils.currentLine=786442; - //BA.debugLineNum = 786442;BA.debugLine="tgl.Initialize()"; -__ref._tgl /*com.rootsoft.togglelibrary.ToggleLibrary*/ .Initialize(ba); -RDebugUtils.currentLine=786443; - //BA.debugLineNum = 786443;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then"; + //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: @@ -362,20 +283,17 @@ this.state = 7; case 7: //C this.state = 8; -RDebugUtils.currentLine=786444; - //BA.debugLineNum = 786444;BA.debugLine="ToastMessageShow(\"Es necesario tener el GPS ence"; + //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); -RDebugUtils.currentLine=786445; - //BA.debugLineNum = 786445;BA.debugLine="Sleep(500)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "b4xmainpage", "b4xpage_appear"),(int) (500)); + //BA.debugLineNum = 257;BA.debugLine="Sleep(500)"; +parent.__c.Sleep(ba,this,(int) (500)); this.state = 19; return; case 19: //C this.state = 8; ; -RDebugUtils.currentLine=786446; - //BA.debugLineNum = 786446;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent"; + //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; @@ -383,20 +301,17 @@ case 8: //C this.state = 9; ; -RDebugUtils.currentLine=786448; - //BA.debugLineNum = 786448;BA.debugLine="c=skmt.ExecQuery2(\"select count(*) as CUANTOS fro"; -__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)(__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery2("select count(*) as CUANTOS from CAT_VARIABLES WHERE CAT_VA_DESCRIPCION = ?",new String[]{"FECHA"}))); -RDebugUtils.currentLine=786449; - //BA.debugLineNum = 786449;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=786450; - //BA.debugLineNum = 786450;BA.debugLine="If c.GetString(\"CUANTOS\") = 0 Then"; + //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 ((__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")).equals(BA.NumberToString(0))) { +if ((parent._c.GetString("CUANTOS")).equals(BA.NumberToString(0))) { this.state = 11; }else { this.state = 13; @@ -405,65 +320,51 @@ this.state = 13; case 11: //C this.state = 18; -RDebugUtils.currentLine=786451; - //BA.debugLineNum = 786451;BA.debugLine="LogColor($\"No hay fecha: ${c.GetString(\"CUANTOS\""; -parent.__c.LogImpl("3786451",("No hay fecha: "+parent.__c.SmartStringFormatter("",(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")))+""),parent.__c.Colors.Red); -RDebugUtils.currentLine=786452; - //BA.debugLineNum = 786452;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=786453; - //BA.debugLineNum = 786453;BA.debugLine="cmd.Name = \"select_fecha\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_fecha"; -RDebugUtils.currentLine=786454; - //BA.debugLineNum = 786454;BA.debugLine="reqManager.ExecuteQuery(cmd , 0, \"fecha\")"; -__ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("fecha")); -RDebugUtils.currentLine=786455; - //BA.debugLineNum = 786455;BA.debugLine="Msgbox(\"AJUSTAR FECHA\",\"AVISO\") 'Ignore"; + //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); -RDebugUtils.currentLine=786456; - //BA.debugLineNum = 786456;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*void*/ (null); + //BA.debugLineNum = 268;BA.debugLine="B4XPage_Appear"; +parent._b4xpage_appear(); if (true) break; case 13: //C this.state = 14; -RDebugUtils.currentLine=786459; - //BA.debugLineNum = 786459;BA.debugLine="c=skmt.ExecQuery2(\"select CAT_VA_VALOR from CAT_"; -__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)(__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery2("select CAT_VA_VALOR from CAT_VARIABLES WHERE CAT_VA_DESCRIPCION = ?",new String[]{"FECHA"}))); -RDebugUtils.currentLine=786460; - //BA.debugLineNum = 786460;BA.debugLine="c.Position =0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=786461; - //BA.debugLineNum = 786461;BA.debugLine="Dim sDate, sTime As String"; + //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 = ""; -RDebugUtils.currentLine=786462; - //BA.debugLineNum = 786462;BA.debugLine="DateTime.DateFormat = \"yyyyMMdd\""; + //BA.debugLineNum = 274;BA.debugLine="DateTime.DateFormat = \"yyyyMMdd\""; parent.__c.DateTime.setDateFormat("yyyyMMdd"); -RDebugUtils.currentLine=786463; - //BA.debugLineNum = 786463;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; + //BA.debugLineNum = 275;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; _sdate = parent.__c.DateTime.Date(parent.__c.DateTime.getNow()); -RDebugUtils.currentLine=786468; - //BA.debugLineNum = 786468;BA.debugLine="If c.GetString(\"CAT_VA_VALOR\") > sDate Then"; + //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(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_VA_VALOR")))>(double)(Double.parseDouble(_sdate))) { +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; -RDebugUtils.currentLine=786469; - //BA.debugLineNum = 786469;BA.debugLine="Msgbox(\"AJUSTAR LA FECHA YA QUE ES MENOR AL SIS"; + //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); -RDebugUtils.currentLine=786470; - //BA.debugLineNum = 786470;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*void*/ (null); + //BA.debugLineNum = 282;BA.debugLine="B4XPage_Appear"; +parent._b4xpage_appear(); if (true) break; case 17: @@ -476,97 +377,32 @@ case 18: //C this.state = -1; ; -RDebugUtils.currentLine=786473; - //BA.debugLineNum = 786473;BA.debugLine="bu.Initialize"; -__ref._bu /*keymon.lat.medicomed.batteryutilities*/ ._initialize /*String*/ (null,ba); -RDebugUtils.currentLine=786474; - //BA.debugLineNum = 786474;BA.debugLine="batterystatus = bu.BatteryInformation"; -__ref._batterystatus /*int[]*/ = __ref._bu /*keymon.lat.medicomed.batteryutilities*/ ._getbatteryinformation /*int[]*/ (null); -RDebugUtils.currentLine=786477; - //BA.debugLineNum = 786477;BA.debugLine="dameUsuario"; -__ref._dameusuario /*String*/ (null); -RDebugUtils.currentLine=786478; - //BA.debugLineNum = 786478;BA.debugLine="End Sub"; + //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 String _muestraprogreso(keymon.lat.medicomed.b4xmainpage __ref,String _mensaje) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "muestraprogreso", false)) - {return ((String) Debug.delegate(ba, "muestraprogreso", new Object[] {_mensaje}));} -RDebugUtils.currentLine=1572864; - //BA.debugLineNum = 1572864;BA.debugLine="Sub muestraProgreso(mensaje As String)"; -RDebugUtils.currentLine=1572865; - //BA.debugLineNum = 1572865;BA.debugLine="ProgressDialogShow(mensaje)"; -__c.ProgressDialogShow(ba,BA.ObjectToCharSequence(_mensaje)); -RDebugUtils.currentLine=1572866; - //BA.debugLineNum = 1572866;BA.debugLine="End Sub"; -return ""; -} -public String _dameusuario(keymon.lat.medicomed.b4xmainpage __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "dameusuario", false)) - {return ((String) Debug.delegate(ba, "dameusuario", null));} -RDebugUtils.currentLine=1376256; - //BA.debugLineNum = 1376256;BA.debugLine="Sub dameUsuario"; -RDebugUtils.currentLine=1376257; - //BA.debugLineNum = 1376257;BA.debugLine="c=skmt.ExecQuery2(\"select count(*) as EXISTE1 fro"; -__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)(__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery2("select count(*) as EXISTE1 from usuarioa where usuario = ?",new String[]{__ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()}))); -RDebugUtils.currentLine=1376258; - //BA.debugLineNum = 1376258;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=1376259; - //BA.debugLineNum = 1376259;BA.debugLine="existe = c.GetString(\"EXISTE1\")"; -__ref._existe /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("EXISTE1"); -RDebugUtils.currentLine=1376260; - //BA.debugLineNum = 1376260;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=1376261; - //BA.debugLineNum = 1376261;BA.debugLine="If existe > 0 Then"; -if ((double)(Double.parseDouble(__ref._existe /*String*/ ))>0) { -RDebugUtils.currentLine=1376262; - //BA.debugLineNum = 1376262;BA.debugLine="c=skmt.ExecQuery(\"select USUARIO from usuarioa\")"; -__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)(__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select USUARIO from usuarioa"))); -RDebugUtils.currentLine=1376263; - //BA.debugLineNum = 1376263;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=1376264; - //BA.debugLineNum = 1376264;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -__ref._usuario /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("USUARIO"); - }else { -RDebugUtils.currentLine=1376266; - //BA.debugLineNum = 1376266;BA.debugLine="usuario = \"SINUSUARIO\""; -__ref._usuario /*String*/ = "SINUSUARIO"; - }; -RDebugUtils.currentLine=1376268; - //BA.debugLineNum = 1376268;BA.debugLine="End Sub"; -return ""; -} -public anywheresoftware.b4a.keywords.Common.ResumableSubWrapper _b4xpage_closerequest(keymon.lat.medicomed.b4xmainpage __ref) throws Exception{ -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "b4xpage_closerequest", false)) - {return ((anywheresoftware.b4a.keywords.Common.ResumableSubWrapper) Debug.delegate(ba, "b4xpage_closerequest", null));} -ResumableSub_B4XPage_CloseRequest rsub = new ResumableSub_B4XPage_CloseRequest(this,__ref); +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,keymon.lat.medicomed.b4xmainpage __ref) { +public ResumableSub_B4XPage_CloseRequest(keymon.lat.medicomed.b4xmainpage parent) { this.parent = parent; -this.__ref = __ref; -this.__ref = parent; } -keymon.lat.medicomed.b4xmainpage __ref; keymon.lat.medicomed.b4xmainpage parent; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="b4xmainpage"; while (true) { switch (state) { @@ -576,62 +412,53 @@ parent.__c.ReturnFromResumableSub(this,null);return;} case 0: //C this.state = 1; -RDebugUtils.currentLine=983041; - //BA.debugLineNum = 983041;BA.debugLine="Log(\"closreq\")"; -parent.__c.LogImpl("3983041","closreq",0); -RDebugUtils.currentLine=983042; - //BA.debugLineNum = 983042;BA.debugLine="Sleep(0)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "b4xmainpage", "b4xpage_closerequest"),(int) (0)); + //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; ; -RDebugUtils.currentLine=983043; - //BA.debugLineNum = 983043;BA.debugLine="If p_appUpdate.Visible Then"; + //BA.debugLineNum = 519;BA.debugLine="If p_appUpdate.Visible Then"; if (true) break; case 1: //if this.state = 4; -if (__ref._p_appupdate /*anywheresoftware.b4a.objects.PanelWrapper*/ .getVisible()) { +if (parent._p_appupdate.getVisible()) { this.state = 3; }if (true) break; case 3: //C this.state = 4; -RDebugUtils.currentLine=983044; - //BA.debugLineNum = 983044;BA.debugLine="Log(\"update visible\")"; -parent.__c.LogImpl("3983044","update visible",0); -RDebugUtils.currentLine=983045; - //BA.debugLineNum = 983045;BA.debugLine="p_appUpdate.Visible = False"; -__ref._p_appupdate /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(parent.__c.False); -RDebugUtils.currentLine=983046; - //BA.debugLineNum = 983046;BA.debugLine="Return False"; + //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; ; -RDebugUtils.currentLine=983048; - //BA.debugLineNum = 983048;BA.debugLine="If Not(p_appUpdate.Visible) Then"; + //BA.debugLineNum = 524;BA.debugLine="If Not(p_appUpdate.Visible) Then"; case 4: //if this.state = 7; -if (parent.__c.Not(__ref._p_appupdate /*anywheresoftware.b4a.objects.PanelWrapper*/ .getVisible())) { +if (parent.__c.Not(parent._p_appupdate.getVisible())) { this.state = 6; }if (true) break; case 6: //C this.state = 7; -RDebugUtils.currentLine=983049; - //BA.debugLineNum = 983049;BA.debugLine="Log(\"ExitApplication\")"; -parent.__c.LogImpl("3983049","ExitApplication",0); -RDebugUtils.currentLine=983050; - //BA.debugLineNum = 983050;BA.debugLine="ExitApplication"; + //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; @@ -639,584 +466,389 @@ case 7: //C this.state = -1; ; -RDebugUtils.currentLine=983052; - //BA.debugLineNum = 983052;BA.debugLine="Return True"; + //BA.debugLineNum = 528;BA.debugLine="Return True"; if (true) { parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.True));return;}; -RDebugUtils.currentLine=983053; - //BA.debugLineNum = 983053;BA.debugLine="End Sub"; + //BA.debugLineNum = 529;BA.debugLine="End Sub"; if (true) break; } } } } -public String _b4xpage_created(keymon.lat.medicomed.b4xmainpage __ref,anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "b4xpage_created", false)) - {return ((String) Debug.delegate(ba, "b4xpage_created", new Object[] {_root1}));} -RDebugUtils.currentLine=720896; - //BA.debugLineNum = 720896;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -RDebugUtils.currentLine=720897; - //BA.debugLineNum = 720897;BA.debugLine="B4XPages.GetManager.LogEvents = True"; +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; -RDebugUtils.currentLine=720898; - //BA.debugLineNum = 720898;BA.debugLine="Root = Root1"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = _root1; -RDebugUtils.currentLine=720899; - //BA.debugLineNum = 720899;BA.debugLine="Root.LoadLayout(\"login\")"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .LoadLayout("login",ba); -RDebugUtils.currentLine=720900; - //BA.debugLineNum = 720900;BA.debugLine="B4XPages.SetTitle(Me, \"Medicomed Preventa\")"; + //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")); -RDebugUtils.currentLine=720901; - //BA.debugLineNum = 720901;BA.debugLine="login.Initialize"; -__ref._login /*keymon.lat.medicomed.b4xmainpage*/ ._initialize /*String*/ (null,ba); -RDebugUtils.currentLine=720902; - //BA.debugLineNum = 720902;BA.debugLine="B4XPages.AddPage(\"Login\", login)"; -_b4xpages._addpage /*String*/ (ba,"Login",(Object)(__ref._login /*keymon.lat.medicomed.b4xmainpage*/ )); -RDebugUtils.currentLine=720903; - //BA.debugLineNum = 720903;BA.debugLine="principal.Initialize"; -__ref._principal /*keymon.lat.medicomed.c_principal*/ ._initialize /*Object*/ (null,ba); -RDebugUtils.currentLine=720904; - //BA.debugLineNum = 720904;BA.debugLine="B4XPages.AddPage(\"Principal\", principal)"; -_b4xpages._addpage /*String*/ (ba,"Principal",(Object)(__ref._principal /*keymon.lat.medicomed.c_principal*/ )); -RDebugUtils.currentLine=720905; - //BA.debugLineNum = 720905;BA.debugLine="clientes.Initialize"; -__ref._clientes /*keymon.lat.medicomed.c_clientes*/ ._initialize /*Object*/ (null,ba); -RDebugUtils.currentLine=720906; - //BA.debugLineNum = 720906;BA.debugLine="B4XPages.AddPage(\"Clientes\", clientes)"; -_b4xpages._addpage /*String*/ (ba,"Clientes",(Object)(__ref._clientes /*keymon.lat.medicomed.c_clientes*/ )); -RDebugUtils.currentLine=720907; - //BA.debugLineNum = 720907;BA.debugLine="cliente.Initialize"; -__ref._cliente /*keymon.lat.medicomed.c_cliente*/ ._initialize /*Object*/ (null,ba); -RDebugUtils.currentLine=720908; - //BA.debugLineNum = 720908;BA.debugLine="B4XPages.AddPage(\"Cliente\", cliente)"; -_b4xpages._addpage /*String*/ (ba,"Cliente",(Object)(__ref._cliente /*keymon.lat.medicomed.c_cliente*/ )); -RDebugUtils.currentLine=720909; - //BA.debugLineNum = 720909;BA.debugLine="productos.Initialize"; -__ref._productos /*keymon.lat.medicomed.c_productos*/ ._initialize /*Object*/ (null,ba); -RDebugUtils.currentLine=720910; - //BA.debugLineNum = 720910;BA.debugLine="B4XPages.AddPage(\"Productos\", productos)"; -_b4xpages._addpage /*String*/ (ba,"Productos",(Object)(__ref._productos /*keymon.lat.medicomed.c_productos*/ )); -RDebugUtils.currentLine=720911; - //BA.debugLineNum = 720911;BA.debugLine="updateAvailable.Initialize"; -__ref._updateavailable /*keymon.lat.medicomed.c_updateavailable*/ ._initialize /*Object*/ (null,ba); -RDebugUtils.currentLine=720912; - //BA.debugLineNum = 720912;BA.debugLine="B4XPages.AddPage(\"updateAvailable\", updateAvailab"; -_b4xpages._addpage /*String*/ (ba,"updateAvailable",(Object)(__ref._updateavailable /*keymon.lat.medicomed.c_updateavailable*/ )); -RDebugUtils.currentLine=720913; - //BA.debugLineNum = 720913;BA.debugLine="mapas.Initialize"; -__ref._mapas /*keymon.lat.medicomed.c_mapas*/ ._initialize /*Object*/ (null,ba); -RDebugUtils.currentLine=720914; - //BA.debugLineNum = 720914;BA.debugLine="B4XPages.AddPage(\"Mapas\", mapas)"; -_b4xpages._addpage /*String*/ (ba,"Mapas",(Object)(__ref._mapas /*keymon.lat.medicomed.c_mapas*/ )); -RDebugUtils.currentLine=720915; - //BA.debugLineNum = 720915;BA.debugLine="nuevoCliente.Initialize"; -__ref._nuevocliente /*keymon.lat.medicomed.c_nuevocliente*/ ._initialize /*Object*/ (null,ba); -RDebugUtils.currentLine=720916; - //BA.debugLineNum = 720916;BA.debugLine="B4XPages.AddPage(\"NuevoCliente\", nuevoCliente)"; -_b4xpages._addpage /*String*/ (ba,"NuevoCliente",(Object)(__ref._nuevocliente /*keymon.lat.medicomed.c_nuevocliente*/ )); -RDebugUtils.currentLine=720917; - //BA.debugLineNum = 720917;BA.debugLine="ticketsDia.Initialize"; -__ref._ticketsdia /*keymon.lat.medicomed.c_ticketsdia*/ ._initialize /*Object*/ (null,ba); -RDebugUtils.currentLine=720918; - //BA.debugLineNum = 720918;BA.debugLine="B4XPages.AddPage(\"TicketsDia\", ticketsDia)"; -_b4xpages._addpage /*String*/ (ba,"TicketsDia",(Object)(__ref._ticketsdia /*keymon.lat.medicomed.c_ticketsdia*/ )); -RDebugUtils.currentLine=720919; - //BA.debugLineNum = 720919;BA.debugLine="noVenta.Initialize"; -__ref._noventa /*keymon.lat.medicomed.c_noventa*/ ._initialize /*Object*/ (null,ba); -RDebugUtils.currentLine=720920; - //BA.debugLineNum = 720920;BA.debugLine="B4XPages.AddPage(\"NoVenta\", noVenta)"; -_b4xpages._addpage /*String*/ (ba,"NoVenta",(Object)(__ref._noventa /*keymon.lat.medicomed.c_noventa*/ )); -RDebugUtils.currentLine=720921; - //BA.debugLineNum = 720921;BA.debugLine="nota.Initialize"; -__ref._nota /*keymon.lat.medicomed.c_nota*/ ._initialize /*Object*/ (null,ba); -RDebugUtils.currentLine=720922; - //BA.debugLineNum = 720922;BA.debugLine="B4XPages.AddPage(\"Nota\", nota)"; -_b4xpages._addpage /*String*/ (ba,"Nota",(Object)(__ref._nota /*keymon.lat.medicomed.c_nota*/ )); -RDebugUtils.currentLine=720923; - //BA.debugLineNum = 720923;BA.debugLine="pedidos.Initialize"; -__ref._pedidos /*keymon.lat.medicomed.c_pedidos*/ ._initialize /*Object*/ (null,ba); -RDebugUtils.currentLine=720924; - //BA.debugLineNum = 720924;BA.debugLine="B4XPages.AddPage(\"Pedidos\", pedidos)"; -_b4xpages._addpage /*String*/ (ba,"Pedidos",(Object)(__ref._pedidos /*keymon.lat.medicomed.c_pedidos*/ )); -RDebugUtils.currentLine=720925; - //BA.debugLineNum = 720925;BA.debugLine="promos.Initialize"; -__ref._promos /*keymon.lat.medicomed.c_promos*/ ._initialize /*Object*/ (null,ba); -RDebugUtils.currentLine=720926; - //BA.debugLineNum = 720926;BA.debugLine="B4XPages.AddPage(\"Promos\", promos)"; -_b4xpages._addpage /*String*/ (ba,"Promos",(Object)(__ref._promos /*keymon.lat.medicomed.c_promos*/ )); -RDebugUtils.currentLine=720927; - //BA.debugLineNum = 720927;BA.debugLine="historico.Initialize"; -__ref._historico /*keymon.lat.medicomed.c_historico*/ ._initialize /*Object*/ (null,ba); -RDebugUtils.currentLine=720928; - //BA.debugLineNum = 720928;BA.debugLine="B4XPages.AddPage(\"Historico\", historico)"; -_b4xpages._addpage /*String*/ (ba,"Historico",(Object)(__ref._historico /*keymon.lat.medicomed.c_historico*/ )); -RDebugUtils.currentLine=720929; - //BA.debugLineNum = 720929;BA.debugLine="ruta = Starter.ruta"; -__ref._ruta /*String*/ = _starter._ruta /*String*/ ; -RDebugUtils.currentLine=720931; - //BA.debugLineNum = 720931;BA.debugLine="Provider.Initialize"; -__ref._provider /*keymon.lat.medicomed.fileprovider*/ ._initialize /*String*/ (null,ba); -RDebugUtils.currentLine=720934; - //BA.debugLineNum = 720934;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; -if (__c.File.Exists(__ref._ruta /*String*/ ,"kmt.db")==__c.False) { -RDebugUtils.currentLine=720935; - //BA.debugLineNum = 720935;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=720936; - //BA.debugLineNum = 720936;BA.debugLine="Log(File.DirAssets)"; -__c.LogImpl("3720936",__c.File.getDirAssets(),0); -RDebugUtils.currentLine=720937; - //BA.debugLineNum = 720937;BA.debugLine="LogColor(\"copiamos kmt.db de \"&File.DirAssets &"; -__c.LogImpl("3720937","copiamos kmt.db de "+__c.File.getDirAssets()+" a "+__ref._ruta /*String*/ ,__c.Colors.Green); + //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); }; -RDebugUtils.currentLine=720939; - //BA.debugLineNum = 720939;BA.debugLine="Log(ruta)"; -__c.LogImpl("3720939",__ref._ruta /*String*/ ,0); -RDebugUtils.currentLine=720940; - //BA.debugLineNum = 720940;BA.debugLine="skmt.Initialize(ruta,\"kmt.db\", True)"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .Initialize(__ref._ruta /*String*/ ,"kmt.db",__c.True); -RDebugUtils.currentLine=720941; - //BA.debugLineNum = 720941;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIS"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .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)"); -RDebugUtils.currentLine=720942; - //BA.debugLineNum = 720942;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIS"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_GPS (HGDATE TEXT, HGLAT TEXT, HGLON TEXT)"); -RDebugUtils.currentLine=720943; - //BA.debugLineNum = 720943;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIS"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_STAY_STORE (HSS_CODIGO TEXT, HSS_IN TEXT, HSS_OUT TEXT, HSS_TOT TEXT)"); -RDebugUtils.currentLine=720944; - //BA.debugLineNum = 720944;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIS"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_STAY_OUT (HSO_INI TEXT, HSO_FIN TEXT)"); -RDebugUtils.currentLine=720945; - //BA.debugLineNum = 720945;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS INV"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("CREATE TABLE IF NOT EXISTS INVENT_X_ENVIAR (ALMACEN TEXT, PROID TEXT, CANTIDAD TEXT)"); -RDebugUtils.currentLine=720946; - //BA.debugLineNum = 720946;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIS"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .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)"); -RDebugUtils.currentLine=720947; - //BA.debugLineNum = 720947;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIS"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .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)"); -RDebugUtils.currentLine=720948; - //BA.debugLineNum = 720948;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIS"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_GEOCERCA (HGCLIENTE TEXT, HGDATE TEXT, HGLAT TEXT, HGLON TEXT)"); -RDebugUtils.currentLine=720949; - //BA.debugLineNum = 720949;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIS"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_FACE (HFCLIENTE TEXT, HFALIAS TEXT, HFRUTA TEXT, HFALMACEN TEXT)"); -RDebugUtils.currentLine=720950; - //BA.debugLineNum = 720950;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS RUT"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("CREATE TABLE IF NOT EXISTS RUTA_GPS(FECHA INTEGER, LAT TEXT, LON TEXT)"); -RDebugUtils.currentLine=720951; - //BA.debugLineNum = 720951;BA.debugLine="skmt.ExecNonQuery(\"CREATE VIEW IF NOT EXISTS CATA"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .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"); -RDebugUtils.currentLine=720952; - //BA.debugLineNum = 720952;BA.debugLine="skmt.ExecNonQuery(\"CREATE VIEW IF NOT EXISTS tota"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .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"); -RDebugUtils.currentLine=720953; - //BA.debugLineNum = 720953;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIS"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_MARCAS_CUOTAS (HMC_MARCA TEXT, HMC_TOTAL TEXT)"); -RDebugUtils.currentLine=720954; - //BA.debugLineNum = 720954;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIS"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_CODIGO_BARRAS(CODIGOKMTS TEXT, CODIGOB TEXT, LAT TEXT, LON TEXT)"); -RDebugUtils.currentLine=720955; - //BA.debugLineNum = 720955;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS ABO"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .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)"); -RDebugUtils.currentLine=720956; - //BA.debugLineNum = 720956;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS BIT"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .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)"); -RDebugUtils.currentLine=720957; - //BA.debugLineNum = 720957;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS VEN"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .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)"); -RDebugUtils.currentLine=720959; - //BA.debugLineNum = 720959;BA.debugLine="skmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS kmt"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .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)"); -RDebugUtils.currentLine=720961; - //BA.debugLineNum = 720961;BA.debugLine="Subs.agregaColumna(\"VENTA_No_VENTA\", \"montoVentav"; + //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"); -RDebugUtils.currentLine=720963; - //BA.debugLineNum = 720963;BA.debugLine="Try 'Intentamos usar \"pragma_table_info\" para rev"; -try {RDebugUtils.currentLine=720964; - //BA.debugLineNum = 720964;BA.debugLine="c=skmt.ExecQuery(\"SELECT COUNT(*) AS fCol FROM p"; -__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)(__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("SELECT COUNT(*) AS fCol FROM pragma_table_info('kmt_info') WHERE name='CAT_CL_DIASEMANA'"))); -RDebugUtils.currentLine=720965; - //BA.debugLineNum = 720965;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=720966; - //BA.debugLineNum = 720966;BA.debugLine="If c.GetString(\"fCol\") = 0 Then 'Si no esta la c"; -if ((__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("fCol")).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=720967; - //BA.debugLineNum = 720967;BA.debugLine="skmt.ExecNonQuery(\"ALTER TABLE kmt_info ADD COL"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("ALTER TABLE kmt_info ADD COLUMN CAT_CL_DIASEMANA 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);RDebugUtils.currentLine=720970; - //BA.debugLineNum = 720970;BA.debugLine="Try"; -try {RDebugUtils.currentLine=720971; - //BA.debugLineNum = 720971;BA.debugLine="skmt.ExecNonQuery(\"ALTER TABLE kmt_info ADD COL"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("ALTER TABLE kmt_info ADD COLUMN CAT_CL_DIASEMANA TEXT"); + 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);RDebugUtils.currentLine=720973; - //BA.debugLineNum = 720973;BA.debugLine="Log(LastException)"; -__c.LogImpl("3720973",BA.ObjectToString(__c.LastException(ba)),0); + ba.setLastException(e71); //BA.debugLineNum = 178;BA.debugLine="Log(LastException)"; +__c.LogImpl("3458829",BA.ObjectToString(__c.LastException(ba)),0); }; }; -RDebugUtils.currentLine=720976; - //BA.debugLineNum = 720976;BA.debugLine="Try 'Intentamos usar \"pragma_table_info\" para rev"; -try {RDebugUtils.currentLine=720977; - //BA.debugLineNum = 720977;BA.debugLine="c=skmt.ExecQuery(\"SELECT COUNT(*) AS fCol FROM p"; -__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)(__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("SELECT COUNT(*) AS fCol FROM pragma_table_info('CAT_GUNAPROD') WHERE name='CAT_GP_TIPOPROD2'"))); -RDebugUtils.currentLine=720978; - //BA.debugLineNum = 720978;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=720979; - //BA.debugLineNum = 720979;BA.debugLine="If c.GetString(\"fCol\") = 0 Then 'Si no esta la c"; -if ((__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("fCol")).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=720980; - //BA.debugLineNum = 720980;BA.debugLine="skmt.ExecNonQuery(\"ALTER TABLE CAT_GUNAPROD ADD"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("ALTER TABLE CAT_GUNAPROD ADD COLUMN CAT_GP_TIPOPROD2 TEXT"); + //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);RDebugUtils.currentLine=720983; - //BA.debugLineNum = 720983;BA.debugLine="Try"; -try {RDebugUtils.currentLine=720984; - //BA.debugLineNum = 720984;BA.debugLine="skmt.ExecNonQuery(\"ALTER TABLE CAT_GUNAPROD ADD"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("ALTER TABLE CAT_GUNAPROD ADD COLUMN CAT_GP_TIPOPROD2 TEXT"); + 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);RDebugUtils.currentLine=720986; - //BA.debugLineNum = 720986;BA.debugLine="Log(LastException)"; -__c.LogImpl("3720986",BA.ObjectToString(__c.LastException(ba)),0); + ba.setLastException(e84); //BA.debugLineNum = 191;BA.debugLine="Log(LastException)"; +__c.LogImpl("3458842",BA.ObjectToString(__c.LastException(ba)),0); }; }; -RDebugUtils.currentLine=720989; - //BA.debugLineNum = 720989;BA.debugLine="Try 'Intentamos usar \"pragma_table_info\" para rev"; -try {RDebugUtils.currentLine=720990; - //BA.debugLineNum = 720990;BA.debugLine="c=skmt.ExecQuery(\"SELECT COUNT(*) AS fCol FROM p"; -__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)(__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("SELECT COUNT(*) AS fCol FROM pragma_table_info('kmt_info') WHERE name='CAT_CL_SECUENCIA'"))); -RDebugUtils.currentLine=720991; - //BA.debugLineNum = 720991;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=720992; - //BA.debugLineNum = 720992;BA.debugLine="If c.GetString(\"fCol\") = 0 Then 'Si no esta la c"; -if ((__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("fCol")).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=720993; - //BA.debugLineNum = 720993;BA.debugLine="skmt.ExecNonQuery(\"ALTER TABLE kmt_info ADD COL"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("ALTER TABLE kmt_info ADD COLUMN CAT_CL_SECUENCIA INT"); + //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);RDebugUtils.currentLine=720996; - //BA.debugLineNum = 720996;BA.debugLine="Try"; -try {RDebugUtils.currentLine=720997; - //BA.debugLineNum = 720997;BA.debugLine="skmt.ExecNonQuery(\"ALTER TABLE kmt_info ADD COL"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("ALTER TABLE kmt_info ADD COLUMN CAT_CL_SECUENCIA INT"); + 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);RDebugUtils.currentLine=720999; - //BA.debugLineNum = 720999;BA.debugLine="Log(LastException)"; -__c.LogImpl("3720999",BA.ObjectToString(__c.LastException(ba)),0); + ba.setLastException(e97); //BA.debugLineNum = 204;BA.debugLine="Log(LastException)"; +__c.LogImpl("3458855",BA.ObjectToString(__c.LastException(ba)),0); }; }; -RDebugUtils.currentLine=721002; - //BA.debugLineNum = 721002;BA.debugLine="c=skmt.ExecQuery(\"select COUNT(*) AS CUANTOS from"; -__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)(__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select COUNT(*) AS CUANTOS from HIST_STAY_OUT "))); -RDebugUtils.currentLine=721003; - //BA.debugLineNum = 721003;BA.debugLine="C.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=721004; - //BA.debugLineNum = 721004;BA.debugLine="If c.GetString(\"CUANTOS\") = 0 Then"; -if ((__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=721005; - //BA.debugLineNum = 721005;BA.debugLine="skmt.ExecNonQuery(\"INSERT INTO HIST_STAY_OUT(HSO"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("INSERT INTO HIST_STAY_OUT(HSO_INI, HSO_FIN) VALUES (0,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)"); }; -RDebugUtils.currentLine=721007; - //BA.debugLineNum = 721007;BA.debugLine="C.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=721011; - //BA.debugLineNum = 721011;BA.debugLine="l_version.Text = Application.VersionName"; -__ref._l_version /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__c.Application.getVersionName())); -RDebugUtils.currentLine=721013; - //BA.debugLineNum = 721013;BA.debugLine="PopupMenu.Initialize(\"PopupMenu\", b_menu)"; -__ref._popupmenu /*com.rootsoft.rspopupmenu.RSPopupMenu*/ .Initialize(ba,"PopupMenu",(anywheresoftware.b4a.objects.ConcreteViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.ConcreteViewWrapper(), (android.view.View)(__ref._b_menu /*anywheresoftware.b4a.objects.ButtonWrapper*/ .getObject()))); -RDebugUtils.currentLine=721014; - //BA.debugLineNum = 721014;BA.debugLine="PopupMenu.AddMenuItem(0, 0, \"View\")"; -__ref._popupmenu /*com.rootsoft.rspopupmenu.RSPopupMenu*/ .AddMenuItem((int) (0),(int) (0),"View"); -RDebugUtils.currentLine=721015; - //BA.debugLineNum = 721015;BA.debugLine="PopupMenu.AddMenuItem(1, 1, \"Edit\")"; -__ref._popupmenu /*com.rootsoft.rspopupmenu.RSPopupMenu*/ .AddMenuItem((int) (1),(int) (1),"Edit"); -RDebugUtils.currentLine=721016; - //BA.debugLineNum = 721016;BA.debugLine="PopupMenu.AddMenuItem(2, 2, \"Details\")"; -__ref._popupmenu /*com.rootsoft.rspopupmenu.RSPopupMenu*/ .AddMenuItem((int) (2),(int) (2),"Details"); -RDebugUtils.currentLine=721017; - //BA.debugLineNum = 721017;BA.debugLine="PopupMenu.AddMenuItem(3, 3, \"Remove\")"; -__ref._popupmenu /*com.rootsoft.rspopupmenu.RSPopupMenu*/ .AddMenuItem((int) (3),(int) (3),"Remove"); -RDebugUtils.currentLine=721019; - //BA.debugLineNum = 721019;BA.debugLine="montoActual = 0"; -__ref._montoactual /*String*/ = BA.NumberToString(0); -RDebugUtils.currentLine=721020; - //BA.debugLineNum = 721020;BA.debugLine="clientesTotal = 0"; -__ref._clientestotal /*String*/ = BA.NumberToString(0); -RDebugUtils.currentLine=721021; - //BA.debugLineNum = 721021;BA.debugLine="clientesVenta = 0"; -__ref._clientesventa /*String*/ = BA.NumberToString(0); -RDebugUtils.currentLine=721022; - //BA.debugLineNum = 721022;BA.debugLine="clientesVisitados = 0"; -__ref._clientesvisitados /*String*/ = BA.NumberToString(0); -RDebugUtils.currentLine=721023; - //BA.debugLineNum = 721023;BA.debugLine="almacen = 0"; -__ref._almacen /*String*/ = BA.NumberToString(0); -RDebugUtils.currentLine=721024; - //BA.debugLineNum = 721024;BA.debugLine="rutaPreventa = 0"; -__ref._rutapreventa /*String*/ = BA.NumberToString(0); -RDebugUtils.currentLine=721025; - //BA.debugLineNum = 721025;BA.debugLine="p_appUpdate.Visible = False"; -__ref._p_appupdate /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=721036; - //BA.debugLineNum = 721036;BA.debugLine="p_appUpdate.Visible = False"; -__ref._p_appupdate /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=721037; - //BA.debugLineNum = 721037;BA.debugLine="End Sub"; + //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 _initialize(keymon.lat.medicomed.b4xmainpage __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "initialize", false)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=655360; - //BA.debugLineNum = 655360;BA.debugLine="Public Sub Initialize"; -RDebugUtils.currentLine=655362; - //BA.debugLineNum = 655362;BA.debugLine="End Sub"; -return ""; -} -public String _class_globals(keymon.lat.medicomed.b4xmainpage __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xmainpage"; -RDebugUtils.currentLine=589824; - //BA.debugLineNum = 589824;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=589825; - //BA.debugLineNum = 589825;BA.debugLine="Private Root As B4XView"; +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(); -RDebugUtils.currentLine=589826; - //BA.debugLineNum = 589826;BA.debugLine="Private xui As XUI"; + //BA.debugLineNum = 20;BA.debugLine="Private xui As XUI"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=589827; - //BA.debugLineNum = 589827;BA.debugLine="Public login As B4XMainPage"; + //BA.debugLineNum = 21;BA.debugLine="Public login As B4XMainPage"; _login = new keymon.lat.medicomed.b4xmainpage(); -RDebugUtils.currentLine=589828; - //BA.debugLineNum = 589828;BA.debugLine="Dim reqManager As DBRequestManager"; + //BA.debugLineNum = 22;BA.debugLine="Dim reqManager As DBRequestManager"; _reqmanager = new keymon.lat.medicomed.dbrequestmanager(); -RDebugUtils.currentLine=589829; - //BA.debugLineNum = 589829;BA.debugLine="Public principal As C_Principal"; + //BA.debugLineNum = 23;BA.debugLine="Public principal As C_Principal"; _principal = new keymon.lat.medicomed.c_principal(); -RDebugUtils.currentLine=589830; - //BA.debugLineNum = 589830;BA.debugLine="Public clientes As C_Clientes"; + //BA.debugLineNum = 24;BA.debugLine="Public clientes As C_Clientes"; _clientes = new keymon.lat.medicomed.c_clientes(); -RDebugUtils.currentLine=589831; - //BA.debugLineNum = 589831;BA.debugLine="Public cliente As C_Cliente"; + //BA.debugLineNum = 25;BA.debugLine="Public cliente As C_Cliente"; _cliente = new keymon.lat.medicomed.c_cliente(); -RDebugUtils.currentLine=589832; - //BA.debugLineNum = 589832;BA.debugLine="Public productos As C_Productos"; + //BA.debugLineNum = 26;BA.debugLine="Public productos As C_Productos"; _productos = new keymon.lat.medicomed.c_productos(); -RDebugUtils.currentLine=589833; - //BA.debugLineNum = 589833;BA.debugLine="Public updateAvailable As C_UpdateAvailable"; + //BA.debugLineNum = 27;BA.debugLine="Public updateAvailable As C_UpdateAvailable"; _updateavailable = new keymon.lat.medicomed.c_updateavailable(); -RDebugUtils.currentLine=589834; - //BA.debugLineNum = 589834;BA.debugLine="Public mapas As C_Mapas"; + //BA.debugLineNum = 28;BA.debugLine="Public mapas As C_Mapas"; _mapas = new keymon.lat.medicomed.c_mapas(); -RDebugUtils.currentLine=589835; - //BA.debugLineNum = 589835;BA.debugLine="Public nuevoCliente As C_NuevoCliente"; + //BA.debugLineNum = 29;BA.debugLine="Public nuevoCliente As C_NuevoCliente"; _nuevocliente = new keymon.lat.medicomed.c_nuevocliente(); -RDebugUtils.currentLine=589836; - //BA.debugLineNum = 589836;BA.debugLine="Public ticketsDia As C_TicketsDia"; + //BA.debugLineNum = 30;BA.debugLine="Public ticketsDia As C_TicketsDia"; _ticketsdia = new keymon.lat.medicomed.c_ticketsdia(); -RDebugUtils.currentLine=589837; - //BA.debugLineNum = 589837;BA.debugLine="Public noVenta As C_NoVenta"; + //BA.debugLineNum = 31;BA.debugLine="Public noVenta As C_NoVenta"; _noventa = new keymon.lat.medicomed.c_noventa(); -RDebugUtils.currentLine=589838; - //BA.debugLineNum = 589838;BA.debugLine="Public nota As C_Nota"; + //BA.debugLineNum = 32;BA.debugLine="Public nota As C_Nota"; _nota = new keymon.lat.medicomed.c_nota(); -RDebugUtils.currentLine=589839; - //BA.debugLineNum = 589839;BA.debugLine="Public pedidos As C_Pedidos"; + //BA.debugLineNum = 33;BA.debugLine="Public pedidos As C_Pedidos"; _pedidos = new keymon.lat.medicomed.c_pedidos(); -RDebugUtils.currentLine=589840; - //BA.debugLineNum = 589840;BA.debugLine="Public promos As C_Promos"; + //BA.debugLineNum = 34;BA.debugLine="Public promos As C_Promos"; _promos = new keymon.lat.medicomed.c_promos(); -RDebugUtils.currentLine=589841; - //BA.debugLineNum = 589841;BA.debugLine="Public historico As C_Historico"; + //BA.debugLineNum = 35;BA.debugLine="Public historico As C_Historico"; _historico = new keymon.lat.medicomed.c_historico(); -RDebugUtils.currentLine=589853; - //BA.debugLineNum = 589853;BA.debugLine="Dim reqManager As DBRequestManager"; + //BA.debugLineNum = 47;BA.debugLine="Dim reqManager As DBRequestManager"; _reqmanager = new keymon.lat.medicomed.dbrequestmanager(); -RDebugUtils.currentLine=589854; - //BA.debugLineNum = 589854;BA.debugLine="Dim v As String = Application.VersionName"; + //BA.debugLineNum = 48;BA.debugLine="Dim v As String = Application.VersionName"; _v = __c.Application.getVersionName(); -RDebugUtils.currentLine=589855; - //BA.debugLineNum = 589855;BA.debugLine="Dim ruta As String"; + //BA.debugLineNum = 49;BA.debugLine="Dim ruta As String"; _ruta = ""; -RDebugUtils.currentLine=589856; - //BA.debugLineNum = 589856;BA.debugLine="Dim tgl As Toggle"; + //BA.debugLineNum = 50;BA.debugLine="Dim tgl As Toggle"; _tgl = new com.rootsoft.togglelibrary.ToggleLibrary(); -RDebugUtils.currentLine=589857; - //BA.debugLineNum = 589857;BA.debugLine="Dim lat_gps, lon_gps As String"; + //BA.debugLineNum = 51;BA.debugLine="Dim lat_gps, lon_gps As String"; _lat_gps = ""; _lon_gps = ""; -RDebugUtils.currentLine=589858; - //BA.debugLineNum = 589858;BA.debugLine="Dim usuario As String"; + //BA.debugLineNum = 52;BA.debugLine="Dim usuario As String"; _usuario = ""; -RDebugUtils.currentLine=589859; - //BA.debugLineNum = 589859;BA.debugLine="Dim batt As Int"; + //BA.debugLineNum = 53;BA.debugLine="Dim batt As Int"; _batt = 0; -RDebugUtils.currentLine=589860; - //BA.debugLineNum = 589860;BA.debugLine="Dim skmt As SQL"; + //BA.debugLineNum = 54;BA.debugLine="Dim skmt As SQL"; _skmt = new anywheresoftware.b4a.sql.SQL(); -RDebugUtils.currentLine=589861; - //BA.debugLineNum = 589861;BA.debugLine="Dim montoActual, clientesTotal, clientesVenta, cl"; + //BA.debugLineNum = 55;BA.debugLine="Dim montoActual, clientesTotal, clientesVenta, cl"; _montoactual = ""; _clientestotal = ""; _clientesventa = ""; _clientesvisitados = ""; _almacen = ""; _rutapreventa = ""; -RDebugUtils.currentLine=589862; - //BA.debugLineNum = 589862;BA.debugLine="Dim server, fechaRuta As String"; + //BA.debugLineNum = 56;BA.debugLine="Dim server, fechaRuta As String"; _server = ""; _fecharuta = ""; -RDebugUtils.currentLine=589863; - //BA.debugLineNum = 589863;BA.debugLine="Dim Logger As Boolean"; + //BA.debugLineNum = 57;BA.debugLine="Dim Logger As Boolean"; _logger = false; -RDebugUtils.currentLine=589864; - //BA.debugLineNum = 589864;BA.debugLine="Dim mac_impresora As String"; + //BA.debugLineNum = 58;BA.debugLine="Dim mac_impresora As String"; _mac_impresora = ""; -RDebugUtils.currentLine=589865; - //BA.debugLineNum = 589865;BA.debugLine="Dim Phn As PhoneId"; + //BA.debugLineNum = 59;BA.debugLine="Dim Phn As PhoneId"; _phn = new anywheresoftware.b4a.phone.Phone.PhoneId(); -RDebugUtils.currentLine=589867; - //BA.debugLineNum = 589867;BA.debugLine="Dim user As EditText"; + //BA.debugLineNum = 61;BA.debugLine="Dim user As EditText"; _user = new anywheresoftware.b4a.objects.EditTextWrapper(); -RDebugUtils.currentLine=589868; - //BA.debugLineNum = 589868;BA.debugLine="Dim pass As EditText"; + //BA.debugLineNum = 62;BA.debugLine="Dim pass As EditText"; _pass = new anywheresoftware.b4a.objects.EditTextWrapper(); -RDebugUtils.currentLine=589869; - //BA.debugLineNum = 589869;BA.debugLine="Dim c As Cursor"; + //BA.debugLineNum = 63;BA.debugLine="Dim c As Cursor"; _c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=589870; - //BA.debugLineNum = 589870;BA.debugLine="Dim existe As String"; + //BA.debugLineNum = 64;BA.debugLine="Dim existe As String"; _existe = ""; -RDebugUtils.currentLine=589871; - //BA.debugLineNum = 589871;BA.debugLine="Dim paso1 As String"; + //BA.debugLineNum = 65;BA.debugLine="Dim paso1 As String"; _paso1 = ""; -RDebugUtils.currentLine=589872; - //BA.debugLineNum = 589872;BA.debugLine="Private IMEN As Label"; + //BA.debugLineNum = 66;BA.debugLine="Private IMEN As Label"; _imen = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=589873; - //BA.debugLineNum = 589873;BA.debugLine="Dim IMEI As String = \"\""; + //BA.debugLineNum = 67;BA.debugLine="Dim IMEI As String = \"\""; _imei = ""; -RDebugUtils.currentLine=589874; - //BA.debugLineNum = 589874;BA.debugLine="Dim alterno As String"; + //BA.debugLineNum = 68;BA.debugLine="Dim alterno As String"; _alterno = ""; -RDebugUtils.currentLine=589875; - //BA.debugLineNum = 589875;BA.debugLine="Private b_menu As Button"; + //BA.debugLineNum = 69;BA.debugLine="Private b_menu As Button"; _b_menu = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=589876; - //BA.debugLineNum = 589876;BA.debugLine="Dim PopupMenu As RSPopupMenu"; + //BA.debugLineNum = 70;BA.debugLine="Dim PopupMenu As RSPopupMenu"; _popupmenu = new com.rootsoft.rspopupmenu.RSPopupMenu(); -RDebugUtils.currentLine=589877; - //BA.debugLineNum = 589877;BA.debugLine="Dim cmd As DBCommand"; + //BA.debugLineNum = 71;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=589878; - //BA.debugLineNum = 589878;BA.debugLine="Private PDF As Button"; + //BA.debugLineNum = 72;BA.debugLine="Private PDF As Button"; _pdf = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=589879; - //BA.debugLineNum = 589879;BA.debugLine="Private bpv1 As BatteryProgressView"; + //BA.debugLineNum = 73;BA.debugLine="Private bpv1 As BatteryProgressView"; _bpv1 = new batteryprogressviewwrapper.batteryprogressviewWrapper(); -RDebugUtils.currentLine=589880; - //BA.debugLineNum = 589880;BA.debugLine="Dim batterystatus(11) As Int"; + //BA.debugLineNum = 74;BA.debugLine="Dim batterystatus(11) As Int"; _batterystatus = new int[(int) (11)]; ; -RDebugUtils.currentLine=589881; - //BA.debugLineNum = 589881;BA.debugLine="Private bu As BatteryUtilities"; + //BA.debugLineNum = 75;BA.debugLine="Private bu As BatteryUtilities"; _bu = new keymon.lat.medicomed.batteryutilities(); -RDebugUtils.currentLine=589882; - //BA.debugLineNum = 589882;BA.debugLine="Private b_apk As Button"; + //BA.debugLineNum = 76;BA.debugLine="Private b_apk As Button"; _b_apk = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=589883; - //BA.debugLineNum = 589883;BA.debugLine="Private i_engrane As ImageView"; + //BA.debugLineNum = 77;BA.debugLine="Private i_engrane As ImageView"; _i_engrane = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=589884; - //BA.debugLineNum = 589884;BA.debugLine="Private p_Main As Panel"; + //BA.debugLineNum = 78;BA.debugLine="Private p_Main As Panel"; _p_main = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=589885; - //BA.debugLineNum = 589885;BA.debugLine="Private p_appUpdate As Panel"; + //BA.debugLineNum = 79;BA.debugLine="Private p_appUpdate As Panel"; _p_appupdate = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=589886; - //BA.debugLineNum = 589886;BA.debugLine="Private b_regesar As Button"; + //BA.debugLineNum = 80;BA.debugLine="Private b_regesar As Button"; _b_regesar = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=589887; - //BA.debugLineNum = 589887;BA.debugLine="Private l_version As Label"; + //BA.debugLineNum = 81;BA.debugLine="Private l_version As Label"; _l_version = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=589888; - //BA.debugLineNum = 589888;BA.debugLine="Private ImageView1 As ImageView"; + //BA.debugLineNum = 82;BA.debugLine="Private ImageView1 As ImageView"; _imageview1 = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=589889; - //BA.debugLineNum = 589889;BA.debugLine="Private Label2 As Label"; + //BA.debugLineNum = 83;BA.debugLine="Private Label2 As Label"; _label2 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=589890; - //BA.debugLineNum = 589890;BA.debugLine="Private Entrar As Button"; + //BA.debugLineNum = 84;BA.debugLine="Private Entrar As Button"; _entrar = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=589891; - //BA.debugLineNum = 589891;BA.debugLine="Dim tipo_venta As String"; + //BA.debugLineNum = 85;BA.debugLine="Dim tipo_venta As String"; _tipo_venta = ""; -RDebugUtils.currentLine=589892; - //BA.debugLineNum = 589892;BA.debugLine="Dim bTerminarClicked As Boolean = False"; + //BA.debugLineNum = 86;BA.debugLine="Dim bTerminarClicked As Boolean = False"; _bterminarclicked = __c.False; -RDebugUtils.currentLine=589893; - //BA.debugLineNum = 589893;BA.debugLine="Private lv_server As ListView"; + //BA.debugLineNum = 87;BA.debugLine="Private lv_server As ListView"; _lv_server = new anywheresoftware.b4a.objects.ListViewWrapper(); -RDebugUtils.currentLine=589894; - //BA.debugLineNum = 589894;BA.debugLine="Private l_server As Label"; + //BA.debugLineNum = 88;BA.debugLine="Private l_server As Label"; _l_server = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=589895; - //BA.debugLineNum = 589895;BA.debugLine="Private et_server As EditText"; + //BA.debugLineNum = 89;BA.debugLine="Private et_server As EditText"; _et_server = new anywheresoftware.b4a.objects.EditTextWrapper(); -RDebugUtils.currentLine=589896; - //BA.debugLineNum = 589896;BA.debugLine="Private b_server As Button"; + //BA.debugLineNum = 90;BA.debugLine="Private b_server As Button"; _b_server = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=589897; - //BA.debugLineNum = 589897;BA.debugLine="Private b_envioBD As Button"; + //BA.debugLineNum = 91;BA.debugLine="Private b_envioBD As Button"; _b_enviobd = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=589898; - //BA.debugLineNum = 589898;BA.debugLine="Public Provider As FileProvider"; + //BA.debugLineNum = 92;BA.debugLine="Public Provider As FileProvider"; _provider = new keymon.lat.medicomed.fileprovider(); -RDebugUtils.currentLine=589899; - //BA.debugLineNum = 589899;BA.debugLine="Public rutaBDBackup As String = \"\""; + //BA.debugLineNum = 93;BA.debugLine="Public rutaBDBackup As String = \"\""; _rutabdbackup = ""; -RDebugUtils.currentLine=589900; - //BA.debugLineNum = 589900;BA.debugLine="End Sub"; + //BA.debugLineNum = 94;BA.debugLine="End Sub"; return ""; } -public void _copiadb(keymon.lat.medicomed.b4xmainpage __ref) throws Exception{ -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "copiadb", false)) - {Debug.delegate(ba, "copiadb", null); return;} -ResumableSub_copiaDB rsub = new ResumableSub_copiaDB(this,__ref); +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,keymon.lat.medicomed.b4xmainpage __ref) { +public ResumableSub_copiaDB(keymon.lat.medicomed.b4xmainpage parent) { this.parent = parent; -this.__ref = __ref; -this.__ref = parent; } -keymon.lat.medicomed.b4xmainpage __ref; keymon.lat.medicomed.b4xmainpage parent; String _permission = ""; boolean _result = false; @@ -1224,7 +856,6 @@ String _thedir = ""; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="b4xmainpage"; while (true) { try { @@ -1236,25 +867,21 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=1441793; - //BA.debugLineNum = 1441793;BA.debugLine="Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_"; + //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); -RDebugUtils.currentLine=1441794; - //BA.debugLineNum = 1441794;BA.debugLine="Wait For B4XPage_PermissionResult (Permission As"; -parent.__c.WaitFor("b4xpage_permissionresult", ba, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "b4xmainpage", "copiadb"), null); + //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[1]; -_result = (Boolean) result[2]; +_permission = (String) result[0]; +_result = (Boolean) result[1]; ; -RDebugUtils.currentLine=1441795; - //BA.debugLineNum = 1441795;BA.debugLine="Dim theDir As String = \"\""; + //BA.debugLineNum = 595;BA.debugLine="Dim theDir As String = \"\""; _thedir = ""; -RDebugUtils.currentLine=1441796; - //BA.debugLineNum = 1441796;BA.debugLine="If Result Then"; + //BA.debugLineNum = 596;BA.debugLine="If Result Then"; if (true) break; case 1: @@ -1269,11 +896,9 @@ this.state = 16; case 3: //C this.state = 4; -RDebugUtils.currentLine=1441803; - //BA.debugLineNum = 1441803;BA.debugLine="Dim theDir As String"; + //BA.debugLineNum = 603;BA.debugLine="Dim theDir As String"; _thedir = ""; -RDebugUtils.currentLine=1441804; - //BA.debugLineNum = 1441804;BA.debugLine="Try"; + //BA.debugLineNum = 604;BA.debugLine="Try"; if (true) break; case 4: @@ -1287,11 +912,9 @@ case 6: //C this.state = 9; this.catchState = 8; -RDebugUtils.currentLine=1441805; - //BA.debugLineNum = 1441805;BA.debugLine="File.MakeDir(File.DirRootExternal,\"kmts\")"; + //BA.debugLineNum = 605;BA.debugLine="File.MakeDir(File.DirRootExternal,\"kmts\")"; parent.__c.File.MakeDir(parent.__c.File.getDirRootExternal(),"kmts"); -RDebugUtils.currentLine=1441806; - //BA.debugLineNum = 1441806;BA.debugLine="theDir = \"/kmts\""; + //BA.debugLineNum = 606;BA.debugLine="theDir = \"/kmts\""; _thedir = "/kmts"; if (true) break; @@ -1299,14 +922,12 @@ case 8: //C this.state = 9; this.catchState = 0; -RDebugUtils.currentLine=1441808; - //BA.debugLineNum = 1441808;BA.debugLine="theDir = \"\""; + //BA.debugLineNum = 608;BA.debugLine="theDir = \"\""; _thedir = ""; if (true) break; if (true) break; ; -RDebugUtils.currentLine=1441810; - //BA.debugLineNum = 1441810;BA.debugLine="Try"; + //BA.debugLineNum = 610;BA.debugLine="Try"; case 9: //try @@ -1320,11 +941,9 @@ case 11: //C this.state = 14; this.catchState = 13; -RDebugUtils.currentLine=1441811; - //BA.debugLineNum = 1441811;BA.debugLine="File.Copy(File.DirInternal,\"kmt.db\",File.DirRoo"; + //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"); -RDebugUtils.currentLine=1441812; - //BA.debugLineNum = 1441812;BA.debugLine="ToastMessageShow(\"Listo, copiado a \" & File.Dir"; + //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; @@ -1332,8 +951,7 @@ case 13: //C this.state = 14; this.catchState = 0; -RDebugUtils.currentLine=1441814; - //BA.debugLineNum = 1441814;BA.debugLine="ToastMessageShow(\"No se pudo hacer la copia: \"&"; + //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; @@ -1348,8 +966,7 @@ this.catchState = 0; case 16: //C this.state = 17; -RDebugUtils.currentLine=1441817; - //BA.debugLineNum = 1441817;BA.debugLine="ToastMessageShow(\"Sin permisos\", False)"; + //BA.debugLineNum = 617;BA.debugLine="ToastMessageShow(\"Sin permisos\", False)"; parent.__c.ToastMessageShow(BA.ObjectToCharSequence("Sin permisos"),parent.__c.False); if (true) break; @@ -1357,8 +974,7 @@ case 17: //C this.state = -1; ; -RDebugUtils.currentLine=1441819; - //BA.debugLineNum = 1441819;BA.debugLine="End Sub"; + //BA.debugLineNum = 619;BA.debugLine="End Sub"; if (true) break; }} catch (Exception e0) { @@ -1372,355 +988,256 @@ ba.setLastException(e0);} } } } -public String _entrar_click(keymon.lat.medicomed.b4xmainpage __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "entrar_click", false)) - {return ((String) Debug.delegate(ba, "entrar_click", null));} +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; -RDebugUtils.currentLine=851968; - //BA.debugLineNum = 851968;BA.debugLine="Sub Entrar_Click"; -RDebugUtils.currentLine=851969; - //BA.debugLineNum = 851969;BA.debugLine="Dim r As Reflector"; + //BA.debugLineNum = 293;BA.debugLine="Sub Entrar_Click"; + //BA.debugLineNum = 294;BA.debugLine="Dim r As Reflector"; _r = new anywheresoftware.b4a.agraham.reflection.Reflection(); -RDebugUtils.currentLine=851970; - //BA.debugLineNum = 851970;BA.debugLine="Dim Api As Int"; + //BA.debugLineNum = 295;BA.debugLine="Dim Api As Int"; _api = 0; -RDebugUtils.currentLine=851971; - //BA.debugLineNum = 851971;BA.debugLine="Dim PP As Phone"; + //BA.debugLineNum = 296;BA.debugLine="Dim PP As Phone"; _pp = new anywheresoftware.b4a.phone.Phone(); -RDebugUtils.currentLine=851972; - //BA.debugLineNum = 851972;BA.debugLine="Api = r.GetStaticField(\"android.os.Build$VERSION\""; + //BA.debugLineNum = 297;BA.debugLine="Api = r.GetStaticField(\"android.os.Build$VERSION\""; _api = (int)(BA.ObjectToNumber(_r.GetStaticField("android.os.Build$VERSION","SDK_INT"))); -RDebugUtils.currentLine=851973; - //BA.debugLineNum = 851973;BA.debugLine="If Api < 9 Then"; + //BA.debugLineNum = 298;BA.debugLine="If Api < 9 Then"; if (_api<9) { -RDebugUtils.currentLine=851975; - //BA.debugLineNum = 851975;BA.debugLine="If File.Exists(File.DirInternal, \"__id\") Then"; + //BA.debugLineNum = 300;BA.debugLine="If File.Exists(File.DirInternal, \"__id\") Then"; if (__c.File.Exists(__c.File.getDirInternal(),"__id")) { -RDebugUtils.currentLine=851976; - //BA.debugLineNum = 851976;BA.debugLine="IMEI = File.ReadString(File.DirInternal, \"__id"; -__ref._imei /*String*/ = __c.File.ReadString(__c.File.getDirInternal(),"__id"); -RDebugUtils.currentLine=851977; - //BA.debugLineNum = 851977;BA.debugLine="Log(1&\"-\"&IMEI)"; -__c.LogImpl("3851977",BA.NumberToString(1)+"-"+__ref._imei /*String*/ ,0); + //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 { -RDebugUtils.currentLine=851979; - //BA.debugLineNum = 851979;BA.debugLine="Dim id As Int"; + //BA.debugLineNum = 304;BA.debugLine="Dim id As Int"; _id = 0; -RDebugUtils.currentLine=851980; - //BA.debugLineNum = 851980;BA.debugLine="id = Rnd(0x10000000, 0x7FFFFFFF)"; + //BA.debugLineNum = 305;BA.debugLine="id = Rnd(0x10000000, 0x7FFFFFFF)"; _id = __c.Rnd(((int)0x10000000),((int)0x7fffffff)); -RDebugUtils.currentLine=851981; - //BA.debugLineNum = 851981;BA.debugLine="File.WriteString(File.DirInternal, \"__id\", id)"; + //BA.debugLineNum = 306;BA.debugLine="File.WriteString(File.DirInternal, \"__id\", id)"; __c.File.WriteString(__c.File.getDirInternal(),"__id",BA.NumberToString(_id)); -RDebugUtils.currentLine=851982; - //BA.debugLineNum = 851982;BA.debugLine="IMEI = id"; -__ref._imei /*String*/ = BA.NumberToString(_id); -RDebugUtils.currentLine=851983; - //BA.debugLineNum = 851983;BA.debugLine="Log(2&\"-\"&IMEI)"; -__c.LogImpl("3851983",BA.NumberToString(2)+"-"+__ref._imei /*String*/ ,0); + //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 { -RDebugUtils.currentLine=851987; - //BA.debugLineNum = 851987;BA.debugLine="IMEI = r.GetStaticField(\"android.os.Build\", \"SE"; -__ref._imei /*String*/ = BA.ObjectToString(_r.GetStaticField("android.os.Build","SERIAL")); + //BA.debugLineNum = 312;BA.debugLine="IMEI = r.GetStaticField(\"android.os.Build\", \"SE"; +_imei = BA.ObjectToString(_r.GetStaticField("android.os.Build","SERIAL")); }; -RDebugUtils.currentLine=851990; - //BA.debugLineNum = 851990;BA.debugLine="If IMEI.ToLowerCase = \"unknown\" Then"; -if ((__ref._imei /*String*/ .toLowerCase()).equals("unknown")) { -RDebugUtils.currentLine=851991; - //BA.debugLineNum = 851991;BA.debugLine="IMEI = PP.GetSettings(\"android_id\")"; -__ref._imei /*String*/ = _pp.GetSettings("android_id"); + //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"); }; -RDebugUtils.currentLine=851995; - //BA.debugLineNum = 851995;BA.debugLine="If user.Text = \"ALTERNO\" Then"; -if ((__ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()).equals("ALTERNO")) { -RDebugUtils.currentLine=851996; - //BA.debugLineNum = 851996;BA.debugLine="c=skmt.ExecQuery2(\"select CAT_CO_CONFIGURACION,"; -__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)(__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery2("select CAT_CO_CONFIGURACION, CAT_CO_RESULTADO from CAT_CODIGOS where CAT_CO_PONDERACION =1 AND CAT_CO_ACCION = ?",new String[]{"SERVER"}))); -RDebugUtils.currentLine=851997; - //BA.debugLineNum = 851997;BA.debugLine="c.Position =0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=851998; - //BA.debugLineNum = 851998;BA.debugLine="server = c.GetString(\"CAT_CO_CONFIGURACION\")"; -__ref._server /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CO_CONFIGURACION"); -RDebugUtils.currentLine=851999; - //BA.debugLineNum = 851999;BA.debugLine="alterno = c.GetString(\"CAT_CO_RESULTADO\")"; -__ref._alterno /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CO_RESULTADO"); -RDebugUtils.currentLine=852000; - //BA.debugLineNum = 852000;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=852001; - //BA.debugLineNum = 852001;BA.debugLine="If alterno = 1 Then"; -if ((__ref._alterno /*String*/ ).equals(BA.NumberToString(1))) { -RDebugUtils.currentLine=852002; - //BA.debugLineNum = 852002;BA.debugLine="skmt.ExecNonQuery2(\"UPDATE CAT_CODIGOS SET CAT_"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .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"})); -RDebugUtils.currentLine=852003; - //BA.debugLineNum = 852003;BA.debugLine="skmt.ExecNonQuery2(\"UPDATE CAT_CODIGOS SET CAT_"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .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 -{RDebugUtils.currentLine=852004; - //BA.debugLineNum = 852004;BA.debugLine="Else if alterno = 2 Then"; -if ((__ref._alterno /*String*/ ).equals(BA.NumberToString(2))) { -RDebugUtils.currentLine=852005; - //BA.debugLineNum = 852005;BA.debugLine="skmt.ExecNonQuery2(\"UPDATE CAT_CODIGOS SET CAT_"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .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"})); -RDebugUtils.currentLine=852006; - //BA.debugLineNum = 852006;BA.debugLine="skmt.ExecNonQuery2(\"UPDATE CAT_CODIGOS SET CAT_"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .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"})); - }} -; -RDebugUtils.currentLine=852008; - //BA.debugLineNum = 852008;BA.debugLine="c=skmt.ExecQuery2(\"select CAT_CO_CONFIGURACION,"; -__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)(__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery2("select CAT_CO_CONFIGURACION, CAT_CO_RESULTADO from CAT_CODIGOS where CAT_CO_PONDERACION =1 AND CAT_CO_ACCION = ?",new String[]{"SERVER"}))); -RDebugUtils.currentLine=852009; - //BA.debugLineNum = 852009;BA.debugLine="c.Position =0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=852010; - //BA.debugLineNum = 852010;BA.debugLine="server = c.GetString(\"CAT_CO_CONFIGURACION\")"; -__ref._server /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CO_CONFIGURACION"); -RDebugUtils.currentLine=852011; - //BA.debugLineNum = 852011;BA.debugLine="user.Text = server"; -__ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence(__ref._server /*String*/ )); -RDebugUtils.currentLine=852012; - //BA.debugLineNum = 852012;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); - }else -{RDebugUtils.currentLine=852014; - //BA.debugLineNum = 852014;BA.debugLine="else if user.Text = \"KMTS1\" Then"; -if ((__ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()).equals("KMTS1")) { -RDebugUtils.currentLine=852015; - //BA.debugLineNum = 852015;BA.debugLine="skmt.ExecNonQuery(\"delete from usuarioa\")"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from usuarioa"); -RDebugUtils.currentLine=852016; - //BA.debugLineNum = 852016;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO USUARIOA VALUES"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO USUARIOA VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._pass /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText())})); -RDebugUtils.currentLine=852017; - //BA.debugLineNum = 852017;BA.debugLine="skmt.ExecNonQuery(\"delete from cat_almacen\")"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from cat_almacen"); -RDebugUtils.currentLine=852018; - //BA.debugLineNum = 852018;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO CAT_ALMACEN(ID_A"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO CAT_ALMACEN(ID_ALMACEN) VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._pass /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText())})); -RDebugUtils.currentLine=852019; - //BA.debugLineNum = 852019;BA.debugLine="skmt.ExecNonQuery(\"delete from VERSION\")"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from VERSION"); -RDebugUtils.currentLine=852020; - //BA.debugLineNum = 852020;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO VERSION(NOVERSIO"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO VERSION(NOVERSION) VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("2.1")})); -RDebugUtils.currentLine=852021; - //BA.debugLineNum = 852021;BA.debugLine="B4XPages.ShowPage(\"Clientes\")"; + //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 -{RDebugUtils.currentLine=852022; - //BA.debugLineNum = 852022;BA.debugLine="else if user.Text = \"BERNA1\" Then"; -if ((__ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()).equals("BERNA1")) { -RDebugUtils.currentLine=852023; - //BA.debugLineNum = 852023;BA.debugLine="skmt.ExecNonQuery(\"delete from usuarioa\")"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from usuarioa"); -RDebugUtils.currentLine=852024; - //BA.debugLineNum = 852024;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO USUARIOA VALUES"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO USUARIOA VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)("1")})); -RDebugUtils.currentLine=852025; - //BA.debugLineNum = 852025;BA.debugLine="skmt.ExecNonQuery(\"delete from cat_almacen\")"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from cat_almacen"); -RDebugUtils.currentLine=852026; - //BA.debugLineNum = 852026;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO CAT_ALMACEN(ID_A"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO CAT_ALMACEN(ID_ALMACEN) VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("1")})); -RDebugUtils.currentLine=852027; - //BA.debugLineNum = 852027;BA.debugLine="skmt.ExecNonQuery(\"delete from VERSION\")"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from VERSION"); -RDebugUtils.currentLine=852028; - //BA.debugLineNum = 852028;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO VERSION(NOVERSIO"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO VERSION(NOVERSION) VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("2.1")})); -RDebugUtils.currentLine=852029; - //BA.debugLineNum = 852029;BA.debugLine="B4XPages.ShowPage(\"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 -{RDebugUtils.currentLine=852030; - //BA.debugLineNum = 852030;BA.debugLine="else if user.Text = \"IMEI\" Then"; -if ((__ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()).equals("IMEI")) { -RDebugUtils.currentLine=852031; - //BA.debugLineNum = 852031;BA.debugLine="user.Text = IMEI"; -__ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence(__ref._imei /*String*/ )); - }}}} -; -RDebugUtils.currentLine=852034; - //BA.debugLineNum = 852034;BA.debugLine="c=skmt.ExecQuery2(\"select count(*) as EXISTE1 fro"; -__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)(__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery2("select count(*) as EXISTE1 from usuarioa where usuario = ?",new String[]{__ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()}))); -RDebugUtils.currentLine=852035; - //BA.debugLineNum = 852035;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=852036; - //BA.debugLineNum = 852036;BA.debugLine="existe = c.GetString(\"EXISTE1\")"; -__ref._existe /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("EXISTE1"); -RDebugUtils.currentLine=852037; - //BA.debugLineNum = 852037;BA.debugLine="If existe = 0 Then"; -if ((__ref._existe /*String*/ ).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=852038; - //BA.debugLineNum = 852038;BA.debugLine="If IMEI = \"\" Then"; -if ((__ref._imei /*String*/ ).equals("")) { -RDebugUtils.currentLine=852039; - //BA.debugLineNum = 852039;BA.debugLine="Dim cmd As DBCommand"; + }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(); -RDebugUtils.currentLine=852040; - //BA.debugLineNum = 852040;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=852041; - //BA.debugLineNum = 852041;BA.debugLine="cmd.Name = \"select_usuario_MEDI_10\" 'Antes sele"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_usuario_MEDI_10"; -RDebugUtils.currentLine=852042; - //BA.debugLineNum = 852042;BA.debugLine="cmd.Parameters = Array As Object(user.Text.Trim"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText().trim()),(Object)(__ref._pass /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText().trim())}; -RDebugUtils.currentLine=852043; - //BA.debugLineNum = 852043;BA.debugLine="reqManager.ExecuteQuery(cmd , 0, \"usuario_10\")"; -__ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("usuario_10")); + //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 { -RDebugUtils.currentLine=852045; - //BA.debugLineNum = 852045;BA.debugLine="If IMEI = \"\" Then"; -if ((__ref._imei /*String*/ ).equals("")) { -RDebugUtils.currentLine=852046; - //BA.debugLineNum = 852046;BA.debugLine="Dim cmd As DBCommand"; + //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(); -RDebugUtils.currentLine=852047; - //BA.debugLineNum = 852047;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=852048; - //BA.debugLineNum = 852048;BA.debugLine="cmd.Name = \"select_usuario_MEDI_10\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_usuario_MEDI_10"; -RDebugUtils.currentLine=852049; - //BA.debugLineNum = 852049;BA.debugLine="cmd.Parameters = Array As Object(user.Text.Tri"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText().trim()),(Object)(__ref._pass /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText().trim())}; -RDebugUtils.currentLine=852050; - //BA.debugLineNum = 852050;BA.debugLine="reqManager.ExecuteQuery(cmd , 0, \"usuario_10\")"; -__ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("usuario_10")); + //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 { -RDebugUtils.currentLine=852052; - //BA.debugLineNum = 852052;BA.debugLine="Dim cmd As DBCommand"; + //BA.debugLineNum = 377;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=852053; - //BA.debugLineNum = 852053;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=852054; - //BA.debugLineNum = 852054;BA.debugLine="cmd.Name = \"select_usuario_MEDI_10\" 'Antes sel"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_usuario_MEDI_10"; -RDebugUtils.currentLine=852055; - //BA.debugLineNum = 852055;BA.debugLine="cmd.Parameters = Array As Object(user.Text.Tri"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText().trim()),(Object)(__ref._pass /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText().trim())}; -RDebugUtils.currentLine=852056; - //BA.debugLineNum = 852056;BA.debugLine="Log(\"Mandamos: \"&user.Text&\"|\"& pass.Text)"; -__c.LogImpl("3852056","Mandamos: "+__ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()+"|"+__ref._pass /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText(),0); -RDebugUtils.currentLine=852057; - //BA.debugLineNum = 852057;BA.debugLine="reqManager.ExecuteQuery(cmd , 0, \"usuario_10\")"; -__ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("usuario_10")); + //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")); }; }; -RDebugUtils.currentLine=852060; - //BA.debugLineNum = 852060;BA.debugLine="Dim cmd As DBCommand"; + //BA.debugLineNum = 385;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=852061; - //BA.debugLineNum = 852061;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=852062; - //BA.debugLineNum = 852062;BA.debugLine="cmd.Name = \"select_version_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_version_MEDI"; -RDebugUtils.currentLine=852063; - //BA.debugLineNum = 852063;BA.debugLine="reqManager.ExecuteQuery(cmd , 0, \"version\")"; -__ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("version")); + //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 { -RDebugUtils.currentLine=852065; - //BA.debugLineNum = 852065;BA.debugLine="usuario = user.Text"; -__ref._usuario /*String*/ = __ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText(); -RDebugUtils.currentLine=852066; - //BA.debugLineNum = 852066;BA.debugLine="B4XPages.ShowPage(\"Principal\")"; + //BA.debugLineNum = 390;BA.debugLine="usuario = user.Text"; +_usuario = _user.getText(); + //BA.debugLineNum = 391;BA.debugLine="B4XPages.ShowPage(\"Principal\")"; _b4xpages._showpage /*String*/ (ba,"Principal"); }; -RDebugUtils.currentLine=852068; - //BA.debugLineNum = 852068;BA.debugLine="End Sub"; + //BA.debugLineNum = 393;BA.debugLine="End Sub"; return ""; } -public String _entrar_longclick(keymon.lat.medicomed.b4xmainpage __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "entrar_longclick", false)) - {return ((String) Debug.delegate(ba, "entrar_longclick", null));} -RDebugUtils.currentLine=1966080; - //BA.debugLineNum = 1966080;BA.debugLine="Sub Entrar_LongClick"; -RDebugUtils.currentLine=1966082; - //BA.debugLineNum = 1966082;BA.debugLine="End Sub"; +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(keymon.lat.medicomed.b4xmainpage __ref,anywheresoftware.b4a.gps.LocationWrapper _location1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "gps_locationchanged", false)) - {return ((String) Debug.delegate(ba, "gps_locationchanged", new Object[] {_location1}));} -RDebugUtils.currentLine=1048576; - //BA.debugLineNum = 1048576;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; -RDebugUtils.currentLine=1048577; - //BA.debugLineNum = 1048577;BA.debugLine="If user.text = \"GPS\" Then"; -if ((__ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()).equals("GPS")) { -RDebugUtils.currentLine=1048578; - //BA.debugLineNum = 1048578;BA.debugLine="user.Text=Location1.Latitude"; -__ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence(_location1.getLatitude())); -RDebugUtils.currentLine=1048579; - //BA.debugLineNum = 1048579;BA.debugLine="pass.text=Location1.Longitude"; -__ref._pass /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence(_location1.getLongitude())); +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())); }; -RDebugUtils.currentLine=1048581; - //BA.debugLineNum = 1048581;BA.debugLine="End Sub"; + //BA.debugLineNum = 536;BA.debugLine="End Sub"; return ""; } -public String _i_engrane_click(keymon.lat.medicomed.b4xmainpage __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "i_engrane_click", false)) - {return ((String) Debug.delegate(ba, "i_engrane_click", null));} -RDebugUtils.currentLine=1703936; - //BA.debugLineNum = 1703936;BA.debugLine="Sub i_engrane_Click"; -RDebugUtils.currentLine=1703937; - //BA.debugLineNum = 1703937;BA.debugLine="lv_server.Clear"; -__ref._lv_server /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear(); -RDebugUtils.currentLine=1703938; - //BA.debugLineNum = 1703938;BA.debugLine="lv_server.AddSingleLine(\"http://keymon.lat:1781\")"; -__ref._lv_server /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddSingleLine(BA.ObjectToCharSequence("http://keymon.lat:1781")); -RDebugUtils.currentLine=1703939; - //BA.debugLineNum = 1703939;BA.debugLine="If user.Text = \"KMTS1\" Then lv_server.AddSingleLi"; -if ((__ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()).equals("KMTS1")) { -__ref._lv_server /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddSingleLine(BA.ObjectToCharSequence("http://10.0.0.205:1781"));}; -RDebugUtils.currentLine=1703941; - //BA.debugLineNum = 1703941;BA.debugLine="et_server.Text = Starter.server"; -__ref._et_server /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence(_starter._server /*String*/ )); -RDebugUtils.currentLine=1703942; - //BA.debugLineNum = 1703942;BA.debugLine="Subs.panelVisible(p_appUpdate,0,0)"; -_subs._panelvisible /*String*/ (ba,__ref._p_appupdate /*anywheresoftware.b4a.objects.PanelWrapper*/ ,(int) (0),(int) (0)); -RDebugUtils.currentLine=1703943; - //BA.debugLineNum = 1703943;BA.debugLine="End Sub"; +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(keymon.lat.medicomed.b4xmainpage __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "i_engrane_longclick", false)) - {return ((String) Debug.delegate(ba, "i_engrane_longclick", null));} -RDebugUtils.currentLine=1835008; - //BA.debugLineNum = 1835008;BA.debugLine="Sub i_engrane_LongClick"; -RDebugUtils.currentLine=1835009; - //BA.debugLineNum = 1835009;BA.debugLine="copiaDB"; -__ref._copiadb /*void*/ (null); -RDebugUtils.currentLine=1835010; - //BA.debugLineNum = 1835010;BA.debugLine="End Sub"; +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 _jobdone(keymon.lat.medicomed.b4xmainpage __ref,keymon.lat.medicomed.httpjob _job) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "jobdone", false)) - {return ((String) Debug.delegate(ba, "jobdone", new Object[] {_job}));} +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 = ""; @@ -1729,32 +1246,23 @@ String _id_almacen = ""; String _fecha_hoy = ""; String _name = ""; String _imei_base = ""; -RDebugUtils.currentLine=917504; - //BA.debugLineNum = 917504;BA.debugLine="Sub JobDone(Job As HttpJob)"; -RDebugUtils.currentLine=917505; - //BA.debugLineNum = 917505;BA.debugLine="Log(Job.Success)"; -__c.LogImpl("3917505",BA.ObjectToString(_job._success /*boolean*/ ),0); -RDebugUtils.currentLine=917506; - //BA.debugLineNum = 917506;BA.debugLine="If Job.Success = False Then"; + //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) { -RDebugUtils.currentLine=917507; - //BA.debugLineNum = 917507;BA.debugLine="ToastMessageShow(\"Error - MainPage: \" & Job.Erro"; + //BA.debugLineNum = 398;BA.debugLine="ToastMessageShow(\"Error - MainPage: \" & Job.Erro"; __c.ToastMessageShow(BA.ObjectToCharSequence("Error - MainPage: "+_job._errormessage /*String*/ ),__c.True); }else { -RDebugUtils.currentLine=917509; - //BA.debugLineNum = 917509;BA.debugLine="LogColor(\"JobDone - MainPage: '\" & reqManager.Ha"; -__c.LogImpl("3917509","JobDone - MainPage: '"+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=917510; - //BA.debugLineNum = 917510;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //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")) { -RDebugUtils.currentLine=917511; - //BA.debugLineNum = 917511;BA.debugLine="Dim result As DBResult = reqManager.HandleJob(J"; -_result = __ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=917512; - //BA.debugLineNum = 917512;BA.debugLine="If result.Tag = \"version\" Then 'query tag"; + //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"))) { -RDebugUtils.currentLine=917513; - //BA.debugLineNum = 917513;BA.debugLine="For Each records() As Object In result.Rows"; + //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() @@ -1762,23 +1270,18 @@ final int groupLen9 = group9.getSize() ; for (; index9 < groupLen9;index9++){ _records = (Object[])(group9.Get(index9)); -RDebugUtils.currentLine=917514; - //BA.debugLineNum = 917514;BA.debugLine="skmt.ExecNonQuery(\"delete from VERSION\")"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from VERSION"); -RDebugUtils.currentLine=917515; - //BA.debugLineNum = 917515;BA.debugLine="Dim CAT_VE_VERSION As String = records(result"; + //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"))))]); -RDebugUtils.currentLine=917516; - //BA.debugLineNum = 917516;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO VERSION(NOVER"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO VERSION(NOVERSION) VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(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)})); } }; }; -RDebugUtils.currentLine=917520; - //BA.debugLineNum = 917520;BA.debugLine="If result.Tag = \"select_fechat\" Then 'query tag"; + //BA.debugLineNum = 411;BA.debugLine="If result.Tag = \"select_fechat\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("select_fechat"))) { -RDebugUtils.currentLine=917521; - //BA.debugLineNum = 917521;BA.debugLine="For Each records() As Object In result.Rows"; + //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() @@ -1786,8 +1289,7 @@ final int groupLen16 = group16.getSize() ; for (; index16 < groupLen16;index16++){ _records = (Object[])(group16.Get(index16)); -RDebugUtils.currentLine=917522; - //BA.debugLineNum = 917522;BA.debugLine="For Each k As String In result.Columns.Keys"; + //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() @@ -1795,26 +1297,21 @@ final int groupLen17 = group17.getSize() ; for (; index17 < groupLen17;index17++){ _k = BA.ObjectToString(group17.Get(index17)); -RDebugUtils.currentLine=917523; - //BA.debugLineNum = 917523;BA.debugLine="Log(\"select_fechat: \" & k & \": \" & records(r"; -__c.LogImpl("3917523","select_fechat: "+_k+": "+BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)(_k))))]),0); + //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); } }; } }; }; }; -RDebugUtils.currentLine=917529; - //BA.debugLineNum = 917529;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 420;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=917530; - //BA.debugLineNum = 917530;BA.debugLine="Dim result As DBResult = reqManager.HandleJob(J"; -_result = __ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=917531; - //BA.debugLineNum = 917531;BA.debugLine="If result.Tag = \"agencia\" Then 'query tag"; + //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"))) { -RDebugUtils.currentLine=917532; - //BA.debugLineNum = 917532;BA.debugLine="For Each records() As Object In result.Rows"; + //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() @@ -1822,24 +1319,19 @@ final int groupLen26 = group26.getSize() ; for (; index26 < groupLen26;index26++){ _records = (Object[])(group26.Get(index26)); -RDebugUtils.currentLine=917533; - //BA.debugLineNum = 917533;BA.debugLine="Dim ID_ALMACEN As String = records(result.Col"; + //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"))))]); } }; }; }; -RDebugUtils.currentLine=917538; - //BA.debugLineNum = 917538;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 429;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=917539; - //BA.debugLineNum = 917539;BA.debugLine="Dim result As DBResult = reqManager.HandleJob(J"; -_result = __ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=917540; - //BA.debugLineNum = 917540;BA.debugLine="If result.Tag = \"fecha\" Then 'query tag"; + //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"))) { -RDebugUtils.currentLine=917541; - //BA.debugLineNum = 917541;BA.debugLine="For Each records() As Object In result.Rows"; + //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() @@ -1847,30 +1339,23 @@ final int groupLen34 = group34.getSize() ; for (; index34 < groupLen34;index34++){ _records = (Object[])(group34.Get(index34)); -RDebugUtils.currentLine=917542; - //BA.debugLineNum = 917542;BA.debugLine="Dim FECHA_HOY As String = records(result.Colu"; + //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"))))]); -RDebugUtils.currentLine=917543; - //BA.debugLineNum = 917543;BA.debugLine="skmt.ExecNonQuery2(\"delete from CAT_VARIABLES"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("delete from CAT_VARIABLES where CAT_VA_DESCRIPCION = ?",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("FECHA")})); -RDebugUtils.currentLine=917544; - //BA.debugLineNum = 917544;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO CAT_VARIABLES"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .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 = 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)})); } }; }; }; -RDebugUtils.currentLine=917549; - //BA.debugLineNum = 917549;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 440;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=917550; - //BA.debugLineNum = 917550;BA.debugLine="Dim result As DBResult = reqManager.HandleJob(J"; -_result = __ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=917551; - //BA.debugLineNum = 917551;BA.debugLine="If result.Tag = \"usuario\" Then 'query tag"; + //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"))) { -RDebugUtils.currentLine=917552; - //BA.debugLineNum = 917552;BA.debugLine="For Each records() As Object In result.Rows"; + //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() @@ -1878,42 +1363,31 @@ final int groupLen44 = group44.getSize() ; for (; index44 < groupLen44;index44++){ _records = (Object[])(group44.Get(index44)); -RDebugUtils.currentLine=917553; - //BA.debugLineNum = 917553;BA.debugLine="Dim name As String = records(result.Columns.G"; + //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"))))]); -RDebugUtils.currentLine=917554; - //BA.debugLineNum = 917554;BA.debugLine="Dim ID_ALMACEN As String = records(result.Col"; + //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"))))]); -RDebugUtils.currentLine=917555; - //BA.debugLineNum = 917555;BA.debugLine="Dim IMEI_BASE As String = records(result.Colu"; + //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"))))]); -RDebugUtils.currentLine=917556; - //BA.debugLineNum = 917556;BA.debugLine="Log(records(result.Columns.Get(\"CAT_LO_IDTELE"; -__c.LogImpl("3917556",BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_LO_IDTELEFONO"))))]),0); + //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); } }; -RDebugUtils.currentLine=917558; - //BA.debugLineNum = 917558;BA.debugLine="paso1 = 1"; -__ref._paso1 /*String*/ = BA.NumberToString(1); -RDebugUtils.currentLine=917559; - //BA.debugLineNum = 917559;BA.debugLine="ToastMessageShow(name, False)"; + //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); -RDebugUtils.currentLine=917560; - //BA.debugLineNum = 917560;BA.debugLine="Log(\"////////////////////////// \"&name)"; -__c.LogImpl("3917560","////////////////////////// "+_name,0); + //BA.debugLineNum = 451;BA.debugLine="Log(\"////////////////////////// \"&name)"; +__c.LogImpl("3655416","////////////////////////// "+_name,0); }; }; -RDebugUtils.currentLine=917564; - //BA.debugLineNum = 917564;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 455;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=917565; - //BA.debugLineNum = 917565;BA.debugLine="Dim result As DBResult = reqManager.HandleJob(J"; -_result = __ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=917566; - //BA.debugLineNum = 917566;BA.debugLine="If result.Tag = \"usuario_10\" Then 'query tag"; + //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"))) { -RDebugUtils.currentLine=917567; - //BA.debugLineNum = 917567;BA.debugLine="For Each records() As Object In result.Rows"; + //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() @@ -1921,236 +1395,159 @@ final int groupLen58 = group58.getSize() ; for (; index58 < groupLen58;index58++){ _records = (Object[])(group58.Get(index58)); -RDebugUtils.currentLine=917568; - //BA.debugLineNum = 917568;BA.debugLine="Dim name As String = records(result.Columns.G"; + //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"))))]); -RDebugUtils.currentLine=917569; - //BA.debugLineNum = 917569;BA.debugLine="Dim ID_ALMACEN As String = records(result.Col"; + //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"))))]); -RDebugUtils.currentLine=917570; - //BA.debugLineNum = 917570;BA.debugLine="Dim IMEI_BASE As String = records(result.Colu"; + //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"))))]); } }; -RDebugUtils.currentLine=917572; - //BA.debugLineNum = 917572;BA.debugLine="Log(\"|\"&name&\"|\")"; -__c.LogImpl("3917572","|"+_name+"|",0); -RDebugUtils.currentLine=917573; - //BA.debugLineNum = 917573;BA.debugLine="paso1 = 1"; -__ref._paso1 /*String*/ = BA.NumberToString(1); -RDebugUtils.currentLine=917574; - //BA.debugLineNum = 917574;BA.debugLine="IMEI_BASE = \"\""; + //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 = ""; -RDebugUtils.currentLine=917575; - //BA.debugLineNum = 917575;BA.debugLine="IMEI = \"\""; -__ref._imei /*String*/ = ""; + //BA.debugLineNum = 466;BA.debugLine="IMEI = \"\""; +_imei = ""; }; }; -RDebugUtils.currentLine=917578; - //BA.debugLineNum = 917578;BA.debugLine="Job.Release"; -_job._release /*String*/ (null); + //BA.debugLineNum = 469;BA.debugLine="Job.Release"; +_job._release /*String*/ (); }; -RDebugUtils.currentLine=917580; - //BA.debugLineNum = 917580;BA.debugLine="Log($\"Paso1 = ${paso1} - Name: ${name} - IMEI: ${"; -__c.LogImpl("3917580",("Paso1 = "+__c.SmartStringFormatter("",(Object)(__ref._paso1 /*String*/ ))+" - Name: "+__c.SmartStringFormatter("",(Object)(_name))+" - IMEI: "+__c.SmartStringFormatter("",(Object)(__ref._imei /*String*/ ))+" - IMEI_BASE: "+__c.SmartStringFormatter("",(Object)(_imei_base))+""),0); -RDebugUtils.currentLine=917581; - //BA.debugLineNum = 917581;BA.debugLine="If paso1 = 1 Then"; -if ((__ref._paso1 /*String*/ ).equals(BA.NumberToString(1))) { -RDebugUtils.currentLine=917582; - //BA.debugLineNum = 917582;BA.debugLine="If IMEI = \"\" Then"; -if ((__ref._imei /*String*/ ).equals("")) { -RDebugUtils.currentLine=917583; - //BA.debugLineNum = 917583;BA.debugLine="If user.Text = \"KMTS1\" Then name = \"OKActivo\""; -if ((__ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()).equals("KMTS1")) { + //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";}; -RDebugUtils.currentLine=917584; - //BA.debugLineNum = 917584;BA.debugLine="If name = \"OKActivo\" Then"; + //BA.debugLineNum = 475;BA.debugLine="If name = \"OKActivo\" Then"; if ((_name).equals("OKActivo")) { -RDebugUtils.currentLine=917585; - //BA.debugLineNum = 917585;BA.debugLine="skmt.ExecNonQuery(\"delete from usuarioa\")"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from usuarioa"); -RDebugUtils.currentLine=917586; - //BA.debugLineNum = 917586;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO USUARIOA VALUE"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO USUARIOA VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText().trim()),(Object)(__ref._pass /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText().trim())})); -RDebugUtils.currentLine=917587; - //BA.debugLineNum = 917587;BA.debugLine="skmt.ExecNonQuery(\"delete from cat_almacen\")"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from cat_almacen"); -RDebugUtils.currentLine=917588; - //BA.debugLineNum = 917588;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO CAT_ALMACEN(ID"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO CAT_ALMACEN(ID_ALMACEN) VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_id_almacen)})); -RDebugUtils.currentLine=917589; - //BA.debugLineNum = 917589;BA.debugLine="usuario = user.Text"; -__ref._usuario /*String*/ = __ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText(); -RDebugUtils.currentLine=917590; - //BA.debugLineNum = 917590;BA.debugLine="B4XPages.ShowPage(\"Principal\")"; + //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 -{RDebugUtils.currentLine=917591; - //BA.debugLineNum = 917591;BA.debugLine="Else If name = \"OKExpirado\" Then"; -if ((_name).equals("OKExpirado")) { -RDebugUtils.currentLine=917592; - //BA.debugLineNum = 917592;BA.debugLine="Msgbox(\"Usuario Expirado llamar al administrad"; + }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 -{RDebugUtils.currentLine=917593; - //BA.debugLineNum = 917593;BA.debugLine="Else If name = \"OKCancelado\" Then"; -if ((_name).equals("OKCancelado")) { -RDebugUtils.currentLine=917594; - //BA.debugLineNum = 917594;BA.debugLine="Msgbox(\"Usuario Cancelado llamar al administra"; + }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 { -RDebugUtils.currentLine=917596; - //BA.debugLineNum = 917596;BA.debugLine="Msgbox(\"Usuario o password No validos\",\"\") 'Ig"; + //BA.debugLineNum = 487;BA.debugLine="Msgbox(\"Usuario o password No validos\",\"\") 'Ig"; __c.Msgbox(BA.ObjectToCharSequence("Usuario o password No validos"),BA.ObjectToCharSequence(""),ba); - }}} -; -RDebugUtils.currentLine=917598; - //BA.debugLineNum = 917598;BA.debugLine="paso1 = 0"; -__ref._paso1 /*String*/ = BA.NumberToString(0); + }; + //BA.debugLineNum = 489;BA.debugLine="paso1 = 0"; +_paso1 = BA.NumberToString(0); }else { -RDebugUtils.currentLine=917600; - //BA.debugLineNum = 917600;BA.debugLine="If name = \"OKActivo\" & IMEI And IMEI = IMEI_BA"; -if ((_name).equals("OKActivo"+__ref._imei /*String*/ ) && (__ref._imei /*String*/ ).equals(_imei_base)) { -RDebugUtils.currentLine=917601; - //BA.debugLineNum = 917601;BA.debugLine="If name = \"OKActivo\" & IMEI Then"; -if ((_name).equals("OKActivo"+__ref._imei /*String*/ )) { -RDebugUtils.currentLine=917602; - //BA.debugLineNum = 917602;BA.debugLine="skmt.ExecNonQuery(\"delete from usuarioa\")"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from usuarioa"); -RDebugUtils.currentLine=917603; - //BA.debugLineNum = 917603;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO USUARIOA VALU"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO USUARIOA VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText().trim()),(Object)(__ref._pass /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText().trim())})); -RDebugUtils.currentLine=917604; - //BA.debugLineNum = 917604;BA.debugLine="skmt.ExecNonQuery(\"delete from cat_almacen\")"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from cat_almacen"); -RDebugUtils.currentLine=917605; - //BA.debugLineNum = 917605;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO CAT_ALMACEN(I"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO CAT_ALMACEN(ID_ALMACEN) VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_id_almacen)})); -RDebugUtils.currentLine=917606; - //BA.debugLineNum = 917606;BA.debugLine="usuario = user.Text"; -__ref._usuario /*String*/ = __ref._user /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText(); -RDebugUtils.currentLine=917607; - //BA.debugLineNum = 917607;BA.debugLine="B4XPages.ShowPage(\"Clientes\")"; + //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 -{RDebugUtils.currentLine=917608; - //BA.debugLineNum = 917608;BA.debugLine="Else If name = \"OKExpirado\"& IMEI Then"; -if ((_name).equals("OKExpirado"+__ref._imei /*String*/ )) { -RDebugUtils.currentLine=917609; - //BA.debugLineNum = 917609;BA.debugLine="Msgbox(\"Usuario Expirado llamar al administra"; + }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 -{RDebugUtils.currentLine=917610; - //BA.debugLineNum = 917610;BA.debugLine="Else If name = \"OKCancelado\"& IMEI Then"; -if ((_name).equals("OKCancelado"+__ref._imei /*String*/ )) { -RDebugUtils.currentLine=917611; - //BA.debugLineNum = 917611;BA.debugLine="Msgbox(\"Usuario Cancelado llamar al administr"; + }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 { -RDebugUtils.currentLine=917613; - //BA.debugLineNum = 917613;BA.debugLine="Msgbox(\"Usuario o password No validos\",\"\") 'i"; + //BA.debugLineNum = 504;BA.debugLine="Msgbox(\"Usuario o password No validos\",\"\") 'i"; __c.Msgbox(BA.ObjectToCharSequence("Usuario o password No validos"),BA.ObjectToCharSequence(""),ba); - }}} -; -RDebugUtils.currentLine=917615; - //BA.debugLineNum = 917615;BA.debugLine="paso1 = 0"; -__ref._paso1 /*String*/ = BA.NumberToString(0); - }else -{RDebugUtils.currentLine=917616; - //BA.debugLineNum = 917616;BA.debugLine="Else IF name = \"OKActivo\" Then"; -if ((_name).equals("OKActivo")) { -RDebugUtils.currentLine=917617; - //BA.debugLineNum = 917617;BA.debugLine="Msgbox(\"Telefono no VALIDO!\",\"\") 'ignore"; + }; + //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 { -RDebugUtils.currentLine=917619; - //BA.debugLineNum = 917619;BA.debugLine="Msgbox(\"Usuario o password No validos\",\"\") 'ig"; + //BA.debugLineNum = 510;BA.debugLine="Msgbox(\"Usuario o password No validos\",\"\") 'ig"; __c.Msgbox(BA.ObjectToCharSequence("Usuario o password No validos"),BA.ObjectToCharSequence(""),ba); - }} -; }; }; -RDebugUtils.currentLine=917623; - //BA.debugLineNum = 917623;BA.debugLine="End Sub"; + }; + //BA.debugLineNum = 514;BA.debugLine="End Sub"; return ""; } -public String _lv_server_itemclick(keymon.lat.medicomed.b4xmainpage __ref,int _position,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "lv_server_itemclick", false)) - {return ((String) Debug.delegate(ba, "lv_server_itemclick", new Object[] {_position,_value}));} -RDebugUtils.currentLine=2031616; - //BA.debugLineNum = 2031616;BA.debugLine="Private Sub lv_server_ItemClick (Position As Int,"; -RDebugUtils.currentLine=2031617; - //BA.debugLineNum = 2031617;BA.debugLine="Starter.server = Value"; +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); -RDebugUtils.currentLine=2031619; - //BA.debugLineNum = 2031619;BA.debugLine="et_server.Text = Value"; -__ref._et_server /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence(_value)); -RDebugUtils.currentLine=2031620; - //BA.debugLineNum = 2031620;BA.debugLine="Starter.reqManager.Initialize(Me, Value)"; -_starter._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._initialize /*String*/ (null,ba,this,BA.ObjectToString(_value)); -RDebugUtils.currentLine=2031621; - //BA.debugLineNum = 2031621;BA.debugLine="ToastMessageShow(\"Servidor modificado\", False)"; + //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); -RDebugUtils.currentLine=2031622; - //BA.debugLineNum = 2031622;BA.debugLine="End Sub"; + //BA.debugLineNum = 675;BA.debugLine="End Sub"; return ""; } -public String _ocultaprogreso(keymon.lat.medicomed.b4xmainpage __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "ocultaprogreso", false)) - {return ((String) Debug.delegate(ba, "ocultaprogreso", null));} -RDebugUtils.currentLine=1638400; - //BA.debugLineNum = 1638400;BA.debugLine="Sub ocultaProgreso"; -RDebugUtils.currentLine=1638401; - //BA.debugLineNum = 1638401;BA.debugLine="ProgressDialogHide"; +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(); -RDebugUtils.currentLine=1638402; - //BA.debugLineNum = 1638402;BA.debugLine="End Sub"; + //BA.debugLineNum = 633;BA.debugLine="End Sub"; return ""; } -public String _pdf_click(keymon.lat.medicomed.b4xmainpage __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "pdf_click", false)) - {return ((String) Debug.delegate(ba, "pdf_click", null));} -RDebugUtils.currentLine=1310720; - //BA.debugLineNum = 1310720;BA.debugLine="Sub PDF_Click"; -RDebugUtils.currentLine=1310722; - //BA.debugLineNum = 1310722;BA.debugLine="End Sub"; +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(keymon.lat.medicomed.b4xmainpage __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "popupmenu_dismiss", false)) - {return ((String) Debug.delegate(ba, "popupmenu_dismiss", null));} -RDebugUtils.currentLine=1114112; - //BA.debugLineNum = 1114112;BA.debugLine="Sub PopupMenu_Dismiss"; -RDebugUtils.currentLine=1114113; - //BA.debugLineNum = 1114113;BA.debugLine="ToastMessageShow(\"PopupMenu dismissed\", False)"; +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); -RDebugUtils.currentLine=1114114; - //BA.debugLineNum = 1114114;BA.debugLine="End Sub"; + //BA.debugLineNum = 540;BA.debugLine="End Sub"; return ""; } -public boolean _popupmenu_menuitemclick(keymon.lat.medicomed.b4xmainpage __ref,int _itemid) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xmainpage"; -if (Debug.shouldDelegate(ba, "popupmenu_menuitemclick", false)) - {return ((Boolean) Debug.delegate(ba, "popupmenu_menuitemclick", new Object[] {_itemid}));} -RDebugUtils.currentLine=1179648; - //BA.debugLineNum = 1179648;BA.debugLine="Sub PopupMenu_MenuItemClick (ItemId As Int) As Boo"; -RDebugUtils.currentLine=1179649; - //BA.debugLineNum = 1179649;BA.debugLine="ToastMessageShow(\"Item \" & ItemId & \" clicked.\","; +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); -RDebugUtils.currentLine=1179650; - //BA.debugLineNum = 1179650;BA.debugLine="Return False"; + //BA.debugLineNum = 544;BA.debugLine="Return False"; if (true) return __c.False; -RDebugUtils.currentLine=1179651; - //BA.debugLineNum = 1179651;BA.debugLine="End Sub"; + //BA.debugLineNum = 545;BA.debugLine="End Sub"; return false; } -} \ No newline at end of file +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; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xorderedmap.java b/B4A/Objects/src/keymon/lat/medicomed/b4xorderedmap.java index 61f4ee8..3e158a1 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xorderedmap.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xorderedmap.java @@ -10,7 +10,7 @@ public class b4xorderedmap extends B4AClass.ImplB4AClass implements BA.SubDelega private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xorderedmap"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xorderedmap"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xorderedmap extends B4AClass.ImplB4AClass implements BA.SubDelega 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.keywords.Common __c = null; public anywheresoftware.b4a.objects.collections.Map _map = null; public anywheresoftware.b4a.objects.collections.List _list = null; public b4a.example.dateutils _dateutils = null; @@ -45,237 +38,139 @@ 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 boolean _containskey(keymon.lat.medicomed.b4xorderedmap __ref,Object _key) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xorderedmap"; -if (Debug.shouldDelegate(ba, "containskey", true)) - {return ((Boolean) Debug.delegate(ba, "containskey", new Object[] {_key}));} -RDebugUtils.currentLine=37748736; - //BA.debugLineNum = 37748736;BA.debugLine="Public Sub ContainsKey (Key As Object) As Boolean"; -RDebugUtils.currentLine=37748737; - //BA.debugLineNum = 37748737;BA.debugLine="Return map.ContainsKey(Key)"; -if (true) return __ref._map /*anywheresoftware.b4a.objects.collections.Map*/ .ContainsKey(_key); -RDebugUtils.currentLine=37748738; - //BA.debugLineNum = 37748738;BA.debugLine="End Sub"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Private map As Map"; +_map = new anywheresoftware.b4a.objects.collections.Map(); + //BA.debugLineNum = 3;BA.debugLine="Private list As List"; +_list = new anywheresoftware.b4a.objects.collections.List(); + //BA.debugLineNum = 4;BA.debugLine="End Sub"; +return ""; +} +public String _clear() throws Exception{ + //BA.debugLineNum = 26;BA.debugLine="Public Sub Clear"; + //BA.debugLineNum = 27;BA.debugLine="list.Clear"; +_list.Clear(); + //BA.debugLineNum = 28;BA.debugLine="map.Clear"; +_map.Clear(); + //BA.debugLineNum = 29;BA.debugLine="End Sub"; +return ""; +} +public boolean _containskey(Object _key) throws Exception{ + //BA.debugLineNum = 46;BA.debugLine="Public Sub ContainsKey (Key As Object) As Boolean"; + //BA.debugLineNum = 47;BA.debugLine="Return map.ContainsKey(Key)"; +if (true) return _map.ContainsKey(_key); + //BA.debugLineNum = 48;BA.debugLine="End Sub"; return false; } -public Object _get(keymon.lat.medicomed.b4xorderedmap __ref,Object _key) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xorderedmap"; -if (Debug.shouldDelegate(ba, "get", true)) - {return ((Object) Debug.delegate(ba, "get", new Object[] {_key}));} -RDebugUtils.currentLine=37617664; - //BA.debugLineNum = 37617664;BA.debugLine="Public Sub Get (Key As Object) As Object"; -RDebugUtils.currentLine=37617665; - //BA.debugLineNum = 37617665;BA.debugLine="Return map.Get(Key)"; -if (true) return __ref._map /*anywheresoftware.b4a.objects.collections.Map*/ .Get(_key); -RDebugUtils.currentLine=37617666; - //BA.debugLineNum = 37617666;BA.debugLine="End Sub"; +public Object _get(Object _key) throws Exception{ + //BA.debugLineNum = 37;BA.debugLine="Public Sub Get (Key As Object) As Object"; + //BA.debugLineNum = 38;BA.debugLine="Return map.Get(Key)"; +if (true) return _map.Get(_key); + //BA.debugLineNum = 39;BA.debugLine="End Sub"; return null; } -public String _initialize(keymon.lat.medicomed.b4xorderedmap __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="b4xorderedmap"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=37289984; - //BA.debugLineNum = 37289984;BA.debugLine="Public Sub Initialize"; -RDebugUtils.currentLine=37289985; - //BA.debugLineNum = 37289985;BA.debugLine="map.Initialize"; -__ref._map /*anywheresoftware.b4a.objects.collections.Map*/ .Initialize(); -RDebugUtils.currentLine=37289986; - //BA.debugLineNum = 37289986;BA.debugLine="list.Initialize"; -__ref._list /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=37289987; - //BA.debugLineNum = 37289987;BA.debugLine="End Sub"; -return ""; -} -public anywheresoftware.b4a.objects.collections.List _getkeys(keymon.lat.medicomed.b4xorderedmap __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xorderedmap"; -if (Debug.shouldDelegate(ba, "getkeys", true)) - {return ((anywheresoftware.b4a.objects.collections.List) Debug.delegate(ba, "getkeys", null));} -RDebugUtils.currentLine=37552128; - //BA.debugLineNum = 37552128;BA.debugLine="Public Sub getKeys As List"; -RDebugUtils.currentLine=37552129; - //BA.debugLineNum = 37552129;BA.debugLine="Return list"; -if (true) return __ref._list /*anywheresoftware.b4a.objects.collections.List*/ ; -RDebugUtils.currentLine=37552130; - //BA.debugLineNum = 37552130;BA.debugLine="End Sub"; +public Object _getdataforserializator() throws Exception{ + //BA.debugLineNum = 65;BA.debugLine="Public Sub GetDataForSerializator As Object"; + //BA.debugLineNum = 66;BA.debugLine="Return Array(map, list)"; +if (true) return (Object)(new Object[]{(Object)(_map.getObject()),(Object)(_list.getObject())}); + //BA.debugLineNum = 67;BA.debugLine="End Sub"; return null; } -public String _put(keymon.lat.medicomed.b4xorderedmap __ref,Object _key,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xorderedmap"; -if (Debug.shouldDelegate(ba, "put", true)) - {return ((String) Debug.delegate(ba, "put", new Object[] {_key,_value}));} -RDebugUtils.currentLine=37355520; - //BA.debugLineNum = 37355520;BA.debugLine="Public Sub Put (Key As Object, Value As Object)"; -RDebugUtils.currentLine=37355521; - //BA.debugLineNum = 37355521;BA.debugLine="If map.ContainsKey(Key) = False Then"; -if (__ref._map /*anywheresoftware.b4a.objects.collections.Map*/ .ContainsKey(_key)==__c.False) { -RDebugUtils.currentLine=37355522; - //BA.debugLineNum = 37355522;BA.debugLine="list.Add(Key)"; -__ref._list /*anywheresoftware.b4a.objects.collections.List*/ .Add(_key); - }; -RDebugUtils.currentLine=37355524; - //BA.debugLineNum = 37355524;BA.debugLine="map.Put(Key, Value)"; -__ref._map /*anywheresoftware.b4a.objects.collections.Map*/ .Put(_key,_value); -RDebugUtils.currentLine=37355525; - //BA.debugLineNum = 37355525;BA.debugLine="End Sub"; -return ""; +public Object _getdefault(Object _key,Object _defaultvalue) throws Exception{ + //BA.debugLineNum = 42;BA.debugLine="Public Sub GetDefault (Key As Object, DefaultValue"; + //BA.debugLineNum = 43;BA.debugLine="Return map.GetDefault(Key, DefaultValue)"; +if (true) return _map.GetDefault(_key,_defaultvalue); + //BA.debugLineNum = 44;BA.debugLine="End Sub"; +return null; } -public String _remove(keymon.lat.medicomed.b4xorderedmap __ref,Object _key) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xorderedmap"; -if (Debug.shouldDelegate(ba, "remove", true)) - {return ((String) Debug.delegate(ba, "remove", new Object[] {_key}));} -RDebugUtils.currentLine=37421056; - //BA.debugLineNum = 37421056;BA.debugLine="Public Sub Remove (Key As Object)"; -RDebugUtils.currentLine=37421057; - //BA.debugLineNum = 37421057;BA.debugLine="If map.ContainsKey(Key) = False Then Return"; -if (__ref._map /*anywheresoftware.b4a.objects.collections.Map*/ .ContainsKey(_key)==__c.False) { -if (true) return "";}; -RDebugUtils.currentLine=37421058; - //BA.debugLineNum = 37421058;BA.debugLine="list.RemoveAt(list.IndexOf(Key))"; -__ref._list /*anywheresoftware.b4a.objects.collections.List*/ .RemoveAt(__ref._list /*anywheresoftware.b4a.objects.collections.List*/ .IndexOf(_key)); -RDebugUtils.currentLine=37421059; - //BA.debugLineNum = 37421059;BA.debugLine="map.Remove(Key)"; -__ref._map /*anywheresoftware.b4a.objects.collections.Map*/ .Remove(_key); -RDebugUtils.currentLine=37421060; - //BA.debugLineNum = 37421060;BA.debugLine="End Sub"; -return ""; +public anywheresoftware.b4a.objects.collections.List _getkeys() throws Exception{ + //BA.debugLineNum = 32;BA.debugLine="Public Sub getKeys As List"; + //BA.debugLineNum = 33;BA.debugLine="Return list"; +if (true) return _list; + //BA.debugLineNum = 34;BA.debugLine="End Sub"; +return null; } -public anywheresoftware.b4a.objects.collections.List _getvalues(keymon.lat.medicomed.b4xorderedmap __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xorderedmap"; -if (Debug.shouldDelegate(ba, "getvalues", true)) - {return ((anywheresoftware.b4a.objects.collections.List) Debug.delegate(ba, "getvalues", null));} +public int _getsize() throws Exception{ + //BA.debugLineNum = 50;BA.debugLine="Public Sub getSize As Int"; + //BA.debugLineNum = 51;BA.debugLine="Return map.Size"; +if (true) return _map.getSize(); + //BA.debugLineNum = 52;BA.debugLine="End Sub"; +return 0; +} +public anywheresoftware.b4a.objects.collections.List _getvalues() throws Exception{ anywheresoftware.b4a.objects.collections.List _res = null; Object _key = null; -RDebugUtils.currentLine=37879808; - //BA.debugLineNum = 37879808;BA.debugLine="Public Sub getValues As List"; -RDebugUtils.currentLine=37879809; - //BA.debugLineNum = 37879809;BA.debugLine="Dim res As List"; + //BA.debugLineNum = 55;BA.debugLine="Public Sub getValues As List"; + //BA.debugLineNum = 56;BA.debugLine="Dim res As List"; _res = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=37879810; - //BA.debugLineNum = 37879810;BA.debugLine="res.Initialize"; + //BA.debugLineNum = 57;BA.debugLine="res.Initialize"; _res.Initialize(); -RDebugUtils.currentLine=37879811; - //BA.debugLineNum = 37879811;BA.debugLine="For Each key As Object In list"; + //BA.debugLineNum = 58;BA.debugLine="For Each key As Object In list"; { -final anywheresoftware.b4a.BA.IterableList group3 = __ref._list /*anywheresoftware.b4a.objects.collections.List*/ ; +final anywheresoftware.b4a.BA.IterableList group3 = _list; final int groupLen3 = group3.getSize() ;int index3 = 0; ; for (; index3 < groupLen3;index3++){ _key = group3.Get(index3); -RDebugUtils.currentLine=37879812; - //BA.debugLineNum = 37879812;BA.debugLine="res.Add(map.Get(key))"; -_res.Add(__ref._map /*anywheresoftware.b4a.objects.collections.Map*/ .Get(_key)); + //BA.debugLineNum = 59;BA.debugLine="res.Add(map.Get(key))"; +_res.Add(_map.Get(_key)); } }; -RDebugUtils.currentLine=37879814; - //BA.debugLineNum = 37879814;BA.debugLine="Return res"; + //BA.debugLineNum = 61;BA.debugLine="Return res"; if (true) return _res; -RDebugUtils.currentLine=37879815; - //BA.debugLineNum = 37879815;BA.debugLine="End Sub"; + //BA.debugLineNum = 62;BA.debugLine="End Sub"; return null; } -public int _getsize(keymon.lat.medicomed.b4xorderedmap __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xorderedmap"; -if (Debug.shouldDelegate(ba, "getsize", true)) - {return ((Integer) Debug.delegate(ba, "getsize", null));} -RDebugUtils.currentLine=37814272; - //BA.debugLineNum = 37814272;BA.debugLine="Public Sub getSize As Int"; -RDebugUtils.currentLine=37814273; - //BA.debugLineNum = 37814273;BA.debugLine="Return map.Size"; -if (true) return __ref._map /*anywheresoftware.b4a.objects.collections.Map*/ .getSize(); -RDebugUtils.currentLine=37814274; - //BA.debugLineNum = 37814274;BA.debugLine="End Sub"; -return 0; -} -public String _class_globals(keymon.lat.medicomed.b4xorderedmap __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xorderedmap"; -RDebugUtils.currentLine=37224448; - //BA.debugLineNum = 37224448;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=37224449; - //BA.debugLineNum = 37224449;BA.debugLine="Private map As Map"; -_map = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=37224450; - //BA.debugLineNum = 37224450;BA.debugLine="Private list As List"; -_list = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=37224451; - //BA.debugLineNum = 37224451;BA.debugLine="End Sub"; +public String _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 6;BA.debugLine="Public Sub Initialize"; + //BA.debugLineNum = 7;BA.debugLine="map.Initialize"; +_map.Initialize(); + //BA.debugLineNum = 8;BA.debugLine="list.Initialize"; +_list.Initialize(); + //BA.debugLineNum = 9;BA.debugLine="End Sub"; return ""; } -public String _clear(keymon.lat.medicomed.b4xorderedmap __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xorderedmap"; -if (Debug.shouldDelegate(ba, "clear", true)) - {return ((String) Debug.delegate(ba, "clear", null));} -RDebugUtils.currentLine=37486592; - //BA.debugLineNum = 37486592;BA.debugLine="Public Sub Clear"; -RDebugUtils.currentLine=37486593; - //BA.debugLineNum = 37486593;BA.debugLine="list.Clear"; -__ref._list /*anywheresoftware.b4a.objects.collections.List*/ .Clear(); -RDebugUtils.currentLine=37486594; - //BA.debugLineNum = 37486594;BA.debugLine="map.Clear"; -__ref._map /*anywheresoftware.b4a.objects.collections.Map*/ .Clear(); -RDebugUtils.currentLine=37486595; - //BA.debugLineNum = 37486595;BA.debugLine="End Sub"; +public String _put(Object _key,Object _value) throws Exception{ + //BA.debugLineNum = 12;BA.debugLine="Public Sub Put (Key As Object, Value As Object)"; + //BA.debugLineNum = 13;BA.debugLine="If map.ContainsKey(Key) = False Then"; +if (_map.ContainsKey(_key)==__c.False) { + //BA.debugLineNum = 14;BA.debugLine="list.Add(Key)"; +_list.Add(_key); + }; + //BA.debugLineNum = 16;BA.debugLine="map.Put(Key, Value)"; +_map.Put(_key,_value); + //BA.debugLineNum = 17;BA.debugLine="End Sub"; return ""; } -public Object _getdataforserializator(keymon.lat.medicomed.b4xorderedmap __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xorderedmap"; -if (Debug.shouldDelegate(ba, "getdataforserializator", true)) - {return ((Object) Debug.delegate(ba, "getdataforserializator", null));} -RDebugUtils.currentLine=37945344; - //BA.debugLineNum = 37945344;BA.debugLine="Public Sub GetDataForSerializator As Object"; -RDebugUtils.currentLine=37945345; - //BA.debugLineNum = 37945345;BA.debugLine="Return Array(map, list)"; -if (true) return (Object)(new Object[]{(Object)(__ref._map /*anywheresoftware.b4a.objects.collections.Map*/ .getObject()),(Object)(__ref._list /*anywheresoftware.b4a.objects.collections.List*/ .getObject())}); -RDebugUtils.currentLine=37945346; - //BA.debugLineNum = 37945346;BA.debugLine="End Sub"; -return null; +public String _remove(Object _key) throws Exception{ + //BA.debugLineNum = 20;BA.debugLine="Public Sub Remove (Key As Object)"; + //BA.debugLineNum = 21;BA.debugLine="If map.ContainsKey(Key) = False Then Return"; +if (_map.ContainsKey(_key)==__c.False) { +if (true) return "";}; + //BA.debugLineNum = 22;BA.debugLine="list.RemoveAt(list.IndexOf(Key))"; +_list.RemoveAt(_list.IndexOf(_key)); + //BA.debugLineNum = 23;BA.debugLine="map.Remove(Key)"; +_map.Remove(_key); + //BA.debugLineNum = 24;BA.debugLine="End Sub"; +return ""; } -public Object _getdefault(keymon.lat.medicomed.b4xorderedmap __ref,Object _key,Object _defaultvalue) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xorderedmap"; -if (Debug.shouldDelegate(ba, "getdefault", true)) - {return ((Object) Debug.delegate(ba, "getdefault", new Object[] {_key,_defaultvalue}));} -RDebugUtils.currentLine=37683200; - //BA.debugLineNum = 37683200;BA.debugLine="Public Sub GetDefault (Key As Object, DefaultValue"; -RDebugUtils.currentLine=37683201; - //BA.debugLineNum = 37683201;BA.debugLine="Return map.GetDefault(Key, DefaultValue)"; -if (true) return __ref._map /*anywheresoftware.b4a.objects.collections.Map*/ .GetDefault(_key,_defaultvalue); -RDebugUtils.currentLine=37683202; - //BA.debugLineNum = 37683202;BA.debugLine="End Sub"; -return null; -} -public String _setdatafromserializator(keymon.lat.medicomed.b4xorderedmap __ref,Object _data) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xorderedmap"; -if (Debug.shouldDelegate(ba, "setdatafromserializator", true)) - {return ((String) Debug.delegate(ba, "setdatafromserializator", new Object[] {_data}));} +public String _setdatafromserializator(Object _data) throws Exception{ Object[] _o = null; -RDebugUtils.currentLine=38010880; - //BA.debugLineNum = 38010880;BA.debugLine="Public Sub SetDataFromSerializator (Data As Object"; -RDebugUtils.currentLine=38010881; - //BA.debugLineNum = 38010881;BA.debugLine="Dim o() As Object = Data"; + //BA.debugLineNum = 70;BA.debugLine="Public Sub SetDataFromSerializator (Data As Object"; + //BA.debugLineNum = 71;BA.debugLine="Dim o() As Object = Data"; _o = (Object[])(_data); -RDebugUtils.currentLine=38010882; - //BA.debugLineNum = 38010882;BA.debugLine="map = o(0)"; -__ref._map /*anywheresoftware.b4a.objects.collections.Map*/ = (anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_o[(int) (0)])); -RDebugUtils.currentLine=38010883; - //BA.debugLineNum = 38010883;BA.debugLine="list = o(1)"; -__ref._list /*anywheresoftware.b4a.objects.collections.List*/ = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_o[(int) (1)])); -RDebugUtils.currentLine=38010884; - //BA.debugLineNum = 38010884;BA.debugLine="End Sub"; + //BA.debugLineNum = 72;BA.debugLine="map = o(0)"; +_map = (anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_o[(int) (0)])); + //BA.debugLineNum = 73;BA.debugLine="list = o(1)"; +_list = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_o[(int) (1)])); + //BA.debugLineNum = 74;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xpages.java b/B4A/Objects/src/keymon/lat/medicomed/b4xpages.java index b8aab17..7694805 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xpages.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xpages.java @@ -10,8 +10,7 @@ private static b4xpages mostCurrent = new b4xpages(); public static Object getObject() { throw new RuntimeException("Code module does not support this method."); } - -public anywheresoftware.b4a.keywords.Common __c = null; + public anywheresoftware.b4a.keywords.Common __c = null; public static Object _mpm = null; public static keymon.lat.medicomed.b4xpagesdelegator _delegate = null; public static Object _globalcontext = null; @@ -26,189 +25,115 @@ public keymon.lat.medicomed.newinst2 _newinst2 = null; public keymon.lat.medicomed.b4xcollections _b4xcollections = null; public keymon.lat.medicomed.httputils2service _httputils2service = null; public keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; -public static keymon.lat.medicomed.b4xpagesmanager _getmanager(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="b4xpages"; -if (Debug.shouldDelegate(null, "getmanager", true)) - {return ((keymon.lat.medicomed.b4xpagesmanager) Debug.delegate(null, "getmanager", new Object[] {_ba}));} -RDebugUtils.currentLine=33095680; - //BA.debugLineNum = 33095680;BA.debugLine="Public Sub GetManager As B4XPagesManager"; -RDebugUtils.currentLine=33095681; - //BA.debugLineNum = 33095681;BA.debugLine="Return mPM"; -if (true) return (keymon.lat.medicomed.b4xpagesmanager)(_mpm); -RDebugUtils.currentLine=33095682; - //BA.debugLineNum = 33095682;BA.debugLine="End Sub"; +public static keymon.lat.medicomed.b4xpagesmanager._b4amenuitem _addmenuitem(anywheresoftware.b4a.BA _ba,Object _b4xpage,Object _title) throws Exception{ + //BA.debugLineNum = 91;BA.debugLine="Public Sub AddMenuItem(B4XPage As Object, Title As"; + //BA.debugLineNum = 92;BA.debugLine="Return GetManager.AddMenuItem(B4XPage, Title)"; +if (true) return _getmanager(_ba)._addmenuitem /*keymon.lat.medicomed.b4xpagesmanager._b4amenuitem*/ (_b4xpage,_title); + //BA.debugLineNum = 93;BA.debugLine="End Sub"; return null; } -public static String _settitle(anywheresoftware.b4a.BA _ba,Object _b4xpage,Object _title) throws Exception{ -RDebugUtils.currentModule="b4xpages"; -if (Debug.shouldDelegate(null, "settitle", true)) - {return ((String) Debug.delegate(null, "settitle", new Object[] {_ba,_b4xpage,_title}));} -RDebugUtils.currentLine=33685504; - //BA.debugLineNum = 33685504;BA.debugLine="Public Sub SetTitle (B4XPage As Object, Title As O"; -RDebugUtils.currentLine=33685505; - //BA.debugLineNum = 33685505;BA.debugLine="GetManager.SetTitle(B4XPage, Title)"; -_getmanager(_ba)._settitle /*String*/ (null,_b4xpage,_title); -RDebugUtils.currentLine=33685506; - //BA.debugLineNum = 33685506;BA.debugLine="End Sub"; -return ""; -} public static String _addpage(anywheresoftware.b4a.BA _ba,String _id,Object _b4xpage) throws Exception{ -RDebugUtils.currentModule="b4xpages"; -if (Debug.shouldDelegate(null, "addpage", true)) - {return ((String) Debug.delegate(null, "addpage", new Object[] {_ba,_id,_b4xpage}));} -RDebugUtils.currentLine=33357824; - //BA.debugLineNum = 33357824;BA.debugLine="Public Sub AddPage (Id As String, B4XPage As Objec"; -RDebugUtils.currentLine=33357825; - //BA.debugLineNum = 33357825;BA.debugLine="GetManager.AddPage(Id, B4XPage)"; -_getmanager(_ba)._addpage /*String*/ (null,_id,_b4xpage); -RDebugUtils.currentLine=33357826; - //BA.debugLineNum = 33357826;BA.debugLine="End Sub"; + //BA.debugLineNum = 37;BA.debugLine="Public Sub AddPage (Id As String, B4XPage As Objec"; + //BA.debugLineNum = 38;BA.debugLine="GetManager.AddPage(Id, B4XPage)"; +_getmanager(_ba)._addpage /*String*/ (_id,_b4xpage); + //BA.debugLineNum = 39;BA.debugLine="End Sub"; return ""; } -public static String _showpage(anywheresoftware.b4a.BA _ba,String _id) throws Exception{ -RDebugUtils.currentModule="b4xpages"; -if (Debug.shouldDelegate(null, "showpage", true)) - {return ((String) Debug.delegate(null, "showpage", new Object[] {_ba,_id}));} -RDebugUtils.currentLine=33488896; - //BA.debugLineNum = 33488896;BA.debugLine="Public Sub ShowPage (Id As String)"; -RDebugUtils.currentLine=33488897; - //BA.debugLineNum = 33488897;BA.debugLine="GetManager.ShowPage(Id)"; -_getmanager(_ba)._showpage /*String*/ (null,_id); -RDebugUtils.currentLine=33488898; - //BA.debugLineNum = 33488898;BA.debugLine="End Sub"; -return ""; -} -public static keymon.lat.medicomed.b4xmainpage _mainpage(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="b4xpages"; -if (Debug.shouldDelegate(null, "mainpage", true)) - {return ((keymon.lat.medicomed.b4xmainpage) Debug.delegate(null, "mainpage", new Object[] {_ba}));} -RDebugUtils.currentLine=33751040; - //BA.debugLineNum = 33751040;BA.debugLine="Public Sub MainPage As B4XMainPage"; -RDebugUtils.currentLine=33751041; - //BA.debugLineNum = 33751041;BA.debugLine="Return GetManager.MainPage"; -if (true) return _getmanager(_ba)._mainpage /*keymon.lat.medicomed.b4xmainpage*/ ; -RDebugUtils.currentLine=33751042; - //BA.debugLineNum = 33751042;BA.debugLine="End Sub"; -return null; -} -public static Object _getpage(anywheresoftware.b4a.BA _ba,String _id) throws Exception{ -RDebugUtils.currentModule="b4xpages"; -if (Debug.shouldDelegate(null, "getpage", true)) - {return ((Object) Debug.delegate(null, "getpage", new Object[] {_ba,_id}));} -RDebugUtils.currentLine=33226752; - //BA.debugLineNum = 33226752;BA.debugLine="Public Sub GetPage (Id As String) As Object"; -RDebugUtils.currentLine=33226753; - //BA.debugLineNum = 33226753;BA.debugLine="Return GetManager.GetPage(Id)"; -if (true) return _getmanager(_ba)._getpage /*Object*/ (null,_id); -RDebugUtils.currentLine=33226754; - //BA.debugLineNum = 33226754;BA.debugLine="End Sub"; -return null; -} -public static String _showpageandremovepreviouspages(anywheresoftware.b4a.BA _ba,String _id) throws Exception{ -RDebugUtils.currentModule="b4xpages"; -if (Debug.shouldDelegate(null, "showpageandremovepreviouspages", true)) - {return ((String) Debug.delegate(null, "showpageandremovepreviouspages", new Object[] {_ba,_id}));} -RDebugUtils.currentLine=33554432; - //BA.debugLineNum = 33554432;BA.debugLine="Public Sub ShowPageAndRemovePreviousPages (Id As S"; -RDebugUtils.currentLine=33554433; - //BA.debugLineNum = 33554433;BA.debugLine="GetManager.ShowPageAndRemovePreviousPages (Id)"; -_getmanager(_ba)._showpageandremovepreviouspages /*String*/ (null,_id); -RDebugUtils.currentLine=33554434; - //BA.debugLineNum = 33554434;BA.debugLine="End Sub"; -return ""; -} -public static keymon.lat.medicomed.b4xpagesmanager._b4amenuitem _addmenuitem(anywheresoftware.b4a.BA _ba,Object _b4xpage,Object _title) throws Exception{ -RDebugUtils.currentModule="b4xpages"; -if (Debug.shouldDelegate(null, "addmenuitem", true)) - {return ((keymon.lat.medicomed.b4xpagesmanager._b4amenuitem) Debug.delegate(null, "addmenuitem", new Object[] {_ba,_b4xpage,_title}));} -RDebugUtils.currentLine=33882112; - //BA.debugLineNum = 33882112;BA.debugLine="Public Sub AddMenuItem(B4XPage As Object, Title As"; -RDebugUtils.currentLine=33882113; - //BA.debugLineNum = 33882113;BA.debugLine="Return GetManager.AddMenuItem(B4XPage, Title)"; -if (true) return _getmanager(_ba)._addmenuitem /*keymon.lat.medicomed.b4xpagesmanager._b4amenuitem*/ (null,_b4xpage,_title); -RDebugUtils.currentLine=33882114; - //BA.debugLineNum = 33882114;BA.debugLine="End Sub"; -return null; -} public static String _addpageandcreate(anywheresoftware.b4a.BA _ba,String _id,Object _b4xpage) throws Exception{ -RDebugUtils.currentModule="b4xpages"; -if (Debug.shouldDelegate(null, "addpageandcreate", true)) - {return ((String) Debug.delegate(null, "addpageandcreate", new Object[] {_ba,_id,_b4xpage}));} -RDebugUtils.currentLine=33423360; - //BA.debugLineNum = 33423360;BA.debugLine="Public Sub AddPageAndCreate (Id As String, B4XPage"; -RDebugUtils.currentLine=33423361; - //BA.debugLineNum = 33423361;BA.debugLine="GetManager.AddPageAndCreate(Id, B4XPage)"; -_getmanager(_ba)._addpageandcreate /*String*/ (null,_id,_b4xpage); -RDebugUtils.currentLine=33423362; - //BA.debugLineNum = 33423362;BA.debugLine="End Sub"; + //BA.debugLineNum = 42;BA.debugLine="Public Sub AddPageAndCreate (Id As String, B4XPage"; + //BA.debugLineNum = 43;BA.debugLine="GetManager.AddPageAndCreate(Id, B4XPage)"; +_getmanager(_ba)._addpageandcreate /*String*/ (_id,_b4xpage); + //BA.debugLineNum = 44;BA.debugLine="End Sub"; return ""; } public static String _closepage(anywheresoftware.b4a.BA _ba,Object _b4xpage) throws Exception{ -RDebugUtils.currentModule="b4xpages"; -if (Debug.shouldDelegate(null, "closepage", true)) - {return ((String) Debug.delegate(null, "closepage", new Object[] {_ba,_b4xpage}));} -RDebugUtils.currentLine=33619968; - //BA.debugLineNum = 33619968;BA.debugLine="Public Sub ClosePage (B4XPage As Object)"; -RDebugUtils.currentLine=33619969; - //BA.debugLineNum = 33619969;BA.debugLine="GetManager.ClosePage (B4XPage)"; -_getmanager(_ba)._closepage /*String*/ (null,_b4xpage); -RDebugUtils.currentLine=33619970; - //BA.debugLineNum = 33619970;BA.debugLine="End Sub"; + //BA.debugLineNum = 62;BA.debugLine="Public Sub ClosePage (B4XPage As Object)"; + //BA.debugLineNum = 63;BA.debugLine="GetManager.ClosePage (B4XPage)"; +_getmanager(_ba)._closepage /*String*/ (_b4xpage); + //BA.debugLineNum = 64;BA.debugLine="End Sub"; return ""; } +public static keymon.lat.medicomed.b4xpagesmanager _getmanager(anywheresoftware.b4a.BA _ba) throws Exception{ + //BA.debugLineNum = 14;BA.debugLine="Public Sub GetManager As B4XPagesManager"; + //BA.debugLineNum = 15;BA.debugLine="Return mPM"; +if (true) return (keymon.lat.medicomed.b4xpagesmanager)(_mpm); + //BA.debugLineNum = 16;BA.debugLine="End Sub"; +return null; +} public static anywheresoftware.b4a.objects.ActivityWrapper _getnativeparent(anywheresoftware.b4a.BA _ba,Object _b4xpage) throws Exception{ -RDebugUtils.currentModule="b4xpages"; -if (Debug.shouldDelegate(null, "getnativeparent", true)) - {return ((anywheresoftware.b4a.objects.ActivityWrapper) Debug.delegate(null, "getnativeparent", new Object[] {_ba,_b4xpage}));} -RDebugUtils.currentLine=33816576; - //BA.debugLineNum = 33816576;BA.debugLine="Public Sub GetNativeParent (B4XPage As Object) As"; -RDebugUtils.currentLine=33816584; - //BA.debugLineNum = 33816584;BA.debugLine="Return GetManager.FindPIFromB4XPage(B4XPage).Pare"; -if (true) return _getmanager(_ba)._findpifromb4xpage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null,_b4xpage).Parent /*keymon.lat.medicomed.b4xpagesmanager._b4xpageparent*/ .NativeType /*anywheresoftware.b4a.objects.ActivityWrapper*/ ; -RDebugUtils.currentLine=33816585; - //BA.debugLineNum = 33816585;BA.debugLine="End Sub"; + //BA.debugLineNum = 79;BA.debugLine="Public Sub GetNativeParent (B4XPage As Object) As"; + //BA.debugLineNum = 87;BA.debugLine="Return GetManager.FindPIFromB4XPage(B4XPage).Pare"; +if (true) return _getmanager(_ba)._findpifromb4xpage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (_b4xpage).Parent /*keymon.lat.medicomed.b4xpagesmanager._b4xpageparent*/ .NativeType /*anywheresoftware.b4a.objects.ActivityWrapper*/ ; + //BA.debugLineNum = 88;BA.debugLine="End Sub"; +return null; +} +public static Object _getpage(anywheresoftware.b4a.BA _ba,String _id) throws Exception{ + //BA.debugLineNum = 27;BA.debugLine="Public Sub GetPage (Id As String) As Object"; + //BA.debugLineNum = 28;BA.debugLine="Return GetManager.GetPage(Id)"; +if (true) return _getmanager(_ba)._getpage /*Object*/ (_id); + //BA.debugLineNum = 29;BA.debugLine="End Sub"; return null; } public static String _getpageid(anywheresoftware.b4a.BA _ba,Object _b4xpage) throws Exception{ -RDebugUtils.currentModule="b4xpages"; -if (Debug.shouldDelegate(null, "getpageid", true)) - {return ((String) Debug.delegate(null, "getpageid", new Object[] {_ba,_b4xpage}));} -RDebugUtils.currentLine=33292288; - //BA.debugLineNum = 33292288;BA.debugLine="Public Sub GetPageId (B4XPage As Object) As String"; -RDebugUtils.currentLine=33292289; - //BA.debugLineNum = 33292289;BA.debugLine="Return GetManager.FindPIFromB4XPage(B4XPage).Id"; -if (true) return _getmanager(_ba)._findpifromb4xpage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null,_b4xpage).Id /*String*/ ; -RDebugUtils.currentLine=33292290; - //BA.debugLineNum = 33292290;BA.debugLine="End Sub"; + //BA.debugLineNum = 32;BA.debugLine="Public Sub GetPageId (B4XPage As Object) As String"; + //BA.debugLineNum = 33;BA.debugLine="Return GetManager.FindPIFromB4XPage(B4XPage).Id"; +if (true) return _getmanager(_ba)._findpifromb4xpage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (_b4xpage).Id /*String*/ ; + //BA.debugLineNum = 34;BA.debugLine="End Sub"; return ""; } public static String _internalsetpagesmanager(anywheresoftware.b4a.BA _ba,Object _pm) throws Exception{ -RDebugUtils.currentModule="b4xpages"; -if (Debug.shouldDelegate(null, "internalsetpagesmanager", true)) - {return ((String) Debug.delegate(null, "internalsetpagesmanager", new Object[] {_ba,_pm}));} -RDebugUtils.currentLine=33161216; - //BA.debugLineNum = 33161216;BA.debugLine="Public Sub InternalSetPagesManager(PM As Object)"; -RDebugUtils.currentLine=33161217; - //BA.debugLineNum = 33161217;BA.debugLine="Delegate.Initialize"; -_delegate._initialize /*String*/ (null,(_ba.processBA == null ? _ba : _ba.processBA)); -RDebugUtils.currentLine=33161218; - //BA.debugLineNum = 33161218;BA.debugLine="mPM = PM"; + //BA.debugLineNum = 19;BA.debugLine="Public Sub InternalSetPagesManager(PM As Object)"; + //BA.debugLineNum = 20;BA.debugLine="Delegate.Initialize"; +_delegate._initialize /*String*/ ((_ba.processBA == null ? _ba : _ba.processBA)); + //BA.debugLineNum = 21;BA.debugLine="mPM = PM"; _mpm = _pm; -RDebugUtils.currentLine=33161219; - //BA.debugLineNum = 33161219;BA.debugLine="End Sub"; + //BA.debugLineNum = 22;BA.debugLine="End Sub"; return ""; } public static boolean _isinitialized(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="b4xpages"; -if (Debug.shouldDelegate(null, "isinitialized", true)) - {return ((Boolean) Debug.delegate(null, "isinitialized", new Object[] {_ba}));} -RDebugUtils.currentLine=33030144; - //BA.debugLineNum = 33030144;BA.debugLine="Public Sub IsInitialized As Boolean"; -RDebugUtils.currentLine=33030145; - //BA.debugLineNum = 33030145;BA.debugLine="Return mPM Is B4XPagesManager"; + //BA.debugLineNum = 9;BA.debugLine="Public Sub IsInitialized As Boolean"; + //BA.debugLineNum = 10;BA.debugLine="Return mPM Is B4XPagesManager"; if (true) return _mpm instanceof keymon.lat.medicomed.b4xpagesmanager; -RDebugUtils.currentLine=33030146; - //BA.debugLineNum = 33030146;BA.debugLine="End Sub"; + //BA.debugLineNum = 11;BA.debugLine="End Sub"; return false; } -} \ No newline at end of file +public static keymon.lat.medicomed.b4xmainpage _mainpage(anywheresoftware.b4a.BA _ba) throws Exception{ + //BA.debugLineNum = 73;BA.debugLine="Public Sub MainPage As B4XMainPage"; + //BA.debugLineNum = 74;BA.debugLine="Return GetManager.MainPage"; +if (true) return _getmanager(_ba)._mainpage /*keymon.lat.medicomed.b4xmainpage*/ ; + //BA.debugLineNum = 75;BA.debugLine="End Sub"; +return null; +} +public static String _process_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Process_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Private mPM As Object"; +_mpm = new Object(); + //BA.debugLineNum = 3;BA.debugLine="Public Delegate As B4XPagesDelegator"; +_delegate = new keymon.lat.medicomed.b4xpagesdelegator(); + //BA.debugLineNum = 4;BA.debugLine="Public GlobalContext As Object"; +_globalcontext = new Object(); + //BA.debugLineNum = 5;BA.debugLine="End Sub"; +return ""; +} +public static String _settitle(anywheresoftware.b4a.BA _ba,Object _b4xpage,Object _title) throws Exception{ + //BA.debugLineNum = 68;BA.debugLine="Public Sub SetTitle (B4XPage As Object, Title As O"; + //BA.debugLineNum = 69;BA.debugLine="GetManager.SetTitle(B4XPage, Title)"; +_getmanager(_ba)._settitle /*String*/ (_b4xpage,_title); + //BA.debugLineNum = 70;BA.debugLine="End Sub"; +return ""; +} +public static String _showpage(anywheresoftware.b4a.BA _ba,String _id) throws Exception{ + //BA.debugLineNum = 50;BA.debugLine="Public Sub ShowPage (Id As String)"; + //BA.debugLineNum = 51;BA.debugLine="GetManager.ShowPage(Id)"; +_getmanager(_ba)._showpage /*String*/ (_id); + //BA.debugLineNum = 52;BA.debugLine="End Sub"; +return ""; +} +public static String _showpageandremovepreviouspages(anywheresoftware.b4a.BA _ba,String _id) throws Exception{ + //BA.debugLineNum = 56;BA.debugLine="Public Sub ShowPageAndRemovePreviousPages (Id As S"; + //BA.debugLineNum = 57;BA.debugLine="GetManager.ShowPageAndRemovePreviousPages (Id)"; +_getmanager(_ba)._showpageandremovepreviouspages /*String*/ (_id); + //BA.debugLineNum = 58;BA.debugLine="End Sub"; +return ""; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xpagesdelegator.java b/B4A/Objects/src/keymon/lat/medicomed/b4xpagesdelegator.java index 8498c46..f14301c 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xpagesdelegator.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xpagesdelegator.java @@ -10,7 +10,7 @@ public class b4xpagesdelegator extends B4AClass.ImplB4AClass implements BA.SubDe private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xpagesdelegator"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xpagesdelegator"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xpagesdelegator extends B4AClass.ImplB4AClass implements BA.SubDe 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.keywords.Common __c = null; public b4a.example.dateutils _dateutils = null; public keymon.lat.medicomed.main _main = null; public keymon.lat.medicomed.starter _starter = null; @@ -43,121 +36,68 @@ 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 _activity_actionbarhomeclick(keymon.lat.medicomed.b4xpagesdelegator __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesdelegator"; -if (Debug.shouldDelegate(ba, "activity_actionbarhomeclick", true)) - {return ((String) Debug.delegate(ba, "activity_actionbarhomeclick", null));} -RDebugUtils.currentLine=38862848; - //BA.debugLineNum = 38862848;BA.debugLine="Public Sub Activity_ActionBarHomeClick"; -RDebugUtils.currentLine=38862849; - //BA.debugLineNum = 38862849;BA.debugLine="B4XPages.GetManager.Activity_ActionBarHomeClick"; -_b4xpages._getmanager /*keymon.lat.medicomed.b4xpagesmanager*/ (getActivityBA())._activity_actionbarhomeclick /*String*/ (null); -RDebugUtils.currentLine=38862850; - //BA.debugLineNum = 38862850;BA.debugLine="End Sub"; +public String _activity_actionbarhomeclick() throws Exception{ + //BA.debugLineNum = 35;BA.debugLine="Public Sub Activity_ActionBarHomeClick"; + //BA.debugLineNum = 36;BA.debugLine="B4XPages.GetManager.Activity_ActionBarHomeClick"; +_b4xpages._getmanager /*keymon.lat.medicomed.b4xpagesmanager*/ (getActivityBA())._activity_actionbarhomeclick /*String*/ (); + //BA.debugLineNum = 37;BA.debugLine="End Sub"; return ""; } -public boolean _activity_keypress(keymon.lat.medicomed.b4xpagesdelegator __ref,int _keycode) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesdelegator"; -if (Debug.shouldDelegate(ba, "activity_keypress", true)) - {return ((Boolean) Debug.delegate(ba, "activity_keypress", new Object[] {_keycode}));} -RDebugUtils.currentLine=38731776; - //BA.debugLineNum = 38731776;BA.debugLine="Public Sub Activity_KeyPress (KeyCode As Int) As B"; -RDebugUtils.currentLine=38731777; - //BA.debugLineNum = 38731777;BA.debugLine="Return B4XPages.GetManager.Activity_KeyPress (Key"; -if (true) return _b4xpages._getmanager /*keymon.lat.medicomed.b4xpagesmanager*/ (getActivityBA())._activity_keypress /*boolean*/ (null,_keycode); -RDebugUtils.currentLine=38731778; - //BA.debugLineNum = 38731778;BA.debugLine="End Sub"; +public boolean _activity_keypress(int _keycode) throws Exception{ + //BA.debugLineNum = 27;BA.debugLine="Public Sub Activity_KeyPress (KeyCode As Int) As B"; + //BA.debugLineNum = 28;BA.debugLine="Return B4XPages.GetManager.Activity_KeyPress (Key"; +if (true) return _b4xpages._getmanager /*keymon.lat.medicomed.b4xpagesmanager*/ (getActivityBA())._activity_keypress /*boolean*/ (_keycode); + //BA.debugLineNum = 29;BA.debugLine="End Sub"; return false; } -public String _activity_pause(keymon.lat.medicomed.b4xpagesdelegator __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesdelegator"; -RDebugUtils.currentLine=39124992; - //BA.debugLineNum = 39124992;BA.debugLine="Public Sub Activity_Pause"; -RDebugUtils.currentLine=39124993; - //BA.debugLineNum = 39124993;BA.debugLine="B4XPages.GetManager.Activity_Pause"; -_b4xpages._getmanager /*keymon.lat.medicomed.b4xpagesmanager*/ (getActivityBA())._activity_pause /*String*/ (null); -RDebugUtils.currentLine=39124994; - //BA.debugLineNum = 39124994;BA.debugLine="End Sub"; +public String _activity_pause() throws Exception{ + //BA.debugLineNum = 52;BA.debugLine="Public Sub Activity_Pause"; + //BA.debugLineNum = 53;BA.debugLine="B4XPages.GetManager.Activity_Pause"; +_b4xpages._getmanager /*keymon.lat.medicomed.b4xpagesmanager*/ (getActivityBA())._activity_pause /*String*/ (); + //BA.debugLineNum = 54;BA.debugLine="End Sub"; return ""; } -public String _activity_permissionresult(keymon.lat.medicomed.b4xpagesdelegator __ref,String _permission,boolean _result) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesdelegator"; -if (Debug.shouldDelegate(ba, "activity_permissionresult", true)) - {return ((String) Debug.delegate(ba, "activity_permissionresult", new Object[] {_permission,_result}));} -RDebugUtils.currentLine=38797312; - //BA.debugLineNum = 38797312;BA.debugLine="Sub Activity_PermissionResult (Permission As Strin"; -RDebugUtils.currentLine=38797313; - //BA.debugLineNum = 38797313;BA.debugLine="B4XPages.GetManager.RaiseEvent(B4XPages.GetManage"; -_b4xpages._getmanager /*keymon.lat.medicomed.b4xpagesmanager*/ (getActivityBA())._raiseevent /*String*/ (null,_b4xpages._getmanager /*keymon.lat.medicomed.b4xpagesmanager*/ (getActivityBA())._gettoppage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null),"B4XPage_PermissionResult",new Object[]{(Object)(_permission),(Object)(_result)}); -RDebugUtils.currentLine=38797314; - //BA.debugLineNum = 38797314;BA.debugLine="End Sub"; +public String _activity_permissionresult(String _permission,boolean _result) throws Exception{ + //BA.debugLineNum = 31;BA.debugLine="Sub Activity_PermissionResult (Permission As Strin"; + //BA.debugLineNum = 32;BA.debugLine="B4XPages.GetManager.RaiseEvent(B4XPages.GetManage"; +_b4xpages._getmanager /*keymon.lat.medicomed.b4xpagesmanager*/ (getActivityBA())._raiseevent /*String*/ (_b4xpages._getmanager /*keymon.lat.medicomed.b4xpagesmanager*/ (getActivityBA())._gettoppage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (),"B4XPage_PermissionResult",new Object[]{(Object)(_permission),(Object)(_result)}); + //BA.debugLineNum = 33;BA.debugLine="End Sub"; return ""; } -public String _activity_resume(keymon.lat.medicomed.b4xpagesdelegator __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesdelegator"; -if (Debug.shouldDelegate(ba, "activity_resume", true)) - {return ((String) Debug.delegate(ba, "activity_resume", null));} -RDebugUtils.currentLine=39059456; - //BA.debugLineNum = 39059456;BA.debugLine="Public Sub Activity_Resume"; -RDebugUtils.currentLine=39059457; - //BA.debugLineNum = 39059457;BA.debugLine="B4XPages.GetManager.Activity_Resume"; -_b4xpages._getmanager /*keymon.lat.medicomed.b4xpagesmanager*/ (getActivityBA())._activity_resume /*String*/ (null); -RDebugUtils.currentLine=39059458; - //BA.debugLineNum = 39059458;BA.debugLine="End Sub"; +public String _activity_resume() throws Exception{ + //BA.debugLineNum = 48;BA.debugLine="Public Sub Activity_Resume"; + //BA.debugLineNum = 49;BA.debugLine="B4XPages.GetManager.Activity_Resume"; +_b4xpages._getmanager /*keymon.lat.medicomed.b4xpagesmanager*/ (getActivityBA())._activity_resume /*String*/ (); + //BA.debugLineNum = 50;BA.debugLine="End Sub"; return ""; } -public String _create_menu(keymon.lat.medicomed.b4xpagesdelegator __ref,Object _menu) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesdelegator"; -if (Debug.shouldDelegate(ba, "create_menu", true)) - {return ((String) Debug.delegate(ba, "create_menu", new Object[] {_menu}));} -RDebugUtils.currentLine=38928384; - //BA.debugLineNum = 38928384;BA.debugLine="Public Sub Create_Menu (Menu As Object)"; -RDebugUtils.currentLine=38928385; - //BA.debugLineNum = 38928385;BA.debugLine="B4XPages.GetManager.CreateMenu(Menu)"; -_b4xpages._getmanager /*keymon.lat.medicomed.b4xpagesmanager*/ (getActivityBA())._createmenu /*String*/ (null,_menu); -RDebugUtils.currentLine=38928386; - //BA.debugLineNum = 38928386;BA.debugLine="End Sub"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="End Sub"; return ""; } -public String _initialize(keymon.lat.medicomed.b4xpagesdelegator __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; +public String _create_menu(Object _menu) throws Exception{ + //BA.debugLineNum = 39;BA.debugLine="Public Sub Create_Menu (Menu As Object)"; + //BA.debugLineNum = 40;BA.debugLine="B4XPages.GetManager.CreateMenu(Menu)"; +_b4xpages._getmanager /*keymon.lat.medicomed.b4xpagesmanager*/ (getActivityBA())._createmenu /*String*/ (_menu); + //BA.debugLineNum = 41;BA.debugLine="End Sub"; +return ""; +} +public String _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ innerInitialize(_ba); -RDebugUtils.currentModule="b4xpagesdelegator"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=38666240; - //BA.debugLineNum = 38666240;BA.debugLine="Public Sub Initialize"; -RDebugUtils.currentLine=38666242; - //BA.debugLineNum = 38666242;BA.debugLine="End Sub"; + //BA.debugLineNum = 4;BA.debugLine="Public Sub Initialize"; + //BA.debugLineNum = 6;BA.debugLine="End Sub"; return ""; } -public String _class_globals(keymon.lat.medicomed.b4xpagesdelegator __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesdelegator"; -RDebugUtils.currentLine=38600704; - //BA.debugLineNum = 38600704;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=38600705; - //BA.debugLineNum = 38600705;BA.debugLine="End Sub"; +public String _mainform_resize(double _width,double _height) throws Exception{ + //BA.debugLineNum = 44;BA.debugLine="Public Sub MainForm_Resize(Width As Double, Height"; + //BA.debugLineNum = 45;BA.debugLine="B4XPages.GetManager.MainForm_Resize(Width, Height"; +_b4xpages._getmanager /*keymon.lat.medicomed.b4xpagesmanager*/ (getActivityBA())._mainform_resize /*String*/ (_width,_height); + //BA.debugLineNum = 46;BA.debugLine="End Sub"; return ""; } -public String _mainform_resize(keymon.lat.medicomed.b4xpagesdelegator __ref,double _width,double _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesdelegator"; -if (Debug.shouldDelegate(ba, "mainform_resize", true)) - {return ((String) Debug.delegate(ba, "mainform_resize", new Object[] {_width,_height}));} -RDebugUtils.currentLine=38993920; - //BA.debugLineNum = 38993920;BA.debugLine="Public Sub MainForm_Resize(Width As Double, Height"; -RDebugUtils.currentLine=38993921; - //BA.debugLineNum = 38993921;BA.debugLine="B4XPages.GetManager.MainForm_Resize(Width, Height"; -_b4xpages._getmanager /*keymon.lat.medicomed.b4xpagesmanager*/ (getActivityBA())._mainform_resize /*String*/ (null,_width,_height); -RDebugUtils.currentLine=38993922; - //BA.debugLineNum = 38993922;BA.debugLine="End Sub"; -return ""; +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} } -} \ No newline at end of file diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xpagesmanager.java b/B4A/Objects/src/keymon/lat/medicomed/b4xpagesmanager.java index 8ab8911..1e4d8db 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xpagesmanager.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xpagesmanager.java @@ -10,7 +10,7 @@ public class b4xpagesmanager extends B4AClass.ImplB4AClass implements BA.SubDele private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xpagesmanager"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xpagesmanager"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,13 +23,32 @@ public class b4xpagesmanager extends B4AClass.ImplB4AClass implements BA.SubDele 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 keymon.lat.medicomed.b4xorderedmap _idtob4xpage = null; +public keymon.lat.medicomed.b4xorderedmap _rootb4xtopage = null; +public anywheresoftware.b4j.object.JavaObject _context = null; +public keymon.lat.medicomed.b4xset _mstackofpageids = null; +public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; +public anywheresoftware.b4a.objects.ActivityWrapper _mmainform = null; +public boolean _showupindicator = false; +public anywheresoftware.b4j.object.JavaObject _actionbar = null; +public boolean _isforeground = false; +public int _transitionanimationduration = 0; +public keymon.lat.medicomed.b4xmainpage _mainpage = null; +public String _stackstring = ""; +public boolean _logevents = false; +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 static class _b4xpageparent{ public boolean IsInitialized; public anywheresoftware.b4a.objects.ActivityWrapper NativeType; @@ -85,653 +104,384 @@ Parent = new keymon.lat.medicomed.b4xpagesmanager._b4xpageparent(); public String toString() { return BA.TypeToString(this, false); }} -public anywheresoftware.b4a.keywords.Common __c = null; -public keymon.lat.medicomed.b4xorderedmap _idtob4xpage = null; -public keymon.lat.medicomed.b4xorderedmap _rootb4xtopage = null; -public anywheresoftware.b4j.object.JavaObject _context = null; -public keymon.lat.medicomed.b4xset _mstackofpageids = null; -public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; -public anywheresoftware.b4a.objects.ActivityWrapper _mmainform = null; -public boolean _showupindicator = false; -public anywheresoftware.b4j.object.JavaObject _actionbar = null; -public boolean _isforeground = false; -public int _transitionanimationduration = 0; -public keymon.lat.medicomed.b4xmainpage _mainpage = null; -public String _stackstring = ""; -public boolean _logevents = false; -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 _initialize(keymon.lat.medicomed.b4xpagesmanager __ref,anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.ActivityWrapper _activity) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_activity}));} -anywheresoftware.b4j.object.JavaObject _jo = null; -anywheresoftware.b4j.object.JavaObject _module = null; -boolean _nonmainpagewasadded = false; -RDebugUtils.currentLine=39256064; - //BA.debugLineNum = 39256064;BA.debugLine="Public Sub Initialize (Activity As Activity)"; -RDebugUtils.currentLine=39256068; - //BA.debugLineNum = 39256068;BA.debugLine="IdToB4XPage.Initialize"; -__ref._idtob4xpage /*keymon.lat.medicomed.b4xorderedmap*/ ._initialize /*String*/ (null,ba); -RDebugUtils.currentLine=39256069; - //BA.debugLineNum = 39256069;BA.debugLine="RootB4XToPage.Initialize"; -__ref._rootb4xtopage /*keymon.lat.medicomed.b4xorderedmap*/ ._initialize /*String*/ (null,ba); -RDebugUtils.currentLine=39256070; - //BA.debugLineNum = 39256070;BA.debugLine="mStackOfPageIds.Initialize"; -__ref._mstackofpageids /*keymon.lat.medicomed.b4xset*/ ._initialize /*String*/ (null,ba); -RDebugUtils.currentLine=39256074; - //BA.debugLineNum = 39256074;BA.debugLine="Context.InitializeContext"; -__ref._context /*anywheresoftware.b4j.object.JavaObject*/ .InitializeContext(ba); -RDebugUtils.currentLine=39256075; - //BA.debugLineNum = 39256075;BA.debugLine="mMainForm = Activity"; -__ref._mmainform /*anywheresoftware.b4a.objects.ActivityWrapper*/ = _activity; -RDebugUtils.currentLine=39256076; - //BA.debugLineNum = 39256076;BA.debugLine="CheckMainActivityOrientations"; -__ref._checkmainactivityorientations /*String*/ (null); -RDebugUtils.currentLine=39256077; - //BA.debugLineNum = 39256077;BA.debugLine="Dim jo As JavaObject = Me"; -_jo = new anywheresoftware.b4j.object.JavaObject(); -_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(this)); -RDebugUtils.currentLine=39256078; - //BA.debugLineNum = 39256078;BA.debugLine="Dim module As JavaObject"; -_module = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=39256079; - //BA.debugLineNum = 39256079;BA.debugLine="module.InitializeStatic(jo.RunMethodJO(\"getActivi"; -_module.InitializeStatic(BA.ObjectToString(_jo.RunMethodJO("getActivityBA",(Object[])(__c.Null)).GetField("className"))).SetField("dontPause",(Object)(__c.True)); -RDebugUtils.currentLine=39256083; - //BA.debugLineNum = 39256083;BA.debugLine="B4XPages.InternalSetPagesManager(Me)"; -_b4xpages._internalsetpagesmanager /*String*/ (ba,this); -RDebugUtils.currentLine=39256084; - //BA.debugLineNum = 39256084;BA.debugLine="MainPage.Initialize"; -__ref._mainpage /*keymon.lat.medicomed.b4xmainpage*/ ._initialize /*String*/ (null,ba); -RDebugUtils.currentLine=39256085; - //BA.debugLineNum = 39256085;BA.debugLine="Dim NonMainPageWasAdded As Boolean = IdToB4XPage."; -_nonmainpagewasadded = __ref._idtob4xpage /*keymon.lat.medicomed.b4xorderedmap*/ ._getsize /*int*/ (null)>0; -RDebugUtils.currentLine=39256086; - //BA.debugLineNum = 39256086;BA.debugLine="IdToB4XPage.Put(\"~~~~~temp~~~~\", CreateB4XPageInf"; -__ref._idtob4xpage /*keymon.lat.medicomed.b4xorderedmap*/ ._put /*String*/ (null,(Object)("~~~~~temp~~~~"),(Object)(__ref._createb4xpageinfo /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null,(Object)(__ref._mainpage /*keymon.lat.medicomed.b4xmainpage*/ ),"",__c.False,(Object)("")))); -RDebugUtils.currentLine=39256087; - //BA.debugLineNum = 39256087;BA.debugLine="BackgroundStateChanged(True)"; -__ref._backgroundstatechanged /*String*/ (null,__c.True); -RDebugUtils.currentLine=39256088; - //BA.debugLineNum = 39256088;BA.debugLine="IdToB4XPage.Remove(\"~~~~~temp~~~~\")"; -__ref._idtob4xpage /*keymon.lat.medicomed.b4xorderedmap*/ ._remove /*String*/ (null,(Object)("~~~~~temp~~~~")); -RDebugUtils.currentLine=39256089; - //BA.debugLineNum = 39256089;BA.debugLine="AddPageAndCreate(\"MainPage\", MainPage)"; -__ref._addpageandcreate /*String*/ (null,"MainPage",(Object)(__ref._mainpage /*keymon.lat.medicomed.b4xmainpage*/ )); -RDebugUtils.currentLine=39256090; - //BA.debugLineNum = 39256090;BA.debugLine="If LogEvents = False Then"; -if (__ref._logevents /*boolean*/ ==__c.False) { -RDebugUtils.currentLine=39256091; - //BA.debugLineNum = 39256091;BA.debugLine="Log(\"Call B4XPages.GetManager.LogEvents = True t"; -__c.LogImpl("939256091","Call B4XPages.GetManager.LogEvents = True to enable logging B4XPages events.",0); - }; -RDebugUtils.currentLine=39256093; - //BA.debugLineNum = 39256093;BA.debugLine="If NonMainPageWasAdded Then"; -if (_nonmainpagewasadded) { -RDebugUtils.currentLine=39256094; - //BA.debugLineNum = 39256094;BA.debugLine="If Not(xui.IsB4i) Then"; -if (__c.Not(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4i())) { -RDebugUtils.currentLine=39256095; - //BA.debugLineNum = 39256095;BA.debugLine="RaiseEvent(GetTopPage, \"B4XPage_Appear\", Null)"; -__ref._raiseevent /*String*/ (null,__ref._gettoppage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null),"B4XPage_Appear",(Object[])(__c.Null)); - }; - }; -RDebugUtils.currentLine=39256098; - //BA.debugLineNum = 39256098;BA.debugLine="End Sub"; -return ""; -} -public keymon.lat.medicomed.b4xpagesmanager._b4amenuitem _addmenuitem(keymon.lat.medicomed.b4xpagesmanager __ref,Object _b4xpage,Object _title) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "addmenuitem", true)) - {return ((keymon.lat.medicomed.b4xpagesmanager._b4amenuitem) Debug.delegate(ba, "addmenuitem", new Object[] {_b4xpage,_title}));} -keymon.lat.medicomed.b4xpagesmanager._b4amenuitem _mi = null; -RDebugUtils.currentLine=40632320; - //BA.debugLineNum = 40632320;BA.debugLine="Public Sub AddMenuItem (B4XPage As Object, Title A"; -RDebugUtils.currentLine=40632321; - //BA.debugLineNum = 40632321;BA.debugLine="Dim mi As B4AMenuItem"; -_mi = new keymon.lat.medicomed.b4xpagesmanager._b4amenuitem(); -RDebugUtils.currentLine=40632322; - //BA.debugLineNum = 40632322;BA.debugLine="mi.Initialize"; -_mi.Initialize(); -RDebugUtils.currentLine=40632323; - //BA.debugLineNum = 40632323;BA.debugLine="mi.Title = Title"; -_mi.Title /*Object*/ = _title; -RDebugUtils.currentLine=40632324; - //BA.debugLineNum = 40632324;BA.debugLine="mi.Tag = Title"; -_mi.Tag /*String*/ = BA.ObjectToString(_title); -RDebugUtils.currentLine=40632325; - //BA.debugLineNum = 40632325;BA.debugLine="FindPIFromB4XPage(B4XPage).Parent.MenuItems.Add(m"; -__ref._findpifromb4xpage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null,_b4xpage).Parent /*keymon.lat.medicomed.b4xpagesmanager._b4xpageparent*/ .MenuItems /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(_mi)); -RDebugUtils.currentLine=40632326; - //BA.debugLineNum = 40632326;BA.debugLine="Return mi"; -if (true) return _mi; -RDebugUtils.currentLine=40632327; - //BA.debugLineNum = 40632327;BA.debugLine="End Sub"; -return null; -} -public String _addpage(keymon.lat.medicomed.b4xpagesmanager __ref,String _id,Object _b4xpage) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "addpage", true)) - {return ((String) Debug.delegate(ba, "addpage", new Object[] {_id,_b4xpage}));} -String _idtolower = ""; -RDebugUtils.currentLine=39452672; - //BA.debugLineNum = 39452672;BA.debugLine="Public Sub AddPage (Id As String, B4XPage As Objec"; -RDebugUtils.currentLine=39452673; - //BA.debugLineNum = 39452673;BA.debugLine="Dim IdToLower As String = Id.ToLowerCase"; -_idtolower = _id.toLowerCase(); -RDebugUtils.currentLine=39452674; - //BA.debugLineNum = 39452674;BA.debugLine="If IdToB4XPage.ContainsKey(IdToLower) Then"; -if (__ref._idtob4xpage /*keymon.lat.medicomed.b4xorderedmap*/ ._containskey /*boolean*/ (null,(Object)(_idtolower))) { -RDebugUtils.currentLine=39452675; - //BA.debugLineNum = 39452675;BA.debugLine="Log($\"Page with this id already exists: ${IdToLo"; -__c.LogImpl("939452675",("Page with this id already exists: "+__c.SmartStringFormatter("",(Object)(_idtolower))+"!"),0); -RDebugUtils.currentLine=39452676; - //BA.debugLineNum = 39452676;BA.debugLine="Return"; -if (true) return ""; - }; -RDebugUtils.currentLine=39452678; - //BA.debugLineNum = 39452678;BA.debugLine="IdToB4XPage.Put(IdToLower, CreateB4XPageInfo(B4XP"; -__ref._idtob4xpage /*keymon.lat.medicomed.b4xorderedmap*/ ._put /*String*/ (null,(Object)(_idtolower),(Object)(__ref._createb4xpageinfo /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null,_b4xpage,_idtolower,__c.False,(Object)(_id)))); -RDebugUtils.currentLine=39452679; - //BA.debugLineNum = 39452679;BA.debugLine="If IdToB4XPage.Size = 1 Then ShowPage(IdToLower)"; -if (__ref._idtob4xpage /*keymon.lat.medicomed.b4xorderedmap*/ ._getsize /*int*/ (null)==1) { -__ref._showpage /*String*/ (null,_idtolower);}; -RDebugUtils.currentLine=39452680; - //BA.debugLineNum = 39452680;BA.debugLine="End Sub"; -return ""; -} -public String _addpageandcreate(keymon.lat.medicomed.b4xpagesmanager __ref,String _id,Object _b4xpage) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "addpageandcreate", true)) - {return ((String) Debug.delegate(ba, "addpageandcreate", new Object[] {_id,_b4xpage}));} -RDebugUtils.currentLine=39518208; - //BA.debugLineNum = 39518208;BA.debugLine="Public Sub AddPageAndCreate (Id As String, B4XPage"; -RDebugUtils.currentLine=39518209; - //BA.debugLineNum = 39518209;BA.debugLine="AddPage (Id, B4XPage)"; -__ref._addpage /*String*/ (null,_id,_b4xpage); -RDebugUtils.currentLine=39518210; - //BA.debugLineNum = 39518210;BA.debugLine="CreatePageIfNeeded(GetPageFromId(Id))"; -__ref._createpageifneeded /*String*/ (null,__ref._getpagefromid /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null,_id)); -RDebugUtils.currentLine=39518211; - //BA.debugLineNum = 39518211;BA.debugLine="End Sub"; -return ""; -} -public String _closepage(keymon.lat.medicomed.b4xpagesmanager __ref,Object _b4xpage) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "closepage", true)) - {return ((String) Debug.delegate(ba, "closepage", new Object[] {_b4xpage}));} +public String _activity_actionbarhomeclick() throws Exception{ keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi = null; -boolean _isclosingtoppage = false; -RDebugUtils.currentLine=39714816; - //BA.debugLineNum = 39714816;BA.debugLine="Public Sub ClosePage (B4XPage As Object)"; -RDebugUtils.currentLine=39714817; - //BA.debugLineNum = 39714817;BA.debugLine="Dim pi As B4XPageInfo = FindPIFromB4XPage(B4XPage"; -_pi = __ref._findpifromb4xpage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null,_b4xpage); -RDebugUtils.currentLine=39714818; - //BA.debugLineNum = 39714818;BA.debugLine="If mStackOfPageIds.Contains(pi.Id) = False Then R"; -if (__ref._mstackofpageids /*keymon.lat.medicomed.b4xset*/ ._contains /*boolean*/ (null,(Object)(_pi.Id /*String*/ ))==__c.False) { -if (true) return "";}; -RDebugUtils.currentLine=39714819; - //BA.debugLineNum = 39714819;BA.debugLine="If xui.IsB4i And GetTopPage <> pi Then"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4i() && (__ref._gettoppage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null)).equals(_pi) == false) { -RDebugUtils.currentLine=39714820; - //BA.debugLineNum = 39714820;BA.debugLine="Log(\"Only top page can be closed\")"; -__c.LogImpl("939714820","Only top page can be closed",0); -RDebugUtils.currentLine=39714821; - //BA.debugLineNum = 39714821;BA.debugLine="Return"; -if (true) return ""; - }else -{RDebugUtils.currentLine=39714822; - //BA.debugLineNum = 39714822;BA.debugLine="Else If xui.IsB4i And mStackOfPageIds.Size = 1 Th"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4i() && __ref._mstackofpageids /*keymon.lat.medicomed.b4xset*/ ._getsize /*int*/ (null)==1) { -RDebugUtils.currentLine=39714823; - //BA.debugLineNum = 39714823;BA.debugLine="Log(\"First page cannot be closed\")"; -__c.LogImpl("939714823","First page cannot be closed",0); -RDebugUtils.currentLine=39714824; - //BA.debugLineNum = 39714824;BA.debugLine="Return"; -if (true) return ""; - }} -; -RDebugUtils.currentLine=39714826; - //BA.debugLineNum = 39714826;BA.debugLine="Dim IsClosingTopPage As Boolean = GetTopPage = pi"; -_isclosingtoppage = (__ref._gettoppage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null)).equals(_pi); -RDebugUtils.currentLine=39714827; - //BA.debugLineNum = 39714827;BA.debugLine="ClosePageImpl(pi)"; -__ref._closepageimpl /*String*/ (null,_pi); -RDebugUtils.currentLine=39714828; - //BA.debugLineNum = 39714828;BA.debugLine="If IsClosingTopPage Then"; -if (_isclosingtoppage) { -RDebugUtils.currentLine=39714829; - //BA.debugLineNum = 39714829;BA.debugLine="TopPageDisappear"; -__ref._toppagedisappear /*String*/ (null); - }; -RDebugUtils.currentLine=39714831; - //BA.debugLineNum = 39714831;BA.debugLine="If xui.IsB4A And mStackOfPageIds.Size = 1 Then Re"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4A() && __ref._mstackofpageids /*keymon.lat.medicomed.b4xset*/ ._getsize /*int*/ (null)==1) { -if (true) return "";}; -RDebugUtils.currentLine=39714832; - //BA.debugLineNum = 39714832;BA.debugLine="mStackOfPageIds.Remove(pi.Id)"; -__ref._mstackofpageids /*keymon.lat.medicomed.b4xset*/ ._remove /*String*/ (null,(Object)(_pi.Id /*String*/ )); -RDebugUtils.currentLine=39714833; - //BA.debugLineNum = 39714833;BA.debugLine="If IsClosingTopPage Then"; -if (_isclosingtoppage) { -RDebugUtils.currentLine=39714834; - //BA.debugLineNum = 39714834;BA.debugLine="If xui.IsB4A Then ShowPageImpl(GetTopPage)"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4A()) { -__ref._showpageimpl /*String*/ (null,__ref._gettoppage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null));}; -RDebugUtils.currentLine=39714835; - //BA.debugLineNum = 39714835;BA.debugLine="TopPageAppear"; -__ref._toppageappear /*String*/ (null); - }; -RDebugUtils.currentLine=39714837; - //BA.debugLineNum = 39714837;BA.debugLine="End Sub"; -return ""; -} -public keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _findpifromb4xpage(keymon.lat.medicomed.b4xpagesmanager __ref,Object _page) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "findpifromb4xpage", true)) - {return ((keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo) Debug.delegate(ba, "findpifromb4xpage", new Object[] {_page}));} -keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi = null; -RDebugUtils.currentLine=39911424; - //BA.debugLineNum = 39911424;BA.debugLine="Public Sub FindPIFromB4XPage (Page As Object) As B"; -RDebugUtils.currentLine=39911425; - //BA.debugLineNum = 39911425;BA.debugLine="For Each pi As B4XPageInfo In IdToB4XPage.Values"; -{ -final anywheresoftware.b4a.BA.IterableList group1 = __ref._idtob4xpage /*keymon.lat.medicomed.b4xorderedmap*/ ._getvalues /*anywheresoftware.b4a.objects.collections.List*/ (null); -final int groupLen1 = group1.getSize() -;int index1 = 0; -; -for (; index1 < groupLen1;index1++){ -_pi = (keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo)(group1.Get(index1)); -RDebugUtils.currentLine=39911426; - //BA.debugLineNum = 39911426;BA.debugLine="If pi.B4XPage = Page Then"; -if ((_pi.B4XPage /*Object*/ ).equals(_page)) { -RDebugUtils.currentLine=39911427; - //BA.debugLineNum = 39911427;BA.debugLine="Return pi"; -if (true) return _pi; - }; - } -}; -RDebugUtils.currentLine=39911430; - //BA.debugLineNum = 39911430;BA.debugLine="Return Null"; -if (true) return (keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo)(__c.Null); -RDebugUtils.currentLine=39911431; - //BA.debugLineNum = 39911431;BA.debugLine="End Sub"; -return null; -} -public Object _getpage(keymon.lat.medicomed.b4xpagesmanager __ref,String _id) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "getpage", true)) - {return ((Object) Debug.delegate(ba, "getpage", new Object[] {_id}));} -RDebugUtils.currentLine=40304640; - //BA.debugLineNum = 40304640;BA.debugLine="Public Sub GetPage (Id As String) As Object"; -RDebugUtils.currentLine=40304641; - //BA.debugLineNum = 40304641;BA.debugLine="Return GetPageFromId(Id).B4XPage"; -if (true) return __ref._getpagefromid /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null,_id).B4XPage /*Object*/ ; -RDebugUtils.currentLine=40304642; - //BA.debugLineNum = 40304642;BA.debugLine="End Sub"; -return null; -} -public String _settitle(keymon.lat.medicomed.b4xpagesmanager __ref,Object _b4xpage,Object _title) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "settitle", true)) - {return ((String) Debug.delegate(ba, "settitle", new Object[] {_b4xpage,_title}));} -keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi = null; -RDebugUtils.currentLine=40173568; - //BA.debugLineNum = 40173568;BA.debugLine="Public Sub SetTitle (B4XPage As Object, Title As O"; -RDebugUtils.currentLine=40173569; - //BA.debugLineNum = 40173569;BA.debugLine="Dim pi As B4XPageInfo = FindPIFromB4XPage(B4XPage"; -_pi = __ref._findpifromb4xpage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null,_b4xpage); -RDebugUtils.currentLine=40173570; - //BA.debugLineNum = 40173570;BA.debugLine="pi.Title = Title"; -_pi.Title /*Object*/ = _title; -RDebugUtils.currentLine=40173571; - //BA.debugLineNum = 40173571;BA.debugLine="pi.Parent.NativeType.Title = Title"; -_pi.Parent /*keymon.lat.medicomed.b4xpagesmanager._b4xpageparent*/ .NativeType /*anywheresoftware.b4a.objects.ActivityWrapper*/ .setTitle(BA.ObjectToCharSequence(_title)); -RDebugUtils.currentLine=40173572; - //BA.debugLineNum = 40173572;BA.debugLine="End Sub"; -return ""; -} -public String _showpage(keymon.lat.medicomed.b4xpagesmanager __ref,String _id) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "showpage", true)) - {return ((String) Debug.delegate(ba, "showpage", new Object[] {_id}));} -keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi = null; -keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _top = null; -RDebugUtils.currentLine=39583744; - //BA.debugLineNum = 39583744;BA.debugLine="Public Sub ShowPage (Id As String)"; -RDebugUtils.currentLine=39583745; - //BA.debugLineNum = 39583745;BA.debugLine="Dim pi As B4XPageInfo = GetPageFromId(Id)"; -_pi = __ref._getpagefromid /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null,_id); -RDebugUtils.currentLine=39583746; - //BA.debugLineNum = 39583746;BA.debugLine="If pi = GetTopPage Then Return"; -if ((_pi).equals(__ref._gettoppage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null))) { -if (true) return "";}; -RDebugUtils.currentLine=39583747; - //BA.debugLineNum = 39583747;BA.debugLine="CreatePageIfNeeded(pi)"; -__ref._createpageifneeded /*String*/ (null,_pi); -RDebugUtils.currentLine=39583748; - //BA.debugLineNum = 39583748;BA.debugLine="TopPageDisappear"; -__ref._toppagedisappear /*String*/ (null); -RDebugUtils.currentLine=39583750; - //BA.debugLineNum = 39583750;BA.debugLine="Dim Top As B4XPageInfo = GetTopPage"; -_top = __ref._gettoppage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null); -RDebugUtils.currentLine=39583751; - //BA.debugLineNum = 39583751;BA.debugLine="If Top <> Null Then"; -if (_top!= null) { -RDebugUtils.currentLine=39583752; - //BA.debugLineNum = 39583752;BA.debugLine="Top.Root.RemoveViewFromParent"; -_top.Root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .RemoveViewFromParent(); - }; -RDebugUtils.currentLine=39583762; - //BA.debugLineNum = 39583762;BA.debugLine="mStackOfPageIds.Remove(pi.Id)"; -__ref._mstackofpageids /*keymon.lat.medicomed.b4xset*/ ._remove /*String*/ (null,(Object)(_pi.Id /*String*/ )); -RDebugUtils.currentLine=39583763; - //BA.debugLineNum = 39583763;BA.debugLine="ShowPageImpl(pi)"; -__ref._showpageimpl /*String*/ (null,_pi); -RDebugUtils.currentLine=39583764; - //BA.debugLineNum = 39583764;BA.debugLine="mStackOfPageIds.Add(pi.Id)"; -__ref._mstackofpageids /*keymon.lat.medicomed.b4xset*/ ._add /*String*/ (null,(Object)(_pi.Id /*String*/ )); -RDebugUtils.currentLine=39583765; - //BA.debugLineNum = 39583765;BA.debugLine="TopPageAppear"; -__ref._toppageappear /*String*/ (null); -RDebugUtils.currentLine=39583766; - //BA.debugLineNum = 39583766;BA.debugLine="End Sub"; -return ""; -} -public String _showpageandremovepreviouspages(keymon.lat.medicomed.b4xpagesmanager __ref,String _id) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "showpageandremovepreviouspages", true)) - {return ((String) Debug.delegate(ba, "showpageandremovepreviouspages", new Object[] {_id}));} -keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi = null; -keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pagetoremove = null; -RDebugUtils.currentLine=39649280; - //BA.debugLineNum = 39649280;BA.debugLine="Public Sub ShowPageAndRemovePreviousPages (Id As S"; -RDebugUtils.currentLine=39649281; - //BA.debugLineNum = 39649281;BA.debugLine="If GetTopPage = Null Then"; -if (__ref._gettoppage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null)== null) { -RDebugUtils.currentLine=39649282; - //BA.debugLineNum = 39649282;BA.debugLine="ShowPage(Id)"; -__ref._showpage /*String*/ (null,_id); -RDebugUtils.currentLine=39649283; - //BA.debugLineNum = 39649283;BA.debugLine="Return"; -if (true) return ""; - }; -RDebugUtils.currentLine=39649285; - //BA.debugLineNum = 39649285;BA.debugLine="Dim pi As B4XPageInfo = GetPageFromId(Id)"; -_pi = __ref._getpagefromid /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null,_id); -RDebugUtils.currentLine=39649286; - //BA.debugLineNum = 39649286;BA.debugLine="CreatePageIfNeeded(pi)"; -__ref._createpageifneeded /*String*/ (null,_pi); -RDebugUtils.currentLine=39649287; - //BA.debugLineNum = 39649287;BA.debugLine="TopPageDisappear"; -__ref._toppagedisappear /*String*/ (null); -RDebugUtils.currentLine=39649291; - //BA.debugLineNum = 39649291;BA.debugLine="For Each Id As String In mStackOfPageIds.AsList"; -{ -final anywheresoftware.b4a.BA.IterableList group8 = __ref._mstackofpageids /*keymon.lat.medicomed.b4xset*/ ._aslist /*anywheresoftware.b4a.objects.collections.List*/ (null); -final int groupLen8 = group8.getSize() -;int index8 = 0; -; -for (; index8 < groupLen8;index8++){ -_id = BA.ObjectToString(group8.Get(index8)); -RDebugUtils.currentLine=39649292; - //BA.debugLineNum = 39649292;BA.debugLine="Dim PageToRemove As B4XPageInfo = GetPageFromId("; -_pagetoremove = __ref._getpagefromid /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null,_id); -RDebugUtils.currentLine=39649294; - //BA.debugLineNum = 39649294;BA.debugLine="PageToRemove.Root.RemoveViewFromParent"; -_pagetoremove.Root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .RemoveViewFromParent(); - } -}; -RDebugUtils.currentLine=39649301; - //BA.debugLineNum = 39649301;BA.debugLine="mStackOfPageIds.Clear"; -__ref._mstackofpageids /*keymon.lat.medicomed.b4xset*/ ._clear /*String*/ (null); -RDebugUtils.currentLine=39649302; - //BA.debugLineNum = 39649302;BA.debugLine="mStackOfPageIds.Add(pi.Id)"; -__ref._mstackofpageids /*keymon.lat.medicomed.b4xset*/ ._add /*String*/ (null,(Object)(_pi.Id /*String*/ )); -RDebugUtils.currentLine=39649303; - //BA.debugLineNum = 39649303;BA.debugLine="If xui.IsB4A Or xui.IsB4J Then"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4A() || __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4J()) { -RDebugUtils.currentLine=39649304; - //BA.debugLineNum = 39649304;BA.debugLine="ShowPageImpl(pi)"; -__ref._showpageimpl /*String*/ (null,_pi); - }; -RDebugUtils.currentLine=39649306; - //BA.debugLineNum = 39649306;BA.debugLine="TopPageAppear"; -__ref._toppageappear /*String*/ (null); -RDebugUtils.currentLine=39649307; - //BA.debugLineNum = 39649307;BA.debugLine="End Sub"; -return ""; -} -public String _activity_actionbarhomeclick(keymon.lat.medicomed.b4xpagesmanager __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "activity_actionbarhomeclick", true)) - {return ((String) Debug.delegate(ba, "activity_actionbarhomeclick", null));} -keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi = null; -RDebugUtils.currentLine=39387136; - //BA.debugLineNum = 39387136;BA.debugLine="Public Sub Activity_ActionBarHomeClick"; -RDebugUtils.currentLine=39387137; - //BA.debugLineNum = 39387137;BA.debugLine="Dim pi As B4XPageInfo = GetTopPage"; -_pi = __ref._gettoppage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null); -RDebugUtils.currentLine=39387138; - //BA.debugLineNum = 39387138;BA.debugLine="If pi <> Null Then"; + //BA.debugLineNum = 129;BA.debugLine="Public Sub Activity_ActionBarHomeClick"; + //BA.debugLineNum = 130;BA.debugLine="Dim pi As B4XPageInfo = GetTopPage"; +_pi = _gettoppage(); + //BA.debugLineNum = 131;BA.debugLine="If pi <> Null Then"; if (_pi!= null) { -RDebugUtils.currentLine=39387139; - //BA.debugLineNum = 39387139;BA.debugLine="If CloseRequestExists (pi) Then"; -if (__ref._closerequestexists /*boolean*/ (null,_pi)) { -RDebugUtils.currentLine=39387140; - //BA.debugLineNum = 39387140;BA.debugLine="HandleCloseRequest(pi)"; -__ref._handlecloserequest /*void*/ (null,_pi); + //BA.debugLineNum = 132;BA.debugLine="If CloseRequestExists (pi) Then"; +if (_closerequestexists(_pi)) { + //BA.debugLineNum = 133;BA.debugLine="HandleCloseRequest(pi)"; +_handlecloserequest(_pi); }else { -RDebugUtils.currentLine=39387142; - //BA.debugLineNum = 39387142;BA.debugLine="ClosePage(pi.B4XPage)"; -__ref._closepage /*String*/ (null,_pi.B4XPage /*Object*/ ); + //BA.debugLineNum = 135;BA.debugLine="ClosePage(pi.B4XPage)"; +_closepage(_pi.B4XPage /*Object*/ ); }; }; -RDebugUtils.currentLine=39387145; - //BA.debugLineNum = 39387145;BA.debugLine="End Sub"; + //BA.debugLineNum = 138;BA.debugLine="End Sub"; return ""; } -public boolean _activity_keypress(keymon.lat.medicomed.b4xpagesmanager __ref,int _keycode) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "activity_keypress", true)) - {return ((Boolean) Debug.delegate(ba, "activity_keypress", new Object[] {_keycode}));} +public boolean _activity_keypress(int _keycode) throws Exception{ keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi = null; -RDebugUtils.currentLine=40566784; - //BA.debugLineNum = 40566784;BA.debugLine="Public Sub Activity_KeyPress (KeyCode As Int) As B"; -RDebugUtils.currentLine=40566785; - //BA.debugLineNum = 40566785;BA.debugLine="If KeyCode = KeyCodes.KEYCODE_BACK Then"; + //BA.debugLineNum = 468;BA.debugLine="Public Sub Activity_KeyPress (KeyCode As Int) As B"; + //BA.debugLineNum = 469;BA.debugLine="If KeyCode = KeyCodes.KEYCODE_BACK Then"; if (_keycode==__c.KeyCodes.KEYCODE_BACK) { -RDebugUtils.currentLine=40566786; - //BA.debugLineNum = 40566786;BA.debugLine="Dim pi As B4XPageInfo = GetTopPage"; -_pi = __ref._gettoppage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null); -RDebugUtils.currentLine=40566787; - //BA.debugLineNum = 40566787;BA.debugLine="If CloseRequestExists(pi) Then"; -if (__ref._closerequestexists /*boolean*/ (null,_pi)) { -RDebugUtils.currentLine=40566788; - //BA.debugLineNum = 40566788;BA.debugLine="HandleCloseRequest(pi)"; -__ref._handlecloserequest /*void*/ (null,_pi); + //BA.debugLineNum = 470;BA.debugLine="Dim pi As B4XPageInfo = GetTopPage"; +_pi = _gettoppage(); + //BA.debugLineNum = 471;BA.debugLine="If CloseRequestExists(pi) Then"; +if (_closerequestexists(_pi)) { + //BA.debugLineNum = 472;BA.debugLine="HandleCloseRequest(pi)"; +_handlecloserequest(_pi); }else { -RDebugUtils.currentLine=40566790; - //BA.debugLineNum = 40566790;BA.debugLine="ClosePage(pi.B4XPage)"; -__ref._closepage /*String*/ (null,_pi.B4XPage /*Object*/ ); + //BA.debugLineNum = 474;BA.debugLine="ClosePage(pi.B4XPage)"; +_closepage(_pi.B4XPage /*Object*/ ); }; -RDebugUtils.currentLine=40566792; - //BA.debugLineNum = 40566792;BA.debugLine="Return True"; + //BA.debugLineNum = 476;BA.debugLine="Return True"; if (true) return __c.True; }; -RDebugUtils.currentLine=40566794; - //BA.debugLineNum = 40566794;BA.debugLine="Return False"; + //BA.debugLineNum = 478;BA.debugLine="Return False"; if (true) return __c.False; -RDebugUtils.currentLine=40566795; - //BA.debugLineNum = 40566795;BA.debugLine="End Sub"; + //BA.debugLineNum = 479;BA.debugLine="End Sub"; return false; } -public String _activity_pause(keymon.lat.medicomed.b4xpagesmanager __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -RDebugUtils.currentLine=41418752; - //BA.debugLineNum = 41418752;BA.debugLine="Public Sub Activity_Pause"; -RDebugUtils.currentLine=41418753; - //BA.debugLineNum = 41418753;BA.debugLine="RaiseEventWithResult(GetTopPage, \"B4XPage_Disappe"; -__ref._raiseeventwithresult /*Object*/ (null,__ref._gettoppage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null),"B4XPage_Disappear",(Object[])(__c.Null)); -RDebugUtils.currentLine=41418754; - //BA.debugLineNum = 41418754;BA.debugLine="BackgroundStateChanged(False)"; -__ref._backgroundstatechanged /*String*/ (null,__c.False); -RDebugUtils.currentLine=41418755; - //BA.debugLineNum = 41418755;BA.debugLine="End Sub"; +public String _activity_pause() throws Exception{ + //BA.debugLineNum = 635;BA.debugLine="Public Sub Activity_Pause"; + //BA.debugLineNum = 636;BA.debugLine="RaiseEventWithResult(GetTopPage, \"B4XPage_Disappe"; +_raiseeventwithresult(_gettoppage(),"B4XPage_Disappear",(Object[])(__c.Null)); + //BA.debugLineNum = 637;BA.debugLine="BackgroundStateChanged(False)"; +_backgroundstatechanged(__c.False); + //BA.debugLineNum = 638;BA.debugLine="End Sub"; return ""; } -public String _raiseevent(keymon.lat.medicomed.b4xpagesmanager __ref,keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _targetpage,String _subname,Object[] _params) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "raiseevent", true)) - {return ((String) Debug.delegate(ba, "raiseevent", new Object[] {_targetpage,_subname,_params}));} -int _length = 0; -RDebugUtils.currentLine=40960000; - //BA.debugLineNum = 40960000;BA.debugLine="Public Sub RaiseEvent (TargetPage As B4XPageInfo,"; -RDebugUtils.currentLine=40960001; - //BA.debugLineNum = 40960001;BA.debugLine="If TargetPage = Null Then Return"; -if (_targetpage== null) { -if (true) return "";}; -RDebugUtils.currentLine=40960002; - //BA.debugLineNum = 40960002;BA.debugLine="Dim length As Int"; -_length = 0; -RDebugUtils.currentLine=40960003; - //BA.debugLineNum = 40960003;BA.debugLine="If Params = Null Then length = 0 Else length = Pa"; -if (_params== null) { -_length = (int) (0);} -else { -_length = _params.length;}; -RDebugUtils.currentLine=40960004; - //BA.debugLineNum = 40960004;BA.debugLine="LogEvent(TargetPage, SubName)"; -__ref._logevent /*String*/ (null,_targetpage,_subname); -RDebugUtils.currentLine=40960005; - //BA.debugLineNum = 40960005;BA.debugLine="If xui.SubExists(TargetPage.B4XPage, SubName, len"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .SubExists(ba,_targetpage.B4XPage /*Object*/ ,_subname,_length)==__c.False) { -if (true) return "";}; -RDebugUtils.currentLine=40960006; - //BA.debugLineNum = 40960006;BA.debugLine="Select length"; -switch (_length) { -case 0: { -RDebugUtils.currentLine=40960008; - //BA.debugLineNum = 40960008;BA.debugLine="CallSubDelayed(TargetPage.B4XPage, SubName)"; -__c.CallSubDelayed(ba,_targetpage.B4XPage /*Object*/ ,_subname); - break; } -case 1: { -RDebugUtils.currentLine=40960010; - //BA.debugLineNum = 40960010;BA.debugLine="CallSubDelayed2(TargetPage.B4XPage, SubName, Pa"; -__c.CallSubDelayed2(ba,_targetpage.B4XPage /*Object*/ ,_subname,_params[(int) (0)]); - break; } -case 2: { -RDebugUtils.currentLine=40960012; - //BA.debugLineNum = 40960012;BA.debugLine="CallSubDelayed3(TargetPage.B4XPage, SubName, Pa"; -__c.CallSubDelayed3(ba,_targetpage.B4XPage /*Object*/ ,_subname,_params[(int) (0)],_params[(int) (1)]); - break; } -default: { -RDebugUtils.currentLine=40960014; - //BA.debugLineNum = 40960014;BA.debugLine="Log(\"Too many parameters\")"; -__c.LogImpl("940960014","Too many parameters",0); - break; } -} -; -RDebugUtils.currentLine=40960016; - //BA.debugLineNum = 40960016;BA.debugLine="End Sub"; +public String _activity_resume() throws Exception{ +boolean _shouldraise = false; + //BA.debugLineNum = 610;BA.debugLine="Public Sub Activity_Resume"; + //BA.debugLineNum = 611;BA.debugLine="Dim ShouldRaise As Boolean = IsForeground = False"; +_shouldraise = _isforeground==__c.False; + //BA.debugLineNum = 612;BA.debugLine="BackgroundStateChanged(True)"; +_backgroundstatechanged(__c.True); + //BA.debugLineNum = 613;BA.debugLine="If ShouldRaise Then"; +if (_shouldraise) { + //BA.debugLineNum = 614;BA.debugLine="RaiseEvent(GetTopPage, \"B4XPage_Appear\", Null)"; +_raiseevent(_gettoppage(),"B4XPage_Appear",(Object[])(__c.Null)); + }; + //BA.debugLineNum = 616;BA.debugLine="End Sub"; return ""; } -public keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _gettoppage(keymon.lat.medicomed.b4xpagesmanager __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "gettoppage", true)) - {return ((keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo) Debug.delegate(ba, "gettoppage", null));} -RDebugUtils.currentLine=41156608; - //BA.debugLineNum = 41156608;BA.debugLine="Public Sub GetTopPage As B4XPageInfo"; -RDebugUtils.currentLine=41156609; - //BA.debugLineNum = 41156609;BA.debugLine="If mStackOfPageIds.Size = 0 Then Return Null"; -if (__ref._mstackofpageids /*keymon.lat.medicomed.b4xset*/ ._getsize /*int*/ (null)==0) { -if (true) return (keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo)(__c.Null);}; -RDebugUtils.currentLine=41156610; - //BA.debugLineNum = 41156610;BA.debugLine="Return IdToB4XPage.Get(mStackOfPageIds.AsList.Get"; -if (true) return (keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo)(__ref._idtob4xpage /*keymon.lat.medicomed.b4xorderedmap*/ ._get /*Object*/ (null,__ref._mstackofpageids /*keymon.lat.medicomed.b4xset*/ ._aslist /*anywheresoftware.b4a.objects.collections.List*/ (null).Get((int) (__ref._mstackofpageids /*keymon.lat.medicomed.b4xset*/ ._getsize /*int*/ (null)-1)))); -RDebugUtils.currentLine=41156611; - //BA.debugLineNum = 41156611;BA.debugLine="End Sub"; +public keymon.lat.medicomed.b4xpagesmanager._b4amenuitem _addmenuitem(Object _b4xpage,Object _title) throws Exception{ +keymon.lat.medicomed.b4xpagesmanager._b4amenuitem _mi = null; + //BA.debugLineNum = 481;BA.debugLine="Public Sub AddMenuItem (B4XPage As Object, Title A"; + //BA.debugLineNum = 482;BA.debugLine="Dim mi As B4AMenuItem"; +_mi = new keymon.lat.medicomed.b4xpagesmanager._b4amenuitem(); + //BA.debugLineNum = 483;BA.debugLine="mi.Initialize"; +_mi.Initialize(); + //BA.debugLineNum = 484;BA.debugLine="mi.Title = Title"; +_mi.Title /*Object*/ = _title; + //BA.debugLineNum = 485;BA.debugLine="mi.Tag = Title"; +_mi.Tag /*String*/ = BA.ObjectToString(_title); + //BA.debugLineNum = 486;BA.debugLine="FindPIFromB4XPage(B4XPage).Parent.MenuItems.Add(m"; +_findpifromb4xpage(_b4xpage).Parent /*keymon.lat.medicomed.b4xpagesmanager._b4xpageparent*/ .MenuItems /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(_mi)); + //BA.debugLineNum = 487;BA.debugLine="Return mi"; +if (true) return _mi; + //BA.debugLineNum = 488;BA.debugLine="End Sub"; return null; } -public String _activity_resume(keymon.lat.medicomed.b4xpagesmanager __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "activity_resume", true)) - {return ((String) Debug.delegate(ba, "activity_resume", null));} -boolean _shouldraise = false; -RDebugUtils.currentLine=41287680; - //BA.debugLineNum = 41287680;BA.debugLine="Public Sub Activity_Resume"; -RDebugUtils.currentLine=41287681; - //BA.debugLineNum = 41287681;BA.debugLine="Dim ShouldRaise As Boolean = IsForeground = False"; -_shouldraise = __ref._isforeground /*boolean*/ ==__c.False; -RDebugUtils.currentLine=41287682; - //BA.debugLineNum = 41287682;BA.debugLine="BackgroundStateChanged(True)"; -__ref._backgroundstatechanged /*String*/ (null,__c.True); -RDebugUtils.currentLine=41287683; - //BA.debugLineNum = 41287683;BA.debugLine="If ShouldRaise Then"; -if (_shouldraise) { -RDebugUtils.currentLine=41287684; - //BA.debugLineNum = 41287684;BA.debugLine="RaiseEvent(GetTopPage, \"B4XPage_Appear\", Null)"; -__ref._raiseevent /*String*/ (null,__ref._gettoppage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null),"B4XPage_Appear",(Object[])(__c.Null)); +public String _addpage(String _id,Object _b4xpage) throws Exception{ +String _idtolower = ""; + //BA.debugLineNum = 141;BA.debugLine="Public Sub AddPage (Id As String, B4XPage As Objec"; + //BA.debugLineNum = 142;BA.debugLine="Dim IdToLower As String = Id.ToLowerCase"; +_idtolower = _id.toLowerCase(); + //BA.debugLineNum = 143;BA.debugLine="If IdToB4XPage.ContainsKey(IdToLower) Then"; +if (_idtob4xpage._containskey /*boolean*/ ((Object)(_idtolower))) { + //BA.debugLineNum = 144;BA.debugLine="Log($\"Page with this id already exists: ${IdToLo"; +__c.LogImpl("911141123",("Page with this id already exists: "+__c.SmartStringFormatter("",(Object)(_idtolower))+"!"),0); + //BA.debugLineNum = 145;BA.debugLine="Return"; +if (true) return ""; }; -RDebugUtils.currentLine=41287686; - //BA.debugLineNum = 41287686;BA.debugLine="End Sub"; + //BA.debugLineNum = 147;BA.debugLine="IdToB4XPage.Put(IdToLower, CreateB4XPageInfo(B4XP"; +_idtob4xpage._put /*String*/ ((Object)(_idtolower),(Object)(_createb4xpageinfo(_b4xpage,_idtolower,__c.False,(Object)(_id)))); + //BA.debugLineNum = 148;BA.debugLine="If IdToB4XPage.Size = 1 Then ShowPage(IdToLower)"; +if (_idtob4xpage._getsize /*int*/ ()==1) { +_showpage(_idtolower);}; + //BA.debugLineNum = 149;BA.debugLine="End Sub"; return ""; } -public String _createmenu(keymon.lat.medicomed.b4xpagesmanager __ref,Object _menu) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "createmenu", true)) - {return ((String) Debug.delegate(ba, "createmenu", new Object[] {_menu}));} +public String _addpageandcreate(String _id,Object _b4xpage) throws Exception{ + //BA.debugLineNum = 151;BA.debugLine="Public Sub AddPageAndCreate (Id As String, B4XPage"; + //BA.debugLineNum = 152;BA.debugLine="AddPage (Id, B4XPage)"; +_addpage(_id,_b4xpage); + //BA.debugLineNum = 153;BA.debugLine="CreatePageIfNeeded(GetPageFromId(Id))"; +_createpageifneeded(_getpagefromid(_id)); + //BA.debugLineNum = 154;BA.debugLine="End Sub"; +return ""; +} +public String _backgroundstatechanged(boolean _newstate) throws Exception{ +String _ev = ""; +keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi = null; + //BA.debugLineNum = 618;BA.debugLine="Private Sub BackgroundStateChanged (NewState As Bo"; + //BA.debugLineNum = 619;BA.debugLine="If IsForeground = NewState Then Return"; +if (_isforeground==_newstate) { +if (true) return "";}; + //BA.debugLineNum = 620;BA.debugLine="IsForeground = NewState"; +_isforeground = _newstate; + //BA.debugLineNum = 621;BA.debugLine="Dim ev As String"; +_ev = ""; + //BA.debugLineNum = 622;BA.debugLine="If IsForeground Then ev = \"B4XPage_Foreground\" El"; +if (_isforeground) { +_ev = "B4XPage_Foreground";} +else { +_ev = "B4XPage_Background";}; + //BA.debugLineNum = 623;BA.debugLine="For Each pi As B4XPageInfo In IdToB4XPage.Values"; +{ +final anywheresoftware.b4a.BA.IterableList group5 = _idtob4xpage._getvalues /*anywheresoftware.b4a.objects.collections.List*/ (); +final int groupLen5 = group5.getSize() +;int index5 = 0; +; +for (; index5 < groupLen5;index5++){ +_pi = (keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo)(group5.Get(index5)); + //BA.debugLineNum = 624;BA.debugLine="If xui.SubExists(pi.B4XPage, ev, 0) Then"; +if (_xui.SubExists(ba,_pi.B4XPage /*Object*/ ,_ev,(int) (0))) { + //BA.debugLineNum = 625;BA.debugLine="LogEvent(pi, ev)"; +_logevent(_pi,_ev); + //BA.debugLineNum = 626;BA.debugLine="If IsForeground Then"; +if (_isforeground) { + //BA.debugLineNum = 627;BA.debugLine="CallSubDelayed(pi.B4XPage, ev)"; +__c.CallSubDelayed(ba,_pi.B4XPage /*Object*/ ,_ev); + }else { + //BA.debugLineNum = 629;BA.debugLine="CallSub(pi.B4XPage, ev)"; +__c.CallSubNew(ba,_pi.B4XPage /*Object*/ ,_ev); + }; + }; + } +}; + //BA.debugLineNum = 633;BA.debugLine="End Sub"; +return ""; +} +public String _checkmainactivityorientations() throws Exception{ +anywheresoftware.b4j.object.JavaObject _jo = null; +anywheresoftware.b4j.object.JavaObject _jme = null; +boolean _isappcompat = false; +anywheresoftware.b4j.object.JavaObject _pi = null; +Object[] _activities = null; +anywheresoftware.b4j.object.JavaObject _act = null; +String _name = ""; +int _screenorientation = 0; + //BA.debugLineNum = 96;BA.debugLine="Private Sub CheckMainActivityOrientations"; + //BA.debugLineNum = 98;BA.debugLine="Dim jo As JavaObject"; +_jo = new anywheresoftware.b4j.object.JavaObject(); + //BA.debugLineNum = 99;BA.debugLine="jo.InitializeContext"; +_jo.InitializeContext(ba); + //BA.debugLineNum = 101;BA.debugLine="ActionBar = jo.RunMethod(\"getActionBar\", Null)"; +_actionbar = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_jo.RunMethod("getActionBar",(Object[])(__c.Null)))); + //BA.debugLineNum = 102;BA.debugLine="If ActionBar.IsInitialized = False Then"; +if (_actionbar.IsInitialized()==__c.False) { + //BA.debugLineNum = 103;BA.debugLine="Dim jme As JavaObject = Me"; +_jme = new anywheresoftware.b4j.object.JavaObject(); +_jme = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(this)); + //BA.debugLineNum = 104;BA.debugLine="Dim IsAppCompat As Boolean = jme.RunMethod(\"chec"; +_isappcompat = BA.ObjectToBoolean(_jme.RunMethod("checkIfAppCompat",new Object[]{(Object)(_jo.getObject())})); + //BA.debugLineNum = 105;BA.debugLine="If IsAppCompat Then"; +if (_isappcompat) { + //BA.debugLineNum = 106;BA.debugLine="ActionBar = jo.RunMethod(\"getSupportActionBar\","; +_actionbar = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_jo.RunMethod("getSupportActionBar",(Object[])(__c.Null)))); + }; + }; + //BA.debugLineNum = 110;BA.debugLine="Dim pi As JavaObject = jo.RunMethodJO(\"getPackage"; +_pi = new anywheresoftware.b4j.object.JavaObject(); +_pi = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_jo.RunMethodJO("getPackageManager",(Object[])(__c.Null)).RunMethod("getPackageInfo",new Object[]{(Object)(__c.Application.getPackageName()),(Object)(1)}))); + //BA.debugLineNum = 111;BA.debugLine="Dim activities() As Object = pi.GetField(\"activit"; +_activities = (Object[])(_pi.GetField("activities")); + //BA.debugLineNum = 112;BA.debugLine="For Each Act As JavaObject In activities"; +_act = new anywheresoftware.b4j.object.JavaObject(); +{ +final Object[] group13 = _activities; +final int groupLen13 = group13.length +;int index13 = 0; +; +for (; index13 < groupLen13;index13++){ +_act = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(group13[index13])); + //BA.debugLineNum = 113;BA.debugLine="Dim name As String = Act.GetField(\"name\")"; +_name = BA.ObjectToString(_act.GetField("name")); + //BA.debugLineNum = 114;BA.debugLine="If name.EndsWith(\".main\") Then"; +if (_name.endsWith(".main")) { + //BA.debugLineNum = 115;BA.debugLine="Dim screenOrientation As Int = Act.GetField(\"sc"; +_screenorientation = (int)(BA.ObjectToNumber(_act.GetField("screenOrientation"))); + //BA.debugLineNum = 116;BA.debugLine="If screenOrientation = -1 Then"; +if (_screenorientation==-1) { + //BA.debugLineNum = 117;BA.debugLine="LogColor(\"#SupportedOrientations attribute mus"; +__c.LogImpl("911010069","#SupportedOrientations attribute must be set to landscape or portrait.",_xui.Color_Red); + }; + }; + } +}; + //BA.debugLineNum = 121;BA.debugLine="End Sub"; +return ""; +} +public String _class_globals() throws Exception{ + //BA.debugLineNum = 22;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 23;BA.debugLine="Private IdToB4XPage As B4XOrderedMap"; +_idtob4xpage = new keymon.lat.medicomed.b4xorderedmap(); + //BA.debugLineNum = 24;BA.debugLine="Private RootB4XToPage As B4XOrderedMap"; +_rootb4xtopage = new keymon.lat.medicomed.b4xorderedmap(); + //BA.debugLineNum = 26;BA.debugLine="Private Context As JavaObject"; +_context = new anywheresoftware.b4j.object.JavaObject(); + //BA.debugLineNum = 27;BA.debugLine="Type B4XPageParent (NativeType As Activity, MenuI"; +; + //BA.debugLineNum = 28;BA.debugLine="Type B4AMenuItem (Title As Object, Bitmap As B4XB"; +; + //BA.debugLineNum = 34;BA.debugLine="Type B4XPageInfo (B4XPage As Object, Id As String"; +; + //BA.debugLineNum = 38;BA.debugLine="Public mStackOfPageIds As B4XSet"; +_mstackofpageids = new keymon.lat.medicomed.b4xset(); + //BA.debugLineNum = 39;BA.debugLine="Private xui As XUI 'ignore"; +_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); + //BA.debugLineNum = 43;BA.debugLine="Private mMainForm As Activity"; +_mmainform = new anywheresoftware.b4a.objects.ActivityWrapper(); + //BA.debugLineNum = 44;BA.debugLine="Public ShowUpIndicator As Boolean = True"; +_showupindicator = __c.True; + //BA.debugLineNum = 45;BA.debugLine="Public ActionBar As JavaObject"; +_actionbar = new anywheresoftware.b4j.object.JavaObject(); + //BA.debugLineNum = 49;BA.debugLine="Public IsForeground As Boolean"; +_isforeground = false; + //BA.debugLineNum = 50;BA.debugLine="Public TransitionAnimationDuration As Int = 100"; +_transitionanimationduration = (int) (100); + //BA.debugLineNum = 51;BA.debugLine="Public MainPage As B4XMainPage"; +_mainpage = new keymon.lat.medicomed.b4xmainpage(); + //BA.debugLineNum = 52;BA.debugLine="Private StackString As String"; +_stackstring = ""; + //BA.debugLineNum = 53;BA.debugLine="Public LogEvents As Boolean = False"; +_logevents = __c.False; + //BA.debugLineNum = 54;BA.debugLine="End Sub"; +return ""; +} +public String _closepage(Object _b4xpage) throws Exception{ +keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi = null; +boolean _isclosingtoppage = false; + //BA.debugLineNum = 209;BA.debugLine="Public Sub ClosePage (B4XPage As Object)"; + //BA.debugLineNum = 210;BA.debugLine="Dim pi As B4XPageInfo = FindPIFromB4XPage(B4XPage"; +_pi = _findpifromb4xpage(_b4xpage); + //BA.debugLineNum = 211;BA.debugLine="If mStackOfPageIds.Contains(pi.Id) = False Then R"; +if (_mstackofpageids._contains /*boolean*/ ((Object)(_pi.Id /*String*/ ))==__c.False) { +if (true) return "";}; + //BA.debugLineNum = 212;BA.debugLine="If xui.IsB4i And GetTopPage <> pi Then"; +if (_xui.getIsB4i() && (_gettoppage()).equals(_pi) == false) { + //BA.debugLineNum = 213;BA.debugLine="Log(\"Only top page can be closed\")"; +__c.LogImpl("911403268","Only top page can be closed",0); + //BA.debugLineNum = 214;BA.debugLine="Return"; +if (true) return ""; + }else if(_xui.getIsB4i() && _mstackofpageids._getsize /*int*/ ()==1) { + //BA.debugLineNum = 216;BA.debugLine="Log(\"First page cannot be closed\")"; +__c.LogImpl("911403271","First page cannot be closed",0); + //BA.debugLineNum = 217;BA.debugLine="Return"; +if (true) return ""; + }; + //BA.debugLineNum = 219;BA.debugLine="Dim IsClosingTopPage As Boolean = GetTopPage = pi"; +_isclosingtoppage = (_gettoppage()).equals(_pi); + //BA.debugLineNum = 220;BA.debugLine="ClosePageImpl(pi)"; +_closepageimpl(_pi); + //BA.debugLineNum = 221;BA.debugLine="If IsClosingTopPage Then"; +if (_isclosingtoppage) { + //BA.debugLineNum = 222;BA.debugLine="TopPageDisappear"; +_toppagedisappear(); + }; + //BA.debugLineNum = 224;BA.debugLine="If xui.IsB4A And mStackOfPageIds.Size = 1 Then Re"; +if (_xui.getIsB4A() && _mstackofpageids._getsize /*int*/ ()==1) { +if (true) return "";}; + //BA.debugLineNum = 225;BA.debugLine="mStackOfPageIds.Remove(pi.Id)"; +_mstackofpageids._remove /*String*/ ((Object)(_pi.Id /*String*/ )); + //BA.debugLineNum = 226;BA.debugLine="If IsClosingTopPage Then"; +if (_isclosingtoppage) { + //BA.debugLineNum = 227;BA.debugLine="If xui.IsB4A Then ShowPageImpl(GetTopPage)"; +if (_xui.getIsB4A()) { +_showpageimpl(_gettoppage());}; + //BA.debugLineNum = 228;BA.debugLine="TopPageAppear"; +_toppageappear(); + }; + //BA.debugLineNum = 230;BA.debugLine="End Sub"; +return ""; +} +public String _closepageimpl(keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi) throws Exception{ +anywheresoftware.b4a.objects.IntentWrapper _i = null; + //BA.debugLineNum = 315;BA.debugLine="Private Sub ClosePageImpl (pi As B4XPageInfo) 'ign"; + //BA.debugLineNum = 317;BA.debugLine="If mStackOfPageIds.Size = 1 Then"; +if (_mstackofpageids._getsize /*int*/ ()==1) { + //BA.debugLineNum = 318;BA.debugLine="Dim i As Intent"; +_i = new anywheresoftware.b4a.objects.IntentWrapper(); + //BA.debugLineNum = 319;BA.debugLine="i.Initialize(i.ACTION_MAIN, \"\")"; +_i.Initialize(_i.ACTION_MAIN,""); + //BA.debugLineNum = 320;BA.debugLine="i.AddCategory(\"android.intent.category.HOME\")"; +_i.AddCategory("android.intent.category.HOME"); + //BA.debugLineNum = 321;BA.debugLine="i.Flags = 0x10000000"; +_i.setFlags(((int)0x10000000)); + //BA.debugLineNum = 322;BA.debugLine="StartActivity(i)"; +__c.StartActivity(ba,(Object)(_i.getObject())); + }else { + //BA.debugLineNum = 324;BA.debugLine="pi.Root.RemoveViewFromParent"; +_pi.Root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .RemoveViewFromParent(); + }; + //BA.debugLineNum = 331;BA.debugLine="End Sub"; +return ""; +} +public boolean _closerequestexists(keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi) throws Exception{ + //BA.debugLineNum = 534;BA.debugLine="Private Sub CloseRequestExists (pi As B4XPageInfo)"; + //BA.debugLineNum = 535;BA.debugLine="Return xui.SubExists(pi.B4XPage, \"B4XPage_CloseRe"; +if (true) return _xui.SubExists(ba,_pi.B4XPage /*Object*/ ,"B4XPage_CloseRequest",(int) (0)); + //BA.debugLineNum = 536;BA.debugLine="End Sub"; +return false; +} +public keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _createb4xpageinfo(Object _b4xpage,String _id,boolean _created,Object _title) throws Exception{ +keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _t1 = null; + //BA.debugLineNum = 420;BA.debugLine="Private Sub CreateB4XPageInfo (B4XPage As Object,"; + //BA.debugLineNum = 421;BA.debugLine="Dim t1 As B4XPageInfo"; +_t1 = new keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo(); + //BA.debugLineNum = 422;BA.debugLine="t1.Initialize"; +_t1.Initialize(); + //BA.debugLineNum = 423;BA.debugLine="t1.B4XPage = B4XPage"; +_t1.B4XPage /*Object*/ = _b4xpage; + //BA.debugLineNum = 424;BA.debugLine="t1.Id = Id"; +_t1.Id /*String*/ = _id; + //BA.debugLineNum = 425;BA.debugLine="t1.Created = Created"; +_t1.Created /*boolean*/ = _created; + //BA.debugLineNum = 426;BA.debugLine="t1.Title = Title"; +_t1.Title /*Object*/ = _title; + //BA.debugLineNum = 427;BA.debugLine="Return t1"; +if (true) return _t1; + //BA.debugLineNum = 428;BA.debugLine="End Sub"; +return null; +} +public keymon.lat.medicomed.b4xpagesmanager._b4xpageparent _createb4xpageparent(Object _nativetype) throws Exception{ +keymon.lat.medicomed.b4xpagesmanager._b4xpageparent _t1 = null; + //BA.debugLineNum = 598;BA.debugLine="Private Sub CreateB4XPageParent (NativeType As Obj"; + //BA.debugLineNum = 604;BA.debugLine="Dim t1 As B4XPageParent"; +_t1 = new keymon.lat.medicomed.b4xpagesmanager._b4xpageparent(); + //BA.debugLineNum = 605;BA.debugLine="t1.Initialize"; +_t1.Initialize(); + //BA.debugLineNum = 606;BA.debugLine="t1.NativeType = NativeType"; +_t1.NativeType /*anywheresoftware.b4a.objects.ActivityWrapper*/ = (anywheresoftware.b4a.objects.ActivityWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.ActivityWrapper(), (anywheresoftware.b4a.BALayout)(_nativetype)); + //BA.debugLineNum = 607;BA.debugLine="Return t1"; +if (true) return _t1; + //BA.debugLineNum = 608;BA.debugLine="End Sub"; +return null; +} +public String _createmenu(Object _menu) throws Exception{ keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi = null; anywheresoftware.b4j.object.JavaObject _jo = null; keymon.lat.medicomed.b4xpagesmanager._b4amenuitem _mi = null; anywheresoftware.b4j.object.JavaObject _nativemenuitem = null; anywheresoftware.b4a.objects.drawable.BitmapDrawable _bd = null; anywheresoftware.b4j.object.JavaObject _listener = null; -RDebugUtils.currentLine=40763392; - //BA.debugLineNum = 40763392;BA.debugLine="Public Sub CreateMenu (Menu As Object)"; -RDebugUtils.currentLine=40763393; - //BA.debugLineNum = 40763393;BA.debugLine="Dim pi As B4XPageInfo = GetTopPage"; -_pi = __ref._gettoppage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null); -RDebugUtils.currentLine=40763394; - //BA.debugLineNum = 40763394;BA.debugLine="If pi = Null Then Return"; + //BA.debugLineNum = 494;BA.debugLine="Public Sub CreateMenu (Menu As Object)"; + //BA.debugLineNum = 495;BA.debugLine="Dim pi As B4XPageInfo = GetTopPage"; +_pi = _gettoppage(); + //BA.debugLineNum = 496;BA.debugLine="If pi = Null Then Return"; if (_pi== null) { if (true) return "";}; -RDebugUtils.currentLine=40763395; - //BA.debugLineNum = 40763395;BA.debugLine="Dim jo As JavaObject = Menu"; + //BA.debugLineNum = 497;BA.debugLine="Dim jo As JavaObject = Menu"; _jo = new anywheresoftware.b4j.object.JavaObject(); _jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_menu)); -RDebugUtils.currentLine=40763396; - //BA.debugLineNum = 40763396;BA.debugLine="For Each mi As B4AMenuItem In pi.Parent.MenuItems"; + //BA.debugLineNum = 498;BA.debugLine="For Each mi As B4AMenuItem In pi.Parent.MenuItems"; { final anywheresoftware.b4a.BA.IterableList group4 = _pi.Parent /*keymon.lat.medicomed.b4xpagesmanager._b4xpageparent*/ .MenuItems /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen4 = group4.getSize() @@ -739,96 +489,140 @@ final int groupLen4 = group4.getSize() ; for (; index4 < groupLen4;index4++){ _mi = (keymon.lat.medicomed.b4xpagesmanager._b4amenuitem)(group4.Get(index4)); -RDebugUtils.currentLine=40763397; - //BA.debugLineNum = 40763397;BA.debugLine="Dim NativeMenuItem As JavaObject = jo.RunMethod("; + //BA.debugLineNum = 499;BA.debugLine="Dim NativeMenuItem As JavaObject = jo.RunMethod("; _nativemenuitem = new anywheresoftware.b4j.object.JavaObject(); _nativemenuitem = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_jo.RunMethod("add",new Object[]{_mi.Title /*Object*/ }))); -RDebugUtils.currentLine=40763398; - //BA.debugLineNum = 40763398;BA.debugLine="If mi.Bitmap.IsInitialized Then"; + //BA.debugLineNum = 500;BA.debugLine="If mi.Bitmap.IsInitialized Then"; if (_mi.Bitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ .IsInitialized()) { -RDebugUtils.currentLine=40763399; - //BA.debugLineNum = 40763399;BA.debugLine="Dim bd As BitmapDrawable"; + //BA.debugLineNum = 501;BA.debugLine="Dim bd As BitmapDrawable"; _bd = new anywheresoftware.b4a.objects.drawable.BitmapDrawable(); -RDebugUtils.currentLine=40763400; - //BA.debugLineNum = 40763400;BA.debugLine="bd.Initialize(mi.Bitmap)"; + //BA.debugLineNum = 502;BA.debugLine="bd.Initialize(mi.Bitmap)"; _bd.Initialize((android.graphics.Bitmap)(_mi.Bitmap /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ .getObject())); -RDebugUtils.currentLine=40763401; - //BA.debugLineNum = 40763401;BA.debugLine="NativeMenuItem.RunMethod(\"setIcon\", Array(bd))"; + //BA.debugLineNum = 503;BA.debugLine="NativeMenuItem.RunMethod(\"setIcon\", Array(bd))"; _nativemenuitem.RunMethod("setIcon",new Object[]{(Object)(_bd.getObject())}); }; -RDebugUtils.currentLine=40763403; - //BA.debugLineNum = 40763403;BA.debugLine="If mi.AddToBar Then"; + //BA.debugLineNum = 505;BA.debugLine="If mi.AddToBar Then"; if (_mi.AddToBar /*boolean*/ ) { -RDebugUtils.currentLine=40763404; - //BA.debugLineNum = 40763404;BA.debugLine="NativeMenuItem.RunMethod(\"setShowAsAction\", Arr"; + //BA.debugLineNum = 506;BA.debugLine="NativeMenuItem.RunMethod(\"setShowAsAction\", Arr"; _nativemenuitem.RunMethod("setShowAsAction",new Object[]{(Object)(1)}); }; -RDebugUtils.currentLine=40763406; - //BA.debugLineNum = 40763406;BA.debugLine="Dim listener As JavaObject"; + //BA.debugLineNum = 508;BA.debugLine="Dim listener As JavaObject"; _listener = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=40763407; - //BA.debugLineNum = 40763407;BA.debugLine="listener.InitializeNewInstance(Application.Packa"; + //BA.debugLineNum = 509;BA.debugLine="listener.InitializeNewInstance(Application.Packa"; _listener.InitializeNewInstance(__c.Application.getPackageName()+".b4xpagesmanager$PagesMenuListener",new Object[]{_pi.B4XPage /*Object*/ ,(Object)(_mi.Tag /*String*/ )}); -RDebugUtils.currentLine=40763408; - //BA.debugLineNum = 40763408;BA.debugLine="NativeMenuItem.RunMethod(\"setOnMenuItemClickList"; + //BA.debugLineNum = 510;BA.debugLine="NativeMenuItem.RunMethod(\"setOnMenuItemClickList"; _nativemenuitem.RunMethod("setOnMenuItemClickListener",new Object[]{(Object)(_listener.getObject())}); } }; -RDebugUtils.currentLine=40763410; - //BA.debugLineNum = 40763410;BA.debugLine="End Sub"; + //BA.debugLineNum = 512;BA.debugLine="End Sub"; return ""; } -public String _mainform_resize(keymon.lat.medicomed.b4xpagesmanager __ref,double _width,double _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "mainform_resize", true)) - {return ((String) Debug.delegate(ba, "mainform_resize", new Object[] {_width,_height}));} -int _w = 0; -int _h = 0; -RDebugUtils.currentLine=41091072; - //BA.debugLineNum = 41091072;BA.debugLine="Public Sub MainForm_Resize(Width As Double, Height"; -RDebugUtils.currentLine=41091073; - //BA.debugLineNum = 41091073;BA.debugLine="Dim w As Int = Width"; -_w = (int) (_width); -RDebugUtils.currentLine=41091074; - //BA.debugLineNum = 41091074;BA.debugLine="Dim h As Int = Height"; -_h = (int) (_height); -RDebugUtils.currentLine=41091075; - //BA.debugLineNum = 41091075;BA.debugLine="RaiseEvent(GetPageInfoFromRoot(Sender), \"B4XPage_"; -__ref._raiseevent /*String*/ (null,__ref._getpageinfofromroot /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null,(anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba)))),"B4XPage_Resize",new Object[]{(Object)(_w),(Object)(_h)}); -RDebugUtils.currentLine=41091076; - //BA.debugLineNum = 41091076;BA.debugLine="End Sub"; +public String _createpageifneeded(keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi) throws Exception{ + //BA.debugLineNum = 352;BA.debugLine="Private Sub CreatePageIfNeeded(pi As B4XPageInfo)"; + //BA.debugLineNum = 353;BA.debugLine="If pi.Created Then Return"; +if (_pi.Created /*boolean*/ ) { +if (true) return "";}; + //BA.debugLineNum = 354;BA.debugLine="pi.IsFirst = IdToB4XPage.Size = 1"; +_pi.IsFirst /*boolean*/ = _idtob4xpage._getsize /*int*/ ()==1; + //BA.debugLineNum = 355;BA.debugLine="CreatePageImpl (pi)"; +_createpageimpl(_pi); + //BA.debugLineNum = 356;BA.debugLine="pi.Created = True"; +_pi.Created /*boolean*/ = __c.True; + //BA.debugLineNum = 357;BA.debugLine="RootB4XToPage.Put(pi.Root, pi)"; +_rootb4xtopage._put /*String*/ ((Object)(_pi.Root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(Object)(_pi)); + //BA.debugLineNum = 358;BA.debugLine="LogEvent(pi, \"B4XPage_Created\")"; +_logevent(_pi,"B4XPage_Created"); + //BA.debugLineNum = 359;BA.debugLine="CallSub2(pi.B4XPage, \"B4XPage_Created\", pi.root)"; +__c.CallSubNew2(ba,_pi.B4XPage /*Object*/ ,"B4XPage_Created",(Object)(_pi.Root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ )); + //BA.debugLineNum = 361;BA.debugLine="End Sub"; return ""; } -public boolean _closerequestexists(keymon.lat.medicomed.b4xpagesmanager __ref,keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "closerequestexists", true)) - {return ((Boolean) Debug.delegate(ba, "closerequestexists", new Object[] {_pi}));} -RDebugUtils.currentLine=40828928; - //BA.debugLineNum = 40828928;BA.debugLine="Private Sub CloseRequestExists (pi As B4XPageInfo)"; -RDebugUtils.currentLine=40828929; - //BA.debugLineNum = 40828929;BA.debugLine="Return xui.SubExists(pi.B4XPage, \"B4XPage_CloseRe"; -if (true) return __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .SubExists(ba,_pi.B4XPage /*Object*/ ,"B4XPage_CloseRequest",(int) (0)); -RDebugUtils.currentLine=40828930; - //BA.debugLineNum = 40828930;BA.debugLine="End Sub"; -return false; +public String _createpageimpl(keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi) throws Exception{ + //BA.debugLineNum = 369;BA.debugLine="Private Sub CreatePageImpl (pi As B4XPageInfo)"; + //BA.debugLineNum = 381;BA.debugLine="pi.Root = xui.CreatePanel(\"root\")"; +_pi.Root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = _xui.CreatePanel(ba,"root"); + //BA.debugLineNum = 382;BA.debugLine="pi.root.SetLayoutAnimated(0, 0, 0, 100%x, 100%y)"; +_pi.Root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),__c.PerXToCurrent((float) (100),ba),__c.PerYToCurrent((float) (100),ba)); + //BA.debugLineNum = 383;BA.debugLine="pi.Parent = CreateB4XPageParent(mMainForm)"; +_pi.Parent /*keymon.lat.medicomed.b4xpagesmanager._b4xpageparent*/ = _createb4xpageparent((Object)(_mmainform.getObject())); + //BA.debugLineNum = 384;BA.debugLine="pi.Parent.MenuItems.Initialize"; +_pi.Parent /*keymon.lat.medicomed.b4xpagesmanager._b4xpageparent*/ .MenuItems /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); + //BA.debugLineNum = 392;BA.debugLine="End Sub"; +return ""; } -public void _handlecloserequest(keymon.lat.medicomed.b4xpagesmanager __ref,keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi) throws Exception{ -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "handlecloserequest", true)) - {Debug.delegate(ba, "handlecloserequest", new Object[] {_pi}); return;} -ResumableSub_HandleCloseRequest rsub = new ResumableSub_HandleCloseRequest(this,__ref,_pi); +public keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _findpifromb4xpage(Object _page) throws Exception{ +keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi = null; + //BA.debugLineNum = 306;BA.debugLine="Public Sub FindPIFromB4XPage (Page As Object) As B"; + //BA.debugLineNum = 307;BA.debugLine="For Each pi As B4XPageInfo In IdToB4XPage.Values"; +{ +final anywheresoftware.b4a.BA.IterableList group1 = _idtob4xpage._getvalues /*anywheresoftware.b4a.objects.collections.List*/ (); +final int groupLen1 = group1.getSize() +;int index1 = 0; +; +for (; index1 < groupLen1;index1++){ +_pi = (keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo)(group1.Get(index1)); + //BA.debugLineNum = 308;BA.debugLine="If pi.B4XPage = Page Then"; +if ((_pi.B4XPage /*Object*/ ).equals(_page)) { + //BA.debugLineNum = 309;BA.debugLine="Return pi"; +if (true) return _pi; + }; + } +}; + //BA.debugLineNum = 312;BA.debugLine="Return Null"; +if (true) return (keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo)(__c.Null); + //BA.debugLineNum = 313;BA.debugLine="End Sub"; +return null; +} +public Object _getpage(String _id) throws Exception{ + //BA.debugLineNum = 394;BA.debugLine="Public Sub GetPage (Id As String) As Object"; + //BA.debugLineNum = 395;BA.debugLine="Return GetPageFromId(Id).B4XPage"; +if (true) return _getpagefromid(_id).B4XPage /*Object*/ ; + //BA.debugLineNum = 396;BA.debugLine="End Sub"; +return null; +} +public keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _getpagefromid(String _id) throws Exception{ +keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi = null; + //BA.debugLineNum = 398;BA.debugLine="Private Sub GetPageFromId (id As String) As B4XPag"; + //BA.debugLineNum = 399;BA.debugLine="Dim pi As B4XPageInfo = IdToB4XPage.Get(id.ToLowe"; +_pi = (keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo)(_idtob4xpage._get /*Object*/ ((Object)(_id.toLowerCase()))); + //BA.debugLineNum = 400;BA.debugLine="If pi = Null Then"; +if (_pi== null) { + //BA.debugLineNum = 401;BA.debugLine="Log(\"Error: page id not found: \" & id)"; +__c.LogImpl("912058627","Error: page id not found: "+_id,0); + //BA.debugLineNum = 402;BA.debugLine="Log(\"Ids: \" & IdToB4XPage.Keys) 'ignore"; +__c.LogImpl("912058628","Ids: "+BA.ObjectToString(_idtob4xpage._getkeys /*anywheresoftware.b4a.objects.collections.List*/ ()),0); + }; + //BA.debugLineNum = 404;BA.debugLine="Return pi"; +if (true) return _pi; + //BA.debugLineNum = 405;BA.debugLine="End Sub"; +return null; +} +public keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _getpageinfofromroot(anywheresoftware.b4a.objects.B4XViewWrapper _root) throws Exception{ + //BA.debugLineNum = 407;BA.debugLine="Public Sub GetPageInfoFromRoot (Root As B4XView) A"; + //BA.debugLineNum = 408;BA.debugLine="Return RootB4XToPage.Get(Root)"; +if (true) return (keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo)(_rootb4xtopage._get /*Object*/ ((Object)(_root.getObject()))); + //BA.debugLineNum = 409;BA.debugLine="End Sub"; +return null; +} +public keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _gettoppage() throws Exception{ + //BA.debugLineNum = 592;BA.debugLine="Public Sub GetTopPage As B4XPageInfo"; + //BA.debugLineNum = 593;BA.debugLine="If mStackOfPageIds.Size = 0 Then Return Null"; +if (_mstackofpageids._getsize /*int*/ ()==0) { +if (true) return (keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo)(__c.Null);}; + //BA.debugLineNum = 594;BA.debugLine="Return IdToB4XPage.Get(mStackOfPageIds.AsList.Get"; +if (true) return (keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo)(_idtob4xpage._get /*Object*/ (_mstackofpageids._aslist /*anywheresoftware.b4a.objects.collections.List*/ ().Get((int) (_mstackofpageids._getsize /*int*/ ()-1)))); + //BA.debugLineNum = 595;BA.debugLine="End Sub"; +return null; +} +public void _handlecloserequest(keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi) throws Exception{ +ResumableSub_HandleCloseRequest rsub = new ResumableSub_HandleCloseRequest(this,_pi); rsub.resume(ba, null); } public static class ResumableSub_HandleCloseRequest extends BA.ResumableSub { -public ResumableSub_HandleCloseRequest(keymon.lat.medicomed.b4xpagesmanager parent,keymon.lat.medicomed.b4xpagesmanager __ref,keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi) { +public ResumableSub_HandleCloseRequest(keymon.lat.medicomed.b4xpagesmanager parent,keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi) { this.parent = parent; -this.__ref = __ref; this._pi = _pi; -this.__ref = parent; } -keymon.lat.medicomed.b4xpagesmanager __ref; keymon.lat.medicomed.b4xpagesmanager parent; keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi; anywheresoftware.b4a.keywords.Common.ResumableSubWrapper _rs = null; @@ -836,7 +630,6 @@ boolean _shouldclose = false; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="b4xpagesmanager"; while (true) { switch (state) { @@ -846,25 +639,21 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=40894465; - //BA.debugLineNum = 40894465;BA.debugLine="LogEvent(pi, \"B4XPage_CloseRequest\")"; -__ref._logevent /*String*/ (null,_pi,"B4XPage_CloseRequest"); -RDebugUtils.currentLine=40894466; - //BA.debugLineNum = 40894466;BA.debugLine="Dim rs As ResumableSub = CallSub(pi.B4XPage, \"B4X"; + //BA.debugLineNum = 539;BA.debugLine="LogEvent(pi, \"B4XPage_CloseRequest\")"; +parent._logevent(_pi,"B4XPage_CloseRequest"); + //BA.debugLineNum = 540;BA.debugLine="Dim rs As ResumableSub = CallSub(pi.B4XPage, \"B4X"; _rs = new anywheresoftware.b4a.keywords.Common.ResumableSubWrapper(); -_rs = (anywheresoftware.b4a.keywords.Common.ResumableSubWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.keywords.Common.ResumableSubWrapper(), (anywheresoftware.b4a.BA.ResumableSub)(parent.__c.CallSubDebug(ba,_pi.B4XPage /*Object*/ ,"B4XPage_CloseRequest"))); -RDebugUtils.currentLine=40894467; - //BA.debugLineNum = 40894467;BA.debugLine="Wait For (rs) Complete (ShouldClose As Boolean)"; -parent.__c.WaitFor("complete", ba, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "b4xpagesmanager", "handlecloserequest"), _rs); +_rs = (anywheresoftware.b4a.keywords.Common.ResumableSubWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.keywords.Common.ResumableSubWrapper(), (anywheresoftware.b4a.BA.ResumableSub)(parent.__c.CallSubNew(ba,_pi.B4XPage /*Object*/ ,"B4XPage_CloseRequest"))); + //BA.debugLineNum = 541;BA.debugLine="Wait For (rs) Complete (ShouldClose As Boolean)"; +parent.__c.WaitFor("complete", ba, this, _rs); this.state = 5; return; case 5: //C this.state = 1; -_shouldclose = (Boolean) result[1]; +_shouldclose = (Boolean) result[0]; ; -RDebugUtils.currentLine=40894468; - //BA.debugLineNum = 40894468;BA.debugLine="If ShouldClose Then"; + //BA.debugLineNum = 542;BA.debugLine="If ShouldClose Then"; if (true) break; case 1: @@ -877,669 +666,395 @@ this.state = 3; case 3: //C this.state = 4; -RDebugUtils.currentLine=40894469; - //BA.debugLineNum = 40894469;BA.debugLine="ClosePage(pi.B4XPage)"; -__ref._closepage /*String*/ (null,_pi.B4XPage /*Object*/ ); + //BA.debugLineNum = 543;BA.debugLine="ClosePage(pi.B4XPage)"; +parent._closepage(_pi.B4XPage /*Object*/ ); if (true) break; case 4: //C this.state = -1; ; -RDebugUtils.currentLine=40894471; - //BA.debugLineNum = 40894471;BA.debugLine="End Sub"; + //BA.debugLineNum = 545;BA.debugLine="End Sub"; if (true) break; } } } } -public Object _raiseeventwithresult(keymon.lat.medicomed.b4xpagesmanager __ref,keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _targetpage,String _subname,Object[] _params) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "raiseeventwithresult", true)) - {return ((Object) Debug.delegate(ba, "raiseeventwithresult", new Object[] {_targetpage,_subname,_params}));} +public void _complete(boolean _shouldclose) throws Exception{ +} +public String _initialize(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.ActivityWrapper _activity) throws Exception{ +innerInitialize(_ba); +anywheresoftware.b4j.object.JavaObject _jo = null; +anywheresoftware.b4j.object.JavaObject _module = null; +boolean _nonmainpagewasadded = false; + //BA.debugLineNum = 59;BA.debugLine="Public Sub Initialize (Activity As Activity)"; + //BA.debugLineNum = 63;BA.debugLine="IdToB4XPage.Initialize"; +_idtob4xpage._initialize /*String*/ (ba); + //BA.debugLineNum = 64;BA.debugLine="RootB4XToPage.Initialize"; +_rootb4xtopage._initialize /*String*/ (ba); + //BA.debugLineNum = 65;BA.debugLine="mStackOfPageIds.Initialize"; +_mstackofpageids._initialize /*String*/ (ba); + //BA.debugLineNum = 69;BA.debugLine="Context.InitializeContext"; +_context.InitializeContext(ba); + //BA.debugLineNum = 70;BA.debugLine="mMainForm = Activity"; +_mmainform = _activity; + //BA.debugLineNum = 71;BA.debugLine="CheckMainActivityOrientations"; +_checkmainactivityorientations(); + //BA.debugLineNum = 72;BA.debugLine="Dim jo As JavaObject = Me"; +_jo = new anywheresoftware.b4j.object.JavaObject(); +_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(this)); + //BA.debugLineNum = 73;BA.debugLine="Dim module As JavaObject"; +_module = new anywheresoftware.b4j.object.JavaObject(); + //BA.debugLineNum = 74;BA.debugLine="module.InitializeStatic(jo.RunMethodJO(\"getActivi"; +_module.InitializeStatic(BA.ObjectToString(_jo.RunMethodJO("getActivityBA",(Object[])(__c.Null)).GetField("className"))).SetField("dontPause",(Object)(__c.True)); + //BA.debugLineNum = 78;BA.debugLine="B4XPages.InternalSetPagesManager(Me)"; +_b4xpages._internalsetpagesmanager /*String*/ (ba,this); + //BA.debugLineNum = 79;BA.debugLine="MainPage.Initialize"; +_mainpage._initialize /*String*/ (ba); + //BA.debugLineNum = 80;BA.debugLine="Dim NonMainPageWasAdded As Boolean = IdToB4XPage."; +_nonmainpagewasadded = _idtob4xpage._getsize /*int*/ ()>0; + //BA.debugLineNum = 81;BA.debugLine="IdToB4XPage.Put(\"~~~~~temp~~~~\", CreateB4XPageInf"; +_idtob4xpage._put /*String*/ ((Object)("~~~~~temp~~~~"),(Object)(_createb4xpageinfo((Object)(_mainpage),"",__c.False,(Object)("")))); + //BA.debugLineNum = 82;BA.debugLine="BackgroundStateChanged(True)"; +_backgroundstatechanged(__c.True); + //BA.debugLineNum = 83;BA.debugLine="IdToB4XPage.Remove(\"~~~~~temp~~~~\")"; +_idtob4xpage._remove /*String*/ ((Object)("~~~~~temp~~~~")); + //BA.debugLineNum = 84;BA.debugLine="AddPageAndCreate(\"MainPage\", MainPage)"; +_addpageandcreate("MainPage",(Object)(_mainpage)); + //BA.debugLineNum = 85;BA.debugLine="If LogEvents = False Then"; +if (_logevents==__c.False) { + //BA.debugLineNum = 86;BA.debugLine="Log(\"Call B4XPages.GetManager.LogEvents = True t"; +__c.LogImpl("910944539","Call B4XPages.GetManager.LogEvents = True to enable logging B4XPages events.",0); + }; + //BA.debugLineNum = 88;BA.debugLine="If NonMainPageWasAdded Then"; +if (_nonmainpagewasadded) { + //BA.debugLineNum = 89;BA.debugLine="If Not(xui.IsB4i) Then"; +if (__c.Not(_xui.getIsB4i())) { + //BA.debugLineNum = 90;BA.debugLine="RaiseEvent(GetTopPage, \"B4XPage_Appear\", Null)"; +_raiseevent(_gettoppage(),"B4XPage_Appear",(Object[])(__c.Null)); + }; + }; + //BA.debugLineNum = 93;BA.debugLine="End Sub"; +return ""; +} +public String _logevent(keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi,String _ev) throws Exception{ +String _msg = ""; + //BA.debugLineNum = 640;BA.debugLine="Private Sub LogEvent (pi As B4XPageInfo, ev As Str"; + //BA.debugLineNum = 641;BA.debugLine="If LogEvents Then"; +if (_logevents) { + //BA.debugLineNum = 642;BA.debugLine="Dim msg As String = $\"*** ${pi.Id}: ${ev} ${Stac"; +_msg = ("*** "+__c.SmartStringFormatter("",(Object)(_pi.Id /*String*/ ))+": "+__c.SmartStringFormatter("",(Object)(_ev))+" "+__c.SmartStringFormatter("",(Object)(_stackstring))+""); + //BA.debugLineNum = 643;BA.debugLine="Log(msg)"; +__c.LogImpl("913172739",_msg,0); + }; + //BA.debugLineNum = 645;BA.debugLine="End Sub"; +return ""; +} +public String _mainform_resize(double _width,double _height) throws Exception{ +int _w = 0; +int _h = 0; + //BA.debugLineNum = 585;BA.debugLine="Public Sub MainForm_Resize(Width As Double, Height"; + //BA.debugLineNum = 586;BA.debugLine="Dim w As Int = Width"; +_w = (int) (_width); + //BA.debugLineNum = 587;BA.debugLine="Dim h As Int = Height"; +_h = (int) (_height); + //BA.debugLineNum = 588;BA.debugLine="RaiseEvent(GetPageInfoFromRoot(Sender), \"B4XPage_"; +_raiseevent(_getpageinfofromroot((anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba)))),"B4XPage_Resize",new Object[]{(Object)(_w),(Object)(_h)}); + //BA.debugLineNum = 589;BA.debugLine="End Sub"; +return ""; +} +public String _raiseevent(keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _targetpage,String _subname,Object[] _params) throws Exception{ int _length = 0; -RDebugUtils.currentLine=41025536; - //BA.debugLineNum = 41025536;BA.debugLine="Public Sub RaiseEventWithResult (TargetPage As B4X"; -RDebugUtils.currentLine=41025537; - //BA.debugLineNum = 41025537;BA.debugLine="If TargetPage = Null Then Return Null"; + //BA.debugLineNum = 548;BA.debugLine="Public Sub RaiseEvent (TargetPage As B4XPageInfo,"; + //BA.debugLineNum = 549;BA.debugLine="If TargetPage = Null Then Return"; if (_targetpage== null) { -if (true) return __c.Null;}; -RDebugUtils.currentLine=41025538; - //BA.debugLineNum = 41025538;BA.debugLine="Dim length As Int"; +if (true) return "";}; + //BA.debugLineNum = 550;BA.debugLine="Dim length As Int"; _length = 0; -RDebugUtils.currentLine=41025539; - //BA.debugLineNum = 41025539;BA.debugLine="If Params = Null Then length = 0 Else length = Pa"; + //BA.debugLineNum = 551;BA.debugLine="If Params = Null Then length = 0 Else length = Pa"; if (_params== null) { _length = (int) (0);} else { _length = _params.length;}; -RDebugUtils.currentLine=41025540; - //BA.debugLineNum = 41025540;BA.debugLine="LogEvent(TargetPage, SubName)"; -__ref._logevent /*String*/ (null,_targetpage,_subname); -RDebugUtils.currentLine=41025541; - //BA.debugLineNum = 41025541;BA.debugLine="If xui.SubExists(TargetPage.B4XPage, SubName, len"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .SubExists(ba,_targetpage.B4XPage /*Object*/ ,_subname,_length)==__c.False) { -if (true) return __c.Null;}; -RDebugUtils.currentLine=41025542; - //BA.debugLineNum = 41025542;BA.debugLine="Select length"; + //BA.debugLineNum = 552;BA.debugLine="LogEvent(TargetPage, SubName)"; +_logevent(_targetpage,_subname); + //BA.debugLineNum = 553;BA.debugLine="If xui.SubExists(TargetPage.B4XPage, SubName, len"; +if (_xui.SubExists(ba,_targetpage.B4XPage /*Object*/ ,_subname,_length)==__c.False) { +if (true) return "";}; + //BA.debugLineNum = 554;BA.debugLine="Select length"; switch (_length) { case 0: { -RDebugUtils.currentLine=41025544; - //BA.debugLineNum = 41025544;BA.debugLine="Return CallSub(TargetPage.B4XPage, SubName)"; + //BA.debugLineNum = 556;BA.debugLine="CallSubDelayed(TargetPage.B4XPage, SubName)"; +__c.CallSubDelayed(ba,_targetpage.B4XPage /*Object*/ ,_subname); + break; } +case 1: { + //BA.debugLineNum = 558;BA.debugLine="CallSubDelayed2(TargetPage.B4XPage, SubName, Pa"; +__c.CallSubDelayed2(ba,_targetpage.B4XPage /*Object*/ ,_subname,_params[(int) (0)]); + break; } +case 2: { + //BA.debugLineNum = 560;BA.debugLine="CallSubDelayed3(TargetPage.B4XPage, SubName, Pa"; +__c.CallSubDelayed3(ba,_targetpage.B4XPage /*Object*/ ,_subname,_params[(int) (0)],_params[(int) (1)]); + break; } +default: { + //BA.debugLineNum = 562;BA.debugLine="Log(\"Too many parameters\")"; +__c.LogImpl("912648462","Too many parameters",0); + break; } +} +; + //BA.debugLineNum = 564;BA.debugLine="End Sub"; +return ""; +} +public Object _raiseeventwithresult(keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _targetpage,String _subname,Object[] _params) throws Exception{ +int _length = 0; + //BA.debugLineNum = 566;BA.debugLine="Public Sub RaiseEventWithResult (TargetPage As B4X"; + //BA.debugLineNum = 567;BA.debugLine="If TargetPage = Null Then Return Null"; +if (_targetpage== null) { +if (true) return __c.Null;}; + //BA.debugLineNum = 568;BA.debugLine="Dim length As Int"; +_length = 0; + //BA.debugLineNum = 569;BA.debugLine="If Params = Null Then length = 0 Else length = Pa"; +if (_params== null) { +_length = (int) (0);} +else { +_length = _params.length;}; + //BA.debugLineNum = 570;BA.debugLine="LogEvent(TargetPage, SubName)"; +_logevent(_targetpage,_subname); + //BA.debugLineNum = 571;BA.debugLine="If xui.SubExists(TargetPage.B4XPage, SubName, len"; +if (_xui.SubExists(ba,_targetpage.B4XPage /*Object*/ ,_subname,_length)==__c.False) { +if (true) return __c.Null;}; + //BA.debugLineNum = 572;BA.debugLine="Select length"; +switch (_length) { +case 0: { + //BA.debugLineNum = 574;BA.debugLine="Return CallSub(TargetPage.B4XPage, SubName)"; if (true) return __c.CallSubNew(ba,_targetpage.B4XPage /*Object*/ ,_subname); break; } case 1: { -RDebugUtils.currentLine=41025546; - //BA.debugLineNum = 41025546;BA.debugLine="Return CallSub2(TargetPage.B4XPage, SubName, Pa"; + //BA.debugLineNum = 576;BA.debugLine="Return CallSub2(TargetPage.B4XPage, SubName, Pa"; if (true) return __c.CallSubNew2(ba,_targetpage.B4XPage /*Object*/ ,_subname,_params[(int) (0)]); break; } case 2: { -RDebugUtils.currentLine=41025548; - //BA.debugLineNum = 41025548;BA.debugLine="Return CallSub3(TargetPage.B4XPage, SubName, Pa"; + //BA.debugLineNum = 578;BA.debugLine="Return CallSub3(TargetPage.B4XPage, SubName, Pa"; if (true) return __c.CallSubNew3(ba,_targetpage.B4XPage /*Object*/ ,_subname,_params[(int) (0)],_params[(int) (1)]); break; } default: { -RDebugUtils.currentLine=41025550; - //BA.debugLineNum = 41025550;BA.debugLine="Log(\"Too many parameters\")"; -__c.LogImpl("941025550","Too many parameters",0); + //BA.debugLineNum = 580;BA.debugLine="Log(\"Too many parameters\")"; +__c.LogImpl("912713998","Too many parameters",0); break; } } ; -RDebugUtils.currentLine=41025552; - //BA.debugLineNum = 41025552;BA.debugLine="Return Null"; + //BA.debugLineNum = 582;BA.debugLine="Return Null"; if (true) return __c.Null; -RDebugUtils.currentLine=41025553; - //BA.debugLineNum = 41025553;BA.debugLine="End Sub"; + //BA.debugLineNum = 583;BA.debugLine="End Sub"; return null; } -public String _backgroundstatechanged(keymon.lat.medicomed.b4xpagesmanager __ref,boolean _newstate) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "backgroundstatechanged", true)) - {return ((String) Debug.delegate(ba, "backgroundstatechanged", new Object[] {_newstate}));} -String _ev = ""; +public String _settitle(Object _b4xpage,Object _title) throws Exception{ keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi = null; -RDebugUtils.currentLine=41353216; - //BA.debugLineNum = 41353216;BA.debugLine="Private Sub BackgroundStateChanged (NewState As Bo"; -RDebugUtils.currentLine=41353217; - //BA.debugLineNum = 41353217;BA.debugLine="If IsForeground = NewState Then Return"; -if (__ref._isforeground /*boolean*/ ==_newstate) { + //BA.debugLineNum = 363;BA.debugLine="Public Sub SetTitle (B4XPage As Object, Title As O"; + //BA.debugLineNum = 364;BA.debugLine="Dim pi As B4XPageInfo = FindPIFromB4XPage(B4XPage"; +_pi = _findpifromb4xpage(_b4xpage); + //BA.debugLineNum = 365;BA.debugLine="pi.Title = Title"; +_pi.Title /*Object*/ = _title; + //BA.debugLineNum = 366;BA.debugLine="pi.Parent.NativeType.Title = Title"; +_pi.Parent /*keymon.lat.medicomed.b4xpagesmanager._b4xpageparent*/ .NativeType /*anywheresoftware.b4a.objects.ActivityWrapper*/ .setTitle(BA.ObjectToCharSequence(_title)); + //BA.debugLineNum = 367;BA.debugLine="End Sub"; +return ""; +} +public String _showpage(String _id) throws Exception{ +keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi = null; +keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _top = null; + //BA.debugLineNum = 156;BA.debugLine="Public Sub ShowPage (Id As String)"; + //BA.debugLineNum = 157;BA.debugLine="Dim pi As B4XPageInfo = GetPageFromId(Id)"; +_pi = _getpagefromid(_id); + //BA.debugLineNum = 158;BA.debugLine="If pi = GetTopPage Then Return"; +if ((_pi).equals(_gettoppage())) { if (true) return "";}; -RDebugUtils.currentLine=41353218; - //BA.debugLineNum = 41353218;BA.debugLine="IsForeground = NewState"; -__ref._isforeground /*boolean*/ = _newstate; -RDebugUtils.currentLine=41353219; - //BA.debugLineNum = 41353219;BA.debugLine="Dim ev As String"; -_ev = ""; -RDebugUtils.currentLine=41353220; - //BA.debugLineNum = 41353220;BA.debugLine="If IsForeground Then ev = \"B4XPage_Foreground\" El"; -if (__ref._isforeground /*boolean*/ ) { -_ev = "B4XPage_Foreground";} -else { -_ev = "B4XPage_Background";}; -RDebugUtils.currentLine=41353221; - //BA.debugLineNum = 41353221;BA.debugLine="For Each pi As B4XPageInfo In IdToB4XPage.Values"; + //BA.debugLineNum = 159;BA.debugLine="CreatePageIfNeeded(pi)"; +_createpageifneeded(_pi); + //BA.debugLineNum = 160;BA.debugLine="TopPageDisappear"; +_toppagedisappear(); + //BA.debugLineNum = 162;BA.debugLine="Dim Top As B4XPageInfo = GetTopPage"; +_top = _gettoppage(); + //BA.debugLineNum = 163;BA.debugLine="If Top <> Null Then"; +if (_top!= null) { + //BA.debugLineNum = 164;BA.debugLine="Top.Root.RemoveViewFromParent"; +_top.Root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .RemoveViewFromParent(); + }; + //BA.debugLineNum = 174;BA.debugLine="mStackOfPageIds.Remove(pi.Id)"; +_mstackofpageids._remove /*String*/ ((Object)(_pi.Id /*String*/ )); + //BA.debugLineNum = 175;BA.debugLine="ShowPageImpl(pi)"; +_showpageimpl(_pi); + //BA.debugLineNum = 176;BA.debugLine="mStackOfPageIds.Add(pi.Id)"; +_mstackofpageids._add /*String*/ ((Object)(_pi.Id /*String*/ )); + //BA.debugLineNum = 177;BA.debugLine="TopPageAppear"; +_toppageappear(); + //BA.debugLineNum = 178;BA.debugLine="End Sub"; +return ""; +} +public String _showpageandremovepreviouspages(String _id) throws Exception{ +keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi = null; +keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pagetoremove = null; + //BA.debugLineNum = 180;BA.debugLine="Public Sub ShowPageAndRemovePreviousPages (Id As S"; + //BA.debugLineNum = 181;BA.debugLine="If GetTopPage = Null Then"; +if (_gettoppage()== null) { + //BA.debugLineNum = 182;BA.debugLine="ShowPage(Id)"; +_showpage(_id); + //BA.debugLineNum = 183;BA.debugLine="Return"; +if (true) return ""; + }; + //BA.debugLineNum = 185;BA.debugLine="Dim pi As B4XPageInfo = GetPageFromId(Id)"; +_pi = _getpagefromid(_id); + //BA.debugLineNum = 186;BA.debugLine="CreatePageIfNeeded(pi)"; +_createpageifneeded(_pi); + //BA.debugLineNum = 187;BA.debugLine="TopPageDisappear"; +_toppagedisappear(); + //BA.debugLineNum = 191;BA.debugLine="For Each Id As String In mStackOfPageIds.AsList"; { -final anywheresoftware.b4a.BA.IterableList group5 = __ref._idtob4xpage /*keymon.lat.medicomed.b4xorderedmap*/ ._getvalues /*anywheresoftware.b4a.objects.collections.List*/ (null); -final int groupLen5 = group5.getSize() -;int index5 = 0; +final anywheresoftware.b4a.BA.IterableList group8 = _mstackofpageids._aslist /*anywheresoftware.b4a.objects.collections.List*/ (); +final int groupLen8 = group8.getSize() +;int index8 = 0; ; -for (; index5 < groupLen5;index5++){ -_pi = (keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo)(group5.Get(index5)); -RDebugUtils.currentLine=41353222; - //BA.debugLineNum = 41353222;BA.debugLine="If xui.SubExists(pi.B4XPage, ev, 0) Then"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .SubExists(ba,_pi.B4XPage /*Object*/ ,_ev,(int) (0))) { -RDebugUtils.currentLine=41353223; - //BA.debugLineNum = 41353223;BA.debugLine="LogEvent(pi, ev)"; -__ref._logevent /*String*/ (null,_pi,_ev); -RDebugUtils.currentLine=41353224; - //BA.debugLineNum = 41353224;BA.debugLine="If IsForeground Then"; -if (__ref._isforeground /*boolean*/ ) { -RDebugUtils.currentLine=41353225; - //BA.debugLineNum = 41353225;BA.debugLine="CallSubDelayed(pi.B4XPage, ev)"; -__c.CallSubDelayed(ba,_pi.B4XPage /*Object*/ ,_ev); - }else { -RDebugUtils.currentLine=41353227; - //BA.debugLineNum = 41353227;BA.debugLine="CallSub(pi.B4XPage, ev)"; -__c.CallSubNew(ba,_pi.B4XPage /*Object*/ ,_ev); - }; - }; +for (; index8 < groupLen8;index8++){ +_id = BA.ObjectToString(group8.Get(index8)); + //BA.debugLineNum = 192;BA.debugLine="Dim PageToRemove As B4XPageInfo = GetPageFromId("; +_pagetoremove = _getpagefromid(_id); + //BA.debugLineNum = 194;BA.debugLine="PageToRemove.Root.RemoveViewFromParent"; +_pagetoremove.Root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .RemoveViewFromParent(); } }; -RDebugUtils.currentLine=41353231; - //BA.debugLineNum = 41353231;BA.debugLine="End Sub"; + //BA.debugLineNum = 201;BA.debugLine="mStackOfPageIds.Clear"; +_mstackofpageids._clear /*String*/ (); + //BA.debugLineNum = 202;BA.debugLine="mStackOfPageIds.Add(pi.Id)"; +_mstackofpageids._add /*String*/ ((Object)(_pi.Id /*String*/ )); + //BA.debugLineNum = 203;BA.debugLine="If xui.IsB4A Or xui.IsB4J Then"; +if (_xui.getIsB4A() || _xui.getIsB4J()) { + //BA.debugLineNum = 204;BA.debugLine="ShowPageImpl(pi)"; +_showpageimpl(_pi); + }; + //BA.debugLineNum = 206;BA.debugLine="TopPageAppear"; +_toppageappear(); + //BA.debugLineNum = 207;BA.debugLine="End Sub"; return ""; } -public keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _createb4xpageinfo(keymon.lat.medicomed.b4xpagesmanager __ref,Object _b4xpage,String _id,boolean _created,Object _title) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "createb4xpageinfo", true)) - {return ((keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo) Debug.delegate(ba, "createb4xpageinfo", new Object[] {_b4xpage,_id,_created,_title}));} -keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _t1 = null; -RDebugUtils.currentLine=40501248; - //BA.debugLineNum = 40501248;BA.debugLine="Private Sub CreateB4XPageInfo (B4XPage As Object,"; -RDebugUtils.currentLine=40501249; - //BA.debugLineNum = 40501249;BA.debugLine="Dim t1 As B4XPageInfo"; -_t1 = new keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo(); -RDebugUtils.currentLine=40501250; - //BA.debugLineNum = 40501250;BA.debugLine="t1.Initialize"; -_t1.Initialize(); -RDebugUtils.currentLine=40501251; - //BA.debugLineNum = 40501251;BA.debugLine="t1.B4XPage = B4XPage"; -_t1.B4XPage /*Object*/ = _b4xpage; -RDebugUtils.currentLine=40501252; - //BA.debugLineNum = 40501252;BA.debugLine="t1.Id = Id"; -_t1.Id /*String*/ = _id; -RDebugUtils.currentLine=40501253; - //BA.debugLineNum = 40501253;BA.debugLine="t1.Created = Created"; -_t1.Created /*boolean*/ = _created; -RDebugUtils.currentLine=40501254; - //BA.debugLineNum = 40501254;BA.debugLine="t1.Title = Title"; -_t1.Title /*Object*/ = _title; -RDebugUtils.currentLine=40501255; - //BA.debugLineNum = 40501255;BA.debugLine="Return t1"; -if (true) return _t1; -RDebugUtils.currentLine=40501256; - //BA.debugLineNum = 40501256;BA.debugLine="End Sub"; -return null; -} -public String _createpageifneeded(keymon.lat.medicomed.b4xpagesmanager __ref,keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "createpageifneeded", true)) - {return ((String) Debug.delegate(ba, "createpageifneeded", new Object[] {_pi}));} -RDebugUtils.currentLine=40108032; - //BA.debugLineNum = 40108032;BA.debugLine="Private Sub CreatePageIfNeeded(pi As B4XPageInfo)"; -RDebugUtils.currentLine=40108033; - //BA.debugLineNum = 40108033;BA.debugLine="If pi.Created Then Return"; -if (_pi.Created /*boolean*/ ) { -if (true) return "";}; -RDebugUtils.currentLine=40108034; - //BA.debugLineNum = 40108034;BA.debugLine="pi.IsFirst = IdToB4XPage.Size = 1"; -_pi.IsFirst /*boolean*/ = __ref._idtob4xpage /*keymon.lat.medicomed.b4xorderedmap*/ ._getsize /*int*/ (null)==1; -RDebugUtils.currentLine=40108035; - //BA.debugLineNum = 40108035;BA.debugLine="CreatePageImpl (pi)"; -__ref._createpageimpl /*String*/ (null,_pi); -RDebugUtils.currentLine=40108036; - //BA.debugLineNum = 40108036;BA.debugLine="pi.Created = True"; -_pi.Created /*boolean*/ = __c.True; -RDebugUtils.currentLine=40108037; - //BA.debugLineNum = 40108037;BA.debugLine="RootB4XToPage.Put(pi.Root, pi)"; -__ref._rootb4xtopage /*keymon.lat.medicomed.b4xorderedmap*/ ._put /*String*/ (null,(Object)(_pi.Root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(Object)(_pi)); -RDebugUtils.currentLine=40108038; - //BA.debugLineNum = 40108038;BA.debugLine="LogEvent(pi, \"B4XPage_Created\")"; -__ref._logevent /*String*/ (null,_pi,"B4XPage_Created"); -RDebugUtils.currentLine=40108039; - //BA.debugLineNum = 40108039;BA.debugLine="CallSub2(pi.B4XPage, \"B4XPage_Created\", pi.root)"; -__c.CallSubDebug2(ba,_pi.B4XPage /*Object*/ ,"B4XPage_Created",(Object)(_pi.Root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ )); -RDebugUtils.currentLine=40108041; - //BA.debugLineNum = 40108041;BA.debugLine="End Sub"; -return ""; -} -public keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _getpagefromid(keymon.lat.medicomed.b4xpagesmanager __ref,String _id) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "getpagefromid", true)) - {return ((keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo) Debug.delegate(ba, "getpagefromid", new Object[] {_id}));} -keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi = null; -RDebugUtils.currentLine=40370176; - //BA.debugLineNum = 40370176;BA.debugLine="Private Sub GetPageFromId (id As String) As B4XPag"; -RDebugUtils.currentLine=40370177; - //BA.debugLineNum = 40370177;BA.debugLine="Dim pi As B4XPageInfo = IdToB4XPage.Get(id.ToLowe"; -_pi = (keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo)(__ref._idtob4xpage /*keymon.lat.medicomed.b4xorderedmap*/ ._get /*Object*/ (null,(Object)(_id.toLowerCase()))); -RDebugUtils.currentLine=40370178; - //BA.debugLineNum = 40370178;BA.debugLine="If pi = Null Then"; -if (_pi== null) { -RDebugUtils.currentLine=40370179; - //BA.debugLineNum = 40370179;BA.debugLine="Log(\"Error: page id not found: \" & id)"; -__c.LogImpl("940370179","Error: page id not found: "+_id,0); -RDebugUtils.currentLine=40370180; - //BA.debugLineNum = 40370180;BA.debugLine="Log(\"Ids: \" & IdToB4XPage.Keys) 'ignore"; -__c.LogImpl("940370180","Ids: "+BA.ObjectToString(__ref._idtob4xpage /*keymon.lat.medicomed.b4xorderedmap*/ ._getkeys /*anywheresoftware.b4a.objects.collections.List*/ (null)),0); - }; -RDebugUtils.currentLine=40370182; - //BA.debugLineNum = 40370182;BA.debugLine="Return pi"; -if (true) return _pi; -RDebugUtils.currentLine=40370183; - //BA.debugLineNum = 40370183;BA.debugLine="End Sub"; -return null; -} -public String _logevent(keymon.lat.medicomed.b4xpagesmanager __ref,keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi,String _ev) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "logevent", true)) - {return ((String) Debug.delegate(ba, "logevent", new Object[] {_pi,_ev}));} -String _msg = ""; -RDebugUtils.currentLine=41484288; - //BA.debugLineNum = 41484288;BA.debugLine="Private Sub LogEvent (pi As B4XPageInfo, ev As Str"; -RDebugUtils.currentLine=41484289; - //BA.debugLineNum = 41484289;BA.debugLine="If LogEvents Then"; -if (__ref._logevents /*boolean*/ ) { -RDebugUtils.currentLine=41484290; - //BA.debugLineNum = 41484290;BA.debugLine="Dim msg As String = $\"*** ${pi.Id}: ${ev} ${Stac"; -_msg = ("*** "+__c.SmartStringFormatter("",(Object)(_pi.Id /*String*/ ))+": "+__c.SmartStringFormatter("",(Object)(_ev))+" "+__c.SmartStringFormatter("",(Object)(__ref._stackstring /*String*/ ))+""); -RDebugUtils.currentLine=41484291; - //BA.debugLineNum = 41484291;BA.debugLine="Log(msg)"; -__c.LogImpl("941484291",_msg,0); - }; -RDebugUtils.currentLine=41484293; - //BA.debugLineNum = 41484293;BA.debugLine="End Sub"; -return ""; -} -public String _checkmainactivityorientations(keymon.lat.medicomed.b4xpagesmanager __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "checkmainactivityorientations", true)) - {return ((String) Debug.delegate(ba, "checkmainactivityorientations", null));} -anywheresoftware.b4j.object.JavaObject _jo = null; -anywheresoftware.b4j.object.JavaObject _jme = null; -boolean _isappcompat = false; -anywheresoftware.b4j.object.JavaObject _pi = null; -Object[] _activities = null; -anywheresoftware.b4j.object.JavaObject _act = null; -String _name = ""; -int _screenorientation = 0; -RDebugUtils.currentLine=39321600; - //BA.debugLineNum = 39321600;BA.debugLine="Private Sub CheckMainActivityOrientations"; -RDebugUtils.currentLine=39321602; - //BA.debugLineNum = 39321602;BA.debugLine="Dim jo As JavaObject"; -_jo = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=39321603; - //BA.debugLineNum = 39321603;BA.debugLine="jo.InitializeContext"; -_jo.InitializeContext(ba); -RDebugUtils.currentLine=39321605; - //BA.debugLineNum = 39321605;BA.debugLine="ActionBar = jo.RunMethod(\"getActionBar\", Null)"; -__ref._actionbar /*anywheresoftware.b4j.object.JavaObject*/ = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_jo.RunMethod("getActionBar",(Object[])(__c.Null)))); -RDebugUtils.currentLine=39321606; - //BA.debugLineNum = 39321606;BA.debugLine="If ActionBar.IsInitialized = False Then"; -if (__ref._actionbar /*anywheresoftware.b4j.object.JavaObject*/ .IsInitialized()==__c.False) { -RDebugUtils.currentLine=39321607; - //BA.debugLineNum = 39321607;BA.debugLine="Dim jme As JavaObject = Me"; -_jme = new anywheresoftware.b4j.object.JavaObject(); -_jme = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(this)); -RDebugUtils.currentLine=39321608; - //BA.debugLineNum = 39321608;BA.debugLine="Dim IsAppCompat As Boolean = jme.RunMethod(\"chec"; -_isappcompat = BA.ObjectToBoolean(_jme.RunMethod("checkIfAppCompat",new Object[]{(Object)(_jo.getObject())})); -RDebugUtils.currentLine=39321609; - //BA.debugLineNum = 39321609;BA.debugLine="If IsAppCompat Then"; -if (_isappcompat) { -RDebugUtils.currentLine=39321610; - //BA.debugLineNum = 39321610;BA.debugLine="ActionBar = jo.RunMethod(\"getSupportActionBar\","; -__ref._actionbar /*anywheresoftware.b4j.object.JavaObject*/ = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_jo.RunMethod("getSupportActionBar",(Object[])(__c.Null)))); - }; - }; -RDebugUtils.currentLine=39321614; - //BA.debugLineNum = 39321614;BA.debugLine="Dim pi As JavaObject = jo.RunMethodJO(\"getPackage"; -_pi = new anywheresoftware.b4j.object.JavaObject(); -_pi = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_jo.RunMethodJO("getPackageManager",(Object[])(__c.Null)).RunMethod("getPackageInfo",new Object[]{(Object)(__c.Application.getPackageName()),(Object)(1)}))); -RDebugUtils.currentLine=39321615; - //BA.debugLineNum = 39321615;BA.debugLine="Dim activities() As Object = pi.GetField(\"activit"; -_activities = (Object[])(_pi.GetField("activities")); -RDebugUtils.currentLine=39321616; - //BA.debugLineNum = 39321616;BA.debugLine="For Each Act As JavaObject In activities"; -_act = new anywheresoftware.b4j.object.JavaObject(); -{ -final Object[] group13 = _activities; -final int groupLen13 = group13.length -;int index13 = 0; -; -for (; index13 < groupLen13;index13++){ -_act = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(group13[index13])); -RDebugUtils.currentLine=39321617; - //BA.debugLineNum = 39321617;BA.debugLine="Dim name As String = Act.GetField(\"name\")"; -_name = BA.ObjectToString(_act.GetField("name")); -RDebugUtils.currentLine=39321618; - //BA.debugLineNum = 39321618;BA.debugLine="If name.EndsWith(\".main\") Then"; -if (_name.endsWith(".main")) { -RDebugUtils.currentLine=39321619; - //BA.debugLineNum = 39321619;BA.debugLine="Dim screenOrientation As Int = Act.GetField(\"sc"; -_screenorientation = (int)(BA.ObjectToNumber(_act.GetField("screenOrientation"))); -RDebugUtils.currentLine=39321620; - //BA.debugLineNum = 39321620;BA.debugLine="If screenOrientation = -1 Then"; -if (_screenorientation==-1) { -RDebugUtils.currentLine=39321621; - //BA.debugLineNum = 39321621;BA.debugLine="LogColor(\"#SupportedOrientations attribute mus"; -__c.LogImpl("939321621","#SupportedOrientations attribute must be set to landscape or portrait.",__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Red); - }; - }; - } -}; -RDebugUtils.currentLine=39321625; - //BA.debugLineNum = 39321625;BA.debugLine="End Sub"; -return ""; -} -public String _class_globals(keymon.lat.medicomed.b4xpagesmanager __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -RDebugUtils.currentLine=39190528; - //BA.debugLineNum = 39190528;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=39190529; - //BA.debugLineNum = 39190529;BA.debugLine="Private IdToB4XPage As B4XOrderedMap"; -_idtob4xpage = new keymon.lat.medicomed.b4xorderedmap(); -RDebugUtils.currentLine=39190530; - //BA.debugLineNum = 39190530;BA.debugLine="Private RootB4XToPage As B4XOrderedMap"; -_rootb4xtopage = new keymon.lat.medicomed.b4xorderedmap(); -RDebugUtils.currentLine=39190532; - //BA.debugLineNum = 39190532;BA.debugLine="Private Context As JavaObject"; -_context = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=39190533; - //BA.debugLineNum = 39190533;BA.debugLine="Type B4XPageParent (NativeType As Activity, MenuI"; -; -RDebugUtils.currentLine=39190534; - //BA.debugLineNum = 39190534;BA.debugLine="Type B4AMenuItem (Title As Object, Bitmap As B4XB"; -; -RDebugUtils.currentLine=39190540; - //BA.debugLineNum = 39190540;BA.debugLine="Type B4XPageInfo (B4XPage As Object, Id As String"; -; -RDebugUtils.currentLine=39190544; - //BA.debugLineNum = 39190544;BA.debugLine="Public mStackOfPageIds As B4XSet"; -_mstackofpageids = new keymon.lat.medicomed.b4xset(); -RDebugUtils.currentLine=39190545; - //BA.debugLineNum = 39190545;BA.debugLine="Private xui As XUI 'ignore"; -_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=39190549; - //BA.debugLineNum = 39190549;BA.debugLine="Private mMainForm As Activity"; -_mmainform = new anywheresoftware.b4a.objects.ActivityWrapper(); -RDebugUtils.currentLine=39190550; - //BA.debugLineNum = 39190550;BA.debugLine="Public ShowUpIndicator As Boolean = True"; -_showupindicator = __c.True; -RDebugUtils.currentLine=39190551; - //BA.debugLineNum = 39190551;BA.debugLine="Public ActionBar As JavaObject"; -_actionbar = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=39190555; - //BA.debugLineNum = 39190555;BA.debugLine="Public IsForeground As Boolean"; -_isforeground = false; -RDebugUtils.currentLine=39190556; - //BA.debugLineNum = 39190556;BA.debugLine="Public TransitionAnimationDuration As Int = 100"; -_transitionanimationduration = (int) (100); -RDebugUtils.currentLine=39190557; - //BA.debugLineNum = 39190557;BA.debugLine="Public MainPage As B4XMainPage"; -_mainpage = new keymon.lat.medicomed.b4xmainpage(); -RDebugUtils.currentLine=39190558; - //BA.debugLineNum = 39190558;BA.debugLine="Private StackString As String"; -_stackstring = ""; -RDebugUtils.currentLine=39190559; - //BA.debugLineNum = 39190559;BA.debugLine="Public LogEvents As Boolean = False"; -_logevents = __c.False; -RDebugUtils.currentLine=39190560; - //BA.debugLineNum = 39190560;BA.debugLine="End Sub"; -return ""; -} -public String _closepageimpl(keymon.lat.medicomed.b4xpagesmanager __ref,keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "closepageimpl", true)) - {return ((String) Debug.delegate(ba, "closepageimpl", new Object[] {_pi}));} -anywheresoftware.b4a.objects.IntentWrapper _i = null; -RDebugUtils.currentLine=39976960; - //BA.debugLineNum = 39976960;BA.debugLine="Private Sub ClosePageImpl (pi As B4XPageInfo) 'ign"; -RDebugUtils.currentLine=39976962; - //BA.debugLineNum = 39976962;BA.debugLine="If mStackOfPageIds.Size = 1 Then"; -if (__ref._mstackofpageids /*keymon.lat.medicomed.b4xset*/ ._getsize /*int*/ (null)==1) { -RDebugUtils.currentLine=39976963; - //BA.debugLineNum = 39976963;BA.debugLine="Dim i As Intent"; -_i = new anywheresoftware.b4a.objects.IntentWrapper(); -RDebugUtils.currentLine=39976964; - //BA.debugLineNum = 39976964;BA.debugLine="i.Initialize(i.ACTION_MAIN, \"\")"; -_i.Initialize(_i.ACTION_MAIN,""); -RDebugUtils.currentLine=39976965; - //BA.debugLineNum = 39976965;BA.debugLine="i.AddCategory(\"android.intent.category.HOME\")"; -_i.AddCategory("android.intent.category.HOME"); -RDebugUtils.currentLine=39976966; - //BA.debugLineNum = 39976966;BA.debugLine="i.Flags = 0x10000000"; -_i.setFlags(((int)0x10000000)); -RDebugUtils.currentLine=39976967; - //BA.debugLineNum = 39976967;BA.debugLine="StartActivity(i)"; -__c.StartActivity(ba,(Object)(_i.getObject())); - }else { -RDebugUtils.currentLine=39976969; - //BA.debugLineNum = 39976969;BA.debugLine="pi.Root.RemoveViewFromParent"; -_pi.Root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .RemoveViewFromParent(); - }; -RDebugUtils.currentLine=39976976; - //BA.debugLineNum = 39976976;BA.debugLine="End Sub"; -return ""; -} -public String _toppagedisappear(keymon.lat.medicomed.b4xpagesmanager __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "toppagedisappear", true)) - {return ((String) Debug.delegate(ba, "toppagedisappear", null));} -keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi = null; -RDebugUtils.currentLine=39780352; - //BA.debugLineNum = 39780352;BA.debugLine="Private Sub TopPageDisappear"; -RDebugUtils.currentLine=39780353; - //BA.debugLineNum = 39780353;BA.debugLine="If xui.IsB4J Then Return"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4J()) { -if (true) return "";}; -RDebugUtils.currentLine=39780354; - //BA.debugLineNum = 39780354;BA.debugLine="Dim pi As B4XPageInfo = GetTopPage"; -_pi = __ref._gettoppage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null); -RDebugUtils.currentLine=39780355; - //BA.debugLineNum = 39780355;BA.debugLine="If pi = Null Then Return"; -if (_pi== null) { -if (true) return "";}; -RDebugUtils.currentLine=39780356; - //BA.debugLineNum = 39780356;BA.debugLine="If Not(xui.IsB4i) Then"; -if (__c.Not(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4i())) { -RDebugUtils.currentLine=39780357; - //BA.debugLineNum = 39780357;BA.debugLine="If IsForeground Then"; -if (__ref._isforeground /*boolean*/ ) { -RDebugUtils.currentLine=39780358; - //BA.debugLineNum = 39780358;BA.debugLine="RaiseEventWithResult(pi, \"B4XPage_Disappear\", N"; -__ref._raiseeventwithresult /*Object*/ (null,_pi,"B4XPage_Disappear",(Object[])(__c.Null)); - }; - }; -RDebugUtils.currentLine=39780361; - //BA.debugLineNum = 39780361;BA.debugLine="End Sub"; -return ""; -} -public String _showpageimpl(keymon.lat.medicomed.b4xpagesmanager __ref,keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "showpageimpl", true)) - {return ((String) Debug.delegate(ba, "showpageimpl", new Object[] {_pi}));} +public String _showpageimpl(keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi) throws Exception{ anywheresoftware.b4a.objects.PanelWrapper _pnl = null; -RDebugUtils.currentLine=40042496; - //BA.debugLineNum = 40042496;BA.debugLine="Private Sub ShowPageImpl (pi As B4XPageInfo)"; -RDebugUtils.currentLine=40042502; - //BA.debugLineNum = 40042502;BA.debugLine="If pi.Root.Parent.IsInitialized Then pi.Root.Remo"; + //BA.debugLineNum = 333;BA.debugLine="Private Sub ShowPageImpl (pi As B4XPageInfo)"; + //BA.debugLineNum = 339;BA.debugLine="If pi.Root.Parent.IsInitialized Then pi.Root.Remo"; if (_pi.Root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getParent().IsInitialized()) { _pi.Root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .RemoveViewFromParent();}; -RDebugUtils.currentLine=40042503; - //BA.debugLineNum = 40042503;BA.debugLine="Dim pnl As Panel = pi.Root"; + //BA.debugLineNum = 340;BA.debugLine="Dim pnl As Panel = pi.Root"; _pnl = new anywheresoftware.b4a.objects.PanelWrapper(); _pnl = (anywheresoftware.b4a.objects.PanelWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.PanelWrapper(), (android.view.ViewGroup)(_pi.Root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject())); -RDebugUtils.currentLine=40042504; - //BA.debugLineNum = 40042504;BA.debugLine="If TransitionAnimationDuration > 0 Then"; -if (__ref._transitionanimationduration /*int*/ >0) { -RDebugUtils.currentLine=40042505; - //BA.debugLineNum = 40042505;BA.debugLine="mMainForm.AddView(pnl, 0, 0, 20dip, 20dip)"; -__ref._mmainform /*anywheresoftware.b4a.objects.ActivityWrapper*/ .AddView((android.view.View)(_pnl.getObject()),(int) (0),(int) (0),__c.DipToCurrent((int) (20)),__c.DipToCurrent((int) (20))); -RDebugUtils.currentLine=40042506; - //BA.debugLineNum = 40042506;BA.debugLine="pnl.SetLayoutAnimated(TransitionAnimationDuratio"; -_pnl.SetLayoutAnimated(__ref._transitionanimationduration /*int*/ ,(int) (0),(int) (0),__c.PerXToCurrent((float) (100),ba),__c.PerYToCurrent((float) (100),ba)); + //BA.debugLineNum = 341;BA.debugLine="If TransitionAnimationDuration > 0 Then"; +if (_transitionanimationduration>0) { + //BA.debugLineNum = 342;BA.debugLine="mMainForm.AddView(pnl, 0, 0, 20dip, 20dip)"; +_mmainform.AddView((android.view.View)(_pnl.getObject()),(int) (0),(int) (0),__c.DipToCurrent((int) (20)),__c.DipToCurrent((int) (20))); + //BA.debugLineNum = 343;BA.debugLine="pnl.SetLayoutAnimated(TransitionAnimationDuratio"; +_pnl.SetLayoutAnimated(_transitionanimationduration,(int) (0),(int) (0),__c.PerXToCurrent((float) (100),ba),__c.PerYToCurrent((float) (100),ba)); }else { -RDebugUtils.currentLine=40042508; - //BA.debugLineNum = 40042508;BA.debugLine="mMainForm.AddView(pnl, 0, 0, 100%x, 100%y)"; -__ref._mmainform /*anywheresoftware.b4a.objects.ActivityWrapper*/ .AddView((android.view.View)(_pnl.getObject()),(int) (0),(int) (0),__c.PerXToCurrent((float) (100),ba),__c.PerYToCurrent((float) (100),ba)); + //BA.debugLineNum = 345;BA.debugLine="mMainForm.AddView(pnl, 0, 0, 100%x, 100%y)"; +_mmainform.AddView((android.view.View)(_pnl.getObject()),(int) (0),(int) (0),__c.PerXToCurrent((float) (100),ba),__c.PerYToCurrent((float) (100),ba)); }; -RDebugUtils.currentLine=40042513; - //BA.debugLineNum = 40042513;BA.debugLine="End Sub"; + //BA.debugLineNum = 350;BA.debugLine="End Sub"; return ""; } -public String _toppageappear(keymon.lat.medicomed.b4xpagesmanager __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "toppageappear", true)) - {return ((String) Debug.delegate(ba, "toppageappear", null));} +public String _toppageappear() throws Exception{ keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi = null; -RDebugUtils.currentLine=39845888; - //BA.debugLineNum = 39845888;BA.debugLine="Private Sub TopPageAppear"; -RDebugUtils.currentLine=39845889; - //BA.debugLineNum = 39845889;BA.debugLine="Dim pi As B4XPageInfo = GetTopPage"; -_pi = __ref._gettoppage /*keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo*/ (null); -RDebugUtils.currentLine=39845890; - //BA.debugLineNum = 39845890;BA.debugLine="If pi = Null Then Return"; + //BA.debugLineNum = 288;BA.debugLine="Private Sub TopPageAppear"; + //BA.debugLineNum = 289;BA.debugLine="Dim pi As B4XPageInfo = GetTopPage"; +_pi = _gettoppage(); + //BA.debugLineNum = 290;BA.debugLine="If pi = Null Then Return"; if (_pi== null) { if (true) return "";}; -RDebugUtils.currentLine=39845891; - //BA.debugLineNum = 39845891;BA.debugLine="pi.Parent.NativeType.Title = pi.Title"; + //BA.debugLineNum = 291;BA.debugLine="pi.Parent.NativeType.Title = pi.Title"; _pi.Parent /*keymon.lat.medicomed.b4xpagesmanager._b4xpageparent*/ .NativeType /*anywheresoftware.b4a.objects.ActivityWrapper*/ .setTitle(BA.ObjectToCharSequence(_pi.Title /*Object*/ )); -RDebugUtils.currentLine=39845892; - //BA.debugLineNum = 39845892;BA.debugLine="If Not(xui.IsB4i) Then"; -if (__c.Not(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4i())) { -RDebugUtils.currentLine=39845893; - //BA.debugLineNum = 39845893;BA.debugLine="If IsForeground Then"; -if (__ref._isforeground /*boolean*/ ) { -RDebugUtils.currentLine=39845894; - //BA.debugLineNum = 39845894;BA.debugLine="RaiseEvent(pi, \"B4XPage_Appear\", Null)"; -__ref._raiseevent /*String*/ (null,_pi,"B4XPage_Appear",(Object[])(__c.Null)); + //BA.debugLineNum = 292;BA.debugLine="If Not(xui.IsB4i) Then"; +if (__c.Not(_xui.getIsB4i())) { + //BA.debugLineNum = 293;BA.debugLine="If IsForeground Then"; +if (_isforeground) { + //BA.debugLineNum = 294;BA.debugLine="RaiseEvent(pi, \"B4XPage_Appear\", Null)"; +_raiseevent(_pi,"B4XPage_Appear",(Object[])(__c.Null)); }; }; -RDebugUtils.currentLine=39845898; - //BA.debugLineNum = 39845898;BA.debugLine="If ShowUpIndicator And ActionBar.IsInitialized Th"; -if (__ref._showupindicator /*boolean*/ && __ref._actionbar /*anywheresoftware.b4j.object.JavaObject*/ .IsInitialized()) { -RDebugUtils.currentLine=39845899; - //BA.debugLineNum = 39845899;BA.debugLine="ActionBar.RunMethod(\"setDisplayHomeAsUpEnabled\","; -__ref._actionbar /*anywheresoftware.b4j.object.JavaObject*/ .RunMethod("setDisplayHomeAsUpEnabled",new Object[]{(Object)(__ref._mstackofpageids /*keymon.lat.medicomed.b4xset*/ ._getsize /*int*/ (null)>1)}); + //BA.debugLineNum = 298;BA.debugLine="If ShowUpIndicator And ActionBar.IsInitialized Th"; +if (_showupindicator && _actionbar.IsInitialized()) { + //BA.debugLineNum = 299;BA.debugLine="ActionBar.RunMethod(\"setDisplayHomeAsUpEnabled\","; +_actionbar.RunMethod("setDisplayHomeAsUpEnabled",new Object[]{(Object)(_mstackofpageids._getsize /*int*/ ()>1)}); }; -RDebugUtils.currentLine=39845901; - //BA.debugLineNum = 39845901;BA.debugLine="UpdateMenuItems"; -__ref._updatemenuitems /*String*/ (null); -RDebugUtils.currentLine=39845903; - //BA.debugLineNum = 39845903;BA.debugLine="UpdateStackString"; -__ref._updatestackstring /*String*/ (null); -RDebugUtils.currentLine=39845904; - //BA.debugLineNum = 39845904;BA.debugLine="End Sub"; + //BA.debugLineNum = 301;BA.debugLine="UpdateMenuItems"; +_updatemenuitems(); + //BA.debugLineNum = 303;BA.debugLine="UpdateStackString"; +_updatestackstring(); + //BA.debugLineNum = 304;BA.debugLine="End Sub"; return ""; } -public keymon.lat.medicomed.b4xpagesmanager._b4xpageparent _createb4xpageparent(keymon.lat.medicomed.b4xpagesmanager __ref,Object _nativetype) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "createb4xpageparent", true)) - {return ((keymon.lat.medicomed.b4xpagesmanager._b4xpageparent) Debug.delegate(ba, "createb4xpageparent", new Object[] {_nativetype}));} -keymon.lat.medicomed.b4xpagesmanager._b4xpageparent _t1 = null; -RDebugUtils.currentLine=41222144; - //BA.debugLineNum = 41222144;BA.debugLine="Private Sub CreateB4XPageParent (NativeType As Obj"; -RDebugUtils.currentLine=41222150; - //BA.debugLineNum = 41222150;BA.debugLine="Dim t1 As B4XPageParent"; -_t1 = new keymon.lat.medicomed.b4xpagesmanager._b4xpageparent(); -RDebugUtils.currentLine=41222151; - //BA.debugLineNum = 41222151;BA.debugLine="t1.Initialize"; -_t1.Initialize(); -RDebugUtils.currentLine=41222152; - //BA.debugLineNum = 41222152;BA.debugLine="t1.NativeType = NativeType"; -_t1.NativeType /*anywheresoftware.b4a.objects.ActivityWrapper*/ = (anywheresoftware.b4a.objects.ActivityWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.ActivityWrapper(), (anywheresoftware.b4a.BALayout)(_nativetype)); -RDebugUtils.currentLine=41222153; - //BA.debugLineNum = 41222153;BA.debugLine="Return t1"; -if (true) return _t1; -RDebugUtils.currentLine=41222154; - //BA.debugLineNum = 41222154;BA.debugLine="End Sub"; -return null; -} -public String _createpageimpl(keymon.lat.medicomed.b4xpagesmanager __ref,keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "createpageimpl", true)) - {return ((String) Debug.delegate(ba, "createpageimpl", new Object[] {_pi}));} -RDebugUtils.currentLine=40239104; - //BA.debugLineNum = 40239104;BA.debugLine="Private Sub CreatePageImpl (pi As B4XPageInfo)"; -RDebugUtils.currentLine=40239116; - //BA.debugLineNum = 40239116;BA.debugLine="pi.Root = xui.CreatePanel(\"root\")"; -_pi.Root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,"root"); -RDebugUtils.currentLine=40239117; - //BA.debugLineNum = 40239117;BA.debugLine="pi.root.SetLayoutAnimated(0, 0, 0, 100%x, 100%y)"; -_pi.Root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),__c.PerXToCurrent((float) (100),ba),__c.PerYToCurrent((float) (100),ba)); -RDebugUtils.currentLine=40239118; - //BA.debugLineNum = 40239118;BA.debugLine="pi.Parent = CreateB4XPageParent(mMainForm)"; -_pi.Parent /*keymon.lat.medicomed.b4xpagesmanager._b4xpageparent*/ = __ref._createb4xpageparent /*keymon.lat.medicomed.b4xpagesmanager._b4xpageparent*/ (null,(Object)(__ref._mmainform /*anywheresoftware.b4a.objects.ActivityWrapper*/ .getObject())); -RDebugUtils.currentLine=40239119; - //BA.debugLineNum = 40239119;BA.debugLine="pi.Parent.MenuItems.Initialize"; -_pi.Parent /*keymon.lat.medicomed.b4xpagesmanager._b4xpageparent*/ .MenuItems /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=40239127; - //BA.debugLineNum = 40239127;BA.debugLine="End Sub"; +public String _toppagedisappear() throws Exception{ +keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _pi = null; + //BA.debugLineNum = 277;BA.debugLine="Private Sub TopPageDisappear"; + //BA.debugLineNum = 278;BA.debugLine="If xui.IsB4J Then Return"; +if (_xui.getIsB4J()) { +if (true) return "";}; + //BA.debugLineNum = 279;BA.debugLine="Dim pi As B4XPageInfo = GetTopPage"; +_pi = _gettoppage(); + //BA.debugLineNum = 280;BA.debugLine="If pi = Null Then Return"; +if (_pi== null) { +if (true) return "";}; + //BA.debugLineNum = 281;BA.debugLine="If Not(xui.IsB4i) Then"; +if (__c.Not(_xui.getIsB4i())) { + //BA.debugLineNum = 282;BA.debugLine="If IsForeground Then"; +if (_isforeground) { + //BA.debugLineNum = 283;BA.debugLine="RaiseEventWithResult(pi, \"B4XPage_Disappear\", N"; +_raiseeventwithresult(_pi,"B4XPage_Disappear",(Object[])(__c.Null)); + }; + }; + //BA.debugLineNum = 286;BA.debugLine="End Sub"; return ""; } -public keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo _getpageinfofromroot(keymon.lat.medicomed.b4xpagesmanager __ref,anywheresoftware.b4a.objects.B4XViewWrapper _root) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "getpageinfofromroot", true)) - {return ((keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo) Debug.delegate(ba, "getpageinfofromroot", new Object[] {_root}));} -RDebugUtils.currentLine=40435712; - //BA.debugLineNum = 40435712;BA.debugLine="Public Sub GetPageInfoFromRoot (Root As B4XView) A"; -RDebugUtils.currentLine=40435713; - //BA.debugLineNum = 40435713;BA.debugLine="Return RootB4XToPage.Get(Root)"; -if (true) return (keymon.lat.medicomed.b4xpagesmanager._b4xpageinfo)(__ref._rootb4xtopage /*keymon.lat.medicomed.b4xorderedmap*/ ._get /*Object*/ (null,(Object)(_root.getObject()))); -RDebugUtils.currentLine=40435714; - //BA.debugLineNum = 40435714;BA.debugLine="End Sub"; -return null; -} -public String _updatemenuitems(keymon.lat.medicomed.b4xpagesmanager __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "updatemenuitems", true)) - {return ((String) Debug.delegate(ba, "updatemenuitems", null));} -RDebugUtils.currentLine=40697856; - //BA.debugLineNum = 40697856;BA.debugLine="Private Sub UpdateMenuItems"; -RDebugUtils.currentLine=40697857; - //BA.debugLineNum = 40697857;BA.debugLine="Context.RunMethod(\"invalidateOptionsMenu\", Null)"; -__ref._context /*anywheresoftware.b4j.object.JavaObject*/ .RunMethod("invalidateOptionsMenu",(Object[])(__c.Null)); -RDebugUtils.currentLine=40697858; - //BA.debugLineNum = 40697858;BA.debugLine="End Sub"; +public String _updatemenuitems() throws Exception{ + //BA.debugLineNum = 490;BA.debugLine="Private Sub UpdateMenuItems"; + //BA.debugLineNum = 491;BA.debugLine="Context.RunMethod(\"invalidateOptionsMenu\", Null)"; +_context.RunMethod("invalidateOptionsMenu",(Object[])(__c.Null)); + //BA.debugLineNum = 492;BA.debugLine="End Sub"; return ""; } -public String _updatestackstring(keymon.lat.medicomed.b4xpagesmanager __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xpagesmanager"; -if (Debug.shouldDelegate(ba, "updatestackstring", true)) - {return ((String) Debug.delegate(ba, "updatestackstring", null));} +public String _updatestackstring() throws Exception{ anywheresoftware.b4a.keywords.StringBuilderWrapper _sb = null; String _id = ""; -RDebugUtils.currentLine=41549824; - //BA.debugLineNum = 41549824;BA.debugLine="Public Sub UpdateStackString"; -RDebugUtils.currentLine=41549825; - //BA.debugLineNum = 41549825;BA.debugLine="Dim sb As StringBuilder"; + //BA.debugLineNum = 647;BA.debugLine="Public Sub UpdateStackString"; + //BA.debugLineNum = 648;BA.debugLine="Dim sb As StringBuilder"; _sb = new anywheresoftware.b4a.keywords.StringBuilderWrapper(); -RDebugUtils.currentLine=41549826; - //BA.debugLineNum = 41549826;BA.debugLine="sb.Initialize"; + //BA.debugLineNum = 649;BA.debugLine="sb.Initialize"; _sb.Initialize(); -RDebugUtils.currentLine=41549827; - //BA.debugLineNum = 41549827;BA.debugLine="sb.Append(\"[\")"; + //BA.debugLineNum = 650;BA.debugLine="sb.Append(\"[\")"; _sb.Append("["); -RDebugUtils.currentLine=41549828; - //BA.debugLineNum = 41549828;BA.debugLine="If mStackOfPageIds.Size > 0 Then"; -if (__ref._mstackofpageids /*keymon.lat.medicomed.b4xset*/ ._getsize /*int*/ (null)>0) { -RDebugUtils.currentLine=41549829; - //BA.debugLineNum = 41549829;BA.debugLine="For Each id As String In mStackOfPageIds.AsList"; + //BA.debugLineNum = 651;BA.debugLine="If mStackOfPageIds.Size > 0 Then"; +if (_mstackofpageids._getsize /*int*/ ()>0) { + //BA.debugLineNum = 652;BA.debugLine="For Each id As String In mStackOfPageIds.AsList"; { -final anywheresoftware.b4a.BA.IterableList group5 = __ref._mstackofpageids /*keymon.lat.medicomed.b4xset*/ ._aslist /*anywheresoftware.b4a.objects.collections.List*/ (null); +final anywheresoftware.b4a.BA.IterableList group5 = _mstackofpageids._aslist /*anywheresoftware.b4a.objects.collections.List*/ (); final int groupLen5 = group5.getSize() ;int index5 = 0; ; for (; index5 < groupLen5;index5++){ _id = BA.ObjectToString(group5.Get(index5)); -RDebugUtils.currentLine=41549830; - //BA.debugLineNum = 41549830;BA.debugLine="sb.Append(id).Append(\", \")"; + //BA.debugLineNum = 653;BA.debugLine="sb.Append(id).Append(\", \")"; _sb.Append(_id).Append(", "); } }; -RDebugUtils.currentLine=41549832; - //BA.debugLineNum = 41549832;BA.debugLine="sb.Remove(sb.Length - 2, sb.Length)"; + //BA.debugLineNum = 655;BA.debugLine="sb.Remove(sb.Length - 2, sb.Length)"; _sb.Remove((int) (_sb.getLength()-2),_sb.getLength()); }; -RDebugUtils.currentLine=41549834; - //BA.debugLineNum = 41549834;BA.debugLine="sb.Append(\"]\")"; + //BA.debugLineNum = 657;BA.debugLine="sb.Append(\"]\")"; _sb.Append("]"); -RDebugUtils.currentLine=41549835; - //BA.debugLineNum = 41549835;BA.debugLine="StackString = sb.ToString"; -__ref._stackstring /*String*/ = _sb.ToString(); -RDebugUtils.currentLine=41549836; - //BA.debugLineNum = 41549836;BA.debugLine="End Sub"; + //BA.debugLineNum = 658;BA.debugLine="StackString = sb.ToString"; +_stackstring = _sb.ToString(); + //BA.debugLineNum = 659;BA.debugLine="End Sub"; return ""; } +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} public boolean checkIfAppCompat(android.app.Activity act) { return act.getClass().getSuperclass().getName().equals("androidx.appcompat.app.AppCompatActivity"); } @@ -1555,4 +1070,4 @@ public static class PagesMenuListener implements android.view.MenuItem.OnMenuIte return true; } } -} \ No newline at end of file +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xplusminus.java b/B4A/Objects/src/keymon/lat/medicomed/b4xplusminus.java index 5a546be..b0a81ee 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xplusminus.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xplusminus.java @@ -10,7 +10,7 @@ public class b4xplusminus extends B4AClass.ImplB4AClass implements BA.SubDelegat private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xplusminus"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xplusminus"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xplusminus extends B4AClass.ImplB4AClass implements BA.SubDelegat 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.keywords.Common __c = null; public String _meventname = ""; public Object _mcallback = null; public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null; @@ -69,666 +62,391 @@ 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 _base_resize(keymon.lat.medicomed.b4xplusminus __ref,double _width,double _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xplusminus"; -if (Debug.shouldDelegate(ba, "base_resize", true)) - {return ((String) Debug.delegate(ba, "base_resize", new Object[] {_width,_height}));} -RDebugUtils.currentLine=56754176; - //BA.debugLineNum = 56754176;BA.debugLine="Public Sub Base_Resize (Width As Double, Height As"; -RDebugUtils.currentLine=56754177; - //BA.debugLineNum = 56754177;BA.debugLine="If Formation = \"Horizontal\" Then"; -if ((__ref._formation /*String*/ ).equals("Horizontal")) { -RDebugUtils.currentLine=56754178; - //BA.debugLineNum = 56754178;BA.debugLine="pnlMinus.SetLayoutAnimated(0, 0, 0, ArrowsSize,"; -__ref._pnlminus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),__ref._arrowssize /*int*/ ,(int) (_height)); -RDebugUtils.currentLine=56754179; - //BA.debugLineNum = 56754179;BA.debugLine="pnlPlus.SetLayoutAnimated(0, Width - ArrowsSize,"; -__ref._pnlplus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (_width-__ref._arrowssize /*int*/ ),(int) (0),__ref._arrowssize /*int*/ ,(int) (_height)); -RDebugUtils.currentLine=56754180; - //BA.debugLineNum = 56754180;BA.debugLine="MainLabel.SetLayoutAnimated(0, 0, 0, Width, Heig"; -__ref._mainlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); - }else -{RDebugUtils.currentLine=56754181; - //BA.debugLineNum = 56754181;BA.debugLine="Else if Formation = \"Vertical\" Then"; -if ((__ref._formation /*String*/ ).equals("Vertical")) { -RDebugUtils.currentLine=56754182; - //BA.debugLineNum = 56754182;BA.debugLine="pnlPlus.SetLayoutAnimated(0, 0, 0, Width, Arrows"; -__ref._pnlplus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),__ref._arrowssize /*int*/ ); -RDebugUtils.currentLine=56754183; - //BA.debugLineNum = 56754183;BA.debugLine="pnlMinus.SetLayoutAnimated(0, 0, Height - Arrows"; -__ref._pnlminus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (_height-__ref._arrowssize /*int*/ ),(int) (_width),__ref._arrowssize /*int*/ ); -RDebugUtils.currentLine=56754184; - //BA.debugLineNum = 56754184;BA.debugLine="MainLabel.SetLayoutAnimated(0, 0, 0, Width, Heig"; -__ref._mainlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); +public String _base_resize(double _width,double _height) throws Exception{ + //BA.debugLineNum = 83;BA.debugLine="Public Sub Base_Resize (Width As Double, Height As"; + //BA.debugLineNum = 84;BA.debugLine="If Formation = \"Horizontal\" Then"; +if ((_formation).equals("Horizontal")) { + //BA.debugLineNum = 85;BA.debugLine="pnlMinus.SetLayoutAnimated(0, 0, 0, ArrowsSize,"; +_pnlminus.SetLayoutAnimated((int) (0),(int) (0),(int) (0),_arrowssize,(int) (_height)); + //BA.debugLineNum = 86;BA.debugLine="pnlPlus.SetLayoutAnimated(0, Width - ArrowsSize,"; +_pnlplus.SetLayoutAnimated((int) (0),(int) (_width-_arrowssize),(int) (0),_arrowssize,(int) (_height)); + //BA.debugLineNum = 87;BA.debugLine="MainLabel.SetLayoutAnimated(0, 0, 0, Width, Heig"; +_mainlabel.SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); + }else if((_formation).equals("Vertical")) { + //BA.debugLineNum = 89;BA.debugLine="pnlPlus.SetLayoutAnimated(0, 0, 0, Width, Arrows"; +_pnlplus.SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),_arrowssize); + //BA.debugLineNum = 90;BA.debugLine="pnlMinus.SetLayoutAnimated(0, 0, Height - Arrows"; +_pnlminus.SetLayoutAnimated((int) (0),(int) (0),(int) (_height-_arrowssize),(int) (_width),_arrowssize); + //BA.debugLineNum = 91;BA.debugLine="MainLabel.SetLayoutAnimated(0, 0, 0, Width, Heig"; +_mainlabel.SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); }else { -RDebugUtils.currentLine=56754186; - //BA.debugLineNum = 56754186;BA.debugLine="pnlMinus.SetLayoutAnimated(0, 0, Height - Arrows"; -__ref._pnlminus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (_height-__ref._arrowssize /*int*/ ),(int) (_width/(double)2),__ref._arrowssize /*int*/ ); -RDebugUtils.currentLine=56754187; - //BA.debugLineNum = 56754187;BA.debugLine="pnlPlus.SetLayoutAnimated(0, Width / 2, pnlMinus"; -__ref._pnlplus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (_width/(double)2),__ref._pnlminus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getTop(),__ref._pnlminus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._pnlminus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=56754188; - //BA.debugLineNum = 56754188;BA.debugLine="MainLabel.SetLayoutAnimated(0, 0, 0, Width, Heig"; -__ref._mainlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height-__ref._arrowssize /*int*/ +__c.DipToCurrent((int) (5)))); - }} -; -RDebugUtils.currentLine=56754190; - //BA.debugLineNum = 56754190;BA.debugLine="lblMinus.SetLayoutAnimated(0, 0, 0, pnlMinus.Widt"; -__ref._lblminus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),__ref._pnlminus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._pnlminus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=56754191; - //BA.debugLineNum = 56754191;BA.debugLine="lblPlus.SetLayoutAnimated(0, 0, 0, pnlPlus.Width,"; -__ref._lblplus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),__ref._pnlplus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._pnlplus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=56754192; - //BA.debugLineNum = 56754192;BA.debugLine="End Sub"; + //BA.debugLineNum = 93;BA.debugLine="pnlMinus.SetLayoutAnimated(0, 0, Height - Arrows"; +_pnlminus.SetLayoutAnimated((int) (0),(int) (0),(int) (_height-_arrowssize),(int) (_width/(double)2),_arrowssize); + //BA.debugLineNum = 94;BA.debugLine="pnlPlus.SetLayoutAnimated(0, Width / 2, pnlMinus"; +_pnlplus.SetLayoutAnimated((int) (0),(int) (_width/(double)2),_pnlminus.getTop(),_pnlminus.getWidth(),_pnlminus.getHeight()); + //BA.debugLineNum = 95;BA.debugLine="MainLabel.SetLayoutAnimated(0, 0, 0, Width, Heig"; +_mainlabel.SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height-_arrowssize+__c.DipToCurrent((int) (5)))); + }; + //BA.debugLineNum = 97;BA.debugLine="lblMinus.SetLayoutAnimated(0, 0, 0, pnlMinus.Widt"; +_lblminus.SetLayoutAnimated((int) (0),(int) (0),(int) (0),_pnlminus.getWidth(),_pnlminus.getHeight()); + //BA.debugLineNum = 98;BA.debugLine="lblPlus.SetLayoutAnimated(0, 0, 0, pnlPlus.Width,"; +_lblplus.SetLayoutAnimated((int) (0),(int) (0),(int) (0),_pnlplus.getWidth(),_pnlplus.getHeight()); + //BA.debugLineNum = 99;BA.debugLine="End Sub"; return ""; } -public String _class_globals(keymon.lat.medicomed.b4xplusminus __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xplusminus"; -RDebugUtils.currentLine=56557568; - //BA.debugLineNum = 56557568;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=56557569; - //BA.debugLineNum = 56557569;BA.debugLine="Private mEventName As String 'ignore"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 6;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 7;BA.debugLine="Private mEventName As String 'ignore"; _meventname = ""; -RDebugUtils.currentLine=56557570; - //BA.debugLineNum = 56557570;BA.debugLine="Private mCallBack As Object 'ignore"; + //BA.debugLineNum = 8;BA.debugLine="Private mCallBack As Object 'ignore"; _mcallback = new Object(); -RDebugUtils.currentLine=56557571; - //BA.debugLineNum = 56557571;BA.debugLine="Public mBase As B4XView 'ignore"; + //BA.debugLineNum = 9;BA.debugLine="Public mBase As B4XView 'ignore"; _mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=56557572; - //BA.debugLineNum = 56557572;BA.debugLine="Private xui As XUI 'ignore"; + //BA.debugLineNum = 10;BA.debugLine="Private xui As XUI 'ignore"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=56557573; - //BA.debugLineNum = 56557573;BA.debugLine="Public Tag As Object"; + //BA.debugLineNum = 11;BA.debugLine="Public Tag As Object"; _tag = new Object(); -RDebugUtils.currentLine=56557574; - //BA.debugLineNum = 56557574;BA.debugLine="Public pnlPlus, pnlMinus As B4XView"; + //BA.debugLineNum = 12;BA.debugLine="Public pnlPlus, pnlMinus As B4XView"; _pnlplus = new anywheresoftware.b4a.objects.B4XViewWrapper(); _pnlminus = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=56557575; - //BA.debugLineNum = 56557575;BA.debugLine="Public lblPlus, lblMinus As B4XView"; + //BA.debugLineNum = 13;BA.debugLine="Public lblPlus, lblMinus As B4XView"; _lblplus = new anywheresoftware.b4a.objects.B4XViewWrapper(); _lblminus = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=56557576; - //BA.debugLineNum = 56557576;BA.debugLine="Public Formation As String"; + //BA.debugLineNum = 14;BA.debugLine="Public Formation As String"; _formation = ""; -RDebugUtils.currentLine=56557577; - //BA.debugLineNum = 56557577;BA.debugLine="Public mCyclic As Boolean"; + //BA.debugLineNum = 15;BA.debugLine="Public mCyclic As Boolean"; _mcyclic = false; -RDebugUtils.currentLine=56557578; - //BA.debugLineNum = 56557578;BA.debugLine="Public mRapid As Boolean"; + //BA.debugLineNum = 16;BA.debugLine="Public mRapid As Boolean"; _mrapid = false; -RDebugUtils.currentLine=56557579; - //BA.debugLineNum = 56557579;BA.debugLine="Public MainLabel As B4XView"; + //BA.debugLineNum = 17;BA.debugLine="Public MainLabel As B4XView"; _mainlabel = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=56557580; - //BA.debugLineNum = 56557580;BA.debugLine="Public ArrowsSize As Int = 30dip"; + //BA.debugLineNum = 18;BA.debugLine="Public ArrowsSize As Int = 30dip"; _arrowssize = __c.DipToCurrent((int) (30)); -RDebugUtils.currentLine=56557581; - //BA.debugLineNum = 56557581;BA.debugLine="Private mStringItems As List"; + //BA.debugLineNum = 19;BA.debugLine="Private mStringItems As List"; _mstringitems = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=56557582; - //BA.debugLineNum = 56557582;BA.debugLine="Private mStartRange, mInterval, mEndRange As Doub"; + //BA.debugLineNum = 20;BA.debugLine="Private mStartRange, mInterval, mEndRange As Doub"; _mstartrange = 0; _minterval = 0; _mendrange = 0; -RDebugUtils.currentLine=56557583; - //BA.debugLineNum = 56557583;BA.debugLine="Private mSelectedIndex As Int = -1"; + //BA.debugLineNum = 21;BA.debugLine="Private mSelectedIndex As Int = -1"; _mselectedindex = (int) (-1); -RDebugUtils.currentLine=56557584; - //BA.debugLineNum = 56557584;BA.debugLine="Private LoopIndex As Int"; + //BA.debugLineNum = 22;BA.debugLine="Private LoopIndex As Int"; _loopindex = 0; -RDebugUtils.currentLine=56557585; - //BA.debugLineNum = 56557585;BA.debugLine="Public RapidPeriod1 As Int = 1000"; + //BA.debugLineNum = 23;BA.debugLine="Public RapidPeriod1 As Int = 1000"; _rapidperiod1 = (int) (1000); -RDebugUtils.currentLine=56557586; - //BA.debugLineNum = 56557586;BA.debugLine="Public RapidPeriod2 As Int = 30"; + //BA.debugLineNum = 24;BA.debugLine="Public RapidPeriod2 As Int = 30"; _rapidperiod2 = (int) (30); -RDebugUtils.currentLine=56557587; - //BA.debugLineNum = 56557587;BA.debugLine="Public Formatter As B4XFormatter"; + //BA.debugLineNum = 25;BA.debugLine="Public Formatter As B4XFormatter"; _formatter = new keymon.lat.medicomed.b4xformatter(); -RDebugUtils.currentLine=56557588; - //BA.debugLineNum = 56557588;BA.debugLine="Private StringMode As Boolean"; + //BA.debugLineNum = 26;BA.debugLine="Private StringMode As Boolean"; _stringmode = false; -RDebugUtils.currentLine=56557589; - //BA.debugLineNum = 56557589;BA.debugLine="Private Size As Int"; + //BA.debugLineNum = 27;BA.debugLine="Private Size As Int"; _size = 0; -RDebugUtils.currentLine=56557590; - //BA.debugLineNum = 56557590;BA.debugLine="Public mHaptic As Boolean"; + //BA.debugLineNum = 28;BA.debugLine="Public mHaptic As Boolean"; _mhaptic = false; -RDebugUtils.currentLine=56557591; - //BA.debugLineNum = 56557591;BA.debugLine="End Sub"; + //BA.debugLineNum = 29;BA.debugLine="End Sub"; return ""; } -public anywheresoftware.b4a.objects.B4XViewWrapper _createlabel(keymon.lat.medicomed.b4xplusminus __ref,String _text) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xplusminus"; -if (Debug.shouldDelegate(ba, "createlabel", true)) - {return ((anywheresoftware.b4a.objects.B4XViewWrapper) Debug.delegate(ba, "createlabel", new Object[] {_text}));} +public anywheresoftware.b4a.objects.B4XViewWrapper _createlabel(String _text) throws Exception{ anywheresoftware.b4a.objects.LabelWrapper _lbl = null; anywheresoftware.b4a.objects.B4XViewWrapper _xlbl = null; -RDebugUtils.currentLine=57540608; - //BA.debugLineNum = 57540608;BA.debugLine="Private Sub CreateLabel (text As String) As B4XVie"; -RDebugUtils.currentLine=57540609; - //BA.debugLineNum = 57540609;BA.debugLine="Dim lbl As Label"; + //BA.debugLineNum = 247;BA.debugLine="Private Sub CreateLabel (text As String) As B4XVie"; + //BA.debugLineNum = 248;BA.debugLine="Dim lbl As Label"; _lbl = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=57540610; - //BA.debugLineNum = 57540610;BA.debugLine="lbl.Initialize(\"\")"; + //BA.debugLineNum = 249;BA.debugLine="lbl.Initialize(\"\")"; _lbl.Initialize(ba,""); -RDebugUtils.currentLine=57540611; - //BA.debugLineNum = 57540611;BA.debugLine="Dim xlbl As B4XView = lbl"; + //BA.debugLineNum = 250;BA.debugLine="Dim xlbl As B4XView = lbl"; _xlbl = new anywheresoftware.b4a.objects.B4XViewWrapper(); _xlbl = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lbl.getObject())); -RDebugUtils.currentLine=57540612; - //BA.debugLineNum = 57540612;BA.debugLine="xlbl.Font = xui.CreateMaterialIcons(30)"; -_xlbl.setFont(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreateMaterialIcons((float) (30))); -RDebugUtils.currentLine=57540613; - //BA.debugLineNum = 57540613;BA.debugLine="xlbl.Text = text"; + //BA.debugLineNum = 251;BA.debugLine="xlbl.Font = xui.CreateMaterialIcons(30)"; +_xlbl.setFont(_xui.CreateMaterialIcons((float) (30))); + //BA.debugLineNum = 252;BA.debugLine="xlbl.Text = text"; _xlbl.setText(BA.ObjectToCharSequence(_text)); -RDebugUtils.currentLine=57540614; - //BA.debugLineNum = 57540614;BA.debugLine="xlbl.TextColor = MainLabel.TextColor"; -_xlbl.setTextColor(__ref._mainlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getTextColor()); -RDebugUtils.currentLine=57540615; - //BA.debugLineNum = 57540615;BA.debugLine="Return xlbl"; + //BA.debugLineNum = 253;BA.debugLine="xlbl.TextColor = MainLabel.TextColor"; +_xlbl.setTextColor(_mainlabel.getTextColor()); + //BA.debugLineNum = 254;BA.debugLine="Return xlbl"; if (true) return _xlbl; -RDebugUtils.currentLine=57540616; - //BA.debugLineNum = 57540616;BA.debugLine="End Sub"; + //BA.debugLineNum = 255;BA.debugLine="End Sub"; return null; } -public String _decrement(keymon.lat.medicomed.b4xplusminus __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xplusminus"; -if (Debug.shouldDelegate(ba, "decrement", true)) - {return ((String) Debug.delegate(ba, "decrement", null));} -RDebugUtils.currentLine=57278464; - //BA.debugLineNum = 57278464;BA.debugLine="Public Sub Decrement"; -RDebugUtils.currentLine=57278465; - //BA.debugLineNum = 57278465;BA.debugLine="If mSelectedIndex <= 0 Then"; -if (__ref._mselectedindex /*int*/ <=0) { -RDebugUtils.currentLine=57278466; - //BA.debugLineNum = 57278466;BA.debugLine="If mCyclic Then"; -if (__ref._mcyclic /*boolean*/ ) { -RDebugUtils.currentLine=57278467; - //BA.debugLineNum = 57278467;BA.debugLine="mSelectedIndex = Size"; -__ref._mselectedindex /*int*/ = __ref._size /*int*/ ; +public String _decrement() throws Exception{ + //BA.debugLineNum = 182;BA.debugLine="Public Sub Decrement"; + //BA.debugLineNum = 183;BA.debugLine="If mSelectedIndex <= 0 Then"; +if (_mselectedindex<=0) { + //BA.debugLineNum = 184;BA.debugLine="If mCyclic Then"; +if (_mcyclic) { + //BA.debugLineNum = 185;BA.debugLine="mSelectedIndex = Size"; +_mselectedindex = _size; }else { -RDebugUtils.currentLine=57278469; - //BA.debugLineNum = 57278469;BA.debugLine="mSelectedIndex = 0"; -__ref._mselectedindex /*int*/ = (int) (0); -RDebugUtils.currentLine=57278470; - //BA.debugLineNum = 57278470;BA.debugLine="LoopIndex = LoopIndex + 1"; -__ref._loopindex /*int*/ = (int) (__ref._loopindex /*int*/ +1); -RDebugUtils.currentLine=57278471; - //BA.debugLineNum = 57278471;BA.debugLine="Return"; + //BA.debugLineNum = 187;BA.debugLine="mSelectedIndex = 0"; +_mselectedindex = (int) (0); + //BA.debugLineNum = 188;BA.debugLine="LoopIndex = LoopIndex + 1"; +_loopindex = (int) (_loopindex+1); + //BA.debugLineNum = 189;BA.debugLine="Return"; if (true) return ""; }; }; -RDebugUtils.currentLine=57278474; - //BA.debugLineNum = 57278474;BA.debugLine="SetIndex(mSelectedIndex - 1, True)"; -__ref._setindex /*String*/ (null,(int) (__ref._mselectedindex /*int*/ -1),__c.True); -RDebugUtils.currentLine=57278475; - //BA.debugLineNum = 57278475;BA.debugLine="End Sub"; + //BA.debugLineNum = 192;BA.debugLine="SetIndex(mSelectedIndex - 1, True)"; +_setindex((int) (_mselectedindex-1),__c.True); + //BA.debugLineNum = 193;BA.debugLine="End Sub"; return ""; } -public String _setindex(keymon.lat.medicomed.b4xplusminus __ref,int _i,boolean _raiseevent) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xplusminus"; -if (Debug.shouldDelegate(ba, "setindex", true)) - {return ((String) Debug.delegate(ba, "setindex", new Object[] {_i,_raiseevent}));} -Object _value = null; -RDebugUtils.currentLine=57147392; - //BA.debugLineNum = 57147392;BA.debugLine="Private Sub SetIndex(i As Int, RaiseEvent As Boole"; -RDebugUtils.currentLine=57147393; - //BA.debugLineNum = 57147393;BA.debugLine="If i >= Size Then i = -1"; -if (_i>=__ref._size /*int*/ ) { -_i = (int) (-1);}; -RDebugUtils.currentLine=57147394; - //BA.debugLineNum = 57147394;BA.debugLine="mSelectedIndex = i"; -__ref._mselectedindex /*int*/ = _i; -RDebugUtils.currentLine=57147395; - //BA.debugLineNum = 57147395;BA.debugLine="If mSelectedIndex = -1 Then"; -if (__ref._mselectedindex /*int*/ ==-1) { -RDebugUtils.currentLine=57147396; - //BA.debugLineNum = 57147396;BA.debugLine="MainLabel.Text = \"\""; -__ref._mainlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setText(BA.ObjectToCharSequence("")); - }else { -RDebugUtils.currentLine=57147398; - //BA.debugLineNum = 57147398;BA.debugLine="Dim value As Object = GetValueImpl (mSelectedInd"; -_value = __ref._getvalueimpl /*Object*/ (null,__ref._mselectedindex /*int*/ ); -RDebugUtils.currentLine=57147399; - //BA.debugLineNum = 57147399;BA.debugLine="If StringMode Then"; -if (__ref._stringmode /*boolean*/ ) { -RDebugUtils.currentLine=57147400; - //BA.debugLineNum = 57147400;BA.debugLine="InternalSetTextOrCSBuilderToLabel(MainLabel, va"; -__ref._internalsettextorcsbuildertolabel /*String*/ (null,__ref._mainlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ,_value); - }else { -RDebugUtils.currentLine=57147402; - //BA.debugLineNum = 57147402;BA.debugLine="MainLabel.Text = Formatter.Format(value)"; -__ref._mainlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setText(BA.ObjectToCharSequence(__ref._formatter /*keymon.lat.medicomed.b4xformatter*/ ._format /*String*/ (null,(double)(BA.ObjectToNumber(_value))))); - }; -RDebugUtils.currentLine=57147404; - //BA.debugLineNum = 57147404;BA.debugLine="If RaiseEvent And xui.SubExists(mCallBack, mEven"; -if (_raiseevent && __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .SubExists(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_valuechanged",(int) (1))) { -RDebugUtils.currentLine=57147405; - //BA.debugLineNum = 57147405;BA.debugLine="CallSub2(mCallBack, mEventName & \"_valuechanged"; -__c.CallSubNew2(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_valuechanged",_value); - }; - }; -RDebugUtils.currentLine=57147408; - //BA.debugLineNum = 57147408;BA.debugLine="lblPlus.Enabled = Size > 0 And (mCyclic Or mSelec"; -__ref._lblplus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setEnabled(__ref._size /*int*/ >0 && (__ref._mcyclic /*boolean*/ || __ref._mselectedindex /*int*/ <__ref._size /*int*/ -1)); -RDebugUtils.currentLine=57147409; - //BA.debugLineNum = 57147409;BA.debugLine="lblMinus.Enabled = Size > 0 And (mCyclic Or mSele"; -__ref._lblminus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setEnabled(__ref._size /*int*/ >0 && (__ref._mcyclic /*boolean*/ || __ref._mselectedindex /*int*/ >0)); -RDebugUtils.currentLine=57147410; - //BA.debugLineNum = 57147410;BA.debugLine="End Sub"; -return ""; -} -public String _designercreateview(keymon.lat.medicomed.b4xplusminus __ref,Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xplusminus"; -if (Debug.shouldDelegate(ba, "designercreateview", true)) - {return ((String) Debug.delegate(ba, "designercreateview", new Object[] {_base,_lbl,_props}));} +public String _designercreateview(Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ anywheresoftware.b4a.objects.B4XViewWrapper _pnl = null; -RDebugUtils.currentLine=56688640; - //BA.debugLineNum = 56688640;BA.debugLine="Public Sub DesignerCreateView (Base As Object, lbl"; -RDebugUtils.currentLine=56688641; - //BA.debugLineNum = 56688641;BA.debugLine="mBase = Base"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); -RDebugUtils.currentLine=56688642; - //BA.debugLineNum = 56688642;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._tag /*Object*/ = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getTag(); -RDebugUtils.currentLine=56688642; - //BA.debugLineNum = 56688642;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag(this); -RDebugUtils.currentLine=56688643; - //BA.debugLineNum = 56688643;BA.debugLine="MainLabel = lbl"; -__ref._mainlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lbl.getObject())); -RDebugUtils.currentLine=56688644; - //BA.debugLineNum = 56688644;BA.debugLine="MainLabel.SetTextAlignment(\"CENTER\", \"CENTER\")"; -__ref._mainlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetTextAlignment("CENTER","CENTER"); -RDebugUtils.currentLine=56688645; - //BA.debugLineNum = 56688645;BA.debugLine="Dim pnl As B4XView = Props.Get(\"page\")"; + //BA.debugLineNum = 38;BA.debugLine="Public Sub DesignerCreateView (Base As Object, lbl"; + //BA.debugLineNum = 39;BA.debugLine="mBase = Base"; +_mbase = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); + //BA.debugLineNum = 40;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_tag = _mbase.getTag(); + //BA.debugLineNum = 40;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_mbase.setTag(this); + //BA.debugLineNum = 41;BA.debugLine="MainLabel = lbl"; +_mainlabel = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lbl.getObject())); + //BA.debugLineNum = 42;BA.debugLine="MainLabel.SetTextAlignment(\"CENTER\", \"CENTER\")"; +_mainlabel.SetTextAlignment("CENTER","CENTER"); + //BA.debugLineNum = 43;BA.debugLine="Dim pnl As B4XView = Props.Get(\"page\")"; _pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); _pnl = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_props.Get((Object)("page")))); -RDebugUtils.currentLine=56688655; - //BA.debugLineNum = 56688655;BA.debugLine="pnlPlus = xui.CreatePanel(\"pnlArrow\")"; -__ref._pnlplus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,"pnlArrow"); -RDebugUtils.currentLine=56688656; - //BA.debugLineNum = 56688656;BA.debugLine="pnlMinus = xui.CreatePanel(\"pnlArrow\")"; -__ref._pnlminus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,"pnlArrow"); -RDebugUtils.currentLine=56688658; - //BA.debugLineNum = 56688658;BA.debugLine="pnlPlus.Tag = True"; -__ref._pnlplus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag((Object)(__c.True)); -RDebugUtils.currentLine=56688659; - //BA.debugLineNum = 56688659;BA.debugLine="pnlMinus.Tag = False"; -__ref._pnlminus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag((Object)(__c.False)); -RDebugUtils.currentLine=56688660; - //BA.debugLineNum = 56688660;BA.debugLine="Formation = Props.Get(\"Orientation\")"; -__ref._formation /*String*/ = BA.ObjectToString(_props.Get((Object)("Orientation"))); -RDebugUtils.currentLine=56688661; - //BA.debugLineNum = 56688661;BA.debugLine="mCyclic = Props.Get(\"Cyclic\")"; -__ref._mcyclic /*boolean*/ = BA.ObjectToBoolean(_props.Get((Object)("Cyclic"))); -RDebugUtils.currentLine=56688662; - //BA.debugLineNum = 56688662;BA.debugLine="mRapid = Props.Get(\"Rapid\")"; -__ref._mrapid /*boolean*/ = BA.ObjectToBoolean(_props.Get((Object)("Rapid"))); -RDebugUtils.currentLine=56688663; - //BA.debugLineNum = 56688663;BA.debugLine="mHaptic = Props.GetDefault(\"HapticFeedback\", Fals"; -__ref._mhaptic /*boolean*/ = BA.ObjectToBoolean(_props.GetDefault((Object)("HapticFeedback"),(Object)(__c.False))); -RDebugUtils.currentLine=56688664; - //BA.debugLineNum = 56688664;BA.debugLine="Formatter.GetDefaultFormat.FormatFont = MainLabel"; -__ref._formatter /*keymon.lat.medicomed.b4xformatter*/ ._getdefaultformat /*keymon.lat.medicomed.b4xformatter._b4xformatdata*/ (null).FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ = __ref._mainlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getFont(); -RDebugUtils.currentLine=56688665; - //BA.debugLineNum = 56688665;BA.debugLine="Formatter.GetDefaultFormat.TextColor = MainLabel."; -__ref._formatter /*keymon.lat.medicomed.b4xformatter*/ ._getdefaultformat /*keymon.lat.medicomed.b4xformatter._b4xformatdata*/ (null).TextColor /*int*/ = __ref._mainlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getTextColor(); -RDebugUtils.currentLine=56688666; - //BA.debugLineNum = 56688666;BA.debugLine="If Formation = \"Horizontal\" Then"; -if ((__ref._formation /*String*/ ).equals("Horizontal")) { -RDebugUtils.currentLine=56688667; - //BA.debugLineNum = 56688667;BA.debugLine="lblPlus = CreateLabel(Chr(0xE315))"; -__ref._lblplus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._createlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ (null,BA.ObjectToString(__c.Chr(((int)0xe315)))); -RDebugUtils.currentLine=56688668; - //BA.debugLineNum = 56688668;BA.debugLine="lblMinus = CreateLabel(Chr(0xE314))"; -__ref._lblminus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._createlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ (null,BA.ObjectToString(__c.Chr(((int)0xe314)))); + //BA.debugLineNum = 53;BA.debugLine="pnlPlus = xui.CreatePanel(\"pnlArrow\")"; +_pnlplus = _xui.CreatePanel(ba,"pnlArrow"); + //BA.debugLineNum = 54;BA.debugLine="pnlMinus = xui.CreatePanel(\"pnlArrow\")"; +_pnlminus = _xui.CreatePanel(ba,"pnlArrow"); + //BA.debugLineNum = 56;BA.debugLine="pnlPlus.Tag = True"; +_pnlplus.setTag((Object)(__c.True)); + //BA.debugLineNum = 57;BA.debugLine="pnlMinus.Tag = False"; +_pnlminus.setTag((Object)(__c.False)); + //BA.debugLineNum = 58;BA.debugLine="Formation = Props.Get(\"Orientation\")"; +_formation = BA.ObjectToString(_props.Get((Object)("Orientation"))); + //BA.debugLineNum = 59;BA.debugLine="mCyclic = Props.Get(\"Cyclic\")"; +_mcyclic = BA.ObjectToBoolean(_props.Get((Object)("Cyclic"))); + //BA.debugLineNum = 60;BA.debugLine="mRapid = Props.Get(\"Rapid\")"; +_mrapid = BA.ObjectToBoolean(_props.Get((Object)("Rapid"))); + //BA.debugLineNum = 61;BA.debugLine="mHaptic = Props.GetDefault(\"HapticFeedback\", Fals"; +_mhaptic = BA.ObjectToBoolean(_props.GetDefault((Object)("HapticFeedback"),(Object)(__c.False))); + //BA.debugLineNum = 62;BA.debugLine="Formatter.GetDefaultFormat.FormatFont = MainLabel"; +_formatter._getdefaultformat /*keymon.lat.medicomed.b4xformatter._b4xformatdata*/ ().FormatFont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ = _mainlabel.getFont(); + //BA.debugLineNum = 63;BA.debugLine="Formatter.GetDefaultFormat.TextColor = MainLabel."; +_formatter._getdefaultformat /*keymon.lat.medicomed.b4xformatter._b4xformatdata*/ ().TextColor /*int*/ = _mainlabel.getTextColor(); + //BA.debugLineNum = 64;BA.debugLine="If Formation = \"Horizontal\" Then"; +if ((_formation).equals("Horizontal")) { + //BA.debugLineNum = 65;BA.debugLine="lblPlus = CreateLabel(Chr(0xE315))"; +_lblplus = _createlabel(BA.ObjectToString(__c.Chr(((int)0xe315)))); + //BA.debugLineNum = 66;BA.debugLine="lblMinus = CreateLabel(Chr(0xE314))"; +_lblminus = _createlabel(BA.ObjectToString(__c.Chr(((int)0xe314)))); }else { -RDebugUtils.currentLine=56688670; - //BA.debugLineNum = 56688670;BA.debugLine="lblPlus = CreateLabel(Chr(0xE316))"; -__ref._lblplus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._createlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ (null,BA.ObjectToString(__c.Chr(((int)0xe316)))); -RDebugUtils.currentLine=56688671; - //BA.debugLineNum = 56688671;BA.debugLine="lblMinus = CreateLabel(Chr(0xE313))"; -__ref._lblminus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._createlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ (null,BA.ObjectToString(__c.Chr(((int)0xe313)))); + //BA.debugLineNum = 68;BA.debugLine="lblPlus = CreateLabel(Chr(0xE316))"; +_lblplus = _createlabel(BA.ObjectToString(__c.Chr(((int)0xe316)))); + //BA.debugLineNum = 69;BA.debugLine="lblMinus = CreateLabel(Chr(0xE313))"; +_lblminus = _createlabel(BA.ObjectToString(__c.Chr(((int)0xe313)))); }; -RDebugUtils.currentLine=56688673; - //BA.debugLineNum = 56688673;BA.debugLine="lblMinus.SetTextAlignment(\"CENTER\", \"CENTER\")"; -__ref._lblminus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetTextAlignment("CENTER","CENTER"); -RDebugUtils.currentLine=56688674; - //BA.debugLineNum = 56688674;BA.debugLine="lblPlus.SetTextAlignment(\"CENTER\", \"CENTER\")"; -__ref._lblplus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetTextAlignment("CENTER","CENTER"); -RDebugUtils.currentLine=56688675; - //BA.debugLineNum = 56688675;BA.debugLine="MainLabel.SetTextAlignment(\"CENTER\", \"CENTER\")"; -__ref._mainlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetTextAlignment("CENTER","CENTER"); -RDebugUtils.currentLine=56688676; - //BA.debugLineNum = 56688676;BA.debugLine="mBase.AddView(MainLabel, 0, 0, 0, 0)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._mainlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=56688677; - //BA.debugLineNum = 56688677;BA.debugLine="mBase.AddView(pnlPlus, 0, 0, 0, 0)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._pnlplus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=56688678; - //BA.debugLineNum = 56688678;BA.debugLine="mBase.AddView(pnlMinus, 0, 0, 0, 0)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._pnlminus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=56688679; - //BA.debugLineNum = 56688679;BA.debugLine="pnlPlus.AddView(lblPlus, 0, 0, 0, 0)"; -__ref._pnlplus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._lblplus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=56688680; - //BA.debugLineNum = 56688680;BA.debugLine="pnlMinus.AddView(lblMinus, 0, 0, 0, 0)"; -__ref._pnlminus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._lblminus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=56688681; - //BA.debugLineNum = 56688681;BA.debugLine="SetIndex(-1, False)"; -__ref._setindex /*String*/ (null,(int) (-1),__c.False); -RDebugUtils.currentLine=56688682; - //BA.debugLineNum = 56688682;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; -__ref._base_resize /*String*/ (null,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=56688683; - //BA.debugLineNum = 56688683;BA.debugLine="End Sub"; + //BA.debugLineNum = 71;BA.debugLine="lblMinus.SetTextAlignment(\"CENTER\", \"CENTER\")"; +_lblminus.SetTextAlignment("CENTER","CENTER"); + //BA.debugLineNum = 72;BA.debugLine="lblPlus.SetTextAlignment(\"CENTER\", \"CENTER\")"; +_lblplus.SetTextAlignment("CENTER","CENTER"); + //BA.debugLineNum = 73;BA.debugLine="MainLabel.SetTextAlignment(\"CENTER\", \"CENTER\")"; +_mainlabel.SetTextAlignment("CENTER","CENTER"); + //BA.debugLineNum = 74;BA.debugLine="mBase.AddView(MainLabel, 0, 0, 0, 0)"; +_mbase.AddView((android.view.View)(_mainlabel.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 75;BA.debugLine="mBase.AddView(pnlPlus, 0, 0, 0, 0)"; +_mbase.AddView((android.view.View)(_pnlplus.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 76;BA.debugLine="mBase.AddView(pnlMinus, 0, 0, 0, 0)"; +_mbase.AddView((android.view.View)(_pnlminus.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 77;BA.debugLine="pnlPlus.AddView(lblPlus, 0, 0, 0, 0)"; +_pnlplus.AddView((android.view.View)(_lblplus.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 78;BA.debugLine="pnlMinus.AddView(lblMinus, 0, 0, 0, 0)"; +_pnlminus.AddView((android.view.View)(_lblminus.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 79;BA.debugLine="SetIndex(-1, False)"; +_setindex((int) (-1),__c.False); + //BA.debugLineNum = 80;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; +_base_resize(_mbase.getWidth(),_mbase.getHeight()); + //BA.debugLineNum = 81;BA.debugLine="End Sub"; return ""; } -public Object _getselectedvalue(keymon.lat.medicomed.b4xplusminus __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xplusminus"; -if (Debug.shouldDelegate(ba, "getselectedvalue", true)) - {return ((Object) Debug.delegate(ba, "getselectedvalue", null));} -RDebugUtils.currentLine=56950784; - //BA.debugLineNum = 56950784;BA.debugLine="Public Sub getSelectedValue As Object"; -RDebugUtils.currentLine=56950785; - //BA.debugLineNum = 56950785;BA.debugLine="Return GetValueImpl (mSelectedIndex)"; -if (true) return __ref._getvalueimpl /*Object*/ (null,__ref._mselectedindex /*int*/ ); -RDebugUtils.currentLine=56950786; - //BA.debugLineNum = 56950786;BA.debugLine="End Sub"; +public Object _getselectedvalue() throws Exception{ + //BA.debugLineNum = 117;BA.debugLine="Public Sub getSelectedValue As Object"; + //BA.debugLineNum = 118;BA.debugLine="Return GetValueImpl (mSelectedIndex)"; +if (true) return _getvalueimpl(_mselectedindex); + //BA.debugLineNum = 119;BA.debugLine="End Sub"; return null; } -public Object _getvalueimpl(keymon.lat.medicomed.b4xplusminus __ref,int _index) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xplusminus"; -if (Debug.shouldDelegate(ba, "getvalueimpl", true)) - {return ((Object) Debug.delegate(ba, "getvalueimpl", new Object[] {_index}));} -RDebugUtils.currentLine=57081856; - //BA.debugLineNum = 57081856;BA.debugLine="Private Sub GetValueImpl (Index As Int) As Object"; -RDebugUtils.currentLine=57081857; - //BA.debugLineNum = 57081857;BA.debugLine="If StringMode Then"; -if (__ref._stringmode /*boolean*/ ) { -RDebugUtils.currentLine=57081858; - //BA.debugLineNum = 57081858;BA.debugLine="Return mStringItems.Get(Index)"; -if (true) return __ref._mstringitems /*anywheresoftware.b4a.objects.collections.List*/ .Get(_index); +public Object _getvalueimpl(int _index) throws Exception{ + //BA.debugLineNum = 130;BA.debugLine="Private Sub GetValueImpl (Index As Int) As Object"; + //BA.debugLineNum = 131;BA.debugLine="If StringMode Then"; +if (_stringmode) { + //BA.debugLineNum = 132;BA.debugLine="Return mStringItems.Get(Index)"; +if (true) return _mstringitems.Get(_index); }else { -RDebugUtils.currentLine=57081860; - //BA.debugLineNum = 57081860;BA.debugLine="If Index = Size - 1 Then"; -if (_index==__ref._size /*int*/ -1) { -RDebugUtils.currentLine=57081861; - //BA.debugLineNum = 57081861;BA.debugLine="Return mEndRange"; -if (true) return (Object)(__ref._mendrange /*double*/ ); + //BA.debugLineNum = 134;BA.debugLine="If Index = Size - 1 Then"; +if (_index==_size-1) { + //BA.debugLineNum = 135;BA.debugLine="Return mEndRange"; +if (true) return (Object)(_mendrange); }else { -RDebugUtils.currentLine=57081863; - //BA.debugLineNum = 57081863;BA.debugLine="Return mStartRange + Index * mInterval"; -if (true) return (Object)(__ref._mstartrange /*double*/ +_index*__ref._minterval /*double*/ ); + //BA.debugLineNum = 137;BA.debugLine="Return mStartRange + Index * mInterval"; +if (true) return (Object)(_mstartrange+_index*_minterval); }; }; -RDebugUtils.currentLine=57081866; - //BA.debugLineNum = 57081866;BA.debugLine="End Sub"; + //BA.debugLineNum = 140;BA.debugLine="End Sub"; return null; } -public String _increment(keymon.lat.medicomed.b4xplusminus __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xplusminus"; -if (Debug.shouldDelegate(ba, "increment", true)) - {return ((String) Debug.delegate(ba, "increment", null));} +public String _increment() throws Exception{ double _v1 = 0; double _v2 = 0; -RDebugUtils.currentLine=57212928; - //BA.debugLineNum = 57212928;BA.debugLine="Public Sub Increment"; -RDebugUtils.currentLine=57212929; - //BA.debugLineNum = 57212929;BA.debugLine="If mSelectedIndex = Size - 3 And StringMode = Fal"; -if (__ref._mselectedindex /*int*/ ==__ref._size /*int*/ -3 && __ref._stringmode /*boolean*/ ==__c.False) { -RDebugUtils.currentLine=57212930; - //BA.debugLineNum = 57212930;BA.debugLine="Dim v1 As Double = GetValueImpl(mSelectedIndex +"; -_v1 = (double)(BA.ObjectToNumber(__ref._getvalueimpl /*Object*/ (null,(int) (__ref._mselectedindex /*int*/ +1)))); -RDebugUtils.currentLine=57212931; - //BA.debugLineNum = 57212931;BA.debugLine="Dim v2 As Double = GetValueImpl(mSelectedIndex +"; -_v2 = (double)(BA.ObjectToNumber(__ref._getvalueimpl /*Object*/ (null,(int) (__ref._mselectedindex /*int*/ +2)))); -RDebugUtils.currentLine=57212932; - //BA.debugLineNum = 57212932;BA.debugLine="If Formatter.Format(v1) = Formatter.Format(v2) T"; -if ((__ref._formatter /*keymon.lat.medicomed.b4xformatter*/ ._format /*String*/ (null,_v1)).equals(__ref._formatter /*keymon.lat.medicomed.b4xformatter*/ ._format /*String*/ (null,_v2))) { -RDebugUtils.currentLine=57212933; - //BA.debugLineNum = 57212933;BA.debugLine="mSelectedIndex = mSelectedIndex + 1"; -__ref._mselectedindex /*int*/ = (int) (__ref._mselectedindex /*int*/ +1); + //BA.debugLineNum = 162;BA.debugLine="Public Sub Increment"; + //BA.debugLineNum = 163;BA.debugLine="If mSelectedIndex = Size - 3 And StringMode = Fal"; +if (_mselectedindex==_size-3 && _stringmode==__c.False) { + //BA.debugLineNum = 164;BA.debugLine="Dim v1 As Double = GetValueImpl(mSelectedIndex +"; +_v1 = (double)(BA.ObjectToNumber(_getvalueimpl((int) (_mselectedindex+1)))); + //BA.debugLineNum = 165;BA.debugLine="Dim v2 As Double = GetValueImpl(mSelectedIndex +"; +_v2 = (double)(BA.ObjectToNumber(_getvalueimpl((int) (_mselectedindex+2)))); + //BA.debugLineNum = 166;BA.debugLine="If Formatter.Format(v1) = Formatter.Format(v2) T"; +if ((_formatter._format /*String*/ (_v1)).equals(_formatter._format /*String*/ (_v2))) { + //BA.debugLineNum = 167;BA.debugLine="mSelectedIndex = mSelectedIndex + 1"; +_mselectedindex = (int) (_mselectedindex+1); }; }; -RDebugUtils.currentLine=57212936; - //BA.debugLineNum = 57212936;BA.debugLine="If mSelectedIndex >= Size - 1 Then"; -if (__ref._mselectedindex /*int*/ >=__ref._size /*int*/ -1) { -RDebugUtils.currentLine=57212937; - //BA.debugLineNum = 57212937;BA.debugLine="If mCyclic Then"; -if (__ref._mcyclic /*boolean*/ ) { -RDebugUtils.currentLine=57212938; - //BA.debugLineNum = 57212938;BA.debugLine="mSelectedIndex = -1"; -__ref._mselectedindex /*int*/ = (int) (-1); + //BA.debugLineNum = 170;BA.debugLine="If mSelectedIndex >= Size - 1 Then"; +if (_mselectedindex>=_size-1) { + //BA.debugLineNum = 171;BA.debugLine="If mCyclic Then"; +if (_mcyclic) { + //BA.debugLineNum = 172;BA.debugLine="mSelectedIndex = -1"; +_mselectedindex = (int) (-1); }else { -RDebugUtils.currentLine=57212940; - //BA.debugLineNum = 57212940;BA.debugLine="mSelectedIndex = Size - 1"; -__ref._mselectedindex /*int*/ = (int) (__ref._size /*int*/ -1); -RDebugUtils.currentLine=57212941; - //BA.debugLineNum = 57212941;BA.debugLine="LoopIndex = LoopIndex + 1"; -__ref._loopindex /*int*/ = (int) (__ref._loopindex /*int*/ +1); -RDebugUtils.currentLine=57212942; - //BA.debugLineNum = 57212942;BA.debugLine="Return"; + //BA.debugLineNum = 174;BA.debugLine="mSelectedIndex = Size - 1"; +_mselectedindex = (int) (_size-1); + //BA.debugLineNum = 175;BA.debugLine="LoopIndex = LoopIndex + 1"; +_loopindex = (int) (_loopindex+1); + //BA.debugLineNum = 176;BA.debugLine="Return"; if (true) return ""; }; }; -RDebugUtils.currentLine=57212945; - //BA.debugLineNum = 57212945;BA.debugLine="SetIndex(mSelectedIndex + 1, True)"; -__ref._setindex /*String*/ (null,(int) (__ref._mselectedindex /*int*/ +1),__c.True); -RDebugUtils.currentLine=57212946; - //BA.debugLineNum = 57212946;BA.debugLine="End Sub"; + //BA.debugLineNum = 179;BA.debugLine="SetIndex(mSelectedIndex + 1, True)"; +_setindex((int) (_mselectedindex+1),__c.True); + //BA.debugLineNum = 180;BA.debugLine="End Sub"; return ""; } -public String _initialize(keymon.lat.medicomed.b4xplusminus __ref,anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ -__ref = this; +public String _initialize(anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ innerInitialize(_ba); -RDebugUtils.currentModule="b4xplusminus"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_callback,_eventname}));} -RDebugUtils.currentLine=56623104; - //BA.debugLineNum = 56623104;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -RDebugUtils.currentLine=56623105; - //BA.debugLineNum = 56623105;BA.debugLine="mEventName = EventName"; -__ref._meventname /*String*/ = _eventname; -RDebugUtils.currentLine=56623106; - //BA.debugLineNum = 56623106;BA.debugLine="mCallBack = Callback"; -__ref._mcallback /*Object*/ = _callback; -RDebugUtils.currentLine=56623107; - //BA.debugLineNum = 56623107;BA.debugLine="Formatter.Initialize"; -__ref._formatter /*keymon.lat.medicomed.b4xformatter*/ ._initialize /*String*/ (null,ba); -RDebugUtils.currentLine=56623108; - //BA.debugLineNum = 56623108;BA.debugLine="End Sub"; + //BA.debugLineNum = 31;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; + //BA.debugLineNum = 32;BA.debugLine="mEventName = EventName"; +_meventname = _eventname; + //BA.debugLineNum = 33;BA.debugLine="mCallBack = Callback"; +_mcallback = _callback; + //BA.debugLineNum = 34;BA.debugLine="Formatter.Initialize"; +_formatter._initialize /*String*/ (ba); + //BA.debugLineNum = 35;BA.debugLine="End Sub"; return ""; } -public String _internalsettextorcsbuildertolabel(keymon.lat.medicomed.b4xplusminus __ref,anywheresoftware.b4a.objects.B4XViewWrapper _xlbl,Object _text) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xplusminus"; -if (Debug.shouldDelegate(ba, "internalsettextorcsbuildertolabel", true)) - {return ((String) Debug.delegate(ba, "internalsettextorcsbuildertolabel", new Object[] {_xlbl,_text}));} -RDebugUtils.currentLine=57606144; - //BA.debugLineNum = 57606144;BA.debugLine="Private Sub InternalSetTextOrCSBuilderToLabel(xlbl"; -RDebugUtils.currentLine=57606146; - //BA.debugLineNum = 57606146;BA.debugLine="xlbl.Text = Text"; +public String _internalsettextorcsbuildertolabel(anywheresoftware.b4a.objects.B4XViewWrapper _xlbl,Object _text) throws Exception{ + //BA.debugLineNum = 257;BA.debugLine="Private Sub InternalSetTextOrCSBuilderToLabel(xlbl"; + //BA.debugLineNum = 259;BA.debugLine="xlbl.Text = Text"; _xlbl.setText(BA.ObjectToCharSequence(_text)); -RDebugUtils.currentLine=57606156; - //BA.debugLineNum = 57606156;BA.debugLine="End Sub"; + //BA.debugLineNum = 269;BA.debugLine="End Sub"; return ""; } -public String _pnlarrow_touch(keymon.lat.medicomed.b4xplusminus __ref,int _action,float _x,float _y) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xplusminus"; -if (Debug.shouldDelegate(ba, "pnlarrow_touch", true)) - {return ((String) Debug.delegate(ba, "pnlarrow_touch", new Object[] {_action,_x,_y}));} -RDebugUtils.currentLine=57344000; - //BA.debugLineNum = 57344000;BA.debugLine="Private Sub pnlArrow_Touch (Action As Int, X As Fl"; -RDebugUtils.currentLine=57344001; - //BA.debugLineNum = 57344001;BA.debugLine="Touch(Action = lblPlus.TOUCH_ACTION_DOWN, Action"; -__ref._touch /*String*/ (null,_action==__ref._lblplus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .TOUCH_ACTION_DOWN,_action!=__ref._lblplus /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .TOUCH_ACTION_MOVE,(anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba)))); -RDebugUtils.currentLine=57344002; - //BA.debugLineNum = 57344002;BA.debugLine="End Sub"; +public String _pnlarrow_touch(int _action,float _x,float _y) throws Exception{ + //BA.debugLineNum = 195;BA.debugLine="Private Sub pnlArrow_Touch (Action As Int, X As Fl"; + //BA.debugLineNum = 196;BA.debugLine="Touch(Action = lblPlus.TOUCH_ACTION_DOWN, Action"; +_touch(_action==_lblplus.TOUCH_ACTION_DOWN,_action!=_lblplus.TOUCH_ACTION_MOVE,(anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba)))); + //BA.debugLineNum = 197;BA.debugLine="End Sub"; return ""; } -public String _touch(keymon.lat.medicomed.b4xplusminus __ref,boolean _start,boolean _stop,anywheresoftware.b4a.objects.B4XViewWrapper _pnl) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xplusminus"; -if (Debug.shouldDelegate(ba, "touch", true)) - {return ((String) Debug.delegate(ba, "touch", new Object[] {_start,_stop,_pnl}));} -RDebugUtils.currentLine=57409536; - //BA.debugLineNum = 57409536;BA.debugLine="Private Sub Touch (Start As Boolean, Stop As Boole"; -RDebugUtils.currentLine=57409537; - //BA.debugLineNum = 57409537;BA.debugLine="If pnl.GetView(0).Enabled = False Then Return"; -if (_pnl.GetView((int) (0)).getEnabled()==__c.False) { -if (true) return "";}; -RDebugUtils.currentLine=57409538; - //BA.debugLineNum = 57409538;BA.debugLine="If Start Then"; -if (_start) { -RDebugUtils.currentLine=57409539; - //BA.debugLineNum = 57409539;BA.debugLine="If mHaptic Then XUIViewsUtils.PerformHapticFeedb"; -if (__ref._mhaptic /*boolean*/ ) { -_xuiviewsutils._performhapticfeedback /*String*/ (ba,_pnl);}; -RDebugUtils.currentLine=57409540; - //BA.debugLineNum = 57409540;BA.debugLine="If pnl.Tag = True Then"; -if ((_pnl.getTag()).equals((Object)(__c.True))) { -RDebugUtils.currentLine=57409541; - //BA.debugLineNum = 57409541;BA.debugLine="Increment"; -__ref._increment /*String*/ (null); -RDebugUtils.currentLine=57409542; - //BA.debugLineNum = 57409542;BA.debugLine="StartDownLoop(True)"; -__ref._startdownloop /*void*/ (null,__c.True); +public String _setindex(int _i,boolean _raiseevent) throws Exception{ +Object _value = null; + //BA.debugLineNum = 142;BA.debugLine="Private Sub SetIndex(i As Int, RaiseEvent As Boole"; + //BA.debugLineNum = 143;BA.debugLine="If i >= Size Then i = -1"; +if (_i>=_size) { +_i = (int) (-1);}; + //BA.debugLineNum = 144;BA.debugLine="mSelectedIndex = i"; +_mselectedindex = _i; + //BA.debugLineNum = 145;BA.debugLine="If mSelectedIndex = -1 Then"; +if (_mselectedindex==-1) { + //BA.debugLineNum = 146;BA.debugLine="MainLabel.Text = \"\""; +_mainlabel.setText(BA.ObjectToCharSequence("")); }else { -RDebugUtils.currentLine=57409544; - //BA.debugLineNum = 57409544;BA.debugLine="Decrement"; -__ref._decrement /*String*/ (null); -RDebugUtils.currentLine=57409545; - //BA.debugLineNum = 57409545;BA.debugLine="StartDownLoop(False)"; -__ref._startdownloop /*void*/ (null,__c.False); + //BA.debugLineNum = 148;BA.debugLine="Dim value As Object = GetValueImpl (mSelectedInd"; +_value = _getvalueimpl(_mselectedindex); + //BA.debugLineNum = 149;BA.debugLine="If StringMode Then"; +if (_stringmode) { + //BA.debugLineNum = 150;BA.debugLine="InternalSetTextOrCSBuilderToLabel(MainLabel, va"; +_internalsettextorcsbuildertolabel(_mainlabel,_value); + }else { + //BA.debugLineNum = 152;BA.debugLine="MainLabel.Text = Formatter.Format(value)"; +_mainlabel.setText(BA.ObjectToCharSequence(_formatter._format /*String*/ ((double)(BA.ObjectToNumber(_value))))); }; - }else -{RDebugUtils.currentLine=57409547; - //BA.debugLineNum = 57409547;BA.debugLine="Else If Stop Then"; -if (_stop) { -RDebugUtils.currentLine=57409548; - //BA.debugLineNum = 57409548;BA.debugLine="LoopIndex = LoopIndex + 1"; -__ref._loopindex /*int*/ = (int) (__ref._loopindex /*int*/ +1); - }} -; -RDebugUtils.currentLine=57409550; - //BA.debugLineNum = 57409550;BA.debugLine="End Sub"; + //BA.debugLineNum = 154;BA.debugLine="If RaiseEvent And xui.SubExists(mCallBack, mEven"; +if (_raiseevent && _xui.SubExists(ba,_mcallback,_meventname+"_valuechanged",(int) (1))) { + //BA.debugLineNum = 155;BA.debugLine="CallSub2(mCallBack, mEventName & \"_valuechanged"; +__c.CallSubNew2(ba,_mcallback,_meventname+"_valuechanged",_value); + }; + }; + //BA.debugLineNum = 158;BA.debugLine="lblPlus.Enabled = Size > 0 And (mCyclic Or mSelec"; +_lblplus.setEnabled(_size>0 && (_mcyclic || _mselectedindex<_size-1)); + //BA.debugLineNum = 159;BA.debugLine="lblMinus.Enabled = Size > 0 And (mCyclic Or mSele"; +_lblminus.setEnabled(_size>0 && (_mcyclic || _mselectedindex>0)); + //BA.debugLineNum = 160;BA.debugLine="End Sub"; return ""; } -public String _setnumericrange(keymon.lat.medicomed.b4xplusminus __ref,double _startrange,double _endrange,double _interval) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xplusminus"; -if (Debug.shouldDelegate(ba, "setnumericrange", true)) - {return ((String) Debug.delegate(ba, "setnumericrange", new Object[] {_startrange,_endrange,_interval}));} -RDebugUtils.currentLine=56885248; - //BA.debugLineNum = 56885248;BA.debugLine="Public Sub SetNumericRange (StartRange As Double,"; -RDebugUtils.currentLine=56885249; - //BA.debugLineNum = 56885249;BA.debugLine="Size = Ceil((EndRange - StartRange) / Interval) +"; -__ref._size /*int*/ = (int) (__c.Ceil((_endrange-_startrange)/(double)_interval)+1); -RDebugUtils.currentLine=56885250; - //BA.debugLineNum = 56885250;BA.debugLine="mStartRange = StartRange"; -__ref._mstartrange /*double*/ = _startrange; -RDebugUtils.currentLine=56885251; - //BA.debugLineNum = 56885251;BA.debugLine="mEndRange = EndRange"; -__ref._mendrange /*double*/ = _endrange; -RDebugUtils.currentLine=56885252; - //BA.debugLineNum = 56885252;BA.debugLine="mInterval = Interval"; -__ref._minterval /*double*/ = _interval; -RDebugUtils.currentLine=56885253; - //BA.debugLineNum = 56885253;BA.debugLine="StringMode = False"; -__ref._stringmode /*boolean*/ = __c.False; -RDebugUtils.currentLine=56885254; - //BA.debugLineNum = 56885254;BA.debugLine="SetIndex(0, False)"; -__ref._setindex /*String*/ (null,(int) (0),__c.False); -RDebugUtils.currentLine=56885255; - //BA.debugLineNum = 56885255;BA.debugLine="End Sub"; +public String _setnumericrange(double _startrange,double _endrange,double _interval) throws Exception{ + //BA.debugLineNum = 108;BA.debugLine="Public Sub SetNumericRange (StartRange As Double,"; + //BA.debugLineNum = 109;BA.debugLine="Size = Ceil((EndRange - StartRange) / Interval) +"; +_size = (int) (__c.Ceil((_endrange-_startrange)/(double)_interval)+1); + //BA.debugLineNum = 110;BA.debugLine="mStartRange = StartRange"; +_mstartrange = _startrange; + //BA.debugLineNum = 111;BA.debugLine="mEndRange = EndRange"; +_mendrange = _endrange; + //BA.debugLineNum = 112;BA.debugLine="mInterval = Interval"; +_minterval = _interval; + //BA.debugLineNum = 113;BA.debugLine="StringMode = False"; +_stringmode = __c.False; + //BA.debugLineNum = 114;BA.debugLine="SetIndex(0, False)"; +_setindex((int) (0),__c.False); + //BA.debugLineNum = 115;BA.debugLine="End Sub"; return ""; } -public String _setselectedvalue(keymon.lat.medicomed.b4xplusminus __ref,Object _v) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xplusminus"; -if (Debug.shouldDelegate(ba, "setselectedvalue", true)) - {return ((String) Debug.delegate(ba, "setselectedvalue", new Object[] {_v}));} +public String _setselectedvalue(Object _v) throws Exception{ double _n = 0; -RDebugUtils.currentLine=57016320; - //BA.debugLineNum = 57016320;BA.debugLine="Public Sub setSelectedValue (v As Object)"; -RDebugUtils.currentLine=57016321; - //BA.debugLineNum = 57016321;BA.debugLine="If StringMode Then"; -if (__ref._stringmode /*boolean*/ ) { -RDebugUtils.currentLine=57016322; - //BA.debugLineNum = 57016322;BA.debugLine="SetIndex(mStringItems.IndexOf(v), False)"; -__ref._setindex /*String*/ (null,__ref._mstringitems /*anywheresoftware.b4a.objects.collections.List*/ .IndexOf(_v),__c.False); + //BA.debugLineNum = 121;BA.debugLine="Public Sub setSelectedValue (v As Object)"; + //BA.debugLineNum = 122;BA.debugLine="If StringMode Then"; +if (_stringmode) { + //BA.debugLineNum = 123;BA.debugLine="SetIndex(mStringItems.IndexOf(v), False)"; +_setindex(_mstringitems.IndexOf(_v),__c.False); }else { -RDebugUtils.currentLine=57016324; - //BA.debugLineNum = 57016324;BA.debugLine="Dim n As Double = v"; + //BA.debugLineNum = 125;BA.debugLine="Dim n As Double = v"; _n = (double)(BA.ObjectToNumber(_v)); -RDebugUtils.currentLine=57016325; - //BA.debugLineNum = 57016325;BA.debugLine="SetIndex(Min(Size - 1, Max(0, Round((n - mStartR"; -__ref._setindex /*String*/ (null,(int) (__c.Min(__ref._size /*int*/ -1,__c.Max(0,__c.Round((_n-__ref._mstartrange /*double*/ )/(double)__ref._minterval /*double*/ )))),__c.False); + //BA.debugLineNum = 126;BA.debugLine="SetIndex(Min(Size - 1, Max(0, Round((n - mStartR"; +_setindex((int) (__c.Min(_size-1,__c.Max(0,__c.Round((_n-_mstartrange)/(double)_minterval)))),__c.False); }; -RDebugUtils.currentLine=57016327; - //BA.debugLineNum = 57016327;BA.debugLine="End Sub"; + //BA.debugLineNum = 128;BA.debugLine="End Sub"; return ""; } -public String _setstringitems(keymon.lat.medicomed.b4xplusminus __ref,anywheresoftware.b4a.objects.collections.List _list) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xplusminus"; -if (Debug.shouldDelegate(ba, "setstringitems", true)) - {return ((String) Debug.delegate(ba, "setstringitems", new Object[] {_list}));} -RDebugUtils.currentLine=56819712; - //BA.debugLineNum = 56819712;BA.debugLine="Public Sub SetStringItems (list As List)"; -RDebugUtils.currentLine=56819713; - //BA.debugLineNum = 56819713;BA.debugLine="mStringItems = list"; -__ref._mstringitems /*anywheresoftware.b4a.objects.collections.List*/ = _list; -RDebugUtils.currentLine=56819714; - //BA.debugLineNum = 56819714;BA.debugLine="StringMode = True"; -__ref._stringmode /*boolean*/ = __c.True; -RDebugUtils.currentLine=56819715; - //BA.debugLineNum = 56819715;BA.debugLine="Size = mStringItems.Size"; -__ref._size /*int*/ = __ref._mstringitems /*anywheresoftware.b4a.objects.collections.List*/ .getSize(); -RDebugUtils.currentLine=56819716; - //BA.debugLineNum = 56819716;BA.debugLine="SetIndex(-1, False)"; -__ref._setindex /*String*/ (null,(int) (-1),__c.False); -RDebugUtils.currentLine=56819717; - //BA.debugLineNum = 56819717;BA.debugLine="End Sub"; +public String _setstringitems(anywheresoftware.b4a.objects.collections.List _list) throws Exception{ + //BA.debugLineNum = 101;BA.debugLine="Public Sub SetStringItems (list As List)"; + //BA.debugLineNum = 102;BA.debugLine="mStringItems = list"; +_mstringitems = _list; + //BA.debugLineNum = 103;BA.debugLine="StringMode = True"; +_stringmode = __c.True; + //BA.debugLineNum = 104;BA.debugLine="Size = mStringItems.Size"; +_size = _mstringitems.getSize(); + //BA.debugLineNum = 105;BA.debugLine="SetIndex(-1, False)"; +_setindex((int) (-1),__c.False); + //BA.debugLineNum = 106;BA.debugLine="End Sub"; return ""; } -public void _startdownloop(keymon.lat.medicomed.b4xplusminus __ref,boolean _up) throws Exception{ -RDebugUtils.currentModule="b4xplusminus"; -if (Debug.shouldDelegate(ba, "startdownloop", true)) - {Debug.delegate(ba, "startdownloop", new Object[] {_up}); return;} -ResumableSub_StartDownLoop rsub = new ResumableSub_StartDownLoop(this,__ref,_up); +public void _startdownloop(boolean _up) throws Exception{ +ResumableSub_StartDownLoop rsub = new ResumableSub_StartDownLoop(this,_up); rsub.resume(ba, null); } public static class ResumableSub_StartDownLoop extends BA.ResumableSub { -public ResumableSub_StartDownLoop(keymon.lat.medicomed.b4xplusminus parent,keymon.lat.medicomed.b4xplusminus __ref,boolean _up) { +public ResumableSub_StartDownLoop(keymon.lat.medicomed.b4xplusminus parent,boolean _up) { this.parent = parent; -this.__ref = __ref; this._up = _up; -this.__ref = parent; } -keymon.lat.medicomed.b4xplusminus __ref; keymon.lat.medicomed.b4xplusminus parent; boolean _up; int _myindex = 0; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="b4xplusminus"; while (true) { switch (state) { @@ -738,17 +456,15 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=57475073; - //BA.debugLineNum = 57475073;BA.debugLine="LoopIndex = LoopIndex + 1"; -__ref._loopindex /*int*/ = (int) (__ref._loopindex /*int*/ +1); -RDebugUtils.currentLine=57475074; - //BA.debugLineNum = 57475074;BA.debugLine="If mRapid = False Then Return"; + //BA.debugLineNum = 235;BA.debugLine="LoopIndex = LoopIndex + 1"; +parent._loopindex = (int) (parent._loopindex+1); + //BA.debugLineNum = 236;BA.debugLine="If mRapid = False Then Return"; if (true) break; case 1: //if this.state = 6; -if (__ref._mrapid /*boolean*/ ==parent.__c.False) { +if (parent._mrapid==parent.__c.False) { this.state = 3; ;}if (true) break; @@ -762,26 +478,23 @@ case 6: //C this.state = 7; ; -RDebugUtils.currentLine=57475075; - //BA.debugLineNum = 57475075;BA.debugLine="Dim MyIndex As Int = LoopIndex"; -_myindex = __ref._loopindex /*int*/ ; -RDebugUtils.currentLine=57475076; - //BA.debugLineNum = 57475076;BA.debugLine="Sleep(RapidPeriod1)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "b4xplusminus", "startdownloop"),__ref._rapidperiod1 /*int*/ ); + //BA.debugLineNum = 237;BA.debugLine="Dim MyIndex As Int = LoopIndex"; +_myindex = parent._loopindex; + //BA.debugLineNum = 238;BA.debugLine="Sleep(RapidPeriod1)"; +parent.__c.Sleep(ba,this,parent._rapidperiod1); this.state = 19; return; case 19: //C this.state = 7; ; -RDebugUtils.currentLine=57475077; - //BA.debugLineNum = 57475077;BA.debugLine="Do While MyIndex = LoopIndex"; + //BA.debugLineNum = 239;BA.debugLine="Do While MyIndex = LoopIndex"; if (true) break; case 7: //do while this.state = 18; -while (_myindex==__ref._loopindex /*int*/ ) { +while (_myindex==parent._loopindex) { this.state = 9; if (true) break; } @@ -790,8 +503,7 @@ if (true) break; case 9: //C this.state = 10; -RDebugUtils.currentLine=57475078; - //BA.debugLineNum = 57475078;BA.debugLine="If Up Then Increment Else Decrement"; + //BA.debugLineNum = 240;BA.debugLine="If Up Then Increment Else Decrement"; if (true) break; case 10: @@ -807,22 +519,21 @@ this.state = 14; case 12: //C this.state = 17; -__ref._increment /*String*/ (null); +parent._increment(); if (true) break; case 14: //C this.state = 17; -__ref._decrement /*String*/ (null); +parent._decrement(); if (true) break; case 17: //C this.state = 7; ; -RDebugUtils.currentLine=57475079; - //BA.debugLineNum = 57475079;BA.debugLine="Sleep(RapidPeriod2)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "b4xplusminus", "startdownloop"),__ref._rapidperiod2 /*int*/ ); + //BA.debugLineNum = 241;BA.debugLine="Sleep(RapidPeriod2)"; +parent.__c.Sleep(ba,this,parent._rapidperiod2); this.state = 20; return; case 20: @@ -835,12 +546,44 @@ case 18: //C this.state = -1; ; -RDebugUtils.currentLine=57475081; - //BA.debugLineNum = 57475081;BA.debugLine="End Sub"; + //BA.debugLineNum = 243;BA.debugLine="End Sub"; if (true) break; } } } } -} \ No newline at end of file +public String _touch(boolean _start,boolean _stop,anywheresoftware.b4a.objects.B4XViewWrapper _pnl) throws Exception{ + //BA.debugLineNum = 199;BA.debugLine="Private Sub Touch (Start As Boolean, Stop As Boole"; + //BA.debugLineNum = 200;BA.debugLine="If pnl.GetView(0).Enabled = False Then Return"; +if (_pnl.GetView((int) (0)).getEnabled()==__c.False) { +if (true) return "";}; + //BA.debugLineNum = 201;BA.debugLine="If Start Then"; +if (_start) { + //BA.debugLineNum = 202;BA.debugLine="If mHaptic Then XUIViewsUtils.PerformHapticFeedb"; +if (_mhaptic) { +_xuiviewsutils._performhapticfeedback /*String*/ (ba,_pnl);}; + //BA.debugLineNum = 203;BA.debugLine="If pnl.Tag = True Then"; +if ((_pnl.getTag()).equals((Object)(__c.True))) { + //BA.debugLineNum = 204;BA.debugLine="Increment"; +_increment(); + //BA.debugLineNum = 205;BA.debugLine="StartDownLoop(True)"; +_startdownloop(__c.True); + }else { + //BA.debugLineNum = 207;BA.debugLine="Decrement"; +_decrement(); + //BA.debugLineNum = 208;BA.debugLine="StartDownLoop(False)"; +_startdownloop(__c.False); + }; + }else if(_stop) { + //BA.debugLineNum = 211;BA.debugLine="LoopIndex = LoopIndex + 1"; +_loopindex = (int) (_loopindex+1); + }; + //BA.debugLineNum = 213;BA.debugLine="End Sub"; +return ""; +} +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xradiobutton.java b/B4A/Objects/src/keymon/lat/medicomed/b4xradiobutton.java index ca9c5d7..9c1dfd7 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xradiobutton.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xradiobutton.java @@ -10,7 +10,7 @@ public class b4xradiobutton extends B4AClass.ImplB4AClass implements BA.SubDeleg private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xradiobutton"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xradiobutton"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xradiobutton extends B4AClass.ImplB4AClass implements BA.SubDeleg 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.keywords.Common __c = null; public String _meventname = ""; public Object _mcallback = null; public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null; @@ -63,75 +56,237 @@ 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 _base_resize(keymon.lat.medicomed.b4xradiobutton __ref,double _width1,double _height1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xradiobutton"; -if (Debug.shouldDelegate(ba, "base_resize", true)) - {return ((String) Debug.delegate(ba, "base_resize", new Object[] {_width1,_height1}));} +public String _base_resize(double _width1,double _height1) throws Exception{ int _newsize = 0; int _gap = 0; -RDebugUtils.currentLine=57868288; - //BA.debugLineNum = 57868288;BA.debugLine="Private Sub Base_Resize (Width1 As Double, Height1"; -RDebugUtils.currentLine=57868289; - //BA.debugLineNum = 57868289;BA.debugLine="Dim NewSize As Int = Max(5dip, Height1)"; + //BA.debugLineNum = 59;BA.debugLine="Private Sub Base_Resize (Width1 As Double, Height1"; + //BA.debugLineNum = 60;BA.debugLine="Dim NewSize As Int = Max(5dip, Height1)"; _newsize = (int) (__c.Max(__c.DipToCurrent((int) (5)),_height1)); -RDebugUtils.currentLine=57868290; - //BA.debugLineNum = 57868290;BA.debugLine="If NewSize = Size Then Return"; -if (_newsize==__ref._size /*int*/ ) { + //BA.debugLineNum = 61;BA.debugLine="If NewSize = Size Then Return"; +if (_newsize==_size) { if (true) return "";}; -RDebugUtils.currentLine=57868291; - //BA.debugLineNum = 57868291;BA.debugLine="Size = NewSize"; -__ref._size /*int*/ = _newsize; -RDebugUtils.currentLine=57868292; - //BA.debugLineNum = 57868292;BA.debugLine="Dim gap As Int = 3dip"; + //BA.debugLineNum = 62;BA.debugLine="Size = NewSize"; +_size = _newsize; + //BA.debugLineNum = 63;BA.debugLine="Dim gap As Int = 3dip"; _gap = __c.DipToCurrent((int) (3)); -RDebugUtils.currentLine=57868294; - //BA.debugLineNum = 57868294;BA.debugLine="bc.Initialize(NewSize - 2 * gap, NewSize - 2 * ga"; -__ref._bc /*b4a.example.bitmapcreator*/ ._initialize(ba,(int) (_newsize-2*_gap),(int) (_newsize-2*_gap)); -RDebugUtils.currentLine=57868295; - //BA.debugLineNum = 57868295;BA.debugLine="Scale = xui.Scale"; -__ref._scale /*float*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getScale(); -RDebugUtils.currentLine=57868300; - //BA.debugLineNum = 57868300;BA.debugLine="iv.SetLayoutAnimated(0, gap, gap, Size - 2 * gap,"; -__ref._iv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),_gap,_gap,(int) (__ref._size /*int*/ -2*_gap),(int) (__ref._size /*int*/ -2*_gap)); -RDebugUtils.currentLine=57868301; - //BA.debugLineNum = 57868301;BA.debugLine="pnl.SetLayoutAnimated(0, 0, 0, Width1, Height1)"; -__ref._pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width1),(int) (_height1)); -RDebugUtils.currentLine=57868302; - //BA.debugLineNum = 57868302;BA.debugLine="mLabel.SetLayoutAnimated(0, Size + gap, 0, Width1"; -__ref._mlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (__ref._size /*int*/ +_gap),(int) (0),(int) (_width1-__ref._size /*int*/ -_gap),(int) (_height1)); -RDebugUtils.currentLine=57868303; - //BA.debugLineNum = 57868303;BA.debugLine="OnBrush = bc.CreateBrushFromColor(OnColor)"; -__ref._onbrush /*b4a.example.bcpath._bcbrush*/ = __ref._bc /*b4a.example.bitmapcreator*/ ._createbrushfromcolor(__ref._oncolor /*int*/ ); -RDebugUtils.currentLine=57868304; - //BA.debugLineNum = 57868304;BA.debugLine="OffBrush = bc.CreateBrushFromColor(OffColor)"; -__ref._offbrush /*b4a.example.bcpath._bcbrush*/ = __ref._bc /*b4a.example.bitmapcreator*/ ._createbrushfromcolor(__ref._offcolor /*int*/ ); -RDebugUtils.currentLine=57868305; - //BA.debugLineNum = 57868305;BA.debugLine="transparent = bc.CreateBrushFromColor(xui.Color_T"; -__ref._transparent /*b4a.example.bcpath._bcbrush*/ = __ref._bc /*b4a.example.bitmapcreator*/ ._createbrushfromcolor(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent); -RDebugUtils.currentLine=57868306; - //BA.debugLineNum = 57868306;BA.debugLine="SetValueImpl(mValue, True)"; -__ref._setvalueimpl /*void*/ (null,__ref._mvalue /*boolean*/ ,__c.True); -RDebugUtils.currentLine=57868307; - //BA.debugLineNum = 57868307;BA.debugLine="End Sub"; + //BA.debugLineNum = 65;BA.debugLine="bc.Initialize(NewSize - 2 * gap, NewSize - 2 * ga"; +_bc._initialize(ba,(int) (_newsize-2*_gap),(int) (_newsize-2*_gap)); + //BA.debugLineNum = 66;BA.debugLine="Scale = xui.Scale"; +_scale = _xui.getScale(); + //BA.debugLineNum = 71;BA.debugLine="iv.SetLayoutAnimated(0, gap, gap, Size - 2 * gap,"; +_iv.SetLayoutAnimated((int) (0),_gap,_gap,(int) (_size-2*_gap),(int) (_size-2*_gap)); + //BA.debugLineNum = 72;BA.debugLine="pnl.SetLayoutAnimated(0, 0, 0, Width1, Height1)"; +_pnl.SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width1),(int) (_height1)); + //BA.debugLineNum = 73;BA.debugLine="mLabel.SetLayoutAnimated(0, Size + gap, 0, Width1"; +_mlabel.SetLayoutAnimated((int) (0),(int) (_size+_gap),(int) (0),(int) (_width1-_size-_gap),(int) (_height1)); + //BA.debugLineNum = 74;BA.debugLine="OnBrush = bc.CreateBrushFromColor(OnColor)"; +_onbrush = _bc._createbrushfromcolor(_oncolor); + //BA.debugLineNum = 75;BA.debugLine="OffBrush = bc.CreateBrushFromColor(OffColor)"; +_offbrush = _bc._createbrushfromcolor(_offcolor); + //BA.debugLineNum = 76;BA.debugLine="transparent = bc.CreateBrushFromColor(xui.Color_T"; +_transparent = _bc._createbrushfromcolor(_xui.Color_Transparent); + //BA.debugLineNum = 77;BA.debugLine="SetValueImpl(mValue, True)"; +_setvalueimpl(_mvalue,__c.True); + //BA.debugLineNum = 78;BA.debugLine="End Sub"; return ""; } -public void _setvalueimpl(keymon.lat.medicomed.b4xradiobutton __ref,boolean _b,boolean _immediate) throws Exception{ -RDebugUtils.currentModule="b4xradiobutton"; -if (Debug.shouldDelegate(ba, "setvalueimpl", true)) - {Debug.delegate(ba, "setvalueimpl", new Object[] {_b,_immediate}); return;} -ResumableSub_SetValueImpl rsub = new ResumableSub_SetValueImpl(this,__ref,_b,_immediate); +public String _class_globals() throws Exception{ + //BA.debugLineNum = 6;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 7;BA.debugLine="Private mEventName As String 'ignore"; +_meventname = ""; + //BA.debugLineNum = 8;BA.debugLine="Private mCallBack As Object 'ignore"; +_mcallback = new Object(); + //BA.debugLineNum = 9;BA.debugLine="Public mBase As B4XView 'ignore"; +_mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 10;BA.debugLine="Private xui As XUI 'ignore"; +_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); + //BA.debugLineNum = 11;BA.debugLine="Public OnColor, OffColor As Int"; +_oncolor = 0; +_offcolor = 0; + //BA.debugLineNum = 12;BA.debugLine="Private bc As BitmapCreator"; +_bc = new b4a.example.bitmapcreator(); + //BA.debugLineNum = 13;BA.debugLine="Private iv As B4XView"; +_iv = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 14;BA.debugLine="Private mValue As Boolean"; +_mvalue = false; + //BA.debugLineNum = 15;BA.debugLine="Private transparent As BCBrush"; +_transparent = new b4a.example.bcpath._bcbrush(); + //BA.debugLineNum = 16;BA.debugLine="Private LoopIndex As Int"; +_loopindex = 0; + //BA.debugLineNum = 17;BA.debugLine="Public Tag As Object"; +_tag = new Object(); + //BA.debugLineNum = 18;BA.debugLine="Private OnBrush, OffBrush As BCBrush"; +_onbrush = new b4a.example.bcpath._bcbrush(); +_offbrush = new b4a.example.bcpath._bcbrush(); + //BA.debugLineNum = 19;BA.debugLine="Private mEnabled As Boolean = True"; +_menabled = __c.True; + //BA.debugLineNum = 20;BA.debugLine="Public mHaptic As Boolean"; +_mhaptic = false; + //BA.debugLineNum = 21;BA.debugLine="Private Size As Int"; +_size = 0; + //BA.debugLineNum = 22;BA.debugLine="Public mLabel As B4XView"; +_mlabel = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 23;BA.debugLine="Private pnl As B4XView"; +_pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 24;BA.debugLine="Private Scale As Float 'ignore"; +_scale = 0f; + //BA.debugLineNum = 25;BA.debugLine="End Sub"; +return ""; +} +public String _designercreateview(Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ +anywheresoftware.b4a.objects.ImageViewWrapper _iiv = null; + //BA.debugLineNum = 33;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; + //BA.debugLineNum = 34;BA.debugLine="mBase = Base"; +_mbase = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); + //BA.debugLineNum = 35;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_tag = _mbase.getTag(); + //BA.debugLineNum = 35;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_mbase.setTag(this); + //BA.debugLineNum = 36;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0,"; +_mbase.SetColorAndBorder(_xui.Color_Transparent,(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 37;BA.debugLine="pnl = xui.CreatePanel(\"pnl\")"; +_pnl = _xui.CreatePanel(ba,"pnl"); + //BA.debugLineNum = 38;BA.debugLine="pnl.Color = xui.Color_Transparent"; +_pnl.setColor(_xui.Color_Transparent); + //BA.debugLineNum = 39;BA.debugLine="Dim iiv As ImageView"; +_iiv = new anywheresoftware.b4a.objects.ImageViewWrapper(); + //BA.debugLineNum = 40;BA.debugLine="iiv.Initialize(\"\")"; +_iiv.Initialize(ba,""); + //BA.debugLineNum = 41;BA.debugLine="iv = iiv"; +_iv = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_iiv.getObject())); + //BA.debugLineNum = 42;BA.debugLine="mBase.AddView(iv, 0, 0, 0, 0)"; +_mbase.AddView((android.view.View)(_iv.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 43;BA.debugLine="mLabel = Lbl"; +_mlabel = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lbl.getObject())); + //BA.debugLineNum = 44;BA.debugLine="mLabel.SetTextAlignment(\"CENTER\", \"LEFT\")"; +_mlabel.SetTextAlignment("CENTER","LEFT"); + //BA.debugLineNum = 45;BA.debugLine="mBase.AddView(mLabel, 0, 0, 0, 0)"; +_mbase.AddView((android.view.View)(_mlabel.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 46;BA.debugLine="mBase.AddView(pnl, 0, 0, 0, 0)"; +_mbase.AddView((android.view.View)(_pnl.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 48;BA.debugLine="OnColor = xui.PaintOrColorToColor(Props.Get(\"OnCo"; +_oncolor = _xui.PaintOrColorToColor(_props.Get((Object)("OnColor"))); + //BA.debugLineNum = 49;BA.debugLine="OffColor = xui.PaintOrColorToColor(Props.Get(\"Off"; +_offcolor = _xui.PaintOrColorToColor(_props.Get((Object)("OffColor"))); + //BA.debugLineNum = 50;BA.debugLine="mHaptic = Props.GetDefault(\"HapticFeedback\", Fals"; +_mhaptic = BA.ObjectToBoolean(_props.GetDefault((Object)("HapticFeedback"),(Object)(__c.False))); + //BA.debugLineNum = 52;BA.debugLine="mEnabled = mBase.Enabled"; +_menabled = _mbase.getEnabled(); + //BA.debugLineNum = 53;BA.debugLine="mBase.Enabled = True"; +_mbase.setEnabled(__c.True); + //BA.debugLineNum = 54;BA.debugLine="mValue = Props.Get(\"Value\")"; +_mvalue = BA.ObjectToBoolean(_props.Get((Object)("Value"))); + //BA.debugLineNum = 55;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; +_base_resize(_mbase.getWidth(),_mbase.getHeight()); + //BA.debugLineNum = 56;BA.debugLine="End Sub"; +return ""; +} +public String _draw(float _state) throws Exception{ +float _r = 0f; + //BA.debugLineNum = 153;BA.debugLine="Private Sub Draw (State As Float)"; + //BA.debugLineNum = 154;BA.debugLine="bc.DrawRect2(bc.TargetRect, transparent, True, 0)"; +_bc._drawrect2(_bc._targetrect,_transparent,__c.True,(int) (0)); + //BA.debugLineNum = 155;BA.debugLine="Dim r As Float = Floor(bc.mHeight / 2)"; +_r = (float) (__c.Floor(_bc._mheight/(double)2)); + //BA.debugLineNum = 156;BA.debugLine="If State < 1 Then bc.DrawCircle2(r, r, r, OffBrus"; +if (_state<1) { +_bc._drawcircle2(_r,_r,_r,_offbrush,__c.True,(int) (0));}; + //BA.debugLineNum = 157;BA.debugLine="If State > 0 Then bc.DrawCircle2(r, r, r * State,"; +if (_state>0) { +_bc._drawcircle2(_r,_r,(float) (_r*_state),_onbrush,__c.True,(int) (0));}; + //BA.debugLineNum = 158;BA.debugLine="bc.SetBitmapToImageView(bc.Bitmap, iv)"; +_bc._setbitmaptoimageview(_bc._getbitmap(),_iv); + //BA.debugLineNum = 159;BA.debugLine="End Sub"; +return ""; +} +public boolean _getchecked() throws Exception{ + //BA.debugLineNum = 140;BA.debugLine="Public Sub getChecked As Boolean"; + //BA.debugLineNum = 141;BA.debugLine="Return mValue"; +if (true) return _mvalue; + //BA.debugLineNum = 142;BA.debugLine="End Sub"; +return false; +} +public boolean _getenabled() throws Exception{ + //BA.debugLineNum = 149;BA.debugLine="Public Sub getEnabled As Boolean"; + //BA.debugLineNum = 150;BA.debugLine="Return mEnabled"; +if (true) return _menabled; + //BA.debugLineNum = 151;BA.debugLine="End Sub"; +return false; +} +public Object _gettext() throws Exception{ + //BA.debugLineNum = 165;BA.debugLine="Public Sub getText As Object"; + //BA.debugLineNum = 166;BA.debugLine="Return mLabel.Text"; +if (true) return (Object)(_mlabel.getText()); + //BA.debugLineNum = 167;BA.debugLine="End Sub"; +return null; +} +public String _initialize(anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 27;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; + //BA.debugLineNum = 28;BA.debugLine="mEventName = EventName"; +_meventname = _eventname; + //BA.debugLineNum = 29;BA.debugLine="mCallBack = Callback"; +_mcallback = _callback; + //BA.debugLineNum = 30;BA.debugLine="End Sub"; +return ""; +} +public String _pnl_click() throws Exception{ + //BA.debugLineNum = 86;BA.debugLine="Private Sub pnl_Click"; + //BA.debugLineNum = 88;BA.debugLine="If mValue Then Return"; +if (_mvalue) { +if (true) return "";}; + //BA.debugLineNum = 89;BA.debugLine="If mEnabled Then"; +if (_menabled) { + //BA.debugLineNum = 90;BA.debugLine="If mHaptic Then XUIViewsUtils.PerformHapticFeedb"; +if (_mhaptic) { +_xuiviewsutils._performhapticfeedback /*String*/ (ba,_mbase);}; + //BA.debugLineNum = 91;BA.debugLine="SetValueImpl(Not(mValue), False)"; +_setvalueimpl(__c.Not(_mvalue),__c.False); + //BA.debugLineNum = 92;BA.debugLine="If mValue And xui.SubExists(mCallBack, mEventNam"; +if (_mvalue && _xui.SubExists(ba,_mcallback,_meventname+"_Checked",(int) (0))) { + //BA.debugLineNum = 93;BA.debugLine="CallSubDelayed(mCallBack, mEventName & \"_Checke"; +__c.CallSubDelayed(ba,_mcallback,_meventname+"_Checked"); + }; + }; + //BA.debugLineNum = 96;BA.debugLine="End Sub"; +return ""; +} +public String _setchecked(boolean _b) throws Exception{ + //BA.debugLineNum = 135;BA.debugLine="Public Sub setChecked(b As Boolean)"; + //BA.debugLineNum = 136;BA.debugLine="If b = mValue Then Return"; +if (_b==_mvalue) { +if (true) return "";}; + //BA.debugLineNum = 137;BA.debugLine="SetValueImpl(b, False)"; +_setvalueimpl(_b,__c.False); + //BA.debugLineNum = 138;BA.debugLine="End Sub"; +return ""; +} +public String _setenabled(boolean _b) throws Exception{ + //BA.debugLineNum = 144;BA.debugLine="Public Sub setEnabled (b As Boolean)"; + //BA.debugLineNum = 145;BA.debugLine="mEnabled = b"; +_menabled = _b; + //BA.debugLineNum = 146;BA.debugLine="SetValueImpl(mValue, True)"; +_setvalueimpl(_mvalue,__c.True); + //BA.debugLineNum = 147;BA.debugLine="End Sub"; +return ""; +} +public String _settext(Object _t) throws Exception{ + //BA.debugLineNum = 161;BA.debugLine="Public Sub setText (t As Object)"; + //BA.debugLineNum = 162;BA.debugLine="XUIViewsUtils.SetTextOrCSBuilderToLabel(mLabel, t"; +_xuiviewsutils._settextorcsbuildertolabel /*String*/ (ba,_mlabel,_t); + //BA.debugLineNum = 163;BA.debugLine="End Sub"; +return ""; +} +public void _setvalueimpl(boolean _b,boolean _immediate) throws Exception{ +ResumableSub_SetValueImpl rsub = new ResumableSub_SetValueImpl(this,_b,_immediate); rsub.resume(ba, null); } public static class ResumableSub_SetValueImpl extends BA.ResumableSub { -public ResumableSub_SetValueImpl(keymon.lat.medicomed.b4xradiobutton parent,keymon.lat.medicomed.b4xradiobutton __ref,boolean _b,boolean _immediate) { +public ResumableSub_SetValueImpl(keymon.lat.medicomed.b4xradiobutton parent,boolean _b,boolean _immediate) { this.parent = parent; -this.__ref = __ref; this._b = _b; this._immediate = _immediate; -this.__ref = parent; } -keymon.lat.medicomed.b4xradiobutton __ref; keymon.lat.medicomed.b4xradiobutton parent; boolean _b; boolean _immediate; @@ -147,7 +302,6 @@ int limit3; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="b4xradiobutton"; while (true) { switch (state) { @@ -157,11 +311,9 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=57999361; - //BA.debugLineNum = 57999361;BA.debugLine="mValue = b"; -__ref._mvalue /*boolean*/ = _b; -RDebugUtils.currentLine=57999362; - //BA.debugLineNum = 57999362;BA.debugLine="If b = True Then"; + //BA.debugLineNum = 99;BA.debugLine="mValue = b"; +parent._mvalue = _b; + //BA.debugLineNum = 100;BA.debugLine="If b = True Then"; if (true) break; case 1: @@ -174,15 +326,14 @@ this.state = 3; case 3: //C this.state = 4; -RDebugUtils.currentLine=57999363; - //BA.debugLineNum = 57999363;BA.debugLine="For i = 0 To mBase.Parent.NumberOfViews - 1"; + //BA.debugLineNum = 101;BA.debugLine="For i = 0 To mBase.Parent.NumberOfViews - 1"; if (true) break; case 4: //for this.state = 11; step3 = 1; -limit3 = (int) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getParent().getNumberOfViews()-1); +limit3 = (int) (parent._mbase.getParent().getNumberOfViews()-1); _i = (int) (0) ; this.state = 59; if (true) break; @@ -202,30 +353,26 @@ if (true) break; case 6: //C this.state = 7; -RDebugUtils.currentLine=57999364; - //BA.debugLineNum = 57999364;BA.debugLine="Dim v As B4XView = mBase.Parent.GetView(i)"; + //BA.debugLineNum = 102;BA.debugLine="Dim v As B4XView = mBase.Parent.GetView(i)"; _v = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_v = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getParent().GetView(_i); -RDebugUtils.currentLine=57999365; - //BA.debugLineNum = 57999365;BA.debugLine="If v <> mBase And v.Tag Is B4XRadioButton Then"; +_v = parent._mbase.getParent().GetView(_i); + //BA.debugLineNum = 103;BA.debugLine="If v <> mBase And v.Tag Is B4XRadioButton Then"; if (true) break; case 7: //if this.state = 10; -if ((_v).equals(__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ) == false && _v.getTag() instanceof keymon.lat.medicomed.b4xradiobutton) { +if ((_v).equals(parent._mbase) == false && _v.getTag() instanceof keymon.lat.medicomed.b4xradiobutton) { this.state = 9; }if (true) break; case 9: //C this.state = 10; -RDebugUtils.currentLine=57999366; - //BA.debugLineNum = 57999366;BA.debugLine="Dim rb As B4XRadioButton = v.Tag"; + //BA.debugLineNum = 104;BA.debugLine="Dim rb As B4XRadioButton = v.Tag"; _rb = (keymon.lat.medicomed.b4xradiobutton)(_v.getTag()); -RDebugUtils.currentLine=57999367; - //BA.debugLineNum = 57999367;BA.debugLine="rb.Checked = False"; -_rb._setchecked /*boolean*/ (null,parent.__c.False); + //BA.debugLineNum = 105;BA.debugLine="rb.Checked = False"; +_rb._setchecked /*boolean*/ (parent.__c.False); if (true) break; case 10: @@ -245,11 +392,9 @@ case 12: //C this.state = 13; ; -RDebugUtils.currentLine=57999371; - //BA.debugLineNum = 57999371;BA.debugLine="LoopIndex = LoopIndex + 1"; -__ref._loopindex /*int*/ = (int) (__ref._loopindex /*int*/ +1); -RDebugUtils.currentLine=57999372; - //BA.debugLineNum = 57999372;BA.debugLine="If Immediate Then"; + //BA.debugLineNum = 109;BA.debugLine="LoopIndex = LoopIndex + 1"; +parent._loopindex = (int) (parent._loopindex+1); + //BA.debugLineNum = 110;BA.debugLine="If Immediate Then"; if (true) break; case 13: @@ -264,14 +409,13 @@ this.state = 25; case 15: //C this.state = 16; -RDebugUtils.currentLine=57999373; - //BA.debugLineNum = 57999373;BA.debugLine="If mValue Then Draw(1) Else Draw(0)"; + //BA.debugLineNum = 111;BA.debugLine="If mValue Then Draw(1) Else Draw(0)"; if (true) break; case 16: //if this.state = 23; -if (__ref._mvalue /*boolean*/ ) { +if (parent._mvalue) { this.state = 18; ;} else { @@ -281,13 +425,13 @@ this.state = 20; case 18: //C this.state = 23; -__ref._draw /*String*/ (null,(float) (1)); +parent._draw((float) (1)); if (true) break; case 20: //C this.state = 23; -__ref._draw /*String*/ (null,(float) (0)); +parent._draw((float) (0)); if (true) break; case 23: @@ -299,17 +443,13 @@ this.state = 53; case 25: //C this.state = 26; -RDebugUtils.currentLine=57999375; - //BA.debugLineNum = 57999375;BA.debugLine="Dim MyIndex As Int = LoopIndex"; -_myindex = __ref._loopindex /*int*/ ; -RDebugUtils.currentLine=57999376; - //BA.debugLineNum = 57999376;BA.debugLine="Dim start As Long = DateTime.Now"; + //BA.debugLineNum = 113;BA.debugLine="Dim MyIndex As Int = LoopIndex"; +_myindex = parent._loopindex; + //BA.debugLineNum = 114;BA.debugLine="Dim start As Long = DateTime.Now"; _start = parent.__c.DateTime.getNow(); -RDebugUtils.currentLine=57999377; - //BA.debugLineNum = 57999377;BA.debugLine="Dim duration As Int = 200"; + //BA.debugLineNum = 115;BA.debugLine="Dim duration As Int = 200"; _duration = (int) (200); -RDebugUtils.currentLine=57999378; - //BA.debugLineNum = 57999378;BA.debugLine="Do While DateTime.Now < start + duration"; + //BA.debugLineNum = 116;BA.debugLine="Do While DateTime.Now < start + duration"; if (true) break; case 26: @@ -324,17 +464,15 @@ if (true) break; case 28: //C this.state = 29; -RDebugUtils.currentLine=57999379; - //BA.debugLineNum = 57999379;BA.debugLine="Dim state1 As Float = (DateTime.Now - start) /"; + //BA.debugLineNum = 117;BA.debugLine="Dim state1 As Float = (DateTime.Now - start) /"; _state1 = (float) ((parent.__c.DateTime.getNow()-_start)/(double)_duration); -RDebugUtils.currentLine=57999380; - //BA.debugLineNum = 57999380;BA.debugLine="If mValue = False Then state1 = 1 - state1"; + //BA.debugLineNum = 118;BA.debugLine="If mValue = False Then state1 = 1 - state1"; if (true) break; case 29: //if this.state = 34; -if (__ref._mvalue /*boolean*/ ==parent.__c.False) { +if (parent._mvalue==parent.__c.False) { this.state = 31; ;}if (true) break; @@ -348,26 +486,23 @@ case 34: //C this.state = 35; ; -RDebugUtils.currentLine=57999381; - //BA.debugLineNum = 57999381;BA.debugLine="Draw(state1)"; -__ref._draw /*String*/ (null,_state1); -RDebugUtils.currentLine=57999382; - //BA.debugLineNum = 57999382;BA.debugLine="Sleep(16)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "b4xradiobutton", "setvalueimpl"),(int) (16)); + //BA.debugLineNum = 119;BA.debugLine="Draw(state1)"; +parent._draw(_state1); + //BA.debugLineNum = 120;BA.debugLine="Sleep(16)"; +parent.__c.Sleep(ba,this,(int) (16)); this.state = 61; return; case 61: //C this.state = 35; ; -RDebugUtils.currentLine=57999383; - //BA.debugLineNum = 57999383;BA.debugLine="If MyIndex <> LoopIndex Then Exit"; + //BA.debugLineNum = 121;BA.debugLine="If MyIndex <> LoopIndex Then Exit"; if (true) break; case 35: //if this.state = 40; -if (_myindex!=__ref._loopindex /*int*/ ) { +if (_myindex!=parent._loopindex) { this.state = 37; ;}if (true) break; @@ -384,27 +519,25 @@ this.state = 26; ; if (true) break; ; -RDebugUtils.currentLine=57999385; - //BA.debugLineNum = 57999385;BA.debugLine="If MyIndex = LoopIndex Then"; + //BA.debugLineNum = 123;BA.debugLine="If MyIndex = LoopIndex Then"; case 41: //if this.state = 52; -if (_myindex==__ref._loopindex /*int*/ ) { +if (_myindex==parent._loopindex) { this.state = 43; }if (true) break; case 43: //C this.state = 44; -RDebugUtils.currentLine=57999386; - //BA.debugLineNum = 57999386;BA.debugLine="If mValue Then Draw(1) Else Draw(0)"; + //BA.debugLineNum = 124;BA.debugLine="If mValue Then Draw(1) Else Draw(0)"; if (true) break; case 44: //if this.state = 51; -if (__ref._mvalue /*boolean*/ ) { +if (parent._mvalue) { this.state = 46; ;} else { @@ -414,13 +547,13 @@ this.state = 48; case 46: //C this.state = 51; -__ref._draw /*String*/ (null,(float) (1)); +parent._draw((float) (1)); if (true) break; case 48: //C this.state = 51; -__ref._draw /*String*/ (null,(float) (0)); +parent._draw((float) (0)); if (true) break; case 51: @@ -435,13 +568,12 @@ this.state = 53; ; if (true) break; ; -RDebugUtils.currentLine=57999389; - //BA.debugLineNum = 57999389;BA.debugLine="If mEnabled Then"; + //BA.debugLineNum = 127;BA.debugLine="If mEnabled Then"; case 53: //if this.state = 58; -if (__ref._menabled /*boolean*/ ) { +if (parent._menabled) { this.state = 55; }else { this.state = 57; @@ -450,340 +582,30 @@ this.state = 57; case 55: //C this.state = 58; -RDebugUtils.currentLine=57999390; - //BA.debugLineNum = 57999390;BA.debugLine="XUIViewsUtils.SetAlpha(mBase, 1)"; -parent._xuiviewsutils._setalpha /*String*/ (ba,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ,(float) (1)); + //BA.debugLineNum = 128;BA.debugLine="XUIViewsUtils.SetAlpha(mBase, 1)"; +parent._xuiviewsutils._setalpha /*String*/ (ba,parent._mbase,(float) (1)); if (true) break; case 57: //C this.state = 58; -RDebugUtils.currentLine=57999392; - //BA.debugLineNum = 57999392;BA.debugLine="XUIViewsUtils.SetAlpha(mBase, 0.4)"; -parent._xuiviewsutils._setalpha /*String*/ (ba,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ,(float) (0.4)); + //BA.debugLineNum = 130;BA.debugLine="XUIViewsUtils.SetAlpha(mBase, 0.4)"; +parent._xuiviewsutils._setalpha /*String*/ (ba,parent._mbase,(float) (0.4)); if (true) break; case 58: //C this.state = -1; ; -RDebugUtils.currentLine=57999395; - //BA.debugLineNum = 57999395;BA.debugLine="End Sub"; + //BA.debugLineNum = 133;BA.debugLine="End Sub"; if (true) break; } } } } -public String _class_globals(keymon.lat.medicomed.b4xradiobutton __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xradiobutton"; -RDebugUtils.currentLine=57671680; - //BA.debugLineNum = 57671680;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=57671681; - //BA.debugLineNum = 57671681;BA.debugLine="Private mEventName As String 'ignore"; -_meventname = ""; -RDebugUtils.currentLine=57671682; - //BA.debugLineNum = 57671682;BA.debugLine="Private mCallBack As Object 'ignore"; -_mcallback = new Object(); -RDebugUtils.currentLine=57671683; - //BA.debugLineNum = 57671683;BA.debugLine="Public mBase As B4XView 'ignore"; -_mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=57671684; - //BA.debugLineNum = 57671684;BA.debugLine="Private xui As XUI 'ignore"; -_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=57671685; - //BA.debugLineNum = 57671685;BA.debugLine="Public OnColor, OffColor As Int"; -_oncolor = 0; -_offcolor = 0; -RDebugUtils.currentLine=57671686; - //BA.debugLineNum = 57671686;BA.debugLine="Private bc As BitmapCreator"; -_bc = new b4a.example.bitmapcreator(); -RDebugUtils.currentLine=57671687; - //BA.debugLineNum = 57671687;BA.debugLine="Private iv As B4XView"; -_iv = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=57671688; - //BA.debugLineNum = 57671688;BA.debugLine="Private mValue As Boolean"; -_mvalue = false; -RDebugUtils.currentLine=57671689; - //BA.debugLineNum = 57671689;BA.debugLine="Private transparent As BCBrush"; -_transparent = new b4a.example.bcpath._bcbrush(); -RDebugUtils.currentLine=57671690; - //BA.debugLineNum = 57671690;BA.debugLine="Private LoopIndex As Int"; -_loopindex = 0; -RDebugUtils.currentLine=57671691; - //BA.debugLineNum = 57671691;BA.debugLine="Public Tag As Object"; -_tag = new Object(); -RDebugUtils.currentLine=57671692; - //BA.debugLineNum = 57671692;BA.debugLine="Private OnBrush, OffBrush As BCBrush"; -_onbrush = new b4a.example.bcpath._bcbrush(); -_offbrush = new b4a.example.bcpath._bcbrush(); -RDebugUtils.currentLine=57671693; - //BA.debugLineNum = 57671693;BA.debugLine="Private mEnabled As Boolean = True"; -_menabled = __c.True; -RDebugUtils.currentLine=57671694; - //BA.debugLineNum = 57671694;BA.debugLine="Public mHaptic As Boolean"; -_mhaptic = false; -RDebugUtils.currentLine=57671695; - //BA.debugLineNum = 57671695;BA.debugLine="Private Size As Int"; -_size = 0; -RDebugUtils.currentLine=57671696; - //BA.debugLineNum = 57671696;BA.debugLine="Public mLabel As B4XView"; -_mlabel = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=57671697; - //BA.debugLineNum = 57671697;BA.debugLine="Private pnl As B4XView"; -_pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=57671698; - //BA.debugLineNum = 57671698;BA.debugLine="Private Scale As Float 'ignore"; -_scale = 0f; -RDebugUtils.currentLine=57671699; - //BA.debugLineNum = 57671699;BA.debugLine="End Sub"; -return ""; +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; } -public String _designercreateview(keymon.lat.medicomed.b4xradiobutton __ref,Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xradiobutton"; -if (Debug.shouldDelegate(ba, "designercreateview", true)) - {return ((String) Debug.delegate(ba, "designercreateview", new Object[] {_base,_lbl,_props}));} -anywheresoftware.b4a.objects.ImageViewWrapper _iiv = null; -RDebugUtils.currentLine=57802752; - //BA.debugLineNum = 57802752;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; -RDebugUtils.currentLine=57802753; - //BA.debugLineNum = 57802753;BA.debugLine="mBase = Base"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); -RDebugUtils.currentLine=57802754; - //BA.debugLineNum = 57802754;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._tag /*Object*/ = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getTag(); -RDebugUtils.currentLine=57802754; - //BA.debugLineNum = 57802754;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag(this); -RDebugUtils.currentLine=57802755; - //BA.debugLineNum = 57802755;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0,"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetColorAndBorder(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent,(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=57802756; - //BA.debugLineNum = 57802756;BA.debugLine="pnl = xui.CreatePanel(\"pnl\")"; -__ref._pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,"pnl"); -RDebugUtils.currentLine=57802757; - //BA.debugLineNum = 57802757;BA.debugLine="pnl.Color = xui.Color_Transparent"; -__ref._pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setColor(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent); -RDebugUtils.currentLine=57802758; - //BA.debugLineNum = 57802758;BA.debugLine="Dim iiv As ImageView"; -_iiv = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=57802759; - //BA.debugLineNum = 57802759;BA.debugLine="iiv.Initialize(\"\")"; -_iiv.Initialize(ba,""); -RDebugUtils.currentLine=57802760; - //BA.debugLineNum = 57802760;BA.debugLine="iv = iiv"; -__ref._iv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_iiv.getObject())); -RDebugUtils.currentLine=57802761; - //BA.debugLineNum = 57802761;BA.debugLine="mBase.AddView(iv, 0, 0, 0, 0)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._iv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=57802762; - //BA.debugLineNum = 57802762;BA.debugLine="mLabel = Lbl"; -__ref._mlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lbl.getObject())); -RDebugUtils.currentLine=57802763; - //BA.debugLineNum = 57802763;BA.debugLine="mLabel.SetTextAlignment(\"CENTER\", \"LEFT\")"; -__ref._mlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetTextAlignment("CENTER","LEFT"); -RDebugUtils.currentLine=57802764; - //BA.debugLineNum = 57802764;BA.debugLine="mBase.AddView(mLabel, 0, 0, 0, 0)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._mlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=57802765; - //BA.debugLineNum = 57802765;BA.debugLine="mBase.AddView(pnl, 0, 0, 0, 0)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=57802767; - //BA.debugLineNum = 57802767;BA.debugLine="OnColor = xui.PaintOrColorToColor(Props.Get(\"OnCo"; -__ref._oncolor /*int*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor(_props.Get((Object)("OnColor"))); -RDebugUtils.currentLine=57802768; - //BA.debugLineNum = 57802768;BA.debugLine="OffColor = xui.PaintOrColorToColor(Props.Get(\"Off"; -__ref._offcolor /*int*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor(_props.Get((Object)("OffColor"))); -RDebugUtils.currentLine=57802769; - //BA.debugLineNum = 57802769;BA.debugLine="mHaptic = Props.GetDefault(\"HapticFeedback\", Fals"; -__ref._mhaptic /*boolean*/ = BA.ObjectToBoolean(_props.GetDefault((Object)("HapticFeedback"),(Object)(__c.False))); -RDebugUtils.currentLine=57802771; - //BA.debugLineNum = 57802771;BA.debugLine="mEnabled = mBase.Enabled"; -__ref._menabled /*boolean*/ = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getEnabled(); -RDebugUtils.currentLine=57802772; - //BA.debugLineNum = 57802772;BA.debugLine="mBase.Enabled = True"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setEnabled(__c.True); -RDebugUtils.currentLine=57802773; - //BA.debugLineNum = 57802773;BA.debugLine="mValue = Props.Get(\"Value\")"; -__ref._mvalue /*boolean*/ = BA.ObjectToBoolean(_props.Get((Object)("Value"))); -RDebugUtils.currentLine=57802774; - //BA.debugLineNum = 57802774;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; -__ref._base_resize /*String*/ (null,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=57802775; - //BA.debugLineNum = 57802775;BA.debugLine="End Sub"; -return ""; } -public String _draw(keymon.lat.medicomed.b4xradiobutton __ref,float _state) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xradiobutton"; -if (Debug.shouldDelegate(ba, "draw", true)) - {return ((String) Debug.delegate(ba, "draw", new Object[] {_state}));} -float _r = 0f; -RDebugUtils.currentLine=58327040; - //BA.debugLineNum = 58327040;BA.debugLine="Private Sub Draw (State As Float)"; -RDebugUtils.currentLine=58327041; - //BA.debugLineNum = 58327041;BA.debugLine="bc.DrawRect2(bc.TargetRect, transparent, True, 0)"; -__ref._bc /*b4a.example.bitmapcreator*/ ._drawrect2(__ref._bc /*b4a.example.bitmapcreator*/ ._targetrect,__ref._transparent /*b4a.example.bcpath._bcbrush*/ ,__c.True,(int) (0)); -RDebugUtils.currentLine=58327042; - //BA.debugLineNum = 58327042;BA.debugLine="Dim r As Float = Floor(bc.mHeight / 2)"; -_r = (float) (__c.Floor(__ref._bc /*b4a.example.bitmapcreator*/ ._mheight/(double)2)); -RDebugUtils.currentLine=58327043; - //BA.debugLineNum = 58327043;BA.debugLine="If State < 1 Then bc.DrawCircle2(r, r, r, OffBrus"; -if (_state<1) { -__ref._bc /*b4a.example.bitmapcreator*/ ._drawcircle2(_r,_r,_r,__ref._offbrush /*b4a.example.bcpath._bcbrush*/ ,__c.True,(int) (0));}; -RDebugUtils.currentLine=58327044; - //BA.debugLineNum = 58327044;BA.debugLine="If State > 0 Then bc.DrawCircle2(r, r, r * State,"; -if (_state>0) { -__ref._bc /*b4a.example.bitmapcreator*/ ._drawcircle2(_r,_r,(float) (_r*_state),__ref._onbrush /*b4a.example.bcpath._bcbrush*/ ,__c.True,(int) (0));}; -RDebugUtils.currentLine=58327045; - //BA.debugLineNum = 58327045;BA.debugLine="bc.SetBitmapToImageView(bc.Bitmap, iv)"; -__ref._bc /*b4a.example.bitmapcreator*/ ._setbitmaptoimageview(__ref._bc /*b4a.example.bitmapcreator*/ ._getbitmap(),__ref._iv /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ); -RDebugUtils.currentLine=58327046; - //BA.debugLineNum = 58327046;BA.debugLine="End Sub"; -return ""; -} -public boolean _getchecked(keymon.lat.medicomed.b4xradiobutton __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xradiobutton"; -if (Debug.shouldDelegate(ba, "getchecked", true)) - {return ((Boolean) Debug.delegate(ba, "getchecked", null));} -RDebugUtils.currentLine=58130432; - //BA.debugLineNum = 58130432;BA.debugLine="Public Sub getChecked As Boolean"; -RDebugUtils.currentLine=58130433; - //BA.debugLineNum = 58130433;BA.debugLine="Return mValue"; -if (true) return __ref._mvalue /*boolean*/ ; -RDebugUtils.currentLine=58130434; - //BA.debugLineNum = 58130434;BA.debugLine="End Sub"; -return false; -} -public boolean _getenabled(keymon.lat.medicomed.b4xradiobutton __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xradiobutton"; -if (Debug.shouldDelegate(ba, "getenabled", true)) - {return ((Boolean) Debug.delegate(ba, "getenabled", null));} -RDebugUtils.currentLine=58261504; - //BA.debugLineNum = 58261504;BA.debugLine="Public Sub getEnabled As Boolean"; -RDebugUtils.currentLine=58261505; - //BA.debugLineNum = 58261505;BA.debugLine="Return mEnabled"; -if (true) return __ref._menabled /*boolean*/ ; -RDebugUtils.currentLine=58261506; - //BA.debugLineNum = 58261506;BA.debugLine="End Sub"; -return false; -} -public Object _gettext(keymon.lat.medicomed.b4xradiobutton __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xradiobutton"; -if (Debug.shouldDelegate(ba, "gettext", true)) - {return ((Object) Debug.delegate(ba, "gettext", null));} -RDebugUtils.currentLine=58458112; - //BA.debugLineNum = 58458112;BA.debugLine="Public Sub getText As Object"; -RDebugUtils.currentLine=58458113; - //BA.debugLineNum = 58458113;BA.debugLine="Return mLabel.Text"; -if (true) return (Object)(__ref._mlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getText()); -RDebugUtils.currentLine=58458114; - //BA.debugLineNum = 58458114;BA.debugLine="End Sub"; -return null; -} -public String _initialize(keymon.lat.medicomed.b4xradiobutton __ref,anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="b4xradiobutton"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_callback,_eventname}));} -RDebugUtils.currentLine=57737216; - //BA.debugLineNum = 57737216;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -RDebugUtils.currentLine=57737217; - //BA.debugLineNum = 57737217;BA.debugLine="mEventName = EventName"; -__ref._meventname /*String*/ = _eventname; -RDebugUtils.currentLine=57737218; - //BA.debugLineNum = 57737218;BA.debugLine="mCallBack = Callback"; -__ref._mcallback /*Object*/ = _callback; -RDebugUtils.currentLine=57737219; - //BA.debugLineNum = 57737219;BA.debugLine="End Sub"; -return ""; -} -public String _pnl_click(keymon.lat.medicomed.b4xradiobutton __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xradiobutton"; -if (Debug.shouldDelegate(ba, "pnl_click", true)) - {return ((String) Debug.delegate(ba, "pnl_click", null));} -RDebugUtils.currentLine=57933824; - //BA.debugLineNum = 57933824;BA.debugLine="Private Sub pnl_Click"; -RDebugUtils.currentLine=57933826; - //BA.debugLineNum = 57933826;BA.debugLine="If mValue Then Return"; -if (__ref._mvalue /*boolean*/ ) { -if (true) return "";}; -RDebugUtils.currentLine=57933827; - //BA.debugLineNum = 57933827;BA.debugLine="If mEnabled Then"; -if (__ref._menabled /*boolean*/ ) { -RDebugUtils.currentLine=57933828; - //BA.debugLineNum = 57933828;BA.debugLine="If mHaptic Then XUIViewsUtils.PerformHapticFeedb"; -if (__ref._mhaptic /*boolean*/ ) { -_xuiviewsutils._performhapticfeedback /*String*/ (ba,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ );}; -RDebugUtils.currentLine=57933829; - //BA.debugLineNum = 57933829;BA.debugLine="SetValueImpl(Not(mValue), False)"; -__ref._setvalueimpl /*void*/ (null,__c.Not(__ref._mvalue /*boolean*/ ),__c.False); -RDebugUtils.currentLine=57933830; - //BA.debugLineNum = 57933830;BA.debugLine="If mValue And xui.SubExists(mCallBack, mEventNam"; -if (__ref._mvalue /*boolean*/ && __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .SubExists(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_Checked",(int) (0))) { -RDebugUtils.currentLine=57933831; - //BA.debugLineNum = 57933831;BA.debugLine="CallSubDelayed(mCallBack, mEventName & \"_Checke"; -__c.CallSubDelayed(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_Checked"); - }; - }; -RDebugUtils.currentLine=57933834; - //BA.debugLineNum = 57933834;BA.debugLine="End Sub"; -return ""; -} -public String _setchecked(keymon.lat.medicomed.b4xradiobutton __ref,boolean _b) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xradiobutton"; -if (Debug.shouldDelegate(ba, "setchecked", true)) - {return ((String) Debug.delegate(ba, "setchecked", new Object[] {_b}));} -RDebugUtils.currentLine=58064896; - //BA.debugLineNum = 58064896;BA.debugLine="Public Sub setChecked(b As Boolean)"; -RDebugUtils.currentLine=58064897; - //BA.debugLineNum = 58064897;BA.debugLine="If b = mValue Then Return"; -if (_b==__ref._mvalue /*boolean*/ ) { -if (true) return "";}; -RDebugUtils.currentLine=58064898; - //BA.debugLineNum = 58064898;BA.debugLine="SetValueImpl(b, False)"; -__ref._setvalueimpl /*void*/ (null,_b,__c.False); -RDebugUtils.currentLine=58064899; - //BA.debugLineNum = 58064899;BA.debugLine="End Sub"; -return ""; -} -public String _setenabled(keymon.lat.medicomed.b4xradiobutton __ref,boolean _b) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xradiobutton"; -if (Debug.shouldDelegate(ba, "setenabled", true)) - {return ((String) Debug.delegate(ba, "setenabled", new Object[] {_b}));} -RDebugUtils.currentLine=58195968; - //BA.debugLineNum = 58195968;BA.debugLine="Public Sub setEnabled (b As Boolean)"; -RDebugUtils.currentLine=58195969; - //BA.debugLineNum = 58195969;BA.debugLine="mEnabled = b"; -__ref._menabled /*boolean*/ = _b; -RDebugUtils.currentLine=58195970; - //BA.debugLineNum = 58195970;BA.debugLine="SetValueImpl(mValue, True)"; -__ref._setvalueimpl /*void*/ (null,__ref._mvalue /*boolean*/ ,__c.True); -RDebugUtils.currentLine=58195971; - //BA.debugLineNum = 58195971;BA.debugLine="End Sub"; -return ""; -} -public String _settext(keymon.lat.medicomed.b4xradiobutton __ref,Object _t) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xradiobutton"; -if (Debug.shouldDelegate(ba, "settext", true)) - {return ((String) Debug.delegate(ba, "settext", new Object[] {_t}));} -RDebugUtils.currentLine=58392576; - //BA.debugLineNum = 58392576;BA.debugLine="Public Sub setText (t As Object)"; -RDebugUtils.currentLine=58392577; - //BA.debugLineNum = 58392577;BA.debugLine="XUIViewsUtils.SetTextOrCSBuilderToLabel(mLabel, t"; -_xuiviewsutils._settextorcsbuildertolabel /*String*/ (ba,__ref._mlabel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ,_t); -RDebugUtils.currentLine=58392578; - //BA.debugLineNum = 58392578;BA.debugLine="End Sub"; -return ""; -} -} \ No newline at end of file diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xsearchtemplate.java b/B4A/Objects/src/keymon/lat/medicomed/b4xsearchtemplate.java index 2c79658..c683862 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xsearchtemplate.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xsearchtemplate.java @@ -10,7 +10,7 @@ public class b4xsearchtemplate extends B4AClass.ImplB4AClass implements BA.SubDe private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xsearchtemplate"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xsearchtemplate"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xsearchtemplate extends B4AClass.ImplB4AClass implements BA.SubDe 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.keywords.Common __c = null; public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null; public b4a.example3.customlistview _customlistview1 = null; @@ -61,529 +54,238 @@ 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 anywheresoftware.b4a.objects.B4XViewWrapper _getpanel(keymon.lat.medicomed.b4xsearchtemplate __ref,keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xsearchtemplate"; -if (Debug.shouldDelegate(ba, "getpanel", true)) - {return ((anywheresoftware.b4a.objects.B4XViewWrapper) Debug.delegate(ba, "getpanel", new Object[] {_dialog}));} -RDebugUtils.currentLine=58720256; - //BA.debugLineNum = 58720256;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; -RDebugUtils.currentLine=58720257; - //BA.debugLineNum = 58720257;BA.debugLine="Return mBase"; -if (true) return __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ; -RDebugUtils.currentLine=58720258; - //BA.debugLineNum = 58720258;BA.debugLine="End Sub"; -return null; -} -public void _show(keymon.lat.medicomed.b4xsearchtemplate __ref,keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ -RDebugUtils.currentModule="b4xsearchtemplate"; -if (Debug.shouldDelegate(ba, "show", true)) - {Debug.delegate(ba, "show", new Object[] {_dialog}); return;} -ResumableSub_Show rsub = new ResumableSub_Show(this,__ref,_dialog); -rsub.resume(ba, null); -} -public static class ResumableSub_Show extends BA.ResumableSub { -public ResumableSub_Show(keymon.lat.medicomed.b4xsearchtemplate parent,keymon.lat.medicomed.b4xsearchtemplate __ref,keymon.lat.medicomed.b4xdialog _dialog) { -this.parent = parent; -this.__ref = __ref; -this._dialog = _dialog; -this.__ref = parent; -} -keymon.lat.medicomed.b4xsearchtemplate __ref; -keymon.lat.medicomed.b4xsearchtemplate parent; -keymon.lat.medicomed.b4xdialog _dialog; - -@Override -public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="b4xsearchtemplate"; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = -1; -RDebugUtils.currentLine=58785793; - //BA.debugLineNum = 58785793;BA.debugLine="xDialog = Dialog"; -__ref._xdialog /*keymon.lat.medicomed.b4xdialog*/ = _dialog; -RDebugUtils.currentLine=58785794; - //BA.debugLineNum = 58785794;BA.debugLine="xDialog.PutAtTop = xui.IsB4A Or xui.IsB4i"; -__ref._xdialog /*keymon.lat.medicomed.b4xdialog*/ ._putattop /*boolean*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4A() || __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4i(); -RDebugUtils.currentLine=58785795; - //BA.debugLineNum = 58785795;BA.debugLine="CustomListView1.AsView.Color = xui.Color_Transpar"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._asview().setColor(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent); -RDebugUtils.currentLine=58785796; - //BA.debugLineNum = 58785796;BA.debugLine="CustomListView1.sv.Color = xui.Color_Transparent"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._sv.setColor(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent); -RDebugUtils.currentLine=58785797; - //BA.debugLineNum = 58785797;BA.debugLine="mBase.Color = xui.Color_Transparent"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setColor(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent); -RDebugUtils.currentLine=58785798; - //BA.debugLineNum = 58785798;BA.debugLine="Sleep(20)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "b4xsearchtemplate", "show"),(int) (20)); -this.state = 1; -return; -case 1: -//C -this.state = -1; -; -RDebugUtils.currentLine=58785799; - //BA.debugLineNum = 58785799;BA.debugLine="Update(\"\", True)"; -__ref._update /*String*/ (null,"",parent.__c.True); -RDebugUtils.currentLine=58785800; - //BA.debugLineNum = 58785800;BA.debugLine="CustomListView1.JumpToItem(0)"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._jumptoitem((int) (0)); -RDebugUtils.currentLine=58785801; - //BA.debugLineNum = 58785801;BA.debugLine="SearchField.Text = \"\""; -__ref._searchfield /*keymon.lat.medicomed.b4xfloattextfield*/ ._settext /*String*/ (null,""); -RDebugUtils.currentLine=58785802; - //BA.debugLineNum = 58785802;BA.debugLine="SearchField.TextField.RequestFocus"; -__ref._searchfield /*keymon.lat.medicomed.b4xfloattextfield*/ ._gettextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ (null).RequestFocus(); -RDebugUtils.currentLine=58785804; - //BA.debugLineNum = 58785804;BA.debugLine="IME.ShowKeyboard(SearchField.TextField)"; -__ref._ime /*anywheresoftware.b4a.objects.IME*/ .ShowKeyboard((android.view.View)(__ref._searchfield /*keymon.lat.medicomed.b4xfloattextfield*/ ._gettextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ (null).getObject())); -RDebugUtils.currentLine=58785806; - //BA.debugLineNum = 58785806;BA.debugLine="End Sub"; -if (true) break; - - } - } - } -} -public String _dialogclosed(keymon.lat.medicomed.b4xsearchtemplate __ref,int _result) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xsearchtemplate"; -if (Debug.shouldDelegate(ba, "dialogclosed", true)) - {return ((String) Debug.delegate(ba, "dialogclosed", new Object[] {_result}));} -RDebugUtils.currentLine=59310080; - //BA.debugLineNum = 59310080;BA.debugLine="Private Sub DialogClosed(Result As Int) 'ignore"; -RDebugUtils.currentLine=59310082; - //BA.debugLineNum = 59310082;BA.debugLine="End Sub"; -return ""; -} -public String _additemstolist(keymon.lat.medicomed.b4xsearchtemplate __ref,anywheresoftware.b4a.objects.collections.List _li,String _full) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xsearchtemplate"; -if (Debug.shouldDelegate(ba, "additemstolist", true)) - {return ((String) Debug.delegate(ba, "additemstolist", new Object[] {_li,_full}));} +public String _additemstolist(anywheresoftware.b4a.objects.collections.List _li,String _full) throws Exception{ int _i = 0; String _item = ""; int _x = 0; int _pnlcolor = 0; anywheresoftware.b4a.objects.CSBuilder _cs = null; anywheresoftware.b4a.objects.B4XViewWrapper _p = null; -RDebugUtils.currentLine=59113472; - //BA.debugLineNum = 59113472;BA.debugLine="Private Sub AddItemsToList(li As List, full As Str"; -RDebugUtils.currentLine=59113473; - //BA.debugLineNum = 59113473;BA.debugLine="If li.IsInitialized = False Then Return"; + //BA.debugLineNum = 128;BA.debugLine="Private Sub AddItemsToList(li As List, full As Str"; + //BA.debugLineNum = 129;BA.debugLine="If li.IsInitialized = False Then Return"; if (_li.IsInitialized()==__c.False) { if (true) return "";}; -RDebugUtils.currentLine=59113478; - //BA.debugLineNum = 59113478;BA.debugLine="For i = 0 To li.Size - 1"; + //BA.debugLineNum = 134;BA.debugLine="For i = 0 To li.Size - 1"; { final int step2 = 1; final int limit2 = (int) (_li.getSize()-1); _i = (int) (0) ; for (;_i <= limit2 ;_i = _i + step2 ) { -RDebugUtils.currentLine=59113479; - //BA.debugLineNum = 59113479;BA.debugLine="If CustomListView1.Size >= MaxNumberOfItemsToSho"; -if (__ref._customlistview1 /*b4a.example3.customlistview*/ ._getsize()>=__ref._maxnumberofitemstoshow /*int*/ ) { + //BA.debugLineNum = 135;BA.debugLine="If CustomListView1.Size >= MaxNumberOfItemsToSho"; +if (_customlistview1._getsize()>=_maxnumberofitemstoshow) { if (true) return "";}; -RDebugUtils.currentLine=59113480; - //BA.debugLineNum = 59113480;BA.debugLine="Dim item As String = li.Get(i)"; + //BA.debugLineNum = 136;BA.debugLine="Dim item As String = li.Get(i)"; _item = BA.ObjectToString(_li.Get(_i)); -RDebugUtils.currentLine=59113481; - //BA.debugLineNum = 59113481;BA.debugLine="Dim x As Int = item.ToLowerCase.IndexOf(full)"; + //BA.debugLineNum = 137;BA.debugLine="Dim x As Int = item.ToLowerCase.IndexOf(full)"; _x = _item.toLowerCase().indexOf(_full); -RDebugUtils.currentLine=59113482; - //BA.debugLineNum = 59113482;BA.debugLine="If x = -1 Then"; + //BA.debugLineNum = 138;BA.debugLine="If x = -1 Then"; if (_x==-1) { -RDebugUtils.currentLine=59113483; - //BA.debugLineNum = 59113483;BA.debugLine="Continue"; + //BA.debugLineNum = 139;BA.debugLine="Continue"; if (true) continue; }; -RDebugUtils.currentLine=59113485; - //BA.debugLineNum = 59113485;BA.debugLine="Dim pnlColor As Int"; + //BA.debugLineNum = 141;BA.debugLine="Dim pnlColor As Int"; _pnlcolor = 0; -RDebugUtils.currentLine=59113486; - //BA.debugLineNum = 59113486;BA.debugLine="If CustomListView1.Size = 0 And full.Length > 0"; -if (__ref._customlistview1 /*b4a.example3.customlistview*/ ._getsize()==0 && _full.length()>0 && __ref._allowunlistedtext /*boolean*/ ==__c.False) { -RDebugUtils.currentLine=59113487; - //BA.debugLineNum = 59113487;BA.debugLine="pnlColor = ItemHightlightColor"; -_pnlcolor = __ref._itemhightlightcolor /*int*/ ; + //BA.debugLineNum = 142;BA.debugLine="If CustomListView1.Size = 0 And full.Length > 0"; +if (_customlistview1._getsize()==0 && _full.length()>0 && _allowunlistedtext==__c.False) { + //BA.debugLineNum = 143;BA.debugLine="pnlColor = ItemHightlightColor"; +_pnlcolor = _itemhightlightcolor; }else { -RDebugUtils.currentLine=59113489; - //BA.debugLineNum = 59113489;BA.debugLine="pnlColor = CustomListView1.DefaultTextBackgroun"; -_pnlcolor = __ref._customlistview1 /*b4a.example3.customlistview*/ ._defaulttextbackgroundcolor; + //BA.debugLineNum = 145;BA.debugLine="pnlColor = CustomListView1.DefaultTextBackgroun"; +_pnlcolor = _customlistview1._defaulttextbackgroundcolor; }; -RDebugUtils.currentLine=59113492; - //BA.debugLineNum = 59113492;BA.debugLine="Dim cs As CSBuilder"; + //BA.debugLineNum = 148;BA.debugLine="Dim cs As CSBuilder"; _cs = new anywheresoftware.b4a.objects.CSBuilder(); -RDebugUtils.currentLine=59113493; - //BA.debugLineNum = 59113493;BA.debugLine="cs.Initialize.Append(item.SubString2(0, x)).Colo"; -_cs.Initialize().Append(BA.ObjectToCharSequence(_item.substring((int) (0),_x))).Color(__ref._texthighlightcolor /*int*/ ).Append(BA.ObjectToCharSequence(_item.substring(_x,(int) (_x+_full.length())))).Pop(); -RDebugUtils.currentLine=59113494; - //BA.debugLineNum = 59113494;BA.debugLine="cs.Append(item.SubString(x + full.Length))"; + //BA.debugLineNum = 149;BA.debugLine="cs.Initialize.Append(item.SubString2(0, x)).Colo"; +_cs.Initialize().Append(BA.ObjectToCharSequence(_item.substring((int) (0),_x))).Color(_texthighlightcolor).Append(BA.ObjectToCharSequence(_item.substring(_x,(int) (_x+_full.length())))).Pop(); + //BA.debugLineNum = 150;BA.debugLine="cs.Append(item.SubString(x + full.Length))"; _cs.Append(BA.ObjectToCharSequence(_item.substring((int) (_x+_full.length())))); -RDebugUtils.currentLine=59113495; - //BA.debugLineNum = 59113495;BA.debugLine="If ItemsCache.Size > 0 Then"; -if (__ref._itemscache /*anywheresoftware.b4a.objects.collections.List*/ .getSize()>0) { -RDebugUtils.currentLine=59113496; - //BA.debugLineNum = 59113496;BA.debugLine="Dim p As B4XView = ItemsCache.Get(ItemsCache.Si"; + //BA.debugLineNum = 151;BA.debugLine="If ItemsCache.Size > 0 Then"; +if (_itemscache.getSize()>0) { + //BA.debugLineNum = 152;BA.debugLine="Dim p As B4XView = ItemsCache.Get(ItemsCache.Si"; _p = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_p = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__ref._itemscache /*anywheresoftware.b4a.objects.collections.List*/ .Get((int) (__ref._itemscache /*anywheresoftware.b4a.objects.collections.List*/ .getSize()-1)))); -RDebugUtils.currentLine=59113497; - //BA.debugLineNum = 59113497;BA.debugLine="ItemsCache.RemoveAt(ItemsCache.Size - 1)"; -__ref._itemscache /*anywheresoftware.b4a.objects.collections.List*/ .RemoveAt((int) (__ref._itemscache /*anywheresoftware.b4a.objects.collections.List*/ .getSize()-1)); -RDebugUtils.currentLine=59113499; - //BA.debugLineNum = 59113499;BA.debugLine="p.GetView(0).Text = cs"; +_p = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_itemscache.Get((int) (_itemscache.getSize()-1)))); + //BA.debugLineNum = 153;BA.debugLine="ItemsCache.RemoveAt(ItemsCache.Size - 1)"; +_itemscache.RemoveAt((int) (_itemscache.getSize()-1)); + //BA.debugLineNum = 155;BA.debugLine="p.GetView(0).Text = cs"; _p.GetView((int) (0)).setText(BA.ObjectToCharSequence(_cs.getObject())); -RDebugUtils.currentLine=59113504; - //BA.debugLineNum = 59113504;BA.debugLine="p.Color = pnlColor"; + //BA.debugLineNum = 160;BA.debugLine="p.Color = pnlColor"; _p.setColor(_pnlcolor); -RDebugUtils.currentLine=59113505; - //BA.debugLineNum = 59113505;BA.debugLine="CustomListView1.Add(p, item)"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._add(_p,(Object)(_item)); + //BA.debugLineNum = 161;BA.debugLine="CustomListView1.Add(p, item)"; +_customlistview1._add(_p,(Object)(_item)); }else { -RDebugUtils.currentLine=59113507; - //BA.debugLineNum = 59113507;BA.debugLine="CustomListView1.AddTextItem(cs, item)"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._addtextitem((Object)(_cs.getObject()),(Object)(_item)); + //BA.debugLineNum = 163;BA.debugLine="CustomListView1.AddTextItem(cs, item)"; +_customlistview1._addtextitem((Object)(_cs.getObject()),(Object)(_item)); }; } }; -RDebugUtils.currentLine=59113528; - //BA.debugLineNum = 59113528;BA.debugLine="For i = 0 To li.Size - 1"; + //BA.debugLineNum = 184;BA.debugLine="For i = 0 To li.Size - 1"; { final int step28 = 1; final int limit28 = (int) (_li.getSize()-1); _i = (int) (0) ; for (;_i <= limit28 ;_i = _i + step28 ) { -RDebugUtils.currentLine=59113529; - //BA.debugLineNum = 59113529;BA.debugLine="Dim item As String = li.Get(i)"; + //BA.debugLineNum = 185;BA.debugLine="Dim item As String = li.Get(i)"; _item = BA.ObjectToString(_li.Get(_i)); -RDebugUtils.currentLine=59113530; - //BA.debugLineNum = 59113530;BA.debugLine="Dim x As Int = item.ToLowerCase.IndexOf(full)"; + //BA.debugLineNum = 186;BA.debugLine="Dim x As Int = item.ToLowerCase.IndexOf(full)"; _x = _item.toLowerCase().indexOf(_full); -RDebugUtils.currentLine=59113531; - //BA.debugLineNum = 59113531;BA.debugLine="If x = -1 Then"; + //BA.debugLineNum = 187;BA.debugLine="If x = -1 Then"; if (_x==-1) { -RDebugUtils.currentLine=59113532; - //BA.debugLineNum = 59113532;BA.debugLine="Continue"; + //BA.debugLineNum = 188;BA.debugLine="Continue"; if (true) continue; }; } }; -RDebugUtils.currentLine=59113535; - //BA.debugLineNum = 59113535;BA.debugLine="End Sub"; + //BA.debugLineNum = 191;BA.debugLine="End Sub"; return ""; } -public String _class_globals(keymon.lat.medicomed.b4xsearchtemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xsearchtemplate"; -RDebugUtils.currentLine=58523648; - //BA.debugLineNum = 58523648;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=58523649; - //BA.debugLineNum = 58523649;BA.debugLine="Private xui As XUI"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Private xui As XUI"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=58523650; - //BA.debugLineNum = 58523650;BA.debugLine="Public mBase As B4XView"; + //BA.debugLineNum = 3;BA.debugLine="Public mBase As B4XView"; _mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=58523651; - //BA.debugLineNum = 58523651;BA.debugLine="Public CustomListView1 As CustomListView"; + //BA.debugLineNum = 4;BA.debugLine="Public CustomListView1 As CustomListView"; _customlistview1 = new b4a.example3.customlistview(); -RDebugUtils.currentLine=58523652; - //BA.debugLineNum = 58523652;BA.debugLine="Private xDialog As B4XDialog"; + //BA.debugLineNum = 5;BA.debugLine="Private xDialog As B4XDialog"; _xdialog = new keymon.lat.medicomed.b4xdialog(); -RDebugUtils.currentLine=58523653; - //BA.debugLineNum = 58523653;BA.debugLine="Public SearchField As B4XFloatTextField"; + //BA.debugLineNum = 6;BA.debugLine="Public SearchField As B4XFloatTextField"; _searchfield = new keymon.lat.medicomed.b4xfloattextfield(); -RDebugUtils.currentLine=58523654; - //BA.debugLineNum = 58523654;BA.debugLine="Private prefixList As Map"; + //BA.debugLineNum = 7;BA.debugLine="Private prefixList As Map"; _prefixlist = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=58523655; - //BA.debugLineNum = 58523655;BA.debugLine="Private substringList As Map"; + //BA.debugLineNum = 8;BA.debugLine="Private substringList As Map"; _substringlist = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=58523656; - //BA.debugLineNum = 58523656;BA.debugLine="Public TextHighlightColor As Int = 0xFFFD5C5C"; + //BA.debugLineNum = 9;BA.debugLine="Public TextHighlightColor As Int = 0xFFFD5C5C"; _texthighlightcolor = ((int)0xfffd5c5c); -RDebugUtils.currentLine=58523657; - //BA.debugLineNum = 58523657;BA.debugLine="Public ItemHightlightColor As Int = 0x7E008EFF"; + //BA.debugLineNum = 10;BA.debugLine="Public ItemHightlightColor As Int = 0x7E008EFF"; _itemhightlightcolor = ((int)0x7e008eff); -RDebugUtils.currentLine=58523658; - //BA.debugLineNum = 58523658;BA.debugLine="Private MAX_LIMIT = 4 As Int"; + //BA.debugLineNum = 11;BA.debugLine="Private MAX_LIMIT = 4 As Int"; _max_limit = (int) (4); -RDebugUtils.currentLine=58523659; - //BA.debugLineNum = 58523659;BA.debugLine="Public MaxNumberOfItemsToShow As Int = 100"; + //BA.debugLineNum = 12;BA.debugLine="Public MaxNumberOfItemsToShow As Int = 100"; _maxnumberofitemstoshow = (int) (100); -RDebugUtils.currentLine=58523660; - //BA.debugLineNum = 58523660;BA.debugLine="Private ItemsCache As List"; + //BA.debugLineNum = 13;BA.debugLine="Private ItemsCache As List"; _itemscache = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=58523661; - //BA.debugLineNum = 58523661;BA.debugLine="Private AllItems As List"; + //BA.debugLineNum = 14;BA.debugLine="Private AllItems As List"; _allitems = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=58523662; - //BA.debugLineNum = 58523662;BA.debugLine="Public SelectedItem As String"; + //BA.debugLineNum = 15;BA.debugLine="Public SelectedItem As String"; _selecteditem = ""; -RDebugUtils.currentLine=58523663; - //BA.debugLineNum = 58523663;BA.debugLine="Private LastTerm As String"; + //BA.debugLineNum = 16;BA.debugLine="Private LastTerm As String"; _lastterm = ""; -RDebugUtils.currentLine=58523665; - //BA.debugLineNum = 58523665;BA.debugLine="Private IME As IME"; + //BA.debugLineNum = 18;BA.debugLine="Private IME As IME"; _ime = new anywheresoftware.b4a.objects.IME(); -RDebugUtils.currentLine=58523667; - //BA.debugLineNum = 58523667;BA.debugLine="Public AllowUnlistedText As Boolean"; + //BA.debugLineNum = 20;BA.debugLine="Public AllowUnlistedText As Boolean"; _allowunlistedtext = false; -RDebugUtils.currentLine=58523668; - //BA.debugLineNum = 58523668;BA.debugLine="Public PrefixOnly As Boolean"; + //BA.debugLineNum = 21;BA.debugLine="Public PrefixOnly As Boolean"; _prefixonly = false; -RDebugUtils.currentLine=58523669; - //BA.debugLineNum = 58523669;BA.debugLine="End Sub"; + //BA.debugLineNum = 22;BA.debugLine="End Sub"; return ""; } -public String _customlistview1_itemclick(keymon.lat.medicomed.b4xsearchtemplate __ref,int _index,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xsearchtemplate"; -if (Debug.shouldDelegate(ba, "customlistview1_itemclick", true)) - {return ((String) Debug.delegate(ba, "customlistview1_itemclick", new Object[] {_index,_value}));} -RDebugUtils.currentLine=59047936; - //BA.debugLineNum = 59047936;BA.debugLine="Private Sub CustomListView1_ItemClick (Index As In"; -RDebugUtils.currentLine=59047937; - //BA.debugLineNum = 59047937;BA.debugLine="If Value = \"\" Then Return"; +public String _customlistview1_itemclick(int _index,Object _value) throws Exception{ + //BA.debugLineNum = 122;BA.debugLine="Private Sub CustomListView1_ItemClick (Index As In"; + //BA.debugLineNum = 123;BA.debugLine="If Value = \"\" Then Return"; if ((_value).equals((Object)(""))) { if (true) return "";}; -RDebugUtils.currentLine=59047938; - //BA.debugLineNum = 59047938;BA.debugLine="SelectedItem = Value"; -__ref._selecteditem /*String*/ = BA.ObjectToString(_value); -RDebugUtils.currentLine=59047939; - //BA.debugLineNum = 59047939;BA.debugLine="xDialog.Close(xui.DialogResponse_Positive)"; -__ref._xdialog /*keymon.lat.medicomed.b4xdialog*/ ._close /*boolean*/ (null,__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .DialogResponse_Positive); -RDebugUtils.currentLine=59047940; - //BA.debugLineNum = 59047940;BA.debugLine="End Sub"; + //BA.debugLineNum = 124;BA.debugLine="SelectedItem = Value"; +_selecteditem = BA.ObjectToString(_value); + //BA.debugLineNum = 125;BA.debugLine="xDialog.Close(xui.DialogResponse_Positive)"; +_xdialog._close /*boolean*/ (_xui.DialogResponse_Positive); + //BA.debugLineNum = 126;BA.debugLine="End Sub"; return ""; } -public String _initialize(keymon.lat.medicomed.b4xsearchtemplate __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; +public String _dialogclosed(int _result) throws Exception{ + //BA.debugLineNum = 241;BA.debugLine="Private Sub DialogClosed(Result As Int) 'ignore"; + //BA.debugLineNum = 243;BA.debugLine="End Sub"; +return ""; +} +public anywheresoftware.b4a.objects.B4XViewWrapper _getpanel(keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ + //BA.debugLineNum = 61;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; + //BA.debugLineNum = 62;BA.debugLine="Return mBase"; +if (true) return _mbase; + //BA.debugLineNum = 63;BA.debugLine="End Sub"; +return null; +} +public String _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ innerInitialize(_ba); -RDebugUtils.currentModule="b4xsearchtemplate"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba}));} int _height = 0; anywheresoftware.b4j.object.JavaObject _jo = null; -RDebugUtils.currentLine=58589184; - //BA.debugLineNum = 58589184;BA.debugLine="Public Sub Initialize"; -RDebugUtils.currentLine=58589185; - //BA.debugLineNum = 58589185;BA.debugLine="mBase = xui.CreatePanel(\"mBase\")"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,"mBase"); -RDebugUtils.currentLine=58589187; - //BA.debugLineNum = 58589187;BA.debugLine="Dim height As Int"; + //BA.debugLineNum = 24;BA.debugLine="Public Sub Initialize"; + //BA.debugLineNum = 25;BA.debugLine="mBase = xui.CreatePanel(\"mBase\")"; +_mbase = _xui.CreatePanel(ba,"mBase"); + //BA.debugLineNum = 27;BA.debugLine="Dim height As Int"; _height = 0; -RDebugUtils.currentLine=58589188; - //BA.debugLineNum = 58589188;BA.debugLine="If xui.IsB4A Or xui.IsB4i Then height = 220dip El"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4A() || __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4i()) { + //BA.debugLineNum = 28;BA.debugLine="If xui.IsB4A Or xui.IsB4i Then height = 220dip El"; +if (_xui.getIsB4A() || _xui.getIsB4i()) { _height = __c.DipToCurrent((int) (220));} else { _height = __c.DipToCurrent((int) (300));}; -RDebugUtils.currentLine=58589189; - //BA.debugLineNum = 58589189;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, 300dip, height)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),__c.DipToCurrent((int) (300)),_height); -RDebugUtils.currentLine=58589190; - //BA.debugLineNum = 58589190;BA.debugLine="mBase.LoadLayout(\"SearchTemplate\")"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .LoadLayout("SearchTemplate",ba); -RDebugUtils.currentLine=58589191; - //BA.debugLineNum = 58589191;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0,"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetColorAndBorder(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent,(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=58589192; - //BA.debugLineNum = 58589192;BA.debugLine="CustomListView1.sv.SetColorAndBorder(xui.Color_Tr"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._sv.SetColorAndBorder(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent,(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=58589193; - //BA.debugLineNum = 58589193;BA.debugLine="CustomListView1.DefaultTextBackgroundColor = 0xFF"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._defaulttextbackgroundcolor = ((int)0xff555555); -RDebugUtils.currentLine=58589194; - //BA.debugLineNum = 58589194;BA.debugLine="CustomListView1.DefaultTextColor = xui.Color_Whit"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._defaulttextcolor = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_White; -RDebugUtils.currentLine=58589204; - //BA.debugLineNum = 58589204;BA.debugLine="ItemsCache.Initialize"; -__ref._itemscache /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=58589205; - //BA.debugLineNum = 58589205;BA.debugLine="prefixList.Initialize"; -__ref._prefixlist /*anywheresoftware.b4a.objects.collections.Map*/ .Initialize(); -RDebugUtils.currentLine=58589206; - //BA.debugLineNum = 58589206;BA.debugLine="substringList.Initialize"; -__ref._substringlist /*anywheresoftware.b4a.objects.collections.Map*/ .Initialize(); -RDebugUtils.currentLine=58589208; - //BA.debugLineNum = 58589208;BA.debugLine="IME.Initialize(\"\")"; -__ref._ime /*anywheresoftware.b4a.objects.IME*/ .Initialize(""); -RDebugUtils.currentLine=58589209; - //BA.debugLineNum = 58589209;BA.debugLine="Dim jo As JavaObject = SearchField.TextField"; + //BA.debugLineNum = 29;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, 300dip, height)"; +_mbase.SetLayoutAnimated((int) (0),(int) (0),(int) (0),__c.DipToCurrent((int) (300)),_height); + //BA.debugLineNum = 30;BA.debugLine="mBase.LoadLayout(\"SearchTemplate\")"; +_mbase.LoadLayout("SearchTemplate",ba); + //BA.debugLineNum = 31;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0,"; +_mbase.SetColorAndBorder(_xui.Color_Transparent,(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 32;BA.debugLine="CustomListView1.sv.SetColorAndBorder(xui.Color_Tr"; +_customlistview1._sv.SetColorAndBorder(_xui.Color_Transparent,(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 33;BA.debugLine="CustomListView1.DefaultTextBackgroundColor = 0xFF"; +_customlistview1._defaulttextbackgroundcolor = ((int)0xff555555); + //BA.debugLineNum = 34;BA.debugLine="CustomListView1.DefaultTextColor = xui.Color_Whit"; +_customlistview1._defaulttextcolor = _xui.Color_White; + //BA.debugLineNum = 44;BA.debugLine="ItemsCache.Initialize"; +_itemscache.Initialize(); + //BA.debugLineNum = 45;BA.debugLine="prefixList.Initialize"; +_prefixlist.Initialize(); + //BA.debugLineNum = 46;BA.debugLine="substringList.Initialize"; +_substringlist.Initialize(); + //BA.debugLineNum = 48;BA.debugLine="IME.Initialize(\"\")"; +_ime.Initialize(""); + //BA.debugLineNum = 49;BA.debugLine="Dim jo As JavaObject = SearchField.TextField"; _jo = new anywheresoftware.b4j.object.JavaObject(); -_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(__ref._searchfield /*keymon.lat.medicomed.b4xfloattextfield*/ ._gettextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ (null).getObject())); -RDebugUtils.currentLine=58589210; - //BA.debugLineNum = 58589210;BA.debugLine="jo.RunMethod(\"setImeOptions\", Array(Bit.Or(335544"; +_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_searchfield._gettextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ().getObject())); + //BA.debugLineNum = 50;BA.debugLine="jo.RunMethod(\"setImeOptions\", Array(Bit.Or(335544"; _jo.RunMethod("setImeOptions",new Object[]{(Object)(__c.Bit.Or((int) (33554432),(int) (6)))}); -RDebugUtils.currentLine=58589212; - //BA.debugLineNum = 58589212;BA.debugLine="End Sub"; + //BA.debugLineNum = 52;BA.debugLine="End Sub"; return ""; } -public String _resize(keymon.lat.medicomed.b4xsearchtemplate __ref,int _width,int _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xsearchtemplate"; -if (Debug.shouldDelegate(ba, "resize", true)) - {return ((String) Debug.delegate(ba, "resize", new Object[] {_width,_height}));} +public String _resize(int _width,int _height) throws Exception{ anywheresoftware.b4a.objects.B4XViewWrapper _c = null; -RDebugUtils.currentLine=58654720; - //BA.debugLineNum = 58654720;BA.debugLine="Public Sub Resize(Width As Int, Height As Int)"; -RDebugUtils.currentLine=58654721; - //BA.debugLineNum = 58654721;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, Width, Height)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),_width,_height); -RDebugUtils.currentLine=58654722; - //BA.debugLineNum = 58654722;BA.debugLine="Dim c As B4XView = CustomListView1.AsView"; + //BA.debugLineNum = 54;BA.debugLine="Public Sub Resize(Width As Int, Height As Int)"; + //BA.debugLineNum = 55;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, Width, Height)"; +_mbase.SetLayoutAnimated((int) (0),(int) (0),(int) (0),_width,_height); + //BA.debugLineNum = 56;BA.debugLine="Dim c As B4XView = CustomListView1.AsView"; _c = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_c = __ref._customlistview1 /*b4a.example3.customlistview*/ ._asview(); -RDebugUtils.currentLine=58654723; - //BA.debugLineNum = 58654723;BA.debugLine="c.SetLayoutAnimated(0, 0, c.Top, Width, Height -"; +_c = _customlistview1._asview(); + //BA.debugLineNum = 57;BA.debugLine="c.SetLayoutAnimated(0, 0, c.Top, Width, Height -"; _c.SetLayoutAnimated((int) (0),(int) (0),_c.getTop(),_width,(int) (_height-_c.getTop())); -RDebugUtils.currentLine=58654724; - //BA.debugLineNum = 58654724;BA.debugLine="CustomListView1.Base_Resize(Width, c.Height)"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._base_resize(_width,_c.getHeight()); -RDebugUtils.currentLine=58654725; - //BA.debugLineNum = 58654725;BA.debugLine="End Sub"; + //BA.debugLineNum = 58;BA.debugLine="CustomListView1.Base_Resize(Width, c.Height)"; +_customlistview1._base_resize(_width,_c.getHeight()); + //BA.debugLineNum = 59;BA.debugLine="End Sub"; return ""; } -public String _searchfield_enterpressed(keymon.lat.medicomed.b4xsearchtemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xsearchtemplate"; -if (Debug.shouldDelegate(ba, "searchfield_enterpressed", true)) - {return ((String) Debug.delegate(ba, "searchfield_enterpressed", null));} -RDebugUtils.currentLine=58982400; - //BA.debugLineNum = 58982400;BA.debugLine="Private Sub SearchField_EnterPressed"; -RDebugUtils.currentLine=58982401; - //BA.debugLineNum = 58982401;BA.debugLine="If AllowUnlistedText Then"; -if (__ref._allowunlistedtext /*boolean*/ ) { -RDebugUtils.currentLine=58982402; - //BA.debugLineNum = 58982402;BA.debugLine="SelectedItem = LastTerm"; -__ref._selecteditem /*String*/ = __ref._lastterm /*String*/ ; -RDebugUtils.currentLine=58982403; - //BA.debugLineNum = 58982403;BA.debugLine="xDialog.Close(xui.DialogResponse_Positive)"; -__ref._xdialog /*keymon.lat.medicomed.b4xdialog*/ ._close /*boolean*/ (null,__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .DialogResponse_Positive); - }else -{RDebugUtils.currentLine=58982404; - //BA.debugLineNum = 58982404;BA.debugLine="Else If CustomListView1.Size > 0 And LastTerm.Len"; -if (__ref._customlistview1 /*b4a.example3.customlistview*/ ._getsize()>0 && __ref._lastterm /*String*/ .length()>0) { -RDebugUtils.currentLine=58982405; - //BA.debugLineNum = 58982405;BA.debugLine="CustomListView1_ItemClick(0, CustomListView1.Get"; -__ref._customlistview1_itemclick /*String*/ (null,(int) (0),__ref._customlistview1 /*b4a.example3.customlistview*/ ._getvalue((int) (0))); - }} -; -RDebugUtils.currentLine=58982407; - //BA.debugLineNum = 58982407;BA.debugLine="End Sub"; -return ""; -} -public String _searchfield_textchanged(keymon.lat.medicomed.b4xsearchtemplate __ref,String _old,String _new) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xsearchtemplate"; -if (Debug.shouldDelegate(ba, "searchfield_textchanged", true)) - {return ((String) Debug.delegate(ba, "searchfield_textchanged", new Object[] {_old,_new}));} -RDebugUtils.currentLine=58851328; - //BA.debugLineNum = 58851328;BA.debugLine="Private Sub SearchField_TextChanged (Old As String"; -RDebugUtils.currentLine=58851329; - //BA.debugLineNum = 58851329;BA.debugLine="Update(New, False)"; -__ref._update /*String*/ (null,_new,__c.False); -RDebugUtils.currentLine=58851330; - //BA.debugLineNum = 58851330;BA.debugLine="End Sub"; -return ""; -} -public String _update(keymon.lat.medicomed.b4xsearchtemplate __ref,String _term,boolean _force) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xsearchtemplate"; -if (Debug.shouldDelegate(ba, "update", true)) - {return ((String) Debug.delegate(ba, "update", new Object[] {_term,_force}));} -int _i = 0; -anywheresoftware.b4a.objects.B4XViewWrapper _p = null; -String _str1 = ""; -String _str2 = ""; -RDebugUtils.currentLine=58916864; - //BA.debugLineNum = 58916864;BA.debugLine="Private Sub Update(Term As String, Force As Boolea"; -RDebugUtils.currentLine=58916865; - //BA.debugLineNum = 58916865;BA.debugLine="If Term = LastTerm And Force = False Then Return"; -if ((_term).equals(__ref._lastterm /*String*/ ) && _force==__c.False) { -if (true) return "";}; -RDebugUtils.currentLine=58916866; - //BA.debugLineNum = 58916866;BA.debugLine="LastTerm = Term"; -__ref._lastterm /*String*/ = _term; -RDebugUtils.currentLine=58916867; - //BA.debugLineNum = 58916867;BA.debugLine="If xui.IsB4J = False Then"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4J()==__c.False) { -RDebugUtils.currentLine=58916868; - //BA.debugLineNum = 58916868;BA.debugLine="For i = 0 To CustomListView1.Size - 1"; -{ -final int step4 = 1; -final int limit4 = (int) (__ref._customlistview1 /*b4a.example3.customlistview*/ ._getsize()-1); -_i = (int) (0) ; -for (;_i <= limit4 ;_i = _i + step4 ) { -RDebugUtils.currentLine=58916869; - //BA.debugLineNum = 58916869;BA.debugLine="Dim p As B4XView = CustomListView1.GetPanel(i)"; -_p = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_p = __ref._customlistview1 /*b4a.example3.customlistview*/ ._getpanel(_i); -RDebugUtils.currentLine=58916870; - //BA.debugLineNum = 58916870;BA.debugLine="p.RemoveViewFromParent"; -_p.RemoveViewFromParent(); -RDebugUtils.currentLine=58916871; - //BA.debugLineNum = 58916871;BA.debugLine="ItemsCache.Add(p)"; -__ref._itemscache /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(_p.getObject())); - } -}; +public String _searchfield_enterpressed() throws Exception{ + //BA.debugLineNum = 112;BA.debugLine="Private Sub SearchField_EnterPressed"; + //BA.debugLineNum = 113;BA.debugLine="If AllowUnlistedText Then"; +if (_allowunlistedtext) { + //BA.debugLineNum = 114;BA.debugLine="SelectedItem = LastTerm"; +_selecteditem = _lastterm; + //BA.debugLineNum = 115;BA.debugLine="xDialog.Close(xui.DialogResponse_Positive)"; +_xdialog._close /*boolean*/ (_xui.DialogResponse_Positive); + }else if(_customlistview1._getsize()>0 && _lastterm.length()>0) { + //BA.debugLineNum = 117;BA.debugLine="CustomListView1_ItemClick(0, CustomListView1.Get"; +_customlistview1_itemclick((int) (0),_customlistview1._getvalue((int) (0))); }; -RDebugUtils.currentLine=58916874; - //BA.debugLineNum = 58916874;BA.debugLine="CustomListView1.Clear"; -__ref._customlistview1 /*b4a.example3.customlistview*/ ._clear(); -RDebugUtils.currentLine=58916876; - //BA.debugLineNum = 58916876;BA.debugLine="Dim str1, str2 As String"; -_str1 = ""; -_str2 = ""; -RDebugUtils.currentLine=58916877; - //BA.debugLineNum = 58916877;BA.debugLine="str1 = Term.ToLowerCase"; -_str1 = _term.toLowerCase(); -RDebugUtils.currentLine=58916878; - //BA.debugLineNum = 58916878;BA.debugLine="If Term = \"\" Then"; -if ((_term).equals("")) { -RDebugUtils.currentLine=58916879; - //BA.debugLineNum = 58916879;BA.debugLine="AddItemsToList(AllItems, str1)"; -__ref._additemstolist /*String*/ (null,__ref._allitems /*anywheresoftware.b4a.objects.collections.List*/ ,_str1); - }else { -RDebugUtils.currentLine=58916881; - //BA.debugLineNum = 58916881;BA.debugLine="If str1.Length > MAX_LIMIT Then"; -if (_str1.length()>__ref._max_limit /*int*/ ) { -RDebugUtils.currentLine=58916882; - //BA.debugLineNum = 58916882;BA.debugLine="str2 = str1.SubString2(0, MAX_LIMIT)"; -_str2 = _str1.substring((int) (0),__ref._max_limit /*int*/ ); - }else { -RDebugUtils.currentLine=58916884; - //BA.debugLineNum = 58916884;BA.debugLine="str2 = str1"; -_str2 = _str1; - }; -RDebugUtils.currentLine=58916886; - //BA.debugLineNum = 58916886;BA.debugLine="AddItemsToList(prefixList.Get(str2), str1)"; -__ref._additemstolist /*String*/ (null,(anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(__ref._prefixlist /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)(_str2)))),_str1); -RDebugUtils.currentLine=58916887; - //BA.debugLineNum = 58916887;BA.debugLine="AddItemsToList(substringList.Get(str2), str1)"; -__ref._additemstolist /*String*/ (null,(anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(__ref._substringlist /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)(_str2)))),_str1); - }; -RDebugUtils.currentLine=58916889; - //BA.debugLineNum = 58916889;BA.debugLine="End Sub"; + //BA.debugLineNum = 119;BA.debugLine="End Sub"; return ""; } -public String _setindex(keymon.lat.medicomed.b4xsearchtemplate __ref,Object _index) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xsearchtemplate"; -if (Debug.shouldDelegate(ba, "setindex", true)) - {return ((String) Debug.delegate(ba, "setindex", new Object[] {_index}));} +public String _searchfield_textchanged(String _old,String _new) throws Exception{ + //BA.debugLineNum = 81;BA.debugLine="Private Sub SearchField_TextChanged (Old As String"; + //BA.debugLineNum = 82;BA.debugLine="Update(New, False)"; +_update(_new,__c.False); + //BA.debugLineNum = 83;BA.debugLine="End Sub"; +return ""; +} +public String _setindex(Object _index) throws Exception{ Object[] _obj = null; -RDebugUtils.currentLine=59244544; - //BA.debugLineNum = 59244544;BA.debugLine="Public Sub SetIndex(Index As Object)"; -RDebugUtils.currentLine=59244545; - //BA.debugLineNum = 59244545;BA.debugLine="Dim obj() As Object"; + //BA.debugLineNum = 233;BA.debugLine="Public Sub SetIndex(Index As Object)"; + //BA.debugLineNum = 234;BA.debugLine="Dim obj() As Object"; _obj = new Object[(int) (0)]; { int d0 = _obj.length; @@ -592,28 +294,19 @@ _obj[i0] = new Object(); } } ; -RDebugUtils.currentLine=59244546; - //BA.debugLineNum = 59244546;BA.debugLine="obj = Index"; + //BA.debugLineNum = 235;BA.debugLine="obj = Index"; _obj = (Object[])(_index); -RDebugUtils.currentLine=59244547; - //BA.debugLineNum = 59244547;BA.debugLine="prefixList = obj(0)"; -__ref._prefixlist /*anywheresoftware.b4a.objects.collections.Map*/ = (anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_obj[(int) (0)])); -RDebugUtils.currentLine=59244548; - //BA.debugLineNum = 59244548;BA.debugLine="substringList = obj(1)"; -__ref._substringlist /*anywheresoftware.b4a.objects.collections.Map*/ = (anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_obj[(int) (1)])); -RDebugUtils.currentLine=59244549; - //BA.debugLineNum = 59244549;BA.debugLine="Dim AllItems As List = obj(2)"; + //BA.debugLineNum = 236;BA.debugLine="prefixList = obj(0)"; +_prefixlist = (anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_obj[(int) (0)])); + //BA.debugLineNum = 237;BA.debugLine="substringList = obj(1)"; +_substringlist = (anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_obj[(int) (1)])); + //BA.debugLineNum = 238;BA.debugLine="Dim AllItems As List = obj(2)"; _allitems = new anywheresoftware.b4a.objects.collections.List(); _allitems = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_obj[(int) (2)])); -RDebugUtils.currentLine=59244550; - //BA.debugLineNum = 59244550;BA.debugLine="End Sub"; + //BA.debugLineNum = 239;BA.debugLine="End Sub"; return ""; } -public Object _setitems(keymon.lat.medicomed.b4xsearchtemplate __ref,anywheresoftware.b4a.objects.collections.List _items) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xsearchtemplate"; -if (Debug.shouldDelegate(ba, "setitems", true)) - {return ((Object) Debug.delegate(ba, "setitems", new Object[] {_items}));} +public Object _setitems(anywheresoftware.b4a.objects.collections.List _items) throws Exception{ long _starttime = 0L; anywheresoftware.b4a.objects.collections.Map _noduplicates = null; anywheresoftware.b4a.objects.collections.Map _m = null; @@ -624,95 +317,69 @@ String _itemtolower = ""; int _start = 0; int _count = 0; String _str = ""; -RDebugUtils.currentLine=59179008; - //BA.debugLineNum = 59179008;BA.debugLine="Public Sub SetItems(Items As List) As Object"; -RDebugUtils.currentLine=59179009; - //BA.debugLineNum = 59179009;BA.debugLine="Dim startTime As Long"; + //BA.debugLineNum = 196;BA.debugLine="Public Sub SetItems(Items As List) As Object"; + //BA.debugLineNum = 197;BA.debugLine="Dim startTime As Long"; _starttime = 0L; -RDebugUtils.currentLine=59179010; - //BA.debugLineNum = 59179010;BA.debugLine="startTime = DateTime.Now"; + //BA.debugLineNum = 198;BA.debugLine="startTime = DateTime.Now"; _starttime = __c.DateTime.getNow(); -RDebugUtils.currentLine=59179011; - //BA.debugLineNum = 59179011;BA.debugLine="Dim noDuplicates As Map"; + //BA.debugLineNum = 199;BA.debugLine="Dim noDuplicates As Map"; _noduplicates = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=59179012; - //BA.debugLineNum = 59179012;BA.debugLine="noDuplicates.Initialize"; + //BA.debugLineNum = 200;BA.debugLine="noDuplicates.Initialize"; _noduplicates.Initialize(); -RDebugUtils.currentLine=59179013; - //BA.debugLineNum = 59179013;BA.debugLine="prefixList.Clear"; -__ref._prefixlist /*anywheresoftware.b4a.objects.collections.Map*/ .Clear(); -RDebugUtils.currentLine=59179014; - //BA.debugLineNum = 59179014;BA.debugLine="substringList.Clear"; -__ref._substringlist /*anywheresoftware.b4a.objects.collections.Map*/ .Clear(); -RDebugUtils.currentLine=59179015; - //BA.debugLineNum = 59179015;BA.debugLine="Dim m As Map"; + //BA.debugLineNum = 201;BA.debugLine="prefixList.Clear"; +_prefixlist.Clear(); + //BA.debugLineNum = 202;BA.debugLine="substringList.Clear"; +_substringlist.Clear(); + //BA.debugLineNum = 203;BA.debugLine="Dim m As Map"; _m = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=59179016; - //BA.debugLineNum = 59179016;BA.debugLine="Dim li As List"; + //BA.debugLineNum = 204;BA.debugLine="Dim li As List"; _li = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=59179017; - //BA.debugLineNum = 59179017;BA.debugLine="For i = 0 To Items.Size - 1"; + //BA.debugLineNum = 205;BA.debugLine="For i = 0 To Items.Size - 1"; { final int step9 = 1; final int limit9 = (int) (_items.getSize()-1); _i = (int) (0) ; for (;_i <= limit9 ;_i = _i + step9 ) { -RDebugUtils.currentLine=59179018; - //BA.debugLineNum = 59179018;BA.debugLine="Dim itemNotLower As String = Items.Get(i)"; + //BA.debugLineNum = 206;BA.debugLine="Dim itemNotLower As String = Items.Get(i)"; _itemnotlower = BA.ObjectToString(_items.Get(_i)); -RDebugUtils.currentLine=59179019; - //BA.debugLineNum = 59179019;BA.debugLine="Dim itemToLower As String = itemNotLower.ToLower"; + //BA.debugLineNum = 207;BA.debugLine="Dim itemToLower As String = itemNotLower.ToLower"; _itemtolower = _itemnotlower.toLowerCase(); -RDebugUtils.currentLine=59179020; - //BA.debugLineNum = 59179020;BA.debugLine="noDuplicates.Clear"; + //BA.debugLineNum = 208;BA.debugLine="noDuplicates.Clear"; _noduplicates.Clear(); -RDebugUtils.currentLine=59179021; - //BA.debugLineNum = 59179021;BA.debugLine="For start = 0 To IIf(PrefixOnly, 0, itemToLower."; + //BA.debugLineNum = 209;BA.debugLine="For start = 0 To IIf(PrefixOnly, 0, itemToLower."; { final int step13 = 1; -final int limit13 = (int)(BA.ObjectToNumber(((__ref._prefixonly /*boolean*/ ) ? ((Object)(0)) : ((Object)(_itemtolower.length()-1))))); +final int limit13 = (int)(BA.ObjectToNumber(((_prefixonly) ? ((Object)(0)) : ((Object)(_itemtolower.length()-1))))); _start = (int) (0) ; for (;_start <= limit13 ;_start = _start + step13 ) { -RDebugUtils.currentLine=59179022; - //BA.debugLineNum = 59179022;BA.debugLine="Dim count As Int = 1"; + //BA.debugLineNum = 210;BA.debugLine="Dim count As Int = 1"; _count = (int) (1); -RDebugUtils.currentLine=59179023; - //BA.debugLineNum = 59179023;BA.debugLine="Do While count <= MAX_LIMIT And start + count <"; -while (_count<=__ref._max_limit /*int*/ && _start+_count<=_itemtolower.length()) { -RDebugUtils.currentLine=59179024; - //BA.debugLineNum = 59179024;BA.debugLine="Dim str As String = itemToLower.SubString2(sta"; + //BA.debugLineNum = 211;BA.debugLine="Do While count <= MAX_LIMIT And start + count <"; +while (_count<=_max_limit && _start+_count<=_itemtolower.length()) { + //BA.debugLineNum = 212;BA.debugLine="Dim str As String = itemToLower.SubString2(sta"; _str = _itemtolower.substring(_start,(int) (_start+_count)); -RDebugUtils.currentLine=59179025; - //BA.debugLineNum = 59179025;BA.debugLine="If noDuplicates.ContainsKey(str) = False Then"; + //BA.debugLineNum = 213;BA.debugLine="If noDuplicates.ContainsKey(str) = False Then"; if (_noduplicates.ContainsKey((Object)(_str))==__c.False) { -RDebugUtils.currentLine=59179026; - //BA.debugLineNum = 59179026;BA.debugLine="noDuplicates.Put(str, \"\")"; + //BA.debugLineNum = 214;BA.debugLine="noDuplicates.Put(str, \"\")"; _noduplicates.Put((Object)(_str),(Object)("")); -RDebugUtils.currentLine=59179027; - //BA.debugLineNum = 59179027;BA.debugLine="If start = 0 Then m = prefixList Else m = sub"; + //BA.debugLineNum = 215;BA.debugLine="If start = 0 Then m = prefixList Else m = sub"; if (_start==0) { -_m = __ref._prefixlist /*anywheresoftware.b4a.objects.collections.Map*/ ;} +_m = _prefixlist;} else { -_m = __ref._substringlist /*anywheresoftware.b4a.objects.collections.Map*/ ;}; -RDebugUtils.currentLine=59179028; - //BA.debugLineNum = 59179028;BA.debugLine="li = m.Get(str)"; +_m = _substringlist;}; + //BA.debugLineNum = 216;BA.debugLine="li = m.Get(str)"; _li = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_m.Get((Object)(_str)))); -RDebugUtils.currentLine=59179029; - //BA.debugLineNum = 59179029;BA.debugLine="If li.IsInitialized = False Then"; + //BA.debugLineNum = 217;BA.debugLine="If li.IsInitialized = False Then"; if (_li.IsInitialized()==__c.False) { -RDebugUtils.currentLine=59179030; - //BA.debugLineNum = 59179030;BA.debugLine="li.Initialize"; + //BA.debugLineNum = 218;BA.debugLine="li.Initialize"; _li.Initialize(); -RDebugUtils.currentLine=59179031; - //BA.debugLineNum = 59179031;BA.debugLine="m.Put(str, li)"; + //BA.debugLineNum = 219;BA.debugLine="m.Put(str, li)"; _m.Put((Object)(_str),(Object)(_li.getObject())); }; -RDebugUtils.currentLine=59179033; - //BA.debugLineNum = 59179033;BA.debugLine="li.Add(itemNotLower)"; + //BA.debugLineNum = 221;BA.debugLine="li.Add(itemNotLower)"; _li.Add((Object)(_itemnotlower)); }; -RDebugUtils.currentLine=59179035; - //BA.debugLineNum = 59179035;BA.debugLine="count = count + 1"; + //BA.debugLineNum = 223;BA.debugLine="count = count + 1"; _count = (int) (_count+1); } ; @@ -720,28 +387,136 @@ _count = (int) (_count+1); }; } }; -RDebugUtils.currentLine=59179039; - //BA.debugLineNum = 59179039;BA.debugLine="Log(\"Index time: \" & (DateTime.Now - startTime) &"; -__c.LogImpl("959179039","Index time: "+BA.NumberToString((__c.DateTime.getNow()-_starttime))+" ms ("+BA.NumberToString(_items.getSize())+" Items)",0); -RDebugUtils.currentLine=59179040; - //BA.debugLineNum = 59179040;BA.debugLine="AllItems = Items"; -__ref._allitems /*anywheresoftware.b4a.objects.collections.List*/ = _items; -RDebugUtils.currentLine=59179041; - //BA.debugLineNum = 59179041;BA.debugLine="Return Array(prefixList, substringList, AllItems)"; -if (true) return (Object)(new Object[]{(Object)(__ref._prefixlist /*anywheresoftware.b4a.objects.collections.Map*/ .getObject()),(Object)(__ref._substringlist /*anywheresoftware.b4a.objects.collections.Map*/ .getObject()),(Object)(__ref._allitems /*anywheresoftware.b4a.objects.collections.List*/ .getObject())}); -RDebugUtils.currentLine=59179042; - //BA.debugLineNum = 59179042;BA.debugLine="End Sub"; + //BA.debugLineNum = 227;BA.debugLine="Log(\"Index time: \" & (DateTime.Now - startTime) &"; +__c.LogImpl("930867487","Index time: "+BA.NumberToString((__c.DateTime.getNow()-_starttime))+" ms ("+BA.NumberToString(_items.getSize())+" Items)",0); + //BA.debugLineNum = 228;BA.debugLine="AllItems = Items"; +_allitems = _items; + //BA.debugLineNum = 229;BA.debugLine="Return Array(prefixList, substringList, AllItems)"; +if (true) return (Object)(new Object[]{(Object)(_prefixlist.getObject()),(Object)(_substringlist.getObject()),(Object)(_allitems.getObject())}); + //BA.debugLineNum = 230;BA.debugLine="End Sub"; return null; } -public void RemoveWarning() throws Exception{ - anywheresoftware.b4a.shell.Shell s = anywheresoftware.b4a.shell.Shell.INSTANCE; - java.lang.reflect.Field f = s.getClass().getDeclaredField("errorMessagesForSyncEvents"); - f.setAccessible(true); - java.util.HashSet h = (java.util.HashSet)f.get(s); - if (h == null) { - h = new java.util.HashSet(); - f.set(s, h); - } - h.add("tf_focuschanged"); +public void _show(keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ +ResumableSub_Show rsub = new ResumableSub_Show(this,_dialog); +rsub.resume(ba, null); +} +public static class ResumableSub_Show extends BA.ResumableSub { +public ResumableSub_Show(keymon.lat.medicomed.b4xsearchtemplate parent,keymon.lat.medicomed.b4xdialog _dialog) { +this.parent = parent; +this._dialog = _dialog; +} +keymon.lat.medicomed.b4xsearchtemplate parent; +keymon.lat.medicomed.b4xdialog _dialog; + +@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 = 66;BA.debugLine="xDialog = Dialog"; +parent._xdialog = _dialog; + //BA.debugLineNum = 67;BA.debugLine="xDialog.PutAtTop = xui.IsB4A Or xui.IsB4i"; +parent._xdialog._putattop /*boolean*/ = parent._xui.getIsB4A() || parent._xui.getIsB4i(); + //BA.debugLineNum = 68;BA.debugLine="CustomListView1.AsView.Color = xui.Color_Transpar"; +parent._customlistview1._asview().setColor(parent._xui.Color_Transparent); + //BA.debugLineNum = 69;BA.debugLine="CustomListView1.sv.Color = xui.Color_Transparent"; +parent._customlistview1._sv.setColor(parent._xui.Color_Transparent); + //BA.debugLineNum = 70;BA.debugLine="mBase.Color = xui.Color_Transparent"; +parent._mbase.setColor(parent._xui.Color_Transparent); + //BA.debugLineNum = 71;BA.debugLine="Sleep(20)"; +parent.__c.Sleep(ba,this,(int) (20)); +this.state = 1; +return; +case 1: +//C +this.state = -1; +; + //BA.debugLineNum = 72;BA.debugLine="Update(\"\", True)"; +parent._update("",parent.__c.True); + //BA.debugLineNum = 73;BA.debugLine="CustomListView1.JumpToItem(0)"; +parent._customlistview1._jumptoitem((int) (0)); + //BA.debugLineNum = 74;BA.debugLine="SearchField.Text = \"\""; +parent._searchfield._settext /*String*/ (""); + //BA.debugLineNum = 75;BA.debugLine="SearchField.TextField.RequestFocus"; +parent._searchfield._gettextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ().RequestFocus(); + //BA.debugLineNum = 77;BA.debugLine="IME.ShowKeyboard(SearchField.TextField)"; +parent._ime.ShowKeyboard((android.view.View)(parent._searchfield._gettextfield /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ().getObject())); + //BA.debugLineNum = 79;BA.debugLine="End Sub"; +if (true) break; + + } + } + } +} +public String _update(String _term,boolean _force) throws Exception{ +int _i = 0; +anywheresoftware.b4a.objects.B4XViewWrapper _p = null; +String _str1 = ""; +String _str2 = ""; + //BA.debugLineNum = 85;BA.debugLine="Private Sub Update(Term As String, Force As Boolea"; + //BA.debugLineNum = 86;BA.debugLine="If Term = LastTerm And Force = False Then Return"; +if ((_term).equals(_lastterm) && _force==__c.False) { +if (true) return "";}; + //BA.debugLineNum = 87;BA.debugLine="LastTerm = Term"; +_lastterm = _term; + //BA.debugLineNum = 88;BA.debugLine="If xui.IsB4J = False Then"; +if (_xui.getIsB4J()==__c.False) { + //BA.debugLineNum = 89;BA.debugLine="For i = 0 To CustomListView1.Size - 1"; +{ +final int step4 = 1; +final int limit4 = (int) (_customlistview1._getsize()-1); +_i = (int) (0) ; +for (;_i <= limit4 ;_i = _i + step4 ) { + //BA.debugLineNum = 90;BA.debugLine="Dim p As B4XView = CustomListView1.GetPanel(i)"; +_p = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_p = _customlistview1._getpanel(_i); + //BA.debugLineNum = 91;BA.debugLine="p.RemoveViewFromParent"; +_p.RemoveViewFromParent(); + //BA.debugLineNum = 92;BA.debugLine="ItemsCache.Add(p)"; +_itemscache.Add((Object)(_p.getObject())); + } +}; + }; + //BA.debugLineNum = 95;BA.debugLine="CustomListView1.Clear"; +_customlistview1._clear(); + //BA.debugLineNum = 97;BA.debugLine="Dim str1, str2 As String"; +_str1 = ""; +_str2 = ""; + //BA.debugLineNum = 98;BA.debugLine="str1 = Term.ToLowerCase"; +_str1 = _term.toLowerCase(); + //BA.debugLineNum = 99;BA.debugLine="If Term = \"\" Then"; +if ((_term).equals("")) { + //BA.debugLineNum = 100;BA.debugLine="AddItemsToList(AllItems, str1)"; +_additemstolist(_allitems,_str1); + }else { + //BA.debugLineNum = 102;BA.debugLine="If str1.Length > MAX_LIMIT Then"; +if (_str1.length()>_max_limit) { + //BA.debugLineNum = 103;BA.debugLine="str2 = str1.SubString2(0, MAX_LIMIT)"; +_str2 = _str1.substring((int) (0),_max_limit); + }else { + //BA.debugLineNum = 105;BA.debugLine="str2 = str1"; +_str2 = _str1; + }; + //BA.debugLineNum = 107;BA.debugLine="AddItemsToList(prefixList.Get(str2), str1)"; +_additemstolist((anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_prefixlist.Get((Object)(_str2)))),_str1); + //BA.debugLineNum = 108;BA.debugLine="AddItemsToList(substringList.Get(str2), str1)"; +_additemstolist((anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_substringlist.Get((Object)(_str2)))),_str1); + }; + //BA.debugLineNum = 110;BA.debugLine="End Sub"; +return ""; +} +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +if (BA.fastSubCompare(sub, "DIALOGCLOSED")) + return _dialogclosed(((Number)args[0]).intValue()); +if (BA.fastSubCompare(sub, "GETPANEL")) + return _getpanel((keymon.lat.medicomed.b4xdialog) args[0]); +return BA.SubDelegator.SubNotFound; +} } -} \ No newline at end of file diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xseekbar.java b/B4A/Objects/src/keymon/lat/medicomed/b4xseekbar.java index d96260f..dc2963f 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xseekbar.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xseekbar.java @@ -10,7 +10,7 @@ public class b4xseekbar extends B4AClass.ImplB4AClass implements BA.SubDelegator private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xseekbar"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xseekbar"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xseekbar extends B4AClass.ImplB4AClass implements BA.SubDelegator 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.keywords.Common __c = null; public String _meventname = ""; public Object _mcallback = null; public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null; @@ -64,380 +57,241 @@ 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 _update(keymon.lat.medicomed.b4xseekbar __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xseekbar"; -if (Debug.shouldDelegate(ba, "update", true)) - {return ((String) Debug.delegate(ba, "update", null));} -int _s1 = 0; -int _y = 0; -int _x = 0; -RDebugUtils.currentLine=59637760; - //BA.debugLineNum = 59637760;BA.debugLine="Public Sub Update"; -RDebugUtils.currentLine=59637762; - //BA.debugLineNum = 59637762;BA.debugLine="cvs.ClearRect(cvs.TargetRect)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .ClearRect(__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect()); -RDebugUtils.currentLine=59637763; - //BA.debugLineNum = 59637763;BA.debugLine="If size > 0 Then"; -if (__ref._size /*int*/ >0) { -RDebugUtils.currentLine=59637764; - //BA.debugLineNum = 59637764;BA.debugLine="If Vertical = False Then"; -if (__ref._vertical /*boolean*/ ==__c.False) { -RDebugUtils.currentLine=59637765; - //BA.debugLineNum = 59637765;BA.debugLine="Dim s1 As Int = Radius2 + (mValue - MinValue) /"; -_s1 = (int) (__ref._radius2 /*int*/ +(__ref._mvalue /*int*/ -__ref._minvalue /*int*/ )/(double)(__ref._maxvalue /*int*/ -__ref._minvalue /*int*/ )*__ref._size /*int*/ ); -RDebugUtils.currentLine=59637766; - //BA.debugLineNum = 59637766;BA.debugLine="Dim y As Int = mBase.Height / 2"; -_y = (int) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()/(double)2); -RDebugUtils.currentLine=59637767; - //BA.debugLineNum = 59637767;BA.debugLine="cvs.DrawLine(Radius2, y, s1, y, Color1, Size1)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawLine((float) (__ref._radius2 /*int*/ ),(float) (_y),(float) (_s1),(float) (_y),__ref._color1 /*int*/ ,(float) (__ref._size1 /*int*/ )); -RDebugUtils.currentLine=59637768; - //BA.debugLineNum = 59637768;BA.debugLine="cvs.DrawLine(s1, y, mBase.Width - Radius2, y, C"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawLine((float) (_s1),(float) (_y),(float) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()-__ref._radius2 /*int*/ ),(float) (_y),__ref._color2 /*int*/ ,(float) (__ref._size2 /*int*/ )); -RDebugUtils.currentLine=59637769; - //BA.debugLineNum = 59637769;BA.debugLine="cvs.DrawCircle(s1, y, Radius1, Color1, True, 0)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawCircle((float) (_s1),(float) (_y),(float) (__ref._radius1 /*int*/ ),__ref._color1 /*int*/ ,__c.True,(float) (0)); -RDebugUtils.currentLine=59637770; - //BA.debugLineNum = 59637770;BA.debugLine="If Pressed Then"; -if (__ref._pressed /*boolean*/ ) { -RDebugUtils.currentLine=59637771; - //BA.debugLineNum = 59637771;BA.debugLine="cvs.DrawCircle(s1, y, Radius2, ThumbColor, Tru"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawCircle((float) (_s1),(float) (_y),(float) (__ref._radius2 /*int*/ ),__ref._thumbcolor /*int*/ ,__c.True,(float) (0)); - }; - }else { -RDebugUtils.currentLine=59637774; - //BA.debugLineNum = 59637774;BA.debugLine="Dim s1 As Int = Radius2 + (MaxValue - mValue) /"; -_s1 = (int) (__ref._radius2 /*int*/ +(__ref._maxvalue /*int*/ -__ref._mvalue /*int*/ )/(double)(__ref._maxvalue /*int*/ -__ref._minvalue /*int*/ )*__ref._size /*int*/ ); -RDebugUtils.currentLine=59637775; - //BA.debugLineNum = 59637775;BA.debugLine="Dim x As Int = mBase.Width / 2"; -_x = (int) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)2); -RDebugUtils.currentLine=59637776; - //BA.debugLineNum = 59637776;BA.debugLine="cvs.DrawLine(x, Radius2, x, s1, Color2, Size2)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawLine((float) (_x),(float) (__ref._radius2 /*int*/ ),(float) (_x),(float) (_s1),__ref._color2 /*int*/ ,(float) (__ref._size2 /*int*/ )); -RDebugUtils.currentLine=59637777; - //BA.debugLineNum = 59637777;BA.debugLine="cvs.DrawLine(x, s1, x, mBase.Height - Radius2,"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawLine((float) (_x),(float) (_s1),(float) (_x),(float) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()-__ref._radius2 /*int*/ ),__ref._color1 /*int*/ ,(float) (__ref._size1 /*int*/ )); -RDebugUtils.currentLine=59637778; - //BA.debugLineNum = 59637778;BA.debugLine="cvs.DrawCircle(x, s1, Radius1, Color1, True, 0)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawCircle((float) (_x),(float) (_s1),(float) (__ref._radius1 /*int*/ ),__ref._color1 /*int*/ ,__c.True,(float) (0)); -RDebugUtils.currentLine=59637779; - //BA.debugLineNum = 59637779;BA.debugLine="If Pressed Then"; -if (__ref._pressed /*boolean*/ ) { -RDebugUtils.currentLine=59637780; - //BA.debugLineNum = 59637780;BA.debugLine="cvs.DrawCircle(x, s1, Radius2, ThumbColor, Tru"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawCircle((float) (_x),(float) (_s1),(float) (__ref._radius2 /*int*/ ),__ref._thumbcolor /*int*/ ,__c.True,(float) (0)); - }; - }; - }; -RDebugUtils.currentLine=59637784; - //BA.debugLineNum = 59637784;BA.debugLine="cvs.Invalidate"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Invalidate(); -RDebugUtils.currentLine=59637785; - //BA.debugLineNum = 59637785;BA.debugLine="End Sub"; +public String _base_resize(double _width,double _height) throws Exception{ + //BA.debugLineNum = 52;BA.debugLine="Public Sub Base_Resize (Width As Double, Height As"; + //BA.debugLineNum = 53;BA.debugLine="cvs.Resize(Width, Height)"; +_cvs.Resize((float) (_width),(float) (_height)); + //BA.debugLineNum = 54;BA.debugLine="TouchPanel.SetLayoutAnimated(0, 0, 0, Width, Heig"; +_touchpanel.SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); + //BA.debugLineNum = 55;BA.debugLine="Vertical = mBase.Height > mBase.Width"; +_vertical = _mbase.getHeight()>_mbase.getWidth(); + //BA.debugLineNum = 56;BA.debugLine="size = Max(mBase.Height, mBase.Width) - 2 * Radiu"; +_size = (int) (__c.Max(_mbase.getHeight(),_mbase.getWidth())-2*_radius2); + //BA.debugLineNum = 57;BA.debugLine="Update"; +_update(); + //BA.debugLineNum = 58;BA.debugLine="End Sub"; return ""; } -public String _setvalue(keymon.lat.medicomed.b4xseekbar __ref,int _v) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xseekbar"; -if (Debug.shouldDelegate(ba, "setvalue", true)) - {return ((String) Debug.delegate(ba, "setvalue", new Object[] {_v}));} -RDebugUtils.currentLine=59899904; - //BA.debugLineNum = 59899904;BA.debugLine="Public Sub setValue(v As Int)"; -RDebugUtils.currentLine=59899905; - //BA.debugLineNum = 59899905;BA.debugLine="mValue = Max(MinValue, Min(MaxValue, v))"; -__ref._mvalue /*int*/ = (int) (__c.Max(__ref._minvalue /*int*/ ,__c.Min(__ref._maxvalue /*int*/ ,_v))); -RDebugUtils.currentLine=59899906; - //BA.debugLineNum = 59899906;BA.debugLine="Update"; -__ref._update /*String*/ (null); -RDebugUtils.currentLine=59899907; - //BA.debugLineNum = 59899907;BA.debugLine="End Sub"; -return ""; -} -public String _base_resize(keymon.lat.medicomed.b4xseekbar __ref,double _width,double _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xseekbar"; -if (Debug.shouldDelegate(ba, "base_resize", true)) - {return ((String) Debug.delegate(ba, "base_resize", new Object[] {_width,_height}));} -RDebugUtils.currentLine=59572224; - //BA.debugLineNum = 59572224;BA.debugLine="Public Sub Base_Resize (Width As Double, Height As"; -RDebugUtils.currentLine=59572225; - //BA.debugLineNum = 59572225;BA.debugLine="cvs.Resize(Width, Height)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Resize((float) (_width),(float) (_height)); -RDebugUtils.currentLine=59572226; - //BA.debugLineNum = 59572226;BA.debugLine="TouchPanel.SetLayoutAnimated(0, 0, 0, Width, Heig"; -__ref._touchpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); -RDebugUtils.currentLine=59572227; - //BA.debugLineNum = 59572227;BA.debugLine="Vertical = mBase.Height > mBase.Width"; -__ref._vertical /*boolean*/ = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()>__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(); -RDebugUtils.currentLine=59572228; - //BA.debugLineNum = 59572228;BA.debugLine="size = Max(mBase.Height, mBase.Width) - 2 * Radiu"; -__ref._size /*int*/ = (int) (__c.Max(__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth())-2*__ref._radius2 /*int*/ ); -RDebugUtils.currentLine=59572229; - //BA.debugLineNum = 59572229;BA.debugLine="Update"; -__ref._update /*String*/ (null); -RDebugUtils.currentLine=59572230; - //BA.debugLineNum = 59572230;BA.debugLine="End Sub"; -return ""; -} -public String _class_globals(keymon.lat.medicomed.b4xseekbar __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xseekbar"; -RDebugUtils.currentLine=59375616; - //BA.debugLineNum = 59375616;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=59375617; - //BA.debugLineNum = 59375617;BA.debugLine="Private mEventName As String 'ignore"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 11;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 12;BA.debugLine="Private mEventName As String 'ignore"; _meventname = ""; -RDebugUtils.currentLine=59375618; - //BA.debugLineNum = 59375618;BA.debugLine="Private mCallBack As Object 'ignore"; + //BA.debugLineNum = 13;BA.debugLine="Private mCallBack As Object 'ignore"; _mcallback = new Object(); -RDebugUtils.currentLine=59375619; - //BA.debugLineNum = 59375619;BA.debugLine="Public mBase As B4XView 'ignore"; + //BA.debugLineNum = 14;BA.debugLine="Public mBase As B4XView 'ignore"; _mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=59375620; - //BA.debugLineNum = 59375620;BA.debugLine="Private xui As XUI 'ignore"; + //BA.debugLineNum = 15;BA.debugLine="Private xui As XUI 'ignore"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=59375621; - //BA.debugLineNum = 59375621;BA.debugLine="Public Color1, Color2, ThumbColor As Int"; + //BA.debugLineNum = 16;BA.debugLine="Public Color1, Color2, ThumbColor As Int"; _color1 = 0; _color2 = 0; _thumbcolor = 0; -RDebugUtils.currentLine=59375622; - //BA.debugLineNum = 59375622;BA.debugLine="Private cvs As B4XCanvas"; + //BA.debugLineNum = 17;BA.debugLine="Private cvs As B4XCanvas"; _cvs = new anywheresoftware.b4a.objects.B4XCanvas(); -RDebugUtils.currentLine=59375623; - //BA.debugLineNum = 59375623;BA.debugLine="Public Tag As Object"; + //BA.debugLineNum = 18;BA.debugLine="Public Tag As Object"; _tag = new Object(); -RDebugUtils.currentLine=59375624; - //BA.debugLineNum = 59375624;BA.debugLine="Private TouchPanel As B4XView"; + //BA.debugLineNum = 19;BA.debugLine="Private TouchPanel As B4XView"; _touchpanel = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=59375625; - //BA.debugLineNum = 59375625;BA.debugLine="Private mValue As Int"; + //BA.debugLineNum = 20;BA.debugLine="Private mValue As Int"; _mvalue = 0; -RDebugUtils.currentLine=59375626; - //BA.debugLineNum = 59375626;BA.debugLine="Public MinValue, MaxValue As Int"; + //BA.debugLineNum = 21;BA.debugLine="Public MinValue, MaxValue As Int"; _minvalue = 0; _maxvalue = 0; -RDebugUtils.currentLine=59375627; - //BA.debugLineNum = 59375627;BA.debugLine="Public Interval As Int = 1"; + //BA.debugLineNum = 22;BA.debugLine="Public Interval As Int = 1"; _interval = (int) (1); -RDebugUtils.currentLine=59375628; - //BA.debugLineNum = 59375628;BA.debugLine="Private Vertical As Boolean"; + //BA.debugLineNum = 23;BA.debugLine="Private Vertical As Boolean"; _vertical = false; -RDebugUtils.currentLine=59375629; - //BA.debugLineNum = 59375629;BA.debugLine="Public Size1 = 4dip, Size2 = 2dip, Radius1 = 6dip"; + //BA.debugLineNum = 24;BA.debugLine="Public Size1 = 4dip, Size2 = 2dip, Radius1 = 6dip"; _size1 = __c.DipToCurrent((int) (4)); _size2 = __c.DipToCurrent((int) (2)); _radius1 = __c.DipToCurrent((int) (6)); _radius2 = __c.DipToCurrent((int) (12)); -RDebugUtils.currentLine=59375630; - //BA.debugLineNum = 59375630;BA.debugLine="Private Pressed As Boolean"; + //BA.debugLineNum = 25;BA.debugLine="Private Pressed As Boolean"; _pressed = false; -RDebugUtils.currentLine=59375631; - //BA.debugLineNum = 59375631;BA.debugLine="Private size As Int"; + //BA.debugLineNum = 26;BA.debugLine="Private size As Int"; _size = 0; -RDebugUtils.currentLine=59375632; - //BA.debugLineNum = 59375632;BA.debugLine="End Sub"; + //BA.debugLineNum = 27;BA.debugLine="End Sub"; return ""; } -public String _designercreateview(keymon.lat.medicomed.b4xseekbar __ref,Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xseekbar"; -if (Debug.shouldDelegate(ba, "designercreateview", true)) - {return ((String) Debug.delegate(ba, "designercreateview", new Object[] {_base,_lbl,_props}));} -RDebugUtils.currentLine=59506688; - //BA.debugLineNum = 59506688;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; -RDebugUtils.currentLine=59506689; - //BA.debugLineNum = 59506689;BA.debugLine="mBase = Base"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); -RDebugUtils.currentLine=59506690; - //BA.debugLineNum = 59506690;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._tag /*Object*/ = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getTag(); -RDebugUtils.currentLine=59506690; - //BA.debugLineNum = 59506690;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag(this); -RDebugUtils.currentLine=59506691; - //BA.debugLineNum = 59506691;BA.debugLine="Color1 = xui.PaintOrColorToColor(Props.Get(\"Color"; -__ref._color1 /*int*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor(_props.Get((Object)("Color1"))); -RDebugUtils.currentLine=59506692; - //BA.debugLineNum = 59506692;BA.debugLine="Color2 = xui.PaintOrColorToColor(Props.Get(\"Color"; -__ref._color2 /*int*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor(_props.Get((Object)("Color2"))); -RDebugUtils.currentLine=59506693; - //BA.debugLineNum = 59506693;BA.debugLine="ThumbColor = xui.PaintOrColorToColor(Props.Get(\"T"; -__ref._thumbcolor /*int*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor(_props.Get((Object)("ThumbColor"))); -RDebugUtils.currentLine=59506694; - //BA.debugLineNum = 59506694;BA.debugLine="Interval = Max(1, Props.GetDefault(\"Interval\", 1)"; -__ref._interval /*int*/ = (int) (__c.Max(1,(double)(BA.ObjectToNumber(_props.GetDefault((Object)("Interval"),(Object)(1)))))); -RDebugUtils.currentLine=59506695; - //BA.debugLineNum = 59506695;BA.debugLine="MinValue = Props.Get(\"Min\")"; -__ref._minvalue /*int*/ = (int)(BA.ObjectToNumber(_props.Get((Object)("Min")))); -RDebugUtils.currentLine=59506696; - //BA.debugLineNum = 59506696;BA.debugLine="MaxValue = Props.Get(\"Max\")"; -__ref._maxvalue /*int*/ = (int)(BA.ObjectToNumber(_props.Get((Object)("Max")))); -RDebugUtils.currentLine=59506697; - //BA.debugLineNum = 59506697;BA.debugLine="mValue = Max(MinValue, Min(MaxValue, Props.Get(\"V"; -__ref._mvalue /*int*/ = (int) (__c.Max(__ref._minvalue /*int*/ ,__c.Min(__ref._maxvalue /*int*/ ,(double)(BA.ObjectToNumber(_props.Get((Object)("Value"))))))); -RDebugUtils.currentLine=59506698; - //BA.debugLineNum = 59506698;BA.debugLine="cvs.Initialize(mBase)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Initialize(__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ); -RDebugUtils.currentLine=59506699; - //BA.debugLineNum = 59506699;BA.debugLine="TouchPanel = xui.CreatePanel(\"TouchPanel\")"; -__ref._touchpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,"TouchPanel"); -RDebugUtils.currentLine=59506700; - //BA.debugLineNum = 59506700;BA.debugLine="mBase.AddView(TouchPanel, 0, 0, mBase.Width, mBas"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._touchpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(int) (0),(int) (0),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=59506701; - //BA.debugLineNum = 59506701;BA.debugLine="If xui.IsB4A Or xui.IsB4i Then Radius2 = 20dip"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4A() || __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4i()) { -__ref._radius2 /*int*/ = __c.DipToCurrent((int) (20));}; -RDebugUtils.currentLine=59506702; - //BA.debugLineNum = 59506702;BA.debugLine="If xui.IsB4A Then Base_Resize(mBase.Width, mBase."; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4A()) { -__ref._base_resize /*String*/ (null,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight());}; -RDebugUtils.currentLine=59506703; - //BA.debugLineNum = 59506703;BA.debugLine="End Sub"; +public String _designercreateview(Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ + //BA.debugLineNum = 35;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; + //BA.debugLineNum = 36;BA.debugLine="mBase = Base"; +_mbase = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); + //BA.debugLineNum = 37;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_tag = _mbase.getTag(); + //BA.debugLineNum = 37;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_mbase.setTag(this); + //BA.debugLineNum = 38;BA.debugLine="Color1 = xui.PaintOrColorToColor(Props.Get(\"Color"; +_color1 = _xui.PaintOrColorToColor(_props.Get((Object)("Color1"))); + //BA.debugLineNum = 39;BA.debugLine="Color2 = xui.PaintOrColorToColor(Props.Get(\"Color"; +_color2 = _xui.PaintOrColorToColor(_props.Get((Object)("Color2"))); + //BA.debugLineNum = 40;BA.debugLine="ThumbColor = xui.PaintOrColorToColor(Props.Get(\"T"; +_thumbcolor = _xui.PaintOrColorToColor(_props.Get((Object)("ThumbColor"))); + //BA.debugLineNum = 41;BA.debugLine="Interval = Max(1, Props.GetDefault(\"Interval\", 1)"; +_interval = (int) (__c.Max(1,(double)(BA.ObjectToNumber(_props.GetDefault((Object)("Interval"),(Object)(1)))))); + //BA.debugLineNum = 42;BA.debugLine="MinValue = Props.Get(\"Min\")"; +_minvalue = (int)(BA.ObjectToNumber(_props.Get((Object)("Min")))); + //BA.debugLineNum = 43;BA.debugLine="MaxValue = Props.Get(\"Max\")"; +_maxvalue = (int)(BA.ObjectToNumber(_props.Get((Object)("Max")))); + //BA.debugLineNum = 44;BA.debugLine="mValue = Max(MinValue, Min(MaxValue, Props.Get(\"V"; +_mvalue = (int) (__c.Max(_minvalue,__c.Min(_maxvalue,(double)(BA.ObjectToNumber(_props.Get((Object)("Value"))))))); + //BA.debugLineNum = 45;BA.debugLine="cvs.Initialize(mBase)"; +_cvs.Initialize(_mbase); + //BA.debugLineNum = 46;BA.debugLine="TouchPanel = xui.CreatePanel(\"TouchPanel\")"; +_touchpanel = _xui.CreatePanel(ba,"TouchPanel"); + //BA.debugLineNum = 47;BA.debugLine="mBase.AddView(TouchPanel, 0, 0, mBase.Width, mBas"; +_mbase.AddView((android.view.View)(_touchpanel.getObject()),(int) (0),(int) (0),_mbase.getWidth(),_mbase.getHeight()); + //BA.debugLineNum = 48;BA.debugLine="If xui.IsB4A Or xui.IsB4i Then Radius2 = 20dip"; +if (_xui.getIsB4A() || _xui.getIsB4i()) { +_radius2 = __c.DipToCurrent((int) (20));}; + //BA.debugLineNum = 49;BA.debugLine="If xui.IsB4A Then Base_Resize(mBase.Width, mBase."; +if (_xui.getIsB4A()) { +_base_resize(_mbase.getWidth(),_mbase.getHeight());}; + //BA.debugLineNum = 50;BA.debugLine="End Sub"; return ""; } -public int _getvalue(keymon.lat.medicomed.b4xseekbar __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xseekbar"; -if (Debug.shouldDelegate(ba, "getvalue", true)) - {return ((Integer) Debug.delegate(ba, "getvalue", null));} -RDebugUtils.currentLine=59965440; - //BA.debugLineNum = 59965440;BA.debugLine="Public Sub getValue As Int"; -RDebugUtils.currentLine=59965441; - //BA.debugLineNum = 59965441;BA.debugLine="Return mValue"; -if (true) return __ref._mvalue /*int*/ ; -RDebugUtils.currentLine=59965442; - //BA.debugLineNum = 59965442;BA.debugLine="End Sub"; +public int _getvalue() throws Exception{ + //BA.debugLineNum = 130;BA.debugLine="Public Sub getValue As Int"; + //BA.debugLineNum = 131;BA.debugLine="Return mValue"; +if (true) return _mvalue; + //BA.debugLineNum = 132;BA.debugLine="End Sub"; return 0; } -public String _initialize(keymon.lat.medicomed.b4xseekbar __ref,anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ -__ref = this; +public String _initialize(anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ innerInitialize(_ba); -RDebugUtils.currentModule="b4xseekbar"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_callback,_eventname}));} -RDebugUtils.currentLine=59441152; - //BA.debugLineNum = 59441152;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -RDebugUtils.currentLine=59441153; - //BA.debugLineNum = 59441153;BA.debugLine="mEventName = EventName"; -__ref._meventname /*String*/ = _eventname; -RDebugUtils.currentLine=59441154; - //BA.debugLineNum = 59441154;BA.debugLine="mCallBack = Callback"; -__ref._mcallback /*Object*/ = _callback; -RDebugUtils.currentLine=59441155; - //BA.debugLineNum = 59441155;BA.debugLine="End Sub"; + //BA.debugLineNum = 29;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; + //BA.debugLineNum = 30;BA.debugLine="mEventName = EventName"; +_meventname = _eventname; + //BA.debugLineNum = 31;BA.debugLine="mCallBack = Callback"; +_mcallback = _callback; + //BA.debugLineNum = 32;BA.debugLine="End Sub"; return ""; } -public String _raisetouchstateevent(keymon.lat.medicomed.b4xseekbar __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xseekbar"; -if (Debug.shouldDelegate(ba, "raisetouchstateevent", true)) - {return ((String) Debug.delegate(ba, "raisetouchstateevent", null));} -RDebugUtils.currentLine=59768832; - //BA.debugLineNum = 59768832;BA.debugLine="Private Sub RaiseTouchStateEvent"; -RDebugUtils.currentLine=59768833; - //BA.debugLineNum = 59768833;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_TouchS"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .SubExists(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_TouchStateChanged",(int) (1))) { -RDebugUtils.currentLine=59768834; - //BA.debugLineNum = 59768834;BA.debugLine="CallSubDelayed2(mCallBack, mEventName & \"_TouchS"; -__c.CallSubDelayed2(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_TouchStateChanged",(Object)(__ref._pressed /*boolean*/ )); +public String _raisetouchstateevent() throws Exception{ + //BA.debugLineNum = 102;BA.debugLine="Private Sub RaiseTouchStateEvent"; + //BA.debugLineNum = 103;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_TouchS"; +if (_xui.SubExists(ba,_mcallback,_meventname+"_TouchStateChanged",(int) (1))) { + //BA.debugLineNum = 104;BA.debugLine="CallSubDelayed2(mCallBack, mEventName & \"_TouchS"; +__c.CallSubDelayed2(ba,_mcallback,_meventname+"_TouchStateChanged",(Object)(_pressed)); }; -RDebugUtils.currentLine=59768836; - //BA.debugLineNum = 59768836;BA.debugLine="End Sub"; + //BA.debugLineNum = 106;BA.debugLine="End Sub"; return ""; } -public String _setvaluebasedontouch(keymon.lat.medicomed.b4xseekbar __ref,int _x,int _y) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xseekbar"; -if (Debug.shouldDelegate(ba, "setvaluebasedontouch", true)) - {return ((String) Debug.delegate(ba, "setvaluebasedontouch", new Object[] {_x,_y}));} +public String _setvalue(int _v) throws Exception{ + //BA.debugLineNum = 125;BA.debugLine="Public Sub setValue(v As Int)"; + //BA.debugLineNum = 126;BA.debugLine="mValue = Max(MinValue, Min(MaxValue, v))"; +_mvalue = (int) (__c.Max(_minvalue,__c.Min(_maxvalue,_v))); + //BA.debugLineNum = 127;BA.debugLine="Update"; +_update(); + //BA.debugLineNum = 128;BA.debugLine="End Sub"; +return ""; +} +public String _setvaluebasedontouch(int _x,int _y) throws Exception{ int _v = 0; int _newvalue = 0; -RDebugUtils.currentLine=59834368; - //BA.debugLineNum = 59834368;BA.debugLine="Private Sub SetValueBasedOnTouch(x As Int, y As In"; -RDebugUtils.currentLine=59834369; - //BA.debugLineNum = 59834369;BA.debugLine="Dim v As Int"; + //BA.debugLineNum = 108;BA.debugLine="Private Sub SetValueBasedOnTouch(x As Int, y As In"; + //BA.debugLineNum = 109;BA.debugLine="Dim v As Int"; _v = 0; -RDebugUtils.currentLine=59834370; - //BA.debugLineNum = 59834370;BA.debugLine="If Vertical Then"; -if (__ref._vertical /*boolean*/ ) { -RDebugUtils.currentLine=59834371; - //BA.debugLineNum = 59834371;BA.debugLine="v = (mBase.Height - Radius2 - y) / size * (MaxVa"; -_v = (int) ((__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()-__ref._radius2 /*int*/ -_y)/(double)__ref._size /*int*/ *(__ref._maxvalue /*int*/ -__ref._minvalue /*int*/ )+__ref._minvalue /*int*/ ); + //BA.debugLineNum = 110;BA.debugLine="If Vertical Then"; +if (_vertical) { + //BA.debugLineNum = 111;BA.debugLine="v = (mBase.Height - Radius2 - y) / size * (MaxVa"; +_v = (int) ((_mbase.getHeight()-_radius2-_y)/(double)_size*(_maxvalue-_minvalue)+_minvalue); }else { -RDebugUtils.currentLine=59834373; - //BA.debugLineNum = 59834373;BA.debugLine="v = (x - Radius2) / size * (MaxValue - MinValue)"; -_v = (int) ((_x-__ref._radius2 /*int*/ )/(double)__ref._size /*int*/ *(__ref._maxvalue /*int*/ -__ref._minvalue /*int*/ )+__ref._minvalue /*int*/ ); + //BA.debugLineNum = 113;BA.debugLine="v = (x - Radius2) / size * (MaxValue - MinValue)"; +_v = (int) ((_x-_radius2)/(double)_size*(_maxvalue-_minvalue)+_minvalue); }; -RDebugUtils.currentLine=59834375; - //BA.debugLineNum = 59834375;BA.debugLine="v = Round (v / Interval) * Interval"; -_v = (int) (__c.Round(_v/(double)__ref._interval /*int*/ )*__ref._interval /*int*/ ); -RDebugUtils.currentLine=59834376; - //BA.debugLineNum = 59834376;BA.debugLine="Dim NewValue As Int = Max(MinValue, Min(MaxValue,"; -_newvalue = (int) (__c.Max(__ref._minvalue /*int*/ ,__c.Min(__ref._maxvalue /*int*/ ,_v))); -RDebugUtils.currentLine=59834377; - //BA.debugLineNum = 59834377;BA.debugLine="If NewValue <> mValue Then"; -if (_newvalue!=__ref._mvalue /*int*/ ) { -RDebugUtils.currentLine=59834378; - //BA.debugLineNum = 59834378;BA.debugLine="mValue = NewValue"; -__ref._mvalue /*int*/ = _newvalue; -RDebugUtils.currentLine=59834379; - //BA.debugLineNum = 59834379;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_Value"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .SubExists(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_ValueChanged",(int) (1))) { -RDebugUtils.currentLine=59834380; - //BA.debugLineNum = 59834380;BA.debugLine="CallSubDelayed2(mCallBack, mEventName & \"_Value"; -__c.CallSubDelayed2(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_ValueChanged",(Object)(__ref._mvalue /*int*/ )); + //BA.debugLineNum = 115;BA.debugLine="v = Round (v / Interval) * Interval"; +_v = (int) (__c.Round(_v/(double)_interval)*_interval); + //BA.debugLineNum = 116;BA.debugLine="Dim NewValue As Int = Max(MinValue, Min(MaxValue,"; +_newvalue = (int) (__c.Max(_minvalue,__c.Min(_maxvalue,_v))); + //BA.debugLineNum = 117;BA.debugLine="If NewValue <> mValue Then"; +if (_newvalue!=_mvalue) { + //BA.debugLineNum = 118;BA.debugLine="mValue = NewValue"; +_mvalue = _newvalue; + //BA.debugLineNum = 119;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_Value"; +if (_xui.SubExists(ba,_mcallback,_meventname+"_ValueChanged",(int) (1))) { + //BA.debugLineNum = 120;BA.debugLine="CallSubDelayed2(mCallBack, mEventName & \"_Value"; +__c.CallSubDelayed2(ba,_mcallback,_meventname+"_ValueChanged",(Object)(_mvalue)); }; }; -RDebugUtils.currentLine=59834383; - //BA.debugLineNum = 59834383;BA.debugLine="End Sub"; + //BA.debugLineNum = 123;BA.debugLine="End Sub"; return ""; } -public String _touchpanel_touch(keymon.lat.medicomed.b4xseekbar __ref,int _action,float _x,float _y) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xseekbar"; -if (Debug.shouldDelegate(ba, "touchpanel_touch", true)) - {return ((String) Debug.delegate(ba, "touchpanel_touch", new Object[] {_action,_x,_y}));} -RDebugUtils.currentLine=59703296; - //BA.debugLineNum = 59703296;BA.debugLine="Private Sub TouchPanel_Touch (Action As Int, X As"; -RDebugUtils.currentLine=59703297; - //BA.debugLineNum = 59703297;BA.debugLine="If Action = TouchPanel.TOUCH_ACTION_DOWN Then"; -if (_action==__ref._touchpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .TOUCH_ACTION_DOWN) { -RDebugUtils.currentLine=59703298; - //BA.debugLineNum = 59703298;BA.debugLine="Pressed = True"; -__ref._pressed /*boolean*/ = __c.True; -RDebugUtils.currentLine=59703299; - //BA.debugLineNum = 59703299;BA.debugLine="RaiseTouchStateEvent"; -__ref._raisetouchstateevent /*String*/ (null); -RDebugUtils.currentLine=59703300; - //BA.debugLineNum = 59703300;BA.debugLine="SetValueBasedOnTouch(X, Y)"; -__ref._setvaluebasedontouch /*String*/ (null,(int) (_x),(int) (_y)); - }else -{RDebugUtils.currentLine=59703301; - //BA.debugLineNum = 59703301;BA.debugLine="Else If Action = TouchPanel.TOUCH_ACTION_MOVE The"; -if (_action==__ref._touchpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .TOUCH_ACTION_MOVE) { -RDebugUtils.currentLine=59703302; - //BA.debugLineNum = 59703302;BA.debugLine="SetValueBasedOnTouch(X, Y)"; -__ref._setvaluebasedontouch /*String*/ (null,(int) (_x),(int) (_y)); - }else -{RDebugUtils.currentLine=59703303; - //BA.debugLineNum = 59703303;BA.debugLine="Else If Action = TouchPanel.TOUCH_ACTION_UP Then"; -if (_action==__ref._touchpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .TOUCH_ACTION_UP) { -RDebugUtils.currentLine=59703304; - //BA.debugLineNum = 59703304;BA.debugLine="Pressed = False"; -__ref._pressed /*boolean*/ = __c.False; -RDebugUtils.currentLine=59703305; - //BA.debugLineNum = 59703305;BA.debugLine="RaiseTouchStateEvent"; -__ref._raisetouchstateevent /*String*/ (null); - }}} -; -RDebugUtils.currentLine=59703307; - //BA.debugLineNum = 59703307;BA.debugLine="Update"; -__ref._update /*String*/ (null); -RDebugUtils.currentLine=59703308; - //BA.debugLineNum = 59703308;BA.debugLine="End Sub"; +public String _touchpanel_touch(int _action,float _x,float _y) throws Exception{ + //BA.debugLineNum = 88;BA.debugLine="Private Sub TouchPanel_Touch (Action As Int, X As"; + //BA.debugLineNum = 89;BA.debugLine="If Action = TouchPanel.TOUCH_ACTION_DOWN Then"; +if (_action==_touchpanel.TOUCH_ACTION_DOWN) { + //BA.debugLineNum = 90;BA.debugLine="Pressed = True"; +_pressed = __c.True; + //BA.debugLineNum = 91;BA.debugLine="RaiseTouchStateEvent"; +_raisetouchstateevent(); + //BA.debugLineNum = 92;BA.debugLine="SetValueBasedOnTouch(X, Y)"; +_setvaluebasedontouch((int) (_x),(int) (_y)); + }else if(_action==_touchpanel.TOUCH_ACTION_MOVE) { + //BA.debugLineNum = 94;BA.debugLine="SetValueBasedOnTouch(X, Y)"; +_setvaluebasedontouch((int) (_x),(int) (_y)); + }else if(_action==_touchpanel.TOUCH_ACTION_UP) { + //BA.debugLineNum = 96;BA.debugLine="Pressed = False"; +_pressed = __c.False; + //BA.debugLineNum = 97;BA.debugLine="RaiseTouchStateEvent"; +_raisetouchstateevent(); + }; + //BA.debugLineNum = 99;BA.debugLine="Update"; +_update(); + //BA.debugLineNum = 100;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +public String _update() throws Exception{ +int _s1 = 0; +int _y = 0; +int _x = 0; + //BA.debugLineNum = 61;BA.debugLine="Public Sub Update"; + //BA.debugLineNum = 63;BA.debugLine="cvs.ClearRect(cvs.TargetRect)"; +_cvs.ClearRect(_cvs.getTargetRect()); + //BA.debugLineNum = 64;BA.debugLine="If size > 0 Then"; +if (_size>0) { + //BA.debugLineNum = 65;BA.debugLine="If Vertical = False Then"; +if (_vertical==__c.False) { + //BA.debugLineNum = 66;BA.debugLine="Dim s1 As Int = Radius2 + (mValue - MinValue) /"; +_s1 = (int) (_radius2+(_mvalue-_minvalue)/(double)(_maxvalue-_minvalue)*_size); + //BA.debugLineNum = 67;BA.debugLine="Dim y As Int = mBase.Height / 2"; +_y = (int) (_mbase.getHeight()/(double)2); + //BA.debugLineNum = 68;BA.debugLine="cvs.DrawLine(Radius2, y, s1, y, Color1, Size1)"; +_cvs.DrawLine((float) (_radius2),(float) (_y),(float) (_s1),(float) (_y),_color1,(float) (_size1)); + //BA.debugLineNum = 69;BA.debugLine="cvs.DrawLine(s1, y, mBase.Width - Radius2, y, C"; +_cvs.DrawLine((float) (_s1),(float) (_y),(float) (_mbase.getWidth()-_radius2),(float) (_y),_color2,(float) (_size2)); + //BA.debugLineNum = 70;BA.debugLine="cvs.DrawCircle(s1, y, Radius1, Color1, True, 0)"; +_cvs.DrawCircle((float) (_s1),(float) (_y),(float) (_radius1),_color1,__c.True,(float) (0)); + //BA.debugLineNum = 71;BA.debugLine="If Pressed Then"; +if (_pressed) { + //BA.debugLineNum = 72;BA.debugLine="cvs.DrawCircle(s1, y, Radius2, ThumbColor, Tru"; +_cvs.DrawCircle((float) (_s1),(float) (_y),(float) (_radius2),_thumbcolor,__c.True,(float) (0)); + }; + }else { + //BA.debugLineNum = 75;BA.debugLine="Dim s1 As Int = Radius2 + (MaxValue - mValue) /"; +_s1 = (int) (_radius2+(_maxvalue-_mvalue)/(double)(_maxvalue-_minvalue)*_size); + //BA.debugLineNum = 76;BA.debugLine="Dim x As Int = mBase.Width / 2"; +_x = (int) (_mbase.getWidth()/(double)2); + //BA.debugLineNum = 77;BA.debugLine="cvs.DrawLine(x, Radius2, x, s1, Color2, Size2)"; +_cvs.DrawLine((float) (_x),(float) (_radius2),(float) (_x),(float) (_s1),_color2,(float) (_size2)); + //BA.debugLineNum = 78;BA.debugLine="cvs.DrawLine(x, s1, x, mBase.Height - Radius2,"; +_cvs.DrawLine((float) (_x),(float) (_s1),(float) (_x),(float) (_mbase.getHeight()-_radius2),_color1,(float) (_size1)); + //BA.debugLineNum = 79;BA.debugLine="cvs.DrawCircle(x, s1, Radius1, Color1, True, 0)"; +_cvs.DrawCircle((float) (_x),(float) (_s1),(float) (_radius1),_color1,__c.True,(float) (0)); + //BA.debugLineNum = 80;BA.debugLine="If Pressed Then"; +if (_pressed) { + //BA.debugLineNum = 81;BA.debugLine="cvs.DrawCircle(x, s1, Radius2, ThumbColor, Tru"; +_cvs.DrawCircle((float) (_x),(float) (_s1),(float) (_radius2),_thumbcolor,__c.True,(float) (0)); + }; + }; + }; + //BA.debugLineNum = 85;BA.debugLine="cvs.Invalidate"; +_cvs.Invalidate(); + //BA.debugLineNum = 86;BA.debugLine="End Sub"; +return ""; +} +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xset.java b/B4A/Objects/src/keymon/lat/medicomed/b4xset.java index c845fbf..54df74c 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xset.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xset.java @@ -10,7 +10,7 @@ public class b4xset extends B4AClass.ImplB4AClass implements BA.SubDelegator{ private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xset"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xset"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xset extends B4AClass.ImplB4AClass implements BA.SubDelegator{ 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.keywords.Common __c = null; public keymon.lat.medicomed.b4xorderedmap _map = null; public b4a.example.dateutils _dateutils = null; public keymon.lat.medicomed.main _main = null; @@ -44,115 +37,65 @@ 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 _initialize(keymon.lat.medicomed.b4xset __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="b4xset"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=38141952; - //BA.debugLineNum = 38141952;BA.debugLine="Public Sub Initialize"; -RDebugUtils.currentLine=38141953; - //BA.debugLineNum = 38141953;BA.debugLine="map.Initialize"; -__ref._map /*keymon.lat.medicomed.b4xorderedmap*/ ._initialize /*String*/ (null,ba); -RDebugUtils.currentLine=38141954; - //BA.debugLineNum = 38141954;BA.debugLine="End Sub"; +public String _add(Object _value) throws Exception{ + //BA.debugLineNum = 9;BA.debugLine="Public Sub Add(Value As Object)"; + //BA.debugLineNum = 10;BA.debugLine="map.Put(Value, \"\")"; +_map._put /*String*/ (_value,(Object)("")); + //BA.debugLineNum = 11;BA.debugLine="End Sub"; return ""; } -public String _add(keymon.lat.medicomed.b4xset __ref,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xset"; -if (Debug.shouldDelegate(ba, "add", true)) - {return ((String) Debug.delegate(ba, "add", new Object[] {_value}));} -RDebugUtils.currentLine=38207488; - //BA.debugLineNum = 38207488;BA.debugLine="Public Sub Add(Value As Object)"; -RDebugUtils.currentLine=38207489; - //BA.debugLineNum = 38207489;BA.debugLine="map.Put(Value, \"\")"; -__ref._map /*keymon.lat.medicomed.b4xorderedmap*/ ._put /*String*/ (null,_value,(Object)("")); -RDebugUtils.currentLine=38207490; - //BA.debugLineNum = 38207490;BA.debugLine="End Sub"; -return ""; -} -public anywheresoftware.b4a.objects.collections.List _aslist(keymon.lat.medicomed.b4xset __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xset"; -if (Debug.shouldDelegate(ba, "aslist", true)) - {return ((anywheresoftware.b4a.objects.collections.List) Debug.delegate(ba, "aslist", null));} -RDebugUtils.currentLine=38535168; - //BA.debugLineNum = 38535168;BA.debugLine="Public Sub AsList As List"; -RDebugUtils.currentLine=38535169; - //BA.debugLineNum = 38535169;BA.debugLine="Return map.Keys"; -if (true) return __ref._map /*keymon.lat.medicomed.b4xorderedmap*/ ._getkeys /*anywheresoftware.b4a.objects.collections.List*/ (null); -RDebugUtils.currentLine=38535170; - //BA.debugLineNum = 38535170;BA.debugLine="End Sub"; +public anywheresoftware.b4a.objects.collections.List _aslist() throws Exception{ + //BA.debugLineNum = 29;BA.debugLine="Public Sub AsList As List"; + //BA.debugLineNum = 30;BA.debugLine="Return map.Keys"; +if (true) return _map._getkeys /*anywheresoftware.b4a.objects.collections.List*/ (); + //BA.debugLineNum = 31;BA.debugLine="End Sub"; return null; } -public String _class_globals(keymon.lat.medicomed.b4xset __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xset"; -RDebugUtils.currentLine=38076416; - //BA.debugLineNum = 38076416;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=38076417; - //BA.debugLineNum = 38076417;BA.debugLine="Private map As B4XOrderedMap"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Private map As B4XOrderedMap"; _map = new keymon.lat.medicomed.b4xorderedmap(); -RDebugUtils.currentLine=38076418; - //BA.debugLineNum = 38076418;BA.debugLine="End Sub"; + //BA.debugLineNum = 3;BA.debugLine="End Sub"; return ""; } -public String _clear(keymon.lat.medicomed.b4xset __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xset"; -if (Debug.shouldDelegate(ba, "clear", true)) - {return ((String) Debug.delegate(ba, "clear", null));} -RDebugUtils.currentLine=38469632; - //BA.debugLineNum = 38469632;BA.debugLine="Public Sub Clear"; -RDebugUtils.currentLine=38469633; - //BA.debugLineNum = 38469633;BA.debugLine="map.Clear"; -__ref._map /*keymon.lat.medicomed.b4xorderedmap*/ ._clear /*String*/ (null); -RDebugUtils.currentLine=38469634; - //BA.debugLineNum = 38469634;BA.debugLine="End Sub"; +public String _clear() throws Exception{ + //BA.debugLineNum = 25;BA.debugLine="Public Sub Clear"; + //BA.debugLineNum = 26;BA.debugLine="map.Clear"; +_map._clear /*String*/ (); + //BA.debugLineNum = 27;BA.debugLine="End Sub"; return ""; } -public boolean _contains(keymon.lat.medicomed.b4xset __ref,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xset"; -if (Debug.shouldDelegate(ba, "contains", true)) - {return ((Boolean) Debug.delegate(ba, "contains", new Object[] {_value}));} -RDebugUtils.currentLine=38338560; - //BA.debugLineNum = 38338560;BA.debugLine="Public Sub Contains (Value As Object) As Boolean"; -RDebugUtils.currentLine=38338561; - //BA.debugLineNum = 38338561;BA.debugLine="Return map.ContainsKey(Value)"; -if (true) return __ref._map /*keymon.lat.medicomed.b4xorderedmap*/ ._containskey /*boolean*/ (null,_value); -RDebugUtils.currentLine=38338562; - //BA.debugLineNum = 38338562;BA.debugLine="End Sub"; +public boolean _contains(Object _value) throws Exception{ + //BA.debugLineNum = 17;BA.debugLine="Public Sub Contains (Value As Object) As Boolean"; + //BA.debugLineNum = 18;BA.debugLine="Return map.ContainsKey(Value)"; +if (true) return _map._containskey /*boolean*/ (_value); + //BA.debugLineNum = 19;BA.debugLine="End Sub"; return false; } -public int _getsize(keymon.lat.medicomed.b4xset __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xset"; -if (Debug.shouldDelegate(ba, "getsize", true)) - {return ((Integer) Debug.delegate(ba, "getsize", null));} -RDebugUtils.currentLine=38404096; - //BA.debugLineNum = 38404096;BA.debugLine="Public Sub getSize As Int"; -RDebugUtils.currentLine=38404097; - //BA.debugLineNum = 38404097;BA.debugLine="Return map.Size"; -if (true) return __ref._map /*keymon.lat.medicomed.b4xorderedmap*/ ._getsize /*int*/ (null); -RDebugUtils.currentLine=38404098; - //BA.debugLineNum = 38404098;BA.debugLine="End Sub"; +public int _getsize() throws Exception{ + //BA.debugLineNum = 21;BA.debugLine="Public Sub getSize As Int"; + //BA.debugLineNum = 22;BA.debugLine="Return map.Size"; +if (true) return _map._getsize /*int*/ (); + //BA.debugLineNum = 23;BA.debugLine="End Sub"; return 0; } -public String _remove(keymon.lat.medicomed.b4xset __ref,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xset"; -if (Debug.shouldDelegate(ba, "remove", true)) - {return ((String) Debug.delegate(ba, "remove", new Object[] {_value}));} -RDebugUtils.currentLine=38273024; - //BA.debugLineNum = 38273024;BA.debugLine="Public Sub Remove(Value As Object)"; -RDebugUtils.currentLine=38273025; - //BA.debugLineNum = 38273025;BA.debugLine="map.Remove(Value)"; -__ref._map /*keymon.lat.medicomed.b4xorderedmap*/ ._remove /*String*/ (null,_value); -RDebugUtils.currentLine=38273026; - //BA.debugLineNum = 38273026;BA.debugLine="End Sub"; +public String _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 5;BA.debugLine="Public Sub Initialize"; + //BA.debugLineNum = 6;BA.debugLine="map.Initialize"; +_map._initialize /*String*/ (ba); + //BA.debugLineNum = 7;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +public String _remove(Object _value) throws Exception{ + //BA.debugLineNum = 13;BA.debugLine="Public Sub Remove(Value As Object)"; + //BA.debugLineNum = 14;BA.debugLine="map.Remove(Value)"; +_map._remove /*String*/ (_value); + //BA.debugLineNum = 15;BA.debugLine="End Sub"; +return ""; +} +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xsignaturetemplate.java b/B4A/Objects/src/keymon/lat/medicomed/b4xsignaturetemplate.java index ae2835c..22afd8a 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xsignaturetemplate.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xsignaturetemplate.java @@ -10,7 +10,7 @@ public class b4xsignaturetemplate extends B4AClass.ImplB4AClass implements BA.Su private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xsignaturetemplate"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xsignaturetemplate"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xsignaturetemplate extends B4AClass.ImplB4AClass implements BA.Su 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.keywords.Common __c = null; public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null; public anywheresoftware.b4a.objects.B4XCanvas _cvs = null; @@ -55,203 +48,133 @@ 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 anywheresoftware.b4a.objects.B4XViewWrapper _getpanel(keymon.lat.medicomed.b4xsignaturetemplate __ref,keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xsignaturetemplate"; -if (Debug.shouldDelegate(ba, "getpanel", true)) - {return ((anywheresoftware.b4a.objects.B4XViewWrapper) Debug.delegate(ba, "getpanel", new Object[] {_dialog}));} -RDebugUtils.currentLine=60227584; - //BA.debugLineNum = 60227584;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; -RDebugUtils.currentLine=60227585; - //BA.debugLineNum = 60227585;BA.debugLine="Return mBase"; -if (true) return __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ; -RDebugUtils.currentLine=60227586; - //BA.debugLineNum = 60227586;BA.debugLine="End Sub"; -return null; -} -public String _show(keymon.lat.medicomed.b4xsignaturetemplate __ref,keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xsignaturetemplate"; -if (Debug.shouldDelegate(ba, "show", true)) - {return ((String) Debug.delegate(ba, "show", new Object[] {_dialog}));} -RDebugUtils.currentLine=60293120; - //BA.debugLineNum = 60293120;BA.debugLine="Private Sub Show (Dialog As B4XDialog) 'ignore"; -RDebugUtils.currentLine=60293121; - //BA.debugLineNum = 60293121;BA.debugLine="cvs.DrawRect(cvs.TargetRect, BackgroundColor, Tru"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawRect(__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect(),__ref._backgroundcolor /*int*/ ,__c.True,(float) (0)); -RDebugUtils.currentLine=60293122; - //BA.debugLineNum = 60293122;BA.debugLine="cvs.Invalidate"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Invalidate(); -RDebugUtils.currentLine=60293123; - //BA.debugLineNum = 60293123;BA.debugLine="NumberOfPoints = 0"; -__ref._numberofpoints /*int*/ = (int) (0); -RDebugUtils.currentLine=60293124; - //BA.debugLineNum = 60293124;BA.debugLine="End Sub"; -return ""; -} -public String _dialogclosed(keymon.lat.medicomed.b4xsignaturetemplate __ref,int _result) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xsignaturetemplate"; -if (Debug.shouldDelegate(ba, "dialogclosed", true)) - {return ((String) Debug.delegate(ba, "dialogclosed", new Object[] {_result}));} -anywheresoftware.b4a.objects.B4XCanvas.B4XRect _r = null; -int _baseline = 0; -RDebugUtils.currentLine=60489728; - //BA.debugLineNum = 60489728;BA.debugLine="Private Sub DialogClosed (Result As Int)"; -RDebugUtils.currentLine=60489729; - //BA.debugLineNum = 60489729;BA.debugLine="If Result = xui.DialogResponse_Positive And AddDa"; -if (_result==__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .DialogResponse_Positive && __ref._adddateandtime /*boolean*/ ) { -RDebugUtils.currentLine=60489730; - //BA.debugLineNum = 60489730;BA.debugLine="Dim r As B4XRect = cvs.MeasureText(\"M\", TextFont"; -_r = __ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .MeasureText("M",__ref._textfont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ ); -RDebugUtils.currentLine=60489731; - //BA.debugLineNum = 60489731;BA.debugLine="Dim Baseline As Int = cvs.TargetRect.Bottom - r."; -_baseline = (int) (__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect().getBottom()-_r.getHeight()-_r.getTop()-__c.DipToCurrent((int) (2))); -RDebugUtils.currentLine=60489732; - //BA.debugLineNum = 60489732;BA.debugLine="cvs.DrawText($\"$DateTime{DateTime.Now}\"$, 2dip,"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawText(ba,(""+__c.SmartStringFormatter("datetime",(Object)(__c.DateTime.getNow()))+""),(float) (__c.DipToCurrent((int) (2))),(float) (_baseline),__ref._textfont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ ,__ref._textcolor /*int*/ ,BA.getEnumFromString(android.graphics.Paint.Align.class,"LEFT")); - }; -RDebugUtils.currentLine=60489734; - //BA.debugLineNum = 60489734;BA.debugLine="End Sub"; -return ""; -} -public String _class_globals(keymon.lat.medicomed.b4xsignaturetemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xsignaturetemplate"; -RDebugUtils.currentLine=60030976; - //BA.debugLineNum = 60030976;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=60030977; - //BA.debugLineNum = 60030977;BA.debugLine="Private xui As XUI"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Private xui As XUI"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=60030978; - //BA.debugLineNum = 60030978;BA.debugLine="Public mBase As B4XView"; + //BA.debugLineNum = 3;BA.debugLine="Public mBase As B4XView"; _mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=60030979; - //BA.debugLineNum = 60030979;BA.debugLine="Private cvs As B4XCanvas"; + //BA.debugLineNum = 4;BA.debugLine="Private cvs As B4XCanvas"; _cvs = new anywheresoftware.b4a.objects.B4XCanvas(); -RDebugUtils.currentLine=60030980; - //BA.debugLineNum = 60030980;BA.debugLine="Private LastX, LastY As Float"; + //BA.debugLineNum = 5;BA.debugLine="Private LastX, LastY As Float"; _lastx = 0f; _lasty = 0f; -RDebugUtils.currentLine=60030981; - //BA.debugLineNum = 60030981;BA.debugLine="Public StrokeWidth As Float = 2dip"; + //BA.debugLineNum = 6;BA.debugLine="Public StrokeWidth As Float = 2dip"; _strokewidth = (float) (__c.DipToCurrent((int) (2))); -RDebugUtils.currentLine=60030982; - //BA.debugLineNum = 60030982;BA.debugLine="Public StrokeColor As Int = xui.Color_Black"; -_strokecolor = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Black; -RDebugUtils.currentLine=60030983; - //BA.debugLineNum = 60030983;BA.debugLine="Public TextColor As Int = 0xFFFF8800"; + //BA.debugLineNum = 7;BA.debugLine="Public StrokeColor As Int = xui.Color_Black"; +_strokecolor = _xui.Color_Black; + //BA.debugLineNum = 8;BA.debugLine="Public TextColor As Int = 0xFFFF8800"; _textcolor = ((int)0xffff8800); -RDebugUtils.currentLine=60030984; - //BA.debugLineNum = 60030984;BA.debugLine="Public BackgroundColor As Int = xui.Color_White"; -_backgroundcolor = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_White; -RDebugUtils.currentLine=60030985; - //BA.debugLineNum = 60030985;BA.debugLine="Public AddDateAndTime As Boolean = True"; + //BA.debugLineNum = 9;BA.debugLine="Public BackgroundColor As Int = xui.Color_White"; +_backgroundcolor = _xui.Color_White; + //BA.debugLineNum = 10;BA.debugLine="Public AddDateAndTime As Boolean = True"; _adddateandtime = __c.True; -RDebugUtils.currentLine=60030986; - //BA.debugLineNum = 60030986;BA.debugLine="Public TextFont As B4XFont"; + //BA.debugLineNum = 11;BA.debugLine="Public TextFont As B4XFont"; _textfont = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont(); -RDebugUtils.currentLine=60030987; - //BA.debugLineNum = 60030987;BA.debugLine="Public NumberOfPoints As Int"; + //BA.debugLineNum = 12;BA.debugLine="Public NumberOfPoints As Int"; _numberofpoints = 0; -RDebugUtils.currentLine=60030988; - //BA.debugLineNum = 60030988;BA.debugLine="End Sub"; + //BA.debugLineNum = 13;BA.debugLine="End Sub"; return ""; } -public anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _getbitmap(keymon.lat.medicomed.b4xsignaturetemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xsignaturetemplate"; -if (Debug.shouldDelegate(ba, "getbitmap", true)) - {return ((anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper) Debug.delegate(ba, "getbitmap", null));} -RDebugUtils.currentLine=60424192; - //BA.debugLineNum = 60424192;BA.debugLine="Public Sub getBitmap As B4XBitmap"; -RDebugUtils.currentLine=60424193; - //BA.debugLineNum = 60424193;BA.debugLine="Return cvs.CreateBitmap"; -if (true) return __ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .CreateBitmap(); -RDebugUtils.currentLine=60424194; - //BA.debugLineNum = 60424194;BA.debugLine="End Sub"; +public String _dialogclosed(int _result) throws Exception{ +anywheresoftware.b4a.objects.B4XCanvas.B4XRect _r = null; +int _baseline = 0; + //BA.debugLineNum = 56;BA.debugLine="Private Sub DialogClosed (Result As Int)"; + //BA.debugLineNum = 57;BA.debugLine="If Result = xui.DialogResponse_Positive And AddDa"; +if (_result==_xui.DialogResponse_Positive && _adddateandtime) { + //BA.debugLineNum = 58;BA.debugLine="Dim r As B4XRect = cvs.MeasureText(\"M\", TextFont"; +_r = _cvs.MeasureText("M",_textfont); + //BA.debugLineNum = 59;BA.debugLine="Dim Baseline As Int = cvs.TargetRect.Bottom - r."; +_baseline = (int) (_cvs.getTargetRect().getBottom()-_r.getHeight()-_r.getTop()-__c.DipToCurrent((int) (2))); + //BA.debugLineNum = 60;BA.debugLine="cvs.DrawText($\"$DateTime{DateTime.Now}\"$, 2dip,"; +_cvs.DrawText(ba,(""+__c.SmartStringFormatter("datetime",(Object)(__c.DateTime.getNow()))+""),(float) (__c.DipToCurrent((int) (2))),(float) (_baseline),_textfont,_textcolor,BA.getEnumFromString(android.graphics.Paint.Align.class,"LEFT")); + }; + //BA.debugLineNum = 62;BA.debugLine="End Sub"; +return ""; +} +public anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _getbitmap() throws Exception{ + //BA.debugLineNum = 52;BA.debugLine="Public Sub getBitmap As B4XBitmap"; + //BA.debugLineNum = 53;BA.debugLine="Return cvs.CreateBitmap"; +if (true) return _cvs.CreateBitmap(); + //BA.debugLineNum = 54;BA.debugLine="End Sub"; return null; } -public String _initialize(keymon.lat.medicomed.b4xsignaturetemplate __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; +public anywheresoftware.b4a.objects.B4XViewWrapper _getpanel(keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ + //BA.debugLineNum = 28;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; + //BA.debugLineNum = 29;BA.debugLine="Return mBase"; +if (true) return _mbase; + //BA.debugLineNum = 30;BA.debugLine="End Sub"; +return null; +} +public String _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ innerInitialize(_ba); -RDebugUtils.currentModule="b4xsignaturetemplate"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=60096512; - //BA.debugLineNum = 60096512;BA.debugLine="Public Sub Initialize"; -RDebugUtils.currentLine=60096513; - //BA.debugLineNum = 60096513;BA.debugLine="mBase = xui.CreatePanel(\"mBase\")"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,"mBase"); -RDebugUtils.currentLine=60096514; - //BA.debugLineNum = 60096514;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, 300dip, 200dip)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),__c.DipToCurrent((int) (300)),__c.DipToCurrent((int) (200))); -RDebugUtils.currentLine=60096515; - //BA.debugLineNum = 60096515;BA.debugLine="cvs.Initialize(mBase)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Initialize(__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ); -RDebugUtils.currentLine=60096516; - //BA.debugLineNum = 60096516;BA.debugLine="TextFont = xui.CreateDefaultFont(14)"; -__ref._textfont /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreateDefaultFont((float) (14)); -RDebugUtils.currentLine=60096517; - //BA.debugLineNum = 60096517;BA.debugLine="End Sub"; + //BA.debugLineNum = 15;BA.debugLine="Public Sub Initialize"; + //BA.debugLineNum = 16;BA.debugLine="mBase = xui.CreatePanel(\"mBase\")"; +_mbase = _xui.CreatePanel(ba,"mBase"); + //BA.debugLineNum = 17;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, 300dip, 200dip)"; +_mbase.SetLayoutAnimated((int) (0),(int) (0),(int) (0),__c.DipToCurrent((int) (300)),__c.DipToCurrent((int) (200))); + //BA.debugLineNum = 18;BA.debugLine="cvs.Initialize(mBase)"; +_cvs.Initialize(_mbase); + //BA.debugLineNum = 19;BA.debugLine="TextFont = xui.CreateDefaultFont(14)"; +_textfont = _xui.CreateDefaultFont((float) (14)); + //BA.debugLineNum = 20;BA.debugLine="End Sub"; return ""; } -public String _mbase_touch(keymon.lat.medicomed.b4xsignaturetemplate __ref,int _action,float _x,float _y) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xsignaturetemplate"; -if (Debug.shouldDelegate(ba, "mbase_touch", true)) - {return ((String) Debug.delegate(ba, "mbase_touch", new Object[] {_action,_x,_y}));} -RDebugUtils.currentLine=60358656; - //BA.debugLineNum = 60358656;BA.debugLine="Private Sub mBase_Touch (Action As Int, X As Float"; -RDebugUtils.currentLine=60358657; - //BA.debugLineNum = 60358657;BA.debugLine="Select Action"; -switch (BA.switchObjectToInt(_action,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .TOUCH_ACTION_DOWN,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .TOUCH_ACTION_MOVE)) { +public String _mbase_touch(int _action,float _x,float _y) throws Exception{ + //BA.debugLineNum = 38;BA.debugLine="Private Sub mBase_Touch (Action As Int, X As Float"; + //BA.debugLineNum = 39;BA.debugLine="Select Action"; +switch (BA.switchObjectToInt(_action,_mbase.TOUCH_ACTION_DOWN,_mbase.TOUCH_ACTION_MOVE)) { case 0: { -RDebugUtils.currentLine=60358659; - //BA.debugLineNum = 60358659;BA.debugLine="LastX = X"; -__ref._lastx /*float*/ = _x; -RDebugUtils.currentLine=60358660; - //BA.debugLineNum = 60358660;BA.debugLine="LastY = Y"; -__ref._lasty /*float*/ = _y; + //BA.debugLineNum = 41;BA.debugLine="LastX = X"; +_lastx = _x; + //BA.debugLineNum = 42;BA.debugLine="LastY = Y"; +_lasty = _y; break; } case 1: { -RDebugUtils.currentLine=60358662; - //BA.debugLineNum = 60358662;BA.debugLine="cvs.DrawLine(LastX, LastY, X, Y, StrokeColor, S"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawLine(__ref._lastx /*float*/ ,__ref._lasty /*float*/ ,_x,_y,__ref._strokecolor /*int*/ ,__ref._strokewidth /*float*/ ); -RDebugUtils.currentLine=60358663; - //BA.debugLineNum = 60358663;BA.debugLine="LastX = X"; -__ref._lastx /*float*/ = _x; -RDebugUtils.currentLine=60358664; - //BA.debugLineNum = 60358664;BA.debugLine="LastY = Y"; -__ref._lasty /*float*/ = _y; -RDebugUtils.currentLine=60358665; - //BA.debugLineNum = 60358665;BA.debugLine="cvs.Invalidate"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Invalidate(); -RDebugUtils.currentLine=60358666; - //BA.debugLineNum = 60358666;BA.debugLine="NumberOfPoints = NumberOfPoints + 1"; -__ref._numberofpoints /*int*/ = (int) (__ref._numberofpoints /*int*/ +1); + //BA.debugLineNum = 44;BA.debugLine="cvs.DrawLine(LastX, LastY, X, Y, StrokeColor, S"; +_cvs.DrawLine(_lastx,_lasty,_x,_y,_strokecolor,_strokewidth); + //BA.debugLineNum = 45;BA.debugLine="LastX = X"; +_lastx = _x; + //BA.debugLineNum = 46;BA.debugLine="LastY = Y"; +_lasty = _y; + //BA.debugLineNum = 47;BA.debugLine="cvs.Invalidate"; +_cvs.Invalidate(); + //BA.debugLineNum = 48;BA.debugLine="NumberOfPoints = NumberOfPoints + 1"; +_numberofpoints = (int) (_numberofpoints+1); break; } } ; -RDebugUtils.currentLine=60358668; - //BA.debugLineNum = 60358668;BA.debugLine="End Sub"; + //BA.debugLineNum = 50;BA.debugLine="End Sub"; return ""; } -public String _resize(keymon.lat.medicomed.b4xsignaturetemplate __ref,int _width,int _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xsignaturetemplate"; -if (Debug.shouldDelegate(ba, "resize", true)) - {return ((String) Debug.delegate(ba, "resize", new Object[] {_width,_height}));} -RDebugUtils.currentLine=60162048; - //BA.debugLineNum = 60162048;BA.debugLine="Public Sub Resize(Width As Int, Height As Int)"; -RDebugUtils.currentLine=60162049; - //BA.debugLineNum = 60162049;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, Width, Height)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),_width,_height); -RDebugUtils.currentLine=60162050; - //BA.debugLineNum = 60162050;BA.debugLine="cvs.Resize(Width, Height)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Resize((float) (_width),(float) (_height)); -RDebugUtils.currentLine=60162051; - //BA.debugLineNum = 60162051;BA.debugLine="End Sub"; +public String _resize(int _width,int _height) throws Exception{ + //BA.debugLineNum = 22;BA.debugLine="Public Sub Resize(Width As Int, Height As Int)"; + //BA.debugLineNum = 23;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, Width, Height)"; +_mbase.SetLayoutAnimated((int) (0),(int) (0),(int) (0),_width,_height); + //BA.debugLineNum = 24;BA.debugLine="cvs.Resize(Width, Height)"; +_cvs.Resize((float) (_width),(float) (_height)); + //BA.debugLineNum = 25;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +public String _show(keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ + //BA.debugLineNum = 32;BA.debugLine="Private Sub Show (Dialog As B4XDialog) 'ignore"; + //BA.debugLineNum = 33;BA.debugLine="cvs.DrawRect(cvs.TargetRect, BackgroundColor, Tru"; +_cvs.DrawRect(_cvs.getTargetRect(),_backgroundcolor,__c.True,(float) (0)); + //BA.debugLineNum = 34;BA.debugLine="cvs.Invalidate"; +_cvs.Invalidate(); + //BA.debugLineNum = 35;BA.debugLine="NumberOfPoints = 0"; +_numberofpoints = (int) (0); + //BA.debugLineNum = 36;BA.debugLine="End Sub"; +return ""; +} +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +if (BA.fastSubCompare(sub, "DIALOGCLOSED")) + return _dialogclosed(((Number)args[0]).intValue()); +if (BA.fastSubCompare(sub, "GETPANEL")) + return _getpanel((keymon.lat.medicomed.b4xdialog) args[0]); +if (BA.fastSubCompare(sub, "SHOW")) + return _show((keymon.lat.medicomed.b4xdialog) args[0]); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xswitch.java b/B4A/Objects/src/keymon/lat/medicomed/b4xswitch.java index 9c5ef78..ea57719 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xswitch.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xswitch.java @@ -10,7 +10,7 @@ public class b4xswitch extends B4AClass.ImplB4AClass implements BA.SubDelegator{ private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xswitch"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xswitch"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xswitch extends B4AClass.ImplB4AClass implements BA.SubDelegator{ 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.keywords.Common __c = null; public String _meventname = ""; public Object _mcallback = null; public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null; @@ -61,167 +54,217 @@ 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 _base_resize(keymon.lat.medicomed.b4xswitch __ref,double _width1,double _height1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xswitch"; -if (Debug.shouldDelegate(ba, "base_resize", true)) - {return ((String) Debug.delegate(ba, "base_resize", new Object[] {_width1,_height1}));} -RDebugUtils.currentLine=61210624; - //BA.debugLineNum = 61210624;BA.debugLine="Private Sub Base_Resize (Width1 As Double, Height1"; -RDebugUtils.currentLine=61210626; - //BA.debugLineNum = 61210626;BA.debugLine="End Sub"; +public String _base_resize(double _width1,double _height1) throws Exception{ + //BA.debugLineNum = 148;BA.debugLine="Private Sub Base_Resize (Width1 As Double, Height1"; + //BA.debugLineNum = 150;BA.debugLine="End Sub"; return ""; } -public String _class_globals(keymon.lat.medicomed.b4xswitch __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xswitch"; -RDebugUtils.currentLine=60555264; - //BA.debugLineNum = 60555264;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=60555265; - //BA.debugLineNum = 60555265;BA.debugLine="Private mEventName As String 'ignore"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 7;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 8;BA.debugLine="Private mEventName As String 'ignore"; _meventname = ""; -RDebugUtils.currentLine=60555266; - //BA.debugLineNum = 60555266;BA.debugLine="Private mCallBack As Object 'ignore"; + //BA.debugLineNum = 9;BA.debugLine="Private mCallBack As Object 'ignore"; _mcallback = new Object(); -RDebugUtils.currentLine=60555267; - //BA.debugLineNum = 60555267;BA.debugLine="Public mBase As B4XView 'ignore"; + //BA.debugLineNum = 10;BA.debugLine="Public mBase As B4XView 'ignore"; _mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=60555268; - //BA.debugLineNum = 60555268;BA.debugLine="Private xui As XUI 'ignore"; + //BA.debugLineNum = 11;BA.debugLine="Private xui As XUI 'ignore"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=60555269; - //BA.debugLineNum = 60555269;BA.debugLine="Private OnColor, OffColor As BCBrush"; + //BA.debugLineNum = 12;BA.debugLine="Private OnColor, OffColor As BCBrush"; _oncolor = new b4a.example.bcpath._bcbrush(); _offcolor = new b4a.example.bcpath._bcbrush(); -RDebugUtils.currentLine=60555270; - //BA.debugLineNum = 60555270;BA.debugLine="Private bc As BitmapCreator"; + //BA.debugLineNum = 13;BA.debugLine="Private bc As BitmapCreator"; _bc = new b4a.example.bitmapcreator(); -RDebugUtils.currentLine=60555271; - //BA.debugLineNum = 60555271;BA.debugLine="Private Width As Int = 55dip"; + //BA.debugLineNum = 14;BA.debugLine="Private Width As Int = 55dip"; _width = __c.DipToCurrent((int) (55)); -RDebugUtils.currentLine=60555272; - //BA.debugLineNum = 60555272;BA.debugLine="Private Height As Int = 31dip"; + //BA.debugLineNum = 15;BA.debugLine="Private Height As Int = 31dip"; _height = __c.DipToCurrent((int) (31)); -RDebugUtils.currentLine=60555273; - //BA.debugLineNum = 60555273;BA.debugLine="Private ThumbColor As BCBrush"; + //BA.debugLineNum = 16;BA.debugLine="Private ThumbColor As BCBrush"; _thumbcolor = new b4a.example.bcpath._bcbrush(); -RDebugUtils.currentLine=60555274; - //BA.debugLineNum = 60555274;BA.debugLine="Private iv As ImageView"; + //BA.debugLineNum = 17;BA.debugLine="Private iv As ImageView"; _iv = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=60555275; - //BA.debugLineNum = 60555275;BA.debugLine="Private mValue As Boolean"; + //BA.debugLineNum = 18;BA.debugLine="Private mValue As Boolean"; _mvalue = false; -RDebugUtils.currentLine=60555276; - //BA.debugLineNum = 60555276;BA.debugLine="Private transparent As BCBrush"; + //BA.debugLineNum = 19;BA.debugLine="Private transparent As BCBrush"; _transparent = new b4a.example.bcpath._bcbrush(); -RDebugUtils.currentLine=60555277; - //BA.debugLineNum = 60555277;BA.debugLine="Private LoopIndex As Int"; + //BA.debugLineNum = 20;BA.debugLine="Private LoopIndex As Int"; _loopindex = 0; -RDebugUtils.currentLine=60555278; - //BA.debugLineNum = 60555278;BA.debugLine="Public Tag As Object"; + //BA.debugLineNum = 21;BA.debugLine="Public Tag As Object"; _tag = new Object(); -RDebugUtils.currentLine=60555279; - //BA.debugLineNum = 60555279;BA.debugLine="Private Scale As Float"; + //BA.debugLineNum = 22;BA.debugLine="Private Scale As Float"; _scale = 0f; -RDebugUtils.currentLine=60555280; - //BA.debugLineNum = 60555280;BA.debugLine="Private mEnabled As Boolean = True"; + //BA.debugLineNum = 23;BA.debugLine="Private mEnabled As Boolean = True"; _menabled = __c.True; -RDebugUtils.currentLine=60555281; - //BA.debugLineNum = 60555281;BA.debugLine="Public mHaptic As Boolean"; + //BA.debugLineNum = 24;BA.debugLine="Public mHaptic As Boolean"; _mhaptic = false; -RDebugUtils.currentLine=60555282; - //BA.debugLineNum = 60555282;BA.debugLine="End Sub"; + //BA.debugLineNum = 25;BA.debugLine="End Sub"; return ""; } -public String _designercreateview(keymon.lat.medicomed.b4xswitch __ref,Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xswitch"; -if (Debug.shouldDelegate(ba, "designercreateview", true)) - {return ((String) Debug.delegate(ba, "designercreateview", new Object[] {_base,_lbl,_props}));} +public String _designercreateview(Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ anywheresoftware.b4a.objects.B4XViewWrapper _pnl = null; -RDebugUtils.currentLine=60686336; - //BA.debugLineNum = 60686336;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; -RDebugUtils.currentLine=60686337; - //BA.debugLineNum = 60686337;BA.debugLine="mBase = Base"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); -RDebugUtils.currentLine=60686338; - //BA.debugLineNum = 60686338;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._tag /*Object*/ = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getTag(); -RDebugUtils.currentLine=60686338; - //BA.debugLineNum = 60686338;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag(this); -RDebugUtils.currentLine=60686339; - //BA.debugLineNum = 60686339;BA.debugLine="mBase.SetLayoutAnimated(0, mBase.Left, mBase.Top,"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getLeft(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getTop(),__ref._width /*int*/ ,__ref._height /*int*/ ); -RDebugUtils.currentLine=60686340; - //BA.debugLineNum = 60686340;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0,"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetColorAndBorder(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent,(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=60686341; - //BA.debugLineNum = 60686341;BA.debugLine="Dim pnl As B4XView = xui.CreatePanel(\"pnl\")"; + //BA.debugLineNum = 33;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; + //BA.debugLineNum = 34;BA.debugLine="mBase = Base"; +_mbase = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); + //BA.debugLineNum = 35;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_tag = _mbase.getTag(); + //BA.debugLineNum = 35;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_mbase.setTag(this); + //BA.debugLineNum = 36;BA.debugLine="mBase.SetLayoutAnimated(0, mBase.Left, mBase.Top,"; +_mbase.SetLayoutAnimated((int) (0),_mbase.getLeft(),_mbase.getTop(),_width,_height); + //BA.debugLineNum = 37;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0,"; +_mbase.SetColorAndBorder(_xui.Color_Transparent,(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 38;BA.debugLine="Dim pnl As B4XView = xui.CreatePanel(\"pnl\")"; _pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_pnl = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,"pnl"); -RDebugUtils.currentLine=60686342; - //BA.debugLineNum = 60686342;BA.debugLine="pnl.Color = xui.Color_Transparent"; -_pnl.setColor(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent); -RDebugUtils.currentLine=60686343; - //BA.debugLineNum = 60686343;BA.debugLine="iv.Initialize(\"\")"; -__ref._iv /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .Initialize(ba,""); -RDebugUtils.currentLine=60686344; - //BA.debugLineNum = 60686344;BA.debugLine="mBase.AddView(iv, 0, 0, Width, Height)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._iv /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .getObject()),(int) (0),(int) (0),__ref._width /*int*/ ,__ref._height /*int*/ ); -RDebugUtils.currentLine=60686345; - //BA.debugLineNum = 60686345;BA.debugLine="mBase.AddView(pnl, 0, 0, Width, Height)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(_pnl.getObject()),(int) (0),(int) (0),__ref._width /*int*/ ,__ref._height /*int*/ ); -RDebugUtils.currentLine=60686347; - //BA.debugLineNum = 60686347;BA.debugLine="bc.Initialize(Width, Height)"; -__ref._bc /*b4a.example.bitmapcreator*/ ._initialize(ba,__ref._width /*int*/ ,__ref._height /*int*/ ); -RDebugUtils.currentLine=60686348; - //BA.debugLineNum = 60686348;BA.debugLine="Scale = xui.Scale"; -__ref._scale /*float*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getScale(); -RDebugUtils.currentLine=60686353; - //BA.debugLineNum = 60686353;BA.debugLine="OnColor = bc.CreateBrushFromColor(xui.PaintOrColo"; -__ref._oncolor /*b4a.example.bcpath._bcbrush*/ = __ref._bc /*b4a.example.bitmapcreator*/ ._createbrushfromcolor(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor(_props.Get((Object)("OnColor")))); -RDebugUtils.currentLine=60686354; - //BA.debugLineNum = 60686354;BA.debugLine="OffColor = bc.CreateBrushFromColor(xui.PaintOrCol"; -__ref._offcolor /*b4a.example.bcpath._bcbrush*/ = __ref._bc /*b4a.example.bitmapcreator*/ ._createbrushfromcolor(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor(_props.Get((Object)("OffColor")))); -RDebugUtils.currentLine=60686355; - //BA.debugLineNum = 60686355;BA.debugLine="ThumbColor = bc.CreateBrushFromColor(xui.PaintOrC"; -__ref._thumbcolor /*b4a.example.bcpath._bcbrush*/ = __ref._bc /*b4a.example.bitmapcreator*/ ._createbrushfromcolor(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor(_props.Get((Object)("ThumbColor")))); -RDebugUtils.currentLine=60686356; - //BA.debugLineNum = 60686356;BA.debugLine="mHaptic = Props.GetDefault(\"HapticFeedback\", Fals"; -__ref._mhaptic /*boolean*/ = BA.ObjectToBoolean(_props.GetDefault((Object)("HapticFeedback"),(Object)(__c.False))); -RDebugUtils.currentLine=60686357; - //BA.debugLineNum = 60686357;BA.debugLine="transparent = bc.CreateBrushFromColor(xui.Color_T"; -__ref._transparent /*b4a.example.bcpath._bcbrush*/ = __ref._bc /*b4a.example.bitmapcreator*/ ._createbrushfromcolor(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent); -RDebugUtils.currentLine=60686358; - //BA.debugLineNum = 60686358;BA.debugLine="mEnabled = mBase.Enabled"; -__ref._menabled /*boolean*/ = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getEnabled(); -RDebugUtils.currentLine=60686359; - //BA.debugLineNum = 60686359;BA.debugLine="mBase.Enabled = True"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setEnabled(__c.True); -RDebugUtils.currentLine=60686360; - //BA.debugLineNum = 60686360;BA.debugLine="SetValueImpl(Props.Get(\"Value\"), True)"; -__ref._setvalueimpl /*void*/ (null,BA.ObjectToBoolean(_props.Get((Object)("Value"))),__c.True); -RDebugUtils.currentLine=60686361; - //BA.debugLineNum = 60686361;BA.debugLine="End Sub"; +_pnl = _xui.CreatePanel(ba,"pnl"); + //BA.debugLineNum = 39;BA.debugLine="pnl.Color = xui.Color_Transparent"; +_pnl.setColor(_xui.Color_Transparent); + //BA.debugLineNum = 40;BA.debugLine="iv.Initialize(\"\")"; +_iv.Initialize(ba,""); + //BA.debugLineNum = 41;BA.debugLine="mBase.AddView(iv, 0, 0, Width, Height)"; +_mbase.AddView((android.view.View)(_iv.getObject()),(int) (0),(int) (0),_width,_height); + //BA.debugLineNum = 42;BA.debugLine="mBase.AddView(pnl, 0, 0, Width, Height)"; +_mbase.AddView((android.view.View)(_pnl.getObject()),(int) (0),(int) (0),_width,_height); + //BA.debugLineNum = 44;BA.debugLine="bc.Initialize(Width, Height)"; +_bc._initialize(ba,_width,_height); + //BA.debugLineNum = 45;BA.debugLine="Scale = xui.Scale"; +_scale = _xui.getScale(); + //BA.debugLineNum = 50;BA.debugLine="OnColor = bc.CreateBrushFromColor(xui.PaintOrColo"; +_oncolor = _bc._createbrushfromcolor(_xui.PaintOrColorToColor(_props.Get((Object)("OnColor")))); + //BA.debugLineNum = 51;BA.debugLine="OffColor = bc.CreateBrushFromColor(xui.PaintOrCol"; +_offcolor = _bc._createbrushfromcolor(_xui.PaintOrColorToColor(_props.Get((Object)("OffColor")))); + //BA.debugLineNum = 52;BA.debugLine="ThumbColor = bc.CreateBrushFromColor(xui.PaintOrC"; +_thumbcolor = _bc._createbrushfromcolor(_xui.PaintOrColorToColor(_props.Get((Object)("ThumbColor")))); + //BA.debugLineNum = 53;BA.debugLine="mHaptic = Props.GetDefault(\"HapticFeedback\", Fals"; +_mhaptic = BA.ObjectToBoolean(_props.GetDefault((Object)("HapticFeedback"),(Object)(__c.False))); + //BA.debugLineNum = 54;BA.debugLine="transparent = bc.CreateBrushFromColor(xui.Color_T"; +_transparent = _bc._createbrushfromcolor(_xui.Color_Transparent); + //BA.debugLineNum = 55;BA.debugLine="mEnabled = mBase.Enabled"; +_menabled = _mbase.getEnabled(); + //BA.debugLineNum = 56;BA.debugLine="mBase.Enabled = True"; +_mbase.setEnabled(__c.True); + //BA.debugLineNum = 57;BA.debugLine="SetValueImpl(Props.Get(\"Value\"), True)"; +_setvalueimpl(BA.ObjectToBoolean(_props.Get((Object)("Value"))),__c.True); + //BA.debugLineNum = 58;BA.debugLine="End Sub"; return ""; } -public void _setvalueimpl(keymon.lat.medicomed.b4xswitch __ref,boolean _b,boolean _immediate) throws Exception{ -RDebugUtils.currentModule="b4xswitch"; -if (Debug.shouldDelegate(ba, "setvalueimpl", true)) - {Debug.delegate(ba, "setvalueimpl", new Object[] {_b,_immediate}); return;} -ResumableSub_SetValueImpl rsub = new ResumableSub_SetValueImpl(this,__ref,_b,_immediate); +public String _draw(float _state) throws Exception{ +float _r = 0f; +float _cx = 0f; +int _cy = 0; +anywheresoftware.b4a.objects.B4XCanvas.B4XRect _smallrect = null; +float _w = 0f; +float _h = 0f; + //BA.debugLineNum = 126;BA.debugLine="Private Sub Draw (State As Float)"; + //BA.debugLineNum = 127;BA.debugLine="bc.DrawRect2(bc.TargetRect, transparent, True, 0)"; +_bc._drawrect2(_bc._targetrect,_transparent,__c.True,(int) (0)); + //BA.debugLineNum = 128;BA.debugLine="Dim r As Float = Round(bc.mHeight / 2)"; +_r = (float) (__c.Round(_bc._mheight/(double)2)); + //BA.debugLineNum = 129;BA.debugLine="Dim cx As Float = r - 1 * Scale + (bc.mWidth - 2"; +_cx = (float) (_r-1*_scale+(_bc._mwidth-2*_r)*_state); + //BA.debugLineNum = 130;BA.debugLine="If State = 0 Then"; +if (_state==0) { + //BA.debugLineNum = 131;BA.debugLine="cx = r"; +_cx = _r; + }else if(_state==1) { + //BA.debugLineNum = 133;BA.debugLine="cx = Round(bc.mWidth - 1 * Scale - r)"; +_cx = (float) (__c.Round(_bc._mwidth-1*_scale-_r)); + }; + //BA.debugLineNum = 135;BA.debugLine="Dim cy As Int = bc.mHeight / 2"; +_cy = (int) (_bc._mheight/(double)2); + //BA.debugLineNum = 136;BA.debugLine="Dim smallrect As B4XRect"; +_smallrect = new anywheresoftware.b4a.objects.B4XCanvas.B4XRect(); + //BA.debugLineNum = 137;BA.debugLine="Dim w As Float = State * bc.mWidth"; +_w = (float) (_state*_bc._mwidth); + //BA.debugLineNum = 138;BA.debugLine="Dim h As Float = State * bc.mHeight"; +_h = (float) (_state*_bc._mheight); + //BA.debugLineNum = 139;BA.debugLine="If State < 1 Then bc.DrawRectRounded2(bc.TargetRe"; +if (_state<1) { +_bc._drawrectrounded2(_bc._targetrect,_offcolor,__c.True,(int) (2*_scale),(int) (_r));}; + //BA.debugLineNum = 140;BA.debugLine="smallrect.Initialize(bc.mWidth / 2 - w / 2, cy -"; +_smallrect.Initialize((float) (_bc._mwidth/(double)2-_w/(double)2),(float) (_cy-_h/(double)2),(float) (_bc._mwidth/(double)2+_w/(double)2),(float) (_cy+_h/(double)2)); + //BA.debugLineNum = 141;BA.debugLine="If State > 0 Then bc.DrawRectRounded2(smallrect,"; +if (_state>0) { +_bc._drawrectrounded2(_smallrect,_oncolor,__c.True,(int) (2*_scale),(int) (_smallrect.getHeight()/(double)2));}; + //BA.debugLineNum = 142;BA.debugLine="If mEnabled Then"; +if (_menabled) { + //BA.debugLineNum = 143;BA.debugLine="bc.DrawCircle2(cx, cy, r - 2 * Scale, ThumbColor"; +_bc._drawcircle2(_cx,(float) (_cy),(float) (_r-2*_scale),_thumbcolor,__c.True,(int) (0)); + }; + //BA.debugLineNum = 145;BA.debugLine="bc.SetBitmapToImageView(bc.Bitmap, iv)"; +_bc._setbitmaptoimageview(_bc._getbitmap(),(anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_iv.getObject()))); + //BA.debugLineNum = 146;BA.debugLine="End Sub"; +return ""; +} +public boolean _getenabled() throws Exception{ + //BA.debugLineNum = 122;BA.debugLine="Public Sub getEnabled As Boolean"; + //BA.debugLineNum = 123;BA.debugLine="Return mEnabled"; +if (true) return _menabled; + //BA.debugLineNum = 124;BA.debugLine="End Sub"; +return false; +} +public boolean _getvalue() throws Exception{ + //BA.debugLineNum = 113;BA.debugLine="Public Sub getValue As Boolean"; + //BA.debugLineNum = 114;BA.debugLine="Return mValue"; +if (true) return _mvalue; + //BA.debugLineNum = 115;BA.debugLine="End Sub"; +return false; +} +public String _initialize(anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 27;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; + //BA.debugLineNum = 28;BA.debugLine="mEventName = EventName"; +_meventname = _eventname; + //BA.debugLineNum = 29;BA.debugLine="mCallBack = Callback"; +_mcallback = _callback; + //BA.debugLineNum = 30;BA.debugLine="End Sub"; +return ""; +} +public String _pnl_click() throws Exception{ + //BA.debugLineNum = 70;BA.debugLine="Private Sub pnl_Click"; + //BA.debugLineNum = 72;BA.debugLine="If mEnabled Then"; +if (_menabled) { + //BA.debugLineNum = 73;BA.debugLine="If mHaptic Then XUIViewsUtils.PerformHapticFeedb"; +if (_mhaptic) { +_xuiviewsutils._performhapticfeedback /*String*/ (ba,_mbase);}; + //BA.debugLineNum = 74;BA.debugLine="SetValueImpl(Not(mValue), False)"; +_setvalueimpl(__c.Not(_mvalue),__c.False); + //BA.debugLineNum = 75;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_Value"; +if (_xui.SubExists(ba,_mcallback,_meventname+"_ValueChanged",(int) (1))) { + //BA.debugLineNum = 76;BA.debugLine="CallSubDelayed2(mCallBack, mEventName & \"_Value"; +__c.CallSubDelayed2(ba,_mcallback,_meventname+"_ValueChanged",(Object)(_mvalue)); + }; + }; + //BA.debugLineNum = 79;BA.debugLine="End Sub"; +return ""; +} +public String _setenabled(boolean _b) throws Exception{ + //BA.debugLineNum = 117;BA.debugLine="Public Sub setEnabled (b As Boolean)"; + //BA.debugLineNum = 118;BA.debugLine="mEnabled = b"; +_menabled = _b; + //BA.debugLineNum = 119;BA.debugLine="SetValueImpl(mValue, True)"; +_setvalueimpl(_mvalue,__c.True); + //BA.debugLineNum = 120;BA.debugLine="End Sub"; +return ""; +} +public String _setvalue(boolean _b) throws Exception{ + //BA.debugLineNum = 108;BA.debugLine="Public Sub setValue(b As Boolean)"; + //BA.debugLineNum = 109;BA.debugLine="If b = mValue Then Return"; +if (_b==_mvalue) { +if (true) return "";}; + //BA.debugLineNum = 110;BA.debugLine="SetValueImpl(b, False)"; +_setvalueimpl(_b,__c.False); + //BA.debugLineNum = 111;BA.debugLine="End Sub"; +return ""; +} +public void _setvalueimpl(boolean _b,boolean _immediate) throws Exception{ +ResumableSub_SetValueImpl rsub = new ResumableSub_SetValueImpl(this,_b,_immediate); rsub.resume(ba, null); } public static class ResumableSub_SetValueImpl extends BA.ResumableSub { -public ResumableSub_SetValueImpl(keymon.lat.medicomed.b4xswitch parent,keymon.lat.medicomed.b4xswitch __ref,boolean _b,boolean _immediate) { +public ResumableSub_SetValueImpl(keymon.lat.medicomed.b4xswitch parent,boolean _b,boolean _immediate) { this.parent = parent; -this.__ref = __ref; this._b = _b; this._immediate = _immediate; -this.__ref = parent; } -keymon.lat.medicomed.b4xswitch __ref; keymon.lat.medicomed.b4xswitch parent; boolean _b; boolean _immediate; @@ -232,7 +275,6 @@ float _state1 = 0f; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="b4xswitch"; while (true) { switch (state) { @@ -242,14 +284,11 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=60817409; - //BA.debugLineNum = 60817409;BA.debugLine="mValue = b"; -__ref._mvalue /*boolean*/ = _b; -RDebugUtils.currentLine=60817410; - //BA.debugLineNum = 60817410;BA.debugLine="LoopIndex = LoopIndex + 1"; -__ref._loopindex /*int*/ = (int) (__ref._loopindex /*int*/ +1); -RDebugUtils.currentLine=60817411; - //BA.debugLineNum = 60817411;BA.debugLine="If Immediate Then"; + //BA.debugLineNum = 82;BA.debugLine="mValue = b"; +parent._mvalue = _b; + //BA.debugLineNum = 83;BA.debugLine="LoopIndex = LoopIndex + 1"; +parent._loopindex = (int) (parent._loopindex+1); + //BA.debugLineNum = 84;BA.debugLine="If Immediate Then"; if (true) break; case 1: @@ -264,14 +303,13 @@ this.state = 13; case 3: //C this.state = 4; -RDebugUtils.currentLine=60817412; - //BA.debugLineNum = 60817412;BA.debugLine="If mValue Then Draw(1) Else Draw(0)"; + //BA.debugLineNum = 85;BA.debugLine="If mValue Then Draw(1) Else Draw(0)"; if (true) break; case 4: //if this.state = 11; -if (__ref._mvalue /*boolean*/ ) { +if (parent._mvalue) { this.state = 6; ;} else { @@ -281,13 +319,13 @@ this.state = 8; case 6: //C this.state = 11; -__ref._draw /*String*/ (null,(float) (1)); +parent._draw((float) (1)); if (true) break; case 8: //C this.state = 11; -__ref._draw /*String*/ (null,(float) (0)); +parent._draw((float) (0)); if (true) break; case 11: @@ -299,17 +337,13 @@ this.state = 41; case 13: //C this.state = 14; -RDebugUtils.currentLine=60817414; - //BA.debugLineNum = 60817414;BA.debugLine="Dim MyIndex As Int = LoopIndex"; -_myindex = __ref._loopindex /*int*/ ; -RDebugUtils.currentLine=60817415; - //BA.debugLineNum = 60817415;BA.debugLine="Dim start As Long = DateTime.Now"; + //BA.debugLineNum = 87;BA.debugLine="Dim MyIndex As Int = LoopIndex"; +_myindex = parent._loopindex; + //BA.debugLineNum = 88;BA.debugLine="Dim start As Long = DateTime.Now"; _start = parent.__c.DateTime.getNow(); -RDebugUtils.currentLine=60817416; - //BA.debugLineNum = 60817416;BA.debugLine="Dim duration As Int = 200"; + //BA.debugLineNum = 89;BA.debugLine="Dim duration As Int = 200"; _duration = (int) (200); -RDebugUtils.currentLine=60817417; - //BA.debugLineNum = 60817417;BA.debugLine="Do While DateTime.Now < start + duration"; + //BA.debugLineNum = 90;BA.debugLine="Do While DateTime.Now < start + duration"; if (true) break; case 14: @@ -324,17 +358,15 @@ if (true) break; case 16: //C this.state = 17; -RDebugUtils.currentLine=60817418; - //BA.debugLineNum = 60817418;BA.debugLine="Dim state1 As Float = (DateTime.Now - start) /"; + //BA.debugLineNum = 91;BA.debugLine="Dim state1 As Float = (DateTime.Now - start) /"; _state1 = (float) ((parent.__c.DateTime.getNow()-_start)/(double)_duration); -RDebugUtils.currentLine=60817419; - //BA.debugLineNum = 60817419;BA.debugLine="If mValue = False Then state1 = 1 - state1"; + //BA.debugLineNum = 92;BA.debugLine="If mValue = False Then state1 = 1 - state1"; if (true) break; case 17: //if this.state = 22; -if (__ref._mvalue /*boolean*/ ==parent.__c.False) { +if (parent._mvalue==parent.__c.False) { this.state = 19; ;}if (true) break; @@ -348,26 +380,23 @@ case 22: //C this.state = 23; ; -RDebugUtils.currentLine=60817420; - //BA.debugLineNum = 60817420;BA.debugLine="Draw(state1)"; -__ref._draw /*String*/ (null,_state1); -RDebugUtils.currentLine=60817421; - //BA.debugLineNum = 60817421;BA.debugLine="Sleep(16)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "b4xswitch", "setvalueimpl"),(int) (16)); + //BA.debugLineNum = 93;BA.debugLine="Draw(state1)"; +parent._draw(_state1); + //BA.debugLineNum = 94;BA.debugLine="Sleep(16)"; +parent.__c.Sleep(ba,this,(int) (16)); this.state = 47; return; case 47: //C this.state = 23; ; -RDebugUtils.currentLine=60817422; - //BA.debugLineNum = 60817422;BA.debugLine="If MyIndex <> LoopIndex Then Exit"; + //BA.debugLineNum = 95;BA.debugLine="If MyIndex <> LoopIndex Then Exit"; if (true) break; case 23: //if this.state = 28; -if (_myindex!=__ref._loopindex /*int*/ ) { +if (_myindex!=parent._loopindex) { this.state = 25; ;}if (true) break; @@ -384,27 +413,25 @@ this.state = 14; ; if (true) break; ; -RDebugUtils.currentLine=60817424; - //BA.debugLineNum = 60817424;BA.debugLine="If MyIndex = LoopIndex Then"; + //BA.debugLineNum = 97;BA.debugLine="If MyIndex = LoopIndex Then"; case 29: //if this.state = 40; -if (_myindex==__ref._loopindex /*int*/ ) { +if (_myindex==parent._loopindex) { this.state = 31; }if (true) break; case 31: //C this.state = 32; -RDebugUtils.currentLine=60817425; - //BA.debugLineNum = 60817425;BA.debugLine="If mValue Then Draw(1) Else Draw(0)"; + //BA.debugLineNum = 98;BA.debugLine="If mValue Then Draw(1) Else Draw(0)"; if (true) break; case 32: //if this.state = 39; -if (__ref._mvalue /*boolean*/ ) { +if (parent._mvalue) { this.state = 34; ;} else { @@ -414,13 +441,13 @@ this.state = 36; case 34: //C this.state = 39; -__ref._draw /*String*/ (null,(float) (1)); +parent._draw((float) (1)); if (true) break; case 36: //C this.state = 39; -__ref._draw /*String*/ (null,(float) (0)); +parent._draw((float) (0)); if (true) break; case 39: @@ -435,13 +462,12 @@ this.state = 41; ; if (true) break; ; -RDebugUtils.currentLine=60817428; - //BA.debugLineNum = 60817428;BA.debugLine="If mEnabled Then"; + //BA.debugLineNum = 101;BA.debugLine="If mEnabled Then"; case 41: //if this.state = 46; -if (__ref._menabled /*boolean*/ ) { +if (parent._menabled) { this.state = 43; }else { this.state = 45; @@ -450,213 +476,30 @@ this.state = 45; case 43: //C this.state = 46; -RDebugUtils.currentLine=60817429; - //BA.debugLineNum = 60817429;BA.debugLine="XUIViewsUtils.SetAlpha(mBase, 1)"; -parent._xuiviewsutils._setalpha /*String*/ (ba,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ,(float) (1)); + //BA.debugLineNum = 102;BA.debugLine="XUIViewsUtils.SetAlpha(mBase, 1)"; +parent._xuiviewsutils._setalpha /*String*/ (ba,parent._mbase,(float) (1)); if (true) break; case 45: //C this.state = 46; -RDebugUtils.currentLine=60817431; - //BA.debugLineNum = 60817431;BA.debugLine="XUIViewsUtils.SetAlpha(mBase, 0.6)"; -parent._xuiviewsutils._setalpha /*String*/ (ba,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ,(float) (0.6)); + //BA.debugLineNum = 104;BA.debugLine="XUIViewsUtils.SetAlpha(mBase, 0.6)"; +parent._xuiviewsutils._setalpha /*String*/ (ba,parent._mbase,(float) (0.6)); if (true) break; case 46: //C this.state = -1; ; -RDebugUtils.currentLine=60817433; - //BA.debugLineNum = 60817433;BA.debugLine="End Sub"; + //BA.debugLineNum = 106;BA.debugLine="End Sub"; if (true) break; } } } } -public String _draw(keymon.lat.medicomed.b4xswitch __ref,float _state) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xswitch"; -if (Debug.shouldDelegate(ba, "draw", true)) - {return ((String) Debug.delegate(ba, "draw", new Object[] {_state}));} -float _r = 0f; -float _cx = 0f; -int _cy = 0; -anywheresoftware.b4a.objects.B4XCanvas.B4XRect _smallrect = null; -float _w = 0f; -float _h = 0f; -RDebugUtils.currentLine=61145088; - //BA.debugLineNum = 61145088;BA.debugLine="Private Sub Draw (State As Float)"; -RDebugUtils.currentLine=61145089; - //BA.debugLineNum = 61145089;BA.debugLine="bc.DrawRect2(bc.TargetRect, transparent, True, 0)"; -__ref._bc /*b4a.example.bitmapcreator*/ ._drawrect2(__ref._bc /*b4a.example.bitmapcreator*/ ._targetrect,__ref._transparent /*b4a.example.bcpath._bcbrush*/ ,__c.True,(int) (0)); -RDebugUtils.currentLine=61145090; - //BA.debugLineNum = 61145090;BA.debugLine="Dim r As Float = Round(bc.mHeight / 2)"; -_r = (float) (__c.Round(__ref._bc /*b4a.example.bitmapcreator*/ ._mheight/(double)2)); -RDebugUtils.currentLine=61145091; - //BA.debugLineNum = 61145091;BA.debugLine="Dim cx As Float = r - 1 * Scale + (bc.mWidth - 2"; -_cx = (float) (_r-1*__ref._scale /*float*/ +(__ref._bc /*b4a.example.bitmapcreator*/ ._mwidth-2*_r)*_state); -RDebugUtils.currentLine=61145092; - //BA.debugLineNum = 61145092;BA.debugLine="If State = 0 Then"; -if (_state==0) { -RDebugUtils.currentLine=61145093; - //BA.debugLineNum = 61145093;BA.debugLine="cx = r"; -_cx = _r; - }else -{RDebugUtils.currentLine=61145094; - //BA.debugLineNum = 61145094;BA.debugLine="Else If State = 1 Then"; -if (_state==1) { -RDebugUtils.currentLine=61145095; - //BA.debugLineNum = 61145095;BA.debugLine="cx = Round(bc.mWidth - 1 * Scale - r)"; -_cx = (float) (__c.Round(__ref._bc /*b4a.example.bitmapcreator*/ ._mwidth-1*__ref._scale /*float*/ -_r)); - }} -; -RDebugUtils.currentLine=61145097; - //BA.debugLineNum = 61145097;BA.debugLine="Dim cy As Int = bc.mHeight / 2"; -_cy = (int) (__ref._bc /*b4a.example.bitmapcreator*/ ._mheight/(double)2); -RDebugUtils.currentLine=61145098; - //BA.debugLineNum = 61145098;BA.debugLine="Dim smallrect As B4XRect"; -_smallrect = new anywheresoftware.b4a.objects.B4XCanvas.B4XRect(); -RDebugUtils.currentLine=61145099; - //BA.debugLineNum = 61145099;BA.debugLine="Dim w As Float = State * bc.mWidth"; -_w = (float) (_state*__ref._bc /*b4a.example.bitmapcreator*/ ._mwidth); -RDebugUtils.currentLine=61145100; - //BA.debugLineNum = 61145100;BA.debugLine="Dim h As Float = State * bc.mHeight"; -_h = (float) (_state*__ref._bc /*b4a.example.bitmapcreator*/ ._mheight); -RDebugUtils.currentLine=61145101; - //BA.debugLineNum = 61145101;BA.debugLine="If State < 1 Then bc.DrawRectRounded2(bc.TargetRe"; -if (_state<1) { -__ref._bc /*b4a.example.bitmapcreator*/ ._drawrectrounded2(__ref._bc /*b4a.example.bitmapcreator*/ ._targetrect,__ref._offcolor /*b4a.example.bcpath._bcbrush*/ ,__c.True,(int) (2*__ref._scale /*float*/ ),(int) (_r));}; -RDebugUtils.currentLine=61145102; - //BA.debugLineNum = 61145102;BA.debugLine="smallrect.Initialize(bc.mWidth / 2 - w / 2, cy -"; -_smallrect.Initialize((float) (__ref._bc /*b4a.example.bitmapcreator*/ ._mwidth/(double)2-_w/(double)2),(float) (_cy-_h/(double)2),(float) (__ref._bc /*b4a.example.bitmapcreator*/ ._mwidth/(double)2+_w/(double)2),(float) (_cy+_h/(double)2)); -RDebugUtils.currentLine=61145103; - //BA.debugLineNum = 61145103;BA.debugLine="If State > 0 Then bc.DrawRectRounded2(smallrect,"; -if (_state>0) { -__ref._bc /*b4a.example.bitmapcreator*/ ._drawrectrounded2(_smallrect,__ref._oncolor /*b4a.example.bcpath._bcbrush*/ ,__c.True,(int) (2*__ref._scale /*float*/ ),(int) (_smallrect.getHeight()/(double)2));}; -RDebugUtils.currentLine=61145104; - //BA.debugLineNum = 61145104;BA.debugLine="If mEnabled Then"; -if (__ref._menabled /*boolean*/ ) { -RDebugUtils.currentLine=61145105; - //BA.debugLineNum = 61145105;BA.debugLine="bc.DrawCircle2(cx, cy, r - 2 * Scale, ThumbColor"; -__ref._bc /*b4a.example.bitmapcreator*/ ._drawcircle2(_cx,(float) (_cy),(float) (_r-2*__ref._scale /*float*/ ),__ref._thumbcolor /*b4a.example.bcpath._bcbrush*/ ,__c.True,(int) (0)); - }; -RDebugUtils.currentLine=61145107; - //BA.debugLineNum = 61145107;BA.debugLine="bc.SetBitmapToImageView(bc.Bitmap, iv)"; -__ref._bc /*b4a.example.bitmapcreator*/ ._setbitmaptoimageview(__ref._bc /*b4a.example.bitmapcreator*/ ._getbitmap(),(anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__ref._iv /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .getObject()))); -RDebugUtils.currentLine=61145108; - //BA.debugLineNum = 61145108;BA.debugLine="End Sub"; -return ""; +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; } -public boolean _getenabled(keymon.lat.medicomed.b4xswitch __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xswitch"; -if (Debug.shouldDelegate(ba, "getenabled", true)) - {return ((Boolean) Debug.delegate(ba, "getenabled", null));} -RDebugUtils.currentLine=61079552; - //BA.debugLineNum = 61079552;BA.debugLine="Public Sub getEnabled As Boolean"; -RDebugUtils.currentLine=61079553; - //BA.debugLineNum = 61079553;BA.debugLine="Return mEnabled"; -if (true) return __ref._menabled /*boolean*/ ; -RDebugUtils.currentLine=61079554; - //BA.debugLineNum = 61079554;BA.debugLine="End Sub"; -return false; } -public boolean _getvalue(keymon.lat.medicomed.b4xswitch __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xswitch"; -if (Debug.shouldDelegate(ba, "getvalue", true)) - {return ((Boolean) Debug.delegate(ba, "getvalue", null));} -RDebugUtils.currentLine=60948480; - //BA.debugLineNum = 60948480;BA.debugLine="Public Sub getValue As Boolean"; -RDebugUtils.currentLine=60948481; - //BA.debugLineNum = 60948481;BA.debugLine="Return mValue"; -if (true) return __ref._mvalue /*boolean*/ ; -RDebugUtils.currentLine=60948482; - //BA.debugLineNum = 60948482;BA.debugLine="End Sub"; -return false; -} -public String _initialize(keymon.lat.medicomed.b4xswitch __ref,anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="b4xswitch"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_callback,_eventname}));} -RDebugUtils.currentLine=60620800; - //BA.debugLineNum = 60620800;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -RDebugUtils.currentLine=60620801; - //BA.debugLineNum = 60620801;BA.debugLine="mEventName = EventName"; -__ref._meventname /*String*/ = _eventname; -RDebugUtils.currentLine=60620802; - //BA.debugLineNum = 60620802;BA.debugLine="mCallBack = Callback"; -__ref._mcallback /*Object*/ = _callback; -RDebugUtils.currentLine=60620803; - //BA.debugLineNum = 60620803;BA.debugLine="End Sub"; -return ""; -} -public String _pnl_click(keymon.lat.medicomed.b4xswitch __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xswitch"; -if (Debug.shouldDelegate(ba, "pnl_click", true)) - {return ((String) Debug.delegate(ba, "pnl_click", null));} -RDebugUtils.currentLine=60751872; - //BA.debugLineNum = 60751872;BA.debugLine="Private Sub pnl_Click"; -RDebugUtils.currentLine=60751874; - //BA.debugLineNum = 60751874;BA.debugLine="If mEnabled Then"; -if (__ref._menabled /*boolean*/ ) { -RDebugUtils.currentLine=60751875; - //BA.debugLineNum = 60751875;BA.debugLine="If mHaptic Then XUIViewsUtils.PerformHapticFeedb"; -if (__ref._mhaptic /*boolean*/ ) { -_xuiviewsutils._performhapticfeedback /*String*/ (ba,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ );}; -RDebugUtils.currentLine=60751876; - //BA.debugLineNum = 60751876;BA.debugLine="SetValueImpl(Not(mValue), False)"; -__ref._setvalueimpl /*void*/ (null,__c.Not(__ref._mvalue /*boolean*/ ),__c.False); -RDebugUtils.currentLine=60751877; - //BA.debugLineNum = 60751877;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_Value"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .SubExists(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_ValueChanged",(int) (1))) { -RDebugUtils.currentLine=60751878; - //BA.debugLineNum = 60751878;BA.debugLine="CallSubDelayed2(mCallBack, mEventName & \"_Value"; -__c.CallSubDelayed2(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_ValueChanged",(Object)(__ref._mvalue /*boolean*/ )); - }; - }; -RDebugUtils.currentLine=60751881; - //BA.debugLineNum = 60751881;BA.debugLine="End Sub"; -return ""; -} -public String _setenabled(keymon.lat.medicomed.b4xswitch __ref,boolean _b) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xswitch"; -if (Debug.shouldDelegate(ba, "setenabled", true)) - {return ((String) Debug.delegate(ba, "setenabled", new Object[] {_b}));} -RDebugUtils.currentLine=61014016; - //BA.debugLineNum = 61014016;BA.debugLine="Public Sub setEnabled (b As Boolean)"; -RDebugUtils.currentLine=61014017; - //BA.debugLineNum = 61014017;BA.debugLine="mEnabled = b"; -__ref._menabled /*boolean*/ = _b; -RDebugUtils.currentLine=61014018; - //BA.debugLineNum = 61014018;BA.debugLine="SetValueImpl(mValue, True)"; -__ref._setvalueimpl /*void*/ (null,__ref._mvalue /*boolean*/ ,__c.True); -RDebugUtils.currentLine=61014019; - //BA.debugLineNum = 61014019;BA.debugLine="End Sub"; -return ""; -} -public String _setvalue(keymon.lat.medicomed.b4xswitch __ref,boolean _b) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xswitch"; -if (Debug.shouldDelegate(ba, "setvalue", true)) - {return ((String) Debug.delegate(ba, "setvalue", new Object[] {_b}));} -RDebugUtils.currentLine=60882944; - //BA.debugLineNum = 60882944;BA.debugLine="Public Sub setValue(b As Boolean)"; -RDebugUtils.currentLine=60882945; - //BA.debugLineNum = 60882945;BA.debugLine="If b = mValue Then Return"; -if (_b==__ref._mvalue /*boolean*/ ) { -if (true) return "";}; -RDebugUtils.currentLine=60882946; - //BA.debugLineNum = 60882946;BA.debugLine="SetValueImpl(b, False)"; -__ref._setvalueimpl /*void*/ (null,_b,__c.False); -RDebugUtils.currentLine=60882947; - //BA.debugLineNum = 60882947;BA.debugLine="End Sub"; -return ""; -} -} \ No newline at end of file diff --git a/B4A/Objects/src/keymon/lat/medicomed/b4xtimedtemplate.java b/B4A/Objects/src/keymon/lat/medicomed/b4xtimedtemplate.java index dc5f64f..19fd01c 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/b4xtimedtemplate.java +++ b/B4A/Objects/src/keymon/lat/medicomed/b4xtimedtemplate.java @@ -10,7 +10,7 @@ public class b4xtimedtemplate extends B4AClass.ImplB4AClass implements BA.SubDel private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.b4xtimedtemplate"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.b4xtimedtemplate"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class b4xtimedtemplate extends B4AClass.ImplB4AClass implements BA.SubDel 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.keywords.Common __c = null; public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null; public keymon.lat.medicomed.anotherprogressbar _anotherprogressbar1 = null; @@ -49,67 +42,82 @@ 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 anywheresoftware.b4a.objects.B4XViewWrapper _getpanel(keymon.lat.medicomed.b4xtimedtemplate __ref,keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xtimedtemplate"; -if (Debug.shouldDelegate(ba, "getpanel", true)) - {return ((anywheresoftware.b4a.objects.B4XViewWrapper) Debug.delegate(ba, "getpanel", new Object[] {_dialog}));} +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Private xui As XUI"; +_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); + //BA.debugLineNum = 3;BA.debugLine="Public mBase As B4XView"; +_mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 4;BA.debugLine="Private AnotherProgressBar1 As AnotherProgressBar"; +_anotherprogressbar1 = new keymon.lat.medicomed.anotherprogressbar(); + //BA.debugLineNum = 5;BA.debugLine="Private mTemplate As Object"; +_mtemplate = new Object(); + //BA.debugLineNum = 6;BA.debugLine="Public TimeoutMilliseconds As Int = 10000"; +_timeoutmilliseconds = (int) (10000); + //BA.debugLineNum = 7;BA.debugLine="Private Index As Int"; +_index = 0; + //BA.debugLineNum = 8;BA.debugLine="End Sub"; +return ""; +} +public String _dialogclosed(int _result) throws Exception{ + //BA.debugLineNum = 41;BA.debugLine="Private Sub DialogClosed(Result As Int)"; + //BA.debugLineNum = 42;BA.debugLine="Index = Index + 1"; +_index = (int) (_index+1); + //BA.debugLineNum = 43;BA.debugLine="CallSub2(mTemplate, \"DialogClosed\", Result)"; +__c.CallSubNew2(ba,_mtemplate,"DialogClosed",(Object)(_result)); + //BA.debugLineNum = 44;BA.debugLine="End Sub"; +return ""; +} +public anywheresoftware.b4a.objects.B4XViewWrapper _getpanel(keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ anywheresoftware.b4a.objects.B4XViewWrapper _innerpanel = null; -RDebugUtils.currentLine=61407232; - //BA.debugLineNum = 61407232;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; -RDebugUtils.currentLine=61407233; - //BA.debugLineNum = 61407233;BA.debugLine="If mBase.NumberOfViews = 0 Then"; -if (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getNumberOfViews()==0) { -RDebugUtils.currentLine=61407234; - //BA.debugLineNum = 61407234;BA.debugLine="Dim InnerPanel As B4XView = CallSub2(mTemplate,"; + //BA.debugLineNum = 16;BA.debugLine="Public Sub GetPanel (Dialog As B4XDialog) As B4XVi"; + //BA.debugLineNum = 17;BA.debugLine="If mBase.NumberOfViews = 0 Then"; +if (_mbase.getNumberOfViews()==0) { + //BA.debugLineNum = 18;BA.debugLine="Dim InnerPanel As B4XView = CallSub2(mTemplate,"; _innerpanel = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_innerpanel = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.CallSubDebug2(ba,__ref._mtemplate /*Object*/ ,"GetPanel",(Object)(_dialog)))); -RDebugUtils.currentLine=61407235; - //BA.debugLineNum = 61407235;BA.debugLine="If InnerPanel.Parent.IsInitialized Then InnerPan"; +_innerpanel = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.CallSubNew2(ba,_mtemplate,"GetPanel",(Object)(_dialog)))); + //BA.debugLineNum = 19;BA.debugLine="If InnerPanel.Parent.IsInitialized Then InnerPan"; if (_innerpanel.getParent().IsInitialized()) { _innerpanel.RemoveViewFromParent();}; -RDebugUtils.currentLine=61407236; - //BA.debugLineNum = 61407236;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, InnerPanel.Widt"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),_innerpanel.getWidth(),(int) (_innerpanel.getHeight()+__c.DipToCurrent((int) (19)))); -RDebugUtils.currentLine=61407237; - //BA.debugLineNum = 61407237;BA.debugLine="mBase.LoadLayout(\"TimedDialogTemplate\")"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .LoadLayout("TimedDialogTemplate",ba); -RDebugUtils.currentLine=61407238; - //BA.debugLineNum = 61407238;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetColorAndBorder(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent,(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=61407239; - //BA.debugLineNum = 61407239;BA.debugLine="mBase.AddView(InnerPanel, 0, 19dip, InnerPanel.W"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(_innerpanel.getObject()),(int) (0),__c.DipToCurrent((int) (19)),_innerpanel.getWidth(),_innerpanel.getHeight()); + //BA.debugLineNum = 20;BA.debugLine="mBase.SetLayoutAnimated(0, 0, 0, InnerPanel.Widt"; +_mbase.SetLayoutAnimated((int) (0),(int) (0),(int) (0),_innerpanel.getWidth(),(int) (_innerpanel.getHeight()+__c.DipToCurrent((int) (19)))); + //BA.debugLineNum = 21;BA.debugLine="mBase.LoadLayout(\"TimedDialogTemplate\")"; +_mbase.LoadLayout("TimedDialogTemplate",ba); + //BA.debugLineNum = 22;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0"; +_mbase.SetColorAndBorder(_xui.Color_Transparent,(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 23;BA.debugLine="mBase.AddView(InnerPanel, 0, 19dip, InnerPanel.W"; +_mbase.AddView((android.view.View)(_innerpanel.getObject()),(int) (0),__c.DipToCurrent((int) (19)),_innerpanel.getWidth(),_innerpanel.getHeight()); }; -RDebugUtils.currentLine=61407241; - //BA.debugLineNum = 61407241;BA.debugLine="Return mBase"; -if (true) return __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ; -RDebugUtils.currentLine=61407242; - //BA.debugLineNum = 61407242;BA.debugLine="End Sub"; + //BA.debugLineNum = 25;BA.debugLine="Return mBase"; +if (true) return _mbase; + //BA.debugLineNum = 26;BA.debugLine="End Sub"; return null; } -public void _show(keymon.lat.medicomed.b4xtimedtemplate __ref,keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ -RDebugUtils.currentModule="b4xtimedtemplate"; -if (Debug.shouldDelegate(ba, "show", true)) - {Debug.delegate(ba, "show", new Object[] {_dialog}); return;} -ResumableSub_Show rsub = new ResumableSub_Show(this,__ref,_dialog); +public String _initialize(anywheresoftware.b4a.BA _ba,Object _innertemplate) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 10;BA.debugLine="Public Sub Initialize (InnerTemplate As Object)"; + //BA.debugLineNum = 11;BA.debugLine="mBase = xui.CreatePanel(\"mBase\")"; +_mbase = _xui.CreatePanel(ba,"mBase"); + //BA.debugLineNum = 12;BA.debugLine="mTemplate = InnerTemplate"; +_mtemplate = _innertemplate; + //BA.debugLineNum = 14;BA.debugLine="End Sub"; +return ""; +} +public void _show(keymon.lat.medicomed.b4xdialog _dialog) throws Exception{ +ResumableSub_Show rsub = new ResumableSub_Show(this,_dialog); rsub.resume(ba, null); } public static class ResumableSub_Show extends BA.ResumableSub { -public ResumableSub_Show(keymon.lat.medicomed.b4xtimedtemplate parent,keymon.lat.medicomed.b4xtimedtemplate __ref,keymon.lat.medicomed.b4xdialog _dialog) { +public ResumableSub_Show(keymon.lat.medicomed.b4xtimedtemplate parent,keymon.lat.medicomed.b4xdialog _dialog) { this.parent = parent; -this.__ref = __ref; this._dialog = _dialog; -this.__ref = parent; } -keymon.lat.medicomed.b4xtimedtemplate __ref; keymon.lat.medicomed.b4xtimedtemplate parent; keymon.lat.medicomed.b4xdialog _dialog; int _myindex = 0; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="b4xtimedtemplate"; while (true) { switch (state) { @@ -119,124 +127,60 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=61472769; - //BA.debugLineNum = 61472769;BA.debugLine="CallSub2(mTemplate, \"Show\", Dialog)"; -parent.__c.CallSubDebug2(ba,__ref._mtemplate /*Object*/ ,"Show",(Object)(_dialog)); -RDebugUtils.currentLine=61472770; - //BA.debugLineNum = 61472770;BA.debugLine="AnotherProgressBar1.SetValueNoAnimation(0)"; -__ref._anotherprogressbar1 /*keymon.lat.medicomed.anotherprogressbar*/ ._setvaluenoanimation /*String*/ (null,(int) (0)); -RDebugUtils.currentLine=61472771; - //BA.debugLineNum = 61472771;BA.debugLine="AnotherProgressBar1.ValueChangePerSecond = 100 /"; -__ref._anotherprogressbar1 /*keymon.lat.medicomed.anotherprogressbar*/ ._valuechangepersecond /*float*/ = (float) (100/(double)(__ref._timeoutmilliseconds /*int*/ /(double)1000)); -RDebugUtils.currentLine=61472772; - //BA.debugLineNum = 61472772;BA.debugLine="AnotherProgressBar1.Value = 100"; -__ref._anotherprogressbar1 /*keymon.lat.medicomed.anotherprogressbar*/ ._setvalue /*int*/ (null,(int) (100)); -RDebugUtils.currentLine=61472773; - //BA.debugLineNum = 61472773;BA.debugLine="Index = Index + 1"; -__ref._index /*int*/ = (int) (__ref._index /*int*/ +1); -RDebugUtils.currentLine=61472774; - //BA.debugLineNum = 61472774;BA.debugLine="Dim MyIndex As Int = Index"; -_myindex = __ref._index /*int*/ ; -RDebugUtils.currentLine=61472775; - //BA.debugLineNum = 61472775;BA.debugLine="Sleep(TimeoutMilliseconds)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "b4xtimedtemplate", "show"),__ref._timeoutmilliseconds /*int*/ ); + //BA.debugLineNum = 29;BA.debugLine="CallSub2(mTemplate, \"Show\", Dialog)"; +parent.__c.CallSubNew2(ba,parent._mtemplate,"Show",(Object)(_dialog)); + //BA.debugLineNum = 30;BA.debugLine="AnotherProgressBar1.SetValueNoAnimation(0)"; +parent._anotherprogressbar1._setvaluenoanimation /*String*/ ((int) (0)); + //BA.debugLineNum = 31;BA.debugLine="AnotherProgressBar1.ValueChangePerSecond = 100 /"; +parent._anotherprogressbar1._valuechangepersecond /*float*/ = (float) (100/(double)(parent._timeoutmilliseconds/(double)1000)); + //BA.debugLineNum = 32;BA.debugLine="AnotherProgressBar1.Value = 100"; +parent._anotherprogressbar1._setvalue /*int*/ ((int) (100)); + //BA.debugLineNum = 33;BA.debugLine="Index = Index + 1"; +parent._index = (int) (parent._index+1); + //BA.debugLineNum = 34;BA.debugLine="Dim MyIndex As Int = Index"; +_myindex = parent._index; + //BA.debugLineNum = 35;BA.debugLine="Sleep(TimeoutMilliseconds)"; +parent.__c.Sleep(ba,this,parent._timeoutmilliseconds); this.state = 5; return; case 5: //C this.state = 1; ; -RDebugUtils.currentLine=61472776; - //BA.debugLineNum = 61472776;BA.debugLine="If MyIndex = Index Then"; + //BA.debugLineNum = 36;BA.debugLine="If MyIndex = Index Then"; if (true) break; case 1: //if this.state = 4; -if (_myindex==__ref._index /*int*/ ) { +if (_myindex==parent._index) { this.state = 3; }if (true) break; case 3: //C this.state = 4; -RDebugUtils.currentLine=61472777; - //BA.debugLineNum = 61472777;BA.debugLine="Dialog.Close(xui.DialogResponse_Cancel)"; -_dialog._close /*boolean*/ (null,__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .DialogResponse_Cancel); + //BA.debugLineNum = 37;BA.debugLine="Dialog.Close(xui.DialogResponse_Cancel)"; +_dialog._close /*boolean*/ (parent._xui.DialogResponse_Cancel); if (true) break; case 4: //C this.state = -1; ; -RDebugUtils.currentLine=61472779; - //BA.debugLineNum = 61472779;BA.debugLine="End Sub"; + //BA.debugLineNum = 39;BA.debugLine="End Sub"; if (true) break; } } } } -public String _dialogclosed(keymon.lat.medicomed.b4xtimedtemplate __ref,int _result) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xtimedtemplate"; -if (Debug.shouldDelegate(ba, "dialogclosed", true)) - {return ((String) Debug.delegate(ba, "dialogclosed", new Object[] {_result}));} -RDebugUtils.currentLine=61538304; - //BA.debugLineNum = 61538304;BA.debugLine="Private Sub DialogClosed(Result As Int)"; -RDebugUtils.currentLine=61538305; - //BA.debugLineNum = 61538305;BA.debugLine="Index = Index + 1"; -__ref._index /*int*/ = (int) (__ref._index /*int*/ +1); -RDebugUtils.currentLine=61538306; - //BA.debugLineNum = 61538306;BA.debugLine="CallSub2(mTemplate, \"DialogClosed\", Result)"; -__c.CallSubDebug2(ba,__ref._mtemplate /*Object*/ ,"DialogClosed",(Object)(_result)); -RDebugUtils.currentLine=61538307; - //BA.debugLineNum = 61538307;BA.debugLine="End Sub"; -return ""; +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +if (BA.fastSubCompare(sub, "DIALOGCLOSED")) + return _dialogclosed(((Number)args[0]).intValue()); +if (BA.fastSubCompare(sub, "GETPANEL")) + return _getpanel((keymon.lat.medicomed.b4xdialog) args[0]); +return BA.SubDelegator.SubNotFound; } -public String _class_globals(keymon.lat.medicomed.b4xtimedtemplate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="b4xtimedtemplate"; -RDebugUtils.currentLine=61276160; - //BA.debugLineNum = 61276160;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=61276161; - //BA.debugLineNum = 61276161;BA.debugLine="Private xui As XUI"; -_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=61276162; - //BA.debugLineNum = 61276162;BA.debugLine="Public mBase As B4XView"; -_mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=61276163; - //BA.debugLineNum = 61276163;BA.debugLine="Private AnotherProgressBar1 As AnotherProgressBar"; -_anotherprogressbar1 = new keymon.lat.medicomed.anotherprogressbar(); -RDebugUtils.currentLine=61276164; - //BA.debugLineNum = 61276164;BA.debugLine="Private mTemplate As Object"; -_mtemplate = new Object(); -RDebugUtils.currentLine=61276165; - //BA.debugLineNum = 61276165;BA.debugLine="Public TimeoutMilliseconds As Int = 10000"; -_timeoutmilliseconds = (int) (10000); -RDebugUtils.currentLine=61276166; - //BA.debugLineNum = 61276166;BA.debugLine="Private Index As Int"; -_index = 0; -RDebugUtils.currentLine=61276167; - //BA.debugLineNum = 61276167;BA.debugLine="End Sub"; -return ""; } -public String _initialize(keymon.lat.medicomed.b4xtimedtemplate __ref,anywheresoftware.b4a.BA _ba,Object _innertemplate) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="b4xtimedtemplate"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_innertemplate}));} -RDebugUtils.currentLine=61341696; - //BA.debugLineNum = 61341696;BA.debugLine="Public Sub Initialize (InnerTemplate As Object)"; -RDebugUtils.currentLine=61341697; - //BA.debugLineNum = 61341697;BA.debugLine="mBase = xui.CreatePanel(\"mBase\")"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,"mBase"); -RDebugUtils.currentLine=61341698; - //BA.debugLineNum = 61341698;BA.debugLine="mTemplate = InnerTemplate"; -__ref._mtemplate /*Object*/ = _innertemplate; -RDebugUtils.currentLine=61341700; - //BA.debugLineNum = 61341700;BA.debugLine="End Sub"; -return ""; -} -} \ No newline at end of file diff --git a/B4A/Objects/src/keymon/lat/medicomed/batteryutilities.java b/B4A/Objects/src/keymon/lat/medicomed/batteryutilities.java index ca5bb1f..6331fc0 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/batteryutilities.java +++ b/B4A/Objects/src/keymon/lat/medicomed/batteryutilities.java @@ -17,7 +17,7 @@ public class batteryutilities extends B4AClass.ImplB4AClass implements BA.SubDel private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.batteryutilities"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.batteryutilities"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -30,14 +30,7 @@ public class batteryutilities extends B4AClass.ImplB4AClass implements BA.SubDel 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.keywords.Common __c = null; public anywheresoftware.b4j.object.JavaObject _nativeme = null; public b4a.example.dateutils _dateutils = null; public keymon.lat.medicomed.main _main = null; @@ -51,75 +44,49 @@ 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 _initialize(keymon.lat.medicomed.batteryutilities __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="batteryutilities"; -if (Debug.shouldDelegate(ba, "initialize", false)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=20185088; - //BA.debugLineNum = 20185088;BA.debugLine="Public Sub Initialize"; -RDebugUtils.currentLine=20185089; - //BA.debugLineNum = 20185089;BA.debugLine="nativeMe = Me"; -__ref._nativeme /*anywheresoftware.b4j.object.JavaObject*/ = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(this)); -RDebugUtils.currentLine=20185090; - //BA.debugLineNum = 20185090;BA.debugLine="End Sub"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 2;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 3;BA.debugLine="Private nativeMe As JavaObject"; +_nativeme = new anywheresoftware.b4j.object.JavaObject(); + //BA.debugLineNum = 5;BA.debugLine="End Sub"; return ""; } -public int[] _getbatteryinformation(keymon.lat.medicomed.batteryutilities __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="batteryutilities"; -if (Debug.shouldDelegate(ba, "getbatteryinformation", false)) - {return ((int[]) Debug.delegate(ba, "getbatteryinformation", null));} +public int[] _getbatteryinformation() throws Exception{ int[] _batteryinfo = null; -RDebugUtils.currentLine=20250624; - //BA.debugLineNum = 20250624;BA.debugLine="Public Sub getBatteryInformation () As Int()"; -RDebugUtils.currentLine=20250626; - //BA.debugLineNum = 20250626;BA.debugLine="Dim batteryInfo(11) As Int"; + //BA.debugLineNum = 22;BA.debugLine="Public Sub getBatteryInformation () As Int()"; + //BA.debugLineNum = 24;BA.debugLine="Dim batteryInfo(11) As Int"; _batteryinfo = new int[(int) (11)]; ; -RDebugUtils.currentLine=20250627; - //BA.debugLineNum = 20250627;BA.debugLine="batteryInfo = nativeMe.RunMethod(\"getBatteryInfor"; -_batteryinfo = (int[])(__ref._nativeme /*anywheresoftware.b4j.object.JavaObject*/ .RunMethod("getBatteryInformation",(Object[])(__c.Null))); -RDebugUtils.currentLine=20250628; - //BA.debugLineNum = 20250628;BA.debugLine="Return batteryInfo"; + //BA.debugLineNum = 25;BA.debugLine="batteryInfo = nativeMe.RunMethod(\"getBatteryInfor"; +_batteryinfo = (int[])(_nativeme.RunMethod("getBatteryInformation",(Object[])(__c.Null))); + //BA.debugLineNum = 26;BA.debugLine="Return batteryInfo"; if (true) return _batteryinfo; -RDebugUtils.currentLine=20250630; - //BA.debugLineNum = 20250630;BA.debugLine="End Sub"; + //BA.debugLineNum = 28;BA.debugLine="End Sub"; return null; } -public String _class_globals(keymon.lat.medicomed.batteryutilities __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="batteryutilities"; -RDebugUtils.currentLine=20119552; - //BA.debugLineNum = 20119552;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=20119553; - //BA.debugLineNum = 20119553;BA.debugLine="Private nativeMe As JavaObject"; -_nativeme = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=20119555; - //BA.debugLineNum = 20119555;BA.debugLine="End Sub"; +public String _getbatterytechnolgy() throws Exception{ +String _batterytech = ""; + //BA.debugLineNum = 30;BA.debugLine="Public Sub getBatteryTechnolgy() As String"; + //BA.debugLineNum = 32;BA.debugLine="Dim batterytech As String"; +_batterytech = ""; + //BA.debugLineNum = 33;BA.debugLine="batterytech = nativeMe.RunMethod(\"getBatteryTechn"; +_batterytech = BA.ObjectToString(_nativeme.RunMethod("getBatteryTechnology",(Object[])(__c.Null))); + //BA.debugLineNum = 34;BA.debugLine="Return batterytech"; +if (true) return _batterytech; + //BA.debugLineNum = 36;BA.debugLine="End Sub"; return ""; } -public String _getbatterytechnolgy(keymon.lat.medicomed.batteryutilities __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="batteryutilities"; -if (Debug.shouldDelegate(ba, "getbatterytechnolgy", false)) - {return ((String) Debug.delegate(ba, "getbatterytechnolgy", null));} -String _batterytech = ""; -RDebugUtils.currentLine=20316160; - //BA.debugLineNum = 20316160;BA.debugLine="Public Sub getBatteryTechnolgy() As String"; -RDebugUtils.currentLine=20316162; - //BA.debugLineNum = 20316162;BA.debugLine="Dim batterytech As String"; -_batterytech = ""; -RDebugUtils.currentLine=20316163; - //BA.debugLineNum = 20316163;BA.debugLine="batterytech = nativeMe.RunMethod(\"getBatteryTechn"; -_batterytech = BA.ObjectToString(__ref._nativeme /*anywheresoftware.b4j.object.JavaObject*/ .RunMethod("getBatteryTechnology",(Object[])(__c.Null))); -RDebugUtils.currentLine=20316164; - //BA.debugLineNum = 20316164;BA.debugLine="Return batterytech"; -if (true) return _batterytech; -RDebugUtils.currentLine=20316166; - //BA.debugLineNum = 20316166;BA.debugLine="End Sub"; +public String _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 7;BA.debugLine="Public Sub Initialize"; + //BA.debugLineNum = 8;BA.debugLine="nativeMe = Me"; +_nativeme = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(this)); + //BA.debugLineNum = 9;BA.debugLine="End Sub"; return ""; +} +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; } @@ -193,4 +160,4 @@ return ""; -} \ No newline at end of file +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/c_cliente.java b/B4A/Objects/src/keymon/lat/medicomed/c_cliente.java index 5a3fd40..801e1d8 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/c_cliente.java +++ b/B4A/Objects/src/keymon/lat/medicomed/c_cliente.java @@ -10,7 +10,7 @@ public class c_cliente extends B4AClass.ImplB4AClass implements BA.SubDelegator{ private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.c_cliente"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.c_cliente"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class c_cliente extends B4AClass.ImplB4AClass implements BA.SubDelegator{ 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.keywords.Common __c = null; public anywheresoftware.b4a.objects.B4XViewWrapper _root = null; public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; public anywheresoftware.b4a.objects.PanelWrapper _p_cliente = null; @@ -162,6 +155,7 @@ public anywheresoftware.b4a.objects.PanelWrapper _p_monto_venta = null; public anywheresoftware.b4a.objects.EditTextWrapper _et_monto_venta = null; public anywheresoftware.b4a.objects.ButtonWrapper _b_can_monto_venta = null; public anywheresoftware.b4a.objects.ButtonWrapper _b_gu_monto_venta = null; +public anywheresoftware.b4a.objects.PanelWrapper _p_inv = null; public b4a.example.dateutils _dateutils = null; public keymon.lat.medicomed.main _main = null; public keymon.lat.medicomed.starter _starter = null; @@ -174,41 +168,19 @@ 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_cliente __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "initialize", false)) - {return ((Object) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=5308416; - //BA.debugLineNum = 5308416;BA.debugLine="Public Sub Initialize As Object"; -RDebugUtils.currentLine=5308417; - //BA.debugLineNum = 5308417;BA.debugLine="Return Me"; -if (true) return this; -RDebugUtils.currentLine=5308418; - //BA.debugLineNum = 5308418;BA.debugLine="End Sub"; -return null; -} -public void _b_abono_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "b_abono_click", false)) - {Debug.delegate(ba, "b_abono_click", null); return;} -ResumableSub_b_abono_Click rsub = new ResumableSub_b_abono_Click(this,__ref); +public void _b_abono_click() throws Exception{ +ResumableSub_b_abono_Click rsub = new ResumableSub_b_abono_Click(this); rsub.resume(ba, null); } public static class ResumableSub_b_abono_Click extends BA.ResumableSub { -public ResumableSub_b_abono_Click(keymon.lat.medicomed.c_cliente parent,keymon.lat.medicomed.c_cliente __ref) { +public ResumableSub_b_abono_Click(keymon.lat.medicomed.c_cliente parent) { this.parent = parent; -this.__ref = __ref; -this.__ref = parent; } -keymon.lat.medicomed.c_cliente __ref; keymon.lat.medicomed.c_cliente parent; int _resultado = 0; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="c_cliente"; while (true) { switch (state) { @@ -218,38 +190,33 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=7667713; - //BA.debugLineNum = 7667713;BA.debugLine="p_abono.Visible = False"; -__ref._p_abono /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(parent.__c.False); -RDebugUtils.currentLine=7667714; - //BA.debugLineNum = 7667714;BA.debugLine="If et_abono.Text <> \"\" Then"; + //BA.debugLineNum = 966;BA.debugLine="p_abono.Visible = False"; +parent._p_abono.setVisible(parent.__c.False); + //BA.debugLineNum = 967;BA.debugLine="If et_abono.Text <> \"\" Then"; if (true) break; case 1: //if this.state = 8; -if ((__ref._et_abono /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()).equals("") == false) { +if ((parent._et_abono.getText()).equals("") == false) { this.state = 3; }if (true) break; case 3: //C this.state = 4; -RDebugUtils.currentLine=7667715; - //BA.debugLineNum = 7667715;BA.debugLine="Msgbox2Async($\"¿Seguro que quieres realizar un a"; -parent.__c.Msgbox2Async(BA.ObjectToCharSequence(("¿Seguro que quieres realizar un abono de $"+parent.__c.SmartStringFormatter("",(Object)(__ref._et_abono /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))+" para este cliente?")),BA.ObjectToCharSequence("Guardar Abono"),"Guardar","Cancelar","",(anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper(), (android.graphics.Bitmap)(parent.__c.Null)),ba,parent.__c.True); -RDebugUtils.currentLine=7667716; - //BA.debugLineNum = 7667716;BA.debugLine="Wait For Msgbox_Result (resultado As Int)"; -parent.__c.WaitFor("msgbox_result", ba, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "c_cliente", "b_abono_click"), null); + //BA.debugLineNum = 968;BA.debugLine="Msgbox2Async($\"¿Seguro que quieres realizar un a"; +parent.__c.Msgbox2Async(BA.ObjectToCharSequence(("¿Seguro que quieres realizar un abono de $"+parent.__c.SmartStringFormatter("",(Object)(parent._et_abono.getText()))+" para este cliente?")),BA.ObjectToCharSequence("Guardar Abono"),"Guardar","Cancelar","",(anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper(), (android.graphics.Bitmap)(parent.__c.Null)),ba,parent.__c.True); + //BA.debugLineNum = 969;BA.debugLine="Wait For Msgbox_Result (resultado As Int)"; +parent.__c.WaitFor("msgbox_result", ba, this, null); this.state = 9; return; case 9: //C this.state = 4; -_resultado = (Integer) result[1]; +_resultado = (Integer) result[0]; ; -RDebugUtils.currentLine=7667717; - //BA.debugLineNum = 7667717;BA.debugLine="If resultado = DialogResponse.POSITIVE Then"; + //BA.debugLineNum = 970;BA.debugLine="If resultado = DialogResponse.POSITIVE Then"; if (true) break; case 4: @@ -262,11 +229,9 @@ this.state = 6; case 6: //C this.state = 7; -RDebugUtils.currentLine=7667718; - //BA.debugLineNum = 7667718;BA.debugLine="skmt.ExecNonQuery($\"INSERT INTO ABONOS(a_usuari"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("INSERT INTO ABONOS(a_usuario, a_ruta, a_cliente, a_abono, a_fecha) VALUES ('"+parent.__c.SmartStringFormatter("",(Object)(parent._subs._traeusuariodebd /*String*/ (ba)))+"', '"+parent.__c.SmartStringFormatter("",(Object)(parent._subs._traeruta /*String*/ (ba)))+"', '"+parent.__c.SmartStringFormatter("",(Object)(parent._subs._traecliente /*String*/ (ba)))+"' ,'"+parent.__c.SmartStringFormatter("",(Object)(__ref._et_abono /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))+"', '"+parent.__c.SmartStringFormatter("",(Object)(parent._subs._fechakmt /*String*/ (ba,BA.NumberToString(parent.__c.DateTime.getNow()))))+"')")); -RDebugUtils.currentLine=7667719; - //BA.debugLineNum = 7667719;BA.debugLine="ToastMessageShow(\"Abono guardado\", False)"; + //BA.debugLineNum = 971;BA.debugLine="skmt.ExecNonQuery($\"INSERT INTO ABONOS(a_usuari"; +parent._skmt.ExecNonQuery(("INSERT INTO ABONOS(a_usuario, a_ruta, a_cliente, a_abono, a_fecha) VALUES ('"+parent.__c.SmartStringFormatter("",(Object)(parent._subs._traeusuariodebd /*String*/ (ba)))+"', '"+parent.__c.SmartStringFormatter("",(Object)(parent._subs._traeruta /*String*/ (ba)))+"', '"+parent.__c.SmartStringFormatter("",(Object)(parent._subs._traecliente /*String*/ (ba)))+"' ,'"+parent.__c.SmartStringFormatter("",(Object)(parent._et_abono.getText()))+"', '"+parent.__c.SmartStringFormatter("",(Object)(parent._subs._fechakmt /*String*/ (ba,BA.NumberToString(parent.__c.DateTime.getNow()))))+"')")); + //BA.debugLineNum = 972;BA.debugLine="ToastMessageShow(\"Abono guardado\", False)"; parent.__c.ToastMessageShow(BA.ObjectToCharSequence("Abono guardado"),parent.__c.False); if (true) break; @@ -280,1058 +245,615 @@ case 8: //C this.state = -1; ; -RDebugUtils.currentLine=7667722; - //BA.debugLineNum = 7667722;BA.debugLine="et_abono.Text = \"\""; -__ref._et_abono /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence("")); -RDebugUtils.currentLine=7667723; - //BA.debugLineNum = 7667723;BA.debugLine="ime.HideKeyboard"; -__ref._ime /*anywheresoftware.b4a.objects.IME*/ .HideKeyboard(ba); -RDebugUtils.currentLine=7667724; - //BA.debugLineNum = 7667724;BA.debugLine="End Sub"; + //BA.debugLineNum = 975;BA.debugLine="et_abono.Text = \"\""; +parent._et_abono.setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 976;BA.debugLine="ime.HideKeyboard"; +parent._ime.HideKeyboard(ba); + //BA.debugLineNum = 977;BA.debugLine="End Sub"; if (true) break; } } } } -public String _b_abono1_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "b_abono1_click", false)) - {return ((String) Debug.delegate(ba, "b_abono1_click", null));} -RDebugUtils.currentLine=7798784; - //BA.debugLineNum = 7798784;BA.debugLine="Private Sub b_abono1_Click"; -RDebugUtils.currentLine=7798785; - //BA.debugLineNum = 7798785;BA.debugLine="p_abono.Visible = True"; -__ref._p_abono /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=7798786; - //BA.debugLineNum = 7798786;BA.debugLine="End Sub"; +public void _msgbox_result(int _resultado) throws Exception{ +} +public String _b_abono1_click() throws Exception{ + //BA.debugLineNum = 985;BA.debugLine="Private Sub b_abono1_Click"; + //BA.debugLineNum = 986;BA.debugLine="p_abono.Visible = True"; +_p_abono.setVisible(__c.True); + //BA.debugLineNum = 987;BA.debugLine="End Sub"; return ""; } -public String _b_can_monto_venta_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "b_can_monto_venta_click", false)) - {return ((String) Debug.delegate(ba, "b_can_monto_venta_click", null));} -RDebugUtils.currentLine=8126464; - //BA.debugLineNum = 8126464;BA.debugLine="Private Sub b_can_monto_venta_Click"; -RDebugUtils.currentLine=8126465; - //BA.debugLineNum = 8126465;BA.debugLine="p_monto_venta.Visible = False"; -__ref._p_monto_venta /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=8126466; - //BA.debugLineNum = 8126466;BA.debugLine="End Sub"; +public String _b_can_monto_venta_click() throws Exception{ + //BA.debugLineNum = 1096;BA.debugLine="Private Sub b_can_monto_venta_Click"; + //BA.debugLineNum = 1097;BA.debugLine="p_monto_venta.Visible = False"; +_p_monto_venta.setVisible(__c.False); + //BA.debugLineNum = 1098;BA.debugLine="p_inv.BringToFront"; +_p_inv.BringToFront(); + //BA.debugLineNum = 1099;BA.debugLine="p_inv.Visible = False"; +_p_inv.setVisible(__c.False); + //BA.debugLineNum = 1100;BA.debugLine="End Sub"; return ""; } -public String _b_cancelar_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "b_cancelar_click", false)) - {return ((String) Debug.delegate(ba, "b_cancelar_click", null));} -RDebugUtils.currentLine=7733248; - //BA.debugLineNum = 7733248;BA.debugLine="Private Sub b_cancelar_Click"; -RDebugUtils.currentLine=7733249; - //BA.debugLineNum = 7733249;BA.debugLine="et_abono.Text = \"\""; -__ref._et_abono /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence("")); -RDebugUtils.currentLine=7733250; - //BA.debugLineNum = 7733250;BA.debugLine="p_abono.Visible = False"; -__ref._p_abono /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=7733251; - //BA.debugLineNum = 7733251;BA.debugLine="ime.HideKeyboard"; -__ref._ime /*anywheresoftware.b4a.objects.IME*/ .HideKeyboard(ba); -RDebugUtils.currentLine=7733252; - //BA.debugLineNum = 7733252;BA.debugLine="End Sub"; +public String _b_cancelar_click() throws Exception{ + //BA.debugLineNum = 979;BA.debugLine="Private Sub b_cancelar_Click"; + //BA.debugLineNum = 980;BA.debugLine="et_abono.Text = \"\""; +_et_abono.setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 981;BA.debugLine="p_abono.Visible = False"; +_p_abono.setVisible(__c.False); + //BA.debugLineNum = 982;BA.debugLine="ime.HideKeyboard"; +_ime.HideKeyboard(ba); + //BA.debugLineNum = 983;BA.debugLine="End Sub"; return ""; } -public String _b_clienteventa_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "b_clienteventa_click", false)) - {return ((String) Debug.delegate(ba, "b_clienteventa_click", null));} -RDebugUtils.currentLine=7929856; - //BA.debugLineNum = 7929856;BA.debugLine="Private Sub b_clienteVenta_Click"; -RDebugUtils.currentLine=7929858; - //BA.debugLineNum = 7929858;BA.debugLine="et_monto_venta.Text = \"\""; -__ref._et_monto_venta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence("")); -RDebugUtils.currentLine=7929859; - //BA.debugLineNum = 7929859;BA.debugLine="p_monto_venta.Visible = True"; -__ref._p_monto_venta /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=7929861; - //BA.debugLineNum = 7929861;BA.debugLine="End Sub"; +public String _b_clienteventa_click() throws Exception{ + //BA.debugLineNum = 1024;BA.debugLine="Private Sub b_clienteVenta_Click"; + //BA.debugLineNum = 1026;BA.debugLine="et_monto_venta.Text = \"\""; +_et_monto_venta.setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 1027;BA.debugLine="p_monto_venta.Visible = True"; +_p_monto_venta.setVisible(__c.True); + //BA.debugLineNum = 1028;BA.debugLine="p_inv.BringToFront"; +_p_inv.BringToFront(); + //BA.debugLineNum = 1029;BA.debugLine="p_inv.Visible = True"; +_p_inv.setVisible(__c.True); + //BA.debugLineNum = 1030;BA.debugLine="End Sub"; return ""; } -public String _b_clintesinventa_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "b_clintesinventa_click", false)) - {return ((String) Debug.delegate(ba, "b_clintesinventa_click", null));} -RDebugUtils.currentLine=7995392; - //BA.debugLineNum = 7995392;BA.debugLine="Private Sub b_clinteSinVenta_Click"; -RDebugUtils.currentLine=7995394; - //BA.debugLineNum = 7995394;BA.debugLine="Guardar_Click"; -__ref._guardar_click /*String*/ (null); -RDebugUtils.currentLine=7995395; - //BA.debugLineNum = 7995395;BA.debugLine="et_monto_venta.Text = \"0\""; -__ref._et_monto_venta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence("0")); -RDebugUtils.currentLine=7995396; - //BA.debugLineNum = 7995396;BA.debugLine="Subs.ventaNoVenta(usuario, Id_Almacen, ruta_tiend"; -_subs._ventanoventa /*String*/ (ba,__ref._usuario /*String*/ ,__ref._id_almacen /*String*/ ,__ref._ruta_tienda /*String*/ ,"SinVenta",_subs._traecliente /*String*/ (ba),_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ,_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ,__ref._et_monto_venta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()); -RDebugUtils.currentLine=7995398; - //BA.debugLineNum = 7995398;BA.debugLine="Try"; -try {RDebugUtils.currentLine=7995399; - //BA.debugLineNum = 7995399;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"Select CUE"; -__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 CUENTA from cuentaa"))); -RDebugUtils.currentLine=7995400; - //BA.debugLineNum = 7995400;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=7995401; - //BA.debugLineNum = 7995401;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -__ref._clie_id /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUENTA"); -RDebugUtils.currentLine=7995402; - //BA.debugLineNum = 7995402;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=7995404; - //BA.debugLineNum = 7995404;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from NOVENTA where NV_CLIENTE In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=7995405; - //BA.debugLineNum = 7995405;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=7995407; - //BA.debugLineNum = 7995407;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("UPDATE kmt_info set gestion = 2 where CAT_CL_CODIGO In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=7995409; - //BA.debugLineNum = 7995409;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HIS"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE HIST_STAY_STORE set HSS_OUT = ? where HSS_OUT = 0 AND HSS_CODIGO In (select cuenta from cuentaa)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__c.DateTime.Time(__c.DateTime.getNow()))})); -RDebugUtils.currentLine=7995410; - //BA.debugLineNum = 7995410;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HIS"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE HIST_STAY_OUT set HSO_FIN = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__c.DateTime.Time(__c.DateTime.getNow()))})); -RDebugUtils.currentLine=7995412; - //BA.debugLineNum = 7995412;BA.debugLine="ToastMessageShow(\"Cliente con venta eliminado co"; +public String _b_clintesinventa_click() throws Exception{ + //BA.debugLineNum = 1032;BA.debugLine="Private Sub b_clinteSinVenta_Click"; + //BA.debugLineNum = 1034;BA.debugLine="Guardar_Click"; +_guardar_click(); + //BA.debugLineNum = 1035;BA.debugLine="et_monto_venta.Text = \"0\""; +_et_monto_venta.setText(BA.ObjectToCharSequence("0")); + //BA.debugLineNum = 1036;BA.debugLine="Subs.ventaNoVenta(usuario, Id_Almacen, ruta_tiend"; +_subs._ventanoventa /*String*/ (ba,_usuario,_id_almacen,_ruta_tienda,"SinVenta",_subs._traecliente /*String*/ (ba),_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ,_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ,_et_monto_venta.getText()); + //BA.debugLineNum = 1038;BA.debugLine="Try"; +try { //BA.debugLineNum = 1039;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"Select CUE"; +_c = (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 CUENTA from cuentaa"))); + //BA.debugLineNum = 1040;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 1041;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; +_clie_id = _c.GetString("CUENTA"); + //BA.debugLineNum = 1042;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 1047;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("UPDATE kmt_info set gestion = 3 where CAT_CL_CODIGO In (select cuenta from cuentaa)"); + //BA.debugLineNum = 1052;BA.debugLine="ToastMessageShow(\"Cliente con venta eliminado co"; __c.ToastMessageShow(BA.ObjectToCharSequence("Cliente con venta eliminado correctamente."),__c.False); } - catch (Exception e16) { - ba.setLastException(e16);RDebugUtils.currentLine=7995415; - //BA.debugLineNum = 7995415;BA.debugLine="ToastMessageShow(\"Error eliminando cliente con v"; + catch (Exception e12) { + ba.setLastException(e12); //BA.debugLineNum = 1055;BA.debugLine="ToastMessageShow(\"Error eliminando cliente con v"; __c.ToastMessageShow(BA.ObjectToCharSequence("Error eliminando cliente con venta."),__c.True); }; -RDebugUtils.currentLine=7995418; - //BA.debugLineNum = 7995418;BA.debugLine="End Sub"; + //BA.debugLineNum = 1058;BA.debugLine="End Sub"; return ""; } -public String _guardar_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "guardar_click", false)) - {return ((String) Debug.delegate(ba, "guardar_click", null));} -RDebugUtils.currentLine=6029312; - //BA.debugLineNum = 6029312;BA.debugLine="Sub Guardar_Click"; -RDebugUtils.currentLine=6029313; - //BA.debugLineNum = 6029313;BA.debugLine="b_inicioFinVenta.Text = \"FIN VENTA\""; -__ref._b_iniciofinventa /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setText(BA.ObjectToCharSequence("FIN VENTA")); -RDebugUtils.currentLine=6029314; - //BA.debugLineNum = 6029314;BA.debugLine="b_inicioFinVenta.Visible = True"; -__ref._b_iniciofinventa /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=6029315; - //BA.debugLineNum = 6029315;BA.debugLine="End Sub"; -return ""; -} -public String _b_e_next_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "b_e_next_click", false)) - {return ((String) Debug.delegate(ba, "b_e_next_click", null));} -RDebugUtils.currentLine=7012352; - //BA.debugLineNum = 7012352;BA.debugLine="Sub B_E_NEXT_Click"; -RDebugUtils.currentLine=7012353; - //BA.debugLineNum = 7012353;BA.debugLine="If E_RES_E.Text <> \"\" Then"; -if ((__ref._e_res_e /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()).equals("") == false) { -RDebugUtils.currentLine=7012354; - //BA.debugLineNum = 7012354;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert int"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into HIST_ENCUESTA(HE_CLIE, HE_RES, HE_FECHA, HE_TIPO) VALUES (?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._la_cuenta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._e_res_e /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)("DONDE")})); -RDebugUtils.currentLine=7012355; - //BA.debugLineNum = 7012355;BA.debugLine="Panel2.Visible = False"; -__ref._panel2 /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=7012356; - //BA.debugLineNum = 7012356;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; +public String _b_e_next_click() throws Exception{ + //BA.debugLineNum = 759;BA.debugLine="Sub B_E_NEXT_Click"; + //BA.debugLineNum = 760;BA.debugLine="If E_RES_E.Text <> \"\" Then"; +if ((_e_res_e.getText()).equals("") == false) { + //BA.debugLineNum = 761;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert int"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into HIST_ENCUESTA(HE_CLIE, HE_RES, HE_FECHA, HE_TIPO) VALUES (?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_la_cuenta.getText()),(Object)(_e_res_e.getText()),(Object)(_sdate+_stime),(Object)("DONDE")})); + //BA.debugLineNum = 762;BA.debugLine="Panel2.Visible = False"; +_panel2.setVisible(__c.False); + //BA.debugLineNum = 763;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; _b4xpages._showpage /*String*/ (ba,"Productos"); }else { -RDebugUtils.currentLine=7012358; - //BA.debugLineNum = 7012358;BA.debugLine="Msgbox(\"SIN RESPUESTA\",\"AVISO\") 'Ignore"; + //BA.debugLineNum = 765;BA.debugLine="Msgbox(\"SIN RESPUESTA\",\"AVISO\") 'Ignore"; __c.Msgbox(BA.ObjectToCharSequence("SIN RESPUESTA"),BA.ObjectToCharSequence("AVISO"),ba); }; -RDebugUtils.currentLine=7012360; - //BA.debugLineNum = 7012360;BA.debugLine="End Sub"; + //BA.debugLineNum = 767;BA.debugLine="End Sub"; return ""; } -public String _b_gu_monto_venta_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "b_gu_monto_venta_click", false)) - {return ((String) Debug.delegate(ba, "b_gu_monto_venta_click", null));} -RDebugUtils.currentLine=8060928; - //BA.debugLineNum = 8060928;BA.debugLine="Private Sub b_gu_monto_venta_Click"; -RDebugUtils.currentLine=8060930; - //BA.debugLineNum = 8060930;BA.debugLine="If et_monto_venta.Text = \"\" Or et_monto_venta.Tex"; -if ((__ref._et_monto_venta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()).equals("") || (__ref._et_monto_venta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()).equals("0")) { -RDebugUtils.currentLine=8060931; - //BA.debugLineNum = 8060931;BA.debugLine="ToastMessageShow(\"El monto de venta no puede ser"; -__c.ToastMessageShow(BA.ObjectToCharSequence("El monto de venta no puede ser vacío o 0."),__c.True); +public String _b_gu_monto_venta_click() throws Exception{ + //BA.debugLineNum = 1061;BA.debugLine="Private Sub b_gu_monto_venta_Click"; + //BA.debugLineNum = 1063;BA.debugLine="If et_monto_venta.Text.Trim = \"\" Or et_monto_vent"; +if ((_et_monto_venta.getText().trim()).equals("") || _et_monto_venta.getText().trim().startsWith("0") || (_et_monto_venta.getText().trim()).equals("0")) { + //BA.debugLineNum = 1064;BA.debugLine="ToastMessageShow(\"El monto de venta no puede est"; +__c.ToastMessageShow(BA.ObjectToCharSequence("El monto de venta no puede estar vacío o empezar con ceros."),__c.True); }else { -RDebugUtils.currentLine=8060933; - //BA.debugLineNum = 8060933;BA.debugLine="Guardar_Click"; -__ref._guardar_click /*String*/ (null); -RDebugUtils.currentLine=8060934; - //BA.debugLineNum = 8060934;BA.debugLine="Subs.ventaNoVenta(usuario, Id_Almacen, ruta_tien"; -_subs._ventanoventa /*String*/ (ba,__ref._usuario /*String*/ ,__ref._id_almacen /*String*/ ,__ref._ruta_tienda /*String*/ ,"ConVenta",_subs._traecliente /*String*/ (ba),_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ,_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ,__ref._et_monto_venta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()); -RDebugUtils.currentLine=8060936; - //BA.debugLineNum = 8060936;BA.debugLine="Try"; -try {RDebugUtils.currentLine=8060937; - //BA.debugLineNum = 8060937;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"Select CU"; -__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 CUENTA from cuentaa"))); -RDebugUtils.currentLine=8060938; - //BA.debugLineNum = 8060938;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=8060939; - //BA.debugLineNum = 8060939;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -__ref._clie_id /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUENTA"); -RDebugUtils.currentLine=8060940; - //BA.debugLineNum = 8060940;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=8060942; - //BA.debugLineNum = 8060942;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from NOVENTA where NV_CLIENTE In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=8060943; - //BA.debugLineNum = 8060943;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=8060945; - //BA.debugLineNum = 8060945;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt"; + //BA.debugLineNum = 1066;BA.debugLine="Guardar_Click"; +_guardar_click(); + //BA.debugLineNum = 1067;BA.debugLine="Subs.ventaNoVenta(usuario, Id_Almacen, ruta_tien"; +_subs._ventanoventa /*String*/ (ba,_usuario,_id_almacen,_ruta_tienda,"ConVenta",_subs._traecliente /*String*/ (ba),_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ,_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ,_et_monto_venta.getText()); + //BA.debugLineNum = 1069;BA.debugLine="Try"; +try { //BA.debugLineNum = 1070;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"Select CU"; +_c = (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 CUENTA from cuentaa"))); + //BA.debugLineNum = 1071;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 1072;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; +_clie_id = _c.GetString("CUENTA"); + //BA.debugLineNum = 1073;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 1078;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("UPDATE kmt_info set gestion = 2 where CAT_CL_CODIGO In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=8060947; - //BA.debugLineNum = 8060947;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HI"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE HIST_STAY_STORE set HSS_OUT = ? where HSS_OUT = 0 AND HSS_CODIGO In (select cuenta from cuentaa)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__c.DateTime.Time(__c.DateTime.getNow()))})); -RDebugUtils.currentLine=8060948; - //BA.debugLineNum = 8060948;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HI"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE HIST_STAY_OUT set HSO_FIN = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__c.DateTime.Time(__c.DateTime.getNow()))})); -RDebugUtils.currentLine=8060950; - //BA.debugLineNum = 8060950;BA.debugLine="ToastMessageShow(\"Cliente con venta eliminado c"; + //BA.debugLineNum = 1083;BA.debugLine="ToastMessageShow(\"Cliente con venta eliminado c"; __c.ToastMessageShow(BA.ObjectToCharSequence("Cliente con venta eliminado correctamente."),__c.False); } - catch (Exception e18) { - ba.setLastException(e18);RDebugUtils.currentLine=8060953; - //BA.debugLineNum = 8060953;BA.debugLine="ToastMessageShow(\"Error eliminando cliente con"; + catch (Exception e14) { + ba.setLastException(e14); //BA.debugLineNum = 1086;BA.debugLine="ToastMessageShow(\"Error eliminando cliente con"; __c.ToastMessageShow(BA.ObjectToCharSequence("Error eliminando cliente con venta."),__c.True); }; -RDebugUtils.currentLine=8060956; - //BA.debugLineNum = 8060956;BA.debugLine="p_monto_venta.Visible = False"; -__ref._p_monto_venta /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); + //BA.debugLineNum = 1089;BA.debugLine="p_monto_venta.Visible = False"; +_p_monto_venta.setVisible(__c.False); + //BA.debugLineNum = 1090;BA.debugLine="p_inv.BringToFront"; +_p_inv.BringToFront(); + //BA.debugLineNum = 1091;BA.debugLine="p_inv.Visible = False"; +_p_inv.setVisible(__c.False); }; -RDebugUtils.currentLine=8060958; - //BA.debugLineNum = 8060958;BA.debugLine="End Sub"; + //BA.debugLineNum = 1093;BA.debugLine="End Sub"; return ""; } -public String _b_guarda_c_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "b_guarda_c_click", false)) - {return ((String) Debug.delegate(ba, "b_guarda_c_click", null));} -RDebugUtils.currentLine=6881280; - //BA.debugLineNum = 6881280;BA.debugLine="Sub B_GUARDA_C_Click"; -RDebugUtils.currentLine=6881281; - //BA.debugLineNum = 6881281;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; +public String _b_guarda_c_click() throws Exception{ + //BA.debugLineNum = 703;BA.debugLine="Sub B_GUARDA_C_Click"; + //BA.debugLineNum = 704;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; __c.DateTime.setDateFormat("MM/dd/yyyy"); -RDebugUtils.currentLine=6881282; - //BA.debugLineNum = 6881282;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -__ref._sdate /*String*/ = __c.DateTime.Date(__c.DateTime.getNow()); -RDebugUtils.currentLine=6881283; - //BA.debugLineNum = 6881283;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -__ref._stime /*String*/ = __c.DateTime.Time(__c.DateTime.getNow()); -RDebugUtils.currentLine=6881284; - //BA.debugLineNum = 6881284;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENTA"; -__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 CUENTA from cuentaa"))); -RDebugUtils.currentLine=6881285; - //BA.debugLineNum = 6881285;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=6881286; - //BA.debugLineNum = 6881286;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -__ref._clie_id /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUENTA"); -RDebugUtils.currentLine=6881287; - //BA.debugLineNum = 6881287;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=6881288; - //BA.debugLineNum = 6881288;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUARI"; -__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=6881289; - //BA.debugLineNum = 6881289;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=6881290; - //BA.debugLineNum = 6881290;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -__ref._usuario /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("USUARIO"); -RDebugUtils.currentLine=6881291; - //BA.debugLineNum = 6881291;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=6881292; - //BA.debugLineNum = 6881292;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA) VALUES(?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("4"),(Object)(.01),(Object)(.01),(Object)(2),(Object)("KNORR RINDE MAS 70 GR"),(Object)("GUNA2"),(Object)(__ref._la_cuenta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(__ref._usuario /*String*/ ),(Object)(__ref._la_ruta /*String*/ )})); -RDebugUtils.currentLine=6881293; - //BA.debugLineNum = 6881293;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO HIST_FACE(HFCLIENTE, HFALIAS,HFRUTA,HFALMACEN) VALUES (?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._la_cuenta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._i_compra /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._la_ruta /*String*/ ),(Object)(__ref._almacen /*String*/ )})); -RDebugUtils.currentLine=6881294; - //BA.debugLineNum = 6881294;BA.debugLine="Panel1.Visible = False"; -__ref._panel1 /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=6881296; - //BA.debugLineNum = 6881296;BA.debugLine="Tar.Visible = False"; -__ref._tar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=6881297; - //BA.debugLineNum = 6881297;BA.debugLine="Tels.Visible = False"; -__ref._tels /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=6881298; - //BA.debugLineNum = 6881298;BA.debugLine="gest.Visible = False"; -__ref._gest /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=6881300; - //BA.debugLineNum = 6881300;BA.debugLine="Guardar.Visible = True"; -__ref._guardar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=6881301; - //BA.debugLineNum = 6881301;BA.debugLine="End Sub"; + //BA.debugLineNum = 705;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; +_sdate = __c.DateTime.Date(__c.DateTime.getNow()); + //BA.debugLineNum = 706;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; +_stime = __c.DateTime.Time(__c.DateTime.getNow()); + //BA.debugLineNum = 707;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENTA"; +_c = (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 CUENTA from cuentaa"))); + //BA.debugLineNum = 708;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 709;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; +_clie_id = _c.GetString("CUENTA"); + //BA.debugLineNum = 710;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 711;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUARI"; +_c = (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"))); + //BA.debugLineNum = 712;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 713;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; +_usuario = _c.GetString("USUARIO"); + //BA.debugLineNum = 714;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 715;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA) VALUES(?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("4"),(Object)(.01),(Object)(.01),(Object)(2),(Object)("KNORR RINDE MAS 70 GR"),(Object)("GUNA2"),(Object)(_la_cuenta.getText()),(Object)(_sdate+_stime),(Object)(_usuario),(Object)(_la_ruta)})); + //BA.debugLineNum = 716;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO HIST_FACE(HFCLIENTE, HFALIAS,HFRUTA,HFALMACEN) VALUES (?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_la_cuenta.getText()),(Object)(_i_compra.getText()),(Object)(_la_ruta),(Object)(_almacen)})); + //BA.debugLineNum = 717;BA.debugLine="Panel1.Visible = False"; +_panel1.setVisible(__c.False); + //BA.debugLineNum = 719;BA.debugLine="Tar.Visible = False"; +_tar.setVisible(__c.False); + //BA.debugLineNum = 720;BA.debugLine="Tels.Visible = False"; +_tels.setVisible(__c.False); + //BA.debugLineNum = 721;BA.debugLine="gest.Visible = False"; +_gest.setVisible(__c.False); + //BA.debugLineNum = 723;BA.debugLine="Guardar.Visible = True"; +_guardar.setVisible(__c.True); + //BA.debugLineNum = 724;BA.debugLine="End Sub"; return ""; } -public String _b_imp_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "b_imp_click", false)) - {return ((String) Debug.delegate(ba, "b_imp_click", null));} +public String _b_imp_click() throws Exception{ int _i = 0; int _e = 0; -RDebugUtils.currentLine=6684672; - //BA.debugLineNum = 6684672;BA.debugLine="Sub B_IMP_Click"; -RDebugUtils.currentLine=6684673; - //BA.debugLineNum = 6684673;BA.debugLine="TAMANO = 0"; -__ref._tamano /*int*/ = (int) (0); -RDebugUtils.currentLine=6684674; - //BA.debugLineNum = 6684674;BA.debugLine="ESPACIO = 21"; -__ref._espacio /*int*/ = (int) (21); -RDebugUtils.currentLine=6684675; - //BA.debugLineNum = 6684675;BA.debugLine="BLANCO = \" \""; -__ref._blanco /*String*/ = " "; -RDebugUtils.currentLine=6684676; - //BA.debugLineNum = 6684676;BA.debugLine="printer.Initialize(cmp20.OutputStream)"; -__ref._printer /*anywheresoftware.b4a.objects.streams.File.TextWriterWrapper*/ .Initialize(__ref._cmp20 /*anywheresoftware.b4a.objects.Serial*/ .getOutputStream()); -RDebugUtils.currentLine=6684677; - //BA.debugLineNum = 6684677;BA.debugLine="printer.WriteLine(\"DURAKELO S.A. de C.V.\")"; -__ref._printer /*anywheresoftware.b4a.objects.streams.File.TextWriterWrapper*/ .WriteLine("DURAKELO S.A. de C.V."); -RDebugUtils.currentLine=6684678; - //BA.debugLineNum = 6684678;BA.debugLine="printer.WriteLine(\"RFC: DUR-011025-T12\")"; -__ref._printer /*anywheresoftware.b4a.objects.streams.File.TextWriterWrapper*/ .WriteLine("RFC: DUR-011025-T12"); -RDebugUtils.currentLine=6684679; - //BA.debugLineNum = 6684679;BA.debugLine="printer.WriteLine(\"Tel.: 618-826-0104\")"; -__ref._printer /*anywheresoftware.b4a.objects.streams.File.TextWriterWrapper*/ .WriteLine("Tel.: 618-826-0104"); -RDebugUtils.currentLine=6684680; - //BA.debugLineNum = 6684680;BA.debugLine="printer.WriteLine(\"Vendedor: KMTS \")"; -__ref._printer /*anywheresoftware.b4a.objects.streams.File.TextWriterWrapper*/ .WriteLine("Vendedor: KMTS "); -RDebugUtils.currentLine=6684681; - //BA.debugLineNum = 6684681;BA.debugLine="printer.WriteLine(\"Tienda: \" & La_nombre.Text)"; -__ref._printer /*anywheresoftware.b4a.objects.streams.File.TextWriterWrapper*/ .WriteLine("Tienda: "+__ref._la_nombre /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()); -RDebugUtils.currentLine=6684682; - //BA.debugLineNum = 6684682;BA.debugLine="printer.WriteLine(\"-----------PREVENTA-----------"; -__ref._printer /*anywheresoftware.b4a.objects.streams.File.TextWriterWrapper*/ .WriteLine("-----------PREVENTA-----------"); -RDebugUtils.currentLine=6684683; - //BA.debugLineNum = 6684683;BA.debugLine="s=B4XPages.MainPage.skmt.ExecQuery(\"select PE_PRO"; -__ref._s /*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 PE_PRONOMBRE, PE_CANT, length(pe_cant) as L_CANT, PE_COSTOU, length(PE_COSTOU) as L_COSTOU, PE_COSTO_TOT, length(PE_COSTO_TOT) as L_COSTO_TOT FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); -RDebugUtils.currentLine=6684684; - //BA.debugLineNum = 6684684;BA.debugLine="If S.RowCount>0 Then"; -if (__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=6684685; - //BA.debugLineNum = 6684685;BA.debugLine="For i=0 To S.RowCount -1"; + //BA.debugLineNum = 611;BA.debugLine="Sub B_IMP_Click"; + //BA.debugLineNum = 612;BA.debugLine="TAMANO = 0"; +_tamano = (int) (0); + //BA.debugLineNum = 613;BA.debugLine="ESPACIO = 21"; +_espacio = (int) (21); + //BA.debugLineNum = 614;BA.debugLine="BLANCO = \" \""; +_blanco = " "; + //BA.debugLineNum = 615;BA.debugLine="printer.Initialize(cmp20.OutputStream)"; +_printer.Initialize(_cmp20.getOutputStream()); + //BA.debugLineNum = 616;BA.debugLine="printer.WriteLine(\"DURAKELO S.A. de C.V.\")"; +_printer.WriteLine("DURAKELO S.A. de C.V."); + //BA.debugLineNum = 617;BA.debugLine="printer.WriteLine(\"RFC: DUR-011025-T12\")"; +_printer.WriteLine("RFC: DUR-011025-T12"); + //BA.debugLineNum = 618;BA.debugLine="printer.WriteLine(\"Tel.: 618-826-0104\")"; +_printer.WriteLine("Tel.: 618-826-0104"); + //BA.debugLineNum = 619;BA.debugLine="printer.WriteLine(\"Vendedor: KMTS \")"; +_printer.WriteLine("Vendedor: KMTS "); + //BA.debugLineNum = 620;BA.debugLine="printer.WriteLine(\"Tienda: \" & La_nombre.Text)"; +_printer.WriteLine("Tienda: "+_la_nombre.getText()); + //BA.debugLineNum = 621;BA.debugLine="printer.WriteLine(\"-----------PREVENTA-----------"; +_printer.WriteLine("-----------PREVENTA-----------"); + //BA.debugLineNum = 622;BA.debugLine="s=B4XPages.MainPage.skmt.ExecQuery(\"select PE_PRO"; +_s = (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 PE_PRONOMBRE, PE_CANT, length(pe_cant) as L_CANT, PE_COSTOU, length(PE_COSTOU) as L_COSTOU, PE_COSTO_TOT, length(PE_COSTO_TOT) as L_COSTO_TOT FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); + //BA.debugLineNum = 623;BA.debugLine="If S.RowCount>0 Then"; +if (_s.getRowCount()>0) { + //BA.debugLineNum = 624;BA.debugLine="For i=0 To S.RowCount -1"; { final int step13 = 1; -final int limit13 = (int) (__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit13 = (int) (_s.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit13 ;_i = _i + step13 ) { -RDebugUtils.currentLine=6684686; - //BA.debugLineNum = 6684686;BA.debugLine="S.Position=i"; -__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=6684687; - //BA.debugLineNum = 6684687;BA.debugLine="printer.WriteLine(s.GetString(\"PE_CANT\") & \" \""; -__ref._printer /*anywheresoftware.b4a.objects.streams.File.TextWriterWrapper*/ .WriteLine(__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_CANT")+" "+__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_PRONOMBRE")); -RDebugUtils.currentLine=6684688; - //BA.debugLineNum = 6684688;BA.debugLine="TAMANO = s.GetLong(\"L_CANT\") + TAMANO"; -__ref._tamano /*int*/ = (int) (__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetLong("L_CANT")+__ref._tamano /*int*/ ); -RDebugUtils.currentLine=6684689; - //BA.debugLineNum = 6684689;BA.debugLine="TAMANO = s.GetLong(\"L_COSTOU\") + TAMANO"; -__ref._tamano /*int*/ = (int) (__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetLong("L_COSTOU")+__ref._tamano /*int*/ ); -RDebugUtils.currentLine=6684690; - //BA.debugLineNum = 6684690;BA.debugLine="TAMANO = s.GetLong(\"L_COSTO_TOT\") + TAMANO"; -__ref._tamano /*int*/ = (int) (__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetLong("L_COSTO_TOT")+__ref._tamano /*int*/ ); -RDebugUtils.currentLine=6684691; - //BA.debugLineNum = 6684691;BA.debugLine="ESPACIO = ESPACIO - TAMANO"; -__ref._espacio /*int*/ = (int) (__ref._espacio /*int*/ -__ref._tamano /*int*/ ); -RDebugUtils.currentLine=6684692; - //BA.debugLineNum = 6684692;BA.debugLine="For E=0 To ESPACIO -1"; + //BA.debugLineNum = 625;BA.debugLine="S.Position=i"; +_s.setPosition(_i); + //BA.debugLineNum = 626;BA.debugLine="printer.WriteLine(s.GetString(\"PE_CANT\") & \" \""; +_printer.WriteLine(_s.GetString("PE_CANT")+" "+_s.GetString("PE_PRONOMBRE")); + //BA.debugLineNum = 627;BA.debugLine="TAMANO = s.GetLong(\"L_CANT\") + TAMANO"; +_tamano = (int) (_s.GetLong("L_CANT")+_tamano); + //BA.debugLineNum = 628;BA.debugLine="TAMANO = s.GetLong(\"L_COSTOU\") + TAMANO"; +_tamano = (int) (_s.GetLong("L_COSTOU")+_tamano); + //BA.debugLineNum = 629;BA.debugLine="TAMANO = s.GetLong(\"L_COSTO_TOT\") + TAMANO"; +_tamano = (int) (_s.GetLong("L_COSTO_TOT")+_tamano); + //BA.debugLineNum = 630;BA.debugLine="ESPACIO = ESPACIO - TAMANO"; +_espacio = (int) (_espacio-_tamano); + //BA.debugLineNum = 631;BA.debugLine="For E=0 To ESPACIO -1"; { final int step20 = 1; -final int limit20 = (int) (__ref._espacio /*int*/ -1); +final int limit20 = (int) (_espacio-1); _e = (int) (0) ; for (;_e <= limit20 ;_e = _e + step20 ) { -RDebugUtils.currentLine=6684693; - //BA.debugLineNum = 6684693;BA.debugLine="BLANCO = \" \" & BLANCO"; -__ref._blanco /*String*/ = " "+__ref._blanco /*String*/ ; + //BA.debugLineNum = 632;BA.debugLine="BLANCO = \" \" & BLANCO"; +_blanco = " "+_blanco; } }; -RDebugUtils.currentLine=6684695; - //BA.debugLineNum = 6684695;BA.debugLine="printer.WriteLine(BLANCO & s.GETSTRING(\"PE_CANT"; -__ref._printer /*anywheresoftware.b4a.objects.streams.File.TextWriterWrapper*/ .WriteLine(__ref._blanco /*String*/ +__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_CANT")+" X $"+__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_COSTOU")+" $"+__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_COSTO_TOT")); -RDebugUtils.currentLine=6684696; - //BA.debugLineNum = 6684696;BA.debugLine="TAMANO = 0"; -__ref._tamano /*int*/ = (int) (0); -RDebugUtils.currentLine=6684697; - //BA.debugLineNum = 6684697;BA.debugLine="ESPACIO = 21"; -__ref._espacio /*int*/ = (int) (21); -RDebugUtils.currentLine=6684698; - //BA.debugLineNum = 6684698;BA.debugLine="BLANCO = \" \""; -__ref._blanco /*String*/ = " "; + //BA.debugLineNum = 634;BA.debugLine="printer.WriteLine(BLANCO & s.GETSTRING(\"PE_CANT"; +_printer.WriteLine(_blanco+_s.GetString("PE_CANT")+" X $"+_s.GetString("PE_COSTOU")+" $"+_s.GetString("PE_COSTO_TOT")); + //BA.debugLineNum = 635;BA.debugLine="TAMANO = 0"; +_tamano = (int) (0); + //BA.debugLineNum = 636;BA.debugLine="ESPACIO = 21"; +_espacio = (int) (21); + //BA.debugLineNum = 637;BA.debugLine="BLANCO = \" \""; +_blanco = " "; } }; }; -RDebugUtils.currentLine=6684701; - //BA.debugLineNum = 6684701;BA.debugLine="s.Close"; -__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=6684702; - //BA.debugLineNum = 6684702;BA.debugLine="printer.WriteLine(\"Total Preventa: $\" & total_c"; -__ref._printer /*anywheresoftware.b4a.objects.streams.File.TextWriterWrapper*/ .WriteLine("Total Preventa: $"+__ref._total_cliente /*String*/ ); -RDebugUtils.currentLine=6684703; - //BA.debugLineNum = 6684703;BA.debugLine="printer.WriteLine(\"------------VENTA-------------"; -__ref._printer /*anywheresoftware.b4a.objects.streams.File.TextWriterWrapper*/ .WriteLine("------------VENTA-------------"); -RDebugUtils.currentLine=6684704; - //BA.debugLineNum = 6684704;BA.debugLine="printer.WriteLine(\" \")"; -__ref._printer /*anywheresoftware.b4a.objects.streams.File.TextWriterWrapper*/ .WriteLine(" "); -RDebugUtils.currentLine=6684705; - //BA.debugLineNum = 6684705;BA.debugLine="printer.WriteLine(\"TOTAL: $\" & total_cliente)"; -__ref._printer /*anywheresoftware.b4a.objects.streams.File.TextWriterWrapper*/ .WriteLine("TOTAL: $"+__ref._total_cliente /*String*/ ); -RDebugUtils.currentLine=6684706; - //BA.debugLineNum = 6684706;BA.debugLine="printer.WriteLine(\" \")"; -__ref._printer /*anywheresoftware.b4a.objects.streams.File.TextWriterWrapper*/ .WriteLine(" "); -RDebugUtils.currentLine=6684707; - //BA.debugLineNum = 6684707;BA.debugLine="printer.WriteLine(\"----ESTE TICKET NO ES UN -----"; -__ref._printer /*anywheresoftware.b4a.objects.streams.File.TextWriterWrapper*/ .WriteLine("----ESTE TICKET NO ES UN -----"); -RDebugUtils.currentLine=6684708; - //BA.debugLineNum = 6684708;BA.debugLine="printer.WriteLine(\"--COMPROBANTE FISCAL, SOLO ES-"; -__ref._printer /*anywheresoftware.b4a.objects.streams.File.TextWriterWrapper*/ .WriteLine("--COMPROBANTE FISCAL, SOLO ES-"); -RDebugUtils.currentLine=6684709; - //BA.debugLineNum = 6684709;BA.debugLine="printer.WriteLine(\"--------INFORMATIVO-----------"; -__ref._printer /*anywheresoftware.b4a.objects.streams.File.TextWriterWrapper*/ .WriteLine("--------INFORMATIVO-----------"); -RDebugUtils.currentLine=6684710; - //BA.debugLineNum = 6684710;BA.debugLine="printer.WriteLine(\"------------------------------"; -__ref._printer /*anywheresoftware.b4a.objects.streams.File.TextWriterWrapper*/ .WriteLine("------------------------------"); -RDebugUtils.currentLine=6684711; - //BA.debugLineNum = 6684711;BA.debugLine="printer.WriteLine(\" \")"; -__ref._printer /*anywheresoftware.b4a.objects.streams.File.TextWriterWrapper*/ .WriteLine(" "); -RDebugUtils.currentLine=6684712; - //BA.debugLineNum = 6684712;BA.debugLine="printer.Flush"; -__ref._printer /*anywheresoftware.b4a.objects.streams.File.TextWriterWrapper*/ .Flush(); -RDebugUtils.currentLine=6684714; - //BA.debugLineNum = 6684714;BA.debugLine="End Sub"; + //BA.debugLineNum = 640;BA.debugLine="s.Close"; +_s.Close(); + //BA.debugLineNum = 641;BA.debugLine="printer.WriteLine(\"Total Preventa: $\" & total_c"; +_printer.WriteLine("Total Preventa: $"+_total_cliente); + //BA.debugLineNum = 642;BA.debugLine="printer.WriteLine(\"------------VENTA-------------"; +_printer.WriteLine("------------VENTA-------------"); + //BA.debugLineNum = 643;BA.debugLine="printer.WriteLine(\" \")"; +_printer.WriteLine(" "); + //BA.debugLineNum = 644;BA.debugLine="printer.WriteLine(\"TOTAL: $\" & total_cliente)"; +_printer.WriteLine("TOTAL: $"+_total_cliente); + //BA.debugLineNum = 645;BA.debugLine="printer.WriteLine(\" \")"; +_printer.WriteLine(" "); + //BA.debugLineNum = 646;BA.debugLine="printer.WriteLine(\"----ESTE TICKET NO ES UN -----"; +_printer.WriteLine("----ESTE TICKET NO ES UN -----"); + //BA.debugLineNum = 647;BA.debugLine="printer.WriteLine(\"--COMPROBANTE FISCAL, SOLO ES-"; +_printer.WriteLine("--COMPROBANTE FISCAL, SOLO ES-"); + //BA.debugLineNum = 648;BA.debugLine="printer.WriteLine(\"--------INFORMATIVO-----------"; +_printer.WriteLine("--------INFORMATIVO-----------"); + //BA.debugLineNum = 649;BA.debugLine="printer.WriteLine(\"------------------------------"; +_printer.WriteLine("------------------------------"); + //BA.debugLineNum = 650;BA.debugLine="printer.WriteLine(\" \")"; +_printer.WriteLine(" "); + //BA.debugLineNum = 651;BA.debugLine="printer.Flush"; +_printer.Flush(); + //BA.debugLineNum = 653;BA.debugLine="End Sub"; return ""; } -public String _b_iniciofinventa_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "b_iniciofinventa_click", false)) - {return ((String) Debug.delegate(ba, "b_iniciofinventa_click", null));} -RDebugUtils.currentLine=7864320; - //BA.debugLineNum = 7864320;BA.debugLine="Private Sub b_inicioFinVenta_Click"; -RDebugUtils.currentLine=7864321; - //BA.debugLineNum = 7864321;BA.debugLine="usuario = Subs.traeUsuarioDeBD"; -__ref._usuario /*String*/ = _subs._traeusuariodebd /*String*/ (ba); -RDebugUtils.currentLine=7864322; - //BA.debugLineNum = 7864322;BA.debugLine="Id_Almacen = Subs.traeAlmacen"; -__ref._id_almacen /*String*/ = _subs._traealmacen /*String*/ (ba); -RDebugUtils.currentLine=7864324; - //BA.debugLineNum = 7864324;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"select CAT_"; -__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 where CAT_CL_CODIGO In (Select cuenta from cuentaa)"))); -RDebugUtils.currentLine=7864325; - //BA.debugLineNum = 7864325;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=7864326; - //BA.debugLineNum = 7864326;BA.debugLine="ruta_tienda = c.GetString(\"CAT_CL_RUTA\")"; -__ref._ruta_tienda /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_RUTA"); -RDebugUtils.currentLine=7864328; - //BA.debugLineNum = 7864328;BA.debugLine="If dentroDeGeocerca Then precision = 1"; -if (__ref._dentrodegeocerca /*boolean*/ ) { -__ref._precision /*int*/ = (int) (1);}; -RDebugUtils.currentLine=7864329; - //BA.debugLineNum = 7864329;BA.debugLine="motivoNoVenta = \"\""; -__ref._motivonoventa /*String*/ = ""; -RDebugUtils.currentLine=7864330; - //BA.debugLineNum = 7864330;BA.debugLine="motivoNoVisita = \"\""; -__ref._motivonovisita /*String*/ = ""; -RDebugUtils.currentLine=7864332; - //BA.debugLineNum = 7864332;BA.debugLine="If Starter.enVenta Then"; +public String _b_iniciofinventa_click() throws Exception{ + //BA.debugLineNum = 989;BA.debugLine="Private Sub b_inicioFinVenta_Click"; + //BA.debugLineNum = 990;BA.debugLine="usuario = Subs.traeUsuarioDeBD"; +_usuario = _subs._traeusuariodebd /*String*/ (ba); + //BA.debugLineNum = 991;BA.debugLine="Id_Almacen = Subs.traeAlmacen"; +_id_almacen = _subs._traealmacen /*String*/ (ba); + //BA.debugLineNum = 993;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"select CAT_"; +_c = (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 where CAT_CL_CODIGO In (Select cuenta from cuentaa)"))); + //BA.debugLineNum = 994;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 995;BA.debugLine="ruta_tienda = c.GetString(\"CAT_CL_RUTA\")"; +_ruta_tienda = _c.GetString("CAT_CL_RUTA"); + //BA.debugLineNum = 997;BA.debugLine="If dentroDeGeocerca Then precision = 1"; +if (_dentrodegeocerca) { +_precision = (int) (1);}; + //BA.debugLineNum = 998;BA.debugLine="motivoNoVenta = \"\""; +_motivonoventa = ""; + //BA.debugLineNum = 999;BA.debugLine="motivoNoVisita = \"\""; +_motivonovisita = ""; + //BA.debugLineNum = 1001;BA.debugLine="If Starter.enVenta Then"; if (_starter._enventa /*boolean*/ ) { -RDebugUtils.currentLine=7864333; - //BA.debugLineNum = 7864333;BA.debugLine="b_inicioFinVenta.Visible = True"; -__ref._b_iniciofinventa /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=7864334; - //BA.debugLineNum = 7864334;BA.debugLine="Subs.bitacora(Subs.fechanormal(DateTime.Now), us"; -_subs._bitacora /*String*/ (ba,_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),__ref._usuario /*String*/ ,__ref._id_almacen /*String*/ ,__ref._ruta_tienda /*String*/ ,"Termina Venta",_subs._traecliente /*String*/ (ba),"",_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ,_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ,BA.NumberToString(__ref._precision /*int*/ ),__ref._motivonoventa /*String*/ ,__ref._motivonovisita /*String*/ ); -RDebugUtils.currentLine=7864335; - //BA.debugLineNum = 7864335;BA.debugLine="Starter.enVenta = False"; + //BA.debugLineNum = 1002;BA.debugLine="b_inicioFinVenta.Visible = True"; +_b_iniciofinventa.setVisible(__c.True); + //BA.debugLineNum = 1003;BA.debugLine="Subs.bitacora(Subs.fechanormal(DateTime.Now), us"; +_subs._bitacora /*String*/ (ba,_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_usuario,_id_almacen,_ruta_tienda,"Termina Venta",_subs._traecliente /*String*/ (ba),"",_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ,_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ,BA.NumberToString(_precision),_motivonoventa,_motivonovisita); + //BA.debugLineNum = 1004;BA.debugLine="Starter.enVenta = False"; _starter._enventa /*boolean*/ = __c.False; -RDebugUtils.currentLine=7864336; - //BA.debugLineNum = 7864336;BA.debugLine="LogColor($\">>>>>> TERMINA VENTA: ${Starter.enVen"; -__c.LogImpl("37864336",(">>>>>> TERMINA VENTA: "+__c.SmartStringFormatter("",(Object)(_starter._enventa /*boolean*/ ))+" - "+__c.SmartStringFormatter("",(Object)(_subs._traecliente /*String*/ (ba)))+""),__c.Colors.Red); -RDebugUtils.currentLine=7864337; - //BA.debugLineNum = 7864337;BA.debugLine="Subs.iniciaActividad(\"principal\")"; + //BA.debugLineNum = 1005;BA.debugLine="LogColor($\">>>>>> TERMINA VENTA: ${Starter.enVen"; +__c.LogImpl("345219856",(">>>>>> TERMINA VENTA: "+__c.SmartStringFormatter("",(Object)(_starter._enventa /*boolean*/ ))+" - "+__c.SmartStringFormatter("",(Object)(_subs._traecliente /*String*/ (ba)))+""),__c.Colors.Red); + //BA.debugLineNum = 1006;BA.debugLine="Subs.iniciaActividad(\"principal\")"; _subs._iniciaactividad /*String*/ (ba,"principal"); -RDebugUtils.currentLine=7864338; - //BA.debugLineNum = 7864338;BA.debugLine="B4XPages.ShowPageAndRemovePreviousPages(\"Princip"; + //BA.debugLineNum = 1007;BA.debugLine="B4XPages.ShowPageAndRemovePreviousPages(\"Princip"; _b4xpages._showpageandremovepreviouspages /*String*/ (ba,"Principal"); -RDebugUtils.currentLine=7864339; - //BA.debugLineNum = 7864339;BA.debugLine="Guardar2_Click"; -__ref._guardar2_click /*String*/ (null); + //BA.debugLineNum = 1008;BA.debugLine="Guardar2_Click"; +_guardar2_click(); }else { -RDebugUtils.currentLine=7864343; - //BA.debugLineNum = 7864343;BA.debugLine="b_inicioFinVenta.Width = Root.Width"; -__ref._b_iniciofinventa /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setWidth(__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()); -RDebugUtils.currentLine=7864344; - //BA.debugLineNum = 7864344;BA.debugLine="Subs.bitacora(Subs.fechanormal(DateTime.Now), us"; -_subs._bitacora /*String*/ (ba,_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),__ref._usuario /*String*/ ,__ref._id_almacen /*String*/ ,__ref._ruta_tienda /*String*/ ,"Inicia Venta",_subs._traecliente /*String*/ (ba),_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),"",_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ,_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ,BA.NumberToString(__ref._precision /*int*/ ),__ref._motivonoventa /*String*/ ,""); -RDebugUtils.currentLine=7864345; - //BA.debugLineNum = 7864345;BA.debugLine="Starter.enVenta = True"; + //BA.debugLineNum = 1012;BA.debugLine="b_inicioFinVenta.Width = Root.Width"; +_b_iniciofinventa.setWidth(_root.getWidth()); + //BA.debugLineNum = 1013;BA.debugLine="Subs.bitacora(Subs.fechanormal(DateTime.Now), us"; +_subs._bitacora /*String*/ (ba,_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_usuario,_id_almacen,_ruta_tienda,"Inicia Venta",_subs._traecliente /*String*/ (ba),_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),"",_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ,_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ,BA.NumberToString(_precision),_motivonoventa,""); + //BA.debugLineNum = 1014;BA.debugLine="Starter.enVenta = True"; _starter._enventa /*boolean*/ = __c.True; -RDebugUtils.currentLine=7864346; - //BA.debugLineNum = 7864346;BA.debugLine="LogColor($\">>>>>> INICIA VENTA: ${Starter.enVent"; -__c.LogImpl("37864346",(">>>>>> INICIA VENTA: "+__c.SmartStringFormatter("",(Object)(_starter._enventa /*boolean*/ ))+" - "+__c.SmartStringFormatter("",(Object)(_subs._traecliente /*String*/ (ba)))+""),__c.Colors.Red); -RDebugUtils.currentLine=7864347; - //BA.debugLineNum = 7864347;BA.debugLine="b_inicioFinVenta.Visible = False"; -__ref._b_iniciofinventa /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); + //BA.debugLineNum = 1015;BA.debugLine="LogColor($\">>>>>> INICIA VENTA: ${Starter.enVent"; +__c.LogImpl("345219866",(">>>>>> INICIA VENTA: "+__c.SmartStringFormatter("",(Object)(_starter._enventa /*boolean*/ ))+" - "+__c.SmartStringFormatter("",(Object)(_subs._traecliente /*String*/ (ba)))+""),__c.Colors.Red); + //BA.debugLineNum = 1016;BA.debugLine="b_inicioFinVenta.Visible = False"; +_b_iniciofinventa.setVisible(__c.False); }; -RDebugUtils.currentLine=7864351; - //BA.debugLineNum = 7864351;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=7864353; - //BA.debugLineNum = 7864353;BA.debugLine="End Sub"; + //BA.debugLineNum = 1020;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 1022;BA.debugLine="End Sub"; return ""; } -public String _guardar2_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "guardar2_click", false)) - {return ((String) Debug.delegate(ba, "guardar2_click", null));} -RDebugUtils.currentLine=6094848; - //BA.debugLineNum = 6094848;BA.debugLine="Sub Guardar2_Click"; -RDebugUtils.currentLine=6094920; - //BA.debugLineNum = 6094920;BA.debugLine="End Sub"; -return ""; -} -public String _b_mapa_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "b_mapa_click", false)) - {return ((String) Debug.delegate(ba, "b_mapa_click", null));} -RDebugUtils.currentLine=6619136; - //BA.debugLineNum = 6619136;BA.debugLine="Sub b_mapa_Click"; -RDebugUtils.currentLine=6619137; - //BA.debugLineNum = 6619137;BA.debugLine="B4XPages.ShowPage(\"mapas\")"; +public String _b_mapa_click() throws Exception{ + //BA.debugLineNum = 607;BA.debugLine="Sub b_mapa_Click"; + //BA.debugLineNum = 608;BA.debugLine="B4XPages.ShowPage(\"mapas\")"; _b4xpages._showpage /*String*/ (ba,"mapas"); -RDebugUtils.currentLine=6619138; - //BA.debugLineNum = 6619138;BA.debugLine="End Sub"; + //BA.debugLineNum = 609;BA.debugLine="End Sub"; return ""; } -public String _b_venta_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "b_venta_click", false)) - {return ((String) Debug.delegate(ba, "b_venta_click", null));} -RDebugUtils.currentLine=6946816; - //BA.debugLineNum = 6946816;BA.debugLine="Sub b_venta_Click"; -RDebugUtils.currentLine=6946817; - //BA.debugLineNum = 6946817;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; +public String _b_venta_click() throws Exception{ + //BA.debugLineNum = 726;BA.debugLine="Sub b_venta_Click"; + //BA.debugLineNum = 727;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; __c.DateTime.setDateFormat("MM/dd/yyyy"); -RDebugUtils.currentLine=6946818; - //BA.debugLineNum = 6946818;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -__ref._sdate /*String*/ = __c.DateTime.Date(__c.DateTime.getNow()); -RDebugUtils.currentLine=6946819; - //BA.debugLineNum = 6946819;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -__ref._stime /*String*/ = __c.DateTime.Time(__c.DateTime.getNow()); -RDebugUtils.currentLine=6946847; - //BA.debugLineNum = 6946847;BA.debugLine="End Sub"; + //BA.debugLineNum = 728;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; +_sdate = __c.DateTime.Date(__c.DateTime.getNow()); + //BA.debugLineNum = 729;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; +_stime = __c.DateTime.Time(__c.DateTime.getNow()); + //BA.debugLineNum = 757;BA.debugLine="End Sub"; return ""; } -public String _b4xpage_appear(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "b4xpage_appear", false)) - {return ((String) Debug.delegate(ba, "b4xpage_appear", null));} +public String _b4xpage_appear() throws Exception{ String _factura = ""; -RDebugUtils.currentLine=5439488; - //BA.debugLineNum = 5439488;BA.debugLine="Sub B4XPage_Appear"; -RDebugUtils.currentLine=5439490; - //BA.debugLineNum = 5439490;BA.debugLine="b_clinteSinVenta.Enabled = False"; -__ref._b_clintesinventa /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setEnabled(__c.False); -RDebugUtils.currentLine=5439491; - //BA.debugLineNum = 5439491;BA.debugLine="b_clienteVenta.Enabled = False"; -__ref._b_clienteventa /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setEnabled(__c.False); -RDebugUtils.currentLine=5439497; - //BA.debugLineNum = 5439497;BA.debugLine="b_inicioFinVenta.Width = Root.Width"; -__ref._b_iniciofinventa /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setWidth(__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()); -RDebugUtils.currentLine=5439498; - //BA.debugLineNum = 5439498;BA.debugLine="LA_GPS.TextColor = Colors.Red"; -__ref._la_gps /*anywheresoftware.b4a.objects.LabelWrapper*/ .setTextColor(__c.Colors.Red); -RDebugUtils.currentLine=5439499; - //BA.debugLineNum = 5439499;BA.debugLine="LA_GPS.Text = \"SIN UBICACION GPS\""; -__ref._la_gps /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("SIN UBICACION GPS")); -RDebugUtils.currentLine=5439500; - //BA.debugLineNum = 5439500;BA.debugLine="cercavalor = 0"; -__ref._cercavalor /*String*/ = BA.NumberToString(0); -RDebugUtils.currentLine=5439501; - //BA.debugLineNum = 5439501;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then"; + //BA.debugLineNum = 204;BA.debugLine="Sub B4XPage_Appear"; + //BA.debugLineNum = 206;BA.debugLine="b_clinteSinVenta.Enabled = False"; +_b_clintesinventa.setEnabled(__c.False); + //BA.debugLineNum = 207;BA.debugLine="b_clienteVenta.Enabled = False"; +_b_clienteventa.setEnabled(__c.False); + //BA.debugLineNum = 213;BA.debugLine="p_inv.Width = Root.Width : p_inv.Height = Root.He"; +_p_inv.setWidth(_root.getWidth()); + //BA.debugLineNum = 213;BA.debugLine="p_inv.Width = Root.Width : p_inv.Height = Root.He"; +_p_inv.setHeight(_root.getHeight()); + //BA.debugLineNum = 214;BA.debugLine="b_inicioFinVenta.Width = Root.Width"; +_b_iniciofinventa.setWidth(_root.getWidth()); + //BA.debugLineNum = 215;BA.debugLine="LA_GPS.TextColor = Colors.Red"; +_la_gps.setTextColor(__c.Colors.Red); + //BA.debugLineNum = 216;BA.debugLine="LA_GPS.Text = \"SIN UBICACION GPS\""; +_la_gps.setText(BA.ObjectToCharSequence("SIN UBICACION GPS")); + //BA.debugLineNum = 217;BA.debugLine="cercavalor = 0"; +_cercavalor = BA.NumberToString(0); + //BA.debugLineNum = 218;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then"; if (__c.Not(_starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getGPSEnabled())) { -RDebugUtils.currentLine=5439502; - //BA.debugLineNum = 5439502;BA.debugLine="ToastMessageShow(\"Es necesario tener el GPS ence"; + //BA.debugLineNum = 219;BA.debugLine="ToastMessageShow(\"Es necesario tener el GPS ence"; __c.ToastMessageShow(BA.ObjectToCharSequence("Es necesario tener el GPS encendido"),__c.True); -RDebugUtils.currentLine=5439503; - //BA.debugLineNum = 5439503;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent"; + //BA.debugLineNum = 220;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent"; __c.StartActivity(ba,(Object)(_starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getLocationSettingsIntent())); }; -RDebugUtils.currentLine=5439505; - //BA.debugLineNum = 5439505;BA.debugLine="cb_factura.Checked = False"; -__ref._cb_factura /*anywheresoftware.b4a.objects.CompoundButtonWrapper.CheckBoxWrapper*/ .setChecked(__c.False); -RDebugUtils.currentLine=5439506; - //BA.debugLineNum = 5439506;BA.debugLine="p_abono.Visible = False"; -__ref._p_abono /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=5439507; - //BA.debugLineNum = 5439507;BA.debugLine="Subs.centraPanel(p_abono, Root.Width)"; -_subs._centrapanel /*String*/ (ba,__ref._p_abono /*anywheresoftware.b4a.objects.PanelWrapper*/ ,__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()); -RDebugUtils.currentLine=5439508; - //BA.debugLineNum = 5439508;BA.debugLine="skmt.Initialize(ruta,\"kmt.db\", True)"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .Initialize(__ref._ruta /*String*/ ,"kmt.db",__c.True); -RDebugUtils.currentLine=5439509; - //BA.debugLineNum = 5439509;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_CL"; -__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_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 from kmt_info where CAT_CL_CODIGO In (Select cuenta from cuentaa)"))); -RDebugUtils.currentLine=5439510; - //BA.debugLineNum = 5439510;BA.debugLine="s=B4XPages.MainPage.skmt.ExecQuery(\"Select SUM(PE"; -__ref._s /*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 SUM(PE_COSTO_TOT) As TOTAL_CLIE, SUM(PE_CANT) As CANT_CLIE, PC_FACTURA FROM PEDIDO_CLIENTE INNER JOIN PEDIDO ON PEDIDO_CLIENTE.PC_CLIENTE = PEDIDO.PE_CLIENTE WHERE (PE_CLIENTE IN (Select cuenta from cuentaa))"))); -RDebugUtils.currentLine=5439511; - //BA.debugLineNum = 5439511;BA.debugLine="s.Position=0"; -__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=5439512; - //BA.debugLineNum = 5439512;BA.debugLine="If c.RowCount > 0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=5439513; - //BA.debugLineNum = 5439513;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=5439514; - //BA.debugLineNum = 5439514;BA.debugLine="la_cuenta.Text = c.GetString(\"CAT_CL_CODIGO\")"; -__ref._la_cuenta /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_CODIGO"))); -RDebugUtils.currentLine=5439515; - //BA.debugLineNum = 5439515;BA.debugLine="La_nombre.Text = c.GetString(\"CAT_CL_NOMBRE\")"; -__ref._la_nombre /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_NOMBRE"))); -RDebugUtils.currentLine=5439516; - //BA.debugLineNum = 5439516;BA.debugLine="la_Calle.Text = c.GetString(\"CAT_CL_CALLE\")"; -__ref._la_calle /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_CALLE"))); -RDebugUtils.currentLine=5439517; - //BA.debugLineNum = 5439517;BA.debugLine="la_col.Text = c.GetString(\"CAT_CL_COLONIA\")"; -__ref._la_col /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_COLONIA"))); -RDebugUtils.currentLine=5439518; - //BA.debugLineNum = 5439518;BA.debugLine="la_edo.Text = c.GetString(\"CAT_CL_EDO\")"; -__ref._la_edo /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_EDO"))); -RDebugUtils.currentLine=5439519; - //BA.debugLineNum = 5439519;BA.debugLine="l_entre1.Text = c.GetString(\"CAT_CL_NOEXT\")"; -__ref._l_entre1 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_NOEXT"))); -RDebugUtils.currentLine=5439520; - //BA.debugLineNum = 5439520;BA.debugLine="l_entre2.Text = c.GetString(\"CAT_CL_NOINT\")"; -__ref._l_entre2 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_NOINT"))); -RDebugUtils.currentLine=5439521; - //BA.debugLineNum = 5439521;BA.debugLine="l_atiende.Text = c.GetString(\"CAT_CL_ATIENDE1\")"; -__ref._l_atiende /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_ATIENDE1"))); -RDebugUtils.currentLine=5439522; - //BA.debugLineNum = 5439522;BA.debugLine="l_atiende2.Text = c.GetString(\"CAT_CL_ATIENTE2\")"; -__ref._l_atiende2 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_ATIENTE2"))); -RDebugUtils.currentLine=5439523; - //BA.debugLineNum = 5439523;BA.debugLine="Label20.Text = c.GetString(\"CAT_CL_CP\")"; -__ref._label20 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_CP"))); -RDebugUtils.currentLine=5439524; - //BA.debugLineNum = 5439524;BA.debugLine="l_calle1.Text = c.GetString(\"CAT_CL_CALLE1\")"; -__ref._l_calle1 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_CALLE1"))); -RDebugUtils.currentLine=5439525; - //BA.debugLineNum = 5439525;BA.debugLine="TELEFONO = c.GetString(\"CAT_CL_TELEFONO\")"; -__ref._telefono /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_TELEFONO"); -RDebugUtils.currentLine=5439526; - //BA.debugLineNum = 5439526;BA.debugLine="l_total.Text = s.GetString(\"TOTAL_CLIE\")"; -__ref._l_total /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL_CLIE"))); -RDebugUtils.currentLine=5439527; - //BA.debugLineNum = 5439527;BA.debugLine="total_cliente = s.GetString(\"TOTAL_CLIE\")"; -__ref._total_cliente /*String*/ = __ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL_CLIE"); -RDebugUtils.currentLine=5439528; - //BA.debugLineNum = 5439528;BA.debugLine="Private factura As String = 0"; + //BA.debugLineNum = 222;BA.debugLine="cb_factura.Checked = False"; +_cb_factura.setChecked(__c.False); + //BA.debugLineNum = 223;BA.debugLine="p_abono.Visible = False"; +_p_abono.setVisible(__c.False); + //BA.debugLineNum = 224;BA.debugLine="Subs.centraPanel(p_abono, Root.Width)"; +_subs._centrapanel /*String*/ (ba,_p_abono,_root.getWidth()); + //BA.debugLineNum = 225;BA.debugLine="skmt.Initialize(ruta,\"kmt.db\", True)"; +_skmt.Initialize(_ruta,"kmt.db",__c.True); + //BA.debugLineNum = 226;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_CL"; +_c = (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_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 from kmt_info where CAT_CL_CODIGO In (Select cuenta from cuentaa)"))); + //BA.debugLineNum = 227;BA.debugLine="s=B4XPages.MainPage.skmt.ExecQuery(\"Select SUM(PE"; +_s = (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 SUM(PE_COSTO_TOT) As TOTAL_CLIE, SUM(PE_CANT) As CANT_CLIE, PC_FACTURA FROM PEDIDO_CLIENTE INNER JOIN PEDIDO ON PEDIDO_CLIENTE.PC_CLIENTE = PEDIDO.PE_CLIENTE WHERE (PE_CLIENTE IN (Select cuenta from cuentaa))"))); + //BA.debugLineNum = 228;BA.debugLine="s.Position=0"; +_s.setPosition((int) (0)); + //BA.debugLineNum = 229;BA.debugLine="If c.RowCount > 0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 230;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 231;BA.debugLine="la_cuenta.Text = c.GetString(\"CAT_CL_CODIGO\")"; +_la_cuenta.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_CODIGO"))); + //BA.debugLineNum = 232;BA.debugLine="La_nombre.Text = c.GetString(\"CAT_CL_NOMBRE\")"; +_la_nombre.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_NOMBRE"))); + //BA.debugLineNum = 233;BA.debugLine="la_Calle.Text = c.GetString(\"CAT_CL_CALLE\")"; +_la_calle.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_CALLE"))); + //BA.debugLineNum = 234;BA.debugLine="la_col.Text = c.GetString(\"CAT_CL_COLONIA\")"; +_la_col.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_COLONIA"))); + //BA.debugLineNum = 235;BA.debugLine="la_edo.Text = c.GetString(\"CAT_CL_EDO\")"; +_la_edo.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_EDO"))); + //BA.debugLineNum = 236;BA.debugLine="l_entre1.Text = c.GetString(\"CAT_CL_NOEXT\")"; +_l_entre1.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_NOEXT"))); + //BA.debugLineNum = 237;BA.debugLine="l_entre2.Text = c.GetString(\"CAT_CL_NOINT\")"; +_l_entre2.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_NOINT"))); + //BA.debugLineNum = 238;BA.debugLine="l_atiende.Text = c.GetString(\"CAT_CL_ATIENDE1\")"; +_l_atiende.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_ATIENDE1"))); + //BA.debugLineNum = 239;BA.debugLine="l_atiende2.Text = c.GetString(\"CAT_CL_ATIENTE2\")"; +_l_atiende2.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_ATIENTE2"))); + //BA.debugLineNum = 240;BA.debugLine="Label20.Text = c.GetString(\"CAT_CL_CP\")"; +_label20.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_CP"))); + //BA.debugLineNum = 241;BA.debugLine="l_calle1.Text = c.GetString(\"CAT_CL_CALLE1\")"; +_l_calle1.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_CALLE1"))); + //BA.debugLineNum = 242;BA.debugLine="TELEFONO = c.GetString(\"CAT_CL_TELEFONO\")"; +_telefono = _c.GetString("CAT_CL_TELEFONO"); + //BA.debugLineNum = 243;BA.debugLine="l_total.Text = s.GetString(\"TOTAL_CLIE\")"; +_l_total.setText(BA.ObjectToCharSequence(_s.GetString("TOTAL_CLIE"))); + //BA.debugLineNum = 244;BA.debugLine="total_cliente = s.GetString(\"TOTAL_CLIE\")"; +_total_cliente = _s.GetString("TOTAL_CLIE"); + //BA.debugLineNum = 245;BA.debugLine="Private factura As String = 0"; _factura = BA.NumberToString(0); -RDebugUtils.currentLine=5439529; - //BA.debugLineNum = 5439529;BA.debugLine="If s.GetString(\"PC_FACTURA\") <> Null And IsNumbe"; -if (__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_FACTURA")!= null && __c.IsNumber(__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_FACTURA"))) { -_factura = __ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_FACTURA");}; -RDebugUtils.currentLine=5439530; - //BA.debugLineNum = 5439530;BA.debugLine="If factura = \"1\" Then cb_factura.Checked = True"; + //BA.debugLineNum = 246;BA.debugLine="If s.GetString(\"PC_FACTURA\") <> Null And IsNumbe"; +if (_s.GetString("PC_FACTURA")!= null && __c.IsNumber(_s.GetString("PC_FACTURA"))) { +_factura = _s.GetString("PC_FACTURA");}; + //BA.debugLineNum = 247;BA.debugLine="If factura = \"1\" Then cb_factura.Checked = True"; if ((_factura).equals("1")) { -__ref._cb_factura /*anywheresoftware.b4a.objects.CompoundButtonWrapper.CheckBoxWrapper*/ .setChecked(__c.True);}; -RDebugUtils.currentLine=5439531; - //BA.debugLineNum = 5439531;BA.debugLine="m_lat = \"0\""; -__ref._m_lat /*String*/ = "0"; -RDebugUtils.currentLine=5439532; - //BA.debugLineNum = 5439532;BA.debugLine="If c.GetString(\"CAT_CL_LAT\") <> \"\" Then m_lat =c"; -if ((__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_LAT")).equals("") == false) { -__ref._m_lat /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_LAT");}; -RDebugUtils.currentLine=5439533; - //BA.debugLineNum = 5439533;BA.debugLine="If m_lat.Length < 5 Then m_lat = \"0\""; -if (__ref._m_lat /*String*/ .length()<5) { -__ref._m_lat /*String*/ = "0";}; -RDebugUtils.currentLine=5439534; - //BA.debugLineNum = 5439534;BA.debugLine="m_lon = \"0\""; -__ref._m_lon /*String*/ = "0"; -RDebugUtils.currentLine=5439535; - //BA.debugLineNum = 5439535;BA.debugLine="If c.GetString(\"CAT_CL_LONG\") <> \"\" Then m_lon ="; -if ((__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_LONG")).equals("") == false) { -__ref._m_lon /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_LONG");}; -RDebugUtils.currentLine=5439536; - //BA.debugLineNum = 5439536;BA.debugLine="If m_lon.Length < 5 Then m_lon = \"0\""; -if (__ref._m_lon /*String*/ .length()<5) { -__ref._m_lon /*String*/ = "0";}; -RDebugUtils.currentLine=5439537; - //BA.debugLineNum = 5439537;BA.debugLine="LA_RUTA = c.GetString(\"CAT_CL_RUTA\")"; -__ref._la_ruta /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_RUTA"); -RDebugUtils.currentLine=5439539; - //BA.debugLineNum = 5439539;BA.debugLine="If c.GetString(\"CAT_CL_NUM_SERIEFISICO\") = \"0\""; -if ((__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_NUM_SERIEFISICO")).equals("0")) { -RDebugUtils.currentLine=5439540; - //BA.debugLineNum = 5439540;BA.debugLine="L_QR.TEXT = \"SIN CODIGO\""; -__ref._l_qr /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("SIN CODIGO")); -RDebugUtils.currentLine=5439541; - //BA.debugLineNum = 5439541;BA.debugLine="L_QR.TextColor = Colors.Red"; -__ref._l_qr /*anywheresoftware.b4a.objects.LabelWrapper*/ .setTextColor(__c.Colors.Red); -RDebugUtils.currentLine=5439542; - //BA.debugLineNum = 5439542;BA.debugLine="gest.VISIBLE = False"; -__ref._gest /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=5439543; - //BA.debugLineNum = 5439543;BA.debugLine="BT_QR.Visible = True"; -__ref._bt_qr /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); +_cb_factura.setChecked(__c.True);}; + //BA.debugLineNum = 248;BA.debugLine="m_lat = \"0\""; +_m_lat = "0"; + //BA.debugLineNum = 249;BA.debugLine="If c.GetString(\"CAT_CL_LAT\") <> \"\" Then m_lat =c"; +if ((_c.GetString("CAT_CL_LAT")).equals("") == false) { +_m_lat = _c.GetString("CAT_CL_LAT");}; + //BA.debugLineNum = 250;BA.debugLine="If m_lat.Length < 5 Then m_lat = \"0\""; +if (_m_lat.length()<5) { +_m_lat = "0";}; + //BA.debugLineNum = 251;BA.debugLine="m_lon = \"0\""; +_m_lon = "0"; + //BA.debugLineNum = 252;BA.debugLine="If c.GetString(\"CAT_CL_LONG\") <> \"\" Then m_lon ="; +if ((_c.GetString("CAT_CL_LONG")).equals("") == false) { +_m_lon = _c.GetString("CAT_CL_LONG");}; + //BA.debugLineNum = 253;BA.debugLine="If m_lon.Length < 5 Then m_lon = \"0\""; +if (_m_lon.length()<5) { +_m_lon = "0";}; + //BA.debugLineNum = 254;BA.debugLine="LA_RUTA = c.GetString(\"CAT_CL_RUTA\")"; +_la_ruta = _c.GetString("CAT_CL_RUTA"); + //BA.debugLineNum = 256;BA.debugLine="If c.GetString(\"CAT_CL_NUM_SERIEFISICO\") = \"0\""; +if ((_c.GetString("CAT_CL_NUM_SERIEFISICO")).equals("0")) { + //BA.debugLineNum = 257;BA.debugLine="L_QR.TEXT = \"SIN CODIGO\""; +_l_qr.setText(BA.ObjectToCharSequence("SIN CODIGO")); + //BA.debugLineNum = 258;BA.debugLine="L_QR.TextColor = Colors.Red"; +_l_qr.setTextColor(__c.Colors.Red); + //BA.debugLineNum = 259;BA.debugLine="gest.VISIBLE = False"; +_gest.setVisible(__c.False); + //BA.debugLineNum = 260;BA.debugLine="BT_QR.Visible = True"; +_bt_qr.setVisible(__c.True); }else { -RDebugUtils.currentLine=5439545; - //BA.debugLineNum = 5439545;BA.debugLine="L_QR.TEXT = c.GetString(\"CAT_CL_NUM_SERIEFISICO"; -__ref._l_qr /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_NUM_SERIEFISICO"))); -RDebugUtils.currentLine=5439546; - //BA.debugLineNum = 5439546;BA.debugLine="L_QR.TextColor = Colors.Blue"; -__ref._l_qr /*anywheresoftware.b4a.objects.LabelWrapper*/ .setTextColor(__c.Colors.Blue); -RDebugUtils.currentLine=5439547; - //BA.debugLineNum = 5439547;BA.debugLine="BT_QR.Visible = False"; -__ref._bt_qr /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); + //BA.debugLineNum = 262;BA.debugLine="L_QR.TEXT = c.GetString(\"CAT_CL_NUM_SERIEFISICO"; +_l_qr.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_NUM_SERIEFISICO"))); + //BA.debugLineNum = 263;BA.debugLine="L_QR.TextColor = Colors.Blue"; +_l_qr.setTextColor(__c.Colors.Blue); + //BA.debugLineNum = 264;BA.debugLine="BT_QR.Visible = False"; +_bt_qr.setVisible(__c.False); }; }; -RDebugUtils.currentLine=5439550; - //BA.debugLineNum = 5439550;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=5439551; - //BA.debugLineNum = 5439551;BA.debugLine="s.Close"; -__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=5439552; - //BA.debugLineNum = 5439552;BA.debugLine="S2=B4XPages.MainPage.skmt.ExecQuery(\"select count"; -__ref._s2 /*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 count(*) AS CUANTOS from HIST_VENTAS WHERE HVD_CLIENTE IN (Select CUENTA from cuentaa)"))); -RDebugUtils.currentLine=5439553; - //BA.debugLineNum = 5439553;BA.debugLine="S2.Position =0"; -__ref._s2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=5439554; - //BA.debugLineNum = 5439554;BA.debugLine="CUANTOS = S2.GetString(\"CUANTOS\")"; -__ref._cuantos /*String*/ = __ref._s2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS"); -RDebugUtils.currentLine=5439555; - //BA.debugLineNum = 5439555;BA.debugLine="S2.Close"; -__ref._s2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=5439556; - //BA.debugLineNum = 5439556;BA.debugLine="If CUANTOS > 0 Then"; -if ((double)(Double.parseDouble(__ref._cuantos /*String*/ ))>0) { -RDebugUtils.currentLine=5439557; - //BA.debugLineNum = 5439557;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery(\"select sum("; -__ref._c2 /*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 sum(HVD_COSTO_TOT) AS TOTAL from HIST_VENTAS WHERE HVD_CLIENTE IN (Select CUENTA from cuentaa)"))); -RDebugUtils.currentLine=5439558; - //BA.debugLineNum = 5439558;BA.debugLine="c2.Position =0"; -__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=5439559; - //BA.debugLineNum = 5439559;BA.debugLine="MONTO_COMPRA = c2.GetString(\"TOTAL\")"; -__ref._monto_compra /*String*/ = __ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL"); -RDebugUtils.currentLine=5439560; - //BA.debugLineNum = 5439560;BA.debugLine="c2.Close"; -__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 267;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 268;BA.debugLine="s.Close"; +_s.Close(); + //BA.debugLineNum = 269;BA.debugLine="S2=B4XPages.MainPage.skmt.ExecQuery(\"select count"; +_s2 = (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 count(*) AS CUANTOS from HIST_VENTAS WHERE HVD_CLIENTE IN (Select CUENTA from cuentaa)"))); + //BA.debugLineNum = 270;BA.debugLine="S2.Position =0"; +_s2.setPosition((int) (0)); + //BA.debugLineNum = 271;BA.debugLine="CUANTOS = S2.GetString(\"CUANTOS\")"; +_cuantos = _s2.GetString("CUANTOS"); + //BA.debugLineNum = 272;BA.debugLine="S2.Close"; +_s2.Close(); + //BA.debugLineNum = 273;BA.debugLine="If CUANTOS > 0 Then"; +if ((double)(Double.parseDouble(_cuantos))>0) { + //BA.debugLineNum = 274;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery(\"select sum("; +_c2 = (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 sum(HVD_COSTO_TOT) AS TOTAL from HIST_VENTAS WHERE HVD_CLIENTE IN (Select CUENTA from cuentaa)"))); + //BA.debugLineNum = 275;BA.debugLine="c2.Position =0"; +_c2.setPosition((int) (0)); + //BA.debugLineNum = 276;BA.debugLine="MONTO_COMPRA = c2.GetString(\"TOTAL\")"; +_monto_compra = _c2.GetString("TOTAL"); + //BA.debugLineNum = 277;BA.debugLine="c2.Close"; +_c2.Close(); }else { -RDebugUtils.currentLine=5439562; - //BA.debugLineNum = 5439562;BA.debugLine="MONTO_COMPRA = \"0\""; -__ref._monto_compra /*String*/ = "0"; + //BA.debugLineNum = 279;BA.debugLine="MONTO_COMPRA = \"0\""; +_monto_compra = "0"; }; -RDebugUtils.currentLine=5439565; - //BA.debugLineNum = 5439565;BA.debugLine="la_saldotot.Text = MONTO_COMPRA"; -__ref._la_saldotot /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._monto_compra /*String*/ )); -RDebugUtils.currentLine=5439566; - //BA.debugLineNum = 5439566;BA.debugLine="If MONTO_COMPRA <> \"0\" Then"; -if ((__ref._monto_compra /*String*/ ).equals("0") == false) { -RDebugUtils.currentLine=5439567; - //BA.debugLineNum = 5439567;BA.debugLine="META2 = 1200 - MONTO_COMPRA"; -__ref._meta2 /*String*/ = BA.NumberToString(1200-(double)(Double.parseDouble(__ref._monto_compra /*String*/ ))); + //BA.debugLineNum = 282;BA.debugLine="la_saldotot.Text = MONTO_COMPRA"; +_la_saldotot.setText(BA.ObjectToCharSequence(_monto_compra)); + //BA.debugLineNum = 283;BA.debugLine="If MONTO_COMPRA <> \"0\" Then"; +if ((_monto_compra).equals("0") == false) { + //BA.debugLineNum = 284;BA.debugLine="META2 = 1200 - MONTO_COMPRA"; +_meta2 = BA.NumberToString(1200-(double)(Double.parseDouble(_monto_compra))); }else { -RDebugUtils.currentLine=5439569; - //BA.debugLineNum = 5439569;BA.debugLine="META2 = 1200"; -__ref._meta2 /*String*/ = BA.NumberToString(1200); + //BA.debugLineNum = 286;BA.debugLine="META2 = 1200"; +_meta2 = BA.NumberToString(1200); }; -RDebugUtils.currentLine=5439571; - //BA.debugLineNum = 5439571;BA.debugLine="If META2 < 1 Then"; -if ((double)(Double.parseDouble(__ref._meta2 /*String*/ ))<1) { -RDebugUtils.currentLine=5439572; - //BA.debugLineNum = 5439572;BA.debugLine="META2 = \"CUBIERTO\""; -__ref._meta2 /*String*/ = "CUBIERTO"; + //BA.debugLineNum = 288;BA.debugLine="If META2 < 1 Then"; +if ((double)(Double.parseDouble(_meta2))<1) { + //BA.debugLineNum = 289;BA.debugLine="META2 = \"CUBIERTO\""; +_meta2 = "CUBIERTO"; }; -RDebugUtils.currentLine=5439574; - //BA.debugLineNum = 5439574;BA.debugLine="la_saldooper.Text = META2"; -__ref._la_saldooper /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._meta2 /*String*/ )); -RDebugUtils.currentLine=5439575; - //BA.debugLineNum = 5439575;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select ID_ALM"; -__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=5439576; - //BA.debugLineNum = 5439576;BA.debugLine="If c.RowCount>0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=5439577; - //BA.debugLineNum = 5439577;BA.debugLine="C.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=5439578; - //BA.debugLineNum = 5439578;BA.debugLine="ALMACEN = C.GetString(\"ID_ALMACEN\")"; -__ref._almacen /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("ID_ALMACEN"); + //BA.debugLineNum = 291;BA.debugLine="la_saldooper.Text = META2"; +_la_saldooper.setText(BA.ObjectToCharSequence(_meta2)); + //BA.debugLineNum = 292;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select ID_ALM"; +_c = (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"))); + //BA.debugLineNum = 293;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 294;BA.debugLine="C.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 295;BA.debugLine="ALMACEN = C.GetString(\"ID_ALMACEN\")"; +_almacen = _c.GetString("ID_ALMACEN"); }; -RDebugUtils.currentLine=5439580; - //BA.debugLineNum = 5439580;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=5439581; - //BA.debugLineNum = 5439581;BA.debugLine="If ALMACEN = \"1\" Then"; -if ((__ref._almacen /*String*/ ).equals("1")) { -RDebugUtils.currentLine=5439582; - //BA.debugLineNum = 5439582;BA.debugLine="Tels.Visible = False"; -__ref._tels /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=5439583; - //BA.debugLineNum = 5439583;BA.debugLine="gest.Visible = False"; -__ref._gest /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); + //BA.debugLineNum = 297;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 298;BA.debugLine="If ALMACEN = \"1\" Then"; +if ((_almacen).equals("1")) { + //BA.debugLineNum = 299;BA.debugLine="Tels.Visible = False"; +_tels.setVisible(__c.False); + //BA.debugLineNum = 300;BA.debugLine="gest.Visible = False"; +_gest.setVisible(__c.False); }; -RDebugUtils.currentLine=5439586; - //BA.debugLineNum = 5439586;BA.debugLine="If ALMACEN = \"4\" Then"; -if ((__ref._almacen /*String*/ ).equals("4")) { -RDebugUtils.currentLine=5439588; - //BA.debugLineNum = 5439588;BA.debugLine="DD=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT COU"; -__ref._dd /*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*/ .ExecQuery2("SELECT COUNT(*) AS CUANTOS FROM HIST_VENTAS WHERE HVD_CLIENTE IN (Select cuenta from cuentaa) AND HVD_PRONOMBRE =?",new String[]{"KNORR RINDE MAS 70 GR"}))); -RDebugUtils.currentLine=5439589; - //BA.debugLineNum = 5439589;BA.debugLine="DD.Position =0"; -__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=5439590; - //BA.debugLineNum = 5439590;BA.debugLine="If DD.GetString(\"CUANTOS\") = 0 Then"; -if ((__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=5439591; - //BA.debugLineNum = 5439591;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT COU"; -__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*/ .ExecQuery2("SELECT COUNT(*) AS CUANTOS FROM PEDIDO WHERE PE_CLIENTE IN (Select cuenta from cuentaa) AND PE_PRONOMBRE =?",new String[]{"KNORR RINDE MAS 70 GR"}))); -RDebugUtils.currentLine=5439592; - //BA.debugLineNum = 5439592;BA.debugLine="c.Position =0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=5439598; - //BA.debugLineNum = 5439598;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 303;BA.debugLine="If ALMACEN = \"4\" Then"; +if ((_almacen).equals("4")) { + //BA.debugLineNum = 305;BA.debugLine="DD=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT COU"; +_dd = (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*/ .ExecQuery2("SELECT COUNT(*) AS CUANTOS FROM HIST_VENTAS WHERE HVD_CLIENTE IN (Select cuenta from cuentaa) AND HVD_PRONOMBRE =?",new String[]{"KNORR RINDE MAS 70 GR"}))); + //BA.debugLineNum = 306;BA.debugLine="DD.Position =0"; +_dd.setPosition((int) (0)); + //BA.debugLineNum = 307;BA.debugLine="If DD.GetString(\"CUANTOS\") = 0 Then"; +if ((_dd.GetString("CUANTOS")).equals(BA.NumberToString(0))) { + //BA.debugLineNum = 308;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT COU"; +_c = (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*/ .ExecQuery2("SELECT COUNT(*) AS CUANTOS FROM PEDIDO WHERE PE_CLIENTE IN (Select cuenta from cuentaa) AND PE_PRONOMBRE =?",new String[]{"KNORR RINDE MAS 70 GR"}))); + //BA.debugLineNum = 309;BA.debugLine="c.Position =0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 315;BA.debugLine="c.Close"; +_c.Close(); }else { }; -RDebugUtils.currentLine=5439602; - //BA.debugLineNum = 5439602;BA.debugLine="DD.Close"; -__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 319;BA.debugLine="DD.Close"; +_dd.Close(); }else { }; -RDebugUtils.currentLine=5439606; - //BA.debugLineNum = 5439606;BA.debugLine="If ALMACEN = \"16\" Or ALMACEN = \"13\" Then"; -if ((__ref._almacen /*String*/ ).equals("16") || (__ref._almacen /*String*/ ).equals("13")) { -RDebugUtils.currentLine=5439607; - //BA.debugLineNum = 5439607;BA.debugLine="Tels.Visible = False"; -__ref._tels /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=5439608; - //BA.debugLineNum = 5439608;BA.debugLine="gest.Visible = False"; -__ref._gest /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); + //BA.debugLineNum = 323;BA.debugLine="If ALMACEN = \"16\" Or ALMACEN = \"13\" Then"; +if ((_almacen).equals("16") || (_almacen).equals("13")) { + //BA.debugLineNum = 324;BA.debugLine="Tels.Visible = False"; +_tels.setVisible(__c.False); + //BA.debugLineNum = 325;BA.debugLine="gest.Visible = False"; +_gest.setVisible(__c.False); }; -RDebugUtils.currentLine=5439610; - //BA.debugLineNum = 5439610;BA.debugLine="CallSubDelayed(Tracker, \"Track\")"; + //BA.debugLineNum = 327;BA.debugLine="CallSubDelayed(Tracker, \"Track\")"; __c.CallSubDelayed(ba,(Object)(_tracker.getObject()),"Track"); -RDebugUtils.currentLine=5439612; - //BA.debugLineNum = 5439612;BA.debugLine="If Not(Starter.GPS.GPSEnabled) Then"; + //BA.debugLineNum = 329;BA.debugLine="If Not(Starter.GPS.GPSEnabled) Then"; if (__c.Not(_starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getGPSEnabled())) { -RDebugUtils.currentLine=5439613; - //BA.debugLineNum = 5439613;BA.debugLine="ToastMessageShow(\"Debe Activar el GPS del Equipo"; + //BA.debugLineNum = 330;BA.debugLine="ToastMessageShow(\"Debe Activar el GPS del Equipo"; __c.ToastMessageShow(BA.ObjectToCharSequence("Debe Activar el GPS del Equipo."),__c.True); -RDebugUtils.currentLine=5439614; - //BA.debugLineNum = 5439614;BA.debugLine="StartActivity(Starter.GPS.LocationSettingsIntent"; + //BA.debugLineNum = 331;BA.debugLine="StartActivity(Starter.GPS.LocationSettingsIntent"; __c.StartActivity(ba,(Object)(_starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getLocationSettingsIntent())); }else { -RDebugUtils.currentLine=5439616; - //BA.debugLineNum = 5439616;BA.debugLine="Starter.GPS.Start(0, 0)"; + //BA.debugLineNum = 333;BA.debugLine="Starter.GPS.Start(0, 0)"; _starter._gps /*anywheresoftware.b4a.gps.GPS*/ .Start(ba,(long) (0),(float) (0)); }; -RDebugUtils.currentLine=5439619; - //BA.debugLineNum = 5439619;BA.debugLine="CallSubDelayed(Tracker, \"StartFLPSmall\")"; + //BA.debugLineNum = 336;BA.debugLine="CallSubDelayed(Tracker, \"StartFLPSmall\")"; __c.CallSubDelayed(ba,(Object)(_tracker.getObject()),"StartFLPSmall"); -RDebugUtils.currentLine=5439620; - //BA.debugLineNum = 5439620;BA.debugLine="If Tracker.FLP.IsInitialized And Tracker.FLP.GetL"; + //BA.debugLineNum = 337;BA.debugLine="If Tracker.FLP.IsInitialized And Tracker.FLP.GetL"; if (_tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .IsInitialized() && _tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().IsInitialized()) { -RDebugUtils.currentLine=5439621; - //BA.debugLineNum = 5439621;BA.debugLine="B4XPages.MainPage.lat_gps = Tracker.FLP.GetLastK"; + //BA.debugLineNum = 338;BA.debugLine="B4XPages.MainPage.lat_gps = Tracker.FLP.GetLastK"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ = BA.NumberToString(_tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getLatitude()); -RDebugUtils.currentLine=5439622; - //BA.debugLineNum = 5439622;BA.debugLine="B4XPages.MainPage.lon_gps = Tracker.FLP.GetLastK"; + //BA.debugLineNum = 339;BA.debugLine="B4XPages.MainPage.lon_gps = Tracker.FLP.GetLastK"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ = BA.NumberToString(_tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getLongitude()); -RDebugUtils.currentLine=5439624; - //BA.debugLineNum = 5439624;BA.debugLine="GPS_LocationChanged(Tracker.FLP.GetLastKnownLoca"; -__ref._gps_locationchanged /*String*/ (null,_tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation()); + //BA.debugLineNum = 341;BA.debugLine="GPS_LocationChanged(Tracker.FLP.GetLastKnownLoca"; +_gps_locationchanged(_tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation()); }; -RDebugUtils.currentLine=5439626; - //BA.debugLineNum = 5439626;BA.debugLine="Tels.Visible = False"; -__ref._tels /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=5439627; - //BA.debugLineNum = 5439627;BA.debugLine="gest.Visible = False"; -__ref._gest /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=5439629; - //BA.debugLineNum = 5439629;BA.debugLine="If la_cuenta.text.SubString2(0,1) = \"N\" Then gest"; -if ((__ref._la_cuenta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText().substring((int) (0),(int) (1))).equals("N")) { -__ref._gest /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False);}; -RDebugUtils.currentLine=5439631; - //BA.debugLineNum = 5439631;BA.debugLine="b_inicioFinVenta.Text = \"INICIAR VENTA\""; -__ref._b_iniciofinventa /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setText(BA.ObjectToCharSequence("INICIAR VENTA")); -RDebugUtils.currentLine=5439632; - //BA.debugLineNum = 5439632;BA.debugLine="b_inicioFinVenta.BringToFront"; -__ref._b_iniciofinventa /*anywheresoftware.b4a.objects.ButtonWrapper*/ .BringToFront(); -RDebugUtils.currentLine=5439634; - //BA.debugLineNum = 5439634;BA.debugLine="If Not(Starter.enVenta) And la_cuenta.Text <> \"0\""; -if (__c.Not(_starter._enventa /*boolean*/ ) && (__ref._la_cuenta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("0") == false) { -RDebugUtils.currentLine=5439635; - //BA.debugLineNum = 5439635;BA.debugLine="b_inicioFinVenta.Visible = True"; -__ref._b_iniciofinventa /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); + //BA.debugLineNum = 343;BA.debugLine="Tels.Visible = False"; +_tels.setVisible(__c.False); + //BA.debugLineNum = 344;BA.debugLine="gest.Visible = False"; +_gest.setVisible(__c.False); + //BA.debugLineNum = 346;BA.debugLine="If la_cuenta.text.SubString2(0,1) = \"N\" Then gest"; +if ((_la_cuenta.getText().substring((int) (0),(int) (1))).equals("N")) { +_gest.setVisible(__c.False);}; + //BA.debugLineNum = 348;BA.debugLine="b_inicioFinVenta.Text = \"INICIAR VENTA\""; +_b_iniciofinventa.setText(BA.ObjectToCharSequence("INICIAR VENTA")); + //BA.debugLineNum = 349;BA.debugLine="b_inicioFinVenta.BringToFront"; +_b_iniciofinventa.BringToFront(); + //BA.debugLineNum = 351;BA.debugLine="If Not(Starter.enVenta) And la_cuenta.Text <> \"0\""; +if (__c.Not(_starter._enventa /*boolean*/ ) && (_la_cuenta.getText()).equals("0") == false) { + //BA.debugLineNum = 352;BA.debugLine="b_inicioFinVenta.Visible = True"; +_b_iniciofinventa.setVisible(__c.True); }else { -RDebugUtils.currentLine=5439639; - //BA.debugLineNum = 5439639;BA.debugLine="b_inicioFinVenta.Visible = False"; -__ref._b_iniciofinventa /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); + //BA.debugLineNum = 356;BA.debugLine="b_inicioFinVenta.Visible = False"; +_b_iniciofinventa.setVisible(__c.False); }; -RDebugUtils.currentLine=5439643; - //BA.debugLineNum = 5439643;BA.debugLine="End Sub"; + //BA.debugLineNum = 360;BA.debugLine="End Sub"; return ""; } -public String _gps_locationchanged(keymon.lat.medicomed.c_cliente __ref,anywheresoftware.b4a.gps.LocationWrapper _location1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "gps_locationchanged", false)) - {return ((String) Debug.delegate(ba, "gps_locationchanged", new Object[] {_location1}));} -anywheresoftware.b4a.gps.LocationWrapper _l1 = null; -anywheresoftware.b4a.gps.LocationWrapper _l2 = null; -long _distance = 0L; -RDebugUtils.currentLine=5505024; - //BA.debugLineNum = 5505024;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; -RDebugUtils.currentLine=5505026; - //BA.debugLineNum = 5505026;BA.debugLine="If Tracker.FLP.GetLastKnownLocation.IsInitialized"; -if (_tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().IsInitialized() && _tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getLatitude()!=0) { -RDebugUtils.currentLine=5505027; - //BA.debugLineNum = 5505027;BA.debugLine="B4XPages.MainPage.lat_gps = Tracker.FLP.GetLastK"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ = BA.NumberToString(_tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getLatitude()); -RDebugUtils.currentLine=5505028; - //BA.debugLineNum = 5505028;BA.debugLine="B4XPages.MainPage.lon_gps = Tracker.FLP.GetLastK"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ = BA.NumberToString(_tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getLongitude()); - }; -RDebugUtils.currentLine=5505032; - //BA.debugLineNum = 5505032;BA.debugLine="Dim l1, l2 As Location"; -_l1 = new anywheresoftware.b4a.gps.LocationWrapper(); -_l2 = new anywheresoftware.b4a.gps.LocationWrapper(); -RDebugUtils.currentLine=5505033; - //BA.debugLineNum = 5505033;BA.debugLine="l1.Initialize2(B4XPages.MainPage.lat_gps, B4XPage"; -_l1.Initialize2(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ,_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ); -RDebugUtils.currentLine=5505035; - //BA.debugLineNum = 5505035;BA.debugLine="l2.Initialize2(m_lat, m_lon)"; -_l2.Initialize2(__ref._m_lat /*String*/ ,__ref._m_lon /*String*/ ); -RDebugUtils.currentLine=5505037; - //BA.debugLineNum = 5505037;BA.debugLine="BT_QR.Enabled = True"; -__ref._bt_qr /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setEnabled(__c.True); -RDebugUtils.currentLine=5505038; - //BA.debugLineNum = 5505038;BA.debugLine="LA_GPS.TextColor = Colors.Blue"; -__ref._la_gps /*anywheresoftware.b4a.objects.LabelWrapper*/ .setTextColor(__c.Colors.Blue); -RDebugUtils.currentLine=5505039; - //BA.debugLineNum = 5505039;BA.debugLine="LA_GPS.Text = \"CON UBICACION GPS\""; -__ref._la_gps /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("CON UBICACION GPS")); -RDebugUtils.currentLine=5505040; - //BA.debugLineNum = 5505040;BA.debugLine="b_clinteSinVenta.Enabled = True"; -__ref._b_clintesinventa /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setEnabled(__c.True); -RDebugUtils.currentLine=5505041; - //BA.debugLineNum = 5505041;BA.debugLine="b_clienteVenta.Enabled = True"; -__ref._b_clienteventa /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setEnabled(__c.True); -RDebugUtils.currentLine=5505044; - //BA.debugLineNum = 5505044;BA.debugLine="Dim distance As Long"; -_distance = 0L; -RDebugUtils.currentLine=5505045; - //BA.debugLineNum = 5505045;BA.debugLine="distance = l1.DistanceTo(l2) 'the result is i"; -_distance = (long) (_l1.DistanceTo((android.location.Location)(_l2.getObject()))); -RDebugUtils.currentLine=5505046; - //BA.debugLineNum = 5505046;BA.debugLine="gest.Visible = False"; -__ref._gest /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=5505048; - //BA.debugLineNum = 5505048;BA.debugLine="LA_GEO.TextColor = Colors.Blue"; -__ref._la_geo /*anywheresoftware.b4a.objects.LabelWrapper*/ .setTextColor(__c.Colors.Blue); -RDebugUtils.currentLine=5505049; - //BA.debugLineNum = 5505049;BA.debugLine="Tels.Visible = False"; -__ref._tels /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=5505050; - //BA.debugLineNum = 5505050;BA.debugLine="gest.Visible = False"; -__ref._gest /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=5505054; - //BA.debugLineNum = 5505054;BA.debugLine="LA_GEO.Text= $\"$1.2{distance/1000} kms\"$"; -__ref._la_geo /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence((""+__c.SmartStringFormatter("1.2",(Object)(_distance/(double)1000))+" kms"))); -RDebugUtils.currentLine=5505055; - //BA.debugLineNum = 5505055;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FROM"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("DELETE FROM HIST_GPS"); -RDebugUtils.currentLine=5505056; - //BA.debugLineNum = 5505056;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO HIST_GPS (HGDATE, HGLAT, HGLON) VALUES(?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ )})); -RDebugUtils.currentLine=5505058; - //BA.debugLineNum = 5505058;BA.debugLine="l_ubicacion2.TextSize = 13"; -__ref._l_ubicacion2 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setTextSize((float) (13)); -RDebugUtils.currentLine=5505059; - //BA.debugLineNum = 5505059;BA.debugLine="l_ubicacion2.Text = $\"Precisión GPS $1.0{Location"; -__ref._l_ubicacion2 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(("Precisión GPS "+__c.SmartStringFormatter("1.0",(Object)(_location1.getAccuracy()))+" m"))); -RDebugUtils.currentLine=5505060; - //BA.debugLineNum = 5505060;BA.debugLine="If Location1.Accuracy > 200 Then"; -if (_location1.getAccuracy()>200) { -RDebugUtils.currentLine=5505061; - //BA.debugLineNum = 5505061;BA.debugLine="l_ubicacion2.TextColor = Colors.Red"; -__ref._l_ubicacion2 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setTextColor(__c.Colors.Red); -RDebugUtils.currentLine=5505062; - //BA.debugLineNum = 5505062;BA.debugLine="l_ubicacion2.TextSize = 16"; -__ref._l_ubicacion2 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setTextSize((float) (16)); -RDebugUtils.currentLine=5505063; - //BA.debugLineNum = 5505063;BA.debugLine="l_ubicacion2.Text = $\"Mala señal $1.0{Location1."; -__ref._l_ubicacion2 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(("Mala señal "+__c.SmartStringFormatter("1.0",(Object)(_location1.getAccuracy()))+" m"))); - }; -RDebugUtils.currentLine=5505066; - //BA.debugLineNum = 5505066;BA.debugLine="CallSubDelayed(Tracker, \"CreateLocationRequest\")"; -__c.CallSubDelayed(ba,(Object)(_tracker.getObject()),"CreateLocationRequest"); -RDebugUtils.currentLine=5505067; - //BA.debugLineNum = 5505067;BA.debugLine="End Sub"; -return ""; -} -public anywheresoftware.b4a.keywords.Common.ResumableSubWrapper _b4xpage_closerequest(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "b4xpage_closerequest", false)) - {return ((anywheresoftware.b4a.keywords.Common.ResumableSubWrapper) Debug.delegate(ba, "b4xpage_closerequest", null));} -ResumableSub_B4XPage_CloseRequest rsub = new ResumableSub_B4XPage_CloseRequest(this,__ref); +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.c_cliente parent,keymon.lat.medicomed.c_cliente __ref) { +public ResumableSub_B4XPage_CloseRequest(keymon.lat.medicomed.c_cliente parent) { this.parent = parent; -this.__ref = __ref; -this.__ref = parent; } -keymon.lat.medicomed.c_cliente __ref; keymon.lat.medicomed.c_cliente parent; int _resultado1 = 0; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="c_cliente"; while (true) { switch (state) { @@ -1341,28 +863,24 @@ parent.__c.ReturnFromResumableSub(this,null);return;} case 0: //C this.state = 1; -RDebugUtils.currentLine=5767172; - //BA.debugLineNum = 5767172;BA.debugLine="If IsNumber(l_total.text) And l_total.text <> \"0\""; + //BA.debugLineNum = 428;BA.debugLine="If IsNumber(l_total.text) And l_total.text <> \"0\""; if (true) break; case 1: //if this.state = 10; -if (parent.__c.IsNumber(__ref._l_total /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()) && (__ref._l_total /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("0") == false && parent.__c.Not(parent._subs._pedidoguardado /*boolean*/ (ba))) { +if (parent.__c.IsNumber(parent._l_total.getText()) && (parent._l_total.getText()).equals("0") == false && parent.__c.Not(parent._subs._pedidoguardado /*boolean*/ (ba))) { this.state = 3; }if (true) break; case 3: //C this.state = 4; -RDebugUtils.currentLine=5767173; - //BA.debugLineNum = 5767173;BA.debugLine="LogColor(\"Hay Venta\", Colors.Red)"; -parent.__c.LogImpl("35767173","Hay Venta",parent.__c.Colors.Red); -RDebugUtils.currentLine=5767174; - //BA.debugLineNum = 5767174;BA.debugLine="Private resultado1 As Int = Msgbox2($\"Va salir s"; + //BA.debugLineNum = 429;BA.debugLine="LogColor(\"Hay Venta\", Colors.Red)"; +parent.__c.LogImpl("343122693","Hay Venta",parent.__c.Colors.Red); + //BA.debugLineNum = 430;BA.debugLine="Private resultado1 As Int = Msgbox2($\"Va salir s"; _resultado1 = parent.__c.Msgbox2(BA.ObjectToCharSequence(("Va salir sin haber guardado la venta, si continua, la venta se BORRARA."+parent.__c.SmartStringFormatter("",(Object)(parent.__c.CRLF))+""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.CRLF))+"¿Esta seguro que desea continuar?")),BA.ObjectToCharSequence("SE VA A BORRAR LA VENTA"),"Borrar Venta","Guardar Venta","",(android.graphics.Bitmap)(parent.__c.LoadBitmap(parent.__c.File.getDirAssets(),"alert2.png").getObject()),ba); -RDebugUtils.currentLine=5767175; - //BA.debugLineNum = 5767175;BA.debugLine="If resultado1 = DialogResponse.POSITIVE Then"; + //BA.debugLineNum = 431;BA.debugLine="If resultado1 = DialogResponse.POSITIVE Then"; if (true) break; case 4: @@ -1370,42 +888,31 @@ case 4: this.state = 9; if (_resultado1==parent.__c.DialogResponse.POSITIVE) { this.state = 6; -}else -{RDebugUtils.currentLine=5767181; - //BA.debugLineNum = 5767181;BA.debugLine="else if resultado1=DialogResponse.CANCEL Then"; -if (_resultado1==parent.__c.DialogResponse.CANCEL) { +}else if(_resultado1==parent.__c.DialogResponse.CANCEL) { this.state = 8; -}} -if (true) break; +}if (true) break; case 6: //C this.state = 9; -RDebugUtils.currentLine=5767176; - //BA.debugLineNum = 5767176;BA.debugLine="Log(\"Borrra venta\")"; -parent.__c.LogImpl("35767176","Borrra venta",0); -RDebugUtils.currentLine=5767177; - //BA.debugLineNum = 5767177;BA.debugLine="Subs.borraPedidoClienteActual"; + //BA.debugLineNum = 432;BA.debugLine="Log(\"Borrra venta\")"; +parent.__c.LogImpl("343122696","Borrra venta",0); + //BA.debugLineNum = 433;BA.debugLine="Subs.borraPedidoClienteActual"; parent._subs._borrapedidoclienteactual /*String*/ (ba); -RDebugUtils.currentLine=5767178; - //BA.debugLineNum = 5767178;BA.debugLine="ToastMessageShow(\"Venta Borrada\", False)"; + //BA.debugLineNum = 434;BA.debugLine="ToastMessageShow(\"Venta Borrada\", False)"; parent.__c.ToastMessageShow(BA.ObjectToCharSequence("Venta Borrada"),parent.__c.False); -RDebugUtils.currentLine=5767180; - //BA.debugLineNum = 5767180;BA.debugLine="B4XPages.ShowPage(\"Principal\")"; + //BA.debugLineNum = 436;BA.debugLine="B4XPages.ShowPage(\"Principal\")"; parent._b4xpages._showpage /*String*/ (ba,"Principal"); if (true) break; case 8: //C this.state = 9; -RDebugUtils.currentLine=5767182; - //BA.debugLineNum = 5767182;BA.debugLine="Log(\"Pedido guardado\")"; -parent.__c.LogImpl("35767182","Pedido guardado",0); -RDebugUtils.currentLine=5767183; - //BA.debugLineNum = 5767183;BA.debugLine="Guardar_Click"; -__ref._guardar_click /*String*/ (null); -RDebugUtils.currentLine=5767184; - //BA.debugLineNum = 5767184;BA.debugLine="ToastMessageShow(\"Venta Guardada\", False)"; + //BA.debugLineNum = 438;BA.debugLine="Log(\"Pedido guardado\")"; +parent.__c.LogImpl("343122702","Pedido guardado",0); + //BA.debugLineNum = 439;BA.debugLine="Guardar_Click"; +parent._guardar_click(); + //BA.debugLineNum = 440;BA.debugLine="ToastMessageShow(\"Venta Guardada\", False)"; parent.__c.ToastMessageShow(BA.ObjectToCharSequence("Venta Guardada"),parent.__c.False); if (true) break; @@ -1419,731 +926,568 @@ case 10: //C this.state = -1; ; -RDebugUtils.currentLine=5767187; - //BA.debugLineNum = 5767187;BA.debugLine="ToastMessageShow(\"Por favor presione GUARDAR para"; + //BA.debugLineNum = 443;BA.debugLine="ToastMessageShow(\"Por favor presione GUARDAR para"; parent.__c.ToastMessageShow(BA.ObjectToCharSequence("Por favor presione GUARDAR para continuar"),parent.__c.True); -RDebugUtils.currentLine=5767191; - //BA.debugLineNum = 5767191;BA.debugLine="Return False"; + //BA.debugLineNum = 447;BA.debugLine="Return False"; if (true) { parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.False));return;}; -RDebugUtils.currentLine=5767192; - //BA.debugLineNum = 5767192;BA.debugLine="End Sub"; + //BA.debugLineNum = 448;BA.debugLine="End Sub"; if (true) break; } } } } -public String _b4xpage_created(keymon.lat.medicomed.c_cliente __ref,anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "b4xpage_created", false)) - {return ((String) Debug.delegate(ba, "b4xpage_created", new Object[] {_root1}));} -RDebugUtils.currentLine=5373952; - //BA.debugLineNum = 5373952;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -RDebugUtils.currentLine=5373953; - //BA.debugLineNum = 5373953;BA.debugLine="Root = Root1"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = _root1; -RDebugUtils.currentLine=5373956; - //BA.debugLineNum = 5373956;BA.debugLine="Root.LoadLayout(\"cliente\")"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .LoadLayout("cliente",ba); -RDebugUtils.currentLine=5373957; - //BA.debugLineNum = 5373957;BA.debugLine="ruta = File.DirInternal"; -__ref._ruta /*String*/ = __c.File.getDirInternal(); -RDebugUtils.currentLine=5373958; - //BA.debugLineNum = 5373958;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; -if (__c.File.Exists(__ref._ruta /*String*/ ,"kmt.db")==__c.False) { -RDebugUtils.currentLine=5373959; - //BA.debugLineNum = 5373959;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; -__c.File.Copy(__c.File.getDirAssets(),"kmt.db",__ref._ruta /*String*/ ,"kmt.db"); +public String _b4xpage_created(anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ + //BA.debugLineNum = 162;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; + //BA.debugLineNum = 163;BA.debugLine="Root = Root1"; +_root = _root1; + //BA.debugLineNum = 166;BA.debugLine="Root.LoadLayout(\"cliente\")"; +_root.LoadLayout("cliente",ba); + //BA.debugLineNum = 167;BA.debugLine="ruta = File.DirInternal"; +_ruta = __c.File.getDirInternal(); + //BA.debugLineNum = 168;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; +if (__c.File.Exists(_ruta,"kmt.db")==__c.False) { + //BA.debugLineNum = 169;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; +__c.File.Copy(__c.File.getDirAssets(),"kmt.db",_ruta,"kmt.db"); }; -RDebugUtils.currentLine=5373961; - //BA.debugLineNum = 5373961;BA.debugLine="skmt.Initialize(ruta,\"kmt.db\", True)"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .Initialize(__ref._ruta /*String*/ ,"kmt.db",__c.True); -RDebugUtils.currentLine=5373962; - //BA.debugLineNum = 5373962;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_CL"; -__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_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 from kmt_info where CAT_CL_CODIGO In (Select cuenta from cuentaa)"))); -RDebugUtils.currentLine=5373963; - //BA.debugLineNum = 5373963;BA.debugLine="s=B4XPages.MainPage.skmt.ExecQuery(\"select sum(pe"; -__ref._s /*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 sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); -RDebugUtils.currentLine=5373964; - //BA.debugLineNum = 5373964;BA.debugLine="s.Position=0"; -__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=5373965; - //BA.debugLineNum = 5373965;BA.debugLine="If c.RowCount>0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=5373966; - //BA.debugLineNum = 5373966;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=5373967; - //BA.debugLineNum = 5373967;BA.debugLine="la_cuenta.Text = c.GetString(\"CAT_CL_CODIGO\")"; -__ref._la_cuenta /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_CODIGO"))); -RDebugUtils.currentLine=5373968; - //BA.debugLineNum = 5373968;BA.debugLine="cuenta = c.GetString(\"CAT_CL_CODIGO\")"; -__ref._cuenta /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_CODIGO"); -RDebugUtils.currentLine=5373969; - //BA.debugLineNum = 5373969;BA.debugLine="La_nombre.Text = c.GetString(\"CAT_CL_NOMBRE\")"; -__ref._la_nombre /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_NOMBRE"))); -RDebugUtils.currentLine=5373970; - //BA.debugLineNum = 5373970;BA.debugLine="la_Calle.Text = c.GetString(\"CAT_CL_CALLE\") & c."; -__ref._la_calle /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_CALLE")+__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_NOEXT"))); -RDebugUtils.currentLine=5373971; - //BA.debugLineNum = 5373971;BA.debugLine="la_col.Text = c.GetString(\"CAT_CL_COLONIA\")"; -__ref._la_col /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_COLONIA"))); -RDebugUtils.currentLine=5373972; - //BA.debugLineNum = 5373972;BA.debugLine="la_edo.Text = c.GetString(\"CAT_CL_EDO\")"; -__ref._la_edo /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_EDO"))); -RDebugUtils.currentLine=5373974; - //BA.debugLineNum = 5373974;BA.debugLine="l_entre1.Text = c.GetString(\"CAT_CL_NOEXT\")"; -__ref._l_entre1 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_NOEXT"))); -RDebugUtils.currentLine=5373975; - //BA.debugLineNum = 5373975;BA.debugLine="l_entre2.Text = c.GetString(\"CAT_CL_NOINT\")"; -__ref._l_entre2 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_NOINT"))); -RDebugUtils.currentLine=5373976; - //BA.debugLineNum = 5373976;BA.debugLine="l_atiende.Text = c.GetString(\"CAT_CL_ATIENDE1\")"; -__ref._l_atiende /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_ATIENDE1"))); -RDebugUtils.currentLine=5373977; - //BA.debugLineNum = 5373977;BA.debugLine="l_atiende2.Text = c.GetString(\"CAT_CL_ATIENTE2\")"; -__ref._l_atiende2 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_ATIENTE2"))); -RDebugUtils.currentLine=5373978; - //BA.debugLineNum = 5373978;BA.debugLine="la_saldotot.Text = c.GetString(\"CAT_CL_TELEFONO\""; -__ref._la_saldotot /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_TELEFONO"))); -RDebugUtils.currentLine=5373979; - //BA.debugLineNum = 5373979;BA.debugLine="la_saldooper.Text = c.GetString(\"CAT_CL_EMAIL\")"; -__ref._la_saldooper /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_EMAIL"))); -RDebugUtils.currentLine=5373980; - //BA.debugLineNum = 5373980;BA.debugLine="l_total.Text = s.GetString(\"TOTAL_CLIE\")"; -__ref._l_total /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL_CLIE"))); -RDebugUtils.currentLine=5373981; - //BA.debugLineNum = 5373981;BA.debugLine="total_cliente = s.GetString(\"TOTAL_CLIE\")"; -__ref._total_cliente /*String*/ = __ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL_CLIE"); -RDebugUtils.currentLine=5373982; - //BA.debugLineNum = 5373982;BA.debugLine="MONTO_COMPRA = c.GetString(\"CAT_CL_MTOCOMPRA\")"; -__ref._monto_compra /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_MTOCOMPRA"); -RDebugUtils.currentLine=5373983; - //BA.debugLineNum = 5373983;BA.debugLine="Label20.Text = c.GetString(\"CAT_CL_CP\")"; -__ref._label20 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_CP"))); + //BA.debugLineNum = 171;BA.debugLine="skmt.Initialize(ruta,\"kmt.db\", True)"; +_skmt.Initialize(_ruta,"kmt.db",__c.True); + //BA.debugLineNum = 172;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_CL"; +_c = (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_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 from kmt_info where CAT_CL_CODIGO In (Select cuenta from cuentaa)"))); + //BA.debugLineNum = 173;BA.debugLine="s=B4XPages.MainPage.skmt.ExecQuery(\"select sum(pe"; +_s = (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 sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); + //BA.debugLineNum = 174;BA.debugLine="s.Position=0"; +_s.setPosition((int) (0)); + //BA.debugLineNum = 175;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 176;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 177;BA.debugLine="la_cuenta.Text = c.GetString(\"CAT_CL_CODIGO\")"; +_la_cuenta.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_CODIGO"))); + //BA.debugLineNum = 178;BA.debugLine="cuenta = c.GetString(\"CAT_CL_CODIGO\")"; +_cuenta = _c.GetString("CAT_CL_CODIGO"); + //BA.debugLineNum = 179;BA.debugLine="La_nombre.Text = c.GetString(\"CAT_CL_NOMBRE\")"; +_la_nombre.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_NOMBRE"))); + //BA.debugLineNum = 180;BA.debugLine="la_Calle.Text = c.GetString(\"CAT_CL_CALLE\") & c."; +_la_calle.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_CALLE")+_c.GetString("CAT_CL_NOEXT"))); + //BA.debugLineNum = 181;BA.debugLine="la_col.Text = c.GetString(\"CAT_CL_COLONIA\")"; +_la_col.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_COLONIA"))); + //BA.debugLineNum = 182;BA.debugLine="la_edo.Text = c.GetString(\"CAT_CL_EDO\")"; +_la_edo.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_EDO"))); + //BA.debugLineNum = 184;BA.debugLine="l_entre1.Text = c.GetString(\"CAT_CL_NOEXT\")"; +_l_entre1.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_NOEXT"))); + //BA.debugLineNum = 185;BA.debugLine="l_entre2.Text = c.GetString(\"CAT_CL_NOINT\")"; +_l_entre2.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_NOINT"))); + //BA.debugLineNum = 186;BA.debugLine="l_atiende.Text = c.GetString(\"CAT_CL_ATIENDE1\")"; +_l_atiende.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_ATIENDE1"))); + //BA.debugLineNum = 187;BA.debugLine="l_atiende2.Text = c.GetString(\"CAT_CL_ATIENTE2\")"; +_l_atiende2.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_ATIENTE2"))); + //BA.debugLineNum = 188;BA.debugLine="la_saldotot.Text = c.GetString(\"CAT_CL_TELEFONO\""; +_la_saldotot.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_TELEFONO"))); + //BA.debugLineNum = 189;BA.debugLine="la_saldooper.Text = c.GetString(\"CAT_CL_EMAIL\")"; +_la_saldooper.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_EMAIL"))); + //BA.debugLineNum = 190;BA.debugLine="l_total.Text = s.GetString(\"TOTAL_CLIE\")"; +_l_total.setText(BA.ObjectToCharSequence(_s.GetString("TOTAL_CLIE"))); + //BA.debugLineNum = 191;BA.debugLine="total_cliente = s.GetString(\"TOTAL_CLIE\")"; +_total_cliente = _s.GetString("TOTAL_CLIE"); + //BA.debugLineNum = 192;BA.debugLine="MONTO_COMPRA = c.GetString(\"CAT_CL_MTOCOMPRA\")"; +_monto_compra = _c.GetString("CAT_CL_MTOCOMPRA"); + //BA.debugLineNum = 193;BA.debugLine="Label20.Text = c.GetString(\"CAT_CL_CP\")"; +_label20.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_CP"))); }; -RDebugUtils.currentLine=5373985; - //BA.debugLineNum = 5373985;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=5373986; - //BA.debugLineNum = 5373986;BA.debugLine="s.Close"; -__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=5373987; - //BA.debugLineNum = 5373987;BA.debugLine="btAdmin.Initialize(\"BlueTeeth\")"; -__ref._btadmin /*anywheresoftware.b4a.objects.Serial.BluetoothAdmin*/ .Initialize(ba,"BlueTeeth"); -RDebugUtils.currentLine=5373988; - //BA.debugLineNum = 5373988;BA.debugLine="cmp20.Initialize(\"Printer\")"; -__ref._cmp20 /*anywheresoftware.b4a.objects.Serial*/ .Initialize("Printer"); -RDebugUtils.currentLine=5373989; - //BA.debugLineNum = 5373989;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=5373990; - //BA.debugLineNum = 5373990;BA.debugLine="End Sub"; + //BA.debugLineNum = 195;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 196;BA.debugLine="s.Close"; +_s.Close(); + //BA.debugLineNum = 197;BA.debugLine="btAdmin.Initialize(\"BlueTeeth\")"; +_btadmin.Initialize(ba,"BlueTeeth"); + //BA.debugLineNum = 198;BA.debugLine="cmp20.Initialize(\"Printer\")"; +_cmp20.Initialize("Printer"); + //BA.debugLineNum = 199;BA.debugLine="reqManager.Initialize(Me, B4XPages.MainPage.SERVE"; +_reqmanager._initialize /*String*/ (ba,this,_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._server /*String*/ ); + //BA.debugLineNum = 200;BA.debugLine="End Sub"; return ""; } -public String _bt_qr_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "bt_qr_click", false)) - {return ((String) Debug.delegate(ba, "bt_qr_click", null));} -RDebugUtils.currentLine=6291456; - //BA.debugLineNum = 6291456;BA.debugLine="Sub BT_QR_Click"; -RDebugUtils.currentLine=6291457; - //BA.debugLineNum = 6291457;BA.debugLine="sc.isportrait = True"; -__ref._sc /*ice.zxing.b4aZXingLib*/ .isportrait = __c.True; -RDebugUtils.currentLine=6291458; - //BA.debugLineNum = 6291458;BA.debugLine="sc.timeoutDuration = 45"; -__ref._sc /*ice.zxing.b4aZXingLib*/ .timeoutDuration = (int) (45); -RDebugUtils.currentLine=6291459; - //BA.debugLineNum = 6291459;BA.debugLine="sc.theViewFinderXfactor = 0.7"; -__ref._sc /*ice.zxing.b4aZXingLib*/ .theViewFinderXfactor = 0.7; -RDebugUtils.currentLine=6291460; - //BA.debugLineNum = 6291460;BA.debugLine="sc.theViewFinderYfactor = 0.5"; -__ref._sc /*ice.zxing.b4aZXingLib*/ .theViewFinderYfactor = 0.5; -RDebugUtils.currentLine=6291461; - //BA.debugLineNum = 6291461;BA.debugLine="sc.theResultColor = Colors.Green"; -__ref._sc /*ice.zxing.b4aZXingLib*/ .theResultColor = __c.Colors.Green; -RDebugUtils.currentLine=6291462; - //BA.debugLineNum = 6291462;BA.debugLine="sc.mustVibrate = True"; -__ref._sc /*ice.zxing.b4aZXingLib*/ .mustVibrate = __c.True; -RDebugUtils.currentLine=6291463; - //BA.debugLineNum = 6291463;BA.debugLine="sc.BeginScan(\"sc\")"; -__ref._sc /*ice.zxing.b4aZXingLib*/ .BeginScan(ba,"sc"); -RDebugUtils.currentLine=6291464; - //BA.debugLineNum = 6291464;BA.debugLine="End Sub"; +public String _bt_qr_click() throws Exception{ + //BA.debugLineNum = 549;BA.debugLine="Sub BT_QR_Click"; + //BA.debugLineNum = 550;BA.debugLine="sc.isportrait = True"; +_sc.isportrait = __c.True; + //BA.debugLineNum = 551;BA.debugLine="sc.timeoutDuration = 45"; +_sc.timeoutDuration = (int) (45); + //BA.debugLineNum = 552;BA.debugLine="sc.theViewFinderXfactor = 0.7"; +_sc.theViewFinderXfactor = 0.7; + //BA.debugLineNum = 553;BA.debugLine="sc.theViewFinderYfactor = 0.5"; +_sc.theViewFinderYfactor = 0.5; + //BA.debugLineNum = 554;BA.debugLine="sc.theResultColor = Colors.Green"; +_sc.theResultColor = __c.Colors.Green; + //BA.debugLineNum = 555;BA.debugLine="sc.mustVibrate = True"; +_sc.mustVibrate = __c.True; + //BA.debugLineNum = 556;BA.debugLine="sc.BeginScan(\"sc\")"; +_sc.BeginScan(ba,"sc"); + //BA.debugLineNum = 557;BA.debugLine="End Sub"; return ""; } -public String _calc_ean_checksum(keymon.lat.medicomed.c_cliente __ref,String _number) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "calc_ean_checksum", false)) - {return ((String) Debug.delegate(ba, "calc_ean_checksum", new Object[] {_number}));} +public String _calc_ean_checksum(String _number) throws Exception{ int _i = 0; char _co = '\0'; int _soma = 0; int _n = 0; float _digit = 0f; -RDebugUtils.currentLine=6553600; - //BA.debugLineNum = 6553600;BA.debugLine="Sub calc_ean_checksum(number As String) As String"; -RDebugUtils.currentLine=6553601; - //BA.debugLineNum = 6553601;BA.debugLine="Dim i As Int"; + //BA.debugLineNum = 592;BA.debugLine="Sub calc_ean_checksum(number As String) As String"; + //BA.debugLineNum = 593;BA.debugLine="Dim i As Int"; _i = 0; -RDebugUtils.currentLine=6553602; - //BA.debugLineNum = 6553602;BA.debugLine="Dim cO As Char"; + //BA.debugLineNum = 594;BA.debugLine="Dim cO As Char"; _co = '\0'; -RDebugUtils.currentLine=6553603; - //BA.debugLineNum = 6553603;BA.debugLine="Dim soma As Int"; + //BA.debugLineNum = 595;BA.debugLine="Dim soma As Int"; _soma = 0; -RDebugUtils.currentLine=6553604; - //BA.debugLineNum = 6553604;BA.debugLine="Dim n As Int"; + //BA.debugLineNum = 596;BA.debugLine="Dim n As Int"; _n = 0; -RDebugUtils.currentLine=6553605; - //BA.debugLineNum = 6553605;BA.debugLine="Dim digit As Float"; + //BA.debugLineNum = 597;BA.debugLine="Dim digit As Float"; _digit = 0f; -RDebugUtils.currentLine=6553606; - //BA.debugLineNum = 6553606;BA.debugLine="soma = 0"; + //BA.debugLineNum = 598;BA.debugLine="soma = 0"; _soma = (int) (0); -RDebugUtils.currentLine=6553607; - //BA.debugLineNum = 6553607;BA.debugLine="For i=0 To number.Length - 1"; + //BA.debugLineNum = 599;BA.debugLine="For i=0 To number.Length - 1"; { final int step7 = 1; final int limit7 = (int) (_number.length()-1); _i = (int) (0) ; for (;_i <= limit7 ;_i = _i + step7 ) { -RDebugUtils.currentLine=6553608; - //BA.debugLineNum = 6553608;BA.debugLine="digit = number.SubString2(i,i+1)"; + //BA.debugLineNum = 600;BA.debugLine="digit = number.SubString2(i,i+1)"; _digit = (float)(Double.parseDouble(_number.substring(_i,(int) (_i+1)))); -RDebugUtils.currentLine=6553609; - //BA.debugLineNum = 6553609;BA.debugLine="n= digit * ((i Mod 2) * 2 + 1)"; + //BA.debugLineNum = 601;BA.debugLine="n= digit * ((i Mod 2) * 2 + 1)"; _n = (int) (_digit*((_i%2)*2+1)); -RDebugUtils.currentLine=6553610; - //BA.debugLineNum = 6553610;BA.debugLine="soma=soma+n"; + //BA.debugLineNum = 602;BA.debugLine="soma=soma+n"; _soma = (int) (_soma+_n); } }; -RDebugUtils.currentLine=6553612; - //BA.debugLineNum = 6553612;BA.debugLine="Return number & ( ( 10 - ( soma Mod 10 )) Mod 10"; + //BA.debugLineNum = 604;BA.debugLine="Return number & ( ( 10 - ( soma Mod 10 )) Mod 10"; if (true) return _number+BA.NumberToString(((10-(_soma%10))%10)); -RDebugUtils.currentLine=6553613; - //BA.debugLineNum = 6553613;BA.debugLine="End Sub"; + //BA.debugLineNum = 605;BA.debugLine="End Sub"; return ""; } -public String _cb_factura_checkedchange(keymon.lat.medicomed.c_cliente __ref,boolean _checked) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "cb_factura_checkedchange", false)) - {return ((String) Debug.delegate(ba, "cb_factura_checkedchange", new Object[] {_checked}));} -RDebugUtils.currentLine=7405568; - //BA.debugLineNum = 7405568;BA.debugLine="Private Sub cb_factura_CheckedChange(Checked As Bo"; -RDebugUtils.currentLine=7405570; - //BA.debugLineNum = 7405570;BA.debugLine="If Checked Then p_cbFactura.Color = Colors.Green"; +public String _cb_factura_checkedchange(boolean _checked) throws Exception{ + //BA.debugLineNum = 816;BA.debugLine="Private Sub cb_factura_CheckedChange(Checked As Bo"; + //BA.debugLineNum = 818;BA.debugLine="If Checked Then p_cbFactura.Color = Colors.Green"; if (_checked) { -__ref._p_cbfactura /*anywheresoftware.b4a.objects.PanelWrapper*/ .setColor(__c.Colors.Green);} +_p_cbfactura.setColor(__c.Colors.Green);} else { -__ref._p_cbfactura /*anywheresoftware.b4a.objects.PanelWrapper*/ .setColor(__c.Colors.Red);}; -RDebugUtils.currentLine=7405571; - //BA.debugLineNum = 7405571;BA.debugLine="End Sub"; +_p_cbfactura.setColor(__c.Colors.Red);}; + //BA.debugLineNum = 819;BA.debugLine="End Sub"; return ""; } -public String _class_globals(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -RDebugUtils.currentLine=5242880; - //BA.debugLineNum = 5242880;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=5242881; - //BA.debugLineNum = 5242881;BA.debugLine="Private Root As B4XView 'ignore"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 5;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 6;BA.debugLine="Private Root As B4XView 'ignore"; _root = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=5242882; - //BA.debugLineNum = 5242882;BA.debugLine="Private xui As XUI 'ignore"; + //BA.debugLineNum = 7;BA.debugLine="Private xui As XUI 'ignore"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=5242883; - //BA.debugLineNum = 5242883;BA.debugLine="Private p_cliente As Panel"; + //BA.debugLineNum = 8;BA.debugLine="Private p_cliente As Panel"; _p_cliente = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=5242884; - //BA.debugLineNum = 5242884;BA.debugLine="Dim reqManager As DBRequestManager"; + //BA.debugLineNum = 9;BA.debugLine="Dim reqManager As DBRequestManager"; _reqmanager = new keymon.lat.medicomed.dbrequestmanager(); -RDebugUtils.currentLine=5242885; - //BA.debugLineNum = 5242885;BA.debugLine="Dim cmd As DBCommand"; + //BA.debugLineNum = 10;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=5242886; - //BA.debugLineNum = 5242886;BA.debugLine="Dim ime As IME"; + //BA.debugLineNum = 11;BA.debugLine="Dim ime As IME"; _ime = new anywheresoftware.b4a.objects.IME(); -RDebugUtils.currentLine=5242888; - //BA.debugLineNum = 5242888;BA.debugLine="Dim g As GPS"; + //BA.debugLineNum = 13;BA.debugLine="Dim g As GPS"; _g = new anywheresoftware.b4a.gps.GPS(); -RDebugUtils.currentLine=5242889; - //BA.debugLineNum = 5242889;BA.debugLine="Dim ruta As String"; + //BA.debugLineNum = 14;BA.debugLine="Dim ruta As String"; _ruta = ""; -RDebugUtils.currentLine=5242890; - //BA.debugLineNum = 5242890;BA.debugLine="Dim skmt As SQL"; + //BA.debugLineNum = 15;BA.debugLine="Dim skmt As SQL"; _skmt = new anywheresoftware.b4a.sql.SQL(); -RDebugUtils.currentLine=5242891; - //BA.debugLineNum = 5242891;BA.debugLine="Dim clie_id As String"; + //BA.debugLineNum = 16;BA.debugLine="Dim clie_id As String"; _clie_id = ""; -RDebugUtils.currentLine=5242892; - //BA.debugLineNum = 5242892;BA.debugLine="Dim sDate,sTime As String"; + //BA.debugLineNum = 17;BA.debugLine="Dim sDate,sTime As String"; _sdate = ""; _stime = ""; -RDebugUtils.currentLine=5242893; - //BA.debugLineNum = 5242893;BA.debugLine="Dim usuario As String"; + //BA.debugLineNum = 18;BA.debugLine="Dim usuario As String"; _usuario = ""; -RDebugUtils.currentLine=5242894; - //BA.debugLineNum = 5242894;BA.debugLine="Dim total_cliente As String"; + //BA.debugLineNum = 19;BA.debugLine="Dim total_cliente As String"; _total_cliente = ""; -RDebugUtils.currentLine=5242895; - //BA.debugLineNum = 5242895;BA.debugLine="Dim m_lat, m_lon As String"; + //BA.debugLineNum = 20;BA.debugLine="Dim m_lat, m_lon As String"; _m_lat = ""; _m_lon = ""; -RDebugUtils.currentLine=5242896; - //BA.debugLineNum = 5242896;BA.debugLine="Dim btAdmin As BluetoothAdmin"; + //BA.debugLineNum = 21;BA.debugLine="Dim btAdmin As BluetoothAdmin"; _btadmin = new anywheresoftware.b4a.objects.Serial.BluetoothAdmin(); -RDebugUtils.currentLine=5242897; - //BA.debugLineNum = 5242897;BA.debugLine="Dim cmp20 As Serial"; + //BA.debugLineNum = 22;BA.debugLine="Dim cmp20 As Serial"; _cmp20 = new anywheresoftware.b4a.objects.Serial(); -RDebugUtils.currentLine=5242898; - //BA.debugLineNum = 5242898;BA.debugLine="Dim printer As TextWriter"; + //BA.debugLineNum = 23;BA.debugLine="Dim printer As TextWriter"; _printer = new anywheresoftware.b4a.objects.streams.File.TextWriterWrapper(); -RDebugUtils.currentLine=5242899; - //BA.debugLineNum = 5242899;BA.debugLine="Dim PairedDevices As Map"; + //BA.debugLineNum = 24;BA.debugLine="Dim PairedDevices As Map"; _paireddevices = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=5242900; - //BA.debugLineNum = 5242900;BA.debugLine="Dim L As List"; + //BA.debugLineNum = 25;BA.debugLine="Dim L As List"; _l = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=5242901; - //BA.debugLineNum = 5242901;BA.debugLine="Dim TAMANO As Int"; + //BA.debugLineNum = 26;BA.debugLine="Dim TAMANO As Int"; _tamano = 0; -RDebugUtils.currentLine=5242902; - //BA.debugLineNum = 5242902;BA.debugLine="Dim ESPACIO As Int"; + //BA.debugLineNum = 27;BA.debugLine="Dim ESPACIO As Int"; _espacio = 0; -RDebugUtils.currentLine=5242903; - //BA.debugLineNum = 5242903;BA.debugLine="Dim BLANCO As String"; + //BA.debugLineNum = 28;BA.debugLine="Dim BLANCO As String"; _blanco = ""; -RDebugUtils.currentLine=5242904; - //BA.debugLineNum = 5242904;BA.debugLine="Dim cuenta As String"; + //BA.debugLineNum = 29;BA.debugLine="Dim cuenta As String"; _cuenta = ""; -RDebugUtils.currentLine=5242905; - //BA.debugLineNum = 5242905;BA.debugLine="Dim tipo_venta As String = \"PREVENTA\""; + //BA.debugLineNum = 30;BA.debugLine="Dim tipo_venta As String = \"PREVENTA\""; _tipo_venta = "PREVENTA"; -RDebugUtils.currentLine=5242906; - //BA.debugLineNum = 5242906;BA.debugLine="Dim MAC_IMPRESORA As String"; + //BA.debugLineNum = 31;BA.debugLine="Dim MAC_IMPRESORA As String"; _mac_impresora = ""; -RDebugUtils.currentLine=5242908; - //BA.debugLineNum = 5242908;BA.debugLine="Dim c As Cursor"; + //BA.debugLineNum = 33;BA.debugLine="Dim c As Cursor"; _c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=5242909; - //BA.debugLineNum = 5242909;BA.debugLine="Dim s As Cursor"; + //BA.debugLineNum = 34;BA.debugLine="Dim s As Cursor"; _s = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=5242910; - //BA.debugLineNum = 5242910;BA.debugLine="Dim DD As Cursor"; + //BA.debugLineNum = 35;BA.debugLine="Dim DD As Cursor"; _dd = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=5242911; - //BA.debugLineNum = 5242911;BA.debugLine="Dim c2 As Cursor"; + //BA.debugLineNum = 36;BA.debugLine="Dim c2 As Cursor"; _c2 = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=5242912; - //BA.debugLineNum = 5242912;BA.debugLine="Dim ListView1 As ListView"; + //BA.debugLineNum = 37;BA.debugLine="Dim ListView1 As ListView"; _listview1 = new anywheresoftware.b4a.objects.ListViewWrapper(); -RDebugUtils.currentLine=5242913; - //BA.debugLineNum = 5242913;BA.debugLine="Dim la_cuenta As Label"; + //BA.debugLineNum = 38;BA.debugLine="Dim la_cuenta As Label"; _la_cuenta = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242914; - //BA.debugLineNum = 5242914;BA.debugLine="Dim La_nombre As Label"; + //BA.debugLineNum = 39;BA.debugLine="Dim La_nombre As Label"; _la_nombre = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242915; - //BA.debugLineNum = 5242915;BA.debugLine="Dim la_Calle As Label"; + //BA.debugLineNum = 40;BA.debugLine="Dim la_Calle As Label"; _la_calle = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242916; - //BA.debugLineNum = 5242916;BA.debugLine="Dim la_numero As Label"; + //BA.debugLineNum = 41;BA.debugLine="Dim la_numero As Label"; _la_numero = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242917; - //BA.debugLineNum = 5242917;BA.debugLine="Dim la_nint As Label"; + //BA.debugLineNum = 42;BA.debugLine="Dim la_nint As Label"; _la_nint = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242918; - //BA.debugLineNum = 5242918;BA.debugLine="Dim la_edo As Label"; + //BA.debugLineNum = 43;BA.debugLine="Dim la_edo As Label"; _la_edo = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242919; - //BA.debugLineNum = 5242919;BA.debugLine="Dim la_pob As Label"; + //BA.debugLineNum = 44;BA.debugLine="Dim la_pob As Label"; _la_pob = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242920; - //BA.debugLineNum = 5242920;BA.debugLine="Dim la_col As Label"; + //BA.debugLineNum = 45;BA.debugLine="Dim la_col As Label"; _la_col = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242921; - //BA.debugLineNum = 5242921;BA.debugLine="Dim la_cp As Label"; + //BA.debugLineNum = 46;BA.debugLine="Dim la_cp As Label"; _la_cp = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242922; - //BA.debugLineNum = 5242922;BA.debugLine="Dim la_zona As Label"; + //BA.debugLineNum = 47;BA.debugLine="Dim la_zona As Label"; _la_zona = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242923; - //BA.debugLineNum = 5242923;BA.debugLine="Dim gest As Button"; + //BA.debugLineNum = 48;BA.debugLine="Dim gest As Button"; _gest = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5242924; - //BA.debugLineNum = 5242924;BA.debugLine="Dim la_saldotot As Label"; + //BA.debugLineNum = 49;BA.debugLine="Dim la_saldotot As Label"; _la_saldotot = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242925; - //BA.debugLineNum = 5242925;BA.debugLine="Dim la_saldooper As Label"; + //BA.debugLineNum = 50;BA.debugLine="Dim la_saldooper As Label"; _la_saldooper = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242927; - //BA.debugLineNum = 5242927;BA.debugLine="Dim Tels As Button"; + //BA.debugLineNum = 52;BA.debugLine="Dim Tels As Button"; _tels = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5242928; - //BA.debugLineNum = 5242928;BA.debugLine="Dim Label10 As Label"; + //BA.debugLineNum = 53;BA.debugLine="Dim Label10 As Label"; _label10 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242929; - //BA.debugLineNum = 5242929;BA.debugLine="Dim Label11 As Label"; + //BA.debugLineNum = 54;BA.debugLine="Dim Label11 As Label"; _label11 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242931; - //BA.debugLineNum = 5242931;BA.debugLine="Dim Tar As Button"; + //BA.debugLineNum = 56;BA.debugLine="Dim Tar As Button"; _tar = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5242933; - //BA.debugLineNum = 5242933;BA.debugLine="Dim la_comm As Label"; + //BA.debugLineNum = 58;BA.debugLine="Dim la_comm As Label"; _la_comm = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242934; - //BA.debugLineNum = 5242934;BA.debugLine="Dim la_actdte As Label"; + //BA.debugLineNum = 59;BA.debugLine="Dim la_actdte As Label"; _la_actdte = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242935; - //BA.debugLineNum = 5242935;BA.debugLine="Dim la_usuario As Label"; + //BA.debugLineNum = 60;BA.debugLine="Dim la_usuario As Label"; _la_usuario = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242936; - //BA.debugLineNum = 5242936;BA.debugLine="Dim la_resultado As Label"; + //BA.debugLineNum = 61;BA.debugLine="Dim la_resultado As Label"; _la_resultado = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242937; - //BA.debugLineNum = 5242937;BA.debugLine="Dim l_entre1 As Label"; + //BA.debugLineNum = 62;BA.debugLine="Dim l_entre1 As Label"; _l_entre1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242938; - //BA.debugLineNum = 5242938;BA.debugLine="Dim l_entre2 As Label"; + //BA.debugLineNum = 63;BA.debugLine="Dim l_entre2 As Label"; _l_entre2 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242939; - //BA.debugLineNum = 5242939;BA.debugLine="Dim l_atiende As Label"; + //BA.debugLineNum = 64;BA.debugLine="Dim l_atiende As Label"; _l_atiende = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242940; - //BA.debugLineNum = 5242940;BA.debugLine="Dim l_atiende2 As Label"; + //BA.debugLineNum = 65;BA.debugLine="Dim l_atiende2 As Label"; _l_atiende2 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242941; - //BA.debugLineNum = 5242941;BA.debugLine="Dim DATOS As Button"; + //BA.debugLineNum = 66;BA.debugLine="Dim DATOS As Button"; _datos = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5242942; - //BA.debugLineNum = 5242942;BA.debugLine="Dim Guardar As Button"; + //BA.debugLineNum = 67;BA.debugLine="Dim Guardar As Button"; _guardar = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5242943; - //BA.debugLineNum = 5242943;BA.debugLine="Dim NUEVO As Button"; + //BA.debugLineNum = 68;BA.debugLine="Dim NUEVO As Button"; _nuevo = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5242946; - //BA.debugLineNum = 5242946;BA.debugLine="Dim l_total As Label"; + //BA.debugLineNum = 71;BA.debugLine="Dim l_total As Label"; _l_total = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242947; - //BA.debugLineNum = 5242947;BA.debugLine="Dim c2 As Cursor"; + //BA.debugLineNum = 72;BA.debugLine="Dim c2 As Cursor"; _c2 = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=5242948; - //BA.debugLineNum = 5242948;BA.debugLine="Dim S2 As Cursor"; + //BA.debugLineNum = 73;BA.debugLine="Dim S2 As Cursor"; _s2 = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=5242949; - //BA.debugLineNum = 5242949;BA.debugLine="Private s As Cursor"; + //BA.debugLineNum = 74;BA.debugLine="Private s As Cursor"; _s = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=5242950; - //BA.debugLineNum = 5242950;BA.debugLine="Dim res As String"; + //BA.debugLineNum = 75;BA.debugLine="Dim res As String"; _res = ""; -RDebugUtils.currentLine=5242951; - //BA.debugLineNum = 5242951;BA.debugLine="Private HIST As Button"; + //BA.debugLineNum = 76;BA.debugLine="Private HIST As Button"; _hist = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5242952; - //BA.debugLineNum = 5242952;BA.debugLine="Private MONTO_COMPRA As String"; + //BA.debugLineNum = 77;BA.debugLine="Private MONTO_COMPRA As String"; _monto_compra = ""; -RDebugUtils.currentLine=5242953; - //BA.debugLineNum = 5242953;BA.debugLine="Private META As String"; + //BA.debugLineNum = 78;BA.debugLine="Private META As String"; _meta = ""; -RDebugUtils.currentLine=5242954; - //BA.debugLineNum = 5242954;BA.debugLine="Private META2 As String"; + //BA.debugLineNum = 79;BA.debugLine="Private META2 As String"; _meta2 = ""; -RDebugUtils.currentLine=5242955; - //BA.debugLineNum = 5242955;BA.debugLine="Private VERIFICA As String"; + //BA.debugLineNum = 80;BA.debugLine="Private VERIFICA As String"; _verifica = ""; -RDebugUtils.currentLine=5242956; - //BA.debugLineNum = 5242956;BA.debugLine="Private L_QR As Label"; + //BA.debugLineNum = 81;BA.debugLine="Private L_QR As Label"; _l_qr = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242957; - //BA.debugLineNum = 5242957;BA.debugLine="Private BT_QR As Button"; + //BA.debugLineNum = 82;BA.debugLine="Private BT_QR As Button"; _bt_qr = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5242959; - //BA.debugLineNum = 5242959;BA.debugLine="Dim CODIGO As String"; + //BA.debugLineNum = 84;BA.debugLine="Dim CODIGO As String"; _codigo = ""; -RDebugUtils.currentLine=5242961; - //BA.debugLineNum = 5242961;BA.debugLine="Private b_mapa As Button"; + //BA.debugLineNum = 86;BA.debugLine="Private b_mapa As Button"; _b_mapa = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5242962; - //BA.debugLineNum = 5242962;BA.debugLine="Dim CUANTOS As String"; + //BA.debugLineNum = 87;BA.debugLine="Dim CUANTOS As String"; _cuantos = ""; -RDebugUtils.currentLine=5242963; - //BA.debugLineNum = 5242963;BA.debugLine="Private B_IMP As Button"; + //BA.debugLineNum = 88;BA.debugLine="Private B_IMP As Button"; _b_imp = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5242964; - //BA.debugLineNum = 5242964;BA.debugLine="Dim Toggla As Toggle"; + //BA.debugLineNum = 89;BA.debugLine="Dim Toggla As Toggle"; _toggla = new com.rootsoft.togglelibrary.ToggleLibrary(); -RDebugUtils.currentLine=5242965; - //BA.debugLineNum = 5242965;BA.debugLine="Dim tgl As Toggle"; + //BA.debugLineNum = 90;BA.debugLine="Dim tgl As Toggle"; _tgl = new com.rootsoft.togglelibrary.ToggleLibrary(); -RDebugUtils.currentLine=5242966; - //BA.debugLineNum = 5242966;BA.debugLine="Private Panel1 As Panel"; + //BA.debugLineNum = 91;BA.debugLine="Private Panel1 As Panel"; _panel1 = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=5242967; - //BA.debugLineNum = 5242967;BA.debugLine="Private I_COMPRA As EditText"; + //BA.debugLineNum = 92;BA.debugLine="Private I_COMPRA As EditText"; _i_compra = new anywheresoftware.b4a.objects.EditTextWrapper(); -RDebugUtils.currentLine=5242968; - //BA.debugLineNum = 5242968;BA.debugLine="Private B_GUARDA_C As Button"; + //BA.debugLineNum = 93;BA.debugLine="Private B_GUARDA_C As Button"; _b_guarda_c = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5242969; - //BA.debugLineNum = 5242969;BA.debugLine="Private b_venta As Button"; + //BA.debugLineNum = 94;BA.debugLine="Private b_venta As Button"; _b_venta = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5242970; - //BA.debugLineNum = 5242970;BA.debugLine="Dim ALMACEN As String"; + //BA.debugLineNum = 95;BA.debugLine="Dim ALMACEN As String"; _almacen = ""; -RDebugUtils.currentLine=5242971; - //BA.debugLineNum = 5242971;BA.debugLine="Private LA_GPS As Label"; + //BA.debugLineNum = 96;BA.debugLine="Private LA_GPS As Label"; _la_gps = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242972; - //BA.debugLineNum = 5242972;BA.debugLine="Private B_E_NEXT As Button"; + //BA.debugLineNum = 97;BA.debugLine="Private B_E_NEXT As Button"; _b_e_next = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5242973; - //BA.debugLineNum = 5242973;BA.debugLine="Private E_RES_E As EditText"; + //BA.debugLineNum = 98;BA.debugLine="Private E_RES_E As EditText"; _e_res_e = new anywheresoftware.b4a.objects.EditTextWrapper(); -RDebugUtils.currentLine=5242974; - //BA.debugLineNum = 5242974;BA.debugLine="Private t_tenc As Label"; + //BA.debugLineNum = 99;BA.debugLine="Private t_tenc As Label"; _t_tenc = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242975; - //BA.debugLineNum = 5242975;BA.debugLine="Private Panel2 As Panel"; + //BA.debugLineNum = 100;BA.debugLine="Private Panel2 As Panel"; _panel2 = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=5242976; - //BA.debugLineNum = 5242976;BA.debugLine="Private CONTADOR_E As String"; + //BA.debugLineNum = 101;BA.debugLine="Private CONTADOR_E As String"; _contador_e = ""; -RDebugUtils.currentLine=5242977; - //BA.debugLineNum = 5242977;BA.debugLine="Private HR_RES1 As String"; + //BA.debugLineNum = 102;BA.debugLine="Private HR_RES1 As String"; _hr_res1 = ""; -RDebugUtils.currentLine=5242978; - //BA.debugLineNum = 5242978;BA.debugLine="Private HR_RES2 As String"; + //BA.debugLineNum = 103;BA.debugLine="Private HR_RES2 As String"; _hr_res2 = ""; -RDebugUtils.currentLine=5242979; - //BA.debugLineNum = 5242979;BA.debugLine="Private HR_RES3 As String"; + //BA.debugLineNum = 104;BA.debugLine="Private HR_RES3 As String"; _hr_res3 = ""; -RDebugUtils.currentLine=5242980; - //BA.debugLineNum = 5242980;BA.debugLine="Private EXISTE As String"; + //BA.debugLineNum = 105;BA.debugLine="Private EXISTE As String"; _existe = ""; -RDebugUtils.currentLine=5242981; - //BA.debugLineNum = 5242981;BA.debugLine="Private TELEFONO As String"; + //BA.debugLineNum = 106;BA.debugLine="Private TELEFONO As String"; _telefono = ""; -RDebugUtils.currentLine=5242983; - //BA.debugLineNum = 5242983;BA.debugLine="Private RB1 As RadioButton"; + //BA.debugLineNum = 108;BA.debugLine="Private RB1 As RadioButton"; _rb1 = new anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper(); -RDebugUtils.currentLine=5242984; - //BA.debugLineNum = 5242984;BA.debugLine="Private RB2 As RadioButton"; + //BA.debugLineNum = 109;BA.debugLine="Private RB2 As RadioButton"; _rb2 = new anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper(); -RDebugUtils.currentLine=5242985; - //BA.debugLineNum = 5242985;BA.debugLine="Private RB3 As RadioButton"; + //BA.debugLineNum = 110;BA.debugLine="Private RB3 As RadioButton"; _rb3 = new anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper(); -RDebugUtils.currentLine=5242986; - //BA.debugLineNum = 5242986;BA.debugLine="Private RB4 As RadioButton"; + //BA.debugLineNum = 111;BA.debugLine="Private RB4 As RadioButton"; _rb4 = new anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper(); -RDebugUtils.currentLine=5242987; - //BA.debugLineNum = 5242987;BA.debugLine="Private RB5 As RadioButton"; + //BA.debugLineNum = 112;BA.debugLine="Private RB5 As RadioButton"; _rb5 = new anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper(); -RDebugUtils.currentLine=5242989; - //BA.debugLineNum = 5242989;BA.debugLine="Private stay_hh As String"; + //BA.debugLineNum = 114;BA.debugLine="Private stay_hh As String"; _stay_hh = ""; -RDebugUtils.currentLine=5242990; - //BA.debugLineNum = 5242990;BA.debugLine="Private stay_mi As String"; + //BA.debugLineNum = 115;BA.debugLine="Private stay_mi As String"; _stay_mi = ""; -RDebugUtils.currentLine=5242991; - //BA.debugLineNum = 5242991;BA.debugLine="Private stay_ss As String"; + //BA.debugLineNum = 116;BA.debugLine="Private stay_ss As String"; _stay_ss = ""; -RDebugUtils.currentLine=5242993; - //BA.debugLineNum = 5242993;BA.debugLine="Private LA_GEO As Label"; + //BA.debugLineNum = 118;BA.debugLine="Private LA_GEO As Label"; _la_geo = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5242994; - //BA.debugLineNum = 5242994;BA.debugLine="Dim result As Int"; + //BA.debugLineNum = 119;BA.debugLine="Dim result As Int"; _result = 0; -RDebugUtils.currentLine=5242995; - //BA.debugLineNum = 5242995;BA.debugLine="Private cercavalor As String"; + //BA.debugLineNum = 120;BA.debugLine="Private cercavalor As String"; _cercavalor = ""; -RDebugUtils.currentLine=5242996; - //BA.debugLineNum = 5242996;BA.debugLine="Private LA_RUTA As String"; + //BA.debugLineNum = 121;BA.debugLine="Private LA_RUTA As String"; _la_ruta = ""; -RDebugUtils.currentLine=5242998; - //BA.debugLineNum = 5242998;BA.debugLine="Private b_like As Button"; + //BA.debugLineNum = 123;BA.debugLine="Private b_like As Button"; _b_like = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5242999; - //BA.debugLineNum = 5242999;BA.debugLine="Private B_GPS As Button"; + //BA.debugLineNum = 124;BA.debugLine="Private B_GPS As Button"; _b_gps = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5243000; - //BA.debugLineNum = 5243000;BA.debugLine="Dim sc As JhsIceZxing1"; + //BA.debugLineNum = 125;BA.debugLine="Dim sc As JhsIceZxing1"; _sc = new ice.zxing.b4aZXingLib(); -RDebugUtils.currentLine=5243001; - //BA.debugLineNum = 5243001;BA.debugLine="Dim CODIGO As String"; + //BA.debugLineNum = 126;BA.debugLine="Dim CODIGO As String"; _codigo = ""; -RDebugUtils.currentLine=5243002; - //BA.debugLineNum = 5243002;BA.debugLine="Private cb_factura As CheckBox"; + //BA.debugLineNum = 127;BA.debugLine="Private cb_factura As CheckBox"; _cb_factura = new anywheresoftware.b4a.objects.CompoundButtonWrapper.CheckBoxWrapper(); -RDebugUtils.currentLine=5243003; - //BA.debugLineNum = 5243003;BA.debugLine="Private p_cbFactura As Panel"; + //BA.debugLineNum = 128;BA.debugLine="Private p_cbFactura As Panel"; _p_cbfactura = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=5243004; - //BA.debugLineNum = 5243004;BA.debugLine="Dim venimosDeTicketsDia As Boolean = False"; + //BA.debugLineNum = 129;BA.debugLine="Dim venimosDeTicketsDia As Boolean = False"; _venimosdeticketsdia = __c.False; -RDebugUtils.currentLine=5243005; - //BA.debugLineNum = 5243005;BA.debugLine="Private p_abono As Panel"; + //BA.debugLineNum = 130;BA.debugLine="Private p_abono As Panel"; _p_abono = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=5243006; - //BA.debugLineNum = 5243006;BA.debugLine="Private et_abono As EditText"; + //BA.debugLineNum = 131;BA.debugLine="Private et_abono As EditText"; _et_abono = new anywheresoftware.b4a.objects.EditTextWrapper(); -RDebugUtils.currentLine=5243007; - //BA.debugLineNum = 5243007;BA.debugLine="Private b_abono As Button"; + //BA.debugLineNum = 132;BA.debugLine="Private b_abono As Button"; _b_abono = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5243008; - //BA.debugLineNum = 5243008;BA.debugLine="Private b_cancelar As Button"; + //BA.debugLineNum = 133;BA.debugLine="Private b_cancelar As Button"; _b_cancelar = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5243009; - //BA.debugLineNum = 5243009;BA.debugLine="Private b_abono1 As Button"; + //BA.debugLineNum = 134;BA.debugLine="Private b_abono1 As Button"; _b_abono1 = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5243010; - //BA.debugLineNum = 5243010;BA.debugLine="Private Label20 As Label"; + //BA.debugLineNum = 135;BA.debugLine="Private Label20 As Label"; _label20 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5243011; - //BA.debugLineNum = 5243011;BA.debugLine="Private l_calle1 As Label"; + //BA.debugLineNum = 136;BA.debugLine="Private l_calle1 As Label"; _l_calle1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5243012; - //BA.debugLineNum = 5243012;BA.debugLine="Private l_ubicacion2 As Label"; + //BA.debugLineNum = 137;BA.debugLine="Private l_ubicacion2 As Label"; _l_ubicacion2 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=5243014; - //BA.debugLineNum = 5243014;BA.debugLine="Dim dentroDeGeocerca As Boolean = False"; + //BA.debugLineNum = 139;BA.debugLine="Dim dentroDeGeocerca As Boolean = False"; _dentrodegeocerca = __c.False; -RDebugUtils.currentLine=5243015; - //BA.debugLineNum = 5243015;BA.debugLine="Dim b_inicioFinVenta As Button"; + //BA.debugLineNum = 140;BA.debugLine="Dim b_inicioFinVenta As Button"; _b_iniciofinventa = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5243016; - //BA.debugLineNum = 5243016;BA.debugLine="Dim precision As Int = 0"; + //BA.debugLineNum = 141;BA.debugLine="Dim precision As Int = 0"; _precision = (int) (0); -RDebugUtils.currentLine=5243017; - //BA.debugLineNum = 5243017;BA.debugLine="Dim motivoNoVenta, motivoNoVisita As String"; + //BA.debugLineNum = 142;BA.debugLine="Dim motivoNoVenta, motivoNoVisita As String"; _motivonoventa = ""; _motivonovisita = ""; -RDebugUtils.currentLine=5243018; - //BA.debugLineNum = 5243018;BA.debugLine="Dim usuario As String = \"\""; + //BA.debugLineNum = 143;BA.debugLine="Dim usuario As String = \"\""; _usuario = ""; -RDebugUtils.currentLine=5243019; - //BA.debugLineNum = 5243019;BA.debugLine="Dim Id_Almacen As String"; + //BA.debugLineNum = 144;BA.debugLine="Dim Id_Almacen As String"; _id_almacen = ""; -RDebugUtils.currentLine=5243020; - //BA.debugLineNum = 5243020;BA.debugLine="Dim ruta_tienda As String"; + //BA.debugLineNum = 145;BA.debugLine="Dim ruta_tienda As String"; _ruta_tienda = ""; -RDebugUtils.currentLine=5243022; - //BA.debugLineNum = 5243022;BA.debugLine="Private b_clinteSinVenta As Button"; + //BA.debugLineNum = 147;BA.debugLine="Private b_clinteSinVenta As Button"; _b_clintesinventa = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5243023; - //BA.debugLineNum = 5243023;BA.debugLine="Private b_clienteVenta As Button"; + //BA.debugLineNum = 148;BA.debugLine="Private b_clienteVenta As Button"; _b_clienteventa = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5243024; - //BA.debugLineNum = 5243024;BA.debugLine="Private p_monto_venta As Panel"; + //BA.debugLineNum = 149;BA.debugLine="Private p_monto_venta As Panel"; _p_monto_venta = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=5243025; - //BA.debugLineNum = 5243025;BA.debugLine="Private et_monto_venta As EditText"; + //BA.debugLineNum = 150;BA.debugLine="Private et_monto_venta As EditText"; _et_monto_venta = new anywheresoftware.b4a.objects.EditTextWrapper(); -RDebugUtils.currentLine=5243026; - //BA.debugLineNum = 5243026;BA.debugLine="Private b_can_monto_venta As Button"; + //BA.debugLineNum = 151;BA.debugLine="Private b_can_monto_venta As Button"; _b_can_monto_venta = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5243027; - //BA.debugLineNum = 5243027;BA.debugLine="Private b_gu_monto_venta As Button"; + //BA.debugLineNum = 152;BA.debugLine="Private b_gu_monto_venta As Button"; _b_gu_monto_venta = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=5243028; - //BA.debugLineNum = 5243028;BA.debugLine="End Sub"; + //BA.debugLineNum = 153;BA.debugLine="Private p_inv As Panel"; +_p_inv = new anywheresoftware.b4a.objects.PanelWrapper(); + //BA.debugLineNum = 154;BA.debugLine="End Sub"; return ""; } -public String _datos_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "datos_click", false)) - {return ((String) Debug.delegate(ba, "datos_click", null));} -RDebugUtils.currentLine=5963776; - //BA.debugLineNum = 5963776;BA.debugLine="Sub DATOS_Click"; -RDebugUtils.currentLine=5963777; - //BA.debugLineNum = 5963777;BA.debugLine="B4XPages.ShowPage(\"telefonos\")"; +public String _datos_click() throws Exception{ + //BA.debugLineNum = 458;BA.debugLine="Sub DATOS_Click"; + //BA.debugLineNum = 459;BA.debugLine="B4XPages.ShowPage(\"telefonos\")"; _b4xpages._showpage /*String*/ (ba,"telefonos"); -RDebugUtils.currentLine=5963778; - //BA.debugLineNum = 5963778;BA.debugLine="End Sub"; + //BA.debugLineNum = 460;BA.debugLine="End Sub"; return ""; } -public String _gest_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "gest_click", false)) - {return ((String) Debug.delegate(ba, "gest_click", null));} -RDebugUtils.currentLine=5636096; - //BA.debugLineNum = 5636096;BA.debugLine="Sub gest_Click"; -RDebugUtils.currentLine=5636097; - //BA.debugLineNum = 5636097;BA.debugLine="B4XPages.MainPage.tipo_venta = \"PREVENTA\""; +public String _gest_click() throws Exception{ + //BA.debugLineNum = 411;BA.debugLine="Sub gest_Click"; + //BA.debugLineNum = 412;BA.debugLine="B4XPages.MainPage.tipo_venta = \"PREVENTA\""; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ = "PREVENTA"; -RDebugUtils.currentLine=5636102; - //BA.debugLineNum = 5636102;BA.debugLine="B4XPages.ShowPage(\"productos\")"; + //BA.debugLineNum = 417;BA.debugLine="B4XPages.ShowPage(\"productos\")"; _b4xpages._showpage /*String*/ (ba,"productos"); -RDebugUtils.currentLine=5636103; - //BA.debugLineNum = 5636103;BA.debugLine="End Sub"; + //BA.debugLineNum = 418;BA.debugLine="End Sub"; return ""; } -public String _hist_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "hist_click", false)) - {return ((String) Debug.delegate(ba, "hist_click", null));} -RDebugUtils.currentLine=6225920; - //BA.debugLineNum = 6225920;BA.debugLine="Sub HIST_Click"; -RDebugUtils.currentLine=6225921; - //BA.debugLineNum = 6225921;BA.debugLine="B4XPages.ShowPage(\"Historico\")"; +public String _gps_locationchanged(anywheresoftware.b4a.gps.LocationWrapper _location1) throws Exception{ +anywheresoftware.b4a.gps.LocationWrapper _l1 = null; +anywheresoftware.b4a.gps.LocationWrapper _l2 = null; +long _distance = 0L; + //BA.debugLineNum = 362;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; + //BA.debugLineNum = 364;BA.debugLine="If Tracker.FLP.GetLastKnownLocation.IsInitialized"; +if (_tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().IsInitialized() && _tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getLatitude()!=0) { + //BA.debugLineNum = 365;BA.debugLine="B4XPages.MainPage.lat_gps = Tracker.FLP.GetLastK"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ = BA.NumberToString(_tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getLatitude()); + //BA.debugLineNum = 366;BA.debugLine="B4XPages.MainPage.lon_gps = Tracker.FLP.GetLastK"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ = BA.NumberToString(_tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getLongitude()); + }; + //BA.debugLineNum = 370;BA.debugLine="Dim l1, l2 As Location"; +_l1 = new anywheresoftware.b4a.gps.LocationWrapper(); +_l2 = new anywheresoftware.b4a.gps.LocationWrapper(); + //BA.debugLineNum = 371;BA.debugLine="l1.Initialize2(B4XPages.MainPage.lat_gps, B4XPage"; +_l1.Initialize2(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ,_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ); + //BA.debugLineNum = 373;BA.debugLine="l2.Initialize2(m_lat, m_lon)"; +_l2.Initialize2(_m_lat,_m_lon); + //BA.debugLineNum = 375;BA.debugLine="BT_QR.Enabled = True"; +_bt_qr.setEnabled(__c.True); + //BA.debugLineNum = 376;BA.debugLine="LA_GPS.TextColor = Colors.Blue"; +_la_gps.setTextColor(__c.Colors.Blue); + //BA.debugLineNum = 377;BA.debugLine="LA_GPS.Text = \"CON UBICACION GPS\""; +_la_gps.setText(BA.ObjectToCharSequence("CON UBICACION GPS")); + //BA.debugLineNum = 378;BA.debugLine="b_clinteSinVenta.Enabled = True"; +_b_clintesinventa.setEnabled(__c.True); + //BA.debugLineNum = 379;BA.debugLine="b_clienteVenta.Enabled = True"; +_b_clienteventa.setEnabled(__c.True); + //BA.debugLineNum = 382;BA.debugLine="Dim distance As Long"; +_distance = 0L; + //BA.debugLineNum = 383;BA.debugLine="distance = l1.DistanceTo(l2) 'the result is i"; +_distance = (long) (_l1.DistanceTo((android.location.Location)(_l2.getObject()))); + //BA.debugLineNum = 384;BA.debugLine="gest.Visible = False"; +_gest.setVisible(__c.False); + //BA.debugLineNum = 386;BA.debugLine="LA_GEO.TextColor = Colors.Blue"; +_la_geo.setTextColor(__c.Colors.Blue); + //BA.debugLineNum = 387;BA.debugLine="Tels.Visible = False"; +_tels.setVisible(__c.False); + //BA.debugLineNum = 388;BA.debugLine="gest.Visible = False"; +_gest.setVisible(__c.False); + //BA.debugLineNum = 392;BA.debugLine="LA_GEO.Text= $\"$1.2{distance/1000} kms\"$"; +_la_geo.setText(BA.ObjectToCharSequence((""+__c.SmartStringFormatter("1.2",(Object)(_distance/(double)1000))+" kms"))); + //BA.debugLineNum = 393;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FROM"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("DELETE FROM HIST_GPS"); + //BA.debugLineNum = 394;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO HIST_GPS (HGDATE, HGLAT, HGLON) VALUES(?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_sdate+_stime),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ )})); + //BA.debugLineNum = 396;BA.debugLine="l_ubicacion2.TextSize = 13"; +_l_ubicacion2.setTextSize((float) (13)); + //BA.debugLineNum = 397;BA.debugLine="l_ubicacion2.Text = $\"Precisión GPS $1.0{Location"; +_l_ubicacion2.setText(BA.ObjectToCharSequence(("Precisión GPS "+__c.SmartStringFormatter("1.0",(Object)(_location1.getAccuracy()))+" m"))); + //BA.debugLineNum = 398;BA.debugLine="If Location1.Accuracy > 200 Then"; +if (_location1.getAccuracy()>200) { + //BA.debugLineNum = 399;BA.debugLine="l_ubicacion2.TextColor = Colors.Red"; +_l_ubicacion2.setTextColor(__c.Colors.Red); + //BA.debugLineNum = 400;BA.debugLine="l_ubicacion2.TextSize = 16"; +_l_ubicacion2.setTextSize((float) (16)); + //BA.debugLineNum = 401;BA.debugLine="l_ubicacion2.Text = $\"Mala señal $1.0{Location1."; +_l_ubicacion2.setText(BA.ObjectToCharSequence(("Mala señal "+__c.SmartStringFormatter("1.0",(Object)(_location1.getAccuracy()))+" m"))); + }; + //BA.debugLineNum = 404;BA.debugLine="CallSubDelayed(Tracker, \"CreateLocationRequest\")"; +__c.CallSubDelayed(ba,(Object)(_tracker.getObject()),"CreateLocationRequest"); + //BA.debugLineNum = 405;BA.debugLine="End Sub"; +return ""; +} +public String _guardar_click() throws Exception{ + //BA.debugLineNum = 462;BA.debugLine="Sub Guardar_Click"; + //BA.debugLineNum = 463;BA.debugLine="b_inicioFinVenta.Text = \"FIN VENTA\""; +_b_iniciofinventa.setText(BA.ObjectToCharSequence("FIN VENTA")); + //BA.debugLineNum = 464;BA.debugLine="b_inicioFinVenta.Visible = True"; +_b_iniciofinventa.setVisible(__c.True); + //BA.debugLineNum = 465;BA.debugLine="End Sub"; +return ""; +} +public String _guardar2_click() throws Exception{ + //BA.debugLineNum = 467;BA.debugLine="Sub Guardar2_Click"; + //BA.debugLineNum = 539;BA.debugLine="End Sub"; +return ""; +} +public String _hist_click() throws Exception{ + //BA.debugLineNum = 545;BA.debugLine="Sub HIST_Click"; + //BA.debugLineNum = 546;BA.debugLine="B4XPages.ShowPage(\"Historico\")"; _b4xpages._showpage /*String*/ (ba,"Historico"); -RDebugUtils.currentLine=6225922; - //BA.debugLineNum = 6225922;BA.debugLine="End Sub"; + //BA.debugLineNum = 547;BA.debugLine="End Sub"; return ""; } -public String _jobdone(keymon.lat.medicomed.c_cliente __ref,keymon.lat.medicomed.httpjob _job) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "jobdone", false)) - {return ((String) Debug.delegate(ba, "jobdone", new Object[] {_job}));} +public Object _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 157;BA.debugLine="Public Sub Initialize As Object"; + //BA.debugLineNum = 158;BA.debugLine="Return Me"; +if (true) return this; + //BA.debugLineNum = 159;BA.debugLine="End Sub"; +return null; +} +public String _jobdone(keymon.lat.medicomed.httpjob _job) throws Exception{ keymon.lat.medicomed.dbrequestmanager._dbresult _resultado = null; String _cliente = ""; Object[] _records = null; String _k = ""; -RDebugUtils.currentLine=7536640; - //BA.debugLineNum = 7536640;BA.debugLine="Sub JobDone(Job As HttpJob)"; -RDebugUtils.currentLine=7536641; - //BA.debugLineNum = 7536641;BA.debugLine="Log(Job.Success)"; -__c.LogImpl("37536641",BA.ObjectToString(_job._success /*boolean*/ ),0); -RDebugUtils.currentLine=7536642; - //BA.debugLineNum = 7536642;BA.debugLine="If Job.Success = False Then"; + //BA.debugLineNum = 895;BA.debugLine="Sub JobDone(Job As HttpJob)"; + //BA.debugLineNum = 896;BA.debugLine="Log(Job.Success)"; +__c.LogImpl("344892161",BA.ObjectToString(_job._success /*boolean*/ ),0); + //BA.debugLineNum = 897;BA.debugLine="If Job.Success = False Then"; if (_job._success /*boolean*/ ==__c.False) { }else { -RDebugUtils.currentLine=7536645; - //BA.debugLineNum = 7536645;BA.debugLine="LogColor(\"JobDone: '\" & reqManager.HandleJob(Job"; -__c.LogImpl("37536645","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=7536646; - //BA.debugLineNum = 7536646;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 900;BA.debugLine="LogColor(\"JobDone: '\" & reqManager.HandleJob(Job"; +__c.LogImpl("344892165","JobDone: '"+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 = 901;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=7536647; - //BA.debugLineNum = 7536647;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=7536648; - //BA.debugLineNum = 7536648;BA.debugLine="If resultado.Tag.As(String).IndexOf(\"ins_pedido"; + //BA.debugLineNum = 902;BA.debugLine="Dim resultado As DBResult = reqManager.HandleJo"; +_resultado = _reqmanager._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 903;BA.debugLine="If resultado.Tag.As(String).IndexOf(\"ins_pedido"; if ((BA.ObjectToString(_resultado.Tag /*Object*/ )).indexOf("ins_pedidosPendientes_head_")>-1) { -RDebugUtils.currentLine=7536649; - //BA.debugLineNum = 7536649;BA.debugLine="Private cliente As String= resultado.Tag"; + //BA.debugLineNum = 904;BA.debugLine="Private cliente As String= resultado.Tag"; _cliente = BA.ObjectToString(_resultado.Tag /*Object*/ ); -RDebugUtils.currentLine=7536650; - //BA.debugLineNum = 7536650;BA.debugLine="cliente = cliente.SubString(cliente.IndexOf(\"_"; + //BA.debugLineNum = 905;BA.debugLine="cliente = cliente.SubString(cliente.IndexOf(\"_"; _cliente = _cliente.substring((int) (_cliente.indexOf("_")+24)); -RDebugUtils.currentLine=7536651; - //BA.debugLineNum = 7536651;BA.debugLine="Log($\"Cliente1:${cliente}\"$)"; -__c.LogImpl("37536651",("Cliente1:"+__c.SmartStringFormatter("",(Object)(_cliente))+""),0); -RDebugUtils.currentLine=7536652; - //BA.debugLineNum = 7536652;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update P"; + //BA.debugLineNum = 906;BA.debugLine="Log($\"Cliente1:${cliente}\"$)"; +__c.LogImpl("344892171",("Cliente1:"+__c.SmartStringFormatter("",(Object)(_cliente))+""),0); + //BA.debugLineNum = 907;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update P"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update PEDIDO_CLIENTE SET pc_envio_ok = ? WHERE PC_CLIENTE = ? AND pc_envio_ok <> 1",anywheresoftware.b4a.keywords.Common.ArrayToList(new String[]{"1",_cliente})); -RDebugUtils.currentLine=7536653; - //BA.debugLineNum = 7536653;BA.debugLine="For Each records() As Object In resultado.Rows"; + //BA.debugLineNum = 908;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() @@ -2151,8 +1495,7 @@ final int groupLen12 = group12.getSize() ; for (; index12 < groupLen12;index12++){ _records = (Object[])(group12.Get(index12)); -RDebugUtils.currentLine=7536654; - //BA.debugLineNum = 7536654;BA.debugLine="For Each k As String In resultado.Columns.Key"; + //BA.debugLineNum = 909;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() @@ -2160,35 +1503,27 @@ final int groupLen13 = group13.getSize() ; for (; index13 < groupLen13;index13++){ _k = BA.ObjectToString(group13.Get(index13)); -RDebugUtils.currentLine=7536655; - //BA.debugLineNum = 7536655;BA.debugLine="Log(resultado.Tag & \": \" & k & \": \" & record"; -__c.LogImpl("37536655",BA.ObjectToString(_resultado.Tag /*Object*/ )+": "+_k+": "+BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_resultado.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)(_k))))]),0); + //BA.debugLineNum = 910;BA.debugLine="Log(resultado.Tag & \": \" & k & \": \" & record"; +__c.LogImpl("344892175",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=7536661; - //BA.debugLineNum = 7536661;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 916;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=7536662; - //BA.debugLineNum = 7536662;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=7536663; - //BA.debugLineNum = 7536663;BA.debugLine="If resultado.Tag.As(String).IndexOf(\"ins_pedido"; + //BA.debugLineNum = 917;BA.debugLine="Dim resultado As DBResult = reqManager.HandleJo"; +_resultado = _reqmanager._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 918;BA.debugLine="If resultado.Tag.As(String).IndexOf(\"ins_pedido"; if ((BA.ObjectToString(_resultado.Tag /*Object*/ )).indexOf("ins_pedidosPendientes_prods_")>-1) { -RDebugUtils.currentLine=7536664; - //BA.debugLineNum = 7536664;BA.debugLine="Private cliente As String= resultado.Tag"; + //BA.debugLineNum = 919;BA.debugLine="Private cliente As String= resultado.Tag"; _cliente = BA.ObjectToString(_resultado.Tag /*Object*/ ); -RDebugUtils.currentLine=7536665; - //BA.debugLineNum = 7536665;BA.debugLine="cliente = cliente.SubString(cliente.IndexOf(\"_"; + //BA.debugLineNum = 920;BA.debugLine="cliente = cliente.SubString(cliente.IndexOf(\"_"; _cliente = _cliente.substring((int) (_cliente.indexOf("_")+25)); -RDebugUtils.currentLine=7536666; - //BA.debugLineNum = 7536666;BA.debugLine="Log($\"Cliente2:${cliente}\"$)"; -__c.LogImpl("37536666",("Cliente2:"+__c.SmartStringFormatter("",(Object)(_cliente))+""),0); -RDebugUtils.currentLine=7536667; - //BA.debugLineNum = 7536667;BA.debugLine="For Each records() As Object In resultado.Rows"; + //BA.debugLineNum = 921;BA.debugLine="Log($\"Cliente2:${cliente}\"$)"; +__c.LogImpl("344892186",("Cliente2:"+__c.SmartStringFormatter("",(Object)(_cliente))+""),0); + //BA.debugLineNum = 922;BA.debugLine="For Each records() As Object In resultado.Rows"; { final anywheresoftware.b4a.BA.IterableList group25 = _resultado.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen25 = group25.getSize() @@ -2196,8 +1531,7 @@ final int groupLen25 = group25.getSize() ; for (; index25 < groupLen25;index25++){ _records = (Object[])(group25.Get(index25)); -RDebugUtils.currentLine=7536668; - //BA.debugLineNum = 7536668;BA.debugLine="For Each k As String In resultado.Columns.Key"; + //BA.debugLineNum = 923;BA.debugLine="For Each k As String In resultado.Columns.Key"; { final anywheresoftware.b4a.BA.IterableList group26 = _resultado.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Keys(); final int groupLen26 = group26.getSize() @@ -2205,38 +1539,29 @@ final int groupLen26 = group26.getSize() ; for (; index26 < groupLen26;index26++){ _k = BA.ObjectToString(group26.Get(index26)); -RDebugUtils.currentLine=7536669; - //BA.debugLineNum = 7536669;BA.debugLine="Log(resultado.Tag & \": \" & k & \": \" & record"; -__c.LogImpl("37536669",BA.ObjectToString(_resultado.Tag /*Object*/ )+": "+_k+": "+BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_resultado.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)(_k))))]),0); + //BA.debugLineNum = 924;BA.debugLine="Log(resultado.Tag & \": \" & k & \": \" & record"; +__c.LogImpl("344892189",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=7536675; - //BA.debugLineNum = 7536675;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 930;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=7536676; - //BA.debugLineNum = 7536676;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=7536677; - //BA.debugLineNum = 7536677;BA.debugLine="If resultado.Tag.As(String).IndexOf(\"ins_abonos"; + //BA.debugLineNum = 931;BA.debugLine="Dim resultado As DBResult = reqManager.HandleJo"; +_resultado = _reqmanager._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 932;BA.debugLine="If resultado.Tag.As(String).IndexOf(\"ins_abonos"; if ((BA.ObjectToString(_resultado.Tag /*Object*/ )).indexOf("ins_abonosPendientes_")>-1) { -RDebugUtils.currentLine=7536678; - //BA.debugLineNum = 7536678;BA.debugLine="Private cliente As String= resultado.Tag"; + //BA.debugLineNum = 933;BA.debugLine="Private cliente As String= resultado.Tag"; _cliente = BA.ObjectToString(_resultado.Tag /*Object*/ ); -RDebugUtils.currentLine=7536679; - //BA.debugLineNum = 7536679;BA.debugLine="cliente = cliente.SubString(cliente.IndexOf(\"_"; + //BA.debugLineNum = 934;BA.debugLine="cliente = cliente.SubString(cliente.IndexOf(\"_"; _cliente = _cliente.substring((int) (_cliente.indexOf("_")+18)); -RDebugUtils.currentLine=7536680; - //BA.debugLineNum = 7536680;BA.debugLine="Log($\"Cliente2:${cliente}\"$)"; -__c.LogImpl("37536680",("Cliente2:"+__c.SmartStringFormatter("",(Object)(_cliente))+""),0); -RDebugUtils.currentLine=7536681; - //BA.debugLineNum = 7536681;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"UPDATE A"; + //BA.debugLineNum = 935;BA.debugLine="Log($\"Cliente2:${cliente}\"$)"; +__c.LogImpl("344892200",("Cliente2:"+__c.SmartStringFormatter("",(Object)(_cliente))+""),0); + //BA.debugLineNum = 936;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"UPDATE A"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("UPDATE ABONOS set a_enviado = 1 where a_cliente = '"+__c.SmartStringFormatter("",(Object)(_cliente))+"'")); -RDebugUtils.currentLine=7536682; - //BA.debugLineNum = 7536682;BA.debugLine="For Each records() As Object In resultado.Rows"; + //BA.debugLineNum = 937;BA.debugLine="For Each records() As Object In resultado.Rows"; { final anywheresoftware.b4a.BA.IterableList group39 = _resultado.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen39 = group39.getSize() @@ -2244,8 +1569,7 @@ final int groupLen39 = group39.getSize() ; for (; index39 < groupLen39;index39++){ _records = (Object[])(group39.Get(index39)); -RDebugUtils.currentLine=7536683; - //BA.debugLineNum = 7536683;BA.debugLine="For Each k As String In resultado.Columns.Key"; + //BA.debugLineNum = 938;BA.debugLine="For Each k As String In resultado.Columns.Key"; { final anywheresoftware.b4a.BA.IterableList group40 = _resultado.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Keys(); final int groupLen40 = group40.getSize() @@ -2253,454 +1577,225 @@ final int groupLen40 = group40.getSize() ; for (; index40 < groupLen40;index40++){ _k = BA.ObjectToString(group40.Get(index40)); -RDebugUtils.currentLine=7536684; - //BA.debugLineNum = 7536684;BA.debugLine="Log(resultado.Tag & \": \" & k & \": \" & record"; -__c.LogImpl("37536684",BA.ObjectToString(_resultado.Tag /*Object*/ )+": "+_k+": "+BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_resultado.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)(_k))))]),0); + //BA.debugLineNum = 939;BA.debugLine="Log(resultado.Tag & \": \" & k & \": \" & record"; +__c.LogImpl("344892204",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=7536689; - //BA.debugLineNum = 7536689;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 944;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=7536690; - //BA.debugLineNum = 7536690;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=7536691; - //BA.debugLineNum = 7536691;BA.debugLine="If resultado.Tag= \"mandaBitacora\" Then"; + //BA.debugLineNum = 945;BA.debugLine="Dim resultado As DBResult = reqManager.HandleJo"; +_resultado = _reqmanager._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 946;BA.debugLine="If resultado.Tag= \"mandaBitacora\" Then"; if ((_resultado.Tag /*Object*/ ).equals((Object)("mandaBitacora"))) { -RDebugUtils.currentLine=7536692; - //BA.debugLineNum = 7536692;BA.debugLine="Log(\"mandaBitacora\")"; -__c.LogImpl("37536692","mandaBitacora",0); + //BA.debugLineNum = 947;BA.debugLine="Log(\"mandaBitacora\")"; +__c.LogImpl("344892212","mandaBitacora",0); }; }; -RDebugUtils.currentLine=7536695; - //BA.debugLineNum = 7536695;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 950;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=7536696; - //BA.debugLineNum = 7536696;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=7536697; - //BA.debugLineNum = 7536697;BA.debugLine="If resultado.Tag= \"ventaNoVenta\" Then"; + //BA.debugLineNum = 951;BA.debugLine="Dim resultado As DBResult = reqManager.HandleJo"; +_resultado = _reqmanager._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 952;BA.debugLine="If resultado.Tag= \"ventaNoVenta\" Then"; if ((_resultado.Tag /*Object*/ ).equals((Object)("ventaNoVenta"))) { -RDebugUtils.currentLine=7536698; - //BA.debugLineNum = 7536698;BA.debugLine="Log(\"ventaNoVenta\")"; -__c.LogImpl("37536698","ventaNoVenta",0); + //BA.debugLineNum = 953;BA.debugLine="Log(\"ventaNoVenta\")"; +__c.LogImpl("344892218","ventaNoVenta",0); }; }; -RDebugUtils.currentLine=7536701; - //BA.debugLineNum = 7536701;BA.debugLine="Job.Release"; -_job._release /*String*/ (null); + //BA.debugLineNum = 956;BA.debugLine="Job.Release"; +_job._release /*String*/ (); }; -RDebugUtils.currentLine=7536704; - //BA.debugLineNum = 7536704;BA.debugLine="End Sub"; + //BA.debugLineNum = 959;BA.debugLine="End Sub"; return ""; } -public String _listview1_itemlongclick(keymon.lat.medicomed.c_cliente __ref,int _position,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "listview1_itemlongclick", false)) - {return ((String) Debug.delegate(ba, "listview1_itemlongclick", new Object[] {_position,_value}));} -RDebugUtils.currentLine=5570560; - //BA.debugLineNum = 5570560;BA.debugLine="Sub ListView1_ItemLongClick (Position As Int, Valu"; -RDebugUtils.currentLine=5570562; - //BA.debugLineNum = 5570562;BA.debugLine="End Sub"; +public String _listview1_itemlongclick(int _position,Object _value) throws Exception{ + //BA.debugLineNum = 407;BA.debugLine="Sub ListView1_ItemLongClick (Position As Int, Valu"; + //BA.debugLineNum = 409;BA.debugLine="End Sub"; return ""; } -public String _mandapendientes(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "mandapendientes", false)) - {return ((String) Debug.delegate(ba, "mandapendientes", null));} +public String _mandapendientes() throws Exception{ int _i = 0; anywheresoftware.b4a.sql.SQL.CursorWrapper _ab = null; -RDebugUtils.currentLine=7471104; - //BA.debugLineNum = 7471104;BA.debugLine="Sub mandaPendientes"; -RDebugUtils.currentLine=7471106; - //BA.debugLineNum = 7471106;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT PC_CLI"; -__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 PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT, PC_COSTO_SIN, PC_RUTA, PC_ALMACEN, PC_FACTURA FROM PEDIDO_CLIENTE where pc_envio_ok <> 1"))); -RDebugUtils.currentLine=7471108; - //BA.debugLineNum = 7471108;BA.debugLine="If c.RowCount>0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=7471109; - //BA.debugLineNum = 7471109;BA.debugLine="For i=0 To c.RowCount -1"; + //BA.debugLineNum = 821;BA.debugLine="Sub mandaPendientes"; + //BA.debugLineNum = 823;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT PC_CLI"; +_c = (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 PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT, PC_COSTO_SIN, PC_RUTA, PC_ALMACEN, PC_FACTURA FROM PEDIDO_CLIENTE where pc_envio_ok <> 1"))); + //BA.debugLineNum = 825;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 826;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); +final int limit3 = (int) (_c.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit3 ;_i = _i + step3 ) { -RDebugUtils.currentLine=7471110; - //BA.debugLineNum = 7471110;BA.debugLine="c.Position=i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=7471111; - //BA.debugLineNum = 7471111;BA.debugLine="Dim cmd As DBCommand"; + //BA.debugLineNum = 827;BA.debugLine="c.Position=i"; +_c.setPosition(_i); + //BA.debugLineNum = 828;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=7471117; - //BA.debugLineNum = 7471117;BA.debugLine="Dim cmd As DBCommand"; + //BA.debugLineNum = 834;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=7471118; - //BA.debugLineNum = 7471118;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=7471119; - //BA.debugLineNum = 7471119;BA.debugLine="cmd.Name = \"insert_pedidos_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "insert_pedidos_MEDI"; -RDebugUtils.currentLine=7471120; - //BA.debugLineNum = 7471120;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\"P"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_CLIENTE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_FECHA")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_USER")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_NOART")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_MONTO")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_LON")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_LAT")),(Object)(__ref._almacen /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._principal /*keymon.lat.medicomed.c_principal*/ ._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_COSTO_SIN")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_FACTURA"))}; -RDebugUtils.currentLine=7471121; - //BA.debugLineNum = 7471121;BA.debugLine="reqManager.ExecuteCommand(cmd , $\"ins_pedidosPe"; -__ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(Object)(("ins_pedidosPendientes_head_"+__c.SmartStringFormatter("",(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_CLIENTE")))+""))); + //BA.debugLineNum = 835;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 836;BA.debugLine="cmd.Name = \"insert_pedidos_MEDI\""; +_cmd.Name /*String*/ = "insert_pedidos_MEDI"; + //BA.debugLineNum = 837;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\"P"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_c.GetString("PC_CLIENTE")),(Object)(_c.GetString("PC_FECHA")),(Object)(_c.GetString("PC_USER")),(Object)(_c.GetString("PC_NOART")),(Object)(_c.GetString("PC_MONTO")),(Object)(_c.GetString("PC_LON")),(Object)(_c.GetString("PC_LAT")),(Object)(_almacen),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._principal /*keymon.lat.medicomed.c_principal*/ ._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(_c.GetString("PC_COSTO_SIN")),(Object)(_c.GetString("PC_FACTURA"))}; + //BA.debugLineNum = 838;BA.debugLine="reqManager.ExecuteCommand(cmd , $\"ins_pedidosPe"; +_reqmanager._executecommand /*String*/ (_cmd,(Object)(("ins_pedidosPendientes_head_"+__c.SmartStringFormatter("",(Object)(_c.GetString("PC_CLIENTE")))+""))); } }; }; -RDebugUtils.currentLine=7471126; - //BA.debugLineNum = 7471126;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT PC_ENV"; -__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 PC_ENVIO_OK, PE_CEDIS, PE_COSTO_TOT, PE_COSTOU, PE_CANT, PE_PRONOMBRE, PE_PROID, PE_CLIENTE, PE_FECHA, PE_USUARIO, PE_COSTO_SIN, PE_RUTA, PE_DESC, PE_FOLIO FROM pedido_cliente left join PEDIDO where pc_cliente = pe_cliente and pc_envio_ok <> 1"))); -RDebugUtils.currentLine=7471128; - //BA.debugLineNum = 7471128;BA.debugLine="If c.RowCount>0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=7471129; - //BA.debugLineNum = 7471129;BA.debugLine="For i=0 To c.RowCount -1"; + //BA.debugLineNum = 843;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT PC_ENV"; +_c = (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 PC_ENVIO_OK, PE_CEDIS, PE_COSTO_TOT, PE_COSTOU, PE_CANT, PE_PRONOMBRE, PE_PROID, PE_CLIENTE, PE_FECHA, PE_USUARIO, PE_COSTO_SIN, PE_RUTA, PE_DESC, PE_FOLIO FROM pedido_cliente left join PEDIDO where pc_cliente = pe_cliente and pc_envio_ok <> 1"))); + //BA.debugLineNum = 845;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 846;BA.debugLine="For i=0 To c.RowCount -1"; { final int step15 = 1; -final int limit15 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit15 = (int) (_c.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit15 ;_i = _i + step15 ) { -RDebugUtils.currentLine=7471130; - //BA.debugLineNum = 7471130;BA.debugLine="c.Position=i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=7471131; - //BA.debugLineNum = 7471131;BA.debugLine="Dim cmd As DBCommand"; + //BA.debugLineNum = 847;BA.debugLine="c.Position=i"; +_c.setPosition(_i); + //BA.debugLineNum = 848;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=7471138; - //BA.debugLineNum = 7471138;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=7471139; - //BA.debugLineNum = 7471139;BA.debugLine="cmd.Name = \"insert_pedido_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "insert_pedido_MEDI"; -RDebugUtils.currentLine=7471140; - //BA.debugLineNum = 7471140;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\"P"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_CEDIS")),(Object)(__ref._almacen /*String*/ ),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_COSTO_TOT")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_COSTOU")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_CANT")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_PRONOMBRE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_PROID")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_CLIENTE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_FECHA")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_USUARIO")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_RUTA")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_COSTO_SIN")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_DESC")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_FOLIO"))}; -RDebugUtils.currentLine=7471141; - //BA.debugLineNum = 7471141;BA.debugLine="reqManager.ExecuteCommand(cmd , $\"ins_pedidosPe"; -__ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(Object)(("ins_pedidosPendientes_prods_"+__c.SmartStringFormatter("",(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_CLIENTE")))+""))); + //BA.debugLineNum = 855;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 856;BA.debugLine="cmd.Name = \"insert_pedido_MEDI\""; +_cmd.Name /*String*/ = "insert_pedido_MEDI"; + //BA.debugLineNum = 857;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\"P"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_c.GetString("PE_CEDIS")),(Object)(_almacen),(Object)(_c.GetString("PE_COSTO_TOT")),(Object)(_c.GetString("PE_COSTOU")),(Object)(_c.GetString("PE_CANT")),(Object)(_c.GetString("PE_PRONOMBRE")),(Object)(_c.GetString("PE_PROID")),(Object)(_c.GetString("PE_CLIENTE")),(Object)(_c.GetString("PE_FECHA")),(Object)(_c.GetString("PE_USUARIO")),(Object)(_c.GetString("PE_RUTA")),(Object)(_c.GetString("PE_COSTO_SIN")),(Object)(_c.GetString("PE_DESC")),(Object)(_c.GetString("PE_FOLIO"))}; + //BA.debugLineNum = 858;BA.debugLine="reqManager.ExecuteCommand(cmd , $\"ins_pedidosPe"; +_reqmanager._executecommand /*String*/ (_cmd,(Object)(("ins_pedidosPendientes_prods_"+__c.SmartStringFormatter("",(Object)(_c.GetString("PE_CLIENTE")))+""))); } }; }; -RDebugUtils.currentLine=7471146; - //BA.debugLineNum = 7471146;BA.debugLine="Dim ab As Cursor = B4XPages.MainPage.skmt.ExecQue"; + //BA.debugLineNum = 863;BA.debugLine="Dim ab As Cursor = B4XPages.MainPage.skmt.ExecQue"; _ab = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); _ab = (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 * from ABONOS where a_enviado is null")))); -RDebugUtils.currentLine=7471148; - //BA.debugLineNum = 7471148;BA.debugLine="If ab.RowCount > 0 Then"; + //BA.debugLineNum = 865;BA.debugLine="If ab.RowCount > 0 Then"; if (_ab.getRowCount()>0) { -RDebugUtils.currentLine=7471149; - //BA.debugLineNum = 7471149;BA.debugLine="For i=0 To ab.RowCount -1"; + //BA.debugLineNum = 866;BA.debugLine="For i=0 To ab.RowCount -1"; { final int step26 = 1; final int limit26 = (int) (_ab.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit26 ;_i = _i + step26 ) { -RDebugUtils.currentLine=7471150; - //BA.debugLineNum = 7471150;BA.debugLine="ab.Position = i"; + //BA.debugLineNum = 867;BA.debugLine="ab.Position = i"; _ab.setPosition(_i); -RDebugUtils.currentLine=7471151; - //BA.debugLineNum = 7471151;BA.debugLine="Dim cmd As DBCommand"; + //BA.debugLineNum = 868;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=7471152; - //BA.debugLineNum = 7471152;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=7471153; - //BA.debugLineNum = 7471153;BA.debugLine="cmd.Name = \"insert_abono_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "insert_abono_MEDI"; -RDebugUtils.currentLine=7471154; - //BA.debugLineNum = 7471154;BA.debugLine="cmd.Parameters = Array As Object( ab.GetString("; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(_ab.GetString("a_usuario")),(Object)(_ab.GetString("a_ruta")),(Object)(_ab.GetString("a_cliente")),(Object)(_ab.GetString("a_abono")),(Object)(_ab.GetString("a_fecha"))}; -RDebugUtils.currentLine=7471155; - //BA.debugLineNum = 7471155;BA.debugLine="reqManager.ExecuteCommand(cmd , $\"ins_abonosPen"; -__ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(Object)(("ins_abonosPendientes_"+__c.SmartStringFormatter("",(Object)(_ab.GetString("a_cliente")))+""))); -RDebugUtils.currentLine=7471156; - //BA.debugLineNum = 7471156;BA.debugLine="Log($\"ins_abonosPendientes_${ab.GetString(\"a_cl"; -__c.LogImpl("37471156",("ins_abonosPendientes_"+__c.SmartStringFormatter("",(Object)(_ab.GetString("a_cliente")))+""),0); + //BA.debugLineNum = 869;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 870;BA.debugLine="cmd.Name = \"insert_abono_MEDI\""; +_cmd.Name /*String*/ = "insert_abono_MEDI"; + //BA.debugLineNum = 871;BA.debugLine="cmd.Parameters = Array As Object( ab.GetString("; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_ab.GetString("a_usuario")),(Object)(_ab.GetString("a_ruta")),(Object)(_ab.GetString("a_cliente")),(Object)(_ab.GetString("a_abono")),(Object)(_ab.GetString("a_fecha"))}; + //BA.debugLineNum = 872;BA.debugLine="reqManager.ExecuteCommand(cmd , $\"ins_abonosPen"; +_reqmanager._executecommand /*String*/ (_cmd,(Object)(("ins_abonosPendientes_"+__c.SmartStringFormatter("",(Object)(_ab.GetString("a_cliente")))+""))); + //BA.debugLineNum = 873;BA.debugLine="Log($\"ins_abonosPendientes_${ab.GetString(\"a_cl"; +__c.LogImpl("344826676",("ins_abonosPendientes_"+__c.SmartStringFormatter("",(Object)(_ab.GetString("a_cliente")))+""),0); } }; }; -RDebugUtils.currentLine=7471159; - //BA.debugLineNum = 7471159;BA.debugLine="ab.Close"; + //BA.debugLineNum = 876;BA.debugLine="ab.Close"; _ab.Close(); -RDebugUtils.currentLine=7471176; - //BA.debugLineNum = 7471176;BA.debugLine="End Sub"; + //BA.debugLineNum = 893;BA.debugLine="End Sub"; return ""; } -public String _mods(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "mods", false)) - {return ((String) Debug.delegate(ba, "mods", null));} -RDebugUtils.currentLine=5177344; - //BA.debugLineNum = 5177344;BA.debugLine="Sub MODS 'ignore"; -RDebugUtils.currentLine=5177346; - //BA.debugLineNum = 5177346;BA.debugLine="End Sub"; +public String _mods() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub MODS 'ignore"; + //BA.debugLineNum = 3;BA.debugLine="End Sub"; return ""; } -public String _nuevo_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "nuevo_click", false)) - {return ((String) Debug.delegate(ba, "nuevo_click", null));} -RDebugUtils.currentLine=6160384; - //BA.debugLineNum = 6160384;BA.debugLine="Sub NUEVO_Click"; -RDebugUtils.currentLine=6160385; - //BA.debugLineNum = 6160385;BA.debugLine="B4XPages.ShowPage(\"NuevoCliente\")"; +public String _nuevo_click() throws Exception{ + //BA.debugLineNum = 541;BA.debugLine="Sub NUEVO_Click"; + //BA.debugLineNum = 542;BA.debugLine="B4XPages.ShowPage(\"NuevoCliente\")"; _b4xpages._showpage /*String*/ (ba,"NuevoCliente"); -RDebugUtils.currentLine=6160386; - //BA.debugLineNum = 6160386;BA.debugLine="End Sub"; + //BA.debugLineNum = 543;BA.debugLine="End Sub"; return ""; } -public String _p_abono_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "p_abono_click", false)) - {return ((String) Debug.delegate(ba, "p_abono_click", null));} -RDebugUtils.currentLine=7602176; - //BA.debugLineNum = 7602176;BA.debugLine="Private Sub p_abono_Click"; -RDebugUtils.currentLine=7602178; - //BA.debugLineNum = 7602178;BA.debugLine="End Sub"; +public String _p_abono_click() throws Exception{ + //BA.debugLineNum = 961;BA.debugLine="Private Sub p_abono_Click"; + //BA.debugLineNum = 963;BA.debugLine="End Sub"; return ""; } -public String _p_cliente_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "p_cliente_click", false)) - {return ((String) Debug.delegate(ba, "p_cliente_click", null));} -RDebugUtils.currentLine=7340032; - //BA.debugLineNum = 7340032;BA.debugLine="Private Sub p_cliente_Click"; -RDebugUtils.currentLine=7340034; - //BA.debugLineNum = 7340034;BA.debugLine="End Sub"; +public String _p_cliente_click() throws Exception{ + //BA.debugLineNum = 812;BA.debugLine="Private Sub p_cliente_Click"; + //BA.debugLineNum = 814;BA.debugLine="End Sub"; return ""; } -public String _printer_connected(keymon.lat.medicomed.c_cliente __ref,boolean _success) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "printer_connected", false)) - {return ((String) Debug.delegate(ba, "printer_connected", new Object[] {_success}));} -RDebugUtils.currentLine=6750208; - //BA.debugLineNum = 6750208;BA.debugLine="Sub Printer_Connected (Success As Boolean)"; -RDebugUtils.currentLine=6750209; - //BA.debugLineNum = 6750209;BA.debugLine="If Success Then"; +public String _printer_connected(boolean _success) throws Exception{ + //BA.debugLineNum = 655;BA.debugLine="Sub Printer_Connected (Success As Boolean)"; + //BA.debugLineNum = 656;BA.debugLine="If Success Then"; if (_success) { -RDebugUtils.currentLine=6750210; - //BA.debugLineNum = 6750210;BA.debugLine="B_IMP.Enabled = True"; -__ref._b_imp /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setEnabled(__c.True); + //BA.debugLineNum = 657;BA.debugLine="B_IMP.Enabled = True"; +_b_imp.setEnabled(__c.True); }else { -RDebugUtils.currentLine=6750212; - //BA.debugLineNum = 6750212;BA.debugLine="B_IMP.Enabled = False"; -__ref._b_imp /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setEnabled(__c.False); -RDebugUtils.currentLine=6750213; - //BA.debugLineNum = 6750213;BA.debugLine="If Msgbox2(\"\", \"Printer Error\",\"Reprint\",\"Cancel"; + //BA.debugLineNum = 659;BA.debugLine="B_IMP.Enabled = False"; +_b_imp.setEnabled(__c.False); + //BA.debugLineNum = 660;BA.debugLine="If Msgbox2(\"\", \"Printer Error\",\"Reprint\",\"Cancel"; if (__c.Msgbox2(BA.ObjectToCharSequence(""),BA.ObjectToCharSequence("Printer Error"),"Reprint","Cancel","",(android.graphics.Bitmap)(__c.Null),ba)==__c.DialogResponse.POSITIVE) { -RDebugUtils.currentLine=6750214; - //BA.debugLineNum = 6750214;BA.debugLine="StartPrinter"; -__ref._startprinter /*String*/ (null); + //BA.debugLineNum = 661;BA.debugLine="StartPrinter"; +_startprinter(); }; }; -RDebugUtils.currentLine=6750217; - //BA.debugLineNum = 6750217;BA.debugLine="End Sub"; + //BA.debugLineNum = 664;BA.debugLine="End Sub"; return ""; } -public String _startprinter(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "startprinter", false)) - {return ((String) Debug.delegate(ba, "startprinter", null));} -int _resimp = 0; -int _i = 0; -RDebugUtils.currentLine=6815744; - //BA.debugLineNum = 6815744;BA.debugLine="Sub StartPrinter"; -RDebugUtils.currentLine=6815745; - //BA.debugLineNum = 6815745;BA.debugLine="Dim PairedDevices As Map"; -_paireddevices = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=6815746; - //BA.debugLineNum = 6815746;BA.debugLine="Dim L As List"; -_l = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=6815747; - //BA.debugLineNum = 6815747;BA.debugLine="Dim resimp As Int"; -_resimp = 0; -RDebugUtils.currentLine=6815748; - //BA.debugLineNum = 6815748;BA.debugLine="ToastMessageShow(\"Printing.....\",True)"; -__c.ToastMessageShow(BA.ObjectToCharSequence("Printing....."),__c.True); -RDebugUtils.currentLine=6815749; - //BA.debugLineNum = 6815749;BA.debugLine="PairedDevices.Initialize"; -__ref._paireddevices /*anywheresoftware.b4a.objects.collections.Map*/ .Initialize(); -RDebugUtils.currentLine=6815750; - //BA.debugLineNum = 6815750;BA.debugLine="Try"; -try {RDebugUtils.currentLine=6815751; - //BA.debugLineNum = 6815751;BA.debugLine="PairedDevices = cmp20.GetPairedDevices"; -__ref._paireddevices /*anywheresoftware.b4a.objects.collections.Map*/ = __ref._cmp20 /*anywheresoftware.b4a.objects.Serial*/ .GetPairedDevices(); - } - catch (Exception e9) { - ba.setLastException(e9);RDebugUtils.currentLine=6815753; - //BA.debugLineNum = 6815753;BA.debugLine="Msgbox(\"Getting Paired Devices\",\"Printer Error\")"; -__c.Msgbox(BA.ObjectToCharSequence("Getting Paired Devices"),BA.ObjectToCharSequence("Printer Error"),ba); -RDebugUtils.currentLine=6815754; - //BA.debugLineNum = 6815754;BA.debugLine="printer.Close"; -__ref._printer /*anywheresoftware.b4a.objects.streams.File.TextWriterWrapper*/ .Close(); -RDebugUtils.currentLine=6815755; - //BA.debugLineNum = 6815755;BA.debugLine="cmp20.Disconnect"; -__ref._cmp20 /*anywheresoftware.b4a.objects.Serial*/ .Disconnect(); +public String _rb1_checkedchange(boolean _checked) throws Exception{ + //BA.debugLineNum = 769;BA.debugLine="Sub RB1_CheckedChange(Checked As Boolean)"; + //BA.debugLineNum = 770;BA.debugLine="If RB1.Checked = True Then"; +if (_rb1.getChecked()==__c.True) { + //BA.debugLineNum = 771;BA.debugLine="E_RES_E.Text = \"CENTRAL DE ABASTOS\""; +_e_res_e.setText(BA.ObjectToCharSequence("CENTRAL DE ABASTOS")); }; -RDebugUtils.currentLine=6815757; - //BA.debugLineNum = 6815757;BA.debugLine="If PairedDevices.Size = 0 Then"; -if (__ref._paireddevices /*anywheresoftware.b4a.objects.collections.Map*/ .getSize()==0) { -RDebugUtils.currentLine=6815758; - //BA.debugLineNum = 6815758;BA.debugLine="Msgbox(\"Error Connecting to Printer - Printer No"; -__c.Msgbox(BA.ObjectToCharSequence("Error Connecting to Printer - Printer Not Found"),BA.ObjectToCharSequence(""),ba); -RDebugUtils.currentLine=6815759; - //BA.debugLineNum = 6815759;BA.debugLine="Return"; -if (true) return ""; - }; -RDebugUtils.currentLine=6815761; - //BA.debugLineNum = 6815761;BA.debugLine="If PairedDevices.Size = 1 Then"; -if (__ref._paireddevices /*anywheresoftware.b4a.objects.collections.Map*/ .getSize()==1) { -RDebugUtils.currentLine=6815762; - //BA.debugLineNum = 6815762;BA.debugLine="Try"; -try {RDebugUtils.currentLine=6815763; - //BA.debugLineNum = 6815763;BA.debugLine="cmp20.ConnectInsecure(btAdmin,PairedDevices.Get"; -__ref._cmp20 /*anywheresoftware.b4a.objects.Serial*/ .ConnectInsecure(ba,__ref._btadmin /*anywheresoftware.b4a.objects.Serial.BluetoothAdmin*/ ,BA.ObjectToString(__ref._paireddevices /*anywheresoftware.b4a.objects.collections.Map*/ .Get(__ref._paireddevices /*anywheresoftware.b4a.objects.collections.Map*/ .GetKeyAt((int) (0)))),(int) (1)); - } - catch (Exception e21) { - ba.setLastException(e21);RDebugUtils.currentLine=6815765; - //BA.debugLineNum = 6815765;BA.debugLine="Msgbox(\"Connecting\",\"Printer Error\") 'Ignore"; -__c.Msgbox(BA.ObjectToCharSequence("Connecting"),BA.ObjectToCharSequence("Printer Error"),ba); -RDebugUtils.currentLine=6815766; - //BA.debugLineNum = 6815766;BA.debugLine="printer.Close"; -__ref._printer /*anywheresoftware.b4a.objects.streams.File.TextWriterWrapper*/ .Close(); -RDebugUtils.currentLine=6815767; - //BA.debugLineNum = 6815767;BA.debugLine="cmp20.Disconnect"; -__ref._cmp20 /*anywheresoftware.b4a.objects.Serial*/ .Disconnect(); - }; - }else { -RDebugUtils.currentLine=6815770; - //BA.debugLineNum = 6815770;BA.debugLine="L.Initialize"; -__ref._l /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=6815771; - //BA.debugLineNum = 6815771;BA.debugLine="For i = 0 To PairedDevices.Size - 1"; -{ -final int step27 = 1; -final int limit27 = (int) (__ref._paireddevices /*anywheresoftware.b4a.objects.collections.Map*/ .getSize()-1); -_i = (int) (0) ; -for (;_i <= limit27 ;_i = _i + step27 ) { -RDebugUtils.currentLine=6815772; - //BA.debugLineNum = 6815772;BA.debugLine="L.Add(PairedDevices.GetKeyAt(i))"; -__ref._l /*anywheresoftware.b4a.objects.collections.List*/ .Add(__ref._paireddevices /*anywheresoftware.b4a.objects.collections.Map*/ .GetKeyAt(_i)); - } -}; -RDebugUtils.currentLine=6815774; - //BA.debugLineNum = 6815774;BA.debugLine="resimp = InputList(L, \"Choose device\", -1) 'Igno"; -_resimp = __c.InputList(__ref._l /*anywheresoftware.b4a.objects.collections.List*/ ,BA.ObjectToCharSequence("Choose device"),(int) (-1),ba); -RDebugUtils.currentLine=6815775; - //BA.debugLineNum = 6815775;BA.debugLine="If resimp <> DialogResponse.CANCEL Then"; -if (_resimp!=__c.DialogResponse.CANCEL) { -RDebugUtils.currentLine=6815776; - //BA.debugLineNum = 6815776;BA.debugLine="cmp20.Connect(PairedDevices.Get(L.Get(resimp)))"; -__ref._cmp20 /*anywheresoftware.b4a.objects.Serial*/ .Connect(ba,BA.ObjectToString(__ref._paireddevices /*anywheresoftware.b4a.objects.collections.Map*/ .Get(__ref._l /*anywheresoftware.b4a.objects.collections.List*/ .Get(_resimp)))); - }; - }; -RDebugUtils.currentLine=6815779; - //BA.debugLineNum = 6815779;BA.debugLine="End Sub"; + //BA.debugLineNum = 773;BA.debugLine="End Sub"; return ""; } -public String _rb1_checkedchange(keymon.lat.medicomed.c_cliente __ref,boolean _checked) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "rb1_checkedchange", false)) - {return ((String) Debug.delegate(ba, "rb1_checkedchange", new Object[] {_checked}));} -RDebugUtils.currentLine=7077888; - //BA.debugLineNum = 7077888;BA.debugLine="Sub RB1_CheckedChange(Checked As Boolean)"; -RDebugUtils.currentLine=7077889; - //BA.debugLineNum = 7077889;BA.debugLine="If RB1.Checked = True Then"; -if (__ref._rb1 /*anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper*/ .getChecked()==__c.True) { -RDebugUtils.currentLine=7077890; - //BA.debugLineNum = 7077890;BA.debugLine="E_RES_E.Text = \"CENTRAL DE ABASTOS\""; -__ref._e_res_e /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence("CENTRAL DE ABASTOS")); +public String _rb2_checkedchange(boolean _checked) throws Exception{ + //BA.debugLineNum = 775;BA.debugLine="Sub RB2_CheckedChange(Checked As Boolean)"; + //BA.debugLineNum = 776;BA.debugLine="If RB2.Checked = True Then"; +if (_rb2.getChecked()==__c.True) { + //BA.debugLineNum = 777;BA.debugLine="E_RES_E.Text = \"AUTOSERVICIO\""; +_e_res_e.setText(BA.ObjectToCharSequence("AUTOSERVICIO")); }; -RDebugUtils.currentLine=7077892; - //BA.debugLineNum = 7077892;BA.debugLine="End Sub"; + //BA.debugLineNum = 779;BA.debugLine="End Sub"; return ""; } -public String _rb2_checkedchange(keymon.lat.medicomed.c_cliente __ref,boolean _checked) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "rb2_checkedchange", false)) - {return ((String) Debug.delegate(ba, "rb2_checkedchange", new Object[] {_checked}));} -RDebugUtils.currentLine=7143424; - //BA.debugLineNum = 7143424;BA.debugLine="Sub RB2_CheckedChange(Checked As Boolean)"; -RDebugUtils.currentLine=7143425; - //BA.debugLineNum = 7143425;BA.debugLine="If RB2.Checked = True Then"; -if (__ref._rb2 /*anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper*/ .getChecked()==__c.True) { -RDebugUtils.currentLine=7143426; - //BA.debugLineNum = 7143426;BA.debugLine="E_RES_E.Text = \"AUTOSERVICIO\""; -__ref._e_res_e /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence("AUTOSERVICIO")); +public String _rb3_checkedchange(boolean _checked) throws Exception{ + //BA.debugLineNum = 781;BA.debugLine="Sub RB3_CheckedChange(Checked As Boolean)"; + //BA.debugLineNum = 782;BA.debugLine="If RB3.Checked = True Then"; +if (_rb3.getChecked()==__c.True) { + //BA.debugLineNum = 783;BA.debugLine="E_RES_E.Text = \"CLUB DE PRECIO\""; +_e_res_e.setText(BA.ObjectToCharSequence("CLUB DE PRECIO")); }; -RDebugUtils.currentLine=7143428; - //BA.debugLineNum = 7143428;BA.debugLine="End Sub"; + //BA.debugLineNum = 785;BA.debugLine="End Sub"; return ""; } -public String _rb3_checkedchange(keymon.lat.medicomed.c_cliente __ref,boolean _checked) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "rb3_checkedchange", false)) - {return ((String) Debug.delegate(ba, "rb3_checkedchange", new Object[] {_checked}));} -RDebugUtils.currentLine=7208960; - //BA.debugLineNum = 7208960;BA.debugLine="Sub RB3_CheckedChange(Checked As Boolean)"; -RDebugUtils.currentLine=7208961; - //BA.debugLineNum = 7208961;BA.debugLine="If RB3.Checked = True Then"; -if (__ref._rb3 /*anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper*/ .getChecked()==__c.True) { -RDebugUtils.currentLine=7208962; - //BA.debugLineNum = 7208962;BA.debugLine="E_RES_E.Text = \"CLUB DE PRECIO\""; -__ref._e_res_e /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence("CLUB DE PRECIO")); +public String _rb4_checkedchange(boolean _checked) throws Exception{ + //BA.debugLineNum = 787;BA.debugLine="Sub RB4_CheckedChange(Checked As Boolean)"; + //BA.debugLineNum = 788;BA.debugLine="If RB4.Checked = True Then"; +if (_rb4.getChecked()==__c.True) { + //BA.debugLineNum = 789;BA.debugLine="E_RES_E.Text = \"DIRECTO PEDEGREE\""; +_e_res_e.setText(BA.ObjectToCharSequence("DIRECTO PEDEGREE")); }; -RDebugUtils.currentLine=7208964; - //BA.debugLineNum = 7208964;BA.debugLine="End Sub"; + //BA.debugLineNum = 791;BA.debugLine="End Sub"; return ""; } -public String _rb4_checkedchange(keymon.lat.medicomed.c_cliente __ref,boolean _checked) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "rb4_checkedchange", false)) - {return ((String) Debug.delegate(ba, "rb4_checkedchange", new Object[] {_checked}));} -RDebugUtils.currentLine=7274496; - //BA.debugLineNum = 7274496;BA.debugLine="Sub RB4_CheckedChange(Checked As Boolean)"; -RDebugUtils.currentLine=7274497; - //BA.debugLineNum = 7274497;BA.debugLine="If RB4.Checked = True Then"; -if (__ref._rb4 /*anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper*/ .getChecked()==__c.True) { -RDebugUtils.currentLine=7274498; - //BA.debugLineNum = 7274498;BA.debugLine="E_RES_E.Text = \"DIRECTO PEDEGREE\""; -__ref._e_res_e /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence("DIRECTO PEDEGREE")); - }; -RDebugUtils.currentLine=7274500; - //BA.debugLineNum = 7274500;BA.debugLine="End Sub"; -return ""; -} -public void _sc_result(keymon.lat.medicomed.c_cliente __ref,String _atype,String _values,anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _image) throws Exception{ -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "sc_result", false)) - {Debug.delegate(ba, "sc_result", new Object[] {_atype,_values,_image}); return;} -ResumableSub_sc_result rsub = new ResumableSub_sc_result(this,__ref,_atype,_values,_image); +public void _sc_result(String _atype,String _values,anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _image) throws Exception{ +ResumableSub_sc_result rsub = new ResumableSub_sc_result(this,_atype,_values,_image); rsub.resume(ba, null); } public static class ResumableSub_sc_result extends BA.ResumableSub { -public ResumableSub_sc_result(keymon.lat.medicomed.c_cliente parent,keymon.lat.medicomed.c_cliente __ref,String _atype,String _values,anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _image) { +public ResumableSub_sc_result(keymon.lat.medicomed.c_cliente parent,String _atype,String _values,anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _image) { this.parent = parent; -this.__ref = __ref; this._atype = _atype; this._values = _values; this._image = _image; -this.__ref = parent; } -keymon.lat.medicomed.c_cliente __ref; keymon.lat.medicomed.c_cliente parent; String _atype; String _values; @@ -2709,7 +1804,6 @@ int _resultado = 0; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="c_cliente"; while (true) { switch (state) { @@ -2719,23 +1813,19 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=6356995; - //BA.debugLineNum = 6356995;BA.debugLine="CODIGO = Values"; -__ref._codigo /*String*/ = _values; -RDebugUtils.currentLine=6356996; - //BA.debugLineNum = 6356996;BA.debugLine="DD=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT COUN"; -__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery2("SELECT COUNT(*) AS CUANTOS FROM kmt_info WHERE CAT_CL_NUM_SERIEFISICO = ?",new String[]{__ref._codigo /*String*/ }))); -RDebugUtils.currentLine=6356997; - //BA.debugLineNum = 6356997;BA.debugLine="DD.Position =0"; -__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=6356998; - //BA.debugLineNum = 6356998;BA.debugLine="If DD.GetString(\"CUANTOS\") > 0 Then"; + //BA.debugLineNum = 562;BA.debugLine="CODIGO = Values"; +parent._codigo = _values; + //BA.debugLineNum = 563;BA.debugLine="DD=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT COUN"; +parent._dd = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery2("SELECT COUNT(*) AS CUANTOS FROM kmt_info WHERE CAT_CL_NUM_SERIEFISICO = ?",new String[]{parent._codigo}))); + //BA.debugLineNum = 564;BA.debugLine="DD.Position =0"; +parent._dd.setPosition((int) (0)); + //BA.debugLineNum = 565;BA.debugLine="If DD.GetString(\"CUANTOS\") > 0 Then"; if (true) break; case 1: //if this.state = 16; -if ((double)(Double.parseDouble(__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")))>0) { +if ((double)(Double.parseDouble(parent._dd.GetString("CUANTOS")))>0) { this.state = 3; }else { this.state = 5; @@ -2744,22 +1834,20 @@ this.state = 5; case 3: //C this.state = 16; -RDebugUtils.currentLine=6356999; - //BA.debugLineNum = 6356999;BA.debugLine="MsgboxAsync(\"Código ya asignado\", \"AVISO\")"; + //BA.debugLineNum = 566;BA.debugLine="MsgboxAsync(\"Código ya asignado\", \"AVISO\")"; parent.__c.MsgboxAsync(BA.ObjectToCharSequence("Código ya asignado"),BA.ObjectToCharSequence("AVISO"),ba); if (true) break; case 5: //C this.state = 6; -RDebugUtils.currentLine=6357001; - //BA.debugLineNum = 6357001;BA.debugLine="If CODIGO.Length = 7 Then"; + //BA.debugLineNum = 568;BA.debugLine="If CODIGO.Length = 7 Then"; if (true) break; case 6: //if this.state = 15; -if (__ref._codigo /*String*/ .length()==7) { +if (parent._codigo.length()==7) { this.state = 8; }else { this.state = 14; @@ -2768,21 +1856,18 @@ this.state = 14; case 8: //C this.state = 9; -RDebugUtils.currentLine=6357002; - //BA.debugLineNum = 6357002;BA.debugLine="Msgbox2Async(\"El código \"& CODIGO & \" es correc"; -parent.__c.Msgbox2Async(BA.ObjectToCharSequence("El código "+__ref._codigo /*String*/ +" es correcto?"),BA.ObjectToCharSequence("Title"),"Yes","Cancel","No",(anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper(), (android.graphics.Bitmap)(parent.__c.Null)),ba,parent.__c.False); -RDebugUtils.currentLine=6357003; - //BA.debugLineNum = 6357003;BA.debugLine="Wait For Msgbox_Result (resultado As Int)"; -parent.__c.WaitFor("msgbox_result", ba, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "c_cliente", "sc_result"), null); + //BA.debugLineNum = 569;BA.debugLine="Msgbox2Async(\"El código \"& CODIGO & \" es correc"; +parent.__c.Msgbox2Async(BA.ObjectToCharSequence("El código "+parent._codigo+" es correcto?"),BA.ObjectToCharSequence("Title"),"Yes","Cancel","No",(anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper(), (android.graphics.Bitmap)(parent.__c.Null)),ba,parent.__c.False); + //BA.debugLineNum = 570;BA.debugLine="Wait For Msgbox_Result (resultado As Int)"; +parent.__c.WaitFor("msgbox_result", ba, this, null); this.state = 17; return; case 17: //C this.state = 9; -_resultado = (Integer) result[1]; +_resultado = (Integer) result[0]; ; -RDebugUtils.currentLine=6357004; - //BA.debugLineNum = 6357004;BA.debugLine="If resultado = DialogResponse.POSITIVE Then"; + //BA.debugLineNum = 571;BA.debugLine="If resultado = DialogResponse.POSITIVE Then"; if (true) break; case 9: @@ -2795,18 +1880,14 @@ this.state = 11; case 11: //C this.state = 12; -RDebugUtils.currentLine=6357005; - //BA.debugLineNum = 6357005;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE k"; -parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE kmt_info set CAT_CL_NUM_SERIEFISICO = ?, CAT_CL_LONG = ?, CAT_CL_LAT =? where CAT_CL_CODIGO In (select cuenta from cuentaa)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._codigo /*String*/ ),(Object)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ),(Object)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ )})); -RDebugUtils.currentLine=6357006; - //BA.debugLineNum = 6357006;BA.debugLine="L_QR.TEXT =CODIGO"; -__ref._l_qr /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._codigo /*String*/ )); -RDebugUtils.currentLine=6357007; - //BA.debugLineNum = 6357007;BA.debugLine="L_QR.TextColor = Colors.Blue"; -__ref._l_qr /*anywheresoftware.b4a.objects.LabelWrapper*/ .setTextColor(parent.__c.Colors.Blue); -RDebugUtils.currentLine=6357008; - //BA.debugLineNum = 6357008;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert i"; -parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into HIST_CODIGO_BARRAS(CODIGOKMTS, CODIGOB, LAT, LON) VALUES (?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._la_cuenta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._codigo /*String*/ ),(Object)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ),(Object)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ )})); + //BA.debugLineNum = 572;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE k"; +parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE kmt_info set CAT_CL_NUM_SERIEFISICO = ?, CAT_CL_LONG = ?, CAT_CL_LAT =? where CAT_CL_CODIGO In (select cuenta from cuentaa)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(parent._codigo),(Object)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ),(Object)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ )})); + //BA.debugLineNum = 573;BA.debugLine="L_QR.TEXT =CODIGO"; +parent._l_qr.setText(BA.ObjectToCharSequence(parent._codigo)); + //BA.debugLineNum = 574;BA.debugLine="L_QR.TextColor = Colors.Blue"; +parent._l_qr.setTextColor(parent.__c.Colors.Blue); + //BA.debugLineNum = 575;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert i"; +parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into HIST_CODIGO_BARRAS(CODIGOKMTS, CODIGOB, LAT, LON) VALUES (?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(parent._la_cuenta.getText()),(Object)(parent._codigo),(Object)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ),(Object)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ )})); if (true) break; case 12: @@ -2818,8 +1899,7 @@ this.state = 15; case 14: //C this.state = 15; -RDebugUtils.currentLine=6357011; - //BA.debugLineNum = 6357011;BA.debugLine="MsgboxAsync(\"Código No Valido\", \"AVISO\")"; + //BA.debugLineNum = 578;BA.debugLine="MsgboxAsync(\"Código No Valido\", \"AVISO\")"; parent.__c.MsgboxAsync(BA.ObjectToCharSequence("Código No Valido"),BA.ObjectToCharSequence("AVISO"),ba); if (true) break; @@ -2833,85 +1913,129 @@ case 16: //C this.state = -1; ; -RDebugUtils.currentLine=6357014; - //BA.debugLineNum = 6357014;BA.debugLine="DD.Close"; -__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=6357015; - //BA.debugLineNum = 6357015;BA.debugLine="End Sub"; + //BA.debugLineNum = 581;BA.debugLine="DD.Close"; +parent._dd.Close(); + //BA.debugLineNum = 582;BA.debugLine="End Sub"; if (true) break; } } } } -public String _sc_timedout(keymon.lat.medicomed.c_cliente __ref,boolean _timedout) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "sc_timedout", false)) - {return ((String) Debug.delegate(ba, "sc_timedout", new Object[] {_timedout}));} -RDebugUtils.currentLine=6422528; - //BA.debugLineNum = 6422528;BA.debugLine="Sub sc_timedout(timedOut As Boolean)"; -RDebugUtils.currentLine=6422529; - //BA.debugLineNum = 6422529;BA.debugLine="Log(\"timedOut \" & timedOut)"; -__c.LogImpl("36422529","timedOut "+BA.ObjectToString(_timedout),0); -RDebugUtils.currentLine=6422530; - //BA.debugLineNum = 6422530;BA.debugLine="End Sub"; +public String _sc_timedout(boolean _timedout) throws Exception{ + //BA.debugLineNum = 584;BA.debugLine="Sub sc_timedout(timedOut As Boolean)"; + //BA.debugLineNum = 585;BA.debugLine="Log(\"timedOut \" & timedOut)"; +__c.LogImpl("343778049","timedOut "+BA.ObjectToString(_timedout),0); + //BA.debugLineNum = 586;BA.debugLine="End Sub"; return ""; } -public String _sc_usercancelled(keymon.lat.medicomed.c_cliente __ref,boolean _usercancelled) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "sc_usercancelled", false)) - {return ((String) Debug.delegate(ba, "sc_usercancelled", new Object[] {_usercancelled}));} -RDebugUtils.currentLine=6488064; - //BA.debugLineNum = 6488064;BA.debugLine="Sub sc_usercancelled(userCancelled As Boolean)"; -RDebugUtils.currentLine=6488065; - //BA.debugLineNum = 6488065;BA.debugLine="Log(\"userCancelled \" & userCancelled)"; -__c.LogImpl("36488065","userCancelled "+BA.ObjectToString(_usercancelled),0); -RDebugUtils.currentLine=6488066; - //BA.debugLineNum = 6488066;BA.debugLine="End Sub"; +public String _sc_usercancelled(boolean _usercancelled) throws Exception{ + //BA.debugLineNum = 588;BA.debugLine="Sub sc_usercancelled(userCancelled As Boolean)"; + //BA.debugLineNum = 589;BA.debugLine="Log(\"userCancelled \" & userCancelled)"; +__c.LogImpl("343843585","userCancelled "+BA.ObjectToString(_usercancelled),0); + //BA.debugLineNum = 590;BA.debugLine="End Sub"; return ""; } -public String _tar_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "tar_click", false)) - {return ((String) Debug.delegate(ba, "tar_click", null));} -RDebugUtils.currentLine=5832704; - //BA.debugLineNum = 5832704;BA.debugLine="Sub Tar_Click"; -RDebugUtils.currentLine=5832705; - //BA.debugLineNum = 5832705;BA.debugLine="B4XPages.ShowPage(\"Nota\")"; +public String _startprinter() throws Exception{ +int _resimp = 0; +int _i = 0; + //BA.debugLineNum = 666;BA.debugLine="Sub StartPrinter"; + //BA.debugLineNum = 667;BA.debugLine="Dim PairedDevices As Map"; +_paireddevices = new anywheresoftware.b4a.objects.collections.Map(); + //BA.debugLineNum = 668;BA.debugLine="Dim L As List"; +_l = new anywheresoftware.b4a.objects.collections.List(); + //BA.debugLineNum = 669;BA.debugLine="Dim resimp As Int"; +_resimp = 0; + //BA.debugLineNum = 670;BA.debugLine="ToastMessageShow(\"Printing.....\",True)"; +__c.ToastMessageShow(BA.ObjectToCharSequence("Printing....."),__c.True); + //BA.debugLineNum = 671;BA.debugLine="PairedDevices.Initialize"; +_paireddevices.Initialize(); + //BA.debugLineNum = 672;BA.debugLine="Try"; +try { //BA.debugLineNum = 673;BA.debugLine="PairedDevices = cmp20.GetPairedDevices"; +_paireddevices = _cmp20.GetPairedDevices(); + } + catch (Exception e9) { + ba.setLastException(e9); //BA.debugLineNum = 675;BA.debugLine="Msgbox(\"Getting Paired Devices\",\"Printer Error\")"; +__c.Msgbox(BA.ObjectToCharSequence("Getting Paired Devices"),BA.ObjectToCharSequence("Printer Error"),ba); + //BA.debugLineNum = 676;BA.debugLine="printer.Close"; +_printer.Close(); + //BA.debugLineNum = 677;BA.debugLine="cmp20.Disconnect"; +_cmp20.Disconnect(); + }; + //BA.debugLineNum = 679;BA.debugLine="If PairedDevices.Size = 0 Then"; +if (_paireddevices.getSize()==0) { + //BA.debugLineNum = 680;BA.debugLine="Msgbox(\"Error Connecting to Printer - Printer No"; +__c.Msgbox(BA.ObjectToCharSequence("Error Connecting to Printer - Printer Not Found"),BA.ObjectToCharSequence(""),ba); + //BA.debugLineNum = 681;BA.debugLine="Return"; +if (true) return ""; + }; + //BA.debugLineNum = 683;BA.debugLine="If PairedDevices.Size = 1 Then"; +if (_paireddevices.getSize()==1) { + //BA.debugLineNum = 684;BA.debugLine="Try"; +try { //BA.debugLineNum = 685;BA.debugLine="cmp20.ConnectInsecure(btAdmin,PairedDevices.Get"; +_cmp20.ConnectInsecure(ba,_btadmin,BA.ObjectToString(_paireddevices.Get(_paireddevices.GetKeyAt((int) (0)))),(int) (1)); + } + catch (Exception e21) { + ba.setLastException(e21); //BA.debugLineNum = 687;BA.debugLine="Msgbox(\"Connecting\",\"Printer Error\") 'Ignore"; +__c.Msgbox(BA.ObjectToCharSequence("Connecting"),BA.ObjectToCharSequence("Printer Error"),ba); + //BA.debugLineNum = 688;BA.debugLine="printer.Close"; +_printer.Close(); + //BA.debugLineNum = 689;BA.debugLine="cmp20.Disconnect"; +_cmp20.Disconnect(); + }; + }else { + //BA.debugLineNum = 692;BA.debugLine="L.Initialize"; +_l.Initialize(); + //BA.debugLineNum = 693;BA.debugLine="For i = 0 To PairedDevices.Size - 1"; +{ +final int step27 = 1; +final int limit27 = (int) (_paireddevices.getSize()-1); +_i = (int) (0) ; +for (;_i <= limit27 ;_i = _i + step27 ) { + //BA.debugLineNum = 694;BA.debugLine="L.Add(PairedDevices.GetKeyAt(i))"; +_l.Add(_paireddevices.GetKeyAt(_i)); + } +}; + //BA.debugLineNum = 696;BA.debugLine="resimp = InputList(L, \"Choose device\", -1) 'Igno"; +_resimp = __c.InputList(_l,BA.ObjectToCharSequence("Choose device"),(int) (-1),ba); + //BA.debugLineNum = 697;BA.debugLine="If resimp <> DialogResponse.CANCEL Then"; +if (_resimp!=__c.DialogResponse.CANCEL) { + //BA.debugLineNum = 698;BA.debugLine="cmp20.Connect(PairedDevices.Get(L.Get(resimp)))"; +_cmp20.Connect(ba,BA.ObjectToString(_paireddevices.Get(_l.Get(_resimp)))); + }; + }; + //BA.debugLineNum = 701;BA.debugLine="End Sub"; +return ""; +} +public String _tar_click() throws Exception{ + //BA.debugLineNum = 450;BA.debugLine="Sub Tar_Click"; + //BA.debugLineNum = 451;BA.debugLine="B4XPages.ShowPage(\"Nota\")"; _b4xpages._showpage /*String*/ (ba,"Nota"); -RDebugUtils.currentLine=5832706; - //BA.debugLineNum = 5832706;BA.debugLine="End Sub"; + //BA.debugLineNum = 452;BA.debugLine="End Sub"; return ""; } -public String _tar_longclick(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "tar_longclick", false)) - {return ((String) Debug.delegate(ba, "tar_longclick", null));} -RDebugUtils.currentLine=5898240; - //BA.debugLineNum = 5898240;BA.debugLine="Sub Tar_LongClick"; -RDebugUtils.currentLine=5898241; - //BA.debugLineNum = 5898241;BA.debugLine="p_abono.Visible = True"; -__ref._p_abono /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=5898242; - //BA.debugLineNum = 5898242;BA.debugLine="End Sub"; +public String _tar_longclick() throws Exception{ + //BA.debugLineNum = 454;BA.debugLine="Sub Tar_LongClick"; + //BA.debugLineNum = 455;BA.debugLine="p_abono.Visible = True"; +_p_abono.setVisible(__c.True); + //BA.debugLineNum = 456;BA.debugLine="End Sub"; return ""; } -public String _tels_click(keymon.lat.medicomed.c_cliente __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_cliente"; -if (Debug.shouldDelegate(ba, "tels_click", false)) - {return ((String) Debug.delegate(ba, "tels_click", null));} -RDebugUtils.currentLine=5701632; - //BA.debugLineNum = 5701632;BA.debugLine="Sub Tels_Click"; -RDebugUtils.currentLine=5701633; - //BA.debugLineNum = 5701633;BA.debugLine="B4XPages.ShowPage(\"NoVenta\")"; +public String _tels_click() throws Exception{ + //BA.debugLineNum = 420;BA.debugLine="Sub Tels_Click"; + //BA.debugLineNum = 421;BA.debugLine="B4XPages.ShowPage(\"NoVenta\")"; _b4xpages._showpage /*String*/ (ba,"NoVenta"); -RDebugUtils.currentLine=5701634; - //BA.debugLineNum = 5701634;BA.debugLine="End Sub"; + //BA.debugLineNum = 422;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +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; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/c_clientes.java b/B4A/Objects/src/keymon/lat/medicomed/c_clientes.java index ae4f3f9..72a1661 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/c_clientes.java +++ b/B4A/Objects/src/keymon/lat/medicomed/c_clientes.java @@ -10,7 +10,7 @@ public class c_clientes extends B4AClass.ImplB4AClass implements BA.SubDelegator private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.c_clientes"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.c_clientes"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class c_clientes extends B4AClass.ImplB4AClass implements BA.SubDelegator 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.keywords.Common __c = null; public anywheresoftware.b4a.objects.B4XViewWrapper _root = null; public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; public anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; @@ -62,174 +55,107 @@ 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_clientes __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="c_clientes"; -if (Debug.shouldDelegate(ba, "initialize", false)) - {return ((Object) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=8323072; - //BA.debugLineNum = 8323072;BA.debugLine="Public Sub Initialize As Object"; -RDebugUtils.currentLine=8323073; - //BA.debugLineNum = 8323073;BA.debugLine="Return Me"; -if (true) return this; -RDebugUtils.currentLine=8323074; - //BA.debugLineNum = 8323074;BA.debugLine="End Sub"; -return null; -} -public String _b_qr_click(keymon.lat.medicomed.c_clientes __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_clientes"; -if (Debug.shouldDelegate(ba, "b_qr_click", false)) - {return ((String) Debug.delegate(ba, "b_qr_click", null));} +public String _b_qr_click() throws Exception{ int _scan_width = 0; int _scan_height = 0; -RDebugUtils.currentLine=8716288; - //BA.debugLineNum = 8716288;BA.debugLine="Sub b_qr_Click"; -RDebugUtils.currentLine=8716289; - //BA.debugLineNum = 8716289;BA.debugLine="Dim scan_width As Int"; + //BA.debugLineNum = 198;BA.debugLine="Sub b_qr_Click"; + //BA.debugLineNum = 199;BA.debugLine="Dim scan_width As Int"; _scan_width = 0; -RDebugUtils.currentLine=8716290; - //BA.debugLineNum = 8716290;BA.debugLine="Dim scan_height As Int"; + //BA.debugLineNum = 200;BA.debugLine="Dim scan_height As Int"; _scan_height = 0; -RDebugUtils.currentLine=8716291; - //BA.debugLineNum = 8716291;BA.debugLine="scan_width = 400"; + //BA.debugLineNum = 201;BA.debugLine="scan_width = 400"; _scan_width = (int) (400); -RDebugUtils.currentLine=8716292; - //BA.debugLineNum = 8716292;BA.debugLine="scan_height = 400"; + //BA.debugLineNum = 202;BA.debugLine="scan_height = 400"; _scan_height = (int) (400); -RDebugUtils.currentLine=8716293; - //BA.debugLineNum = 8716293;BA.debugLine="End Sub"; + //BA.debugLineNum = 203;BA.debugLine="End Sub"; return ""; } -public String _b4xpage_appear(keymon.lat.medicomed.c_clientes __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_clientes"; -if (Debug.shouldDelegate(ba, "b4xpage_appear", false)) - {return ((String) Debug.delegate(ba, "b4xpage_appear", null));} +public String _b4xpage_appear() throws Exception{ anywheresoftware.b4a.objects.LabelWrapper _label1 = null; anywheresoftware.b4a.objects.LabelWrapper _label2 = null; int _i = 0; -RDebugUtils.currentLine=8454144; - //BA.debugLineNum = 8454144;BA.debugLine="Sub B4XPage_Appear"; -RDebugUtils.currentLine=8454145; - //BA.debugLineNum = 8454145;BA.debugLine="B4XPages.SetTitle(Me, $\"Clientes - ${Starter.dia_"; + //BA.debugLineNum = 63;BA.debugLine="Sub B4XPage_Appear"; + //BA.debugLineNum = 64;BA.debugLine="B4XPages.SetTitle(Me, $\"Clientes - ${Starter.dia_"; _b4xpages._settitle /*String*/ (ba,this,(Object)(("Clientes - "+__c.SmartStringFormatter("",(Object)(_starter._dia_semana /*String*/ ))+""))); -RDebugUtils.currentLine=8454146; - //BA.debugLineNum = 8454146;BA.debugLine="busca.Text = \"\""; -__ref._busca /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence("")); -RDebugUtils.currentLine=8454147; - //BA.debugLineNum = 8454147;BA.debugLine="entro =\"2\""; -__ref._entro /*String*/ = "2"; -RDebugUtils.currentLine=8454148; - //BA.debugLineNum = 8454148;BA.debugLine="colonia = 0"; -__ref._colonia /*String*/ = BA.NumberToString(0); -RDebugUtils.currentLine=8454149; - //BA.debugLineNum = 8454149;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_CL"; -__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_NOMBRE, CAT_CL_CALLE, CAT_CL_CODIGO, CAT_CL_NOEXT, CAT_CL_CALLE1, CAT_CL_SECUENCIA from kmt_info where gestion = 0 ORDER BY CAT_CL_SECUENCIA, CAT_CL_CODIGO"))); -RDebugUtils.currentLine=8454150; - //BA.debugLineNum = 8454150;BA.debugLine="ListView1.Clear"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear(); -RDebugUtils.currentLine=8454152; - //BA.debugLineNum = 8454152;BA.debugLine="lfila.Text = \"NOMBRE\""; -__ref._lfila /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("NOMBRE")); -RDebugUtils.currentLine=8454153; - //BA.debugLineNum = 8454153;BA.debugLine="If c.RowCount>0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=8454154; - //BA.debugLineNum = 8454154;BA.debugLine="c.Position= 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=8454155; - //BA.debugLineNum = 8454155;BA.debugLine="la_cuenta.text = c.GetString(\"CAT_CL_CODIGO\")"; -__ref._la_cuenta /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_CODIGO"))); -RDebugUtils.currentLine=8454156; - //BA.debugLineNum = 8454156;BA.debugLine="Log(\"La cuenta: --->\"&la_cuenta)"; -__c.LogImpl("38454156","La cuenta: --->"+BA.ObjectToString(__ref._la_cuenta /*anywheresoftware.b4a.objects.LabelWrapper*/ ),0); -RDebugUtils.currentLine=8454157; - //BA.debugLineNum = 8454157;BA.debugLine="Dim label1 As Label"; + //BA.debugLineNum = 65;BA.debugLine="busca.Text = \"\""; +_busca.setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 66;BA.debugLine="entro =\"2\""; +_entro = "2"; + //BA.debugLineNum = 67;BA.debugLine="colonia = 0"; +_colonia = BA.NumberToString(0); + //BA.debugLineNum = 68;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_CL"; +_c = (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_NOMBRE, CAT_CL_CALLE, CAT_CL_CODIGO, CAT_CL_NOEXT, CAT_CL_CALLE1, CAT_CL_SECUENCIA from kmt_info where gestion = 0 ORDER BY CAT_CL_SECUENCIA, CAT_CL_CODIGO"))); + //BA.debugLineNum = 69;BA.debugLine="ListView1.Clear"; +_listview1.Clear(); + //BA.debugLineNum = 71;BA.debugLine="lfila.Text = \"NOMBRE\""; +_lfila.setText(BA.ObjectToCharSequence("NOMBRE")); + //BA.debugLineNum = 72;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 73;BA.debugLine="c.Position= 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 74;BA.debugLine="la_cuenta.text = c.GetString(\"CAT_CL_CODIGO\")"; +_la_cuenta.setText(BA.ObjectToCharSequence(_c.GetString("CAT_CL_CODIGO"))); + //BA.debugLineNum = 75;BA.debugLine="Log(\"La cuenta: --->\"&la_cuenta)"; +__c.LogImpl("341746444","La cuenta: --->"+BA.ObjectToString(_la_cuenta),0); + //BA.debugLineNum = 76;BA.debugLine="Dim label1 As Label"; _label1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=8454158; - //BA.debugLineNum = 8454158;BA.debugLine="label1 = ListView1.TwoLinesLayout.Label"; -_label1 = __ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().Label; -RDebugUtils.currentLine=8454159; - //BA.debugLineNum = 8454159;BA.debugLine="label1.TextSize = 14"; + //BA.debugLineNum = 77;BA.debugLine="label1 = ListView1.TwoLinesLayout.Label"; +_label1 = _listview1.getTwoLinesLayout().Label; + //BA.debugLineNum = 78;BA.debugLine="label1.TextSize = 14"; _label1.setTextSize((float) (14)); -RDebugUtils.currentLine=8454160; - //BA.debugLineNum = 8454160;BA.debugLine="label1.TextColor = Colors.Black"; + //BA.debugLineNum = 79;BA.debugLine="label1.TextColor = Colors.Black"; _label1.setTextColor(__c.Colors.Black); -RDebugUtils.currentLine=8454161; - //BA.debugLineNum = 8454161;BA.debugLine="Dim label2 As Label"; + //BA.debugLineNum = 80;BA.debugLine="Dim label2 As Label"; _label2 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=8454162; - //BA.debugLineNum = 8454162;BA.debugLine="label2 = ListView1.TwoLinesLayout.SecondLabel"; -_label2 = __ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().SecondLabel; -RDebugUtils.currentLine=8454163; - //BA.debugLineNum = 8454163;BA.debugLine="label2.TextSize = 14"; + //BA.debugLineNum = 81;BA.debugLine="label2 = ListView1.TwoLinesLayout.SecondLabel"; +_label2 = _listview1.getTwoLinesLayout().SecondLabel; + //BA.debugLineNum = 82;BA.debugLine="label2.TextSize = 14"; _label2.setTextSize((float) (14)); -RDebugUtils.currentLine=8454164; - //BA.debugLineNum = 8454164;BA.debugLine="label2.TextColor = Colors.Black"; + //BA.debugLineNum = 83;BA.debugLine="label2.TextColor = Colors.Black"; _label2.setTextColor(__c.Colors.Black); -RDebugUtils.currentLine=8454165; - //BA.debugLineNum = 8454165;BA.debugLine="label2.Height = 50dip"; + //BA.debugLineNum = 84;BA.debugLine="label2.Height = 50dip"; _label2.setHeight(__c.DipToCurrent((int) (50))); -RDebugUtils.currentLine=8454166; - //BA.debugLineNum = 8454166;BA.debugLine="label2.Width = ListView1.Width * 0.99"; -_label2.setWidth((int) (__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getWidth()*0.99)); -RDebugUtils.currentLine=8454167; - //BA.debugLineNum = 8454167;BA.debugLine="ListView1.TwoLinesLayout.ItemHeight = 85dip"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().setItemHeight(__c.DipToCurrent((int) (85))); -RDebugUtils.currentLine=8454168; - //BA.debugLineNum = 8454168;BA.debugLine="For i=0 To c.RowCount -1"; + //BA.debugLineNum = 85;BA.debugLine="label2.Width = ListView1.Width * 0.99"; +_label2.setWidth((int) (_listview1.getWidth()*0.99)); + //BA.debugLineNum = 86;BA.debugLine="ListView1.TwoLinesLayout.ItemHeight = 85dip"; +_listview1.getTwoLinesLayout().setItemHeight(__c.DipToCurrent((int) (85))); + //BA.debugLineNum = 87;BA.debugLine="For i=0 To c.RowCount -1"; { final int step23 = 1; -final int limit23 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit23 = (int) (_c.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit23 ;_i = _i + step23 ) { -RDebugUtils.currentLine=8454169; - //BA.debugLineNum = 8454169;BA.debugLine="c.Position=i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=8454172; - //BA.debugLineNum = 8454172;BA.debugLine="ListView1.AddTwoLines(c.GetString(\"CAT_CL_CODIG"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddTwoLines(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_CODIGO")+" - "+__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_SECUENCIA")),BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_NOMBRE")+__c.CRLF+__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_CALLE1"))); + //BA.debugLineNum = 88;BA.debugLine="c.Position=i"; +_c.setPosition(_i); + //BA.debugLineNum = 91;BA.debugLine="ListView1.AddTwoLines(c.GetString(\"CAT_CL_CODIG"; +_listview1.AddTwoLines(BA.ObjectToCharSequence(_c.GetString("CAT_CL_CODIGO")+" - "+_c.GetString("CAT_CL_SECUENCIA")),BA.ObjectToCharSequence(_c.GetString("CAT_CL_NOMBRE")+__c.CRLF+_c.GetString("CAT_CL_CALLE1"))); } }; }; -RDebugUtils.currentLine=8454176; - //BA.debugLineNum = 8454176;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=8454177; - //BA.debugLineNum = 8454177;BA.debugLine="p_clientes.Height = Root.Height"; -__ref._p_clientes /*anywheresoftware.b4a.objects.PanelWrapper*/ .setHeight(__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=8454178; - //BA.debugLineNum = 8454178;BA.debugLine="ListView1.Height = Root.Height * 0.75"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setHeight((int) (__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()*0.75)); -RDebugUtils.currentLine=8454179; - //BA.debugLineNum = 8454179;BA.debugLine="entro = \"4\""; -__ref._entro /*String*/ = "4"; -RDebugUtils.currentLine=8454180; - //BA.debugLineNum = 8454180;BA.debugLine="End Sub"; + //BA.debugLineNum = 95;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 96;BA.debugLine="p_clientes.Height = Root.Height"; +_p_clientes.setHeight(_root.getHeight()); + //BA.debugLineNum = 97;BA.debugLine="ListView1.Height = Root.Height * 0.75"; +_listview1.setHeight((int) (_root.getHeight()*0.75)); + //BA.debugLineNum = 98;BA.debugLine="entro = \"4\""; +_entro = "4"; + //BA.debugLineNum = 99;BA.debugLine="End Sub"; return ""; } -public anywheresoftware.b4a.keywords.Common.ResumableSubWrapper _b4xpage_closerequest(keymon.lat.medicomed.c_clientes __ref) throws Exception{ -RDebugUtils.currentModule="c_clientes"; -if (Debug.shouldDelegate(ba, "b4xpage_closerequest", false)) - {return ((anywheresoftware.b4a.keywords.Common.ResumableSubWrapper) Debug.delegate(ba, "b4xpage_closerequest", null));} -ResumableSub_B4XPage_CloseRequest rsub = new ResumableSub_B4XPage_CloseRequest(this,__ref); +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.c_clientes parent,keymon.lat.medicomed.c_clientes __ref) { +public ResumableSub_B4XPage_CloseRequest(keymon.lat.medicomed.c_clientes parent) { this.parent = parent; -this.__ref = __ref; -this.__ref = parent; } -keymon.lat.medicomed.c_clientes __ref; keymon.lat.medicomed.c_clientes parent; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="c_clientes"; while (true) { switch (state) { @@ -239,482 +165,330 @@ parent.__c.ReturnFromResumableSub(this,null);return;} case 0: //C this.state = -1; -RDebugUtils.currentLine=8585223; - //BA.debugLineNum = 8585223;BA.debugLine="Return True"; + //BA.debugLineNum = 162;BA.debugLine="Return True"; if (true) { parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.True));return;}; -RDebugUtils.currentLine=8585224; - //BA.debugLineNum = 8585224;BA.debugLine="End Sub"; + //BA.debugLineNum = 163;BA.debugLine="End Sub"; if (true) break; } } } } -public String _b4xpage_created(keymon.lat.medicomed.c_clientes __ref,anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_clientes"; -if (Debug.shouldDelegate(ba, "b4xpage_created", false)) - {return ((String) Debug.delegate(ba, "b4xpage_created", new Object[] {_root1}));} -RDebugUtils.currentLine=8388608; - //BA.debugLineNum = 8388608;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -RDebugUtils.currentLine=8388609; - //BA.debugLineNum = 8388609;BA.debugLine="Root = Root1"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = _root1; -RDebugUtils.currentLine=8388611; - //BA.debugLineNum = 8388611;BA.debugLine="Root.LoadLayout(\"clientes\")"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .LoadLayout("clientes",ba); -RDebugUtils.currentLine=8388613; - //BA.debugLineNum = 8388613;BA.debugLine="entro =\"2\""; -__ref._entro /*String*/ = "2"; -RDebugUtils.currentLine=8388618; - //BA.debugLineNum = 8388618;BA.debugLine="ruta = File.DirInternal"; -__ref._ruta /*String*/ = __c.File.getDirInternal(); -RDebugUtils.currentLine=8388625; - //BA.debugLineNum = 8388625;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; -if (__c.File.Exists(__ref._ruta /*String*/ ,"kmt.db")==__c.False) { -RDebugUtils.currentLine=8388626; - //BA.debugLineNum = 8388626;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; -__c.File.Copy(__c.File.getDirAssets(),"kmt.db",__ref._ruta /*String*/ ,"kmt.db"); +public String _b4xpage_created(anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ + //BA.debugLineNum = 40;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; + //BA.debugLineNum = 41;BA.debugLine="Root = Root1"; +_root = _root1; + //BA.debugLineNum = 43;BA.debugLine="Root.LoadLayout(\"clientes\")"; +_root.LoadLayout("clientes",ba); + //BA.debugLineNum = 45;BA.debugLine="entro =\"2\""; +_entro = "2"; + //BA.debugLineNum = 50;BA.debugLine="ruta = File.DirInternal"; +_ruta = __c.File.getDirInternal(); + //BA.debugLineNum = 57;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; +if (__c.File.Exists(_ruta,"kmt.db")==__c.False) { + //BA.debugLineNum = 58;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; +__c.File.Copy(__c.File.getDirAssets(),"kmt.db",_ruta,"kmt.db"); }; -RDebugUtils.currentLine=8388628; - //BA.debugLineNum = 8388628;BA.debugLine="qr.initialize"; -__ref._qr /*com.inforpires.baQRCode.baQRCode*/ .initialize(); -RDebugUtils.currentLine=8388629; - //BA.debugLineNum = 8388629;BA.debugLine="End Sub"; + //BA.debugLineNum = 60;BA.debugLine="qr.initialize"; +_qr.initialize(); + //BA.debugLineNum = 61;BA.debugLine="End Sub"; return ""; } -public String _busca_textchanged(keymon.lat.medicomed.c_clientes __ref,String _old,String _new) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_clientes"; -if (Debug.shouldDelegate(ba, "busca_textchanged", false)) - {return ((String) Debug.delegate(ba, "busca_textchanged", new Object[] {_old,_new}));} +public String _busca_textchanged(String _old,String _new) throws Exception{ anywheresoftware.b4a.objects.LabelWrapper _label1 = null; anywheresoftware.b4a.objects.LabelWrapper _label2 = null; int _i = 0; -RDebugUtils.currentLine=8650752; - //BA.debugLineNum = 8650752;BA.debugLine="Sub BUSCA_TextChanged (Old As String, New As Strin"; -RDebugUtils.currentLine=8650754; - //BA.debugLineNum = 8650754;BA.debugLine="If Old <> \"\" And New <> \"\" Then"; + //BA.debugLineNum = 165;BA.debugLine="Sub BUSCA_TextChanged (Old As String, New As Strin"; + //BA.debugLineNum = 167;BA.debugLine="If Old <> \"\" And New <> \"\" Then"; if ((_old).equals("") == false && (_new).equals("") == false) { -RDebugUtils.currentLine=8650756; - //BA.debugLineNum = 8650756;BA.debugLine="q_buscar = \"%\" & busca.Text & \"%\""; -__ref._q_buscar /*String*/ = "%"+__ref._busca /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()+"%"; -RDebugUtils.currentLine=8650757; - //BA.debugLineNum = 8650757;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery2(\"select CA"; -__ref._c2 /*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*/ .ExecQuery2("select CAT_CL_NOMBRE, CAT_CL_CALLE, CAT_CL_CODIGO,CAT_CL_SECUENCIA, CAT_CL_CALLE1 from kmt_info where (CAT_CL_NOMBRE like ? OR CAT_CL_CODIGO LIKE ? OR CAT_CL_CALLE1 LIKE ?)and gestion = 0 order by CAT_CL_NOMBRE ",new String[]{__ref._q_buscar /*String*/ ,__ref._q_buscar /*String*/ ,__ref._q_buscar /*String*/ }))); -RDebugUtils.currentLine=8650758; - //BA.debugLineNum = 8650758;BA.debugLine="ListView1.Clear"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear(); -RDebugUtils.currentLine=8650759; - //BA.debugLineNum = 8650759;BA.debugLine="lfila.text = \"Nombre y Calle\""; -__ref._lfila /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("Nombre y Calle")); -RDebugUtils.currentLine=8650761; - //BA.debugLineNum = 8650761;BA.debugLine="If c2.RowCount > 0 Then"; -if (__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=8650762; - //BA.debugLineNum = 8650762;BA.debugLine="Dim label1 As Label"; + //BA.debugLineNum = 169;BA.debugLine="q_buscar = \"%\" & busca.Text & \"%\""; +_q_buscar = "%"+_busca.getText()+"%"; + //BA.debugLineNum = 170;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery2(\"select CA"; +_c2 = (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*/ .ExecQuery2("select CAT_CL_NOMBRE, CAT_CL_CALLE, CAT_CL_CODIGO,CAT_CL_SECUENCIA, CAT_CL_CALLE1 from kmt_info where (CAT_CL_NOMBRE like ? OR CAT_CL_CODIGO LIKE ? OR CAT_CL_CALLE1 LIKE ?)and gestion = 0 order by CAT_CL_NOMBRE ",new String[]{_q_buscar,_q_buscar,_q_buscar}))); + //BA.debugLineNum = 171;BA.debugLine="ListView1.Clear"; +_listview1.Clear(); + //BA.debugLineNum = 172;BA.debugLine="lfila.text = \"Nombre y Calle\""; +_lfila.setText(BA.ObjectToCharSequence("Nombre y Calle")); + //BA.debugLineNum = 174;BA.debugLine="If c2.RowCount > 0 Then"; +if (_c2.getRowCount()>0) { + //BA.debugLineNum = 175;BA.debugLine="Dim label1 As Label"; _label1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=8650763; - //BA.debugLineNum = 8650763;BA.debugLine="label1 = ListView1.TwoLinesLayout.Label"; -_label1 = __ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().Label; -RDebugUtils.currentLine=8650764; - //BA.debugLineNum = 8650764;BA.debugLine="label1.TextSize = 14"; + //BA.debugLineNum = 176;BA.debugLine="label1 = ListView1.TwoLinesLayout.Label"; +_label1 = _listview1.getTwoLinesLayout().Label; + //BA.debugLineNum = 177;BA.debugLine="label1.TextSize = 14"; _label1.setTextSize((float) (14)); -RDebugUtils.currentLine=8650765; - //BA.debugLineNum = 8650765;BA.debugLine="label1.TextColor = Colors.DarkGray"; + //BA.debugLineNum = 178;BA.debugLine="label1.TextColor = Colors.DarkGray"; _label1.setTextColor(__c.Colors.DarkGray); -RDebugUtils.currentLine=8650766; - //BA.debugLineNum = 8650766;BA.debugLine="Dim label2 As Label"; + //BA.debugLineNum = 179;BA.debugLine="Dim label2 As Label"; _label2 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=8650767; - //BA.debugLineNum = 8650767;BA.debugLine="label2 = ListView1.TwoLinesLayout.SecondLabel"; -_label2 = __ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().SecondLabel; -RDebugUtils.currentLine=8650768; - //BA.debugLineNum = 8650768;BA.debugLine="label2.TextSize = 14"; + //BA.debugLineNum = 180;BA.debugLine="label2 = ListView1.TwoLinesLayout.SecondLabel"; +_label2 = _listview1.getTwoLinesLayout().SecondLabel; + //BA.debugLineNum = 181;BA.debugLine="label2.TextSize = 14"; _label2.setTextSize((float) (14)); -RDebugUtils.currentLine=8650769; - //BA.debugLineNum = 8650769;BA.debugLine="label2.Height = 50dip"; + //BA.debugLineNum = 182;BA.debugLine="label2.Height = 50dip"; _label2.setHeight(__c.DipToCurrent((int) (50))); -RDebugUtils.currentLine=8650770; - //BA.debugLineNum = 8650770;BA.debugLine="label2.Width = ListView1.Width * 0.99"; -_label2.setWidth((int) (__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getWidth()*0.99)); -RDebugUtils.currentLine=8650771; - //BA.debugLineNum = 8650771;BA.debugLine="label2.TextColor = Colors.DarkGray"; + //BA.debugLineNum = 183;BA.debugLine="label2.Width = ListView1.Width * 0.99"; +_label2.setWidth((int) (_listview1.getWidth()*0.99)); + //BA.debugLineNum = 184;BA.debugLine="label2.TextColor = Colors.DarkGray"; _label2.setTextColor(__c.Colors.DarkGray); -RDebugUtils.currentLine=8650773; - //BA.debugLineNum = 8650773;BA.debugLine="For i=0 To c2.RowCount -1"; + //BA.debugLineNum = 186;BA.debugLine="For i=0 To c2.RowCount -1"; { final int step17 = 1; -final int limit17 = (int) (__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit17 = (int) (_c2.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit17 ;_i = _i + step17 ) { -RDebugUtils.currentLine=8650774; - //BA.debugLineNum = 8650774;BA.debugLine="c2.Position=i"; -__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=8650777; - //BA.debugLineNum = 8650777;BA.debugLine="ListView1.AddTwoLines(c2.GetString(\"CAT_CL_COD"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddTwoLines(BA.ObjectToCharSequence(__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_CODIGO")+" - "+__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_SECUENCIA")),BA.ObjectToCharSequence(__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_NOMBRE")+__c.CRLF+__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_CALLE1"))); + //BA.debugLineNum = 187;BA.debugLine="c2.Position=i"; +_c2.setPosition(_i); + //BA.debugLineNum = 190;BA.debugLine="ListView1.AddTwoLines(c2.GetString(\"CAT_CL_COD"; +_listview1.AddTwoLines(BA.ObjectToCharSequence(_c2.GetString("CAT_CL_CODIGO")+" - "+_c2.GetString("CAT_CL_SECUENCIA")),BA.ObjectToCharSequence(_c2.GetString("CAT_CL_NOMBRE")+__c.CRLF+_c2.GetString("CAT_CL_CALLE1"))); } }; }; -RDebugUtils.currentLine=8650780; - //BA.debugLineNum = 8650780;BA.debugLine="entro = \"4\""; -__ref._entro /*String*/ = "4"; -RDebugUtils.currentLine=8650781; - //BA.debugLineNum = 8650781;BA.debugLine="c2.Close"; -__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 193;BA.debugLine="entro = \"4\""; +_entro = "4"; + //BA.debugLineNum = 194;BA.debugLine="c2.Close"; +_c2.Close(); }; -RDebugUtils.currentLine=8650783; - //BA.debugLineNum = 8650783;BA.debugLine="End Sub"; + //BA.debugLineNum = 196;BA.debugLine="End Sub"; return ""; } -public String _calc_ean_checksum(keymon.lat.medicomed.c_clientes __ref,String _number) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_clientes"; -if (Debug.shouldDelegate(ba, "calc_ean_checksum", false)) - {return ((String) Debug.delegate(ba, "calc_ean_checksum", new Object[] {_number}));} +public String _calc_ean_checksum(String _number) throws Exception{ int _i = 0; char _co = '\0'; int _soma = 0; int _n = 0; float _digit = 0f; -RDebugUtils.currentLine=8912896; - //BA.debugLineNum = 8912896;BA.debugLine="Sub calc_ean_checksum(number As String) As String"; -RDebugUtils.currentLine=8912897; - //BA.debugLineNum = 8912897;BA.debugLine="Dim i As Int"; + //BA.debugLineNum = 226;BA.debugLine="Sub calc_ean_checksum(number As String) As String"; + //BA.debugLineNum = 227;BA.debugLine="Dim i As Int"; _i = 0; -RDebugUtils.currentLine=8912898; - //BA.debugLineNum = 8912898;BA.debugLine="Dim cO As Char"; + //BA.debugLineNum = 228;BA.debugLine="Dim cO As Char"; _co = '\0'; -RDebugUtils.currentLine=8912899; - //BA.debugLineNum = 8912899;BA.debugLine="Dim soma As Int"; + //BA.debugLineNum = 229;BA.debugLine="Dim soma As Int"; _soma = 0; -RDebugUtils.currentLine=8912900; - //BA.debugLineNum = 8912900;BA.debugLine="Dim n As Int"; + //BA.debugLineNum = 230;BA.debugLine="Dim n As Int"; _n = 0; -RDebugUtils.currentLine=8912901; - //BA.debugLineNum = 8912901;BA.debugLine="Dim digit As Float"; + //BA.debugLineNum = 231;BA.debugLine="Dim digit As Float"; _digit = 0f; -RDebugUtils.currentLine=8912902; - //BA.debugLineNum = 8912902;BA.debugLine="soma = 0"; + //BA.debugLineNum = 232;BA.debugLine="soma = 0"; _soma = (int) (0); -RDebugUtils.currentLine=8912903; - //BA.debugLineNum = 8912903;BA.debugLine="For i=0 To number.Length - 1"; + //BA.debugLineNum = 233;BA.debugLine="For i=0 To number.Length - 1"; { final int step7 = 1; final int limit7 = (int) (_number.length()-1); _i = (int) (0) ; for (;_i <= limit7 ;_i = _i + step7 ) { -RDebugUtils.currentLine=8912904; - //BA.debugLineNum = 8912904;BA.debugLine="digit = number.SubString2(i,i+1)"; + //BA.debugLineNum = 234;BA.debugLine="digit = number.SubString2(i,i+1)"; _digit = (float)(Double.parseDouble(_number.substring(_i,(int) (_i+1)))); -RDebugUtils.currentLine=8912905; - //BA.debugLineNum = 8912905;BA.debugLine="n= digit * ((i Mod 2) * 2 + 1)"; + //BA.debugLineNum = 235;BA.debugLine="n= digit * ((i Mod 2) * 2 + 1)"; _n = (int) (_digit*((_i%2)*2+1)); -RDebugUtils.currentLine=8912906; - //BA.debugLineNum = 8912906;BA.debugLine="soma=soma+n"; + //BA.debugLineNum = 236;BA.debugLine="soma=soma+n"; _soma = (int) (_soma+_n); } }; -RDebugUtils.currentLine=8912908; - //BA.debugLineNum = 8912908;BA.debugLine="Return number & ( ( 10 - ( soma Mod 10 )) Mod 10"; + //BA.debugLineNum = 238;BA.debugLine="Return number & ( ( 10 - ( soma Mod 10 )) Mod 10"; if (true) return _number+BA.NumberToString(((10-(_soma%10))%10)); -RDebugUtils.currentLine=8912909; - //BA.debugLineNum = 8912909;BA.debugLine="End Sub"; + //BA.debugLineNum = 239;BA.debugLine="End Sub"; return ""; } -public String _class_globals(keymon.lat.medicomed.c_clientes __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_clientes"; -RDebugUtils.currentLine=8257536; - //BA.debugLineNum = 8257536;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=8257537; - //BA.debugLineNum = 8257537;BA.debugLine="Private Root As B4XView 'ignore"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 6;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 7;BA.debugLine="Private Root As B4XView 'ignore"; _root = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=8257538; - //BA.debugLineNum = 8257538;BA.debugLine="Private xui As XUI 'ignore"; + //BA.debugLineNum = 8;BA.debugLine="Private xui As XUI 'ignore"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=8257541; - //BA.debugLineNum = 8257541;BA.debugLine="Dim c As Cursor"; + //BA.debugLineNum = 11;BA.debugLine="Dim c As Cursor"; _c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=8257542; - //BA.debugLineNum = 8257542;BA.debugLine="Dim c2 As Cursor"; + //BA.debugLineNum = 12;BA.debugLine="Dim c2 As Cursor"; _c2 = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=8257543; - //BA.debugLineNum = 8257543;BA.debugLine="Dim s As Cursor"; + //BA.debugLineNum = 13;BA.debugLine="Dim s As Cursor"; _s = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=8257544; - //BA.debugLineNum = 8257544;BA.debugLine="Dim ListView1 As ListView"; + //BA.debugLineNum = 14;BA.debugLine="Dim ListView1 As ListView"; _listview1 = new anywheresoftware.b4a.objects.ListViewWrapper(); -RDebugUtils.currentLine=8257545; - //BA.debugLineNum = 8257545;BA.debugLine="Dim entro As String"; + //BA.debugLineNum = 15;BA.debugLine="Dim entro As String"; _entro = ""; -RDebugUtils.currentLine=8257546; - //BA.debugLineNum = 8257546;BA.debugLine="Dim gest As Button"; + //BA.debugLineNum = 16;BA.debugLine="Dim gest As Button"; _gest = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=8257547; - //BA.debugLineNum = 8257547;BA.debugLine="Dim lfila As Label"; + //BA.debugLineNum = 17;BA.debugLine="Dim lfila As Label"; _lfila = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=8257548; - //BA.debugLineNum = 8257548;BA.debugLine="Dim busca As EditText"; + //BA.debugLineNum = 18;BA.debugLine="Dim busca As EditText"; _busca = new anywheresoftware.b4a.objects.EditTextWrapper(); -RDebugUtils.currentLine=8257549; - //BA.debugLineNum = 8257549;BA.debugLine="Dim colonia As String"; + //BA.debugLineNum = 19;BA.debugLine="Dim colonia As String"; _colonia = ""; -RDebugUtils.currentLine=8257550; - //BA.debugLineNum = 8257550;BA.debugLine="Private b_qr As Button"; + //BA.debugLineNum = 20;BA.debugLine="Private b_qr As Button"; _b_qr = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=8257551; - //BA.debugLineNum = 8257551;BA.debugLine="Private qr As QRCode"; + //BA.debugLineNum = 21;BA.debugLine="Private qr As QRCode"; _qr = new com.inforpires.baQRCode.baQRCode(); -RDebugUtils.currentLine=8257553; - //BA.debugLineNum = 8257553;BA.debugLine="Dim CODIGO As String"; + //BA.debugLineNum = 23;BA.debugLine="Dim CODIGO As String"; _codigo = ""; -RDebugUtils.currentLine=8257554; - //BA.debugLineNum = 8257554;BA.debugLine="Dim STIME As String"; + //BA.debugLineNum = 24;BA.debugLine="Dim STIME As String"; _stime = ""; -RDebugUtils.currentLine=8257557; - //BA.debugLineNum = 8257557;BA.debugLine="Dim ruta As String"; + //BA.debugLineNum = 27;BA.debugLine="Dim ruta As String"; _ruta = ""; -RDebugUtils.currentLine=8257558; - //BA.debugLineNum = 8257558;BA.debugLine="Dim q_buscar As String"; + //BA.debugLineNum = 28;BA.debugLine="Dim q_buscar As String"; _q_buscar = ""; -RDebugUtils.currentLine=8257559; - //BA.debugLineNum = 8257559;BA.debugLine="Private p_clientes As Panel"; + //BA.debugLineNum = 29;BA.debugLine="Private p_clientes As Panel"; _p_clientes = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=8257560; - //BA.debugLineNum = 8257560;BA.debugLine="Dim la_cuenta As Label"; + //BA.debugLineNum = 30;BA.debugLine="Dim la_cuenta As Label"; _la_cuenta = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=8257562; - //BA.debugLineNum = 8257562;BA.debugLine="End Sub"; + //BA.debugLineNum = 32;BA.debugLine="End Sub"; return ""; } -public String _listview1_itemclick(keymon.lat.medicomed.c_clientes __ref,int _position,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_clientes"; -if (Debug.shouldDelegate(ba, "listview1_itemclick", false)) - {return ((String) Debug.delegate(ba, "listview1_itemclick", new Object[] {_position,_value}));} +public Object _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 35;BA.debugLine="Public Sub Initialize As Object"; + //BA.debugLineNum = 36;BA.debugLine="Return Me"; +if (true) return this; + //BA.debugLineNum = 37;BA.debugLine="End Sub"; +return null; +} +public String _listview1_itemclick(int _position,Object _value) throws Exception{ String[] _value2 = null; int _i = 0; -RDebugUtils.currentLine=8519680; - //BA.debugLineNum = 8519680;BA.debugLine="Sub ListView1_ItemClick (Position As Int, Value As"; -RDebugUtils.currentLine=8519681; - //BA.debugLineNum = 8519681;BA.debugLine="Private value2() As String = Regex.Split(\" - \","; + //BA.debugLineNum = 101;BA.debugLine="Sub ListView1_ItemClick (Position As Int, Value As"; + //BA.debugLineNum = 102;BA.debugLine="Private value2() As String = Regex.Split(\" - \","; _value2 = __c.Regex.Split(" - ",BA.ObjectToString(_value)); -RDebugUtils.currentLine=8519683; - //BA.debugLineNum = 8519683;BA.debugLine="If colonia = 0 Then"; -if ((__ref._colonia /*String*/ ).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=8519684; - //BA.debugLineNum = 8519684;BA.debugLine="colonia = value2(0)"; -__ref._colonia /*String*/ = _value2[(int) (0)]; + //BA.debugLineNum = 104;BA.debugLine="If colonia = 0 Then"; +if ((_colonia).equals(BA.NumberToString(0))) { + //BA.debugLineNum = 105;BA.debugLine="colonia = value2(0)"; +_colonia = _value2[(int) (0)]; }; -RDebugUtils.currentLine=8519687; - //BA.debugLineNum = 8519687;BA.debugLine="Log(\"-------------------------------\" & value2(0)"; -__c.LogImpl("38519687","-------------------------------"+_value2[(int) (0)],0); -RDebugUtils.currentLine=8519689; - //BA.debugLineNum = 8519689;BA.debugLine="If entro = \"2\" Then"; -if ((__ref._entro /*String*/ ).equals("2")) { -RDebugUtils.currentLine=8519690; - //BA.debugLineNum = 8519690;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery2(\"select CAT"; -__ref._c2 /*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*/ .ExecQuery2("select CAT_CL_CALLE, CAT_CL_COLONIA, count(*) as cuantos from kmt_info where gestion = 0 and CAT_CL_COLONIA = ? GROUP BY CAT_CL_CALLE, CAT_CL_COLONIA order by CAT_CL_CALLE ",new String[]{_value2[(int) (0)]}))); -RDebugUtils.currentLine=8519691; - //BA.debugLineNum = 8519691;BA.debugLine="ListView1.Clear"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear(); -RDebugUtils.currentLine=8519692; - //BA.debugLineNum = 8519692;BA.debugLine="lfila.text = \"Calle\""; -__ref._lfila /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("Calle")); -RDebugUtils.currentLine=8519693; - //BA.debugLineNum = 8519693;BA.debugLine="If c2.RowCount>0 Then"; -if (__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=8519694; - //BA.debugLineNum = 8519694;BA.debugLine="For i=0 To c2.RowCount -1"; + //BA.debugLineNum = 108;BA.debugLine="Log(\"-------------------------------\" & value2(0)"; +__c.LogImpl("341811975","-------------------------------"+_value2[(int) (0)],0); + //BA.debugLineNum = 110;BA.debugLine="If entro = \"2\" Then"; +if ((_entro).equals("2")) { + //BA.debugLineNum = 111;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery2(\"select CAT"; +_c2 = (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*/ .ExecQuery2("select CAT_CL_CALLE, CAT_CL_COLONIA, count(*) as cuantos from kmt_info where gestion = 0 and CAT_CL_COLONIA = ? GROUP BY CAT_CL_CALLE, CAT_CL_COLONIA order by CAT_CL_CALLE ",new String[]{_value2[(int) (0)]}))); + //BA.debugLineNum = 112;BA.debugLine="ListView1.Clear"; +_listview1.Clear(); + //BA.debugLineNum = 113;BA.debugLine="lfila.text = \"Calle\""; +_lfila.setText(BA.ObjectToCharSequence("Calle")); + //BA.debugLineNum = 114;BA.debugLine="If c2.RowCount>0 Then"; +if (_c2.getRowCount()>0) { + //BA.debugLineNum = 115;BA.debugLine="For i=0 To c2.RowCount -1"; { final int step11 = 1; -final int limit11 = (int) (__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit11 = (int) (_c2.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit11 ;_i = _i + step11 ) { -RDebugUtils.currentLine=8519695; - //BA.debugLineNum = 8519695;BA.debugLine="c2.Position=i"; -__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=8519696; - //BA.debugLineNum = 8519696;BA.debugLine="ListView1.AddTwoLines(c2.GetString(\"CAT_CL_CAL"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddTwoLines(BA.ObjectToCharSequence(__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_CALLE")),BA.ObjectToCharSequence(__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("cuantos"))); + //BA.debugLineNum = 116;BA.debugLine="c2.Position=i"; +_c2.setPosition(_i); + //BA.debugLineNum = 117;BA.debugLine="ListView1.AddTwoLines(c2.GetString(\"CAT_CL_CAL"; +_listview1.AddTwoLines(BA.ObjectToCharSequence(_c2.GetString("CAT_CL_CALLE")),BA.ObjectToCharSequence(_c2.GetString("cuantos"))); } }; }; -RDebugUtils.currentLine=8519699; - //BA.debugLineNum = 8519699;BA.debugLine="entro = \"3\""; -__ref._entro /*String*/ = "3"; - }else -{RDebugUtils.currentLine=8519700; - //BA.debugLineNum = 8519700;BA.debugLine="Else If entro = \"3\" Then"; -if ((__ref._entro /*String*/ ).equals("3")) { -RDebugUtils.currentLine=8519701; - //BA.debugLineNum = 8519701;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery2(\"select CA"; -__ref._c2 /*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*/ .ExecQuery2("select CAT_CL_NOMBRE, CAT_CL_CALLE, CAT_CL_CODIGO from kmt_info where gestion = 0 and CAT_CL_CALLE = ? AND CAT_CL_COLONIA = ? order by CAT_CL_NOMBRE ",new String[]{_value2[(int) (0)],__ref._colonia /*String*/ }))); -RDebugUtils.currentLine=8519702; - //BA.debugLineNum = 8519702;BA.debugLine="ListView1.Clear"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear(); -RDebugUtils.currentLine=8519703; - //BA.debugLineNum = 8519703;BA.debugLine="lfila.text = \"Nombre\""; -__ref._lfila /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("Nombre")); -RDebugUtils.currentLine=8519704; - //BA.debugLineNum = 8519704;BA.debugLine="If c2.RowCount>0 Then"; -if (__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=8519705; - //BA.debugLineNum = 8519705;BA.debugLine="For i=0 To c2.RowCount -1"; + //BA.debugLineNum = 120;BA.debugLine="entro = \"3\""; +_entro = "3"; + }else if((_entro).equals("3")) { + //BA.debugLineNum = 122;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery2(\"select CA"; +_c2 = (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*/ .ExecQuery2("select CAT_CL_NOMBRE, CAT_CL_CALLE, CAT_CL_CODIGO from kmt_info where gestion = 0 and CAT_CL_CALLE = ? AND CAT_CL_COLONIA = ? order by CAT_CL_NOMBRE ",new String[]{_value2[(int) (0)],_colonia}))); + //BA.debugLineNum = 123;BA.debugLine="ListView1.Clear"; +_listview1.Clear(); + //BA.debugLineNum = 124;BA.debugLine="lfila.text = \"Nombre\""; +_lfila.setText(BA.ObjectToCharSequence("Nombre")); + //BA.debugLineNum = 125;BA.debugLine="If c2.RowCount>0 Then"; +if (_c2.getRowCount()>0) { + //BA.debugLineNum = 126;BA.debugLine="For i=0 To c2.RowCount -1"; { final int step22 = 1; -final int limit22 = (int) (__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit22 = (int) (_c2.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit22 ;_i = _i + step22 ) { -RDebugUtils.currentLine=8519706; - //BA.debugLineNum = 8519706;BA.debugLine="c2.Position=i"; -__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=8519707; - //BA.debugLineNum = 8519707;BA.debugLine="ListView1.AddTwoLines(c2.GetString(\"CAT_CL_COD"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddTwoLines(BA.ObjectToCharSequence(__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_CODIGO")),BA.ObjectToCharSequence(__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_NOMBRE"))); + //BA.debugLineNum = 127;BA.debugLine="c2.Position=i"; +_c2.setPosition(_i); + //BA.debugLineNum = 128;BA.debugLine="ListView1.AddTwoLines(c2.GetString(\"CAT_CL_COD"; +_listview1.AddTwoLines(BA.ObjectToCharSequence(_c2.GetString("CAT_CL_CODIGO")),BA.ObjectToCharSequence(_c2.GetString("CAT_CL_NOMBRE"))); } }; }; -RDebugUtils.currentLine=8519710; - //BA.debugLineNum = 8519710;BA.debugLine="entro = \"4\""; -__ref._entro /*String*/ = "4"; - }else -{RDebugUtils.currentLine=8519711; - //BA.debugLineNum = 8519711;BA.debugLine="Else If entro = \"4\" Then"; -if ((__ref._entro /*String*/ ).equals("4")) { -RDebugUtils.currentLine=8519712; - //BA.debugLineNum = 8519712;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + //BA.debugLineNum = 131;BA.debugLine="entro = \"4\""; +_entro = "4"; + }else if((_entro).equals("4")) { + //BA.debugLineNum = 133;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from CUENTAA"); -RDebugUtils.currentLine=8519713; - //BA.debugLineNum = 8519713;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; + //BA.debugLineNum = 134;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; _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)(_value2[(int) (0)])})); -RDebugUtils.currentLine=8519714; - //BA.debugLineNum = 8519714;BA.debugLine="DateTime.TimeFormat = \"HHmmss\""; + //BA.debugLineNum = 135;BA.debugLine="DateTime.TimeFormat = \"HHmmss\""; __c.DateTime.setTimeFormat("HHmmss"); -RDebugUtils.currentLine=8519715; - //BA.debugLineNum = 8519715;BA.debugLine="STIME=DateTime.Time(DateTime.Now)"; -__ref._stime /*String*/ = __c.DateTime.Time(__c.DateTime.getNow()); -RDebugUtils.currentLine=8519717; - //BA.debugLineNum = 8519717;BA.debugLine="s=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT COUN"; -__ref._s /*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*/ .ExecQuery2("SELECT COUNT(*) AS CUANTOS FROM HIST_STAY_STORE WHERE HSS_IN = ? AND HSS_CODIGO In (select cuenta from cuentaa)",new String[]{"0"}))); -RDebugUtils.currentLine=8519718; - //BA.debugLineNum = 8519718;BA.debugLine="s.Position = 0"; -__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=8519719; - //BA.debugLineNum = 8519719;BA.debugLine="If s.GetString(\"CUANTOS\") = 1 Then"; -if ((__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")).equals(BA.NumberToString(1))) { -RDebugUtils.currentLine=8519720; - //BA.debugLineNum = 8519720;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HI"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE HIST_STAY_STORE set HSS_IN = ? where HSS_IN = 0 AND HSS_CODIGO In (select cuenta from cuentaa)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._stime /*String*/ )})); + //BA.debugLineNum = 136;BA.debugLine="STIME=DateTime.Time(DateTime.Now)"; +_stime = __c.DateTime.Time(__c.DateTime.getNow()); + //BA.debugLineNum = 138;BA.debugLine="s=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT COUN"; +_s = (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*/ .ExecQuery2("SELECT COUNT(*) AS CUANTOS FROM HIST_STAY_STORE WHERE HSS_IN = ? AND HSS_CODIGO In (select cuenta from cuentaa)",new String[]{"0"}))); + //BA.debugLineNum = 139;BA.debugLine="s.Position = 0"; +_s.setPosition((int) (0)); + //BA.debugLineNum = 140;BA.debugLine="If s.GetString(\"CUANTOS\") = 1 Then"; +if ((_s.GetString("CUANTOS")).equals(BA.NumberToString(1))) { + //BA.debugLineNum = 141;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HI"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE HIST_STAY_STORE set HSS_IN = ? where HSS_IN = 0 AND HSS_CODIGO In (select cuenta from cuentaa)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_stime)})); }else { -RDebugUtils.currentLine=8519722; - //BA.debugLineNum = 8519722;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT IN"; + //BA.debugLineNum = 143;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT IN"; _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)(_value2[(int) (0)])})); -RDebugUtils.currentLine=8519723; - //BA.debugLineNum = 8519723;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HI"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE HIST_STAY_STORE set HSS_IN = ? where HSS_IN = 0 AND HSS_CODIGO In (select cuenta from cuentaa)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._stime /*String*/ )})); + //BA.debugLineNum = 144;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HI"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE HIST_STAY_STORE set HSS_IN = ? where HSS_IN = 0 AND HSS_CODIGO In (select cuenta from cuentaa)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_stime)})); }; -RDebugUtils.currentLine=8519725; - //BA.debugLineNum = 8519725;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HIS"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE HIST_STAY_OUT set HSO_INI = ? where HSO_INI = 0 ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._stime /*String*/ )})); -RDebugUtils.currentLine=8519726; - //BA.debugLineNum = 8519726;BA.debugLine="DateTime.TimeFormat = \"HH:mm:ss\""; + //BA.debugLineNum = 146;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HIS"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE HIST_STAY_OUT set HSO_INI = ? where HSO_INI = 0 ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_stime)})); + //BA.debugLineNum = 147;BA.debugLine="DateTime.TimeFormat = \"HH:mm:ss\""; __c.DateTime.setTimeFormat("HH:mm:ss"); -RDebugUtils.currentLine=8519728; - //BA.debugLineNum = 8519728;BA.debugLine="Subs.guardaClienteHoraInicio(value2(0))"; + //BA.debugLineNum = 149;BA.debugLine="Subs.guardaClienteHoraInicio(value2(0))"; _subs._guardaclientehorainicio /*String*/ (ba,_value2[(int) (0)]); -RDebugUtils.currentLine=8519730; - //BA.debugLineNum = 8519730;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; + //BA.debugLineNum = 151;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; _b4xpages._showpage /*String*/ (ba,"Cliente"); - }}} -; -RDebugUtils.currentLine=8519732; - //BA.debugLineNum = 8519732;BA.debugLine="End Sub"; + }; + //BA.debugLineNum = 153;BA.debugLine="End Sub"; return ""; } -public String _mods(keymon.lat.medicomed.c_clientes __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_clientes"; -if (Debug.shouldDelegate(ba, "mods", false)) - {return ((String) Debug.delegate(ba, "mods", null));} -RDebugUtils.currentLine=8192000; - //BA.debugLineNum = 8192000;BA.debugLine="Sub Mods"; -RDebugUtils.currentLine=8192003; - //BA.debugLineNum = 8192003;BA.debugLine="End Sub"; +public String _mods() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Mods"; + //BA.debugLineNum = 4;BA.debugLine="End Sub"; return ""; } -public String _p_clientes_click(keymon.lat.medicomed.c_clientes __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_clientes"; -if (Debug.shouldDelegate(ba, "p_clientes_click", false)) - {return ((String) Debug.delegate(ba, "p_clientes_click", null));} -RDebugUtils.currentLine=8978432; - //BA.debugLineNum = 8978432;BA.debugLine="Private Sub p_clientes_Click"; -RDebugUtils.currentLine=8978434; - //BA.debugLineNum = 8978434;BA.debugLine="End Sub"; +public String _p_clientes_click() throws Exception{ + //BA.debugLineNum = 243;BA.debugLine="Private Sub p_clientes_Click"; + //BA.debugLineNum = 245;BA.debugLine="End Sub"; return ""; } -public String _sc_noscan(keymon.lat.medicomed.c_clientes __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_clientes"; -if (Debug.shouldDelegate(ba, "sc_noscan", false)) - {return ((String) Debug.delegate(ba, "sc_noscan", null));} -RDebugUtils.currentLine=8847360; - //BA.debugLineNum = 8847360;BA.debugLine="Sub sc_noScan"; -RDebugUtils.currentLine=8847361; - //BA.debugLineNum = 8847361;BA.debugLine="Log(\"nothing returned from the scan !!!!!\")"; -__c.LogImpl("38847361","nothing returned from the scan !!!!!",0); -RDebugUtils.currentLine=8847362; - //BA.debugLineNum = 8847362;BA.debugLine="End Sub"; +public String _sc_noscan() throws Exception{ + //BA.debugLineNum = 222;BA.debugLine="Sub sc_noScan"; + //BA.debugLineNum = 223;BA.debugLine="Log(\"nothing returned from the scan !!!!!\")"; +__c.LogImpl("342139649","nothing returned from the scan !!!!!",0); + //BA.debugLineNum = 224;BA.debugLine="End Sub"; return ""; } -public String _sc_result(keymon.lat.medicomed.c_clientes __ref,String _atype,String _values) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_clientes"; -if (Debug.shouldDelegate(ba, "sc_result", false)) - {return ((String) Debug.delegate(ba, "sc_result", new Object[] {_atype,_values}));} -RDebugUtils.currentLine=8781824; - //BA.debugLineNum = 8781824;BA.debugLine="Sub sc_result(atype As String,Values As String)"; -RDebugUtils.currentLine=8781825; - //BA.debugLineNum = 8781825;BA.debugLine="CODIGO = Values"; -__ref._codigo /*String*/ = _values; -RDebugUtils.currentLine=8781826; - //BA.debugLineNum = 8781826;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery2(\"select CO"; -__ref._c2 /*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*/ .ExecQuery2("select COUNT(*) AS ENCONTRADO from kmt_info where CAT_CL_NUM_SERIEFISICO = ? order by CAT_CL_NOMBRE ",new String[]{__ref._codigo /*String*/ }))); -RDebugUtils.currentLine=8781827; - //BA.debugLineNum = 8781827;BA.debugLine="c2.Position =0"; -__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=8781828; - //BA.debugLineNum = 8781828;BA.debugLine="If c2.GetString(\"ENCONTRADO\") > 0 Then"; -if ((double)(Double.parseDouble(__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("ENCONTRADO")))>0) { -RDebugUtils.currentLine=8781829; - //BA.debugLineNum = 8781829;BA.debugLine="s=B4XPages.MainPage.skmt.ExecQuery2(\"select CA"; -__ref._s /*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*/ .ExecQuery2("select CAT_CL_CODIGO from kmt_info where CAT_CL_NUM_SERIEFISICO = ? order by CAT_CL_NOMBRE ",new String[]{__ref._codigo /*String*/ }))); -RDebugUtils.currentLine=8781830; - //BA.debugLineNum = 8781830;BA.debugLine="s.Position =0"; -__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=8781831; - //BA.debugLineNum = 8781831;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; +public String _sc_result(String _atype,String _values) throws Exception{ + //BA.debugLineNum = 205;BA.debugLine="Sub sc_result(atype As String,Values As String)"; + //BA.debugLineNum = 206;BA.debugLine="CODIGO = Values"; +_codigo = _values; + //BA.debugLineNum = 207;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery2(\"select CO"; +_c2 = (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*/ .ExecQuery2("select COUNT(*) AS ENCONTRADO from kmt_info where CAT_CL_NUM_SERIEFISICO = ? order by CAT_CL_NOMBRE ",new String[]{_codigo}))); + //BA.debugLineNum = 208;BA.debugLine="c2.Position =0"; +_c2.setPosition((int) (0)); + //BA.debugLineNum = 209;BA.debugLine="If c2.GetString(\"ENCONTRADO\") > 0 Then"; +if ((double)(Double.parseDouble(_c2.GetString("ENCONTRADO")))>0) { + //BA.debugLineNum = 210;BA.debugLine="s=B4XPages.MainPage.skmt.ExecQuery2(\"select CA"; +_s = (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*/ .ExecQuery2("select CAT_CL_CODIGO from kmt_info where CAT_CL_NUM_SERIEFISICO = ? order by CAT_CL_NOMBRE ",new String[]{_codigo}))); + //BA.debugLineNum = 211;BA.debugLine="s.Position =0"; +_s.setPosition((int) (0)); + //BA.debugLineNum = 212;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from CUENTAA"); -RDebugUtils.currentLine=8781832; - //BA.debugLineNum = 8781832;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -_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._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_CODIGO"))})); -RDebugUtils.currentLine=8781833; - //BA.debugLineNum = 8781833;BA.debugLine="s.Close"; -__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=8781835; - //BA.debugLineNum = 8781835;BA.debugLine="B4XPages.ShowPage(\"clientes\")"; + //BA.debugLineNum = 213;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; +_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)(_s.GetString("CAT_CL_CODIGO"))})); + //BA.debugLineNum = 214;BA.debugLine="s.Close"; +_s.Close(); + //BA.debugLineNum = 216;BA.debugLine="B4XPages.ShowPage(\"clientes\")"; _b4xpages._showpage /*String*/ (ba,"clientes"); }else { -RDebugUtils.currentLine=8781837; - //BA.debugLineNum = 8781837;BA.debugLine="Msgbox(\"CODIGO \" & CODIGO & \" NO ENCONTRADO\",\"AV"; -__c.Msgbox(BA.ObjectToCharSequence("CODIGO "+__ref._codigo /*String*/ +" NO ENCONTRADO"),BA.ObjectToCharSequence("AVISO"),ba); + //BA.debugLineNum = 218;BA.debugLine="Msgbox(\"CODIGO \" & CODIGO & \" NO ENCONTRADO\",\"AV"; +__c.Msgbox(BA.ObjectToCharSequence("CODIGO "+_codigo+" NO ENCONTRADO"),BA.ObjectToCharSequence("AVISO"),ba); }; -RDebugUtils.currentLine=8781839; - //BA.debugLineNum = 8781839;BA.debugLine="End Sub"; + //BA.debugLineNum = 220;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +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]); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/c_historico.java b/B4A/Objects/src/keymon/lat/medicomed/c_historico.java index 3fc68b9..dc7e885 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/c_historico.java +++ b/B4A/Objects/src/keymon/lat/medicomed/c_historico.java @@ -10,7 +10,7 @@ public class c_historico extends B4AClass.ImplB4AClass implements BA.SubDelegato private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.c_historico"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.c_historico"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class c_historico extends B4AClass.ImplB4AClass implements BA.SubDelegato 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.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; @@ -63,148 +56,92 @@ 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_historico __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="c_historico"; -if (Debug.shouldDelegate(ba, "initialize", false)) - {return ((Object) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=20447232; - //BA.debugLineNum = 20447232;BA.debugLine="Public Sub Initialize As Object"; -RDebugUtils.currentLine=20447233; - //BA.debugLineNum = 20447233;BA.debugLine="Return Me"; -if (true) return this; -RDebugUtils.currentLine=20447234; - //BA.debugLineNum = 20447234;BA.debugLine="End Sub"; -return null; -} -public String _b4xpage_appear(keymon.lat.medicomed.c_historico __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_historico"; -if (Debug.shouldDelegate(ba, "b4xpage_appear", false)) - {return ((String) Debug.delegate(ba, "b4xpage_appear", null));} +public String _b4xpage_appear() throws Exception{ int _i = 0; anywheresoftware.b4a.objects.LabelWrapper _label1 = null; anywheresoftware.b4a.objects.LabelWrapper _label2 = null; -RDebugUtils.currentLine=20578304; - //BA.debugLineNum = 20578304;BA.debugLine="Sub B4XPage_Appear"; -RDebugUtils.currentLine=20578305; - //BA.debugLineNum = 20578305;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then"; + //BA.debugLineNum = 51;BA.debugLine="Sub B4XPage_Appear"; + //BA.debugLineNum = 52;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then"; if (__c.Not(_starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getGPSEnabled())) { -RDebugUtils.currentLine=20578306; - //BA.debugLineNum = 20578306;BA.debugLine="ToastMessageShow(\"Es necesario tener el GPS ence"; + //BA.debugLineNum = 53;BA.debugLine="ToastMessageShow(\"Es necesario tener el GPS ence"; __c.ToastMessageShow(BA.ObjectToCharSequence("Es necesario tener el GPS encendido"),__c.True); -RDebugUtils.currentLine=20578307; - //BA.debugLineNum = 20578307;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent"; + //BA.debugLineNum = 54;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent"; __c.StartActivity(ba,(Object)(_starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getLocationSettingsIntent())); }; -RDebugUtils.currentLine=20578309; - //BA.debugLineNum = 20578309;BA.debugLine="L_CANT.Text =\"\""; -__ref._l_cant /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("")); -RDebugUtils.currentLine=20578310; - //BA.debugLineNum = 20578310;BA.debugLine="L_TOTAL.Text=\"\""; -__ref._l_total /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("")); -RDebugUtils.currentLine=20578311; - //BA.debugLineNum = 20578311;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select count("; -__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 count(*) as EXISTE from HIST_VENTAS WHERE HVD_CLIENTE IN (Select CUENTA from cuentaa)"))); -RDebugUtils.currentLine=20578312; - //BA.debugLineNum = 20578312;BA.debugLine="C.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=20578313; - //BA.debugLineNum = 20578313;BA.debugLine="Existe = C.GetString(\"EXISTE\")"; -__ref._existe /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("EXISTE"); -RDebugUtils.currentLine=20578314; - //BA.debugLineNum = 20578314;BA.debugLine="C.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=20578315; - //BA.debugLineNum = 20578315;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select HVD_CL"; -__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 HVD_CLIENTE,HVD_PRONOMBRE,HVD_CANT,HVD_COSTO_TOT from HIST_VENTAS WHERE HVD_CLIENTE IN (Select CUENTA from cuentaa) order by HVD_PRONOMBRE asc"))); -RDebugUtils.currentLine=20578316; - //BA.debugLineNum = 20578316;BA.debugLine="ListView1.Clear"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear(); -RDebugUtils.currentLine=20578317; - //BA.debugLineNum = 20578317;BA.debugLine="If c.RowCount>0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=20578318; - //BA.debugLineNum = 20578318;BA.debugLine="For i=0 To c.RowCount -1"; + //BA.debugLineNum = 56;BA.debugLine="L_CANT.Text =\"\""; +_l_cant.setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 57;BA.debugLine="L_TOTAL.Text=\"\""; +_l_total.setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 58;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select count("; +_c = (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 count(*) as EXISTE from HIST_VENTAS WHERE HVD_CLIENTE IN (Select CUENTA from cuentaa)"))); + //BA.debugLineNum = 59;BA.debugLine="C.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 60;BA.debugLine="Existe = C.GetString(\"EXISTE\")"; +_existe = _c.GetString("EXISTE"); + //BA.debugLineNum = 61;BA.debugLine="C.Close"; +_c.Close(); + //BA.debugLineNum = 62;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select HVD_CL"; +_c = (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 HVD_CLIENTE,HVD_PRONOMBRE,HVD_CANT,HVD_COSTO_TOT from HIST_VENTAS WHERE HVD_CLIENTE IN (Select CUENTA from cuentaa) order by HVD_PRONOMBRE asc"))); + //BA.debugLineNum = 63;BA.debugLine="ListView1.Clear"; +_listview1.Clear(); + //BA.debugLineNum = 64;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 65;BA.debugLine="For i=0 To c.RowCount -1"; { final int step14 = 1; -final int limit14 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit14 = (int) (_c.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit14 ;_i = _i + step14 ) { -RDebugUtils.currentLine=20578319; - //BA.debugLineNum = 20578319;BA.debugLine="c.Position=i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=20578320; - //BA.debugLineNum = 20578320;BA.debugLine="Dim label1 As Label"; + //BA.debugLineNum = 66;BA.debugLine="c.Position=i"; +_c.setPosition(_i); + //BA.debugLineNum = 67;BA.debugLine="Dim label1 As Label"; _label1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=20578321; - //BA.debugLineNum = 20578321;BA.debugLine="label1 = ListView1.TwoLinesLayout.Label"; -_label1 = __ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().Label; -RDebugUtils.currentLine=20578322; - //BA.debugLineNum = 20578322;BA.debugLine="label1.TextSize = 15"; + //BA.debugLineNum = 68;BA.debugLine="label1 = ListView1.TwoLinesLayout.Label"; +_label1 = _listview1.getTwoLinesLayout().Label; + //BA.debugLineNum = 69;BA.debugLine="label1.TextSize = 15"; _label1.setTextSize((float) (15)); -RDebugUtils.currentLine=20578323; - //BA.debugLineNum = 20578323;BA.debugLine="label1.TextColor = Colors.Black"; + //BA.debugLineNum = 70;BA.debugLine="label1.TextColor = Colors.Black"; _label1.setTextColor(__c.Colors.Black); -RDebugUtils.currentLine=20578324; - //BA.debugLineNum = 20578324;BA.debugLine="Dim label2 As Label"; + //BA.debugLineNum = 71;BA.debugLine="Dim label2 As Label"; _label2 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=20578325; - //BA.debugLineNum = 20578325;BA.debugLine="label2 = ListView1.TwoLinesLayout.SecondLabel"; -_label2 = __ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().SecondLabel; -RDebugUtils.currentLine=20578326; - //BA.debugLineNum = 20578326;BA.debugLine="label2.TextSize = 10"; + //BA.debugLineNum = 72;BA.debugLine="label2 = ListView1.TwoLinesLayout.SecondLabel"; +_label2 = _listview1.getTwoLinesLayout().SecondLabel; + //BA.debugLineNum = 73;BA.debugLine="label2.TextSize = 10"; _label2.setTextSize((float) (10)); -RDebugUtils.currentLine=20578327; - //BA.debugLineNum = 20578327;BA.debugLine="label2.TextColor = Colors.Blue"; + //BA.debugLineNum = 74;BA.debugLine="label2.TextColor = Colors.Blue"; _label2.setTextColor(__c.Colors.Blue); -RDebugUtils.currentLine=20578328; - //BA.debugLineNum = 20578328;BA.debugLine="ListView1.AddTwoLines(c.GetString(\"HVD_PRONOMBR"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddTwoLines(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HVD_PRONOMBRE")),BA.ObjectToCharSequence("Cantidad #"+__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HVD_CANT")+" SubTotal $"+__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HVD_COSTO_TOT"))); + //BA.debugLineNum = 75;BA.debugLine="ListView1.AddTwoLines(c.GetString(\"HVD_PRONOMBR"; +_listview1.AddTwoLines(BA.ObjectToCharSequence(_c.GetString("HVD_PRONOMBRE")),BA.ObjectToCharSequence("Cantidad #"+_c.GetString("HVD_CANT")+" SubTotal $"+_c.GetString("HVD_COSTO_TOT"))); } }; }; -RDebugUtils.currentLine=20578331; - //BA.debugLineNum = 20578331;BA.debugLine="If Existe <> 0 Then"; -if ((__ref._existe /*String*/ ).equals(BA.NumberToString(0)) == false) { -RDebugUtils.currentLine=20578332; - //BA.debugLineNum = 20578332;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select SUM(H"; -__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 SUM(HVD_CANT) AS PC_NOART, SUM(HVD_COSTO_TOT) AS PC_MONTO from HIST_VENTAS where HVD_CLIENTE in (Select CUENTA from cuentaa)"))); -RDebugUtils.currentLine=20578333; - //BA.debugLineNum = 20578333;BA.debugLine="C.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=20578334; - //BA.debugLineNum = 20578334;BA.debugLine="L_CANT.Text = c.GetString(\"PC_NOART\")"; -__ref._l_cant /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_NOART"))); -RDebugUtils.currentLine=20578335; - //BA.debugLineNum = 20578335;BA.debugLine="L_TOTAL.Text = c.GetString(\"PC_MONTO\")"; -__ref._l_total /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_MONTO"))); + //BA.debugLineNum = 78;BA.debugLine="If Existe <> 0 Then"; +if ((_existe).equals(BA.NumberToString(0)) == false) { + //BA.debugLineNum = 79;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select SUM(H"; +_c = (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 SUM(HVD_CANT) AS PC_NOART, SUM(HVD_COSTO_TOT) AS PC_MONTO from HIST_VENTAS where HVD_CLIENTE in (Select CUENTA from cuentaa)"))); + //BA.debugLineNum = 80;BA.debugLine="C.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 81;BA.debugLine="L_CANT.Text = c.GetString(\"PC_NOART\")"; +_l_cant.setText(BA.ObjectToCharSequence(_c.GetString("PC_NOART"))); + //BA.debugLineNum = 82;BA.debugLine="L_TOTAL.Text = c.GetString(\"PC_MONTO\")"; +_l_total.setText(BA.ObjectToCharSequence(_c.GetString("PC_MONTO"))); }; -RDebugUtils.currentLine=20578337; - //BA.debugLineNum = 20578337;BA.debugLine="End Sub"; + //BA.debugLineNum = 84;BA.debugLine="End Sub"; return ""; } -public anywheresoftware.b4a.keywords.Common.ResumableSubWrapper _b4xpage_closerequest(keymon.lat.medicomed.c_historico __ref) throws Exception{ -RDebugUtils.currentModule="c_historico"; -if (Debug.shouldDelegate(ba, "b4xpage_closerequest", false)) - {return ((anywheresoftware.b4a.keywords.Common.ResumableSubWrapper) Debug.delegate(ba, "b4xpage_closerequest", null));} -ResumableSub_B4XPage_CloseRequest rsub = new ResumableSub_B4XPage_CloseRequest(this,__ref); +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.c_historico parent,keymon.lat.medicomed.c_historico __ref) { +public ResumableSub_B4XPage_CloseRequest(keymon.lat.medicomed.c_historico parent) { this.parent = parent; -this.__ref = __ref; -this.__ref = parent; } -keymon.lat.medicomed.c_historico __ref; keymon.lat.medicomed.c_historico parent; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="c_historico"; while (true) { switch (state) { @@ -214,207 +151,148 @@ parent.__c.ReturnFromResumableSub(this,null);return;} case 0: //C this.state = -1; -RDebugUtils.currentLine=20774915; - //BA.debugLineNum = 20774915;BA.debugLine="B4XPages.ShowPage(\"Principal\")"; -parent._b4xpages._showpage /*String*/ (ba,"Principal"); -RDebugUtils.currentLine=20774916; - //BA.debugLineNum = 20774916;BA.debugLine="Return False"; + //BA.debugLineNum = 98;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; +parent._b4xpages._showpage /*String*/ (ba,"Cliente"); + //BA.debugLineNum = 99;BA.debugLine="Return False"; if (true) { parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.False));return;}; -RDebugUtils.currentLine=20774917; - //BA.debugLineNum = 20774917;BA.debugLine="End Sub"; + //BA.debugLineNum = 100;BA.debugLine="End Sub"; if (true) break; } } } } -public String _b4xpage_created(keymon.lat.medicomed.c_historico __ref,anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_historico"; -if (Debug.shouldDelegate(ba, "b4xpage_created", false)) - {return ((String) Debug.delegate(ba, "b4xpage_created", new Object[] {_root1}));} -RDebugUtils.currentLine=20512768; - //BA.debugLineNum = 20512768;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -RDebugUtils.currentLine=20512769; - //BA.debugLineNum = 20512769;BA.debugLine="Root = Root1"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = _root1; -RDebugUtils.currentLine=20512771; - //BA.debugLineNum = 20512771;BA.debugLine="ruta = File.DirInternal"; -__ref._ruta /*String*/ = __c.File.getDirInternal(); -RDebugUtils.currentLine=20512772; - //BA.debugLineNum = 20512772;BA.debugLine="Root.LoadLayout(\"nota\")"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .LoadLayout("nota",ba); -RDebugUtils.currentLine=20512773; - //BA.debugLineNum = 20512773;BA.debugLine="borra.Visible = False"; -__ref._borra /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=20512774; - //BA.debugLineNum = 20512774;BA.debugLine="Titulo.Text = \"Acumulado\""; -__ref._titulo /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("Acumulado")); -RDebugUtils.currentLine=20512775; - //BA.debugLineNum = 20512775;BA.debugLine="b_desc.Visible = False"; -__ref._b_desc /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=20512776; - //BA.debugLineNum = 20512776;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; -if (__c.File.Exists(__ref._ruta /*String*/ ,"kmt.db")==__c.False) { -RDebugUtils.currentLine=20512777; - //BA.debugLineNum = 20512777;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; -__c.File.Copy(__c.File.getDirAssets(),"kmt.db",__ref._ruta /*String*/ ,"kmt.db"); +public String _b4xpage_created(anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ + //BA.debugLineNum = 35;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; + //BA.debugLineNum = 36;BA.debugLine="Root = Root1"; +_root = _root1; + //BA.debugLineNum = 38;BA.debugLine="ruta = File.DirInternal"; +_ruta = __c.File.getDirInternal(); + //BA.debugLineNum = 39;BA.debugLine="Root.LoadLayout(\"nota\")"; +_root.LoadLayout("nota",ba); + //BA.debugLineNum = 40;BA.debugLine="borra.Visible = False"; +_borra.setVisible(__c.False); + //BA.debugLineNum = 41;BA.debugLine="Titulo.Text = \"Acumulado\""; +_titulo.setText(BA.ObjectToCharSequence("Acumulado")); + //BA.debugLineNum = 42;BA.debugLine="b_desc.Visible = False"; +_b_desc.setVisible(__c.False); + //BA.debugLineNum = 43;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; +if (__c.File.Exists(_ruta,"kmt.db")==__c.False) { + //BA.debugLineNum = 44;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; +__c.File.Copy(__c.File.getDirAssets(),"kmt.db",_ruta,"kmt.db"); }; -RDebugUtils.currentLine=20512780; - //BA.debugLineNum = 20512780;BA.debugLine="End Sub"; + //BA.debugLineNum = 47;BA.debugLine="End Sub"; return ""; } -public String _class_globals(keymon.lat.medicomed.c_historico __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_historico"; -RDebugUtils.currentLine=20381696; - //BA.debugLineNum = 20381696;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=20381697; - //BA.debugLineNum = 20381697;BA.debugLine="Private Root As B4XView 'ignore"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Private Root As B4XView 'ignore"; _root = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=20381698; - //BA.debugLineNum = 20381698;BA.debugLine="Private xui As XUI 'ignore"; + //BA.debugLineNum = 3;BA.debugLine="Private xui As XUI 'ignore"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=20381700; - //BA.debugLineNum = 20381700;BA.debugLine="Dim g As GPS"; + //BA.debugLineNum = 5;BA.debugLine="Dim g As GPS"; _g = new anywheresoftware.b4a.gps.GPS(); -RDebugUtils.currentLine=20381701; - //BA.debugLineNum = 20381701;BA.debugLine="Dim clie_id As String"; + //BA.debugLineNum = 6;BA.debugLine="Dim clie_id As String"; _clie_id = ""; -RDebugUtils.currentLine=20381702; - //BA.debugLineNum = 20381702;BA.debugLine="Dim sDate,sTime As String"; + //BA.debugLineNum = 7;BA.debugLine="Dim sDate,sTime As String"; _sdate = ""; _stime = ""; -RDebugUtils.currentLine=20381703; - //BA.debugLineNum = 20381703;BA.debugLine="Dim usuario As String"; + //BA.debugLineNum = 8;BA.debugLine="Dim usuario As String"; _usuario = ""; -RDebugUtils.currentLine=20381705; - //BA.debugLineNum = 20381705;BA.debugLine="Dim c As Cursor"; + //BA.debugLineNum = 10;BA.debugLine="Dim c As Cursor"; _c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=20381706; - //BA.debugLineNum = 20381706;BA.debugLine="Dim ruta As String"; + //BA.debugLineNum = 11;BA.debugLine="Dim ruta As String"; _ruta = ""; -RDebugUtils.currentLine=20381707; - //BA.debugLineNum = 20381707;BA.debugLine="Dim Regresar As Button"; + //BA.debugLineNum = 12;BA.debugLine="Dim Regresar As Button"; _regresar = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=20381710; - //BA.debugLineNum = 20381710;BA.debugLine="Dim ListView1 As ListView"; + //BA.debugLineNum = 15;BA.debugLine="Dim ListView1 As ListView"; _listview1 = new anywheresoftware.b4a.objects.ListViewWrapper(); -RDebugUtils.currentLine=20381711; - //BA.debugLineNum = 20381711;BA.debugLine="Dim L_CANT As Label"; + //BA.debugLineNum = 16;BA.debugLine="Dim L_CANT As Label"; _l_cant = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=20381712; - //BA.debugLineNum = 20381712;BA.debugLine="Dim L_TOTAL As Label"; + //BA.debugLineNum = 17;BA.debugLine="Dim L_TOTAL As Label"; _l_total = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=20381713; - //BA.debugLineNum = 20381713;BA.debugLine="Dim borra As Button"; + //BA.debugLineNum = 18;BA.debugLine="Dim borra As Button"; _borra = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=20381714; - //BA.debugLineNum = 20381714;BA.debugLine="Dim Existe As String"; + //BA.debugLineNum = 19;BA.debugLine="Dim Existe As String"; _existe = ""; -RDebugUtils.currentLine=20381715; - //BA.debugLineNum = 20381715;BA.debugLine="Dim result As String"; + //BA.debugLineNum = 20;BA.debugLine="Dim result As String"; _result = ""; -RDebugUtils.currentLine=20381718; - //BA.debugLineNum = 20381718;BA.debugLine="Private Titulo As Label"; + //BA.debugLineNum = 23;BA.debugLine="Private Titulo As Label"; _titulo = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=20381719; - //BA.debugLineNum = 20381719;BA.debugLine="Private b_desc As Button"; + //BA.debugLineNum = 24;BA.debugLine="Private b_desc As Button"; _b_desc = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=20381720; - //BA.debugLineNum = 20381720;BA.debugLine="Private ListView2 As ListView"; + //BA.debugLineNum = 25;BA.debugLine="Private ListView2 As ListView"; _listview2 = new anywheresoftware.b4a.objects.ListViewWrapper(); -RDebugUtils.currentLine=20381721; - //BA.debugLineNum = 20381721;BA.debugLine="Dim tgl As Toggle"; + //BA.debugLineNum = 26;BA.debugLine="Dim tgl As Toggle"; _tgl = new com.rootsoft.togglelibrary.ToggleLibrary(); -RDebugUtils.currentLine=20381722; - //BA.debugLineNum = 20381722;BA.debugLine="End Sub"; + //BA.debugLineNum = 27;BA.debugLine="End Sub"; return ""; } -public String _gps_locationchanged(keymon.lat.medicomed.c_historico __ref,anywheresoftware.b4a.gps.LocationWrapper _location1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_historico"; -if (Debug.shouldDelegate(ba, "gps_locationchanged", false)) - {return ((String) Debug.delegate(ba, "gps_locationchanged", new Object[] {_location1}));} -RDebugUtils.currentLine=20643840; - //BA.debugLineNum = 20643840;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; -RDebugUtils.currentLine=20643843; - //BA.debugLineNum = 20643843;BA.debugLine="End Sub"; +public String _gps_locationchanged(anywheresoftware.b4a.gps.LocationWrapper _location1) throws Exception{ + //BA.debugLineNum = 86;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; + //BA.debugLineNum = 89;BA.debugLine="End Sub"; return ""; } -public String _listview1_itemclick(keymon.lat.medicomed.c_historico __ref,int _position,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_historico"; -if (Debug.shouldDelegate(ba, "listview1_itemclick", false)) - {return ((String) Debug.delegate(ba, "listview1_itemclick", new Object[] {_position,_value}));} +public Object _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 30;BA.debugLine="Public Sub Initialize As Object"; + //BA.debugLineNum = 31;BA.debugLine="Return Me"; +if (true) return this; + //BA.debugLineNum = 32;BA.debugLine="End Sub"; +return null; +} +public String _listview1_itemclick(int _position,Object _value) throws Exception{ anywheresoftware.b4a.objects.LabelWrapper _label1 = null; int _i = 0; -RDebugUtils.currentLine=20905984; - //BA.debugLineNum = 20905984;BA.debugLine="Sub ListView1_ItemClick (Position As Int, Value As"; -RDebugUtils.currentLine=20905985; - //BA.debugLineNum = 20905985;BA.debugLine="ListView2.Visible = True"; -__ref._listview2 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=20905986; - //BA.debugLineNum = 20905986;BA.debugLine="ListView1.Visible = False"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=20905987; - //BA.debugLineNum = 20905987;BA.debugLine="Dim label1 As Label"; + //BA.debugLineNum = 107;BA.debugLine="Sub ListView1_ItemClick (Position As Int, Value As"; + //BA.debugLineNum = 108;BA.debugLine="ListView2.Visible = True"; +_listview2.setVisible(__c.True); + //BA.debugLineNum = 109;BA.debugLine="ListView1.Visible = False"; +_listview1.setVisible(__c.False); + //BA.debugLineNum = 110;BA.debugLine="Dim label1 As Label"; _label1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=20905988; - //BA.debugLineNum = 20905988;BA.debugLine="For i=0 To 20"; + //BA.debugLineNum = 111;BA.debugLine="For i=0 To 20"; { final int step4 = 1; final int limit4 = (int) (20); _i = (int) (0) ; for (;_i <= limit4 ;_i = _i + step4 ) { -RDebugUtils.currentLine=20905989; - //BA.debugLineNum = 20905989;BA.debugLine="label1 = ListView2.SingleLineLayout.Label"; -_label1 = __ref._listview2 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getSingleLineLayout().Label; -RDebugUtils.currentLine=20905990; - //BA.debugLineNum = 20905990;BA.debugLine="label1.TextSize = 15"; + //BA.debugLineNum = 112;BA.debugLine="label1 = ListView2.SingleLineLayout.Label"; +_label1 = _listview2.getSingleLineLayout().Label; + //BA.debugLineNum = 113;BA.debugLine="label1.TextSize = 15"; _label1.setTextSize((float) (15)); -RDebugUtils.currentLine=20905991; - //BA.debugLineNum = 20905991;BA.debugLine="label1.TextColor = Colors.Black"; + //BA.debugLineNum = 114;BA.debugLine="label1.TextColor = Colors.Black"; _label1.setTextColor(__c.Colors.Black); -RDebugUtils.currentLine=20905992; - //BA.debugLineNum = 20905992;BA.debugLine="ListView2.AddSingleLine(i)"; -__ref._listview2 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddSingleLine(BA.ObjectToCharSequence(_i)); + //BA.debugLineNum = 115;BA.debugLine="ListView2.AddSingleLine(i)"; +_listview2.AddSingleLine(BA.ObjectToCharSequence(_i)); } }; -RDebugUtils.currentLine=20905994; - //BA.debugLineNum = 20905994;BA.debugLine="End Sub"; + //BA.debugLineNum = 117;BA.debugLine="End Sub"; return ""; } -public String _listview2_itemclick(keymon.lat.medicomed.c_historico __ref,int _position,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_historico"; -if (Debug.shouldDelegate(ba, "listview2_itemclick", false)) - {return ((String) Debug.delegate(ba, "listview2_itemclick", new Object[] {_position,_value}));} -RDebugUtils.currentLine=20840448; - //BA.debugLineNum = 20840448;BA.debugLine="Sub ListView2_ItemClick (Position As Int, Value As"; -RDebugUtils.currentLine=20840449; - //BA.debugLineNum = 20840449;BA.debugLine="ListView2.Visible = False"; -__ref._listview2 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=20840450; - //BA.debugLineNum = 20840450;BA.debugLine="ListView1.Visible = True"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=20840451; - //BA.debugLineNum = 20840451;BA.debugLine="End Sub"; +public String _listview2_itemclick(int _position,Object _value) throws Exception{ + //BA.debugLineNum = 102;BA.debugLine="Sub ListView2_ItemClick (Position As Int, Value As"; + //BA.debugLineNum = 103;BA.debugLine="ListView2.Visible = False"; +_listview2.setVisible(__c.False); + //BA.debugLineNum = 104;BA.debugLine="ListView1.Visible = True"; +_listview1.setVisible(__c.True); + //BA.debugLineNum = 105;BA.debugLine="End Sub"; return ""; } -public String _regresar_click(keymon.lat.medicomed.c_historico __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_historico"; -if (Debug.shouldDelegate(ba, "regresar_click", false)) - {return ((String) Debug.delegate(ba, "regresar_click", null));} -RDebugUtils.currentLine=20709376; - //BA.debugLineNum = 20709376;BA.debugLine="Sub Regresar_Click"; -RDebugUtils.currentLine=20709377; - //BA.debugLineNum = 20709377;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; +public String _regresar_click() throws Exception{ + //BA.debugLineNum = 91;BA.debugLine="Sub Regresar_Click"; + //BA.debugLineNum = 92;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; _b4xpages._showpage /*String*/ (ba,"Cliente"); -RDebugUtils.currentLine=20709378; - //BA.debugLineNum = 20709378;BA.debugLine="End Sub"; + //BA.debugLineNum = 93;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +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]); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/c_mapas.java b/B4A/Objects/src/keymon/lat/medicomed/c_mapas.java index 5d94224..f71a142 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/c_mapas.java +++ b/B4A/Objects/src/keymon/lat/medicomed/c_mapas.java @@ -10,7 +10,7 @@ public class c_mapas extends B4AClass.ImplB4AClass implements BA.SubDelegator{ private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.c_mapas"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.c_mapas"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class c_mapas extends B4AClass.ImplB4AClass implements BA.SubDelegator{ 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.keywords.Common __c = null; public anywheresoftware.b4a.objects.B4XViewWrapper _root = null; public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; public b4a.example.dateutils _dateutils = null; @@ -45,48 +38,34 @@ 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_mapas __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; +public String _b4xpage_created(anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ + //BA.debugLineNum = 12;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; + //BA.debugLineNum = 13;BA.debugLine="Root = Root1"; +_root = _root1; + //BA.debugLineNum = 16;BA.debugLine="End Sub"; +return ""; +} +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Private Root As B4XView 'ignore"; +_root = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 3;BA.debugLine="Private xui As XUI 'ignore"; +_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); + //BA.debugLineNum = 4;BA.debugLine="End Sub"; +return ""; +} +public Object _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ innerInitialize(_ba); -RDebugUtils.currentModule="c_mapas"; -if (Debug.shouldDelegate(ba, "initialize", false)) - {return ((Object) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=9109504; - //BA.debugLineNum = 9109504;BA.debugLine="Public Sub Initialize As Object"; -RDebugUtils.currentLine=9109505; - //BA.debugLineNum = 9109505;BA.debugLine="Return Me"; + //BA.debugLineNum = 7;BA.debugLine="Public Sub Initialize As Object"; + //BA.debugLineNum = 8;BA.debugLine="Return Me"; if (true) return this; -RDebugUtils.currentLine=9109506; - //BA.debugLineNum = 9109506;BA.debugLine="End Sub"; + //BA.debugLineNum = 9;BA.debugLine="End Sub"; return null; } -public String _b4xpage_created(keymon.lat.medicomed.c_mapas __ref,anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_mapas"; -if (Debug.shouldDelegate(ba, "b4xpage_created", false)) - {return ((String) Debug.delegate(ba, "b4xpage_created", new Object[] {_root1}));} -RDebugUtils.currentLine=9175040; - //BA.debugLineNum = 9175040;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -RDebugUtils.currentLine=9175041; - //BA.debugLineNum = 9175041;BA.debugLine="Root = Root1"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = _root1; -RDebugUtils.currentLine=9175044; - //BA.debugLineNum = 9175044;BA.debugLine="End Sub"; -return ""; +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]); +return BA.SubDelegator.SubNotFound; } -public String _class_globals(keymon.lat.medicomed.c_mapas __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_mapas"; -RDebugUtils.currentLine=9043968; - //BA.debugLineNum = 9043968;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=9043969; - //BA.debugLineNum = 9043969;BA.debugLine="Private Root As B4XView 'ignore"; -_root = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=9043970; - //BA.debugLineNum = 9043970;BA.debugLine="Private xui As XUI 'ignore"; -_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=9043971; - //BA.debugLineNum = 9043971;BA.debugLine="End Sub"; -return ""; } -} \ No newline at end of file diff --git a/B4A/Objects/src/keymon/lat/medicomed/c_nota.java b/B4A/Objects/src/keymon/lat/medicomed/c_nota.java index b6720df..c3b72be 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/c_nota.java +++ b/B4A/Objects/src/keymon/lat/medicomed/c_nota.java @@ -10,7 +10,7 @@ public class c_nota extends B4AClass.ImplB4AClass implements BA.SubDelegator{ private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.c_nota"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.c_nota"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class c_nota extends B4AClass.ImplB4AClass implements BA.SubDelegator{ 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.keywords.Common __c = null; public anywheresoftware.b4a.objects.B4XViewWrapper _root = null; public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; public anywheresoftware.b4a.sql.SQL _skmt = null; @@ -68,353 +61,226 @@ 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_nota __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="c_nota"; -if (Debug.shouldDelegate(ba, "initialize", false)) - {return ((Object) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=9306112; - //BA.debugLineNum = 9306112;BA.debugLine="Public Sub Initialize As Object"; -RDebugUtils.currentLine=9306113; - //BA.debugLineNum = 9306113;BA.debugLine="Return Me"; -if (true) return this; -RDebugUtils.currentLine=9306114; - //BA.debugLineNum = 9306114;BA.debugLine="End Sub"; -return null; -} -public String _activity_pause(keymon.lat.medicomed.c_nota __ref,boolean _userclosed) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_nota"; -RDebugUtils.currentLine=9502720; - //BA.debugLineNum = 9502720;BA.debugLine="Sub Activity_Pause (UserClosed As Boolean)"; -RDebugUtils.currentLine=9502722; - //BA.debugLineNum = 9502722;BA.debugLine="End Sub"; +public String _activity_pause(boolean _userclosed) throws Exception{ + //BA.debugLineNum = 108;BA.debugLine="Sub Activity_Pause (UserClosed As Boolean)"; + //BA.debugLineNum = 110;BA.debugLine="End Sub"; return ""; } -public String _b_desc_click(keymon.lat.medicomed.c_nota __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_nota"; -if (Debug.shouldDelegate(ba, "b_desc_click", false)) - {return ((String) Debug.delegate(ba, "b_desc_click", null));} -RDebugUtils.currentLine=9895936; - //BA.debugLineNum = 9895936;BA.debugLine="Sub b_desc_Click"; -RDebugUtils.currentLine=9895937; - //BA.debugLineNum = 9895937;BA.debugLine="If DESCUENTO = \"MENOS\" Then"; -if ((__ref._descuento /*String*/ ).equals("MENOS")) { -RDebugUtils.currentLine=9895938; - //BA.debugLineNum = 9895938;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; +public String _b_desc_click() throws Exception{ + //BA.debugLineNum = 188;BA.debugLine="Sub b_desc_Click"; + //BA.debugLineNum = 189;BA.debugLine="If DESCUENTO = \"MENOS\" Then"; +if ((_descuento).equals("MENOS")) { + //BA.debugLineNum = 190;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; __c.DateTime.setDateFormat("MM/dd/yyyy"); -RDebugUtils.currentLine=9895939; - //BA.debugLineNum = 9895939;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -__ref._sdate /*String*/ = __c.DateTime.Date(__c.DateTime.getNow()); -RDebugUtils.currentLine=9895940; - //BA.debugLineNum = 9895940;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -__ref._stime /*String*/ = __c.DateTime.Time(__c.DateTime.getNow()); -RDebugUtils.currentLine=9895941; - //BA.debugLineNum = 9895941;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; -__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 CUENTA from cuentaa"))); -RDebugUtils.currentLine=9895942; - //BA.debugLineNum = 9895942;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=9895943; - //BA.debugLineNum = 9895943;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -__ref._clie_id /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUENTA"); -RDebugUtils.currentLine=9895944; - //BA.debugLineNum = 9895944;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=9895945; - //BA.debugLineNum = 9895945;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; -__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=9895946; - //BA.debugLineNum = 9895946;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=9895947; - //BA.debugLineNum = 9895947;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -__ref._usuario /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("USUARIO"); -RDebugUtils.currentLine=9895948; - //BA.debugLineNum = 9895948;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=9895949; - //BA.debugLineNum = 9895949;BA.debugLine="result = Msgbox2(\"Seguro que desea dar descuent"; -__ref._result /*String*/ = BA.NumberToString(__c.Msgbox2(BA.ObjectToCharSequence("Seguro que desea dar descuento del 5%?"),BA.ObjectToCharSequence("Dar descuento"),"Si","","No",(android.graphics.Bitmap)(__c.LoadBitmap(__c.File.getDirAssets(),"alert2.png").getObject()),ba)); -RDebugUtils.currentLine=9895950; - //BA.debugLineNum = 9895950;BA.debugLine="If result = DialogResponse.POSITIVE Then"; -if ((__ref._result /*String*/ ).equals(BA.NumberToString(__c.DialogResponse.POSITIVE))) { -RDebugUtils.currentLine=9895951; - //BA.debugLineNum = 9895951;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE ped"; + //BA.debugLineNum = 191;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; +_sdate = __c.DateTime.Date(__c.DateTime.getNow()); + //BA.debugLineNum = 192;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; +_stime = __c.DateTime.Time(__c.DateTime.getNow()); + //BA.debugLineNum = 193;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; +_c = (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 CUENTA from cuentaa"))); + //BA.debugLineNum = 194;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 195;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; +_clie_id = _c.GetString("CUENTA"); + //BA.debugLineNum = 196;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 197;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; +_c = (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"))); + //BA.debugLineNum = 198;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 199;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; +_usuario = _c.GetString("USUARIO"); + //BA.debugLineNum = 200;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 201;BA.debugLine="result = Msgbox2(\"Seguro que desea dar descuent"; +_result = BA.NumberToString(__c.Msgbox2(BA.ObjectToCharSequence("Seguro que desea dar descuento del 5%?"),BA.ObjectToCharSequence("Dar descuento"),"Si","","No",(android.graphics.Bitmap)(__c.LoadBitmap(__c.File.getDirAssets(),"alert2.png").getObject()),ba)); + //BA.debugLineNum = 202;BA.debugLine="If result = DialogResponse.POSITIVE Then"; +if ((_result).equals(BA.NumberToString(__c.DialogResponse.POSITIVE))) { + //BA.debugLineNum = 203;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE ped"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("UPDATE pedido SET PE_COSTO_TOT = PE_COSTO_TOT * .95, PE_DESC = 5 WHERE PE_CLIENTE In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=9895952; - //BA.debugLineNum = 9895952;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum("; -__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 sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, count(*) as CUANTOS FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); -RDebugUtils.currentLine=9895953; - //BA.debugLineNum = 9895953;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=9895954; - //BA.debugLineNum = 9895954;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 204;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum("; +_c = (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 sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, count(*) as CUANTOS FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); + //BA.debugLineNum = 205;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 206;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=9895955; - //BA.debugLineNum = 9895955;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert in"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT) VALUES (?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._clie_id /*String*/ ),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(__ref._usuario /*String*/ ),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CANT_CLIE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL_CLIE")),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ )})); -RDebugUtils.currentLine=9895956; - //BA.debugLineNum = 9895956;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=9895957; - //BA.debugLineNum = 9895957;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*String*/ (null); + //BA.debugLineNum = 207;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert in"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT) VALUES (?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_clie_id),(Object)(_sdate+_stime),(Object)(_usuario),(Object)(_c.GetString("CANT_CLIE")),(Object)(_c.GetString("TOTAL_CLIE")),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ )})); + //BA.debugLineNum = 208;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 209;BA.debugLine="B4XPage_Appear"; +_b4xpage_appear(); }; - }else -{RDebugUtils.currentLine=9895959; - //BA.debugLineNum = 9895959;BA.debugLine="ELSE IF DESCUENTO = \"MAS\" Then"; -if ((__ref._descuento /*String*/ ).equals("MAS")) { -RDebugUtils.currentLine=9895960; - //BA.debugLineNum = 9895960;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; + }else if((_descuento).equals("MAS")) { + //BA.debugLineNum = 212;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; __c.DateTime.setDateFormat("MM/dd/yyyy"); -RDebugUtils.currentLine=9895961; - //BA.debugLineNum = 9895961;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -__ref._sdate /*String*/ = __c.DateTime.Date(__c.DateTime.getNow()); -RDebugUtils.currentLine=9895962; - //BA.debugLineNum = 9895962;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -__ref._stime /*String*/ = __c.DateTime.Time(__c.DateTime.getNow()); -RDebugUtils.currentLine=9895963; - //BA.debugLineNum = 9895963;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; -__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 CUENTA from cuentaa"))); -RDebugUtils.currentLine=9895964; - //BA.debugLineNum = 9895964;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=9895965; - //BA.debugLineNum = 9895965;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -__ref._clie_id /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUENTA"); -RDebugUtils.currentLine=9895966; - //BA.debugLineNum = 9895966;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=9895967; - //BA.debugLineNum = 9895967;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; -__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=9895968; - //BA.debugLineNum = 9895968;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=9895969; - //BA.debugLineNum = 9895969;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -__ref._usuario /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("USUARIO"); -RDebugUtils.currentLine=9895970; - //BA.debugLineNum = 9895970;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=9895971; - //BA.debugLineNum = 9895971;BA.debugLine="result = Msgbox2(\"Seguro que desea CANCELAR el"; -__ref._result /*String*/ = BA.NumberToString(__c.Msgbox2(BA.ObjectToCharSequence("Seguro que desea CANCELAR el descuento?"),BA.ObjectToCharSequence("Cancelar descuento"),"Si","","No",(android.graphics.Bitmap)(__c.LoadBitmap(__c.File.getDirAssets(),"alert2.png").getObject()),ba)); -RDebugUtils.currentLine=9895972; - //BA.debugLineNum = 9895972;BA.debugLine="If result = DialogResponse.POSITIVE Then"; -if ((__ref._result /*String*/ ).equals(BA.NumberToString(__c.DialogResponse.POSITIVE))) { -RDebugUtils.currentLine=9895973; - //BA.debugLineNum = 9895973;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE ped"; + //BA.debugLineNum = 213;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; +_sdate = __c.DateTime.Date(__c.DateTime.getNow()); + //BA.debugLineNum = 214;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; +_stime = __c.DateTime.Time(__c.DateTime.getNow()); + //BA.debugLineNum = 215;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; +_c = (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 CUENTA from cuentaa"))); + //BA.debugLineNum = 216;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 217;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; +_clie_id = _c.GetString("CUENTA"); + //BA.debugLineNum = 218;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 219;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; +_c = (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"))); + //BA.debugLineNum = 220;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 221;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; +_usuario = _c.GetString("USUARIO"); + //BA.debugLineNum = 222;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 223;BA.debugLine="result = Msgbox2(\"Seguro que desea CANCELAR el"; +_result = BA.NumberToString(__c.Msgbox2(BA.ObjectToCharSequence("Seguro que desea CANCELAR el descuento?"),BA.ObjectToCharSequence("Cancelar descuento"),"Si","","No",(android.graphics.Bitmap)(__c.LoadBitmap(__c.File.getDirAssets(),"alert2.png").getObject()),ba)); + //BA.debugLineNum = 224;BA.debugLine="If result = DialogResponse.POSITIVE Then"; +if ((_result).equals(BA.NumberToString(__c.DialogResponse.POSITIVE))) { + //BA.debugLineNum = 225;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE ped"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("UPDATE pedido SET PE_COSTO_TOT = PE_COSTO_TOT / .95, PE_DESC = 0 WHERE PE_CLIENTE In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=9895974; - //BA.debugLineNum = 9895974;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum("; -__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 sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, count(*) as CUANTOS FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); -RDebugUtils.currentLine=9895975; - //BA.debugLineNum = 9895975;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=9895976; - //BA.debugLineNum = 9895976;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 226;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum("; +_c = (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 sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, count(*) as CUANTOS FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); + //BA.debugLineNum = 227;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 228;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=9895977; - //BA.debugLineNum = 9895977;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert in"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT) VALUES (?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._clie_id /*String*/ ),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(__ref._usuario /*String*/ ),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CANT_CLIE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL_CLIE")),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ )})); -RDebugUtils.currentLine=9895978; - //BA.debugLineNum = 9895978;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=9895979; - //BA.debugLineNum = 9895979;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*String*/ (null); + //BA.debugLineNum = 229;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert in"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT) VALUES (?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_clie_id),(Object)(_sdate+_stime),(Object)(_usuario),(Object)(_c.GetString("CANT_CLIE")),(Object)(_c.GetString("TOTAL_CLIE")),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ )})); + //BA.debugLineNum = 230;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 231;BA.debugLine="B4XPage_Appear"; +_b4xpage_appear(); }; - }} -; -RDebugUtils.currentLine=9895982; - //BA.debugLineNum = 9895982;BA.debugLine="End Sub"; + }; + //BA.debugLineNum = 234;BA.debugLine="End Sub"; return ""; } -public String _b4xpage_appear(keymon.lat.medicomed.c_nota __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_nota"; -if (Debug.shouldDelegate(ba, "b4xpage_appear", false)) - {return ((String) Debug.delegate(ba, "b4xpage_appear", null));} +public String _b4xpage_appear() throws Exception{ anywheresoftware.b4a.objects.CSBuilder _cs = null; int _i = 0; anywheresoftware.b4a.objects.LabelWrapper _label1 = null; int _textcolor = 0; anywheresoftware.b4a.objects.LabelWrapper _label2 = null; -RDebugUtils.currentLine=9437184; - //BA.debugLineNum = 9437184;BA.debugLine="Sub B4XPage_Appear"; -RDebugUtils.currentLine=9437185; - //BA.debugLineNum = 9437185;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then"; + //BA.debugLineNum = 55;BA.debugLine="Sub B4XPage_Appear"; + //BA.debugLineNum = 56;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then"; if (__c.Not(_starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getGPSEnabled())) { -RDebugUtils.currentLine=9437186; - //BA.debugLineNum = 9437186;BA.debugLine="ToastMessageShow(\"Es necesario tener el GPS ence"; + //BA.debugLineNum = 57;BA.debugLine="ToastMessageShow(\"Es necesario tener el GPS ence"; __c.ToastMessageShow(BA.ObjectToCharSequence("Es necesario tener el GPS encendido"),__c.True); -RDebugUtils.currentLine=9437187; - //BA.debugLineNum = 9437187;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent"; + //BA.debugLineNum = 58;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent"; __c.StartActivity(ba,(Object)(_starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getLocationSettingsIntent())); }; -RDebugUtils.currentLine=9437189; - //BA.debugLineNum = 9437189;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select ID_AL"; -__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=9437190; - //BA.debugLineNum = 9437190;BA.debugLine="C.Position =0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=9437191; - //BA.debugLineNum = 9437191;BA.debugLine="almacen = C.GetString(\"ID_ALMACEN\")"; -__ref._almacen /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("ID_ALMACEN"); -RDebugUtils.currentLine=9437192; - //BA.debugLineNum = 9437192;BA.debugLine="C.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=9437193; - //BA.debugLineNum = 9437193;BA.debugLine="L_CANT.Text =\"\""; -__ref._l_cant /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("")); -RDebugUtils.currentLine=9437194; - //BA.debugLineNum = 9437194;BA.debugLine="L_TOTAL.Text=\"\""; -__ref._l_total /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("")); -RDebugUtils.currentLine=9437195; - //BA.debugLineNum = 9437195;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select count("; -__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 count(*) as EXISTE from pedido_cliente WHERE pc_cliente IN (Select CUENTA from cuentaa)"))); -RDebugUtils.currentLine=9437196; - //BA.debugLineNum = 9437196;BA.debugLine="C.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=9437197; - //BA.debugLineNum = 9437197;BA.debugLine="Existe = C.GetString(\"EXISTE\")"; -__ref._existe /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("EXISTE"); -RDebugUtils.currentLine=9437198; - //BA.debugLineNum = 9437198;BA.debugLine="C.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=9437199; - //BA.debugLineNum = 9437199;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select PE_PRO"; -__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 PE_PRONOMBRE,PE_COSTO_TOT, PE_CANT, PE_FOLIO, PE_CEDIS FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa) order by PE_CEDIS, PE_PRONOMBRE"))); -RDebugUtils.currentLine=9437200; - //BA.debugLineNum = 9437200;BA.debugLine="ListView1.Clear"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear(); -RDebugUtils.currentLine=9437201; - //BA.debugLineNum = 9437201;BA.debugLine="Private cs As CSBuilder"; + //BA.debugLineNum = 60;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select ID_AL"; +_c = (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"))); + //BA.debugLineNum = 61;BA.debugLine="C.Position =0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 62;BA.debugLine="almacen = C.GetString(\"ID_ALMACEN\")"; +_almacen = _c.GetString("ID_ALMACEN"); + //BA.debugLineNum = 63;BA.debugLine="C.Close"; +_c.Close(); + //BA.debugLineNum = 64;BA.debugLine="L_CANT.Text =\"\""; +_l_cant.setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 65;BA.debugLine="L_TOTAL.Text=\"\""; +_l_total.setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 66;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select count("; +_c = (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 count(*) as EXISTE from pedido_cliente WHERE pc_cliente IN (Select CUENTA from cuentaa)"))); + //BA.debugLineNum = 67;BA.debugLine="C.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 68;BA.debugLine="Existe = C.GetString(\"EXISTE\")"; +_existe = _c.GetString("EXISTE"); + //BA.debugLineNum = 69;BA.debugLine="C.Close"; +_c.Close(); + //BA.debugLineNum = 70;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select PE_PRO"; +_c = (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 PE_PRONOMBRE,PE_COSTO_TOT, PE_CANT, PE_FOLIO, PE_CEDIS FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa) order by PE_CEDIS, PE_PRONOMBRE"))); + //BA.debugLineNum = 71;BA.debugLine="ListView1.Clear"; +_listview1.Clear(); + //BA.debugLineNum = 72;BA.debugLine="Private cs As CSBuilder"; _cs = new anywheresoftware.b4a.objects.CSBuilder(); -RDebugUtils.currentLine=9437202; - //BA.debugLineNum = 9437202;BA.debugLine="If c.RowCount>0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=9437203; - //BA.debugLineNum = 9437203;BA.debugLine="For i=0 To c.RowCount -1"; + //BA.debugLineNum = 73;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 74;BA.debugLine="For i=0 To c.RowCount -1"; { final int step19 = 1; -final int limit19 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit19 = (int) (_c.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit19 ;_i = _i + step19 ) { -RDebugUtils.currentLine=9437204; - //BA.debugLineNum = 9437204;BA.debugLine="cs.Initialize"; + //BA.debugLineNum = 75;BA.debugLine="cs.Initialize"; _cs.Initialize(); -RDebugUtils.currentLine=9437205; - //BA.debugLineNum = 9437205;BA.debugLine="c.Position=i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=9437206; - //BA.debugLineNum = 9437206;BA.debugLine="Dim label1 As Label"; + //BA.debugLineNum = 76;BA.debugLine="c.Position=i"; +_c.setPosition(_i); + //BA.debugLineNum = 77;BA.debugLine="Dim label1 As Label"; _label1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=9437207; - //BA.debugLineNum = 9437207;BA.debugLine="label1 = ListView1.TwoLinesLayout.Label"; -_label1 = __ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().Label; -RDebugUtils.currentLine=9437208; - //BA.debugLineNum = 9437208;BA.debugLine="label1.TextSize = 15"; + //BA.debugLineNum = 78;BA.debugLine="label1 = ListView1.TwoLinesLayout.Label"; +_label1 = _listview1.getTwoLinesLayout().Label; + //BA.debugLineNum = 79;BA.debugLine="label1.TextSize = 15"; _label1.setTextSize((float) (15)); -RDebugUtils.currentLine=9437209; - //BA.debugLineNum = 9437209;BA.debugLine="label1.TextColor = Colors.Black"; + //BA.debugLineNum = 80;BA.debugLine="label1.TextColor = Colors.Black"; _label1.setTextColor(__c.Colors.Black); -RDebugUtils.currentLine=9437210; - //BA.debugLineNum = 9437210;BA.debugLine="label1.color = Colors.White"; + //BA.debugLineNum = 81;BA.debugLine="label1.color = Colors.White"; _label1.setColor(__c.Colors.White); -RDebugUtils.currentLine=9437211; - //BA.debugLineNum = 9437211;BA.debugLine="Private textColor As Int = Colors.black"; + //BA.debugLineNum = 82;BA.debugLine="Private textColor As Int = Colors.black"; _textcolor = __c.Colors.Black; -RDebugUtils.currentLine=9437213; - //BA.debugLineNum = 9437213;BA.debugLine="If Not(IsNumber(c.GetString(\"PE_CEDIS\"))) Then"; -if (__c.Not(__c.IsNumber(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_CEDIS")))) { + //BA.debugLineNum = 84;BA.debugLine="If Not(IsNumber(c.GetString(\"PE_CEDIS\"))) Then"; +if (__c.Not(__c.IsNumber(_c.GetString("PE_CEDIS")))) { _textcolor = __c.Colors.RGB((int) (210),(int) (105),(int) (30));}; -RDebugUtils.currentLine=9437214; - //BA.debugLineNum = 9437214;BA.debugLine="Dim label2 As Label"; + //BA.debugLineNum = 85;BA.debugLine="Dim label2 As Label"; _label2 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=9437215; - //BA.debugLineNum = 9437215;BA.debugLine="label2 = ListView1.TwoLinesLayout.SecondLabel"; -_label2 = __ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().SecondLabel; -RDebugUtils.currentLine=9437216; - //BA.debugLineNum = 9437216;BA.debugLine="label2.TextSize = 10"; + //BA.debugLineNum = 86;BA.debugLine="label2 = ListView1.TwoLinesLayout.SecondLabel"; +_label2 = _listview1.getTwoLinesLayout().SecondLabel; + //BA.debugLineNum = 87;BA.debugLine="label2.TextSize = 10"; _label2.setTextSize((float) (10)); -RDebugUtils.currentLine=9437217; - //BA.debugLineNum = 9437217;BA.debugLine="label2.TextColor = Colors.Blue"; + //BA.debugLineNum = 88;BA.debugLine="label2.TextColor = Colors.Blue"; _label2.setTextColor(__c.Colors.Blue); -RDebugUtils.currentLine=9437218; - //BA.debugLineNum = 9437218;BA.debugLine="ListView1.AddTwoLines(cs.Color(textColor).appen"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddTwoLines(BA.ObjectToCharSequence(_cs.Color(_textcolor).Append(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_PRONOMBRE"))).Pop().getObject()),BA.ObjectToCharSequence("Cantidad #"+__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_CANT")+" SubTotal $"+__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_COSTO_TOT")+" Folio "+__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_FOLIO"))); -RDebugUtils.currentLine=9437219; - //BA.debugLineNum = 9437219;BA.debugLine="folio = c.GetString(\"PE_FOLIO\")"; -__ref._folio /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_FOLIO"); + //BA.debugLineNum = 89;BA.debugLine="ListView1.AddTwoLines(cs.Color(textColor).appen"; +_listview1.AddTwoLines(BA.ObjectToCharSequence(_cs.Color(_textcolor).Append(BA.ObjectToCharSequence(_c.GetString("PE_PRONOMBRE"))).Pop().getObject()),BA.ObjectToCharSequence("Cantidad #"+_c.GetString("PE_CANT")+" SubTotal $"+_c.GetString("PE_COSTO_TOT")+" Folio "+_c.GetString("PE_FOLIO"))); + //BA.debugLineNum = 90;BA.debugLine="folio = c.GetString(\"PE_FOLIO\")"; +_folio = _c.GetString("PE_FOLIO"); } }; }; -RDebugUtils.currentLine=9437222; - //BA.debugLineNum = 9437222;BA.debugLine="If Existe <> 0 Then"; -if ((__ref._existe /*String*/ ).equals(BA.NumberToString(0)) == false) { -RDebugUtils.currentLine=9437223; - //BA.debugLineNum = 9437223;BA.debugLine="c =B4XPages.MainPage.skmt.ExecQuery(\"select sum("; -__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 sum(PE_CANT) as PC_NOART, sum (PE_COSTO_TOT) as PC_MONTO from PEDIDO where PE_CLIENTE in (Select CUENTA from cuentaa) AND PE_PROID NOT IN (SELECT CAT_PA_ID FROM PROMOS_COMP ) "))); -RDebugUtils.currentLine=9437225; - //BA.debugLineNum = 9437225;BA.debugLine="C.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=9437226; - //BA.debugLineNum = 9437226;BA.debugLine="L_CANT.Text = c.GetString(\"PC_NOART\")"; -__ref._l_cant /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_NOART"))); -RDebugUtils.currentLine=9437227; - //BA.debugLineNum = 9437227;BA.debugLine="L_TOTAL.Text = c.GetString(\"PC_MONTO\")"; -__ref._l_total /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_MONTO"))); -RDebugUtils.currentLine=9437228; - //BA.debugLineNum = 9437228;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=9437229; - //BA.debugLineNum = 9437229;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select SUM(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 SUM(IFNULL(PE_DESC,0)) AS DESCUENTO FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); -RDebugUtils.currentLine=9437230; - //BA.debugLineNum = 9437230;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=9437231; - //BA.debugLineNum = 9437231;BA.debugLine="DESC = c.GetString(\"DESCUENTO\")"; -__ref._desc /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("DESCUENTO"); -RDebugUtils.currentLine=9437232; - //BA.debugLineNum = 9437232;BA.debugLine="b_desc.Visible = False"; -__ref._b_desc /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); + //BA.debugLineNum = 93;BA.debugLine="If Existe <> 0 Then"; +if ((_existe).equals(BA.NumberToString(0)) == false) { + //BA.debugLineNum = 94;BA.debugLine="c =B4XPages.MainPage.skmt.ExecQuery(\"select sum("; +_c = (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 sum(PE_CANT) as PC_NOART, sum (PE_COSTO_TOT) as PC_MONTO from PEDIDO where PE_CLIENTE in (Select CUENTA from cuentaa) AND PE_PROID NOT IN (SELECT CAT_PA_ID FROM PROMOS_COMP ) "))); + //BA.debugLineNum = 96;BA.debugLine="C.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 97;BA.debugLine="L_CANT.Text = c.GetString(\"PC_NOART\")"; +_l_cant.setText(BA.ObjectToCharSequence(_c.GetString("PC_NOART"))); + //BA.debugLineNum = 98;BA.debugLine="L_TOTAL.Text = c.GetString(\"PC_MONTO\")"; +_l_total.setText(BA.ObjectToCharSequence(_c.GetString("PC_MONTO"))); + //BA.debugLineNum = 99;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 100;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select SUM(I"; +_c = (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 SUM(IFNULL(PE_DESC,0)) AS DESCUENTO FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); + //BA.debugLineNum = 101;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 102;BA.debugLine="DESC = c.GetString(\"DESCUENTO\")"; +_desc = _c.GetString("DESCUENTO"); + //BA.debugLineNum = 103;BA.debugLine="b_desc.Visible = False"; +_b_desc.setVisible(__c.False); }; -RDebugUtils.currentLine=9437234; - //BA.debugLineNum = 9437234;BA.debugLine="If Subs.pedidoGuardado Then borra.Enabled = False"; + //BA.debugLineNum = 105;BA.debugLine="If Subs.pedidoGuardado Then borra.Enabled = False"; if (_subs._pedidoguardado /*boolean*/ (ba)) { -__ref._borra /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setEnabled(__c.False);} +_borra.setEnabled(__c.False);} else { -__ref._borra /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setEnabled(__c.True);}; -RDebugUtils.currentLine=9437235; - //BA.debugLineNum = 9437235;BA.debugLine="End Sub"; +_borra.setEnabled(__c.True);}; + //BA.debugLineNum = 106;BA.debugLine="End Sub"; return ""; } -public anywheresoftware.b4a.keywords.Common.ResumableSubWrapper _b4xpage_closerequest(keymon.lat.medicomed.c_nota __ref) throws Exception{ -RDebugUtils.currentModule="c_nota"; -if (Debug.shouldDelegate(ba, "b4xpage_closerequest", false)) - {return ((anywheresoftware.b4a.keywords.Common.ResumableSubWrapper) Debug.delegate(ba, "b4xpage_closerequest", null));} -ResumableSub_B4XPage_CloseRequest rsub = new ResumableSub_B4XPage_CloseRequest(this,__ref); +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.c_nota parent,keymon.lat.medicomed.c_nota __ref) { +public ResumableSub_B4XPage_CloseRequest(keymon.lat.medicomed.c_nota parent) { this.parent = parent; -this.__ref = __ref; -this.__ref = parent; } -keymon.lat.medicomed.c_nota __ref; keymon.lat.medicomed.c_nota parent; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="c_nota"; while (true) { switch (state) { @@ -424,333 +290,232 @@ parent.__c.ReturnFromResumableSub(this,null);return;} case 0: //C this.state = -1; -RDebugUtils.currentLine=9699331; - //BA.debugLineNum = 9699331;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; + //BA.debugLineNum = 124;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; parent._b4xpages._showpage /*String*/ (ba,"Cliente"); -RDebugUtils.currentLine=9699332; - //BA.debugLineNum = 9699332;BA.debugLine="Return False"; + //BA.debugLineNum = 125;BA.debugLine="Return False"; if (true) { parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.False));return;}; -RDebugUtils.currentLine=9699333; - //BA.debugLineNum = 9699333;BA.debugLine="End Sub"; + //BA.debugLineNum = 126;BA.debugLine="End Sub"; if (true) break; } } } } -public String _b4xpage_created(keymon.lat.medicomed.c_nota __ref,anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_nota"; -if (Debug.shouldDelegate(ba, "b4xpage_created", false)) - {return ((String) Debug.delegate(ba, "b4xpage_created", new Object[] {_root1}));} -RDebugUtils.currentLine=9371648; - //BA.debugLineNum = 9371648;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -RDebugUtils.currentLine=9371649; - //BA.debugLineNum = 9371649;BA.debugLine="Root = Root1"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = _root1; -RDebugUtils.currentLine=9371650; - //BA.debugLineNum = 9371650;BA.debugLine="ruta = File.DirInternal"; -__ref._ruta /*String*/ = __c.File.getDirInternal(); -RDebugUtils.currentLine=9371651; - //BA.debugLineNum = 9371651;BA.debugLine="Root.LoadLayout(\"nota\")"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .LoadLayout("nota",ba); -RDebugUtils.currentLine=9371652; - //BA.debugLineNum = 9371652;BA.debugLine="borra.Visible = True"; -__ref._borra /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=9371653; - //BA.debugLineNum = 9371653;BA.debugLine="Titulo.Text = \"Pedido Actual\""; -__ref._titulo /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("Pedido Actual")); -RDebugUtils.currentLine=9371660; - //BA.debugLineNum = 9371660;BA.debugLine="End Sub"; +public String _b4xpage_created(anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ + //BA.debugLineNum = 39;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; + //BA.debugLineNum = 40;BA.debugLine="Root = Root1"; +_root = _root1; + //BA.debugLineNum = 41;BA.debugLine="ruta = File.DirInternal"; +_ruta = __c.File.getDirInternal(); + //BA.debugLineNum = 42;BA.debugLine="Root.LoadLayout(\"nota\")"; +_root.LoadLayout("nota",ba); + //BA.debugLineNum = 43;BA.debugLine="borra.Visible = True"; +_borra.setVisible(__c.True); + //BA.debugLineNum = 44;BA.debugLine="Titulo.Text = \"Pedido Actual\""; +_titulo.setText(BA.ObjectToCharSequence("Pedido Actual")); + //BA.debugLineNum = 51;BA.debugLine="End Sub"; return ""; } -public String _borra_click(keymon.lat.medicomed.c_nota __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_nota"; -if (Debug.shouldDelegate(ba, "borra_click", false)) - {return ((String) Debug.delegate(ba, "borra_click", null));} +public String _borra_click() throws Exception{ int _i = 0; -RDebugUtils.currentLine=9764864; - //BA.debugLineNum = 9764864;BA.debugLine="Sub borra_Click"; -RDebugUtils.currentLine=9764865; - //BA.debugLineNum = 9764865;BA.debugLine="If folio <> \"\" Then"; -if ((__ref._folio /*String*/ ).equals("") == false) { -RDebugUtils.currentLine=9764866; - //BA.debugLineNum = 9764866;BA.debugLine="result = Msgbox2(\"Seguro que desea borrar el pe"; -__ref._result /*String*/ = BA.NumberToString(__c.Msgbox2(BA.ObjectToCharSequence("Seguro que desea borrar el pedido?"),BA.ObjectToCharSequence("Cancelar pedido"),"Si","","No",(android.graphics.Bitmap)(__c.LoadBitmap(__c.File.getDirAssets(),"alert2.png").getObject()),ba)); -RDebugUtils.currentLine=9764867; - //BA.debugLineNum = 9764867;BA.debugLine="If result = DialogResponse.POSITIVE Then"; -if ((__ref._result /*String*/ ).equals(BA.NumberToString(__c.DialogResponse.POSITIVE))) { -RDebugUtils.currentLine=9764868; - //BA.debugLineNum = 9764868;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select PE_P"; -__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 PE_PROID,PE_CANT FROM PEDIDO where pe_cliente in (Select CUENTA from cuentaa) "))); -RDebugUtils.currentLine=9764869; - //BA.debugLineNum = 9764869;BA.debugLine="If c.RowCount>0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=9764870; - //BA.debugLineNum = 9764870;BA.debugLine="For i=0 To c.RowCount -1"; + //BA.debugLineNum = 128;BA.debugLine="Sub borra_Click"; + //BA.debugLineNum = 129;BA.debugLine="If folio <> \"\" Then"; +if ((_folio).equals("") == false) { + //BA.debugLineNum = 130;BA.debugLine="result = Msgbox2(\"Seguro que desea borrar el pe"; +_result = BA.NumberToString(__c.Msgbox2(BA.ObjectToCharSequence("Seguro que desea borrar el pedido?"),BA.ObjectToCharSequence("Cancelar pedido"),"Si","","No",(android.graphics.Bitmap)(__c.LoadBitmap(__c.File.getDirAssets(),"alert2.png").getObject()),ba)); + //BA.debugLineNum = 131;BA.debugLine="If result = DialogResponse.POSITIVE Then"; +if ((_result).equals(BA.NumberToString(__c.DialogResponse.POSITIVE))) { + //BA.debugLineNum = 132;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select PE_P"; +_c = (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 PE_PROID,PE_CANT FROM PEDIDO where pe_cliente in (Select CUENTA from cuentaa) "))); + //BA.debugLineNum = 133;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 134;BA.debugLine="For i=0 To c.RowCount -1"; { final int step6 = 1; -final int limit6 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit6 = (int) (_c.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit6 ;_i = _i + step6 ) { -RDebugUtils.currentLine=9764871; - //BA.debugLineNum = 9764871;BA.debugLine="c.Position=i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=9764872; - //BA.debugLineNum = 9764872;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen + ? where cat_gp_id = ?",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_CANT")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_PROID"))})); -RDebugUtils.currentLine=9764873; - //BA.debugLineNum = 9764873;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO INVENT_X_ENVIAR (ALMACEN , PROID , CANTIDAD ) VALUES(?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._almacen /*String*/ ),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_PROID")),(Object)((double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_CANT")))*-1)})); + //BA.debugLineNum = 135;BA.debugLine="c.Position=i"; +_c.setPosition(_i); + //BA.debugLineNum = 136;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen + ? where cat_gp_id = ?",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_c.GetString("PE_CANT")),(Object)(_c.GetString("PE_PROID"))})); + //BA.debugLineNum = 137;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO INVENT_X_ENVIAR (ALMACEN , PROID , CANTIDAD ) VALUES(?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_almacen),(Object)(_c.GetString("PE_PROID")),(Object)((double)(Double.parseDouble(_c.GetString("PE_CANT")))*-1)})); } }; }; -RDebugUtils.currentLine=9764876; - //BA.debugLineNum = 9764876;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 140;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente where pc_cliente in (Select CUENTA from cuentaa)"); -RDebugUtils.currentLine=9764877; - //BA.debugLineNum = 9764877;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 141;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido where pe_cliente in (Select CUENTA from cuentaa)"); -RDebugUtils.currentLine=9764878; - //BA.debugLineNum = 9764878;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt"; + //BA.debugLineNum = 142;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("UPDATE kmt_info set gestion = 0 where CAT_CL_CODIGO In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=9764879; - //BA.debugLineNum = 9764879;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*String*/ (null); + //BA.debugLineNum = 143;BA.debugLine="B4XPage_Appear"; +_b4xpage_appear(); }; }else { -RDebugUtils.currentLine=9764882; - //BA.debugLineNum = 9764882;BA.debugLine="Msgbox(\"CLIENTE YA SE TRANSMITIO, FAVOR DE LLAMA"; + //BA.debugLineNum = 146;BA.debugLine="Msgbox(\"CLIENTE YA SE TRANSMITIO, FAVOR DE LLAMA"; __c.Msgbox(BA.ObjectToCharSequence("CLIENTE YA SE TRANSMITIO, FAVOR DE LLAMAR A SOPORTE PARA ASISTENCIA"),BA.ObjectToCharSequence("AVISO"),ba); }; -RDebugUtils.currentLine=9764884; - //BA.debugLineNum = 9764884;BA.debugLine="End Sub"; + //BA.debugLineNum = 148;BA.debugLine="End Sub"; return ""; } -public String _class_globals(keymon.lat.medicomed.c_nota __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_nota"; -RDebugUtils.currentLine=9240576; - //BA.debugLineNum = 9240576;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=9240577; - //BA.debugLineNum = 9240577;BA.debugLine="Private Root As B4XView 'ignore"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Private Root As B4XView 'ignore"; _root = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=9240578; - //BA.debugLineNum = 9240578;BA.debugLine="Private xui As XUI 'ignore"; + //BA.debugLineNum = 3;BA.debugLine="Private xui As XUI 'ignore"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=9240580; - //BA.debugLineNum = 9240580;BA.debugLine="Dim skmt As SQL"; + //BA.debugLineNum = 5;BA.debugLine="Dim skmt As SQL"; _skmt = new anywheresoftware.b4a.sql.SQL(); -RDebugUtils.currentLine=9240581; - //BA.debugLineNum = 9240581;BA.debugLine="Dim g As GPS"; + //BA.debugLineNum = 6;BA.debugLine="Dim g As GPS"; _g = new anywheresoftware.b4a.gps.GPS(); -RDebugUtils.currentLine=9240582; - //BA.debugLineNum = 9240582;BA.debugLine="Dim clie_id As String"; + //BA.debugLineNum = 7;BA.debugLine="Dim clie_id As String"; _clie_id = ""; -RDebugUtils.currentLine=9240583; - //BA.debugLineNum = 9240583;BA.debugLine="Dim sDate,sTime As String"; + //BA.debugLineNum = 8;BA.debugLine="Dim sDate,sTime As String"; _sdate = ""; _stime = ""; -RDebugUtils.currentLine=9240584; - //BA.debugLineNum = 9240584;BA.debugLine="Dim usuario As String"; + //BA.debugLineNum = 9;BA.debugLine="Dim usuario As String"; _usuario = ""; -RDebugUtils.currentLine=9240586; - //BA.debugLineNum = 9240586;BA.debugLine="Dim c As Cursor"; + //BA.debugLineNum = 11;BA.debugLine="Dim c As Cursor"; _c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=9240587; - //BA.debugLineNum = 9240587;BA.debugLine="Dim ruta As String"; + //BA.debugLineNum = 12;BA.debugLine="Dim ruta As String"; _ruta = ""; -RDebugUtils.currentLine=9240588; - //BA.debugLineNum = 9240588;BA.debugLine="Dim Regresar As Button"; + //BA.debugLineNum = 13;BA.debugLine="Dim Regresar As Button"; _regresar = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=9240590; - //BA.debugLineNum = 9240590;BA.debugLine="Dim ListView1 As ListView"; + //BA.debugLineNum = 15;BA.debugLine="Dim ListView1 As ListView"; _listview1 = new anywheresoftware.b4a.objects.ListViewWrapper(); -RDebugUtils.currentLine=9240591; - //BA.debugLineNum = 9240591;BA.debugLine="Dim L_CANT As Label"; + //BA.debugLineNum = 16;BA.debugLine="Dim L_CANT As Label"; _l_cant = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=9240592; - //BA.debugLineNum = 9240592;BA.debugLine="Dim L_TOTAL As Label"; + //BA.debugLineNum = 17;BA.debugLine="Dim L_TOTAL As Label"; _l_total = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=9240593; - //BA.debugLineNum = 9240593;BA.debugLine="Dim borra As Button"; + //BA.debugLineNum = 18;BA.debugLine="Dim borra As Button"; _borra = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=9240594; - //BA.debugLineNum = 9240594;BA.debugLine="Dim Existe As String"; + //BA.debugLineNum = 19;BA.debugLine="Dim Existe As String"; _existe = ""; -RDebugUtils.currentLine=9240595; - //BA.debugLineNum = 9240595;BA.debugLine="Dim result As String"; + //BA.debugLineNum = 20;BA.debugLine="Dim result As String"; _result = ""; -RDebugUtils.currentLine=9240597; - //BA.debugLineNum = 9240597;BA.debugLine="Dim DESC As String"; + //BA.debugLineNum = 22;BA.debugLine="Dim DESC As String"; _desc = ""; -RDebugUtils.currentLine=9240599; - //BA.debugLineNum = 9240599;BA.debugLine="Private Titulo As Label"; + //BA.debugLineNum = 24;BA.debugLine="Private Titulo As Label"; _titulo = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=9240600; - //BA.debugLineNum = 9240600;BA.debugLine="Private b_desc As Button"; + //BA.debugLineNum = 25;BA.debugLine="Private b_desc As Button"; _b_desc = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=9240601; - //BA.debugLineNum = 9240601;BA.debugLine="Dim DESCUENTO As String"; + //BA.debugLineNum = 26;BA.debugLine="Dim DESCUENTO As String"; _descuento = ""; -RDebugUtils.currentLine=9240602; - //BA.debugLineNum = 9240602;BA.debugLine="Dim folio As String"; + //BA.debugLineNum = 27;BA.debugLine="Dim folio As String"; _folio = ""; -RDebugUtils.currentLine=9240603; - //BA.debugLineNum = 9240603;BA.debugLine="Dim tgl As Toggle"; + //BA.debugLineNum = 28;BA.debugLine="Dim tgl As Toggle"; _tgl = new com.rootsoft.togglelibrary.ToggleLibrary(); -RDebugUtils.currentLine=9240604; - //BA.debugLineNum = 9240604;BA.debugLine="Private almacen As String"; + //BA.debugLineNum = 29;BA.debugLine="Private almacen As String"; _almacen = ""; -RDebugUtils.currentLine=9240605; - //BA.debugLineNum = 9240605;BA.debugLine="Private p_nota As Panel"; + //BA.debugLineNum = 30;BA.debugLine="Private p_nota As Panel"; _p_nota = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=9240606; - //BA.debugLineNum = 9240606;BA.debugLine="End Sub"; + //BA.debugLineNum = 31;BA.debugLine="End Sub"; return ""; } -public String _gps_locationchanged(keymon.lat.medicomed.c_nota __ref,anywheresoftware.b4a.gps.LocationWrapper _location1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_nota"; -if (Debug.shouldDelegate(ba, "gps_locationchanged", false)) - {return ((String) Debug.delegate(ba, "gps_locationchanged", new Object[] {_location1}));} -RDebugUtils.currentLine=9568256; - //BA.debugLineNum = 9568256;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; -RDebugUtils.currentLine=9568259; - //BA.debugLineNum = 9568259;BA.debugLine="End Sub"; +public String _gps_locationchanged(anywheresoftware.b4a.gps.LocationWrapper _location1) throws Exception{ + //BA.debugLineNum = 112;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; + //BA.debugLineNum = 115;BA.debugLine="End Sub"; return ""; } -public String _listview1_itemlongclick(keymon.lat.medicomed.c_nota __ref,int _position,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_nota"; -if (Debug.shouldDelegate(ba, "listview1_itemlongclick", false)) - {return ((String) Debug.delegate(ba, "listview1_itemlongclick", new Object[] {_position,_value}));} -RDebugUtils.currentLine=9830400; - //BA.debugLineNum = 9830400;BA.debugLine="Sub ListView1_ItemLongClick (Position As Int, Valu"; -RDebugUtils.currentLine=9830401; - //BA.debugLineNum = 9830401;BA.debugLine="result = Msgbox2(\"Seguro que desea borrar este a"; -__ref._result /*String*/ = BA.NumberToString(__c.Msgbox2(BA.ObjectToCharSequence("Seguro que desea borrar este articulo?"),BA.ObjectToCharSequence("Borrar Articulo"),"Si","","No",(android.graphics.Bitmap)(__c.LoadBitmap(__c.File.getDirAssets(),"alert2.png").getObject()),ba)); -RDebugUtils.currentLine=9830402; - //BA.debugLineNum = 9830402;BA.debugLine="If result = DialogResponse.POSITIVE Then"; -if ((__ref._result /*String*/ ).equals(BA.NumberToString(__c.DialogResponse.POSITIVE))) { -RDebugUtils.currentLine=9830403; - //BA.debugLineNum = 9830403;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"select PE_P"; -__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*/ .ExecQuery2("select PE_PROID,PE_CANT FROM PEDIDO where pe_pronombre = ? and pe_cliente in (Select CUENTA from cuentaa) ",new String[]{BA.ObjectToString(_value)}))); -RDebugUtils.currentLine=9830404; - //BA.debugLineNum = 9830404;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=9830405; - //BA.debugLineNum = 9830405;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen + ? where cat_gp_id = ?",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_CANT")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_PROID"))})); -RDebugUtils.currentLine=9830406; - //BA.debugLineNum = 9830406;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO INVENT_X_ENVIAR (ALMACEN , PROID , CANTIDAD ) VALUES(?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._almacen /*String*/ ),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_PROID")),(Object)((double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_CANT")))*-1)})); -RDebugUtils.currentLine=9830407; - //BA.debugLineNum = 9830407;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=9830408; - //BA.debugLineNum = 9830408;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"select coun"; -__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*/ .ExecQuery2("select count(*) AS CUANTOS from cat_gunaprod where CAT_GP_ID in (select pe_cedis from pedido where pe_pronombre = ? and pe_cliente in (Select CUENTA from cuentaa)) and CAT_GP_CLASIF = 'PROMOS' AND CAT_GP_TIPO = 'PROMOS' AND CAT_GP_SUBTIPO = 'PROMOS'",new String[]{BA.ObjectToString(_value)}))); -RDebugUtils.currentLine=9830409; - //BA.debugLineNum = 9830409;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=9830410; - //BA.debugLineNum = 9830410;BA.debugLine="If c.GetString(\"CUANTOS\") > 0 Then"; -if ((double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")))>0) { -RDebugUtils.currentLine=9830411; - //BA.debugLineNum = 9830411;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete fr"; +public Object _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 34;BA.debugLine="Public Sub Initialize As Object"; + //BA.debugLineNum = 35;BA.debugLine="Return Me"; +if (true) return this; + //BA.debugLineNum = 36;BA.debugLine="End Sub"; +return null; +} +public String _listview1_itemlongclick(int _position,Object _value) throws Exception{ + //BA.debugLineNum = 150;BA.debugLine="Sub ListView1_ItemLongClick (Position As Int, Valu"; + //BA.debugLineNum = 151;BA.debugLine="result = Msgbox2(\"Seguro que desea borrar este a"; +_result = BA.NumberToString(__c.Msgbox2(BA.ObjectToCharSequence("Seguro que desea borrar este articulo?"),BA.ObjectToCharSequence("Borrar Articulo"),"Si","","No",(android.graphics.Bitmap)(__c.LoadBitmap(__c.File.getDirAssets(),"alert2.png").getObject()),ba)); + //BA.debugLineNum = 152;BA.debugLine="If result = DialogResponse.POSITIVE Then"; +if ((_result).equals(BA.NumberToString(__c.DialogResponse.POSITIVE))) { + //BA.debugLineNum = 153;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"select PE_P"; +_c = (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*/ .ExecQuery2("select PE_PROID,PE_CANT FROM PEDIDO where pe_pronombre = ? and pe_cliente in (Select CUENTA from cuentaa) ",new String[]{BA.ObjectToString(_value)}))); + //BA.debugLineNum = 154;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 155;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen + ? where cat_gp_id = ?",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_c.GetString("PE_CANT")),(Object)(_c.GetString("PE_PROID"))})); + //BA.debugLineNum = 156;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO INVENT_X_ENVIAR (ALMACEN , PROID , CANTIDAD ) VALUES(?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_almacen),(Object)(_c.GetString("PE_PROID")),(Object)((double)(Double.parseDouble(_c.GetString("PE_CANT")))*-1)})); + //BA.debugLineNum = 157;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 158;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"select coun"; +_c = (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*/ .ExecQuery2("select count(*) AS CUANTOS from cat_gunaprod where CAT_GP_ID in (select pe_cedis from pedido where pe_pronombre = ? and pe_cliente in (Select CUENTA from cuentaa)) and CAT_GP_CLASIF = 'PROMOS' AND CAT_GP_TIPO = 'PROMOS' AND CAT_GP_SUBTIPO = 'PROMOS'",new String[]{BA.ObjectToString(_value)}))); + //BA.debugLineNum = 159;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 160;BA.debugLine="If c.GetString(\"CUANTOS\") > 0 Then"; +if ((double)(Double.parseDouble(_c.GetString("CUANTOS")))>0) { + //BA.debugLineNum = 161;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete fr"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("delete from pedido where pe_cedis in (select pe_cedis from pedido where pe_pronombre = ?) and pe_cliente in (Select CUENTA from cuentaa)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{_value})); }else { -RDebugUtils.currentLine=9830413; - //BA.debugLineNum = 9830413;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete fr"; + //BA.debugLineNum = 163;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete fr"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("delete from pedido where pe_pronombre = ? and pe_cliente in (Select CUENTA from cuentaa)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{_value})); }; -RDebugUtils.currentLine=9830415; - //BA.debugLineNum = 9830415;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; + //BA.debugLineNum = 165;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; __c.DateTime.setDateFormat("MM/dd/yyyy"); -RDebugUtils.currentLine=9830416; - //BA.debugLineNum = 9830416;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -__ref._sdate /*String*/ = __c.DateTime.Date(__c.DateTime.getNow()); -RDebugUtils.currentLine=9830417; - //BA.debugLineNum = 9830417;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -__ref._stime /*String*/ = __c.DateTime.Time(__c.DateTime.getNow()); -RDebugUtils.currentLine=9830418; - //BA.debugLineNum = 9830418;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; -__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 CUENTA from cuentaa"))); -RDebugUtils.currentLine=9830419; - //BA.debugLineNum = 9830419;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=9830420; - //BA.debugLineNum = 9830420;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -__ref._clie_id /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUENTA"); -RDebugUtils.currentLine=9830421; - //BA.debugLineNum = 9830421;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; -__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=9830422; - //BA.debugLineNum = 9830422;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=9830423; - //BA.debugLineNum = 9830423;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -__ref._usuario /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("USUARIO"); -RDebugUtils.currentLine=9830424; - //BA.debugLineNum = 9830424;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(p"; -__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 sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, count(*) as CUANTOS FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); -RDebugUtils.currentLine=9830425; - //BA.debugLineNum = 9830425;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=9830426; - //BA.debugLineNum = 9830426;BA.debugLine="If c.GetString(\"CUANTOS\") > 0 Then"; -if ((double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")))>0) { -RDebugUtils.currentLine=9830427; - //BA.debugLineNum = 9830427;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 166;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; +_sdate = __c.DateTime.Date(__c.DateTime.getNow()); + //BA.debugLineNum = 167;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; +_stime = __c.DateTime.Time(__c.DateTime.getNow()); + //BA.debugLineNum = 168;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; +_c = (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 CUENTA from cuentaa"))); + //BA.debugLineNum = 169;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 170;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; +_clie_id = _c.GetString("CUENTA"); + //BA.debugLineNum = 171;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; +_c = (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"))); + //BA.debugLineNum = 172;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 173;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; +_usuario = _c.GetString("USUARIO"); + //BA.debugLineNum = 174;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(p"; +_c = (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 sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, count(*) as CUANTOS FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); + //BA.debugLineNum = 175;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 176;BA.debugLine="If c.GetString(\"CUANTOS\") > 0 Then"; +if ((double)(Double.parseDouble(_c.GetString("CUANTOS")))>0) { + //BA.debugLineNum = 177;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=9830428; - //BA.debugLineNum = 9830428;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert in"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT) VALUES (?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._clie_id /*String*/ ),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(__ref._usuario /*String*/ ),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CANT_CLIE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL_CLIE")),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ )})); -RDebugUtils.currentLine=9830429; - //BA.debugLineNum = 9830429;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt"; + //BA.debugLineNum = 178;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert in"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT) VALUES (?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_clie_id),(Object)(_sdate+_stime),(Object)(_usuario),(Object)(_c.GetString("CANT_CLIE")),(Object)(_c.GetString("TOTAL_CLIE")),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ )})); + //BA.debugLineNum = 179;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("UPDATE kmt_info set gestion = 0 where CAT_CL_CODIGO In (select cuenta from cuentaa)"); }else { -RDebugUtils.currentLine=9830431; - //BA.debugLineNum = 9830431;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 181;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=9830432; - //BA.debugLineNum = 9830432;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt"; + //BA.debugLineNum = 182;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("UPDATE kmt_info set gestion = 0 where CAT_CL_CODIGO In (select cuenta from cuentaa)"); }; -RDebugUtils.currentLine=9830434; - //BA.debugLineNum = 9830434;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*String*/ (null); + //BA.debugLineNum = 184;BA.debugLine="B4XPage_Appear"; +_b4xpage_appear(); }; -RDebugUtils.currentLine=9830436; - //BA.debugLineNum = 9830436;BA.debugLine="End Sub"; + //BA.debugLineNum = 186;BA.debugLine="End Sub"; return ""; } -public String _p_nota_click(keymon.lat.medicomed.c_nota __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_nota"; -if (Debug.shouldDelegate(ba, "p_nota_click", false)) - {return ((String) Debug.delegate(ba, "p_nota_click", null));} -RDebugUtils.currentLine=9961472; - //BA.debugLineNum = 9961472;BA.debugLine="Private Sub p_nota_Click"; -RDebugUtils.currentLine=9961474; - //BA.debugLineNum = 9961474;BA.debugLine="End Sub"; +public String _p_nota_click() throws Exception{ + //BA.debugLineNum = 236;BA.debugLine="Private Sub p_nota_Click"; + //BA.debugLineNum = 238;BA.debugLine="End Sub"; return ""; } -public String _regresar_click(keymon.lat.medicomed.c_nota __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_nota"; -if (Debug.shouldDelegate(ba, "regresar_click", false)) - {return ((String) Debug.delegate(ba, "regresar_click", null));} -RDebugUtils.currentLine=9633792; - //BA.debugLineNum = 9633792;BA.debugLine="Sub Regresar_Click"; -RDebugUtils.currentLine=9633793; - //BA.debugLineNum = 9633793;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; +public String _regresar_click() throws Exception{ + //BA.debugLineNum = 117;BA.debugLine="Sub Regresar_Click"; + //BA.debugLineNum = 118;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; _b4xpages._showpage /*String*/ (ba,"Cliente"); -RDebugUtils.currentLine=9633794; - //BA.debugLineNum = 9633794;BA.debugLine="End Sub"; + //BA.debugLineNum = 119;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +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]); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/c_noventa.java b/B4A/Objects/src/keymon/lat/medicomed/c_noventa.java index 458023f..320184f 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/c_noventa.java +++ b/B4A/Objects/src/keymon/lat/medicomed/c_noventa.java @@ -10,7 +10,7 @@ public class c_noventa extends B4AClass.ImplB4AClass implements BA.SubDelegator{ private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.c_noventa"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.c_noventa"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class c_noventa extends B4AClass.ImplB4AClass implements BA.SubDelegator{ 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.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; @@ -66,481 +59,245 @@ 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_noventa __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="c_noventa"; -if (Debug.shouldDelegate(ba, "initialize", false)) - {return ((Object) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=10092544; - //BA.debugLineNum = 10092544;BA.debugLine="Public Sub Initialize As Object"; -RDebugUtils.currentLine=10092545; - //BA.debugLineNum = 10092545;BA.debugLine="Return Me"; -if (true) return this; -RDebugUtils.currentLine=10092546; - //BA.debugLineNum = 10092546;BA.debugLine="End Sub"; -return null; -} -public String _b4xpage_appear(keymon.lat.medicomed.c_noventa __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_noventa"; -if (Debug.shouldDelegate(ba, "b4xpage_appear", false)) - {return ((String) Debug.delegate(ba, "b4xpage_appear", null));} -RDebugUtils.currentLine=10223616; - //BA.debugLineNum = 10223616;BA.debugLine="Sub B4XPage_Appear"; -RDebugUtils.currentLine=10223617; - //BA.debugLineNum = 10223617;BA.debugLine="e_comm.Text=\"\""; -__ref._e_comm /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence("")); -RDebugUtils.currentLine=10223618; - //BA.debugLineNum = 10223618;BA.debugLine="tgl.Initialize"; -__ref._tgl /*com.rootsoft.togglelibrary.ToggleLibrary*/ .Initialize(ba); -RDebugUtils.currentLine=10223619; - //BA.debugLineNum = 10223619;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then"; +public String _b4xpage_appear() throws Exception{ + //BA.debugLineNum = 51;BA.debugLine="Sub B4XPage_Appear"; + //BA.debugLineNum = 52;BA.debugLine="e_comm.Text=\"\""; +_e_comm.setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 53;BA.debugLine="tgl.Initialize"; +_tgl.Initialize(ba); + //BA.debugLineNum = 54;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then"; if (__c.Not(_starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getGPSEnabled())) { -RDebugUtils.currentLine=10223620; - //BA.debugLineNum = 10223620;BA.debugLine="ToastMessageShow(\"Es necesario tener el GPS ence"; + //BA.debugLineNum = 55;BA.debugLine="ToastMessageShow(\"Es necesario tener el GPS ence"; __c.ToastMessageShow(BA.ObjectToCharSequence("Es necesario tener el GPS encendido"),__c.True); -RDebugUtils.currentLine=10223621; - //BA.debugLineNum = 10223621;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent"; + //BA.debugLineNum = 56;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent"; __c.StartActivity(ba,(Object)(_starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getLocationSettingsIntent())); }; -RDebugUtils.currentLine=10223623; - //BA.debugLineNum = 10223623;BA.debugLine="End Sub"; + //BA.debugLineNum = 58;BA.debugLine="End Sub"; return ""; } -public String _b4xpage_created(keymon.lat.medicomed.c_noventa __ref,anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_noventa"; -if (Debug.shouldDelegate(ba, "b4xpage_created", false)) - {return ((String) Debug.delegate(ba, "b4xpage_created", new Object[] {_root1}));} -RDebugUtils.currentLine=10158080; - //BA.debugLineNum = 10158080;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -RDebugUtils.currentLine=10158081; - //BA.debugLineNum = 10158081;BA.debugLine="Root = Root1"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = _root1; -RDebugUtils.currentLine=10158083; - //BA.debugLineNum = 10158083;BA.debugLine="Root.LoadLayout(\"noventa\")"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .LoadLayout("noventa",ba); -RDebugUtils.currentLine=10158084; - //BA.debugLineNum = 10158084;BA.debugLine="ruta = File.DirInternal"; -__ref._ruta /*String*/ = __c.File.getDirInternal(); -RDebugUtils.currentLine=10158086; - //BA.debugLineNum = 10158086;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; -if (__c.File.Exists(__ref._ruta /*String*/ ,"kmt.db")==__c.False) { -RDebugUtils.currentLine=10158087; - //BA.debugLineNum = 10158087;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; -__c.File.Copy(__c.File.getDirAssets(),"kmt.db",__ref._ruta /*String*/ ,"kmt.db"); +public String _b4xpage_created(anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ + //BA.debugLineNum = 36;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; + //BA.debugLineNum = 37;BA.debugLine="Root = Root1"; +_root = _root1; + //BA.debugLineNum = 39;BA.debugLine="Root.LoadLayout(\"noventa\")"; +_root.LoadLayout("noventa",ba); + //BA.debugLineNum = 40;BA.debugLine="ruta = File.DirInternal"; +_ruta = __c.File.getDirInternal(); + //BA.debugLineNum = 42;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; +if (__c.File.Exists(_ruta,"kmt.db")==__c.False) { + //BA.debugLineNum = 43;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; +__c.File.Copy(__c.File.getDirAssets(),"kmt.db",_ruta,"kmt.db"); }; -RDebugUtils.currentLine=10158090; - //BA.debugLineNum = 10158090;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=10158091; - //BA.debugLineNum = 10158091;BA.debugLine="End Sub"; + //BA.debugLineNum = 46;BA.debugLine="reqManager.Initialize(Me, B4XPages.MainPage.SERVE"; +_reqmanager._initialize /*String*/ (ba,this,_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._server /*String*/ ); + //BA.debugLineNum = 47;BA.debugLine="End Sub"; return ""; } -public String _cancela_click(keymon.lat.medicomed.c_noventa __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_noventa"; -if (Debug.shouldDelegate(ba, "cancela_click", false)) - {return ((String) Debug.delegate(ba, "cancela_click", null));} -RDebugUtils.currentLine=10354688; - //BA.debugLineNum = 10354688;BA.debugLine="Sub CANCELA_Click"; -RDebugUtils.currentLine=10354689; - //BA.debugLineNum = 10354689;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; +public String _cancela_click() throws Exception{ + //BA.debugLineNum = 65;BA.debugLine="Sub CANCELA_Click"; + //BA.debugLineNum = 66;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; _b4xpages._showpage /*String*/ (ba,"Cliente"); -RDebugUtils.currentLine=10354690; - //BA.debugLineNum = 10354690;BA.debugLine="End Sub"; + //BA.debugLineNum = 67;BA.debugLine="End Sub"; return ""; } -public String _class_globals(keymon.lat.medicomed.c_noventa __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_noventa"; -RDebugUtils.currentLine=10027008; - //BA.debugLineNum = 10027008;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=10027009; - //BA.debugLineNum = 10027009;BA.debugLine="Private Root As B4XView 'ignore"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Private Root As B4XView 'ignore"; _root = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=10027010; - //BA.debugLineNum = 10027010;BA.debugLine="Private xui As XUI 'ignore"; + //BA.debugLineNum = 3;BA.debugLine="Private xui As XUI 'ignore"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=10027012; - //BA.debugLineNum = 10027012;BA.debugLine="Dim g As GPS"; + //BA.debugLineNum = 5;BA.debugLine="Dim g As GPS"; _g = new anywheresoftware.b4a.gps.GPS(); -RDebugUtils.currentLine=10027013; - //BA.debugLineNum = 10027013;BA.debugLine="Dim ruta As String"; + //BA.debugLineNum = 6;BA.debugLine="Dim ruta As String"; _ruta = ""; -RDebugUtils.currentLine=10027014; - //BA.debugLineNum = 10027014;BA.debugLine="Dim skmt As SQL"; + //BA.debugLineNum = 7;BA.debugLine="Dim skmt As SQL"; _skmt = new anywheresoftware.b4a.sql.SQL(); -RDebugUtils.currentLine=10027015; - //BA.debugLineNum = 10027015;BA.debugLine="Dim c As Cursor"; + //BA.debugLineNum = 8;BA.debugLine="Dim c As Cursor"; _c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=10027017; - //BA.debugLineNum = 10027017;BA.debugLine="Dim CANCELA As Button"; + //BA.debugLineNum = 10;BA.debugLine="Dim CANCELA As Button"; _cancela = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=10027018; - //BA.debugLineNum = 10027018;BA.debugLine="Dim GUARDA As Button"; + //BA.debugLineNum = 11;BA.debugLine="Dim GUARDA As Button"; _guarda = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=10027019; - //BA.debugLineNum = 10027019;BA.debugLine="Dim r_1 As RadioButton"; + //BA.debugLineNum = 12;BA.debugLine="Dim r_1 As RadioButton"; _r_1 = new anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper(); -RDebugUtils.currentLine=10027020; - //BA.debugLineNum = 10027020;BA.debugLine="Dim r_2 As RadioButton"; + //BA.debugLineNum = 13;BA.debugLine="Dim r_2 As RadioButton"; _r_2 = new anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper(); -RDebugUtils.currentLine=10027021; - //BA.debugLineNum = 10027021;BA.debugLine="Dim r_3 As RadioButton"; + //BA.debugLineNum = 14;BA.debugLine="Dim r_3 As RadioButton"; _r_3 = new anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper(); -RDebugUtils.currentLine=10027022; - //BA.debugLineNum = 10027022;BA.debugLine="Dim e_comm As EditText"; + //BA.debugLineNum = 15;BA.debugLine="Dim e_comm As EditText"; _e_comm = new anywheresoftware.b4a.objects.EditTextWrapper(); -RDebugUtils.currentLine=10027023; - //BA.debugLineNum = 10027023;BA.debugLine="Dim motivo As String"; + //BA.debugLineNum = 16;BA.debugLine="Dim motivo As String"; _motivo = ""; -RDebugUtils.currentLine=10027024; - //BA.debugLineNum = 10027024;BA.debugLine="Dim cuenta As String"; + //BA.debugLineNum = 17;BA.debugLine="Dim cuenta As String"; _cuenta = ""; -RDebugUtils.currentLine=10027025; - //BA.debugLineNum = 10027025;BA.debugLine="Dim usuario As String"; + //BA.debugLineNum = 18;BA.debugLine="Dim usuario As String"; _usuario = ""; -RDebugUtils.currentLine=10027026; - //BA.debugLineNum = 10027026;BA.debugLine="Dim sDate,sTime As String"; + //BA.debugLineNum = 19;BA.debugLine="Dim sDate,sTime As String"; _sdate = ""; _stime = ""; -RDebugUtils.currentLine=10027028; - //BA.debugLineNum = 10027028;BA.debugLine="Dim tgl As Toggle"; + //BA.debugLineNum = 21;BA.debugLine="Dim tgl As Toggle"; _tgl = new com.rootsoft.togglelibrary.ToggleLibrary(); -RDebugUtils.currentLine=10027029; - //BA.debugLineNum = 10027029;BA.debugLine="Dim r_4 As RadioButton"; + //BA.debugLineNum = 22;BA.debugLine="Dim r_4 As RadioButton"; _r_4 = new anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper(); -RDebugUtils.currentLine=10027031; - //BA.debugLineNum = 10027031;BA.debugLine="Private stay_hh As String"; + //BA.debugLineNum = 24;BA.debugLine="Private stay_hh As String"; _stay_hh = ""; -RDebugUtils.currentLine=10027032; - //BA.debugLineNum = 10027032;BA.debugLine="Private stay_mi As String"; + //BA.debugLineNum = 25;BA.debugLine="Private stay_mi As String"; _stay_mi = ""; -RDebugUtils.currentLine=10027033; - //BA.debugLineNum = 10027033;BA.debugLine="Private stay_ss As String"; + //BA.debugLineNum = 26;BA.debugLine="Private stay_ss As String"; _stay_ss = ""; -RDebugUtils.currentLine=10027034; - //BA.debugLineNum = 10027034;BA.debugLine="Dim reqManager As DBRequestManager"; + //BA.debugLineNum = 27;BA.debugLine="Dim reqManager As DBRequestManager"; _reqmanager = new keymon.lat.medicomed.dbrequestmanager(); -RDebugUtils.currentLine=10027035; - //BA.debugLineNum = 10027035;BA.debugLine="End Sub"; + //BA.debugLineNum = 28;BA.debugLine="End Sub"; return ""; } -public String _gps_locationchanged(keymon.lat.medicomed.c_noventa __ref,anywheresoftware.b4a.gps.LocationWrapper _location1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_noventa"; -if (Debug.shouldDelegate(ba, "gps_locationchanged", false)) - {return ((String) Debug.delegate(ba, "gps_locationchanged", new Object[] {_location1}));} -RDebugUtils.currentLine=10289152; - //BA.debugLineNum = 10289152;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; -RDebugUtils.currentLine=10289155; - //BA.debugLineNum = 10289155;BA.debugLine="End Sub"; +public String _gps_locationchanged(anywheresoftware.b4a.gps.LocationWrapper _location1) throws Exception{ + //BA.debugLineNum = 60;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; + //BA.debugLineNum = 63;BA.debugLine="End Sub"; return ""; } -public String _guarda_click(keymon.lat.medicomed.c_noventa __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_noventa"; -if (Debug.shouldDelegate(ba, "guarda_click", false)) - {return ((String) Debug.delegate(ba, "guarda_click", null));} +public String _guarda_click() throws Exception{ int _i = 0; -RDebugUtils.currentLine=10420224; - //BA.debugLineNum = 10420224;BA.debugLine="Sub GUARDA_Click"; -RDebugUtils.currentLine=10420225; - //BA.debugLineNum = 10420225;BA.debugLine="If r_1.Checked Then"; -if (__ref._r_1 /*anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper*/ .getChecked()) { -RDebugUtils.currentLine=10420226; - //BA.debugLineNum = 10420226;BA.debugLine="motivo = \"CERRADO\""; -__ref._motivo /*String*/ = "CERRADO"; - }else -{RDebugUtils.currentLine=10420227; - //BA.debugLineNum = 10420227;BA.debugLine="Else If r_2.Checked Then"; -if (__ref._r_2 /*anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper*/ .getChecked()) { -RDebugUtils.currentLine=10420228; - //BA.debugLineNum = 10420228;BA.debugLine="motivo = \"NO COMPRA\""; -__ref._motivo /*String*/ = "NO COMPRA"; - }else -{RDebugUtils.currentLine=10420229; - //BA.debugLineNum = 10420229;BA.debugLine="Else If r_3.Checked Then"; -if (__ref._r_3 /*anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper*/ .getChecked()) { -RDebugUtils.currentLine=10420230; - //BA.debugLineNum = 10420230;BA.debugLine="motivo = \"CON PRODUCTO\""; -__ref._motivo /*String*/ = "CON PRODUCTO"; - }else -{RDebugUtils.currentLine=10420231; - //BA.debugLineNum = 10420231;BA.debugLine="Else If r_4.Checked Then"; -if (__ref._r_4 /*anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper*/ .getChecked()) { -RDebugUtils.currentLine=10420232; - //BA.debugLineNum = 10420232;BA.debugLine="motivo = \"NO ESTA EL ENCARGADO\""; -__ref._motivo /*String*/ = "NO ESTA EL ENCARGADO"; + //BA.debugLineNum = 68;BA.debugLine="Sub GUARDA_Click"; + //BA.debugLineNum = 69;BA.debugLine="If r_1.Checked Then"; +if (_r_1.getChecked()) { + //BA.debugLineNum = 70;BA.debugLine="motivo = \"CERRADO\""; +_motivo = "CERRADO"; + }else if(_r_2.getChecked()) { + //BA.debugLineNum = 72;BA.debugLine="motivo = \"NO COMPRA\""; +_motivo = "NO COMPRA"; + }else if(_r_3.getChecked()) { + //BA.debugLineNum = 74;BA.debugLine="motivo = \"CON PRODUCTO\""; +_motivo = "CON PRODUCTO"; + }else if(_r_4.getChecked()) { + //BA.debugLineNum = 76;BA.debugLine="motivo = \"NO ESTA EL ENCARGADO\""; +_motivo = "NO ESTA EL ENCARGADO"; }else { -RDebugUtils.currentLine=10420234; - //BA.debugLineNum = 10420234;BA.debugLine="motivo = \"Cerrado permanente.\""; -__ref._motivo /*String*/ = "Cerrado permanente."; - }}}} -; -RDebugUtils.currentLine=10420237; - //BA.debugLineNum = 10420237;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; + //BA.debugLineNum = 78;BA.debugLine="motivo = \"Cerrado permanente.\""; +_motivo = "Cerrado permanente."; + }; + //BA.debugLineNum = 81;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; __c.DateTime.setDateFormat("MM/dd/yyyy"); -RDebugUtils.currentLine=10420238; - //BA.debugLineNum = 10420238;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -__ref._sdate /*String*/ = __c.DateTime.Date(__c.DateTime.getNow()); -RDebugUtils.currentLine=10420239; - //BA.debugLineNum = 10420239;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -__ref._stime /*String*/ = __c.DateTime.Time(__c.DateTime.getNow()); -RDebugUtils.currentLine=10420240; - //BA.debugLineNum = 10420240;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CUENTA"; -__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 CUENTA from cuentaa"))); -RDebugUtils.currentLine=10420241; - //BA.debugLineNum = 10420241;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=10420242; - //BA.debugLineNum = 10420242;BA.debugLine="cuenta = c.GetString(\"CUENTA\")"; -__ref._cuenta /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUENTA"); -RDebugUtils.currentLine=10420243; - //BA.debugLineNum = 10420243;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select usuari"; -__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=10420244; - //BA.debugLineNum = 10420244;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=10420245; - //BA.debugLineNum = 10420245;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -__ref._usuario /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("USUARIO"); -RDebugUtils.currentLine=10420246; - //BA.debugLineNum = 10420246;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select PE_PRO"; -__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 PE_PROID,PE_CANT FROM PEDIDO where pe_cliente in (Select CUENTA from cuentaa) "))); -RDebugUtils.currentLine=10420247; - //BA.debugLineNum = 10420247;BA.debugLine="If c.RowCount>0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=10420248; - //BA.debugLineNum = 10420248;BA.debugLine="For i=0 To c.RowCount -1"; + //BA.debugLineNum = 82;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; +_sdate = __c.DateTime.Date(__c.DateTime.getNow()); + //BA.debugLineNum = 83;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; +_stime = __c.DateTime.Time(__c.DateTime.getNow()); + //BA.debugLineNum = 84;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CUENTA"; +_c = (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 CUENTA from cuentaa"))); + //BA.debugLineNum = 85;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 86;BA.debugLine="cuenta = c.GetString(\"CUENTA\")"; +_cuenta = _c.GetString("CUENTA"); + //BA.debugLineNum = 87;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select usuari"; +_c = (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"))); + //BA.debugLineNum = 88;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 89;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; +_usuario = _c.GetString("USUARIO"); + //BA.debugLineNum = 90;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select PE_PRO"; +_c = (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 PE_PROID,PE_CANT FROM PEDIDO where pe_cliente in (Select CUENTA from cuentaa) "))); + //BA.debugLineNum = 91;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 92;BA.debugLine="For i=0 To c.RowCount -1"; { final int step23 = 1; -final int limit23 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit23 = (int) (_c.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit23 ;_i = _i + step23 ) { -RDebugUtils.currentLine=10420249; - //BA.debugLineNum = 10420249;BA.debugLine="c.Position=i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=10420250; - //BA.debugLineNum = 10420250;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update ca"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen + ? where cat_gp_id = ?",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_CANT")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_PROID"))})); + //BA.debugLineNum = 93;BA.debugLine="c.Position=i"; +_c.setPosition(_i); + //BA.debugLineNum = 94;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update ca"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen + ? where cat_gp_id = ?",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_c.GetString("PE_CANT")),(Object)(_c.GetString("PE_PROID"))})); } }; }; -RDebugUtils.currentLine=10420254; - //BA.debugLineNum = 10420254;BA.debugLine="If B4XPages.MainPage.cliente.IsInitialized Then"; + //BA.debugLineNum = 98;BA.debugLine="If B4XPages.MainPage.cliente.IsInitialized Then"; if (_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._cliente /*keymon.lat.medicomed.c_cliente*/ .IsInitialized /*boolean*/ ()) { -RDebugUtils.currentLine=10420255; - //BA.debugLineNum = 10420255;BA.debugLine="B4XPages.MainPage.cliente.motivoNoVenta = motivo"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._cliente /*keymon.lat.medicomed.c_cliente*/ ._motivonoventa /*String*/ = __ref._motivo /*String*/ ; -RDebugUtils.currentLine=10420256; - //BA.debugLineNum = 10420256;BA.debugLine="Subs.bitacora(Subs.fechanormal(DateTime.Now), us"; -_subs._bitacora /*String*/ (ba,_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),__ref._usuario /*String*/ ,_subs._traealmacen /*String*/ (ba),_subs._traeruta /*String*/ (ba),"No Venta",_subs._traecliente /*String*/ (ba),"",_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ,_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ,BA.NumberToString(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._cliente /*keymon.lat.medicomed.c_cliente*/ ._precision /*int*/ ),__ref._motivo /*String*/ ,__ref._e_comm /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()); -RDebugUtils.currentLine=10420257; - //BA.debugLineNum = 10420257;BA.debugLine="Starter.enVenta = False"; + //BA.debugLineNum = 99;BA.debugLine="B4XPages.MainPage.cliente.motivoNoVenta = motivo"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._cliente /*keymon.lat.medicomed.c_cliente*/ ._motivonoventa /*String*/ = _motivo; + //BA.debugLineNum = 100;BA.debugLine="Subs.bitacora(Subs.fechanormal(DateTime.Now), us"; +_subs._bitacora /*String*/ (ba,_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_usuario,_subs._traealmacen /*String*/ (ba),_subs._traeruta /*String*/ (ba),"No Venta",_subs._traecliente /*String*/ (ba),"",_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ,_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ,BA.NumberToString(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._cliente /*keymon.lat.medicomed.c_cliente*/ ._precision /*int*/ ),_motivo,_e_comm.getText()); + //BA.debugLineNum = 101;BA.debugLine="Starter.enVenta = False"; _starter._enventa /*boolean*/ = __c.False; }; -RDebugUtils.currentLine=10420260; - //BA.debugLineNum = 10420260;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + //BA.debugLineNum = 104;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente where pc_cliente in (Select CUENTA from cuentaa)"); -RDebugUtils.currentLine=10420261; - //BA.debugLineNum = 10420261;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + //BA.debugLineNum = 105;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido where pe_cliente in (Select CUENTA from cuentaa)"); -RDebugUtils.currentLine=10420263; - //BA.debugLineNum = 10420263;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO NOVENTA (NV_CLIENTE,NV_FECHA,NV_USER,NV_MOTIVO,NV_COMM,NV_LAT,NV_LON,NV_ENVIO) VALUES(?,?,?,?,?,?,?,0) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._cuenta /*String*/ ),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(__ref._usuario /*String*/ ),(Object)(__ref._motivo /*String*/ ),(Object)(__ref._e_comm /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ )})); -RDebugUtils.currentLine=10420264; - //BA.debugLineNum = 10420264;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_i"; + //BA.debugLineNum = 107;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO NOVENTA (NV_CLIENTE,NV_FECHA,NV_USER,NV_MOTIVO,NV_COMM,NV_LAT,NV_LON,NV_ENVIO) VALUES(?,?,?,?,?,?,?,0) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cuenta),(Object)(_sdate+_stime),(Object)(_usuario),(Object)(_motivo),(Object)(_e_comm.getText()),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ )})); + //BA.debugLineNum = 108;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_i"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("UPDATE kmt_info set gestion = 3 where CAT_CL_CODIGO In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=10420265; - //BA.debugLineNum = 10420265;BA.debugLine="DateTime.TimeFormat = \"HHmmss\""; + //BA.debugLineNum = 109;BA.debugLine="DateTime.TimeFormat = \"HHmmss\""; __c.DateTime.setTimeFormat("HHmmss"); -RDebugUtils.currentLine=10420266; - //BA.debugLineNum = 10420266;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -__ref._stime /*String*/ = __c.DateTime.Time(__c.DateTime.getNow()); -RDebugUtils.currentLine=10420267; - //BA.debugLineNum = 10420267;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HIST"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE HIST_STAY_STORE set HSS_OUT = ? where HSS_CODIGO In (select cuenta from cuentaa)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._stime /*String*/ )})); -RDebugUtils.currentLine=10420270; - //BA.debugLineNum = 10420270;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\" Select (subs"; -__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 (substr(HSS_OUT,1,2) - substr(HSS_IN,1,2)) - Case when (substr(HSS_OUT,3,2) - substr(HSS_IN,3,2)) < 0 Then 1 Else 0 end HORAS_TOTALES, "+"Case when (substr(HSS_OUT,3,2) - substr(HSS_IN,3,2)) < 0 Then (substr(HSS_OUT,3,2) + 60 - substr(HSS_IN,3,2)) "+" Else (substr(HSS_OUT,3,2) - substr(HSS_IN,3,2)) End - Case when (substr(HSS_OUT,5,2) - substr(HSS_IN,5,2)) < 0 Then 1 Else 0 end MINUTOS_TOTALES, "+"Case when (substr(HSS_OUT,5,2) - substr(HSS_IN,5,2)) < 0 Then (substr(HSS_OUT,5,2) + 60 - substr(HSS_IN,5,2)) "+" Else (substr(HSS_OUT,5,2) - substr(HSS_IN,5,2)) end SEGUNDOS_TOTALES "+" from HIST_STAY_STORE where HSS_CODIGO In (Select cuenta from cuentaa) "))); -RDebugUtils.currentLine=10420276; - //BA.debugLineNum = 10420276;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=10420277; - //BA.debugLineNum = 10420277;BA.debugLine="stay_hh = c.GetString(\"HORAS_TOTALES\") * 60 * 60"; -__ref._stay_hh /*String*/ = BA.NumberToString((double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HORAS_TOTALES")))*60*60); -RDebugUtils.currentLine=10420278; - //BA.debugLineNum = 10420278;BA.debugLine="stay_mi = c.GetString(\"MINUTOS_TOTALES\") * 60"; -__ref._stay_mi /*String*/ = BA.NumberToString((double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("MINUTOS_TOTALES")))*60); -RDebugUtils.currentLine=10420279; - //BA.debugLineNum = 10420279;BA.debugLine="stay_ss = c.GetString(\"SEGUNDOS_TOTALES\")"; -__ref._stay_ss /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("SEGUNDOS_TOTALES"); -RDebugUtils.currentLine=10420281; - //BA.debugLineNum = 10420281;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HIST"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE HIST_STAY_STORE set HSS_TOT = ? where HSS_CODIGO In (select cuenta from cuentaa)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)((double)(Double.parseDouble(__ref._stay_hh /*String*/ ))+(double)(Double.parseDouble(__ref._stay_mi /*String*/ ))+(double)(Double.parseDouble(__ref._stay_ss /*String*/ )))})); -RDebugUtils.currentLine=10420282; - //BA.debugLineNum = 10420282;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HIST"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE HIST_STAY_OUT set HSO_FIN = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._stime /*String*/ )})); -RDebugUtils.currentLine=10420283; - //BA.debugLineNum = 10420283;BA.debugLine="DateTime.TimeFormat = \"HH:mm:ss\""; + //BA.debugLineNum = 110;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; +_stime = __c.DateTime.Time(__c.DateTime.getNow()); + //BA.debugLineNum = 111;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HIST"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE HIST_STAY_STORE set HSS_OUT = ? where HSS_CODIGO In (select cuenta from cuentaa)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_stime)})); + //BA.debugLineNum = 114;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\" Select (subs"; +_c = (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 (substr(HSS_OUT,1,2) - substr(HSS_IN,1,2)) - Case when (substr(HSS_OUT,3,2) - substr(HSS_IN,3,2)) < 0 Then 1 Else 0 end HORAS_TOTALES, "+"Case when (substr(HSS_OUT,3,2) - substr(HSS_IN,3,2)) < 0 Then (substr(HSS_OUT,3,2) + 60 - substr(HSS_IN,3,2)) "+" Else (substr(HSS_OUT,3,2) - substr(HSS_IN,3,2)) End - Case when (substr(HSS_OUT,5,2) - substr(HSS_IN,5,2)) < 0 Then 1 Else 0 end MINUTOS_TOTALES, "+"Case when (substr(HSS_OUT,5,2) - substr(HSS_IN,5,2)) < 0 Then (substr(HSS_OUT,5,2) + 60 - substr(HSS_IN,5,2)) "+" Else (substr(HSS_OUT,5,2) - substr(HSS_IN,5,2)) end SEGUNDOS_TOTALES "+" from HIST_STAY_STORE where HSS_CODIGO In (Select cuenta from cuentaa) "))); + //BA.debugLineNum = 120;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 121;BA.debugLine="stay_hh = c.GetString(\"HORAS_TOTALES\") * 60 * 60"; +_stay_hh = BA.NumberToString((double)(Double.parseDouble(_c.GetString("HORAS_TOTALES")))*60*60); + //BA.debugLineNum = 122;BA.debugLine="stay_mi = c.GetString(\"MINUTOS_TOTALES\") * 60"; +_stay_mi = BA.NumberToString((double)(Double.parseDouble(_c.GetString("MINUTOS_TOTALES")))*60); + //BA.debugLineNum = 123;BA.debugLine="stay_ss = c.GetString(\"SEGUNDOS_TOTALES\")"; +_stay_ss = _c.GetString("SEGUNDOS_TOTALES"); + //BA.debugLineNum = 125;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HIST"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE HIST_STAY_STORE set HSS_TOT = ? where HSS_CODIGO In (select cuenta from cuentaa)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)((double)(Double.parseDouble(_stay_hh))+(double)(Double.parseDouble(_stay_mi))+(double)(Double.parseDouble(_stay_ss)))})); + //BA.debugLineNum = 126;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HIST"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE HIST_STAY_OUT set HSO_FIN = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_stime)})); + //BA.debugLineNum = 127;BA.debugLine="DateTime.TimeFormat = \"HH:mm:ss\""; __c.DateTime.setTimeFormat("HH:mm:ss"); -RDebugUtils.currentLine=10420285; - //BA.debugLineNum = 10420285;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update PEDI"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update PEDIDO_INICIO_FINAL set PIF_HORA_FINAL = ? where PIF_CLIENTE = ? and PIF_HORA_FINAL = 0",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__c.DateTime.getNow()),(Object)(__ref._cuenta /*String*/ )})); -RDebugUtils.currentLine=10420286; - //BA.debugLineNum = 10420286;BA.debugLine="LogColor($\"actualizamos \"${cuenta}, hora_final=$"; -__c.LogImpl("310420286",("actualizamos \""+__c.SmartStringFormatter("",(Object)(__ref._cuenta /*String*/ ))+", hora_final="+__c.SmartStringFormatter("",(Object)(__c.DateTime.getNow()))+""),__c.Colors.Red); -RDebugUtils.currentLine=10420288; - //BA.debugLineNum = 10420288;BA.debugLine="Subs.bitacora(Subs.fechanormal(DateTime.Now), usu"; -_subs._bitacora /*String*/ (ba,_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),__ref._usuario /*String*/ ,_subs._traealmacen /*String*/ (ba),_subs._traeruta /*String*/ (ba),"NO VENTA",_subs._traecliente /*String*/ (ba),_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ,_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ,BA.NumberToString(2),"",BA.ObjectToString(__ref._r_1 /*anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper*/ .getChecked())); -RDebugUtils.currentLine=10420290; - //BA.debugLineNum = 10420290;BA.debugLine="mandaPendientesnoventa"; -__ref._mandapendientesnoventa /*String*/ (null); -RDebugUtils.currentLine=10420291; - //BA.debugLineNum = 10420291;BA.debugLine="B4XPages.ShowPage(\"Principal\")"; + //BA.debugLineNum = 129;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update PEDI"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update PEDIDO_INICIO_FINAL set PIF_HORA_FINAL = ? where PIF_CLIENTE = ? and PIF_HORA_FINAL = 0",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__c.DateTime.getNow()),(Object)(_cuenta)})); + //BA.debugLineNum = 130;BA.debugLine="LogColor($\"actualizamos \"${cuenta}, hora_final=$"; +__c.LogImpl("346727230",("actualizamos \""+__c.SmartStringFormatter("",(Object)(_cuenta))+", hora_final="+__c.SmartStringFormatter("",(Object)(__c.DateTime.getNow()))+""),__c.Colors.Red); + //BA.debugLineNum = 132;BA.debugLine="Subs.bitacora(Subs.fechanormal(DateTime.Now), usu"; +_subs._bitacora /*String*/ (ba,_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_usuario,_subs._traealmacen /*String*/ (ba),_subs._traeruta /*String*/ (ba),"NO VENTA",_subs._traecliente /*String*/ (ba),_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ,_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ,BA.NumberToString(2),"",BA.ObjectToString(_r_1.getChecked())); + //BA.debugLineNum = 134;BA.debugLine="mandaPendientesnoventa"; +_mandapendientesnoventa(); + //BA.debugLineNum = 135;BA.debugLine="B4XPages.ShowPage(\"Principal\")"; _b4xpages._showpage /*String*/ (ba,"Principal"); -RDebugUtils.currentLine=10420292; - //BA.debugLineNum = 10420292;BA.debugLine="End Sub"; + //BA.debugLineNum = 136;BA.debugLine="End Sub"; return ""; } -public String _mandapendientesnoventa(keymon.lat.medicomed.c_noventa __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_noventa"; -if (Debug.shouldDelegate(ba, "mandapendientesnoventa", false)) - {return ((String) Debug.delegate(ba, "mandapendientesnoventa", null));} -int _i = 0; -keymon.lat.medicomed.dbrequestmanager._dbcommand _cmd = null; -RDebugUtils.currentLine=10485760; - //BA.debugLineNum = 10485760;BA.debugLine="Sub mandaPendientesnoventa"; -RDebugUtils.currentLine=10485761; - //BA.debugLineNum = 10485761;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT NV_CL"; -__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 NV_CLIENTE,NV_FECHA,NV_USER,NV_MOTIVO,NV_COMM,NV_LAT,NV_LON, NV_NOMBRE, NV_DIRECCION FROM NOVENTA where NV_ENVIO <> 1"))); -RDebugUtils.currentLine=10485762; - //BA.debugLineNum = 10485762;BA.debugLine="Log($\"NOVENYA_Cliente PENDIENTE: ${c.RowCount}\"$)"; -__c.LogImpl("310485762",("NOVENYA_Cliente PENDIENTE: "+__c.SmartStringFormatter("",(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()))+""),0); -RDebugUtils.currentLine=10485763; - //BA.debugLineNum = 10485763;BA.debugLine="If c.RowCount>0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=10485764; - //BA.debugLineNum = 10485764;BA.debugLine="For i=0 To c.RowCount -1"; -{ -final int step4 = 1; -final int limit4 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); -_i = (int) (0) ; -for (;_i <= limit4 ;_i = _i + step4 ) { -RDebugUtils.currentLine=10485765; - //BA.debugLineNum = 10485765;BA.debugLine="c.Position=i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=10485766; - //BA.debugLineNum = 10485766;BA.debugLine="Log(c.GetString(\"NV_MOTIVO\"))"; -__c.LogImpl("310485766",__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_MOTIVO"),0); -RDebugUtils.currentLine=10485767; - //BA.debugLineNum = 10485767;BA.debugLine="If c.GetString(\"NV_MOTIVO\") = \"Cerrado permanen"; -if ((__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_MOTIVO")).equals("Cerrado permanente.")) { -RDebugUtils.currentLine=10485768; - //BA.debugLineNum = 10485768;BA.debugLine="Dim cmd As DBCommand"; -_cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=10485769; - //BA.debugLineNum = 10485769;BA.debugLine="cmd.Initialize"; -_cmd.Initialize(); -RDebugUtils.currentLine=10485770; - //BA.debugLineNum = 10485770;BA.debugLine="cmd.Name = \"insert_clientescerrados_MEDI\""; -_cmd.Name /*String*/ = "insert_clientescerrados_MEDI"; -RDebugUtils.currentLine=10485771; - //BA.debugLineNum = 10485771;BA.debugLine="cmd.Parameters = Array As Object(c.GetString(\""; -_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_CLIENTE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_FECHA")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_USER")),(Object)("CERRADO PERMANENTE"),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_LAT")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_LON")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_NOMBRE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_DIRECCION")),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._principal /*keymon.lat.medicomed.c_principal*/ ._almacen /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._principal /*keymon.lat.medicomed.c_principal*/ ._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())}; -RDebugUtils.currentLine=10485772; - //BA.debugLineNum = 10485772;BA.debugLine="reqManager.ExecuteCommand(cmd , $\"ins_NOVENTAc"; -__ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (null,_cmd,(Object)(("ins_NOVENTAcerradoper_head_"+__c.SmartStringFormatter("",(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_CLIENTE")))+""))); -RDebugUtils.currentLine=10485774; - //BA.debugLineNum = 10485774;BA.debugLine="Dim cmd As DBCommand"; -_cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=10485775; - //BA.debugLineNum = 10485775;BA.debugLine="cmd.Initialize"; -_cmd.Initialize(); -RDebugUtils.currentLine=10485776; - //BA.debugLineNum = 10485776;BA.debugLine="cmd.Name = \"insert_noventa_MEDI\""; -_cmd.Name /*String*/ = "insert_noventa_MEDI"; -RDebugUtils.currentLine=10485777; - //BA.debugLineNum = 10485777;BA.debugLine="cmd.Parameters = Array As Object(c.GetString(\""; -_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_CLIENTE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_FECHA")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_USER")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_MOTIVO")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_COMM")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_LAT")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_LON")),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._principal /*keymon.lat.medicomed.c_principal*/ ._almacen /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._principal /*keymon.lat.medicomed.c_principal*/ ._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_NOMBRE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_DIRECCION"))}; -RDebugUtils.currentLine=10485778; - //BA.debugLineNum = 10485778;BA.debugLine="reqManager.ExecuteCommand(cmd , $\"ins_NOVENTAP"; -__ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (null,_cmd,(Object)(("ins_NOVENTAPendientes_head_"+__c.SmartStringFormatter("",(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_CLIENTE")))+""))); - }else { -RDebugUtils.currentLine=10485780; - //BA.debugLineNum = 10485780;BA.debugLine="Dim cmd As DBCommand"; -_cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=10485781; - //BA.debugLineNum = 10485781;BA.debugLine="cmd.Initialize"; -_cmd.Initialize(); -RDebugUtils.currentLine=10485782; - //BA.debugLineNum = 10485782;BA.debugLine="cmd.Name = \"insert_noventa_MEDI\""; -_cmd.Name /*String*/ = "insert_noventa_MEDI"; -RDebugUtils.currentLine=10485783; - //BA.debugLineNum = 10485783;BA.debugLine="cmd.Parameters = Array As Object(c.GetString(\""; -_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_CLIENTE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_FECHA")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_USER")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_MOTIVO")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_COMM")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_LAT")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_LON")),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._principal /*keymon.lat.medicomed.c_principal*/ ._almacen /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._principal /*keymon.lat.medicomed.c_principal*/ ._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_NOMBRE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_DIRECCION"))}; -RDebugUtils.currentLine=10485784; - //BA.debugLineNum = 10485784;BA.debugLine="reqManager.ExecuteCommand(cmd , $\"ins_NOVENTAP"; -__ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (null,_cmd,(Object)(("ins_NOVENTAPendientes_head_"+__c.SmartStringFormatter("",(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_CLIENTE")))+""))); - }; - } -}; - }; -RDebugUtils.currentLine=10485788; - //BA.debugLineNum = 10485788;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=10485789; - //BA.debugLineNum = 10485789;BA.debugLine="End Sub"; -return ""; +public Object _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 31;BA.debugLine="Public Sub Initialize As Object"; + //BA.debugLineNum = 32;BA.debugLine="Return Me"; +if (true) return this; + //BA.debugLineNum = 33;BA.debugLine="End Sub"; +return null; } -public String _jobdone(keymon.lat.medicomed.c_noventa __ref,keymon.lat.medicomed.httpjob _job) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_noventa"; -if (Debug.shouldDelegate(ba, "jobdone", false)) - {return ((String) Debug.delegate(ba, "jobdone", new Object[] {_job}));} +public String _jobdone(keymon.lat.medicomed.httpjob _job) throws Exception{ keymon.lat.medicomed.dbrequestmanager._dbresult _resultado = null; String _cliente = ""; Object[] _records = null; String _k = ""; -RDebugUtils.currentLine=10551296; - //BA.debugLineNum = 10551296;BA.debugLine="Sub JobDone(Job As HttpJob)"; -RDebugUtils.currentLine=10551297; - //BA.debugLineNum = 10551297;BA.debugLine="Log(Job.Success)"; -__c.LogImpl("310551297",BA.ObjectToString(_job._success /*boolean*/ ),0); -RDebugUtils.currentLine=10551298; - //BA.debugLineNum = 10551298;BA.debugLine="If Job.Success = False Then"; + //BA.debugLineNum = 170;BA.debugLine="Sub JobDone(Job As HttpJob)"; + //BA.debugLineNum = 171;BA.debugLine="Log(Job.Success)"; +__c.LogImpl("346858241",BA.ObjectToString(_job._success /*boolean*/ ),0); + //BA.debugLineNum = 172;BA.debugLine="If Job.Success = False Then"; if (_job._success /*boolean*/ ==__c.False) { }else { -RDebugUtils.currentLine=10551301; - //BA.debugLineNum = 10551301;BA.debugLine="LogColor(\"JobDone: '\" & reqManager.HandleJob(Job"; -__c.LogImpl("310551301","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=10551302; - //BA.debugLineNum = 10551302;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 175;BA.debugLine="LogColor(\"JobDone: '\" & reqManager.HandleJob(Job"; +__c.LogImpl("346858245","JobDone: '"+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 = 176;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=10551303; - //BA.debugLineNum = 10551303;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=10551304; - //BA.debugLineNum = 10551304;BA.debugLine="If resultado.Tag.As(String).IndexOf(\"ins_NOVENT"; + //BA.debugLineNum = 177;BA.debugLine="Dim resultado As DBResult = reqManager.HandleJo"; +_resultado = _reqmanager._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 178;BA.debugLine="If resultado.Tag.As(String).IndexOf(\"ins_NOVENT"; if ((BA.ObjectToString(_resultado.Tag /*Object*/ )).indexOf("ins_NOVENTAPendientes_head_")>-1) { -RDebugUtils.currentLine=10551305; - //BA.debugLineNum = 10551305;BA.debugLine="Private cliente As String= resultado.Tag"; + //BA.debugLineNum = 179;BA.debugLine="Private cliente As String= resultado.Tag"; _cliente = BA.ObjectToString(_resultado.Tag /*Object*/ ); -RDebugUtils.currentLine=10551306; - //BA.debugLineNum = 10551306;BA.debugLine="cliente = cliente.SubString(cliente.IndexOf(\"_"; + //BA.debugLineNum = 180;BA.debugLine="cliente = cliente.SubString(cliente.IndexOf(\"_"; _cliente = _cliente.substring((int) (_cliente.indexOf("_")+24)); -RDebugUtils.currentLine=10551307; - //BA.debugLineNum = 10551307;BA.debugLine="Log($\"Cliente1:${cliente}\"$)"; -__c.LogImpl("310551307",("Cliente1:"+__c.SmartStringFormatter("",(Object)(_cliente))+""),0); -RDebugUtils.currentLine=10551308; - //BA.debugLineNum = 10551308;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update N"; + //BA.debugLineNum = 181;BA.debugLine="Log($\"Cliente1:${cliente}\"$)"; +__c.LogImpl("346858251",("Cliente1:"+__c.SmartStringFormatter("",(Object)(_cliente))+""),0); + //BA.debugLineNum = 182;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update N"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update NOVENTA SET NV_ENVIO = ? WHERE NV_CLIENTE = ? AND NV_ENVIO <> 1",anywheresoftware.b4a.keywords.Common.ArrayToList(new String[]{"1",_cliente})); -RDebugUtils.currentLine=10551309; - //BA.debugLineNum = 10551309;BA.debugLine="For Each records() As Object In resultado.Rows"; + //BA.debugLineNum = 183;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() @@ -548,8 +305,7 @@ final int groupLen12 = group12.getSize() ; for (; index12 < groupLen12;index12++){ _records = (Object[])(group12.Get(index12)); -RDebugUtils.currentLine=10551310; - //BA.debugLineNum = 10551310;BA.debugLine="For Each k As String In resultado.Columns.Key"; + //BA.debugLineNum = 184;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() @@ -557,38 +313,29 @@ final int groupLen13 = group13.getSize() ; for (; index13 < groupLen13;index13++){ _k = BA.ObjectToString(group13.Get(index13)); -RDebugUtils.currentLine=10551311; - //BA.debugLineNum = 10551311;BA.debugLine="Log(resultado.Tag & \": \" & k & \": \" & record"; -__c.LogImpl("310551311",BA.ObjectToString(_resultado.Tag /*Object*/ )+": "+_k+": "+BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_resultado.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)(_k))))]),0); + //BA.debugLineNum = 185;BA.debugLine="Log(resultado.Tag & \": \" & k & \": \" & record"; +__c.LogImpl("346858255",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=10551319; - //BA.debugLineNum = 10551319;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 193;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=10551320; - //BA.debugLineNum = 10551320;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=10551321; - //BA.debugLineNum = 10551321;BA.debugLine="If resultado.Tag.As(String).IndexOf(\"ins_NOVENT"; + //BA.debugLineNum = 194;BA.debugLine="Dim resultado As DBResult = reqManager.HandleJo"; +_resultado = _reqmanager._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 195;BA.debugLine="If resultado.Tag.As(String).IndexOf(\"ins_NOVENT"; if ((BA.ObjectToString(_resultado.Tag /*Object*/ )).indexOf("ins_NOVENTAcerradoper_head_")>-1) { -RDebugUtils.currentLine=10551322; - //BA.debugLineNum = 10551322;BA.debugLine="Private cliente As String= resultado.Tag"; + //BA.debugLineNum = 196;BA.debugLine="Private cliente As String= resultado.Tag"; _cliente = BA.ObjectToString(_resultado.Tag /*Object*/ ); -RDebugUtils.currentLine=10551323; - //BA.debugLineNum = 10551323;BA.debugLine="cliente = cliente.SubString(cliente.IndexOf(\"_"; + //BA.debugLineNum = 197;BA.debugLine="cliente = cliente.SubString(cliente.IndexOf(\"_"; _cliente = _cliente.substring((int) (_cliente.indexOf("_")+24)); -RDebugUtils.currentLine=10551324; - //BA.debugLineNum = 10551324;BA.debugLine="Log($\"Cliente1:${cliente}\"$)"; -__c.LogImpl("310551324",("Cliente1:"+__c.SmartStringFormatter("",(Object)(_cliente))+""),0); -RDebugUtils.currentLine=10551325; - //BA.debugLineNum = 10551325;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update N"; + //BA.debugLineNum = 198;BA.debugLine="Log($\"Cliente1:${cliente}\"$)"; +__c.LogImpl("346858268",("Cliente1:"+__c.SmartStringFormatter("",(Object)(_cliente))+""),0); + //BA.debugLineNum = 199;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update N"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update NOVENTA SET NV_ENVIO = ? WHERE NV_CLIENTE = ? AND NV_ENVIO <> 1",anywheresoftware.b4a.keywords.Common.ArrayToList(new String[]{"1",_cliente})); -RDebugUtils.currentLine=10551326; - //BA.debugLineNum = 10551326;BA.debugLine="For Each records() As Object In resultado.Rows"; + //BA.debugLineNum = 200;BA.debugLine="For Each records() As Object In resultado.Rows"; { final anywheresoftware.b4a.BA.IterableList group26 = _resultado.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen26 = group26.getSize() @@ -596,8 +343,7 @@ final int groupLen26 = group26.getSize() ; for (; index26 < groupLen26;index26++){ _records = (Object[])(group26.Get(index26)); -RDebugUtils.currentLine=10551327; - //BA.debugLineNum = 10551327;BA.debugLine="For Each k As String In resultado.Columns.Key"; + //BA.debugLineNum = 201;BA.debugLine="For Each k As String In resultado.Columns.Key"; { final anywheresoftware.b4a.BA.IterableList group27 = _resultado.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Keys(); final int groupLen27 = group27.getSize() @@ -605,21 +351,90 @@ final int groupLen27 = group27.getSize() ; for (; index27 < groupLen27;index27++){ _k = BA.ObjectToString(group27.Get(index27)); -RDebugUtils.currentLine=10551328; - //BA.debugLineNum = 10551328;BA.debugLine="Log(resultado.Tag & \": \" & k & \": \" & record"; -__c.LogImpl("310551328",BA.ObjectToString(_resultado.Tag /*Object*/ )+": "+_k+": "+BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_resultado.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)(_k))))]),0); + //BA.debugLineNum = 202;BA.debugLine="Log(resultado.Tag & \": \" & k & \": \" & record"; +__c.LogImpl("346858272",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=10551333; - //BA.debugLineNum = 10551333;BA.debugLine="Job.Release"; -_job._release /*String*/ (null); + //BA.debugLineNum = 207;BA.debugLine="Job.Release"; +_job._release /*String*/ (); }; -RDebugUtils.currentLine=10551336; - //BA.debugLineNum = 10551336;BA.debugLine="End Sub"; + //BA.debugLineNum = 210;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +public String _mandapendientesnoventa() throws Exception{ +int _i = 0; +keymon.lat.medicomed.dbrequestmanager._dbcommand _cmd = null; + //BA.debugLineNum = 138;BA.debugLine="Sub mandaPendientesnoventa"; + //BA.debugLineNum = 139;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT NV_CL"; +_c = (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 NV_CLIENTE,NV_FECHA,NV_USER,NV_MOTIVO,NV_COMM,NV_LAT,NV_LON, NV_NOMBRE, NV_DIRECCION FROM NOVENTA where NV_ENVIO <> 1"))); + //BA.debugLineNum = 140;BA.debugLine="Log($\"NOVENYA_Cliente PENDIENTE: ${c.RowCount}\"$)"; +__c.LogImpl("346792706",("NOVENYA_Cliente PENDIENTE: "+__c.SmartStringFormatter("",(Object)(_c.getRowCount()))+""),0); + //BA.debugLineNum = 141;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 142;BA.debugLine="For i=0 To c.RowCount -1"; +{ +final int step4 = 1; +final int limit4 = (int) (_c.getRowCount()-1); +_i = (int) (0) ; +for (;_i <= limit4 ;_i = _i + step4 ) { + //BA.debugLineNum = 143;BA.debugLine="c.Position=i"; +_c.setPosition(_i); + //BA.debugLineNum = 144;BA.debugLine="Log(c.GetString(\"NV_MOTIVO\"))"; +__c.LogImpl("346792710",_c.GetString("NV_MOTIVO"),0); + //BA.debugLineNum = 145;BA.debugLine="If c.GetString(\"NV_MOTIVO\") = \"Cerrado permanen"; +if ((_c.GetString("NV_MOTIVO")).equals("Cerrado permanente.")) { + //BA.debugLineNum = 146;BA.debugLine="Dim cmd As DBCommand"; +_cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); + //BA.debugLineNum = 147;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 148;BA.debugLine="cmd.Name = \"insert_clientescerrados_MEDI\""; +_cmd.Name /*String*/ = "insert_clientescerrados_MEDI"; + //BA.debugLineNum = 149;BA.debugLine="cmd.Parameters = Array As Object(c.GetString(\""; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_c.GetString("NV_CLIENTE")),(Object)(_c.GetString("NV_FECHA")),(Object)(_c.GetString("NV_USER")),(Object)("CERRADO PERMANENTE"),(Object)(_c.GetString("NV_LAT")),(Object)(_c.GetString("NV_LON")),(Object)(_c.GetString("NV_NOMBRE")),(Object)(_c.GetString("NV_DIRECCION")),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._principal /*keymon.lat.medicomed.c_principal*/ ._almacen /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._principal /*keymon.lat.medicomed.c_principal*/ ._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())}; + //BA.debugLineNum = 150;BA.debugLine="reqManager.ExecuteCommand(cmd , $\"ins_NOVENTAc"; +_reqmanager._executecommand /*String*/ (_cmd,(Object)(("ins_NOVENTAcerradoper_head_"+__c.SmartStringFormatter("",(Object)(_c.GetString("NV_CLIENTE")))+""))); + //BA.debugLineNum = 152;BA.debugLine="Dim cmd As DBCommand"; +_cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); + //BA.debugLineNum = 153;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 154;BA.debugLine="cmd.Name = \"insert_noventa_MEDI\""; +_cmd.Name /*String*/ = "insert_noventa_MEDI"; + //BA.debugLineNum = 155;BA.debugLine="cmd.Parameters = Array As Object(c.GetString(\""; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_c.GetString("NV_CLIENTE")),(Object)(_c.GetString("NV_FECHA")),(Object)(_c.GetString("NV_USER")),(Object)(_c.GetString("NV_MOTIVO")),(Object)(_c.GetString("NV_COMM")),(Object)(_c.GetString("NV_LAT")),(Object)(_c.GetString("NV_LON")),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._principal /*keymon.lat.medicomed.c_principal*/ ._almacen /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._principal /*keymon.lat.medicomed.c_principal*/ ._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(_c.GetString("NV_NOMBRE")),(Object)(_c.GetString("NV_DIRECCION"))}; + //BA.debugLineNum = 156;BA.debugLine="reqManager.ExecuteCommand(cmd , $\"ins_NOVENTAP"; +_reqmanager._executecommand /*String*/ (_cmd,(Object)(("ins_NOVENTAPendientes_head_"+__c.SmartStringFormatter("",(Object)(_c.GetString("NV_CLIENTE")))+""))); + }else { + //BA.debugLineNum = 158;BA.debugLine="Dim cmd As DBCommand"; +_cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); + //BA.debugLineNum = 159;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 160;BA.debugLine="cmd.Name = \"insert_noventa_MEDI\""; +_cmd.Name /*String*/ = "insert_noventa_MEDI"; + //BA.debugLineNum = 161;BA.debugLine="cmd.Parameters = Array As Object(c.GetString(\""; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_c.GetString("NV_CLIENTE")),(Object)(_c.GetString("NV_FECHA")),(Object)(_c.GetString("NV_USER")),(Object)(_c.GetString("NV_MOTIVO")),(Object)(_c.GetString("NV_COMM")),(Object)(_c.GetString("NV_LAT")),(Object)(_c.GetString("NV_LON")),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._principal /*keymon.lat.medicomed.c_principal*/ ._almacen /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._principal /*keymon.lat.medicomed.c_principal*/ ._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(_c.GetString("NV_NOMBRE")),(Object)(_c.GetString("NV_DIRECCION"))}; + //BA.debugLineNum = 162;BA.debugLine="reqManager.ExecuteCommand(cmd , $\"ins_NOVENTAP"; +_reqmanager._executecommand /*String*/ (_cmd,(Object)(("ins_NOVENTAPendientes_head_"+__c.SmartStringFormatter("",(Object)(_c.GetString("NV_CLIENTE")))+""))); + }; + } +}; + }; + //BA.debugLineNum = 166;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 167;BA.debugLine="End Sub"; +return ""; +} +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; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/c_nuevocliente.java b/B4A/Objects/src/keymon/lat/medicomed/c_nuevocliente.java index 1debbbf..df69e48 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/c_nuevocliente.java +++ b/B4A/Objects/src/keymon/lat/medicomed/c_nuevocliente.java @@ -10,7 +10,7 @@ public class c_nuevocliente extends B4AClass.ImplB4AClass implements BA.SubDeleg private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.c_nuevocliente"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.c_nuevocliente"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class c_nuevocliente extends B4AClass.ImplB4AClass implements BA.SubDeleg 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.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; @@ -85,65 +78,573 @@ 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\""; +public String _b_foto_click() throws Exception{ + //BA.debugLineNum = 400;BA.debugLine="Private Sub B_FOTO_Click"; + //BA.debugLineNum = 401;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"; + //BA.debugLineNum = 402;BA.debugLine="InitializeCamera2"; +_initializecamera2(); + //BA.debugLineNum = 403;BA.debugLine="Subs.panelVisible(p_camara, 0, 0)"; +_subs._panelvisible /*String*/ (ba,_p_camara,(int) (0),(int) (0)); + //BA.debugLineNum = 404;BA.debugLine="fototomada = DateTime.Now & \"_cliente.jpg\""; +_fototomada = BA.NumberToString(__c.DateTime.getNow())+"_cliente.jpg"; + //BA.debugLineNum = 405;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); +public String _b_foto_inci_click() throws Exception{ + //BA.debugLineNum = 312;BA.debugLine="Private Sub b_foto_inci_Click"; + //BA.debugLineNum = 313;BA.debugLine="camEx2.TakePicture"; +_camex2._takepicture /*String*/ (); + //BA.debugLineNum = 314;BA.debugLine="p_camara.Visible = False"; +_p_camara.setVisible(__c.False); + //BA.debugLineNum = 316;BA.debugLine="End Sub"; +return ""; +} +public String _b4xpage_appear() throws Exception{ + //BA.debugLineNum = 67;BA.debugLine="Sub B4XPage_Appear"; + //BA.debugLineNum = 68;BA.debugLine="E_NOMBRE.Text = \"\""; +_e_nombre.setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 69;BA.debugLine="et_colonia.Text = \"\""; +_et_colonia.setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 70;BA.debugLine="et_cp.Text = \"\""; +_et_cp.setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 71;BA.debugLine="et_direccion.Text = \"\""; +_et_direccion.setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 72;BA.debugLine="lv_colonia.Visible = False"; +_lv_colonia.setVisible(__c.False); + //BA.debugLineNum = 73;BA.debugLine="lv_colonia.Clear"; +_lv_colonia.Clear(); + //BA.debugLineNum = 74;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then"; +if (__c.Not(_starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getGPSEnabled())) { + //BA.debugLineNum = 75;BA.debugLine="ToastMessageShow(\"Es necesario tener el GPS ence"; +__c.ToastMessageShow(BA.ObjectToCharSequence("Es necesario tener el GPS encendido"),__c.True); + //BA.debugLineNum = 76;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent"; +__c.StartActivity(ba,(Object)(_starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getLocationSettingsIntent())); + }; + //BA.debugLineNum = 78;BA.debugLine="GUARDA.Visible = False"; +_guarda.setVisible(__c.False); + //BA.debugLineNum = 79;BA.debugLine="Subs.panelVisible(p_nuevoCliente, 0, 0)"; +_subs._panelvisible /*String*/ (ba,_p_nuevocliente,(int) (0),(int) (0)); + //BA.debugLineNum = 80;BA.debugLine="p_nuevoCliente.Height = Root.Height"; +_p_nuevocliente.setHeight(_root.getHeight()); + //BA.debugLineNum = 81;BA.debugLine="p_nuevoCliente.Width = Root.Width"; +_p_nuevocliente.setWidth(_root.getWidth()); + //BA.debugLineNum = 82;BA.debugLine="Subs.centraEtiqueta(Label1, Root.Width)"; +_subs._centraetiqueta /*String*/ (ba,_label1,_root.getWidth()); + //BA.debugLineNum = 83;BA.debugLine="Subs.centraEtiqueta(Label2, Root.Width)"; +_subs._centraetiqueta /*String*/ (ba,_label2,_root.getWidth()); + //BA.debugLineNum = 84;BA.debugLine="Subs.centraEtiqueta(Label3, Root.Width)"; +_subs._centraetiqueta /*String*/ (ba,_label3,_root.getWidth()); + //BA.debugLineNum = 85;BA.debugLine="Subs.centraEtiqueta(Label4, Root.Width)"; +_subs._centraetiqueta /*String*/ (ba,_label4,_root.getWidth()); + //BA.debugLineNum = 86;BA.debugLine="Subs.centraEtiqueta(l_sinUbicacion, Root.Width)"; +_subs._centraetiqueta /*String*/ (ba,_l_sinubicacion,_root.getWidth()); + //BA.debugLineNum = 87;BA.debugLine="Subs.centraEtiqueta(b_ubicacion, Root.Width)"; +_subs._centraetiqueta /*String*/ (ba,_b_ubicacion,_root.getWidth()); + //BA.debugLineNum = 88;BA.debugLine="Subs.centraPanel(p_botones, Root.Width)"; +_subs._centrapanel /*String*/ (ba,_p_botones,_root.getWidth()); + //BA.debugLineNum = 89;BA.debugLine="E_NOMBRE.Left = Round(Root.Width/2)-(E_NOMBRE.Wid"; +_e_nombre.setLeft((int) (__c.Round(_root.getWidth()/(double)2)-(_e_nombre.getWidth()/(double)2))); + //BA.debugLineNum = 90;BA.debugLine="et_direccion.Left = Round(Root.Width/2)-(E_NOMBRE"; +_et_direccion.setLeft((int) (__c.Round(_root.getWidth()/(double)2)-(_e_nombre.getWidth()/(double)2))); + //BA.debugLineNum = 91;BA.debugLine="et_colonia.Left = Round(Root.Width/2)-(E_NOMBRE.W"; +_et_colonia.setLeft((int) (__c.Round(_root.getWidth()/(double)2)-(_e_nombre.getWidth()/(double)2))); + //BA.debugLineNum = 92;BA.debugLine="et_cp.Left = Round(Root.Width/2)-(E_NOMBRE.Width/"; +_et_cp.setLeft((int) (__c.Round(_root.getWidth()/(double)2)-(_e_nombre.getWidth()/(double)2))); + //BA.debugLineNum = 93;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) { + //BA.debugLineNum = 94;BA.debugLine="GUARDA.Visible = True 'Si hay ubicaccion, mostra"; +_guarda.setVisible(__c.True); + //BA.debugLineNum = 95;BA.debugLine="l_sinUbicacion.Visible = False"; +_l_sinubicacion.setVisible(__c.False); + }; + //BA.debugLineNum = 98;BA.debugLine="If Not(Starter.GPS.GPSEnabled) Then"; +if (__c.Not(_starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getGPSEnabled())) { + //BA.debugLineNum = 99;BA.debugLine="ToastMessageShow(\"Debe Activar el GPS del Equipo"; +__c.ToastMessageShow(BA.ObjectToCharSequence("Debe Activar el GPS del Equipo."),__c.True); + //BA.debugLineNum = 100;BA.debugLine="StartActivity(Starter.GPS.LocationSettingsIntent"; +__c.StartActivity(ba,(Object)(_starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getLocationSettingsIntent())); + }else { + //BA.debugLineNum = 102;BA.debugLine="Starter.GPS.Start(0, 0)"; +_starter._gps /*anywheresoftware.b4a.gps.GPS*/ .Start(ba,(long) (0),(float) (0)); + }; + //BA.debugLineNum = 105;BA.debugLine="CallSubDelayed(Tracker, \"StartFLPSmall\")"; +__c.CallSubDelayed(ba,(Object)(_tracker.getObject()),"StartFLPSmall"); + //BA.debugLineNum = 106;BA.debugLine="desdeBD = False"; +_desdebd = __c.False; + //BA.debugLineNum = 107;BA.debugLine="End Sub"; +return ""; +} +public String _b4xpage_created(anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ + //BA.debugLineNum = 51;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; + //BA.debugLineNum = 52;BA.debugLine="Root = Root1"; +_root = _root1; + //BA.debugLineNum = 54;BA.debugLine="Root.LoadLayout(\"nuevocliente\")"; +_root.LoadLayout("nuevocliente",ba); + //BA.debugLineNum = 55;BA.debugLine="ruta = File.DirInternal"; +_ruta = __c.File.getDirInternal(); + //BA.debugLineNum = 56;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; +if (__c.File.Exists(_ruta,"kmt.db")==__c.False) { + //BA.debugLineNum = 57;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; +__c.File.Copy(__c.File.getDirAssets(),"kmt.db",_ruta,"kmt.db"); + }; + //BA.debugLineNum = 62;BA.debugLine="reqManager.Initialize(Me, B4XPages.MainPage.SERVE"; +_reqmanager._initialize /*String*/ (ba,this,_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._server /*String*/ ); + //BA.debugLineNum = 63;BA.debugLine="End Sub"; +return ""; +} +public String _camera1_picturetaken(byte[] _data) throws Exception{ +String _filename = ""; +String _dirp = ""; +String _dir = ""; +String _dir2 = ""; + //BA.debugLineNum = 359;BA.debugLine="Sub Camera1_PictureTaken (Data()As Byte)"; + //BA.debugLineNum = 360;BA.debugLine="Log(\"tome foto\")"; +__c.LogImpl("355115777","tome foto",0); + //BA.debugLineNum = 361;BA.debugLine="Dim filename As String = fototomada"; +_filename = _fototomada; + //BA.debugLineNum = 362;BA.debugLine="Dim Dirp As String = File.DirInternal"; +_dirp = __c.File.getDirInternal(); + //BA.debugLineNum = 363;BA.debugLine="Dim Dir As String"; +_dir = ""; + //BA.debugLineNum = 364;BA.debugLine="Dim Dir2 As String"; +_dir2 = ""; + //BA.debugLineNum = 365;BA.debugLine="Try"; +try { //BA.debugLineNum = 366;BA.debugLine="File.MakeDir(Dirp,\"/promotoriakmts\")"; +__c.File.MakeDir(_dirp,"/promotoriakmts"); + //BA.debugLineNum = 367;BA.debugLine="Dir = \"/promotoriakmts\""; +_dir = "/promotoriakmts"; + //BA.debugLineNum = 368;BA.debugLine="Log(\"creado en promotoria \" & Dirp & Dir)"; +__c.LogImpl("355115785","creado en promotoria "+_dirp+_dir,0); + } + catch (Exception e11) { + ba.setLastException(e11); //BA.debugLineNum = 370;BA.debugLine="Dir = \"\""; +_dir = ""; + //BA.debugLineNum = 371;BA.debugLine="Log(\"creado en raiz\")"; +__c.LogImpl("355115788","creado en raiz",0); + }; + //BA.debugLineNum = 374;BA.debugLine="Try"; +try { //BA.debugLineNum = 375;BA.debugLine="File.MakeDir(Dirp & Dir,\"/reduccion\")"; +__c.File.MakeDir(_dirp+_dir,"/reduccion"); + //BA.debugLineNum = 376;BA.debugLine="Dir2 = \"/reduccion\""; +_dir2 = "/reduccion"; + //BA.debugLineNum = 377;BA.debugLine="Log(\"creado en promotoria \" & Dirp & Dir & Dir2)"; +__c.LogImpl("355115794","creado en promotoria "+_dirp+_dir+_dir2,0); + } + catch (Exception e19) { + ba.setLastException(e19); //BA.debugLineNum = 379;BA.debugLine="Dir = \"\""; +_dir = ""; + //BA.debugLineNum = 380;BA.debugLine="Log(\"creado en raiz\")"; +__c.LogImpl("355115797","creado en raiz",0); + }; + //BA.debugLineNum = 383;BA.debugLine="camEx2.SavePictureToFile(Data, Dirp&Dir, filename"; +_camex2._savepicturetofile /*String*/ (_data,_dirp+_dir,_filename); + //BA.debugLineNum = 384;BA.debugLine="camEx2.StartPreview 'restart preview"; +_camex2._startpreview /*String*/ (); + //BA.debugLineNum = 385;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); + //BA.debugLineNum = 386;BA.debugLine="Log(\"Picture saved.\" & CRLF & \"File size: \" & Fi"; +__c.LogImpl("355115803","Picture saved."+__c.CRLF+"File size: "+BA.NumberToString(__c.File.Size(_dir,_filename))+_dir+","+_filename,0); + //BA.debugLineNum = 387;BA.debugLine="p_camara.Visible = False"; +_p_camara.setVisible(__c.False); + //BA.debugLineNum = 388;BA.debugLine="StopCamera2"; +_stopcamera2(); + //BA.debugLineNum = 390;BA.debugLine="End Sub"; +return ""; +} +public String _camera1_ready(boolean _success) throws Exception{ + //BA.debugLineNum = 345;BA.debugLine="Sub Camera1_Ready (Success As Boolean)"; + //BA.debugLineNum = 346;BA.debugLine="Log(\"Camara ready\")"; +__c.LogImpl("355050241","Camara ready",0); + //BA.debugLineNum = 347;BA.debugLine="If Success Then"; +if (_success) { + //BA.debugLineNum = 348;BA.debugLine="camEx2.SetJpegQuality(90)"; +_camex2._setjpegquality /*String*/ ((int) (90)); + //BA.debugLineNum = 349;BA.debugLine="camEx2.SetContinuousAutoFocus"; +_camex2._setcontinuousautofocus /*String*/ (); + //BA.debugLineNum = 350;BA.debugLine="camEx2.CommitParameters"; +_camex2._commitparameters /*String*/ (); + //BA.debugLineNum = 351;BA.debugLine="camEx2.StartPreview"; +_camex2._startpreview /*String*/ (); + //BA.debugLineNum = 352;BA.debugLine="Log(camEx2.GetPreviewSize)"; +__c.LogImpl("355050247",BA.ObjectToString(_camex2._getpreviewsize /*keymon.lat.medicomed.main._camerasize*/ ()),0); + }else { + //BA.debugLineNum = 354;BA.debugLine="ToastMessageShow(\"Cannot open camera.\", True)"; +__c.ToastMessageShow(BA.ObjectToCharSequence("Cannot open camera."),__c.True); + //BA.debugLineNum = 355;BA.debugLine="Log(\"Cannot open camera\")"; +__c.LogImpl("355050250","Cannot open camera",0); + }; + //BA.debugLineNum = 357;BA.debugLine="End Sub"; +return ""; +} +public String _cancela_click() throws Exception{ + //BA.debugLineNum = 127;BA.debugLine="Sub CANCELA_Click"; + //BA.debugLineNum = 128;BA.debugLine="B4XPages.ShowPage(\"Principal\")"; +_b4xpages._showpage /*String*/ (ba,"Principal"); + //BA.debugLineNum = 129;BA.debugLine="CallSubDelayed(Tracker, \"StartFLP\")"; +__c.CallSubDelayed(ba,(Object)(_tracker.getObject()),"StartFLP"); + //BA.debugLineNum = 130;BA.debugLine="lv_colonia.Clear"; +_lv_colonia.Clear(); + //BA.debugLineNum = 131;BA.debugLine="End Sub"; +return ""; +} +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Private Root As B4XView 'ignore"; +_root = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 3;BA.debugLine="Private xui As XUI 'ignore"; +_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); + //BA.debugLineNum = 5;BA.debugLine="Dim g As GPS"; +_g = new anywheresoftware.b4a.gps.GPS(); + //BA.debugLineNum = 6;BA.debugLine="Dim ruta As String"; +_ruta = ""; + //BA.debugLineNum = 7;BA.debugLine="Dim c As Cursor"; +_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); + //BA.debugLineNum = 8;BA.debugLine="Dim reqManager As DBRequestManager"; +_reqmanager = new keymon.lat.medicomed.dbrequestmanager(); + //BA.debugLineNum = 9;BA.debugLine="Dim CANCELA As Button"; +_cancela = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 10;BA.debugLine="Dim GUARDA As Button"; +_guarda = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 11;BA.debugLine="Dim cuenta As String"; +_cuenta = ""; + //BA.debugLineNum = 12;BA.debugLine="Dim usuario As String"; +_usuario = ""; + //BA.debugLineNum = 13;BA.debugLine="Dim sDate,sTime As String"; +_sdate = ""; +_stime = ""; + //BA.debugLineNum = 14;BA.debugLine="Dim sDate2,sTime2 As String"; +_sdate2 = ""; +_stime2 = ""; + //BA.debugLineNum = 15;BA.debugLine="Dim no_cliente As String"; +_no_cliente = ""; + //BA.debugLineNum = 16;BA.debugLine="Dim no_ruta As String"; +_no_ruta = ""; + //BA.debugLineNum = 17;BA.debugLine="Dim desdeBD As Boolean"; +_desdebd = false; + //BA.debugLineNum = 18;BA.debugLine="Dim r_4 As RadioButton"; +_r_4 = new anywheresoftware.b4a.objects.CompoundButtonWrapper.RadioButtonWrapper(); + //BA.debugLineNum = 19;BA.debugLine="Dim E_NOMBRE As EditText"; +_e_nombre = new anywheresoftware.b4a.objects.EditTextWrapper(); + //BA.debugLineNum = 20;BA.debugLine="Dim tgl As Toggle"; +_tgl = new com.rootsoft.togglelibrary.ToggleLibrary(); + //BA.debugLineNum = 21;BA.debugLine="Private l_sinUbicacion As Label"; +_l_sinubicacion = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 22;BA.debugLine="Private p_nuevoCliente As Panel"; +_p_nuevocliente = new anywheresoftware.b4a.objects.PanelWrapper(); + //BA.debugLineNum = 23;BA.debugLine="Private Label1 As Label"; +_label1 = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 24;BA.debugLine="Private p_botones As Panel"; +_p_botones = new anywheresoftware.b4a.objects.PanelWrapper(); + //BA.debugLineNum = 25;BA.debugLine="Private p_cam As Panel"; +_p_cam = new anywheresoftware.b4a.objects.PanelWrapper(); + //BA.debugLineNum = 26;BA.debugLine="Private p_camara As Panel"; +_p_camara = new anywheresoftware.b4a.objects.PanelWrapper(); + //BA.debugLineNum = 27;BA.debugLine="Private b_foto_inci As Button"; +_b_foto_inci = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 28;BA.debugLine="Private camEx2 As CameraExClass2"; +_camex2 = new keymon.lat.medicomed.cameraexclass2(); + //BA.debugLineNum = 29;BA.debugLine="Dim frontCamera As Boolean = False"; +_frontcamera = __c.False; + //BA.debugLineNum = 30;BA.debugLine="Dim fototomada As String = \"0\""; +_fototomada = "0"; + //BA.debugLineNum = 31;BA.debugLine="Dim ALMACEN As String"; +_almacen = ""; + //BA.debugLineNum = 32;BA.debugLine="Private et_direccion As EditText"; +_et_direccion = new anywheresoftware.b4a.objects.EditTextWrapper(); + //BA.debugLineNum = 33;BA.debugLine="Private Label2 As Label"; +_label2 = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 34;BA.debugLine="Dim lat As Double = 0"; +_lat = 0; + //BA.debugLineNum = 35;BA.debugLine="Dim lon As Double = 0"; +_lon = 0; + //BA.debugLineNum = 36;BA.debugLine="Private b_ubicacion As Label"; +_b_ubicacion = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 37;BA.debugLine="Private Label3 As Label"; +_label3 = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 38;BA.debugLine="Private et_colonia As EditText"; +_et_colonia = new anywheresoftware.b4a.objects.EditTextWrapper(); + //BA.debugLineNum = 39;BA.debugLine="Private Label4 As Label"; +_label4 = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 40;BA.debugLine="Private et_cp As EditText"; +_et_cp = new anywheresoftware.b4a.objects.EditTextWrapper(); + //BA.debugLineNum = 41;BA.debugLine="Private lv_colonia As ListView"; +_lv_colonia = new anywheresoftware.b4a.objects.ListViewWrapper(); + //BA.debugLineNum = 42;BA.debugLine="Dim banderasepo As Int"; +_banderasepo = 0; + //BA.debugLineNum = 43;BA.debugLine="End Sub"; +return ""; +} +public String _et_colonia_click() throws Exception{ + //BA.debugLineNum = 137;BA.debugLine="Private Sub et_colonia_Click"; + //BA.debugLineNum = 138;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)); + //BA.debugLineNum = 139;BA.debugLine="If lv_colonia.Visible = False Then"; +if (_lv_colonia.getVisible()==__c.False) { + //BA.debugLineNum = 140;BA.debugLine="lv_colonia.Visible = True"; +_lv_colonia.setVisible(__c.True); + }else { + //BA.debugLineNum = 142;BA.debugLine="lv_colonia.Visible = False"; +_lv_colonia.setVisible(__c.False); + }; + //BA.debugLineNum = 144;BA.debugLine="End Sub"; +return ""; +} +public String _et_colonia_focuschanged(boolean _hasfocus) throws Exception{ +anywheresoftware.b4a.sql.SQL.CursorWrapper _cc = null; +int _i = 0; + //BA.debugLineNum = 162;BA.debugLine="Private Sub et_colonia_FocusChanged (HasFocus As B"; + //BA.debugLineNum = 163;BA.debugLine="If HasFocus Then"; +if (_hasfocus) { + //BA.debugLineNum = 164;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)(_et_cp.getText()))+"'")))); + //BA.debugLineNum = 165;BA.debugLine="lv_colonia.Clear"; +_lv_colonia.Clear(); + //BA.debugLineNum = 166;BA.debugLine="lv_colonia.BringToFront"; +_lv_colonia.BringToFront(); + //BA.debugLineNum = 167;BA.debugLine="Private Label1 As Label"; +_label1 = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 168;BA.debugLine="Label1 = lv_colonia.SingleLineLayout.Label"; +_label1 = _lv_colonia.getSingleLineLayout().Label; + //BA.debugLineNum = 169;BA.debugLine="Label1.TextColor = Colors.White"; +_label1.setTextColor(__c.Colors.White); + //BA.debugLineNum = 170;BA.debugLine="Label1.TextSize = 14"; +_label1.setTextSize((float) (14)); + //BA.debugLineNum = 172;BA.debugLine="If cc.RowCount > 0 Then"; +if (_cc.getRowCount()>0) { + //BA.debugLineNum = 173;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 ) { + //BA.debugLineNum = 174;BA.debugLine="cc.Position = i"; +_cc.setPosition(_i); + //BA.debugLineNum = 175;BA.debugLine="lv_colonia.AddSingleLine(cc.GetString(\"COLONIA"; +_lv_colonia.AddSingleLine(BA.ObjectToCharSequence(_cc.GetString("COLONIA"))); + } +}; + //BA.debugLineNum = 178;BA.debugLine="lv_colonia.AddSingleLine(\"Ingrese colonia manua"; +_lv_colonia.AddSingleLine(BA.ObjectToCharSequence("Ingrese colonia manualmente.")); + }else { + //BA.debugLineNum = 180;BA.debugLine="lv_colonia.AddSingleLine(\"Código no encontrado."; +_lv_colonia.AddSingleLine(BA.ObjectToCharSequence("Código no encontrado.")); + //BA.debugLineNum = 181;BA.debugLine="lv_colonia.AddSingleLine(\"Ingrese colonia manua"; +_lv_colonia.AddSingleLine(BA.ObjectToCharSequence("Ingrese colonia manualmente.")); + }; + //BA.debugLineNum = 183;BA.debugLine="lv_colonia.Visible = True"; +_lv_colonia.setVisible(__c.True); + }; + //BA.debugLineNum = 185;BA.debugLine="End Sub"; +return ""; +} +public String _et_cp_click() throws Exception{ + //BA.debugLineNum = 133;BA.debugLine="Sub et_cp_click"; + //BA.debugLineNum = 134;BA.debugLine="lv_colonia.Visible = False"; +_lv_colonia.setVisible(__c.False); + //BA.debugLineNum = 135;BA.debugLine="End Sub"; +return ""; +} +public String _et_cp_textchanged(String _old,String _new) throws Exception{ +anywheresoftware.b4a.sql.SQL.CursorWrapper _cc = null; +int _x = 0; + //BA.debugLineNum = 146;BA.debugLine="Private Sub et_cp_TextChanged (Old As String, New"; + //BA.debugLineNum = 147;BA.debugLine="If Not(desdeBD) And New.Length = 5 Then"; +if (__c.Not(_desdebd) && _new.length()==5) { + //BA.debugLineNum = 148;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)(_et_cp.getText()))+"'")))); + //BA.debugLineNum = 150;BA.debugLine="If cc.RowCount > 0 Then"; +if (_cc.getRowCount()>0) { + //BA.debugLineNum = 151;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 ) { + //BA.debugLineNum = 152;BA.debugLine="cc.Position = x"; +_cc.setPosition(_x); + } +}; + }; + }else if(_new.length()<5) { + //BA.debugLineNum = 156;BA.debugLine="lv_colonia.Visible = False"; +_lv_colonia.setVisible(__c.False); + }; + //BA.debugLineNum = 158;BA.debugLine="desdeBD = False"; +_desdebd = __c.False; + //BA.debugLineNum = 159;BA.debugLine="End Sub"; +return ""; +} +public String _gps_locationchanged(anywheresoftware.b4a.gps.LocationWrapper _location1) throws Exception{ + //BA.debugLineNum = 109;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; + //BA.debugLineNum = 110;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) { + //BA.debugLineNum = 111;BA.debugLine="GUARDA.Visible = True 'Si hay ubicaccion, mostra"; +_guarda.setVisible(__c.True); + //BA.debugLineNum = 112;BA.debugLine="l_sinUbicacion.Visible = True"; +_l_sinubicacion.setVisible(__c.True); + //BA.debugLineNum = 113;BA.debugLine="lat = Location1.Latitude"; +_lat = _location1.getLatitude(); + //BA.debugLineNum = 114;BA.debugLine="lon = Location1.Longitude"; +_lon = _location1.getLongitude(); + //BA.debugLineNum = 115;BA.debugLine="l_sinUbicacion.Text = (\"Latitud: \" & lat & \", Lo"; +_l_sinubicacion.setText(BA.ObjectToCharSequence(("Latitud: "+BA.NumberToString(_lat)+", Longotud: "+BA.NumberToString(_lon)))); + }; + //BA.debugLineNum = 118;BA.debugLine="b_ubicacion.TextSize = 13"; +_b_ubicacion.setTextSize((float) (13)); + //BA.debugLineNum = 119;BA.debugLine="b_ubicacion.Text = $\"Precisión GPS $1.0{Location1"; +_b_ubicacion.setText(BA.ObjectToCharSequence(("Precisión GPS "+__c.SmartStringFormatter("1.0",(Object)(_location1.getAccuracy()))+" m"))); + //BA.debugLineNum = 120;BA.debugLine="If Location1.Accuracy > 200 Then"; +if (_location1.getAccuracy()>200) { + //BA.debugLineNum = 121;BA.debugLine="b_ubicacion.TextColor = Colors.Red"; +_b_ubicacion.setTextColor(__c.Colors.Red); + //BA.debugLineNum = 122;BA.debugLine="b_ubicacion.TextSize = 16"; +_b_ubicacion.setTextSize((float) (16)); + //BA.debugLineNum = 123;BA.debugLine="b_ubicacion.Text = $\"Mala señal $1.0{Location1.A"; +_b_ubicacion.setText(BA.ObjectToCharSequence(("Mala señal "+__c.SmartStringFormatter("1.0",(Object)(_location1.getAccuracy()))+" m"))); + }; + //BA.debugLineNum = 125;BA.debugLine="End Sub"; +return ""; +} +public String _guarda_click() throws Exception{ +String _hora = ""; +String _mins = ""; +String _segs = ""; + //BA.debugLineNum = 197;BA.debugLine="Sub GUARDA_Click"; + //BA.debugLineNum = 198;BA.debugLine="If E_NOMBRE.Text = \"\" Then"; +if ((_e_nombre.getText()).equals("")) { + //BA.debugLineNum = 199;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 { + //BA.debugLineNum = 201;BA.debugLine="If et_direccion.Text.Length > 3 Then"; +if (_et_direccion.getText().length()>3) { + //BA.debugLineNum = 202;BA.debugLine="If lat <> 0 Then"; +if (_lat!=0) { + //BA.debugLineNum = 203;BA.debugLine="If et_colonia.Text.Length > 3 Then"; +if (_et_colonia.getText().length()>3) { + //BA.debugLineNum = 204;BA.debugLine="If et_cp.Text.Length > 3 Then"; +if (_et_cp.getText().length()>3) { + //BA.debugLineNum = 206;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; +__c.DateTime.setDateFormat("MM/dd/yyyy"); + //BA.debugLineNum = 207;BA.debugLine="DateTime.Timeformat = \"HHmmss\""; +__c.DateTime.setTimeFormat("HHmmss"); + //BA.debugLineNum = 208;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; +_sdate = __c.DateTime.Date(__c.DateTime.getNow()); + //BA.debugLineNum = 209;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; +_stime = __c.DateTime.Time(__c.DateTime.getNow()); + //BA.debugLineNum = 210;BA.debugLine="Log($\" //////////// Date: ${sDate} - Time:"; +__c.LogImpl("354657037",(" //////////// Date: "+__c.SmartStringFormatter("",(Object)(_sdate))+" - Time: "+__c.SmartStringFormatter("",(Object)(_stime))+" ////////////////"),0); + //BA.debugLineNum = 212;BA.debugLine="Private hora As String = sTime.SubString2(0,"; +_hora = _stime.substring((int) (0),(int) (2)); + //BA.debugLineNum = 213;BA.debugLine="Private mins As String = sTime.SubString2(2,"; +_mins = _stime.substring((int) (2),(int) (4)); + //BA.debugLineNum = 214;BA.debugLine="Private segs As String = sTime.SubString(4)"; +_segs = _stime.substring((int) (4)); + //BA.debugLineNum = 215;BA.debugLine="sTime = hora&\":\"&mins&\":\"&segs"; +_stime = _hora+":"+_mins+":"+_segs; + //BA.debugLineNum = 216;BA.debugLine="Log(\"////////////// sTime: \"&sTime&\" ///////"; +__c.LogImpl("354657043","////////////// sTime: "+_stime+" ////////////////",0); + //BA.debugLineNum = 217;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select C"; +_c = (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"))); + //BA.debugLineNum = 218;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 219;BA.debugLine="no_ruta= c.GetString(\"CAT_CL_RUTA\")"; +_no_ruta = _c.GetString("CAT_CL_RUTA"); + //BA.debugLineNum = 220;BA.debugLine="no_cliente= \"N\" & sTime & no_ruta"; +_no_cliente = "N"+_stime+_no_ruta; + //BA.debugLineNum = 221;BA.debugLine="Log(\"++ ++ no_cliente = \"&no_cliente)"; +__c.LogImpl("354657048","++ ++ no_cliente = "+_no_cliente,0); + //BA.debugLineNum = 222;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 223;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)(_no_cliente),(Object)(_no_ruta),(Object)(_e_nombre.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*/ )})); + //BA.debugLineNum = 224;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)(_no_cliente)})); + //BA.debugLineNum = 225;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from CUENTAA"); + //BA.debugLineNum = 226;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)(_no_cliente)})); + //BA.debugLineNum = 227;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select I"; +_c = (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"))); + //BA.debugLineNum = 228;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 229;BA.debugLine="C.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 230;BA.debugLine="ALMACEN = C.GetString(\"ID_ALMACEN\")"; +_almacen = _c.GetString("ID_ALMACEN"); + }; + //BA.debugLineNum = 232;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 233;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select u"; +_c = (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"))); + //BA.debugLineNum = 234;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 235;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; +_usuario = _c.GetString("USUARIO"); + //BA.debugLineNum = 236;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 239;BA.debugLine="DateTime.DateFormat = \"dd/MM/yyyy\""; +__c.DateTime.setDateFormat("dd/MM/yyyy"); + //BA.debugLineNum = 240;BA.debugLine="DateTime.Timeformat = \"HH:mm:ss\""; +__c.DateTime.setTimeFormat("HH:mm:ss"); + //BA.debugLineNum = 241;BA.debugLine="sDate2=DateTime.Date(DateTime.Now)"; +_sdate2 = __c.DateTime.Date(__c.DateTime.getNow()); + //BA.debugLineNum = 242;BA.debugLine="sTime2=DateTime.Time(DateTime.Now)"; +_stime2 = __c.DateTime.Time(__c.DateTime.getNow()); + //BA.debugLineNum = 244;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[]{_no_cliente,_sdate2+" "+_stime2,_usuario,BA.NumberToString(_lat),BA.NumberToString(_lon),_e_nombre.getText(),_et_direccion.getText(),_et_colonia.getText(),_et_cp.getText(),_almacen,_no_ruta,BA.NumberToString(_banderasepo)})); + //BA.debugLineNum = 245;BA.debugLine="fototomada = \"0\""; +_fototomada = "0"; + //BA.debugLineNum = 246;BA.debugLine="B4XPages.ShowPage(\"cliente\")"; +_b4xpages._showpage /*String*/ (ba,"cliente"); + //BA.debugLineNum = 247;BA.debugLine="CallSubDelayed(Tracker, \"StartFLP\")"; +__c.CallSubDelayed(ba,(Object)(_tracker.getObject()),"StartFLP"); + //BA.debugLineNum = 249;BA.debugLine="mandaPendientesclientesnuevos"; +_mandapendientesclientesnuevos(); + }else { + //BA.debugLineNum = 251;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 { + //BA.debugLineNum = 254;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 { + //BA.debugLineNum = 257;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 { + //BA.debugLineNum = 260;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); + }; + }; + //BA.debugLineNum = 263;BA.debugLine="End Sub"; +return ""; +} +public Object _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 46;BA.debugLine="Public Sub Initialize As Object"; + //BA.debugLineNum = 47;BA.debugLine="Return Me"; +if (true) return this; + //BA.debugLineNum = 48;BA.debugLine="End Sub"; +return null; +} +public void _initializecamera2() throws Exception{ +ResumableSub_InitializeCamera2 rsub = new ResumableSub_InitializeCamera2(this); 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) { +public ResumableSub_InitializeCamera2(keymon.lat.medicomed.c_nuevocliente parent) { 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) { @@ -153,22 +654,19 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=22020097; - //BA.debugLineNum = 22020097;BA.debugLine="Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_"; + //BA.debugLineNum = 319;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); + //BA.debugLineNum = 320;BA.debugLine="Wait For B4XPage_PermissionResult (Permission As"; +parent.__c.WaitFor("b4xpage_permissionresult", ba, this, null); this.state = 19; return; case 19: //C this.state = 1; -_permission = (String) result[1]; -_result = (Boolean) result[2]; +_permission = (String) result[0]; +_result = (Boolean) result[1]; ; -RDebugUtils.currentLine=22020099; - //BA.debugLineNum = 22020099;BA.debugLine="If Result Then"; + //BA.debugLineNum = 321;BA.debugLine="If Result Then"; if (true) break; case 1: @@ -183,22 +681,18 @@ this.state = 5; 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); + //BA.debugLineNum = 322;BA.debugLine="camEx2.Initialize(p_cam, frontCamera, Me, \"Camer"; +parent._camex2._initialize /*String*/ (ba,parent._p_cam,parent._frontcamera,parent,"Camera1"); + //BA.debugLineNum = 323;BA.debugLine="frontCamera = camEx2.Front"; +parent._frontcamera = parent._camex2._front /*boolean*/ ; + //BA.debugLineNum = 324;BA.debugLine="Log(\"inicializamos Camara\")"; +parent.__c.LogImpl("354984710","inicializamos Camara",0); if (true) break; case 5: //C this.state = 6; -RDebugUtils.currentLine=22020104; - //BA.debugLineNum = 22020104;BA.debugLine="ToastMessageShow(\"No permission!!!\", True)"; + //BA.debugLineNum = 326;BA.debugLine="ToastMessageShow(\"No permission!!!\", True)"; parent.__c.ToastMessageShow(BA.ObjectToCharSequence("No permission!!!"),parent.__c.True); if (true) break; @@ -206,22 +700,19 @@ case 6: //C this.state = 7; ; -RDebugUtils.currentLine=22020106; - //BA.debugLineNum = 22020106;BA.debugLine="Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_"; + //BA.debugLineNum = 328;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); + //BA.debugLineNum = 329;BA.debugLine="Wait For B4XPage_PermissionResult (Permission As"; +parent.__c.WaitFor("b4xpage_permissionresult", ba, this, null); this.state = 20; return; case 20: //C this.state = 7; -_permission = (String) result[1]; -_result = (Boolean) result[2]; +_permission = (String) result[0]; +_result = (Boolean) result[1]; ; -RDebugUtils.currentLine=22020108; - //BA.debugLineNum = 22020108;BA.debugLine="If Result Then"; + //BA.debugLineNum = 330;BA.debugLine="If Result Then"; if (true) break; case 7: @@ -236,16 +727,14 @@ this.state = 11; 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); + //BA.debugLineNum = 331;BA.debugLine="Log(\"conpermisos para escritura\")"; +parent.__c.LogImpl("354984717","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)"; + //BA.debugLineNum = 333;BA.debugLine="ToastMessageShow(\"No permission!!!\", True)"; parent.__c.ToastMessageShow(BA.ObjectToCharSequence("No permission!!!"),parent.__c.True); if (true) break; @@ -253,22 +742,19 @@ case 12: //C this.state = 13; ; -RDebugUtils.currentLine=22020114; - //BA.debugLineNum = 22020114;BA.debugLine="Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_"; + //BA.debugLineNum = 336;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); + //BA.debugLineNum = 337;BA.debugLine="Wait For B4XPage_PermissionResult (Permission As"; +parent.__c.WaitFor("b4xpage_permissionresult", ba, this, null); this.state = 21; return; case 21: //C this.state = 13; -_permission = (String) result[1]; -_result = (Boolean) result[2]; +_permission = (String) result[0]; +_result = (Boolean) result[1]; ; -RDebugUtils.currentLine=22020116; - //BA.debugLineNum = 22020116;BA.debugLine="If Result Then"; + //BA.debugLineNum = 338;BA.debugLine="If Result Then"; if (true) break; case 13: @@ -283,16 +769,14 @@ this.state = 17; 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); + //BA.debugLineNum = 339;BA.debugLine="Log(\"conpermisos para escritura\")"; +parent.__c.LogImpl("354984725","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)"; + //BA.debugLineNum = 341;BA.debugLine="ToastMessageShow(\"No permission!!!\", True)"; parent.__c.ToastMessageShow(BA.ObjectToCharSequence("No permission!!!"),parent.__c.True); if (true) break; @@ -300,942 +784,43 @@ case 18: //C this.state = -1; ; -RDebugUtils.currentLine=22020121; - //BA.debugLineNum = 22020121;BA.debugLine="End Sub"; + //BA.debugLineNum = 343;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 void _b4xpage_permissionresult(String _permission,boolean _result) throws Exception{ } -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}));} +public String _jobdone(keymon.lat.medicomed.httpjob _job) throws Exception{ 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"; + //BA.debugLineNum = 283;BA.debugLine="Sub JobDone(Job As HttpJob)"; + //BA.debugLineNum = 284;BA.debugLine="Log(Job.Success)"; +__c.LogImpl("354788097",BA.ObjectToString(_job._success /*boolean*/ ),0); + //BA.debugLineNum = 285;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"; + //BA.debugLineNum = 288;BA.debugLine="LogColor(\"JobDone: '\" & reqManager.HandleJob(Job"; +__c.LogImpl("354788101","JobDone: '"+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 = 289;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"; + //BA.debugLineNum = 290;BA.debugLine="Dim resultado As DBResult = reqManager.HandleJo"; +_resultado = _reqmanager._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 291;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"; + //BA.debugLineNum = 292;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(\"_"; + //BA.debugLineNum = 293;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"; + //BA.debugLineNum = 294;BA.debugLine="Log($\"Cliente1:${cliente}\"$)"; +__c.LogImpl("354788107",("Cliente1:"+__c.SmartStringFormatter("",(Object)(_cliente))+""),0); + //BA.debugLineNum = 295;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"; + //BA.debugLineNum = 296;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() @@ -1243,8 +828,7 @@ final int groupLen12 = group12.getSize() ; 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"; + //BA.debugLineNum = 297;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() @@ -1252,60 +836,94 @@ final int groupLen13 = group13.getSize() ; 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); + //BA.debugLineNum = 298;BA.debugLine="Log(resultado.Tag & \": \" & k & \": \" & record"; +__c.LogImpl("354788111",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); + //BA.debugLineNum = 303;BA.debugLine="Job.Release"; +_job._release /*String*/ (); }; -RDebugUtils.currentLine=21823510; - //BA.debugLineNum = 21823510;BA.debugLine="End Sub"; + //BA.debugLineNum = 305;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 <>"; +public String _lv_colonia_itemclick(int _position,Object _value) throws Exception{ + //BA.debugLineNum = 187;BA.debugLine="Private Sub lv_colonia_ItemClick (Position As Int,"; + //BA.debugLineNum = 188;BA.debugLine="lv_colonia.Visible = False"; +_lv_colonia.setVisible(__c.False); + //BA.debugLineNum = 189;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); + //BA.debugLineNum = 190;BA.debugLine="et_colonia.Text = Value"; +_et_colonia.setText(BA.ObjectToCharSequence(_value)); + //BA.debugLineNum = 191;BA.debugLine="banderasepo = 0"; +_banderasepo = (int) (0); }else { -RDebugUtils.currentLine=21626886; - //BA.debugLineNum = 21626886;BA.debugLine="banderasepo = 1"; -__ref._banderasepo /*int*/ = (int) (1); + //BA.debugLineNum = 193;BA.debugLine="banderasepo = 1"; +_banderasepo = (int) (1); }; -RDebugUtils.currentLine=21626888; - //BA.debugLineNum = 21626888;BA.debugLine="End Sub"; + //BA.debugLineNum = 195;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"; +public String _mandapendientesclientesnuevos() throws Exception{ +int _i = 0; +keymon.lat.medicomed.dbrequestmanager._dbcommand _cmd = null; + //BA.debugLineNum = 266;BA.debugLine="Sub mandaPendientesclientesnuevos"; + //BA.debugLineNum = 267;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT CN_ID"; +_c = (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"))); + //BA.debugLineNum = 268;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 269;BA.debugLine="For i = 0 To c.RowCount - 1"; +{ +final int step3 = 1; +final int limit3 = (int) (_c.getRowCount()-1); +_i = (int) (0) ; +for (;_i <= limit3 ;_i = _i + step3 ) { + //BA.debugLineNum = 270;BA.debugLine="c.Position = i"; +_c.setPosition(_i); + //BA.debugLineNum = 272;BA.debugLine="Dim cmd As DBCommand"; +_cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); + //BA.debugLineNum = 273;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 274;BA.debugLine="cmd.Name = \"insert_clientesnuevos2_MEDI\""; +_cmd.Name /*String*/ = "insert_clientesnuevos2_MEDI"; + //BA.debugLineNum = 275;BA.debugLine="cmd.Parameters = Array As Object(c.GetString(\"C"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_c.GetString("CN_ID")),(Object)(_c.GetString("CN_FECHA")),(Object)(_c.GetString("CN_USER")),(Object)(_c.GetString("CN_LAT")),(Object)(_c.GetString("CN_LON")),(Object)(_c.GetString("CN_NOMBRE")),(Object)(_c.GetString("CN_DIRECCION")),(Object)(_c.GetString("COLONIA")),(Object)(_c.GetString("CP")),(Object)(_c.GetString("CN_ALMACEN")),(Object)(_c.GetString("CN_RUTA")),(Object)(_c.GetString("CN_BANDERA"))}; + //BA.debugLineNum = 276;BA.debugLine="reqManager.ExecuteCommand(cmd , $\"ins_CNUEVOSPe"; +_reqmanager._executecommand /*String*/ (_cmd,(Object)(("ins_CNUEVOSPendientes_head_"+__c.SmartStringFormatter("",(Object)(_c.GetString("CN_ID")))+""))); + } +}; + }; + //BA.debugLineNum = 279;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 280;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +public String _p_nuevocliente_click() throws Exception{ + //BA.debugLineNum = 308;BA.debugLine="Private Sub p_nuevoCliente_Click"; + //BA.debugLineNum = 310;BA.debugLine="End Sub"; +return ""; +} +public String _stopcamera2() throws Exception{ + //BA.debugLineNum = 392;BA.debugLine="Private Sub StopCamera2"; + //BA.debugLineNum = 394;BA.debugLine="If camEx2.IsInitialized Then"; +if (_camex2.IsInitialized /*boolean*/ ()) { + //BA.debugLineNum = 395;BA.debugLine="camEx2.Release"; +_camex2._release /*String*/ (); + }; + //BA.debugLineNum = 397;BA.debugLine="End Sub"; +return ""; +} +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; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/c_pedidos.java b/B4A/Objects/src/keymon/lat/medicomed/c_pedidos.java index 8bef0eb..f0aec12 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/c_pedidos.java +++ b/B4A/Objects/src/keymon/lat/medicomed/c_pedidos.java @@ -10,7 +10,7 @@ public class c_pedidos extends B4AClass.ImplB4AClass implements BA.SubDelegator{ private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.c_pedidos"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.c_pedidos"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class c_pedidos extends B4AClass.ImplB4AClass implements BA.SubDelegator{ 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.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; @@ -95,367 +88,235 @@ 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_pedidos __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="c_pedidos"; -if (Debug.shouldDelegate(ba, "initialize", false)) - {return ((Object) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=22413312; - //BA.debugLineNum = 22413312;BA.debugLine="Public Sub Initialize As Object"; -RDebugUtils.currentLine=22413313; - //BA.debugLineNum = 22413313;BA.debugLine="Return Me"; -if (true) return this; -RDebugUtils.currentLine=22413314; - //BA.debugLineNum = 22413314;BA.debugLine="End Sub"; -return null; -} -public String _b4xpage_appear(keymon.lat.medicomed.c_pedidos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_pedidos"; -if (Debug.shouldDelegate(ba, "b4xpage_appear", false)) - {return ((String) Debug.delegate(ba, "b4xpage_appear", null));} +public String _b4xpage_appear() throws Exception{ anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out = null; -RDebugUtils.currentLine=22544384; - //BA.debugLineNum = 22544384;BA.debugLine="Sub B4XPage_Appear"; -RDebugUtils.currentLine=22544385; - //BA.debugLineNum = 22544385;BA.debugLine="tgl.Initialize"; -__ref._tgl /*com.rootsoft.togglelibrary.ToggleLibrary*/ .Initialize(ba); -RDebugUtils.currentLine=22544386; - //BA.debugLineNum = 22544386;BA.debugLine="BONSABOR = 0"; -__ref._bonsabor /*String*/ = BA.NumberToString(0); -RDebugUtils.currentLine=22544387; - //BA.debugLineNum = 22544387;BA.debugLine="BONSABOR2 = 0"; -__ref._bonsabor2 /*String*/ = BA.NumberToString(0); -RDebugUtils.currentLine=22544388; - //BA.debugLineNum = 22544388;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then"; + //BA.debugLineNum = 79;BA.debugLine="Sub B4XPage_Appear"; + //BA.debugLineNum = 80;BA.debugLine="tgl.Initialize"; +_tgl.Initialize(ba); + //BA.debugLineNum = 81;BA.debugLine="BONSABOR = 0"; +_bonsabor = BA.NumberToString(0); + //BA.debugLineNum = 82;BA.debugLine="BONSABOR2 = 0"; +_bonsabor2 = BA.NumberToString(0); + //BA.debugLineNum = 83;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then"; if (__c.Not(_starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getGPSEnabled())) { -RDebugUtils.currentLine=22544389; - //BA.debugLineNum = 22544389;BA.debugLine="ToastMessageShow(\"Es necesario tener el GPS ence"; + //BA.debugLineNum = 84;BA.debugLine="ToastMessageShow(\"Es necesario tener el GPS ence"; __c.ToastMessageShow(BA.ObjectToCharSequence("Es necesario tener el GPS encendido"),__c.True); -RDebugUtils.currentLine=22544390; - //BA.debugLineNum = 22544390;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent"; + //BA.debugLineNum = 85;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent"; __c.StartActivity(ba,(Object)(_starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getLocationSettingsIntent())); }; -RDebugUtils.currentLine=22544392; - //BA.debugLineNum = 22544392;BA.debugLine="cantidad.Text = \"\""; -__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence("")); -RDebugUtils.currentLine=22544393; - //BA.debugLineNum = 22544393;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select ID_AL"; -__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=22544394; - //BA.debugLineNum = 22544394;BA.debugLine="C.Position =0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22544395; - //BA.debugLineNum = 22544395;BA.debugLine="ALMACEN = C.GetString(\"ID_ALMACEN\")"; -__ref._almacen /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("ID_ALMACEN"); -RDebugUtils.currentLine=22544396; - //BA.debugLineNum = 22544396;BA.debugLine="C.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22544397; - //BA.debugLineNum = 22544397;BA.debugLine="i_fotol.Visible = False"; -__ref._i_fotol /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=22544398; - //BA.debugLineNum = 22544398;BA.debugLine="sb.Initialize"; -__ref._sb /*anywheresoftware.b4a.keywords.StringBuilderWrapper*/ .Initialize(); -RDebugUtils.currentLine=22544399; - //BA.debugLineNum = 22544399;BA.debugLine="p.Shell(\"ping -c1 -W1 177.244.63.54\",Null, sb,Nul"; -__ref._p /*anywheresoftware.b4a.phone.Phone*/ .Shell("ping -c1 -W1 177.244.63.54",(String[])(__c.Null),(java.lang.StringBuilder)(__ref._sb /*anywheresoftware.b4a.keywords.StringBuilderWrapper*/ .getObject()),(java.lang.StringBuilder)(__c.Null)); -RDebugUtils.currentLine=22544400; - //BA.debugLineNum = 22544400;BA.debugLine="skmt.Initialize(ruta,\"kmt.db\", True)"; -__ref._skmt /*anywheresoftware.b4a.sql.SQL*/ .Initialize(__ref._ruta /*String*/ ,"kmt.db",__c.True); -RDebugUtils.currentLine=22544401; - //BA.debugLineNum = 22544401;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_GP"; -__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_GP_ID,CAT_GP_NOMBRE,CAT_GP_IMP1,CAT_GP_IMP2,CAT_GP_PRECIO,CAT_GP_CLASIF,CAT_GP_STS,CAT_GP_TIPO,CAT_GP_SUBTIPO,CAT_GP_IMG,CAT_GP_ALMACEN,CAT_GP_DEV from CAT_GUNAPROD where CAT_GP_NOMBRE In (Select PDESC from PROID)"))); -RDebugUtils.currentLine=22544402; - //BA.debugLineNum = 22544402;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22544403; - //BA.debugLineNum = 22544403;BA.debugLine="L_PROID.Text = c.GetString(\"CAT_GP_ID\")"; -__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_ID"))); -RDebugUtils.currentLine=22544404; - //BA.debugLineNum = 22544404;BA.debugLine="l_tipo.Text = c.GetString(\"CAT_GP_TIPO\")"; -__ref._l_tipo /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_TIPO"))); -RDebugUtils.currentLine=22544405; - //BA.debugLineNum = 22544405;BA.debugLine="l_sub.Text = c.GetString(\"CAT_GP_SUBTIPO\")"; -__ref._l_sub /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_SUBTIPO"))); -RDebugUtils.currentLine=22544406; - //BA.debugLineNum = 22544406;BA.debugLine="l_marca.Text = c.GetString(\"CAT_GP_CLASIF\")"; -__ref._l_marca /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_CLASIF"))); -RDebugUtils.currentLine=22544407; - //BA.debugLineNum = 22544407;BA.debugLine="l_desc.Text = c.GetString(\"CAT_GP_NOMBRE\")"; -__ref._l_desc /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_NOMBRE"))); -RDebugUtils.currentLine=22544408; - //BA.debugLineNum = 22544408;BA.debugLine="l_precio.Text = c.GetDouble(\"CAT_GP_PRECIO\")"; -__ref._l_precio /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetDouble("CAT_GP_PRECIO"))); -RDebugUtils.currentLine=22544409; - //BA.debugLineNum = 22544409;BA.debugLine="l_bodega.Text = c.GetString(\"CAT_GP_ALMACEN\")"; -__ref._l_bodega /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_ALMACEN"))); -RDebugUtils.currentLine=22544410; - //BA.debugLineNum = 22544410;BA.debugLine="IMG_PASO = c.GetBlob(\"CAT_GP_IMG\")"; -__ref._img_paso /*byte[]*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetBlob("CAT_GP_IMG"); -RDebugUtils.currentLine=22544411; - //BA.debugLineNum = 22544411;BA.debugLine="PROMO_C = c.GetString(\"CAT_GP_STS\")"; -__ref._promo_c /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_STS"); -RDebugUtils.currentLine=22544412; - //BA.debugLineNum = 22544412;BA.debugLine="cambio = c.GetString(\"CAT_GP_DEV\")"; -__ref._cambio /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_DEV"); -RDebugUtils.currentLine=22544413; - //BA.debugLineNum = 22544413;BA.debugLine="preciosin = c.GetString(\"CAT_GP_IMP2\")"; -__ref._preciosin /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_IMP2"); -RDebugUtils.currentLine=22544414; - //BA.debugLineNum = 22544414;BA.debugLine="PROMO_CR = c.GetString(\"CAT_GP_IMP1\")"; -__ref._promo_cr /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_IMP1"); -RDebugUtils.currentLine=22544415; - //BA.debugLineNum = 22544415;BA.debugLine="cambio = \"0\""; -__ref._cambio /*String*/ = "0"; -RDebugUtils.currentLine=22544417; - //BA.debugLineNum = 22544417;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery2(\"select count"; -__ref._e /*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*/ .ExecQuery2("select count(*) as CUANTOS FROM pedido WHERE PE_CEDIS = ? AND PE_CLIENTE IN (Select cuenta from cuentaa) ",new String[]{__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_ID")}))); -RDebugUtils.currentLine=22544418; - //BA.debugLineNum = 22544418;BA.debugLine="e.Position =0"; -__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22544419; - //BA.debugLineNum = 22544419;BA.debugLine="If e.GetString(\"CUANTOS\") = 0 Then"; -if ((__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=22544420; - //BA.debugLineNum = 22544420;BA.debugLine="If l_marca.text = \"PROMOS\" And l_tipo.Text =\"PRO"; -if ((__ref._l_marca /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("PROMOS") && (__ref._l_tipo /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("PROMOS")) { -RDebugUtils.currentLine=22544421; - //BA.debugLineNum = 22544421;BA.debugLine="DESC_PROMO.Visible = True"; -__ref._desc_promo /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=22544422; - //BA.debugLineNum = 22544422;BA.debugLine="CC=B4XPages.MainPage.skmt.ExecQuery2(\"select co"; -__ref._cc /*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*/ .ExecQuery2("select count(*) as CUANTOS FROM PROMOS_COMP WHERE CAT_PA_ID = ?",new String[]{__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_ID")}))); -RDebugUtils.currentLine=22544423; - //BA.debugLineNum = 22544423;BA.debugLine="CC.Position =0"; -__ref._cc /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22544424; - //BA.debugLineNum = 22544424;BA.debugLine="If CC.GetString(\"CUANTOS\") = 0 Then"; -if ((__ref._cc /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=22544425; - //BA.debugLineNum = 22544425;BA.debugLine="l_bodega.Text = \"0\" ' se modifica a cero para"; -__ref._l_bodega /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("0")); + //BA.debugLineNum = 87;BA.debugLine="cantidad.Text = \"\""; +_cantidad.setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 88;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select ID_AL"; +_c = (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"))); + //BA.debugLineNum = 89;BA.debugLine="C.Position =0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 90;BA.debugLine="ALMACEN = C.GetString(\"ID_ALMACEN\")"; +_almacen = _c.GetString("ID_ALMACEN"); + //BA.debugLineNum = 91;BA.debugLine="C.Close"; +_c.Close(); + //BA.debugLineNum = 92;BA.debugLine="i_fotol.Visible = False"; +_i_fotol.setVisible(__c.False); + //BA.debugLineNum = 93;BA.debugLine="sb.Initialize"; +_sb.Initialize(); + //BA.debugLineNum = 94;BA.debugLine="p.Shell(\"ping -c1 -W1 177.244.63.54\",Null, sb,Nul"; +_p.Shell("ping -c1 -W1 177.244.63.54",(String[])(__c.Null),(java.lang.StringBuilder)(_sb.getObject()),(java.lang.StringBuilder)(__c.Null)); + //BA.debugLineNum = 95;BA.debugLine="skmt.Initialize(ruta,\"kmt.db\", True)"; +_skmt.Initialize(_ruta,"kmt.db",__c.True); + //BA.debugLineNum = 96;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_GP"; +_c = (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_GP_ID,CAT_GP_NOMBRE,CAT_GP_IMP1,CAT_GP_IMP2,CAT_GP_PRECIO,CAT_GP_CLASIF,CAT_GP_STS,CAT_GP_TIPO,CAT_GP_SUBTIPO,CAT_GP_IMG,CAT_GP_ALMACEN,CAT_GP_DEV from CAT_GUNAPROD where CAT_GP_NOMBRE In (Select PDESC from PROID)"))); + //BA.debugLineNum = 97;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 98;BA.debugLine="L_PROID.Text = c.GetString(\"CAT_GP_ID\")"; +_l_proid.setText(BA.ObjectToCharSequence(_c.GetString("CAT_GP_ID"))); + //BA.debugLineNum = 99;BA.debugLine="l_tipo.Text = c.GetString(\"CAT_GP_TIPO\")"; +_l_tipo.setText(BA.ObjectToCharSequence(_c.GetString("CAT_GP_TIPO"))); + //BA.debugLineNum = 100;BA.debugLine="l_sub.Text = c.GetString(\"CAT_GP_SUBTIPO\")"; +_l_sub.setText(BA.ObjectToCharSequence(_c.GetString("CAT_GP_SUBTIPO"))); + //BA.debugLineNum = 101;BA.debugLine="l_marca.Text = c.GetString(\"CAT_GP_CLASIF\")"; +_l_marca.setText(BA.ObjectToCharSequence(_c.GetString("CAT_GP_CLASIF"))); + //BA.debugLineNum = 102;BA.debugLine="l_desc.Text = c.GetString(\"CAT_GP_NOMBRE\")"; +_l_desc.setText(BA.ObjectToCharSequence(_c.GetString("CAT_GP_NOMBRE"))); + //BA.debugLineNum = 103;BA.debugLine="l_precio.Text = c.GetDouble(\"CAT_GP_PRECIO\")"; +_l_precio.setText(BA.ObjectToCharSequence(_c.GetDouble("CAT_GP_PRECIO"))); + //BA.debugLineNum = 104;BA.debugLine="l_bodega.Text = c.GetString(\"CAT_GP_ALMACEN\")"; +_l_bodega.setText(BA.ObjectToCharSequence(_c.GetString("CAT_GP_ALMACEN"))); + //BA.debugLineNum = 105;BA.debugLine="IMG_PASO = c.GetBlob(\"CAT_GP_IMG\")"; +_img_paso = _c.GetBlob("CAT_GP_IMG"); + //BA.debugLineNum = 106;BA.debugLine="PROMO_C = c.GetString(\"CAT_GP_STS\")"; +_promo_c = _c.GetString("CAT_GP_STS"); + //BA.debugLineNum = 107;BA.debugLine="cambio = c.GetString(\"CAT_GP_DEV\")"; +_cambio = _c.GetString("CAT_GP_DEV"); + //BA.debugLineNum = 108;BA.debugLine="preciosin = c.GetString(\"CAT_GP_IMP2\")"; +_preciosin = _c.GetString("CAT_GP_IMP2"); + //BA.debugLineNum = 109;BA.debugLine="PROMO_CR = c.GetString(\"CAT_GP_IMP1\")"; +_promo_cr = _c.GetString("CAT_GP_IMP1"); + //BA.debugLineNum = 110;BA.debugLine="cambio = \"0\""; +_cambio = "0"; + //BA.debugLineNum = 112;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery2(\"select count"; +_e = (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*/ .ExecQuery2("select count(*) as CUANTOS FROM pedido WHERE PE_CEDIS = ? AND PE_CLIENTE IN (Select cuenta from cuentaa) ",new String[]{_c.GetString("CAT_GP_ID")}))); + //BA.debugLineNum = 113;BA.debugLine="e.Position =0"; +_e.setPosition((int) (0)); + //BA.debugLineNum = 114;BA.debugLine="If e.GetString(\"CUANTOS\") = 0 Then"; +if ((_e.GetString("CUANTOS")).equals(BA.NumberToString(0))) { + //BA.debugLineNum = 115;BA.debugLine="If l_marca.text = \"PROMOS\" And l_tipo.Text =\"PRO"; +if ((_l_marca.getText()).equals("PROMOS") && (_l_tipo.getText()).equals("PROMOS")) { + //BA.debugLineNum = 116;BA.debugLine="DESC_PROMO.Visible = True"; +_desc_promo.setVisible(__c.True); + //BA.debugLineNum = 117;BA.debugLine="CC=B4XPages.MainPage.skmt.ExecQuery2(\"select co"; +_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*/ .ExecQuery2("select count(*) as CUANTOS FROM PROMOS_COMP WHERE CAT_PA_ID = ?",new String[]{_c.GetString("CAT_GP_ID")}))); + //BA.debugLineNum = 118;BA.debugLine="CC.Position =0"; +_cc.setPosition((int) (0)); + //BA.debugLineNum = 119;BA.debugLine="If CC.GetString(\"CUANTOS\") = 0 Then"; +if ((_cc.GetString("CUANTOS")).equals(BA.NumberToString(0))) { + //BA.debugLineNum = 120;BA.debugLine="l_bodega.Text = \"0\" ' se modifica a cero para"; +_l_bodega.setText(BA.ObjectToCharSequence("0")); }else { -RDebugUtils.currentLine=22544427; - //BA.debugLineNum = 22544427;BA.debugLine="CC.Close"; -__ref._cc /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22544428; - //BA.debugLineNum = 22544428;BA.debugLine="CC=B4XPages.MainPage.skmt.ExecQuery2(\"select C"; -__ref._cc /*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*/ .ExecQuery2("select CAT_PA_MAXPROM, CAT_PA_MAXPROMREC, CAT_PA_MAXPROMCLIE FROM PROMOS_COMP WHERE CAT_PA_ID = ?",new String[]{__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_ID")}))); -RDebugUtils.currentLine=22544429; - //BA.debugLineNum = 22544429;BA.debugLine="CC.Position =0"; -__ref._cc /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22544431; - //BA.debugLineNum = 22544431;BA.debugLine="DD=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT C"; -__ref._dd /*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*/ .ExecQuery2("SELECT COUNT(*) AS CUANTOS FROM HIST_CLIENTE_CANT_PROMOS WHERE HCCP_CLIENTE IN (Select cuenta from cuentaa) AND HCCP_PROMO =?",new String[]{__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_ID")}))); -RDebugUtils.currentLine=22544432; - //BA.debugLineNum = 22544432;BA.debugLine="DD.Position =0"; -__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22544433; - //BA.debugLineNum = 22544433;BA.debugLine="If DD.GetString(\"CUANTOS\") = 0 Then"; -if ((__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=22544434; - //BA.debugLineNum = 22544434;BA.debugLine="HCCP_CANT = 0"; -__ref._hccp_cant /*String*/ = BA.NumberToString(0); + //BA.debugLineNum = 122;BA.debugLine="CC.Close"; +_cc.Close(); + //BA.debugLineNum = 123;BA.debugLine="CC=B4XPages.MainPage.skmt.ExecQuery2(\"select C"; +_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*/ .ExecQuery2("select CAT_PA_MAXPROM, CAT_PA_MAXPROMREC, CAT_PA_MAXPROMCLIE FROM PROMOS_COMP WHERE CAT_PA_ID = ?",new String[]{_c.GetString("CAT_GP_ID")}))); + //BA.debugLineNum = 124;BA.debugLine="CC.Position =0"; +_cc.setPosition((int) (0)); + //BA.debugLineNum = 126;BA.debugLine="DD=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT C"; +_dd = (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*/ .ExecQuery2("SELECT COUNT(*) AS CUANTOS FROM HIST_CLIENTE_CANT_PROMOS WHERE HCCP_CLIENTE IN (Select cuenta from cuentaa) AND HCCP_PROMO =?",new String[]{_c.GetString("CAT_GP_ID")}))); + //BA.debugLineNum = 127;BA.debugLine="DD.Position =0"; +_dd.setPosition((int) (0)); + //BA.debugLineNum = 128;BA.debugLine="If DD.GetString(\"CUANTOS\") = 0 Then"; +if ((_dd.GetString("CUANTOS")).equals(BA.NumberToString(0))) { + //BA.debugLineNum = 129;BA.debugLine="HCCP_CANT = 0"; +_hccp_cant = BA.NumberToString(0); }else { -RDebugUtils.currentLine=22544436; - //BA.debugLineNum = 22544436;BA.debugLine="DD.Close"; -__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22544437; - //BA.debugLineNum = 22544437;BA.debugLine="DD=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT"; -__ref._dd /*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*/ .ExecQuery2("SELECT HCCP_CANT FROM HIST_CLIENTE_CANT_PROMOS WHERE HCCP_CLIENTE IN (Select cuenta from cuentaa) AND HCCP_PROMO =?",new String[]{__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_ID")}))); -RDebugUtils.currentLine=22544438; - //BA.debugLineNum = 22544438;BA.debugLine="DD.Position =0"; -__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22544439; - //BA.debugLineNum = 22544439;BA.debugLine="HCCP_CANT = DD.GetString(\"HCCP_CANT\")"; -__ref._hccp_cant /*String*/ = __ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HCCP_CANT"); -RDebugUtils.currentLine=22544440; - //BA.debugLineNum = 22544440;BA.debugLine="DD.Close"; -__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 131;BA.debugLine="DD.Close"; +_dd.Close(); + //BA.debugLineNum = 132;BA.debugLine="DD=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT"; +_dd = (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*/ .ExecQuery2("SELECT HCCP_CANT FROM HIST_CLIENTE_CANT_PROMOS WHERE HCCP_CLIENTE IN (Select cuenta from cuentaa) AND HCCP_PROMO =?",new String[]{_c.GetString("CAT_GP_ID")}))); + //BA.debugLineNum = 133;BA.debugLine="DD.Position =0"; +_dd.setPosition((int) (0)); + //BA.debugLineNum = 134;BA.debugLine="HCCP_CANT = DD.GetString(\"HCCP_CANT\")"; +_hccp_cant = _dd.GetString("HCCP_CANT"); + //BA.debugLineNum = 135;BA.debugLine="DD.Close"; +_dd.Close(); }; -RDebugUtils.currentLine=22544442; - //BA.debugLineNum = 22544442;BA.debugLine="BONSABOR = HCCP_CANT"; -__ref._bonsabor /*String*/ = __ref._hccp_cant /*String*/ ; -RDebugUtils.currentLine=22544443; - //BA.debugLineNum = 22544443;BA.debugLine="DD=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT C"; -__ref._dd /*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*/ .ExecQuery2("SELECT COUNT(*) AS CUANTOS FROM HIST_VENTAS WHERE HVD_CLIENTE IN (Select cuenta from cuentaa) AND HVD_PRONOMBRE =?",new String[]{__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_NOMBRE")}))); -RDebugUtils.currentLine=22544444; - //BA.debugLineNum = 22544444;BA.debugLine="DD.Position =0"; -__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22544445; - //BA.debugLineNum = 22544445;BA.debugLine="If DD.GetString(\"CUANTOS\") = 0 Then"; -if ((__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=22544446; - //BA.debugLineNum = 22544446;BA.debugLine="HCCP_CANT = 0"; -__ref._hccp_cant /*String*/ = BA.NumberToString(0); + //BA.debugLineNum = 137;BA.debugLine="BONSABOR = HCCP_CANT"; +_bonsabor = _hccp_cant; + //BA.debugLineNum = 138;BA.debugLine="DD=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT C"; +_dd = (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*/ .ExecQuery2("SELECT COUNT(*) AS CUANTOS FROM HIST_VENTAS WHERE HVD_CLIENTE IN (Select cuenta from cuentaa) AND HVD_PRONOMBRE =?",new String[]{_c.GetString("CAT_GP_NOMBRE")}))); + //BA.debugLineNum = 139;BA.debugLine="DD.Position =0"; +_dd.setPosition((int) (0)); + //BA.debugLineNum = 140;BA.debugLine="If DD.GetString(\"CUANTOS\") = 0 Then"; +if ((_dd.GetString("CUANTOS")).equals(BA.NumberToString(0))) { + //BA.debugLineNum = 141;BA.debugLine="HCCP_CANT = 0"; +_hccp_cant = BA.NumberToString(0); }else { -RDebugUtils.currentLine=22544448; - //BA.debugLineNum = 22544448;BA.debugLine="DD.Close"; -__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22544449; - //BA.debugLineNum = 22544449;BA.debugLine="DD=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT"; -__ref._dd /*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*/ .ExecQuery2("SELECT SUM(HVD_CANT) AS HCCP_CANT FROM HIST_VENTAS WHERE HVD_CLIENTE IN (Select cuenta from cuentaa) AND HVD_PRONOMBRE =?",new String[]{__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_NOMBRE")}))); -RDebugUtils.currentLine=22544450; - //BA.debugLineNum = 22544450;BA.debugLine="DD.Position =0"; -__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22544451; - //BA.debugLineNum = 22544451;BA.debugLine="HCCP_CANT = DD.GetString(\"HCCP_CANT\")"; -__ref._hccp_cant /*String*/ = __ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HCCP_CANT"); -RDebugUtils.currentLine=22544452; - //BA.debugLineNum = 22544452;BA.debugLine="DD.Close"; -__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 143;BA.debugLine="DD.Close"; +_dd.Close(); + //BA.debugLineNum = 144;BA.debugLine="DD=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT"; +_dd = (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*/ .ExecQuery2("SELECT SUM(HVD_CANT) AS HCCP_CANT FROM HIST_VENTAS WHERE HVD_CLIENTE IN (Select cuenta from cuentaa) AND HVD_PRONOMBRE =?",new String[]{_c.GetString("CAT_GP_NOMBRE")}))); + //BA.debugLineNum = 145;BA.debugLine="DD.Position =0"; +_dd.setPosition((int) (0)); + //BA.debugLineNum = 146;BA.debugLine="HCCP_CANT = DD.GetString(\"HCCP_CANT\")"; +_hccp_cant = _dd.GetString("HCCP_CANT"); + //BA.debugLineNum = 147;BA.debugLine="DD.Close"; +_dd.Close(); }; -RDebugUtils.currentLine=22544454; - //BA.debugLineNum = 22544454;BA.debugLine="DD=B4XPages.MainPage.skmt.ExecQuery2(\"Select C"; -__ref._dd /*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*/ .ExecQuery2("Select COUNT(*) AS CUANTOS FROM PEDIDO WHERE PE_CLIENTE IN (Select cuenta from cuentaa) AND PE_PROID IN (select CAT_GP_ID from CAT_GUNAPROD where CAT_GP_CLASIF = ?) ",new String[]{__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_NOMBRE")}))); -RDebugUtils.currentLine=22544455; - //BA.debugLineNum = 22544455;BA.debugLine="DD.Position =0"; -__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22544456; - //BA.debugLineNum = 22544456;BA.debugLine="BONSABOR2 = DD.GetString(\"CUANTOS\")"; -__ref._bonsabor2 /*String*/ = __ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS"); -RDebugUtils.currentLine=22544457; - //BA.debugLineNum = 22544457;BA.debugLine="DD.Close"; -__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22544458; - //BA.debugLineNum = 22544458;BA.debugLine="TOTAL_PROMO = CC.GetString(\"CAT_PA_MAXPROMCLIE"; -__ref._total_promo /*String*/ = BA.NumberToString((double)(Double.parseDouble(__ref._cc /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_PA_MAXPROMCLIE")))-(double)(Double.parseDouble(__ref._hccp_cant /*String*/ ))); -RDebugUtils.currentLine=22544459; - //BA.debugLineNum = 22544459;BA.debugLine="If HCCP_CANT = 0 Then"; -if ((__ref._hccp_cant /*String*/ ).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=22544460; - //BA.debugLineNum = 22544460;BA.debugLine="l_bodega.Text = CC.GetString(\"CAT_PA_MAXPROM\""; -__ref._l_bodega /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._cc /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_PA_MAXPROM"))); - }else -{RDebugUtils.currentLine=22544461; - //BA.debugLineNum = 22544461;BA.debugLine="Else IF TOTAL_PROMO > CC.GetString(\"CAT_PA_MAX"; -if ((double)(Double.parseDouble(__ref._total_promo /*String*/ ))>(double)(Double.parseDouble(__ref._cc /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_PA_MAXPROMREC")))) { -RDebugUtils.currentLine=22544462; - //BA.debugLineNum = 22544462;BA.debugLine="l_bodega.Text = CC.GetString(\"CAT_PA_MAXPROM"; -__ref._l_bodega /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._cc /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_PA_MAXPROMREC"))); + //BA.debugLineNum = 149;BA.debugLine="DD=B4XPages.MainPage.skmt.ExecQuery2(\"Select C"; +_dd = (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*/ .ExecQuery2("Select COUNT(*) AS CUANTOS FROM PEDIDO WHERE PE_CLIENTE IN (Select cuenta from cuentaa) AND PE_PROID IN (select CAT_GP_ID from CAT_GUNAPROD where CAT_GP_CLASIF = ?) ",new String[]{_c.GetString("CAT_GP_NOMBRE")}))); + //BA.debugLineNum = 150;BA.debugLine="DD.Position =0"; +_dd.setPosition((int) (0)); + //BA.debugLineNum = 151;BA.debugLine="BONSABOR2 = DD.GetString(\"CUANTOS\")"; +_bonsabor2 = _dd.GetString("CUANTOS"); + //BA.debugLineNum = 152;BA.debugLine="DD.Close"; +_dd.Close(); + //BA.debugLineNum = 153;BA.debugLine="TOTAL_PROMO = CC.GetString(\"CAT_PA_MAXPROMCLIE"; +_total_promo = BA.NumberToString((double)(Double.parseDouble(_cc.GetString("CAT_PA_MAXPROMCLIE")))-(double)(Double.parseDouble(_hccp_cant))); + //BA.debugLineNum = 154;BA.debugLine="If HCCP_CANT = 0 Then"; +if ((_hccp_cant).equals(BA.NumberToString(0))) { + //BA.debugLineNum = 155;BA.debugLine="l_bodega.Text = CC.GetString(\"CAT_PA_MAXPROM\""; +_l_bodega.setText(BA.ObjectToCharSequence(_cc.GetString("CAT_PA_MAXPROM"))); + }else if((double)(Double.parseDouble(_total_promo))>(double)(Double.parseDouble(_cc.GetString("CAT_PA_MAXPROMREC")))) { + //BA.debugLineNum = 157;BA.debugLine="l_bodega.Text = CC.GetString(\"CAT_PA_MAXPROM"; +_l_bodega.setText(BA.ObjectToCharSequence(_cc.GetString("CAT_PA_MAXPROMREC"))); }else { -RDebugUtils.currentLine=22544464; - //BA.debugLineNum = 22544464;BA.debugLine="l_bodega.Text = TOTAL_PROMO"; -__ref._l_bodega /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._total_promo /*String*/ )); - }} -; + //BA.debugLineNum = 159;BA.debugLine="l_bodega.Text = TOTAL_PROMO"; +_l_bodega.setText(BA.ObjectToCharSequence(_total_promo)); + }; }; }else { -RDebugUtils.currentLine=22544468; - //BA.debugLineNum = 22544468;BA.debugLine="DESC_PROMO.Visible = False"; -__ref._desc_promo /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); + //BA.debugLineNum = 163;BA.debugLine="DESC_PROMO.Visible = False"; +_desc_promo.setVisible(__c.False); }; -RDebugUtils.currentLine=22544470; - //BA.debugLineNum = 22544470;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22544471; - //BA.debugLineNum = 22544471;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CASE"; -__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 CASE WHEN pe_costo_tot is null then 0 else sum( pe_costo_tot ) end as TOTAL_CLIE FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); -RDebugUtils.currentLine=22544472; - //BA.debugLineNum = 22544472;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22544473; - //BA.debugLineNum = 22544473;BA.debugLine="t_venta.Text = c.GetString(\"TOTAL_CLIE\")"; -__ref._t_venta /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL_CLIE"))); -RDebugUtils.currentLine=22544474; - //BA.debugLineNum = 22544474;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22544475; - //BA.debugLineNum = 22544475;BA.debugLine="Terminar.Visible = True"; -__ref._terminar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=22544476; - //BA.debugLineNum = 22544476;BA.debugLine="guardar.Visible = True"; -__ref._guardar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=22544477; - //BA.debugLineNum = 22544477;BA.debugLine="cantidad.Visible = True"; -__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=22544478; - //BA.debugLineNum = 22544478;BA.debugLine="If cambio = \"1\" Then"; -if ((__ref._cambio /*String*/ ).equals("1")) { -RDebugUtils.currentLine=22544479; - //BA.debugLineNum = 22544479;BA.debugLine="nopromo.Visible = True"; -__ref._nopromo /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); + //BA.debugLineNum = 165;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 166;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CASE"; +_c = (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 CASE WHEN pe_costo_tot is null then 0 else sum( pe_costo_tot ) end as TOTAL_CLIE FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); + //BA.debugLineNum = 167;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 168;BA.debugLine="t_venta.Text = c.GetString(\"TOTAL_CLIE\")"; +_t_venta.setText(BA.ObjectToCharSequence(_c.GetString("TOTAL_CLIE"))); + //BA.debugLineNum = 169;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 170;BA.debugLine="Terminar.Visible = True"; +_terminar.setVisible(__c.True); + //BA.debugLineNum = 171;BA.debugLine="guardar.Visible = True"; +_guardar.setVisible(__c.True); + //BA.debugLineNum = 172;BA.debugLine="cantidad.Visible = True"; +_cantidad.setVisible(__c.True); + //BA.debugLineNum = 173;BA.debugLine="If cambio = \"1\" Then"; +if ((_cambio).equals("1")) { + //BA.debugLineNum = 174;BA.debugLine="nopromo.Visible = True"; +_nopromo.setVisible(__c.True); }else { -RDebugUtils.currentLine=22544481; - //BA.debugLineNum = 22544481;BA.debugLine="nopromo.Visible = False"; -__ref._nopromo /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); + //BA.debugLineNum = 176;BA.debugLine="nopromo.Visible = False"; +_nopromo.setVisible(__c.False); }; -RDebugUtils.currentLine=22544483; - //BA.debugLineNum = 22544483;BA.debugLine="Dim out As OutputStream"; + //BA.debugLineNum = 178;BA.debugLine="Dim out As OutputStream"; _out = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); -RDebugUtils.currentLine=22544484; - //BA.debugLineNum = 22544484;BA.debugLine="out = File.OpenOutput(ruta, \"1.jpg\", False)"; -_out = __c.File.OpenOutput(__ref._ruta /*String*/ ,"1.jpg",__c.False); -RDebugUtils.currentLine=22544485; - //BA.debugLineNum = 22544485;BA.debugLine="out.WriteBytes(IMG_PASO, 0, IMG_PASO.Length)"; -_out.WriteBytes(__ref._img_paso /*byte[]*/ ,(int) (0),__ref._img_paso /*byte[]*/ .length); -RDebugUtils.currentLine=22544486; - //BA.debugLineNum = 22544486;BA.debugLine="out.Close"; + //BA.debugLineNum = 179;BA.debugLine="out = File.OpenOutput(ruta, \"1.jpg\", False)"; +_out = __c.File.OpenOutput(_ruta,"1.jpg",__c.False); + //BA.debugLineNum = 180;BA.debugLine="out.WriteBytes(IMG_PASO, 0, IMG_PASO.Length)"; +_out.WriteBytes(_img_paso,(int) (0),_img_paso.length); + //BA.debugLineNum = 181;BA.debugLine="out.Close"; _out.Close(); -RDebugUtils.currentLine=22544487; - //BA.debugLineNum = 22544487;BA.debugLine="img_prod.Bitmap = LoadBitmap(ruta,\"1.jpg\")"; -__ref._img_prod /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setBitmap((android.graphics.Bitmap)(__c.LoadBitmap(__ref._ruta /*String*/ ,"1.jpg").getObject())); -RDebugUtils.currentLine=22544488; - //BA.debugLineNum = 22544488;BA.debugLine="TOT_ART_PROMO = \"0\""; -__ref._tot_art_promo /*String*/ = "0"; -RDebugUtils.currentLine=22544489; - //BA.debugLineNum = 22544489;BA.debugLine="TOT_ART_PROMOR = \"0\""; -__ref._tot_art_promor /*String*/ = "0"; -RDebugUtils.currentLine=22544490; - //BA.debugLineNum = 22544490;BA.debugLine="If l_marca.text = \"PROMOS\" And l_tipo.Text =\"PRO"; -if ((__ref._l_marca /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("PROMOS") && (__ref._l_tipo /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("PROMOS") && (__ref._l_bodega /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("0")) { -RDebugUtils.currentLine=22544491; - //BA.debugLineNum = 22544491;BA.debugLine="Msgbox(\"ALERTA\",\"EL CLIENTE NO PUEDE TENER ESTA"; + //BA.debugLineNum = 182;BA.debugLine="img_prod.Bitmap = LoadBitmap(ruta,\"1.jpg\")"; +_img_prod.setBitmap((android.graphics.Bitmap)(__c.LoadBitmap(_ruta,"1.jpg").getObject())); + //BA.debugLineNum = 183;BA.debugLine="TOT_ART_PROMO = \"0\""; +_tot_art_promo = "0"; + //BA.debugLineNum = 184;BA.debugLine="TOT_ART_PROMOR = \"0\""; +_tot_art_promor = "0"; + //BA.debugLineNum = 185;BA.debugLine="If l_marca.text = \"PROMOS\" And l_tipo.Text =\"PRO"; +if ((_l_marca.getText()).equals("PROMOS") && (_l_tipo.getText()).equals("PROMOS") && (_l_bodega.getText()).equals("0")) { + //BA.debugLineNum = 186;BA.debugLine="Msgbox(\"ALERTA\",\"EL CLIENTE NO PUEDE TENER ESTA"; __c.Msgbox(BA.ObjectToCharSequence("ALERTA"),BA.ObjectToCharSequence("EL CLIENTE NO PUEDE TENER ESTA PROMOCION"),ba); -RDebugUtils.currentLine=22544492; - //BA.debugLineNum = 22544492;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; + //BA.debugLineNum = 187;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; _b4xpages._showpage /*String*/ (ba,"Productos"); - }else -{RDebugUtils.currentLine=22544493; - //BA.debugLineNum = 22544493;BA.debugLine="ELSE IF l_marca.text = \"PROMOS\" And l_tipo.Text"; -if ((__ref._l_marca /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("PROMOS") && (__ref._l_tipo /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("PROMOS") && (__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("PROUNI1") && (__ref._bonsabor /*String*/ ).equals("1") == false && (__ref._bonsabor2 /*String*/ ).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=22544494; - //BA.debugLineNum = 22544494;BA.debugLine="Msgbox(\"ALERTA\",\"EL CLIENTE NO PUEDE TENER ESTA"; + }else if((_l_marca.getText()).equals("PROMOS") && (_l_tipo.getText()).equals("PROMOS") && (_l_proid.getText()).equals("PROUNI1") && (_bonsabor).equals("1") == false && (_bonsabor2).equals(BA.NumberToString(0))) { + //BA.debugLineNum = 189;BA.debugLine="Msgbox(\"ALERTA\",\"EL CLIENTE NO PUEDE TENER ESTA"; __c.Msgbox(BA.ObjectToCharSequence("ALERTA"),BA.ObjectToCharSequence("EL CLIENTE NO PUEDE TENER ESTA PROMOCION"),ba); -RDebugUtils.currentLine=22544495; - //BA.debugLineNum = 22544495;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; -_b4xpages._showpage /*String*/ (ba,"Productos"); - }} -; - }else { -RDebugUtils.currentLine=22544498; - //BA.debugLineNum = 22544498;BA.debugLine="Msgbox(\"ALERTA\",\"EL CLIENTE YA COMPRO ESTE PRODU"; -__c.Msgbox(BA.ObjectToCharSequence("ALERTA"),BA.ObjectToCharSequence("EL CLIENTE YA COMPRO ESTE PRODUCTO REVISAR NOTA"),ba); -RDebugUtils.currentLine=22544499; - //BA.debugLineNum = 22544499;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; + //BA.debugLineNum = 190;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; _b4xpages._showpage /*String*/ (ba,"Productos"); }; -RDebugUtils.currentLine=22544501; - //BA.debugLineNum = 22544501;BA.debugLine="End Sub"; + }else { + //BA.debugLineNum = 193;BA.debugLine="Msgbox(\"ALERTA\",\"EL CLIENTE YA COMPRO ESTE PRODU"; +__c.Msgbox(BA.ObjectToCharSequence("ALERTA"),BA.ObjectToCharSequence("EL CLIENTE YA COMPRO ESTE PRODUCTO REVISAR NOTA"),ba); + //BA.debugLineNum = 194;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; +_b4xpages._showpage /*String*/ (ba,"Productos"); + }; + //BA.debugLineNum = 196;BA.debugLine="End Sub"; return ""; } -public anywheresoftware.b4a.keywords.Common.ResumableSubWrapper _b4xpage_closerequest(keymon.lat.medicomed.c_pedidos __ref) throws Exception{ -RDebugUtils.currentModule="c_pedidos"; -if (Debug.shouldDelegate(ba, "b4xpage_closerequest", false)) - {return ((anywheresoftware.b4a.keywords.Common.ResumableSubWrapper) Debug.delegate(ba, "b4xpage_closerequest", null));} -ResumableSub_B4XPage_CloseRequest rsub = new ResumableSub_B4XPage_CloseRequest(this,__ref); +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.c_pedidos parent,keymon.lat.medicomed.c_pedidos __ref) { +public ResumableSub_B4XPage_CloseRequest(keymon.lat.medicomed.c_pedidos parent) { this.parent = parent; -this.__ref = __ref; -this.__ref = parent; } -keymon.lat.medicomed.c_pedidos __ref; keymon.lat.medicomed.c_pedidos parent; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="c_pedidos"; while (true) { switch (state) { @@ -465,1277 +326,862 @@ parent.__c.ReturnFromResumableSub(this,null);return;} case 0: //C this.state = -1; -RDebugUtils.currentLine=22806531; - //BA.debugLineNum = 22806531;BA.debugLine="Msgbox(\"Presione Boton Terminar.\",\"ADVERTENCIA\")"; + //BA.debugLineNum = 534;BA.debugLine="Msgbox(\"Presione Boton Terminar.\",\"ADVERTENCIA\")"; parent.__c.Msgbox(BA.ObjectToCharSequence("Presione Boton Terminar."),BA.ObjectToCharSequence("ADVERTENCIA"),ba); -RDebugUtils.currentLine=22806532; - //BA.debugLineNum = 22806532;BA.debugLine="Return False"; + //BA.debugLineNum = 535;BA.debugLine="Return False"; if (true) { parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.False));return;}; -RDebugUtils.currentLine=22806533; - //BA.debugLineNum = 22806533;BA.debugLine="End Sub"; + //BA.debugLineNum = 536;BA.debugLine="End Sub"; if (true) break; } } } } -public String _b4xpage_created(keymon.lat.medicomed.c_pedidos __ref,anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_pedidos"; -if (Debug.shouldDelegate(ba, "b4xpage_created", false)) - {return ((String) Debug.delegate(ba, "b4xpage_created", new Object[] {_root1}));} -RDebugUtils.currentLine=22478848; - //BA.debugLineNum = 22478848;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -RDebugUtils.currentLine=22478849; - //BA.debugLineNum = 22478849;BA.debugLine="Root = Root1"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = _root1; -RDebugUtils.currentLine=22478851; - //BA.debugLineNum = 22478851;BA.debugLine="Root.LoadLayout(\"pedido\")"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .LoadLayout("pedido",ba); -RDebugUtils.currentLine=22478852; - //BA.debugLineNum = 22478852;BA.debugLine="i_fotol.Visible = False"; -__ref._i_fotol /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=22478854; - //BA.debugLineNum = 22478854;BA.debugLine="ruta = File.DirInternal"; -__ref._ruta /*String*/ = __c.File.getDirInternal(); -RDebugUtils.currentLine=22478855; - //BA.debugLineNum = 22478855;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; -if (__c.File.Exists(__ref._ruta /*String*/ ,"kmt.db")==__c.False) { -RDebugUtils.currentLine=22478856; - //BA.debugLineNum = 22478856;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; -__c.File.Copy(__c.File.getDirAssets(),"kmt.db",__ref._ruta /*String*/ ,"kmt.db"); +public String _b4xpage_created(anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ + //BA.debugLineNum = 64;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; + //BA.debugLineNum = 65;BA.debugLine="Root = Root1"; +_root = _root1; + //BA.debugLineNum = 67;BA.debugLine="Root.LoadLayout(\"pedido\")"; +_root.LoadLayout("pedido",ba); + //BA.debugLineNum = 68;BA.debugLine="i_fotol.Visible = False"; +_i_fotol.setVisible(__c.False); + //BA.debugLineNum = 70;BA.debugLine="ruta = File.DirInternal"; +_ruta = __c.File.getDirInternal(); + //BA.debugLineNum = 71;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; +if (__c.File.Exists(_ruta,"kmt.db")==__c.False) { + //BA.debugLineNum = 72;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; +__c.File.Copy(__c.File.getDirAssets(),"kmt.db",_ruta,"kmt.db"); }; -RDebugUtils.currentLine=22478859; - //BA.debugLineNum = 22478859;BA.debugLine="End Sub"; + //BA.debugLineNum = 75;BA.debugLine="End Sub"; return ""; } -public String _class_globals(keymon.lat.medicomed.c_pedidos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_pedidos"; -RDebugUtils.currentLine=22347776; - //BA.debugLineNum = 22347776;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=22347777; - //BA.debugLineNum = 22347777;BA.debugLine="Private Root As B4XView 'ignore"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Private Root As B4XView 'ignore"; _root = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=22347778; - //BA.debugLineNum = 22347778;BA.debugLine="Private xui As XUI 'ignore"; + //BA.debugLineNum = 3;BA.debugLine="Private xui As XUI 'ignore"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=22347780; - //BA.debugLineNum = 22347780;BA.debugLine="Dim g As GPS"; + //BA.debugLineNum = 5;BA.debugLine="Dim g As GPS"; _g = new anywheresoftware.b4a.gps.GPS(); -RDebugUtils.currentLine=22347781; - //BA.debugLineNum = 22347781;BA.debugLine="Dim ruta As String"; + //BA.debugLineNum = 6;BA.debugLine="Dim ruta As String"; _ruta = ""; -RDebugUtils.currentLine=22347782; - //BA.debugLineNum = 22347782;BA.debugLine="Dim skmt As SQL"; + //BA.debugLineNum = 7;BA.debugLine="Dim skmt As SQL"; _skmt = new anywheresoftware.b4a.sql.SQL(); -RDebugUtils.currentLine=22347783; - //BA.debugLineNum = 22347783;BA.debugLine="Private t3 As Timer"; + //BA.debugLineNum = 8;BA.debugLine="Private t3 As Timer"; _t3 = new anywheresoftware.b4a.objects.Timer(); -RDebugUtils.currentLine=22347784; - //BA.debugLineNum = 22347784;BA.debugLine="Dim p As Phone"; + //BA.debugLineNum = 9;BA.debugLine="Dim p As Phone"; _p = new anywheresoftware.b4a.phone.Phone(); -RDebugUtils.currentLine=22347785; - //BA.debugLineNum = 22347785;BA.debugLine="Dim sb As StringBuilder"; + //BA.debugLineNum = 10;BA.debugLine="Dim sb As StringBuilder"; _sb = new anywheresoftware.b4a.keywords.StringBuilderWrapper(); -RDebugUtils.currentLine=22347787; - //BA.debugLineNum = 22347787;BA.debugLine="Dim c As Cursor"; + //BA.debugLineNum = 12;BA.debugLine="Dim c As Cursor"; _c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=22347788; - //BA.debugLineNum = 22347788;BA.debugLine="Dim e As Cursor"; + //BA.debugLineNum = 13;BA.debugLine="Dim e As Cursor"; _e = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=22347789; - //BA.debugLineNum = 22347789;BA.debugLine="Dim f As Cursor"; + //BA.debugLineNum = 14;BA.debugLine="Dim f As Cursor"; _f = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=22347790; - //BA.debugLineNum = 22347790;BA.debugLine="Dim h As Cursor"; + //BA.debugLineNum = 15;BA.debugLine="Dim h As Cursor"; _h = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=22347791; - //BA.debugLineNum = 22347791;BA.debugLine="Dim CC As Cursor"; + //BA.debugLineNum = 16;BA.debugLine="Dim CC As Cursor"; _cc = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=22347792; - //BA.debugLineNum = 22347792;BA.debugLine="Dim DD As Cursor"; + //BA.debugLineNum = 17;BA.debugLine="Dim DD As Cursor"; _dd = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=22347793; - //BA.debugLineNum = 22347793;BA.debugLine="Dim l_tipo As Label"; + //BA.debugLineNum = 18;BA.debugLine="Dim l_tipo As Label"; _l_tipo = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=22347794; - //BA.debugLineNum = 22347794;BA.debugLine="Dim l_sub As Label"; + //BA.debugLineNum = 19;BA.debugLine="Dim l_sub As Label"; _l_sub = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=22347795; - //BA.debugLineNum = 22347795;BA.debugLine="Dim l_marca As Label"; + //BA.debugLineNum = 20;BA.debugLine="Dim l_marca As Label"; _l_marca = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=22347796; - //BA.debugLineNum = 22347796;BA.debugLine="Dim l_desc As Label"; + //BA.debugLineNum = 21;BA.debugLine="Dim l_desc As Label"; _l_desc = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=22347797; - //BA.debugLineNum = 22347797;BA.debugLine="Dim l_precio As Label"; + //BA.debugLineNum = 22;BA.debugLine="Dim l_precio As Label"; _l_precio = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=22347798; - //BA.debugLineNum = 22347798;BA.debugLine="Dim l_bodega As Label"; + //BA.debugLineNum = 23;BA.debugLine="Dim l_bodega As Label"; _l_bodega = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=22347799; - //BA.debugLineNum = 22347799;BA.debugLine="Dim cantidad As EditText"; + //BA.debugLineNum = 24;BA.debugLine="Dim cantidad As EditText"; _cantidad = new anywheresoftware.b4a.objects.EditTextWrapper(); -RDebugUtils.currentLine=22347800; - //BA.debugLineNum = 22347800;BA.debugLine="Dim guardar As Button"; + //BA.debugLineNum = 25;BA.debugLine="Dim guardar As Button"; _guardar = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=22347801; - //BA.debugLineNum = 22347801;BA.debugLine="Dim Terminar As Button"; + //BA.debugLineNum = 26;BA.debugLine="Dim Terminar As Button"; _terminar = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=22347802; - //BA.debugLineNum = 22347802;BA.debugLine="Dim img_prod As ImageView"; + //BA.debugLineNum = 27;BA.debugLine="Dim img_prod As ImageView"; _img_prod = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=22347803; - //BA.debugLineNum = 22347803;BA.debugLine="Dim IMG_PASO() As Byte"; + //BA.debugLineNum = 28;BA.debugLine="Dim IMG_PASO() As Byte"; _img_paso = new byte[(int) (0)]; ; -RDebugUtils.currentLine=22347804; - //BA.debugLineNum = 22347804;BA.debugLine="Dim L_PROID As Label"; + //BA.debugLineNum = 29;BA.debugLine="Dim L_PROID As Label"; _l_proid = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=22347805; - //BA.debugLineNum = 22347805;BA.debugLine="Dim clie_id As String"; + //BA.debugLineNum = 30;BA.debugLine="Dim clie_id As String"; _clie_id = ""; -RDebugUtils.currentLine=22347806; - //BA.debugLineNum = 22347806;BA.debugLine="Dim sDate,sTime As String"; + //BA.debugLineNum = 31;BA.debugLine="Dim sDate,sTime As String"; _sdate = ""; _stime = ""; -RDebugUtils.currentLine=22347807; - //BA.debugLineNum = 22347807;BA.debugLine="Dim usuario As String"; + //BA.debugLineNum = 32;BA.debugLine="Dim usuario As String"; _usuario = ""; -RDebugUtils.currentLine=22347809; - //BA.debugLineNum = 22347809;BA.debugLine="Dim t_venta As Label"; + //BA.debugLineNum = 34;BA.debugLine="Dim t_venta As Label"; _t_venta = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=22347810; - //BA.debugLineNum = 22347810;BA.debugLine="Dim PROMO_C As String"; + //BA.debugLineNum = 35;BA.debugLine="Dim PROMO_C As String"; _promo_c = ""; -RDebugUtils.currentLine=22347811; - //BA.debugLineNum = 22347811;BA.debugLine="Dim i_fotol As ImageView"; + //BA.debugLineNum = 36;BA.debugLine="Dim i_fotol As ImageView"; _i_fotol = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=22347812; - //BA.debugLineNum = 22347812;BA.debugLine="Private DESC_PROMO As Button"; + //BA.debugLineNum = 37;BA.debugLine="Private DESC_PROMO As Button"; _desc_promo = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=22347813; - //BA.debugLineNum = 22347813;BA.debugLine="Private nopromo As Button"; + //BA.debugLineNum = 38;BA.debugLine="Private nopromo As Button"; _nopromo = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=22347814; - //BA.debugLineNum = 22347814;BA.debugLine="Dim TOT_ART_PROMO As String"; + //BA.debugLineNum = 39;BA.debugLine="Dim TOT_ART_PROMO As String"; _tot_art_promo = ""; -RDebugUtils.currentLine=22347815; - //BA.debugLineNum = 22347815;BA.debugLine="Dim cambio As String"; + //BA.debugLineNum = 40;BA.debugLine="Dim cambio As String"; _cambio = ""; -RDebugUtils.currentLine=22347816; - //BA.debugLineNum = 22347816;BA.debugLine="Dim COSTO_TOT As String"; + //BA.debugLineNum = 41;BA.debugLine="Dim COSTO_TOT As String"; _costo_tot = ""; -RDebugUtils.currentLine=22347817; - //BA.debugLineNum = 22347817;BA.debugLine="Dim ALMACEN As String"; + //BA.debugLineNum = 42;BA.debugLine="Dim ALMACEN As String"; _almacen = ""; -RDebugUtils.currentLine=22347818; - //BA.debugLineNum = 22347818;BA.debugLine="Dim preciosin As String"; + //BA.debugLineNum = 43;BA.debugLine="Dim preciosin As String"; _preciosin = ""; -RDebugUtils.currentLine=22347819; - //BA.debugLineNum = 22347819;BA.debugLine="Dim cl_ruta As String"; + //BA.debugLineNum = 44;BA.debugLine="Dim cl_ruta As String"; _cl_ruta = ""; -RDebugUtils.currentLine=22347820; - //BA.debugLineNum = 22347820;BA.debugLine="Dim d As Cursor"; + //BA.debugLineNum = 45;BA.debugLine="Dim d As Cursor"; _d = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=22347821; - //BA.debugLineNum = 22347821;BA.debugLine="Dim TOT_ART_PROMOR As String"; + //BA.debugLineNum = 46;BA.debugLine="Dim TOT_ART_PROMOR As String"; _tot_art_promor = ""; -RDebugUtils.currentLine=22347822; - //BA.debugLineNum = 22347822;BA.debugLine="Dim PROMO_CR As String"; + //BA.debugLineNum = 47;BA.debugLine="Dim PROMO_CR As String"; _promo_cr = ""; -RDebugUtils.currentLine=22347823; - //BA.debugLineNum = 22347823;BA.debugLine="Dim TOTAL_PROMO As String"; + //BA.debugLineNum = 48;BA.debugLine="Dim TOTAL_PROMO As String"; _total_promo = ""; -RDebugUtils.currentLine=22347824; - //BA.debugLineNum = 22347824;BA.debugLine="Dim HCCP_CANT As String"; + //BA.debugLineNum = 49;BA.debugLine="Dim HCCP_CANT As String"; _hccp_cant = ""; -RDebugUtils.currentLine=22347825; - //BA.debugLineNum = 22347825;BA.debugLine="Dim tgl As Toggle"; + //BA.debugLineNum = 50;BA.debugLine="Dim tgl As Toggle"; _tgl = new com.rootsoft.togglelibrary.ToggleLibrary(); -RDebugUtils.currentLine=22347826; - //BA.debugLineNum = 22347826;BA.debugLine="Dim precio_Cero As String"; + //BA.debugLineNum = 51;BA.debugLine="Dim precio_Cero As String"; _precio_cero = ""; -RDebugUtils.currentLine=22347827; - //BA.debugLineNum = 22347827;BA.debugLine="Private BONSABOR As String"; + //BA.debugLineNum = 52;BA.debugLine="Private BONSABOR As String"; _bonsabor = ""; -RDebugUtils.currentLine=22347828; - //BA.debugLineNum = 22347828;BA.debugLine="Private BONSABOR2 As String"; + //BA.debugLineNum = 53;BA.debugLine="Private BONSABOR2 As String"; _bonsabor2 = ""; -RDebugUtils.currentLine=22347829; - //BA.debugLineNum = 22347829;BA.debugLine="Dim cmd As DBCommand"; + //BA.debugLineNum = 54;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=22347830; - //BA.debugLineNum = 22347830;BA.debugLine="Private p_pedido As Panel"; + //BA.debugLineNum = 55;BA.debugLine="Private p_pedido As Panel"; _p_pedido = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=22347831; - //BA.debugLineNum = 22347831;BA.debugLine="End Sub"; + //BA.debugLineNum = 56;BA.debugLine="End Sub"; return ""; } -public String _desc_promo_click(keymon.lat.medicomed.c_pedidos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_pedidos"; -if (Debug.shouldDelegate(ba, "desc_promo_click", false)) - {return ((String) Debug.delegate(ba, "desc_promo_click", null));} -RDebugUtils.currentLine=23003136; - //BA.debugLineNum = 23003136;BA.debugLine="Sub DESC_PROMO_Click"; -RDebugUtils.currentLine=23003137; - //BA.debugLineNum = 23003137;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; +public String _desc_promo_click() throws Exception{ + //BA.debugLineNum = 548;BA.debugLine="Sub DESC_PROMO_Click"; + //BA.debugLineNum = 549;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from PROIDID"); -RDebugUtils.currentLine=23003138; - //BA.debugLineNum = 23003138;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PROIDID VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())})); -RDebugUtils.currentLine=23003139; - //BA.debugLineNum = 23003139;BA.debugLine="B4XPages.ShowPage(\"detalle_promo\")"; + //BA.debugLineNum = 550;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PROIDID VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_l_proid.getText())})); + //BA.debugLineNum = 551;BA.debugLine="B4XPages.ShowPage(\"detalle_promo\")"; _b4xpages._showpage /*String*/ (ba,"detalle_promo"); -RDebugUtils.currentLine=23003140; - //BA.debugLineNum = 23003140;BA.debugLine="End Sub"; + //BA.debugLineNum = 552;BA.debugLine="End Sub"; return ""; } -public String _gps_locationchanged(keymon.lat.medicomed.c_pedidos __ref,anywheresoftware.b4a.gps.LocationWrapper _location1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_pedidos"; -if (Debug.shouldDelegate(ba, "gps_locationchanged", false)) - {return ((String) Debug.delegate(ba, "gps_locationchanged", new Object[] {_location1}));} -RDebugUtils.currentLine=22675456; - //BA.debugLineNum = 22675456;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; -RDebugUtils.currentLine=22675459; - //BA.debugLineNum = 22675459;BA.debugLine="End Sub"; +public String _gps_locationchanged(anywheresoftware.b4a.gps.LocationWrapper _location1) throws Exception{ + //BA.debugLineNum = 359;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; + //BA.debugLineNum = 362;BA.debugLine="End Sub"; return ""; } -public String _guardar_click(keymon.lat.medicomed.c_pedidos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_pedidos"; -if (Debug.shouldDelegate(ba, "guardar_click", false)) - {return ((String) Debug.delegate(ba, "guardar_click", null));} +public String _guardar_click() throws Exception{ int _i = 0; -RDebugUtils.currentLine=22609920; - //BA.debugLineNum = 22609920;BA.debugLine="Sub guardar_Click"; -RDebugUtils.currentLine=22609921; - //BA.debugLineNum = 22609921;BA.debugLine="If cantidad.Text = \"\" Then"; -if ((__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()).equals("")) { -RDebugUtils.currentLine=22609922; - //BA.debugLineNum = 22609922;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; + //BA.debugLineNum = 198;BA.debugLine="Sub guardar_Click"; + //BA.debugLineNum = 199;BA.debugLine="If cantidad.Text = \"\" Then"; +if ((_cantidad.getText()).equals("")) { + //BA.debugLineNum = 200;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; _b4xpages._showpage /*String*/ (ba,"Productos"); - }else -{RDebugUtils.currentLine=22609923; - //BA.debugLineNum = 22609923;BA.debugLine="ELSE If cantidad.Text > l_bodega.Text Then"; -if ((double)(Double.parseDouble(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))>(double)(Double.parseDouble(__ref._l_bodega /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()))) { -RDebugUtils.currentLine=22609924; - //BA.debugLineNum = 22609924;BA.debugLine="Msgbox(\"Exede la existencia\", \"ADVERTENCIA\") 'ig"; + }else if((double)(Double.parseDouble(_cantidad.getText()))>(double)(Double.parseDouble(_l_bodega.getText()))) { + //BA.debugLineNum = 202;BA.debugLine="Msgbox(\"Exede la existencia\", \"ADVERTENCIA\") 'ig"; __c.Msgbox(BA.ObjectToCharSequence("Exede la existencia"),BA.ObjectToCharSequence("ADVERTENCIA"),ba); - }else -{RDebugUtils.currentLine=22609925; - //BA.debugLineNum = 22609925;BA.debugLine="Else If l_marca.text = \"PROMOS\" And l_tipo.Text ="; -if ((__ref._l_marca /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("PROMOS") && (__ref._l_tipo /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("PROMOS") && (double)(Double.parseDouble(__ref._promo_c /*String*/ ))>0 && (double)(Double.parseDouble(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))>0) { -RDebugUtils.currentLine=22609926; - //BA.debugLineNum = 22609926;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + }else if((_l_marca.getText()).equals("PROMOS") && (_l_tipo.getText()).equals("PROMOS") && (double)(Double.parseDouble(_promo_c))>0 && (double)(Double.parseDouble(_cantidad.getText()))>0) { + //BA.debugLineNum = 204;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from PROIDID"); -RDebugUtils.currentLine=22609927; - //BA.debugLineNum = 22609927;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PROIDID VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())})); -RDebugUtils.currentLine=22609928; - //BA.debugLineNum = 22609928;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select count"; -__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 count(*) as CUANTOSD from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND CAT_DP_TIPO = 1)"))); -RDebugUtils.currentLine=22609929; - //BA.debugLineNum = 22609929;BA.debugLine="c.Position =0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22609930; - //BA.debugLineNum = 22609930;BA.debugLine="If c.GetString(\"CUANTOSD\") = 0 Then"; -if ((__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOSD")).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=22609931; - //BA.debugLineNum = 22609931;BA.debugLine="Msgbox(\"No tiene venta el cliente para la promo"; + //BA.debugLineNum = 205;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PROIDID VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_l_proid.getText())})); + //BA.debugLineNum = 206;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select count"; +_c = (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 count(*) as CUANTOSD from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND CAT_DP_TIPO = 1)"))); + //BA.debugLineNum = 207;BA.debugLine="c.Position =0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 208;BA.debugLine="If c.GetString(\"CUANTOSD\") = 0 Then"; +if ((_c.GetString("CUANTOSD")).equals(BA.NumberToString(0))) { + //BA.debugLineNum = 209;BA.debugLine="Msgbox(\"No tiene venta el cliente para la promo"; __c.Msgbox(BA.ObjectToCharSequence("No tiene venta el cliente para la promo"),BA.ObjectToCharSequence("ADVERTENCIA"),ba); }else { -RDebugUtils.currentLine=22609933; - //BA.debugLineNum = 22609933;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select sum("; -__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 sum(pe_cant) As TOT_ART_PROMO, sum(PE_COSTO_TOT) as COSTO_TOT from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND CAT_DP_PRECIO > 1)"))); -RDebugUtils.currentLine=22609934; - //BA.debugLineNum = 22609934;BA.debugLine="C.Position =0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22609935; - //BA.debugLineNum = 22609935;BA.debugLine="TOT_ART_PROMO = C.GetString(\"TOT_ART_PROMO\")"; -__ref._tot_art_promo /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOT_ART_PROMO"); -RDebugUtils.currentLine=22609936; - //BA.debugLineNum = 22609936;BA.debugLine="COSTO_TOT = C.GetString(\"COSTO_TOT\")"; -__ref._costo_tot /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("COSTO_TOT"); -RDebugUtils.currentLine=22609937; - //BA.debugLineNum = 22609937;BA.debugLine="C.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22609938; - //BA.debugLineNum = 22609938;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select coun"; -__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 count(*) as CUANTOSD from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND (CAT_DP_PRECIO = 0.01 or CAT_DP_PRECIO = 1 OR CAT_DP_PRECIO = 0) AND CAT_DP_TIPO = 1)"))); -RDebugUtils.currentLine=22609939; - //BA.debugLineNum = 22609939;BA.debugLine="c.Position =0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22609940; - //BA.debugLineNum = 22609940;BA.debugLine="If c.GetString(\"CUANTOSD\") = 0 Then"; -if ((__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOSD")).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=22609941; - //BA.debugLineNum = 22609941;BA.debugLine="TOT_ART_PROMOR = \"0\" 'Msgbox(\"No tiene venta e"; -__ref._tot_art_promor /*String*/ = "0"; + //BA.debugLineNum = 211;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select sum("; +_c = (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 sum(pe_cant) As TOT_ART_PROMO, sum(PE_COSTO_TOT) as COSTO_TOT from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND CAT_DP_PRECIO > 1)"))); + //BA.debugLineNum = 212;BA.debugLine="C.Position =0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 213;BA.debugLine="TOT_ART_PROMO = C.GetString(\"TOT_ART_PROMO\")"; +_tot_art_promo = _c.GetString("TOT_ART_PROMO"); + //BA.debugLineNum = 214;BA.debugLine="COSTO_TOT = C.GetString(\"COSTO_TOT\")"; +_costo_tot = _c.GetString("COSTO_TOT"); + //BA.debugLineNum = 215;BA.debugLine="C.Close"; +_c.Close(); + //BA.debugLineNum = 216;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select coun"; +_c = (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 count(*) as CUANTOSD from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND (CAT_DP_PRECIO = 0.01 or CAT_DP_PRECIO = 1 OR CAT_DP_PRECIO = 0) AND CAT_DP_TIPO = 1)"))); + //BA.debugLineNum = 217;BA.debugLine="c.Position =0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 218;BA.debugLine="If c.GetString(\"CUANTOSD\") = 0 Then"; +if ((_c.GetString("CUANTOSD")).equals(BA.NumberToString(0))) { + //BA.debugLineNum = 219;BA.debugLine="TOT_ART_PROMOR = \"0\" 'Msgbox(\"No tiene venta e"; +_tot_art_promor = "0"; }else { -RDebugUtils.currentLine=22609943; - //BA.debugLineNum = 22609943;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select sum"; -__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 sum(pe_cant) As TOT_ART_PROMO, sum(PE_COSTO_TOT) as COSTO_TOT from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND (CAT_DP_PRECIO = 0.01 or CAT_DP_PRECIO = 1 OR CAT_DP_PRECIO = 0) AND CAT_DP_TIPO = 1)"))); -RDebugUtils.currentLine=22609944; - //BA.debugLineNum = 22609944;BA.debugLine="C.Position =0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22609945; - //BA.debugLineNum = 22609945;BA.debugLine="TOT_ART_PROMOR = C.GetString(\"TOT_ART_PROMO\")"; -__ref._tot_art_promor /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOT_ART_PROMO"); + //BA.debugLineNum = 221;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select sum"; +_c = (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 sum(pe_cant) As TOT_ART_PROMO, sum(PE_COSTO_TOT) as COSTO_TOT from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND (CAT_DP_PRECIO = 0.01 or CAT_DP_PRECIO = 1 OR CAT_DP_PRECIO = 0) AND CAT_DP_TIPO = 1)"))); + //BA.debugLineNum = 222;BA.debugLine="C.Position =0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 223;BA.debugLine="TOT_ART_PROMOR = C.GetString(\"TOT_ART_PROMO\")"; +_tot_art_promor = _c.GetString("TOT_ART_PROMO"); }; -RDebugUtils.currentLine=22609947; - //BA.debugLineNum = 22609947;BA.debugLine="C.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22609948; - //BA.debugLineNum = 22609948;BA.debugLine="PROMO_C = PROMO_C * cantidad.Text"; -__ref._promo_c /*String*/ = BA.NumberToString((double)(Double.parseDouble(__ref._promo_c /*String*/ ))*(double)(Double.parseDouble(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))); -RDebugUtils.currentLine=22609949; - //BA.debugLineNum = 22609949;BA.debugLine="PROMO_CR = PROMO_CR * cantidad.Text"; -__ref._promo_cr /*String*/ = BA.NumberToString((double)(Double.parseDouble(__ref._promo_cr /*String*/ ))*(double)(Double.parseDouble(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))); -RDebugUtils.currentLine=22609950; - //BA.debugLineNum = 22609950;BA.debugLine="If TOT_ART_PROMO = PROMO_C And TOT_ART_PROMOR"; -if ((__ref._tot_art_promo /*String*/ ).equals(__ref._promo_c /*String*/ ) && (__ref._tot_art_promor /*String*/ ).equals(__ref._promo_cr /*String*/ )) { -RDebugUtils.currentLine=22609951; - //BA.debugLineNum = 22609951;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE P"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE PEDIDO SET PE_CEDIS = (?) WHERE PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID))",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())})); -RDebugUtils.currentLine=22609952; - //BA.debugLineNum = 22609952;BA.debugLine="D=B4XPages.MainPage.skmt.ExecQuery(\"select CAT"; -__ref._d /*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_DP_ID, CAT_DP_PRECIO, CAT_DP_PRECIO_SIMPTOS, CAT_DP_IDPROD FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) AND CAT_DP_PRECIO > 1"))); -RDebugUtils.currentLine=22609953; - //BA.debugLineNum = 22609953;BA.debugLine="If D.RowCount>0 Then"; -if (__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=22609954; - //BA.debugLineNum = 22609954;BA.debugLine="For i=0 To D.RowCount -1"; + //BA.debugLineNum = 225;BA.debugLine="C.Close"; +_c.Close(); + //BA.debugLineNum = 226;BA.debugLine="PROMO_C = PROMO_C * cantidad.Text"; +_promo_c = BA.NumberToString((double)(Double.parseDouble(_promo_c))*(double)(Double.parseDouble(_cantidad.getText()))); + //BA.debugLineNum = 227;BA.debugLine="PROMO_CR = PROMO_CR * cantidad.Text"; +_promo_cr = BA.NumberToString((double)(Double.parseDouble(_promo_cr))*(double)(Double.parseDouble(_cantidad.getText()))); + //BA.debugLineNum = 228;BA.debugLine="If TOT_ART_PROMO = PROMO_C And TOT_ART_PROMOR"; +if ((_tot_art_promo).equals(_promo_c) && (_tot_art_promor).equals(_promo_cr)) { + //BA.debugLineNum = 229;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE P"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE PEDIDO SET PE_CEDIS = (?) WHERE PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID))",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_l_proid.getText())})); + //BA.debugLineNum = 230;BA.debugLine="D=B4XPages.MainPage.skmt.ExecQuery(\"select CAT"; +_d = (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_DP_ID, CAT_DP_PRECIO, CAT_DP_PRECIO_SIMPTOS, CAT_DP_IDPROD FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) AND CAT_DP_PRECIO > 1"))); + //BA.debugLineNum = 231;BA.debugLine="If D.RowCount>0 Then"; +if (_d.getRowCount()>0) { + //BA.debugLineNum = 232;BA.debugLine="For i=0 To D.RowCount -1"; { final int step34 = 1; -final int limit34 = (int) (__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit34 = (int) (_d.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit34 ;_i = _i + step34 ) { -RDebugUtils.currentLine=22609955; - //BA.debugLineNum = 22609955;BA.debugLine="D.Position=i"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=22609956; - //BA.debugLineNum = 22609956;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE PEDIDO SET PE_COSTOU = (?), PE_COSTO_TOT = PE_CANT * (?) , PE_COSTO_SIN = (?) WHERE PE_PROID = (?) And PE_CEDIS In (Select PROIDID from PROIDID) AND PE_CLIENTE IN (Select CUENTA from cuentaa) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PRECIO")),(Object)(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PRECIO")),(Object)(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PRECIO_SIMPTOS")),(Object)(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_IDPROD"))})); + //BA.debugLineNum = 233;BA.debugLine="D.Position=i"; +_d.setPosition(_i); + //BA.debugLineNum = 234;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE PEDIDO SET PE_COSTOU = (?), PE_COSTO_TOT = PE_CANT * (?) , PE_COSTO_SIN = (?) WHERE PE_PROID = (?) And PE_CEDIS In (Select PROIDID from PROIDID) AND PE_CLIENTE IN (Select CUENTA from cuentaa) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_d.GetString("CAT_DP_PRECIO")),(Object)(_d.GetString("CAT_DP_PRECIO")),(Object)(_d.GetString("CAT_DP_PRECIO_SIMPTOS")),(Object)(_d.GetString("CAT_DP_IDPROD"))})); } }; }; -RDebugUtils.currentLine=22609959; - //BA.debugLineNum = 22609959;BA.debugLine="D.Close"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22609960; - //BA.debugLineNum = 22609960;BA.debugLine="D=B4XPages.MainPage.skmt.ExecQuery(\"select CAT"; -__ref._d /*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_DP_ID, CAT_DP_PRECIO, CAT_DP_PRECIO_SIMPTOS, CAT_DP_IDPROD FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) AND (CAT_DP_PRECIO = 0.01 or CAT_DP_PRECIO = 1 OR CAT_DP_PRECIO = 0) AND CAT_DP_TIPO = 1"))); -RDebugUtils.currentLine=22609961; - //BA.debugLineNum = 22609961;BA.debugLine="If D.RowCount>0 Then"; -if (__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=22609962; - //BA.debugLineNum = 22609962;BA.debugLine="For i=0 To D.RowCount -1"; + //BA.debugLineNum = 237;BA.debugLine="D.Close"; +_d.Close(); + //BA.debugLineNum = 238;BA.debugLine="D=B4XPages.MainPage.skmt.ExecQuery(\"select CAT"; +_d = (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_DP_ID, CAT_DP_PRECIO, CAT_DP_PRECIO_SIMPTOS, CAT_DP_IDPROD FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) AND (CAT_DP_PRECIO = 0.01 or CAT_DP_PRECIO = 1 OR CAT_DP_PRECIO = 0) AND CAT_DP_TIPO = 1"))); + //BA.debugLineNum = 239;BA.debugLine="If D.RowCount>0 Then"; +if (_d.getRowCount()>0) { + //BA.debugLineNum = 240;BA.debugLine="For i=0 To D.RowCount -1"; { final int step42 = 1; -final int limit42 = (int) (__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit42 = (int) (_d.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit42 ;_i = _i + step42 ) { -RDebugUtils.currentLine=22609963; - //BA.debugLineNum = 22609963;BA.debugLine="D.Position=i"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=22609964; - //BA.debugLineNum = 22609964;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE PEDIDO SET PE_COSTOU = (?), PE_COSTO_TOT = PE_CANT * (?) , PE_COSTO_SIN = (?) WHERE PE_PROID = (?) And PE_CEDIS In (Select PROIDID from PROIDID) AND PE_CLIENTE IN (Select CUENTA from cuentaa) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PRECIO")),(Object)(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PRECIO")),(Object)(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PRECIO_SIMPTOS")),(Object)(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_IDPROD"))})); + //BA.debugLineNum = 241;BA.debugLine="D.Position=i"; +_d.setPosition(_i); + //BA.debugLineNum = 242;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE PEDIDO SET PE_COSTOU = (?), PE_COSTO_TOT = PE_CANT * (?) , PE_COSTO_SIN = (?) WHERE PE_PROID = (?) And PE_CEDIS In (Select PROIDID from PROIDID) AND PE_CLIENTE IN (Select CUENTA from cuentaa) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_d.GetString("CAT_DP_PRECIO")),(Object)(_d.GetString("CAT_DP_PRECIO")),(Object)(_d.GetString("CAT_DP_PRECIO_SIMPTOS")),(Object)(_d.GetString("CAT_DP_IDPROD"))})); } }; }; -RDebugUtils.currentLine=22609967; - //BA.debugLineNum = 22609967;BA.debugLine="D.Close"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22609968; - //BA.debugLineNum = 22609968;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; + //BA.debugLineNum = 245;BA.debugLine="D.Close"; +_d.Close(); + //BA.debugLineNum = 246;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; __c.DateTime.setDateFormat("MM/dd/yyyy"); -RDebugUtils.currentLine=22609969; - //BA.debugLineNum = 22609969;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -__ref._sdate /*String*/ = __c.DateTime.Date(__c.DateTime.getNow()); -RDebugUtils.currentLine=22609970; - //BA.debugLineNum = 22609970;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -__ref._stime /*String*/ = __c.DateTime.Time(__c.DateTime.getNow()); -RDebugUtils.currentLine=22609971; - //BA.debugLineNum = 22609971;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUE"; -__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 CUENTA from cuentaa"))); -RDebugUtils.currentLine=22609972; - //BA.debugLineNum = 22609972;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22609973; - //BA.debugLineNum = 22609973;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -__ref._clie_id /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUENTA"); -RDebugUtils.currentLine=22609974; - //BA.debugLineNum = 22609974;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22609975; - //BA.debugLineNum = 22609975;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT"; -__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 where CAT_CL_CODIGO In (Select cuenta from cuentaa)"))); -RDebugUtils.currentLine=22609976; - //BA.debugLineNum = 22609976;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22609977; - //BA.debugLineNum = 22609977;BA.debugLine="cl_ruta = c.GetString(\"CAT_CL_RUTA\")"; -__ref._cl_ruta /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_RUTA"); -RDebugUtils.currentLine=22609978; - //BA.debugLineNum = 22609978;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22609979; - //BA.debugLineNum = 22609979;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USU"; -__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=22609980; - //BA.debugLineNum = 22609980;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22609981; - //BA.debugLineNum = 22609981;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -__ref._usuario /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("USUARIO"); -RDebugUtils.currentLine=22609982; - //BA.debugLineNum = 22609982;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery(\"select cou"; -__ref._e /*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 count(*) as CUANTOS FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) and CAT_DP_TIPO = 0 "))); -RDebugUtils.currentLine=22609984; - //BA.debugLineNum = 22609984;BA.debugLine="e.Position =0"; -__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22609985; - //BA.debugLineNum = 22609985;BA.debugLine="If e.GetString(\"CUANTOS\") > 0 Then"; -if ((double)(Double.parseDouble(__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")))>0) { -RDebugUtils.currentLine=22609986; - //BA.debugLineNum = 22609986;BA.debugLine="F=B4XPages.MainPage.skmt.ExecQuery(\"select CA"; -__ref._f /*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_DP_IDPROD, CAT_DP_PZAS,CAT_DP_PRECIO FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) and CAT_DP_TIPO = 0 "))); -RDebugUtils.currentLine=22609989; - //BA.debugLineNum = 22609989;BA.debugLine="If f.RowCount>0 Then"; -if (__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=22609990; - //BA.debugLineNum = 22609990;BA.debugLine="For i=0 To f.RowCount -1"; + //BA.debugLineNum = 247;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; +_sdate = __c.DateTime.Date(__c.DateTime.getNow()); + //BA.debugLineNum = 248;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; +_stime = __c.DateTime.Time(__c.DateTime.getNow()); + //BA.debugLineNum = 249;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUE"; +_c = (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 CUENTA from cuentaa"))); + //BA.debugLineNum = 250;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 251;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; +_clie_id = _c.GetString("CUENTA"); + //BA.debugLineNum = 252;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 253;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT"; +_c = (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 where CAT_CL_CODIGO In (Select cuenta from cuentaa)"))); + //BA.debugLineNum = 254;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 255;BA.debugLine="cl_ruta = c.GetString(\"CAT_CL_RUTA\")"; +_cl_ruta = _c.GetString("CAT_CL_RUTA"); + //BA.debugLineNum = 256;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 257;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USU"; +_c = (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"))); + //BA.debugLineNum = 258;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 259;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; +_usuario = _c.GetString("USUARIO"); + //BA.debugLineNum = 260;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery(\"select cou"; +_e = (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 count(*) as CUANTOS FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) and CAT_DP_TIPO = 0 "))); + //BA.debugLineNum = 262;BA.debugLine="e.Position =0"; +_e.setPosition((int) (0)); + //BA.debugLineNum = 263;BA.debugLine="If e.GetString(\"CUANTOS\") > 0 Then"; +if ((double)(Double.parseDouble(_e.GetString("CUANTOS")))>0) { + //BA.debugLineNum = 264;BA.debugLine="F=B4XPages.MainPage.skmt.ExecQuery(\"select CA"; +_f = (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_DP_IDPROD, CAT_DP_PZAS,CAT_DP_PRECIO FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) and CAT_DP_TIPO = 0 "))); + //BA.debugLineNum = 267;BA.debugLine="If f.RowCount>0 Then"; +if (_f.getRowCount()>0) { + //BA.debugLineNum = 268;BA.debugLine="For i=0 To f.RowCount -1"; { final int step67 = 1; -final int limit67 = (int) (__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit67 = (int) (_f.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit67 ;_i = _i + step67 ) { -RDebugUtils.currentLine=22609991; - //BA.debugLineNum = 22609991;BA.debugLine="f.Position=i"; -__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=22609992; - //BA.debugLineNum = 22609992;BA.debugLine="precio_Cero = f.GetString(\"CAT_DP_PRECIO\")"; -__ref._precio_cero /*String*/ = __ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PRECIO"); -RDebugUtils.currentLine=22609993; - //BA.debugLineNum = 22609993;BA.debugLine="h=B4XPages.MainPage.skmt.ExecQuery2(\"select"; -__ref._h /*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*/ .ExecQuery2("select CAT_GP_NOMBRE from CAT_GUNAPROD where CAT_GP_ID = ? ",new String[]{__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_IDPROD")}))); -RDebugUtils.currentLine=22609994; - //BA.debugLineNum = 22609994;BA.debugLine="h.Position=0"; -__ref._h /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22609996; - //BA.debugLineNum = 22609996;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSER"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA) VALUES(?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)((double)(Double.parseDouble(__ref._precio_cero /*String*/ ))*(double)(Double.parseDouble(__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PZAS")))*(double)(Double.parseDouble(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))),(Object)(__ref._precio_cero /*String*/ ),(Object)((double)(Double.parseDouble(__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PZAS")))*(double)(Double.parseDouble(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))),(Object)(__ref._h /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_NOMBRE")),(Object)(__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_IDPROD")),(Object)(__ref._clie_id /*String*/ ),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(__ref._usuario /*String*/ ),(Object)(__ref._cl_ruta /*String*/ )})); -RDebugUtils.currentLine=22609997; - //BA.debugLineNum = 22609997;BA.debugLine="h.Close"; -__ref._h /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 269;BA.debugLine="f.Position=i"; +_f.setPosition(_i); + //BA.debugLineNum = 270;BA.debugLine="precio_Cero = f.GetString(\"CAT_DP_PRECIO\")"; +_precio_cero = _f.GetString("CAT_DP_PRECIO"); + //BA.debugLineNum = 271;BA.debugLine="h=B4XPages.MainPage.skmt.ExecQuery2(\"select"; +_h = (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*/ .ExecQuery2("select CAT_GP_NOMBRE from CAT_GUNAPROD where CAT_GP_ID = ? ",new String[]{_f.GetString("CAT_DP_IDPROD")}))); + //BA.debugLineNum = 272;BA.debugLine="h.Position=0"; +_h.setPosition((int) (0)); + //BA.debugLineNum = 274;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSER"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA) VALUES(?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_l_proid.getText()),(Object)((double)(Double.parseDouble(_precio_cero))*(double)(Double.parseDouble(_f.GetString("CAT_DP_PZAS")))*(double)(Double.parseDouble(_cantidad.getText()))),(Object)(_precio_cero),(Object)((double)(Double.parseDouble(_f.GetString("CAT_DP_PZAS")))*(double)(Double.parseDouble(_cantidad.getText()))),(Object)(_h.GetString("CAT_GP_NOMBRE")),(Object)(_f.GetString("CAT_DP_IDPROD")),(Object)(_clie_id),(Object)(_sdate+_stime),(Object)(_usuario),(Object)(_cl_ruta)})); + //BA.debugLineNum = 275;BA.debugLine="h.Close"; +_h.Close(); } }; }; -RDebugUtils.currentLine=22610000; - //BA.debugLineNum = 22610000;BA.debugLine="f.Close"; -__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 278;BA.debugLine="f.Close"; +_f.Close(); }; -RDebugUtils.currentLine=22610002; - //BA.debugLineNum = 22610002;BA.debugLine="e.Close"; -__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22610003; - //BA.debugLineNum = 22610003;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT I"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(0),(Object)(0),(Object)(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._l_desc /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._clie_id /*String*/ ),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(__ref._usuario /*String*/ ),(Object)(__ref._cl_ruta /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ )})); -RDebugUtils.currentLine=22610004; - //BA.debugLineNum = 22610004;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update c"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())})); + //BA.debugLineNum = 280;BA.debugLine="e.Close"; +_e.Close(); + //BA.debugLineNum = 281;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT I"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_l_proid.getText()),(Object)(0),(Object)(0),(Object)(_cantidad.getText()),(Object)(_l_desc.getText()),(Object)(_l_proid.getText()),(Object)(_clie_id),(Object)(_sdate+_stime),(Object)(_usuario),(Object)(_cl_ruta),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ )})); + //BA.debugLineNum = 282;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update c"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cantidad.getText()),(Object)(_l_proid.getText())})); }else { -RDebugUtils.currentLine=22610006; - //BA.debugLineNum = 22610006;BA.debugLine="Msgbox(\"Tiene \" & TOT_ART_PROMO & \" \" & TOT_AR"; -__c.Msgbox(BA.ObjectToCharSequence("Tiene "+__ref._tot_art_promo /*String*/ +" "+__ref._tot_art_promor /*String*/ +" y necesita "+__ref._promo_c /*String*/ +" "+__ref._promo_cr /*String*/ +" Para la Promo. "),BA.ObjectToCharSequence("ADVERTENCIA"),ba); + //BA.debugLineNum = 284;BA.debugLine="Msgbox(\"Tiene \" & TOT_ART_PROMO & \" \" & TOT_AR"; +__c.Msgbox(BA.ObjectToCharSequence("Tiene "+_tot_art_promo+" "+_tot_art_promor+" y necesita "+_promo_c+" "+_promo_cr+" Para la Promo. "),BA.ObjectToCharSequence("ADVERTENCIA"),ba); }; }; -RDebugUtils.currentLine=22610009; - //BA.debugLineNum = 22610009;BA.debugLine="cantidad.Text = \"\""; -__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence("")); -RDebugUtils.currentLine=22610010; - //BA.debugLineNum = 22610010;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; + //BA.debugLineNum = 287;BA.debugLine="cantidad.Text = \"\""; +_cantidad.setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 288;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; _b4xpages._showpage /*String*/ (ba,"Productos"); - }else -{RDebugUtils.currentLine=22610011; - //BA.debugLineNum = 22610011;BA.debugLine="else If l_marca.text = \"PROMOS\" And l_tipo.Text ="; -if ((__ref._l_marca /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("PROMOS") && (__ref._l_tipo /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("PROMOS") && (__ref._promo_c /*String*/ ).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=22610012; - //BA.debugLineNum = 22610012;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + }else if((_l_marca.getText()).equals("PROMOS") && (_l_tipo.getText()).equals("PROMOS") && (_promo_c).equals(BA.NumberToString(0))) { + //BA.debugLineNum = 290;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from PROIDID"); -RDebugUtils.currentLine=22610013; - //BA.debugLineNum = 22610013;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PROIDID VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())})); -RDebugUtils.currentLine=22610014; - //BA.debugLineNum = 22610014;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; -__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 CUENTA from cuentaa"))); -RDebugUtils.currentLine=22610015; - //BA.debugLineNum = 22610015;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22610016; - //BA.debugLineNum = 22610016;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -__ref._clie_id /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUENTA"); -RDebugUtils.currentLine=22610017; - //BA.debugLineNum = 22610017;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22610018; - //BA.debugLineNum = 22610018;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; + //BA.debugLineNum = 291;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PROIDID VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_l_proid.getText())})); + //BA.debugLineNum = 292;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; +_c = (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 CUENTA from cuentaa"))); + //BA.debugLineNum = 293;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 294;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; +_clie_id = _c.GetString("CUENTA"); + //BA.debugLineNum = 295;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 296;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; __c.DateTime.setDateFormat("MM/dd/yyyy"); -RDebugUtils.currentLine=22610019; - //BA.debugLineNum = 22610019;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -__ref._sdate /*String*/ = __c.DateTime.Date(__c.DateTime.getNow()); -RDebugUtils.currentLine=22610020; - //BA.debugLineNum = 22610020;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -__ref._stime /*String*/ = __c.DateTime.Time(__c.DateTime.getNow()); -RDebugUtils.currentLine=22610021; - //BA.debugLineNum = 22610021;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_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 where CAT_CL_CODIGO In (Select cuenta from cuentaa)"))); -RDebugUtils.currentLine=22610022; - //BA.debugLineNum = 22610022;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22610023; - //BA.debugLineNum = 22610023;BA.debugLine="cl_ruta = c.GetString(\"CAT_CL_RUTA\")"; -__ref._cl_ruta /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_RUTA"); -RDebugUtils.currentLine=22610024; - //BA.debugLineNum = 22610024;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22610025; - //BA.debugLineNum = 22610025;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; -__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=22610026; - //BA.debugLineNum = 22610026;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22610027; - //BA.debugLineNum = 22610027;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -__ref._usuario /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("USUARIO"); -RDebugUtils.currentLine=22610030; - //BA.debugLineNum = 22610030;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery(\"select count"; -__ref._e /*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 count(*) as CUANTOS FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) "))); -RDebugUtils.currentLine=22610031; - //BA.debugLineNum = 22610031;BA.debugLine="e.Position =0"; -__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22610032; - //BA.debugLineNum = 22610032;BA.debugLine="If e.GetString(\"CUANTOS\") > 0 Then"; -if ((double)(Double.parseDouble(__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")))>0) { -RDebugUtils.currentLine=22610033; - //BA.debugLineNum = 22610033;BA.debugLine="F=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_"; -__ref._f /*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_DP_IDPROD, CAT_DP_PZAS, CAT_DP_PRECIO FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID)"))); -RDebugUtils.currentLine=22610034; - //BA.debugLineNum = 22610034;BA.debugLine="For i =0 To f.RowCount -1"; + //BA.debugLineNum = 297;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; +_sdate = __c.DateTime.Date(__c.DateTime.getNow()); + //BA.debugLineNum = 298;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; +_stime = __c.DateTime.Time(__c.DateTime.getNow()); + //BA.debugLineNum = 299;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_C"; +_c = (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 where CAT_CL_CODIGO In (Select cuenta from cuentaa)"))); + //BA.debugLineNum = 300;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 301;BA.debugLine="cl_ruta = c.GetString(\"CAT_CL_RUTA\")"; +_cl_ruta = _c.GetString("CAT_CL_RUTA"); + //BA.debugLineNum = 302;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 303;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; +_c = (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"))); + //BA.debugLineNum = 304;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 305;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; +_usuario = _c.GetString("USUARIO"); + //BA.debugLineNum = 308;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery(\"select count"; +_e = (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 count(*) as CUANTOS FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) "))); + //BA.debugLineNum = 309;BA.debugLine="e.Position =0"; +_e.setPosition((int) (0)); + //BA.debugLineNum = 310;BA.debugLine="If e.GetString(\"CUANTOS\") > 0 Then"; +if ((double)(Double.parseDouble(_e.GetString("CUANTOS")))>0) { + //BA.debugLineNum = 311;BA.debugLine="F=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_"; +_f = (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_DP_IDPROD, CAT_DP_PZAS, CAT_DP_PRECIO FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID)"))); + //BA.debugLineNum = 312;BA.debugLine="For i =0 To f.RowCount -1"; { final int step108 = 1; -final int limit108 = (int) (__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit108 = (int) (_f.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit108 ;_i = _i + step108 ) { -RDebugUtils.currentLine=22610035; - //BA.debugLineNum = 22610035;BA.debugLine="F.Position =i"; -__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=22610036; - //BA.debugLineNum = 22610036;BA.debugLine="h=B4XPages.MainPage.skmt.ExecQuery2(\"select CA"; -__ref._h /*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*/ .ExecQuery2("select CAT_GP_NOMBRE from CAT_GUNAPROD where CAT_GP_ID = ? ",new String[]{__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_IDPROD")}))); -RDebugUtils.currentLine=22610037; - //BA.debugLineNum = 22610037;BA.debugLine="h.Position=0"; -__ref._h /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22610038; - //BA.debugLineNum = 22610038;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT I"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)((double)(Double.parseDouble(__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PRECIO")))*(double)(Double.parseDouble(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))*(double)(Double.parseDouble(__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PZAS")))),(Object)(__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PRECIO")),(Object)((double)(Double.parseDouble(__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PZAS")))*(double)(Double.parseDouble(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))),(Object)(__ref._h /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_NOMBRE")),(Object)(__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_IDPROD")),(Object)(__ref._clie_id /*String*/ ),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(__ref._usuario /*String*/ ),(Object)(__ref._cl_ruta /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ )})); -RDebugUtils.currentLine=22610039; - //BA.debugLineNum = 22610039;BA.debugLine="h.Close"; -__ref._h /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 313;BA.debugLine="F.Position =i"; +_f.setPosition(_i); + //BA.debugLineNum = 314;BA.debugLine="h=B4XPages.MainPage.skmt.ExecQuery2(\"select CA"; +_h = (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*/ .ExecQuery2("select CAT_GP_NOMBRE from CAT_GUNAPROD where CAT_GP_ID = ? ",new String[]{_f.GetString("CAT_DP_IDPROD")}))); + //BA.debugLineNum = 315;BA.debugLine="h.Position=0"; +_h.setPosition((int) (0)); + //BA.debugLineNum = 316;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT I"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_l_proid.getText()),(Object)((double)(Double.parseDouble(_f.GetString("CAT_DP_PRECIO")))*(double)(Double.parseDouble(_cantidad.getText()))*(double)(Double.parseDouble(_f.GetString("CAT_DP_PZAS")))),(Object)(_f.GetString("CAT_DP_PRECIO")),(Object)((double)(Double.parseDouble(_f.GetString("CAT_DP_PZAS")))*(double)(Double.parseDouble(_cantidad.getText()))),(Object)(_h.GetString("CAT_GP_NOMBRE")),(Object)(_f.GetString("CAT_DP_IDPROD")),(Object)(_clie_id),(Object)(_sdate+_stime),(Object)(_usuario),(Object)(_cl_ruta),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ )})); + //BA.debugLineNum = 317;BA.debugLine="h.Close"; +_h.Close(); } }; -RDebugUtils.currentLine=22610041; - //BA.debugLineNum = 22610041;BA.debugLine="f.Close"; -__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 319;BA.debugLine="f.Close"; +_f.Close(); }; -RDebugUtils.currentLine=22610043; - //BA.debugLineNum = 22610043;BA.debugLine="e.Close"; -__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22610045; - //BA.debugLineNum = 22610045;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(0),(Object)(0),(Object)(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._l_desc /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._clie_id /*String*/ ),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(__ref._usuario /*String*/ ),(Object)(__ref._cl_ruta /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ )})); -RDebugUtils.currentLine=22610046; - //BA.debugLineNum = 22610046;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())})); -RDebugUtils.currentLine=22610047; - //BA.debugLineNum = 22610047;BA.debugLine="cantidad.Text = \"\""; -__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence("")); -RDebugUtils.currentLine=22610048; - //BA.debugLineNum = 22610048;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(p"; -__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 sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, SUM(PE_COSTO_SIN) AS TOTAL_CLIE_SIN FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); -RDebugUtils.currentLine=22610049; - //BA.debugLineNum = 22610049;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22610050; - //BA.debugLineNum = 22610050;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + //BA.debugLineNum = 321;BA.debugLine="e.Close"; +_e.Close(); + //BA.debugLineNum = 323;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_l_proid.getText()),(Object)(0),(Object)(0),(Object)(_cantidad.getText()),(Object)(_l_desc.getText()),(Object)(_l_proid.getText()),(Object)(_clie_id),(Object)(_sdate+_stime),(Object)(_usuario),(Object)(_cl_ruta),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ )})); + //BA.debugLineNum = 324;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cantidad.getText()),(Object)(_l_proid.getText())})); + //BA.debugLineNum = 325;BA.debugLine="cantidad.Text = \"\""; +_cantidad.setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 326;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(p"; +_c = (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 sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, SUM(PE_COSTO_SIN) AS TOTAL_CLIE_SIN FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); + //BA.debugLineNum = 327;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 328;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=22610051; - //BA.debugLineNum = 22610051;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert int"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT,PC_ALMACEN,PC_RUTA,PC_COSTO_SIN) VALUES (?,?,?,?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._clie_id /*String*/ ),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(__ref._usuario /*String*/ ),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CANT_CLIE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL_CLIE")),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ),(Object)(__ref._almacen /*String*/ ),(Object)(__ref._cl_ruta /*String*/ ),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL_CLIE_SIN"))})); -RDebugUtils.currentLine=22610052; - //BA.debugLineNum = 22610052;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_"; + //BA.debugLineNum = 329;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert int"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT,PC_ALMACEN,PC_RUTA,PC_COSTO_SIN) VALUES (?,?,?,?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_clie_id),(Object)(_sdate+_stime),(Object)(_usuario),(Object)(_c.GetString("CANT_CLIE")),(Object)(_c.GetString("TOTAL_CLIE")),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ),(Object)(_almacen),(Object)(_cl_ruta),(Object)(_c.GetString("TOTAL_CLIE_SIN"))})); + //BA.debugLineNum = 330;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("UPDATE kmt_info set gestion = 2 where CAT_CL_CODIGO In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=22610053; - //BA.debugLineNum = 22610053;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; + //BA.debugLineNum = 331;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; _b4xpages._showpage /*String*/ (ba,"Productos"); }else { -RDebugUtils.currentLine=22610055; - //BA.debugLineNum = 22610055;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; + //BA.debugLineNum = 333;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; __c.DateTime.setDateFormat("MM/dd/yyyy"); -RDebugUtils.currentLine=22610056; - //BA.debugLineNum = 22610056;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -__ref._sdate /*String*/ = __c.DateTime.Date(__c.DateTime.getNow()); -RDebugUtils.currentLine=22610057; - //BA.debugLineNum = 22610057;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -__ref._stime /*String*/ = __c.DateTime.Time(__c.DateTime.getNow()); -RDebugUtils.currentLine=22610058; - //BA.debugLineNum = 22610058;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; -__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 CUENTA from cuentaa"))); -RDebugUtils.currentLine=22610059; - //BA.debugLineNum = 22610059;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22610060; - //BA.debugLineNum = 22610060;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -__ref._clie_id /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUENTA"); -RDebugUtils.currentLine=22610061; - //BA.debugLineNum = 22610061;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22610062; - //BA.debugLineNum = 22610062;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_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 where CAT_CL_CODIGO In (Select cuenta from cuentaa)"))); -RDebugUtils.currentLine=22610063; - //BA.debugLineNum = 22610063;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22610064; - //BA.debugLineNum = 22610064;BA.debugLine="cl_ruta = c.GetString(\"CAT_CL_RUTA\")"; -__ref._cl_ruta /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_RUTA"); -RDebugUtils.currentLine=22610065; - //BA.debugLineNum = 22610065;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22610066; - //BA.debugLineNum = 22610066;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; -__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=22610067; - //BA.debugLineNum = 22610067;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22610068; - //BA.debugLineNum = 22610068;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -__ref._usuario /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("USUARIO"); -RDebugUtils.currentLine=22610069; - //BA.debugLineNum = 22610069;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_COSTO_SIN, PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._almacen /*String*/ ),(Object)((double)(Double.parseDouble(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))*(double)(Double.parseDouble(__ref._l_precio /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()))),(Object)(__ref._l_precio /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._l_desc /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._clie_id /*String*/ ),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(__ref._usuario /*String*/ ),(Object)(__ref._cl_ruta /*String*/ ),(Object)(__ref._preciosin /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ )})); -RDebugUtils.currentLine=22610070; - //BA.debugLineNum = 22610070;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())})); -RDebugUtils.currentLine=22610071; - //BA.debugLineNum = 22610071;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(p"; -__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 sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, SUM(PE_COSTO_SIN) AS TOTAL_CLIE_SIN FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); -RDebugUtils.currentLine=22610072; - //BA.debugLineNum = 22610072;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22610073; - //BA.debugLineNum = 22610073;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + //BA.debugLineNum = 334;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; +_sdate = __c.DateTime.Date(__c.DateTime.getNow()); + //BA.debugLineNum = 335;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; +_stime = __c.DateTime.Time(__c.DateTime.getNow()); + //BA.debugLineNum = 336;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; +_c = (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 CUENTA from cuentaa"))); + //BA.debugLineNum = 337;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 338;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; +_clie_id = _c.GetString("CUENTA"); + //BA.debugLineNum = 339;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 340;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_C"; +_c = (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 where CAT_CL_CODIGO In (Select cuenta from cuentaa)"))); + //BA.debugLineNum = 341;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 342;BA.debugLine="cl_ruta = c.GetString(\"CAT_CL_RUTA\")"; +_cl_ruta = _c.GetString("CAT_CL_RUTA"); + //BA.debugLineNum = 343;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 344;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; +_c = (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"))); + //BA.debugLineNum = 345;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 346;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; +_usuario = _c.GetString("USUARIO"); + //BA.debugLineNum = 347;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_COSTO_SIN, PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_almacen),(Object)((double)(Double.parseDouble(_cantidad.getText()))*(double)(Double.parseDouble(_l_precio.getText()))),(Object)(_l_precio.getText()),(Object)(_cantidad.getText()),(Object)(_l_desc.getText()),(Object)(_l_proid.getText()),(Object)(_clie_id),(Object)(_sdate+_stime),(Object)(_usuario),(Object)(_cl_ruta),(Object)(_preciosin),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ )})); + //BA.debugLineNum = 348;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cantidad.getText()),(Object)(_l_proid.getText())})); + //BA.debugLineNum = 349;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(p"; +_c = (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 sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, SUM(PE_COSTO_SIN) AS TOTAL_CLIE_SIN FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); + //BA.debugLineNum = 350;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 351;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=22610074; - //BA.debugLineNum = 22610074;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert int"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT,PC_ALMACEN,PC_RUTA,PC_COSTO_SIN) VALUES (?,?,?,?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._clie_id /*String*/ ),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(__ref._usuario /*String*/ ),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CANT_CLIE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL_CLIE")),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ),(Object)(__ref._almacen /*String*/ ),(Object)(__ref._cl_ruta /*String*/ ),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL_CLIE_SIN"))})); -RDebugUtils.currentLine=22610075; - //BA.debugLineNum = 22610075;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_"; + //BA.debugLineNum = 352;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert int"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT,PC_ALMACEN,PC_RUTA,PC_COSTO_SIN) VALUES (?,?,?,?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_clie_id),(Object)(_sdate+_stime),(Object)(_usuario),(Object)(_c.GetString("CANT_CLIE")),(Object)(_c.GetString("TOTAL_CLIE")),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ),(Object)(_almacen),(Object)(_cl_ruta),(Object)(_c.GetString("TOTAL_CLIE_SIN"))})); + //BA.debugLineNum = 353;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("UPDATE kmt_info set gestion = 2 where CAT_CL_CODIGO In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=22610076; - //BA.debugLineNum = 22610076;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO INVENT_X_ENVIAR (ALMACEN , PROID , CANTIDAD ) VALUES(?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._almacen /*String*/ ),(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText())})); -RDebugUtils.currentLine=22610077; - //BA.debugLineNum = 22610077;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; + //BA.debugLineNum = 354;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO INVENT_X_ENVIAR (ALMACEN , PROID , CANTIDAD ) VALUES(?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_almacen),(Object)(_l_proid.getText()),(Object)(_cantidad.getText())})); + //BA.debugLineNum = 355;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; _b4xpages._showpage /*String*/ (ba,"Productos"); - }}}} -; -RDebugUtils.currentLine=22610079; - //BA.debugLineNum = 22610079;BA.debugLine="End Sub"; + }; + //BA.debugLineNum = 357;BA.debugLine="End Sub"; return ""; } -public String _i_fotol_click(keymon.lat.medicomed.c_pedidos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_pedidos"; -if (Debug.shouldDelegate(ba, "i_fotol_click", false)) - {return ((String) Debug.delegate(ba, "i_fotol_click", null));} -RDebugUtils.currentLine=22937600; - //BA.debugLineNum = 22937600;BA.debugLine="Sub i_fotol_Click"; -RDebugUtils.currentLine=22937601; - //BA.debugLineNum = 22937601;BA.debugLine="i_fotol.Visible = False"; -__ref._i_fotol /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=22937603; - //BA.debugLineNum = 22937603;BA.debugLine="End Sub"; +public String _i_fotol_click() throws Exception{ + //BA.debugLineNum = 543;BA.debugLine="Sub i_fotol_Click"; + //BA.debugLineNum = 544;BA.debugLine="i_fotol.Visible = False"; +_i_fotol.setVisible(__c.False); + //BA.debugLineNum = 546;BA.debugLine="End Sub"; return ""; } -public String _img_prod_click(keymon.lat.medicomed.c_pedidos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_pedidos"; -if (Debug.shouldDelegate(ba, "img_prod_click", false)) - {return ((String) Debug.delegate(ba, "img_prod_click", null));} -RDebugUtils.currentLine=22872064; - //BA.debugLineNum = 22872064;BA.debugLine="Sub img_prod_Click"; -RDebugUtils.currentLine=22872065; - //BA.debugLineNum = 22872065;BA.debugLine="i_fotol.Visible = True"; -__ref._i_fotol /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=22872066; - //BA.debugLineNum = 22872066;BA.debugLine="i_fotol.Bitmap = LoadBitmap(ruta,\"1.jpg\")"; -__ref._i_fotol /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setBitmap((android.graphics.Bitmap)(__c.LoadBitmap(__ref._ruta /*String*/ ,"1.jpg").getObject())); -RDebugUtils.currentLine=22872068; - //BA.debugLineNum = 22872068;BA.debugLine="End Sub"; +public String _img_prod_click() throws Exception{ + //BA.debugLineNum = 538;BA.debugLine="Sub img_prod_Click"; + //BA.debugLineNum = 539;BA.debugLine="i_fotol.Visible = True"; +_i_fotol.setVisible(__c.True); + //BA.debugLineNum = 540;BA.debugLine="i_fotol.Bitmap = LoadBitmap(ruta,\"1.jpg\")"; +_i_fotol.setBitmap((android.graphics.Bitmap)(__c.LoadBitmap(_ruta,"1.jpg").getObject())); + //BA.debugLineNum = 542;BA.debugLine="End Sub"; return ""; } -public String _nopromo_click(keymon.lat.medicomed.c_pedidos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_pedidos"; -if (Debug.shouldDelegate(ba, "nopromo_click", false)) - {return ((String) Debug.delegate(ba, "nopromo_click", null));} -RDebugUtils.currentLine=23068672; - //BA.debugLineNum = 23068672;BA.debugLine="Sub nopromo_Click"; -RDebugUtils.currentLine=23068673; - //BA.debugLineNum = 23068673;BA.debugLine="If cantidad.Text = \"\" Then"; -if ((__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()).equals("")) { -RDebugUtils.currentLine=23068674; - //BA.debugLineNum = 23068674;BA.debugLine="Msgbox(\"Cantidad no puede ser 0\",\"Cantidad\") 'ig"; +public Object _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 59;BA.debugLine="Public Sub Initialize As Object"; + //BA.debugLineNum = 60;BA.debugLine="Return Me"; +if (true) return this; + //BA.debugLineNum = 61;BA.debugLine="End Sub"; +return null; +} +public String _nopromo_click() throws Exception{ + //BA.debugLineNum = 554;BA.debugLine="Sub nopromo_Click"; + //BA.debugLineNum = 555;BA.debugLine="If cantidad.Text = \"\" Then"; +if ((_cantidad.getText()).equals("")) { + //BA.debugLineNum = 556;BA.debugLine="Msgbox(\"Cantidad no puede ser 0\",\"Cantidad\") 'ig"; __c.Msgbox(BA.ObjectToCharSequence("Cantidad no puede ser 0"),BA.ObjectToCharSequence("Cantidad"),ba); - }else -{RDebugUtils.currentLine=23068675; - //BA.debugLineNum = 23068675;BA.debugLine="Else If cantidad.Text > l_bodega.Text Then"; -if ((double)(Double.parseDouble(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))>(double)(Double.parseDouble(__ref._l_bodega /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()))) { -RDebugUtils.currentLine=23068676; - //BA.debugLineNum = 23068676;BA.debugLine="Msgbox(\"Exede la existencia\", \"ADVERTENCIA\") 'ig"; + }else if((double)(Double.parseDouble(_cantidad.getText()))>(double)(Double.parseDouble(_l_bodega.getText()))) { + //BA.debugLineNum = 558;BA.debugLine="Msgbox(\"Exede la existencia\", \"ADVERTENCIA\") 'ig"; __c.Msgbox(BA.ObjectToCharSequence("Exede la existencia"),BA.ObjectToCharSequence("ADVERTENCIA"),ba); }else { -RDebugUtils.currentLine=23068678; - //BA.debugLineNum = 23068678;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; + //BA.debugLineNum = 560;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; __c.DateTime.setDateFormat("MM/dd/yyyy"); -RDebugUtils.currentLine=23068679; - //BA.debugLineNum = 23068679;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -__ref._sdate /*String*/ = __c.DateTime.Date(__c.DateTime.getNow()); -RDebugUtils.currentLine=23068680; - //BA.debugLineNum = 23068680;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -__ref._stime /*String*/ = __c.DateTime.Time(__c.DateTime.getNow()); -RDebugUtils.currentLine=23068681; - //BA.debugLineNum = 23068681;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; -__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 CUENTA from cuentaa"))); -RDebugUtils.currentLine=23068682; - //BA.debugLineNum = 23068682;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=23068683; - //BA.debugLineNum = 23068683;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -__ref._clie_id /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUENTA"); -RDebugUtils.currentLine=23068684; - //BA.debugLineNum = 23068684;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; -__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=23068685; - //BA.debugLineNum = 23068685;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=23068686; - //BA.debugLineNum = 23068686;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -__ref._usuario /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("USUARIO"); -RDebugUtils.currentLine=23068687; - //BA.debugLineNum = 23068687;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("COACALCO"),(Object)(0),(Object)(0),(Object)(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._l_desc /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._clie_id /*String*/ ),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(__ref._usuario /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ )})); -RDebugUtils.currentLine=23068688; - //BA.debugLineNum = 23068688;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())})); -RDebugUtils.currentLine=23068689; - //BA.debugLineNum = 23068689;BA.debugLine="cantidad.Text = \"\""; -__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence("")); -RDebugUtils.currentLine=23068690; - //BA.debugLineNum = 23068690;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; + //BA.debugLineNum = 561;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; +_sdate = __c.DateTime.Date(__c.DateTime.getNow()); + //BA.debugLineNum = 562;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; +_stime = __c.DateTime.Time(__c.DateTime.getNow()); + //BA.debugLineNum = 563;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; +_c = (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 CUENTA from cuentaa"))); + //BA.debugLineNum = 564;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 565;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; +_clie_id = _c.GetString("CUENTA"); + //BA.debugLineNum = 566;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; +_c = (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"))); + //BA.debugLineNum = 567;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 568;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; +_usuario = _c.GetString("USUARIO"); + //BA.debugLineNum = 569;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("COACALCO"),(Object)(0),(Object)(0),(Object)(_cantidad.getText()),(Object)(_l_desc.getText()),(Object)(_l_proid.getText()),(Object)(_clie_id),(Object)(_sdate+_stime),(Object)(_usuario),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ )})); + //BA.debugLineNum = 570;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cantidad.getText()),(Object)(_l_proid.getText())})); + //BA.debugLineNum = 571;BA.debugLine="cantidad.Text = \"\""; +_cantidad.setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 572;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; _b4xpages._showpage /*String*/ (ba,"Productos"); - }} -; -RDebugUtils.currentLine=23068692; - //BA.debugLineNum = 23068692;BA.debugLine="End Sub"; + }; + //BA.debugLineNum = 574;BA.debugLine="End Sub"; return ""; } -public String _p_pedido_click(keymon.lat.medicomed.c_pedidos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_pedidos"; -if (Debug.shouldDelegate(ba, "p_pedido_click", false)) - {return ((String) Debug.delegate(ba, "p_pedido_click", null));} -RDebugUtils.currentLine=23134208; - //BA.debugLineNum = 23134208;BA.debugLine="Private Sub p_pedido_Click"; -RDebugUtils.currentLine=23134210; - //BA.debugLineNum = 23134210;BA.debugLine="End Sub"; +public String _p_pedido_click() throws Exception{ + //BA.debugLineNum = 576;BA.debugLine="Private Sub p_pedido_Click"; + //BA.debugLineNum = 578;BA.debugLine="End Sub"; return ""; } -public String _terminar_click(keymon.lat.medicomed.c_pedidos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_pedidos"; -if (Debug.shouldDelegate(ba, "terminar_click", false)) - {return ((String) Debug.delegate(ba, "terminar_click", null));} +public String _terminar_click() throws Exception{ int _i = 0; -RDebugUtils.currentLine=22740992; - //BA.debugLineNum = 22740992;BA.debugLine="Sub Terminar_Click"; -RDebugUtils.currentLine=22740993; - //BA.debugLineNum = 22740993;BA.debugLine="If cantidad.Text = \"\" Then"; -if ((__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()).equals("")) { -RDebugUtils.currentLine=22740994; - //BA.debugLineNum = 22740994;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; + //BA.debugLineNum = 364;BA.debugLine="Sub Terminar_Click"; + //BA.debugLineNum = 365;BA.debugLine="If cantidad.Text = \"\" Then"; +if ((_cantidad.getText()).equals("")) { + //BA.debugLineNum = 366;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; _b4xpages._showpage /*String*/ (ba,"Cliente"); - }else -{RDebugUtils.currentLine=22740995; - //BA.debugLineNum = 22740995;BA.debugLine="ELSE If cantidad.Text > l_bodega.Text Then"; -if ((double)(Double.parseDouble(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))>(double)(Double.parseDouble(__ref._l_bodega /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()))) { -RDebugUtils.currentLine=22740996; - //BA.debugLineNum = 22740996;BA.debugLine="Msgbox(\"Exede la existencia\", \"ADVERTENCIA\") 'ig"; + }else if((double)(Double.parseDouble(_cantidad.getText()))>(double)(Double.parseDouble(_l_bodega.getText()))) { + //BA.debugLineNum = 368;BA.debugLine="Msgbox(\"Exede la existencia\", \"ADVERTENCIA\") 'ig"; __c.Msgbox(BA.ObjectToCharSequence("Exede la existencia"),BA.ObjectToCharSequence("ADVERTENCIA"),ba); - }else -{RDebugUtils.currentLine=22740997; - //BA.debugLineNum = 22740997;BA.debugLine="Else If l_marca.text = \"PROMOS\" And l_tipo.Text ="; -if ((__ref._l_marca /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("PROMOS") && (__ref._l_tipo /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("PROMOS") && (double)(Double.parseDouble(__ref._promo_c /*String*/ ))>0 && (double)(Double.parseDouble(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))>0) { -RDebugUtils.currentLine=22740998; - //BA.debugLineNum = 22740998;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + }else if((_l_marca.getText()).equals("PROMOS") && (_l_tipo.getText()).equals("PROMOS") && (double)(Double.parseDouble(_promo_c))>0 && (double)(Double.parseDouble(_cantidad.getText()))>0) { + //BA.debugLineNum = 370;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from PROIDID"); -RDebugUtils.currentLine=22740999; - //BA.debugLineNum = 22740999;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PROIDID VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())})); -RDebugUtils.currentLine=22741000; - //BA.debugLineNum = 22741000;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select count"; -__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 count(*) as CUANTOSD from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND CAT_DP_TIPO = 1)"))); -RDebugUtils.currentLine=22741001; - //BA.debugLineNum = 22741001;BA.debugLine="c.Position =0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22741002; - //BA.debugLineNum = 22741002;BA.debugLine="If c.GetString(\"CUANTOSD\") = 0 Then"; -if ((__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOSD")).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=22741003; - //BA.debugLineNum = 22741003;BA.debugLine="Msgbox(\"No tiene venta el cliente para la promo"; + //BA.debugLineNum = 371;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PROIDID VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_l_proid.getText())})); + //BA.debugLineNum = 372;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select count"; +_c = (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 count(*) as CUANTOSD from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND CAT_DP_TIPO = 1)"))); + //BA.debugLineNum = 373;BA.debugLine="c.Position =0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 374;BA.debugLine="If c.GetString(\"CUANTOSD\") = 0 Then"; +if ((_c.GetString("CUANTOSD")).equals(BA.NumberToString(0))) { + //BA.debugLineNum = 375;BA.debugLine="Msgbox(\"No tiene venta el cliente para la promo"; __c.Msgbox(BA.ObjectToCharSequence("No tiene venta el cliente para la promo"),BA.ObjectToCharSequence("ADVERTENCIA"),ba); }else { -RDebugUtils.currentLine=22741005; - //BA.debugLineNum = 22741005;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select sum("; -__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 sum(pe_cant) As TOT_ART_PROMO, sum(PE_COSTO_TOT) as COSTO_TOT from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND CAT_DP_PRECIO > 1)"))); -RDebugUtils.currentLine=22741006; - //BA.debugLineNum = 22741006;BA.debugLine="C.Position =0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22741007; - //BA.debugLineNum = 22741007;BA.debugLine="TOT_ART_PROMO = C.GetString(\"TOT_ART_PROMO\")"; -__ref._tot_art_promo /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOT_ART_PROMO"); -RDebugUtils.currentLine=22741008; - //BA.debugLineNum = 22741008;BA.debugLine="COSTO_TOT = C.GetString(\"COSTO_TOT\")"; -__ref._costo_tot /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("COSTO_TOT"); -RDebugUtils.currentLine=22741009; - //BA.debugLineNum = 22741009;BA.debugLine="C.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22741010; - //BA.debugLineNum = 22741010;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select coun"; -__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 count(*) as CUANTOSD from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND (CAT_DP_PRECIO = 0.01 or CAT_DP_PRECIO = 1 OR CAT_DP_PRECIO = 0) AND CAT_DP_TIPO = 1)"))); -RDebugUtils.currentLine=22741011; - //BA.debugLineNum = 22741011;BA.debugLine="c.Position =0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22741012; - //BA.debugLineNum = 22741012;BA.debugLine="If c.GetString(\"CUANTOSD\") = 0 Then"; -if ((__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOSD")).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=22741013; - //BA.debugLineNum = 22741013;BA.debugLine="TOT_ART_PROMOR = \"0\" 'Msgbox(\"No tiene venta e"; -__ref._tot_art_promor /*String*/ = "0"; + //BA.debugLineNum = 377;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select sum("; +_c = (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 sum(pe_cant) As TOT_ART_PROMO, sum(PE_COSTO_TOT) as COSTO_TOT from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND CAT_DP_PRECIO > 1)"))); + //BA.debugLineNum = 378;BA.debugLine="C.Position =0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 379;BA.debugLine="TOT_ART_PROMO = C.GetString(\"TOT_ART_PROMO\")"; +_tot_art_promo = _c.GetString("TOT_ART_PROMO"); + //BA.debugLineNum = 380;BA.debugLine="COSTO_TOT = C.GetString(\"COSTO_TOT\")"; +_costo_tot = _c.GetString("COSTO_TOT"); + //BA.debugLineNum = 381;BA.debugLine="C.Close"; +_c.Close(); + //BA.debugLineNum = 382;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select coun"; +_c = (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 count(*) as CUANTOSD from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND (CAT_DP_PRECIO = 0.01 or CAT_DP_PRECIO = 1 OR CAT_DP_PRECIO = 0) AND CAT_DP_TIPO = 1)"))); + //BA.debugLineNum = 383;BA.debugLine="c.Position =0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 384;BA.debugLine="If c.GetString(\"CUANTOSD\") = 0 Then"; +if ((_c.GetString("CUANTOSD")).equals(BA.NumberToString(0))) { + //BA.debugLineNum = 385;BA.debugLine="TOT_ART_PROMOR = \"0\" 'Msgbox(\"No tiene venta e"; +_tot_art_promor = "0"; }else { -RDebugUtils.currentLine=22741015; - //BA.debugLineNum = 22741015;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select sum"; -__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 sum(pe_cant) As TOT_ART_PROMO, sum(PE_COSTO_TOT) as COSTO_TOT from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND (CAT_DP_PRECIO = 0.01 or CAT_DP_PRECIO = 1 OR CAT_DP_PRECIO = 0) AND CAT_DP_TIPO = 1)"))); -RDebugUtils.currentLine=22741016; - //BA.debugLineNum = 22741016;BA.debugLine="C.Position =0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22741017; - //BA.debugLineNum = 22741017;BA.debugLine="TOT_ART_PROMOR = C.GetString(\"TOT_ART_PROMO\")"; -__ref._tot_art_promor /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOT_ART_PROMO"); + //BA.debugLineNum = 387;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select sum"; +_c = (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 sum(pe_cant) As TOT_ART_PROMO, sum(PE_COSTO_TOT) as COSTO_TOT from pedido where PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID) AND (CAT_DP_PRECIO = 0.01 or CAT_DP_PRECIO = 1 OR CAT_DP_PRECIO = 0) AND CAT_DP_TIPO = 1)"))); + //BA.debugLineNum = 388;BA.debugLine="C.Position =0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 389;BA.debugLine="TOT_ART_PROMOR = C.GetString(\"TOT_ART_PROMO\")"; +_tot_art_promor = _c.GetString("TOT_ART_PROMO"); }; -RDebugUtils.currentLine=22741019; - //BA.debugLineNum = 22741019;BA.debugLine="C.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22741020; - //BA.debugLineNum = 22741020;BA.debugLine="PROMO_C = PROMO_C * cantidad.Text"; -__ref._promo_c /*String*/ = BA.NumberToString((double)(Double.parseDouble(__ref._promo_c /*String*/ ))*(double)(Double.parseDouble(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))); -RDebugUtils.currentLine=22741021; - //BA.debugLineNum = 22741021;BA.debugLine="PROMO_CR = PROMO_CR * cantidad.Text"; -__ref._promo_cr /*String*/ = BA.NumberToString((double)(Double.parseDouble(__ref._promo_cr /*String*/ ))*(double)(Double.parseDouble(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))); -RDebugUtils.currentLine=22741022; - //BA.debugLineNum = 22741022;BA.debugLine="If TOT_ART_PROMO = PROMO_C And TOT_ART_PROMOR"; -if ((__ref._tot_art_promo /*String*/ ).equals(__ref._promo_c /*String*/ ) && (__ref._tot_art_promor /*String*/ ).equals(__ref._promo_cr /*String*/ )) { -RDebugUtils.currentLine=22741026; - //BA.debugLineNum = 22741026;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE P"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE PEDIDO SET PE_CEDIS = (?) WHERE PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID))",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())})); -RDebugUtils.currentLine=22741027; - //BA.debugLineNum = 22741027;BA.debugLine="D=B4XPages.MainPage.skmt.ExecQuery(\"select CAT"; -__ref._d /*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_DP_ID, CAT_DP_PRECIO, CAT_DP_PRECIO_SIMPTOS, CAT_DP_IDPROD FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) AND CAT_DP_PRECIO > 1"))); -RDebugUtils.currentLine=22741028; - //BA.debugLineNum = 22741028;BA.debugLine="If D.RowCount>0 Then"; -if (__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=22741029; - //BA.debugLineNum = 22741029;BA.debugLine="For i=0 To D.RowCount -1"; + //BA.debugLineNum = 391;BA.debugLine="C.Close"; +_c.Close(); + //BA.debugLineNum = 392;BA.debugLine="PROMO_C = PROMO_C * cantidad.Text"; +_promo_c = BA.NumberToString((double)(Double.parseDouble(_promo_c))*(double)(Double.parseDouble(_cantidad.getText()))); + //BA.debugLineNum = 393;BA.debugLine="PROMO_CR = PROMO_CR * cantidad.Text"; +_promo_cr = BA.NumberToString((double)(Double.parseDouble(_promo_cr))*(double)(Double.parseDouble(_cantidad.getText()))); + //BA.debugLineNum = 394;BA.debugLine="If TOT_ART_PROMO = PROMO_C And TOT_ART_PROMOR"; +if ((_tot_art_promo).equals(_promo_c) && (_tot_art_promor).equals(_promo_cr)) { + //BA.debugLineNum = 398;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE P"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE PEDIDO SET PE_CEDIS = (?) WHERE PE_CLIENTE IN (Select CUENTA from cuentaa) and pe_proid In (Select cat_dp_idprod from CAT_DETALLES_PAQ WHERE CAT_DP_ID In (Select PROIDID from PROIDID))",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_l_proid.getText())})); + //BA.debugLineNum = 399;BA.debugLine="D=B4XPages.MainPage.skmt.ExecQuery(\"select CAT"; +_d = (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_DP_ID, CAT_DP_PRECIO, CAT_DP_PRECIO_SIMPTOS, CAT_DP_IDPROD FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) AND CAT_DP_PRECIO > 1"))); + //BA.debugLineNum = 400;BA.debugLine="If D.RowCount>0 Then"; +if (_d.getRowCount()>0) { + //BA.debugLineNum = 401;BA.debugLine="For i=0 To D.RowCount -1"; { final int step34 = 1; -final int limit34 = (int) (__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit34 = (int) (_d.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit34 ;_i = _i + step34 ) { -RDebugUtils.currentLine=22741030; - //BA.debugLineNum = 22741030;BA.debugLine="D.Position=i"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=22741031; - //BA.debugLineNum = 22741031;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE PEDIDO SET PE_COSTOU = (?), PE_COSTO_TOT = PE_CANT * (?) , PE_COSTO_SIN = (?) WHERE PE_PROID = (?) And PE_CEDIS In (Select PROIDID from PROIDID) AND PE_CLIENTE IN (Select CUENTA from cuentaa) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PRECIO")),(Object)(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PRECIO")),(Object)(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PRECIO_SIMPTOS")),(Object)(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_IDPROD"))})); + //BA.debugLineNum = 402;BA.debugLine="D.Position=i"; +_d.setPosition(_i); + //BA.debugLineNum = 403;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE PEDIDO SET PE_COSTOU = (?), PE_COSTO_TOT = PE_CANT * (?) , PE_COSTO_SIN = (?) WHERE PE_PROID = (?) And PE_CEDIS In (Select PROIDID from PROIDID) AND PE_CLIENTE IN (Select CUENTA from cuentaa) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_d.GetString("CAT_DP_PRECIO")),(Object)(_d.GetString("CAT_DP_PRECIO")),(Object)(_d.GetString("CAT_DP_PRECIO_SIMPTOS")),(Object)(_d.GetString("CAT_DP_IDPROD"))})); } }; }; -RDebugUtils.currentLine=22741034; - //BA.debugLineNum = 22741034;BA.debugLine="D.Close"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22741035; - //BA.debugLineNum = 22741035;BA.debugLine="D=B4XPages.MainPage.skmt.ExecQuery(\"select CAT"; -__ref._d /*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_DP_ID, CAT_DP_PRECIO, CAT_DP_PRECIO_SIMPTOS, CAT_DP_IDPROD FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) AND (CAT_DP_PRECIO = 0.01 or CAT_DP_PRECIO = 1 OR CAT_DP_PRECIO = 0) AND CAT_DP_TIPO = 1"))); -RDebugUtils.currentLine=22741036; - //BA.debugLineNum = 22741036;BA.debugLine="If D.RowCount>0 Then"; -if (__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=22741037; - //BA.debugLineNum = 22741037;BA.debugLine="For i=0 To D.RowCount -1"; + //BA.debugLineNum = 406;BA.debugLine="D.Close"; +_d.Close(); + //BA.debugLineNum = 407;BA.debugLine="D=B4XPages.MainPage.skmt.ExecQuery(\"select CAT"; +_d = (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_DP_ID, CAT_DP_PRECIO, CAT_DP_PRECIO_SIMPTOS, CAT_DP_IDPROD FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) AND (CAT_DP_PRECIO = 0.01 or CAT_DP_PRECIO = 1 OR CAT_DP_PRECIO = 0) AND CAT_DP_TIPO = 1"))); + //BA.debugLineNum = 408;BA.debugLine="If D.RowCount>0 Then"; +if (_d.getRowCount()>0) { + //BA.debugLineNum = 409;BA.debugLine="For i=0 To D.RowCount -1"; { final int step42 = 1; -final int limit42 = (int) (__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit42 = (int) (_d.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit42 ;_i = _i + step42 ) { -RDebugUtils.currentLine=22741038; - //BA.debugLineNum = 22741038;BA.debugLine="D.Position=i"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=22741039; - //BA.debugLineNum = 22741039;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE PEDIDO SET PE_COSTOU = (?), PE_COSTO_TOT = PE_CANT * (?) , PE_COSTO_SIN = (?) WHERE PE_PROID = (?) And PE_CEDIS In (Select PROIDID from PROIDID) AND PE_CLIENTE IN (Select CUENTA from cuentaa) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PRECIO")),(Object)(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PRECIO")),(Object)(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PRECIO_SIMPTOS")),(Object)(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_IDPROD"))})); + //BA.debugLineNum = 410;BA.debugLine="D.Position=i"; +_d.setPosition(_i); + //BA.debugLineNum = 411;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE PEDIDO SET PE_COSTOU = (?), PE_COSTO_TOT = PE_CANT * (?) , PE_COSTO_SIN = (?) WHERE PE_PROID = (?) And PE_CEDIS In (Select PROIDID from PROIDID) AND PE_CLIENTE IN (Select CUENTA from cuentaa) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_d.GetString("CAT_DP_PRECIO")),(Object)(_d.GetString("CAT_DP_PRECIO")),(Object)(_d.GetString("CAT_DP_PRECIO_SIMPTOS")),(Object)(_d.GetString("CAT_DP_IDPROD"))})); } }; }; -RDebugUtils.currentLine=22741042; - //BA.debugLineNum = 22741042;BA.debugLine="D.Close"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22741043; - //BA.debugLineNum = 22741043;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; + //BA.debugLineNum = 414;BA.debugLine="D.Close"; +_d.Close(); + //BA.debugLineNum = 415;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; __c.DateTime.setDateFormat("MM/dd/yyyy"); -RDebugUtils.currentLine=22741044; - //BA.debugLineNum = 22741044;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -__ref._sdate /*String*/ = __c.DateTime.Date(__c.DateTime.getNow()); -RDebugUtils.currentLine=22741045; - //BA.debugLineNum = 22741045;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -__ref._stime /*String*/ = __c.DateTime.Time(__c.DateTime.getNow()); -RDebugUtils.currentLine=22741046; - //BA.debugLineNum = 22741046;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUE"; -__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 CUENTA from cuentaa"))); -RDebugUtils.currentLine=22741047; - //BA.debugLineNum = 22741047;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22741048; - //BA.debugLineNum = 22741048;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -__ref._clie_id /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUENTA"); -RDebugUtils.currentLine=22741049; - //BA.debugLineNum = 22741049;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22741050; - //BA.debugLineNum = 22741050;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT"; -__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 where CAT_CL_CODIGO In (Select cuenta from cuentaa)"))); -RDebugUtils.currentLine=22741051; - //BA.debugLineNum = 22741051;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22741052; - //BA.debugLineNum = 22741052;BA.debugLine="cl_ruta = c.GetString(\"CAT_CL_RUTA\")"; -__ref._cl_ruta /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_RUTA"); -RDebugUtils.currentLine=22741053; - //BA.debugLineNum = 22741053;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22741054; - //BA.debugLineNum = 22741054;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USU"; -__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=22741055; - //BA.debugLineNum = 22741055;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22741056; - //BA.debugLineNum = 22741056;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -__ref._usuario /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("USUARIO"); -RDebugUtils.currentLine=22741058; - //BA.debugLineNum = 22741058;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery(\"select cou"; -__ref._e /*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 count(*) as CUANTOS FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) and CAT_DP_TIPO = 0 "))); -RDebugUtils.currentLine=22741060; - //BA.debugLineNum = 22741060;BA.debugLine="e.Position =0"; -__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22741061; - //BA.debugLineNum = 22741061;BA.debugLine="If e.GetString(\"CUANTOS\") > 0 Then"; -if ((double)(Double.parseDouble(__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")))>0) { -RDebugUtils.currentLine=22741062; - //BA.debugLineNum = 22741062;BA.debugLine="F=B4XPages.MainPage.skmt.ExecQuery(\"select CA"; -__ref._f /*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_DP_IDPROD, CAT_DP_PZAS,CAT_DP_PRECIO FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) and CAT_DP_TIPO = 0 "))); -RDebugUtils.currentLine=22741065; - //BA.debugLineNum = 22741065;BA.debugLine="If f.RowCount>0 Then"; -if (__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=22741066; - //BA.debugLineNum = 22741066;BA.debugLine="For i=0 To f.RowCount -1"; + //BA.debugLineNum = 416;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; +_sdate = __c.DateTime.Date(__c.DateTime.getNow()); + //BA.debugLineNum = 417;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; +_stime = __c.DateTime.Time(__c.DateTime.getNow()); + //BA.debugLineNum = 418;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUE"; +_c = (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 CUENTA from cuentaa"))); + //BA.debugLineNum = 419;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 420;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; +_clie_id = _c.GetString("CUENTA"); + //BA.debugLineNum = 421;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 422;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT"; +_c = (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 where CAT_CL_CODIGO In (Select cuenta from cuentaa)"))); + //BA.debugLineNum = 423;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 424;BA.debugLine="cl_ruta = c.GetString(\"CAT_CL_RUTA\")"; +_cl_ruta = _c.GetString("CAT_CL_RUTA"); + //BA.debugLineNum = 425;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 426;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USU"; +_c = (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"))); + //BA.debugLineNum = 427;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 428;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; +_usuario = _c.GetString("USUARIO"); + //BA.debugLineNum = 430;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery(\"select cou"; +_e = (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 count(*) as CUANTOS FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) and CAT_DP_TIPO = 0 "))); + //BA.debugLineNum = 432;BA.debugLine="e.Position =0"; +_e.setPosition((int) (0)); + //BA.debugLineNum = 433;BA.debugLine="If e.GetString(\"CUANTOS\") > 0 Then"; +if ((double)(Double.parseDouble(_e.GetString("CUANTOS")))>0) { + //BA.debugLineNum = 434;BA.debugLine="F=B4XPages.MainPage.skmt.ExecQuery(\"select CA"; +_f = (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_DP_IDPROD, CAT_DP_PZAS,CAT_DP_PRECIO FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) and CAT_DP_TIPO = 0 "))); + //BA.debugLineNum = 437;BA.debugLine="If f.RowCount>0 Then"; +if (_f.getRowCount()>0) { + //BA.debugLineNum = 438;BA.debugLine="For i=0 To f.RowCount -1"; { final int step67 = 1; -final int limit67 = (int) (__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit67 = (int) (_f.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit67 ;_i = _i + step67 ) { -RDebugUtils.currentLine=22741067; - //BA.debugLineNum = 22741067;BA.debugLine="f.Position=i"; -__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=22741068; - //BA.debugLineNum = 22741068;BA.debugLine="precio_Cero = f.GetString(\"CAT_DP_PRECIO\")"; -__ref._precio_cero /*String*/ = __ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PRECIO"); -RDebugUtils.currentLine=22741069; - //BA.debugLineNum = 22741069;BA.debugLine="h=B4XPages.MainPage.skmt.ExecQuery2(\"select"; -__ref._h /*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*/ .ExecQuery2("select CAT_GP_NOMBRE from CAT_GUNAPROD where CAT_GP_ID = ? ",new String[]{__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_IDPROD")}))); -RDebugUtils.currentLine=22741070; - //BA.debugLineNum = 22741070;BA.debugLine="h.Position=0"; -__ref._h /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22741071; - //BA.debugLineNum = 22741071;BA.debugLine="Log(111)"; -__c.LogImpl("322741071",BA.NumberToString(111),0); -RDebugUtils.currentLine=22741072; - //BA.debugLineNum = 22741072;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSER"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)((double)(Double.parseDouble(__ref._precio_cero /*String*/ ))*(double)(Double.parseDouble(__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PZAS")))*(double)(Double.parseDouble(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))),(Object)(__ref._precio_cero /*String*/ ),(Object)((double)(Double.parseDouble(__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PZAS")))*(double)(Double.parseDouble(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))),(Object)(__ref._h /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_NOMBRE")),(Object)(__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_IDPROD")),(Object)(__ref._clie_id /*String*/ ),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(__ref._usuario /*String*/ ),(Object)(__ref._cl_ruta /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ )})); -RDebugUtils.currentLine=22741073; - //BA.debugLineNum = 22741073;BA.debugLine="h.Close"; -__ref._h /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 439;BA.debugLine="f.Position=i"; +_f.setPosition(_i); + //BA.debugLineNum = 440;BA.debugLine="precio_Cero = f.GetString(\"CAT_DP_PRECIO\")"; +_precio_cero = _f.GetString("CAT_DP_PRECIO"); + //BA.debugLineNum = 441;BA.debugLine="h=B4XPages.MainPage.skmt.ExecQuery2(\"select"; +_h = (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*/ .ExecQuery2("select CAT_GP_NOMBRE from CAT_GUNAPROD where CAT_GP_ID = ? ",new String[]{_f.GetString("CAT_DP_IDPROD")}))); + //BA.debugLineNum = 442;BA.debugLine="h.Position=0"; +_h.setPosition((int) (0)); + //BA.debugLineNum = 443;BA.debugLine="Log(111)"; +__c.LogImpl("355705679",BA.NumberToString(111),0); + //BA.debugLineNum = 444;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSER"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_l_proid.getText()),(Object)((double)(Double.parseDouble(_precio_cero))*(double)(Double.parseDouble(_f.GetString("CAT_DP_PZAS")))*(double)(Double.parseDouble(_cantidad.getText()))),(Object)(_precio_cero),(Object)((double)(Double.parseDouble(_f.GetString("CAT_DP_PZAS")))*(double)(Double.parseDouble(_cantidad.getText()))),(Object)(_h.GetString("CAT_GP_NOMBRE")),(Object)(_f.GetString("CAT_DP_IDPROD")),(Object)(_clie_id),(Object)(_sdate+_stime),(Object)(_usuario),(Object)(_cl_ruta),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ )})); + //BA.debugLineNum = 445;BA.debugLine="h.Close"; +_h.Close(); } }; }; -RDebugUtils.currentLine=22741076; - //BA.debugLineNum = 22741076;BA.debugLine="f.Close"; -__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 448;BA.debugLine="f.Close"; +_f.Close(); }; -RDebugUtils.currentLine=22741078; - //BA.debugLineNum = 22741078;BA.debugLine="e.Close"; -__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22741079; - //BA.debugLineNum = 22741079;BA.debugLine="Log(222)"; -__c.LogImpl("322741079",BA.NumberToString(222),0); -RDebugUtils.currentLine=22741080; - //BA.debugLineNum = 22741080;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT I"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(0),(Object)(0),(Object)(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._l_desc /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._clie_id /*String*/ ),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(__ref._usuario /*String*/ ),(Object)(__ref._cl_ruta /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ )})); -RDebugUtils.currentLine=22741081; - //BA.debugLineNum = 22741081;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update c"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())})); + //BA.debugLineNum = 450;BA.debugLine="e.Close"; +_e.Close(); + //BA.debugLineNum = 451;BA.debugLine="Log(222)"; +__c.LogImpl("355705687",BA.NumberToString(222),0); + //BA.debugLineNum = 452;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT I"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_l_proid.getText()),(Object)(0),(Object)(0),(Object)(_cantidad.getText()),(Object)(_l_desc.getText()),(Object)(_l_proid.getText()),(Object)(_clie_id),(Object)(_sdate+_stime),(Object)(_usuario),(Object)(_cl_ruta),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ )})); + //BA.debugLineNum = 453;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update c"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cantidad.getText()),(Object)(_l_proid.getText())})); }else { -RDebugUtils.currentLine=22741083; - //BA.debugLineNum = 22741083;BA.debugLine="Msgbox(\"Tiene \" & TOT_ART_PROMO & \" \" & TOT_AR"; -__c.Msgbox(BA.ObjectToCharSequence("Tiene "+__ref._tot_art_promo /*String*/ +" "+__ref._tot_art_promor /*String*/ +" y necesita "+__ref._promo_c /*String*/ +" "+__ref._promo_cr /*String*/ +" Para la Promo. "),BA.ObjectToCharSequence("ADVERTENCIA"),ba); + //BA.debugLineNum = 455;BA.debugLine="Msgbox(\"Tiene \" & TOT_ART_PROMO & \" \" & TOT_AR"; +__c.Msgbox(BA.ObjectToCharSequence("Tiene "+_tot_art_promo+" "+_tot_art_promor+" y necesita "+_promo_c+" "+_promo_cr+" Para la Promo. "),BA.ObjectToCharSequence("ADVERTENCIA"),ba); }; }; -RDebugUtils.currentLine=22741086; - //BA.debugLineNum = 22741086;BA.debugLine="cantidad.Text = \"\""; -__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence("")); -RDebugUtils.currentLine=22741087; - //BA.debugLineNum = 22741087;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; + //BA.debugLineNum = 458;BA.debugLine="cantidad.Text = \"\""; +_cantidad.setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 459;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; _b4xpages._showpage /*String*/ (ba,"Cliente"); - }else -{RDebugUtils.currentLine=22741088; - //BA.debugLineNum = 22741088;BA.debugLine="else If l_marca.text = \"PROMOS\" And l_tipo.Text ="; -if ((__ref._l_marca /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("PROMOS") && (__ref._l_tipo /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("PROMOS") && (__ref._promo_c /*String*/ ).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=22741089; - //BA.debugLineNum = 22741089;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + }else if((_l_marca.getText()).equals("PROMOS") && (_l_tipo.getText()).equals("PROMOS") && (_promo_c).equals(BA.NumberToString(0))) { + //BA.debugLineNum = 461;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from PROIDID"); -RDebugUtils.currentLine=22741090; - //BA.debugLineNum = 22741090;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PROIDID VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())})); -RDebugUtils.currentLine=22741091; - //BA.debugLineNum = 22741091;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; -__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 CUENTA from cuentaa"))); -RDebugUtils.currentLine=22741092; - //BA.debugLineNum = 22741092;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22741093; - //BA.debugLineNum = 22741093;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -__ref._clie_id /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUENTA"); -RDebugUtils.currentLine=22741094; - //BA.debugLineNum = 22741094;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22741095; - //BA.debugLineNum = 22741095;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; + //BA.debugLineNum = 462;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PROIDID VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_l_proid.getText())})); + //BA.debugLineNum = 463;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; +_c = (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 CUENTA from cuentaa"))); + //BA.debugLineNum = 464;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 465;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; +_clie_id = _c.GetString("CUENTA"); + //BA.debugLineNum = 466;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 467;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; __c.DateTime.setDateFormat("MM/dd/yyyy"); -RDebugUtils.currentLine=22741096; - //BA.debugLineNum = 22741096;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -__ref._sdate /*String*/ = __c.DateTime.Date(__c.DateTime.getNow()); -RDebugUtils.currentLine=22741097; - //BA.debugLineNum = 22741097;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -__ref._stime /*String*/ = __c.DateTime.Time(__c.DateTime.getNow()); -RDebugUtils.currentLine=22741098; - //BA.debugLineNum = 22741098;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_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 where CAT_CL_CODIGO In (Select cuenta from cuentaa)"))); -RDebugUtils.currentLine=22741099; - //BA.debugLineNum = 22741099;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22741100; - //BA.debugLineNum = 22741100;BA.debugLine="cl_ruta = c.GetString(\"CAT_CL_RUTA\")"; -__ref._cl_ruta /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_RUTA"); -RDebugUtils.currentLine=22741101; - //BA.debugLineNum = 22741101;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22741102; - //BA.debugLineNum = 22741102;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; -__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=22741103; - //BA.debugLineNum = 22741103;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22741104; - //BA.debugLineNum = 22741104;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -__ref._usuario /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("USUARIO"); -RDebugUtils.currentLine=22741106; - //BA.debugLineNum = 22741106;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery(\"select count"; -__ref._e /*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 count(*) as CUANTOS FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) "))); -RDebugUtils.currentLine=22741107; - //BA.debugLineNum = 22741107;BA.debugLine="e.Position =0"; -__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22741108; - //BA.debugLineNum = 22741108;BA.debugLine="If e.GetString(\"CUANTOS\") > 0 Then"; -if ((double)(Double.parseDouble(__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")))>0) { -RDebugUtils.currentLine=22741109; - //BA.debugLineNum = 22741109;BA.debugLine="F=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_"; -__ref._f /*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_DP_IDPROD, CAT_DP_PZAS, CAT_DP_PRECIO FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID)"))); -RDebugUtils.currentLine=22741110; - //BA.debugLineNum = 22741110;BA.debugLine="For i =0 To f.RowCount -1"; + //BA.debugLineNum = 468;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; +_sdate = __c.DateTime.Date(__c.DateTime.getNow()); + //BA.debugLineNum = 469;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; +_stime = __c.DateTime.Time(__c.DateTime.getNow()); + //BA.debugLineNum = 470;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_C"; +_c = (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 where CAT_CL_CODIGO In (Select cuenta from cuentaa)"))); + //BA.debugLineNum = 471;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 472;BA.debugLine="cl_ruta = c.GetString(\"CAT_CL_RUTA\")"; +_cl_ruta = _c.GetString("CAT_CL_RUTA"); + //BA.debugLineNum = 473;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 474;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; +_c = (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"))); + //BA.debugLineNum = 475;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 476;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; +_usuario = _c.GetString("USUARIO"); + //BA.debugLineNum = 478;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery(\"select count"; +_e = (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 count(*) as CUANTOS FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID) "))); + //BA.debugLineNum = 479;BA.debugLine="e.Position =0"; +_e.setPosition((int) (0)); + //BA.debugLineNum = 480;BA.debugLine="If e.GetString(\"CUANTOS\") > 0 Then"; +if ((double)(Double.parseDouble(_e.GetString("CUANTOS")))>0) { + //BA.debugLineNum = 481;BA.debugLine="F=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_"; +_f = (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_DP_IDPROD, CAT_DP_PZAS, CAT_DP_PRECIO FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID IN (Select PROIDID from PROIDID)"))); + //BA.debugLineNum = 482;BA.debugLine="For i =0 To f.RowCount -1"; { final int step110 = 1; -final int limit110 = (int) (__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit110 = (int) (_f.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit110 ;_i = _i + step110 ) { -RDebugUtils.currentLine=22741111; - //BA.debugLineNum = 22741111;BA.debugLine="F.Position =i"; -__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=22741112; - //BA.debugLineNum = 22741112;BA.debugLine="h=B4XPages.MainPage.skmt.ExecQuery2(\"select CA"; -__ref._h /*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*/ .ExecQuery2("select CAT_GP_NOMBRE from CAT_GUNAPROD where CAT_GP_ID = ? ",new String[]{__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_IDPROD")}))); -RDebugUtils.currentLine=22741113; - //BA.debugLineNum = 22741113;BA.debugLine="h.Position=0"; -__ref._h /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22741114; - //BA.debugLineNum = 22741114;BA.debugLine="Log(333)"; -__c.LogImpl("322741114",BA.NumberToString(333),0); -RDebugUtils.currentLine=22741115; - //BA.debugLineNum = 22741115;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT I"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)((double)(Double.parseDouble(__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PRECIO")))*(double)(Double.parseDouble(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))*(double)(Double.parseDouble(__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PZAS")))),(Object)(__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PRECIO")),(Object)((double)(Double.parseDouble(__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_PZAS")))*(double)(Double.parseDouble(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))),(Object)(__ref._h /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_NOMBRE")),(Object)(__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_DP_IDPROD")),(Object)(__ref._clie_id /*String*/ ),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(__ref._usuario /*String*/ ),(Object)(__ref._cl_ruta /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ )})); -RDebugUtils.currentLine=22741116; - //BA.debugLineNum = 22741116;BA.debugLine="h.Close"; -__ref._h /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 483;BA.debugLine="F.Position =i"; +_f.setPosition(_i); + //BA.debugLineNum = 484;BA.debugLine="h=B4XPages.MainPage.skmt.ExecQuery2(\"select CA"; +_h = (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*/ .ExecQuery2("select CAT_GP_NOMBRE from CAT_GUNAPROD where CAT_GP_ID = ? ",new String[]{_f.GetString("CAT_DP_IDPROD")}))); + //BA.debugLineNum = 485;BA.debugLine="h.Position=0"; +_h.setPosition((int) (0)); + //BA.debugLineNum = 486;BA.debugLine="Log(333)"; +__c.LogImpl("355705722",BA.NumberToString(333),0); + //BA.debugLineNum = 487;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT I"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_l_proid.getText()),(Object)((double)(Double.parseDouble(_f.GetString("CAT_DP_PRECIO")))*(double)(Double.parseDouble(_cantidad.getText()))*(double)(Double.parseDouble(_f.GetString("CAT_DP_PZAS")))),(Object)(_f.GetString("CAT_DP_PRECIO")),(Object)((double)(Double.parseDouble(_f.GetString("CAT_DP_PZAS")))*(double)(Double.parseDouble(_cantidad.getText()))),(Object)(_h.GetString("CAT_GP_NOMBRE")),(Object)(_f.GetString("CAT_DP_IDPROD")),(Object)(_clie_id),(Object)(_sdate+_stime),(Object)(_usuario),(Object)(_cl_ruta),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ )})); + //BA.debugLineNum = 488;BA.debugLine="h.Close"; +_h.Close(); } }; -RDebugUtils.currentLine=22741118; - //BA.debugLineNum = 22741118;BA.debugLine="f.Close"; -__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 490;BA.debugLine="f.Close"; +_f.Close(); }; -RDebugUtils.currentLine=22741120; - //BA.debugLineNum = 22741120;BA.debugLine="e.Close"; -__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22741121; - //BA.debugLineNum = 22741121;BA.debugLine="Log(444)"; -__c.LogImpl("322741121",BA.NumberToString(444),0); -RDebugUtils.currentLine=22741122; - //BA.debugLineNum = 22741122;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(0),(Object)(0),(Object)(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._l_desc /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._clie_id /*String*/ ),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(__ref._usuario /*String*/ ),(Object)(__ref._cl_ruta /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ )})); -RDebugUtils.currentLine=22741123; - //BA.debugLineNum = 22741123;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())})); -RDebugUtils.currentLine=22741124; - //BA.debugLineNum = 22741124;BA.debugLine="cantidad.Text = \"\""; -__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence("")); -RDebugUtils.currentLine=22741125; - //BA.debugLineNum = 22741125;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(p"; -__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 sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, SUM(PE_COSTO_SIN) AS TOTAL_CLIE_SIN FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); -RDebugUtils.currentLine=22741126; - //BA.debugLineNum = 22741126;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22741127; - //BA.debugLineNum = 22741127;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + //BA.debugLineNum = 492;BA.debugLine="e.Close"; +_e.Close(); + //BA.debugLineNum = 493;BA.debugLine="Log(444)"; +__c.LogImpl("355705729",BA.NumberToString(444),0); + //BA.debugLineNum = 494;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_l_proid.getText()),(Object)(0),(Object)(0),(Object)(_cantidad.getText()),(Object)(_l_desc.getText()),(Object)(_l_proid.getText()),(Object)(_clie_id),(Object)(_sdate+_stime),(Object)(_usuario),(Object)(_cl_ruta),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ )})); + //BA.debugLineNum = 495;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cantidad.getText()),(Object)(_l_proid.getText())})); + //BA.debugLineNum = 496;BA.debugLine="cantidad.Text = \"\""; +_cantidad.setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 497;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(p"; +_c = (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 sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, SUM(PE_COSTO_SIN) AS TOTAL_CLIE_SIN FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); + //BA.debugLineNum = 498;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 499;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=22741128; - //BA.debugLineNum = 22741128;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert int"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT,PC_ALMACEN,PC_RUTA,PC_COSTO_SIN) VALUES (?,?,?,?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._clie_id /*String*/ ),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(__ref._usuario /*String*/ ),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CANT_CLIE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL_CLIE")),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ),(Object)(__ref._almacen /*String*/ ),(Object)(__ref._cl_ruta /*String*/ ),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL_CLIE_SIN"))})); -RDebugUtils.currentLine=22741129; - //BA.debugLineNum = 22741129;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_"; + //BA.debugLineNum = 500;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert int"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT,PC_ALMACEN,PC_RUTA,PC_COSTO_SIN) VALUES (?,?,?,?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_clie_id),(Object)(_sdate+_stime),(Object)(_usuario),(Object)(_c.GetString("CANT_CLIE")),(Object)(_c.GetString("TOTAL_CLIE")),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ),(Object)(_almacen),(Object)(_cl_ruta),(Object)(_c.GetString("TOTAL_CLIE_SIN"))})); + //BA.debugLineNum = 501;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("UPDATE kmt_info set gestion = 2 where CAT_CL_CODIGO In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=22741130; - //BA.debugLineNum = 22741130;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; + //BA.debugLineNum = 502;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; _b4xpages._showpage /*String*/ (ba,"Cliente"); }else { -RDebugUtils.currentLine=22741132; - //BA.debugLineNum = 22741132;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; + //BA.debugLineNum = 504;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; __c.DateTime.setDateFormat("MM/dd/yyyy"); -RDebugUtils.currentLine=22741133; - //BA.debugLineNum = 22741133;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -__ref._sdate /*String*/ = __c.DateTime.Date(__c.DateTime.getNow()); -RDebugUtils.currentLine=22741134; - //BA.debugLineNum = 22741134;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -__ref._stime /*String*/ = __c.DateTime.Time(__c.DateTime.getNow()); -RDebugUtils.currentLine=22741135; - //BA.debugLineNum = 22741135;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; -__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 CUENTA from cuentaa"))); -RDebugUtils.currentLine=22741136; - //BA.debugLineNum = 22741136;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22741137; - //BA.debugLineNum = 22741137;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -__ref._clie_id /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUENTA"); -RDebugUtils.currentLine=22741138; - //BA.debugLineNum = 22741138;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22741139; - //BA.debugLineNum = 22741139;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_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 where CAT_CL_CODIGO In (Select cuenta from cuentaa)"))); -RDebugUtils.currentLine=22741140; - //BA.debugLineNum = 22741140;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22741141; - //BA.debugLineNum = 22741141;BA.debugLine="cl_ruta = c.GetString(\"CAT_CL_RUTA\")"; -__ref._cl_ruta /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_RUTA"); -RDebugUtils.currentLine=22741142; - //BA.debugLineNum = 22741142;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=22741143; - //BA.debugLineNum = 22741143;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; -__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=22741144; - //BA.debugLineNum = 22741144;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22741145; - //BA.debugLineNum = 22741145;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -__ref._usuario /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("USUARIO"); -RDebugUtils.currentLine=22741146; - //BA.debugLineNum = 22741146;BA.debugLine="Log(555)"; -__c.LogImpl("322741146",BA.NumberToString(555),0); -RDebugUtils.currentLine=22741147; - //BA.debugLineNum = 22741147;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_COSTO_SIN,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._almacen /*String*/ ),(Object)((double)(Double.parseDouble(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))*(double)(Double.parseDouble(__ref._l_precio /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()))),(Object)(__ref._l_precio /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._l_desc /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._clie_id /*String*/ ),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(__ref._usuario /*String*/ ),(Object)(__ref._cl_ruta /*String*/ ),(Object)(__ref._preciosin /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ )})); -RDebugUtils.currentLine=22741148; - //BA.debugLineNum = 22741148;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())})); -RDebugUtils.currentLine=22741149; - //BA.debugLineNum = 22741149;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(p"; -__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 sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, SUM(PE_COSTO_SIN) AS TOTAL_CLIE_SIN FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); -RDebugUtils.currentLine=22741150; - //BA.debugLineNum = 22741150;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=22741151; - //BA.debugLineNum = 22741151;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + //BA.debugLineNum = 505;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; +_sdate = __c.DateTime.Date(__c.DateTime.getNow()); + //BA.debugLineNum = 506;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; +_stime = __c.DateTime.Time(__c.DateTime.getNow()); + //BA.debugLineNum = 507;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENT"; +_c = (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 CUENTA from cuentaa"))); + //BA.debugLineNum = 508;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 509;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; +_clie_id = _c.GetString("CUENTA"); + //BA.debugLineNum = 510;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 511;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_C"; +_c = (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 where CAT_CL_CODIGO In (Select cuenta from cuentaa)"))); + //BA.debugLineNum = 512;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 513;BA.debugLine="cl_ruta = c.GetString(\"CAT_CL_RUTA\")"; +_cl_ruta = _c.GetString("CAT_CL_RUTA"); + //BA.debugLineNum = 514;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 515;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUAR"; +_c = (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"))); + //BA.debugLineNum = 516;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 517;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; +_usuario = _c.GetString("USUARIO"); + //BA.debugLineNum = 518;BA.debugLine="Log(555)"; +__c.LogImpl("355705754",BA.NumberToString(555),0); + //BA.debugLineNum = 519;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_COSTO_SIN,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_almacen),(Object)((double)(Double.parseDouble(_cantidad.getText()))*(double)(Double.parseDouble(_l_precio.getText()))),(Object)(_l_precio.getText()),(Object)(_cantidad.getText()),(Object)(_l_desc.getText()),(Object)(_l_proid.getText()),(Object)(_clie_id),(Object)(_sdate+_stime),(Object)(_usuario),(Object)(_cl_ruta),(Object)(_preciosin),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ )})); + //BA.debugLineNum = 520;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cantidad.getText()),(Object)(_l_proid.getText())})); + //BA.debugLineNum = 521;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(p"; +_c = (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 sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, SUM(PE_COSTO_SIN) AS TOTAL_CLIE_SIN FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); + //BA.debugLineNum = 522;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 523;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=22741152; - //BA.debugLineNum = 22741152;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert int"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT,PC_ALMACEN,PC_RUTA,PC_COSTO_SIN) VALUES (?,?,?,?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._clie_id /*String*/ ),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(__ref._usuario /*String*/ ),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CANT_CLIE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL_CLIE")),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ),(Object)(__ref._almacen /*String*/ ),(Object)(__ref._cl_ruta /*String*/ ),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL_CLIE_SIN"))})); -RDebugUtils.currentLine=22741153; - //BA.debugLineNum = 22741153;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_"; + //BA.debugLineNum = 524;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert int"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT,PC_ALMACEN,PC_RUTA,PC_COSTO_SIN) VALUES (?,?,?,?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_clie_id),(Object)(_sdate+_stime),(Object)(_usuario),(Object)(_c.GetString("CANT_CLIE")),(Object)(_c.GetString("TOTAL_CLIE")),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ),(Object)(_almacen),(Object)(_cl_ruta),(Object)(_c.GetString("TOTAL_CLIE_SIN"))})); + //BA.debugLineNum = 525;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("UPDATE kmt_info set gestion = 2 where CAT_CL_CODIGO In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=22741154; - //BA.debugLineNum = 22741154;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO INVENT_X_ENVIAR (ALMACEN , PROID , CANTIDAD ) VALUES(?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._almacen /*String*/ ),(Object)(__ref._l_proid /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._cantidad /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText())})); -RDebugUtils.currentLine=22741155; - //BA.debugLineNum = 22741155;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; + //BA.debugLineNum = 526;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO INVENT_X_ENVIAR (ALMACEN , PROID , CANTIDAD ) VALUES(?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_almacen),(Object)(_l_proid.getText()),(Object)(_cantidad.getText())})); + //BA.debugLineNum = 527;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; _b4xpages._showpage /*String*/ (ba,"Cliente"); - }}}} -; -RDebugUtils.currentLine=22741157; - //BA.debugLineNum = 22741157;BA.debugLine="End Sub"; + }; + //BA.debugLineNum = 529;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +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]); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/c_principal.java b/B4A/Objects/src/keymon/lat/medicomed/c_principal.java index 2878ade..dcc3955 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/c_principal.java +++ b/B4A/Objects/src/keymon/lat/medicomed/c_principal.java @@ -10,7 +10,7 @@ public class c_principal extends B4AClass.ImplB4AClass implements BA.SubDelegato private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.c_principal"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.c_principal"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,25 +23,7 @@ public class c_principal extends B4AClass.ImplB4AClass implements BA.SubDelegato 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 static class _titledata{ -public boolean IsInitialized; -public String Title; -public void Initialize() { -IsInitialized = true; -Title = ""; -} -@Override - public String toString() { - return BA.TypeToString(this, false); - }} -public anywheresoftware.b4a.keywords.Common __c = null; + public anywheresoftware.b4a.keywords.Common __c = null; public anywheresoftware.b4a.objects.RuntimePermissions _rp = null; public anywheresoftware.b4a.objects.B4XViewWrapper _root = null; public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; @@ -249,620 +231,428 @@ 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_principal __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "initialize", false)) - {return ((Object) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=3080192; - //BA.debugLineNum = 3080192;BA.debugLine="Public Sub Initialize As Object"; -RDebugUtils.currentLine=3080193; - //BA.debugLineNum = 3080193;BA.debugLine="Return Me"; -if (true) return this; -RDebugUtils.currentLine=3080194; - //BA.debugLineNum = 3080194;BA.debugLine="End Sub"; -return null; +public static class _titledata{ +public boolean IsInitialized; +public String Title; +public void Initialize() { +IsInitialized = true; +Title = ""; } -public String _addtitle(keymon.lat.medicomed.c_principal __ref,String _title) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "addtitle", false)) - {return ((String) Debug.delegate(ba, "addtitle", new Object[] {_title}));} +@Override + public String toString() { + return BA.TypeToString(this, false); + }} +public String _addtitle(String _title) throws Exception{ anywheresoftware.b4a.objects.B4XViewWrapper _p_marcas = null; keymon.lat.medicomed.c_principal._titledata _td = null; -RDebugUtils.currentLine=4980736; - //BA.debugLineNum = 4980736;BA.debugLine="Sub AddTitle (Title As String)"; -RDebugUtils.currentLine=4980737; - //BA.debugLineNum = 4980737;BA.debugLine="Dim p_MARCAS As B4XView = xui.CreatePanel(\"\")"; + //BA.debugLineNum = 2392;BA.debugLine="Sub AddTitle (Title As String)"; + //BA.debugLineNum = 2393;BA.debugLine="Dim p_MARCAS As B4XView = xui.CreatePanel(\"\")"; _p_marcas = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_p_marcas = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,""); -RDebugUtils.currentLine=4980738; - //BA.debugLineNum = 4980738;BA.debugLine="p_MARCAS.SetLayoutAnimated(0, 0, 0, CLV1.AsView.W"; -_p_marcas.SetLayoutAnimated((int) (0),(int) (0),(int) (0),__ref._clv1 /*b4a.example3.customlistview*/ ._asview().getWidth(),__ref._titleheight /*int*/ ); -RDebugUtils.currentLine=4980739; - //BA.debugLineNum = 4980739;BA.debugLine="p_MARCAS.LoadLayout(\"CellTitle\")"; +_p_marcas = _xui.CreatePanel(ba,""); + //BA.debugLineNum = 2394;BA.debugLine="p_MARCAS.SetLayoutAnimated(0, 0, 0, CLV1.AsView.W"; +_p_marcas.SetLayoutAnimated((int) (0),(int) (0),(int) (0),_clv1._asview().getWidth(),_titleheight); + //BA.debugLineNum = 2395;BA.debugLine="p_MARCAS.LoadLayout(\"CellTitle\")"; _p_marcas.LoadLayout("CellTitle",ba); -RDebugUtils.currentLine=4980740; - //BA.debugLineNum = 4980740;BA.debugLine="lblTitle.Text = Title"; -__ref._lbltitle /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(_title)); -RDebugUtils.currentLine=4980741; - //BA.debugLineNum = 4980741;BA.debugLine="Dim td As TitleData"; + //BA.debugLineNum = 2396;BA.debugLine="lblTitle.Text = Title"; +_lbltitle.setText(BA.ObjectToCharSequence(_title)); + //BA.debugLineNum = 2397;BA.debugLine="Dim td As TitleData"; _td = new keymon.lat.medicomed.c_principal._titledata(); -RDebugUtils.currentLine=4980742; - //BA.debugLineNum = 4980742;BA.debugLine="td.Title = Title"; + //BA.debugLineNum = 2398;BA.debugLine="td.Title = Title"; _td.Title /*String*/ = _title; -RDebugUtils.currentLine=4980743; - //BA.debugLineNum = 4980743;BA.debugLine="CLV1.Add(p_MARCAS, td)"; -__ref._clv1 /*b4a.example3.customlistview*/ ._add(_p_marcas,(Object)(_td)); -RDebugUtils.currentLine=4980744; - //BA.debugLineNum = 4980744;BA.debugLine="End Sub"; + //BA.debugLineNum = 2399;BA.debugLine="CLV1.Add(p_MARCAS, td)"; +_clv1._add(_p_marcas,(Object)(_td)); + //BA.debugLineNum = 2400;BA.debugLine="End Sub"; return ""; } -public String _b_comm_click(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "b_comm_click", false)) - {return ((String) Debug.delegate(ba, "b_comm_click", null));} +public String _b_comm_click() throws Exception{ int _i = 0; -RDebugUtils.currentLine=4784128; - //BA.debugLineNum = 4784128;BA.debugLine="Sub B_COMM_Click"; -RDebugUtils.currentLine=4784131; - //BA.debugLineNum = 4784131;BA.debugLine="SCROLL_RESDIA.Visible = False"; -__ref._scroll_resdia /*anywheresoftware.b4a.objects.ScrollViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=4784132; - //BA.debugLineNum = 4784132;BA.debugLine="Panel5.Visible = True"; -__ref._panel5 /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=4784133; - //BA.debugLineNum = 4784133;BA.debugLine="pnlTitle.Visible = False"; -__ref._pnltitle /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=4784134; - //BA.debugLineNum = 4784134;BA.debugLine="pnlTitle.SetLayoutAnimated(0, 0, 0, CLV1.AsView.W"; -__ref._pnltitle /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),__ref._clv1 /*b4a.example3.customlistview*/ ._asview().getWidth(),(int) (__ref._titleheight /*int*/ +__ref._dividerheight /*int*/ )); -RDebugUtils.currentLine=4784135; - //BA.debugLineNum = 4784135;BA.debugLine="pnlTitle.LoadLayout(\"CellTitle\")"; -__ref._pnltitle /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .LoadLayout("CellTitle",ba); -RDebugUtils.currentLine=4784136; - //BA.debugLineNum = 4784136;BA.debugLine="CLV1.Clear"; -__ref._clv1 /*b4a.example3.customlistview*/ ._clear(); -RDebugUtils.currentLine=4784138; - //BA.debugLineNum = 4784138;BA.debugLine="dd=B4XPages.MainPage.skmt.ExecQuery(\"SELECT SUM(P"; -__ref._dd /*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 SUM(PE_CANT) AS CUANTOS, PE_PRONOMBRE FROM PEDIDO GROUP BY PE_PRONOMBRE"))); -RDebugUtils.currentLine=4784139; - //BA.debugLineNum = 4784139;BA.debugLine="If dd.RowCount>0 Then"; -if (__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=4784140; - //BA.debugLineNum = 4784140;BA.debugLine="For i=0 To dd.RowCount -1"; + //BA.debugLineNum = 2243;BA.debugLine="Sub B_COMM_Click"; + //BA.debugLineNum = 2246;BA.debugLine="SCROLL_RESDIA.Visible = False"; +_scroll_resdia.setVisible(__c.False); + //BA.debugLineNum = 2247;BA.debugLine="Panel5.Visible = True"; +_panel5.setVisible(__c.True); + //BA.debugLineNum = 2248;BA.debugLine="pnlTitle.Visible = False"; +_pnltitle.setVisible(__c.False); + //BA.debugLineNum = 2249;BA.debugLine="pnlTitle.SetLayoutAnimated(0, 0, 0, CLV1.AsView.W"; +_pnltitle.SetLayoutAnimated((int) (0),(int) (0),(int) (0),_clv1._asview().getWidth(),(int) (_titleheight+_dividerheight)); + //BA.debugLineNum = 2250;BA.debugLine="pnlTitle.LoadLayout(\"CellTitle\")"; +_pnltitle.LoadLayout("CellTitle",ba); + //BA.debugLineNum = 2251;BA.debugLine="CLV1.Clear"; +_clv1._clear(); + //BA.debugLineNum = 2253;BA.debugLine="dd=B4XPages.MainPage.skmt.ExecQuery(\"SELECT SUM(P"; +_dd = (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 SUM(PE_CANT) AS CUANTOS, PE_PRONOMBRE FROM PEDIDO GROUP BY PE_PRONOMBRE"))); + //BA.debugLineNum = 2254;BA.debugLine="If dd.RowCount>0 Then"; +if (_dd.getRowCount()>0) { + //BA.debugLineNum = 2255;BA.debugLine="For i=0 To dd.RowCount -1"; { final int step9 = 1; -final int limit9 = (int) (__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit9 = (int) (_dd.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit9 ;_i = _i + step9 ) { -RDebugUtils.currentLine=4784141; - //BA.debugLineNum = 4784141;BA.debugLine="dd.Position = i"; -__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=4784142; - //BA.debugLineNum = 4784142;BA.debugLine="CLV1.AddTextItem(dd.GetString(\"PE_PRONOMBRE\"),\""; -__ref._clv1 /*b4a.example3.customlistview*/ ._addtextitem((Object)(__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_PRONOMBRE")),(Object)("1")); -RDebugUtils.currentLine=4784143; - //BA.debugLineNum = 4784143;BA.debugLine="CLV1.AddTextItem(\"CANTIDAD = \" & dd.GetString("; -__ref._clv1 /*b4a.example3.customlistview*/ ._addtextitem((Object)("CANTIDAD = "+__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")),(Object)("1")); + //BA.debugLineNum = 2256;BA.debugLine="dd.Position = i"; +_dd.setPosition(_i); + //BA.debugLineNum = 2257;BA.debugLine="CLV1.AddTextItem(dd.GetString(\"PE_PRONOMBRE\"),\""; +_clv1._addtextitem((Object)(_dd.GetString("PE_PRONOMBRE")),(Object)("1")); + //BA.debugLineNum = 2258;BA.debugLine="CLV1.AddTextItem(\"CANTIDAD = \" & dd.GetString("; +_clv1._addtextitem((Object)("CANTIDAD = "+_dd.GetString("CUANTOS")),(Object)("1")); } }; }; -RDebugUtils.currentLine=4784146; - //BA.debugLineNum = 4784146;BA.debugLine="dd.Close"; -__ref._dd /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=4784174; - //BA.debugLineNum = 4784174;BA.debugLine="End Sub"; + //BA.debugLineNum = 2261;BA.debugLine="dd.Close"; +_dd.Close(); + //BA.debugLineNum = 2289;BA.debugLine="End Sub"; return ""; } -public String _b_mapa_click(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "b_mapa_click", false)) - {return ((String) Debug.delegate(ba, "b_mapa_click", null));} -RDebugUtils.currentLine=3670016; - //BA.debugLineNum = 3670016;BA.debugLine="Sub b_mapa_Click"; -RDebugUtils.currentLine=3670017; - //BA.debugLineNum = 3670017;BA.debugLine="Log(\"mapClic\")"; -__c.LogImpl("33670017","mapClic",0); -RDebugUtils.currentLine=3670018; - //BA.debugLineNum = 3670018;BA.debugLine="B4XPages.GetPage(\"Mapas\")"; +public String _b_mapa_click() throws Exception{ + //BA.debugLineNum = 1791;BA.debugLine="Sub b_mapa_Click"; + //BA.debugLineNum = 1792;BA.debugLine="Log(\"mapClic\")"; +__c.LogImpl("339976961","mapClic",0); + //BA.debugLineNum = 1793;BA.debugLine="B4XPages.GetPage(\"Mapas\")"; _b4xpages._getpage /*Object*/ (ba,"Mapas"); -RDebugUtils.currentLine=3670019; - //BA.debugLineNum = 3670019;BA.debugLine="End Sub"; + //BA.debugLineNum = 1794;BA.debugLine="End Sub"; return ""; } -public String _b_marcas_click(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "b_marcas_click", false)) - {return ((String) Debug.delegate(ba, "b_marcas_click", null));} +public String _b_marcas_click() throws Exception{ int _i = 0; -RDebugUtils.currentLine=4915200; - //BA.debugLineNum = 4915200;BA.debugLine="Sub B_MARCAS_Click"; -RDebugUtils.currentLine=4915225; - //BA.debugLineNum = 4915225;BA.debugLine="SCROLL_RESDIA.Visible = False"; -__ref._scroll_resdia /*anywheresoftware.b4a.objects.ScrollViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=4915226; - //BA.debugLineNum = 4915226;BA.debugLine="Panel5.Visible = True"; -__ref._panel5 /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=4915227; - //BA.debugLineNum = 4915227;BA.debugLine="pnlTitle.Visible = False"; -__ref._pnltitle /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=4915228; - //BA.debugLineNum = 4915228;BA.debugLine="pnlTitle.SetLayoutAnimated(0, 0, 0, CLV1.AsView.W"; -__ref._pnltitle /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),__ref._clv1 /*b4a.example3.customlistview*/ ._asview().getWidth(),(int) (__ref._titleheight /*int*/ +__ref._dividerheight /*int*/ )); -RDebugUtils.currentLine=4915229; - //BA.debugLineNum = 4915229;BA.debugLine="pnlTitle.LoadLayout(\"CellTitle\")"; -__ref._pnltitle /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .LoadLayout("CellTitle",ba); -RDebugUtils.currentLine=4915230; - //BA.debugLineNum = 4915230;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CAT_GP"; -__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_GP_CLASIF, SUM(TOTAL) AS TOTAL FROM TOTAL_MARCAS GROUP BY CAT_GP_CLASIF"))); -RDebugUtils.currentLine=4915231; - //BA.debugLineNum = 4915231;BA.debugLine="CLV1.Clear"; -__ref._clv1 /*b4a.example3.customlistview*/ ._clear(); -RDebugUtils.currentLine=4915232; - //BA.debugLineNum = 4915232;BA.debugLine="If c.RowCount>0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=4915233; - //BA.debugLineNum = 4915233;BA.debugLine="For i=0 To c.RowCount -1"; + //BA.debugLineNum = 2303;BA.debugLine="Sub B_MARCAS_Click"; + //BA.debugLineNum = 2328;BA.debugLine="SCROLL_RESDIA.Visible = False"; +_scroll_resdia.setVisible(__c.False); + //BA.debugLineNum = 2329;BA.debugLine="Panel5.Visible = True"; +_panel5.setVisible(__c.True); + //BA.debugLineNum = 2330;BA.debugLine="pnlTitle.Visible = False"; +_pnltitle.setVisible(__c.False); + //BA.debugLineNum = 2331;BA.debugLine="pnlTitle.SetLayoutAnimated(0, 0, 0, CLV1.AsView.W"; +_pnltitle.SetLayoutAnimated((int) (0),(int) (0),(int) (0),_clv1._asview().getWidth(),(int) (_titleheight+_dividerheight)); + //BA.debugLineNum = 2332;BA.debugLine="pnlTitle.LoadLayout(\"CellTitle\")"; +_pnltitle.LoadLayout("CellTitle",ba); + //BA.debugLineNum = 2333;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CAT_GP"; +_c = (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_GP_CLASIF, SUM(TOTAL) AS TOTAL FROM TOTAL_MARCAS GROUP BY CAT_GP_CLASIF"))); + //BA.debugLineNum = 2334;BA.debugLine="CLV1.Clear"; +_clv1._clear(); + //BA.debugLineNum = 2335;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 2336;BA.debugLine="For i=0 To c.RowCount -1"; { final int step9 = 1; -final int limit9 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit9 = (int) (_c.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit9 ;_i = _i + step9 ) { -RDebugUtils.currentLine=4915234; - //BA.debugLineNum = 4915234;BA.debugLine="c.Position=i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=4915235; - //BA.debugLineNum = 4915235;BA.debugLine="AddTitle(c.GetString(\"CAT_GP_CLASIF\"))"; -__ref._addtitle /*String*/ (null,__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_CLASIF")); -RDebugUtils.currentLine=4915236; - //BA.debugLineNum = 4915236;BA.debugLine="If c.GetString(\"CAT_GP_CLASIF\") = \"PROMOS\" Then"; -if ((__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_CLASIF")).equals("PROMOS")) { -RDebugUtils.currentLine=4915237; - //BA.debugLineNum = 4915237;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"SELECT SUM"; -__ref._d /*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 SUM(PE_CANT) AS CUANTOS FROM PEDIDO WHERE PE_CEDIS = PE_PROID"))); -RDebugUtils.currentLine=4915238; - //BA.debugLineNum = 4915238;BA.debugLine="d.Position=0"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=4915239; - //BA.debugLineNum = 4915239;BA.debugLine="CLV1.AddTextItem(\"CANTIDAD DE PROMOS = \" & d.G"; -__ref._clv1 /*b4a.example3.customlistview*/ ._addtextitem((Object)("CANTIDAD DE PROMOS = "+__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")),(Object)("1")); -RDebugUtils.currentLine=4915240; - //BA.debugLineNum = 4915240;BA.debugLine="d.Close"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 2337;BA.debugLine="c.Position=i"; +_c.setPosition(_i); + //BA.debugLineNum = 2338;BA.debugLine="AddTitle(c.GetString(\"CAT_GP_CLASIF\"))"; +_addtitle(_c.GetString("CAT_GP_CLASIF")); + //BA.debugLineNum = 2339;BA.debugLine="If c.GetString(\"CAT_GP_CLASIF\") = \"PROMOS\" Then"; +if ((_c.GetString("CAT_GP_CLASIF")).equals("PROMOS")) { + //BA.debugLineNum = 2340;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"SELECT SUM"; +_d = (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 SUM(PE_CANT) AS CUANTOS FROM PEDIDO WHERE PE_CEDIS = PE_PROID"))); + //BA.debugLineNum = 2341;BA.debugLine="d.Position=0"; +_d.setPosition((int) (0)); + //BA.debugLineNum = 2342;BA.debugLine="CLV1.AddTextItem(\"CANTIDAD DE PROMOS = \" & d.G"; +_clv1._addtextitem((Object)("CANTIDAD DE PROMOS = "+_d.GetString("CUANTOS")),(Object)("1")); + //BA.debugLineNum = 2343;BA.debugLine="d.Close"; +_d.Close(); }else { -RDebugUtils.currentLine=4915242; - //BA.debugLineNum = 4915242;BA.debugLine="f=B4XPages.MainPage.skmt.ExecQuery2(\"select CO"; -__ref._f /*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*/ .ExecQuery2("select COUNT(*) AS CUANTOS from HIST_MARCAS_CUOTAS where HMC_MARCA = ?",new String[]{__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_CLASIF")}))); -RDebugUtils.currentLine=4915243; - //BA.debugLineNum = 4915243;BA.debugLine="f.Position=0"; -__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=4915244; - //BA.debugLineNum = 4915244;BA.debugLine="If f.GetString(\"CUANTOS\") > 0 Then"; -if ((double)(Double.parseDouble(__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")))>0) { -RDebugUtils.currentLine=4915245; - //BA.debugLineNum = 4915245;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery2(\"select H"; -__ref._e /*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*/ .ExecQuery2("select HMC_MARCA, HMC_TOTAL from HIST_MARCAS_CUOTAS where HMC_MARCA = ?",new String[]{__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_CLASIF")}))); -RDebugUtils.currentLine=4915246; - //BA.debugLineNum = 4915246;BA.debugLine="e.Position=0"; -__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=4915247; - //BA.debugLineNum = 4915247;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT c"; -__ref._d /*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*/ .ExecQuery2("SELECT count(distinct(PE_CLIENTE)) AS CUANTOS FROM PEDIDO WHERE PE_PROID in (select CAT_GP_ID from cat_gunaprod WHERE CAT_GP_CLASIF =?)",new String[]{__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_CLASIF")}))); -RDebugUtils.currentLine=4915248; - //BA.debugLineNum = 4915248;BA.debugLine="d.Position=0"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=4915249; - //BA.debugLineNum = 4915249;BA.debugLine="CLV1.AddTextItem(\"TOTAL PREVENTA = $\" & c.Ge"; -__ref._clv1 /*b4a.example3.customlistview*/ ._addtextitem((Object)("TOTAL PREVENTA = $"+__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL")),(Object)("1")); -RDebugUtils.currentLine=4915250; - //BA.debugLineNum = 4915250;BA.debugLine="CLV1.AddTextItem(\"M E T A = $\" & e.GetString"; -__ref._clv1 /*b4a.example3.customlistview*/ ._addtextitem((Object)("M E T A = $"+__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HMC_TOTAL")),(Object)("1")); -RDebugUtils.currentLine=4915251; - //BA.debugLineNum = 4915251;BA.debugLine="CLV1.AddTextItem(\"FALTA = $\" & (e.GetString("; -__ref._clv1 /*b4a.example3.customlistview*/ ._addtextitem((Object)("FALTA = $"+BA.NumberToString(((double)(Double.parseDouble(__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HMC_TOTAL")))-(double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL")))))),(Object)("1")); -RDebugUtils.currentLine=4915252; - //BA.debugLineNum = 4915252;BA.debugLine="CLV1.AddTextItem(\"CLIENTES = \" & d.GetString"; -__ref._clv1 /*b4a.example3.customlistview*/ ._addtextitem((Object)("CLIENTES = "+__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")),(Object)("1")); -RDebugUtils.currentLine=4915253; - //BA.debugLineNum = 4915253;BA.debugLine="d.Close"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=4915254; - //BA.debugLineNum = 4915254;BA.debugLine="e.Close"; -__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 2345;BA.debugLine="f=B4XPages.MainPage.skmt.ExecQuery2(\"select CO"; +_f = (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*/ .ExecQuery2("select COUNT(*) AS CUANTOS from HIST_MARCAS_CUOTAS where HMC_MARCA = ?",new String[]{_c.GetString("CAT_GP_CLASIF")}))); + //BA.debugLineNum = 2346;BA.debugLine="f.Position=0"; +_f.setPosition((int) (0)); + //BA.debugLineNum = 2347;BA.debugLine="If f.GetString(\"CUANTOS\") > 0 Then"; +if ((double)(Double.parseDouble(_f.GetString("CUANTOS")))>0) { + //BA.debugLineNum = 2348;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery2(\"select H"; +_e = (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*/ .ExecQuery2("select HMC_MARCA, HMC_TOTAL from HIST_MARCAS_CUOTAS where HMC_MARCA = ?",new String[]{_c.GetString("CAT_GP_CLASIF")}))); + //BA.debugLineNum = 2349;BA.debugLine="e.Position=0"; +_e.setPosition((int) (0)); + //BA.debugLineNum = 2350;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT c"; +_d = (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*/ .ExecQuery2("SELECT count(distinct(PE_CLIENTE)) AS CUANTOS FROM PEDIDO WHERE PE_PROID in (select CAT_GP_ID from cat_gunaprod WHERE CAT_GP_CLASIF =?)",new String[]{_c.GetString("CAT_GP_CLASIF")}))); + //BA.debugLineNum = 2351;BA.debugLine="d.Position=0"; +_d.setPosition((int) (0)); + //BA.debugLineNum = 2352;BA.debugLine="CLV1.AddTextItem(\"TOTAL PREVENTA = $\" & c.Ge"; +_clv1._addtextitem((Object)("TOTAL PREVENTA = $"+_c.GetString("TOTAL")),(Object)("1")); + //BA.debugLineNum = 2353;BA.debugLine="CLV1.AddTextItem(\"M E T A = $\" & e.GetString"; +_clv1._addtextitem((Object)("M E T A = $"+_e.GetString("HMC_TOTAL")),(Object)("1")); + //BA.debugLineNum = 2354;BA.debugLine="CLV1.AddTextItem(\"FALTA = $\" & (e.GetString("; +_clv1._addtextitem((Object)("FALTA = $"+BA.NumberToString(((double)(Double.parseDouble(_e.GetString("HMC_TOTAL")))-(double)(Double.parseDouble(_c.GetString("TOTAL")))))),(Object)("1")); + //BA.debugLineNum = 2355;BA.debugLine="CLV1.AddTextItem(\"CLIENTES = \" & d.GetString"; +_clv1._addtextitem((Object)("CLIENTES = "+_d.GetString("CUANTOS")),(Object)("1")); + //BA.debugLineNum = 2356;BA.debugLine="d.Close"; +_d.Close(); + //BA.debugLineNum = 2357;BA.debugLine="e.Close"; +_e.Close(); }else { -RDebugUtils.currentLine=4915256; - //BA.debugLineNum = 4915256;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT c"; -__ref._d /*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*/ .ExecQuery2("SELECT count(distinct(pe_cliente)) AS CUANTOS FROM PEDIDO WHERE PE_PROID in (select CAT_GP_ID from cat_gunaprod WHERE CAT_GP_CLASIF =?)",new String[]{__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_CLASIF")}))); -RDebugUtils.currentLine=4915257; - //BA.debugLineNum = 4915257;BA.debugLine="d.Position=0"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=4915258; - //BA.debugLineNum = 4915258;BA.debugLine="CLV1.AddTextItem(\"TOTAL PREVENTA = $\" & c.Ge"; -__ref._clv1 /*b4a.example3.customlistview*/ ._addtextitem((Object)("TOTAL PREVENTA = $"+__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL")),(Object)("1")); -RDebugUtils.currentLine=4915259; - //BA.debugLineNum = 4915259;BA.debugLine="CLV1.AddTextItem(\"M E T A = $\" & \"1000\",\"1\")"; -__ref._clv1 /*b4a.example3.customlistview*/ ._addtextitem((Object)("M E T A = $"+"1000"),(Object)("1")); -RDebugUtils.currentLine=4915260; - //BA.debugLineNum = 4915260;BA.debugLine="CLV1.AddTextItem(\"FALTA = $\" & (1000 - c.Get"; -__ref._clv1 /*b4a.example3.customlistview*/ ._addtextitem((Object)("FALTA = $"+BA.NumberToString((1000-(double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL")))))),(Object)("1")); -RDebugUtils.currentLine=4915261; - //BA.debugLineNum = 4915261;BA.debugLine="CLV1.AddTextItem(\"CLIENTES = \" & d.GetString"; -__ref._clv1 /*b4a.example3.customlistview*/ ._addtextitem((Object)("CLIENTES = "+__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")),(Object)("1")); -RDebugUtils.currentLine=4915262; - //BA.debugLineNum = 4915262;BA.debugLine="d.Close"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 2359;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery2(\"SELECT c"; +_d = (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*/ .ExecQuery2("SELECT count(distinct(pe_cliente)) AS CUANTOS FROM PEDIDO WHERE PE_PROID in (select CAT_GP_ID from cat_gunaprod WHERE CAT_GP_CLASIF =?)",new String[]{_c.GetString("CAT_GP_CLASIF")}))); + //BA.debugLineNum = 2360;BA.debugLine="d.Position=0"; +_d.setPosition((int) (0)); + //BA.debugLineNum = 2361;BA.debugLine="CLV1.AddTextItem(\"TOTAL PREVENTA = $\" & c.Ge"; +_clv1._addtextitem((Object)("TOTAL PREVENTA = $"+_c.GetString("TOTAL")),(Object)("1")); + //BA.debugLineNum = 2362;BA.debugLine="CLV1.AddTextItem(\"M E T A = $\" & \"1000\",\"1\")"; +_clv1._addtextitem((Object)("M E T A = $"+"1000"),(Object)("1")); + //BA.debugLineNum = 2363;BA.debugLine="CLV1.AddTextItem(\"FALTA = $\" & (1000 - c.Get"; +_clv1._addtextitem((Object)("FALTA = $"+BA.NumberToString((1000-(double)(Double.parseDouble(_c.GetString("TOTAL")))))),(Object)("1")); + //BA.debugLineNum = 2364;BA.debugLine="CLV1.AddTextItem(\"CLIENTES = \" & d.GetString"; +_clv1._addtextitem((Object)("CLIENTES = "+_d.GetString("CUANTOS")),(Object)("1")); + //BA.debugLineNum = 2365;BA.debugLine="d.Close"; +_d.Close(); }; -RDebugUtils.currentLine=4915267; - //BA.debugLineNum = 4915267;BA.debugLine="f.Close"; -__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 2370;BA.debugLine="f.Close"; +_f.Close(); }; } }; }; -RDebugUtils.currentLine=4915271; - //BA.debugLineNum = 4915271;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=4915272; - //BA.debugLineNum = 4915272;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select HMC_MA"; -__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 HMC_MARCA, HMC_TOTAL from HIST_MARCAS_CUOTAS where HMC_MARCA not in (SELECT CAT_GP_CLASIF FROM TOTAL_MARCAS )"))); -RDebugUtils.currentLine=4915273; - //BA.debugLineNum = 4915273;BA.debugLine="If c.RowCount>0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=4915274; - //BA.debugLineNum = 4915274;BA.debugLine="For i=0 To c.RowCount -1"; + //BA.debugLineNum = 2374;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 2375;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select HMC_MA"; +_c = (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 HMC_MARCA, HMC_TOTAL from HIST_MARCAS_CUOTAS where HMC_MARCA not in (SELECT CAT_GP_CLASIF FROM TOTAL_MARCAS )"))); + //BA.debugLineNum = 2376;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 2377;BA.debugLine="For i=0 To c.RowCount -1"; { final int step47 = 1; -final int limit47 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit47 = (int) (_c.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit47 ;_i = _i + step47 ) { -RDebugUtils.currentLine=4915275; - //BA.debugLineNum = 4915275;BA.debugLine="c.Position=i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=4915276; - //BA.debugLineNum = 4915276;BA.debugLine="AddTitle(c.GetString(\"HMC_MARCA\"))"; -__ref._addtitle /*String*/ (null,__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HMC_MARCA")); -RDebugUtils.currentLine=4915277; - //BA.debugLineNum = 4915277;BA.debugLine="CLV1.AddTextItem(\"TOTAL PREVENTA = $ 0.00\",\"1\""; -__ref._clv1 /*b4a.example3.customlistview*/ ._addtextitem((Object)("TOTAL PREVENTA = $ 0.00"),(Object)("1")); -RDebugUtils.currentLine=4915278; - //BA.debugLineNum = 4915278;BA.debugLine="CLV1.AddTextItem(\"M E T A = $\" & C.GetString(\""; -__ref._clv1 /*b4a.example3.customlistview*/ ._addtextitem((Object)("M E T A = $"+__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HMC_TOTAL")),(Object)("1")); -RDebugUtils.currentLine=4915279; - //BA.debugLineNum = 4915279;BA.debugLine="CLV1.AddTextItem(\"CLIENTES = 0\",\"1\")"; -__ref._clv1 /*b4a.example3.customlistview*/ ._addtextitem((Object)("CLIENTES = 0"),(Object)("1")); + //BA.debugLineNum = 2378;BA.debugLine="c.Position=i"; +_c.setPosition(_i); + //BA.debugLineNum = 2379;BA.debugLine="AddTitle(c.GetString(\"HMC_MARCA\"))"; +_addtitle(_c.GetString("HMC_MARCA")); + //BA.debugLineNum = 2380;BA.debugLine="CLV1.AddTextItem(\"TOTAL PREVENTA = $ 0.00\",\"1\""; +_clv1._addtextitem((Object)("TOTAL PREVENTA = $ 0.00"),(Object)("1")); + //BA.debugLineNum = 2381;BA.debugLine="CLV1.AddTextItem(\"M E T A = $\" & C.GetString(\""; +_clv1._addtextitem((Object)("M E T A = $"+_c.GetString("HMC_TOTAL")),(Object)("1")); + //BA.debugLineNum = 2382;BA.debugLine="CLV1.AddTextItem(\"CLIENTES = 0\",\"1\")"; +_clv1._addtextitem((Object)("CLIENTES = 0"),(Object)("1")); } }; }; -RDebugUtils.currentLine=4915282; - //BA.debugLineNum = 4915282;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=4915285; - //BA.debugLineNum = 4915285;BA.debugLine="End Sub"; + //BA.debugLineNum = 2385;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 2388;BA.debugLine="End Sub"; return ""; } -public String _b_ok_comiss_click(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "b_ok_comiss_click", false)) - {return ((String) Debug.delegate(ba, "b_ok_comiss_click", null));} -RDebugUtils.currentLine=4849664; - //BA.debugLineNum = 4849664;BA.debugLine="Sub B_OK_COMISS_Click"; -RDebugUtils.currentLine=4849665; - //BA.debugLineNum = 4849665;BA.debugLine="NUEVO.Visible =True"; -__ref._nuevo /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=4849666; - //BA.debugLineNum = 4849666;BA.debugLine="BUSCA.Visible=True"; -__ref._busca /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=4849667; - //BA.debugLineNum = 4849667;BA.debugLine="connecta.Visible=True"; -__ref._connecta /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=4849668; - //BA.debugLineNum = 4849668;BA.debugLine="Resumen.Visible= True"; -__ref._resumen /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=4849669; - //BA.debugLineNum = 4849669;BA.debugLine="P_RESUMEN.Visible=False"; -__ref._p_resumen /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=4849670; - //BA.debugLineNum = 4849670;BA.debugLine="Panel_C.Visible = False"; -__ref._panel_c /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=4849671; - //BA.debugLineNum = 4849671;BA.debugLine="SCROLL_RESDIA.Visible = False"; -__ref._scroll_resdia /*anywheresoftware.b4a.objects.ScrollViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=4849672; - //BA.debugLineNum = 4849672;BA.debugLine="Btn_Ubicar.Visible=True"; -__ref._btn_ubicar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=4849673; - //BA.debugLineNum = 4849673;BA.debugLine="End Sub"; +public String _b_ok_comiss_click() throws Exception{ + //BA.debugLineNum = 2291;BA.debugLine="Sub B_OK_COMISS_Click"; + //BA.debugLineNum = 2292;BA.debugLine="NUEVO.Visible =True"; +_nuevo.setVisible(__c.True); + //BA.debugLineNum = 2293;BA.debugLine="BUSCA.Visible=True"; +_busca.setVisible(__c.True); + //BA.debugLineNum = 2294;BA.debugLine="connecta.Visible=True"; +_connecta.setVisible(__c.True); + //BA.debugLineNum = 2295;BA.debugLine="Resumen.Visible= True"; +_resumen.setVisible(__c.True); + //BA.debugLineNum = 2296;BA.debugLine="P_RESUMEN.Visible=False"; +_p_resumen.setVisible(__c.False); + //BA.debugLineNum = 2297;BA.debugLine="Panel_C.Visible = False"; +_panel_c.setVisible(__c.False); + //BA.debugLineNum = 2298;BA.debugLine="SCROLL_RESDIA.Visible = False"; +_scroll_resdia.setVisible(__c.False); + //BA.debugLineNum = 2299;BA.debugLine="Btn_Ubicar.Visible=True"; +_btn_ubicar.setVisible(__c.True); + //BA.debugLineNum = 2300;BA.debugLine="End Sub"; return ""; } -public String _b_ok_panel5_click(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "b_ok_panel5_click", false)) - {return ((String) Debug.delegate(ba, "b_ok_panel5_click", null));} -RDebugUtils.currentLine=5046272; - //BA.debugLineNum = 5046272;BA.debugLine="Sub B_OK_PANEL5_Click"; -RDebugUtils.currentLine=5046273; - //BA.debugLineNum = 5046273;BA.debugLine="Panel5.Visible = False"; -__ref._panel5 /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=5046274; - //BA.debugLineNum = 5046274;BA.debugLine="NUEVO.Visible =True"; -__ref._nuevo /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=5046275; - //BA.debugLineNum = 5046275;BA.debugLine="BUSCA.Visible=True"; -__ref._busca /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=5046276; - //BA.debugLineNum = 5046276;BA.debugLine="connecta.Visible=True"; -__ref._connecta /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=5046277; - //BA.debugLineNum = 5046277;BA.debugLine="Resumen.Visible= True"; -__ref._resumen /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=5046278; - //BA.debugLineNum = 5046278;BA.debugLine="P_RESUMEN.Visible=False"; -__ref._p_resumen /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=5046279; - //BA.debugLineNum = 5046279;BA.debugLine="Panel4.Visible = False"; -__ref._panel4 /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=5046280; - //BA.debugLineNum = 5046280;BA.debugLine="SCROLL_RESDIA.Visible = False"; -__ref._scroll_resdia /*anywheresoftware.b4a.objects.ScrollViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=5046281; - //BA.debugLineNum = 5046281;BA.debugLine="Btn_Ubicar.Visible=True"; -__ref._btn_ubicar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=5046282; - //BA.debugLineNum = 5046282;BA.debugLine="p_principal.Visible = True"; -__ref._p_principal /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=5046284; - //BA.debugLineNum = 5046284;BA.debugLine="End Sub"; +public String _b_ok_panel5_click() throws Exception{ + //BA.debugLineNum = 2402;BA.debugLine="Sub B_OK_PANEL5_Click"; + //BA.debugLineNum = 2403;BA.debugLine="Panel5.Visible = False"; +_panel5.setVisible(__c.False); + //BA.debugLineNum = 2404;BA.debugLine="NUEVO.Visible =True"; +_nuevo.setVisible(__c.True); + //BA.debugLineNum = 2405;BA.debugLine="BUSCA.Visible=True"; +_busca.setVisible(__c.True); + //BA.debugLineNum = 2406;BA.debugLine="connecta.Visible=True"; +_connecta.setVisible(__c.True); + //BA.debugLineNum = 2407;BA.debugLine="Resumen.Visible= True"; +_resumen.setVisible(__c.True); + //BA.debugLineNum = 2408;BA.debugLine="P_RESUMEN.Visible=False"; +_p_resumen.setVisible(__c.False); + //BA.debugLineNum = 2409;BA.debugLine="Panel4.Visible = False"; +_panel4.setVisible(__c.False); + //BA.debugLineNum = 2410;BA.debugLine="SCROLL_RESDIA.Visible = False"; +_scroll_resdia.setVisible(__c.False); + //BA.debugLineNum = 2411;BA.debugLine="Btn_Ubicar.Visible=True"; +_btn_ubicar.setVisible(__c.True); + //BA.debugLineNum = 2412;BA.debugLine="p_principal.Visible = True"; +_p_principal.setVisible(__c.True); + //BA.debugLineNum = 2414;BA.debugLine="End Sub"; return ""; } -public String _b_ok_pas_click(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "b_ok_pas_click", false)) - {return ((String) Debug.delegate(ba, "b_ok_pas_click", null));} -RDebugUtils.currentLine=3932160; - //BA.debugLineNum = 3932160;BA.debugLine="Sub B_OK_PAS_Click"; -RDebugUtils.currentLine=3932161; - //BA.debugLineNum = 3932161;BA.debugLine="If CARGA = \"SUBIR\" And S_CP.Text = \"INFO OK\" Then"; -if ((__ref._carga /*String*/ ).equals("SUBIR") && (__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("INFO OK")) { -RDebugUtils.currentLine=3932162; - //BA.debugLineNum = 3932162;BA.debugLine="P1.Visible = False"; -__ref._p1 /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3932163; - //BA.debugLineNum = 3932163;BA.debugLine="p_mandaInfo.Visible = False"; -__ref._p_mandainfo /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3932164; - //BA.debugLineNum = 3932164;BA.debugLine="Btn_Ubicar.Visible=True"; -__ref._btn_ubicar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3932166; - //BA.debugLineNum = 3932166;BA.debugLine="NUEVO.Visible =True"; -__ref._nuevo /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3932167; - //BA.debugLineNum = 3932167;BA.debugLine="BUSCA.Visible=True"; -__ref._busca /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3932168; - //BA.debugLineNum = 3932168;BA.debugLine="connecta.Visible=True"; -__ref._connecta /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3932169; - //BA.debugLineNum = 3932169;BA.debugLine="Resumen.Visible= True"; -__ref._resumen /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3932170; - //BA.debugLineNum = 3932170;BA.debugLine="img2.Visible=False"; -__ref._img2 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3932171; - //BA.debugLineNum = 3932171;BA.debugLine="Subs.panelVisible(p_principal, 0, 0)"; -_subs._panelvisible /*String*/ (ba,__ref._p_principal /*anywheresoftware.b4a.objects.PanelWrapper*/ ,(int) (0),(int) (0)); - }else -{RDebugUtils.currentLine=3932172; - //BA.debugLineNum = 3932172;BA.debugLine="Else If CARGA = \"SUBIR\" And S_CP.Text = \"ERROR\" T"; -if ((__ref._carga /*String*/ ).equals("SUBIR") && (__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("ERROR")) { -RDebugUtils.currentLine=3932173; - //BA.debugLineNum = 3932173;BA.debugLine="Msgbox(\"Tiene que subir de nuevo la información\""; +public String _b_ok_pas_click() throws Exception{ + //BA.debugLineNum = 1892;BA.debugLine="Sub B_OK_PAS_Click"; + //BA.debugLineNum = 1893;BA.debugLine="If CARGA = \"SUBIR\" And S_CP.Text = \"INFO OK\" Then"; +if ((_carga).equals("SUBIR") && (_s_cp.getText()).equals("INFO OK")) { + //BA.debugLineNum = 1894;BA.debugLine="P1.Visible = False"; +_p1.setVisible(__c.False); + //BA.debugLineNum = 1895;BA.debugLine="p_mandaInfo.Visible = False"; +_p_mandainfo.setVisible(__c.False); + //BA.debugLineNum = 1896;BA.debugLine="Btn_Ubicar.Visible=True"; +_btn_ubicar.setVisible(__c.True); + //BA.debugLineNum = 1898;BA.debugLine="NUEVO.Visible =True"; +_nuevo.setVisible(__c.True); + //BA.debugLineNum = 1899;BA.debugLine="BUSCA.Visible=True"; +_busca.setVisible(__c.True); + //BA.debugLineNum = 1900;BA.debugLine="connecta.Visible=True"; +_connecta.setVisible(__c.True); + //BA.debugLineNum = 1901;BA.debugLine="Resumen.Visible= True"; +_resumen.setVisible(__c.True); + //BA.debugLineNum = 1902;BA.debugLine="img2.Visible=False"; +_img2.setVisible(__c.False); + //BA.debugLineNum = 1903;BA.debugLine="Subs.panelVisible(p_principal, 0, 0)"; +_subs._panelvisible /*String*/ (ba,_p_principal,(int) (0),(int) (0)); + }else if((_carga).equals("SUBIR") && (_s_cp.getText()).equals("ERROR")) { + //BA.debugLineNum = 1905;BA.debugLine="Msgbox(\"Tiene que subir de nuevo la información\""; __c.Msgbox(BA.ObjectToCharSequence("Tiene que subir de nuevo la información"),BA.ObjectToCharSequence("Atención"),ba); -RDebugUtils.currentLine=3932174; - //BA.debugLineNum = 3932174;BA.debugLine="P1.Visible = False"; -__ref._p1 /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3932175; - //BA.debugLineNum = 3932175;BA.debugLine="p_mandaInfo.Visible = False"; -__ref._p_mandainfo /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3932177; - //BA.debugLineNum = 3932177;BA.debugLine="NUEVO.Visible =True"; -__ref._nuevo /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3932178; - //BA.debugLineNum = 3932178;BA.debugLine="BUSCA.Visible=True"; -__ref._busca /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3932179; - //BA.debugLineNum = 3932179;BA.debugLine="connecta.Visible=True"; -__ref._connecta /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3932180; - //BA.debugLineNum = 3932180;BA.debugLine="Resumen.Visible= True"; -__ref._resumen /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3932181; - //BA.debugLineNum = 3932181;BA.debugLine="img2.Visible=False"; -__ref._img2 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3932182; - //BA.debugLineNum = 3932182;BA.debugLine="Subs.panelVisible(p_principal, 0, 0)"; -_subs._panelvisible /*String*/ (ba,__ref._p_principal /*anywheresoftware.b4a.objects.PanelWrapper*/ ,(int) (0),(int) (0)); - }else -{RDebugUtils.currentLine=3932183; - //BA.debugLineNum = 3932183;BA.debugLine="Else if CARGA = \"SUBIR\" And S_CP.Text <> \"INFO OK"; -if ((__ref._carga /*String*/ ).equals("SUBIR") && (__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("INFO OK") == false) { -RDebugUtils.currentLine=3932184; - //BA.debugLineNum = 3932184;BA.debugLine="RES = Msgbox2(\"Seguro que desea abortar el proc"; -__ref._res /*String*/ = BA.NumberToString(__c.Msgbox2(BA.ObjectToCharSequence("Seguro que desea abortar el proceso"),BA.ObjectToCharSequence("Cierre"),"Si","","No",(android.graphics.Bitmap)(__c.LoadBitmap(__c.File.getDirAssets(),"alert2.png").getObject()),ba)); -RDebugUtils.currentLine=3932185; - //BA.debugLineNum = 3932185;BA.debugLine="If RES = DialogResponse.POSITIVE Then"; -if ((__ref._res /*String*/ ).equals(BA.NumberToString(__c.DialogResponse.POSITIVE))) { -RDebugUtils.currentLine=3932186; - //BA.debugLineNum = 3932186;BA.debugLine="P1.Visible = False"; -__ref._p1 /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3932188; - //BA.debugLineNum = 3932188;BA.debugLine="NUEVO.Visible =True"; -__ref._nuevo /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3932189; - //BA.debugLineNum = 3932189;BA.debugLine="BUSCA.Visible=True"; -__ref._busca /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3932190; - //BA.debugLineNum = 3932190;BA.debugLine="connecta.Visible=True"; -__ref._connecta /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3932191; - //BA.debugLineNum = 3932191;BA.debugLine="Resumen.Visible= True"; -__ref._resumen /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3932192; - //BA.debugLineNum = 3932192;BA.debugLine="img2.Visible=False"; -__ref._img2 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3932193; - //BA.debugLineNum = 3932193;BA.debugLine="Subs.panelVisible(p_principal, 0, 0)"; -_subs._panelvisible /*String*/ (ba,__ref._p_principal /*anywheresoftware.b4a.objects.PanelWrapper*/ ,(int) (0),(int) (0)); -RDebugUtils.currentLine=3932194; - //BA.debugLineNum = 3932194;BA.debugLine="ExitApplication"; + //BA.debugLineNum = 1906;BA.debugLine="P1.Visible = False"; +_p1.setVisible(__c.False); + //BA.debugLineNum = 1907;BA.debugLine="p_mandaInfo.Visible = False"; +_p_mandainfo.setVisible(__c.False); + //BA.debugLineNum = 1909;BA.debugLine="NUEVO.Visible =True"; +_nuevo.setVisible(__c.True); + //BA.debugLineNum = 1910;BA.debugLine="BUSCA.Visible=True"; +_busca.setVisible(__c.True); + //BA.debugLineNum = 1911;BA.debugLine="connecta.Visible=True"; +_connecta.setVisible(__c.True); + //BA.debugLineNum = 1912;BA.debugLine="Resumen.Visible= True"; +_resumen.setVisible(__c.True); + //BA.debugLineNum = 1913;BA.debugLine="img2.Visible=False"; +_img2.setVisible(__c.False); + //BA.debugLineNum = 1914;BA.debugLine="Subs.panelVisible(p_principal, 0, 0)"; +_subs._panelvisible /*String*/ (ba,_p_principal,(int) (0),(int) (0)); + }else if((_carga).equals("SUBIR") && (_s_cp.getText()).equals("INFO OK") == false) { + //BA.debugLineNum = 1916;BA.debugLine="RES = Msgbox2(\"Seguro que desea abortar el proc"; +_res = BA.NumberToString(__c.Msgbox2(BA.ObjectToCharSequence("Seguro que desea abortar el proceso"),BA.ObjectToCharSequence("Cierre"),"Si","","No",(android.graphics.Bitmap)(__c.LoadBitmap(__c.File.getDirAssets(),"alert2.png").getObject()),ba)); + //BA.debugLineNum = 1917;BA.debugLine="If RES = DialogResponse.POSITIVE Then"; +if ((_res).equals(BA.NumberToString(__c.DialogResponse.POSITIVE))) { + //BA.debugLineNum = 1918;BA.debugLine="P1.Visible = False"; +_p1.setVisible(__c.False); + //BA.debugLineNum = 1920;BA.debugLine="NUEVO.Visible =True"; +_nuevo.setVisible(__c.True); + //BA.debugLineNum = 1921;BA.debugLine="BUSCA.Visible=True"; +_busca.setVisible(__c.True); + //BA.debugLineNum = 1922;BA.debugLine="connecta.Visible=True"; +_connecta.setVisible(__c.True); + //BA.debugLineNum = 1923;BA.debugLine="Resumen.Visible= True"; +_resumen.setVisible(__c.True); + //BA.debugLineNum = 1924;BA.debugLine="img2.Visible=False"; +_img2.setVisible(__c.False); + //BA.debugLineNum = 1925;BA.debugLine="Subs.panelVisible(p_principal, 0, 0)"; +_subs._panelvisible /*String*/ (ba,_p_principal,(int) (0),(int) (0)); + //BA.debugLineNum = 1926;BA.debugLine="ExitApplication"; __c.ExitApplication(); }; - }}} -; -RDebugUtils.currentLine=3932197; - //BA.debugLineNum = 3932197;BA.debugLine="If CARGA = \"CARGAR\" And S_CP.Text = \"LISTO\" And S"; -if ((__ref._carga /*String*/ ).equals("CARGAR") && (__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("LISTO") && (__ref._s_cc /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("LISTO") && (__ref._s_ch /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("LISTO")) { -RDebugUtils.currentLine=3932198; - //BA.debugLineNum = 3932198;BA.debugLine="P1.Visible = False"; -__ref._p1 /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3932199; - //BA.debugLineNum = 3932199;BA.debugLine="p_mandaInfo.Visible = False"; -__ref._p_mandainfo /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3932200; - //BA.debugLineNum = 3932200;BA.debugLine="p_mandaInfo.Visible = False"; -__ref._p_mandainfo /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3932201; - //BA.debugLineNum = 3932201;BA.debugLine="Btn_Ubicar.Visible=True"; -__ref._btn_ubicar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3932203; - //BA.debugLineNum = 3932203;BA.debugLine="NUEVO.Visible =True"; -__ref._nuevo /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3932204; - //BA.debugLineNum = 3932204;BA.debugLine="BUSCA.Visible=True"; -__ref._busca /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3932205; - //BA.debugLineNum = 3932205;BA.debugLine="connecta.Visible=True"; -__ref._connecta /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3932206; - //BA.debugLineNum = 3932206;BA.debugLine="Resumen.Visible= True"; -__ref._resumen /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3932207; - //BA.debugLineNum = 3932207;BA.debugLine="img2.Visible=False"; -__ref._img2 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3932208; - //BA.debugLineNum = 3932208;BA.debugLine="Subs.panelVisible(p_principal, 0, 0)"; -_subs._panelvisible /*String*/ (ba,__ref._p_principal /*anywheresoftware.b4a.objects.PanelWrapper*/ ,(int) (0),(int) (0)); -RDebugUtils.currentLine=3932209; - //BA.debugLineNum = 3932209;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*void*/ (null); -RDebugUtils.currentLine=3932210; - //BA.debugLineNum = 3932210;BA.debugLine="Subs.bitacora(Subs.fechanormal(DateTime.Now),usu"; -_subs._bitacora /*String*/ (ba,_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),__ref._usuario /*String*/ ,__ref._almacen /*String*/ ,__ref._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText(),"Carga día","",_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ,_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ,"2","",""); - }else -{RDebugUtils.currentLine=3932211; - //BA.debugLineNum = 3932211;BA.debugLine="Else if CARGA = \"CARGAR\" And (S_CP.Text <> \"LISTO"; -if ((__ref._carga /*String*/ ).equals("CARGAR") && ((__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("LISTO") == false || (__ref._s_cc /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("LISTO") == false || (__ref._s_ch /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("LISTO") == false)) { -RDebugUtils.currentLine=3932212; - //BA.debugLineNum = 3932212;BA.debugLine="RES = Msgbox2(\"Seguro que desea abortar el proc"; -__ref._res /*String*/ = BA.NumberToString(__c.Msgbox2(BA.ObjectToCharSequence("Seguro que desea abortar el proceso"),BA.ObjectToCharSequence("Cierre"),"Si","","No",(android.graphics.Bitmap)(__c.LoadBitmap(__c.File.getDirAssets(),"alert2.png").getObject()),ba)); -RDebugUtils.currentLine=3932213; - //BA.debugLineNum = 3932213;BA.debugLine="If RES = DialogResponse.POSITIVE Then"; -if ((__ref._res /*String*/ ).equals(BA.NumberToString(__c.DialogResponse.POSITIVE))) { -RDebugUtils.currentLine=3932214; - //BA.debugLineNum = 3932214;BA.debugLine="P1.Visible = False"; -__ref._p1 /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3932215; - //BA.debugLineNum = 3932215;BA.debugLine="p_mandaInfo.Visible = False"; -__ref._p_mandainfo /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3932217; - //BA.debugLineNum = 3932217;BA.debugLine="NUEVO.Visible =True"; -__ref._nuevo /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3932218; - //BA.debugLineNum = 3932218;BA.debugLine="BUSCA.Visible=True"; -__ref._busca /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3932219; - //BA.debugLineNum = 3932219;BA.debugLine="connecta.Visible=True"; -__ref._connecta /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3932220; - //BA.debugLineNum = 3932220;BA.debugLine="Resumen.Visible= True"; -__ref._resumen /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3932221; - //BA.debugLineNum = 3932221;BA.debugLine="img2.Visible=False"; -__ref._img2 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3932222; - //BA.debugLineNum = 3932222;BA.debugLine="Subs.panelVisible(p_principal, 0, 0)"; -_subs._panelvisible /*String*/ (ba,__ref._p_principal /*anywheresoftware.b4a.objects.PanelWrapper*/ ,(int) (0),(int) (0)); -RDebugUtils.currentLine=3932223; - //BA.debugLineNum = 3932223;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + }; + //BA.debugLineNum = 1929;BA.debugLine="If CARGA = \"CARGAR\" And S_CP.Text = \"LISTO\" And S"; +if ((_carga).equals("CARGAR") && (_s_cp.getText()).equals("LISTO") && (_s_cc.getText()).equals("LISTO") && (_s_ch.getText()).equals("LISTO")) { + //BA.debugLineNum = 1930;BA.debugLine="P1.Visible = False"; +_p1.setVisible(__c.False); + //BA.debugLineNum = 1931;BA.debugLine="p_mandaInfo.Visible = False"; +_p_mandainfo.setVisible(__c.False); + //BA.debugLineNum = 1932;BA.debugLine="p_mandaInfo.Visible = False"; +_p_mandainfo.setVisible(__c.False); + //BA.debugLineNum = 1933;BA.debugLine="Btn_Ubicar.Visible=True"; +_btn_ubicar.setVisible(__c.True); + //BA.debugLineNum = 1935;BA.debugLine="NUEVO.Visible =True"; +_nuevo.setVisible(__c.True); + //BA.debugLineNum = 1936;BA.debugLine="BUSCA.Visible=True"; +_busca.setVisible(__c.True); + //BA.debugLineNum = 1937;BA.debugLine="connecta.Visible=True"; +_connecta.setVisible(__c.True); + //BA.debugLineNum = 1938;BA.debugLine="Resumen.Visible= True"; +_resumen.setVisible(__c.True); + //BA.debugLineNum = 1939;BA.debugLine="img2.Visible=False"; +_img2.setVisible(__c.False); + //BA.debugLineNum = 1940;BA.debugLine="Subs.panelVisible(p_principal, 0, 0)"; +_subs._panelvisible /*String*/ (ba,_p_principal,(int) (0),(int) (0)); + //BA.debugLineNum = 1941;BA.debugLine="B4XPage_Appear"; +_b4xpage_appear(); + //BA.debugLineNum = 1942;BA.debugLine="Subs.bitacora(Subs.fechanormal(DateTime.Now),usu"; +_subs._bitacora /*String*/ (ba,_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_usuario,_almacen,_l_ruta.getText(),"Carga día","",_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ,_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ,"2","",""); + }else if((_carga).equals("CARGAR") && ((_s_cp.getText()).equals("LISTO") == false || (_s_cc.getText()).equals("LISTO") == false || (_s_ch.getText()).equals("LISTO") == false)) { + //BA.debugLineNum = 1944;BA.debugLine="RES = Msgbox2(\"Seguro que desea abortar el proc"; +_res = BA.NumberToString(__c.Msgbox2(BA.ObjectToCharSequence("Seguro que desea abortar el proceso"),BA.ObjectToCharSequence("Cierre"),"Si","","No",(android.graphics.Bitmap)(__c.LoadBitmap(__c.File.getDirAssets(),"alert2.png").getObject()),ba)); + //BA.debugLineNum = 1945;BA.debugLine="If RES = DialogResponse.POSITIVE Then"; +if ((_res).equals(BA.NumberToString(__c.DialogResponse.POSITIVE))) { + //BA.debugLineNum = 1946;BA.debugLine="P1.Visible = False"; +_p1.setVisible(__c.False); + //BA.debugLineNum = 1947;BA.debugLine="p_mandaInfo.Visible = False"; +_p_mandainfo.setVisible(__c.False); + //BA.debugLineNum = 1949;BA.debugLine="NUEVO.Visible =True"; +_nuevo.setVisible(__c.True); + //BA.debugLineNum = 1950;BA.debugLine="BUSCA.Visible=True"; +_busca.setVisible(__c.True); + //BA.debugLineNum = 1951;BA.debugLine="connecta.Visible=True"; +_connecta.setVisible(__c.True); + //BA.debugLineNum = 1952;BA.debugLine="Resumen.Visible= True"; +_resumen.setVisible(__c.True); + //BA.debugLineNum = 1953;BA.debugLine="img2.Visible=False"; +_img2.setVisible(__c.False); + //BA.debugLineNum = 1954;BA.debugLine="Subs.panelVisible(p_principal, 0, 0)"; +_subs._panelvisible /*String*/ (ba,_p_principal,(int) (0),(int) (0)); + //BA.debugLineNum = 1955;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from kmt_info"); -RDebugUtils.currentLine=3932224; - //BA.debugLineNum = 3932224;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 1956;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from cod_result"); -RDebugUtils.currentLine=3932225; - //BA.debugLineNum = 3932225;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 1957;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from hist_gest"); -RDebugUtils.currentLine=3932226; - //BA.debugLineNum = 3932226;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 1958;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from cat_gunaprod"); -RDebugUtils.currentLine=3932227; - //BA.debugLineNum = 3932227;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 1959;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from CAT_DETALLES_PAQ"); -RDebugUtils.currentLine=3932228; - //BA.debugLineNum = 3932228;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 1960;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from telefonos"); -RDebugUtils.currentLine=3932229; - //BA.debugLineNum = 3932229;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 1961;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from HIST_VENTAS"); -RDebugUtils.currentLine=3932230; - //BA.debugLineNum = 3932230;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 1962;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from HIST_PROMOS"); -RDebugUtils.currentLine=3932231; - //BA.debugLineNum = 3932231;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 1963;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from HIST_CLIENTE_CANT_PROMOS"); -RDebugUtils.currentLine=3932232; - //BA.debugLineNum = 3932232;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 1964;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from PROMOS_COMP"); -RDebugUtils.currentLine=3932233; - //BA.debugLineNum = 3932233;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 1965;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from CAT_VERIFICACION"); -RDebugUtils.currentLine=3932234; - //BA.debugLineNum = 3932234;BA.debugLine="ExitApplication"; + //BA.debugLineNum = 1966;BA.debugLine="ExitApplication"; __c.ExitApplication(); }; - }} -; -RDebugUtils.currentLine=3932237; - //BA.debugLineNum = 3932237;BA.debugLine="End Sub"; + }; + //BA.debugLineNum = 1969;BA.debugLine="End Sub"; return ""; } -public void _b4xpage_appear(keymon.lat.medicomed.c_principal __ref) throws Exception{ -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "b4xpage_appear", false)) - {Debug.delegate(ba, "b4xpage_appear", null); return;} -ResumableSub_B4XPage_Appear rsub = new ResumableSub_B4XPage_Appear(this,__ref); +public String _b_ok_res_click() throws Exception{ + //BA.debugLineNum = 1975;BA.debugLine="Sub B_OK_RES_Click"; + //BA.debugLineNum = 1977;BA.debugLine="NUEVO.Visible =True"; +_nuevo.setVisible(__c.True); + //BA.debugLineNum = 1978;BA.debugLine="BUSCA.Visible=True"; +_busca.setVisible(__c.True); + //BA.debugLineNum = 1979;BA.debugLine="connecta.Visible=True"; +_connecta.setVisible(__c.True); + //BA.debugLineNum = 1980;BA.debugLine="Resumen.Visible= True"; +_resumen.setVisible(__c.True); + //BA.debugLineNum = 1981;BA.debugLine="P_RESUMEN.Visible=False"; +_p_resumen.setVisible(__c.False); + //BA.debugLineNum = 1982;BA.debugLine="Panel4.Visible = False"; +_panel4.setVisible(__c.False); + //BA.debugLineNum = 1983;BA.debugLine="SCROLL_RESDIA.Visible = False"; +_scroll_resdia.setVisible(__c.False); + //BA.debugLineNum = 1984;BA.debugLine="Btn_Ubicar.Visible=True"; +_btn_ubicar.setVisible(__c.True); + //BA.debugLineNum = 1985;BA.debugLine="p_principal.Visible = True"; +_p_principal.setVisible(__c.True); + //BA.debugLineNum = 1986;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.c_principal parent,keymon.lat.medicomed.c_principal __ref) { +public ResumableSub_B4XPage_Appear(keymon.lat.medicomed.c_principal parent) { this.parent = parent; -this.__ref = __ref; -this.__ref = parent; } -keymon.lat.medicomed.c_principal __ref; keymon.lat.medicomed.c_principal parent; String _permission = ""; boolean _result = false; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="c_principal"; while (true) { switch (state) { @@ -872,22 +662,21 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=3211266; - //BA.debugLineNum = 3211266;BA.debugLine="Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_"; + //BA.debugLineNum = 302;BA.debugLine="B4XPages.MainPage.reqManager.Initialize(Me, Start"; +parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._initialize /*String*/ (ba,parent,parent._starter._server /*String*/ ); + //BA.debugLineNum = 303;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_ACCESS_FINE_LOCATION); -RDebugUtils.currentLine=3211267; - //BA.debugLineNum = 3211267;BA.debugLine="Wait For B4XPage_PermissionResult (Permission As"; -parent.__c.WaitFor("b4xpage_permissionresult", ba, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "c_principal", "b4xpage_appear"), null); + //BA.debugLineNum = 304;BA.debugLine="Wait For B4XPage_PermissionResult (Permission As"; +parent.__c.WaitFor("b4xpage_permissionresult", ba, this, null); this.state = 68; return; case 68: //C this.state = 1; -_permission = (String) result[1]; -_result = (Boolean) result[2]; +_permission = (String) result[0]; +_result = (Boolean) result[1]; ; -RDebugUtils.currentLine=3211268; - //BA.debugLineNum = 3211268;BA.debugLine="If Result Then"; + //BA.debugLineNum = 305;BA.debugLine="If Result Then"; if (true) break; case 1: @@ -907,31 +696,27 @@ this.state = 6; case 5: //C this.state = 6; -RDebugUtils.currentLine=3211271; - //BA.debugLineNum = 3211271;BA.debugLine="Log(\"SIN permisos de ubicacion\")"; -parent.__c.LogImpl("33211271","SIN permisos de ubicacion",0); + //BA.debugLineNum = 308;BA.debugLine="Log(\"SIN permisos de ubicacion\")"; +parent.__c.LogImpl("339518216","SIN permisos de ubicacion",0); if (true) break; case 6: //C this.state = 7; ; -RDebugUtils.currentLine=3211273; - //BA.debugLineNum = 3211273;BA.debugLine="Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_"; + //BA.debugLineNum = 310;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_PHONE_STATE); -RDebugUtils.currentLine=3211274; - //BA.debugLineNum = 3211274;BA.debugLine="Wait For B4XPage_PermissionResult (Permission As"; -parent.__c.WaitFor("b4xpage_permissionresult", ba, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "c_principal", "b4xpage_appear"), null); + //BA.debugLineNum = 311;BA.debugLine="Wait For B4XPage_PermissionResult (Permission As"; +parent.__c.WaitFor("b4xpage_permissionresult", ba, this, null); this.state = 69; return; case 69: //C this.state = 7; -_permission = (String) result[1]; -_result = (Boolean) result[2]; +_permission = (String) result[0]; +_result = (Boolean) result[1]; ; -RDebugUtils.currentLine=3211275; - //BA.debugLineNum = 3211275;BA.debugLine="If Result Then"; + //BA.debugLineNum = 312;BA.debugLine="If Result Then"; if (true) break; case 7: @@ -950,17 +735,13 @@ case 10: //C this.state = 11; ; -RDebugUtils.currentLine=3211281; - //BA.debugLineNum = 3211281;BA.debugLine="HORAINGRESO =\"000000\""; -__ref._horaingreso /*String*/ = "000000"; -RDebugUtils.currentLine=3211282; - //BA.debugLineNum = 3211282;BA.debugLine="Btn_Ubicar.Left = (Root.Width/2) - (Btn_Ubicar.Wi"; -__ref._btn_ubicar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setLeft((int) ((__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)2)-(__ref._btn_ubicar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .getWidth()/(double)2))); -RDebugUtils.currentLine=3211284; - //BA.debugLineNum = 3211284;BA.debugLine="PASO =0"; -__ref._paso /*String*/ = BA.NumberToString(0); -RDebugUtils.currentLine=3211285; - //BA.debugLineNum = 3211285;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then"; + //BA.debugLineNum = 318;BA.debugLine="HORAINGRESO =\"000000\""; +parent._horaingreso = "000000"; + //BA.debugLineNum = 319;BA.debugLine="Btn_Ubicar.Left = (Root.Width/2) - (Btn_Ubicar.Wi"; +parent._btn_ubicar.setLeft((int) ((parent._root.getWidth()/(double)2)-(parent._btn_ubicar.getWidth()/(double)2))); + //BA.debugLineNum = 321;BA.debugLine="PASO =0"; +parent._paso = BA.NumberToString(0); + //BA.debugLineNum = 322;BA.debugLine="If Not(Starter.gps.GPSEnabled) Then"; if (true) break; case 11: @@ -973,8 +754,7 @@ this.state = 13; case 13: //C this.state = 14; -RDebugUtils.currentLine=3211286; - //BA.debugLineNum = 3211286;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessageS"; + //BA.debugLineNum = 323;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessageS"; if (true) break; case 14: @@ -994,8 +774,7 @@ case 19: //C this.state = 20; ; -RDebugUtils.currentLine=3211287; - //BA.debugLineNum = 3211287;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent"; + //BA.debugLineNum = 324;BA.debugLine="StartActivity(Starter.gps.LocationSettingsIntent"; parent.__c.StartActivity(ba,(Object)(parent._starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getLocationSettingsIntent())); if (true) break; @@ -1003,20 +782,17 @@ case 20: //C this.state = 21; ; -RDebugUtils.currentLine=3211289; - //BA.debugLineNum = 3211289;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"select count"; -__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)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery2("select count(*) as CUANTOS from CAT_VARIABLES WHERE CAT_VA_DESCRIPCION = ?",new String[]{"FECHA"}))); -RDebugUtils.currentLine=3211290; - //BA.debugLineNum = 3211290;BA.debugLine="c.Position =0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3211291; - //BA.debugLineNum = 3211291;BA.debugLine="If c.GetString(\"CUANTOS\") = 0 Then"; + //BA.debugLineNum = 326;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"select count"; +parent._c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery2("select count(*) as CUANTOS from CAT_VARIABLES WHERE CAT_VA_DESCRIPCION = ?",new String[]{"FECHA"}))); + //BA.debugLineNum = 327;BA.debugLine="c.Position =0"; +parent._c.setPosition((int) (0)); + //BA.debugLineNum = 328;BA.debugLine="If c.GetString(\"CUANTOS\") = 0 Then"; if (true) break; case 21: //if this.state = 30; -if ((__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")).equals(BA.NumberToString(0))) { +if ((parent._c.GetString("CUANTOS")).equals(BA.NumberToString(0))) { this.state = 23; }else { this.state = 25; @@ -1025,174 +801,135 @@ this.state = 25; case 23: //C this.state = 30; -RDebugUtils.currentLine=3211292; - //BA.debugLineNum = 3211292;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3211293; - //BA.debugLineNum = 3211293;BA.debugLine="cmd.Name = \"select_fecha\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_fecha"; -RDebugUtils.currentLine=3211294; - //BA.debugLineNum = 3211294;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd ,"; -parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("fecha")); -RDebugUtils.currentLine=3211295; - //BA.debugLineNum = 3211295;BA.debugLine="Msgbox(\"AJUSTAR FECHA\",\"AVISO\") 'ignore"; + //BA.debugLineNum = 329;BA.debugLine="cmd.Initialize"; +parent._cmd.Initialize(); + //BA.debugLineNum = 330;BA.debugLine="cmd.Name = \"select_fecha\""; +parent._cmd.Name /*String*/ = "select_fecha"; + //BA.debugLineNum = 331;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd ,"; +parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (parent._cmd,(int) (0),(Object)("fecha")); + //BA.debugLineNum = 332;BA.debugLine="Msgbox(\"AJUSTAR FECHA\",\"AVISO\") 'ignore"; parent.__c.Msgbox(BA.ObjectToCharSequence("AJUSTAR FECHA"),BA.ObjectToCharSequence("AVISO"),ba); -RDebugUtils.currentLine=3211296; - //BA.debugLineNum = 3211296;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*void*/ (null); + //BA.debugLineNum = 333;BA.debugLine="B4XPage_Appear"; +parent._b4xpage_appear(); if (true) break; case 25: //C this.state = 26; -RDebugUtils.currentLine=3211298; - //BA.debugLineNum = 3211298;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"select CAT_"; -__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)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery2("select CAT_VA_VALOR from CAT_VARIABLES WHERE CAT_VA_DESCRIPCION = ?",new String[]{"FECHA"}))); -RDebugUtils.currentLine=3211299; - //BA.debugLineNum = 3211299;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3211300; - //BA.debugLineNum = 3211300;BA.debugLine="Dim sDate,sTime As String"; + //BA.debugLineNum = 335;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"select CAT_"; +parent._c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery2("select CAT_VA_VALOR from CAT_VARIABLES WHERE CAT_VA_DESCRIPCION = ?",new String[]{"FECHA"}))); + //BA.debugLineNum = 336;BA.debugLine="c.Position=0"; +parent._c.setPosition((int) (0)); + //BA.debugLineNum = 337;BA.debugLine="Dim sDate,sTime As String"; parent._sdate = ""; parent._stime = ""; -RDebugUtils.currentLine=3211301; - //BA.debugLineNum = 3211301;BA.debugLine="DateTime.DateFormat = \"yyyyMMdd\""; + //BA.debugLineNum = 338;BA.debugLine="DateTime.DateFormat = \"yyyyMMdd\""; parent.__c.DateTime.setDateFormat("yyyyMMdd"); -RDebugUtils.currentLine=3211302; - //BA.debugLineNum = 3211302;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -__ref._sdate /*String*/ = parent.__c.DateTime.Date(parent.__c.DateTime.getNow()); -RDebugUtils.currentLine=3211303; - //BA.debugLineNum = 3211303;BA.debugLine="If c.GetString(\"CAT_VA_VALOR\") > sDate Then"; + //BA.debugLineNum = 339;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; +parent._sdate = parent.__c.DateTime.Date(parent.__c.DateTime.getNow()); + //BA.debugLineNum = 340;BA.debugLine="If c.GetString(\"CAT_VA_VALOR\") > sDate Then"; if (true) break; case 26: //if this.state = 29; -if ((double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_VA_VALOR")))>(double)(Double.parseDouble(__ref._sdate /*String*/ ))) { +if ((double)(Double.parseDouble(parent._c.GetString("CAT_VA_VALOR")))>(double)(Double.parseDouble(parent._sdate))) { this.state = 28; }if (true) break; case 28: //C this.state = 29; -RDebugUtils.currentLine=3211304; - //BA.debugLineNum = 3211304;BA.debugLine="Msgbox(\"AJUSTAR LA FECHA YA QUE ES MENOR AL SIS"; + //BA.debugLineNum = 341;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); -RDebugUtils.currentLine=3211305; - //BA.debugLineNum = 3211305;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3211306; - //BA.debugLineNum = 3211306;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*void*/ (null); + //BA.debugLineNum = 342;BA.debugLine="c.Close"; +parent._c.Close(); + //BA.debugLineNum = 343;BA.debugLine="B4XPage_Appear"; +parent._b4xpage_appear(); if (true) break; case 29: //C this.state = 30; ; -RDebugUtils.currentLine=3211308; - //BA.debugLineNum = 3211308;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 345;BA.debugLine="c.Close"; +parent._c.Close(); if (true) break; case 30: //C this.state = 31; ; -RDebugUtils.currentLine=3211310; - //BA.debugLineNum = 3211310;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3211311; - //BA.debugLineNum = 3211311;BA.debugLine="If EJECUTANDO =0 Then"; + //BA.debugLineNum = 347;BA.debugLine="c.Close"; +parent._c.Close(); + //BA.debugLineNum = 348;BA.debugLine="If EJECUTANDO =0 Then"; if (true) break; case 31: //if this.state = 34; -if ((__ref._ejecutando /*String*/ ).equals(BA.NumberToString(0))) { +if ((parent._ejecutando).equals(BA.NumberToString(0))) { this.state = 33; }if (true) break; case 33: //C this.state = 34; -RDebugUtils.currentLine=3211312; - //BA.debugLineNum = 3211312;BA.debugLine="Listo1 = 0"; -__ref._listo1 /*String*/ = BA.NumberToString(0); -RDebugUtils.currentLine=3211313; - //BA.debugLineNum = 3211313;BA.debugLine="Listo2 = 0"; -__ref._listo2 /*String*/ = BA.NumberToString(0); -RDebugUtils.currentLine=3211314; - //BA.debugLineNum = 3211314;BA.debugLine="Listo3 = 0"; -__ref._listo3 /*String*/ = BA.NumberToString(0); -RDebugUtils.currentLine=3211315; - //BA.debugLineNum = 3211315;BA.debugLine="Listo4 = 0"; -__ref._listo4 /*String*/ = BA.NumberToString(0); -RDebugUtils.currentLine=3211316; - //BA.debugLineNum = 3211316;BA.debugLine="Listo5 = 0"; -__ref._listo5 /*String*/ = BA.NumberToString(0); -RDebugUtils.currentLine=3211317; - //BA.debugLineNum = 3211317;BA.debugLine="inve = 0"; -__ref._inve /*String*/ = BA.NumberToString(0); -RDebugUtils.currentLine=3211318; - //BA.debugLineNum = 3211318;BA.debugLine="img2.Visible =False"; -__ref._img2 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(parent.__c.False); + //BA.debugLineNum = 349;BA.debugLine="Listo1 = 0"; +parent._listo1 = BA.NumberToString(0); + //BA.debugLineNum = 350;BA.debugLine="Listo2 = 0"; +parent._listo2 = BA.NumberToString(0); + //BA.debugLineNum = 351;BA.debugLine="Listo3 = 0"; +parent._listo3 = BA.NumberToString(0); + //BA.debugLineNum = 352;BA.debugLine="Listo4 = 0"; +parent._listo4 = BA.NumberToString(0); + //BA.debugLineNum = 353;BA.debugLine="Listo5 = 0"; +parent._listo5 = BA.NumberToString(0); + //BA.debugLineNum = 354;BA.debugLine="inve = 0"; +parent._inve = BA.NumberToString(0); + //BA.debugLineNum = 355;BA.debugLine="img2.Visible =False"; +parent._img2.setVisible(parent.__c.False); if (true) break; case 34: //C this.state = 35; ; -RDebugUtils.currentLine=3211320; - //BA.debugLineNum = 3211320;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; + //BA.debugLineNum = 357;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; parent.__c.DateTime.setDateFormat("MM/dd/yyyy"); -RDebugUtils.currentLine=3211321; - //BA.debugLineNum = 3211321;BA.debugLine="fecha=DateTime.Date(DateTime.Now)"; -__ref._fecha /*String*/ = parent.__c.DateTime.Date(parent.__c.DateTime.getNow()); -RDebugUtils.currentLine=3211322; - //BA.debugLineNum = 3211322;BA.debugLine="b=B4XPages.MainPage.skmt.ExecQuery(\"Select count("; -__ref._b /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("Select count(*) as CUANTOS from pedido_cliente"))); -RDebugUtils.currentLine=3211323; - //BA.debugLineNum = 3211323;BA.debugLine="b.Position=0"; -__ref._b /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3211324; - //BA.debugLineNum = 3211324;BA.debugLine="Cuantos = b.GetString(\"CUANTOS\")"; -__ref._cuantos /*String*/ = __ref._b /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS"); -RDebugUtils.currentLine=3211325; - //BA.debugLineNum = 3211325;BA.debugLine="b.Close"; -__ref._b /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3211327; - //BA.debugLineNum = 3211327;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"select count("; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select count(*) as TOTAL_VISITAR from kmt_info where gestion = 0"))); -RDebugUtils.currentLine=3211328; - //BA.debugLineNum = 3211328;BA.debugLine="d.Position=0"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3211329; - //BA.debugLineNum = 3211329;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery(\"select count("; -__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select count(*) as POR_VISITAR from kmt_info"))); -RDebugUtils.currentLine=3211330; - //BA.debugLineNum = 3211330;BA.debugLine="e.Position=0"; -__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3211331; - //BA.debugLineNum = 3211331;BA.debugLine="f=B4XPages.MainPage.skmt.ExecQuery(\"select count("; -__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select count(*) as CAT_CL_RUTA from kmt_info"))); -RDebugUtils.currentLine=3211332; - //BA.debugLineNum = 3211332;BA.debugLine="f.Position=0"; -__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3211333; - //BA.debugLineNum = 3211333;BA.debugLine="l_ruta.Text = f.GetString(\"CAT_CL_RUTA\")"; -__ref._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_RUTA"))); -RDebugUtils.currentLine=3211334; - //BA.debugLineNum = 3211334;BA.debugLine="f.Close"; -__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3211335; - //BA.debugLineNum = 3211335;BA.debugLine="If l_ruta.Text = 0 Then"; + //BA.debugLineNum = 358;BA.debugLine="fecha=DateTime.Date(DateTime.Now)"; +parent._fecha = parent.__c.DateTime.Date(parent.__c.DateTime.getNow()); + //BA.debugLineNum = 359;BA.debugLine="b=B4XPages.MainPage.skmt.ExecQuery(\"Select count("; +parent._b = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("Select count(*) as CUANTOS from pedido_cliente"))); + //BA.debugLineNum = 360;BA.debugLine="b.Position=0"; +parent._b.setPosition((int) (0)); + //BA.debugLineNum = 361;BA.debugLine="Cuantos = b.GetString(\"CUANTOS\")"; +parent._cuantos = parent._b.GetString("CUANTOS"); + //BA.debugLineNum = 362;BA.debugLine="b.Close"; +parent._b.Close(); + //BA.debugLineNum = 364;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"select count("; +parent._d = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select count(*) as TOTAL_VISITAR from kmt_info where gestion = 0"))); + //BA.debugLineNum = 365;BA.debugLine="d.Position=0"; +parent._d.setPosition((int) (0)); + //BA.debugLineNum = 366;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery(\"select count("; +parent._e = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select count(*) as POR_VISITAR from kmt_info"))); + //BA.debugLineNum = 367;BA.debugLine="e.Position=0"; +parent._e.setPosition((int) (0)); + //BA.debugLineNum = 368;BA.debugLine="f=B4XPages.MainPage.skmt.ExecQuery(\"select count("; +parent._f = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select count(*) as CAT_CL_RUTA from kmt_info"))); + //BA.debugLineNum = 369;BA.debugLine="f.Position=0"; +parent._f.setPosition((int) (0)); + //BA.debugLineNum = 370;BA.debugLine="l_ruta.Text = f.GetString(\"CAT_CL_RUTA\")"; +parent._l_ruta.setText(BA.ObjectToCharSequence(parent._f.GetString("CAT_CL_RUTA"))); + //BA.debugLineNum = 371;BA.debugLine="f.Close"; +parent._f.Close(); + //BA.debugLineNum = 372;BA.debugLine="If l_ruta.Text = 0 Then"; if (true) break; case 35: //if this.state = 40; -if ((__ref._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals(BA.NumberToString(0))) { +if ((parent._l_ruta.getText()).equals(BA.NumberToString(0))) { this.state = 37; }else { this.state = 39; @@ -1201,35 +938,29 @@ this.state = 39; case 37: //C this.state = 40; -RDebugUtils.currentLine=3211336; - //BA.debugLineNum = 3211336;BA.debugLine="l_ruta.Text =0"; -__ref._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(0)); + //BA.debugLineNum = 373;BA.debugLine="l_ruta.Text =0"; +parent._l_ruta.setText(BA.ObjectToCharSequence(0)); if (true) break; case 39: //C this.state = 40; -RDebugUtils.currentLine=3211338; - //BA.debugLineNum = 3211338;BA.debugLine="f=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_C"; -__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select CAT_CL_RUTA from kmt_info"))); -RDebugUtils.currentLine=3211339; - //BA.debugLineNum = 3211339;BA.debugLine="f.Position=0"; -__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3211340; - //BA.debugLineNum = 3211340;BA.debugLine="l_ruta.Text = f.GetString(\"CAT_CL_RUTA\")"; -__ref._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_RUTA"))); -RDebugUtils.currentLine=3211341; - //BA.debugLineNum = 3211341;BA.debugLine="f.Close"; -__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 375;BA.debugLine="f=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_C"; +parent._f = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select CAT_CL_RUTA from kmt_info"))); + //BA.debugLineNum = 376;BA.debugLine="f.Position=0"; +parent._f.setPosition((int) (0)); + //BA.debugLineNum = 377;BA.debugLine="l_ruta.Text = f.GetString(\"CAT_CL_RUTA\")"; +parent._l_ruta.setText(BA.ObjectToCharSequence(parent._f.GetString("CAT_CL_RUTA"))); + //BA.debugLineNum = 378;BA.debugLine="f.Close"; +parent._f.Close(); if (true) break; ; -RDebugUtils.currentLine=3211343; - //BA.debugLineNum = 3211343;BA.debugLine="If Cuantos = 0 Then"; + //BA.debugLineNum = 380;BA.debugLine="If Cuantos = 0 Then"; case 40: //if this.state = 61; -if ((__ref._cuantos /*String*/ ).equals(BA.NumberToString(0))) { +if ((parent._cuantos).equals(BA.NumberToString(0))) { this.state = 42; }else { this.state = 44; @@ -1238,311 +969,230 @@ this.state = 44; case 42: //C this.state = 61; -RDebugUtils.currentLine=3211344; - //BA.debugLineNum = 3211344;BA.debugLine="L_MONTOD.Text =0"; -__ref._l_montod /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(0)); -RDebugUtils.currentLine=3211345; - //BA.debugLineNum = 3211345;BA.debugLine="l_cuantosc.Text = 0"; -__ref._l_cuantosc /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(0)); -RDebugUtils.currentLine=3211346; - //BA.debugLineNum = 3211346;BA.debugLine="l_cuantosn.Text = 0"; -__ref._l_cuantosn /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(0)); -RDebugUtils.currentLine=3211347; - //BA.debugLineNum = 3211347;BA.debugLine="L_CUANTOST.Text = 0"; -__ref._l_cuantost /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(0)); -RDebugUtils.currentLine=3211348; - //BA.debugLineNum = 3211348;BA.debugLine="drop = 0"; -__ref._drop /*double*/ = 0; -RDebugUtils.currentLine=3211349; - //BA.debugLineNum = 3211349;BA.debugLine="l_drop.Text = 0"; -__ref._l_drop /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(0)); -RDebugUtils.currentLine=3211350; - //BA.debugLineNum = 3211350;BA.debugLine="efectiva = 0"; -__ref._efectiva /*double*/ = 0; -RDebugUtils.currentLine=3211351; - //BA.debugLineNum = 3211351;BA.debugLine="l_efectiva.text =0"; -__ref._l_efectiva /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(0)); -RDebugUtils.currentLine=3211352; - //BA.debugLineNum = 3211352;BA.debugLine="l_ctast.Text = d.GetString(\"TOTAL_VISITAR\")"; -__ref._l_ctast /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL_VISITAR"))); -RDebugUtils.currentLine=3211353; - //BA.debugLineNum = 3211353;BA.debugLine="l_porvisitar.Text = e.GetString(\"POR_VISITAR\")"; -__ref._l_porvisitar /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("POR_VISITAR"))); -RDebugUtils.currentLine=3211354; - //BA.debugLineNum = 3211354;BA.debugLine="d.Close"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3211355; - //BA.debugLineNum = 3211355;BA.debugLine="e.Close"; -__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3211356; - //BA.debugLineNum = 3211356;BA.debugLine="b=B4XPages.MainPage.skmt.ExecQuery(\"select count"; -__ref._b /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select count(*) as CUANTOS from noventa"))); -RDebugUtils.currentLine=3211357; - //BA.debugLineNum = 3211357;BA.debugLine="b.Position=0"; -__ref._b /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3211358; - //BA.debugLineNum = 3211358;BA.debugLine="l_cuantosn.Text = b.GetString(\"CUANTOS\")"; -__ref._l_cuantosn /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._b /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS"))); -RDebugUtils.currentLine=3211359; - //BA.debugLineNum = 3211359;BA.debugLine="b.close"; -__ref._b /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 381;BA.debugLine="L_MONTOD.Text =0"; +parent._l_montod.setText(BA.ObjectToCharSequence(0)); + //BA.debugLineNum = 382;BA.debugLine="l_cuantosc.Text = 0"; +parent._l_cuantosc.setText(BA.ObjectToCharSequence(0)); + //BA.debugLineNum = 383;BA.debugLine="l_cuantosn.Text = 0"; +parent._l_cuantosn.setText(BA.ObjectToCharSequence(0)); + //BA.debugLineNum = 384;BA.debugLine="L_CUANTOST.Text = 0"; +parent._l_cuantost.setText(BA.ObjectToCharSequence(0)); + //BA.debugLineNum = 385;BA.debugLine="drop = 0"; +parent._drop = 0; + //BA.debugLineNum = 386;BA.debugLine="l_drop.Text = 0"; +parent._l_drop.setText(BA.ObjectToCharSequence(0)); + //BA.debugLineNum = 387;BA.debugLine="efectiva = 0"; +parent._efectiva = 0; + //BA.debugLineNum = 388;BA.debugLine="l_efectiva.text =0"; +parent._l_efectiva.setText(BA.ObjectToCharSequence(0)); + //BA.debugLineNum = 389;BA.debugLine="l_ctast.Text = d.GetString(\"TOTAL_VISITAR\")"; +parent._l_ctast.setText(BA.ObjectToCharSequence(parent._d.GetString("TOTAL_VISITAR"))); + //BA.debugLineNum = 390;BA.debugLine="l_porvisitar.Text = e.GetString(\"POR_VISITAR\")"; +parent._l_porvisitar.setText(BA.ObjectToCharSequence(parent._e.GetString("POR_VISITAR"))); + //BA.debugLineNum = 391;BA.debugLine="d.Close"; +parent._d.Close(); + //BA.debugLineNum = 392;BA.debugLine="e.Close"; +parent._e.Close(); + //BA.debugLineNum = 393;BA.debugLine="b=B4XPages.MainPage.skmt.ExecQuery(\"select count"; +parent._b = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select count(*) as CUANTOS from noventa"))); + //BA.debugLineNum = 394;BA.debugLine="b.Position=0"; +parent._b.setPosition((int) (0)); + //BA.debugLineNum = 395;BA.debugLine="l_cuantosn.Text = b.GetString(\"CUANTOS\")"; +parent._l_cuantosn.setText(BA.ObjectToCharSequence(parent._b.GetString("CUANTOS"))); + //BA.debugLineNum = 396;BA.debugLine="b.close"; +parent._b.Close(); if (true) break; case 44: //C this.state = 45; -RDebugUtils.currentLine=3211361; - //BA.debugLineNum = 3211361;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select SUM("; -__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)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select SUM(PE_COSTO_TOT) as MONTO_DIA, COUNT(DISTINCT(PE_CLIENTE)) AS CLIENTES_DIA from PEDIDO "))); -RDebugUtils.currentLine=3211362; - //BA.debugLineNum = 3211362;BA.debugLine="b=B4XPages.MainPage.skmt.ExecQuery(\"select count"; -__ref._b /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select count(*) as CUANTOS from noventa"))); -RDebugUtils.currentLine=3211363; - //BA.debugLineNum = 3211363;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3211364; - //BA.debugLineNum = 3211364;BA.debugLine="b.Position=0"; -__ref._b /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3211365; - //BA.debugLineNum = 3211365;BA.debugLine="L_MONTOD.Text = c.GetString(\"MONTO_DIA\")"; -__ref._l_montod /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("MONTO_DIA"))); -RDebugUtils.currentLine=3211366; - //BA.debugLineNum = 3211366;BA.debugLine="l_cuantosc.Text = c.GetString(\"CLIENTES_DIA\")"; -__ref._l_cuantosc /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CLIENTES_DIA"))); -RDebugUtils.currentLine=3211368; - //BA.debugLineNum = 3211368;BA.debugLine="D2=B4XPages.MainPage.skmt.ExecQuery(\"select COU"; -__ref._d2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select COUNT(*) AS CUANTOS from PEDIDO "))); -RDebugUtils.currentLine=3211369; - //BA.debugLineNum = 3211369;BA.debugLine="D2.Position = 0"; -__ref._d2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3211370; - //BA.debugLineNum = 3211370;BA.debugLine="LPT = D2.GetString(\"CUANTOS\") / l_cuantosc.Text"; -__ref._lpt /*String*/ = BA.NumberToString((double)(Double.parseDouble(__ref._d2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")))/(double)(double)(Double.parseDouble(__ref._l_cuantosc /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()))); -RDebugUtils.currentLine=3211371; - //BA.debugLineNum = 3211371;BA.debugLine="D2.Close"; -__ref._d2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3211373; - //BA.debugLineNum = 3211373;BA.debugLine="l_cuantosn.Text = b.GetString(\"CUANTOS\")"; -__ref._l_cuantosn /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._b /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS"))); -RDebugUtils.currentLine=3211374; - //BA.debugLineNum = 3211374;BA.debugLine="efectiva = c.GetString(\"CLIENTES_DIA\") / e.GetSt"; -__ref._efectiva /*double*/ = (double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CLIENTES_DIA")))/(double)(double)(Double.parseDouble(__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("POR_VISITAR"))); -RDebugUtils.currentLine=3211375; - //BA.debugLineNum = 3211375;BA.debugLine="l_efectiva.text = Round2(efectiva*100,2)"; -__ref._l_efectiva /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(parent.__c.Round2(__ref._efectiva /*double*/ *100,(int) (2)))); -RDebugUtils.currentLine=3211376; - //BA.debugLineNum = 3211376;BA.debugLine="l_ctast.Text = d.GetString(\"TOTAL_VISITAR\")"; -__ref._l_ctast /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL_VISITAR"))); -RDebugUtils.currentLine=3211377; - //BA.debugLineNum = 3211377;BA.debugLine="d.Close"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3211378; - //BA.debugLineNum = 3211378;BA.debugLine="l_porvisitar.Text = e.GetString(\"POR_VISITAR\")"; -__ref._l_porvisitar /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("POR_VISITAR"))); -RDebugUtils.currentLine=3211379; - //BA.debugLineNum = 3211379;BA.debugLine="L_CUANTOST.Text = l_cuantosc.Text + l_cuantosn.T"; -__ref._l_cuantost /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence((double)(Double.parseDouble(__ref._l_cuantosc /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()))+(double)(Double.parseDouble(__ref._l_cuantosn /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())))); -RDebugUtils.currentLine=3211380; - //BA.debugLineNum = 3211380;BA.debugLine="drop = L_CUANTOST.Text / l_porvisitar.Text"; -__ref._drop /*double*/ = (double)(Double.parseDouble(__ref._l_cuantost /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()))/(double)(double)(Double.parseDouble(__ref._l_porvisitar /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())); -RDebugUtils.currentLine=3211381; - //BA.debugLineNum = 3211381;BA.debugLine="l_drop.Text = Round(drop * 100)"; -__ref._l_drop /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(parent.__c.Round(__ref._drop /*double*/ *100))); -RDebugUtils.currentLine=3211382; - //BA.debugLineNum = 3211382;BA.debugLine="If L_CUANTOST.Text < 40 Then"; + //BA.debugLineNum = 398;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select SUM("; +parent._c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select SUM(PE_COSTO_TOT) as MONTO_DIA, COUNT(DISTINCT(PE_CLIENTE)) AS CLIENTES_DIA from PEDIDO "))); + //BA.debugLineNum = 399;BA.debugLine="b=B4XPages.MainPage.skmt.ExecQuery(\"select count"; +parent._b = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select count(*) as CUANTOS from noventa"))); + //BA.debugLineNum = 400;BA.debugLine="c.Position=0"; +parent._c.setPosition((int) (0)); + //BA.debugLineNum = 401;BA.debugLine="b.Position=0"; +parent._b.setPosition((int) (0)); + //BA.debugLineNum = 402;BA.debugLine="L_MONTOD.Text = c.GetString(\"MONTO_DIA\")"; +parent._l_montod.setText(BA.ObjectToCharSequence(parent._c.GetString("MONTO_DIA"))); + //BA.debugLineNum = 403;BA.debugLine="l_cuantosc.Text = c.GetString(\"CLIENTES_DIA\")"; +parent._l_cuantosc.setText(BA.ObjectToCharSequence(parent._c.GetString("CLIENTES_DIA"))); + //BA.debugLineNum = 405;BA.debugLine="D2=B4XPages.MainPage.skmt.ExecQuery(\"select COU"; +parent._d2 = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select COUNT(*) AS CUANTOS from PEDIDO "))); + //BA.debugLineNum = 406;BA.debugLine="D2.Position = 0"; +parent._d2.setPosition((int) (0)); + //BA.debugLineNum = 407;BA.debugLine="LPT = D2.GetString(\"CUANTOS\") / l_cuantosc.Text"; +parent._lpt = BA.NumberToString((double)(Double.parseDouble(parent._d2.GetString("CUANTOS")))/(double)(double)(Double.parseDouble(parent._l_cuantosc.getText()))); + //BA.debugLineNum = 408;BA.debugLine="D2.Close"; +parent._d2.Close(); + //BA.debugLineNum = 410;BA.debugLine="l_cuantosn.Text = b.GetString(\"CUANTOS\")"; +parent._l_cuantosn.setText(BA.ObjectToCharSequence(parent._b.GetString("CUANTOS"))); + //BA.debugLineNum = 411;BA.debugLine="efectiva = c.GetString(\"CLIENTES_DIA\") / e.GetSt"; +parent._efectiva = (double)(Double.parseDouble(parent._c.GetString("CLIENTES_DIA")))/(double)(double)(Double.parseDouble(parent._e.GetString("POR_VISITAR"))); + //BA.debugLineNum = 412;BA.debugLine="l_efectiva.text = Round2(efectiva*100,2)"; +parent._l_efectiva.setText(BA.ObjectToCharSequence(parent.__c.Round2(parent._efectiva*100,(int) (2)))); + //BA.debugLineNum = 413;BA.debugLine="l_ctast.Text = d.GetString(\"TOTAL_VISITAR\")"; +parent._l_ctast.setText(BA.ObjectToCharSequence(parent._d.GetString("TOTAL_VISITAR"))); + //BA.debugLineNum = 414;BA.debugLine="d.Close"; +parent._d.Close(); + //BA.debugLineNum = 415;BA.debugLine="l_porvisitar.Text = e.GetString(\"POR_VISITAR\")"; +parent._l_porvisitar.setText(BA.ObjectToCharSequence(parent._e.GetString("POR_VISITAR"))); + //BA.debugLineNum = 416;BA.debugLine="L_CUANTOST.Text = l_cuantosc.Text + l_cuantosn.T"; +parent._l_cuantost.setText(BA.ObjectToCharSequence((double)(Double.parseDouble(parent._l_cuantosc.getText()))+(double)(Double.parseDouble(parent._l_cuantosn.getText())))); + //BA.debugLineNum = 417;BA.debugLine="drop = L_CUANTOST.Text / l_porvisitar.Text"; +parent._drop = (double)(Double.parseDouble(parent._l_cuantost.getText()))/(double)(double)(Double.parseDouble(parent._l_porvisitar.getText())); + //BA.debugLineNum = 418;BA.debugLine="l_drop.Text = Round(drop * 100)"; +parent._l_drop.setText(BA.ObjectToCharSequence(parent.__c.Round(parent._drop*100))); + //BA.debugLineNum = 419;BA.debugLine="If L_CUANTOST.Text < 40 Then"; if (true) break; case 45: //if this.state = 52; -if ((double)(Double.parseDouble(__ref._l_cuantost /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()))<40) { +if ((double)(Double.parseDouble(parent._l_cuantost.getText()))<40) { this.state = 47; -}else -{RDebugUtils.currentLine=3211384; - //BA.debugLineNum = 3211384;BA.debugLine="Else If L_CUANTOST.Text > = 40 And L_CUANTOST."; -if ((double)(Double.parseDouble(__ref._l_cuantost /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()))>=40 && (double)(Double.parseDouble(__ref._l_cuantost /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()))<50) { +}else if((double)(Double.parseDouble(parent._l_cuantost.getText()))>=40 && (double)(Double.parseDouble(parent._l_cuantost.getText()))<50) { this.state = 49; }else { this.state = 51; -}} -if (true) break; +}if (true) break; case 47: //C this.state = 52; -RDebugUtils.currentLine=3211383; - //BA.debugLineNum = 3211383;BA.debugLine="ImageView3.Bitmap = LoadBitmap(File.DirAssets,"; -__ref._imageview3 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setBitmap((android.graphics.Bitmap)(parent.__c.LoadBitmap(parent.__c.File.getDirAssets(),"tache_rojo.png").getObject())); + //BA.debugLineNum = 420;BA.debugLine="ImageView3.Bitmap = LoadBitmap(File.DirAssets,"; +parent._imageview3.setBitmap((android.graphics.Bitmap)(parent.__c.LoadBitmap(parent.__c.File.getDirAssets(),"tache_rojo.png").getObject())); if (true) break; case 49: //C this.state = 52; -RDebugUtils.currentLine=3211385; - //BA.debugLineNum = 3211385;BA.debugLine="ImageView3.bitmap = LoadBitmap(File.DirAssets,"; -__ref._imageview3 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setBitmap((android.graphics.Bitmap)(parent.__c.LoadBitmap(parent.__c.File.getDirAssets(),"alerta_amarilla.png").getObject())); + //BA.debugLineNum = 422;BA.debugLine="ImageView3.bitmap = LoadBitmap(File.DirAssets,"; +parent._imageview3.setBitmap((android.graphics.Bitmap)(parent.__c.LoadBitmap(parent.__c.File.getDirAssets(),"alerta_amarilla.png").getObject())); if (true) break; case 51: //C this.state = 52; -RDebugUtils.currentLine=3211387; - //BA.debugLineNum = 3211387;BA.debugLine="ImageView3.Bitmap = LoadBitmap(File.DirAssets,"; -__ref._imageview3 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setBitmap((android.graphics.Bitmap)(parent.__c.LoadBitmap(parent.__c.File.getDirAssets(),"palomita_verde.png").getObject())); + //BA.debugLineNum = 424;BA.debugLine="ImageView3.Bitmap = LoadBitmap(File.DirAssets,"; +parent._imageview3.setBitmap((android.graphics.Bitmap)(parent.__c.LoadBitmap(parent.__c.File.getDirAssets(),"palomita_verde.png").getObject())); if (true) break; case 52: //C this.state = 53; ; -RDebugUtils.currentLine=3211389; - //BA.debugLineNum = 3211389;BA.debugLine="L_TICKPROM.Text = Round2((c.GetString(\"MONTO_DI"; -__ref._l_tickprom /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(parent.__c.Round2(((double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("MONTO_DIA")))/(double)(double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CLIENTES_DIA")))),(int) (2)))); -RDebugUtils.currentLine=3211390; - //BA.debugLineNum = 3211390;BA.debugLine="If c.GetString(\"MONTO_DIA\") < 4000 Then"; + //BA.debugLineNum = 426;BA.debugLine="L_TICKPROM.Text = Round2((c.GetString(\"MONTO_DI"; +parent._l_tickprom.setText(BA.ObjectToCharSequence(parent.__c.Round2(((double)(Double.parseDouble(parent._c.GetString("MONTO_DIA")))/(double)(double)(Double.parseDouble(parent._c.GetString("CLIENTES_DIA")))),(int) (2)))); + //BA.debugLineNum = 427;BA.debugLine="If c.GetString(\"MONTO_DIA\") < 4000 Then"; if (true) break; case 53: //if this.state = 60; -if ((double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("MONTO_DIA")))<4000) { +if ((double)(Double.parseDouble(parent._c.GetString("MONTO_DIA")))<4000) { this.state = 55; -}else -{RDebugUtils.currentLine=3211392; - //BA.debugLineNum = 3211392;BA.debugLine="Else if c.GetString(\"MONTO_DIA\") > = 4000 And"; -if ((double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("MONTO_DIA")))>=4000 && (double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("MONTO_DIA")))<6250) { +}else if((double)(Double.parseDouble(parent._c.GetString("MONTO_DIA")))>=4000 && (double)(Double.parseDouble(parent._c.GetString("MONTO_DIA")))<6250) { this.state = 57; }else { this.state = 59; -}} -if (true) break; +}if (true) break; case 55: //C this.state = 60; -RDebugUtils.currentLine=3211391; - //BA.debugLineNum = 3211391;BA.debugLine="ImageView5.Bitmap = LoadBitmap(File.DirAssets,"; -__ref._imageview5 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setBitmap((android.graphics.Bitmap)(parent.__c.LoadBitmap(parent.__c.File.getDirAssets(),"tache_rojo.png").getObject())); + //BA.debugLineNum = 428;BA.debugLine="ImageView5.Bitmap = LoadBitmap(File.DirAssets,"; +parent._imageview5.setBitmap((android.graphics.Bitmap)(parent.__c.LoadBitmap(parent.__c.File.getDirAssets(),"tache_rojo.png").getObject())); if (true) break; case 57: //C this.state = 60; -RDebugUtils.currentLine=3211393; - //BA.debugLineNum = 3211393;BA.debugLine="ImageView5.bitmap = LoadBitmap(File.DirAssets,"; -__ref._imageview5 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setBitmap((android.graphics.Bitmap)(parent.__c.LoadBitmap(parent.__c.File.getDirAssets(),"alerta_amarilla.png").getObject())); + //BA.debugLineNum = 430;BA.debugLine="ImageView5.bitmap = LoadBitmap(File.DirAssets,"; +parent._imageview5.setBitmap((android.graphics.Bitmap)(parent.__c.LoadBitmap(parent.__c.File.getDirAssets(),"alerta_amarilla.png").getObject())); if (true) break; case 59: //C this.state = 60; -RDebugUtils.currentLine=3211395; - //BA.debugLineNum = 3211395;BA.debugLine="ImageView5.Bitmap = LoadBitmap(File.DirAssets,"; -__ref._imageview5 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setBitmap((android.graphics.Bitmap)(parent.__c.LoadBitmap(parent.__c.File.getDirAssets(),"palomita_verde.png").getObject())); + //BA.debugLineNum = 432;BA.debugLine="ImageView5.Bitmap = LoadBitmap(File.DirAssets,"; +parent._imageview5.setBitmap((android.graphics.Bitmap)(parent.__c.LoadBitmap(parent.__c.File.getDirAssets(),"palomita_verde.png").getObject())); if (true) break; case 60: //C this.state = 61; ; -RDebugUtils.currentLine=3211397; - //BA.debugLineNum = 3211397;BA.debugLine="b.Close"; -__ref._b /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3211398; - //BA.debugLineNum = 3211398;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 434;BA.debugLine="b.Close"; +parent._b.Close(); + //BA.debugLineNum = 435;BA.debugLine="c.Close"; +parent._c.Close(); if (true) break; case 61: //C this.state = 62; ; -RDebugUtils.currentLine=3211400; - //BA.debugLineNum = 3211400;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3211401; - //BA.debugLineNum = 3211401;BA.debugLine="b.Close"; -__ref._b /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3211402; - //BA.debugLineNum = 3211402;BA.debugLine="e.Close"; -__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3211403; - //BA.debugLineNum = 3211403;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select ID_AL"; -__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)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select ID_ALMACEN from CAT_ALMACEN"))); -RDebugUtils.currentLine=3211404; - //BA.debugLineNum = 3211404;BA.debugLine="C.Position =0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3211405; - //BA.debugLineNum = 3211405;BA.debugLine="ALMACEN = C.GetString(\"ID_ALMACEN\")"; -__ref._almacen /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("ID_ALMACEN"); -RDebugUtils.currentLine=3211406; - //BA.debugLineNum = 3211406;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3211407; - //BA.debugLineNum = 3211407;BA.debugLine="bu.Initialize"; -__ref._bu /*keymon.lat.medicomed.batteryutilities*/ ._initialize /*String*/ (null,ba); -RDebugUtils.currentLine=3211408; - //BA.debugLineNum = 3211408;BA.debugLine="batterystatus = bu.BatteryInformation"; -__ref._batterystatus /*int[]*/ = __ref._bu /*keymon.lat.medicomed.batteryutilities*/ ._getbatteryinformation /*int[]*/ (null); -RDebugUtils.currentLine=3211411; - //BA.debugLineNum = 3211411;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select usuari"; -__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)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select usuario from usuarioa"))); -RDebugUtils.currentLine=3211412; - //BA.debugLineNum = 3211412;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3211413; - //BA.debugLineNum = 3211413;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -__ref._usuario /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("USUARIO"); -RDebugUtils.currentLine=3211414; - //BA.debugLineNum = 3211414;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3211415; - //BA.debugLineNum = 3211415;BA.debugLine="B4XPages.MainPage.batt = batterystatus(0)"; -parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._batt /*int*/ = __ref._batterystatus /*int[]*/ [(int) (0)]; -RDebugUtils.currentLine=3211416; - //BA.debugLineNum = 3211416;BA.debugLine="B4XPages.MainPage.montoActual = L_MONTOD.Text"; -parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._montoactual /*String*/ = __ref._l_montod /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText(); -RDebugUtils.currentLine=3211417; - //BA.debugLineNum = 3211417;BA.debugLine="B4XPages.MainPage.clientestotal = L_CUANTOST.Text"; -parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._clientestotal /*String*/ = __ref._l_cuantost /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText(); -RDebugUtils.currentLine=3211418; - //BA.debugLineNum = 3211418;BA.debugLine="B4XPages.MainPage.clientesventa = l_cuantosc.Tex"; -parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._clientesventa /*String*/ = __ref._l_cuantosc /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText(); -RDebugUtils.currentLine=3211419; - //BA.debugLineNum = 3211419;BA.debugLine="B4XPages.MainPage.clientesvisitados = l_porvisita"; -parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._clientesvisitados /*String*/ = __ref._l_porvisitar /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText(); -RDebugUtils.currentLine=3211420; - //BA.debugLineNum = 3211420;BA.debugLine="B4XPages.MainPage.ALMACEN = ALMACEN"; -parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._almacen /*String*/ = __ref._almacen /*String*/ ; -RDebugUtils.currentLine=3211421; - //BA.debugLineNum = 3211421;BA.debugLine="B4XPages.MainPage.rutapreventa = l_ruta.text"; -parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._rutapreventa /*String*/ = __ref._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText(); -RDebugUtils.currentLine=3211424; - //BA.debugLineNum = 3211424;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select usuari"; -__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)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select usuario from usuarioa"))); -RDebugUtils.currentLine=3211425; - //BA.debugLineNum = 3211425;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3211426; - //BA.debugLineNum = 3211426;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -__ref._usuario /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("USUARIO"); -RDebugUtils.currentLine=3211427; - //BA.debugLineNum = 3211427;BA.debugLine="B4XPages.MainPage.usuario = usuario"; -parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._usuario /*String*/ = __ref._usuario /*String*/ ; -RDebugUtils.currentLine=3211428; - //BA.debugLineNum = 3211428;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3211430; - //BA.debugLineNum = 3211430;BA.debugLine="CallSub(Starter, \"ENVIA_ULTIMA_GPS\")"; -parent.__c.CallSubDebug(ba,(Object)(parent._starter.getObject()),"ENVIA_ULTIMA_GPS"); -RDebugUtils.currentLine=3211432; - //BA.debugLineNum = 3211432;BA.debugLine="If l_ruta.Text = 0 Then"; + //BA.debugLineNum = 437;BA.debugLine="c.Close"; +parent._c.Close(); + //BA.debugLineNum = 438;BA.debugLine="b.Close"; +parent._b.Close(); + //BA.debugLineNum = 439;BA.debugLine="e.Close"; +parent._e.Close(); + //BA.debugLineNum = 440;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select ID_AL"; +parent._c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select ID_ALMACEN from CAT_ALMACEN"))); + //BA.debugLineNum = 441;BA.debugLine="C.Position =0"; +parent._c.setPosition((int) (0)); + //BA.debugLineNum = 442;BA.debugLine="ALMACEN = C.GetString(\"ID_ALMACEN\")"; +parent._almacen = parent._c.GetString("ID_ALMACEN"); + //BA.debugLineNum = 443;BA.debugLine="c.Close"; +parent._c.Close(); + //BA.debugLineNum = 444;BA.debugLine="bu.Initialize"; +parent._bu._initialize /*String*/ (ba); + //BA.debugLineNum = 445;BA.debugLine="batterystatus = bu.BatteryInformation"; +parent._batterystatus = parent._bu._getbatteryinformation /*int[]*/ (); + //BA.debugLineNum = 448;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select usuari"; +parent._c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select usuario from usuarioa"))); + //BA.debugLineNum = 449;BA.debugLine="c.Position = 0"; +parent._c.setPosition((int) (0)); + //BA.debugLineNum = 450;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; +parent._usuario = parent._c.GetString("USUARIO"); + //BA.debugLineNum = 451;BA.debugLine="c.Close"; +parent._c.Close(); + //BA.debugLineNum = 452;BA.debugLine="B4XPages.MainPage.batt = batterystatus(0)"; +parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._batt /*int*/ = parent._batterystatus[(int) (0)]; + //BA.debugLineNum = 453;BA.debugLine="B4XPages.MainPage.montoActual = L_MONTOD.Text"; +parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._montoactual /*String*/ = parent._l_montod.getText(); + //BA.debugLineNum = 454;BA.debugLine="B4XPages.MainPage.clientestotal = L_CUANTOST.Text"; +parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._clientestotal /*String*/ = parent._l_cuantost.getText(); + //BA.debugLineNum = 455;BA.debugLine="B4XPages.MainPage.clientesventa = l_cuantosc.Tex"; +parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._clientesventa /*String*/ = parent._l_cuantosc.getText(); + //BA.debugLineNum = 456;BA.debugLine="B4XPages.MainPage.clientesvisitados = l_porvisita"; +parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._clientesvisitados /*String*/ = parent._l_porvisitar.getText(); + //BA.debugLineNum = 457;BA.debugLine="B4XPages.MainPage.ALMACEN = ALMACEN"; +parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._almacen /*String*/ = parent._almacen; + //BA.debugLineNum = 458;BA.debugLine="B4XPages.MainPage.rutapreventa = l_ruta.text"; +parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._rutapreventa /*String*/ = parent._l_ruta.getText(); + //BA.debugLineNum = 461;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select usuari"; +parent._c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select usuario from usuarioa"))); + //BA.debugLineNum = 462;BA.debugLine="c.Position = 0"; +parent._c.setPosition((int) (0)); + //BA.debugLineNum = 463;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; +parent._usuario = parent._c.GetString("USUARIO"); + //BA.debugLineNum = 464;BA.debugLine="B4XPages.MainPage.usuario = usuario"; +parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._usuario /*String*/ = parent._usuario; + //BA.debugLineNum = 465;BA.debugLine="c.Close"; +parent._c.Close(); + //BA.debugLineNum = 467;BA.debugLine="CallSub(Starter, \"ENVIA_ULTIMA_GPS\")"; +parent.__c.CallSubNew(ba,(Object)(parent._starter.getObject()),"ENVIA_ULTIMA_GPS"); + //BA.debugLineNum = 469;BA.debugLine="If l_ruta.Text = 0 Then"; if (true) break; case 62: //if this.state = 67; -if ((__ref._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals(BA.NumberToString(0))) { +if ((parent._l_ruta.getText()).equals(BA.NumberToString(0))) { this.state = 64; }else { this.state = 66; @@ -1551,113 +1201,59 @@ this.state = 66; case 64: //C this.state = 67; -RDebugUtils.currentLine=3211433; - //BA.debugLineNum = 3211433;BA.debugLine="resdia.Enabled = False"; -__ref._resdia /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setEnabled(parent.__c.False); -RDebugUtils.currentLine=3211434; - //BA.debugLineNum = 3211434;BA.debugLine="hacer_ped.Enabled = False"; -__ref._hacer_ped /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setEnabled(parent.__c.False); -RDebugUtils.currentLine=3211435; - //BA.debugLineNum = 3211435;BA.debugLine="nvo_cliente.Enabled = False"; -__ref._nvo_cliente /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setEnabled(parent.__c.False); -RDebugUtils.currentLine=3211436; - //BA.debugLineNum = 3211436;BA.debugLine="Btn_Ubicar.Enabled = False"; -__ref._btn_ubicar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setEnabled(parent.__c.False); -RDebugUtils.currentLine=3211437; - //BA.debugLineNum = 3211437;BA.debugLine="tickets_dia.Enabled = False"; -__ref._tickets_dia /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setEnabled(parent.__c.False); + //BA.debugLineNum = 470;BA.debugLine="resdia.Enabled = False"; +parent._resdia.setEnabled(parent.__c.False); + //BA.debugLineNum = 471;BA.debugLine="hacer_ped.Enabled = False"; +parent._hacer_ped.setEnabled(parent.__c.False); + //BA.debugLineNum = 472;BA.debugLine="nvo_cliente.Enabled = False"; +parent._nvo_cliente.setEnabled(parent.__c.False); + //BA.debugLineNum = 473;BA.debugLine="Btn_Ubicar.Enabled = False"; +parent._btn_ubicar.setEnabled(parent.__c.False); + //BA.debugLineNum = 474;BA.debugLine="tickets_dia.Enabled = False"; +parent._tickets_dia.setEnabled(parent.__c.False); if (true) break; case 66: //C this.state = 67; -RDebugUtils.currentLine=3211439; - //BA.debugLineNum = 3211439;BA.debugLine="resdia.Enabled = True"; -__ref._resdia /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setEnabled(parent.__c.True); -RDebugUtils.currentLine=3211440; - //BA.debugLineNum = 3211440;BA.debugLine="hacer_ped.Enabled = True"; -__ref._hacer_ped /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setEnabled(parent.__c.True); -RDebugUtils.currentLine=3211441; - //BA.debugLineNum = 3211441;BA.debugLine="nvo_cliente.Enabled = True"; -__ref._nvo_cliente /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setEnabled(parent.__c.True); -RDebugUtils.currentLine=3211442; - //BA.debugLineNum = 3211442;BA.debugLine="Btn_Ubicar.Enabled = True"; -__ref._btn_ubicar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setEnabled(parent.__c.True); -RDebugUtils.currentLine=3211443; - //BA.debugLineNum = 3211443;BA.debugLine="tickets_dia.Enabled = True"; -__ref._tickets_dia /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setEnabled(parent.__c.True); + //BA.debugLineNum = 476;BA.debugLine="resdia.Enabled = True"; +parent._resdia.setEnabled(parent.__c.True); + //BA.debugLineNum = 477;BA.debugLine="hacer_ped.Enabled = True"; +parent._hacer_ped.setEnabled(parent.__c.True); + //BA.debugLineNum = 478;BA.debugLine="nvo_cliente.Enabled = True"; +parent._nvo_cliente.setEnabled(parent.__c.True); + //BA.debugLineNum = 479;BA.debugLine="Btn_Ubicar.Enabled = True"; +parent._btn_ubicar.setEnabled(parent.__c.True); + //BA.debugLineNum = 480;BA.debugLine="tickets_dia.Enabled = True"; +parent._tickets_dia.setEnabled(parent.__c.True); if (true) break; case 67: //C this.state = -1; ; -RDebugUtils.currentLine=3211445; - //BA.debugLineNum = 3211445;BA.debugLine="End Sub"; + //BA.debugLineNum = 482;BA.debugLine="End Sub"; if (true) break; } } } } -public String _b_ok_res_click(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "b_ok_res_click", false)) - {return ((String) Debug.delegate(ba, "b_ok_res_click", null));} -RDebugUtils.currentLine=4063232; - //BA.debugLineNum = 4063232;BA.debugLine="Sub B_OK_RES_Click"; -RDebugUtils.currentLine=4063234; - //BA.debugLineNum = 4063234;BA.debugLine="NUEVO.Visible =True"; -__ref._nuevo /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=4063235; - //BA.debugLineNum = 4063235;BA.debugLine="BUSCA.Visible=True"; -__ref._busca /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=4063236; - //BA.debugLineNum = 4063236;BA.debugLine="connecta.Visible=True"; -__ref._connecta /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=4063237; - //BA.debugLineNum = 4063237;BA.debugLine="Resumen.Visible= True"; -__ref._resumen /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=4063238; - //BA.debugLineNum = 4063238;BA.debugLine="P_RESUMEN.Visible=False"; -__ref._p_resumen /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=4063239; - //BA.debugLineNum = 4063239;BA.debugLine="Panel4.Visible = False"; -__ref._panel4 /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=4063240; - //BA.debugLineNum = 4063240;BA.debugLine="SCROLL_RESDIA.Visible = False"; -__ref._scroll_resdia /*anywheresoftware.b4a.objects.ScrollViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=4063241; - //BA.debugLineNum = 4063241;BA.debugLine="Btn_Ubicar.Visible=True"; -__ref._btn_ubicar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=4063242; - //BA.debugLineNum = 4063242;BA.debugLine="p_principal.Visible = True"; -__ref._p_principal /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=4063243; - //BA.debugLineNum = 4063243;BA.debugLine="End Sub"; -return ""; +public void _b4xpage_permissionresult(String _permission,boolean _result) throws Exception{ } -public anywheresoftware.b4a.keywords.Common.ResumableSubWrapper _b4xpage_closerequest(keymon.lat.medicomed.c_principal __ref) throws Exception{ -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "b4xpage_closerequest", false)) - {return ((anywheresoftware.b4a.keywords.Common.ResumableSubWrapper) Debug.delegate(ba, "b4xpage_closerequest", null));} -ResumableSub_B4XPage_CloseRequest rsub = new ResumableSub_B4XPage_CloseRequest(this,__ref); +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.c_principal parent,keymon.lat.medicomed.c_principal __ref) { +public ResumableSub_B4XPage_CloseRequest(keymon.lat.medicomed.c_principal parent) { this.parent = parent; -this.__ref = __ref; -this.__ref = parent; } -keymon.lat.medicomed.c_principal __ref; keymon.lat.medicomed.c_principal parent; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="c_principal"; while (true) { switch (state) { @@ -1667,36 +1263,28 @@ parent.__c.ReturnFromResumableSub(this,null);return;} case 0: //C this.state = 1; -RDebugUtils.currentLine=3473410; - //BA.debugLineNum = 3473410;BA.debugLine="If SCROLL_RESDIA.Visible Then"; + //BA.debugLineNum = 1712;BA.debugLine="If SCROLL_RESDIA.Visible Then"; if (true) break; case 1: //if this.state = 8; -if (__ref._scroll_resdia /*anywheresoftware.b4a.objects.ScrollViewWrapper*/ .getVisible()) { +if (parent._scroll_resdia.getVisible()) { this.state = 3; -}else -{RDebugUtils.currentLine=3473414; - //BA.debugLineNum = 3473414;BA.debugLine="Else if Panel5.Visible Then"; -if (__ref._panel5 /*anywheresoftware.b4a.objects.PanelWrapper*/ .getVisible()) { +}else if(parent._panel5.getVisible()) { this.state = 5; }else { this.state = 7; -}} -if (true) break; +}if (true) break; case 3: //C this.state = 8; -RDebugUtils.currentLine=3473411; - //BA.debugLineNum = 3473411;BA.debugLine="SCROLL_RESDIA.Visible = False"; -__ref._scroll_resdia /*anywheresoftware.b4a.objects.ScrollViewWrapper*/ .setVisible(parent.__c.False); -RDebugUtils.currentLine=3473412; - //BA.debugLineNum = 3473412;BA.debugLine="B_OK_RES_Click"; -__ref._b_ok_res_click /*String*/ (null); -RDebugUtils.currentLine=3473413; - //BA.debugLineNum = 3473413;BA.debugLine="Return False"; + //BA.debugLineNum = 1713;BA.debugLine="SCROLL_RESDIA.Visible = False"; +parent._scroll_resdia.setVisible(parent.__c.False); + //BA.debugLineNum = 1714;BA.debugLine="B_OK_RES_Click"; +parent._b_ok_res_click(); + //BA.debugLineNum = 1715;BA.debugLine="Return False"; if (true) { parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.False));return;}; if (true) break; @@ -1704,11 +1292,9 @@ parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.False));return;}; case 5: //C this.state = 8; -RDebugUtils.currentLine=3473415; - //BA.debugLineNum = 3473415;BA.debugLine="B_OK_PANEL5_Click"; -__ref._b_ok_panel5_click /*String*/ (null); -RDebugUtils.currentLine=3473416; - //BA.debugLineNum = 3473416;BA.debugLine="Return False"; + //BA.debugLineNum = 1717;BA.debugLine="B_OK_PANEL5_Click"; +parent._b_ok_panel5_click(); + //BA.debugLineNum = 1718;BA.debugLine="Return False"; if (true) { parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.False));return;}; if (true) break; @@ -1716,8 +1302,7 @@ parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.False));return;}; case 7: //C this.state = 8; -RDebugUtils.currentLine=3473418; - //BA.debugLineNum = 3473418;BA.debugLine="B4XPages.ShowPage(\"login\")"; + //BA.debugLineNum = 1720;BA.debugLine="B4XPages.ShowPage(\"login\")"; parent._b4xpages._showpage /*String*/ (ba,"login"); if (true) break; @@ -1725,239 +1310,164 @@ case 8: //C this.state = -1; ; -RDebugUtils.currentLine=3473420; - //BA.debugLineNum = 3473420;BA.debugLine="Return False"; + //BA.debugLineNum = 1722;BA.debugLine="Return False"; if (true) { parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.False));return;}; -RDebugUtils.currentLine=3473421; - //BA.debugLineNum = 3473421;BA.debugLine="End Sub"; + //BA.debugLineNum = 1723;BA.debugLine="End Sub"; if (true) break; } } } } -public String _b4xpage_created(keymon.lat.medicomed.c_principal __ref,anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "b4xpage_created", false)) - {return ((String) Debug.delegate(ba, "b4xpage_created", new Object[] {_root1}));} +public String _b4xpage_created(anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ String _ruta = ""; anywheresoftware.b4a.sql.SQL.CursorWrapper _ds = null; -RDebugUtils.currentLine=3145728; - //BA.debugLineNum = 3145728;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -RDebugUtils.currentLine=3145729; - //BA.debugLineNum = 3145729;BA.debugLine="Root = Root1"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = _root1; -RDebugUtils.currentLine=3145731; - //BA.debugLineNum = 3145731;BA.debugLine="Root.LoadLayout(\"principal\")"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .LoadLayout("principal",ba); -RDebugUtils.currentLine=3145732; - //BA.debugLineNum = 3145732;BA.debugLine="EJECUTANDO=1"; -__ref._ejecutando /*String*/ = BA.NumberToString(1); -RDebugUtils.currentLine=3145733; - //BA.debugLineNum = 3145733;BA.debugLine="Dim ruta As String"; + //BA.debugLineNum = 226;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; + //BA.debugLineNum = 227;BA.debugLine="Root = Root1"; +_root = _root1; + //BA.debugLineNum = 229;BA.debugLine="Root.LoadLayout(\"principal\")"; +_root.LoadLayout("principal",ba); + //BA.debugLineNum = 230;BA.debugLine="EJECUTANDO=1"; +_ejecutando = BA.NumberToString(1); + //BA.debugLineNum = 231;BA.debugLine="Dim ruta As String"; _ruta = ""; -RDebugUtils.currentLine=3145734; - //BA.debugLineNum = 3145734;BA.debugLine="img2.Visible =False"; -__ref._img2 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3145735; - //BA.debugLineNum = 3145735;BA.debugLine="ruta = File.DirInternal"; + //BA.debugLineNum = 232;BA.debugLine="img2.Visible =False"; +_img2.setVisible(__c.False); + //BA.debugLineNum = 233;BA.debugLine="ruta = File.DirInternal"; _ruta = __c.File.getDirInternal(); -RDebugUtils.currentLine=3145736; - //BA.debugLineNum = 3145736;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; + //BA.debugLineNum = 234;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; if (__c.File.Exists(_ruta,"kmt.db")==__c.False) { -RDebugUtils.currentLine=3145737; - //BA.debugLineNum = 3145737;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; + //BA.debugLineNum = 235;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; __c.File.Copy(__c.File.getDirAssets(),"kmt.db",_ruta,"kmt.db"); }; -RDebugUtils.currentLine=3145739; - //BA.debugLineNum = 3145739;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; + //BA.debugLineNum = 237;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; __c.DateTime.setDateFormat("MM/dd/yyyy"); -RDebugUtils.currentLine=3145740; - //BA.debugLineNum = 3145740;BA.debugLine="fecha=DateTime.Date(DateTime.Now)"; -__ref._fecha /*String*/ = __c.DateTime.Date(__c.DateTime.getNow()); -RDebugUtils.currentLine=3145741; - //BA.debugLineNum = 3145741;BA.debugLine="B4XPages.MainPage.skmt.Initialize(ruta,\"kmt.db\","; + //BA.debugLineNum = 238;BA.debugLine="fecha=DateTime.Date(DateTime.Now)"; +_fecha = __c.DateTime.Date(__c.DateTime.getNow()); + //BA.debugLineNum = 239;BA.debugLine="B4XPages.MainPage.skmt.Initialize(ruta,\"kmt.db\","; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .Initialize(_ruta,"kmt.db",__c.True); -RDebugUtils.currentLine=3145742; - //BA.debugLineNum = 3145742;BA.debugLine="b=B4XPages.MainPage.skmt.ExecQuery(\"Select count("; -__ref._b /*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 count(*) as CUANTOS from pedido_cliente"))); -RDebugUtils.currentLine=3145743; - //BA.debugLineNum = 3145743;BA.debugLine="b.Position=0"; -__ref._b /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3145744; - //BA.debugLineNum = 3145744;BA.debugLine="Cuantos = b.GetString(\"CUANTOS\")"; -__ref._cuantos /*String*/ = __ref._b /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS"); -RDebugUtils.currentLine=3145745; - //BA.debugLineNum = 3145745;BA.debugLine="b.Close"; -__ref._b /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3145746; - //BA.debugLineNum = 3145746;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"select count("; -__ref._d /*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 count(*) as TOTAL_VISITAR from kmt_info where gestion = 0"))); -RDebugUtils.currentLine=3145747; - //BA.debugLineNum = 3145747;BA.debugLine="d.Position=0"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3145748; - //BA.debugLineNum = 3145748;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery(\"select count("; -__ref._e /*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 count(*) as POR_VISITAR from kmt_info"))); -RDebugUtils.currentLine=3145749; - //BA.debugLineNum = 3145749;BA.debugLine="e.Position=0"; -__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3145750; - //BA.debugLineNum = 3145750;BA.debugLine="f=B4XPages.MainPage.skmt.ExecQuery(\"select count("; -__ref._f /*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 count(*) as CAT_CL_RUTA from kmt_info"))); -RDebugUtils.currentLine=3145751; - //BA.debugLineNum = 3145751;BA.debugLine="f.Position=0"; -__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3145752; - //BA.debugLineNum = 3145752;BA.debugLine="l_ruta.Text = f.GetString(\"CAT_CL_RUTA\")"; -__ref._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_RUTA"))); -RDebugUtils.currentLine=3145753; - //BA.debugLineNum = 3145753;BA.debugLine="f.Close"; -__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3145754; - //BA.debugLineNum = 3145754;BA.debugLine="If l_ruta.Text = 0 Then"; -if ((__ref._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=3145755; - //BA.debugLineNum = 3145755;BA.debugLine="l_ruta.Text =0"; -__ref._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(0)); + //BA.debugLineNum = 240;BA.debugLine="b=B4XPages.MainPage.skmt.ExecQuery(\"Select count("; +_b = (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 count(*) as CUANTOS from pedido_cliente"))); + //BA.debugLineNum = 241;BA.debugLine="b.Position=0"; +_b.setPosition((int) (0)); + //BA.debugLineNum = 242;BA.debugLine="Cuantos = b.GetString(\"CUANTOS\")"; +_cuantos = _b.GetString("CUANTOS"); + //BA.debugLineNum = 243;BA.debugLine="b.Close"; +_b.Close(); + //BA.debugLineNum = 244;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"select count("; +_d = (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 count(*) as TOTAL_VISITAR from kmt_info where gestion = 0"))); + //BA.debugLineNum = 245;BA.debugLine="d.Position=0"; +_d.setPosition((int) (0)); + //BA.debugLineNum = 246;BA.debugLine="e=B4XPages.MainPage.skmt.ExecQuery(\"select count("; +_e = (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 count(*) as POR_VISITAR from kmt_info"))); + //BA.debugLineNum = 247;BA.debugLine="e.Position=0"; +_e.setPosition((int) (0)); + //BA.debugLineNum = 248;BA.debugLine="f=B4XPages.MainPage.skmt.ExecQuery(\"select count("; +_f = (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 count(*) as CAT_CL_RUTA from kmt_info"))); + //BA.debugLineNum = 249;BA.debugLine="f.Position=0"; +_f.setPosition((int) (0)); + //BA.debugLineNum = 250;BA.debugLine="l_ruta.Text = f.GetString(\"CAT_CL_RUTA\")"; +_l_ruta.setText(BA.ObjectToCharSequence(_f.GetString("CAT_CL_RUTA"))); + //BA.debugLineNum = 251;BA.debugLine="f.Close"; +_f.Close(); + //BA.debugLineNum = 252;BA.debugLine="If l_ruta.Text = 0 Then"; +if ((_l_ruta.getText()).equals(BA.NumberToString(0))) { + //BA.debugLineNum = 253;BA.debugLine="l_ruta.Text =0"; +_l_ruta.setText(BA.ObjectToCharSequence(0)); }else { -RDebugUtils.currentLine=3145757; - //BA.debugLineNum = 3145757;BA.debugLine="f=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_C"; -__ref._f /*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=3145758; - //BA.debugLineNum = 3145758;BA.debugLine="f.Position=0"; -__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3145759; - //BA.debugLineNum = 3145759;BA.debugLine="l_ruta.Text = f.GetString(\"CAT_CL_RUTA\")"; -__ref._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_CL_RUTA"))); -RDebugUtils.currentLine=3145760; - //BA.debugLineNum = 3145760;BA.debugLine="f.Close"; -__ref._f /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 255;BA.debugLine="f=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_C"; +_f = (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"))); + //BA.debugLineNum = 256;BA.debugLine="f.Position=0"; +_f.setPosition((int) (0)); + //BA.debugLineNum = 257;BA.debugLine="l_ruta.Text = f.GetString(\"CAT_CL_RUTA\")"; +_l_ruta.setText(BA.ObjectToCharSequence(_f.GetString("CAT_CL_RUTA"))); + //BA.debugLineNum = 258;BA.debugLine="f.Close"; +_f.Close(); }; -RDebugUtils.currentLine=3145762; - //BA.debugLineNum = 3145762;BA.debugLine="If Cuantos = 0 Then"; -if ((__ref._cuantos /*String*/ ).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=3145763; - //BA.debugLineNum = 3145763;BA.debugLine="L_MONTOD.Text =0"; -__ref._l_montod /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(0)); -RDebugUtils.currentLine=3145764; - //BA.debugLineNum = 3145764;BA.debugLine="l_cuantosc.Text = 0"; -__ref._l_cuantosc /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(0)); -RDebugUtils.currentLine=3145765; - //BA.debugLineNum = 3145765;BA.debugLine="l_cuantosn.Text = 0"; -__ref._l_cuantosn /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(0)); -RDebugUtils.currentLine=3145766; - //BA.debugLineNum = 3145766;BA.debugLine="drop = 0"; -__ref._drop /*double*/ = 0; -RDebugUtils.currentLine=3145767; - //BA.debugLineNum = 3145767;BA.debugLine="l_drop.Text = 0"; -__ref._l_drop /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(0)); -RDebugUtils.currentLine=3145768; - //BA.debugLineNum = 3145768;BA.debugLine="efectiva = 0"; -__ref._efectiva /*double*/ = 0; -RDebugUtils.currentLine=3145769; - //BA.debugLineNum = 3145769;BA.debugLine="l_efectiva.text =0"; -__ref._l_efectiva /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(0)); -RDebugUtils.currentLine=3145770; - //BA.debugLineNum = 3145770;BA.debugLine="l_ctast.Text = d.GetString(\"TOTAL_VISITAR\")"; -__ref._l_ctast /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL_VISITAR"))); -RDebugUtils.currentLine=3145771; - //BA.debugLineNum = 3145771;BA.debugLine="l_porvisitar.Text = e.GetString(\"POR_VISITAR\")"; -__ref._l_porvisitar /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("POR_VISITAR"))); + //BA.debugLineNum = 260;BA.debugLine="If Cuantos = 0 Then"; +if ((_cuantos).equals(BA.NumberToString(0))) { + //BA.debugLineNum = 261;BA.debugLine="L_MONTOD.Text =0"; +_l_montod.setText(BA.ObjectToCharSequence(0)); + //BA.debugLineNum = 262;BA.debugLine="l_cuantosc.Text = 0"; +_l_cuantosc.setText(BA.ObjectToCharSequence(0)); + //BA.debugLineNum = 263;BA.debugLine="l_cuantosn.Text = 0"; +_l_cuantosn.setText(BA.ObjectToCharSequence(0)); + //BA.debugLineNum = 264;BA.debugLine="drop = 0"; +_drop = 0; + //BA.debugLineNum = 265;BA.debugLine="l_drop.Text = 0"; +_l_drop.setText(BA.ObjectToCharSequence(0)); + //BA.debugLineNum = 266;BA.debugLine="efectiva = 0"; +_efectiva = 0; + //BA.debugLineNum = 267;BA.debugLine="l_efectiva.text =0"; +_l_efectiva.setText(BA.ObjectToCharSequence(0)); + //BA.debugLineNum = 268;BA.debugLine="l_ctast.Text = d.GetString(\"TOTAL_VISITAR\")"; +_l_ctast.setText(BA.ObjectToCharSequence(_d.GetString("TOTAL_VISITAR"))); + //BA.debugLineNum = 269;BA.debugLine="l_porvisitar.Text = e.GetString(\"POR_VISITAR\")"; +_l_porvisitar.setText(BA.ObjectToCharSequence(_e.GetString("POR_VISITAR"))); }else { -RDebugUtils.currentLine=3145773; - //BA.debugLineNum = 3145773;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(p"; -__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 sum(pc_monto) as MONTO_DIA, count(pc_cliente) AS CLIENTES_DIA from pedido_cliente "))); -RDebugUtils.currentLine=3145774; - //BA.debugLineNum = 3145774;BA.debugLine="b=B4XPages.MainPage.skmt.ExecQuery(\"select count"; -__ref._b /*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 count(*) as CUANTOS from noventa"))); -RDebugUtils.currentLine=3145776; - //BA.debugLineNum = 3145776;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3145777; - //BA.debugLineNum = 3145777;BA.debugLine="b.Position=0"; -__ref._b /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3145778; - //BA.debugLineNum = 3145778;BA.debugLine="L_MONTOD.Text = c.GetString(\"MONTO_DIA\")"; -__ref._l_montod /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("MONTO_DIA"))); -RDebugUtils.currentLine=3145779; - //BA.debugLineNum = 3145779;BA.debugLine="l_cuantosc.Text = c.GetString(\"CLIENTES_DIA\")"; -__ref._l_cuantosc /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CLIENTES_DIA"))); -RDebugUtils.currentLine=3145780; - //BA.debugLineNum = 3145780;BA.debugLine="l_cuantosn.Text = b.GetString(\"CUANTOS\")"; -__ref._l_cuantosn /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._b /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS"))); -RDebugUtils.currentLine=3145781; - //BA.debugLineNum = 3145781;BA.debugLine="drop = c.GetString(\"MONTO_DIA\") / c.GetString(\"C"; -__ref._drop /*double*/ = (double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("MONTO_DIA")))/(double)(double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CLIENTES_DIA"))); -RDebugUtils.currentLine=3145782; - //BA.debugLineNum = 3145782;BA.debugLine="l_drop.Text = Round2(drop,2)"; -__ref._l_drop /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__c.Round2(__ref._drop /*double*/ ,(int) (2)))); -RDebugUtils.currentLine=3145783; - //BA.debugLineNum = 3145783;BA.debugLine="efectiva = c.GetString(\"CLIENTES_DIA\") / e.GetSt"; -__ref._efectiva /*double*/ = (double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CLIENTES_DIA")))/(double)(double)(Double.parseDouble(__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("POR_VISITAR"))); -RDebugUtils.currentLine=3145784; - //BA.debugLineNum = 3145784;BA.debugLine="l_efectiva.text = Round2(efectiva*100,2)"; -__ref._l_efectiva /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__c.Round2(__ref._efectiva /*double*/ *100,(int) (2)))); -RDebugUtils.currentLine=3145785; - //BA.debugLineNum = 3145785;BA.debugLine="l_ctast.Text = d.GetString(\"TOTAL_VISITAR\")"; -__ref._l_ctast /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL_VISITAR"))); -RDebugUtils.currentLine=3145786; - //BA.debugLineNum = 3145786;BA.debugLine="l_porvisitar.Text = e.GetString(\"POR_VISITAR\")"; -__ref._l_porvisitar /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("POR_VISITAR"))); -RDebugUtils.currentLine=3145787; - //BA.debugLineNum = 3145787;BA.debugLine="b.Close"; -__ref._b /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3145788; - //BA.debugLineNum = 3145788;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 271;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(p"; +_c = (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 sum(pc_monto) as MONTO_DIA, count(pc_cliente) AS CLIENTES_DIA from pedido_cliente "))); + //BA.debugLineNum = 272;BA.debugLine="b=B4XPages.MainPage.skmt.ExecQuery(\"select count"; +_b = (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 count(*) as CUANTOS from noventa"))); + //BA.debugLineNum = 274;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 275;BA.debugLine="b.Position=0"; +_b.setPosition((int) (0)); + //BA.debugLineNum = 276;BA.debugLine="L_MONTOD.Text = c.GetString(\"MONTO_DIA\")"; +_l_montod.setText(BA.ObjectToCharSequence(_c.GetString("MONTO_DIA"))); + //BA.debugLineNum = 277;BA.debugLine="l_cuantosc.Text = c.GetString(\"CLIENTES_DIA\")"; +_l_cuantosc.setText(BA.ObjectToCharSequence(_c.GetString("CLIENTES_DIA"))); + //BA.debugLineNum = 278;BA.debugLine="l_cuantosn.Text = b.GetString(\"CUANTOS\")"; +_l_cuantosn.setText(BA.ObjectToCharSequence(_b.GetString("CUANTOS"))); + //BA.debugLineNum = 279;BA.debugLine="drop = c.GetString(\"MONTO_DIA\") / c.GetString(\"C"; +_drop = (double)(Double.parseDouble(_c.GetString("MONTO_DIA")))/(double)(double)(Double.parseDouble(_c.GetString("CLIENTES_DIA"))); + //BA.debugLineNum = 280;BA.debugLine="l_drop.Text = Round2(drop,2)"; +_l_drop.setText(BA.ObjectToCharSequence(__c.Round2(_drop,(int) (2)))); + //BA.debugLineNum = 281;BA.debugLine="efectiva = c.GetString(\"CLIENTES_DIA\") / e.GetSt"; +_efectiva = (double)(Double.parseDouble(_c.GetString("CLIENTES_DIA")))/(double)(double)(Double.parseDouble(_e.GetString("POR_VISITAR"))); + //BA.debugLineNum = 282;BA.debugLine="l_efectiva.text = Round2(efectiva*100,2)"; +_l_efectiva.setText(BA.ObjectToCharSequence(__c.Round2(_efectiva*100,(int) (2)))); + //BA.debugLineNum = 283;BA.debugLine="l_ctast.Text = d.GetString(\"TOTAL_VISITAR\")"; +_l_ctast.setText(BA.ObjectToCharSequence(_d.GetString("TOTAL_VISITAR"))); + //BA.debugLineNum = 284;BA.debugLine="l_porvisitar.Text = e.GetString(\"POR_VISITAR\")"; +_l_porvisitar.setText(BA.ObjectToCharSequence(_e.GetString("POR_VISITAR"))); + //BA.debugLineNum = 285;BA.debugLine="b.Close"; +_b.Close(); + //BA.debugLineNum = 286;BA.debugLine="c.Close"; +_c.Close(); }; -RDebugUtils.currentLine=3145790; - //BA.debugLineNum = 3145790;BA.debugLine="d.Close"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3145791; - //BA.debugLineNum = 3145791;BA.debugLine="e.Close"; -__ref._e /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3145792; - //BA.debugLineNum = 3145792;BA.debugLine="Private ds As Cursor = B4XPages.MainPage.skmt.Exe"; + //BA.debugLineNum = 288;BA.debugLine="d.Close"; +_d.Close(); + //BA.debugLineNum = 289;BA.debugLine="e.Close"; +_e.Close(); + //BA.debugLineNum = 290;BA.debugLine="Private ds As Cursor = B4XPages.MainPage.skmt.Exe"; _ds = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); _ds = (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_diasemana from kmt_info"))); -RDebugUtils.currentLine=3145793; - //BA.debugLineNum = 3145793;BA.debugLine="If ds.RowCount > 0 Then"; + //BA.debugLineNum = 291;BA.debugLine="If ds.RowCount > 0 Then"; if (_ds.getRowCount()>0) { -RDebugUtils.currentLine=3145794; - //BA.debugLineNum = 3145794;BA.debugLine="ds.Position = 0"; + //BA.debugLineNum = 292;BA.debugLine="ds.Position = 0"; _ds.setPosition((int) (0)); -RDebugUtils.currentLine=3145795; - //BA.debugLineNum = 3145795;BA.debugLine="Starter.dia_semana = ds.GetString(\"CAT_CL_DIASEM"; + //BA.debugLineNum = 293;BA.debugLine="Starter.dia_semana = ds.GetString(\"CAT_CL_DIASEM"; _starter._dia_semana /*String*/ = _ds.GetString("CAT_CL_DIASEMANA"); }; -RDebugUtils.currentLine=3145800; - //BA.debugLineNum = 3145800;BA.debugLine="End Sub"; + //BA.debugLineNum = 298;BA.debugLine="End Sub"; return ""; } -public void _btn_ubicar_click(keymon.lat.medicomed.c_principal __ref) throws Exception{ -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "btn_ubicar_click", false)) - {Debug.delegate(ba, "btn_ubicar_click", null); return;} -ResumableSub_Btn_Ubicar_Click rsub = new ResumableSub_Btn_Ubicar_Click(this,__ref); +public void _btn_ubicar_click() throws Exception{ +ResumableSub_Btn_Ubicar_Click rsub = new ResumableSub_Btn_Ubicar_Click(this); rsub.resume(ba, null); } public static class ResumableSub_Btn_Ubicar_Click extends BA.ResumableSub { -public ResumableSub_Btn_Ubicar_Click(keymon.lat.medicomed.c_principal parent,keymon.lat.medicomed.c_principal __ref) { +public ResumableSub_Btn_Ubicar_Click(keymon.lat.medicomed.c_principal parent) { this.parent = parent; -this.__ref = __ref; -this.__ref = parent; } -keymon.lat.medicomed.c_principal __ref; keymon.lat.medicomed.c_principal parent; String _permission = ""; boolean _result = false; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="c_principal"; while (true) { switch (state) { @@ -1967,22 +1477,19 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=4653057; - //BA.debugLineNum = 4653057;BA.debugLine="rp.CheckAndRequest(rp.PERMISSION_ACCESS_FINE_LOCA"; -__ref._rp /*anywheresoftware.b4a.objects.RuntimePermissions*/ .CheckAndRequest(ba,__ref._rp /*anywheresoftware.b4a.objects.RuntimePermissions*/ .PERMISSION_ACCESS_FINE_LOCATION); -RDebugUtils.currentLine=4653058; - //BA.debugLineNum = 4653058;BA.debugLine="Wait For B4XPage_PermissionResult (Permission As"; -parent.__c.WaitFor("b4xpage_permissionresult", ba, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "c_principal", "btn_ubicar_click"), null); + //BA.debugLineNum = 2219;BA.debugLine="rp.CheckAndRequest(rp.PERMISSION_ACCESS_FINE_LOCA"; +parent._rp.CheckAndRequest(ba,parent._rp.PERMISSION_ACCESS_FINE_LOCATION); + //BA.debugLineNum = 2220;BA.debugLine="Wait For B4XPage_PermissionResult (Permission As"; +parent.__c.WaitFor("b4xpage_permissionresult", ba, this, null); this.state = 5; return; case 5: //C this.state = 1; -_permission = (String) result[1]; -_result = (Boolean) result[2]; +_permission = (String) result[0]; +_result = (Boolean) result[1]; ; -RDebugUtils.currentLine=4653059; - //BA.debugLineNum = 4653059;BA.debugLine="If Result Then"; + //BA.debugLineNum = 2221;BA.debugLine="If Result Then"; if (true) break; case 1: @@ -1995,8 +1502,7 @@ this.state = 3; case 3: //C this.state = 4; -RDebugUtils.currentLine=4653060; - //BA.debugLineNum = 4653060;BA.debugLine="StartActivity(MAPA_RUTAS)"; + //BA.debugLineNum = 2222;BA.debugLine="StartActivity(MAPA_RUTAS)"; parent.__c.StartActivity(ba,(Object)(parent._mapa_rutas.getObject())); if (true) break; @@ -2004,1463 +1510,970 @@ case 4: //C this.state = -1; ; -RDebugUtils.currentLine=4653062; - //BA.debugLineNum = 4653062;BA.debugLine="End Sub"; + //BA.debugLineNum = 2224;BA.debugLine="End Sub"; if (true) break; } } } } -public String _busca_click(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "busca_click", false)) - {return ((String) Debug.delegate(ba, "busca_click", null));} -RDebugUtils.currentLine=3604480; - //BA.debugLineNum = 3604480;BA.debugLine="Sub BUSCA_Click"; -RDebugUtils.currentLine=3604481; - //BA.debugLineNum = 3604481;BA.debugLine="B4XPages.ShowPage(\"TicketsDia\")"; +public String _busca_click() throws Exception{ + //BA.debugLineNum = 1787;BA.debugLine="Sub BUSCA_Click"; + //BA.debugLineNum = 1788;BA.debugLine="B4XPages.ShowPage(\"TicketsDia\")"; _b4xpages._showpage /*String*/ (ba,"TicketsDia"); -RDebugUtils.currentLine=3604482; - //BA.debugLineNum = 3604482;BA.debugLine="End Sub"; + //BA.debugLineNum = 1789;BA.debugLine="End Sub"; return ""; } -public String _carga_click(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "carga_click", false)) - {return ((String) Debug.delegate(ba, "carga_click", null));} -RDebugUtils.currentLine=4259840; - //BA.debugLineNum = 4259840;BA.debugLine="Sub CARGA_Click"; -RDebugUtils.currentLine=4259841; - //BA.debugLineNum = 4259841;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; +public String _carga_click() throws Exception{ + //BA.debugLineNum = 2003;BA.debugLine="Sub CARGA_Click"; + //BA.debugLineNum = 2004;BA.debugLine="B4XPages.ShowPage(\"Productos\")"; _b4xpages._showpage /*String*/ (ba,"Productos"); -RDebugUtils.currentLine=4259842; - //BA.debugLineNum = 4259842;BA.debugLine="End Sub"; + //BA.debugLineNum = 2005;BA.debugLine="End Sub"; return ""; } -public String _cargar_click(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "cargar_click", false)) - {return ((String) Debug.delegate(ba, "cargar_click", null));} -RDebugUtils.currentLine=3342336; - //BA.debugLineNum = 3342336;BA.debugLine="Sub cargar_Click"; -RDebugUtils.currentLine=3342337; - //BA.debugLineNum = 3342337;BA.debugLine="CARGA = \"CARGAR\""; -__ref._carga /*String*/ = "CARGAR"; -RDebugUtils.currentLine=3342338; - //BA.debugLineNum = 3342338;BA.debugLine="p_mandaInfo.Width = Root.Width"; -__ref._p_mandainfo /*anywheresoftware.b4a.objects.PanelWrapper*/ .setWidth(__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()); -RDebugUtils.currentLine=3342339; - //BA.debugLineNum = 3342339;BA.debugLine="p_mandaInfo.Height = Root.Height"; -__ref._p_mandainfo /*anywheresoftware.b4a.objects.PanelWrapper*/ .setHeight(__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=3342340; - //BA.debugLineNum = 3342340;BA.debugLine="P1.Left = (p_mandaInfo.Width/2) - (P1.Width/2)"; -__ref._p1 /*anywheresoftware.b4a.objects.PanelWrapper*/ .setLeft((int) ((__ref._p_mandainfo /*anywheresoftware.b4a.objects.PanelWrapper*/ .getWidth()/(double)2)-(__ref._p1 /*anywheresoftware.b4a.objects.PanelWrapper*/ .getWidth()/(double)2))); -RDebugUtils.currentLine=3342341; - //BA.debugLineNum = 3342341;BA.debugLine="P1.top = (p_mandaInfo.Height/2) - (P1.Height/2)"; -__ref._p1 /*anywheresoftware.b4a.objects.PanelWrapper*/ .setTop((int) ((__ref._p_mandainfo /*anywheresoftware.b4a.objects.PanelWrapper*/ .getHeight()/(double)2)-(__ref._p1 /*anywheresoftware.b4a.objects.PanelWrapper*/ .getHeight()/(double)2))); -RDebugUtils.currentLine=3342342; - //BA.debugLineNum = 3342342;BA.debugLine="img2.Visible =True"; -__ref._img2 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3342343; - //BA.debugLineNum = 3342343;BA.debugLine="L_P_1.Visible = True"; -__ref._l_p_1 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3342344; - //BA.debugLineNum = 3342344;BA.debugLine="S_CC.Visible = True"; -__ref._s_cc /*anywheresoftware.b4a.objects.LabelWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3342345; - //BA.debugLineNum = 3342345;BA.debugLine="Btn_Ubicar.Visible=False"; -__ref._btn_ubicar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3342346; - //BA.debugLineNum = 3342346;BA.debugLine="P1.Visible = True"; -__ref._p1 /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3342347; - //BA.debugLineNum = 3342347;BA.debugLine="p_mandaInfo.Visible = True"; -__ref._p_mandainfo /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3342348; - //BA.debugLineNum = 3342348;BA.debugLine="p_principal.Visible = False"; -__ref._p_principal /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3342349; - //BA.debugLineNum = 3342349;BA.debugLine="Subs.panelVisible(P1, 0, 0)"; -_subs._panelvisible /*String*/ (ba,__ref._p1 /*anywheresoftware.b4a.objects.PanelWrapper*/ ,(int) (0),(int) (0)); -RDebugUtils.currentLine=3342350; - //BA.debugLineNum = 3342350;BA.debugLine="Subs.centraPanel(P1, Root.Width)"; -_subs._centrapanel /*String*/ (ba,__ref._p1 /*anywheresoftware.b4a.objects.PanelWrapper*/ ,__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()); -RDebugUtils.currentLine=3342351; - //BA.debugLineNum = 3342351;BA.debugLine="Subs.centraPanelV(P1, Root.Height)"; -_subs._centrapanelv /*String*/ (ba,__ref._p1 /*anywheresoftware.b4a.objects.PanelWrapper*/ ,__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=3342353; - //BA.debugLineNum = 3342353;BA.debugLine="NUEVO.Visible =False"; -__ref._nuevo /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3342354; - //BA.debugLineNum = 3342354;BA.debugLine="BUSCA.Visible=False"; -__ref._busca /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3342355; - //BA.debugLineNum = 3342355;BA.debugLine="connecta.Visible=False"; -__ref._connecta /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3342356; - //BA.debugLineNum = 3342356;BA.debugLine="L_P_3.Visible = True"; -__ref._l_p_3 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3342357; - //BA.debugLineNum = 3342357;BA.debugLine="S_CH.Visible = True"; -__ref._s_ch /*anywheresoftware.b4a.objects.LabelWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3342358; - //BA.debugLineNum = 3342358;BA.debugLine="PB1.Visible = True"; -__ref._pb1 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3342359; - //BA.debugLineNum = 3342359;BA.debugLine="Resumen.Visible= False"; -__ref._resumen /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3342361; - //BA.debugLineNum = 3342361;BA.debugLine="L_P_1.Text = \"Catalogo de Clientes\""; -__ref._l_p_1 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("Catalogo de Clientes")); -RDebugUtils.currentLine=3342362; - //BA.debugLineNum = 3342362;BA.debugLine="L_P_2.Text = \"Catalogos de Productos\""; -__ref._l_p_2 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("Catalogos de Productos")); -RDebugUtils.currentLine=3342363; - //BA.debugLineNum = 3342363;BA.debugLine="L_P_3.Text = \"Catalogos Historicos\""; -__ref._l_p_3 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("Catalogos Historicos")); -RDebugUtils.currentLine=3342364; - //BA.debugLineNum = 3342364;BA.debugLine="S_CC.Text = \"EN PROCESO\""; -__ref._s_cc /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("EN PROCESO")); -RDebugUtils.currentLine=3342365; - //BA.debugLineNum = 3342365;BA.debugLine="S_CH.Text = \"EN PROCESO\""; -__ref._s_ch /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("EN PROCESO")); -RDebugUtils.currentLine=3342366; - //BA.debugLineNum = 3342366;BA.debugLine="S_CP.Text = \"EN PROCESO\""; -__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("EN PROCESO")); -RDebugUtils.currentLine=3342367; - //BA.debugLineNum = 3342367;BA.debugLine="PB1.Progress = 0"; -__ref._pb1 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (0)); -RDebugUtils.currentLine=3342368; - //BA.debugLineNum = 3342368;BA.debugLine="PB2.Progress = 0"; -__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (0)); -RDebugUtils.currentLine=3342369; - //BA.debugLineNum = 3342369;BA.debugLine="EJECUTANDO = 1"; -__ref._ejecutando /*String*/ = BA.NumberToString(1); -RDebugUtils.currentLine=3342372; - //BA.debugLineNum = 3342372;BA.debugLine="TOPE = 0"; -__ref._tope /*int*/ = (int) (0); -RDebugUtils.currentLine=3342375; - //BA.debugLineNum = 3342375;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; +public String _cargar_click() throws Exception{ + //BA.debugLineNum = 801;BA.debugLine="Sub cargar_Click"; + //BA.debugLineNum = 802;BA.debugLine="CARGA = \"CARGAR\""; +_carga = "CARGAR"; + //BA.debugLineNum = 803;BA.debugLine="p_mandaInfo.Width = Root.Width"; +_p_mandainfo.setWidth(_root.getWidth()); + //BA.debugLineNum = 804;BA.debugLine="p_mandaInfo.Height = Root.Height"; +_p_mandainfo.setHeight(_root.getHeight()); + //BA.debugLineNum = 805;BA.debugLine="P1.Left = (p_mandaInfo.Width/2) - (P1.Width/2)"; +_p1.setLeft((int) ((_p_mandainfo.getWidth()/(double)2)-(_p1.getWidth()/(double)2))); + //BA.debugLineNum = 806;BA.debugLine="P1.top = (p_mandaInfo.Height/2) - (P1.Height/2)"; +_p1.setTop((int) ((_p_mandainfo.getHeight()/(double)2)-(_p1.getHeight()/(double)2))); + //BA.debugLineNum = 807;BA.debugLine="img2.Visible =True"; +_img2.setVisible(__c.True); + //BA.debugLineNum = 808;BA.debugLine="L_P_1.Visible = True"; +_l_p_1.setVisible(__c.True); + //BA.debugLineNum = 809;BA.debugLine="S_CC.Visible = True"; +_s_cc.setVisible(__c.True); + //BA.debugLineNum = 810;BA.debugLine="Btn_Ubicar.Visible=False"; +_btn_ubicar.setVisible(__c.False); + //BA.debugLineNum = 811;BA.debugLine="P1.Visible = True"; +_p1.setVisible(__c.True); + //BA.debugLineNum = 812;BA.debugLine="p_mandaInfo.Visible = True"; +_p_mandainfo.setVisible(__c.True); + //BA.debugLineNum = 813;BA.debugLine="p_principal.Visible = False"; +_p_principal.setVisible(__c.False); + //BA.debugLineNum = 814;BA.debugLine="Subs.panelVisible(P1, 0, 0)"; +_subs._panelvisible /*String*/ (ba,_p1,(int) (0),(int) (0)); + //BA.debugLineNum = 815;BA.debugLine="Subs.centraPanel(P1, Root.Width)"; +_subs._centrapanel /*String*/ (ba,_p1,_root.getWidth()); + //BA.debugLineNum = 816;BA.debugLine="Subs.centraPanelV(P1, Root.Height)"; +_subs._centrapanelv /*String*/ (ba,_p1,_root.getHeight()); + //BA.debugLineNum = 818;BA.debugLine="NUEVO.Visible =False"; +_nuevo.setVisible(__c.False); + //BA.debugLineNum = 819;BA.debugLine="BUSCA.Visible=False"; +_busca.setVisible(__c.False); + //BA.debugLineNum = 820;BA.debugLine="connecta.Visible=False"; +_connecta.setVisible(__c.False); + //BA.debugLineNum = 821;BA.debugLine="L_P_3.Visible = True"; +_l_p_3.setVisible(__c.True); + //BA.debugLineNum = 822;BA.debugLine="S_CH.Visible = True"; +_s_ch.setVisible(__c.True); + //BA.debugLineNum = 823;BA.debugLine="PB1.Visible = True"; +_pb1.setVisible(__c.True); + //BA.debugLineNum = 824;BA.debugLine="Resumen.Visible= False"; +_resumen.setVisible(__c.False); + //BA.debugLineNum = 826;BA.debugLine="L_P_1.Text = \"Catalogo de Clientes\""; +_l_p_1.setText(BA.ObjectToCharSequence("Catalogo de Clientes")); + //BA.debugLineNum = 827;BA.debugLine="L_P_2.Text = \"Catalogos de Productos\""; +_l_p_2.setText(BA.ObjectToCharSequence("Catalogos de Productos")); + //BA.debugLineNum = 828;BA.debugLine="L_P_3.Text = \"Catalogos Historicos\""; +_l_p_3.setText(BA.ObjectToCharSequence("Catalogos Historicos")); + //BA.debugLineNum = 829;BA.debugLine="S_CC.Text = \"EN PROCESO\""; +_s_cc.setText(BA.ObjectToCharSequence("EN PROCESO")); + //BA.debugLineNum = 830;BA.debugLine="S_CH.Text = \"EN PROCESO\""; +_s_ch.setText(BA.ObjectToCharSequence("EN PROCESO")); + //BA.debugLineNum = 831;BA.debugLine="S_CP.Text = \"EN PROCESO\""; +_s_cp.setText(BA.ObjectToCharSequence("EN PROCESO")); + //BA.debugLineNum = 832;BA.debugLine="PB1.Progress = 0"; +_pb1.setProgress((int) (0)); + //BA.debugLineNum = 833;BA.debugLine="PB2.Progress = 0"; +_pb2.setProgress((int) (0)); + //BA.debugLineNum = 834;BA.debugLine="EJECUTANDO = 1"; +_ejecutando = BA.NumberToString(1); + //BA.debugLineNum = 837;BA.debugLine="TOPE = 0"; +_tope = (int) (0); + //BA.debugLineNum = 840;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from kmt_info"); -RDebugUtils.currentLine=3342376; - //BA.debugLineNum = 3342376;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + //BA.debugLineNum = 841;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from cod_result"); -RDebugUtils.currentLine=3342377; - //BA.debugLineNum = 3342377;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + //BA.debugLineNum = 842;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from hist_gest"); -RDebugUtils.currentLine=3342378; - //BA.debugLineNum = 3342378;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + //BA.debugLineNum = 843;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from cat_gunaprod"); -RDebugUtils.currentLine=3342379; - //BA.debugLineNum = 3342379;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + //BA.debugLineNum = 844;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from CAT_DETALLES_PAQ"); -RDebugUtils.currentLine=3342380; - //BA.debugLineNum = 3342380;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + //BA.debugLineNum = 845;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from telefonos"); -RDebugUtils.currentLine=3342381; - //BA.debugLineNum = 3342381;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + //BA.debugLineNum = 846;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from HIST_VENTAS"); -RDebugUtils.currentLine=3342382; - //BA.debugLineNum = 3342382;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + //BA.debugLineNum = 847;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from HIST_PROMOS"); -RDebugUtils.currentLine=3342383; - //BA.debugLineNum = 3342383;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + //BA.debugLineNum = 848;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from HIST_CLIENTE_CANT_PROMOS"); -RDebugUtils.currentLine=3342384; - //BA.debugLineNum = 3342384;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + //BA.debugLineNum = 849;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from PROMOS_COMP"); -RDebugUtils.currentLine=3342385; - //BA.debugLineNum = 3342385;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + //BA.debugLineNum = 850;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from CAT_VERIFICACION"); -RDebugUtils.currentLine=3342386; - //BA.debugLineNum = 3342386;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FROM"; + //BA.debugLineNum = 851;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FROM"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("DELETE FROM MARCAS_RUTAS"); -RDebugUtils.currentLine=3342387; - //BA.debugLineNum = 3342387;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FROM"; + //BA.debugLineNum = 852;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FROM"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("DELETE FROM HIST_STAY_STORE"); -RDebugUtils.currentLine=3342388; - //BA.debugLineNum = 3342388;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FROM"; + //BA.debugLineNum = 853;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FROM"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("DELETE FROM HIST_GEOCERCA"); -RDebugUtils.currentLine=3342389; - //BA.debugLineNum = 3342389;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FROM"; + //BA.debugLineNum = 854;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FROM"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("DELETE FROM HIST_MARCAS_CUOTAS"); -RDebugUtils.currentLine=3342390; - //BA.debugLineNum = 3342390;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FROM"; + //BA.debugLineNum = 855;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FROM"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("DELETE FROM HIST_AVANCE"); -RDebugUtils.currentLine=3342392; - //BA.debugLineNum = 3342392;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery2(\"select cou"; -__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*/ .ExecQuery2("select count(CAT_VA_DESCRIPCION) as HoraIngreso from cat_variables where CAT_VA_DESCRIPCION = ? ",new String[]{"HoraIngreso"}))); -RDebugUtils.currentLine=3342393; - //BA.debugLineNum = 3342393;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3342394; - //BA.debugLineNum = 3342394;BA.debugLine="DateTime.TimeFormat = \"HHmmss\""; + //BA.debugLineNum = 857;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery2(\"select cou"; +_c = (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*/ .ExecQuery2("select count(CAT_VA_DESCRIPCION) as HoraIngreso from cat_variables where CAT_VA_DESCRIPCION = ? ",new String[]{"HoraIngreso"}))); + //BA.debugLineNum = 858;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 859;BA.debugLine="DateTime.TimeFormat = \"HHmmss\""; __c.DateTime.setTimeFormat("HHmmss"); -RDebugUtils.currentLine=3342396; - //BA.debugLineNum = 3342396;BA.debugLine="If c.GetString(\"HoraIngreso\") > 0 Then"; -if ((double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HoraIngreso")))>0) { -RDebugUtils.currentLine=3342397; - //BA.debugLineNum = 3342397;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"Update cat"; + //BA.debugLineNum = 861;BA.debugLine="If c.GetString(\"HoraIngreso\") > 0 Then"; +if ((double)(Double.parseDouble(_c.GetString("HoraIngreso")))>0) { + //BA.debugLineNum = 862;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"Update cat"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("Update cat_variables set CAT_VA_VALOR = ? WHERE CAT_VA_DESCRIPCION = ?",anywheresoftware.b4a.keywords.Common.ArrayToList(new String[]{__c.DateTime.Time(__c.DateTime.getNow()),"HoraIngreso"})); }else { -RDebugUtils.currentLine=3342399; - //BA.debugLineNum = 3342399;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; + //BA.debugLineNum = 864;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO CAT_VARIABLES(CAT_VA_VALOR,CAT_VA_DESCRIPCION) VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new String[]{__c.DateTime.Time(__c.DateTime.getNow()),"HoraIngreso"})); }; -RDebugUtils.currentLine=3342401; - //BA.debugLineNum = 3342401;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3342402; - //BA.debugLineNum = 3342402;BA.debugLine="DateTime.TimeFormat = \"HH:mm:ss\""; + //BA.debugLineNum = 866;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 867;BA.debugLine="DateTime.TimeFormat = \"HH:mm:ss\""; __c.DateTime.setTimeFormat("HH:mm:ss"); -RDebugUtils.currentLine=3342403; - //BA.debugLineNum = 3342403;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select usuari"; -__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=3342404; - //BA.debugLineNum = 3342404;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3342405; - //BA.debugLineNum = 3342405;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -__ref._usuario /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("USUARIO"); -RDebugUtils.currentLine=3342406; - //BA.debugLineNum = 3342406;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3342408; - //BA.debugLineNum = 3342408;BA.debugLine="Dim sDate,sTime As String"; + //BA.debugLineNum = 868;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select usuari"; +_c = (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"))); + //BA.debugLineNum = 869;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 870;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; +_usuario = _c.GetString("USUARIO"); + //BA.debugLineNum = 871;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 873;BA.debugLine="Dim sDate,sTime As String"; _sdate = ""; _stime = ""; -RDebugUtils.currentLine=3342409; - //BA.debugLineNum = 3342409;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; + //BA.debugLineNum = 874;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; __c.DateTime.setDateFormat("MM/dd/yyyy"); -RDebugUtils.currentLine=3342410; - //BA.debugLineNum = 3342410;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -__ref._sdate /*String*/ = __c.DateTime.Date(__c.DateTime.getNow()); -RDebugUtils.currentLine=3342411; - //BA.debugLineNum = 3342411;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -__ref._stime /*String*/ = __c.DateTime.Time(__c.DateTime.getNow()); -RDebugUtils.currentLine=3342413; - //BA.debugLineNum = 3342413;BA.debugLine="Dim P As PhoneId"; + //BA.debugLineNum = 875;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; +_sdate = __c.DateTime.Date(__c.DateTime.getNow()); + //BA.debugLineNum = 876;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; +_stime = __c.DateTime.Time(__c.DateTime.getNow()); + //BA.debugLineNum = 878;BA.debugLine="Dim P As PhoneId"; _p = new anywheresoftware.b4a.phone.Phone.PhoneId(); -RDebugUtils.currentLine=3342415; - //BA.debugLineNum = 3342415;BA.debugLine="imei = \"yyyy\""; -__ref._imei /*String*/ = "yyyy"; -RDebugUtils.currentLine=3342416; - //BA.debugLineNum = 3342416;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3342417; - //BA.debugLineNum = 3342417;BA.debugLine="cmd.Name =\"insert_drop_MEDI_2\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "insert_drop_MEDI_2"; -RDebugUtils.currentLine=3342418; - //BA.debugLineNum = 3342418;BA.debugLine="cmd.Parameters = Array As Object(usuario,l_ruta.T"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._usuario /*String*/ ),(Object)(__ref._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(__ref._l_porvisitar /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._l_drop /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._l_efectiva /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._l_cuantosc /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._l_cuantosn /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._l_montod /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)("CARGA"),(Object)(__ref._almacen /*String*/ )}; -RDebugUtils.currentLine=3342419; - //BA.debugLineNum = 3342419;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cmd ,"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(Object)("inst_noventa")); -RDebugUtils.currentLine=3342421; - //BA.debugLineNum = 3342421;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3342422; - //BA.debugLineNum = 3342422;BA.debugLine="cmd.Name = \"select_cat_gunaprod_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_cat_gunaprod_MEDI"; -RDebugUtils.currentLine=3342423; - //BA.debugLineNum = 3342423;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._almacen /*String*/ )}; -RDebugUtils.currentLine=3342424; - //BA.debugLineNum = 3342424;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("gunaprod")); -RDebugUtils.currentLine=3342431; - //BA.debugLineNum = 3342431;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3342432; - //BA.debugLineNum = 3342432;BA.debugLine="cmd.Name = \"select_cat_paquetes_MEDI3\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_cat_paquetes_MEDI3"; -RDebugUtils.currentLine=3342433; - //BA.debugLineNum = 3342433;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._almacen /*String*/ )}; -RDebugUtils.currentLine=3342434; - //BA.debugLineNum = 3342434;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("gunaprodp")); -RDebugUtils.currentLine=3342436; - //BA.debugLineNum = 3342436;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3342437; - //BA.debugLineNum = 3342437;BA.debugLine="cmd.Name = \"select_cat_paquetess_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_cat_paquetess_MEDI"; -RDebugUtils.currentLine=3342438; - //BA.debugLineNum = 3342438;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._almacen /*String*/ )}; -RDebugUtils.currentLine=3342439; - //BA.debugLineNum = 3342439;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("gunaprodp")); -RDebugUtils.currentLine=3342441; - //BA.debugLineNum = 3342441;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3342442; - //BA.debugLineNum = 3342442;BA.debugLine="cmd.Name = \"select_cat_detallepa_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_cat_detallepa_MEDI"; -RDebugUtils.currentLine=3342443; - //BA.debugLineNum = 3342443;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._almacen /*String*/ )}; -RDebugUtils.currentLine=3342444; - //BA.debugLineNum = 3342444;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("detallepaq")); -RDebugUtils.currentLine=3342446; - //BA.debugLineNum = 3342446;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3342447; - //BA.debugLineNum = 3342447;BA.debugLine="cmd.Name = \"select_cat_clientes_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_cat_clientes_MEDI"; -RDebugUtils.currentLine=3342448; - //BA.debugLineNum = 3342448;BA.debugLine="cmd.Parameters = Array As Object(e_ruta.text, ALM"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._e_ruta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._almacen /*String*/ )}; -RDebugUtils.currentLine=3342449; - //BA.debugLineNum = 3342449;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("kmt_datos")); -RDebugUtils.currentLine=3342451; - //BA.debugLineNum = 3342451;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3342452; - //BA.debugLineNum = 3342452;BA.debugLine="cmd.Name = \"select_hist_datos_MEDI_2\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_hist_datos_MEDI_2"; -RDebugUtils.currentLine=3342453; - //BA.debugLineNum = 3342453;BA.debugLine="cmd.Parameters = Array As Object(e_ruta.text, ALM"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._e_ruta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._almacen /*String*/ ),(Object)(__ref._e_ruta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._almacen /*String*/ )}; -RDebugUtils.currentLine=3342454; - //BA.debugLineNum = 3342454;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("hist_datos")); -RDebugUtils.currentLine=3342456; - //BA.debugLineNum = 3342456;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3342457; - //BA.debugLineNum = 3342457;BA.debugLine="cmd.Name = \"select_hist_promos_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_hist_promos_MEDI"; -RDebugUtils.currentLine=3342458; - //BA.debugLineNum = 3342458;BA.debugLine="cmd.Parameters = Array As Object(e_ruta.text, ALM"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._e_ruta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._almacen /*String*/ )}; -RDebugUtils.currentLine=3342459; - //BA.debugLineNum = 3342459;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("hist_promos")); -RDebugUtils.currentLine=3342461; - //BA.debugLineNum = 3342461;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3342462; - //BA.debugLineNum = 3342462;BA.debugLine="cmd.Name = \"select_hist_cliente_promos_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_hist_cliente_promos_MEDI"; -RDebugUtils.currentLine=3342463; - //BA.debugLineNum = 3342463;BA.debugLine="cmd.Parameters = Array As Object(e_ruta.text, ALM"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._e_ruta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._almacen /*String*/ )}; -RDebugUtils.currentLine=3342464; - //BA.debugLineNum = 3342464;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("hist_cliente_promos")); -RDebugUtils.currentLine=3342471; - //BA.debugLineNum = 3342471;BA.debugLine="If E_RUTA2.text <> \"\" Then"; -if ((__ref._e_ruta2 /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()).equals("") == false) { -RDebugUtils.currentLine=3342472; - //BA.debugLineNum = 3342472;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3342473; - //BA.debugLineNum = 3342473;BA.debugLine="cmd.Name = \"select_cat_clientes_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_cat_clientes_MEDI"; -RDebugUtils.currentLine=3342474; - //BA.debugLineNum = 3342474;BA.debugLine="cmd.Parameters = Array As Object(E_RUTA2.text, A"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._e_ruta2 /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._almacen /*String*/ )}; -RDebugUtils.currentLine=3342475; - //BA.debugLineNum = 3342475;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd ,"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("kmt_datos")); -RDebugUtils.currentLine=3342477; - //BA.debugLineNum = 3342477;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3342478; - //BA.debugLineNum = 3342478;BA.debugLine="cmd.Name = \"select_hist_datos_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_hist_datos_MEDI"; -RDebugUtils.currentLine=3342479; - //BA.debugLineNum = 3342479;BA.debugLine="cmd.Parameters = Array As Object(E_RUTA2.text, A"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._e_ruta2 /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._almacen /*String*/ )}; -RDebugUtils.currentLine=3342480; - //BA.debugLineNum = 3342480;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd ,"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("hist_datos")); -RDebugUtils.currentLine=3342482; - //BA.debugLineNum = 3342482;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3342483; - //BA.debugLineNum = 3342483;BA.debugLine="cmd.Name = \"select_hist_promos_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_hist_promos_MEDI"; -RDebugUtils.currentLine=3342484; - //BA.debugLineNum = 3342484;BA.debugLine="cmd.Parameters = Array As Object(E_RUTA2.text, A"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._e_ruta2 /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._almacen /*String*/ )}; -RDebugUtils.currentLine=3342485; - //BA.debugLineNum = 3342485;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd ,"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("hist_promos")); -RDebugUtils.currentLine=3342487; - //BA.debugLineNum = 3342487;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3342488; - //BA.debugLineNum = 3342488;BA.debugLine="cmd.Name = \"select_hist_cliente_promos_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_hist_cliente_promos_MEDI"; -RDebugUtils.currentLine=3342489; - //BA.debugLineNum = 3342489;BA.debugLine="cmd.Parameters = Array As Object(E_RUTA2.text, A"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._e_ruta2 /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._almacen /*String*/ )}; -RDebugUtils.currentLine=3342490; - //BA.debugLineNum = 3342490;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd ,"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("hist_cliente_promos")); + //BA.debugLineNum = 880;BA.debugLine="imei = \"yyyy\""; +_imei = "yyyy"; + //BA.debugLineNum = 881;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 882;BA.debugLine="cmd.Name =\"insert_drop_MEDI_2\""; +_cmd.Name /*String*/ = "insert_drop_MEDI_2"; + //BA.debugLineNum = 883;BA.debugLine="cmd.Parameters = Array As Object(usuario,l_ruta.T"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_usuario),(Object)(_l_ruta.getText()),(Object)(_sdate+_stime),(Object)(_l_porvisitar.getText()),(Object)(_l_drop.getText()),(Object)(_l_efectiva.getText()),(Object)(_l_cuantosc.getText()),(Object)(_l_cuantosn.getText()),(Object)(_l_montod.getText()),(Object)("CARGA"),(Object)(_almacen)}; + //BA.debugLineNum = 884;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cmd ,"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (_cmd,(Object)("inst_noventa")); + //BA.debugLineNum = 886;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 887;BA.debugLine="cmd.Name = \"select_cat_gunaprod_MEDI\""; +_cmd.Name /*String*/ = "select_cat_gunaprod_MEDI"; + //BA.debugLineNum = 888;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_almacen)}; + //BA.debugLineNum = 889;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("gunaprod")); + //BA.debugLineNum = 896;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 897;BA.debugLine="cmd.Name = \"select_cat_paquetes_MEDI3\""; +_cmd.Name /*String*/ = "select_cat_paquetes_MEDI3"; + //BA.debugLineNum = 898;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_almacen)}; + //BA.debugLineNum = 899;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("gunaprodp")); + //BA.debugLineNum = 901;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 902;BA.debugLine="cmd.Name = \"select_cat_paquetess_MEDI\""; +_cmd.Name /*String*/ = "select_cat_paquetess_MEDI"; + //BA.debugLineNum = 903;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_almacen)}; + //BA.debugLineNum = 904;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("gunaprodp")); + //BA.debugLineNum = 906;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 907;BA.debugLine="cmd.Name = \"select_cat_detallepa_MEDI\""; +_cmd.Name /*String*/ = "select_cat_detallepa_MEDI"; + //BA.debugLineNum = 908;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_almacen)}; + //BA.debugLineNum = 909;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("detallepaq")); + //BA.debugLineNum = 911;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 912;BA.debugLine="cmd.Name = \"select_cat_clientes_MEDI\""; +_cmd.Name /*String*/ = "select_cat_clientes_MEDI"; + //BA.debugLineNum = 913;BA.debugLine="cmd.Parameters = Array As Object(e_ruta.text, ALM"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_e_ruta.getText()),(Object)(_almacen)}; + //BA.debugLineNum = 914;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("kmt_datos")); + //BA.debugLineNum = 916;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 917;BA.debugLine="cmd.Name = \"select_hist_datos_MEDI_2\""; +_cmd.Name /*String*/ = "select_hist_datos_MEDI_2"; + //BA.debugLineNum = 918;BA.debugLine="cmd.Parameters = Array As Object(e_ruta.text, ALM"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_e_ruta.getText()),(Object)(_almacen),(Object)(_e_ruta.getText()),(Object)(_almacen)}; + //BA.debugLineNum = 919;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("hist_datos")); + //BA.debugLineNum = 921;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 922;BA.debugLine="cmd.Name = \"select_hist_promos_MEDI\""; +_cmd.Name /*String*/ = "select_hist_promos_MEDI"; + //BA.debugLineNum = 923;BA.debugLine="cmd.Parameters = Array As Object(e_ruta.text, ALM"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_e_ruta.getText()),(Object)(_almacen)}; + //BA.debugLineNum = 924;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("hist_promos")); + //BA.debugLineNum = 926;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 927;BA.debugLine="cmd.Name = \"select_hist_cliente_promos_MEDI\""; +_cmd.Name /*String*/ = "select_hist_cliente_promos_MEDI"; + //BA.debugLineNum = 928;BA.debugLine="cmd.Parameters = Array As Object(e_ruta.text, ALM"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_e_ruta.getText()),(Object)(_almacen)}; + //BA.debugLineNum = 929;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("hist_cliente_promos")); + //BA.debugLineNum = 936;BA.debugLine="If E_RUTA2.text <> \"\" Then"; +if ((_e_ruta2.getText()).equals("") == false) { + //BA.debugLineNum = 937;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 938;BA.debugLine="cmd.Name = \"select_cat_clientes_MEDI\""; +_cmd.Name /*String*/ = "select_cat_clientes_MEDI"; + //BA.debugLineNum = 939;BA.debugLine="cmd.Parameters = Array As Object(E_RUTA2.text, A"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_e_ruta2.getText()),(Object)(_almacen)}; + //BA.debugLineNum = 940;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd ,"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("kmt_datos")); + //BA.debugLineNum = 942;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 943;BA.debugLine="cmd.Name = \"select_hist_datos_MEDI\""; +_cmd.Name /*String*/ = "select_hist_datos_MEDI"; + //BA.debugLineNum = 944;BA.debugLine="cmd.Parameters = Array As Object(E_RUTA2.text, A"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_e_ruta2.getText()),(Object)(_almacen)}; + //BA.debugLineNum = 945;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd ,"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("hist_datos")); + //BA.debugLineNum = 947;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 948;BA.debugLine="cmd.Name = \"select_hist_promos_MEDI\""; +_cmd.Name /*String*/ = "select_hist_promos_MEDI"; + //BA.debugLineNum = 949;BA.debugLine="cmd.Parameters = Array As Object(E_RUTA2.text, A"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_e_ruta2.getText()),(Object)(_almacen)}; + //BA.debugLineNum = 950;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd ,"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("hist_promos")); + //BA.debugLineNum = 952;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 953;BA.debugLine="cmd.Name = \"select_hist_cliente_promos_MEDI\""; +_cmd.Name /*String*/ = "select_hist_cliente_promos_MEDI"; + //BA.debugLineNum = 954;BA.debugLine="cmd.Parameters = Array As Object(E_RUTA2.text, A"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_e_ruta2.getText()),(Object)(_almacen)}; + //BA.debugLineNum = 955;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd ,"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("hist_cliente_promos")); }; -RDebugUtils.currentLine=3342493; - //BA.debugLineNum = 3342493;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3342494; - //BA.debugLineNum = 3342494;BA.debugLine="cmd.Name = \"select_promo_comp_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_promo_comp_MEDI"; -RDebugUtils.currentLine=3342495; - //BA.debugLineNum = 3342495;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._almacen /*String*/ )}; -RDebugUtils.currentLine=3342496; - //BA.debugLineNum = 3342496;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("hist_comp_promos")); -RDebugUtils.currentLine=3342503; - //BA.debugLineNum = 3342503;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3342504; - //BA.debugLineNum = 3342504;BA.debugLine="cmd.Name = \"select_fecha\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_fecha"; -RDebugUtils.currentLine=3342505; - //BA.debugLineNum = 3342505;BA.debugLine="cmd.Parameters = Array As Object(e_ruta.text, ALM"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._e_ruta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._almacen /*String*/ )}; -RDebugUtils.currentLine=3342506; - //BA.debugLineNum = 3342506;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("fecha")); -RDebugUtils.currentLine=3342508; - //BA.debugLineNum = 3342508;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3342509; - //BA.debugLineNum = 3342509;BA.debugLine="cmd.Name = \"select_folio_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_folio_MEDI"; -RDebugUtils.currentLine=3342510; - //BA.debugLineNum = 3342510;BA.debugLine="cmd.Parameters = Array As Object(e_ruta.text, ALM"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._e_ruta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()),(Object)(__ref._almacen /*String*/ )}; -RDebugUtils.currentLine=3342511; - //BA.debugLineNum = 3342511;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("folio")); -RDebugUtils.currentLine=3342513; - //BA.debugLineNum = 3342513;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3342514; - //BA.debugLineNum = 3342514;BA.debugLine="cmd.Name = \"select_marcas_rutas_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_marcas_rutas_MEDI"; -RDebugUtils.currentLine=3342515; - //BA.debugLineNum = 3342515;BA.debugLine="cmd.Parameters = Array As Object( ALMACEN, e_ruta"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._almacen /*String*/ ),(Object)(__ref._e_ruta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText())}; -RDebugUtils.currentLine=3342516; - //BA.debugLineNum = 3342516;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("marcas_rutas")); -RDebugUtils.currentLine=3342539; - //BA.debugLineNum = 3342539;BA.debugLine="cargar.Visible = False"; -__ref._cargar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3342540; - //BA.debugLineNum = 3342540;BA.debugLine="Subir.Visible = False"; -__ref._subir /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3342541; - //BA.debugLineNum = 3342541;BA.debugLine="inv.Visible = False"; -__ref._inv /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3342542; - //BA.debugLineNum = 3342542;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessageSh"; + //BA.debugLineNum = 958;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 959;BA.debugLine="cmd.Name = \"select_promo_comp_MEDI\""; +_cmd.Name /*String*/ = "select_promo_comp_MEDI"; + //BA.debugLineNum = 960;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_almacen)}; + //BA.debugLineNum = 961;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("hist_comp_promos")); + //BA.debugLineNum = 968;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 969;BA.debugLine="cmd.Name = \"select_fecha\""; +_cmd.Name /*String*/ = "select_fecha"; + //BA.debugLineNum = 970;BA.debugLine="cmd.Parameters = Array As Object(e_ruta.text, ALM"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_e_ruta.getText()),(Object)(_almacen)}; + //BA.debugLineNum = 971;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("fecha")); + //BA.debugLineNum = 973;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 974;BA.debugLine="cmd.Name = \"select_folio_MEDI\""; +_cmd.Name /*String*/ = "select_folio_MEDI"; + //BA.debugLineNum = 975;BA.debugLine="cmd.Parameters = Array As Object(e_ruta.text, ALM"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_e_ruta.getText()),(Object)(_almacen)}; + //BA.debugLineNum = 976;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("folio")); + //BA.debugLineNum = 978;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 979;BA.debugLine="cmd.Name = \"select_marcas_rutas_MEDI\""; +_cmd.Name /*String*/ = "select_marcas_rutas_MEDI"; + //BA.debugLineNum = 980;BA.debugLine="cmd.Parameters = Array As Object( ALMACEN, e_ruta"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_almacen),(Object)(_e_ruta.getText())}; + //BA.debugLineNum = 981;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("marcas_rutas")); + //BA.debugLineNum = 1004;BA.debugLine="cargar.Visible = False"; +_cargar.setVisible(__c.False); + //BA.debugLineNum = 1005;BA.debugLine="Subir.Visible = False"; +_subir.setVisible(__c.False); + //BA.debugLineNum = 1006;BA.debugLine="inv.Visible = False"; +_inv.setVisible(__c.False); + //BA.debugLineNum = 1007;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessageSh"; if ((_starter._marcacel /*String*/ ).equals("Sony") == false) { __c.ToastMessageShow(BA.ObjectToCharSequence("Se Actualizaran los datos, Este proceso podria tardar hasta un minuto, gracias"),__c.True);}; -RDebugUtils.currentLine=3342543; - //BA.debugLineNum = 3342543;BA.debugLine="End Sub"; + //BA.debugLineNum = 1008;BA.debugLine="End Sub"; return ""; } -public String _class_globals(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -RDebugUtils.currentLine=3014656; - //BA.debugLineNum = 3014656;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=3014657; - //BA.debugLineNum = 3014657;BA.debugLine="Public rp As RuntimePermissions"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Public rp As RuntimePermissions"; _rp = new anywheresoftware.b4a.objects.RuntimePermissions(); -RDebugUtils.currentLine=3014658; - //BA.debugLineNum = 3014658;BA.debugLine="Private Root As B4XView 'ignore"; + //BA.debugLineNum = 3;BA.debugLine="Private Root As B4XView 'ignore"; _root = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=3014659; - //BA.debugLineNum = 3014659;BA.debugLine="Private xui As XUI 'ignore"; + //BA.debugLineNum = 4;BA.debugLine="Private xui As XUI 'ignore"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=3014660; - //BA.debugLineNum = 3014660;BA.debugLine="Dim reqManager As DBRequestManager"; + //BA.debugLineNum = 5;BA.debugLine="Dim reqManager As DBRequestManager"; _reqmanager = new keymon.lat.medicomed.dbrequestmanager(); -RDebugUtils.currentLine=3014661; - //BA.debugLineNum = 3014661;BA.debugLine="Dim conectado As String"; + //BA.debugLineNum = 6;BA.debugLine="Dim conectado As String"; _conectado = ""; -RDebugUtils.currentLine=3014662; - //BA.debugLineNum = 3014662;BA.debugLine="Dim t1 As Timer"; + //BA.debugLineNum = 7;BA.debugLine="Dim t1 As Timer"; _t1 = new anywheresoftware.b4a.objects.Timer(); -RDebugUtils.currentLine=3014663; - //BA.debugLineNum = 3014663;BA.debugLine="Dim sb As StringBuilder"; + //BA.debugLineNum = 8;BA.debugLine="Dim sb As StringBuilder"; _sb = new anywheresoftware.b4a.keywords.StringBuilderWrapper(); -RDebugUtils.currentLine=3014664; - //BA.debugLineNum = 3014664;BA.debugLine="Dim PHONE As Phone"; + //BA.debugLineNum = 9;BA.debugLine="Dim PHONE As Phone"; _phone = new anywheresoftware.b4a.phone.Phone(); -RDebugUtils.currentLine=3014665; - //BA.debugLineNum = 3014665;BA.debugLine="Dim g As GPS"; + //BA.debugLineNum = 10;BA.debugLine="Dim g As GPS"; _g = new anywheresoftware.b4a.gps.GPS(); -RDebugUtils.currentLine=3014666; - //BA.debugLineNum = 3014666;BA.debugLine="Dim trabajar As Button"; + //BA.debugLineNum = 11;BA.debugLine="Dim trabajar As Button"; _trabajar = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=3014668; - //BA.debugLineNum = 3014668;BA.debugLine="Dim c As Cursor"; + //BA.debugLineNum = 13;BA.debugLine="Dim c As Cursor"; _c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=3014669; - //BA.debugLineNum = 3014669;BA.debugLine="Dim d As Cursor"; + //BA.debugLineNum = 14;BA.debugLine="Dim d As Cursor"; _d = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=3014670; - //BA.debugLineNum = 3014670;BA.debugLine="Dim b As Cursor"; + //BA.debugLineNum = 15;BA.debugLine="Dim b As Cursor"; _b = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=3014671; - //BA.debugLineNum = 3014671;BA.debugLine="Dim e As Cursor"; + //BA.debugLineNum = 16;BA.debugLine="Dim e As Cursor"; _e = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=3014672; - //BA.debugLineNum = 3014672;BA.debugLine="Dim f As Cursor"; + //BA.debugLineNum = 17;BA.debugLine="Dim f As Cursor"; _f = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=3014673; - //BA.debugLineNum = 3014673;BA.debugLine="Dim D2 As Cursor"; + //BA.debugLineNum = 18;BA.debugLine="Dim D2 As Cursor"; _d2 = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=3014674; - //BA.debugLineNum = 3014674;BA.debugLine="Dim dd As Cursor"; + //BA.debugLineNum = 19;BA.debugLine="Dim dd As Cursor"; _dd = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=3014675; - //BA.debugLineNum = 3014675;BA.debugLine="Dim lv As ListView"; + //BA.debugLineNum = 20;BA.debugLine="Dim lv As ListView"; _lv = new anywheresoftware.b4a.objects.ListViewWrapper(); -RDebugUtils.currentLine=3014676; - //BA.debugLineNum = 3014676;BA.debugLine="Dim cargar As Button"; + //BA.debugLineNum = 21;BA.debugLine="Dim cargar As Button"; _cargar = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=3014677; - //BA.debugLineNum = 3014677;BA.debugLine="Dim pendiente As Button"; + //BA.debugLineNum = 22;BA.debugLine="Dim pendiente As Button"; _pendiente = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=3014678; - //BA.debugLineNum = 3014678;BA.debugLine="Dim foto1() As Byte"; + //BA.debugLineNum = 23;BA.debugLine="Dim foto1() As Byte"; _foto1 = new byte[(int) (0)]; ; -RDebugUtils.currentLine=3014679; - //BA.debugLineNum = 3014679;BA.debugLine="Dim usuario As String"; + //BA.debugLineNum = 24;BA.debugLine="Dim usuario As String"; _usuario = ""; -RDebugUtils.currentLine=3014680; - //BA.debugLineNum = 3014680;BA.debugLine="Dim connecta As Button"; + //BA.debugLineNum = 25;BA.debugLine="Dim connecta As Button"; _connecta = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=3014681; - //BA.debugLineNum = 3014681;BA.debugLine="Dim conn As String"; + //BA.debugLineNum = 26;BA.debugLine="Dim conn As String"; _conn = ""; -RDebugUtils.currentLine=3014682; - //BA.debugLineNum = 3014682;BA.debugLine="Dim Subir As Button"; + //BA.debugLineNum = 27;BA.debugLine="Dim Subir As Button"; _subir = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=3014683; - //BA.debugLineNum = 3014683;BA.debugLine="Dim cmd As DBCommand"; + //BA.debugLineNum = 28;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=3014684; - //BA.debugLineNum = 3014684;BA.debugLine="Dim TOPE As Int"; + //BA.debugLineNum = 29;BA.debugLine="Dim TOPE As Int"; _tope = 0; -RDebugUtils.currentLine=3014685; - //BA.debugLineNum = 3014685;BA.debugLine="Dim COUNT_CLIE As Int"; + //BA.debugLineNum = 30;BA.debugLine="Dim COUNT_CLIE As Int"; _count_clie = 0; -RDebugUtils.currentLine=3014686; - //BA.debugLineNum = 3014686;BA.debugLine="Dim fecha As String"; + //BA.debugLineNum = 31;BA.debugLine="Dim fecha As String"; _fecha = ""; -RDebugUtils.currentLine=3014687; - //BA.debugLineNum = 3014687;BA.debugLine="Dim drop As Double"; + //BA.debugLineNum = 32;BA.debugLine="Dim drop As Double"; _drop = 0; -RDebugUtils.currentLine=3014688; - //BA.debugLineNum = 3014688;BA.debugLine="Dim efectiva As Double"; + //BA.debugLineNum = 33;BA.debugLine="Dim efectiva As Double"; _efectiva = 0; -RDebugUtils.currentLine=3014689; - //BA.debugLineNum = 3014689;BA.debugLine="Dim L_MONTOD As Label"; + //BA.debugLineNum = 34;BA.debugLine="Dim L_MONTOD As Label"; _l_montod = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014690; - //BA.debugLineNum = 3014690;BA.debugLine="Dim l_cuantosc As Label"; + //BA.debugLineNum = 35;BA.debugLine="Dim l_cuantosc As Label"; _l_cuantosc = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014691; - //BA.debugLineNum = 3014691;BA.debugLine="Dim l_drop As Label"; + //BA.debugLineNum = 36;BA.debugLine="Dim l_drop As Label"; _l_drop = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014692; - //BA.debugLineNum = 3014692;BA.debugLine="Dim l_efectiva As Label"; + //BA.debugLineNum = 37;BA.debugLine="Dim l_efectiva As Label"; _l_efectiva = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014693; - //BA.debugLineNum = 3014693;BA.debugLine="Dim l_ctast As Label"; + //BA.debugLineNum = 38;BA.debugLine="Dim l_ctast As Label"; _l_ctast = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014694; - //BA.debugLineNum = 3014694;BA.debugLine="Dim BUSCA As Button"; + //BA.debugLineNum = 39;BA.debugLine="Dim BUSCA As Button"; _busca = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=3014695; - //BA.debugLineNum = 3014695;BA.debugLine="Dim Cuantos As String"; + //BA.debugLineNum = 40;BA.debugLine="Dim Cuantos As String"; _cuantos = ""; -RDebugUtils.currentLine=3014696; - //BA.debugLineNum = 3014696;BA.debugLine="Dim l_cuantosn As Label"; + //BA.debugLineNum = 41;BA.debugLine="Dim l_cuantosn As Label"; _l_cuantosn = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014697; - //BA.debugLineNum = 3014697;BA.debugLine="Dim e_ruta As EditText"; + //BA.debugLineNum = 42;BA.debugLine="Dim e_ruta As EditText"; _e_ruta = new anywheresoftware.b4a.objects.EditTextWrapper(); -RDebugUtils.currentLine=3014698; - //BA.debugLineNum = 3014698;BA.debugLine="Dim l_porvisitar As Label"; + //BA.debugLineNum = 43;BA.debugLine="Dim l_porvisitar As Label"; _l_porvisitar = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014699; - //BA.debugLineNum = 3014699;BA.debugLine="Dim b_mapa As Button"; + //BA.debugLineNum = 44;BA.debugLine="Dim b_mapa As Button"; _b_mapa = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=3014700; - //BA.debugLineNum = 3014700;BA.debugLine="Dim l_ruta As Label"; + //BA.debugLineNum = 45;BA.debugLine="Dim l_ruta As Label"; _l_ruta = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014701; - //BA.debugLineNum = 3014701;BA.debugLine="Dim ALMACEN As String"; + //BA.debugLineNum = 46;BA.debugLine="Dim ALMACEN As String"; _almacen = ""; -RDebugUtils.currentLine=3014702; - //BA.debugLineNum = 3014702;BA.debugLine="Private img2 As ImageView"; + //BA.debugLineNum = 47;BA.debugLine="Private img2 As ImageView"; _img2 = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=3014703; - //BA.debugLineNum = 3014703;BA.debugLine="Dim Listo1 As String"; + //BA.debugLineNum = 48;BA.debugLine="Dim Listo1 As String"; _listo1 = ""; -RDebugUtils.currentLine=3014704; - //BA.debugLineNum = 3014704;BA.debugLine="Dim Listo2 As String"; + //BA.debugLineNum = 49;BA.debugLine="Dim Listo2 As String"; _listo2 = ""; -RDebugUtils.currentLine=3014705; - //BA.debugLineNum = 3014705;BA.debugLine="Dim Listo3 As String"; + //BA.debugLineNum = 50;BA.debugLine="Dim Listo3 As String"; _listo3 = ""; -RDebugUtils.currentLine=3014706; - //BA.debugLineNum = 3014706;BA.debugLine="Dim Listo4 As String"; + //BA.debugLineNum = 51;BA.debugLine="Dim Listo4 As String"; _listo4 = ""; -RDebugUtils.currentLine=3014707; - //BA.debugLineNum = 3014707;BA.debugLine="Dim Listo5 As String"; + //BA.debugLineNum = 52;BA.debugLine="Dim Listo5 As String"; _listo5 = ""; -RDebugUtils.currentLine=3014708; - //BA.debugLineNum = 3014708;BA.debugLine="Dim EJECUTANDO As String"; + //BA.debugLineNum = 53;BA.debugLine="Dim EJECUTANDO As String"; _ejecutando = ""; -RDebugUtils.currentLine=3014709; - //BA.debugLineNum = 3014709;BA.debugLine="Dim RES As String"; + //BA.debugLineNum = 54;BA.debugLine="Dim RES As String"; _res = ""; -RDebugUtils.currentLine=3014710; - //BA.debugLineNum = 3014710;BA.debugLine="Dim inve As String"; + //BA.debugLineNum = 55;BA.debugLine="Dim inve As String"; _inve = ""; -RDebugUtils.currentLine=3014711; - //BA.debugLineNum = 3014711;BA.debugLine="Dim cuantos_pedidosc As String"; + //BA.debugLineNum = 56;BA.debugLine="Dim cuantos_pedidosc As String"; _cuantos_pedidosc = ""; -RDebugUtils.currentLine=3014712; - //BA.debugLineNum = 3014712;BA.debugLine="Dim cuantos_pedido As String"; + //BA.debugLineNum = 57;BA.debugLine="Dim cuantos_pedido As String"; _cuantos_pedido = ""; -RDebugUtils.currentLine=3014713; - //BA.debugLineNum = 3014713;BA.debugLine="Dim cuantos_noventa As String"; + //BA.debugLineNum = 58;BA.debugLine="Dim cuantos_noventa As String"; _cuantos_noventa = ""; -RDebugUtils.currentLine=3014714; - //BA.debugLineNum = 3014714;BA.debugLine="Dim datos_iguales As String"; + //BA.debugLineNum = 59;BA.debugLine="Dim datos_iguales As String"; _datos_iguales = ""; -RDebugUtils.currentLine=3014715; - //BA.debugLineNum = 3014715;BA.debugLine="Dim p As PhoneId"; + //BA.debugLineNum = 60;BA.debugLine="Dim p As PhoneId"; _p = new anywheresoftware.b4a.phone.Phone.PhoneId(); -RDebugUtils.currentLine=3014716; - //BA.debugLineNum = 3014716;BA.debugLine="Dim imei As String"; + //BA.debugLineNum = 61;BA.debugLine="Dim imei As String"; _imei = ""; -RDebugUtils.currentLine=3014719; - //BA.debugLineNum = 3014719;BA.debugLine="Private inv As Button"; + //BA.debugLineNum = 64;BA.debugLine="Private inv As Button"; _inv = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=3014720; - //BA.debugLineNum = 3014720;BA.debugLine="Private P1 As Panel"; + //BA.debugLineNum = 65;BA.debugLine="Private P1 As Panel"; _p1 = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=3014721; - //BA.debugLineNum = 3014721;BA.debugLine="Private CLAVE As EditText"; + //BA.debugLineNum = 66;BA.debugLine="Private CLAVE As EditText"; _clave = new anywheresoftware.b4a.objects.EditTextWrapper(); -RDebugUtils.currentLine=3014722; - //BA.debugLineNum = 3014722;BA.debugLine="Private B_OK_PAS As Button"; + //BA.debugLineNum = 67;BA.debugLine="Private B_OK_PAS As Button"; _b_ok_pas = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=3014723; - //BA.debugLineNum = 3014723;BA.debugLine="Dim PASO As String"; + //BA.debugLineNum = 68;BA.debugLine="Dim PASO As String"; _paso = ""; -RDebugUtils.currentLine=3014724; - //BA.debugLineNum = 3014724;BA.debugLine="Private USUARIO1 As EditText"; + //BA.debugLineNum = 69;BA.debugLine="Private USUARIO1 As EditText"; _usuario1 = new anywheresoftware.b4a.objects.EditTextWrapper(); -RDebugUtils.currentLine=3014725; - //BA.debugLineNum = 3014725;BA.debugLine="Dim connecta1 As Double"; + //BA.debugLineNum = 70;BA.debugLine="Dim connecta1 As Double"; _connecta1 = 0; -RDebugUtils.currentLine=3014726; - //BA.debugLineNum = 3014726;BA.debugLine="Dim armafolio As String"; + //BA.debugLineNum = 71;BA.debugLine="Dim armafolio As String"; _armafolio = ""; -RDebugUtils.currentLine=3014727; - //BA.debugLineNum = 3014727;BA.debugLine="Private NUEVO As Button"; + //BA.debugLineNum = 72;BA.debugLine="Private NUEVO As Button"; _nuevo = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=3014728; - //BA.debugLineNum = 3014728;BA.debugLine="Private S_CC As Label"; + //BA.debugLineNum = 73;BA.debugLine="Private S_CC As Label"; _s_cc = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014729; - //BA.debugLineNum = 3014729;BA.debugLine="Private S_CP As Label"; + //BA.debugLineNum = 74;BA.debugLine="Private S_CP As Label"; _s_cp = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014730; - //BA.debugLineNum = 3014730;BA.debugLine="Private S_CH As Label"; + //BA.debugLineNum = 75;BA.debugLine="Private S_CH As Label"; _s_ch = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014731; - //BA.debugLineNum = 3014731;BA.debugLine="Private PB2 As ProgressBar"; + //BA.debugLineNum = 76;BA.debugLine="Private PB2 As ProgressBar"; _pb2 = new anywheresoftware.b4a.objects.ProgressBarWrapper(); -RDebugUtils.currentLine=3014732; - //BA.debugLineNum = 3014732;BA.debugLine="Private PB1 As ProgressBar"; + //BA.debugLineNum = 77;BA.debugLine="Private PB1 As ProgressBar"; _pb1 = new anywheresoftware.b4a.objects.ProgressBarWrapper(); -RDebugUtils.currentLine=3014733; - //BA.debugLineNum = 3014733;BA.debugLine="Private L_P_1 As Label"; + //BA.debugLineNum = 78;BA.debugLine="Private L_P_1 As Label"; _l_p_1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014734; - //BA.debugLineNum = 3014734;BA.debugLine="Private L_P_2 As Label"; + //BA.debugLineNum = 79;BA.debugLine="Private L_P_2 As Label"; _l_p_2 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014735; - //BA.debugLineNum = 3014735;BA.debugLine="Private L_P_3 As Label"; + //BA.debugLineNum = 80;BA.debugLine="Private L_P_3 As Label"; _l_p_3 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014736; - //BA.debugLineNum = 3014736;BA.debugLine="Private CARGA As String"; + //BA.debugLineNum = 81;BA.debugLine="Private CARGA As String"; _carga = ""; -RDebugUtils.currentLine=3014737; - //BA.debugLineNum = 3014737;BA.debugLine="Private PORCENTAJE As String"; + //BA.debugLineNum = 82;BA.debugLine="Private PORCENTAJE As String"; _porcentaje = ""; -RDebugUtils.currentLine=3014738; - //BA.debugLineNum = 3014738;BA.debugLine="Private P_RESUMEN As Panel"; + //BA.debugLineNum = 83;BA.debugLine="Private P_RESUMEN As Panel"; _p_resumen = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=3014739; - //BA.debugLineNum = 3014739;BA.debugLine="Private B_OK_RES As Button"; + //BA.debugLineNum = 84;BA.debugLine="Private B_OK_RES As Button"; _b_ok_res = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=3014740; - //BA.debugLineNum = 3014740;BA.debugLine="Private Resumen As Button"; + //BA.debugLineNum = 85;BA.debugLine="Private Resumen As Button"; _resumen = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=3014741; - //BA.debugLineNum = 3014741;BA.debugLine="Private L_CUANTOST As Label"; + //BA.debugLineNum = 86;BA.debugLine="Private L_CUANTOST As Label"; _l_cuantost = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014742; - //BA.debugLineNum = 3014742;BA.debugLine="Private img3 As ImageView"; + //BA.debugLineNum = 87;BA.debugLine="Private img3 As ImageView"; _img3 = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=3014744; - //BA.debugLineNum = 3014744;BA.debugLine="Private ImageView3 As ImageView"; + //BA.debugLineNum = 89;BA.debugLine="Private ImageView3 As ImageView"; _imageview3 = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=3014745; - //BA.debugLineNum = 3014745;BA.debugLine="Private ImageView5 As ImageView"; + //BA.debugLineNum = 90;BA.debugLine="Private ImageView5 As ImageView"; _imageview5 = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=3014746; - //BA.debugLineNum = 3014746;BA.debugLine="Private L_TICKPROM As Label"; + //BA.debugLineNum = 91;BA.debugLine="Private L_TICKPROM As Label"; _l_tickprom = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014747; - //BA.debugLineNum = 3014747;BA.debugLine="Private L_MARCAS As ListView"; + //BA.debugLineNum = 92;BA.debugLine="Private L_MARCAS As ListView"; _l_marcas = new anywheresoftware.b4a.objects.ListViewWrapper(); -RDebugUtils.currentLine=3014748; - //BA.debugLineNum = 3014748;BA.debugLine="Private ImageView9 As ImageView"; + //BA.debugLineNum = 93;BA.debugLine="Private ImageView9 As ImageView"; _imageview9 = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=3014749; - //BA.debugLineNum = 3014749;BA.debugLine="Private E_RUTA2 As EditText"; + //BA.debugLineNum = 94;BA.debugLine="Private E_RUTA2 As EditText"; _e_ruta2 = new anywheresoftware.b4a.objects.EditTextWrapper(); -RDebugUtils.currentLine=3014750; - //BA.debugLineNum = 3014750;BA.debugLine="Private resdia As ImageView"; + //BA.debugLineNum = 95;BA.debugLine="Private resdia As ImageView"; _resdia = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=3014751; - //BA.debugLineNum = 3014751;BA.debugLine="Private hacer_ped As ImageView"; + //BA.debugLineNum = 96;BA.debugLine="Private hacer_ped As ImageView"; _hacer_ped = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=3014752; - //BA.debugLineNum = 3014752;BA.debugLine="Private nvo_cliente As ImageView"; + //BA.debugLineNum = 97;BA.debugLine="Private nvo_cliente As ImageView"; _nvo_cliente = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=3014753; - //BA.debugLineNum = 3014753;BA.debugLine="Private tickets_dia As ImageView"; + //BA.debugLineNum = 98;BA.debugLine="Private tickets_dia As ImageView"; _tickets_dia = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=3014755; - //BA.debugLineNum = 3014755;BA.debugLine="Private l_monto_ks As Label"; + //BA.debugLineNum = 100;BA.debugLine="Private l_monto_ks As Label"; _l_monto_ks = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014756; - //BA.debugLineNum = 3014756;BA.debugLine="Private l_monto_kp As Label"; + //BA.debugLineNum = 101;BA.debugLine="Private l_monto_kp As Label"; _l_monto_kp = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014757; - //BA.debugLineNum = 3014757;BA.debugLine="Private l_monto_k As Label"; + //BA.debugLineNum = 102;BA.debugLine="Private l_monto_k As Label"; _l_monto_k = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014759; - //BA.debugLineNum = 3014759;BA.debugLine="Private l_monto_c1 As Label"; + //BA.debugLineNum = 104;BA.debugLine="Private l_monto_c1 As Label"; _l_monto_c1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014760; - //BA.debugLineNum = 3014760;BA.debugLine="Private l_monto_c2 As Label"; + //BA.debugLineNum = 105;BA.debugLine="Private l_monto_c2 As Label"; _l_monto_c2 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014761; - //BA.debugLineNum = 3014761;BA.debugLine="Private l_monto_c3 As Label"; + //BA.debugLineNum = 106;BA.debugLine="Private l_monto_c3 As Label"; _l_monto_c3 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014763; - //BA.debugLineNum = 3014763;BA.debugLine="Private l_encuesta As Label"; + //BA.debugLineNum = 108;BA.debugLine="Private l_encuesta As Label"; _l_encuesta = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014766; - //BA.debugLineNum = 3014766;BA.debugLine="Private bpv1 As BatteryProgressView"; + //BA.debugLineNum = 111;BA.debugLine="Private bpv1 As BatteryProgressView"; _bpv1 = new batteryprogressviewwrapper.batteryprogressviewWrapper(); -RDebugUtils.currentLine=3014767; - //BA.debugLineNum = 3014767;BA.debugLine="Dim batterystatus(11) As Int"; + //BA.debugLineNum = 112;BA.debugLine="Dim batterystatus(11) As Int"; _batterystatus = new int[(int) (11)]; ; -RDebugUtils.currentLine=3014768; - //BA.debugLineNum = 3014768;BA.debugLine="Private bu As BatteryUtilities"; + //BA.debugLineNum = 113;BA.debugLine="Private bu As BatteryUtilities"; _bu = new keymon.lat.medicomed.batteryutilities(); -RDebugUtils.currentLine=3014771; - //BA.debugLineNum = 3014771;BA.debugLine="Private Panel4 As Panel"; + //BA.debugLineNum = 116;BA.debugLine="Private Panel4 As Panel"; _panel4 = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=3014772; - //BA.debugLineNum = 3014772;BA.debugLine="Private L_NES As Label"; + //BA.debugLineNum = 117;BA.debugLine="Private L_NES As Label"; _l_nes = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014773; - //BA.debugLineNum = 3014773;BA.debugLine="Private L_REAL As Label"; + //BA.debugLineNum = 118;BA.debugLine="Private L_REAL As Label"; _l_real = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014774; - //BA.debugLineNum = 3014774;BA.debugLine="Private L_ALCANCE As Label"; + //BA.debugLineNum = 119;BA.debugLine="Private L_ALCANCE As Label"; _l_alcance = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014775; - //BA.debugLineNum = 3014775;BA.debugLine="Private L_VPLAN As Label"; + //BA.debugLineNum = 120;BA.debugLine="Private L_VPLAN As Label"; _l_vplan = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014776; - //BA.debugLineNum = 3014776;BA.debugLine="Private L_VREAL As Label"; + //BA.debugLineNum = 121;BA.debugLine="Private L_VREAL As Label"; _l_vreal = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014777; - //BA.debugLineNum = 3014777;BA.debugLine="Private L_EFEC_VIS As Label"; + //BA.debugLineNum = 122;BA.debugLine="Private L_EFEC_VIS As Label"; _l_efec_vis = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014778; - //BA.debugLineNum = 3014778;BA.debugLine="Private L_VISITCC As Label"; + //BA.debugLineNum = 123;BA.debugLine="Private L_VISITCC As Label"; _l_visitcc = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014779; - //BA.debugLineNum = 3014779;BA.debugLine="Private L_EFEC_PV As Label"; + //BA.debugLineNum = 124;BA.debugLine="Private L_EFEC_PV As Label"; _l_efec_pv = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014780; - //BA.debugLineNum = 3014780;BA.debugLine="Private L_EFEC_PURA As Label"; + //BA.debugLineNum = 125;BA.debugLine="Private L_EFEC_PURA As Label"; _l_efec_pura = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014781; - //BA.debugLineNum = 3014781;BA.debugLine="Private L_CTE_PROMO As Label"; + //BA.debugLineNum = 126;BA.debugLine="Private L_CTE_PROMO As Label"; _l_cte_promo = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014782; - //BA.debugLineNum = 3014782;BA.debugLine="Private L_REDEN_PROMO As Label"; + //BA.debugLineNum = 127;BA.debugLine="Private L_REDEN_PROMO As Label"; _l_reden_promo = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014783; - //BA.debugLineNum = 3014783;BA.debugLine="Private L_LIN_TICK As Label"; + //BA.debugLineNum = 128;BA.debugLine="Private L_LIN_TICK As Label"; _l_lin_tick = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014784; - //BA.debugLineNum = 3014784;BA.debugLine="Private SCROLL_RESDIA As ScrollView"; + //BA.debugLineNum = 129;BA.debugLine="Private SCROLL_RESDIA As ScrollView"; _scroll_resdia = new anywheresoftware.b4a.objects.ScrollViewWrapper(); -RDebugUtils.currentLine=3014785; - //BA.debugLineNum = 3014785;BA.debugLine="Private L_ACUMULADO As Label"; + //BA.debugLineNum = 130;BA.debugLine="Private L_ACUMULADO As Label"; _l_acumulado = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014786; - //BA.debugLineNum = 3014786;BA.debugLine="Private L_UNILEVER As Label"; + //BA.debugLineNum = 131;BA.debugLine="Private L_UNILEVER As Label"; _l_unilever = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014787; - //BA.debugLineNum = 3014787;BA.debugLine="Private L_RECHAZOP As Label"; + //BA.debugLineNum = 132;BA.debugLine="Private L_RECHAZOP As Label"; _l_rechazop = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014788; - //BA.debugLineNum = 3014788;BA.debugLine="Private L_RECHAZOM As Label"; + //BA.debugLineNum = 133;BA.debugLine="Private L_RECHAZOM As Label"; _l_rechazom = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014789; - //BA.debugLineNum = 3014789;BA.debugLine="Private L_VTA_3MES As Label"; + //BA.debugLineNum = 134;BA.debugLine="Private L_VTA_3MES As Label"; _l_vta_3mes = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014790; - //BA.debugLineNum = 3014790;BA.debugLine="Private L_VTA_2MES As Label"; + //BA.debugLineNum = 135;BA.debugLine="Private L_VTA_2MES As Label"; _l_vta_2mes = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014791; - //BA.debugLineNum = 3014791;BA.debugLine="Private L_VTA_1MES As Label"; + //BA.debugLineNum = 136;BA.debugLine="Private L_VTA_1MES As Label"; _l_vta_1mes = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014792; - //BA.debugLineNum = 3014792;BA.debugLine="Private L_MES_PY As Label"; + //BA.debugLineNum = 137;BA.debugLine="Private L_MES_PY As Label"; _l_mes_py = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014793; - //BA.debugLineNum = 3014793;BA.debugLine="Private L_FREC_DE_CREAL As Label"; + //BA.debugLineNum = 138;BA.debugLine="Private L_FREC_DE_CREAL As Label"; _l_frec_de_creal = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014794; - //BA.debugLineNum = 3014794;BA.debugLine="Private L_FREC_DE_COBJ As Label"; + //BA.debugLineNum = 139;BA.debugLine="Private L_FREC_DE_COBJ As Label"; _l_frec_de_cobj = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014795; - //BA.debugLineNum = 3014795;BA.debugLine="Private L_COB_VISIT As Label"; + //BA.debugLineNum = 140;BA.debugLine="Private L_COB_VISIT As Label"; _l_cob_visit = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014796; - //BA.debugLineNum = 3014796;BA.debugLine="Private L_VISIT_REAL As Label"; + //BA.debugLineNum = 141;BA.debugLine="Private L_VISIT_REAL As Label"; _l_visit_real = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014797; - //BA.debugLineNum = 3014797;BA.debugLine="Private L_VISIT_PLAN As Label"; + //BA.debugLineNum = 142;BA.debugLine="Private L_VISIT_PLAN As Label"; _l_visit_plan = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014798; - //BA.debugLineNum = 3014798;BA.debugLine="Private L_ECO As Label"; + //BA.debugLineNum = 143;BA.debugLine="Private L_ECO As Label"; _l_eco = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014799; - //BA.debugLineNum = 3014799;BA.debugLine="Private L_COB_CCC As Label"; + //BA.debugLineNum = 144;BA.debugLine="Private L_COB_CCC As Label"; _l_cob_ccc = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014800; - //BA.debugLineNum = 3014800;BA.debugLine="Private L_CTES As Label"; + //BA.debugLineNum = 145;BA.debugLine="Private L_CTES As Label"; _l_ctes = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014801; - //BA.debugLineNum = 3014801;BA.debugLine="Private L_VPO_VTA As Label"; + //BA.debugLineNum = 146;BA.debugLine="Private L_VPO_VTA As Label"; _l_vpo_vta = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014802; - //BA.debugLineNum = 3014802;BA.debugLine="Private L_VPO_OBJ As Label"; + //BA.debugLineNum = 147;BA.debugLine="Private L_VPO_OBJ As Label"; _l_vpo_obj = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014803; - //BA.debugLineNum = 3014803;BA.debugLine="Private L_DS_VTA As Label"; + //BA.debugLineNum = 148;BA.debugLine="Private L_DS_VTA As Label"; _l_ds_vta = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014804; - //BA.debugLineNum = 3014804;BA.debugLine="Private L_DS_OBJ As Label"; + //BA.debugLineNum = 149;BA.debugLine="Private L_DS_OBJ As Label"; _l_ds_obj = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014805; - //BA.debugLineNum = 3014805;BA.debugLine="Private L_DRA_VTA As Label"; + //BA.debugLineNum = 150;BA.debugLine="Private L_DRA_VTA As Label"; _l_dra_vta = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014806; - //BA.debugLineNum = 3014806;BA.debugLine="Private L_DRA_OBJ As Label"; + //BA.debugLineNum = 151;BA.debugLine="Private L_DRA_OBJ As Label"; _l_dra_obj = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014807; - //BA.debugLineNum = 3014807;BA.debugLine="Private L_ALCANCEM As Label"; + //BA.debugLineNum = 152;BA.debugLine="Private L_ALCANCEM As Label"; _l_alcancem = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014808; - //BA.debugLineNum = 3014808;BA.debugLine="Private L_TENDENCIA As Label"; + //BA.debugLineNum = 153;BA.debugLine="Private L_TENDENCIA As Label"; _l_tendencia = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014809; - //BA.debugLineNum = 3014809;BA.debugLine="Private L_VTA_ACUM As Label"; + //BA.debugLineNum = 154;BA.debugLine="Private L_VTA_ACUM As Label"; _l_vta_acum = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014810; - //BA.debugLineNum = 3014810;BA.debugLine="Private L_OBJ_MES As Label"; + //BA.debugLineNum = 155;BA.debugLine="Private L_OBJ_MES As Label"; _l_obj_mes = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014811; - //BA.debugLineNum = 3014811;BA.debugLine="Private L_DS_OBJD As Label"; + //BA.debugLineNum = 156;BA.debugLine="Private L_DS_OBJD As Label"; _l_ds_objd = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014812; - //BA.debugLineNum = 3014812;BA.debugLine="Private L_DS_VTAD As Label"; + //BA.debugLineNum = 157;BA.debugLine="Private L_DS_VTAD As Label"; _l_ds_vtad = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014813; - //BA.debugLineNum = 3014813;BA.debugLine="Private LPT As String"; + //BA.debugLineNum = 158;BA.debugLine="Private LPT As String"; _lpt = ""; -RDebugUtils.currentLine=3014814; - //BA.debugLineNum = 3014814;BA.debugLine="Private STEYIN As String"; + //BA.debugLineNum = 159;BA.debugLine="Private STEYIN As String"; _steyin = ""; -RDebugUtils.currentLine=3014815; - //BA.debugLineNum = 3014815;BA.debugLine="Private STEYOUT As String"; + //BA.debugLineNum = 160;BA.debugLine="Private STEYOUT As String"; _steyout = ""; -RDebugUtils.currentLine=3014817; - //BA.debugLineNum = 3014817;BA.debugLine="Private L_PRIO As Label"; + //BA.debugLineNum = 162;BA.debugLine="Private L_PRIO As Label"; _l_prio = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014818; - //BA.debugLineNum = 3014818;BA.debugLine="Private L_SECUND As Label"; + //BA.debugLineNum = 163;BA.debugLine="Private L_SECUND As Label"; _l_secund = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014819; - //BA.debugLineNum = 3014819;BA.debugLine="Private L_COMP As Label"; + //BA.debugLineNum = 164;BA.debugLine="Private L_COMP As Label"; _l_comp = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014822; - //BA.debugLineNum = 3014822;BA.debugLine="Private stay_hh As String"; + //BA.debugLineNum = 167;BA.debugLine="Private stay_hh As String"; _stay_hh = ""; -RDebugUtils.currentLine=3014823; - //BA.debugLineNum = 3014823;BA.debugLine="Private stay_mi As String"; + //BA.debugLineNum = 168;BA.debugLine="Private stay_mi As String"; _stay_mi = ""; -RDebugUtils.currentLine=3014824; - //BA.debugLineNum = 3014824;BA.debugLine="Private stay_ss As String"; + //BA.debugLineNum = 169;BA.debugLine="Private stay_ss As String"; _stay_ss = ""; -RDebugUtils.currentLine=3014826; - //BA.debugLineNum = 3014826;BA.debugLine="Dim sDate,sTime As String"; + //BA.debugLineNum = 171;BA.debugLine="Dim sDate,sTime As String"; _sdate = ""; _stime = ""; -RDebugUtils.currentLine=3014827; - //BA.debugLineNum = 3014827;BA.debugLine="Dim HORAINGRESO As String"; + //BA.debugLineNum = 172;BA.debugLine="Dim HORAINGRESO As String"; _horaingreso = ""; -RDebugUtils.currentLine=3014829; - //BA.debugLineNum = 3014829;BA.debugLine="Private L_QUALA As Label"; + //BA.debugLineNum = 174;BA.debugLine="Private L_QUALA As Label"; _l_quala = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014830; - //BA.debugLineNum = 3014830;BA.debugLine="Private L_FERRERO As Label"; + //BA.debugLineNum = 175;BA.debugLine="Private L_FERRERO As Label"; _l_ferrero = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014831; - //BA.debugLineNum = 3014831;BA.debugLine="Private L_SANMARCOS As Label"; + //BA.debugLineNum = 176;BA.debugLine="Private L_SANMARCOS As Label"; _l_sanmarcos = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014832; - //BA.debugLineNum = 3014832;BA.debugLine="Private L_CAMPARI As Label"; + //BA.debugLineNum = 177;BA.debugLine="Private L_CAMPARI As Label"; _l_campari = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014833; - //BA.debugLineNum = 3014833;BA.debugLine="Private L_IBERIA As Label"; + //BA.debugLineNum = 178;BA.debugLine="Private L_IBERIA As Label"; _l_iberia = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014834; - //BA.debugLineNum = 3014834;BA.debugLine="Private L_BEPENSA As Label"; + //BA.debugLineNum = 179;BA.debugLine="Private L_BEPENSA As Label"; _l_bepensa = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014835; - //BA.debugLineNum = 3014835;BA.debugLine="Private L_SCJ As Label"; + //BA.debugLineNum = 180;BA.debugLine="Private L_SCJ As Label"; _l_scj = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014836; - //BA.debugLineNum = 3014836;BA.debugLine="Private L_MEDJ As Label"; + //BA.debugLineNum = 181;BA.debugLine="Private L_MEDJ As Label"; _l_medj = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014837; - //BA.debugLineNum = 3014837;BA.debugLine="Private L_DURACELL As Label"; + //BA.debugLineNum = 182;BA.debugLine="Private L_DURACELL As Label"; _l_duracell = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014838; - //BA.debugLineNum = 3014838;BA.debugLine="Private L_GUNA As Label"; + //BA.debugLineNum = 183;BA.debugLine="Private L_GUNA As Label"; _l_guna = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014839; - //BA.debugLineNum = 3014839;BA.debugLine="Private L_KIMB As Label"; + //BA.debugLineNum = 184;BA.debugLine="Private L_KIMB As Label"; _l_kimb = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014840; - //BA.debugLineNum = 3014840;BA.debugLine="Private L_TRESM As Label"; + //BA.debugLineNum = 185;BA.debugLine="Private L_TRESM As Label"; _l_tresm = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014841; - //BA.debugLineNum = 3014841;BA.debugLine="Private L_REDB As Label"; + //BA.debugLineNum = 186;BA.debugLine="Private L_REDB As Label"; _l_redb = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014842; - //BA.debugLineNum = 3014842;BA.debugLine="Private Btn_Ubicar As Button"; + //BA.debugLineNum = 187;BA.debugLine="Private Btn_Ubicar As Button"; _btn_ubicar = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=3014843; - //BA.debugLineNum = 3014843;BA.debugLine="Private B_COMM As Button"; + //BA.debugLineNum = 188;BA.debugLine="Private B_COMM As Button"; _b_comm = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=3014844; - //BA.debugLineNum = 3014844;BA.debugLine="Private L_TOTAL_MM As Label"; + //BA.debugLineNum = 189;BA.debugLine="Private L_TOTAL_MM As Label"; _l_total_mm = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014845; - //BA.debugLineNum = 3014845;BA.debugLine="Private L_TOTAL_VIVE As Label"; + //BA.debugLineNum = 190;BA.debugLine="Private L_TOTAL_VIVE As Label"; _l_total_vive = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014846; - //BA.debugLineNum = 3014846;BA.debugLine="Private L_TOTAL_GUNA As Label"; + //BA.debugLineNum = 191;BA.debugLine="Private L_TOTAL_GUNA As Label"; _l_total_guna = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014847; - //BA.debugLineNum = 3014847;BA.debugLine="Private L_TOTAL_BA As Label"; + //BA.debugLineNum = 192;BA.debugLine="Private L_TOTAL_BA As Label"; _l_total_ba = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014848; - //BA.debugLineNum = 3014848;BA.debugLine="Private L_TOTAL_COMIS As Label"; + //BA.debugLineNum = 193;BA.debugLine="Private L_TOTAL_COMIS As Label"; _l_total_comis = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014849; - //BA.debugLineNum = 3014849;BA.debugLine="Private L_TOTAL_MM_1 As Label"; + //BA.debugLineNum = 194;BA.debugLine="Private L_TOTAL_MM_1 As Label"; _l_total_mm_1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014850; - //BA.debugLineNum = 3014850;BA.debugLine="Private L_TOTAL_VIVE_1 As Label"; + //BA.debugLineNum = 195;BA.debugLine="Private L_TOTAL_VIVE_1 As Label"; _l_total_vive_1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014851; - //BA.debugLineNum = 3014851;BA.debugLine="Private L_TOTAL_GUNA_1 As Label"; + //BA.debugLineNum = 196;BA.debugLine="Private L_TOTAL_GUNA_1 As Label"; _l_total_guna_1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014852; - //BA.debugLineNum = 3014852;BA.debugLine="Private L_TOTAL_BA_1 As Label"; + //BA.debugLineNum = 197;BA.debugLine="Private L_TOTAL_BA_1 As Label"; _l_total_ba_1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014853; - //BA.debugLineNum = 3014853;BA.debugLine="Private L_TOTAL_COMIS_1 As Label"; + //BA.debugLineNum = 198;BA.debugLine="Private L_TOTAL_COMIS_1 As Label"; _l_total_comis_1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014854; - //BA.debugLineNum = 3014854;BA.debugLine="Private B_OK_COMISS As Button"; + //BA.debugLineNum = 199;BA.debugLine="Private B_OK_COMISS As Button"; _b_ok_comiss = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=3014855; - //BA.debugLineNum = 3014855;BA.debugLine="Private Panel_C As Panel"; + //BA.debugLineNum = 200;BA.debugLine="Private Panel_C As Panel"; _panel_c = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=3014857; - //BA.debugLineNum = 3014857;BA.debugLine="Private TitleHeight As Int = 50dip"; + //BA.debugLineNum = 202;BA.debugLine="Private TitleHeight As Int = 50dip"; _titleheight = __c.DipToCurrent((int) (50)); -RDebugUtils.currentLine=3014858; - //BA.debugLineNum = 3014858;BA.debugLine="Private Title2Height As Int = 100dip"; + //BA.debugLineNum = 203;BA.debugLine="Private Title2Height As Int = 100dip"; _title2height = __c.DipToCurrent((int) (100)); -RDebugUtils.currentLine=3014860; - //BA.debugLineNum = 3014860;BA.debugLine="Private DividerHeight As Int = 5dip"; + //BA.debugLineNum = 205;BA.debugLine="Private DividerHeight As Int = 5dip"; _dividerheight = __c.DipToCurrent((int) (5)); -RDebugUtils.currentLine=3014861; - //BA.debugLineNum = 3014861;BA.debugLine="Private CLV1 As CustomListView"; + //BA.debugLineNum = 206;BA.debugLine="Private CLV1 As CustomListView"; _clv1 = new b4a.example3.customlistview(); -RDebugUtils.currentLine=3014862; - //BA.debugLineNum = 3014862;BA.debugLine="Private pnlTitle As B4XView"; + //BA.debugLineNum = 207;BA.debugLine="Private pnlTitle As B4XView"; _pnltitle = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=3014863; - //BA.debugLineNum = 3014863;BA.debugLine="Private xui As XUI"; + //BA.debugLineNum = 208;BA.debugLine="Private xui As XUI"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=3014864; - //BA.debugLineNum = 3014864;BA.debugLine="Type TitleData (Title As String)"; + //BA.debugLineNum = 209;BA.debugLine="Type TitleData (Title As String)"; ; -RDebugUtils.currentLine=3014866; - //BA.debugLineNum = 3014866;BA.debugLine="Private B_MARCAS As Button"; + //BA.debugLineNum = 211;BA.debugLine="Private B_MARCAS As Button"; _b_marcas = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=3014867; - //BA.debugLineNum = 3014867;BA.debugLine="Private Panel5 As Panel"; + //BA.debugLineNum = 212;BA.debugLine="Private Panel5 As Panel"; _panel5 = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=3014868; - //BA.debugLineNum = 3014868;BA.debugLine="Private lblTitle As Label"; + //BA.debugLineNum = 213;BA.debugLine="Private lblTitle As Label"; _lbltitle = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=3014869; - //BA.debugLineNum = 3014869;BA.debugLine="Private B_OK_PANEL5 As Button"; + //BA.debugLineNum = 214;BA.debugLine="Private B_OK_PANEL5 As Button"; _b_ok_panel5 = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=3014872; - //BA.debugLineNum = 3014872;BA.debugLine="Private p_principal As Panel"; + //BA.debugLineNum = 216;BA.debugLine="Private p_principal As Panel"; _p_principal = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=3014873; - //BA.debugLineNum = 3014873;BA.debugLine="Private p_mandaInfo As Panel"; + //BA.debugLineNum = 217;BA.debugLine="Private p_mandaInfo As Panel"; _p_mandainfo = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=3014874; - //BA.debugLineNum = 3014874;BA.debugLine="End Sub"; + //BA.debugLineNum = 218;BA.debugLine="End Sub"; return ""; } -public String _connecta_click(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "connecta_click", false)) - {return ((String) Debug.delegate(ba, "connecta_click", null));} +public String _connecta_click() throws Exception{ String _usrt = ""; String _passt = ""; -RDebugUtils.currentLine=3538944; - //BA.debugLineNum = 3538944;BA.debugLine="Sub connecta_Click"; -RDebugUtils.currentLine=3538945; - //BA.debugLineNum = 3538945;BA.debugLine="B4XPages.MainPage.reqManager.Initialize(Me, Start"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._initialize /*String*/ (null,ba,this,_starter._server /*String*/ ); -RDebugUtils.currentLine=3538946; - //BA.debugLineNum = 3538946;BA.debugLine="Log(Starter.server)"; -__c.LogImpl("33538946",_starter._server /*String*/ ,0); -RDebugUtils.currentLine=3538947; - //BA.debugLineNum = 3538947;BA.debugLine="connecta1 = connecta1 + 1"; -__ref._connecta1 /*double*/ = __ref._connecta1 /*double*/ +1; -RDebugUtils.currentLine=3538949; - //BA.debugLineNum = 3538949;BA.debugLine="imei = \"\""; -__ref._imei /*String*/ = ""; -RDebugUtils.currentLine=3538950; - //BA.debugLineNum = 3538950;BA.debugLine="conn = \"1\""; -__ref._conn /*String*/ = "1"; -RDebugUtils.currentLine=3538951; - //BA.debugLineNum = 3538951;BA.debugLine="Dim cmd As DBCommand"; + //BA.debugLineNum = 1725;BA.debugLine="Sub connecta_Click"; + //BA.debugLineNum = 1726;BA.debugLine="B4XPages.MainPage.reqManager.Initialize(Me, Start"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._initialize /*String*/ (ba,this,_starter._server /*String*/ ); + //BA.debugLineNum = 1727;BA.debugLine="Log(Starter.server)"; +__c.LogImpl("339845890",_starter._server /*String*/ ,0); + //BA.debugLineNum = 1728;BA.debugLine="connecta1 = connecta1 + 1"; +_connecta1 = _connecta1+1; + //BA.debugLineNum = 1730;BA.debugLine="imei = \"\""; +_imei = ""; + //BA.debugLineNum = 1731;BA.debugLine="conn = \"1\""; +_conn = "1"; + //BA.debugLineNum = 1732;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=3538952; - //BA.debugLineNum = 3538952;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3538953; - //BA.debugLineNum = 3538953;BA.debugLine="cmd.Name = \"select_version_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_version_MEDI"; -RDebugUtils.currentLine=3538954; - //BA.debugLineNum = 3538954;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("version")); -RDebugUtils.currentLine=3538957; - //BA.debugLineNum = 3538957;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"select USUA"; -__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, PASS from usuarioa"))); -RDebugUtils.currentLine=3538958; - //BA.debugLineNum = 3538958;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3538959; - //BA.debugLineNum = 3538959;BA.debugLine="If c.RowCount > 0 And c.GetString(\"USUARIO\") <>"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0 && (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("USUARIO")).equals("KMTS1") == false) { -RDebugUtils.currentLine=3538960; - //BA.debugLineNum = 3538960;BA.debugLine="Private usrT As String = c.GetString(\"USUARIO\")"; -_usrt = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("USUARIO"); -RDebugUtils.currentLine=3538961; - //BA.debugLineNum = 3538961;BA.debugLine="Private passT As String = c.GetString(\"PASS\")"; -_passt = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PASS"); -RDebugUtils.currentLine=3538962; - //BA.debugLineNum = 3538962;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3538963; - //BA.debugLineNum = 3538963;BA.debugLine="cmd.Name = \"select_usuario_guna_MEDI_1\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_usuario_guna_MEDI_1"; -RDebugUtils.currentLine=3538964; - //BA.debugLineNum = 3538964;BA.debugLine="cmd.Parameters = Array As Object(usrT, passT)"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(_usrt),(Object)(_passt)}; -RDebugUtils.currentLine=3538965; - //BA.debugLineNum = 3538965;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd ,"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("usuarioA")); + //BA.debugLineNum = 1733;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 1734;BA.debugLine="cmd.Name = \"select_version_MEDI\""; +_cmd.Name /*String*/ = "select_version_MEDI"; + //BA.debugLineNum = 1735;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("version")); + //BA.debugLineNum = 1738;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"select USUA"; +_c = (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, PASS from usuarioa"))); + //BA.debugLineNum = 1739;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 1740;BA.debugLine="If c.RowCount > 0 And c.GetString(\"USUARIO\") <>"; +if (_c.getRowCount()>0 && (_c.GetString("USUARIO")).equals("KMTS1") == false) { + //BA.debugLineNum = 1741;BA.debugLine="Private usrT As String = c.GetString(\"USUARIO\")"; +_usrt = _c.GetString("USUARIO"); + //BA.debugLineNum = 1742;BA.debugLine="Private passT As String = c.GetString(\"PASS\")"; +_passt = _c.GetString("PASS"); + //BA.debugLineNum = 1743;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 1744;BA.debugLine="cmd.Name = \"select_usuario_guna_MEDI_1\""; +_cmd.Name /*String*/ = "select_usuario_guna_MEDI_1"; + //BA.debugLineNum = 1745;BA.debugLine="cmd.Parameters = Array As Object(usrT, passT)"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_usrt),(Object)(_passt)}; + //BA.debugLineNum = 1746;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd ,"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("usuarioA")); }; -RDebugUtils.currentLine=3538967; - //BA.debugLineNum = 3538967;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3538970; - //BA.debugLineNum = 3538970;BA.debugLine="Dim cmd As DBCommand"; + //BA.debugLineNum = 1748;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 1751;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=3538971; - //BA.debugLineNum = 3538971;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3538972; - //BA.debugLineNum = 3538972;BA.debugLine="cmd.Name = \"select_ruta_MEDI_6\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_ruta_MEDI_6"; -RDebugUtils.currentLine=3538973; - //BA.debugLineNum = 3538973;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN,e_ruta.t"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._almacen /*String*/ ),(Object)(__ref._e_ruta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText())}; -RDebugUtils.currentLine=3538974; - //BA.debugLineNum = 3538974;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("ruta")); -RDebugUtils.currentLine=3538976; - //BA.debugLineNum = 3538976;BA.debugLine="If e_ruta.Text = \"KMTS1\" Then"; -if ((__ref._e_ruta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()).equals("KMTS1")) { -RDebugUtils.currentLine=3538977; - //BA.debugLineNum = 3538977;BA.debugLine="cargar.Visible = True"; -__ref._cargar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3538978; - //BA.debugLineNum = 3538978;BA.debugLine="Subir.Visible = True"; -__ref._subir /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3538979; - //BA.debugLineNum = 3538979;BA.debugLine="e_ruta.Text = \"\""; -__ref._e_ruta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 1752;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 1753;BA.debugLine="cmd.Name = \"select_ruta_MEDI_7\""; +_cmd.Name /*String*/ = "select_ruta_MEDI_7"; + //BA.debugLineNum = 1754;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN,e_ruta.t"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_almacen),(Object)(_e_ruta.getText())}; + //BA.debugLineNum = 1755;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("ruta")); + //BA.debugLineNum = 1757;BA.debugLine="If e_ruta.Text = \"KMTS1\" Then"; +if ((_e_ruta.getText()).equals("KMTS1")) { + //BA.debugLineNum = 1758;BA.debugLine="cargar.Visible = True"; +_cargar.setVisible(__c.True); + //BA.debugLineNum = 1759;BA.debugLine="Subir.Visible = True"; +_subir.setVisible(__c.True); + //BA.debugLineNum = 1760;BA.debugLine="e_ruta.Text = \"\""; +_e_ruta.setText(BA.ObjectToCharSequence("")); }; -RDebugUtils.currentLine=3538982; - //BA.debugLineNum = 3538982;BA.debugLine="If e_ruta.Text = \"BERNA1\" Then"; -if ((__ref._e_ruta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()).equals("BERNA1")) { -RDebugUtils.currentLine=3538983; - //BA.debugLineNum = 3538983;BA.debugLine="cargar.Visible = True"; -__ref._cargar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3538984; - //BA.debugLineNum = 3538984;BA.debugLine="Subir.Visible = True"; -__ref._subir /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3538985; - //BA.debugLineNum = 3538985;BA.debugLine="e_ruta.Text = \"\""; -__ref._e_ruta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 1763;BA.debugLine="If e_ruta.Text = \"BERNA1\" Then"; +if ((_e_ruta.getText()).equals("BERNA1")) { + //BA.debugLineNum = 1764;BA.debugLine="cargar.Visible = True"; +_cargar.setVisible(__c.True); + //BA.debugLineNum = 1765;BA.debugLine="Subir.Visible = True"; +_subir.setVisible(__c.True); + //BA.debugLineNum = 1766;BA.debugLine="e_ruta.Text = \"\""; +_e_ruta.setText(BA.ObjectToCharSequence("")); }; -RDebugUtils.currentLine=3538988; - //BA.debugLineNum = 3538988;BA.debugLine="ToastMessageShow(\"Validando Conexión.\" , True)"; + //BA.debugLineNum = 1769;BA.debugLine="ToastMessageShow(\"Validando Conexión.\" , True)"; __c.ToastMessageShow(BA.ObjectToCharSequence("Validando Conexión."),__c.True); -RDebugUtils.currentLine=3539004; - //BA.debugLineNum = 3539004;BA.debugLine="End Sub"; + //BA.debugLineNum = 1785;BA.debugLine="End Sub"; return ""; } -public String _e_ruta_enterpressed(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "e_ruta_enterpressed", false)) - {return ((String) Debug.delegate(ba, "e_ruta_enterpressed", null));} -RDebugUtils.currentLine=3735552; - //BA.debugLineNum = 3735552;BA.debugLine="Sub e_ruta_EnterPressed"; -RDebugUtils.currentLine=3735553; - //BA.debugLineNum = 3735553;BA.debugLine="If e_ruta.Text = \"FIN DIA\" Then"; -if ((__ref._e_ruta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()).equals("FIN DIA")) { -RDebugUtils.currentLine=3735554; - //BA.debugLineNum = 3735554;BA.debugLine="RES = Msgbox2(\"Seguro que desea hacer el cierre"; -__ref._res /*String*/ = BA.NumberToString(__c.Msgbox2(BA.ObjectToCharSequence("Seguro que desea hacer el cierre todos los datos se borraran?"),BA.ObjectToCharSequence("Cierre"),"Si","","No",(android.graphics.Bitmap)(__c.LoadBitmap(__c.File.getDirAssets(),"alert2.png").getObject()),ba)); -RDebugUtils.currentLine=3735555; - //BA.debugLineNum = 3735555;BA.debugLine="If RES = DialogResponse.POSITIVE Then"; -if ((__ref._res /*String*/ ).equals(BA.NumberToString(__c.DialogResponse.POSITIVE))) { -RDebugUtils.currentLine=3735556; - //BA.debugLineNum = 3735556;BA.debugLine="e_ruta.Text = \"\""; -__ref._e_ruta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence("")); -RDebugUtils.currentLine=3735557; - //BA.debugLineNum = 3735557;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; +public String _e_ruta_enterpressed() throws Exception{ + //BA.debugLineNum = 1796;BA.debugLine="Sub e_ruta_EnterPressed"; + //BA.debugLineNum = 1797;BA.debugLine="If e_ruta.Text = \"FIN DIA\" Then"; +if ((_e_ruta.getText()).equals("FIN DIA")) { + //BA.debugLineNum = 1798;BA.debugLine="RES = Msgbox2(\"Seguro que desea hacer el cierre"; +_res = BA.NumberToString(__c.Msgbox2(BA.ObjectToCharSequence("Seguro que desea hacer el cierre todos los datos se borraran?"),BA.ObjectToCharSequence("Cierre"),"Si","","No",(android.graphics.Bitmap)(__c.LoadBitmap(__c.File.getDirAssets(),"alert2.png").getObject()),ba)); + //BA.debugLineNum = 1799;BA.debugLine="If RES = DialogResponse.POSITIVE Then"; +if ((_res).equals(BA.NumberToString(__c.DialogResponse.POSITIVE))) { + //BA.debugLineNum = 1800;BA.debugLine="e_ruta.Text = \"\""; +_e_ruta.setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 1801;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente"); -RDebugUtils.currentLine=3735558; - //BA.debugLineNum = 3735558;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 1802;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido"); -RDebugUtils.currentLine=3735559; - //BA.debugLineNum = 3735559;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 1803;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from noventa"); -RDebugUtils.currentLine=3735560; - //BA.debugLineNum = 3735560;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 1804;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from clie_act"); -RDebugUtils.currentLine=3735561; - //BA.debugLineNum = 3735561;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 1805;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from kmt_info"); -RDebugUtils.currentLine=3735562; - //BA.debugLineNum = 3735562;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 1806;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from cat_gunaprod"); -RDebugUtils.currentLine=3735563; - //BA.debugLineNum = 3735563;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 1807;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from CAT_DETALLES_PAQ"); -RDebugUtils.currentLine=3735564; - //BA.debugLineNum = 3735564;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 1808;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from HIST_VENTAS"); -RDebugUtils.currentLine=3735565; - //BA.debugLineNum = 3735565;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; + //BA.debugLineNum = 1809;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from HIST_VERIFICACION"); -RDebugUtils.currentLine=3735566; - //BA.debugLineNum = 3735566;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; + //BA.debugLineNum = 1810;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("DELETE FROM HIST_ENCUESTA"); -RDebugUtils.currentLine=3735567; - //BA.debugLineNum = 3735567;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; + //BA.debugLineNum = 1811;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("DELETE FROM HIST_STAY_OUT"); -RDebugUtils.currentLine=3735568; - //BA.debugLineNum = 3735568;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; + //BA.debugLineNum = 1812;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("DELETE FROM HIST_GPS"); -RDebugUtils.currentLine=3735569; - //BA.debugLineNum = 3735569;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; + //BA.debugLineNum = 1813;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("DELETE FROM HIST_FACE"); -RDebugUtils.currentLine=3735570; - //BA.debugLineNum = 3735570;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"INSERT INT"; + //BA.debugLineNum = 1814;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"INSERT INT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("INSERT INTO HIST_STAY_OUT(HSO_INI, HSO_FIN) VALUES (0,0)"); -RDebugUtils.currentLine=3735571; - //BA.debugLineNum = 3735571;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; + //BA.debugLineNum = 1815;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("DELETE FROM HIST_CODIGO_BARRAS"); -RDebugUtils.currentLine=3735572; - //BA.debugLineNum = 3735572;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; + //BA.debugLineNum = 1816;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("DELETE FROM HIST_FOTO_CLIENTE"); -RDebugUtils.currentLine=3735573; - //BA.debugLineNum = 3735573;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; + //BA.debugLineNum = 1817;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("DELETE FROM CLIENTES_NUEVOS"); -RDebugUtils.currentLine=3735574; - //BA.debugLineNum = 3735574;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; + //BA.debugLineNum = 1818;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("DELETE FROM BITACORAGPS"); -RDebugUtils.currentLine=3735575; - //BA.debugLineNum = 3735575;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; + //BA.debugLineNum = 1819;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FRO"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("DELETE FROM VENTA_No_VENTA"); -RDebugUtils.currentLine=3735576; - //BA.debugLineNum = 3735576;BA.debugLine="Subs.bitacora(Subs.fechanormal(DateTime.Now),us"; -_subs._bitacora /*String*/ (ba,_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),__ref._usuario /*String*/ ,__ref._almacen /*String*/ ,__ref._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText(),"Fin Día","",_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ,_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ,"2","",""); -RDebugUtils.currentLine=3735577; - //BA.debugLineNum = 3735577;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*void*/ (null); + //BA.debugLineNum = 1820;BA.debugLine="Subs.bitacora(Subs.fechanormal(DateTime.Now),us"; +_subs._bitacora /*String*/ (ba,_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_usuario,_almacen,_l_ruta.getText(),"Fin Día","",_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_subs._fechanormal /*String*/ (ba,BA.NumberToString(__c.DateTime.getNow())),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ ,_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ,"2","",""); + //BA.debugLineNum = 1821;BA.debugLine="B4XPage_Appear"; +_b4xpage_appear(); }; }; -RDebugUtils.currentLine=3735580; - //BA.debugLineNum = 3735580;BA.debugLine="If e_ruta.Text = \"IWL\" Then"; -if ((__ref._e_ruta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()).equals("IWL")) { -RDebugUtils.currentLine=3735582; - //BA.debugLineNum = 3735582;BA.debugLine="NUEVO.Visible =False"; -__ref._nuevo /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3735583; - //BA.debugLineNum = 3735583;BA.debugLine="BUSCA.Visible=False"; -__ref._busca /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3735584; - //BA.debugLineNum = 3735584;BA.debugLine="connecta.Visible=False"; -__ref._connecta /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3735585; - //BA.debugLineNum = 3735585;BA.debugLine="img3.Visible =True"; -__ref._img3 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3735586; - //BA.debugLineNum = 3735586;BA.debugLine="Resumen.Visible= False"; -__ref._resumen /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); + //BA.debugLineNum = 1824;BA.debugLine="If e_ruta.Text = \"IWL\" Then"; +if ((_e_ruta.getText()).equals("IWL")) { + //BA.debugLineNum = 1826;BA.debugLine="NUEVO.Visible =False"; +_nuevo.setVisible(__c.False); + //BA.debugLineNum = 1827;BA.debugLine="BUSCA.Visible=False"; +_busca.setVisible(__c.False); + //BA.debugLineNum = 1828;BA.debugLine="connecta.Visible=False"; +_connecta.setVisible(__c.False); + //BA.debugLineNum = 1829;BA.debugLine="img3.Visible =True"; +_img3.setVisible(__c.True); + //BA.debugLineNum = 1830;BA.debugLine="Resumen.Visible= False"; +_resumen.setVisible(__c.False); }; -RDebugUtils.currentLine=3735588; - //BA.debugLineNum = 3735588;BA.debugLine="If e_ruta.Text = \"SUPLENCIA\" Then"; -if ((__ref._e_ruta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()).equals("SUPLENCIA")) { -RDebugUtils.currentLine=3735589; - //BA.debugLineNum = 3735589;BA.debugLine="E_RUTA2.Visible = True"; -__ref._e_ruta2 /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3735590; - //BA.debugLineNum = 3735590;BA.debugLine="ImageView9.Visible = True"; -__ref._imageview9 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.True); + //BA.debugLineNum = 1832;BA.debugLine="If e_ruta.Text = \"SUPLENCIA\" Then"; +if ((_e_ruta.getText()).equals("SUPLENCIA")) { + //BA.debugLineNum = 1833;BA.debugLine="E_RUTA2.Visible = True"; +_e_ruta2.setVisible(__c.True); + //BA.debugLineNum = 1834;BA.debugLine="ImageView9.Visible = True"; +_imageview9.setVisible(__c.True); }; -RDebugUtils.currentLine=3735592; - //BA.debugLineNum = 3735592;BA.debugLine="End Sub"; + //BA.debugLineNum = 1836;BA.debugLine="End Sub"; return ""; } -public String _e_ruta_textchanged(keymon.lat.medicomed.c_principal __ref,String _old,String _new) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "e_ruta_textchanged", false)) - {return ((String) Debug.delegate(ba, "e_ruta_textchanged", new Object[] {_old,_new}));} +public String _e_ruta_textchanged(String _old,String _new) throws Exception{ String _validchars = ""; -RDebugUtils.currentLine=4718592; - //BA.debugLineNum = 4718592;BA.debugLine="Sub e_ruta_TextChanged (Old As String, New As Stri"; -RDebugUtils.currentLine=4718593; - //BA.debugLineNum = 4718593;BA.debugLine="Dim validChars As String =\"ABCDEFGHIJKLMNOPQRSTUV"; + //BA.debugLineNum = 2227;BA.debugLine="Sub e_ruta_TextChanged (Old As String, New As Stri"; + //BA.debugLineNum = 2228;BA.debugLine="Dim validChars As String =\"ABCDEFGHIJKLMNOPQRSTUV"; _validchars = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789 "; -RDebugUtils.currentLine=4718595; - //BA.debugLineNum = 4718595;BA.debugLine="If Old <> \"KMTS1\" Then"; + //BA.debugLineNum = 2230;BA.debugLine="If Old <> \"KMTS1\" Then"; if ((_old).equals("KMTS1") == false) { -RDebugUtils.currentLine=4718597; - //BA.debugLineNum = 4718597;BA.debugLine="Try"; -try {RDebugUtils.currentLine=4718598; - //BA.debugLineNum = 4718598;BA.debugLine="If validChars.Contains(New.SubString(New.Length"; + //BA.debugLineNum = 2232;BA.debugLine="Try"; +try { //BA.debugLineNum = 2233;BA.debugLine="If validChars.Contains(New.SubString(New.Length"; if (_validchars.contains(_new.substring((int) (_new.length()-1)))==__c.False) { -RDebugUtils.currentLine=4718599; - //BA.debugLineNum = 4718599;BA.debugLine="e_ruta.Text = New.SubString2(0, New.Length-1)"; -__ref._e_ruta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence(_new.substring((int) (0),(int) (_new.length()-1)))); -RDebugUtils.currentLine=4718600; - //BA.debugLineNum = 4718600;BA.debugLine="e_ruta.SelectionStart = e_ruta.Text.Length"; -__ref._e_ruta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setSelectionStart(__ref._e_ruta /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText().length()); + //BA.debugLineNum = 2234;BA.debugLine="e_ruta.Text = New.SubString2(0, New.Length-1)"; +_e_ruta.setText(BA.ObjectToCharSequence(_new.substring((int) (0),(int) (_new.length()-1)))); + //BA.debugLineNum = 2235;BA.debugLine="e_ruta.SelectionStart = e_ruta.Text.Length"; +_e_ruta.setSelectionStart(_e_ruta.getText().length()); }; } catch (Exception e9) { - ba.setLastException(e9);RDebugUtils.currentLine=4718603; - //BA.debugLineNum = 4718603;BA.debugLine="Log(LastException)"; -__c.LogImpl("34718603",BA.ObjectToString(__c.LastException(ba)),0); + ba.setLastException(e9); //BA.debugLineNum = 2238;BA.debugLine="Log(LastException)"; +__c.LogImpl("341025547",BA.ObjectToString(__c.LastException(ba)),0); }; }; -RDebugUtils.currentLine=4718606; - //BA.debugLineNum = 4718606;BA.debugLine="End Sub"; + //BA.debugLineNum = 2241;BA.debugLine="End Sub"; return ""; } -public String _gps_locationchanged(keymon.lat.medicomed.c_principal __ref,anywheresoftware.b4a.gps.LocationWrapper _location1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "gps_locationchanged", false)) - {return ((String) Debug.delegate(ba, "gps_locationchanged", new Object[] {_location1}));} -RDebugUtils.currentLine=4587520; - //BA.debugLineNum = 4587520;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; -RDebugUtils.currentLine=4587522; - //BA.debugLineNum = 4587522;BA.debugLine="End Sub"; +public String _gps_locationchanged(anywheresoftware.b4a.gps.LocationWrapper _location1) throws Exception{ + //BA.debugLineNum = 2214;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; + //BA.debugLineNum = 2216;BA.debugLine="End Sub"; return ""; } -public String _hacer_ped_click(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "hacer_ped_click", false)) - {return ((String) Debug.delegate(ba, "hacer_ped_click", null));} -RDebugUtils.currentLine=4390912; - //BA.debugLineNum = 4390912;BA.debugLine="Sub hacer_ped_Click"; -RDebugUtils.currentLine=4390913; - //BA.debugLineNum = 4390913;BA.debugLine="B4XPages.ShowPage(\"Clientes\")"; +public String _hacer_ped_click() throws Exception{ + //BA.debugLineNum = 2202;BA.debugLine="Sub hacer_ped_Click"; + //BA.debugLineNum = 2203;BA.debugLine="B4XPages.ShowPage(\"Clientes\")"; _b4xpages._showpage /*String*/ (ba,"Clientes"); -RDebugUtils.currentLine=4390914; - //BA.debugLineNum = 4390914;BA.debugLine="End Sub"; + //BA.debugLineNum = 2204;BA.debugLine="End Sub"; return ""; } -public String _inv_click(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "inv_click", false)) - {return ((String) Debug.delegate(ba, "inv_click", null));} -RDebugUtils.currentLine=3801088; - //BA.debugLineNum = 3801088;BA.debugLine="Sub inv_Click"; -RDebugUtils.currentLine=3801089; - //BA.debugLineNum = 3801089;BA.debugLine="img2.Visible =True"; -__ref._img2 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3801090; - //BA.debugLineNum = 3801090;BA.debugLine="EJECUTANDO = 1"; -__ref._ejecutando /*String*/ = BA.NumberToString(1); -RDebugUtils.currentLine=3801091; - //BA.debugLineNum = 3801091;BA.debugLine="inve = 1"; -__ref._inve /*String*/ = BA.NumberToString(1); -RDebugUtils.currentLine=3801092; - //BA.debugLineNum = 3801092;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; +public Object _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 221;BA.debugLine="Public Sub Initialize As Object"; + //BA.debugLineNum = 222;BA.debugLine="Return Me"; +if (true) return this; + //BA.debugLineNum = 223;BA.debugLine="End Sub"; +return null; +} +public String _inv_click() throws Exception{ + //BA.debugLineNum = 1838;BA.debugLine="Sub inv_Click"; + //BA.debugLineNum = 1839;BA.debugLine="img2.Visible =True"; +_img2.setVisible(__c.True); + //BA.debugLineNum = 1840;BA.debugLine="EJECUTANDO = 1"; +_ejecutando = BA.NumberToString(1); + //BA.debugLineNum = 1841;BA.debugLine="inve = 1"; +_inve = BA.NumberToString(1); + //BA.debugLineNum = 1842;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from cat_gunaprod"); -RDebugUtils.currentLine=3801093; - //BA.debugLineNum = 3801093;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + //BA.debugLineNum = 1843;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from CAT_DETALLES_PAQ"); -RDebugUtils.currentLine=3801094; - //BA.debugLineNum = 3801094;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select usuari"; -__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=3801095; - //BA.debugLineNum = 3801095;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3801096; - //BA.debugLineNum = 3801096;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -__ref._usuario /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("USUARIO"); -RDebugUtils.currentLine=3801097; - //BA.debugLineNum = 3801097;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3801098; - //BA.debugLineNum = 3801098;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3801099; - //BA.debugLineNum = 3801099;BA.debugLine="cmd.Name = \"select_cat_gunaprod_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_cat_gunaprod_MEDI"; -RDebugUtils.currentLine=3801100; - //BA.debugLineNum = 3801100;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._almacen /*String*/ )}; -RDebugUtils.currentLine=3801101; - //BA.debugLineNum = 3801101;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("gunaprod")); -RDebugUtils.currentLine=3801102; - //BA.debugLineNum = 3801102;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3801103; - //BA.debugLineNum = 3801103;BA.debugLine="cmd.Name = \"select_cat_paquetes_MARDS\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_cat_paquetes_MARDS"; -RDebugUtils.currentLine=3801104; - //BA.debugLineNum = 3801104;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._almacen /*String*/ )}; -RDebugUtils.currentLine=3801105; - //BA.debugLineNum = 3801105;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("gunaprodp")); -RDebugUtils.currentLine=3801107; - //BA.debugLineNum = 3801107;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3801108; - //BA.debugLineNum = 3801108;BA.debugLine="cmd.Name = \"select_cat_detallepa_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_cat_detallepa_MEDI"; -RDebugUtils.currentLine=3801109; - //BA.debugLineNum = 3801109;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._almacen /*String*/ )}; -RDebugUtils.currentLine=3801110; - //BA.debugLineNum = 3801110;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("detallepaq")); -RDebugUtils.currentLine=3801112; - //BA.debugLineNum = 3801112;BA.debugLine="cargar.Visible = False"; -__ref._cargar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3801113; - //BA.debugLineNum = 3801113;BA.debugLine="Subir.Visible = False"; -__ref._subir /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3801114; - //BA.debugLineNum = 3801114;BA.debugLine="connecta.Visible = True"; -__ref._connecta /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3801115; - //BA.debugLineNum = 3801115;BA.debugLine="inv.Visible = False"; -__ref._inv /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3801116; - //BA.debugLineNum = 3801116;BA.debugLine="ToastMessageShow(\"Se Actualizaran los datos, Este"; + //BA.debugLineNum = 1844;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select usuari"; +_c = (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"))); + //BA.debugLineNum = 1845;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 1846;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; +_usuario = _c.GetString("USUARIO"); + //BA.debugLineNum = 1847;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 1848;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 1849;BA.debugLine="cmd.Name = \"select_cat_gunaprod_MEDI\""; +_cmd.Name /*String*/ = "select_cat_gunaprod_MEDI"; + //BA.debugLineNum = 1850;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_almacen)}; + //BA.debugLineNum = 1851;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("gunaprod")); + //BA.debugLineNum = 1852;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 1853;BA.debugLine="cmd.Name = \"select_cat_paquetes_MARDS\""; +_cmd.Name /*String*/ = "select_cat_paquetes_MARDS"; + //BA.debugLineNum = 1854;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_almacen)}; + //BA.debugLineNum = 1855;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("gunaprodp")); + //BA.debugLineNum = 1857;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 1858;BA.debugLine="cmd.Name = \"select_cat_detallepa_MEDI\""; +_cmd.Name /*String*/ = "select_cat_detallepa_MEDI"; + //BA.debugLineNum = 1859;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN)"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_almacen)}; + //BA.debugLineNum = 1860;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("detallepaq")); + //BA.debugLineNum = 1862;BA.debugLine="cargar.Visible = False"; +_cargar.setVisible(__c.False); + //BA.debugLineNum = 1863;BA.debugLine="Subir.Visible = False"; +_subir.setVisible(__c.False); + //BA.debugLineNum = 1864;BA.debugLine="connecta.Visible = True"; +_connecta.setVisible(__c.True); + //BA.debugLineNum = 1865;BA.debugLine="inv.Visible = False"; +_inv.setVisible(__c.False); + //BA.debugLineNum = 1866;BA.debugLine="ToastMessageShow(\"Se Actualizaran los datos, Este"; __c.ToastMessageShow(BA.ObjectToCharSequence("Se Actualizaran los datos, Este proceso podria tardar hasta un minuto, gracias"),__c.True); -RDebugUtils.currentLine=3801117; - //BA.debugLineNum = 3801117;BA.debugLine="End Sub"; + //BA.debugLineNum = 1867;BA.debugLine="End Sub"; return ""; } -public String _jobdone(keymon.lat.medicomed.c_principal __ref,keymon.lat.medicomed.httpjob _job) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "jobdone", false)) - {return ((String) Debug.delegate(ba, "jobdone", new Object[] {_job}));} +public String _jobdone(keymon.lat.medicomed.httpjob _job) throws Exception{ keymon.lat.medicomed.dbrequestmanager._dbresult _result = null; Object[] _records = null; String _k = ""; @@ -3610,47 +2623,34 @@ String _marca = ""; String _avance = ""; String _objetivo = ""; String _porcentaje1 = ""; -RDebugUtils.currentLine=3407872; - //BA.debugLineNum = 3407872;BA.debugLine="Sub JobDone(Job As HttpJob)"; -RDebugUtils.currentLine=3407878; - //BA.debugLineNum = 3407878;BA.debugLine="If Job.Success = False Then"; + //BA.debugLineNum = 1010;BA.debugLine="Sub JobDone(Job As HttpJob)"; + //BA.debugLineNum = 1016;BA.debugLine="If Job.Success = False Then"; if (_job._success /*boolean*/ ==__c.False) { -RDebugUtils.currentLine=3407880; - //BA.debugLineNum = 3407880;BA.debugLine="If Job.ErrorMessage = \"STREAM\" Then"; + //BA.debugLineNum = 1018;BA.debugLine="If Job.ErrorMessage = \"STREAM\" Then"; if ((_job._errormessage /*String*/ ).equals("STREAM")) { -RDebugUtils.currentLine=3407881; - //BA.debugLineNum = 3407881;BA.debugLine="If CARGA = \"SUBIR\" Then"; -if ((__ref._carga /*String*/ ).equals("SUBIR")) { -RDebugUtils.currentLine=3407882; - //BA.debugLineNum = 3407882;BA.debugLine="PB2.Progress = PB2.Progress + PORCENTAJE"; -__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()+(double)(Double.parseDouble(__ref._porcentaje /*String*/ )))); -RDebugUtils.currentLine=3407883; - //BA.debugLineNum = 3407883;BA.debugLine="S_CP.Text = \"SUBIENDO\""; -__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("SUBIENDO")); -RDebugUtils.currentLine=3407884; - //BA.debugLineNum = 3407884;BA.debugLine="If PB2.Progress > 99 Then"; -if (__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()>99) { -RDebugUtils.currentLine=3407885; - //BA.debugLineNum = 3407885;BA.debugLine="S_CP.Text = \"VALIDANDO\""; -__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("VALIDANDO")); + //BA.debugLineNum = 1019;BA.debugLine="If CARGA = \"SUBIR\" Then"; +if ((_carga).equals("SUBIR")) { + //BA.debugLineNum = 1020;BA.debugLine="PB2.Progress = PB2.Progress + PORCENTAJE"; +_pb2.setProgress((int) (_pb2.getProgress()+(double)(Double.parseDouble(_porcentaje)))); + //BA.debugLineNum = 1021;BA.debugLine="S_CP.Text = \"SUBIENDO\""; +_s_cp.setText(BA.ObjectToCharSequence("SUBIENDO")); + //BA.debugLineNum = 1022;BA.debugLine="If PB2.Progress > 99 Then"; +if (_pb2.getProgress()>99) { + //BA.debugLineNum = 1023;BA.debugLine="S_CP.Text = \"VALIDANDO\""; +_s_cp.setText(BA.ObjectToCharSequence("VALIDANDO")); }; }; }; }else { -RDebugUtils.currentLine=3407890; - //BA.debugLineNum = 3407890;BA.debugLine="LogColor(\"JobDone: '\" & B4XPages.MainPage.reqMan"; -__c.LogImpl("33407890","JobDone: '"+BA.ObjectToString(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job).Tag /*Object*/ )+"' - Registros: "+BA.NumberToString(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._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=3407892; - //BA.debugLineNum = 3407892;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1028;BA.debugLine="LogColor(\"JobDone: '\" & B4XPages.MainPage.reqMan"; +__c.LogImpl("339714834","JobDone: '"+BA.ObjectToString(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job).Tag /*Object*/ )+"' - Registros: "+BA.NumberToString(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job).Rows /*anywheresoftware.b4a.objects.collections.List*/ .getSize()),__c.Colors.Green); + //BA.debugLineNum = 1030;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3407893; - //BA.debugLineNum = 3407893;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3407895; - //BA.debugLineNum = 3407895;BA.debugLine="If RESULT.Tag = \"update_gps\" Then"; + //BA.debugLineNum = 1031;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1033;BA.debugLine="If RESULT.Tag = \"update_gps\" Then"; if ((_result.Tag /*Object*/ ).equals((Object)("update_gps"))) { -RDebugUtils.currentLine=3407896; - //BA.debugLineNum = 3407896;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1034;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() @@ -3658,11 +2658,9 @@ final int groupLen16 = group16.getSize() ; for (; index16 < groupLen16;index16++){ _records = (Object[])(group16.Get(index16)); -RDebugUtils.currentLine=3407897; - //BA.debugLineNum = 3407897;BA.debugLine="Log(\"==========================REGISTROS=\"&RE"; -__c.LogImpl("33407897","==========================REGISTROS="+BA.ObjectToString(_result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ),0); -RDebugUtils.currentLine=3407898; - //BA.debugLineNum = 3407898;BA.debugLine="For Each k As String In RESULT.Columns.Keys"; + //BA.debugLineNum = 1035;BA.debugLine="Log(\"==========================REGISTROS=\"&RE"; +__c.LogImpl("339714841","==========================REGISTROS="+BA.ObjectToString(_result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ),0); + //BA.debugLineNum = 1036;BA.debugLine="For Each k As String In RESULT.Columns.Keys"; { final anywheresoftware.b4a.BA.IterableList group18 = _result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Keys(); final int groupLen18 = group18.getSize() @@ -3670,19 +2668,16 @@ final int groupLen18 = group18.getSize() ; for (; index18 < groupLen18;index18++){ _k = BA.ObjectToString(group18.Get(index18)); -RDebugUtils.currentLine=3407899; - //BA.debugLineNum = 3407899;BA.debugLine="Log(RESULT.Tag & \": \" & k & \": \" & records(R"; -__c.LogImpl("33407899",BA.ObjectToString(_result.Tag /*Object*/ )+": "+_k+": "+BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)(_k))))]),0); + //BA.debugLineNum = 1037;BA.debugLine="Log(RESULT.Tag & \": \" & k & \": \" & records(R"; +__c.LogImpl("339714843",BA.ObjectToString(_result.Tag /*Object*/ )+": "+_k+": "+BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)(_k))))]),0); } }; } }; }; -RDebugUtils.currentLine=3407903; - //BA.debugLineNum = 3407903;BA.debugLine="If RESULT.Tag = \"ins_pedidos\" Then"; + //BA.debugLineNum = 1041;BA.debugLine="If RESULT.Tag = \"ins_pedidos\" Then"; if ((_result.Tag /*Object*/ ).equals((Object)("ins_pedidos"))) { -RDebugUtils.currentLine=3407904; - //BA.debugLineNum = 3407904;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1042;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group24 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen24 = group24.getSize() @@ -3690,11 +2685,9 @@ final int groupLen24 = group24.getSize() ; for (; index24 < groupLen24;index24++){ _records = (Object[])(group24.Get(index24)); -RDebugUtils.currentLine=3407905; - //BA.debugLineNum = 3407905;BA.debugLine="Log(\"==========================REGISTROS=\"&RE"; -__c.LogImpl("33407905","==========================REGISTROS="+BA.ObjectToString(_result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ),0); -RDebugUtils.currentLine=3407906; - //BA.debugLineNum = 3407906;BA.debugLine="For Each k As String In RESULT.Columns.Keys"; + //BA.debugLineNum = 1043;BA.debugLine="Log(\"==========================REGISTROS=\"&RE"; +__c.LogImpl("339714849","==========================REGISTROS="+BA.ObjectToString(_result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ),0); + //BA.debugLineNum = 1044;BA.debugLine="For Each k As String In RESULT.Columns.Keys"; { final anywheresoftware.b4a.BA.IterableList group26 = _result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Keys(); final int groupLen26 = group26.getSize() @@ -3702,22 +2695,18 @@ final int groupLen26 = group26.getSize() ; for (; index26 < groupLen26;index26++){ _k = BA.ObjectToString(group26.Get(index26)); -RDebugUtils.currentLine=3407907; - //BA.debugLineNum = 3407907;BA.debugLine="Log(RESULT.Tag & \": \" & k & \": \" & records(R"; -__c.LogImpl("33407907",BA.ObjectToString(_result.Tag /*Object*/ )+": "+_k+": "+BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)(_k))))]),0); + //BA.debugLineNum = 1045;BA.debugLine="Log(RESULT.Tag & \": \" & k & \": \" & records(R"; +__c.LogImpl("339714851",BA.ObjectToString(_result.Tag /*Object*/ )+": "+_k+": "+BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)(_k))))]),0); } }; } }; }; -RDebugUtils.currentLine=3407911; - //BA.debugLineNum = 3407911;BA.debugLine="If RESULT.Tag = \"usuarioA\" Then 'query tag"; + //BA.debugLineNum = 1049;BA.debugLine="If RESULT.Tag = \"usuarioA\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("usuarioA"))) { -RDebugUtils.currentLine=3407912; - //BA.debugLineNum = 3407912;BA.debugLine="Private n As String = \"Sin Usuario\""; + //BA.debugLineNum = 1050;BA.debugLine="Private n As String = \"Sin Usuario\""; _n = "Sin Usuario"; -RDebugUtils.currentLine=3407913; - //BA.debugLineNum = 3407913;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1051;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group33 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen33 = group33.getSize() @@ -3725,68 +2714,45 @@ final int groupLen33 = group33.getSize() ; for (; index33 < groupLen33;index33++){ _records = (Object[])(group33.Get(index33)); -RDebugUtils.currentLine=3407914; - //BA.debugLineNum = 3407914;BA.debugLine="n = records(RESULT.Columns.Get(\"USUARIO\"))"; + //BA.debugLineNum = 1052;BA.debugLine="n = records(RESULT.Columns.Get(\"USUARIO\"))"; _n = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("USUARIO"))))]); } }; -RDebugUtils.currentLine=3407916; - //BA.debugLineNum = 3407916;BA.debugLine="LogColor(\"**************************\"&n, Color"; -__c.LogImpl("33407916","**************************"+_n,__c.Colors.Green); -RDebugUtils.currentLine=3407917; - //BA.debugLineNum = 3407917;BA.debugLine="If n = \"OKActivo\" Then"; + //BA.debugLineNum = 1054;BA.debugLine="LogColor(\"**************************\"&n, Color"; +__c.LogImpl("339714860","**************************"+_n,__c.Colors.Green); + //BA.debugLineNum = 1055;BA.debugLine="If n = \"OKActivo\" Then"; if ((_n).equals("OKActivo")) { -RDebugUtils.currentLine=3407918; - //BA.debugLineNum = 3407918;BA.debugLine="Log(\"Usuario guardado en BD es 'Valido'\")"; -__c.LogImpl("33407918","Usuario guardado en BD es 'Valido'",0); - }else -{RDebugUtils.currentLine=3407919; - //BA.debugLineNum = 3407919;BA.debugLine="Else If n = \"OKExpirado\" Then"; -if ((_n).equals("OKExpirado")) { -RDebugUtils.currentLine=3407920; - //BA.debugLineNum = 3407920;BA.debugLine="Msgbox(\"Usuario Expirado llamar al administra"; + //BA.debugLineNum = 1056;BA.debugLine="Log(\"Usuario guardado en BD es 'Valido'\")"; +__c.LogImpl("339714862","Usuario guardado en BD es 'Valido'",0); + }else if((_n).equals("OKExpirado")) { + //BA.debugLineNum = 1058;BA.debugLine="Msgbox(\"Usuario Expirado llamar al administra"; __c.Msgbox(BA.ObjectToCharSequence("Usuario Expirado llamar al administrador"),BA.ObjectToCharSequence(""),ba); -RDebugUtils.currentLine=3407921; - //BA.debugLineNum = 3407921;BA.debugLine="B4XPages.ShowPage(\"B4XMainPage\")"; + //BA.debugLineNum = 1059;BA.debugLine="B4XPages.ShowPage(\"B4XMainPage\")"; _b4xpages._showpage /*String*/ (ba,"B4XMainPage"); - }else -{RDebugUtils.currentLine=3407922; - //BA.debugLineNum = 3407922;BA.debugLine="Else If n = \"OKCancelado\" Then"; -if ((_n).equals("OKCancelado")) { -RDebugUtils.currentLine=3407923; - //BA.debugLineNum = 3407923;BA.debugLine="Msgbox(\"Usuario Cancelado llamar al administr"; + }else if((_n).equals("OKCancelado")) { + //BA.debugLineNum = 1061;BA.debugLine="Msgbox(\"Usuario Cancelado llamar al administr"; __c.Msgbox(BA.ObjectToCharSequence("Usuario Cancelado llamar al administrador"),BA.ObjectToCharSequence(""),ba); -RDebugUtils.currentLine=3407924; - //BA.debugLineNum = 3407924;BA.debugLine="B4XPages.ShowPage(\"B4XMainPage\")"; + //BA.debugLineNum = 1062;BA.debugLine="B4XPages.ShowPage(\"B4XMainPage\")"; _b4xpages._showpage /*String*/ (ba,"B4XMainPage"); }else { -RDebugUtils.currentLine=3407926; - //BA.debugLineNum = 3407926;BA.debugLine="Msgbox(\"Usuario o password No validos\",\"\") 'i"; + //BA.debugLineNum = 1064;BA.debugLine="Msgbox(\"Usuario o password No validos\",\"\") 'i"; __c.Msgbox(BA.ObjectToCharSequence("Usuario o password No validos"),BA.ObjectToCharSequence(""),ba); -RDebugUtils.currentLine=3407927; - //BA.debugLineNum = 3407927;BA.debugLine="B4XPages.ShowPage(\"B4XMainPage\")"; + //BA.debugLineNum = 1065;BA.debugLine="B4XPages.ShowPage(\"B4XMainPage\")"; _b4xpages._showpage /*String*/ (ba,"B4XMainPage"); - }}} -; -RDebugUtils.currentLine=3407929; - //BA.debugLineNum = 3407929;BA.debugLine="Log(\"***************** \"&n)"; -__c.LogImpl("33407929","***************** "+_n,0); + }; + //BA.debugLineNum = 1067;BA.debugLine="Log(\"***************** \"&n)"; +__c.LogImpl("339714873","***************** "+_n,0); }; }; -RDebugUtils.currentLine=3407933; - //BA.debugLineNum = 3407933;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1071;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3407934; - //BA.debugLineNum = 3407934;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3407935; - //BA.debugLineNum = 3407935;BA.debugLine="If RESULT.Tag = \"kmt_datos\" Then 'query tag"; + //BA.debugLineNum = 1072;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1073;BA.debugLine="If RESULT.Tag = \"kmt_datos\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("kmt_datos"))) { -RDebugUtils.currentLine=3407936; - //BA.debugLineNum = 3407936;BA.debugLine="S_CC.TEXT = \"CARGANDO\""; -__ref._s_cc /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("CARGANDO")); -RDebugUtils.currentLine=3407937; - //BA.debugLineNum = 3407937;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1074;BA.debugLine="S_CC.TEXT = \"CARGANDO\""; +_s_cc.setText(BA.ObjectToCharSequence("CARGANDO")); + //BA.debugLineNum = 1075;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group56 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen56 = group56.getSize() @@ -3794,119 +2760,83 @@ final int groupLen56 = group56.getSize() ; for (; index56 < groupLen56;index56++){ _records = (Object[])(group56.Get(index56)); -RDebugUtils.currentLine=3407938; - //BA.debugLineNum = 3407938;BA.debugLine="Dim CAT_CL_CODIGO As String = records(RESULT."; + //BA.debugLineNum = 1076;BA.debugLine="Dim CAT_CL_CODIGO As String = records(RESULT."; _cat_cl_codigo = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_CL_CODIGO"))))]); -RDebugUtils.currentLine=3407939; - //BA.debugLineNum = 3407939;BA.debugLine="Dim CAT_CL_RUTA As String = records(RESULT.Co"; + //BA.debugLineNum = 1077;BA.debugLine="Dim CAT_CL_RUTA As String = records(RESULT.Co"; _cat_cl_ruta = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_CL_RUTA"))))]); -RDebugUtils.currentLine=3407940; - //BA.debugLineNum = 3407940;BA.debugLine="Dim CAT_CL_NOMBRE As String = records(RESULT."; + //BA.debugLineNum = 1078;BA.debugLine="Dim CAT_CL_NOMBRE As String = records(RESULT."; _cat_cl_nombre = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_CL_NOMBRE"))))]); -RDebugUtils.currentLine=3407941; - //BA.debugLineNum = 3407941;BA.debugLine="Dim CAT_CL_ATIENDE1 As String = records(RESUL"; + //BA.debugLineNum = 1079;BA.debugLine="Dim CAT_CL_ATIENDE1 As String = records(RESUL"; _cat_cl_atiende1 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_CL_ATIENDE1"))))]); -RDebugUtils.currentLine=3407942; - //BA.debugLineNum = 3407942;BA.debugLine="Dim CAT_CL_ATIENTE2 As String = records(RESUL"; + //BA.debugLineNum = 1080;BA.debugLine="Dim CAT_CL_ATIENTE2 As String = records(RESUL"; _cat_cl_atiente2 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_CL_ATIENTE2"))))]); -RDebugUtils.currentLine=3407943; - //BA.debugLineNum = 3407943;BA.debugLine="Dim CAT_CL_TELEFONO As String = records(RESUL"; + //BA.debugLineNum = 1081;BA.debugLine="Dim CAT_CL_TELEFONO As String = records(RESUL"; _cat_cl_telefono = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_CL_TELEFONO"))))]); -RDebugUtils.currentLine=3407944; - //BA.debugLineNum = 3407944;BA.debugLine="Dim CAT_CL_EMAIL As String = records(RESULT.C"; + //BA.debugLineNum = 1082;BA.debugLine="Dim CAT_CL_EMAIL As String = records(RESULT.C"; _cat_cl_email = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_CL_EMAIL"))))]); -RDebugUtils.currentLine=3407945; - //BA.debugLineNum = 3407945;BA.debugLine="Dim CAT_CL_CALLE As String = records(RESULT.C"; + //BA.debugLineNum = 1083;BA.debugLine="Dim CAT_CL_CALLE As String = records(RESULT.C"; _cat_cl_calle = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_CL_CALLE"))))]); -RDebugUtils.currentLine=3407946; - //BA.debugLineNum = 3407946;BA.debugLine="Dim CAT_CL_NOEXT As String = records(RESULT.C"; + //BA.debugLineNum = 1084;BA.debugLine="Dim CAT_CL_NOEXT As String = records(RESULT.C"; _cat_cl_noext = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_CL_NOEXT"))))]); -RDebugUtils.currentLine=3407947; - //BA.debugLineNum = 3407947;BA.debugLine="Dim CAT_CL_NOINT As String = records(RESULT.C"; + //BA.debugLineNum = 1085;BA.debugLine="Dim CAT_CL_NOINT As String = records(RESULT.C"; _cat_cl_noint = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_CL_NOINT"))))]); -RDebugUtils.currentLine=3407948; - //BA.debugLineNum = 3407948;BA.debugLine="Dim CAT_CL_CALLE1 As String = records(RESULT."; + //BA.debugLineNum = 1086;BA.debugLine="Dim CAT_CL_CALLE1 As String = records(RESULT."; _cat_cl_calle1 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_CL_CALLE1"))))]); -RDebugUtils.currentLine=3407949; - //BA.debugLineNum = 3407949;BA.debugLine="Dim CAT_CL_CALLE2 As String = records(RESULT."; + //BA.debugLineNum = 1087;BA.debugLine="Dim CAT_CL_CALLE2 As String = records(RESULT."; _cat_cl_calle2 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_CL_CALLE2"))))]); -RDebugUtils.currentLine=3407950; - //BA.debugLineNum = 3407950;BA.debugLine="Dim CAT_CL_COLONIA As String = records(RESULT"; + //BA.debugLineNum = 1088;BA.debugLine="Dim CAT_CL_COLONIA As String = records(RESULT"; _cat_cl_colonia = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_CL_COLONIA"))))]); -RDebugUtils.currentLine=3407951; - //BA.debugLineNum = 3407951;BA.debugLine="Dim CAT_CL_MUNI As String = records(RESULT.Co"; + //BA.debugLineNum = 1089;BA.debugLine="Dim CAT_CL_MUNI As String = records(RESULT.Co"; _cat_cl_muni = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_CL_MUNI"))))]); -RDebugUtils.currentLine=3407952; - //BA.debugLineNum = 3407952;BA.debugLine="Dim CAT_CL_EDO As String = records(RESULT.Col"; + //BA.debugLineNum = 1090;BA.debugLine="Dim CAT_CL_EDO As String = records(RESULT.Col"; _cat_cl_edo = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_CL_EDO"))))]); -RDebugUtils.currentLine=3407953; - //BA.debugLineNum = 3407953;BA.debugLine="Dim CAT_CL_CP As String = records(RESULT.Colu"; + //BA.debugLineNum = 1091;BA.debugLine="Dim CAT_CL_CP As String = records(RESULT.Colu"; _cat_cl_cp = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_CL_CP"))))]); -RDebugUtils.currentLine=3407954; - //BA.debugLineNum = 3407954;BA.debugLine="Dim CAT_CL_LONG As String = records(RESULT.Co"; + //BA.debugLineNum = 1092;BA.debugLine="Dim CAT_CL_LONG As String = records(RESULT.Co"; _cat_cl_long = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_CL_LONG"))))]); -RDebugUtils.currentLine=3407955; - //BA.debugLineNum = 3407955;BA.debugLine="Dim CAT_CL_LAT As String = records(RESULT.Col"; + //BA.debugLineNum = 1093;BA.debugLine="Dim CAT_CL_LAT As String = records(RESULT.Col"; _cat_cl_lat = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_CL_LAT"))))]); -RDebugUtils.currentLine=3407956; - //BA.debugLineNum = 3407956;BA.debugLine="Dim CAT_CL_MTOCOMPRA As String = records(RESU"; + //BA.debugLineNum = 1094;BA.debugLine="Dim CAT_CL_MTOCOMPRA As String = records(RESU"; _cat_cl_mtocompra = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_CL_MTOCOMPRA"))))]); -RDebugUtils.currentLine=3407957; - //BA.debugLineNum = 3407957;BA.debugLine="Dim CAT_CL_NUM_SERIEFISICO As String = record"; + //BA.debugLineNum = 1095;BA.debugLine="Dim CAT_CL_NUM_SERIEFISICO As String = record"; _cat_cl_num_seriefisico = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_CL_NUM_SERIEFISICO"))))]); -RDebugUtils.currentLine=3407958; - //BA.debugLineNum = 3407958;BA.debugLine="Dim CAT_CL_DIASEMANA As String = records(RESU"; + //BA.debugLineNum = 1096;BA.debugLine="Dim CAT_CL_DIASEMANA As String = records(RESU"; _cat_cl_diasemana = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_CL_DIAS_VISITA"))))]); -RDebugUtils.currentLine=3407959; - //BA.debugLineNum = 3407959;BA.debugLine="Dim CAT_CL_SECUENCIA As Int = records(RESULT."; + //BA.debugLineNum = 1097;BA.debugLine="Dim CAT_CL_SECUENCIA As Int = records(RESULT."; _cat_cl_secuencia = (int)(BA.ObjectToNumber(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_CL_SECUENCIA"))))])); -RDebugUtils.currentLine=3407960; - //BA.debugLineNum = 3407960;BA.debugLine="Starter.dia_semana = CAT_CL_DIASEMANA"; + //BA.debugLineNum = 1098;BA.debugLine="Starter.dia_semana = CAT_CL_DIASEMANA"; _starter._dia_semana /*String*/ = _cat_cl_diasemana; -RDebugUtils.currentLine=3407961; - //BA.debugLineNum = 3407961;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; + //BA.debugLineNum = 1099;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, CAT_CL_DIASEMANA, CAT_CL_SECUENCIA) VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,0,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cat_cl_codigo),(Object)(_cat_cl_ruta),(Object)(_cat_cl_nombre),(Object)(_cat_cl_atiende1),(Object)(_cat_cl_atiente2),(Object)(_cat_cl_telefono),(Object)(_cat_cl_email),(Object)(_cat_cl_calle),(Object)(_cat_cl_noext),(Object)(_cat_cl_noint),(Object)(_cat_cl_calle1),(Object)(_cat_cl_calle2),(Object)(_cat_cl_colonia),(Object)(_cat_cl_muni),(Object)(_cat_cl_edo),(Object)(_cat_cl_cp),(Object)(_cat_cl_long),(Object)(_cat_cl_lat),(Object)(_cat_cl_mtocompra),(Object)(_cat_cl_num_seriefisico),(Object)(_cat_cl_diasemana),(Object)(_cat_cl_secuencia)})); -RDebugUtils.currentLine=3407962; - //BA.debugLineNum = 3407962;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; + //BA.debugLineNum = 1100;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)(_cat_cl_codigo)})); } }; -RDebugUtils.currentLine=3407964; - //BA.debugLineNum = 3407964;BA.debugLine="Listo1 = 1"; -__ref._listo1 /*String*/ = BA.NumberToString(1); -RDebugUtils.currentLine=3407965; - //BA.debugLineNum = 3407965;BA.debugLine="S_CC.Text = \"LISTO\""; -__ref._s_cc /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("LISTO")); -RDebugUtils.currentLine=3407966; - //BA.debugLineNum = 3407966;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; + //BA.debugLineNum = 1102;BA.debugLine="Listo1 = 1"; +_listo1 = BA.NumberToString(1); + //BA.debugLineNum = 1103;BA.debugLine="S_CC.Text = \"LISTO\""; +_s_cc.setText(BA.ObjectToCharSequence("LISTO")); + //BA.debugLineNum = 1104;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; if ((_starter._marcacel /*String*/ ).equals("Sony") == false) { __c.ToastMessageShow(BA.ObjectToCharSequence("Catalogo Clientes Actualizados."),__c.True);}; -RDebugUtils.currentLine=3407967; - //BA.debugLineNum = 3407967;BA.debugLine="If Listo1 = 1 And Listo2 = 1 And Listo3 = 1 An"; -if ((__ref._listo1 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._listo2 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._listo3 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._listo4 /*String*/ ).equals(BA.NumberToString(1))) { -RDebugUtils.currentLine=3407968; - //BA.debugLineNum = 3407968;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*void*/ (null); -RDebugUtils.currentLine=3407969; - //BA.debugLineNum = 3407969;BA.debugLine="img2.Visible=False"; -__ref._img2 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3407970; - //BA.debugLineNum = 3407970;BA.debugLine="EJECUTANDO = 0"; -__ref._ejecutando /*String*/ = BA.NumberToString(0); + //BA.debugLineNum = 1105;BA.debugLine="If Listo1 = 1 And Listo2 = 1 And Listo3 = 1 An"; +if ((_listo1).equals(BA.NumberToString(1)) && (_listo2).equals(BA.NumberToString(1)) && (_listo3).equals(BA.NumberToString(1)) && (_listo4).equals(BA.NumberToString(1))) { + //BA.debugLineNum = 1106;BA.debugLine="B4XPage_Appear"; +_b4xpage_appear(); + //BA.debugLineNum = 1107;BA.debugLine="img2.Visible=False"; +_img2.setVisible(__c.False); + //BA.debugLineNum = 1108;BA.debugLine="EJECUTANDO = 0"; +_ejecutando = BA.NumberToString(0); }; }; }; -RDebugUtils.currentLine=3407975; - //BA.debugLineNum = 3407975;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1113;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3407976; - //BA.debugLineNum = 3407976;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3407977; - //BA.debugLineNum = 3407977;BA.debugLine="If RESULT.Tag = \"resum_apk\" Then 'query tag"; + //BA.debugLineNum = 1114;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1115;BA.debugLine="If RESULT.Tag = \"resum_apk\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("resum_apk"))) { -RDebugUtils.currentLine=3407978; - //BA.debugLineNum = 3407978;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1116;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group96 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen96 = group96.getSize() @@ -3914,172 +2844,118 @@ final int groupLen96 = group96.getSize() ; for (; index96 < groupLen96;index96++){ _records = (Object[])(group96.Get(index96)); -RDebugUtils.currentLine=3407979; - //BA.debugLineNum = 3407979;BA.debugLine="Dim HIST_RA_OBJMES As String = records(RESULT"; + //BA.debugLineNum = 1117;BA.debugLine="Dim HIST_RA_OBJMES As String = records(RESULT"; _hist_ra_objmes = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_OBJMES"))))]); -RDebugUtils.currentLine=3407980; - //BA.debugLineNum = 3407980;BA.debugLine="Dim HIST_RA_VENTA As String = records(RESULT."; + //BA.debugLineNum = 1118;BA.debugLine="Dim HIST_RA_VENTA As String = records(RESULT."; _hist_ra_venta = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_VENTA"))))]); -RDebugUtils.currentLine=3407981; - //BA.debugLineNum = 3407981;BA.debugLine="Dim HIST_RA_TENDENCIA As String = records(RES"; + //BA.debugLineNum = 1119;BA.debugLine="Dim HIST_RA_TENDENCIA As String = records(RES"; _hist_ra_tendencia = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_TENDENCIA"))))]); -RDebugUtils.currentLine=3407982; - //BA.debugLineNum = 3407982;BA.debugLine="Dim HIST_RA_ALCANCE As String = records(RESUL"; + //BA.debugLineNum = 1120;BA.debugLine="Dim HIST_RA_ALCANCE As String = records(RESUL"; _hist_ra_alcance = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_ALCANCE"))))]); -RDebugUtils.currentLine=3407983; - //BA.debugLineNum = 3407983;BA.debugLine="Dim HISR_RA_DRAOBJ As String = records(RESULT"; + //BA.debugLineNum = 1121;BA.debugLine="Dim HISR_RA_DRAOBJ As String = records(RESULT"; _hisr_ra_draobj = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HISR_RA_DRAOBJ"))))]); -RDebugUtils.currentLine=3407984; - //BA.debugLineNum = 3407984;BA.debugLine="Dim HIST_RA_DRAVTA As String = records(RESULT"; + //BA.debugLineNum = 1122;BA.debugLine="Dim HIST_RA_DRAVTA As String = records(RESULT"; _hist_ra_dravta = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_DRAVTA"))))]); -RDebugUtils.currentLine=3407985; - //BA.debugLineNum = 3407985;BA.debugLine="Dim HIST_RA_DSOBJ As String = records(RESULT."; + //BA.debugLineNum = 1123;BA.debugLine="Dim HIST_RA_DSOBJ As String = records(RESULT."; _hist_ra_dsobj = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_DSOBJ"))))]); -RDebugUtils.currentLine=3407986; - //BA.debugLineNum = 3407986;BA.debugLine="Dim HIST_RA_DSVTA As String = records(RESULT."; + //BA.debugLineNum = 1124;BA.debugLine="Dim HIST_RA_DSVTA As String = records(RESULT."; _hist_ra_dsvta = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_DSVTA"))))]); -RDebugUtils.currentLine=3407987; - //BA.debugLineNum = 3407987;BA.debugLine="Dim HIST_RA_VPOOBJ As String = records(RESULT"; + //BA.debugLineNum = 1125;BA.debugLine="Dim HIST_RA_VPOOBJ As String = records(RESULT"; _hist_ra_vpoobj = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_VPOOBJ"))))]); -RDebugUtils.currentLine=3407988; - //BA.debugLineNum = 3407988;BA.debugLine="Dim HIST_RA_VPOVTA As String = records(RESULT"; + //BA.debugLineNum = 1126;BA.debugLine="Dim HIST_RA_VPOVTA As String = records(RESULT"; _hist_ra_vpovta = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_VPOVTA"))))]); -RDebugUtils.currentLine=3407989; - //BA.debugLineNum = 3407989;BA.debugLine="Dim HIST_RA_CTES As String = records(RESULT.C"; + //BA.debugLineNum = 1127;BA.debugLine="Dim HIST_RA_CTES As String = records(RESULT.C"; _hist_ra_ctes = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_CTES"))))]); -RDebugUtils.currentLine=3407990; - //BA.debugLineNum = 3407990;BA.debugLine="Dim HIST_RA_COBCCC As String = records(RESULT"; + //BA.debugLineNum = 1128;BA.debugLine="Dim HIST_RA_COBCCC As String = records(RESULT"; _hist_ra_cobccc = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_COBCCC"))))]); -RDebugUtils.currentLine=3407991; - //BA.debugLineNum = 3407991;BA.debugLine="Dim HIST_RA_ECO As String = records(RESULT.Co"; + //BA.debugLineNum = 1129;BA.debugLine="Dim HIST_RA_ECO As String = records(RESULT.Co"; _hist_ra_eco = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_ECO"))))]); -RDebugUtils.currentLine=3407992; - //BA.debugLineNum = 3407992;BA.debugLine="Dim HIST_RA_VISITPLAN As String = records(RES"; + //BA.debugLineNum = 1130;BA.debugLine="Dim HIST_RA_VISITPLAN As String = records(RES"; _hist_ra_visitplan = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_VISITPLAN"))))]); -RDebugUtils.currentLine=3407993; - //BA.debugLineNum = 3407993;BA.debugLine="Dim HIST_RA_VISIREAL As String = records(RESU"; + //BA.debugLineNum = 1131;BA.debugLine="Dim HIST_RA_VISIREAL As String = records(RESU"; _hist_ra_visireal = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_VISIREAL"))))]); -RDebugUtils.currentLine=3407994; - //BA.debugLineNum = 3407994;BA.debugLine="Dim HIST_RA_COBVISIT As String = records(RESU"; + //BA.debugLineNum = 1132;BA.debugLine="Dim HIST_RA_COBVISIT As String = records(RESU"; _hist_ra_cobvisit = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_COBVISIT"))))]); -RDebugUtils.currentLine=3407995; - //BA.debugLineNum = 3407995;BA.debugLine="Dim HIST_RA_FRECCOMPOBJ As String = records(R"; + //BA.debugLineNum = 1133;BA.debugLine="Dim HIST_RA_FRECCOMPOBJ As String = records(R"; _hist_ra_freccompobj = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_FRECCOMPOBJ"))))]); -RDebugUtils.currentLine=3407996; - //BA.debugLineNum = 3407996;BA.debugLine="Dim HIST_RA_FRECCOMREAL As String = records(R"; + //BA.debugLineNum = 1134;BA.debugLine="Dim HIST_RA_FRECCOMREAL As String = records(R"; _hist_ra_freccomreal = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_FRECCOMREAL"))))]); -RDebugUtils.currentLine=3407997; - //BA.debugLineNum = 3407997;BA.debugLine="Dim HIST_RA_VENTAMES1 As String = records(RES"; + //BA.debugLineNum = 1135;BA.debugLine="Dim HIST_RA_VENTAMES1 As String = records(RES"; _hist_ra_ventames1 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_VENTAMES1"))))]); -RDebugUtils.currentLine=3407998; - //BA.debugLineNum = 3407998;BA.debugLine="Dim HIST_RA_VENTAMES2 As String = records(RES"; + //BA.debugLineNum = 1136;BA.debugLine="Dim HIST_RA_VENTAMES2 As String = records(RES"; _hist_ra_ventames2 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_VENTAMES2"))))]); -RDebugUtils.currentLine=3407999; - //BA.debugLineNum = 3407999;BA.debugLine="Dim HIST_RA_VENTAMES3 As String = records(RES"; + //BA.debugLineNum = 1137;BA.debugLine="Dim HIST_RA_VENTAMES3 As String = records(RES"; _hist_ra_ventames3 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_VENTAMES3"))))]); -RDebugUtils.currentLine=3408000; - //BA.debugLineNum = 3408000;BA.debugLine="Dim HIST_RA_VENTAMES4 As String = records(RES"; + //BA.debugLineNum = 1138;BA.debugLine="Dim HIST_RA_VENTAMES4 As String = records(RES"; _hist_ra_ventames4 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_VENTAMES4"))))]); -RDebugUtils.currentLine=3408001; - //BA.debugLineNum = 3408001;BA.debugLine="Dim HIST_RA_RECHAZO As String = records(RESUL"; + //BA.debugLineNum = 1139;BA.debugLine="Dim HIST_RA_RECHAZO As String = records(RESUL"; _hist_ra_rechazo = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_RECHAZO"))))]); -RDebugUtils.currentLine=3408002; - //BA.debugLineNum = 3408002;BA.debugLine="Dim HIST_RA_RECHAZOPORCEN As String = records"; + //BA.debugLineNum = 1140;BA.debugLine="Dim HIST_RA_RECHAZOPORCEN As String = records"; _hist_ra_rechazoporcen = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_RECHAZOPORCEN"))))]); -RDebugUtils.currentLine=3408003; - //BA.debugLineNum = 3408003;BA.debugLine="Dim HIST_RA_SEMANA1 As String = records(RESUL"; + //BA.debugLineNum = 1141;BA.debugLine="Dim HIST_RA_SEMANA1 As String = records(RESUL"; _hist_ra_semana1 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_SEMANA1"))))]); -RDebugUtils.currentLine=3408004; - //BA.debugLineNum = 3408004;BA.debugLine="Dim HIST_RA_SEMANA1_DIAS As String = records("; + //BA.debugLineNum = 1142;BA.debugLine="Dim HIST_RA_SEMANA1_DIAS As String = records("; _hist_ra_semana1_dias = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_SEMANA1_DIAS"))))]); -RDebugUtils.currentLine=3408005; - //BA.debugLineNum = 3408005;BA.debugLine="Dim HIST_RA_SEMANA1_DRA As String = records(R"; + //BA.debugLineNum = 1143;BA.debugLine="Dim HIST_RA_SEMANA1_DRA As String = records(R"; _hist_ra_semana1_dra = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_SEMANA1_DRA"))))]); -RDebugUtils.currentLine=3408006; - //BA.debugLineNum = 3408006;BA.debugLine="Dim HIST_RA_SEMANA2 As String = records(RESUL"; + //BA.debugLineNum = 1144;BA.debugLine="Dim HIST_RA_SEMANA2 As String = records(RESUL"; _hist_ra_semana2 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_SEMANA2"))))]); -RDebugUtils.currentLine=3408007; - //BA.debugLineNum = 3408007;BA.debugLine="Dim HIST_RA_SEMANA2_DIAS As String = records("; + //BA.debugLineNum = 1145;BA.debugLine="Dim HIST_RA_SEMANA2_DIAS As String = records("; _hist_ra_semana2_dias = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_SEMANA2_DIAS"))))]); -RDebugUtils.currentLine=3408008; - //BA.debugLineNum = 3408008;BA.debugLine="Dim HIST_RA_SEMANA2_DRA As String = records(R"; + //BA.debugLineNum = 1146;BA.debugLine="Dim HIST_RA_SEMANA2_DRA As String = records(R"; _hist_ra_semana2_dra = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_SEMANA2_DRA"))))]); -RDebugUtils.currentLine=3408009; - //BA.debugLineNum = 3408009;BA.debugLine="Dim HIST_RA_SEMANA3 As String = records(RESUL"; + //BA.debugLineNum = 1147;BA.debugLine="Dim HIST_RA_SEMANA3 As String = records(RESUL"; _hist_ra_semana3 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_SEMANA3"))))]); -RDebugUtils.currentLine=3408010; - //BA.debugLineNum = 3408010;BA.debugLine="Dim HIST_RA_SEMANA3_DIAS As String = records("; + //BA.debugLineNum = 1148;BA.debugLine="Dim HIST_RA_SEMANA3_DIAS As String = records("; _hist_ra_semana3_dias = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_SEMANA3_DIAS"))))]); -RDebugUtils.currentLine=3408011; - //BA.debugLineNum = 3408011;BA.debugLine="Dim HIST_RA_SEMANA3_DRA As String = records(R"; + //BA.debugLineNum = 1149;BA.debugLine="Dim HIST_RA_SEMANA3_DRA As String = records(R"; _hist_ra_semana3_dra = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_SEMANA3_DRA"))))]); -RDebugUtils.currentLine=3408012; - //BA.debugLineNum = 3408012;BA.debugLine="Dim HIST_RA_SEMANA4 As String = records(RESUL"; + //BA.debugLineNum = 1150;BA.debugLine="Dim HIST_RA_SEMANA4 As String = records(RESUL"; _hist_ra_semana4 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_SEMANA4"))))]); -RDebugUtils.currentLine=3408013; - //BA.debugLineNum = 3408013;BA.debugLine="Dim HIST_RA_SEMANA4_DIAS As String = records("; + //BA.debugLineNum = 1151;BA.debugLine="Dim HIST_RA_SEMANA4_DIAS As String = records("; _hist_ra_semana4_dias = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_SEMANA4_DIAS"))))]); -RDebugUtils.currentLine=3408014; - //BA.debugLineNum = 3408014;BA.debugLine="Dim HIST_RA_SEMANA4_DRA As String = records(R"; + //BA.debugLineNum = 1152;BA.debugLine="Dim HIST_RA_SEMANA4_DRA As String = records(R"; _hist_ra_semana4_dra = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_SEMANA4_DRA"))))]); -RDebugUtils.currentLine=3408015; - //BA.debugLineNum = 3408015;BA.debugLine="Dim HIST_RA_SEMANA5 As String = records(RESUL"; + //BA.debugLineNum = 1153;BA.debugLine="Dim HIST_RA_SEMANA5 As String = records(RESUL"; _hist_ra_semana5 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_SEMANA5"))))]); -RDebugUtils.currentLine=3408016; - //BA.debugLineNum = 3408016;BA.debugLine="Dim HIST_RA_SEMANA5_DIAS As String = records("; + //BA.debugLineNum = 1154;BA.debugLine="Dim HIST_RA_SEMANA5_DIAS As String = records("; _hist_ra_semana5_dias = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_SEMANA5_DIAS"))))]); -RDebugUtils.currentLine=3408017; - //BA.debugLineNum = 3408017;BA.debugLine="Dim HIST_RA_SEMANA5_DRA As String = records(R"; + //BA.debugLineNum = 1155;BA.debugLine="Dim HIST_RA_SEMANA5_DRA As String = records(R"; _hist_ra_semana5_dra = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_SEMANA5_DRA"))))]); -RDebugUtils.currentLine=3408018; - //BA.debugLineNum = 3408018;BA.debugLine="Dim HIST_RA_SEMANA1_LPT As String = records(R"; + //BA.debugLineNum = 1156;BA.debugLine="Dim HIST_RA_SEMANA1_LPT As String = records(R"; _hist_ra_semana1_lpt = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_SEMANA1_LPT"))))]); -RDebugUtils.currentLine=3408019; - //BA.debugLineNum = 3408019;BA.debugLine="Dim HIST_RA_SEMANA2_LPT As String = records(R"; + //BA.debugLineNum = 1157;BA.debugLine="Dim HIST_RA_SEMANA2_LPT As String = records(R"; _hist_ra_semana2_lpt = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_SEMANA2_LPT"))))]); -RDebugUtils.currentLine=3408020; - //BA.debugLineNum = 3408020;BA.debugLine="Dim HIST_RA_SEMANA3_LPT As String = records(R"; + //BA.debugLineNum = 1158;BA.debugLine="Dim HIST_RA_SEMANA3_LPT As String = records(R"; _hist_ra_semana3_lpt = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_SEMANA3_LPT"))))]); -RDebugUtils.currentLine=3408021; - //BA.debugLineNum = 3408021;BA.debugLine="Dim HIST_RA_SEMANA4_LPT As String = records(R"; + //BA.debugLineNum = 1159;BA.debugLine="Dim HIST_RA_SEMANA4_LPT As String = records(R"; _hist_ra_semana4_lpt = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_SEMANA4_LPT"))))]); -RDebugUtils.currentLine=3408022; - //BA.debugLineNum = 3408022;BA.debugLine="Dim HIST_RA_SEMANA5_LPT As String = records(R"; + //BA.debugLineNum = 1160;BA.debugLine="Dim HIST_RA_SEMANA5_LPT As String = records(R"; _hist_ra_semana5_lpt = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_SEMANA5_LPT"))))]); -RDebugUtils.currentLine=3408023; - //BA.debugLineNum = 3408023;BA.debugLine="Dim HIST_RA_RUTA As String = records(RESULT.C"; + //BA.debugLineNum = 1161;BA.debugLine="Dim HIST_RA_RUTA As String = records(RESULT.C"; _hist_ra_ruta = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_RUTA"))))]); -RDebugUtils.currentLine=3408024; - //BA.debugLineNum = 3408024;BA.debugLine="Dim HIST_RA_IDALMACEN As String = records(RES"; + //BA.debugLineNum = 1162;BA.debugLine="Dim HIST_RA_IDALMACEN As String = records(RES"; _hist_ra_idalmacen = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_RA_IDALMACEN"))))]); -RDebugUtils.currentLine=3408026; - //BA.debugLineNum = 3408026;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; + //BA.debugLineNum = 1164;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO HIST_RESUM_APK(HIST_RA_OBJMES,HIST_RA_VENTA,HIST_RA_TENDENCIA,HIST_RA_ALCANCE,HISR_RA_DRAOBJ,HIST_RA_DRAVTA,HIST_RA_DSOBJ,HIST_RA_DSVTA,HIST_RA_VPOOBJ,HIST_RA_VPOVTA,HIST_RA_CTES,HIST_RA_COBCCC,HIST_RA_ECO,HIST_RA_VISITPLAN,HIST_RA_VISIREAL,HIST_RA_COBVISIT,HIST_RA_FRECCOMPOBJ,HIST_RA_FRECCOMREAL,HIST_RA_VENTAMES1,HIST_RA_VENTAMES2,HIST_RA_VENTAMES3,HIST_RA_VENTAMES4,HIST_RA_RECHAZO,HIST_RA_RECHAZOPORCEN,HIST_RA_SEMANA1,HIST_RA_SEMANA1_DIAS,HIST_RA_SEMANA1_DRA,HIST_RA_SEMANA2,HIST_RA_SEMANA2_DIAS,HIST_RA_SEMANA2_DRA,HIST_RA_SEMANA3,HIST_RA_SEMANA3_DIAS,HIST_RA_SEMANA3_DRA,HIST_RA_SEMANA4,HIST_RA_SEMANA4_DIAS,HIST_RA_SEMANA4_DRA,HIST_RA_SEMANA5,HIST_RA_SEMANA5_DIAS,HIST_RA_SEMANA5_DRA,HIST_RA_SEMANA1_LPT,HIST_RA_SEMANA2_LPT,HIST_RA_SEMANA3_LPT,HIST_RA_SEMANA4_LPT,HIST_RA_SEMANA5_LPT,HIST_RA_RUTA,HIST_RA_IDALMACEN) VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_hist_ra_objmes),(Object)(_hist_ra_venta),(Object)(_hist_ra_tendencia),(Object)(_hist_ra_alcance),(Object)(_hisr_ra_draobj),(Object)(_hist_ra_dravta),(Object)(_hist_ra_dsobj),(Object)(_hist_ra_dsvta),(Object)(_hist_ra_vpoobj),(Object)(_hist_ra_vpovta),(Object)(_hist_ra_ctes),(Object)(_hist_ra_cobccc),(Object)(_hist_ra_eco),(Object)(_hist_ra_visitplan),(Object)(_hist_ra_visireal),(Object)(_hist_ra_cobvisit),(Object)(_hist_ra_freccompobj),(Object)(_hist_ra_freccomreal),(Object)(_hist_ra_ventames1),(Object)(_hist_ra_ventames2),(Object)(_hist_ra_ventames3),(Object)(_hist_ra_ventames4),(Object)(_hist_ra_rechazo),(Object)(_hist_ra_rechazoporcen),(Object)(_hist_ra_semana1),(Object)(_hist_ra_semana1_dias),(Object)(_hist_ra_semana1_dra),(Object)(_hist_ra_semana2),(Object)(_hist_ra_semana2_dias),(Object)(_hist_ra_semana2_dra),(Object)(_hist_ra_semana3),(Object)(_hist_ra_semana3_dias),(Object)(_hist_ra_semana3_dra),(Object)(_hist_ra_semana4),(Object)(_hist_ra_semana4_dias),(Object)(_hist_ra_semana4_dra),(Object)(_hist_ra_semana5),(Object)(_hist_ra_semana5_dias),(Object)(_hist_ra_semana5_dra),(Object)(_hist_ra_semana1_lpt),(Object)(_hist_ra_semana2_lpt),(Object)(_hist_ra_semana3_lpt),(Object)(_hist_ra_semana4_lpt),(Object)(_hist_ra_semana5_lpt),(Object)(_hist_ra_ruta),(Object)(_hist_ra_idalmacen)})); } }; -RDebugUtils.currentLine=3408029; - //BA.debugLineNum = 3408029;BA.debugLine="Listo1 = 1"; -__ref._listo1 /*String*/ = BA.NumberToString(1); -RDebugUtils.currentLine=3408030; - //BA.debugLineNum = 3408030;BA.debugLine="S_CC.Text = \"LISTO\""; -__ref._s_cc /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("LISTO")); -RDebugUtils.currentLine=3408031; - //BA.debugLineNum = 3408031;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; + //BA.debugLineNum = 1167;BA.debugLine="Listo1 = 1"; +_listo1 = BA.NumberToString(1); + //BA.debugLineNum = 1168;BA.debugLine="S_CC.Text = \"LISTO\""; +_s_cc.setText(BA.ObjectToCharSequence("LISTO")); + //BA.debugLineNum = 1169;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; if ((_starter._marcacel /*String*/ ).equals("Sony") == false) { __c.ToastMessageShow(BA.ObjectToCharSequence("Catalogo Resumen Actualizado."),__c.True);}; }; }; -RDebugUtils.currentLine=3408035; - //BA.debugLineNum = 3408035;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1173;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408036; - //BA.debugLineNum = 3408036;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408037; - //BA.debugLineNum = 3408037;BA.debugLine="If RESULT.Tag = \"hist_promos\" Then 'query tag"; + //BA.debugLineNum = 1174;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1175;BA.debugLine="If RESULT.Tag = \"hist_promos\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("hist_promos"))) { -RDebugUtils.currentLine=3408038; - //BA.debugLineNum = 3408038;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1176;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group153 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen153 = group153.getSize() @@ -4087,62 +2963,41 @@ final int groupLen153 = group153.getSize() ; for (; index153 < groupLen153;index153++){ _records = (Object[])(group153.Get(index153)); -RDebugUtils.currentLine=3408039; - //BA.debugLineNum = 3408039;BA.debugLine="Dim HP_CLIENTE As String = records(RESULT.Col"; + //BA.debugLineNum = 1177;BA.debugLine="Dim HP_CLIENTE As String = records(RESULT.Col"; _hp_cliente = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HP_CLIENTE"))))]); -RDebugUtils.currentLine=3408040; - //BA.debugLineNum = 3408040;BA.debugLine="Dim HP_CODIGO_PROMOCION As String = records(R"; + //BA.debugLineNum = 1178;BA.debugLine="Dim HP_CODIGO_PROMOCION As String = records(R"; _hp_codigo_promocion = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HP_CODIGO_PROMOCION"))))]); -RDebugUtils.currentLine=3408041; - //BA.debugLineNum = 3408041;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; + //BA.debugLineNum = 1179;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO HIST_PROMOS(HP_CLIENTE, HP_CODIGO_PROMOCION) VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_hp_cliente),(Object)(_hp_codigo_promocion)})); } }; -RDebugUtils.currentLine=3408043; - //BA.debugLineNum = 3408043;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; + //BA.debugLineNum = 1181;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; if ((_starter._marcacel /*String*/ ).equals("Sony") == false) { __c.ToastMessageShow(BA.ObjectToCharSequence("Historico Promociones Actualizado."),__c.True);}; -RDebugUtils.currentLine=3408044; - //BA.debugLineNum = 3408044;BA.debugLine="If PB1.Progress = 0 Then"; -if (__ref._pb1 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()==0) { -RDebugUtils.currentLine=3408045; - //BA.debugLineNum = 3408045;BA.debugLine="PB1.Progress = 30"; -__ref._pb1 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (30)); -RDebugUtils.currentLine=3408046; - //BA.debugLineNum = 3408046;BA.debugLine="S_CH.Text = \"CARGANDO\""; -__ref._s_ch /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("CARGANDO")); - }else -{RDebugUtils.currentLine=3408047; - //BA.debugLineNum = 3408047;BA.debugLine="ELSE If PB1.Progress = 30 Then"; -if (__ref._pb1 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()==30) { -RDebugUtils.currentLine=3408048; - //BA.debugLineNum = 3408048;BA.debugLine="PB1.Progress = 60"; -__ref._pb1 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (60)); - }else -{RDebugUtils.currentLine=3408049; - //BA.debugLineNum = 3408049;BA.debugLine="ELSE IF PB1.Progress = 60 Then"; -if (__ref._pb1 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()==60) { -RDebugUtils.currentLine=3408050; - //BA.debugLineNum = 3408050;BA.debugLine="PB1.Progress = 100"; -__ref._pb1 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (100)); -RDebugUtils.currentLine=3408051; - //BA.debugLineNum = 3408051;BA.debugLine="S_CH.Text = \"LISTO\""; -__ref._s_ch /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("LISTO")); - }}} -; + //BA.debugLineNum = 1182;BA.debugLine="If PB1.Progress = 0 Then"; +if (_pb1.getProgress()==0) { + //BA.debugLineNum = 1183;BA.debugLine="PB1.Progress = 30"; +_pb1.setProgress((int) (30)); + //BA.debugLineNum = 1184;BA.debugLine="S_CH.Text = \"CARGANDO\""; +_s_ch.setText(BA.ObjectToCharSequence("CARGANDO")); + }else if(_pb1.getProgress()==30) { + //BA.debugLineNum = 1186;BA.debugLine="PB1.Progress = 60"; +_pb1.setProgress((int) (60)); + }else if(_pb1.getProgress()==60) { + //BA.debugLineNum = 1188;BA.debugLine="PB1.Progress = 100"; +_pb1.setProgress((int) (100)); + //BA.debugLineNum = 1189;BA.debugLine="S_CH.Text = \"LISTO\""; +_s_ch.setText(BA.ObjectToCharSequence("LISTO")); }; }; -RDebugUtils.currentLine=3408056; - //BA.debugLineNum = 3408056;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + }; + //BA.debugLineNum = 1194;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408057; - //BA.debugLineNum = 3408057;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408058; - //BA.debugLineNum = 3408058;BA.debugLine="If RESULT.Tag = \"hist_cliente_promos\" Then 'que"; + //BA.debugLineNum = 1195;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1196;BA.debugLine="If RESULT.Tag = \"hist_cliente_promos\" Then 'que"; if ((_result.Tag /*Object*/ ).equals((Object)("hist_cliente_promos"))) { -RDebugUtils.currentLine=3408059; - //BA.debugLineNum = 3408059;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1197;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group173 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen173 = group173.getSize() @@ -4150,37 +3005,28 @@ final int groupLen173 = group173.getSize() ; for (; index173 < groupLen173;index173++){ _records = (Object[])(group173.Get(index173)); -RDebugUtils.currentLine=3408060; - //BA.debugLineNum = 3408060;BA.debugLine="Dim HCCP_CLIENTE As String = records(RESULT.C"; + //BA.debugLineNum = 1198;BA.debugLine="Dim HCCP_CLIENTE As String = records(RESULT.C"; _hccp_cliente = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HCCP_CLIENTE"))))]); -RDebugUtils.currentLine=3408061; - //BA.debugLineNum = 3408061;BA.debugLine="Dim HCCP_PROMO As String = records(RESULT.Col"; + //BA.debugLineNum = 1199;BA.debugLine="Dim HCCP_PROMO As String = records(RESULT.Col"; _hccp_promo = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HCCP_PROMO"))))]); -RDebugUtils.currentLine=3408062; - //BA.debugLineNum = 3408062;BA.debugLine="Dim HCCP_CANT As String = records(RESULT.Colu"; + //BA.debugLineNum = 1200;BA.debugLine="Dim HCCP_CANT As String = records(RESULT.Colu"; _hccp_cant = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HCCP_CANT"))))]); -RDebugUtils.currentLine=3408063; - //BA.debugLineNum = 3408063;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; + //BA.debugLineNum = 1201;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO HIST_CLIENTE_CANT_PROMOS(HCCP_CLIENTE, HCCP_PROMO, HCCP_CANT) VALUES (?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_hccp_cliente),(Object)(_hccp_promo),(Object)(_hccp_cant)})); } }; -RDebugUtils.currentLine=3408065; - //BA.debugLineNum = 3408065;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; + //BA.debugLineNum = 1203;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; if ((_starter._marcacel /*String*/ ).equals("Sony") == false) { __c.ToastMessageShow(BA.ObjectToCharSequence(" Historico Clientes Promociones Actualizado."),__c.True);}; }; }; -RDebugUtils.currentLine=3408069; - //BA.debugLineNum = 3408069;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1207;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408070; - //BA.debugLineNum = 3408070;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408071; - //BA.debugLineNum = 3408071;BA.debugLine="If RESULT.Tag = \"HIST_MARCAS_CUOTAS\" Then 'quer"; + //BA.debugLineNum = 1208;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1209;BA.debugLine="If RESULT.Tag = \"HIST_MARCAS_CUOTAS\" Then 'quer"; if ((_result.Tag /*Object*/ ).equals((Object)("HIST_MARCAS_CUOTAS"))) { -RDebugUtils.currentLine=3408072; - //BA.debugLineNum = 3408072;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1210;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group185 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen185 = group185.getSize() @@ -4188,34 +3034,26 @@ final int groupLen185 = group185.getSize() ; for (; index185 < groupLen185;index185++){ _records = (Object[])(group185.Get(index185)); -RDebugUtils.currentLine=3408073; - //BA.debugLineNum = 3408073;BA.debugLine="Dim HMC_MARCA As String = records(RESULT.Colu"; + //BA.debugLineNum = 1211;BA.debugLine="Dim HMC_MARCA As String = records(RESULT.Colu"; _hmc_marca = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HMC_MARCA"))))]); -RDebugUtils.currentLine=3408074; - //BA.debugLineNum = 3408074;BA.debugLine="Dim HMC_TOTAL As String = records(RESULT.Colu"; + //BA.debugLineNum = 1212;BA.debugLine="Dim HMC_TOTAL As String = records(RESULT.Colu"; _hmc_total = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HMC_TOTAL"))))]); -RDebugUtils.currentLine=3408075; - //BA.debugLineNum = 3408075;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; + //BA.debugLineNum = 1213;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO HIST_MARCAS_CUOTAS(HMC_MARCA, HMC_TOTAL) VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_hmc_marca),(Object)(_hmc_total)})); } }; -RDebugUtils.currentLine=3408077; - //BA.debugLineNum = 3408077;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; + //BA.debugLineNum = 1215;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; if ((_starter._marcacel /*String*/ ).equals("Sony") == false) { __c.ToastMessageShow(BA.ObjectToCharSequence(" Historico Marcas"),__c.True);}; }; }; -RDebugUtils.currentLine=3408081; - //BA.debugLineNum = 3408081;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1219;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408082; - //BA.debugLineNum = 3408082;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408083; - //BA.debugLineNum = 3408083;BA.debugLine="If RESULT.Tag = \"hist_comp_promos\" Then 'query"; + //BA.debugLineNum = 1220;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1221;BA.debugLine="If RESULT.Tag = \"hist_comp_promos\" Then 'query"; if ((_result.Tag /*Object*/ ).equals((Object)("hist_comp_promos"))) { -RDebugUtils.currentLine=3408084; - //BA.debugLineNum = 3408084;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1222;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group196 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen196 = group196.getSize() @@ -4223,64 +3061,42 @@ final int groupLen196 = group196.getSize() ; for (; index196 < groupLen196;index196++){ _records = (Object[])(group196.Get(index196)); -RDebugUtils.currentLine=3408085; - //BA.debugLineNum = 3408085;BA.debugLine="Dim CAT_PA_ID As String = records(RESULT.Colu"; + //BA.debugLineNum = 1223;BA.debugLine="Dim CAT_PA_ID As String = records(RESULT.Colu"; _cat_pa_id = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_PA_ID"))))]); -RDebugUtils.currentLine=3408086; - //BA.debugLineNum = 3408086;BA.debugLine="Dim CAT_PA_MAXPROM As String = records(RESULT"; + //BA.debugLineNum = 1224;BA.debugLine="Dim CAT_PA_MAXPROM As String = records(RESULT"; _cat_pa_maxprom = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_PA_MAXPROM"))))]); -RDebugUtils.currentLine=3408087; - //BA.debugLineNum = 3408087;BA.debugLine="Dim CAT_PA_MAXPROMREC As String = records(RES"; + //BA.debugLineNum = 1225;BA.debugLine="Dim CAT_PA_MAXPROMREC As String = records(RES"; _cat_pa_maxpromrec = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_PA_MAXPROMREC"))))]); -RDebugUtils.currentLine=3408088; - //BA.debugLineNum = 3408088;BA.debugLine="Dim CAT_PA_MAXPROMCLIE As String = records(RE"; + //BA.debugLineNum = 1226;BA.debugLine="Dim CAT_PA_MAXPROMCLIE As String = records(RE"; _cat_pa_maxpromclie = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_PA_MAXPROMCLIE"))))]); -RDebugUtils.currentLine=3408089; - //BA.debugLineNum = 3408089;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; + //BA.debugLineNum = 1227;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PROMOS_COMP(CAT_PA_ID, CAT_PA_MAXPROM, CAT_PA_MAXPROMREC, CAT_PA_MAXPROMCLIE) VALUES (?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cat_pa_id),(Object)(_cat_pa_maxprom),(Object)(_cat_pa_maxpromrec),(Object)(_cat_pa_maxpromclie)})); } }; -RDebugUtils.currentLine=3408091; - //BA.debugLineNum = 3408091;BA.debugLine="If PB1.Progress = 0 Then"; -if (__ref._pb1 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()==0) { -RDebugUtils.currentLine=3408092; - //BA.debugLineNum = 3408092;BA.debugLine="PB1.Progress = 30"; -__ref._pb1 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (30)); -RDebugUtils.currentLine=3408093; - //BA.debugLineNum = 3408093;BA.debugLine="S_CH.Text = \"CARGANDO\""; -__ref._s_ch /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("CARGANDO")); - }else -{RDebugUtils.currentLine=3408094; - //BA.debugLineNum = 3408094;BA.debugLine="ELSE If PB1.Progress = 30 Then"; -if (__ref._pb1 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()==30) { -RDebugUtils.currentLine=3408095; - //BA.debugLineNum = 3408095;BA.debugLine="PB1.Progress = 60"; -__ref._pb1 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (60)); - }else -{RDebugUtils.currentLine=3408096; - //BA.debugLineNum = 3408096;BA.debugLine="ELSE IF PB1.Progress = 60 Then"; -if (__ref._pb1 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()==60) { -RDebugUtils.currentLine=3408097; - //BA.debugLineNum = 3408097;BA.debugLine="PB1.Progress = 100"; -__ref._pb1 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (100)); -RDebugUtils.currentLine=3408098; - //BA.debugLineNum = 3408098;BA.debugLine="S_CH.Text = \"LISTO\""; -__ref._s_ch /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("LISTO")); - }}} -; + //BA.debugLineNum = 1229;BA.debugLine="If PB1.Progress = 0 Then"; +if (_pb1.getProgress()==0) { + //BA.debugLineNum = 1230;BA.debugLine="PB1.Progress = 30"; +_pb1.setProgress((int) (30)); + //BA.debugLineNum = 1231;BA.debugLine="S_CH.Text = \"CARGANDO\""; +_s_ch.setText(BA.ObjectToCharSequence("CARGANDO")); + }else if(_pb1.getProgress()==30) { + //BA.debugLineNum = 1233;BA.debugLine="PB1.Progress = 60"; +_pb1.setProgress((int) (60)); + }else if(_pb1.getProgress()==60) { + //BA.debugLineNum = 1235;BA.debugLine="PB1.Progress = 100"; +_pb1.setProgress((int) (100)); + //BA.debugLineNum = 1236;BA.debugLine="S_CH.Text = \"LISTO\""; +_s_ch.setText(BA.ObjectToCharSequence("LISTO")); }; }; -RDebugUtils.currentLine=3408103; - //BA.debugLineNum = 3408103;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + }; + //BA.debugLineNum = 1241;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408104; - //BA.debugLineNum = 3408104;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408105; - //BA.debugLineNum = 3408105;BA.debugLine="If RESULT.Tag = \"cat_verificacion\" Then 'query"; + //BA.debugLineNum = 1242;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1243;BA.debugLine="If RESULT.Tag = \"cat_verificacion\" Then 'query"; if ((_result.Tag /*Object*/ ).equals((Object)("cat_verificacion"))) { -RDebugUtils.currentLine=3408106; - //BA.debugLineNum = 3408106;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1244;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group217 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen217 = group217.getSize() @@ -4288,33 +3104,25 @@ final int groupLen217 = group217.getSize() ; for (; index217 < groupLen217;index217++){ _records = (Object[])(group217.Get(index217)); -RDebugUtils.currentLine=3408107; - //BA.debugLineNum = 3408107;BA.debugLine="Dim CAT_VE_IDPROD As String = records(RESULT."; + //BA.debugLineNum = 1245;BA.debugLine="Dim CAT_VE_IDPROD As String = records(RESULT."; _cat_ve_idprod = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_VE_IDPROD"))))]); -RDebugUtils.currentLine=3408108; - //BA.debugLineNum = 3408108;BA.debugLine="Dim CAT_VE_NOMBRE As String = records(RESULT."; + //BA.debugLineNum = 1246;BA.debugLine="Dim CAT_VE_NOMBRE As String = records(RESULT."; _cat_ve_nombre = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_VE_NOMBRE"))))]); -RDebugUtils.currentLine=3408109; - //BA.debugLineNum = 3408109;BA.debugLine="Dim CAT_VE_ORDEN As String = records(RESULT.C"; + //BA.debugLineNum = 1247;BA.debugLine="Dim CAT_VE_ORDEN As String = records(RESULT.C"; _cat_ve_orden = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_VE_ORDEN"))))]); -RDebugUtils.currentLine=3408110; - //BA.debugLineNum = 3408110;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; + //BA.debugLineNum = 1248;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO CAT_VERIFICACION(CAT_VE_IDPROD, CAT_VE_NOMBRE,CAT_VE_ORDEN) VALUES (?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cat_ve_idprod),(Object)(_cat_ve_nombre),(Object)(_cat_ve_orden)})); } }; }; }; -RDebugUtils.currentLine=3408115; - //BA.debugLineNum = 3408115;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1253;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408116; - //BA.debugLineNum = 3408116;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408117; - //BA.debugLineNum = 3408117;BA.debugLine="If RESULT.Tag = \"marcas_rutas\" Then 'query tag"; + //BA.debugLineNum = 1254;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1255;BA.debugLine="If RESULT.Tag = \"marcas_rutas\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("marcas_rutas"))) { -RDebugUtils.currentLine=3408118; - //BA.debugLineNum = 3408118;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1256;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group228 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen228 = group228.getSize() @@ -4322,30 +3130,23 @@ final int groupLen228 = group228.getSize() ; for (; index228 < groupLen228;index228++){ _records = (Object[])(group228.Get(index228)); -RDebugUtils.currentLine=3408119; - //BA.debugLineNum = 3408119;BA.debugLine="Dim HVD_MARCA As String = records(RESULT.Colu"; + //BA.debugLineNum = 1257;BA.debugLine="Dim HVD_MARCA As String = records(RESULT.Colu"; _hvd_marca = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HVD_MARCA"))))]); -RDebugUtils.currentLine=3408120; - //BA.debugLineNum = 3408120;BA.debugLine="Dim CLIENTES As String = records(RESULT.Colum"; + //BA.debugLineNum = 1258;BA.debugLine="Dim CLIENTES As String = records(RESULT.Colum"; _clientes = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CLIENTES"))))]); -RDebugUtils.currentLine=3408121; - //BA.debugLineNum = 3408121;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; + //BA.debugLineNum = 1259;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO MARCAS_RUTAS(HVD_MARCA, CLIENTES) VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_hvd_marca),(Object)(_clientes)})); } }; }; }; -RDebugUtils.currentLine=3408127; - //BA.debugLineNum = 3408127;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1265;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408128; - //BA.debugLineNum = 3408128;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408129; - //BA.debugLineNum = 3408129;BA.debugLine="If RESULT.Tag = \"CUOTAS\" Then 'query tag"; + //BA.debugLineNum = 1266;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1267;BA.debugLine="If RESULT.Tag = \"CUOTAS\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("CUOTAS"))) { -RDebugUtils.currentLine=3408130; - //BA.debugLineNum = 3408130;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1268;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group238 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen238 = group238.getSize() @@ -4353,63 +3154,45 @@ final int groupLen238 = group238.getSize() ; for (; index238 < groupLen238;index238++){ _records = (Object[])(group238.Get(index238)); -RDebugUtils.currentLine=3408131; - //BA.debugLineNum = 3408131;BA.debugLine="Dim HC_RUTA As String = records(RESULT.Column"; + //BA.debugLineNum = 1269;BA.debugLine="Dim HC_RUTA As String = records(RESULT.Column"; _hc_ruta = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HC_RUTA"))))]); -RDebugUtils.currentLine=3408132; - //BA.debugLineNum = 3408132;BA.debugLine="Dim HC_CUOTA1 As String = records(RESULT.Colu"; + //BA.debugLineNum = 1270;BA.debugLine="Dim HC_CUOTA1 As String = records(RESULT.Colu"; _hc_cuota1 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HC_CUOTA1"))))]); -RDebugUtils.currentLine=3408133; - //BA.debugLineNum = 3408133;BA.debugLine="Dim HC_CUOTA2 As String = records(RESULT.Colu"; + //BA.debugLineNum = 1271;BA.debugLine="Dim HC_CUOTA2 As String = records(RESULT.Colu"; _hc_cuota2 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HC_CUOTA2"))))]); -RDebugUtils.currentLine=3408134; - //BA.debugLineNum = 3408134;BA.debugLine="Dim HC_CUOTA3 As String = records(RESULT.Colu"; + //BA.debugLineNum = 1272;BA.debugLine="Dim HC_CUOTA3 As String = records(RESULT.Colu"; _hc_cuota3 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HC_CUOTA3"))))]); -RDebugUtils.currentLine=3408135; - //BA.debugLineNum = 3408135;BA.debugLine="Dim HC_CUOTA4 As String = records(RESULT.Colu"; + //BA.debugLineNum = 1273;BA.debugLine="Dim HC_CUOTA4 As String = records(RESULT.Colu"; _hc_cuota4 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HC_CUOTA4"))))]); -RDebugUtils.currentLine=3408136; - //BA.debugLineNum = 3408136;BA.debugLine="Dim HC_CUOTA5 As String = records(RESULT.Colu"; + //BA.debugLineNum = 1274;BA.debugLine="Dim HC_CUOTA5 As String = records(RESULT.Colu"; _hc_cuota5 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HC_CUOTA5"))))]); -RDebugUtils.currentLine=3408137; - //BA.debugLineNum = 3408137;BA.debugLine="Dim HC_CUOTA6 As String = records(RESULT.Colu"; + //BA.debugLineNum = 1275;BA.debugLine="Dim HC_CUOTA6 As String = records(RESULT.Colu"; _hc_cuota6 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HC_CUOTA6"))))]); -RDebugUtils.currentLine=3408138; - //BA.debugLineNum = 3408138;BA.debugLine="Dim HC_META1 As String = records(RESULT.Colum"; + //BA.debugLineNum = 1276;BA.debugLine="Dim HC_META1 As String = records(RESULT.Colum"; _hc_meta1 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HC_META1"))))]); -RDebugUtils.currentLine=3408139; - //BA.debugLineNum = 3408139;BA.debugLine="Dim HC_META2 As String = records(RESULT.Colum"; + //BA.debugLineNum = 1277;BA.debugLine="Dim HC_META2 As String = records(RESULT.Colum"; _hc_meta2 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HC_META2"))))]); -RDebugUtils.currentLine=3408140; - //BA.debugLineNum = 3408140;BA.debugLine="Dim HC_META3 As String = records(RESULT.Colum"; + //BA.debugLineNum = 1278;BA.debugLine="Dim HC_META3 As String = records(RESULT.Colum"; _hc_meta3 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HC_META3"))))]); -RDebugUtils.currentLine=3408141; - //BA.debugLineNum = 3408141;BA.debugLine="Dim HC_META4 As String = records(RESULT.Colum"; + //BA.debugLineNum = 1279;BA.debugLine="Dim HC_META4 As String = records(RESULT.Colum"; _hc_meta4 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HC_META4"))))]); -RDebugUtils.currentLine=3408142; - //BA.debugLineNum = 3408142;BA.debugLine="Dim HC_META5 As String = records(RESULT.Colum"; + //BA.debugLineNum = 1280;BA.debugLine="Dim HC_META5 As String = records(RESULT.Colum"; _hc_meta5 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HC_META5"))))]); -RDebugUtils.currentLine=3408143; - //BA.debugLineNum = 3408143;BA.debugLine="Dim HC_META6 As String = records(RESULT.Colum"; + //BA.debugLineNum = 1281;BA.debugLine="Dim HC_META6 As String = records(RESULT.Colum"; _hc_meta6 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HC_META6"))))]); -RDebugUtils.currentLine=3408144; - //BA.debugLineNum = 3408144;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; + //BA.debugLineNum = 1282;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO HIST_CUOTAS(HC_RUTA, HC_CUOTA1,HC_CUOTA2,HC_CUOTA3,HC_CUOTA4,HC_CUOTA5,HC_CUOTA6,HC_META1,HC_META2,HC_META3,HC_META4,HC_META5,HC_META6) VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_hc_ruta),(Object)(_hc_cuota1),(Object)(_hc_cuota2),(Object)(_hc_cuota3),(Object)(_hc_cuota4),(Object)(_hc_cuota5),(Object)(_hc_cuota6),(Object)(_hc_meta1),(Object)(_hc_meta2),(Object)(_hc_meta3),(Object)(_hc_meta4),(Object)(_hc_meta5),(Object)(_hc_meta6)})); } }; }; }; -RDebugUtils.currentLine=3408151; - //BA.debugLineNum = 3408151;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1289;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408152; - //BA.debugLineNum = 3408152;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408153; - //BA.debugLineNum = 3408153;BA.debugLine="If RESULT.Tag = \"COMISIONES\" Then 'query tag"; + //BA.debugLineNum = 1290;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1291;BA.debugLine="If RESULT.Tag = \"COMISIONES\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("COMISIONES"))) { -RDebugUtils.currentLine=3408154; - //BA.debugLineNum = 3408154;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1292;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group259 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen259 = group259.getSize() @@ -4417,40 +3200,30 @@ final int groupLen259 = group259.getSize() ; for (; index259 < groupLen259;index259++){ _records = (Object[])(group259.Get(index259)); -RDebugUtils.currentLine=3408155; - //BA.debugLineNum = 3408155;BA.debugLine="Dim HCM_TOTAL_V As String = records(RESULT.Co"; + //BA.debugLineNum = 1293;BA.debugLine="Dim HCM_TOTAL_V As String = records(RESULT.Co"; _hcm_total_v = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HCM_TOTAL_V"))))]); -RDebugUtils.currentLine=3408156; - //BA.debugLineNum = 3408156;BA.debugLine="Dim HCM_TOTAL_VIVE As String = records(RESULT"; + //BA.debugLineNum = 1294;BA.debugLine="Dim HCM_TOTAL_VIVE As String = records(RESULT"; _hcm_total_vive = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HCM_TOTAL_VIVE"))))]); -RDebugUtils.currentLine=3408157; - //BA.debugLineNum = 3408157;BA.debugLine="Dim HCM_TOTAL_GUNA As String = records(RESULT"; + //BA.debugLineNum = 1295;BA.debugLine="Dim HCM_TOTAL_GUNA As String = records(RESULT"; _hcm_total_guna = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HCM_TOTAL_GUNA"))))]); -RDebugUtils.currentLine=3408158; - //BA.debugLineNum = 3408158;BA.debugLine="Dim HCM_TOTAL_BEB As String = records(RESULT."; + //BA.debugLineNum = 1296;BA.debugLine="Dim HCM_TOTAL_BEB As String = records(RESULT."; _hcm_total_beb = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HCM_TOTAL_BEB"))))]); -RDebugUtils.currentLine=3408159; - //BA.debugLineNum = 3408159;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; + //BA.debugLineNum = 1297;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO HIST_COMISIONES_MOVIL (HCM_TOTAL_V , HCM_TOTAL_VIVE , HCM_TOTAL_GUNA , HCM_TOTAL_BEB) VALUES (?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_hcm_total_v),(Object)(_hcm_total_vive),(Object)(_hcm_total_guna),(Object)(_hcm_total_beb)})); } }; }; }; -RDebugUtils.currentLine=3408164; - //BA.debugLineNum = 3408164;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1302;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408165; - //BA.debugLineNum = 3408165;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408166; - //BA.debugLineNum = 3408166;BA.debugLine="If RESULT.Tag = \"gunaprod\" Then 'query tag"; + //BA.debugLineNum = 1303;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1304;BA.debugLine="If RESULT.Tag = \"gunaprod\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("gunaprod"))) { -RDebugUtils.currentLine=3408167; - //BA.debugLineNum = 3408167;BA.debugLine="If PB2.Progress < 30 Then S_CP.Text = \"CARGAND"; -if (__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()<30) { -__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("CARGANDO"));}; -RDebugUtils.currentLine=3408168; - //BA.debugLineNum = 3408168;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1305;BA.debugLine="If PB2.Progress < 30 Then S_CP.Text = \"CARGAND"; +if (_pb2.getProgress()<30) { +_s_cp.setText(BA.ObjectToCharSequence("CARGANDO"));}; + //BA.debugLineNum = 1306;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group272 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen272 = group272.getSize() @@ -4458,152 +3231,104 @@ final int groupLen272 = group272.getSize() ; for (; index272 < groupLen272;index272++){ _records = (Object[])(group272.Get(index272)); -RDebugUtils.currentLine=3408169; - //BA.debugLineNum = 3408169;BA.debugLine="Dim CAT_GP_ID As String = records(RESULT.Colu"; + //BA.debugLineNum = 1307;BA.debugLine="Dim CAT_GP_ID As String = records(RESULT.Colu"; _cat_gp_id = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_ID"))))]); -RDebugUtils.currentLine=3408170; - //BA.debugLineNum = 3408170;BA.debugLine="Dim CAT_GP_NOMBRE As String = records(RESULT."; + //BA.debugLineNum = 1308;BA.debugLine="Dim CAT_GP_NOMBRE As String = records(RESULT."; _cat_gp_nombre = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_NOMBRE"))))]); -RDebugUtils.currentLine=3408171; - //BA.debugLineNum = 3408171;BA.debugLine="Dim CAT_GP_IMP1 As String = records(RESULT.Co"; + //BA.debugLineNum = 1309;BA.debugLine="Dim CAT_GP_IMP1 As String = records(RESULT.Co"; _cat_gp_imp1 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_IMP1"))))]); -RDebugUtils.currentLine=3408172; - //BA.debugLineNum = 3408172;BA.debugLine="Dim CAT_GP_IMP2 As String = records(RESULT.Co"; + //BA.debugLineNum = 1310;BA.debugLine="Dim CAT_GP_IMP2 As String = records(RESULT.Co"; _cat_gp_imp2 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_IMP2"))))]); -RDebugUtils.currentLine=3408173; - //BA.debugLineNum = 3408173;BA.debugLine="Dim CAT_GP_PRECIO As String = records(RESULT."; + //BA.debugLineNum = 1311;BA.debugLine="Dim CAT_GP_PRECIO As String = records(RESULT."; _cat_gp_precio = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_PRECIO"))))]); -RDebugUtils.currentLine=3408174; - //BA.debugLineNum = 3408174;BA.debugLine="Dim CAT_GP_CLASIF As String = records(RESULT."; + //BA.debugLineNum = 1312;BA.debugLine="Dim CAT_GP_CLASIF As String = records(RESULT."; _cat_gp_clasif = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_CLASIF"))))]); -RDebugUtils.currentLine=3408175; - //BA.debugLineNum = 3408175;BA.debugLine="Dim CAT_GP_STS As String = records(RESULT.Col"; + //BA.debugLineNum = 1313;BA.debugLine="Dim CAT_GP_STS As String = records(RESULT.Col"; _cat_gp_sts = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_STS"))))]); -RDebugUtils.currentLine=3408176; - //BA.debugLineNum = 3408176;BA.debugLine="Dim CAT_GP_TIPO As String = records(RESULT.Co"; + //BA.debugLineNum = 1314;BA.debugLine="Dim CAT_GP_TIPO As String = records(RESULT.Co"; _cat_gp_tipo = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_TIPO"))))]); -RDebugUtils.currentLine=3408177; - //BA.debugLineNum = 3408177;BA.debugLine="Dim CAT_GP_SUBTIPO As String = records(RESULT"; + //BA.debugLineNum = 1315;BA.debugLine="Dim CAT_GP_SUBTIPO As String = records(RESULT"; _cat_gp_subtipo = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_SUBTIPO"))))]); -RDebugUtils.currentLine=3408178; - //BA.debugLineNum = 3408178;BA.debugLine="Dim CAT_GP_IMG() As Byte = records(RESULT.Col"; + //BA.debugLineNum = 1316;BA.debugLine="Dim CAT_GP_IMG() As Byte = records(RESULT.Col"; _cat_gp_img = (byte[])(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_IMG"))))]); -RDebugUtils.currentLine=3408179; - //BA.debugLineNum = 3408179;BA.debugLine="Dim CAT_GP_ALMACEN As Int = records(RESULT.Co"; + //BA.debugLineNum = 1317;BA.debugLine="Dim CAT_GP_ALMACEN As Int = records(RESULT.Co"; _cat_gp_almacen = (int)(BA.ObjectToNumber(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_ALMACEN"))))])); -RDebugUtils.currentLine=3408181; - //BA.debugLineNum = 3408181;BA.debugLine="Dim CAT_GP_TIPOPROD As Int = records(RESULT.C"; + //BA.debugLineNum = 1319;BA.debugLine="Dim CAT_GP_TIPOPROD As Int = records(RESULT.C"; _cat_gp_tipoprod = (int)(BA.ObjectToNumber(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_TIPOPROD"))))])); -RDebugUtils.currentLine=3408182; - //BA.debugLineNum = 3408182;BA.debugLine="Dim CAT_GP_INICIATIVA As Int = records(RESULT"; + //BA.debugLineNum = 1320;BA.debugLine="Dim CAT_GP_INICIATIVA As Int = records(RESULT"; _cat_gp_iniciativa = (int)(BA.ObjectToNumber(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_INICIATIVA"))))])); -RDebugUtils.currentLine=3408185; - //BA.debugLineNum = 3408185;BA.debugLine="Dim CAT_GP_TIPOPROD2 As String = records(RESU"; + //BA.debugLineNum = 1323;BA.debugLine="Dim CAT_GP_TIPOPROD2 As String = records(RESU"; _cat_gp_tipoprod2 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_DP_TIPOPROD2"))))]); -RDebugUtils.currentLine=3408188; - //BA.debugLineNum = 3408188;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; + //BA.debugLineNum = 1326;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO CAT_GUNAPROD(CAT_GP_ID,CAT_GP_NOMBRE,CAT_GP_IMP1,CAT_GP_IMP2,CAT_GP_PRECIO,CAT_GP_CLASIF,CAT_GP_STS,CAT_GP_TIPO,CAT_GP_SUBTIPO,CAT_GP_IMG,CAT_GP_ALMACEN,CAT_GP_TIPOPROD,CAT_GP_INICIATIVA,CAT_GP_TIPOPROD2) VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cat_gp_id),(Object)(_cat_gp_nombre),(Object)(_cat_gp_imp1),(Object)(_cat_gp_imp2),(Object)(_cat_gp_precio),(Object)(_cat_gp_clasif),(Object)(_cat_gp_sts),(Object)(_cat_gp_tipo),(Object)(_cat_gp_subtipo),(Object)(_cat_gp_img),(Object)(_cat_gp_almacen),(Object)(_cat_gp_tipoprod),(Object)(_cat_gp_iniciativa),(Object)(_cat_gp_tipoprod2)})); } }; -RDebugUtils.currentLine=3408190; - //BA.debugLineNum = 3408190;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQUERY(\"SELECT COU"; -__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 COUNT(*) AS CUANTOS FROM PEDIDO WHERE PE_CLIENTE <> 0"))); -RDebugUtils.currentLine=3408191; - //BA.debugLineNum = 3408191;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3408193; - //BA.debugLineNum = 3408193;BA.debugLine="cuantos_pedidosc = c.GetString(\"CUANTOS\")"; -__ref._cuantos_pedidosc /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS"); -RDebugUtils.currentLine=3408194; - //BA.debugLineNum = 3408194;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3408195; - //BA.debugLineNum = 3408195;BA.debugLine="If cuantos_pedidosc > 0 Then"; -if ((double)(Double.parseDouble(__ref._cuantos_pedidosc /*String*/ ))>0) { -RDebugUtils.currentLine=3408196; - //BA.debugLineNum = 3408196;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQUERY(\"SELECT PE"; -__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 PE_PROID, SUM(PE_CANT) AS PE_CANT FROM PEDIDO WHERE PE_CLIENTE <> 0 GROUP BY PE_PROID"))); -RDebugUtils.currentLine=3408197; - //BA.debugLineNum = 3408197;BA.debugLine="If c.RowCount>0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=3408198; - //BA.debugLineNum = 3408198;BA.debugLine="For i=0 To c.RowCount -1"; + //BA.debugLineNum = 1328;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQUERY(\"SELECT COU"; +_c = (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 COUNT(*) AS CUANTOS FROM PEDIDO WHERE PE_CLIENTE <> 0"))); + //BA.debugLineNum = 1329;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 1331;BA.debugLine="cuantos_pedidosc = c.GetString(\"CUANTOS\")"; +_cuantos_pedidosc = _c.GetString("CUANTOS"); + //BA.debugLineNum = 1332;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 1333;BA.debugLine="If cuantos_pedidosc > 0 Then"; +if ((double)(Double.parseDouble(_cuantos_pedidosc))>0) { + //BA.debugLineNum = 1334;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQUERY(\"SELECT PE"; +_c = (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 PE_PROID, SUM(PE_CANT) AS PE_CANT FROM PEDIDO WHERE PE_CLIENTE <> 0 GROUP BY PE_PROID"))); + //BA.debugLineNum = 1335;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 1336;BA.debugLine="For i=0 To c.RowCount -1"; { final int step296 = 1; -final int limit296 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit296 = (int) (_c.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit296 ;_i = _i + step296 ) { -RDebugUtils.currentLine=3408199; - //BA.debugLineNum = 3408199;BA.debugLine="c.Position=i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=3408200; - //BA.debugLineNum = 3408200;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"updat"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update CAT_GUNAPROD set CAT_GP_ALMACEN = CAT_GP_ALMACEN - ? where CAT_GP_ID = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_CANT")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_PROID"))})); + //BA.debugLineNum = 1337;BA.debugLine="c.Position=i"; +_c.setPosition(_i); + //BA.debugLineNum = 1338;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"updat"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update CAT_GUNAPROD set CAT_GP_ALMACEN = CAT_GP_ALMACEN - ? where CAT_GP_ID = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_c.GetString("PE_CANT")),(Object)(_c.GetString("PE_PROID"))})); } }; }; }; -RDebugUtils.currentLine=3408205; - //BA.debugLineNum = 3408205;BA.debugLine="Listo2=1"; -__ref._listo2 /*String*/ = BA.NumberToString(1); -RDebugUtils.currentLine=3408206; - //BA.debugLineNum = 3408206;BA.debugLine="If PB2.Progress = 0 Then"; -if (__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()==0) { -RDebugUtils.currentLine=3408207; - //BA.debugLineNum = 3408207;BA.debugLine="PB2.Progress = 30"; -__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (30)); -RDebugUtils.currentLine=3408208; - //BA.debugLineNum = 3408208;BA.debugLine="S_CP.Text = \"CARGANDO\""; -__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("CARGANDO")); - }else -{RDebugUtils.currentLine=3408209; - //BA.debugLineNum = 3408209;BA.debugLine="ELSE If PB2.Progress = 30 Then"; -if (__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()==30) { -RDebugUtils.currentLine=3408210; - //BA.debugLineNum = 3408210;BA.debugLine="PB2.Progress = 60"; -__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (60)); - }else -{RDebugUtils.currentLine=3408211; - //BA.debugLineNum = 3408211;BA.debugLine="ELSE IF PB2.Progress = 60 Then"; -if (__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()==60) { -RDebugUtils.currentLine=3408212; - //BA.debugLineNum = 3408212;BA.debugLine="PB2.Progress = 100"; -__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (100)); -RDebugUtils.currentLine=3408213; - //BA.debugLineNum = 3408213;BA.debugLine="S_CP.Text = \"LISTO\""; -__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("LISTO")); - }}} -; -RDebugUtils.currentLine=3408215; - //BA.debugLineNum = 3408215;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; + //BA.debugLineNum = 1343;BA.debugLine="Listo2=1"; +_listo2 = BA.NumberToString(1); + //BA.debugLineNum = 1344;BA.debugLine="If PB2.Progress = 0 Then"; +if (_pb2.getProgress()==0) { + //BA.debugLineNum = 1345;BA.debugLine="PB2.Progress = 30"; +_pb2.setProgress((int) (30)); + //BA.debugLineNum = 1346;BA.debugLine="S_CP.Text = \"CARGANDO\""; +_s_cp.setText(BA.ObjectToCharSequence("CARGANDO")); + }else if(_pb2.getProgress()==30) { + //BA.debugLineNum = 1348;BA.debugLine="PB2.Progress = 60"; +_pb2.setProgress((int) (60)); + }else if(_pb2.getProgress()==60) { + //BA.debugLineNum = 1350;BA.debugLine="PB2.Progress = 100"; +_pb2.setProgress((int) (100)); + //BA.debugLineNum = 1351;BA.debugLine="S_CP.Text = \"LISTO\""; +_s_cp.setText(BA.ObjectToCharSequence("LISTO")); + }; + //BA.debugLineNum = 1353;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; if ((_starter._marcacel /*String*/ ).equals("Sony") == false) { __c.ToastMessageShow(BA.ObjectToCharSequence("Productos Actualizados."),__c.True);}; -RDebugUtils.currentLine=3408216; - //BA.debugLineNum = 3408216;BA.debugLine="If Listo1 =1 And Listo2 =1 And Listo3 = 1 And"; -if ((__ref._listo1 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._listo2 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._listo3 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._listo4 /*String*/ ).equals(BA.NumberToString(1))) { -RDebugUtils.currentLine=3408217; - //BA.debugLineNum = 3408217;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*void*/ (null); -RDebugUtils.currentLine=3408218; - //BA.debugLineNum = 3408218;BA.debugLine="img2.Visible=False"; -__ref._img2 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3408219; - //BA.debugLineNum = 3408219;BA.debugLine="EJECUTANDO=0"; -__ref._ejecutando /*String*/ = BA.NumberToString(0); + //BA.debugLineNum = 1354;BA.debugLine="If Listo1 =1 And Listo2 =1 And Listo3 = 1 And"; +if ((_listo1).equals(BA.NumberToString(1)) && (_listo2).equals(BA.NumberToString(1)) && (_listo3).equals(BA.NumberToString(1)) && (_listo4).equals(BA.NumberToString(1))) { + //BA.debugLineNum = 1355;BA.debugLine="B4XPage_Appear"; +_b4xpage_appear(); + //BA.debugLineNum = 1356;BA.debugLine="img2.Visible=False"; +_img2.setVisible(__c.False); + //BA.debugLineNum = 1357;BA.debugLine="EJECUTANDO=0"; +_ejecutando = BA.NumberToString(0); }; }; }; -RDebugUtils.currentLine=3408224; - //BA.debugLineNum = 3408224;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1362;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408225; - //BA.debugLineNum = 3408225;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408226; - //BA.debugLineNum = 3408226;BA.debugLine="If RESULT.Tag = \"gunaprodp\" Then 'query tag"; + //BA.debugLineNum = 1363;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1364;BA.debugLine="If RESULT.Tag = \"gunaprodp\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("gunaprodp"))) { -RDebugUtils.currentLine=3408227; - //BA.debugLineNum = 3408227;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1365;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group323 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen323 = group323.getSize() @@ -4611,132 +3336,86 @@ final int groupLen323 = group323.getSize() ; for (; index323 < groupLen323;index323++){ _records = (Object[])(group323.Get(index323)); -RDebugUtils.currentLine=3408228; - //BA.debugLineNum = 3408228;BA.debugLine="Dim CAT_GP_ID As String = records(RESULT.Colu"; + //BA.debugLineNum = 1366;BA.debugLine="Dim CAT_GP_ID As String = records(RESULT.Colu"; _cat_gp_id = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_ID"))))]); -RDebugUtils.currentLine=3408229; - //BA.debugLineNum = 3408229;BA.debugLine="Dim CAT_GP_NOMBRE As String = records(RESULT."; + //BA.debugLineNum = 1367;BA.debugLine="Dim CAT_GP_NOMBRE As String = records(RESULT."; _cat_gp_nombre = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_NOMBRE"))))]); -RDebugUtils.currentLine=3408230; - //BA.debugLineNum = 3408230;BA.debugLine="Dim CAT_GP_IMP1 As String = records(RESULT.Co"; + //BA.debugLineNum = 1368;BA.debugLine="Dim CAT_GP_IMP1 As String = records(RESULT.Co"; _cat_gp_imp1 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_IMP1"))))]); -RDebugUtils.currentLine=3408231; - //BA.debugLineNum = 3408231;BA.debugLine="Dim CAT_GP_IMP2 As String = records(RESULT.Co"; + //BA.debugLineNum = 1369;BA.debugLine="Dim CAT_GP_IMP2 As String = records(RESULT.Co"; _cat_gp_imp2 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_IMP2"))))]); -RDebugUtils.currentLine=3408232; - //BA.debugLineNum = 3408232;BA.debugLine="Dim CAT_GP_PRECIO As String = records(RESULT."; + //BA.debugLineNum = 1370;BA.debugLine="Dim CAT_GP_PRECIO As String = records(RESULT."; _cat_gp_precio = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_PRECIO"))))]); -RDebugUtils.currentLine=3408233; - //BA.debugLineNum = 3408233;BA.debugLine="Dim CAT_GP_CLASIF As String = records(RESULT."; + //BA.debugLineNum = 1371;BA.debugLine="Dim CAT_GP_CLASIF As String = records(RESULT."; _cat_gp_clasif = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_CLASIF"))))]); -RDebugUtils.currentLine=3408234; - //BA.debugLineNum = 3408234;BA.debugLine="Dim CAT_GP_STS As String = records(RESULT.Col"; + //BA.debugLineNum = 1372;BA.debugLine="Dim CAT_GP_STS As String = records(RESULT.Col"; _cat_gp_sts = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_STS"))))]); -RDebugUtils.currentLine=3408235; - //BA.debugLineNum = 3408235;BA.debugLine="Dim CAT_GP_TIPO As String = records(RESULT.Co"; + //BA.debugLineNum = 1373;BA.debugLine="Dim CAT_GP_TIPO As String = records(RESULT.Co"; _cat_gp_tipo = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_TIPO"))))]); -RDebugUtils.currentLine=3408236; - //BA.debugLineNum = 3408236;BA.debugLine="Dim CAT_GP_SUBTIPO As String = records(RESULT"; + //BA.debugLineNum = 1374;BA.debugLine="Dim CAT_GP_SUBTIPO As String = records(RESULT"; _cat_gp_subtipo = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_SUBTIPO"))))]); -RDebugUtils.currentLine=3408237; - //BA.debugLineNum = 3408237;BA.debugLine="Dim CAT_GP_IMG() As Byte = records(RESULT.Col"; + //BA.debugLineNum = 1375;BA.debugLine="Dim CAT_GP_IMG() As Byte = records(RESULT.Col"; _cat_gp_img = (byte[])(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_IMG"))))]); -RDebugUtils.currentLine=3408238; - //BA.debugLineNum = 3408238;BA.debugLine="Dim CAT_GP_ALMACEN As Int = records(RESULT.Co"; + //BA.debugLineNum = 1376;BA.debugLine="Dim CAT_GP_ALMACEN As Int = records(RESULT.Co"; _cat_gp_almacen = (int)(BA.ObjectToNumber(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_ALMACEN"))))])); -RDebugUtils.currentLine=3408239; - //BA.debugLineNum = 3408239;BA.debugLine="Dim CAT_GP_TIPOPROD As Int = records(RESULT.C"; + //BA.debugLineNum = 1377;BA.debugLine="Dim CAT_GP_TIPOPROD As Int = records(RESULT.C"; _cat_gp_tipoprod = (int)(BA.ObjectToNumber(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_TIPOPROD"))))])); -RDebugUtils.currentLine=3408240; - //BA.debugLineNum = 3408240;BA.debugLine="CAT_GP_TIPOPROD = \"5\""; + //BA.debugLineNum = 1378;BA.debugLine="CAT_GP_TIPOPROD = \"5\""; _cat_gp_tipoprod = (int)(Double.parseDouble("5")); -RDebugUtils.currentLine=3408241; - //BA.debugLineNum = 3408241;BA.debugLine="If CAT_GP_ID = \"PAQUNI003\" Then"; + //BA.debugLineNum = 1379;BA.debugLine="If CAT_GP_ID = \"PAQUNI003\" Then"; if ((_cat_gp_id).equals("PAQUNI003")) { -RDebugUtils.currentLine=3408242; - //BA.debugLineNum = 3408242;BA.debugLine="CAT_GP_ALMACEN = 60"; + //BA.debugLineNum = 1380;BA.debugLine="CAT_GP_ALMACEN = 60"; _cat_gp_almacen = (int) (60); }; -RDebugUtils.currentLine=3408244; - //BA.debugLineNum = 3408244;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; + //BA.debugLineNum = 1382;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO CAT_GUNAPROD(CAT_GP_ID,CAT_GP_NOMBRE,CAT_GP_IMP1,CAT_GP_IMP2,CAT_GP_PRECIO,CAT_GP_CLASIF,CAT_GP_STS,CAT_GP_TIPO,CAT_GP_SUBTIPO,CAT_GP_IMG,CAT_GP_ALMACEN,CAT_GP_TIPOPROD) VALUES (?,?,?,?,?,?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cat_gp_id),(Object)(_cat_gp_nombre),(Object)(_cat_gp_imp1),(Object)(_cat_gp_imp2),(Object)(_cat_gp_precio),(Object)(_cat_gp_clasif),(Object)(_cat_gp_sts),(Object)(_cat_gp_tipo),(Object)(_cat_gp_subtipo),(Object)(_cat_gp_img),(Object)(_cat_gp_almacen),(Object)(_cat_gp_tipoprod)})); } }; -RDebugUtils.currentLine=3408246; - //BA.debugLineNum = 3408246;BA.debugLine="If PB2.Progress = 0 Then"; -if (__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()==0) { -RDebugUtils.currentLine=3408247; - //BA.debugLineNum = 3408247;BA.debugLine="PB2.Progress = 30"; -__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (30)); -RDebugUtils.currentLine=3408248; - //BA.debugLineNum = 3408248;BA.debugLine="S_CP.Text = \"CARGANDO\""; -__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("CARGANDO")); - }else -{RDebugUtils.currentLine=3408249; - //BA.debugLineNum = 3408249;BA.debugLine="ELSE If PB2.Progress = 30 Then"; -if (__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()==30) { -RDebugUtils.currentLine=3408250; - //BA.debugLineNum = 3408250;BA.debugLine="PB2.Progress = 60"; -__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (60)); - }else -{RDebugUtils.currentLine=3408251; - //BA.debugLineNum = 3408251;BA.debugLine="ELSE IF PB2.Progress = 60 Then"; -if (__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()==60) { -RDebugUtils.currentLine=3408252; - //BA.debugLineNum = 3408252;BA.debugLine="PB2.Progress = 100"; -__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (100)); -RDebugUtils.currentLine=3408253; - //BA.debugLineNum = 3408253;BA.debugLine="S_CP.Text = \"LISTO\""; -__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("LISTO")); - }}} -; -RDebugUtils.currentLine=3408255; - //BA.debugLineNum = 3408255;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; + //BA.debugLineNum = 1384;BA.debugLine="If PB2.Progress = 0 Then"; +if (_pb2.getProgress()==0) { + //BA.debugLineNum = 1385;BA.debugLine="PB2.Progress = 30"; +_pb2.setProgress((int) (30)); + //BA.debugLineNum = 1386;BA.debugLine="S_CP.Text = \"CARGANDO\""; +_s_cp.setText(BA.ObjectToCharSequence("CARGANDO")); + }else if(_pb2.getProgress()==30) { + //BA.debugLineNum = 1388;BA.debugLine="PB2.Progress = 60"; +_pb2.setProgress((int) (60)); + }else if(_pb2.getProgress()==60) { + //BA.debugLineNum = 1390;BA.debugLine="PB2.Progress = 100"; +_pb2.setProgress((int) (100)); + //BA.debugLineNum = 1391;BA.debugLine="S_CP.Text = \"LISTO\""; +_s_cp.setText(BA.ObjectToCharSequence("LISTO")); + }; + //BA.debugLineNum = 1393;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; if ((_starter._marcacel /*String*/ ).equals("Sony") == false) { __c.ToastMessageShow(BA.ObjectToCharSequence("Promociones Actualizados."),__c.True);}; -RDebugUtils.currentLine=3408256; - //BA.debugLineNum = 3408256;BA.debugLine="Listo4=1"; -__ref._listo4 /*String*/ = BA.NumberToString(1); -RDebugUtils.currentLine=3408257; - //BA.debugLineNum = 3408257;BA.debugLine="If Listo1 =1 And Listo2 =1 And Listo3 = 1 And"; -if ((__ref._listo1 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._listo2 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._listo3 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._listo4 /*String*/ ).equals(BA.NumberToString(1))) { -RDebugUtils.currentLine=3408258; - //BA.debugLineNum = 3408258;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*void*/ (null); -RDebugUtils.currentLine=3408259; - //BA.debugLineNum = 3408259;BA.debugLine="img2.Visible=False"; -__ref._img2 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3408260; - //BA.debugLineNum = 3408260;BA.debugLine="EJECUTANDO=0"; -__ref._ejecutando /*String*/ = BA.NumberToString(0); - }else -{RDebugUtils.currentLine=3408261; - //BA.debugLineNum = 3408261;BA.debugLine="Else If Listo4 = 1 And Listo3 = 1 And inve = 1"; -if ((__ref._listo4 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._listo3 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._inve /*String*/ ).equals(BA.NumberToString(1))) { -RDebugUtils.currentLine=3408262; - //BA.debugLineNum = 3408262;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*void*/ (null); -RDebugUtils.currentLine=3408263; - //BA.debugLineNum = 3408263;BA.debugLine="img2.Visible=False"; -__ref._img2 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3408264; - //BA.debugLineNum = 3408264;BA.debugLine="EJECUTANDO=0"; -__ref._ejecutando /*String*/ = BA.NumberToString(0); - }} -; + //BA.debugLineNum = 1394;BA.debugLine="Listo4=1"; +_listo4 = BA.NumberToString(1); + //BA.debugLineNum = 1395;BA.debugLine="If Listo1 =1 And Listo2 =1 And Listo3 = 1 And"; +if ((_listo1).equals(BA.NumberToString(1)) && (_listo2).equals(BA.NumberToString(1)) && (_listo3).equals(BA.NumberToString(1)) && (_listo4).equals(BA.NumberToString(1))) { + //BA.debugLineNum = 1396;BA.debugLine="B4XPage_Appear"; +_b4xpage_appear(); + //BA.debugLineNum = 1397;BA.debugLine="img2.Visible=False"; +_img2.setVisible(__c.False); + //BA.debugLineNum = 1398;BA.debugLine="EJECUTANDO=0"; +_ejecutando = BA.NumberToString(0); + }else if((_listo4).equals(BA.NumberToString(1)) && (_listo3).equals(BA.NumberToString(1)) && (_inve).equals(BA.NumberToString(1))) { + //BA.debugLineNum = 1400;BA.debugLine="B4XPage_Appear"; +_b4xpage_appear(); + //BA.debugLineNum = 1401;BA.debugLine="img2.Visible=False"; +_img2.setVisible(__c.False); + //BA.debugLineNum = 1402;BA.debugLine="EJECUTANDO=0"; +_ejecutando = BA.NumberToString(0); }; }; -RDebugUtils.currentLine=3408269; - //BA.debugLineNum = 3408269;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + }; + //BA.debugLineNum = 1407;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408270; - //BA.debugLineNum = 3408270;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408271; - //BA.debugLineNum = 3408271;BA.debugLine="If RESULT.Tag = \"gunaprodps\" Then 'query tag"; + //BA.debugLineNum = 1408;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1409;BA.debugLine="If RESULT.Tag = \"gunaprodps\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("gunaprodps"))) { -RDebugUtils.currentLine=3408272; - //BA.debugLineNum = 3408272;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1410;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group367 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen367 = group367.getSize() @@ -4744,128 +3423,83 @@ final int groupLen367 = group367.getSize() ; for (; index367 < groupLen367;index367++){ _records = (Object[])(group367.Get(index367)); -RDebugUtils.currentLine=3408274; - //BA.debugLineNum = 3408274;BA.debugLine="Dim CAT_GP_ID As String = records(RESULT.Colu"; + //BA.debugLineNum = 1412;BA.debugLine="Dim CAT_GP_ID As String = records(RESULT.Colu"; _cat_gp_id = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_ID"))))]); -RDebugUtils.currentLine=3408275; - //BA.debugLineNum = 3408275;BA.debugLine="Dim CAT_GP_NOMBRE As String = records(RESULT."; + //BA.debugLineNum = 1413;BA.debugLine="Dim CAT_GP_NOMBRE As String = records(RESULT."; _cat_gp_nombre = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_NOMBRE"))))]); -RDebugUtils.currentLine=3408276; - //BA.debugLineNum = 3408276;BA.debugLine="Dim CAT_GP_IMP1 As String = records(RESULT.Co"; + //BA.debugLineNum = 1414;BA.debugLine="Dim CAT_GP_IMP1 As String = records(RESULT.Co"; _cat_gp_imp1 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_IMP1"))))]); -RDebugUtils.currentLine=3408277; - //BA.debugLineNum = 3408277;BA.debugLine="Dim CAT_GP_IMP2 As String = records(RESULT.Co"; + //BA.debugLineNum = 1415;BA.debugLine="Dim CAT_GP_IMP2 As String = records(RESULT.Co"; _cat_gp_imp2 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_IMP2"))))]); -RDebugUtils.currentLine=3408278; - //BA.debugLineNum = 3408278;BA.debugLine="Dim CAT_GP_PRECIO As String = records(RESULT."; + //BA.debugLineNum = 1416;BA.debugLine="Dim CAT_GP_PRECIO As String = records(RESULT."; _cat_gp_precio = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_PRECIO"))))]); -RDebugUtils.currentLine=3408279; - //BA.debugLineNum = 3408279;BA.debugLine="Dim CAT_GP_CLASIF As String = records(RESULT."; + //BA.debugLineNum = 1417;BA.debugLine="Dim CAT_GP_CLASIF As String = records(RESULT."; _cat_gp_clasif = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_CLASIF"))))]); -RDebugUtils.currentLine=3408280; - //BA.debugLineNum = 3408280;BA.debugLine="Dim CAT_GP_STS As String = records(RESULT.Col"; + //BA.debugLineNum = 1418;BA.debugLine="Dim CAT_GP_STS As String = records(RESULT.Col"; _cat_gp_sts = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_STS"))))]); -RDebugUtils.currentLine=3408281; - //BA.debugLineNum = 3408281;BA.debugLine="Dim CAT_GP_TIPO As String = records(RESULT.Co"; + //BA.debugLineNum = 1419;BA.debugLine="Dim CAT_GP_TIPO As String = records(RESULT.Co"; _cat_gp_tipo = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_TIPO"))))]); -RDebugUtils.currentLine=3408282; - //BA.debugLineNum = 3408282;BA.debugLine="Dim CAT_GP_SUBTIPO As String = records(RESULT"; + //BA.debugLineNum = 1420;BA.debugLine="Dim CAT_GP_SUBTIPO As String = records(RESULT"; _cat_gp_subtipo = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_SUBTIPO"))))]); -RDebugUtils.currentLine=3408283; - //BA.debugLineNum = 3408283;BA.debugLine="Dim CAT_GP_IMG() As Byte = records(RESULT.Col"; + //BA.debugLineNum = 1421;BA.debugLine="Dim CAT_GP_IMG() As Byte = records(RESULT.Col"; _cat_gp_img = (byte[])(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_IMG"))))]); -RDebugUtils.currentLine=3408284; - //BA.debugLineNum = 3408284;BA.debugLine="Dim CAT_GP_ALMACEN As Int = records(RESULT.Co"; + //BA.debugLineNum = 1422;BA.debugLine="Dim CAT_GP_ALMACEN As Int = records(RESULT.Co"; _cat_gp_almacen = (int)(BA.ObjectToNumber(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_ALMACEN"))))])); -RDebugUtils.currentLine=3408285; - //BA.debugLineNum = 3408285;BA.debugLine="Dim CAT_GP_TIPOPROD As Int = records(RESULT.C"; + //BA.debugLineNum = 1423;BA.debugLine="Dim CAT_GP_TIPOPROD As Int = records(RESULT.C"; _cat_gp_tipoprod = (int)(BA.ObjectToNumber(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_GP_TIPOPROD"))))])); -RDebugUtils.currentLine=3408287; - //BA.debugLineNum = 3408287;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; + //BA.debugLineNum = 1425;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO CAT_GUNAPROD(CAT_GP_ID,CAT_GP_NOMBRE,CAT_GP_IMP1,CAT_GP_IMP2,CAT_GP_PRECIO,CAT_GP_CLASIF,CAT_GP_STS,CAT_GP_TIPO,CAT_GP_SUBTIPO,CAT_GP_IMG,CAT_GP_ALMACEN,CAT_GP_TIPOPROD) VALUES (?,?,?,?,?,?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cat_gp_id),(Object)(_cat_gp_nombre),(Object)(_cat_gp_imp1),(Object)(_cat_gp_imp2),(Object)(_cat_gp_precio),(Object)(_cat_gp_clasif),(Object)(_cat_gp_sts),(Object)(_cat_gp_tipo),(Object)(_cat_gp_subtipo),(Object)(_cat_gp_img),(Object)(_cat_gp_almacen),(Object)(_cat_gp_tipoprod)})); } }; -RDebugUtils.currentLine=3408289; - //BA.debugLineNum = 3408289;BA.debugLine="If PB2.Progress = 0 Then"; -if (__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()==0) { -RDebugUtils.currentLine=3408290; - //BA.debugLineNum = 3408290;BA.debugLine="PB2.Progress = 30"; -__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (30)); -RDebugUtils.currentLine=3408291; - //BA.debugLineNum = 3408291;BA.debugLine="S_CP.Text = \"CARGANDO\""; -__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("CARGANDO")); -RDebugUtils.currentLine=3408292; - //BA.debugLineNum = 3408292;BA.debugLine="Log(\"C4\")"; -__c.LogImpl("33408292","C4",0); - }else -{RDebugUtils.currentLine=3408293; - //BA.debugLineNum = 3408293;BA.debugLine="ELSE If PB2.Progress = 30 Then"; -if (__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()==30) { -RDebugUtils.currentLine=3408294; - //BA.debugLineNum = 3408294;BA.debugLine="PB2.Progress = 60"; -__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (60)); - }else -{RDebugUtils.currentLine=3408295; - //BA.debugLineNum = 3408295;BA.debugLine="ELSE IF PB2.Progress = 60 Then"; -if (__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()==60) { -RDebugUtils.currentLine=3408296; - //BA.debugLineNum = 3408296;BA.debugLine="PB2.Progress = 100"; -__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (100)); -RDebugUtils.currentLine=3408297; - //BA.debugLineNum = 3408297;BA.debugLine="S_CP.Text = \"LISTO\""; -__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("LISTO")); -RDebugUtils.currentLine=3408298; - //BA.debugLineNum = 3408298;BA.debugLine="Log(\"3\")"; -__c.LogImpl("33408298","3",0); - }}} -; -RDebugUtils.currentLine=3408300; - //BA.debugLineNum = 3408300;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; + //BA.debugLineNum = 1427;BA.debugLine="If PB2.Progress = 0 Then"; +if (_pb2.getProgress()==0) { + //BA.debugLineNum = 1428;BA.debugLine="PB2.Progress = 30"; +_pb2.setProgress((int) (30)); + //BA.debugLineNum = 1429;BA.debugLine="S_CP.Text = \"CARGANDO\""; +_s_cp.setText(BA.ObjectToCharSequence("CARGANDO")); + //BA.debugLineNum = 1430;BA.debugLine="Log(\"C4\")"; +__c.LogImpl("339715236","C4",0); + }else if(_pb2.getProgress()==30) { + //BA.debugLineNum = 1432;BA.debugLine="PB2.Progress = 60"; +_pb2.setProgress((int) (60)); + }else if(_pb2.getProgress()==60) { + //BA.debugLineNum = 1434;BA.debugLine="PB2.Progress = 100"; +_pb2.setProgress((int) (100)); + //BA.debugLineNum = 1435;BA.debugLine="S_CP.Text = \"LISTO\""; +_s_cp.setText(BA.ObjectToCharSequence("LISTO")); + //BA.debugLineNum = 1436;BA.debugLine="Log(\"3\")"; +__c.LogImpl("339715242","3",0); + }; + //BA.debugLineNum = 1438;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; if ((_starter._marcacel /*String*/ ).equals("Sony") == false) { __c.ToastMessageShow(BA.ObjectToCharSequence("Promociones especiales Actualizados."),__c.True);}; -RDebugUtils.currentLine=3408302; - //BA.debugLineNum = 3408302;BA.debugLine="Listo4=1"; -__ref._listo4 /*String*/ = BA.NumberToString(1); -RDebugUtils.currentLine=3408303; - //BA.debugLineNum = 3408303;BA.debugLine="If Listo1 =1 And Listo2 =1 And Listo3 = 1 And"; -if ((__ref._listo1 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._listo2 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._listo3 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._listo4 /*String*/ ).equals(BA.NumberToString(1))) { -RDebugUtils.currentLine=3408304; - //BA.debugLineNum = 3408304;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*void*/ (null); -RDebugUtils.currentLine=3408305; - //BA.debugLineNum = 3408305;BA.debugLine="img2.Visible=False"; -__ref._img2 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3408306; - //BA.debugLineNum = 3408306;BA.debugLine="EJECUTANDO=0"; -__ref._ejecutando /*String*/ = BA.NumberToString(0); - }else -{RDebugUtils.currentLine=3408307; - //BA.debugLineNum = 3408307;BA.debugLine="Else If Listo4 = 1 And Listo3 = 1 And inve = 1"; -if ((__ref._listo4 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._listo3 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._inve /*String*/ ).equals(BA.NumberToString(1))) { -RDebugUtils.currentLine=3408308; - //BA.debugLineNum = 3408308;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*void*/ (null); -RDebugUtils.currentLine=3408309; - //BA.debugLineNum = 3408309;BA.debugLine="img2.Visible=False"; -__ref._img2 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3408310; - //BA.debugLineNum = 3408310;BA.debugLine="EJECUTANDO=0"; -__ref._ejecutando /*String*/ = BA.NumberToString(0); - }} -; + //BA.debugLineNum = 1440;BA.debugLine="Listo4=1"; +_listo4 = BA.NumberToString(1); + //BA.debugLineNum = 1441;BA.debugLine="If Listo1 =1 And Listo2 =1 And Listo3 = 1 And"; +if ((_listo1).equals(BA.NumberToString(1)) && (_listo2).equals(BA.NumberToString(1)) && (_listo3).equals(BA.NumberToString(1)) && (_listo4).equals(BA.NumberToString(1))) { + //BA.debugLineNum = 1442;BA.debugLine="B4XPage_Appear"; +_b4xpage_appear(); + //BA.debugLineNum = 1443;BA.debugLine="img2.Visible=False"; +_img2.setVisible(__c.False); + //BA.debugLineNum = 1444;BA.debugLine="EJECUTANDO=0"; +_ejecutando = BA.NumberToString(0); + }else if((_listo4).equals(BA.NumberToString(1)) && (_listo3).equals(BA.NumberToString(1)) && (_inve).equals(BA.NumberToString(1))) { + //BA.debugLineNum = 1446;BA.debugLine="B4XPage_Appear"; +_b4xpage_appear(); + //BA.debugLineNum = 1447;BA.debugLine="img2.Visible=False"; +_img2.setVisible(__c.False); + //BA.debugLineNum = 1448;BA.debugLine="EJECUTANDO=0"; +_ejecutando = BA.NumberToString(0); }; }; -RDebugUtils.currentLine=3408315; - //BA.debugLineNum = 3408315;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + }; + //BA.debugLineNum = 1453;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408316; - //BA.debugLineNum = 3408316;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408317; - //BA.debugLineNum = 3408317;BA.debugLine="If RESULT.Tag = \"detallepaq\" Then 'query tag"; + //BA.debugLineNum = 1454;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1455;BA.debugLine="If RESULT.Tag = \"detallepaq\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("detallepaq"))) { -RDebugUtils.currentLine=3408318; - //BA.debugLineNum = 3408318;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1456;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group409 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen409 = group409.getSize() @@ -4873,115 +3507,74 @@ final int groupLen409 = group409.getSize() ; for (; index409 < groupLen409;index409++){ _records = (Object[])(group409.Get(index409)); -RDebugUtils.currentLine=3408319; - //BA.debugLineNum = 3408319;BA.debugLine="Dim CAT_DP_ALMACEN As String = records(RESUL"; + //BA.debugLineNum = 1457;BA.debugLine="Dim CAT_DP_ALMACEN As String = records(RESUL"; _cat_dp_almacen = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_DP_ALMACEN"))))]); -RDebugUtils.currentLine=3408320; - //BA.debugLineNum = 3408320;BA.debugLine="Dim CAT_DP_ID As String = records(RESULT.Colu"; + //BA.debugLineNum = 1458;BA.debugLine="Dim CAT_DP_ID As String = records(RESULT.Colu"; _cat_dp_id = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_DP_ID"))))]); -RDebugUtils.currentLine=3408321; - //BA.debugLineNum = 3408321;BA.debugLine="Dim CAT_DP_IDPROD As String = records(RESULT."; + //BA.debugLineNum = 1459;BA.debugLine="Dim CAT_DP_IDPROD As String = records(RESULT."; _cat_dp_idprod = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_DP_IDPROD"))))]); -RDebugUtils.currentLine=3408322; - //BA.debugLineNum = 3408322;BA.debugLine="Dim CAT_DP_TIPO As String = records(RESULT.Co"; + //BA.debugLineNum = 1460;BA.debugLine="Dim CAT_DP_TIPO As String = records(RESULT.Co"; _cat_dp_tipo = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_DP_TIPO"))))]); -RDebugUtils.currentLine=3408323; - //BA.debugLineNum = 3408323;BA.debugLine="Dim CAT_DP_PZAS As String = records(RESULT.Co"; + //BA.debugLineNum = 1461;BA.debugLine="Dim CAT_DP_PZAS As String = records(RESULT.Co"; _cat_dp_pzas = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_DP_PZAS"))))]); -RDebugUtils.currentLine=3408324; - //BA.debugLineNum = 3408324;BA.debugLine="Dim CAT_DP_USUARIO As String = records(RESUL"; + //BA.debugLineNum = 1462;BA.debugLine="Dim CAT_DP_USUARIO As String = records(RESUL"; _cat_dp_usuario = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_DP_USUARIO"))))]); -RDebugUtils.currentLine=3408325; - //BA.debugLineNum = 3408325;BA.debugLine="Dim CAT_DP_FECHA As String = records(RESULT.C"; + //BA.debugLineNum = 1463;BA.debugLine="Dim CAT_DP_FECHA As String = records(RESULT.C"; _cat_dp_fecha = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_DP_FECHA"))))]); -RDebugUtils.currentLine=3408326; - //BA.debugLineNum = 3408326;BA.debugLine="Dim CAT_DP_REGALO As String = records(RESULT"; + //BA.debugLineNum = 1464;BA.debugLine="Dim CAT_DP_REGALO As String = records(RESULT"; _cat_dp_regalo = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_DP_REGALO"))))]); -RDebugUtils.currentLine=3408327; - //BA.debugLineNum = 3408327;BA.debugLine="Dim CAT_DP_CLASIF As String = records(RESULT"; + //BA.debugLineNum = 1465;BA.debugLine="Dim CAT_DP_CLASIF As String = records(RESULT"; _cat_dp_clasif = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_DP_CLASIF"))))]); -RDebugUtils.currentLine=3408328; - //BA.debugLineNum = 3408328;BA.debugLine="Dim CAT_DP_PRECIO As String = records(RESULT."; + //BA.debugLineNum = 1466;BA.debugLine="Dim CAT_DP_PRECIO As String = records(RESULT."; _cat_dp_precio = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_DP_PRECIO"))))]); -RDebugUtils.currentLine=3408329; - //BA.debugLineNum = 3408329;BA.debugLine="Dim CAT_DP_PRECIO_SIMPTOS As String = records"; + //BA.debugLineNum = 1467;BA.debugLine="Dim CAT_DP_PRECIO_SIMPTOS As String = records"; _cat_dp_precio_simptos = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_DP_PRECIO_SIMPTOS"))))]); -RDebugUtils.currentLine=3408330; - //BA.debugLineNum = 3408330;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; + //BA.debugLineNum = 1468;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO CAT_DETALLES_PAQ(CAT_DP_ALMACEN,CAT_DP_ID,CAT_DP_IDPROD,CAT_DP_TIPO,CAT_DP_PZAS,CAT_DP_USUARIO,CAT_DP_FECHA,CAT_DP_REGALO,CAT_DP_CLASIF,CAT_DP_PRECIO,CAT_DP_PRECIO_SIMPTOS) VALUES (?,?,?,?,?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cat_dp_almacen),(Object)(_cat_dp_id),(Object)(_cat_dp_idprod),(Object)(_cat_dp_tipo),(Object)(_cat_dp_pzas),(Object)(_cat_dp_usuario),(Object)(_cat_dp_fecha),(Object)(_cat_dp_regalo),(Object)(_cat_dp_clasif),(Object)(_cat_dp_precio),(Object)(_cat_dp_precio_simptos)})); } }; -RDebugUtils.currentLine=3408332; - //BA.debugLineNum = 3408332;BA.debugLine="If PB2.Progress = 0 Then"; -if (__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()==0) { -RDebugUtils.currentLine=3408333; - //BA.debugLineNum = 3408333;BA.debugLine="PB2.Progress = 30"; -__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (30)); -RDebugUtils.currentLine=3408334; - //BA.debugLineNum = 3408334;BA.debugLine="S_CP.Text = \"CARGANDO\""; -__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("CARGANDO")); - }else -{RDebugUtils.currentLine=3408335; - //BA.debugLineNum = 3408335;BA.debugLine="ELSE If PB2.Progress = 30 Then"; -if (__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()==30) { -RDebugUtils.currentLine=3408336; - //BA.debugLineNum = 3408336;BA.debugLine="PB2.Progress = 60"; -__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (60)); - }else -{RDebugUtils.currentLine=3408337; - //BA.debugLineNum = 3408337;BA.debugLine="ELSE IF PB2.Progress = 60 Then"; -if (__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()==60) { -RDebugUtils.currentLine=3408338; - //BA.debugLineNum = 3408338;BA.debugLine="PB2.Progress = 100"; -__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (100)); -RDebugUtils.currentLine=3408339; - //BA.debugLineNum = 3408339;BA.debugLine="S_CP.Text = \"LISTO\""; -__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("LISTO")); - }}} -; -RDebugUtils.currentLine=3408341; - //BA.debugLineNum = 3408341;BA.debugLine="Listo3 =1"; -__ref._listo3 /*String*/ = BA.NumberToString(1); -RDebugUtils.currentLine=3408342; - //BA.debugLineNum = 3408342;BA.debugLine="If Listo1 =1 And Listo2 =1 And Listo3 = 1 And"; -if ((__ref._listo1 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._listo2 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._listo3 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._listo4 /*String*/ ).equals(BA.NumberToString(1))) { -RDebugUtils.currentLine=3408343; - //BA.debugLineNum = 3408343;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*void*/ (null); -RDebugUtils.currentLine=3408344; - //BA.debugLineNum = 3408344;BA.debugLine="img2.Visible=False"; -__ref._img2 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3408345; - //BA.debugLineNum = 3408345;BA.debugLine="EJECUTANDO=0"; -__ref._ejecutando /*String*/ = BA.NumberToString(0); - }else -{RDebugUtils.currentLine=3408346; - //BA.debugLineNum = 3408346;BA.debugLine="Else If Listo4 = 1 And Listo3 = 1 And inve = 1"; -if ((__ref._listo4 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._listo3 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._inve /*String*/ ).equals(BA.NumberToString(1))) { -RDebugUtils.currentLine=3408347; - //BA.debugLineNum = 3408347;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*void*/ (null); -RDebugUtils.currentLine=3408348; - //BA.debugLineNum = 3408348;BA.debugLine="img2.Visible=False"; -__ref._img2 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3408349; - //BA.debugLineNum = 3408349;BA.debugLine="EJECUTANDO=0"; -__ref._ejecutando /*String*/ = BA.NumberToString(0); - }} -; + //BA.debugLineNum = 1470;BA.debugLine="If PB2.Progress = 0 Then"; +if (_pb2.getProgress()==0) { + //BA.debugLineNum = 1471;BA.debugLine="PB2.Progress = 30"; +_pb2.setProgress((int) (30)); + //BA.debugLineNum = 1472;BA.debugLine="S_CP.Text = \"CARGANDO\""; +_s_cp.setText(BA.ObjectToCharSequence("CARGANDO")); + }else if(_pb2.getProgress()==30) { + //BA.debugLineNum = 1474;BA.debugLine="PB2.Progress = 60"; +_pb2.setProgress((int) (60)); + }else if(_pb2.getProgress()==60) { + //BA.debugLineNum = 1476;BA.debugLine="PB2.Progress = 100"; +_pb2.setProgress((int) (100)); + //BA.debugLineNum = 1477;BA.debugLine="S_CP.Text = \"LISTO\""; +_s_cp.setText(BA.ObjectToCharSequence("LISTO")); + }; + //BA.debugLineNum = 1479;BA.debugLine="Listo3 =1"; +_listo3 = BA.NumberToString(1); + //BA.debugLineNum = 1480;BA.debugLine="If Listo1 =1 And Listo2 =1 And Listo3 = 1 And"; +if ((_listo1).equals(BA.NumberToString(1)) && (_listo2).equals(BA.NumberToString(1)) && (_listo3).equals(BA.NumberToString(1)) && (_listo4).equals(BA.NumberToString(1))) { + //BA.debugLineNum = 1481;BA.debugLine="B4XPage_Appear"; +_b4xpage_appear(); + //BA.debugLineNum = 1482;BA.debugLine="img2.Visible=False"; +_img2.setVisible(__c.False); + //BA.debugLineNum = 1483;BA.debugLine="EJECUTANDO=0"; +_ejecutando = BA.NumberToString(0); + }else if((_listo4).equals(BA.NumberToString(1)) && (_listo3).equals(BA.NumberToString(1)) && (_inve).equals(BA.NumberToString(1))) { + //BA.debugLineNum = 1485;BA.debugLine="B4XPage_Appear"; +_b4xpage_appear(); + //BA.debugLineNum = 1486;BA.debugLine="img2.Visible=False"; +_img2.setVisible(__c.False); + //BA.debugLineNum = 1487;BA.debugLine="EJECUTANDO=0"; +_ejecutando = BA.NumberToString(0); }; }; -RDebugUtils.currentLine=3408355; - //BA.debugLineNum = 3408355;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + }; + //BA.debugLineNum = 1493;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408356; - //BA.debugLineNum = 3408356;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408357; - //BA.debugLineNum = 3408357;BA.debugLine="If RESULT.Tag = \"hist_datos\" Then 'query tag"; + //BA.debugLineNum = 1494;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1495;BA.debugLine="If RESULT.Tag = \"hist_datos\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("hist_datos"))) { -RDebugUtils.currentLine=3408358; - //BA.debugLineNum = 3408358;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1496;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group447 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen447 = group447.getSize() @@ -4989,84 +3582,56 @@ final int groupLen447 = group447.getSize() ; for (; index447 < groupLen447;index447++){ _records = (Object[])(group447.Get(index447)); -RDebugUtils.currentLine=3408359; - //BA.debugLineNum = 3408359;BA.debugLine="Dim HVD_CLIENTE As String = records(RESULT.Co"; + //BA.debugLineNum = 1497;BA.debugLine="Dim HVD_CLIENTE As String = records(RESULT.Co"; _hvd_cliente = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HVD_CLIENTE"))))]); -RDebugUtils.currentLine=3408360; - //BA.debugLineNum = 3408360;BA.debugLine="Dim HVD_PRONOMBRE As String = records(RESULT."; + //BA.debugLineNum = 1498;BA.debugLine="Dim HVD_PRONOMBRE As String = records(RESULT."; _hvd_pronombre = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HVD_PRONOMBRE"))))]); -RDebugUtils.currentLine=3408361; - //BA.debugLineNum = 3408361;BA.debugLine="Dim HVD_CANT As String = records(RESULT.Colum"; + //BA.debugLineNum = 1499;BA.debugLine="Dim HVD_CANT As String = records(RESULT.Colum"; _hvd_cant = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HVD_CANT"))))]); -RDebugUtils.currentLine=3408362; - //BA.debugLineNum = 3408362;BA.debugLine="Dim HVD_COSTO_TOT As String = records(RESULT."; + //BA.debugLineNum = 1500;BA.debugLine="Dim HVD_COSTO_TOT As String = records(RESULT."; _hvd_costo_tot = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HVD_COSTO_TOT"))))]); -RDebugUtils.currentLine=3408363; - //BA.debugLineNum = 3408363;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; + //BA.debugLineNum = 1501;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO HIST_VENTAS(HVD_CLIENTE,HVD_PRONOMBRE,HVD_CANT,HVD_COSTO_TOT) VALUES (?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_hvd_cliente),(Object)(_hvd_pronombre),(Object)(_hvd_cant),(Object)(_hvd_costo_tot)})); } }; -RDebugUtils.currentLine=3408365; - //BA.debugLineNum = 3408365;BA.debugLine="Listo3 =1"; -__ref._listo3 /*String*/ = BA.NumberToString(1); -RDebugUtils.currentLine=3408366; - //BA.debugLineNum = 3408366;BA.debugLine="If PB1.Progress = 0 Then"; -if (__ref._pb1 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()==0) { -RDebugUtils.currentLine=3408367; - //BA.debugLineNum = 3408367;BA.debugLine="PB1.Progress = 30"; -__ref._pb1 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (30)); -RDebugUtils.currentLine=3408368; - //BA.debugLineNum = 3408368;BA.debugLine="S_CH.Text = \"CARGANDO\""; -__ref._s_ch /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("CARGANDO")); - }else -{RDebugUtils.currentLine=3408369; - //BA.debugLineNum = 3408369;BA.debugLine="ELSE If PB1.Progress = 30 Then"; -if (__ref._pb1 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()==30) { -RDebugUtils.currentLine=3408370; - //BA.debugLineNum = 3408370;BA.debugLine="PB1.Progress = 60"; -__ref._pb1 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (60)); - }else -{RDebugUtils.currentLine=3408371; - //BA.debugLineNum = 3408371;BA.debugLine="ELSE IF PB1.Progress = 60 Then"; -if (__ref._pb1 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()==60) { -RDebugUtils.currentLine=3408372; - //BA.debugLineNum = 3408372;BA.debugLine="PB1.Progress = 100"; -__ref._pb1 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (100)); -RDebugUtils.currentLine=3408373; - //BA.debugLineNum = 3408373;BA.debugLine="S_CH.Text = \"LISTO\""; -__ref._s_ch /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("LISTO")); - }}} -; -RDebugUtils.currentLine=3408375; - //BA.debugLineNum = 3408375;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; + //BA.debugLineNum = 1503;BA.debugLine="Listo3 =1"; +_listo3 = BA.NumberToString(1); + //BA.debugLineNum = 1504;BA.debugLine="If PB1.Progress = 0 Then"; +if (_pb1.getProgress()==0) { + //BA.debugLineNum = 1505;BA.debugLine="PB1.Progress = 30"; +_pb1.setProgress((int) (30)); + //BA.debugLineNum = 1506;BA.debugLine="S_CH.Text = \"CARGANDO\""; +_s_ch.setText(BA.ObjectToCharSequence("CARGANDO")); + }else if(_pb1.getProgress()==30) { + //BA.debugLineNum = 1508;BA.debugLine="PB1.Progress = 60"; +_pb1.setProgress((int) (60)); + }else if(_pb1.getProgress()==60) { + //BA.debugLineNum = 1510;BA.debugLine="PB1.Progress = 100"; +_pb1.setProgress((int) (100)); + //BA.debugLineNum = 1511;BA.debugLine="S_CH.Text = \"LISTO\""; +_s_ch.setText(BA.ObjectToCharSequence("LISTO")); + }; + //BA.debugLineNum = 1513;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessag"; if ((_starter._marcacel /*String*/ ).equals("Sony") == false) { __c.ToastMessageShow(BA.ObjectToCharSequence("Venta historico Actualizado."),__c.True);}; -RDebugUtils.currentLine=3408376; - //BA.debugLineNum = 3408376;BA.debugLine="If Listo1 =1 And Listo2 =1 And Listo3 = 1 And"; -if ((__ref._listo1 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._listo2 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._listo3 /*String*/ ).equals(BA.NumberToString(1)) && (__ref._listo4 /*String*/ ).equals(BA.NumberToString(1))) { -RDebugUtils.currentLine=3408377; - //BA.debugLineNum = 3408377;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*void*/ (null); -RDebugUtils.currentLine=3408378; - //BA.debugLineNum = 3408378;BA.debugLine="img2.Visible=False"; -__ref._img2 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3408379; - //BA.debugLineNum = 3408379;BA.debugLine="EJECUTANDO=0"; -__ref._ejecutando /*String*/ = BA.NumberToString(0); + //BA.debugLineNum = 1514;BA.debugLine="If Listo1 =1 And Listo2 =1 And Listo3 = 1 And"; +if ((_listo1).equals(BA.NumberToString(1)) && (_listo2).equals(BA.NumberToString(1)) && (_listo3).equals(BA.NumberToString(1)) && (_listo4).equals(BA.NumberToString(1))) { + //BA.debugLineNum = 1515;BA.debugLine="B4XPage_Appear"; +_b4xpage_appear(); + //BA.debugLineNum = 1516;BA.debugLine="img2.Visible=False"; +_img2.setVisible(__c.False); + //BA.debugLineNum = 1517;BA.debugLine="EJECUTANDO=0"; +_ejecutando = BA.NumberToString(0); }; }; }; -RDebugUtils.currentLine=3408384; - //BA.debugLineNum = 3408384;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1522;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408385; - //BA.debugLineNum = 3408385;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408386; - //BA.debugLineNum = 3408386;BA.debugLine="If RESULT.Tag = \"variables\" Then 'query tag"; + //BA.debugLineNum = 1523;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1524;BA.debugLine="If RESULT.Tag = \"variables\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("variables"))) { -RDebugUtils.currentLine=3408387; - //BA.debugLineNum = 3408387;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1525;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group475 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen475 = group475.getSize() @@ -5074,30 +3639,23 @@ final int groupLen475 = group475.getSize() ; for (; index475 < groupLen475;index475++){ _records = (Object[])(group475.Get(index475)); -RDebugUtils.currentLine=3408388; - //BA.debugLineNum = 3408388;BA.debugLine="Dim Cat_Va_Descripcion As String = records(RE"; + //BA.debugLineNum = 1526;BA.debugLine="Dim Cat_Va_Descripcion As String = records(RE"; _cat_va_descripcion = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_VA_DESCRIPCION"))))]); -RDebugUtils.currentLine=3408389; - //BA.debugLineNum = 3408389;BA.debugLine="Dim Cat_Va_Valor As String = records(RESULT.C"; + //BA.debugLineNum = 1527;BA.debugLine="Dim Cat_Va_Valor As String = records(RESULT.C"; _cat_va_valor = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_VA_VALOR"))))]); -RDebugUtils.currentLine=3408390; - //BA.debugLineNum = 3408390;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; + //BA.debugLineNum = 1528;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO CAT_VARIABLES(CAT_VA_DESCRIPCION, CAT_VA_VALOR) VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cat_va_descripcion),(Object)(_cat_va_valor)})); } }; }; }; -RDebugUtils.currentLine=3408395; - //BA.debugLineNum = 3408395;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1533;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408396; - //BA.debugLineNum = 3408396;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408397; - //BA.debugLineNum = 3408397;BA.debugLine="If RESULT.Tag = \"CUESTIONARIO\" Then 'query tag"; + //BA.debugLineNum = 1534;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1535;BA.debugLine="If RESULT.Tag = \"CUESTIONARIO\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("CUESTIONARIO"))) { -RDebugUtils.currentLine=3408398; - //BA.debugLineNum = 3408398;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1536;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group485 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen485 = group485.getSize() @@ -5105,30 +3663,23 @@ final int groupLen485 = group485.getSize() ; for (; index485 < groupLen485;index485++){ _records = (Object[])(group485.Get(index485)); -RDebugUtils.currentLine=3408399; - //BA.debugLineNum = 3408399;BA.debugLine="Dim Cat_Va_Valor As String = records(RESULT.C"; + //BA.debugLineNum = 1537;BA.debugLine="Dim Cat_Va_Valor As String = records(RESULT.C"; _cat_va_valor = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CAT_VALOR"))))]); -RDebugUtils.currentLine=3408400; - //BA.debugLineNum = 3408400;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"DELETE"; + //BA.debugLineNum = 1538;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"DELETE"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("DELETE FROM CAT_VARIABLES WHERE CAT_VA_DESCRIPCION = ?",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("CUESTIONARIO")})); -RDebugUtils.currentLine=3408401; - //BA.debugLineNum = 3408401;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; + //BA.debugLineNum = 1539;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO CAT_VARIABLES(CAT_VA_DESCRIPCION, CAT_VA_VALOR) VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("CUESTIONARIO"),(Object)(_cat_va_valor)})); } }; }; }; -RDebugUtils.currentLine=3408406; - //BA.debugLineNum = 3408406;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1544;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408407; - //BA.debugLineNum = 3408407;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408408; - //BA.debugLineNum = 3408408;BA.debugLine="If RESULT.Tag = \"valida_pedido\" Then 'query tag"; + //BA.debugLineNum = 1545;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1546;BA.debugLine="If RESULT.Tag = \"valida_pedido\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("valida_pedido"))) { -RDebugUtils.currentLine=3408409; - //BA.debugLineNum = 3408409;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1547;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group495 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen495 = group495.getSize() @@ -5136,45 +3687,34 @@ final int groupLen495 = group495.getSize() ; for (; index495 < groupLen495;index495++){ _records = (Object[])(group495.Get(index495)); -RDebugUtils.currentLine=3408411; - //BA.debugLineNum = 3408411;BA.debugLine="Dim CUANTOSP As Int = records(RESULT.Columns."; + //BA.debugLineNum = 1549;BA.debugLine="Dim CUANTOSP As Int = records(RESULT.Columns."; _cuantosp = (int)(BA.ObjectToNumber(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CUANTOSP"))))])); -RDebugUtils.currentLine=3408413; - //BA.debugLineNum = 3408413;BA.debugLine="If cuantos_pedido < = CUANTOSP Then"; -if ((double)(Double.parseDouble(__ref._cuantos_pedido /*String*/ ))<=_cuantosp) { -RDebugUtils.currentLine=3408415; - //BA.debugLineNum = 3408415;BA.debugLine="datos_iguales = \"ok\""; -__ref._datos_iguales /*String*/ = "ok"; -RDebugUtils.currentLine=3408416; - //BA.debugLineNum = 3408416;BA.debugLine="S_CP.Text = \"INFO OK\""; -__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("INFO OK")); + //BA.debugLineNum = 1551;BA.debugLine="If cuantos_pedido < = CUANTOSP Then"; +if ((double)(Double.parseDouble(_cuantos_pedido))<=_cuantosp) { + //BA.debugLineNum = 1553;BA.debugLine="datos_iguales = \"ok\""; +_datos_iguales = "ok"; + //BA.debugLineNum = 1554;BA.debugLine="S_CP.Text = \"INFO OK\""; +_s_cp.setText(BA.ObjectToCharSequence("INFO OK")); }else { -RDebugUtils.currentLine=3408418; - //BA.debugLineNum = 3408418;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMess"; + //BA.debugLineNum = 1556;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMess"; if ((_starter._marcacel /*String*/ ).equals("Sony") == false) { -__c.ToastMessageShow(BA.ObjectToCharSequence("No se cargo bien la info P. Sync Nuevamente"+BA.NumberToString(_cuantosp)+" "+__ref._cuantos_pedido /*String*/ ),__c.True);}; -RDebugUtils.currentLine=3408419; - //BA.debugLineNum = 3408419;BA.debugLine="S_CP.Text = \"ENVIAR DATOS (K-2)\""; -__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("ENVIAR DATOS (K-2)")); -RDebugUtils.currentLine=3408420; - //BA.debugLineNum = 3408420;BA.debugLine="Log(\"No se cargo bien la info P. Sync Nuevam"; -__c.LogImpl("33408420","No se cargo bien la info P. Sync Nuevamente"+BA.NumberToString(_cuantosp)+" "+__ref._cuantos_pedido /*String*/ ,0); +__c.ToastMessageShow(BA.ObjectToCharSequence("No se cargo bien la info P. Sync Nuevamente"+BA.NumberToString(_cuantosp)+" "+_cuantos_pedido),__c.True);}; + //BA.debugLineNum = 1557;BA.debugLine="S_CP.Text = \"ENVIAR DATOS (K-2)\""; +_s_cp.setText(BA.ObjectToCharSequence("ENVIAR DATOS (K-2)")); + //BA.debugLineNum = 1558;BA.debugLine="Log(\"No se cargo bien la info P. Sync Nuevam"; +__c.LogImpl("339715364","No se cargo bien la info P. Sync Nuevamente"+BA.NumberToString(_cuantosp)+" "+_cuantos_pedido,0); }; } }; }; }; -RDebugUtils.currentLine=3408428; - //BA.debugLineNum = 3408428;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1566;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408429; - //BA.debugLineNum = 3408429;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408430; - //BA.debugLineNum = 3408430;BA.debugLine="If RESULT.Tag = \"valida_pedidoc\" Then 'query ta"; + //BA.debugLineNum = 1567;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1568;BA.debugLine="If RESULT.Tag = \"valida_pedidoc\" Then 'query ta"; if ((_result.Tag /*Object*/ ).equals((Object)("valida_pedidoc"))) { -RDebugUtils.currentLine=3408431; - //BA.debugLineNum = 3408431;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1569;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group511 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen511 = group511.getSize() @@ -5182,39 +3722,30 @@ final int groupLen511 = group511.getSize() ; for (; index511 < groupLen511;index511++){ _records = (Object[])(group511.Get(index511)); -RDebugUtils.currentLine=3408433; - //BA.debugLineNum = 3408433;BA.debugLine="Dim CUANTOSC As Int = records(RESULT.Columns."; + //BA.debugLineNum = 1571;BA.debugLine="Dim CUANTOSC As Int = records(RESULT.Columns."; _cuantosc = (int)(BA.ObjectToNumber(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CUANTOSC"))))])); -RDebugUtils.currentLine=3408435; - //BA.debugLineNum = 3408435;BA.debugLine="If cuantos_pedidosc = CUANTOSC Then"; -if ((__ref._cuantos_pedidosc /*String*/ ).equals(BA.NumberToString(_cuantosc))) { -RDebugUtils.currentLine=3408437; - //BA.debugLineNum = 3408437;BA.debugLine="datos_iguales = \"ok\""; -__ref._datos_iguales /*String*/ = "ok"; + //BA.debugLineNum = 1573;BA.debugLine="If cuantos_pedidosc = CUANTOSC Then"; +if ((_cuantos_pedidosc).equals(BA.NumberToString(_cuantosc))) { + //BA.debugLineNum = 1575;BA.debugLine="datos_iguales = \"ok\""; +_datos_iguales = "ok"; }else { -RDebugUtils.currentLine=3408439; - //BA.debugLineNum = 3408439;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMess"; + //BA.debugLineNum = 1577;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMess"; if ((_starter._marcacel /*String*/ ).equals("Sony") == false) { -__c.ToastMessageShow(BA.ObjectToCharSequence("No se cargo bien la info C. Sync Nuevamente"+BA.NumberToString(_cuantosc)+" "+__ref._cuantos_pedidosc /*String*/ ),__c.True);}; -RDebugUtils.currentLine=3408440; - //BA.debugLineNum = 3408440;BA.debugLine="Log(\"No se cargo bien la info C. Sync Nuevam"; -__c.LogImpl("33408440","No se cargo bien la info C. Sync Nuevamente "+BA.NumberToString(_cuantosc)+" "+__ref._cuantos_pedidosc /*String*/ ,0); +__c.ToastMessageShow(BA.ObjectToCharSequence("No se cargo bien la info C. Sync Nuevamente"+BA.NumberToString(_cuantosc)+" "+_cuantos_pedidosc),__c.True);}; + //BA.debugLineNum = 1578;BA.debugLine="Log(\"No se cargo bien la info C. Sync Nuevam"; +__c.LogImpl("339715384","No se cargo bien la info C. Sync Nuevamente "+BA.NumberToString(_cuantosc)+" "+_cuantos_pedidosc,0); }; } }; }; }; -RDebugUtils.currentLine=3408446; - //BA.debugLineNum = 3408446;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1584;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408447; - //BA.debugLineNum = 3408447;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408448; - //BA.debugLineNum = 3408448;BA.debugLine="If RESULT.Tag = \"valida_noventa\" Then 'query ta"; + //BA.debugLineNum = 1585;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1586;BA.debugLine="If RESULT.Tag = \"valida_noventa\" Then 'query ta"; if ((_result.Tag /*Object*/ ).equals((Object)("valida_noventa"))) { -RDebugUtils.currentLine=3408449; - //BA.debugLineNum = 3408449;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1587;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group525 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen525 = group525.getSize() @@ -5222,39 +3753,30 @@ final int groupLen525 = group525.getSize() ; for (; index525 < groupLen525;index525++){ _records = (Object[])(group525.Get(index525)); -RDebugUtils.currentLine=3408450; - //BA.debugLineNum = 3408450;BA.debugLine="Dim CUANTOSN As Int = records(RESULT.Columns."; + //BA.debugLineNum = 1588;BA.debugLine="Dim CUANTOSN As Int = records(RESULT.Columns."; _cuantosn = (int)(BA.ObjectToNumber(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("CUANTOSN"))))])); -RDebugUtils.currentLine=3408451; - //BA.debugLineNum = 3408451;BA.debugLine="If cuantos_noventa = CUANTOSN Then"; -if ((__ref._cuantos_noventa /*String*/ ).equals(BA.NumberToString(_cuantosn))) { -RDebugUtils.currentLine=3408453; - //BA.debugLineNum = 3408453;BA.debugLine="datos_iguales = \"ok\""; -__ref._datos_iguales /*String*/ = "ok"; + //BA.debugLineNum = 1589;BA.debugLine="If cuantos_noventa = CUANTOSN Then"; +if ((_cuantos_noventa).equals(BA.NumberToString(_cuantosn))) { + //BA.debugLineNum = 1591;BA.debugLine="datos_iguales = \"ok\""; +_datos_iguales = "ok"; }else { -RDebugUtils.currentLine=3408455; - //BA.debugLineNum = 3408455;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMess"; + //BA.debugLineNum = 1593;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMess"; if ((_starter._marcacel /*String*/ ).equals("Sony") == false) { -__c.ToastMessageShow(BA.ObjectToCharSequence("No se cargo bien la info N. Sync Nuevamente"+BA.NumberToString(_cuantosn)+" "+__ref._cuantos_noventa /*String*/ ),__c.True);}; -RDebugUtils.currentLine=3408456; - //BA.debugLineNum = 3408456;BA.debugLine="Log(\"No se cargo bien la info N. Sync Nuevam"; -__c.LogImpl("33408456","No se cargo bien la info N. Sync Nuevamente "+BA.NumberToString(_cuantosn)+" "+__ref._cuantos_noventa /*String*/ ,0); +__c.ToastMessageShow(BA.ObjectToCharSequence("No se cargo bien la info N. Sync Nuevamente"+BA.NumberToString(_cuantosn)+" "+_cuantos_noventa),__c.True);}; + //BA.debugLineNum = 1594;BA.debugLine="Log(\"No se cargo bien la info N. Sync Nuevam"; +__c.LogImpl("339715400","No se cargo bien la info N. Sync Nuevamente "+BA.NumberToString(_cuantosn)+" "+_cuantos_noventa,0); }; } }; }; }; -RDebugUtils.currentLine=3408462; - //BA.debugLineNum = 3408462;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1600;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408463; - //BA.debugLineNum = 3408463;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408464; - //BA.debugLineNum = 3408464;BA.debugLine="If RESULT.Tag = \"ins_pedido\" Then 'query tag"; + //BA.debugLineNum = 1601;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1602;BA.debugLine="If RESULT.Tag = \"ins_pedido\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("ins_pedido"))) { -RDebugUtils.currentLine=3408465; - //BA.debugLineNum = 3408465;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1603;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group539 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen539 = group539.getSize() @@ -5262,36 +3784,27 @@ final int groupLen539 = group539.getSize() ; for (; index539 < groupLen539;index539++){ _records = (Object[])(group539.Get(index539)); -RDebugUtils.currentLine=3408466; - //BA.debugLineNum = 3408466;BA.debugLine="PB2.Progress = PB2.Progress + 5"; -__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()+5)); -RDebugUtils.currentLine=3408467; - //BA.debugLineNum = 3408467;BA.debugLine="S_CP.Text = \"SUBIENDO\""; -__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("SUBIENDO")); + //BA.debugLineNum = 1604;BA.debugLine="PB2.Progress = PB2.Progress + 5"; +_pb2.setProgress((int) (_pb2.getProgress()+5)); + //BA.debugLineNum = 1605;BA.debugLine="S_CP.Text = \"SUBIENDO\""; +_s_cp.setText(BA.ObjectToCharSequence("SUBIENDO")); } }; -RDebugUtils.currentLine=3408469; - //BA.debugLineNum = 3408469;BA.debugLine="PB2.Progress = 100"; -__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (100)); -RDebugUtils.currentLine=3408470; - //BA.debugLineNum = 3408470;BA.debugLine="S_CP.Text = \"LISTO\""; -__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("LISTO")); -RDebugUtils.currentLine=3408471; - //BA.debugLineNum = 3408471;BA.debugLine="Log(\"5\")"; -__c.LogImpl("33408471","5",0); + //BA.debugLineNum = 1607;BA.debugLine="PB2.Progress = 100"; +_pb2.setProgress((int) (100)); + //BA.debugLineNum = 1608;BA.debugLine="S_CP.Text = \"LISTO\""; +_s_cp.setText(BA.ObjectToCharSequence("LISTO")); + //BA.debugLineNum = 1609;BA.debugLine="Log(\"5\")"; +__c.LogImpl("339715415","5",0); }; }; -RDebugUtils.currentLine=3408475; - //BA.debugLineNum = 3408475;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1613;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408476; - //BA.debugLineNum = 3408476;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408477; - //BA.debugLineNum = 3408477;BA.debugLine="If RESULT.Tag = \"version\" Then 'query tag"; + //BA.debugLineNum = 1614;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1615;BA.debugLine="If RESULT.Tag = \"version\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("version"))) { -RDebugUtils.currentLine=3408478; - //BA.debugLineNum = 3408478;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1616;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group551 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen551 = group551.getSize() @@ -5299,30 +3812,23 @@ final int groupLen551 = group551.getSize() ; for (; index551 < groupLen551;index551++){ _records = (Object[])(group551.Get(index551)); -RDebugUtils.currentLine=3408479; - //BA.debugLineNum = 3408479;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete f"; + //BA.debugLineNum = 1617;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete f"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from VERSION"); -RDebugUtils.currentLine=3408480; - //BA.debugLineNum = 3408480;BA.debugLine="Dim CAT_VE_VERSION As String = records(RESULT"; + //BA.debugLineNum = 1618;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"))))]); -RDebugUtils.currentLine=3408481; - //BA.debugLineNum = 3408481;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; + //BA.debugLineNum = 1619;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO VERSION(NOVERSION) VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cat_ve_version)})); } }; }; }; -RDebugUtils.currentLine=3408486; - //BA.debugLineNum = 3408486;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1624;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408487; - //BA.debugLineNum = 3408487;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408488; - //BA.debugLineNum = 3408488;BA.debugLine="If RESULT.Tag = \"count_cli\" Then 'query tag"; + //BA.debugLineNum = 1625;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1626;BA.debugLine="If RESULT.Tag = \"count_cli\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("count_cli"))) { -RDebugUtils.currentLine=3408489; - //BA.debugLineNum = 3408489;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1627;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group561 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen561 = group561.getSize() @@ -5330,24 +3836,19 @@ final int groupLen561 = group561.getSize() ; for (; index561 < groupLen561;index561++){ _records = (Object[])(group561.Get(index561)); -RDebugUtils.currentLine=3408490; - //BA.debugLineNum = 3408490;BA.debugLine="COUNT_CLIE = records(RESULT.Columns.Get(\"COUN"; -__ref._count_clie /*int*/ = (int)(BA.ObjectToNumber(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("COUNT_CLIE"))))])); + //BA.debugLineNum = 1628;BA.debugLine="COUNT_CLIE = records(RESULT.Columns.Get(\"COUN"; +_count_clie = (int)(BA.ObjectToNumber(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("COUNT_CLIE"))))])); } }; }; }; -RDebugUtils.currentLine=3408495; - //BA.debugLineNum = 3408495;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1633;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408496; - //BA.debugLineNum = 3408496;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408497; - //BA.debugLineNum = 3408497;BA.debugLine="If RESULT.Tag = \"ruta\" Then 'query tag"; + //BA.debugLineNum = 1634;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1635;BA.debugLine="If RESULT.Tag = \"ruta\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("ruta"))) { -RDebugUtils.currentLine=3408498; - //BA.debugLineNum = 3408498;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1636;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group569 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen569 = group569.getSize() @@ -5355,63 +3856,46 @@ final int groupLen569 = group569.getSize() ; for (; index569 < groupLen569;index569++){ _records = (Object[])(group569.Get(index569)); -RDebugUtils.currentLine=3408499; - //BA.debugLineNum = 3408499;BA.debugLine="Dim VALIDO As String = records(RESULT.Columns"; + //BA.debugLineNum = 1637;BA.debugLine="Dim VALIDO As String = records(RESULT.Columns"; _valido = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("VALIDO"))))]); -RDebugUtils.currentLine=3408500; - //BA.debugLineNum = 3408500;BA.debugLine="If VALIDO = \"OK\" Then"; + //BA.debugLineNum = 1638;BA.debugLine="If VALIDO = \"OK\" Then"; if ((_valido).equals("OK")) { -RDebugUtils.currentLine=3408501; - //BA.debugLineNum = 3408501;BA.debugLine="cargar.Visible = True"; -__ref._cargar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3408502; - //BA.debugLineNum = 3408502;BA.debugLine="Subir.Visible = True"; -__ref._subir /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3408503; - //BA.debugLineNum = 3408503;BA.debugLine="inv.Visible = True"; -__ref._inv /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3408504; - //BA.debugLineNum = 3408504;BA.debugLine="connecta.Visible = False"; -__ref._connecta /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3408505; - //BA.debugLineNum = 3408505;BA.debugLine="If conn = \"1\" Then"; -if ((__ref._conn /*String*/ ).equals("1")) { -RDebugUtils.currentLine=3408506; - //BA.debugLineNum = 3408506;BA.debugLine="ToastMessageShow(\"Existe Conexión con el Se"; + //BA.debugLineNum = 1639;BA.debugLine="cargar.Visible = True"; +_cargar.setVisible(__c.True); + //BA.debugLineNum = 1640;BA.debugLine="Subir.Visible = True"; +_subir.setVisible(__c.True); + //BA.debugLineNum = 1641;BA.debugLine="inv.Visible = True"; +_inv.setVisible(__c.True); + //BA.debugLineNum = 1642;BA.debugLine="connecta.Visible = False"; +_connecta.setVisible(__c.False); + //BA.debugLineNum = 1643;BA.debugLine="If conn = \"1\" Then"; +if ((_conn).equals("1")) { + //BA.debugLineNum = 1644;BA.debugLine="ToastMessageShow(\"Existe Conexión con el Se"; __c.ToastMessageShow(BA.ObjectToCharSequence("Existe Conexión con el Servidor."),__c.True); }; }else { -RDebugUtils.currentLine=3408509; - //BA.debugLineNum = 3408509;BA.debugLine="cargar.Visible = False"; -__ref._cargar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3408510; - //BA.debugLineNum = 3408510;BA.debugLine="Subir.Visible = False"; -__ref._subir /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3408511; - //BA.debugLineNum = 3408511;BA.debugLine="inv.Visible = False"; -__ref._inv /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3408512; - //BA.debugLineNum = 3408512;BA.debugLine="connecta.Visible = False"; -__ref._connecta /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3408513; - //BA.debugLineNum = 3408513;BA.debugLine="ToastMessageShow(\"Ruta invalida.\" , True)"; + //BA.debugLineNum = 1647;BA.debugLine="cargar.Visible = False"; +_cargar.setVisible(__c.False); + //BA.debugLineNum = 1648;BA.debugLine="Subir.Visible = False"; +_subir.setVisible(__c.False); + //BA.debugLineNum = 1649;BA.debugLine="inv.Visible = False"; +_inv.setVisible(__c.False); + //BA.debugLineNum = 1650;BA.debugLine="connecta.Visible = False"; +_connecta.setVisible(__c.False); + //BA.debugLineNum = 1651;BA.debugLine="ToastMessageShow(\"Ruta invalida.\" , True)"; __c.ToastMessageShow(BA.ObjectToCharSequence("Ruta invalida."),__c.True); }; } }; }; }; -RDebugUtils.currentLine=3408519; - //BA.debugLineNum = 3408519;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1657;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408520; - //BA.debugLineNum = 3408520;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408521; - //BA.debugLineNum = 3408521;BA.debugLine="If RESULT.Tag = \"usuario\" Then 'query tag"; + //BA.debugLineNum = 1658;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1659;BA.debugLine="If RESULT.Tag = \"usuario\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("usuario"))) { -RDebugUtils.currentLine=3408522; - //BA.debugLineNum = 3408522;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1660;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group592 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen592 = group592.getSize() @@ -5419,37 +3903,28 @@ final int groupLen592 = group592.getSize() ; for (; index592 < groupLen592;index592++){ _records = (Object[])(group592.Get(index592)); -RDebugUtils.currentLine=3408523; - //BA.debugLineNum = 3408523;BA.debugLine="Dim name2 As String = records(RESULT.Columns."; + //BA.debugLineNum = 1661;BA.debugLine="Dim name2 As String = records(RESULT.Columns."; _name2 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("VALIDO"))))]); } }; -RDebugUtils.currentLine=3408525; - //BA.debugLineNum = 3408525;BA.debugLine="If name2 = \"OK\" Then"; + //BA.debugLineNum = 1663;BA.debugLine="If name2 = \"OK\" Then"; if ((_name2).equals("OK")) { -RDebugUtils.currentLine=3408526; - //BA.debugLineNum = 3408526;BA.debugLine="PASO = 1"; -__ref._paso /*String*/ = BA.NumberToString(1); + //BA.debugLineNum = 1664;BA.debugLine="PASO = 1"; +_paso = BA.NumberToString(1); }; -RDebugUtils.currentLine=3408528; - //BA.debugLineNum = 3408528;BA.debugLine="P1.Visible = False"; -__ref._p1 /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3408529; - //BA.debugLineNum = 3408529;BA.debugLine="p_mandaInfo.Visible = False"; -__ref._p_mandainfo /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); + //BA.debugLineNum = 1666;BA.debugLine="P1.Visible = False"; +_p1.setVisible(__c.False); + //BA.debugLineNum = 1667;BA.debugLine="p_mandaInfo.Visible = False"; +_p_mandainfo.setVisible(__c.False); }; }; -RDebugUtils.currentLine=3408533; - //BA.debugLineNum = 3408533;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1671;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408534; - //BA.debugLineNum = 3408534;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408535; - //BA.debugLineNum = 3408535;BA.debugLine="If RESULT.Tag = \"fecha\" Then 'query tag"; + //BA.debugLineNum = 1672;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1673;BA.debugLine="If RESULT.Tag = \"fecha\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("fecha"))) { -RDebugUtils.currentLine=3408536; - //BA.debugLineNum = 3408536;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1674;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group605 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen605 = group605.getSize() @@ -5457,30 +3932,23 @@ final int groupLen605 = group605.getSize() ; for (; index605 < groupLen605;index605++){ _records = (Object[])(group605.Get(index605)); -RDebugUtils.currentLine=3408537; - //BA.debugLineNum = 3408537;BA.debugLine="Dim FECHA_HOY As String = records(RESULT.Colu"; + //BA.debugLineNum = 1675;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"))))]); -RDebugUtils.currentLine=3408538; - //BA.debugLineNum = 3408538;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete"; + //BA.debugLineNum = 1676;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("delete from CAT_VARIABLES where CAT_VA_DESCRIPCION = ?",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("FECHA")})); -RDebugUtils.currentLine=3408539; - //BA.debugLineNum = 3408539;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; + //BA.debugLineNum = 1677;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO CAT_VARIABLES(CAT_VA_DESCRIPCION, CAT_VA_VALOR) VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("FECHA"),(Object)(_fecha_hoy)})); } }; }; }; -RDebugUtils.currentLine=3408544; - //BA.debugLineNum = 3408544;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1682;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408545; - //BA.debugLineNum = 3408545;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408546; - //BA.debugLineNum = 3408546;BA.debugLine="If RESULT.Tag = \"folio\" Then 'query tag"; + //BA.debugLineNum = 1683;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1684;BA.debugLine="If RESULT.Tag = \"folio\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("folio"))) { -RDebugUtils.currentLine=3408547; - //BA.debugLineNum = 3408547;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1685;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group615 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen615 = group615.getSize() @@ -5488,30 +3956,23 @@ final int groupLen615 = group615.getSize() ; for (; index615 < groupLen615;index615++){ _records = (Object[])(group615.Get(index615)); -RDebugUtils.currentLine=3408548; - //BA.debugLineNum = 3408548;BA.debugLine="Dim FOLIO As String = records(RESULT.Columns."; + //BA.debugLineNum = 1686;BA.debugLine="Dim FOLIO As String = records(RESULT.Columns."; _folio = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("FOLIO"))))]); -RDebugUtils.currentLine=3408549; - //BA.debugLineNum = 3408549;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete"; + //BA.debugLineNum = 1687;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("delete from CAT_VARIABLES where CAT_VA_DESCRIPCION = ?",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("FOLIO")})); -RDebugUtils.currentLine=3408550; - //BA.debugLineNum = 3408550;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; + //BA.debugLineNum = 1688;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO CAT_VARIABLES(CAT_VA_DESCRIPCION, CAT_VA_VALOR) VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("FOLIO"),(Object)(_folio)})); } }; }; }; -RDebugUtils.currentLine=3408555; - //BA.debugLineNum = 3408555;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; + //BA.debugLineNum = 1693;BA.debugLine="If Job.JobName = \"DBRequest\" Then"; if ((_job._jobname /*String*/ ).equals("DBRequest")) { -RDebugUtils.currentLine=3408556; - //BA.debugLineNum = 3408556;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; -_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (null,_job); -RDebugUtils.currentLine=3408557; - //BA.debugLineNum = 3408557;BA.debugLine="If RESULT.Tag = \"hist_avance\" Then 'query tag"; + //BA.debugLineNum = 1694;BA.debugLine="Dim RESULT As DBResult = B4XPages.MainPage.reqM"; +_result = _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._handlejob /*keymon.lat.medicomed.dbrequestmanager._dbresult*/ (_job); + //BA.debugLineNum = 1695;BA.debugLine="If RESULT.Tag = \"hist_avance\" Then 'query tag"; if ((_result.Tag /*Object*/ ).equals((Object)("hist_avance"))) { -RDebugUtils.currentLine=3408558; - //BA.debugLineNum = 3408558;BA.debugLine="For Each records() As Object In RESULT.Rows"; + //BA.debugLineNum = 1696;BA.debugLine="For Each records() As Object In RESULT.Rows"; { final anywheresoftware.b4a.BA.IterableList group625 = _result.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen625 = group625.getSize() @@ -5519,1192 +3980,889 @@ final int groupLen625 = group625.getSize() ; for (; index625 < groupLen625;index625++){ _records = (Object[])(group625.Get(index625)); -RDebugUtils.currentLine=3408559; - //BA.debugLineNum = 3408559;BA.debugLine="Dim marca As String = records(RESULT.Columns."; + //BA.debugLineNum = 1697;BA.debugLine="Dim marca As String = records(RESULT.Columns."; _marca = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_AM_MARCA"))))]); -RDebugUtils.currentLine=3408560; - //BA.debugLineNum = 3408560;BA.debugLine="Dim avance As String = records(RESULT.Columns"; + //BA.debugLineNum = 1698;BA.debugLine="Dim avance As String = records(RESULT.Columns"; _avance = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_AM_AVANCE"))))]); -RDebugUtils.currentLine=3408561; - //BA.debugLineNum = 3408561;BA.debugLine="Dim objetivo As String = records(RESULT.Colum"; + //BA.debugLineNum = 1699;BA.debugLine="Dim objetivo As String = records(RESULT.Colum"; _objetivo = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_AM_OBJETIVO"))))]); -RDebugUtils.currentLine=3408562; - //BA.debugLineNum = 3408562;BA.debugLine="Dim porcentaje1 As String = records(RESULT.Co"; + //BA.debugLineNum = 1700;BA.debugLine="Dim porcentaje1 As String = records(RESULT.Co"; _porcentaje1 = BA.ObjectToString(_records[(int)(BA.ObjectToNumber(_result.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)("HIST_AM_PORCENTAJE"))))]); -RDebugUtils.currentLine=3408563; - //BA.debugLineNum = 3408563;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; + //BA.debugLineNum = 1701;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO HIST_AVANCE(HA_MARCA, HA_AVANCE, HA_OBJETIVO, HA_PORCENTAJE) VALUES (?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_marca),(Object)(_avance),(Object)(_objetivo),(Object)(_porcentaje1)})); } }; }; }; }; -RDebugUtils.currentLine=3408569; - //BA.debugLineNum = 3408569;BA.debugLine="Job.Release"; -_job._release /*String*/ (null); -RDebugUtils.currentLine=3408570; - //BA.debugLineNum = 3408570;BA.debugLine="End Sub"; + //BA.debugLineNum = 1707;BA.debugLine="Job.Release"; +_job._release /*String*/ (); + //BA.debugLineNum = 1708;BA.debugLine="End Sub"; return ""; } -public String _nuevo_click(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "nuevo_click", false)) - {return ((String) Debug.delegate(ba, "nuevo_click", null));} -RDebugUtils.currentLine=3997696; - //BA.debugLineNum = 3997696;BA.debugLine="Sub NUEVO_Click"; -RDebugUtils.currentLine=3997697; - //BA.debugLineNum = 3997697;BA.debugLine="B4XPages.ShowPage(\"NuevoCliente\")"; +public String _nuevo_click() throws Exception{ + //BA.debugLineNum = 1971;BA.debugLine="Sub NUEVO_Click"; + //BA.debugLineNum = 1972;BA.debugLine="B4XPages.ShowPage(\"NuevoCliente\")"; _b4xpages._showpage /*String*/ (ba,"NuevoCliente"); -RDebugUtils.currentLine=3997698; - //BA.debugLineNum = 3997698;BA.debugLine="End Sub"; + //BA.debugLineNum = 1973;BA.debugLine="End Sub"; return ""; } -public String _nvo_cliente_click(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "nvo_cliente_click", false)) - {return ((String) Debug.delegate(ba, "nvo_cliente_click", null));} -RDebugUtils.currentLine=4456448; - //BA.debugLineNum = 4456448;BA.debugLine="Sub nvo_cliente_Click"; -RDebugUtils.currentLine=4456449; - //BA.debugLineNum = 4456449;BA.debugLine="B4XPages.ShowPage(\"NuevoCliente\")"; +public String _nvo_cliente_click() throws Exception{ + //BA.debugLineNum = 2206;BA.debugLine="Sub nvo_cliente_Click"; + //BA.debugLineNum = 2207;BA.debugLine="B4XPages.ShowPage(\"NuevoCliente\")"; _b4xpages._showpage /*String*/ (ba,"NuevoCliente"); -RDebugUtils.currentLine=4456450; - //BA.debugLineNum = 4456450;BA.debugLine="End Sub"; + //BA.debugLineNum = 2208;BA.debugLine="End Sub"; return ""; } -public String _p_mandainfo_click(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "p_mandainfo_click", false)) - {return ((String) Debug.delegate(ba, "p_mandainfo_click", null));} -RDebugUtils.currentLine=5111808; - //BA.debugLineNum = 5111808;BA.debugLine="Private Sub p_mandaInfo_Click"; -RDebugUtils.currentLine=5111810; - //BA.debugLineNum = 5111810;BA.debugLine="End Sub"; +public String _p_mandainfo_click() throws Exception{ + //BA.debugLineNum = 2418;BA.debugLine="Private Sub p_mandaInfo_Click"; + //BA.debugLineNum = 2420;BA.debugLine="End Sub"; return ""; } -public String _p_resumen_click(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "p_resumen_click", false)) - {return ((String) Debug.delegate(ba, "p_resumen_click", null));} -RDebugUtils.currentLine=4194304; - //BA.debugLineNum = 4194304;BA.debugLine="Sub P_RESUMEN_click"; -RDebugUtils.currentLine=4194306; - //BA.debugLineNum = 4194306;BA.debugLine="End Sub"; +public String _p_resumen_click() throws Exception{ + //BA.debugLineNum = 1999;BA.debugLine="Sub P_RESUMEN_click"; + //BA.debugLineNum = 2001;BA.debugLine="End Sub"; return ""; } -public String _resdia_click(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "resdia_click", false)) - {return ((String) Debug.delegate(ba, "resdia_click", null));} +public String _resdia_click() throws Exception{ int _i = 0; anywheresoftware.b4a.objects.LabelWrapper _label1 = null; anywheresoftware.b4a.objects.LabelWrapper _label2 = null; String _cuantos_obj = ""; -RDebugUtils.currentLine=4325376; - //BA.debugLineNum = 4325376;BA.debugLine="Sub resdia_Click"; -RDebugUtils.currentLine=4325377; - //BA.debugLineNum = 4325377;BA.debugLine="p_principal.Visible = False"; -__ref._p_principal /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=4325378; - //BA.debugLineNum = 4325378;BA.debugLine="Btn_Ubicar.Visible=False"; -__ref._btn_ubicar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=4325379; - //BA.debugLineNum = 4325379;BA.debugLine="SCROLL_RESDIA.Visible = True"; -__ref._scroll_resdia /*anywheresoftware.b4a.objects.ScrollViewWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=4325380; - //BA.debugLineNum = 4325380;BA.debugLine="SCROLL_RESDIA.Panel.LoadLayout(\"RESDIA\")"; -__ref._scroll_resdia /*anywheresoftware.b4a.objects.ScrollViewWrapper*/ .getPanel().LoadLayout("RESDIA",ba); -RDebugUtils.currentLine=4325381; - //BA.debugLineNum = 4325381;BA.debugLine="SCROLL_RESDIA.Panel.Height = Panel4.Height"; -__ref._scroll_resdia /*anywheresoftware.b4a.objects.ScrollViewWrapper*/ .getPanel().setHeight(__ref._panel4 /*anywheresoftware.b4a.objects.PanelWrapper*/ .getHeight()); -RDebugUtils.currentLine=4325382; - //BA.debugLineNum = 4325382;BA.debugLine="Panel4.Visible = True"; -__ref._panel4 /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=4325384; - //BA.debugLineNum = 4325384;BA.debugLine="NUEVO.Visible =False"; -__ref._nuevo /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=4325385; - //BA.debugLineNum = 4325385;BA.debugLine="BUSCA.Visible=False"; -__ref._busca /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=4325386; - //BA.debugLineNum = 4325386;BA.debugLine="connecta.Visible=False"; -__ref._connecta /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=4325387; - //BA.debugLineNum = 4325387;BA.debugLine="Subir.Visible=False"; -__ref._subir /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=4325388; - //BA.debugLineNum = 4325388;BA.debugLine="cargar.Visible=False"; -__ref._cargar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=4325389; - //BA.debugLineNum = 4325389;BA.debugLine="Resumen.Visible= False"; -__ref._resumen /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=4325391; - //BA.debugLineNum = 4325391;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery2(\"select COUNT"; -__ref._d /*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*/ .ExecQuery2("select COUNT(*) AS CUANTOS FROM HIST_ENCUESTA WHERE HE_TIPO = ?",new String[]{"TELEFONO"}))); -RDebugUtils.currentLine=4325392; - //BA.debugLineNum = 4325392;BA.debugLine="d.Position = 0"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=4325393; - //BA.debugLineNum = 4325393;BA.debugLine="l_encuesta.Text = d.GetString(\"CUANTOS\")"; -__ref._l_encuesta /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS"))); -RDebugUtils.currentLine=4325394; - //BA.debugLineNum = 4325394;BA.debugLine="d.Close"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=4325396; - //BA.debugLineNum = 4325396;BA.debugLine="L_MARCAS.CLEAR"; -__ref._l_marcas /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear(); -RDebugUtils.currentLine=4325397; - //BA.debugLineNum = 4325397;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery2(\"select disti"; -__ref._d /*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*/ .ExecQuery2("select distinct HE_CLIE AS CLIENTE FROM HIST_ENCUESTA WHERE HE_TIPO = ?",new String[]{"TELEFONO"}))); -RDebugUtils.currentLine=4325398; - //BA.debugLineNum = 4325398;BA.debugLine="If D.RowCount>0 Then"; -if (__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=4325399; - //BA.debugLineNum = 4325399;BA.debugLine="For i=0 To D.RowCount -1"; +anywheresoftware.b4a.sql.SQL.CursorWrapper _cvr = null; +anywheresoftware.b4a.sql.SQL.CursorWrapper _cv = null; + //BA.debugLineNum = 2007;BA.debugLine="Sub resdia_Click"; + //BA.debugLineNum = 2008;BA.debugLine="p_principal.Visible = False"; +_p_principal.setVisible(__c.False); + //BA.debugLineNum = 2009;BA.debugLine="Btn_Ubicar.Visible=False"; +_btn_ubicar.setVisible(__c.False); + //BA.debugLineNum = 2010;BA.debugLine="SCROLL_RESDIA.Visible = True"; +_scroll_resdia.setVisible(__c.True); + //BA.debugLineNum = 2011;BA.debugLine="SCROLL_RESDIA.Panel.LoadLayout(\"RESDIA\")"; +_scroll_resdia.getPanel().LoadLayout("RESDIA",ba); + //BA.debugLineNum = 2012;BA.debugLine="SCROLL_RESDIA.Panel.Height = Panel4.Height"; +_scroll_resdia.getPanel().setHeight(_panel4.getHeight()); + //BA.debugLineNum = 2013;BA.debugLine="Panel4.Visible = True"; +_panel4.setVisible(__c.True); + //BA.debugLineNum = 2015;BA.debugLine="NUEVO.Visible =False"; +_nuevo.setVisible(__c.False); + //BA.debugLineNum = 2016;BA.debugLine="BUSCA.Visible=False"; +_busca.setVisible(__c.False); + //BA.debugLineNum = 2017;BA.debugLine="connecta.Visible=False"; +_connecta.setVisible(__c.False); + //BA.debugLineNum = 2018;BA.debugLine="Subir.Visible=False"; +_subir.setVisible(__c.False); + //BA.debugLineNum = 2019;BA.debugLine="cargar.Visible=False"; +_cargar.setVisible(__c.False); + //BA.debugLineNum = 2020;BA.debugLine="Resumen.Visible= False"; +_resumen.setVisible(__c.False); + //BA.debugLineNum = 2022;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery2(\"select COUNT"; +_d = (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*/ .ExecQuery2("select COUNT(*) AS CUANTOS FROM HIST_ENCUESTA WHERE HE_TIPO = ?",new String[]{"TELEFONO"}))); + //BA.debugLineNum = 2023;BA.debugLine="d.Position = 0"; +_d.setPosition((int) (0)); + //BA.debugLineNum = 2024;BA.debugLine="l_encuesta.Text = d.GetString(\"CUANTOS\")"; +_l_encuesta.setText(BA.ObjectToCharSequence(_d.GetString("CUANTOS"))); + //BA.debugLineNum = 2025;BA.debugLine="d.Close"; +_d.Close(); + //BA.debugLineNum = 2027;BA.debugLine="L_MARCAS.CLEAR"; +_l_marcas.Clear(); + //BA.debugLineNum = 2028;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery2(\"select disti"; +_d = (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*/ .ExecQuery2("select distinct HE_CLIE AS CLIENTE FROM HIST_ENCUESTA WHERE HE_TIPO = ?",new String[]{"TELEFONO"}))); + //BA.debugLineNum = 2029;BA.debugLine="If D.RowCount>0 Then"; +if (_d.getRowCount()>0) { + //BA.debugLineNum = 2030;BA.debugLine="For i=0 To D.RowCount -1"; { final int step20 = 1; -final int limit20 = (int) (__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit20 = (int) (_d.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit20 ;_i = _i + step20 ) { -RDebugUtils.currentLine=4325400; - //BA.debugLineNum = 4325400;BA.debugLine="D.Position=i"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=4325401; - //BA.debugLineNum = 4325401;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"Select HE"; -__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*/ .ExecQuery2("Select HE_RES from HIST_ENCUESTA where HE_CLIE = ? AND HE_TIPO = ?",new String[]{__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CLIENTE"),"TELEFONO"}))); -RDebugUtils.currentLine=4325402; - //BA.debugLineNum = 4325402;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=4325403; - //BA.debugLineNum = 4325403;BA.debugLine="Dim label1 As Label"; + //BA.debugLineNum = 2031;BA.debugLine="D.Position=i"; +_d.setPosition(_i); + //BA.debugLineNum = 2032;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"Select HE"; +_c = (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*/ .ExecQuery2("Select HE_RES from HIST_ENCUESTA where HE_CLIE = ? AND HE_TIPO = ?",new String[]{_d.GetString("CLIENTE"),"TELEFONO"}))); + //BA.debugLineNum = 2033;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 2034;BA.debugLine="Dim label1 As Label"; _label1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=4325404; - //BA.debugLineNum = 4325404;BA.debugLine="label1 = L_MARCAS.TwoLinesLayout.Label"; -_label1 = __ref._l_marcas /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().Label; -RDebugUtils.currentLine=4325405; - //BA.debugLineNum = 4325405;BA.debugLine="label1.TextSize = 13"; + //BA.debugLineNum = 2035;BA.debugLine="label1 = L_MARCAS.TwoLinesLayout.Label"; +_label1 = _l_marcas.getTwoLinesLayout().Label; + //BA.debugLineNum = 2036;BA.debugLine="label1.TextSize = 13"; _label1.setTextSize((float) (13)); -RDebugUtils.currentLine=4325406; - //BA.debugLineNum = 4325406;BA.debugLine="label1.TextColor = Colors.Black"; + //BA.debugLineNum = 2037;BA.debugLine="label1.TextColor = Colors.Black"; _label1.setTextColor(__c.Colors.Black); -RDebugUtils.currentLine=4325407; - //BA.debugLineNum = 4325407;BA.debugLine="Dim label2 As Label"; + //BA.debugLineNum = 2038;BA.debugLine="Dim label2 As Label"; _label2 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=4325408; - //BA.debugLineNum = 4325408;BA.debugLine="label2 = L_MARCAS.TwoLinesLayout.SecondLabel"; -_label2 = __ref._l_marcas /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().SecondLabel; -RDebugUtils.currentLine=4325409; - //BA.debugLineNum = 4325409;BA.debugLine="label2.TextSize = 13"; + //BA.debugLineNum = 2039;BA.debugLine="label2 = L_MARCAS.TwoLinesLayout.SecondLabel"; +_label2 = _l_marcas.getTwoLinesLayout().SecondLabel; + //BA.debugLineNum = 2040;BA.debugLine="label2.TextSize = 13"; _label2.setTextSize((float) (13)); -RDebugUtils.currentLine=4325410; - //BA.debugLineNum = 4325410;BA.debugLine="label2.TextColor = Colors.Black"; + //BA.debugLineNum = 2041;BA.debugLine="label2.TextColor = Colors.Black"; _label2.setTextColor(__c.Colors.Black); -RDebugUtils.currentLine=4325411; - //BA.debugLineNum = 4325411;BA.debugLine="L_MARCAS.AddTwoLines(d.GetString(\"CLIENTE\"),\"TE"; -__ref._l_marcas /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddTwoLines(BA.ObjectToCharSequence(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CLIENTE")),BA.ObjectToCharSequence("TELEFONO :"+__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HE_RES"))); -RDebugUtils.currentLine=4325412; - //BA.debugLineNum = 4325412;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 2042;BA.debugLine="L_MARCAS.AddTwoLines(d.GetString(\"CLIENTE\"),\"TE"; +_l_marcas.AddTwoLines(BA.ObjectToCharSequence(_d.GetString("CLIENTE")),BA.ObjectToCharSequence("TELEFONO :"+_c.GetString("HE_RES"))); + //BA.debugLineNum = 2043;BA.debugLine="c.Close"; +_c.Close(); } }; }; -RDebugUtils.currentLine=4325415; - //BA.debugLineNum = 4325415;BA.debugLine="d.Close"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=4325417; - //BA.debugLineNum = 4325417;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"Select sum("; -__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*/ .ExecQuery2("Select sum(PE_COSTO_TOT) As MONTO_DIA from pedido where PE_CLIENTE <> 0 and pe_proid in (Select CAT_GP_ID from cat_gunaprod where CAT_GP_TIPO = ? )",new String[]{"RTEC"}))); -RDebugUtils.currentLine=4325418; - //BA.debugLineNum = 4325418;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=4325419; - //BA.debugLineNum = 4325419;BA.debugLine="l_monto_k.Text = c.GetString(\"MONTO_DIA\")"; -__ref._l_monto_k /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("MONTO_DIA"))); -RDebugUtils.currentLine=4325420; - //BA.debugLineNum = 4325420;BA.debugLine="If l_monto_k.Text = \"null\" Then"; -if ((__ref._l_monto_k /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("null")) { -RDebugUtils.currentLine=4325421; - //BA.debugLineNum = 4325421;BA.debugLine="l_monto_k.Text = \"0\""; -__ref._l_monto_k /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("0")); + //BA.debugLineNum = 2046;BA.debugLine="d.Close"; +_d.Close(); + //BA.debugLineNum = 2048;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"Select sum("; +_c = (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*/ .ExecQuery2("Select sum(PE_COSTO_TOT) As MONTO_DIA from pedido where PE_CLIENTE <> 0 and pe_proid in (Select CAT_GP_ID from cat_gunaprod where CAT_GP_TIPO = ? )",new String[]{"RTEC"}))); + //BA.debugLineNum = 2049;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 2050;BA.debugLine="l_monto_k.Text = c.GetString(\"MONTO_DIA\")"; +_l_monto_k.setText(BA.ObjectToCharSequence(_c.GetString("MONTO_DIA"))); + //BA.debugLineNum = 2051;BA.debugLine="If l_monto_k.Text = \"null\" Then"; +if ((_l_monto_k.getText()).equals("null")) { + //BA.debugLineNum = 2052;BA.debugLine="l_monto_k.Text = \"0\""; +_l_monto_k.setText(BA.ObjectToCharSequence("0")); }; -RDebugUtils.currentLine=4325423; - //BA.debugLineNum = 4325423;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=4325425; - //BA.debugLineNum = 4325425;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"Select sum("; -__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*/ .ExecQuery2("Select sum(PE_COSTO_TOT) As MONTO_DIA from pedido where PE_CLIENTE <> 0 and pe_proid in (Select CAT_GP_ID from cat_gunaprod where CAT_GP_TIPO = ? )",new String[]{"PING"}))); -RDebugUtils.currentLine=4325426; - //BA.debugLineNum = 4325426;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=4325427; - //BA.debugLineNum = 4325427;BA.debugLine="l_monto_kp.Text = c.GetString(\"MONTO_DIA\")"; -__ref._l_monto_kp /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("MONTO_DIA"))); -RDebugUtils.currentLine=4325428; - //BA.debugLineNum = 4325428;BA.debugLine="If l_monto_kp.Text = \"null\" Then"; -if ((__ref._l_monto_kp /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("null")) { -RDebugUtils.currentLine=4325429; - //BA.debugLineNum = 4325429;BA.debugLine="l_monto_kp.Text = \"0\""; -__ref._l_monto_kp /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("0")); + //BA.debugLineNum = 2054;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 2056;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"Select sum("; +_c = (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*/ .ExecQuery2("Select sum(PE_COSTO_TOT) As MONTO_DIA from pedido where PE_CLIENTE <> 0 and pe_proid in (Select CAT_GP_ID from cat_gunaprod where CAT_GP_TIPO = ? )",new String[]{"PING"}))); + //BA.debugLineNum = 2057;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 2058;BA.debugLine="l_monto_kp.Text = c.GetString(\"MONTO_DIA\")"; +_l_monto_kp.setText(BA.ObjectToCharSequence(_c.GetString("MONTO_DIA"))); + //BA.debugLineNum = 2059;BA.debugLine="If l_monto_kp.Text = \"null\" Then"; +if ((_l_monto_kp.getText()).equals("null")) { + //BA.debugLineNum = 2060;BA.debugLine="l_monto_kp.Text = \"0\""; +_l_monto_kp.setText(BA.ObjectToCharSequence("0")); }; -RDebugUtils.currentLine=4325431; - //BA.debugLineNum = 4325431;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=4325441; - //BA.debugLineNum = 4325441;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select sum(P"; -__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 sum(PE_COSTO_TOT) As MONTO_DIA from pedido where PE_CLIENTE <> 0 "))); -RDebugUtils.currentLine=4325442; - //BA.debugLineNum = 4325442;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=4325443; - //BA.debugLineNum = 4325443;BA.debugLine="l_monto_ks.Text = c.GetString(\"MONTO_DIA\")"; -__ref._l_monto_ks /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("MONTO_DIA"))); -RDebugUtils.currentLine=4325444; - //BA.debugLineNum = 4325444;BA.debugLine="If l_monto_ks.Text = \"null\" Then"; -if ((__ref._l_monto_ks /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("null")) { -RDebugUtils.currentLine=4325445; - //BA.debugLineNum = 4325445;BA.debugLine="l_monto_ks.Text = \"0\""; -__ref._l_monto_ks /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("0")); + //BA.debugLineNum = 2062;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 2072;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select sum(P"; +_c = (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 sum(PE_COSTO_TOT) As MONTO_DIA from pedido where PE_CLIENTE <> 0 "))); + //BA.debugLineNum = 2073;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 2074;BA.debugLine="l_monto_ks.Text = c.GetString(\"MONTO_DIA\")"; +_l_monto_ks.setText(BA.ObjectToCharSequence(_c.GetString("MONTO_DIA"))); + //BA.debugLineNum = 2075;BA.debugLine="If l_monto_ks.Text = \"null\" Then"; +if ((_l_monto_ks.getText()).equals("null")) { + //BA.debugLineNum = 2076;BA.debugLine="l_monto_ks.Text = \"0\""; +_l_monto_ks.setText(BA.ObjectToCharSequence("0")); }; -RDebugUtils.currentLine=4325447; - //BA.debugLineNum = 4325447;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=4325448; - //BA.debugLineNum = 4325448;BA.debugLine="Dim cuantos_obj As String"; + //BA.debugLineNum = 2078;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 2079;BA.debugLine="Dim cuantos_obj As String"; _cuantos_obj = ""; -RDebugUtils.currentLine=4325449; - //BA.debugLineNum = 4325449;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select count"; -__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 count(*) AS TOTAL from HIST_MARCAS_CUOTAS "))); -RDebugUtils.currentLine=4325450; - //BA.debugLineNum = 4325450;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=4325451; - //BA.debugLineNum = 4325451;BA.debugLine="cuantos_obj = c.GetString(\"TOTAL\")"; -_cuantos_obj = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL"); -RDebugUtils.currentLine=4325452; - //BA.debugLineNum = 4325452;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=4325454; - //BA.debugLineNum = 4325454;BA.debugLine="If cuantos_obj > 0 Then"; + //BA.debugLineNum = 2080;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select count("; +_c = (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 count(*) AS TOTAL from HIST_MARCAS_CUOTAS"))); + //BA.debugLineNum = 2081;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 2082;BA.debugLine="cuantos_obj = c.GetString(\"TOTAL\")"; +_cuantos_obj = _c.GetString("TOTAL"); + //BA.debugLineNum = 2083;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 2085;BA.debugLine="If cuantos_obj > 0 Then"; if ((double)(Double.parseDouble(_cuantos_obj))>0) { -RDebugUtils.currentLine=4325455; - //BA.debugLineNum = 4325455;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select SUM("; -__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 SUM( HMC_TOTAL) AS TOTAL from HIST_MARCAS_CUOTAS "))); -RDebugUtils.currentLine=4325456; - //BA.debugLineNum = 4325456;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=4325457; - //BA.debugLineNum = 4325457;BA.debugLine="L_NES.Text = c.GetString(\"TOTAL\")"; -__ref._l_nes /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL"))); -RDebugUtils.currentLine=4325458; - //BA.debugLineNum = 4325458;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); - }; -RDebugUtils.currentLine=4325460; - //BA.debugLineNum = 4325460;BA.debugLine="L_REAL.Text = l_monto_ks.Text"; -__ref._l_real /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._l_monto_ks /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())); -RDebugUtils.currentLine=4325461; - //BA.debugLineNum = 4325461;BA.debugLine="L_ALCANCE.Text = Round2((L_NES.Text / L_REAL.Text"; -__ref._l_alcance /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__c.Round2(((double)(Double.parseDouble(__ref._l_nes /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()))/(double)(double)(Double.parseDouble(__ref._l_real /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()))+1),(int) (2)))); -RDebugUtils.currentLine=4325462; - //BA.debugLineNum = 4325462;BA.debugLine="L_VPLAN.Text = l_porvisitar.Text"; -__ref._l_vplan /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._l_porvisitar /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())); -RDebugUtils.currentLine=4325463; - //BA.debugLineNum = 4325463;BA.debugLine="L_VREAL.Text = L_CUANTOST.text"; -__ref._l_vreal /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._l_cuantost /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())); -RDebugUtils.currentLine=4325464; - //BA.debugLineNum = 4325464;BA.debugLine="L_EFEC_VIS.Text = Round2(L_VREAL.text / L_VPLAN.T"; -__ref._l_efec_vis /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__c.Round2((double)(Double.parseDouble(__ref._l_vreal /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()))/(double)(double)(Double.parseDouble(__ref._l_vplan /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())),(int) (2)))); -RDebugUtils.currentLine=4325465; - //BA.debugLineNum = 4325465;BA.debugLine="L_VISITCC.Text = l_cuantosc.text"; -__ref._l_visitcc /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._l_cuantosc /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())); -RDebugUtils.currentLine=4325466; - //BA.debugLineNum = 4325466;BA.debugLine="L_EFEC_PV.Text = Round2(L_VISITCC.Text / L_VREAL."; -__ref._l_efec_pv /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__c.Round2((double)(Double.parseDouble(__ref._l_visitcc /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()))/(double)(double)(Double.parseDouble(__ref._l_vreal /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())),(int) (2)))); -RDebugUtils.currentLine=4325467; - //BA.debugLineNum = 4325467;BA.debugLine="L_EFEC_PURA.Text = Round2(L_VISITCC.Text / L_VPLA"; -__ref._l_efec_pura /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__c.Round2((double)(Double.parseDouble(__ref._l_visitcc /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()))/(double)(double)(Double.parseDouble(__ref._l_vplan /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())),(int) (2)))); -RDebugUtils.currentLine=4325468; - //BA.debugLineNum = 4325468;BA.debugLine="L_LIN_TICK.Text = LPT"; -__ref._l_lin_tick /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._lpt /*String*/ )); -RDebugUtils.currentLine=4325469; - //BA.debugLineNum = 4325469;BA.debugLine="If l_monto_ks.Text <> \"0\" Then"; -if ((__ref._l_monto_ks /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()).equals("0") == false) { -RDebugUtils.currentLine=4325471; - //BA.debugLineNum = 4325471;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"Select COU"; -__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*/ .ExecQuery2("Select COUNT(DISTINCT(PE_CLIENTE)) AS CUANTOS FROM PEDIDO WHERE PE_CEDIS = ? ",new String[]{__ref._almacen /*String*/ }))); -RDebugUtils.currentLine=4325472; - //BA.debugLineNum = 4325472;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=4325473; - //BA.debugLineNum = 4325473;BA.debugLine="L_CTE_PROMO.Text = c.GetString(\"CUANTOS\")"; -__ref._l_cte_promo /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS"))); -RDebugUtils.currentLine=4325474; - //BA.debugLineNum = 4325474;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=4325475; - //BA.debugLineNum = 4325475;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery2(\"Select sum("; -__ref._d /*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*/ .ExecQuery2("Select sum(PE_COSTO_TOT) AS MONTO_DIA FROM PEDIDO WHERE PE_PROID IN (select CAT_GP_ID from cat_gunaprod where CAT_GP_TIPOPROD = ?) ",new String[]{"PRIORITARIO"}))); -RDebugUtils.currentLine=4325476; - //BA.debugLineNum = 4325476;BA.debugLine="d.Position = 0"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=4325483; - //BA.debugLineNum = 4325483;BA.debugLine="Log(\"|\"&d.GetString(\"MONTO_DIA\")&\"|\")"; -__c.LogImpl("34325483","|"+__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("MONTO_DIA")+"|",0); -RDebugUtils.currentLine=4325485; - //BA.debugLineNum = 4325485;BA.debugLine="L_PRIO.Text = d.GetString(\"MONTO_DIA\")"; -__ref._l_prio /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("MONTO_DIA"))); -RDebugUtils.currentLine=4325486; - //BA.debugLineNum = 4325486;BA.debugLine="d.Close"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=4325488; - //BA.debugLineNum = 4325488;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery2(\"Select sum("; -__ref._d /*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*/ .ExecQuery2("Select sum(PE_COSTO_TOT) AS MONTO_DIA FROM PEDIDO WHERE PE_PROID IN (select CAT_GP_ID from cat_gunaprod where CAT_GP_TIPOPROD = ?) ",new String[]{"ESTRATEGICO"}))); -RDebugUtils.currentLine=4325489; - //BA.debugLineNum = 4325489;BA.debugLine="d.Position = 0"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=4325490; - //BA.debugLineNum = 4325490;BA.debugLine="L_SECUND.Text =d.GetString(\"MONTO_DIA\")"; -__ref._l_secund /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("MONTO_DIA"))); -RDebugUtils.currentLine=4325491; - //BA.debugLineNum = 4325491;BA.debugLine="d.Close"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=4325493; - //BA.debugLineNum = 4325493;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery2(\"Select sum("; -__ref._d /*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*/ .ExecQuery2("Select sum(PE_COSTO_TOT) AS MONTO_DIA FROM PEDIDO WHERE PE_PROID IN (select CAT_GP_ID from cat_gunaprod where CAT_GP_TIPOPROD = ?) ",new String[]{"COMPLEMENTARIO"}))); -RDebugUtils.currentLine=4325494; - //BA.debugLineNum = 4325494;BA.debugLine="d.Position = 0"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=4325495; - //BA.debugLineNum = 4325495;BA.debugLine="L_COMP.Text =d.GetString(\"MONTO_DIA\")"; -__ref._l_comp /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("MONTO_DIA"))); -RDebugUtils.currentLine=4325496; - //BA.debugLineNum = 4325496;BA.debugLine="d.Close"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 2086;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select SUM(I"; +_c = (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 SUM(IFNULL(HMC_TOTAL),0) AS TOTAL from HIST_MARCAS_CUOTAS"))); + //BA.debugLineNum = 2087;BA.debugLine="If c.RowCount > 0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 2088;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 2089;BA.debugLine="L_NES.Text = c.GetString(\"TOTAL\")"; +_l_nes.setText(BA.ObjectToCharSequence(_c.GetString("TOTAL"))); }else { -RDebugUtils.currentLine=4325498; - //BA.debugLineNum = 4325498;BA.debugLine="L_PRIO.Text = \"0\""; -__ref._l_prio /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("0")); -RDebugUtils.currentLine=4325499; - //BA.debugLineNum = 4325499;BA.debugLine="L_SECUND.Text = \"0\""; -__ref._l_secund /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("0")); -RDebugUtils.currentLine=4325500; - //BA.debugLineNum = 4325500;BA.debugLine="L_COMP.Text = \"0\""; -__ref._l_comp /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("0")); + //BA.debugLineNum = 2091;BA.debugLine="L_NES.Text = \"0\""; +_l_nes.setText(BA.ObjectToCharSequence("0")); }; -RDebugUtils.currentLine=4325503; - //BA.debugLineNum = 4325503;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select COUNT"; -__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 COUNT(*) AS CUANTOS FROM PEDIDO WHERE PE_CEDIS = PE_PROID "))); -RDebugUtils.currentLine=4325504; - //BA.debugLineNum = 4325504;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=4325505; - //BA.debugLineNum = 4325505;BA.debugLine="If c.GetString(\"CUANTOS\") > 0 Then"; -if ((double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")))>0) { -RDebugUtils.currentLine=4325506; - //BA.debugLineNum = 4325506;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"Select sum("; -__ref._d /*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 sum(pe_cant) AS CUANTOS FROM PEDIDO WHERE PE_CEDIS = PE_PROID "))); -RDebugUtils.currentLine=4325507; - //BA.debugLineNum = 4325507;BA.debugLine="d.Position = 0"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=4325508; - //BA.debugLineNum = 4325508;BA.debugLine="L_CTE_PROMO.Text = d.GetString(\"CUANTOS\")"; -__ref._l_cte_promo /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS"))); -RDebugUtils.currentLine=4325509; - //BA.debugLineNum = 4325509;BA.debugLine="d.Close"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=4325510; - //BA.debugLineNum = 4325510;BA.debugLine="L_REDEN_PROMO.TEXT = Round2(L_VISITCC.Text / L_C"; -__ref._l_reden_promo /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__c.Round2((double)(Double.parseDouble(__ref._l_visitcc /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()))/(double)(double)(Double.parseDouble(__ref._l_cte_promo /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())),(int) (2)))); + //BA.debugLineNum = 2093;BA.debugLine="c.Close"; +_c.Close(); + }; + //BA.debugLineNum = 2096;BA.debugLine="Dim c As Cursor = B4XPages.MainPage.skmt.ExecQuer"; +_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); +_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("SELECT IFNULL(SUM(montoVentav), 0) AS MONTO_DIA FROM VENTA_No_VENTA WHERE clientev <> 0"))); + //BA.debugLineNum = 2097;BA.debugLine="If c.RowCount > 0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 2098;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 2099;BA.debugLine="L_REAL.Text = c.GetString(\"MONTO_DIA\")"; +_l_real.setText(BA.ObjectToCharSequence(_c.GetString("MONTO_DIA"))); }else { -RDebugUtils.currentLine=4325512; - //BA.debugLineNum = 4325512;BA.debugLine="L_CTE_PROMO.Text = 0"; -__ref._l_cte_promo /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(0)); -RDebugUtils.currentLine=4325513; - //BA.debugLineNum = 4325513;BA.debugLine="L_REDEN_PROMO.Text = 0"; -__ref._l_reden_promo /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(0)); + //BA.debugLineNum = 2101;BA.debugLine="L_REAL.Text = \"0\""; +_l_real.setText(BA.ObjectToCharSequence("0")); }; -RDebugUtils.currentLine=4325515; - //BA.debugLineNum = 4325515;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=4325516; - //BA.debugLineNum = 4325516;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"Select COUNT"; -__ref._d /*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 COUNT(*) AS CUANTOS FROM PEDIDO "))); -RDebugUtils.currentLine=4325517; - //BA.debugLineNum = 4325517;BA.debugLine="d.Position = 0"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=4325518; - //BA.debugLineNum = 4325518;BA.debugLine="L_LIN_TICK.Text = Round2(d.GetString(\"CUANTOS\") /"; -__ref._l_lin_tick /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__c.Round2((double)(Double.parseDouble(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")))/(double)(double)(Double.parseDouble(__ref._l_visitcc /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())),(int) (2)))); -RDebugUtils.currentLine=4325519; - //BA.debugLineNum = 4325519;BA.debugLine="d.Close"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=4325521; - //BA.debugLineNum = 4325521;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"Select count"; -__ref._d /*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 count(*) as CUANTOS from HIST_CUOTAS "))); -RDebugUtils.currentLine=4325522; - //BA.debugLineNum = 4325522;BA.debugLine="d.Position = 0"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=4325523; - //BA.debugLineNum = 4325523;BA.debugLine="If d.GetString(\"CUANTOS\") > 0 Then"; -if ((double)(Double.parseDouble(__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")))>0) { + //BA.debugLineNum = 2103;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 2105;BA.debugLine="If L_REAL.Text <> \"0\" And L_REAL.Text <> \"\" Then"; +if ((_l_real.getText()).equals("0") == false && (_l_real.getText()).equals("") == false) { + //BA.debugLineNum = 2106;BA.debugLine="L_ALCANCE.Text = NumberFormat2(L_NES.Text / L_RE"; +_l_alcance.setText(BA.ObjectToCharSequence(__c.NumberFormat2((double)(Double.parseDouble(_l_nes.getText()))/(double)(double)(Double.parseDouble(_l_real.getText()))+1,(int) (0),(int) (2),(int) (2),__c.False))); }else { -RDebugUtils.currentLine=4325531; - //BA.debugLineNum = 4325531;BA.debugLine="l_monto_c1.Text = 4000"; -__ref._l_monto_c1 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(4000)); -RDebugUtils.currentLine=4325532; - //BA.debugLineNum = 4325532;BA.debugLine="l_monto_c2.Text = 2000"; -__ref._l_monto_c2 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(2000)); -RDebugUtils.currentLine=4325533; - //BA.debugLineNum = 4325533;BA.debugLine="l_monto_c3.Text = 1000"; -__ref._l_monto_c3 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(1000)); + //BA.debugLineNum = 2108;BA.debugLine="L_ALCANCE.Text = \"0\" 'Esto evitara que se vaya a"; +_l_alcance.setText(BA.ObjectToCharSequence("0")); }; -RDebugUtils.currentLine=4325535; - //BA.debugLineNum = 4325535;BA.debugLine="d.Close"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=4325536; - //BA.debugLineNum = 4325536;BA.debugLine="End Sub"; + //BA.debugLineNum = 2110;BA.debugLine="L_VPLAN.Text = l_porvisitar.Text"; +_l_vplan.setText(BA.ObjectToCharSequence(_l_porvisitar.getText())); + //BA.debugLineNum = 2111;BA.debugLine="Private cvR As Cursor = B4XPages.MainPage.skmt.Ex"; +_cvr = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); +_cvr = (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 COUNT(*) AS CUENTAV FROM VENTA_No_VENTA"))); + //BA.debugLineNum = 2112;BA.debugLine="If cvR.RowCount > 0 Then"; +if (_cvr.getRowCount()>0) { + //BA.debugLineNum = 2113;BA.debugLine="cvR.Position = 0"; +_cvr.setPosition((int) (0)); + //BA.debugLineNum = 2114;BA.debugLine="L_VREAL.Text = cvR.GetString(\"CUENTAV\")"; +_l_vreal.setText(BA.ObjectToCharSequence(_cvr.GetString("CUENTAV"))); + }else { + //BA.debugLineNum = 2116;BA.debugLine="L_VREAL.Text = \"0\""; +_l_vreal.setText(BA.ObjectToCharSequence("0")); + }; + //BA.debugLineNum = 2118;BA.debugLine="cvR.Close"; +_cvr.Close(); + //BA.debugLineNum = 2120;BA.debugLine="L_EFEC_VIS.Text = Round2(L_VREAL.text / L_VPLAN.T"; +_l_efec_vis.setText(BA.ObjectToCharSequence(__c.Round2((double)(Double.parseDouble(_l_vreal.getText()))/(double)(double)(Double.parseDouble(_l_vplan.getText())),(int) (2)))); + //BA.debugLineNum = 2121;BA.debugLine="Private cv As Cursor = B4XPages.MainPage.skmt.Exe"; +_cv = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); +_cv = (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 COUNT(*) AS CUENTAV FROM VENTA_No_VENTA WHERE montoVentav <> 0"))); + //BA.debugLineNum = 2122;BA.debugLine="If cv.RowCount > 0 Then"; +if (_cv.getRowCount()>0) { + //BA.debugLineNum = 2123;BA.debugLine="cv.Position = 0"; +_cv.setPosition((int) (0)); + //BA.debugLineNum = 2124;BA.debugLine="L_VISITCC.Text = cv.GetString(\"CUENTAV\")"; +_l_visitcc.setText(BA.ObjectToCharSequence(_cv.GetString("CUENTAV"))); + }else { + //BA.debugLineNum = 2126;BA.debugLine="L_VISITCC.Text = \"0\""; +_l_visitcc.setText(BA.ObjectToCharSequence("0")); + }; + //BA.debugLineNum = 2128;BA.debugLine="cv.Close"; +_cv.Close(); + //BA.debugLineNum = 2130;BA.debugLine="L_EFEC_PV.Text = Round2(L_VISITCC.Text / L_VREAL."; +_l_efec_pv.setText(BA.ObjectToCharSequence(__c.Round2((double)(Double.parseDouble(_l_visitcc.getText()))/(double)(double)(Double.parseDouble(_l_vreal.getText())),(int) (2)))); + //BA.debugLineNum = 2131;BA.debugLine="L_EFEC_PURA.Text = Round2(L_VISITCC.Text / L_VPLA"; +_l_efec_pura.setText(BA.ObjectToCharSequence(__c.Round2((double)(Double.parseDouble(_l_visitcc.getText()))/(double)(double)(Double.parseDouble(_l_vplan.getText())),(int) (2)))); + //BA.debugLineNum = 2132;BA.debugLine="L_LIN_TICK.Text = LPT"; +_l_lin_tick.setText(BA.ObjectToCharSequence(_lpt)); + //BA.debugLineNum = 2133;BA.debugLine="If l_monto_ks.Text <> \"0\" Then"; +if ((_l_monto_ks.getText()).equals("0") == false) { + //BA.debugLineNum = 2135;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"Select COU"; +_c = (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*/ .ExecQuery2("Select COUNT(DISTINCT(PE_CLIENTE)) AS CUANTOS FROM PEDIDO WHERE PE_CEDIS = ? ",new String[]{_almacen}))); + //BA.debugLineNum = 2136;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 2137;BA.debugLine="L_CTE_PROMO.Text = c.GetString(\"CUANTOS\")"; +_l_cte_promo.setText(BA.ObjectToCharSequence(_c.GetString("CUANTOS"))); + //BA.debugLineNum = 2138;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 2139;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery2(\"Select sum("; +_d = (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*/ .ExecQuery2("Select sum(PE_COSTO_TOT) AS MONTO_DIA FROM PEDIDO WHERE PE_PROID IN (select CAT_GP_ID from cat_gunaprod where CAT_GP_TIPOPROD = ?) ",new String[]{"PRIORITARIO"}))); + //BA.debugLineNum = 2140;BA.debugLine="d.Position = 0"; +_d.setPosition((int) (0)); + //BA.debugLineNum = 2147;BA.debugLine="Log(\"|\"&d.GetString(\"MONTO_DIA\")&\"|\")"; +__c.LogImpl("340632460","|"+_d.GetString("MONTO_DIA")+"|",0); + //BA.debugLineNum = 2149;BA.debugLine="L_PRIO.Text = d.GetString(\"MONTO_DIA\")"; +_l_prio.setText(BA.ObjectToCharSequence(_d.GetString("MONTO_DIA"))); + //BA.debugLineNum = 2150;BA.debugLine="d.Close"; +_d.Close(); + //BA.debugLineNum = 2152;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery2(\"Select sum("; +_d = (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*/ .ExecQuery2("Select sum(PE_COSTO_TOT) AS MONTO_DIA FROM PEDIDO WHERE PE_PROID IN (select CAT_GP_ID from cat_gunaprod where CAT_GP_TIPOPROD = ?) ",new String[]{"ESTRATEGICO"}))); + //BA.debugLineNum = 2153;BA.debugLine="d.Position = 0"; +_d.setPosition((int) (0)); + //BA.debugLineNum = 2154;BA.debugLine="L_SECUND.Text =d.GetString(\"MONTO_DIA\")"; +_l_secund.setText(BA.ObjectToCharSequence(_d.GetString("MONTO_DIA"))); + //BA.debugLineNum = 2155;BA.debugLine="d.Close"; +_d.Close(); + //BA.debugLineNum = 2157;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery2(\"Select sum("; +_d = (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*/ .ExecQuery2("Select sum(PE_COSTO_TOT) AS MONTO_DIA FROM PEDIDO WHERE PE_PROID IN (select CAT_GP_ID from cat_gunaprod where CAT_GP_TIPOPROD = ?) ",new String[]{"COMPLEMENTARIO"}))); + //BA.debugLineNum = 2158;BA.debugLine="d.Position = 0"; +_d.setPosition((int) (0)); + //BA.debugLineNum = 2159;BA.debugLine="L_COMP.Text =d.GetString(\"MONTO_DIA\")"; +_l_comp.setText(BA.ObjectToCharSequence(_d.GetString("MONTO_DIA"))); + //BA.debugLineNum = 2160;BA.debugLine="d.Close"; +_d.Close(); + }else { + //BA.debugLineNum = 2162;BA.debugLine="L_PRIO.Text = \"0\""; +_l_prio.setText(BA.ObjectToCharSequence("0")); + //BA.debugLineNum = 2163;BA.debugLine="L_SECUND.Text = \"0\""; +_l_secund.setText(BA.ObjectToCharSequence("0")); + //BA.debugLineNum = 2164;BA.debugLine="L_COMP.Text = \"0\""; +_l_comp.setText(BA.ObjectToCharSequence("0")); + }; + //BA.debugLineNum = 2167;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select COUNT"; +_c = (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 COUNT(*) AS CUANTOS FROM PEDIDO WHERE PE_CEDIS = PE_PROID "))); + //BA.debugLineNum = 2168;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 2169;BA.debugLine="If c.GetString(\"CUANTOS\") > 0 Then"; +if ((double)(Double.parseDouble(_c.GetString("CUANTOS")))>0) { + //BA.debugLineNum = 2170;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"Select sum("; +_d = (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 sum(pe_cant) AS CUANTOS FROM PEDIDO WHERE PE_CEDIS = PE_PROID "))); + //BA.debugLineNum = 2171;BA.debugLine="d.Position = 0"; +_d.setPosition((int) (0)); + //BA.debugLineNum = 2172;BA.debugLine="L_CTE_PROMO.Text = d.GetString(\"CUANTOS\")"; +_l_cte_promo.setText(BA.ObjectToCharSequence(_d.GetString("CUANTOS"))); + //BA.debugLineNum = 2173;BA.debugLine="d.Close"; +_d.Close(); + //BA.debugLineNum = 2174;BA.debugLine="L_REDEN_PROMO.TEXT = Round2(L_VISITCC.Text / L_C"; +_l_reden_promo.setText(BA.ObjectToCharSequence(__c.Round2((double)(Double.parseDouble(_l_visitcc.getText()))/(double)(double)(Double.parseDouble(_l_cte_promo.getText())),(int) (2)))); + }else { + //BA.debugLineNum = 2176;BA.debugLine="L_CTE_PROMO.Text = 0"; +_l_cte_promo.setText(BA.ObjectToCharSequence(0)); + //BA.debugLineNum = 2177;BA.debugLine="L_REDEN_PROMO.Text = 0"; +_l_reden_promo.setText(BA.ObjectToCharSequence(0)); + }; + //BA.debugLineNum = 2179;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 2180;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"Select COUNT"; +_d = (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 COUNT(*) AS CUANTOS FROM PEDIDO "))); + //BA.debugLineNum = 2181;BA.debugLine="d.Position = 0"; +_d.setPosition((int) (0)); + //BA.debugLineNum = 2182;BA.debugLine="L_LIN_TICK.Text = Round2(d.GetString(\"CUANTOS\") /"; +_l_lin_tick.setText(BA.ObjectToCharSequence(__c.Round2((double)(Double.parseDouble(_d.GetString("CUANTOS")))/(double)(double)(Double.parseDouble(_l_visitcc.getText())),(int) (2)))); + //BA.debugLineNum = 2183;BA.debugLine="d.Close"; +_d.Close(); + //BA.debugLineNum = 2185;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"Select count"; +_d = (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 count(*) as CUANTOS from HIST_CUOTAS "))); + //BA.debugLineNum = 2186;BA.debugLine="d.Position = 0"; +_d.setPosition((int) (0)); + //BA.debugLineNum = 2187;BA.debugLine="If d.GetString(\"CUANTOS\") > 0 Then"; +if ((double)(Double.parseDouble(_d.GetString("CUANTOS")))>0) { + }else { + //BA.debugLineNum = 2195;BA.debugLine="l_monto_c1.Text = 4000"; +_l_monto_c1.setText(BA.ObjectToCharSequence(4000)); + //BA.debugLineNum = 2196;BA.debugLine="l_monto_c2.Text = 2000"; +_l_monto_c2.setText(BA.ObjectToCharSequence(2000)); + //BA.debugLineNum = 2197;BA.debugLine="l_monto_c3.Text = 1000"; +_l_monto_c3.setText(BA.ObjectToCharSequence(1000)); + }; + //BA.debugLineNum = 2199;BA.debugLine="d.Close"; +_d.Close(); + //BA.debugLineNum = 2200;BA.debugLine="End Sub"; return ""; } -public String _resumen_click(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "resumen_click", false)) - {return ((String) Debug.delegate(ba, "resumen_click", null));} -RDebugUtils.currentLine=4128768; - //BA.debugLineNum = 4128768;BA.debugLine="Sub Resumen_Click"; -RDebugUtils.currentLine=4128769; - //BA.debugLineNum = 4128769;BA.debugLine="P_RESUMEN.Visible = True"; -__ref._p_resumen /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=4128777; - //BA.debugLineNum = 4128777;BA.debugLine="End Sub"; +public String _resumen_click() throws Exception{ + //BA.debugLineNum = 1988;BA.debugLine="Sub Resumen_Click"; + //BA.debugLineNum = 1989;BA.debugLine="P_RESUMEN.Visible = True"; +_p_resumen.setVisible(__c.True); + //BA.debugLineNum = 1997;BA.debugLine="End Sub"; return ""; } -public String _subir_click(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "subir_click", false)) - {return ((String) Debug.delegate(ba, "subir_click", null));} +public String _subir_click() throws Exception{ int _i = 0; +anywheresoftware.b4a.sql.SQL.CursorWrapper _cursor = null; +anywheresoftware.b4a.sql.SQL.CursorWrapper _cursor2 = null; +anywheresoftware.b4a.sql.SQL.CursorWrapper _cursor3 = null; anywheresoftware.b4a.sql.SQL.ResultSetWrapper _h = null; String _eventob = ""; String _clienteb = ""; String _finb = ""; String _nombrecliente = ""; -String _eventov = ""; -String _clientev = ""; -String _nombreclientev = ""; -RDebugUtils.currentLine=3276800; - //BA.debugLineNum = 3276800;BA.debugLine="Sub Subir_Click"; -RDebugUtils.currentLine=3276801; - //BA.debugLineNum = 3276801;BA.debugLine="CARGA = \"SUBIR\""; -__ref._carga /*String*/ = "SUBIR"; -RDebugUtils.currentLine=3276802; - //BA.debugLineNum = 3276802;BA.debugLine="p_mandaInfo.Width = Root.Width"; -__ref._p_mandainfo /*anywheresoftware.b4a.objects.PanelWrapper*/ .setWidth(__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()); -RDebugUtils.currentLine=3276803; - //BA.debugLineNum = 3276803;BA.debugLine="p_mandaInfo.Height = Root.Height"; -__ref._p_mandainfo /*anywheresoftware.b4a.objects.PanelWrapper*/ .setHeight(__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=3276804; - //BA.debugLineNum = 3276804;BA.debugLine="P1.Visible = True"; -__ref._p1 /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3276805; - //BA.debugLineNum = 3276805;BA.debugLine="P1.Left = (p_mandaInfo.Width/2) - (P1.Width/2)"; -__ref._p1 /*anywheresoftware.b4a.objects.PanelWrapper*/ .setLeft((int) ((__ref._p_mandainfo /*anywheresoftware.b4a.objects.PanelWrapper*/ .getWidth()/(double)2)-(__ref._p1 /*anywheresoftware.b4a.objects.PanelWrapper*/ .getWidth()/(double)2))); -RDebugUtils.currentLine=3276806; - //BA.debugLineNum = 3276806;BA.debugLine="P1.top = (p_mandaInfo.Height/2) - (P1.Height/2)"; -__ref._p1 /*anywheresoftware.b4a.objects.PanelWrapper*/ .setTop((int) ((__ref._p_mandainfo /*anywheresoftware.b4a.objects.PanelWrapper*/ .getHeight()/(double)2)-(__ref._p1 /*anywheresoftware.b4a.objects.PanelWrapper*/ .getHeight()/(double)2))); -RDebugUtils.currentLine=3276807; - //BA.debugLineNum = 3276807;BA.debugLine="p_mandaInfo.Visible = True"; -__ref._p_mandainfo /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3276808; - //BA.debugLineNum = 3276808;BA.debugLine="P1.BringToFront"; -__ref._p1 /*anywheresoftware.b4a.objects.PanelWrapper*/ .BringToFront(); -RDebugUtils.currentLine=3276809; - //BA.debugLineNum = 3276809;BA.debugLine="p_mandaInfo.BringToFront"; -__ref._p_mandainfo /*anywheresoftware.b4a.objects.PanelWrapper*/ .BringToFront(); -RDebugUtils.currentLine=3276811; - //BA.debugLineNum = 3276811;BA.debugLine="NUEVO.Visible =False"; -__ref._nuevo /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3276812; - //BA.debugLineNum = 3276812;BA.debugLine="BUSCA.Visible=False"; -__ref._busca /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3276813; - //BA.debugLineNum = 3276813;BA.debugLine="connecta.Visible=False"; -__ref._connecta /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3276814; - //BA.debugLineNum = 3276814;BA.debugLine="Subir.Visible=False"; -__ref._subir /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3276815; - //BA.debugLineNum = 3276815;BA.debugLine="cargar.Visible=False"; -__ref._cargar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3276816; - //BA.debugLineNum = 3276816;BA.debugLine="L_P_1.Visible = False"; -__ref._l_p_1 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3276817; - //BA.debugLineNum = 3276817;BA.debugLine="S_CC.Visible = False"; -__ref._s_cc /*anywheresoftware.b4a.objects.LabelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3276818; - //BA.debugLineNum = 3276818;BA.debugLine="L_P_3.Visible = False"; -__ref._l_p_3 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3276819; - //BA.debugLineNum = 3276819;BA.debugLine="S_CH.Visible = False"; -__ref._s_ch /*anywheresoftware.b4a.objects.LabelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3276820; - //BA.debugLineNum = 3276820;BA.debugLine="PB1.Visible = False"; -__ref._pb1 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3276821; - //BA.debugLineNum = 3276821;BA.debugLine="Resumen.Visible= False"; -__ref._resumen /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3276823; - //BA.debugLineNum = 3276823;BA.debugLine="L_P_2.Text = \"Envio de Pedidos\""; -__ref._l_p_2 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("Envio de Pedidos")); -RDebugUtils.currentLine=3276824; - //BA.debugLineNum = 3276824;BA.debugLine="L_P_3.Text = \"Envio de Pedidos\""; -__ref._l_p_3 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("Envio de Pedidos")); -RDebugUtils.currentLine=3276825; - //BA.debugLineNum = 3276825;BA.debugLine="S_CH.Text = \"EN PROCESO\""; -__ref._s_ch /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("EN PROCESO")); -RDebugUtils.currentLine=3276826; - //BA.debugLineNum = 3276826;BA.debugLine="S_CP.Text = \"EN PROCESO\""; -__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("EN PROCESO")); -RDebugUtils.currentLine=3276827; - //BA.debugLineNum = 3276827;BA.debugLine="PB1.Progress = 0"; -__ref._pb1 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (0)); -RDebugUtils.currentLine=3276828; - //BA.debugLineNum = 3276828;BA.debugLine="PB2.Progress = 0"; -__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .setProgress((int) (0)); -RDebugUtils.currentLine=3276834; - //BA.debugLineNum = 3276834;BA.debugLine="PASO = 1"; -__ref._paso /*String*/ = BA.NumberToString(1); -RDebugUtils.currentLine=3276836; - //BA.debugLineNum = 3276836;BA.debugLine="If PASO =1 Then"; -if ((__ref._paso /*String*/ ).equals(BA.NumberToString(1))) { -RDebugUtils.currentLine=3276837; - //BA.debugLineNum = 3276837;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete fro"; + //BA.debugLineNum = 484;BA.debugLine="Sub Subir_Click"; + //BA.debugLineNum = 485;BA.debugLine="CARGA = \"SUBIR\""; +_carga = "SUBIR"; + //BA.debugLineNum = 486;BA.debugLine="p_mandaInfo.Width = Root.Width"; +_p_mandainfo.setWidth(_root.getWidth()); + //BA.debugLineNum = 487;BA.debugLine="p_mandaInfo.Height = Root.Height"; +_p_mandainfo.setHeight(_root.getHeight()); + //BA.debugLineNum = 488;BA.debugLine="P1.Visible = True"; +_p1.setVisible(__c.True); + //BA.debugLineNum = 489;BA.debugLine="P1.Left = (p_mandaInfo.Width/2) - (P1.Width/2)"; +_p1.setLeft((int) ((_p_mandainfo.getWidth()/(double)2)-(_p1.getWidth()/(double)2))); + //BA.debugLineNum = 490;BA.debugLine="P1.top = (p_mandaInfo.Height/2) - (P1.Height/2)"; +_p1.setTop((int) ((_p_mandainfo.getHeight()/(double)2)-(_p1.getHeight()/(double)2))); + //BA.debugLineNum = 491;BA.debugLine="p_mandaInfo.Visible = True"; +_p_mandainfo.setVisible(__c.True); + //BA.debugLineNum = 492;BA.debugLine="P1.BringToFront"; +_p1.BringToFront(); + //BA.debugLineNum = 493;BA.debugLine="p_mandaInfo.BringToFront"; +_p_mandainfo.BringToFront(); + //BA.debugLineNum = 495;BA.debugLine="NUEVO.Visible =False"; +_nuevo.setVisible(__c.False); + //BA.debugLineNum = 496;BA.debugLine="BUSCA.Visible=False"; +_busca.setVisible(__c.False); + //BA.debugLineNum = 497;BA.debugLine="connecta.Visible=False"; +_connecta.setVisible(__c.False); + //BA.debugLineNum = 498;BA.debugLine="Subir.Visible=False"; +_subir.setVisible(__c.False); + //BA.debugLineNum = 499;BA.debugLine="cargar.Visible=False"; +_cargar.setVisible(__c.False); + //BA.debugLineNum = 500;BA.debugLine="L_P_1.Visible = False"; +_l_p_1.setVisible(__c.False); + //BA.debugLineNum = 501;BA.debugLine="S_CC.Visible = False"; +_s_cc.setVisible(__c.False); + //BA.debugLineNum = 502;BA.debugLine="L_P_3.Visible = False"; +_l_p_3.setVisible(__c.False); + //BA.debugLineNum = 503;BA.debugLine="S_CH.Visible = False"; +_s_ch.setVisible(__c.False); + //BA.debugLineNum = 504;BA.debugLine="PB1.Visible = False"; +_pb1.setVisible(__c.False); + //BA.debugLineNum = 505;BA.debugLine="Resumen.Visible= False"; +_resumen.setVisible(__c.False); + //BA.debugLineNum = 507;BA.debugLine="L_P_2.Text = \"Envio de Pedidos\""; +_l_p_2.setText(BA.ObjectToCharSequence("Envio de Pedidos")); + //BA.debugLineNum = 508;BA.debugLine="L_P_3.Text = \"Envio de Pedidos\""; +_l_p_3.setText(BA.ObjectToCharSequence("Envio de Pedidos")); + //BA.debugLineNum = 509;BA.debugLine="S_CH.Text = \"EN PROCESO\""; +_s_ch.setText(BA.ObjectToCharSequence("EN PROCESO")); + //BA.debugLineNum = 510;BA.debugLine="S_CP.Text = \"EN PROCESO\""; +_s_cp.setText(BA.ObjectToCharSequence("EN PROCESO")); + //BA.debugLineNum = 511;BA.debugLine="PB1.Progress = 0"; +_pb1.setProgress((int) (0)); + //BA.debugLineNum = 512;BA.debugLine="PB2.Progress = 0"; +_pb2.setProgress((int) (0)); + //BA.debugLineNum = 518;BA.debugLine="PASO = 1"; +_paso = BA.NumberToString(1); + //BA.debugLineNum = 520;BA.debugLine="If PASO =1 Then"; +if ((_paso).equals(BA.NumberToString(1))) { + //BA.debugLineNum = 521;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete fro"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("delete from PEDIDO WHERE PE_PRONOMBRE = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("N/A")})); -RDebugUtils.currentLine=3276838; - //BA.debugLineNum = 3276838;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + //BA.debugLineNum = 522;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente where PC_CLIENTE not In (select PE_CLIENTE from pedido)"); -RDebugUtils.currentLine=3276839; - //BA.debugLineNum = 3276839;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select usuar"; -__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=3276840; - //BA.debugLineNum = 3276840;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3276841; - //BA.debugLineNum = 3276841;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -__ref._usuario /*String*/ = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("USUARIO"); -RDebugUtils.currentLine=3276842; - //BA.debugLineNum = 3276842;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3276843; - //BA.debugLineNum = 3276843;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select HGDAT"; -__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 HGDATE, HGLAT, HGLON from HIST_GPS"))); -RDebugUtils.currentLine=3276844; - //BA.debugLineNum = 3276844;BA.debugLine="If c.RowCount>0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=3276845; - //BA.debugLineNum = 3276845;BA.debugLine="For i=0 To c.RowCount -1"; + //BA.debugLineNum = 523;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select usuar"; +_c = (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"))); + //BA.debugLineNum = 524;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 525;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; +_usuario = _c.GetString("USUARIO"); + //BA.debugLineNum = 526;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 527;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select HGDAT"; +_c = (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 HGDATE, HGLAT, HGLON from HIST_GPS"))); + //BA.debugLineNum = 528;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 529;BA.debugLine="For i=0 To c.RowCount -1"; { final int step37 = 1; -final int limit37 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit37 = (int) (_c.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit37 ;_i = _i + step37 ) { -RDebugUtils.currentLine=3276846; - //BA.debugLineNum = 3276846;BA.debugLine="c.Position=i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=3276847; - //BA.debugLineNum = 3276847;BA.debugLine="Dim cmd As DBCommand"; + //BA.debugLineNum = 530;BA.debugLine="c.Position=i"; +_c.setPosition(_i); + //BA.debugLineNum = 531;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=3276848; - //BA.debugLineNum = 3276848;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3276849; - //BA.debugLineNum = 3276849;BA.debugLine="cmd.Name = \"UPDATE_MEDI_ACTUAL2_GPS\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "UPDATE_MEDI_ACTUAL2_GPS"; -RDebugUtils.currentLine=3276850; - //BA.debugLineNum = 3276850;BA.debugLine="cmd.Parameters = Array As Object(L_MONTOD.Text"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._l_montod /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._l_cuantost /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._l_cuantosc /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._l_porvisitar /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("hglat")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("hglon")),(Object)(__ref._batterystatus /*int[]*/ [(int) (0)]),(Object)(__ref._lpt /*String*/ ),(Object)(__ref._steyin /*String*/ ),(Object)(__ref._steyout /*String*/ ),(Object)(__ref._almacen /*String*/ ),(Object)(__ref._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())}; -RDebugUtils.currentLine=3276851; - //BA.debugLineNum = 3276851;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(Object)("update_gps")); + //BA.debugLineNum = 532;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 533;BA.debugLine="cmd.Name = \"UPDATE_MEDI_ACTUAL2_GPS\""; +_cmd.Name /*String*/ = "UPDATE_MEDI_ACTUAL2_GPS"; + //BA.debugLineNum = 537;BA.debugLine="Private cursor As Cursor = B4XPages.MainPage.s"; +_cursor = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); +_cursor = (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 Sum(montoVentav) AS MONTO_VENTA FROM VENTA_NO_VENTA"))); + //BA.debugLineNum = 538;BA.debugLine="cursor.Position = 0"; +_cursor.setPosition((int) (0)); + //BA.debugLineNum = 539;BA.debugLine="Private cursor2 As Cursor = B4XPages.MainPage."; +_cursor2 = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); +_cursor2 = (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 COUNT (*) AS CUENTA_TODO FROM VENTA_NO_VENTA"))); + //BA.debugLineNum = 540;BA.debugLine="cursor2.Position = 0"; +_cursor2.setPosition((int) (0)); + //BA.debugLineNum = 541;BA.debugLine="Private cursor3 As Cursor = B4XPages.MainPage."; +_cursor3 = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); +_cursor3 = (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 COUNT (*) AS CUENTA_VENTA FROM VENTA_NO_VENTA WHERE montoVentaV <> 0"))); + //BA.debugLineNum = 542;BA.debugLine="cursor3.Position = 0"; +_cursor3.setPosition((int) (0)); + //BA.debugLineNum = 544;BA.debugLine="cmd.Parameters = Array As String(cursor.GetStr"; +_cmd.Parameters /*Object[]*/ = (Object[])(new String[]{_cursor.GetString("MONTO_VENTA"),_cursor2.GetString("CUENTA_TODO"),_cursor3.GetString("CUENTA_VENTA"),_l_porvisitar.getText(),_c.GetString("hglat"),_c.GetString("hglon"),BA.NumberToString(_batterystatus[(int) (0)]),_lpt,_steyin,_steyout,_almacen,_l_ruta.getText()}); + //BA.debugLineNum = 545;BA.debugLine="cursor.Close"; +_cursor.Close(); + //BA.debugLineNum = 546;BA.debugLine="cursor2.Close"; +_cursor2.Close(); + //BA.debugLineNum = 547;BA.debugLine="cursor3.Close"; +_cursor3.Close(); + //BA.debugLineNum = 548;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (_cmd,(Object)("update_gps")); } }; }; -RDebugUtils.currentLine=3276854; - //BA.debugLineNum = 3276854;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3276857; - //BA.debugLineNum = 3276857;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT PC_CL"; -__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 PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT, PC_COSTO_SIN, PC_RUTA, PC_ALMACEN, PC_FACTURA FROM PEDIDO_CLIENTE "))); -RDebugUtils.currentLine=3276858; - //BA.debugLineNum = 3276858;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"SELECT COUNT"; -__ref._d /*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 COUNT(*) as CUANTOS_PEDIDOSC FROM PEDIDO_CLIENTE "))); -RDebugUtils.currentLine=3276859; - //BA.debugLineNum = 3276859;BA.debugLine="If c.RowCount>0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=3276860; - //BA.debugLineNum = 3276860;BA.debugLine="For i=0 To c.RowCount -1"; + //BA.debugLineNum = 551;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 554;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT PC_CL"; +_c = (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 PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT, PC_COSTO_SIN, PC_RUTA, PC_ALMACEN, PC_FACTURA FROM PEDIDO_CLIENTE "))); + //BA.debugLineNum = 555;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"SELECT COUNT"; +_d = (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 COUNT(*) as CUANTOS_PEDIDOSC FROM PEDIDO_CLIENTE "))); + //BA.debugLineNum = 556;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 557;BA.debugLine="For i=0 To c.RowCount -1"; { -final int step50 = 1; -final int limit50 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int step59 = 1; +final int limit59 = (int) (_c.getRowCount()-1); _i = (int) (0) ; -for (;_i <= limit50 ;_i = _i + step50 ) { -RDebugUtils.currentLine=3276861; - //BA.debugLineNum = 3276861;BA.debugLine="c.Position=i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=3276862; - //BA.debugLineNum = 3276862;BA.debugLine="Dim cmd As DBCommand"; +for (;_i <= limit59 ;_i = _i + step59 ) { + //BA.debugLineNum = 558;BA.debugLine="c.Position=i"; +_c.setPosition(_i); + //BA.debugLineNum = 559;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=3276863; - //BA.debugLineNum = 3276863;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3276864; - //BA.debugLineNum = 3276864;BA.debugLine="cmd.Name = \"insert_pedidos_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "insert_pedidos_MEDI"; -RDebugUtils.currentLine=3276865; - //BA.debugLineNum = 3276865;BA.debugLine="cmd.Parameters = Array As Object(c.GetString(\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_CLIENTE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_FECHA")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_USER")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_NOART")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_MONTO")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_LON")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_LAT")),(Object)(__ref._almacen /*String*/ ),(Object)(__ref._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_COSTO_SIN")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_FACTURA"))}; -RDebugUtils.currentLine=3276866; - //BA.debugLineNum = 3276866;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(Object)("ins_pedidos")); + //BA.debugLineNum = 560;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 561;BA.debugLine="cmd.Name = \"insert_pedidos_MEDI\""; +_cmd.Name /*String*/ = "insert_pedidos_MEDI"; + //BA.debugLineNum = 562;BA.debugLine="cmd.Parameters = Array As Object(c.GetString(\""; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_c.GetString("PC_CLIENTE")),(Object)(_c.GetString("PC_FECHA")),(Object)(_c.GetString("PC_USER")),(Object)(_c.GetString("PC_NOART")),(Object)(_c.GetString("PC_MONTO")),(Object)(_c.GetString("PC_LON")),(Object)(_c.GetString("PC_LAT")),(Object)(_almacen),(Object)(_l_ruta.getText()),(Object)(_c.GetString("PC_COSTO_SIN")),(Object)(_c.GetString("PC_FACTURA"))}; + //BA.debugLineNum = 563;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (_cmd,(Object)("ins_pedidos")); } }; }; -RDebugUtils.currentLine=3276869; - //BA.debugLineNum = 3276869;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3276870; - //BA.debugLineNum = 3276870;BA.debugLine="d.Position=0"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3276871; - //BA.debugLineNum = 3276871;BA.debugLine="cuantos_pedidosc = D.GetString(\"CUANTOS_PEDIDOSC"; -__ref._cuantos_pedidosc /*String*/ = __ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS_PEDIDOSC"); -RDebugUtils.currentLine=3276872; - //BA.debugLineNum = 3276872;BA.debugLine="d.Close"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3276878; - //BA.debugLineNum = 3276878;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT CODIG"; -__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 CODIGOKMTS, CODIGOB, LAT, LON FROM HIST_CODIGO_BARRAS"))); -RDebugUtils.currentLine=3276879; - //BA.debugLineNum = 3276879;BA.debugLine="If c.RowCount>0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=3276880; - //BA.debugLineNum = 3276880;BA.debugLine="For i=0 To c.RowCount -1"; + //BA.debugLineNum = 566;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 567;BA.debugLine="d.Position=0"; +_d.setPosition((int) (0)); + //BA.debugLineNum = 568;BA.debugLine="cuantos_pedidosc = D.GetString(\"CUANTOS_PEDIDOSC"; +_cuantos_pedidosc = _d.GetString("CUANTOS_PEDIDOSC"); + //BA.debugLineNum = 569;BA.debugLine="d.Close"; +_d.Close(); + //BA.debugLineNum = 575;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT CODIG"; +_c = (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 CODIGOKMTS, CODIGOB, LAT, LON FROM HIST_CODIGO_BARRAS"))); + //BA.debugLineNum = 576;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 577;BA.debugLine="For i=0 To c.RowCount -1"; { -final int step65 = 1; -final int limit65 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int step74 = 1; +final int limit74 = (int) (_c.getRowCount()-1); _i = (int) (0) ; -for (;_i <= limit65 ;_i = _i + step65 ) { -RDebugUtils.currentLine=3276881; - //BA.debugLineNum = 3276881;BA.debugLine="c.Position=i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=3276882; - //BA.debugLineNum = 3276882;BA.debugLine="Dim cmd As DBCommand"; +for (;_i <= limit74 ;_i = _i + step74 ) { + //BA.debugLineNum = 578;BA.debugLine="c.Position=i"; +_c.setPosition(_i); + //BA.debugLineNum = 579;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=3276883; - //BA.debugLineNum = 3276883;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3276884; - //BA.debugLineNum = 3276884;BA.debugLine="cmd.Name = \"insert_QR_2_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "insert_QR_2_MEDI"; -RDebugUtils.currentLine=3276885; - //BA.debugLineNum = 3276885;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CODIGOKMTS")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CODIGOB")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("LON")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("LAT")),(Object)(__ref._almacen /*String*/ ),(Object)(__ref._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())}; -RDebugUtils.currentLine=3276886; - //BA.debugLineNum = 3276886;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(Object)("ins_QR")); + //BA.debugLineNum = 580;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 581;BA.debugLine="cmd.Name = \"insert_QR_2_MEDI\""; +_cmd.Name /*String*/ = "insert_QR_2_MEDI"; + //BA.debugLineNum = 582;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\""; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_c.GetString("CODIGOKMTS")),(Object)(_c.GetString("CODIGOB")),(Object)(_c.GetString("LON")),(Object)(_c.GetString("LAT")),(Object)(_almacen),(Object)(_l_ruta.getText())}; + //BA.debugLineNum = 583;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (_cmd,(Object)("ins_QR")); } }; }; -RDebugUtils.currentLine=3276889; - //BA.debugLineNum = 3276889;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3276893; - //BA.debugLineNum = 3276893;BA.debugLine="Private h As ResultSet = B4XPages.MainPage.skmt."; + //BA.debugLineNum = 586;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 590;BA.debugLine="Private h As ResultSet = B4XPages.MainPage.skmt."; _h = new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(); _h = (anywheresoftware.b4a.sql.SQL.ResultSetWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(), (android.database.Cursor)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select * from bitacoraGPS")))); -RDebugUtils.currentLine=3276894; - //BA.debugLineNum = 3276894;BA.debugLine="Do While h.nextrow"; + //BA.debugLineNum = 591;BA.debugLine="Do While h.nextrow"; while (_h.NextRow()) { -RDebugUtils.currentLine=3276895; - //BA.debugLineNum = 3276895;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3276896; - //BA.debugLineNum = 3276896;BA.debugLine="Private eventob As String = h.GetString(\"evento"; + //BA.debugLineNum = 592;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 593;BA.debugLine="Private eventob As String = h.GetString(\"evento"; _eventob = _h.GetString("eventob"); -RDebugUtils.currentLine=3276897; - //BA.debugLineNum = 3276897;BA.debugLine="cmd.Name = \"mandaBitacora_MEDICOMED\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "mandaBitacora_MEDICOMED"; -RDebugUtils.currentLine=3276898; - //BA.debugLineNum = 3276898;BA.debugLine="Log(\"BITACORA3\")"; -__c.LogImpl("33276898","BITACORA3",0); -RDebugUtils.currentLine=3276899; - //BA.debugLineNum = 3276899;BA.debugLine="Private clienteb As String = h.GetString(\"clien"; + //BA.debugLineNum = 594;BA.debugLine="cmd.Name = \"mandaBitacora_MEDICOMED\""; +_cmd.Name /*String*/ = "mandaBitacora_MEDICOMED"; + //BA.debugLineNum = 595;BA.debugLine="Log(\"BITACORA3\")"; +__c.LogImpl("339583855","BITACORA3",0); + //BA.debugLineNum = 596;BA.debugLine="Private clienteb As String = h.GetString(\"clien"; _clienteb = _h.GetString("clienteb"); -RDebugUtils.currentLine=3276900; - //BA.debugLineNum = 3276900;BA.debugLine="Private finb As String = h.GetString(\"finb\")"; + //BA.debugLineNum = 597;BA.debugLine="Private finb As String = h.GetString(\"finb\")"; _finb = _h.GetString("finb"); -RDebugUtils.currentLine=3276901; - //BA.debugLineNum = 3276901;BA.debugLine="Private nombreCliente As String =Subs. traeNomb"; + //BA.debugLineNum = 598;BA.debugLine="Private nombreCliente As String =Subs. traeNomb"; _nombrecliente = _subs._traenombrecliente /*String*/ (ba,_h.GetString("clienteb")); -RDebugUtils.currentLine=3276902; - //BA.debugLineNum = 3276902;BA.debugLine="If eventob = \"Llega a almacen\" Then"; + //BA.debugLineNum = 599;BA.debugLine="If eventob = \"Llega a almacen\" Then"; if ((_eventob).equals("Llega a almacen")) { -RDebugUtils.currentLine=3276903; - //BA.debugLineNum = 3276903;BA.debugLine="nombreCliente = \"BOLETA\""; + //BA.debugLineNum = 600;BA.debugLine="nombreCliente = \"BOLETA\""; _nombrecliente = "BOLETA"; -RDebugUtils.currentLine=3276904; - //BA.debugLineNum = 3276904;BA.debugLine="clienteb = \"\""; + //BA.debugLineNum = 601;BA.debugLine="clienteb = \"\""; _clienteb = ""; -RDebugUtils.currentLine=3276905; - //BA.debugLineNum = 3276905;BA.debugLine="finb = h.GetString(\"iniciob\")"; + //BA.debugLineNum = 602;BA.debugLine="finb = h.GetString(\"iniciob\")"; _finb = _h.GetString("iniciob"); }; -RDebugUtils.currentLine=3276907; - //BA.debugLineNum = 3276907;BA.debugLine="If eventob = \"Salida almacen\" Then nombreClient"; + //BA.debugLineNum = 604;BA.debugLine="If eventob = \"Salida almacen\" Then nombreClient"; if ((_eventob).equals("Salida almacen")) { _nombrecliente = "CHECKLIST";}; -RDebugUtils.currentLine=3276908; - //BA.debugLineNum = 3276908;BA.debugLine="If eventob = \"Fin Día\" Then nombreCliente = \"FI"; + //BA.debugLineNum = 605;BA.debugLine="If eventob = \"Fin Día\" Then nombreCliente = \"FI"; if ((_eventob).equals("Fin Día")) { _nombrecliente = "FIN DIA";}; -RDebugUtils.currentLine=3276909; - //BA.debugLineNum = 3276909;BA.debugLine="If eventob = \"Carga día\" Then nombreCliente = \""; + //BA.debugLineNum = 606;BA.debugLine="If eventob = \"Carga día\" Then nombreCliente = \""; if ((_eventob).equals("Carga día")) { _nombrecliente = "CARGA DIA";}; -RDebugUtils.currentLine=3276912; - //BA.debugLineNum = 3276912;BA.debugLine="cmd.Parameters = Array As Object(h.GetString(\"a"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(_h.GetString("almacenb")),(Object)(_h.GetString("usuariob")),(Object)(_h.GetString("rutab")),(Object)(_eventob),(Object)(_clienteb),(Object)(_nombrecliente),(Object)(_h.GetString("iniciob")),(Object)(_finb),(Object)(_h.GetString("latitudb")),(Object)(_h.GetString("longitudb")),(Object)(_h.GetString("precision")),(Object)(_h.GetString("motivonoventa")),(Object)(_h.GetString("motivonovisita")),(Object)(_h.GetString("fechab"))}; -RDebugUtils.currentLine=3276913; - //BA.debugLineNum = 3276913;BA.debugLine="reqManager.ExecuteCommand(cmd , \"mandaBitacora\""; -__ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(Object)("mandaBitacora")); + //BA.debugLineNum = 609;BA.debugLine="cmd.Parameters = Array As Object(h.GetString(\"a"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_h.GetString("almacenb")),(Object)(_h.GetString("usuariob")),(Object)(_h.GetString("rutab")),(Object)(_eventob),(Object)(_clienteb),(Object)(_nombrecliente),(Object)(_h.GetString("iniciob")),(Object)(_finb),(Object)(_h.GetString("latitudb")),(Object)(_h.GetString("longitudb")),(Object)(_h.GetString("precision")),(Object)(_h.GetString("motivonoventa")),(Object)(_h.GetString("motivonovisita")),(Object)(_h.GetString("fechab"))}; + //BA.debugLineNum = 610;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cmd"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (_cmd,(Object)("mandaBitacora")); } ; -RDebugUtils.currentLine=3276915; - //BA.debugLineNum = 3276915;BA.debugLine="Log(\"MANDAMOS BITACORA\")"; -__c.LogImpl("33276915","MANDAMOS BITACORA",0); -RDebugUtils.currentLine=3276920; - //BA.debugLineNum = 3276920;BA.debugLine="Private h As ResultSet = B4XPages.MainPage.skmt."; + //BA.debugLineNum = 612;BA.debugLine="Log(\"MANDAMOS BITACORA\")"; +__c.LogImpl("339583872","MANDAMOS BITACORA",0); + //BA.debugLineNum = 635;BA.debugLine="Private h As ResultSet = B4XPages.MainPage.skmt."; _h = new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(); _h = (anywheresoftware.b4a.sql.SQL.ResultSetWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(), (android.database.Cursor)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select * from VENTA_No_VENTA")))); -RDebugUtils.currentLine=3276921; - //BA.debugLineNum = 3276921;BA.debugLine="Do While h.nextrow"; -while (_h.NextRow()) { -RDebugUtils.currentLine=3276922; - //BA.debugLineNum = 3276922;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3276923; - //BA.debugLineNum = 3276923;BA.debugLine="Private eventov As String = h.GetString(\"evento"; -_eventov = _h.GetString("eventov"); -RDebugUtils.currentLine=3276924; - //BA.debugLineNum = 3276924;BA.debugLine="cmd.Name = \"insert_venta_no_venta_MEDICOMED\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "insert_venta_no_venta_MEDICOMED"; -RDebugUtils.currentLine=3276925; - //BA.debugLineNum = 3276925;BA.debugLine="Private clientev As String = h.GetString(\"clien"; -_clientev = _h.GetString("clientev"); -RDebugUtils.currentLine=3276926; - //BA.debugLineNum = 3276926;BA.debugLine="Private nombreClientev As String =Subs. traeNom"; -_nombreclientev = _subs._traenombrecliente /*String*/ (ba,_h.GetString("clientev")); -RDebugUtils.currentLine=3276927; - //BA.debugLineNum = 3276927;BA.debugLine="If eventov = \"Llega a almacen\" Then"; -if ((_eventov).equals("Llega a almacen")) { -RDebugUtils.currentLine=3276928; - //BA.debugLineNum = 3276928;BA.debugLine="nombreClientev = \"BOLETA\""; -_nombreclientev = "BOLETA"; -RDebugUtils.currentLine=3276929; - //BA.debugLineNum = 3276929;BA.debugLine="clientev = \"\""; -_clientev = ""; - }; -RDebugUtils.currentLine=3276931; - //BA.debugLineNum = 3276931;BA.debugLine="If eventov = \"Salida almacen\" Then nombreClient"; -if ((_eventov).equals("Salida almacen")) { -_nombreclientev = "CHECKLIST";}; -RDebugUtils.currentLine=3276932; - //BA.debugLineNum = 3276932;BA.debugLine="If eventov = \"Fin Día\" Then nombreClientev = \"F"; -if ((_eventov).equals("Fin Día")) { -_nombreclientev = "FIN DIA";}; -RDebugUtils.currentLine=3276933; - //BA.debugLineNum = 3276933;BA.debugLine="If eventov = \"Carga día\" Then nombreClientev ="; -if ((_eventov).equals("Carga día")) { -_nombreclientev = "CARGA DIA";}; -RDebugUtils.currentLine=3276934; - //BA.debugLineNum = 3276934;BA.debugLine="cmd.Parameters = Array As Object(h.GetString(\"u"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(_h.GetString("usuariov")),(Object)(_h.GetString("almacenv")),(Object)(_h.GetString("rutav")),(Object)(_eventov),(Object)(_clientev),(Object)(_h.GetString("iniciov")),(Object)(_finb),(Object)(_h.GetString("latitudv")),(Object)(_h.GetString("longitudv")),(Object)(_nombreclientev)}; -RDebugUtils.currentLine=3276935; - //BA.debugLineNum = 3276935;BA.debugLine="reqManager.ExecuteCommand(cmd , \"ventaNoVenta\")"; -__ref._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(Object)("ventaNoVenta")); - } -; -RDebugUtils.currentLine=3276956; - //BA.debugLineNum = 3276956;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT HE_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 HE_CLIE, HE_RES, HE_FECHA, HE_TIPO FROM HIST_ENCUESTA"))); -RDebugUtils.currentLine=3276957; - //BA.debugLineNum = 3276957;BA.debugLine="If c.RowCount>0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=3276958; - //BA.debugLineNum = 3276958;BA.debugLine="For i=0 To c.RowCount -1"; + //BA.debugLineNum = 636;BA.debugLine="If h.RowCount > 0 Then"; +if (_h.getRowCount()>0) { + //BA.debugLineNum = 637;BA.debugLine="For i = 0 To h.RowCount -1"; { -final int step115 = 1; -final int limit115 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int step107 = 1; +final int limit107 = (int) (_h.getRowCount()-1); _i = (int) (0) ; -for (;_i <= limit115 ;_i = _i + step115 ) { -RDebugUtils.currentLine=3276959; - //BA.debugLineNum = 3276959;BA.debugLine="c.Position=i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=3276960; - //BA.debugLineNum = 3276960;BA.debugLine="Dim cmd As DBCommand"; +for (;_i <= limit107 ;_i = _i + step107 ) { + //BA.debugLineNum = 638;BA.debugLine="h.Position = i"; +_h.setPosition(_i); + //BA.debugLineNum = 639;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=3276961; - //BA.debugLineNum = 3276961;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3276962; - //BA.debugLineNum = 3276962;BA.debugLine="cmd.Name = \"insert_encuesta_MARDS\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "insert_encuesta_MARDS"; -RDebugUtils.currentLine=3276963; - //BA.debugLineNum = 3276963;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HE_CLIE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HE_RES")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HE_FECHA")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HE_TIPO"))}; -RDebugUtils.currentLine=3276964; - //BA.debugLineNum = 3276964;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(Object)("inst_noventa")); + //BA.debugLineNum = 640;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 641;BA.debugLine="cmd.Name = \"insert_venta_no_venta_MEDICOMED\""; +_cmd.Name /*String*/ = "insert_venta_no_venta_MEDICOMED"; + //BA.debugLineNum = 642;BA.debugLine="cmd.Parameters = Array As Object(h.GetString(\""; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_h.GetString("usuariov")),(Object)(_h.GetString("almacenv")),(Object)(_h.GetString("rutav")),(Object)(_h.GetString("eventov")),(Object)(_h.GetString("clientev")),(Object)(_h.GetString("iniciov")),(Object)(_h.GetString("latitudv")),(Object)(_h.GetString("longitudv")),(Object)(_h.GetString("montoVentav"))}; + //BA.debugLineNum = 643;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (_cmd,(Object)("ventaNoVenta")); } }; }; -RDebugUtils.currentLine=3276967; - //BA.debugLineNum = 3276967;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3276969; - //BA.debugLineNum = 3276969;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT PE_CE"; -__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 PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO, PE_COSTO_SIN, PE_RUTA, PE_DESC, PE_FOLIO FROM PEDIDO"))); -RDebugUtils.currentLine=3276970; - //BA.debugLineNum = 3276970;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"SELECT COUNT"; -__ref._d /*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 COUNT(*) as CUANTOS_PEDIDO FROM PEDIDO"))); -RDebugUtils.currentLine=3276971; - //BA.debugLineNum = 3276971;BA.debugLine="If c.RowCount>0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=3276972; - //BA.debugLineNum = 3276972;BA.debugLine="For i=0 To c.RowCount -1"; + //BA.debugLineNum = 646;BA.debugLine="h.Close"; +_h.Close(); + //BA.debugLineNum = 664;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT HE_C"; +_c = (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 HE_CLIE, HE_RES, HE_FECHA, HE_TIPO FROM HIST_ENCUESTA"))); + //BA.debugLineNum = 665;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 666;BA.debugLine="For i=0 To c.RowCount -1"; { -final int step128 = 1; -final int limit128 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int step119 = 1; +final int limit119 = (int) (_c.getRowCount()-1); _i = (int) (0) ; -for (;_i <= limit128 ;_i = _i + step128 ) { -RDebugUtils.currentLine=3276973; - //BA.debugLineNum = 3276973;BA.debugLine="c.Position=i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=3276974; - //BA.debugLineNum = 3276974;BA.debugLine="Dim cmd As DBCommand"; +for (;_i <= limit119 ;_i = _i + step119 ) { + //BA.debugLineNum = 667;BA.debugLine="c.Position=i"; +_c.setPosition(_i); + //BA.debugLineNum = 668;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=3276975; - //BA.debugLineNum = 3276975;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3276976; - //BA.debugLineNum = 3276976;BA.debugLine="cmd.Name = \"insert_pedido_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "insert_pedido_MEDI"; -RDebugUtils.currentLine=3276977; - //BA.debugLineNum = 3276977;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_CEDIS")),(Object)(__ref._almacen /*String*/ ),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_COSTO_TOT")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_COSTOU")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_CANT")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_PRONOMBRE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_PROID")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_CLIENTE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_FECHA")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_USUARIO")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_RUTA")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_COSTO_SIN")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_DESC")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_FOLIO"))}; -RDebugUtils.currentLine=3276978; - //BA.debugLineNum = 3276978;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(Object)("ins_pedido")); + //BA.debugLineNum = 669;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 670;BA.debugLine="cmd.Name = \"insert_encuesta_MARDS\""; +_cmd.Name /*String*/ = "insert_encuesta_MARDS"; + //BA.debugLineNum = 671;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\""; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_c.GetString("HE_CLIE")),(Object)(_c.GetString("HE_RES")),(Object)(_c.GetString("HE_FECHA")),(Object)(_c.GetString("HE_TIPO"))}; + //BA.debugLineNum = 672;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (_cmd,(Object)("inst_noventa")); } }; }; -RDebugUtils.currentLine=3276981; - //BA.debugLineNum = 3276981;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3276982; - //BA.debugLineNum = 3276982;BA.debugLine="d.Position=0"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3276983; - //BA.debugLineNum = 3276983;BA.debugLine="cuantos_pedido = D.GetString(\"CUANTOS_PEDIDO\")"; -__ref._cuantos_pedido /*String*/ = __ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS_PEDIDO"); -RDebugUtils.currentLine=3276984; - //BA.debugLineNum = 3276984;BA.debugLine="d.Close"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3276987; - //BA.debugLineNum = 3276987;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT NV_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 NV_CLIENTE,NV_FECHA,NV_USER,NV_MOTIVO,NV_COMM,NV_LAT,NV_LON, NV_NOMBRE, NV_DIRECCION FROM NOVENTA"))); -RDebugUtils.currentLine=3276988; - //BA.debugLineNum = 3276988;BA.debugLine="D=B4XPages.MainPage.skmt.ExecQuery(\"SELECT COUN"; -__ref._d /*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 COUNT(*) AS CUANTOS_NOVENTA FROM NOVENTA"))); -RDebugUtils.currentLine=3276989; - //BA.debugLineNum = 3276989;BA.debugLine="If c.RowCount>0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=3276990; - //BA.debugLineNum = 3276990;BA.debugLine="For i=0 To c.RowCount -1"; + //BA.debugLineNum = 675;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 677;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT PE_CE"; +_c = (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 PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO, PE_COSTO_SIN, PE_RUTA, PE_DESC, PE_FOLIO FROM PEDIDO"))); + //BA.debugLineNum = 678;BA.debugLine="d=B4XPages.MainPage.skmt.ExecQuery(\"SELECT COUNT"; +_d = (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 COUNT(*) as CUANTOS_PEDIDO FROM PEDIDO"))); + //BA.debugLineNum = 679;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 680;BA.debugLine="For i=0 To c.RowCount -1"; { -final int step144 = 1; -final int limit144 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int step132 = 1; +final int limit132 = (int) (_c.getRowCount()-1); _i = (int) (0) ; -for (;_i <= limit144 ;_i = _i + step144 ) { -RDebugUtils.currentLine=3276991; - //BA.debugLineNum = 3276991;BA.debugLine="c.Position=i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=3276992; - //BA.debugLineNum = 3276992;BA.debugLine="Dim cmd As DBCommand"; +for (;_i <= limit132 ;_i = _i + step132 ) { + //BA.debugLineNum = 681;BA.debugLine="c.Position=i"; +_c.setPosition(_i); + //BA.debugLineNum = 682;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=3276993; - //BA.debugLineNum = 3276993;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3276994; - //BA.debugLineNum = 3276994;BA.debugLine="cmd.Name = \"insert_noventa_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "insert_noventa_MEDI"; -RDebugUtils.currentLine=3276995; - //BA.debugLineNum = 3276995;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_CLIENTE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_FECHA")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_USER")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_MOTIVO")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_COMM")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_LAT")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_LON")),(Object)(__ref._almacen /*String*/ ),(Object)(__ref._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_NOMBRE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("NV_DIRECCION"))}; -RDebugUtils.currentLine=3276996; - //BA.debugLineNum = 3276996;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(Object)("inst_noventa")); + //BA.debugLineNum = 683;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 684;BA.debugLine="cmd.Name = \"insert_pedido_MEDI\""; +_cmd.Name /*String*/ = "insert_pedido_MEDI"; + //BA.debugLineNum = 685;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\""; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_c.GetString("PE_CEDIS")),(Object)(_almacen),(Object)(_c.GetString("PE_COSTO_TOT")),(Object)(_c.GetString("PE_COSTOU")),(Object)(_c.GetString("PE_CANT")),(Object)(_c.GetString("PE_PRONOMBRE")),(Object)(_c.GetString("PE_PROID")),(Object)(_c.GetString("PE_CLIENTE")),(Object)(_c.GetString("PE_FECHA")),(Object)(_c.GetString("PE_USUARIO")),(Object)(_c.GetString("PE_RUTA")),(Object)(_c.GetString("PE_COSTO_SIN")),(Object)(_c.GetString("PE_DESC")),(Object)(_c.GetString("PE_FOLIO"))}; + //BA.debugLineNum = 686;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (_cmd,(Object)("ins_pedido")); } }; }; -RDebugUtils.currentLine=3276999; - //BA.debugLineNum = 3276999;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3277000; - //BA.debugLineNum = 3277000;BA.debugLine="d.Position=0"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=3277001; - //BA.debugLineNum = 3277001;BA.debugLine="cuantos_noventa = D.GetString(\"CUANTOS_NOVENTA\")"; -__ref._cuantos_noventa /*String*/ = __ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS_NOVENTA"); -RDebugUtils.currentLine=3277002; - //BA.debugLineNum = 3277002;BA.debugLine="d.Close"; -__ref._d /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3277007; - //BA.debugLineNum = 3277007;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT CN_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 CN_ID, CN_FECHA , CN_USER, CN_LAT, CN_LON, CN_NOMBRE, CN_DIRECCION, COLONIA, CP, CN_ALMACEN, CN_RUTA FROM CLIENTES_NUEVOS"))); -RDebugUtils.currentLine=3277008; - //BA.debugLineNum = 3277008;BA.debugLine="If c.RowCount>0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=3277009; - //BA.debugLineNum = 3277009;BA.debugLine="For i = 0 To c.RowCount - 1"; + //BA.debugLineNum = 689;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 690;BA.debugLine="d.Position=0"; +_d.setPosition((int) (0)); + //BA.debugLineNum = 691;BA.debugLine="cuantos_pedido = D.GetString(\"CUANTOS_PEDIDO\")"; +_cuantos_pedido = _d.GetString("CUANTOS_PEDIDO"); + //BA.debugLineNum = 692;BA.debugLine="d.Close"; +_d.Close(); + //BA.debugLineNum = 695;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT NV_C"; +_c = (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 NV_CLIENTE,NV_FECHA,NV_USER,NV_MOTIVO,NV_COMM,NV_LAT,NV_LON, NV_NOMBRE, NV_DIRECCION FROM NOVENTA"))); + //BA.debugLineNum = 696;BA.debugLine="D=B4XPages.MainPage.skmt.ExecQuery(\"SELECT COUN"; +_d = (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 COUNT(*) AS CUANTOS_NOVENTA FROM NOVENTA"))); + //BA.debugLineNum = 697;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 698;BA.debugLine="For i=0 To c.RowCount -1"; { -final int step159 = 1; -final int limit159 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int step148 = 1; +final int limit148 = (int) (_c.getRowCount()-1); _i = (int) (0) ; -for (;_i <= limit159 ;_i = _i + step159 ) { -RDebugUtils.currentLine=3277010; - //BA.debugLineNum = 3277010;BA.debugLine="c.Position = i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=3277012; - //BA.debugLineNum = 3277012;BA.debugLine="Dim cmd As DBCommand"; +for (;_i <= limit148 ;_i = _i + step148 ) { + //BA.debugLineNum = 699;BA.debugLine="c.Position=i"; +_c.setPosition(_i); + //BA.debugLineNum = 700;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=3277013; - //BA.debugLineNum = 3277013;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3277014; - //BA.debugLineNum = 3277014;BA.debugLine="cmd.Name = \"insert_clientesnuevos_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "insert_clientesnuevos_MEDI"; -RDebugUtils.currentLine=3277015; - //BA.debugLineNum = 3277015;BA.debugLine="cmd.Parameters = Array As Object(c.GetString(\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .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"))}; -RDebugUtils.currentLine=3277016; - //BA.debugLineNum = 3277016;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(Object)("inst_clientesn")); + //BA.debugLineNum = 701;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 702;BA.debugLine="cmd.Name = \"insert_noventa_MEDI\""; +_cmd.Name /*String*/ = "insert_noventa_MEDI"; + //BA.debugLineNum = 703;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\""; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_c.GetString("NV_CLIENTE")),(Object)(_c.GetString("NV_FECHA")),(Object)(_c.GetString("NV_USER")),(Object)(_c.GetString("NV_MOTIVO")),(Object)(_c.GetString("NV_COMM")),(Object)(_c.GetString("NV_LAT")),(Object)(_c.GetString("NV_LON")),(Object)(_almacen),(Object)(_l_ruta.getText()),(Object)(_c.GetString("NV_NOMBRE")),(Object)(_c.GetString("NV_DIRECCION"))}; + //BA.debugLineNum = 704;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (_cmd,(Object)("inst_noventa")); } }; }; -RDebugUtils.currentLine=3277019; - //BA.debugLineNum = 3277019;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3277023; - //BA.debugLineNum = 3277023;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select HGCLI"; -__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 HGCLIENTE, HGDATE, HGLAT, HGLON from HIST_GEOCERCA"))); -RDebugUtils.currentLine=3277024; - //BA.debugLineNum = 3277024;BA.debugLine="If c.RowCount>0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=3277025; - //BA.debugLineNum = 3277025;BA.debugLine="For i=0 To c.RowCount -1"; + //BA.debugLineNum = 707;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 708;BA.debugLine="d.Position=0"; +_d.setPosition((int) (0)); + //BA.debugLineNum = 709;BA.debugLine="cuantos_noventa = D.GetString(\"CUANTOS_NOVENTA\")"; +_cuantos_noventa = _d.GetString("CUANTOS_NOVENTA"); + //BA.debugLineNum = 710;BA.debugLine="d.Close"; +_d.Close(); + //BA.debugLineNum = 715;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"SELECT CN_I"; +_c = (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 FROM CLIENTES_NUEVOS"))); + //BA.debugLineNum = 716;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 717;BA.debugLine="For i = 0 To c.RowCount - 1"; { -final int step171 = 1; -final int limit171 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int step163 = 1; +final int limit163 = (int) (_c.getRowCount()-1); _i = (int) (0) ; -for (;_i <= limit171 ;_i = _i + step171 ) { -RDebugUtils.currentLine=3277026; - //BA.debugLineNum = 3277026;BA.debugLine="c.Position=i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=3277027; - //BA.debugLineNum = 3277027;BA.debugLine="Dim cmd As DBCommand"; +for (;_i <= limit163 ;_i = _i + step163 ) { + //BA.debugLineNum = 718;BA.debugLine="c.Position = i"; +_c.setPosition(_i); + //BA.debugLineNum = 720;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=3277028; - //BA.debugLineNum = 3277028;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3277029; - //BA.debugLineNum = 3277029;BA.debugLine="cmd.Name = \"insert_geocerca_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "insert_geocerca_MEDI"; -RDebugUtils.currentLine=3277030; - //BA.debugLineNum = 3277030;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HGCLIENTE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HGDATE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HGLAT")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HGLON"))}; -RDebugUtils.currentLine=3277031; - //BA.debugLineNum = 3277031;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(Object)("inst_noventa")); + //BA.debugLineNum = 721;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 722;BA.debugLine="cmd.Name = \"insert_clientesnuevos_MEDI\""; +_cmd.Name /*String*/ = "insert_clientesnuevos_MEDI"; + //BA.debugLineNum = 723;BA.debugLine="cmd.Parameters = Array As Object(c.GetString(\""; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_c.GetString("CN_ID")),(Object)(_c.GetString("CN_FECHA")),(Object)(_c.GetString("CN_USER")),(Object)(_c.GetString("CN_LAT")),(Object)(_c.GetString("CN_LON")),(Object)(_c.GetString("CN_NOMBRE")),(Object)(_c.GetString("CN_DIRECCION")),(Object)(_c.GetString("COLONIA")),(Object)(_c.GetString("CP")),(Object)(_c.GetString("CN_ALMACEN")),(Object)(_c.GetString("CN_RUTA"))}; + //BA.debugLineNum = 724;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (_cmd,(Object)("inst_clientesn")); } }; }; -RDebugUtils.currentLine=3277034; - //BA.debugLineNum = 3277034;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=3277038; - //BA.debugLineNum = 3277038;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select HFCLI"; -__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 HFCLIENTE, HFALIAS,HFRUTA,HFALMACEN from HIST_FACE"))); -RDebugUtils.currentLine=3277039; - //BA.debugLineNum = 3277039;BA.debugLine="If c.RowCount>0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=3277040; - //BA.debugLineNum = 3277040;BA.debugLine="For i=0 To c.RowCount -1"; + //BA.debugLineNum = 727;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 731;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select HGCLI"; +_c = (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 HGCLIENTE, HGDATE, HGLAT, HGLON from HIST_GEOCERCA"))); + //BA.debugLineNum = 732;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 733;BA.debugLine="For i=0 To c.RowCount -1"; { -final int step183 = 1; -final int limit183 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int step175 = 1; +final int limit175 = (int) (_c.getRowCount()-1); _i = (int) (0) ; -for (;_i <= limit183 ;_i = _i + step183 ) { -RDebugUtils.currentLine=3277041; - //BA.debugLineNum = 3277041;BA.debugLine="c.Position=i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=3277042; - //BA.debugLineNum = 3277042;BA.debugLine="Dim cmd As DBCommand"; +for (;_i <= limit175 ;_i = _i + step175 ) { + //BA.debugLineNum = 734;BA.debugLine="c.Position=i"; +_c.setPosition(_i); + //BA.debugLineNum = 735;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=3277043; - //BA.debugLineNum = 3277043;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3277044; - //BA.debugLineNum = 3277044;BA.debugLine="cmd.Name = \"insert_face_like_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "insert_face_like_MEDI"; -RDebugUtils.currentLine=3277045; - //BA.debugLineNum = 3277045;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HFCLIENTE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HFALIAS")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HFRUTA")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("HFALMACEN"))}; -RDebugUtils.currentLine=3277046; - //BA.debugLineNum = 3277046;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(Object)("inst_noventa")); + //BA.debugLineNum = 736;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 737;BA.debugLine="cmd.Name = \"insert_geocerca_MEDI\""; +_cmd.Name /*String*/ = "insert_geocerca_MEDI"; + //BA.debugLineNum = 738;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\""; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_c.GetString("HGCLIENTE")),(Object)(_c.GetString("HGDATE")),(Object)(_c.GetString("HGLAT")),(Object)(_c.GetString("HGLON"))}; + //BA.debugLineNum = 739;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (_cmd,(Object)("inst_noventa")); } }; }; -RDebugUtils.currentLine=3277076; - //BA.debugLineNum = 3277076;BA.debugLine="t1.Initialize(\"T1\", 30000) ' 1000 = 1 second"; -__ref._t1 /*anywheresoftware.b4a.objects.Timer*/ .Initialize(ba,"T1",(long) (30000)); -RDebugUtils.currentLine=3277077; - //BA.debugLineNum = 3277077;BA.debugLine="t1.Enabled = True"; -__ref._t1 /*anywheresoftware.b4a.objects.Timer*/ .setEnabled(__c.True); -RDebugUtils.currentLine=3277078; - //BA.debugLineNum = 3277078;BA.debugLine="Dim sDate,sTime As String"; + //BA.debugLineNum = 742;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 746;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select HFCLI"; +_c = (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 HFCLIENTE, HFALIAS,HFRUTA,HFALMACEN from HIST_FACE"))); + //BA.debugLineNum = 747;BA.debugLine="If c.RowCount>0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 748;BA.debugLine="For i=0 To c.RowCount -1"; +{ +final int step187 = 1; +final int limit187 = (int) (_c.getRowCount()-1); +_i = (int) (0) ; +for (;_i <= limit187 ;_i = _i + step187 ) { + //BA.debugLineNum = 749;BA.debugLine="c.Position=i"; +_c.setPosition(_i); + //BA.debugLineNum = 750;BA.debugLine="Dim cmd As DBCommand"; +_cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); + //BA.debugLineNum = 751;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 752;BA.debugLine="cmd.Name = \"insert_face_like_MEDI\""; +_cmd.Name /*String*/ = "insert_face_like_MEDI"; + //BA.debugLineNum = 753;BA.debugLine="cmd.Parameters = Array As Object(C.GetString(\""; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_c.GetString("HFCLIENTE")),(Object)(_c.GetString("HFALIAS")),(Object)(_c.GetString("HFRUTA")),(Object)(_c.GetString("HFALMACEN"))}; + //BA.debugLineNum = 754;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cm"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (_cmd,(Object)("inst_noventa")); + } +}; + }; + //BA.debugLineNum = 784;BA.debugLine="t1.Initialize(\"T1\", 30000) ' 1000 = 1 second"; +_t1.Initialize(ba,"T1",(long) (30000)); + //BA.debugLineNum = 785;BA.debugLine="t1.Enabled = True"; +_t1.setEnabled(__c.True); + //BA.debugLineNum = 786;BA.debugLine="Dim sDate,sTime As String"; _sdate = ""; _stime = ""; -RDebugUtils.currentLine=3277079; - //BA.debugLineNum = 3277079;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; + //BA.debugLineNum = 787;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; __c.DateTime.setDateFormat("MM/dd/yyyy"); -RDebugUtils.currentLine=3277080; - //BA.debugLineNum = 3277080;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; -__ref._sdate /*String*/ = __c.DateTime.Date(__c.DateTime.getNow()); -RDebugUtils.currentLine=3277081; - //BA.debugLineNum = 3277081;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; -__ref._stime /*String*/ = __c.DateTime.Time(__c.DateTime.getNow()); -RDebugUtils.currentLine=3277082; - //BA.debugLineNum = 3277082;BA.debugLine="Dim cmd As DBCommand"; + //BA.debugLineNum = 788;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; +_sdate = __c.DateTime.Date(__c.DateTime.getNow()); + //BA.debugLineNum = 789;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; +_stime = __c.DateTime.Time(__c.DateTime.getNow()); + //BA.debugLineNum = 790;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=3277083; - //BA.debugLineNum = 3277083;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3277084; - //BA.debugLineNum = 3277084;BA.debugLine="cmd.Name =\"insert_drop_MEDI_2\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "insert_drop_MEDI_2"; -RDebugUtils.currentLine=3277085; - //BA.debugLineNum = 3277085;BA.debugLine="cmd.Parameters = Array As Object(usuario,l_ruta."; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._usuario /*String*/ ),(Object)(__ref._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._sdate /*String*/ +__ref._stime /*String*/ ),(Object)(__ref._l_porvisitar /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._l_drop /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._l_efectiva /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._l_cuantosc /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._l_cuantosn /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)(__ref._l_montod /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),(Object)("ENVIO"),(Object)(__ref._almacen /*String*/ )}; -RDebugUtils.currentLine=3277086; - //BA.debugLineNum = 3277086;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cmd"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(Object)("inst_noventa")); -RDebugUtils.currentLine=3277087; - //BA.debugLineNum = 3277087;BA.debugLine="img2.Visible =True"; -__ref._img2 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=3277088; - //BA.debugLineNum = 3277088;BA.debugLine="PORCENTAJE = Round(100/ (cuantos_noventa + cuant"; -__ref._porcentaje /*String*/ = BA.NumberToString(__c.Round(100/(double)((double)(Double.parseDouble(__ref._cuantos_noventa /*String*/ ))+(double)(Double.parseDouble(__ref._cuantos_pedido /*String*/ ))+(double)(Double.parseDouble(__ref._cuantos_pedidosc /*String*/ ))+1))); -RDebugUtils.currentLine=3277089; - //BA.debugLineNum = 3277089;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessageS"; + //BA.debugLineNum = 791;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 792;BA.debugLine="cmd.Name =\"insert_drop_MEDI_2\""; +_cmd.Name /*String*/ = "insert_drop_MEDI_2"; + //BA.debugLineNum = 793;BA.debugLine="cmd.Parameters = Array As Object(usuario,l_ruta."; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_usuario),(Object)(_l_ruta.getText()),(Object)(_sdate+_stime),(Object)(_l_porvisitar.getText()),(Object)(_l_drop.getText()),(Object)(_l_efectiva.getText()),(Object)(_l_cuantosc.getText()),(Object)(_l_cuantosn.getText()),(Object)(_l_montod.getText()),(Object)("ENVIO"),(Object)(_almacen)}; + //BA.debugLineNum = 794;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cmd"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (_cmd,(Object)("inst_noventa")); + //BA.debugLineNum = 795;BA.debugLine="img2.Visible =True"; +_img2.setVisible(__c.True); + //BA.debugLineNum = 796;BA.debugLine="PORCENTAJE = Round(100/ (cuantos_noventa + cuant"; +_porcentaje = BA.NumberToString(__c.Round(100/(double)((double)(Double.parseDouble(_cuantos_noventa))+(double)(Double.parseDouble(_cuantos_pedido))+(double)(Double.parseDouble(_cuantos_pedidosc))+1))); + //BA.debugLineNum = 797;BA.debugLine="If Starter.marcaCel <> \"Sony\" Then ToastMessageS"; if ((_starter._marcacel /*String*/ ).equals("Sony") == false) { -__c.ToastMessageShow(BA.ObjectToCharSequence("Se Actualizaran los datos, Este proceso podria tardar hasta un minuto, gracias "+__ref._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText()),__c.True);}; +__c.ToastMessageShow(BA.ObjectToCharSequence("Se Actualizaran los datos, Este proceso podria tardar hasta un minuto, gracias "+_l_ruta.getText()),__c.True);}; }; -RDebugUtils.currentLine=3277091; - //BA.debugLineNum = 3277091;BA.debugLine="End Sub"; + //BA.debugLineNum = 799;BA.debugLine="End Sub"; return ""; } -public String _t1_tick(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "t1_tick", false)) - {return ((String) Debug.delegate(ba, "t1_tick", null));} -RDebugUtils.currentLine=3866624; - //BA.debugLineNum = 3866624;BA.debugLine="Sub t1_tick"; -RDebugUtils.currentLine=3866625; - //BA.debugLineNum = 3866625;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3866626; - //BA.debugLineNum = 3866626;BA.debugLine="cmd.Name = \"select_cuantos_pedido_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_cuantos_pedido_MEDI"; -RDebugUtils.currentLine=3866627; - //BA.debugLineNum = 3866627;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN,l_ruta.t"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._almacen /*String*/ ),(Object)(__ref._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())}; -RDebugUtils.currentLine=3866628; - //BA.debugLineNum = 3866628;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("valida_pedido")); -RDebugUtils.currentLine=3866630; - //BA.debugLineNum = 3866630;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3866631; - //BA.debugLineNum = 3866631;BA.debugLine="cmd.Name = \"select_cuantos_noventa_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_cuantos_noventa_MEDI"; -RDebugUtils.currentLine=3866632; - //BA.debugLineNum = 3866632;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN,l_ruta.t"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._almacen /*String*/ ),(Object)(__ref._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())}; -RDebugUtils.currentLine=3866633; - //BA.debugLineNum = 3866633;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("valida_noventa")); -RDebugUtils.currentLine=3866635; - //BA.debugLineNum = 3866635;BA.debugLine="cmd.Initialize"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Initialize(); -RDebugUtils.currentLine=3866636; - //BA.debugLineNum = 3866636;BA.debugLine="cmd.Name = \"select_cuantos_pedidoc_MEDI\""; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Name /*String*/ = "select_cuantos_pedidoc_MEDI"; -RDebugUtils.currentLine=3866637; - //BA.debugLineNum = 3866637;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN,l_ruta.t"; -__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ .Parameters /*Object[]*/ = new Object[]{(Object)(__ref._almacen /*String*/ ),(Object)(__ref._l_ruta /*anywheresoftware.b4a.objects.LabelWrapper*/ .getText())}; -RDebugUtils.currentLine=3866638; - //BA.debugLineNum = 3866638;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (null,__ref._cmd /*keymon.lat.medicomed.dbrequestmanager._dbcommand*/ ,(int) (0),(Object)("valida_pedidoc")); -RDebugUtils.currentLine=3866640; - //BA.debugLineNum = 3866640;BA.debugLine="If PB2.Progress = 0 Then"; -if (__ref._pb2 /*anywheresoftware.b4a.objects.ProgressBarWrapper*/ .getProgress()==0) { -RDebugUtils.currentLine=3866641; - //BA.debugLineNum = 3866641;BA.debugLine="S_CP.Text = \"ENVIAR DATOS (K-1)\""; -__ref._s_cp /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("ENVIAR DATOS (K-1)")); +public String _t1_tick() throws Exception{ + //BA.debugLineNum = 1869;BA.debugLine="Sub t1_tick"; + //BA.debugLineNum = 1870;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 1871;BA.debugLine="cmd.Name = \"select_cuantos_pedido_MEDI\""; +_cmd.Name /*String*/ = "select_cuantos_pedido_MEDI"; + //BA.debugLineNum = 1872;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN,l_ruta.t"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_almacen),(Object)(_l_ruta.getText())}; + //BA.debugLineNum = 1873;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("valida_pedido")); + //BA.debugLineNum = 1875;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 1876;BA.debugLine="cmd.Name = \"select_cuantos_noventa_MEDI\""; +_cmd.Name /*String*/ = "select_cuantos_noventa_MEDI"; + //BA.debugLineNum = 1877;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN,l_ruta.t"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_almacen),(Object)(_l_ruta.getText())}; + //BA.debugLineNum = 1878;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("valida_noventa")); + //BA.debugLineNum = 1880;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 1881;BA.debugLine="cmd.Name = \"select_cuantos_pedidoc_MEDI\""; +_cmd.Name /*String*/ = "select_cuantos_pedidoc_MEDI"; + //BA.debugLineNum = 1882;BA.debugLine="cmd.Parameters = Array As Object(ALMACEN,l_ruta.t"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_almacen),(Object)(_l_ruta.getText())}; + //BA.debugLineNum = 1883;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteQuery(cmd , 0"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executequery /*String*/ (_cmd,(int) (0),(Object)("valida_pedidoc")); + //BA.debugLineNum = 1885;BA.debugLine="If PB2.Progress = 0 Then"; +if (_pb2.getProgress()==0) { + //BA.debugLineNum = 1886;BA.debugLine="S_CP.Text = \"ENVIAR DATOS (K-1)\""; +_s_cp.setText(BA.ObjectToCharSequence("ENVIAR DATOS (K-1)")); }; -RDebugUtils.currentLine=3866643; - //BA.debugLineNum = 3866643;BA.debugLine="img2.Visible=False"; -__ref._img2 /*anywheresoftware.b4a.objects.ImageViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=3866644; - //BA.debugLineNum = 3866644;BA.debugLine="t1.Enabled = False"; -__ref._t1 /*anywheresoftware.b4a.objects.Timer*/ .setEnabled(__c.False); -RDebugUtils.currentLine=3866645; - //BA.debugLineNum = 3866645;BA.debugLine="End Sub"; + //BA.debugLineNum = 1888;BA.debugLine="img2.Visible=False"; +_img2.setVisible(__c.False); + //BA.debugLineNum = 1889;BA.debugLine="t1.Enabled = False"; +_t1.setEnabled(__c.False); + //BA.debugLineNum = 1890;BA.debugLine="End Sub"; return ""; } -public String _tickets_dia_click(keymon.lat.medicomed.c_principal __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_principal"; -if (Debug.shouldDelegate(ba, "tickets_dia_click", false)) - {return ((String) Debug.delegate(ba, "tickets_dia_click", null));} -RDebugUtils.currentLine=4521984; - //BA.debugLineNum = 4521984;BA.debugLine="Sub tickets_dia_Click"; -RDebugUtils.currentLine=4521985; - //BA.debugLineNum = 4521985;BA.debugLine="B4XPages.ShowPage(\"TicketsDia\")"; +public String _tickets_dia_click() throws Exception{ + //BA.debugLineNum = 2210;BA.debugLine="Sub tickets_dia_Click"; + //BA.debugLineNum = 2211;BA.debugLine="B4XPages.ShowPage(\"TicketsDia\")"; _b4xpages._showpage /*String*/ (ba,"TicketsDia"); -RDebugUtils.currentLine=4521986; - //BA.debugLineNum = 4521986;BA.debugLine="End Sub"; + //BA.debugLineNum = 2212;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +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; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/c_productos.java b/B4A/Objects/src/keymon/lat/medicomed/c_productos.java index a288c08..4406710 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/c_productos.java +++ b/B4A/Objects/src/keymon/lat/medicomed/c_productos.java @@ -10,7 +10,7 @@ public class c_productos extends B4AClass.ImplB4AClass implements BA.SubDelegato private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.c_productos"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.c_productos"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class c_productos extends B4AClass.ImplB4AClass implements BA.SubDelegato 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.keywords.Common __c = null; public anywheresoftware.b4a.objects.B4XViewWrapper _root = null; public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; public String _ruta = ""; @@ -117,79 +110,361 @@ 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_productos __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "initialize", false)) - {return ((Object) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=23265280; - //BA.debugLineNum = 23265280;BA.debugLine="Public Sub Initialize As Object"; -RDebugUtils.currentLine=23265281; - //BA.debugLineNum = 23265281;BA.debugLine="Return Me"; -if (true) return this; -RDebugUtils.currentLine=23265282; - //BA.debugLineNum = 23265282;BA.debugLine="End Sub"; -return null; -} -public String _b_aceptar_click(keymon.lat.medicomed.c_productos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "b_aceptar_click", false)) - {return ((String) Debug.delegate(ba, "b_aceptar_click", null));} -RDebugUtils.currentLine=24969216; - //BA.debugLineNum = 24969216;BA.debugLine="Private Sub b_aceptar_Click"; -RDebugUtils.currentLine=24969217; - //BA.debugLineNum = 24969217;BA.debugLine="p_vistaPreviaTrans.Visible=False"; -__ref._p_vistapreviatrans /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=24969218; - //BA.debugLineNum = 24969218;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; +public String _b_aceptar_click() throws Exception{ + //BA.debugLineNum = 734;BA.debugLine="Private Sub b_aceptar_Click"; + //BA.debugLineNum = 735;BA.debugLine="p_vistaPreviaTrans.Visible=False"; +_p_vistapreviatrans.setVisible(__c.False); + //BA.debugLineNum = 736;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; _b4xpages._showpage /*String*/ (ba,"Cliente"); -RDebugUtils.currentLine=24969219; - //BA.debugLineNum = 24969219;BA.debugLine="End Sub"; + //BA.debugLineNum = 737;BA.debugLine="End Sub"; return ""; } -public String _b_buscar_click(keymon.lat.medicomed.c_productos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "b_buscar_click", false)) - {return ((String) Debug.delegate(ba, "b_buscar_click", null));} -RDebugUtils.currentLine=24641536; - //BA.debugLineNum = 24641536;BA.debugLine="Private Sub b_buscar_Click"; -RDebugUtils.currentLine=24641537; - //BA.debugLineNum = 24641537;BA.debugLine="forzarBusqueda = True"; -__ref._forzarbusqueda /*boolean*/ = __c.True; -RDebugUtils.currentLine=24641538; - //BA.debugLineNum = 24641538;BA.debugLine="Busca_TextChanged(\"\",BUSCA.Text)"; -__ref._busca_textchanged /*void*/ (null,"",__ref._busca /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()); -RDebugUtils.currentLine=24641539; - //BA.debugLineNum = 24641539;BA.debugLine="End Sub"; +public String _b_buscar_click() throws Exception{ + //BA.debugLineNum = 667;BA.debugLine="Private Sub b_buscar_Click"; + //BA.debugLineNum = 668;BA.debugLine="forzarBusqueda = True"; +_forzarbusqueda = __c.True; + //BA.debugLineNum = 669;BA.debugLine="Busca_TextChanged(\"\",BUSCA.Text)"; +_busca_textchanged("",_busca.getText()); + //BA.debugLineNum = 670;BA.debugLine="End Sub"; return ""; } -public void _busca_textchanged(keymon.lat.medicomed.c_productos __ref,String _old,String _new) throws Exception{ -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "busca_textchanged", false)) - {Debug.delegate(ba, "busca_textchanged", new Object[] {_old,_new}); return;} -ResumableSub_Busca_TextChanged rsub = new ResumableSub_Busca_TextChanged(this,__ref,_old,_new); +public String _b_continuar_click() throws Exception{ +anywheresoftware.b4a.objects.collections.Map _p1 = null; +String _p = ""; +String _pn = ""; +anywheresoftware.b4a.objects.collections.Map _m = null; + //BA.debugLineNum = 623;BA.debugLine="Private Sub b_continuar_Click"; + //BA.debugLineNum = 624;BA.debugLine="Log(\"b_continuar_Click\")"; +__c.LogImpl("357344001","b_continuar_Click",0); + //BA.debugLineNum = 625;BA.debugLine="cuentaProds"; +_cuentaprods(); + //BA.debugLineNum = 626;BA.debugLine="Private p1 As Map"; +_p1 = new anywheresoftware.b4a.objects.collections.Map(); + //BA.debugLineNum = 627;BA.debugLine="For Each p As String In prodsMap.Keys"; +{ +final anywheresoftware.b4a.BA.IterableList group4 = _prodsmap.Keys(); +final int groupLen4 = group4.getSize() +;int index4 = 0; +; +for (; index4 < groupLen4;index4++){ +_p = BA.ObjectToString(group4.Get(index4)); + //BA.debugLineNum = 628;BA.debugLine="p1 = prodsMap.Get(p)"; +_p1 = (anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_prodsmap.Get((Object)(_p)))); + //BA.debugLineNum = 629;BA.debugLine="Log(p & \"|\" & p1)"; +__c.LogImpl("357344006",_p+"|"+BA.ObjectToString(_p1),0); + //BA.debugLineNum = 630;BA.debugLine="Private pn As String = Subs.traeProdNombre(p)"; +_pn = _subs._traeprodnombre /*String*/ (ba,_p); + //BA.debugLineNum = 631;BA.debugLine="Subs.guardaProductoSinGestion(Subs.traeAlmacen,"; +_subs._guardaproductosingestion /*String*/ (ba,_subs._traealmacen /*String*/ (ba),BA.ObjectToString(_p1.Get((Object)("precio"))),BA.ObjectToString(_p1.Get((Object)("cant"))),_pn,_p,_clienteid,_subs._traefecha /*String*/ (ba),_subs._traeusuariodebd /*String*/ (ba),_rutausuario,BA.NumberToString(0),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ ); + } +}; + //BA.debugLineNum = 633;BA.debugLine="Log(\"promos-inv, prods-inv, cat-vis\")"; +__c.LogImpl("357344010","promos-inv, prods-inv, cat-vis",0); + //BA.debugLineNum = 634;BA.debugLine="lv_promos.Visible = False"; +_lv_promos.setVisible(__c.False); + //BA.debugLineNum = 635;BA.debugLine="clv_prods_ll.AsView.Visible = False"; +_clv_prods_ll._asview().setVisible(__c.False); + //BA.debugLineNum = 636;BA.debugLine="lv_subtipo.Visible = False"; +_lv_subtipo.setVisible(__c.False); + //BA.debugLineNum = 637;BA.debugLine="lv_tipo.Visible = False"; +_lv_tipo.setVisible(__c.False); + //BA.debugLineNum = 638;BA.debugLine="lv_catalogos.Visible = True"; +_lv_catalogos.setVisible(__c.True); + //BA.debugLineNum = 639;BA.debugLine="Log(\"Continuar\")"; +__c.LogImpl("357344016","Continuar",0); + //BA.debugLineNum = 640;BA.debugLine="Dim m As Map = Subs.traeTotalesClienteActual"; +_m = new anywheresoftware.b4a.objects.collections.Map(); +_m = _subs._traetotalesclienteactual /*anywheresoftware.b4a.objects.collections.Map*/ (ba); + //BA.debugLineNum = 641;BA.debugLine="prodsPedidoActual = m.Get(\"productos\")"; +_prodspedidoactual = BA.ObjectToString(_m.Get((Object)("productos"))); + //BA.debugLineNum = 642;BA.debugLine="montoPedidoActual = m.Get(\"monto\")"; +_montopedidoactual = BA.ObjectToString(_m.Get((Object)("monto"))); + //BA.debugLineNum = 643;BA.debugLine="End Sub"; +return ""; +} +public String _b_prodmas_click() throws Exception{ +int _index = 0; +anywheresoftware.b4a.objects.B4XViewWrapper _pnl0 = null; +anywheresoftware.b4a.objects.B4XViewWrapper _pnl = null; +anywheresoftware.b4a.objects.B4XViewWrapper _lacant = null; +String _precio = ""; +String _inv = ""; +String _id = ""; + //BA.debugLineNum = 495;BA.debugLine="Sub b_prodMas_Click"; + //BA.debugLineNum = 496;BA.debugLine="etCantHasFocus = False"; +_etcanthasfocus = __c.False; + //BA.debugLineNum = 498;BA.debugLine="Dim index As Int = clv_prods_ll.GetItemFromView(S"; +_index = _clv_prods_ll._getitemfromview((anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba)))); + //BA.debugLineNum = 499;BA.debugLine="Dim pnl0 As B4XView = clv_prods_ll.GetPanel(index"; +_pnl0 = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_pnl0 = _clv_prods_ll._getpanel(_index); + //BA.debugLineNum = 500;BA.debugLine="Dim pnl As B4XView = pnl0.GetView(0)"; +_pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_pnl = _pnl0.GetView((int) (0)); + //BA.debugLineNum = 501;BA.debugLine="Dim laCant As B4XView = pnl.GetView(2).GetView(2)"; +_lacant = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_lacant = _pnl.GetView((int) (2)).GetView((int) (2)); + //BA.debugLineNum = 503;BA.debugLine="Private precio As String=clv_prods_ll.GetValue(in"; +_precio = BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_clv_prods_ll._getvalue(_index)))).Get((Object)("precio"))); + //BA.debugLineNum = 504;BA.debugLine="Private inv As String=clv_prods_ll.GetValue(index"; +_inv = BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_clv_prods_ll._getvalue(_index)))).Get((Object)("almacen"))); + //BA.debugLineNum = 505;BA.debugLine="If laCant.Text = \"\" Then laCant.Text = 0"; +if ((_lacant.getText()).equals("")) { +_lacant.setText(BA.ObjectToCharSequence(0));}; + //BA.debugLineNum = 507;BA.debugLine="If laCant.Text + 1 <= inv Then"; +if ((double)(Double.parseDouble(_lacant.getText()))+1<=(double)(Double.parseDouble(_inv))) { + //BA.debugLineNum = 508;BA.debugLine="Log(NumberFormat2(laCant.Text+1,0,0,0,False))"; +__c.LogImpl("357016333",__c.NumberFormat2((double)(Double.parseDouble(_lacant.getText()))+1,(int) (0),(int) (0),(int) (0),__c.False),0); + //BA.debugLineNum = 509;BA.debugLine="laCant.Text = $\"${NumberFormat2(laCant.Text+1,0,"; +_lacant.setText(BA.ObjectToCharSequence((""+__c.SmartStringFormatter("",(Object)(__c.NumberFormat2((double)(Double.parseDouble(_lacant.getText()))+1,(int) (0),(int) (0),(int) (0),__c.False)))+""))); + //BA.debugLineNum = 511;BA.debugLine="Private id As String=clv_prods_ll.GetValue(index"; +_id = BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_clv_prods_ll._getvalue(_index)))).Get((Object)("id"))); + }; + //BA.debugLineNum = 518;BA.debugLine="Subs.actualizaProducto(Subs.traeAlmacen, precio,"; +_subs._actualizaproducto /*String*/ (ba,_subs._traealmacen /*String*/ (ba),_precio,_lacant.getText(),_subs._traeprodnombre /*String*/ (ba,_id),_id,_clienteid,_subs._traefecha /*String*/ (ba),_subs._traeusuariodebd /*String*/ (ba),_rutausuario,BA.NumberToString(0),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ ); + //BA.debugLineNum = 519;BA.debugLine="cuentaProds"; +_cuentaprods(); + //BA.debugLineNum = 521;BA.debugLine="End Sub"; +return ""; +} +public String _b_prodmenos_click() throws Exception{ +int _index = 0; +anywheresoftware.b4a.objects.B4XViewWrapper _pnl0 = null; +anywheresoftware.b4a.objects.B4XViewWrapper _pnl = null; +anywheresoftware.b4a.objects.B4XViewWrapper _lacant = null; +anywheresoftware.b4a.objects.collections.Map _tmpmap = null; +String _precio = ""; +String _id = ""; + //BA.debugLineNum = 469;BA.debugLine="Sub b_prodMenos_Click"; + //BA.debugLineNum = 470;BA.debugLine="etCantHasFocus = False"; +_etcanthasfocus = __c.False; + //BA.debugLineNum = 472;BA.debugLine="Dim index As Int = clv_prods_ll.GetItemFromView(S"; +_index = _clv_prods_ll._getitemfromview((anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba)))); + //BA.debugLineNum = 473;BA.debugLine="Dim pnl0 As B4XView = clv_prods_ll.GetPanel(index"; +_pnl0 = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_pnl0 = _clv_prods_ll._getpanel(_index); + //BA.debugLineNum = 474;BA.debugLine="Dim pnl As B4XView = pnl0.GetView(0)"; +_pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_pnl = _pnl0.GetView((int) (0)); + //BA.debugLineNum = 475;BA.debugLine="Dim laCant As B4XView = pnl.GetView(2).GetView(2)"; +_lacant = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_lacant = _pnl.GetView((int) (2)).GetView((int) (2)); + //BA.debugLineNum = 477;BA.debugLine="If laCant.Text = \"\" Then laCant.Text = 0"; +if ((_lacant.getText()).equals("")) { +_lacant.setText(BA.ObjectToCharSequence(0));}; + //BA.debugLineNum = 479;BA.debugLine="laCant.Text = $\"${NumberFormat2(laCant.Text-1,0,0"; +_lacant.setText(BA.ObjectToCharSequence((""+__c.SmartStringFormatter("",(Object)(__c.NumberFormat2((double)(Double.parseDouble(_lacant.getText()))-1,(int) (0),(int) (0),(int) (0),__c.False)))+""))); + //BA.debugLineNum = 480;BA.debugLine="If laCant.Text < 0 Then laCant.Text = 0"; +if ((double)(Double.parseDouble(_lacant.getText()))<0) { +_lacant.setText(BA.ObjectToCharSequence(0));}; + //BA.debugLineNum = 481;BA.debugLine="Private tmpMap As Map = clv_prods_ll.GetValue(ind"; +_tmpmap = new anywheresoftware.b4a.objects.collections.Map(); +_tmpmap = ((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_clv_prods_ll._getvalue(_index)))); + //BA.debugLineNum = 482;BA.debugLine="Private precio As String=clv_prods_ll.GetValue(in"; +_precio = BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_clv_prods_ll._getvalue(_index)))).Get((Object)("precio"))); + //BA.debugLineNum = 483;BA.debugLine="Private id As String=clv_prods_ll.GetValue(index)"; +_id = BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_clv_prods_ll._getvalue(_index)))).Get((Object)("id"))); + //BA.debugLineNum = 484;BA.debugLine="Private tmpMap As Map = CreateMap(\"precio\":precio"; +_tmpmap = new anywheresoftware.b4a.objects.collections.Map(); +_tmpmap = __c.createMap(new Object[] {(Object)("precio"),(Object)(_precio),(Object)("cant"),(Object)(_lacant.getText()),(Object)("almacen"),(Object)(_subs._traealmacen /*String*/ (ba))}); + //BA.debugLineNum = 487;BA.debugLine="If laCant.Text = 0 Then prodsMap.Remove(id)"; +if ((_lacant.getText()).equals(BA.NumberToString(0))) { +_prodsmap.Remove((Object)(_id));}; + //BA.debugLineNum = 490;BA.debugLine="Subs.actualizaProducto(Subs.traeAlmacen, precio,"; +_subs._actualizaproducto /*String*/ (ba,_subs._traealmacen /*String*/ (ba),_precio,_lacant.getText(),_subs._traeprodnombre /*String*/ (ba,_id),_id,_clienteid,_subs._traefecha /*String*/ (ba),_subs._traeusuariodebd /*String*/ (ba),_rutausuario,BA.NumberToString(0),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ ); + //BA.debugLineNum = 491;BA.debugLine="cuentaProds"; +_cuentaprods(); + //BA.debugLineNum = 493;BA.debugLine="End Sub"; +return ""; +} +public String _b_qr_click() throws Exception{ + //BA.debugLineNum = 425;BA.debugLine="Sub b_QR_Click"; + //BA.debugLineNum = 426;BA.debugLine="If ciclo = 1 Then"; +if ((_ciclo).equals(BA.NumberToString(1))) { + //BA.debugLineNum = 427;BA.debugLine="ciclo = 2"; +_ciclo = BA.NumberToString(2); + //BA.debugLineNum = 428;BA.debugLine="ya_entro = \"0\""; +_ya_entro = "0"; + //BA.debugLineNum = 429;BA.debugLine="B4XPage_Appear"; +_b4xpage_appear(); + }else if((_ciclo).equals(BA.NumberToString(2))) { + //BA.debugLineNum = 431;BA.debugLine="ciclo = 3"; +_ciclo = BA.NumberToString(3); + //BA.debugLineNum = 432;BA.debugLine="ya_entro = \"0\""; +_ya_entro = "0"; + //BA.debugLineNum = 433;BA.debugLine="B4XPage_Appear"; +_b4xpage_appear(); + }else if((_ciclo).equals(BA.NumberToString(3))) { + //BA.debugLineNum = 435;BA.debugLine="ciclo = 4"; +_ciclo = BA.NumberToString(4); + //BA.debugLineNum = 436;BA.debugLine="ya_entro = \"0\""; +_ya_entro = "0"; + //BA.debugLineNum = 437;BA.debugLine="B4XPage_Appear"; +_b4xpage_appear(); + }else if((_ciclo).equals(BA.NumberToString(4))) { + //BA.debugLineNum = 439;BA.debugLine="ciclo = 5"; +_ciclo = BA.NumberToString(5); + //BA.debugLineNum = 440;BA.debugLine="ya_entro = \"0\""; +_ya_entro = "0"; + //BA.debugLineNum = 441;BA.debugLine="B4XPage_Appear"; +_b4xpage_appear(); + }else if((_ciclo).equals(BA.NumberToString(5))) { + //BA.debugLineNum = 443;BA.debugLine="ciclo = 1"; +_ciclo = BA.NumberToString(1); + //BA.debugLineNum = 444;BA.debugLine="ya_entro = \"0\""; +_ya_entro = "0"; + //BA.debugLineNum = 445;BA.debugLine="B4XPage_Appear"; +_b4xpage_appear(); + }; + //BA.debugLineNum = 447;BA.debugLine="End Sub"; +return ""; +} +public String _b_rechazar_click() throws Exception{ + //BA.debugLineNum = 712;BA.debugLine="Private Sub b_rechazar_Click"; + //BA.debugLineNum = 713;BA.debugLine="If folio <> \"\" Then"; +if ((_folio).equals("") == false) { + //BA.debugLineNum = 714;BA.debugLine="result = Msgbox2($\"Seguro que desea borrar el p"; +_result = BA.NumberToString(__c.Msgbox2(BA.ObjectToCharSequence(("Seguro que desea borrar el pedido completo?"+__c.SmartStringFormatter("",(Object)(__c.CRLF))+"Haciendo clic largo sobre un producto se pueden borrar articulos independientes.")),BA.ObjectToCharSequence("Rechazar Pedido"),"Si","","No",(android.graphics.Bitmap)(__c.LoadBitmap(__c.File.getDirAssets(),"alert2.png").getObject()),ba)); + //BA.debugLineNum = 715;BA.debugLine="If result = DialogResponse.POSITIVE Then"; +if ((_result).equals(BA.NumberToString(__c.DialogResponse.POSITIVE))) { + //BA.debugLineNum = 716;BA.debugLine="Subs.borraPedidoClienteActual"; +_subs._borrapedidoclienteactual /*String*/ (ba); + //BA.debugLineNum = 717;BA.debugLine="prodsMap.Initialize"; +_prodsmap.Initialize(); + //BA.debugLineNum = 718;BA.debugLine="B4XPages.MainPage.promos.promosMap.Initialize"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._promos /*keymon.lat.medicomed.c_promos*/ ._promosmap /*anywheresoftware.b4a.objects.collections.Map*/ .Initialize(); + //BA.debugLineNum = 719;BA.debugLine="Log(\"Llamamos LlenaProdsLL\")"; +__c.LogImpl("357868295","Llamamos LlenaProdsLL",0); + //BA.debugLineNum = 720;BA.debugLine="LlenaProdsLL(Null)"; +_llenaprodsll((anywheresoftware.b4a.sql.SQL.ResultSetWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(), (android.database.Cursor)(__c.Null))); + //BA.debugLineNum = 721;BA.debugLine="Log(\"Positivo\")"; +__c.LogImpl("357868297","Positivo",0); + //BA.debugLineNum = 722;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; +_b4xpages._showpage /*String*/ (ba,"Cliente"); + }else { + //BA.debugLineNum = 724;BA.debugLine="Log(\"NO Positivo\")"; +__c.LogImpl("357868300","NO Positivo",0); + //BA.debugLineNum = 725;BA.debugLine="p_vistaPreviaTrans.Visible = False"; +_p_vistapreviatrans.setVisible(__c.False); + }; + }else { + //BA.debugLineNum = 728;BA.debugLine="Msgbox(\"CLIENTE YA SE TRANSMITIO, FAVOR DE LLAMA"; +__c.Msgbox(BA.ObjectToCharSequence("CLIENTE YA SE TRANSMITIO, FAVOR DE LLAMAR A SOPORTE PARA ASISTENCIA"),BA.ObjectToCharSequence("AVISO"),ba); + }; + //BA.debugLineNum = 730;BA.debugLine="p_vistaPreviaTrans.Visible=False"; +_p_vistapreviatrans.setVisible(__c.False); + //BA.debugLineNum = 731;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; +_b4xpages._showpage /*String*/ (ba,"Cliente"); + //BA.debugLineNum = 732;BA.debugLine="End Sub"; +return ""; +} +public String _b_terminar1_click() throws Exception{ +anywheresoftware.b4a.sql.SQL.CursorWrapper _c_prods = null; +anywheresoftware.b4a.objects.CSBuilder _cs = null; +int _i = 0; +anywheresoftware.b4a.objects.LabelWrapper _label1 = null; +int _textcolor = 0; +anywheresoftware.b4a.objects.LabelWrapper _label2 = null; + //BA.debugLineNum = 577;BA.debugLine="Sub b_terminar1_Click"; + //BA.debugLineNum = 580;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete from"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("delete from PEDIDO WHERE PE_PRONOMBRE = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("N/A")})); + //BA.debugLineNum = 582;BA.debugLine="lv_promos.Visible = False"; +_lv_promos.setVisible(__c.False); + //BA.debugLineNum = 583;BA.debugLine="clv_prods_ll.AsView.Visible = False"; +_clv_prods_ll._asview().setVisible(__c.False); + //BA.debugLineNum = 584;BA.debugLine="lv_catalogos.Visible = True"; +_lv_catalogos.setVisible(__c.True); + //BA.debugLineNum = 585;BA.debugLine="lv_prodsPedido.Clear"; +_lv_prodspedido.Clear(); + //BA.debugLineNum = 587;BA.debugLine="Private c_prods As Cursor=B4XPages.MainPage.skmt."; +_c_prods = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); +_c_prods = (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 PE_PRONOMBRE,PE_COSTO_TOT, PE_CANT, PE_FOLIO, PE_CEDIS FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa) order by PE_CEDIS, PE_PRONOMBRE"))); + //BA.debugLineNum = 588;BA.debugLine="If c_prods.RowCount > 0 Then"; +if (_c_prods.getRowCount()>0) { + //BA.debugLineNum = 589;BA.debugLine="Private cs As CSBuilder"; +_cs = new anywheresoftware.b4a.objects.CSBuilder(); + //BA.debugLineNum = 590;BA.debugLine="For i=0 To c_prods.RowCount -1"; +{ +final int step9 = 1; +final int limit9 = (int) (_c_prods.getRowCount()-1); +_i = (int) (0) ; +for (;_i <= limit9 ;_i = _i + step9 ) { + //BA.debugLineNum = 591;BA.debugLine="cs.Initialize"; +_cs.Initialize(); + //BA.debugLineNum = 592;BA.debugLine="c_prods.Position=i"; +_c_prods.setPosition(_i); + //BA.debugLineNum = 593;BA.debugLine="Dim label1 As Label"; +_label1 = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 594;BA.debugLine="label1 = lv_prodsPedido.TwoLinesLayout.Label"; +_label1 = _lv_prodspedido.getTwoLinesLayout().Label; + //BA.debugLineNum = 595;BA.debugLine="label1.TextSize = 15"; +_label1.setTextSize((float) (15)); + //BA.debugLineNum = 596;BA.debugLine="label1.TextColor = Colors.Black"; +_label1.setTextColor(__c.Colors.Black); + //BA.debugLineNum = 597;BA.debugLine="label1.color = Colors.White"; +_label1.setColor(__c.Colors.White); + //BA.debugLineNum = 598;BA.debugLine="Private textColor As Int = Colors.black"; +_textcolor = __c.Colors.Black; + //BA.debugLineNum = 599;BA.debugLine="If Not(IsNumber(c_prods.GetString(\"PE_CEDIS\")))"; +if (__c.Not(__c.IsNumber(_c_prods.GetString("PE_CEDIS")))) { +_textcolor = __c.Colors.RGB((int) (210),(int) (105),(int) (30));}; + //BA.debugLineNum = 601;BA.debugLine="Dim label2 As Label"; +_label2 = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 602;BA.debugLine="label2 = lv_prodsPedido.TwoLinesLayout.SecondLa"; +_label2 = _lv_prodspedido.getTwoLinesLayout().SecondLabel; + //BA.debugLineNum = 603;BA.debugLine="label2.TextSize = 15"; +_label2.setTextSize((float) (15)); + //BA.debugLineNum = 604;BA.debugLine="label2.TextColor = Colors.Blue"; +_label2.setTextColor(__c.Colors.Blue); + //BA.debugLineNum = 605;BA.debugLine="lv_prodsPedido.AddTwoLines(cs.Color(textColor)."; +_lv_prodspedido.AddTwoLines(BA.ObjectToCharSequence(_cs.Color(_textcolor).Append(BA.ObjectToCharSequence(_c_prods.GetString("PE_PRONOMBRE"))).Pop().getObject()),BA.ObjectToCharSequence("Cantidad #"+_c_prods.GetString("PE_CANT")+" SubTotal $"+_c_prods.GetString("PE_COSTO_TOT")+" Folio "+_c_prods.GetString("PE_FOLIO"))); + //BA.debugLineNum = 606;BA.debugLine="folio = c_prods.GetString(\"PE_FOLIO\")"; +_folio = _c_prods.GetString("PE_FOLIO"); + } +}; + //BA.debugLineNum = 609;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(P"; +_c = (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 sum(PE_CANT) as PC_NOART, sum (PE_COSTO_TOT) as PC_MONTO from PEDIDO where PE_CLIENTE in (Select CUENTA from cuentaa) AND PE_PROID NOT IN (SELECT CAT_PA_ID FROM PROMOS_COMP )"))); + //BA.debugLineNum = 610;BA.debugLine="C.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 611;BA.debugLine="l_cant.Text = c.GetString(\"PC_NOART\")"; +_l_cant.setText(BA.ObjectToCharSequence(_c.GetString("PC_NOART"))); + //BA.debugLineNum = 612;BA.debugLine="l_total2.Text = c.GetString(\"PC_MONTO\")"; +_l_total2.setText(BA.ObjectToCharSequence(_c.GetString("PC_MONTO"))); + //BA.debugLineNum = 613;BA.debugLine="c.Close"; +_c.Close(); + }; + //BA.debugLineNum = 615;BA.debugLine="c_prods.Close"; +_c_prods.Close(); + //BA.debugLineNum = 616;BA.debugLine="p_vistaPreviaTrans.Width = Root.Width"; +_p_vistapreviatrans.setWidth(_root.getWidth()); + //BA.debugLineNum = 617;BA.debugLine="Subs.centraPanel(p_vistaPrevia, Root.Width)"; +_subs._centrapanel /*String*/ (ba,_p_vistaprevia,_root.getWidth()); + //BA.debugLineNum = 618;BA.debugLine="If Subs.pedidoGuardado Then b_rechazar.Enabled ="; +if (_subs._pedidoguardado /*boolean*/ (ba)) { +_b_rechazar.setEnabled(__c.False);} +else { +_b_rechazar.setEnabled(__c.True);}; + //BA.debugLineNum = 619;BA.debugLine="p_vistaPrevia.Visible=True"; +_p_vistaprevia.setVisible(__c.True); + //BA.debugLineNum = 620;BA.debugLine="p_vistaPreviaTrans.Visible=True"; +_p_vistapreviatrans.setVisible(__c.True); + //BA.debugLineNum = 621;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_Busca_TextChanged extends BA.ResumableSub { -public ResumableSub_Busca_TextChanged(keymon.lat.medicomed.c_productos parent,keymon.lat.medicomed.c_productos __ref,String _old,String _new) { +public static class ResumableSub_B4XPage_Appear extends BA.ResumableSub { +public ResumableSub_B4XPage_Appear(keymon.lat.medicomed.c_productos parent) { this.parent = parent; -this.__ref = __ref; -this._old = _old; -this._new = _new; -this.__ref = parent; } -keymon.lat.medicomed.c_productos __ref; keymon.lat.medicomed.c_productos parent; -String _old; -String _new; -anywheresoftware.b4a.sql.SQL.ResultSetWrapper _p = null; +anywheresoftware.b4a.objects.LabelWrapper _label1 = null; +anywheresoftware.b4a.objects.collections.Map _m = null; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="c_productos"; while (true) { switch (state) { @@ -199,35 +474,509 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=25296898; - //BA.debugLineNum = 25296898;BA.debugLine="If Not(clv_prods_ll.AsView.Visible) Then clv_prod"; + //BA.debugLineNum = 127;BA.debugLine="clienteId = Subs.traeCliente"; +parent._clienteid = parent._subs._traecliente /*String*/ (ba); + //BA.debugLineNum = 128;BA.debugLine="rutaUsuario = Subs.traeRuta"; +parent._rutausuario = parent._subs._traeruta /*String*/ (ba); + //BA.debugLineNum = 129;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE CAT_"; +parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE CAT_GUNAPROD SET CAT_GP_TIPOPROD = (?) WHERE CAT_GP_TIPOPROD = (?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("PRIORITARIO"),(Object)("1")})); + //BA.debugLineNum = 130;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE CAT_"; +parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE CAT_GUNAPROD SET CAT_GP_TIPOPROD = (?) WHERE CAT_GP_TIPOPROD = (?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("ESTRATEGICO"),(Object)("2")})); + //BA.debugLineNum = 131;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE CAT_"; +parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE CAT_GUNAPROD SET CAT_GP_TIPOPROD = (?) WHERE CAT_GP_TIPOPROD = (?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("COMPLEMENTARIO"),(Object)("3")})); + //BA.debugLineNum = 132;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE CAT_"; +parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE CAT_GUNAPROD SET CAT_GP_TIPOPROD = (?) WHERE CAT_GP_TIPOPROD = (?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("CATALOGO REGULAR"),(Object)("0")})); + //BA.debugLineNum = 133;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE CAT_"; +parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE CAT_GUNAPROD SET CAT_GP_TIPOPROD = (?) WHERE CAT_GP_CLASIF = (?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("PROMOS"),(Object)("PROMOS")})); + //BA.debugLineNum = 134;BA.debugLine="clv_prods_ll.GetBase.SetLayoutAnimated(0, 5dip, 1"; +parent._clv_prods_ll._getbase().SetLayoutAnimated((int) (0),parent.__c.DipToCurrent((int) (5)),parent.__c.DipToCurrent((int) (130)),(int) (parent._root.getWidth()+10),(int) (parent._root.getHeight()*0.68)); + //BA.debugLineNum = 135;BA.debugLine="clv_prods_ll.Base_Resize(clv_prods_ll.GetBase.Wid"; +parent._clv_prods_ll._base_resize(parent._clv_prods_ll._getbase().getWidth(),parent._clv_prods_ll._getbase().getHeight()); + //BA.debugLineNum = 136;BA.debugLine="If B4XPages.MainPage.bTerminarClicked Then"; +if (true) break; + +case 1: +//if +this.state = 4; +if (parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._bterminarclicked /*boolean*/ ) { +this.state = 3; +}if (true) break; + +case 3: +//C +this.state = 4; + //BA.debugLineNum = 137;BA.debugLine="lv_catalogos.Visible = True"; +parent._lv_catalogos.setVisible(parent.__c.True); + //BA.debugLineNum = 138;BA.debugLine="lv_promos.Visible = False"; +parent._lv_promos.setVisible(parent.__c.False); + //BA.debugLineNum = 139;BA.debugLine="lv_tipo.Visible = False"; +parent._lv_tipo.setVisible(parent.__c.False); + //BA.debugLineNum = 140;BA.debugLine="lv_subtipo.Visible = False"; +parent._lv_subtipo.setVisible(parent.__c.False); + //BA.debugLineNum = 141;BA.debugLine="clv_prods_ll.AsView.Visible = False"; +parent._clv_prods_ll._asview().setVisible(parent.__c.False); + //BA.debugLineNum = 142;BA.debugLine="B4XPages.MainPage.bTerminarClicked = False"; +parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._bterminarclicked /*boolean*/ = parent.__c.False; + if (true) break; +; + //BA.debugLineNum = 144;BA.debugLine="If ya_entro <> \"1\" Then"; + +case 4: +//if +this.state = 13; +if ((parent._ya_entro).equals("1") == false) { +this.state = 6; +}if (true) break; + +case 6: +//C +this.state = 7; + //BA.debugLineNum = 145;BA.debugLine="If BUSCA.Text <> \"\" Then BUSCA.Text =\"\""; +if (true) break; + +case 7: +//if +this.state = 12; +if ((parent._busca.getText()).equals("") == false) { +this.state = 9; +;}if (true) break; + +case 9: +//C +this.state = 12; +parent._busca.setText(BA.ObjectToCharSequence("")); +if (true) break; + +case 12: +//C +this.state = 13; +; + //BA.debugLineNum = 146;BA.debugLine="entro =\"3\""; +parent._entro = "3"; + //BA.debugLineNum = 147;BA.debugLine="lv_catalogos.Clear"; +parent._lv_catalogos.Clear(); + //BA.debugLineNum = 148;BA.debugLine="Sleep(100)"; +parent.__c.Sleep(ba,this,(int) (100)); +this.state = 24; +return; +case 24: +//C +this.state = 13; +; + //BA.debugLineNum = 149;BA.debugLine="lfila.Text = \"CATALOGOS\""; +parent._lfila.setText(BA.ObjectToCharSequence("CATALOGOS")); + //BA.debugLineNum = 150;BA.debugLine="p_productos.Height = Root.Height"; +parent._p_productos.setHeight(parent._root.getHeight()); + //BA.debugLineNum = 151;BA.debugLine="clv_prods_ll.AsView.Visible = False"; +parent._clv_prods_ll._asview().setVisible(parent.__c.False); + //BA.debugLineNum = 152;BA.debugLine="lv_catalogos.Visible = True"; +parent._lv_catalogos.setVisible(parent.__c.True); + //BA.debugLineNum = 153;BA.debugLine="p_botonesVenta.Visible = False"; +parent._p_botonesventa.setVisible(parent.__c.False); + //BA.debugLineNum = 154;BA.debugLine="p_botonesVenta.Top = clv_prods_ll.AsView.top + c"; +parent._p_botonesventa.setTop((int) (parent._clv_prods_ll._asview().getTop()+parent._clv_prods_ll._asview().getHeight()-25)); + //BA.debugLineNum = 155;BA.debugLine="lv_promos.Visible = False"; +parent._lv_promos.setVisible(parent.__c.False); + if (true) break; + +case 13: +//C +this.state = 14; +; + //BA.debugLineNum = 157;BA.debugLine="Dim label1 As Label"; +_label1 = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 158;BA.debugLine="label1 = lv_catalogos.SingleLineLayout.Label"; +_label1 = parent._lv_catalogos.getSingleLineLayout().Label; + //BA.debugLineNum = 159;BA.debugLine="label1.TextSize = 17"; +_label1.setTextSize((float) (17)); + //BA.debugLineNum = 160;BA.debugLine="label1.TextColor = Colors.Black"; +_label1.setTextColor(parent.__c.Colors.Black); + //BA.debugLineNum = 161;BA.debugLine="lv_catalogos.Clear"; +parent._lv_catalogos.Clear(); + //BA.debugLineNum = 162;BA.debugLine="lv_catalogos.AddSingleLine(\"CATALOGO\")"; +parent._lv_catalogos.AddSingleLine(BA.ObjectToCharSequence("CATALOGO")); + //BA.debugLineNum = 163;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"select coun"; +parent._c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select count(*) as hayPromos from cat_gunaprod where CAT_GP_TIPOPROD = 'PROMOS'"))); + //BA.debugLineNum = 164;BA.debugLine="c.Position = 0"; +parent._c.setPosition((int) (0)); + //BA.debugLineNum = 165;BA.debugLine="If c.GetInt(\"hayPromos\") > 0 Then"; +if (true) break; + +case 14: +//if +this.state = 17; +if (parent._c.GetInt("hayPromos")>0) { +this.state = 16; +}if (true) break; + +case 16: +//C +this.state = 17; + //BA.debugLineNum = 166;BA.debugLine="lv_catalogos.AddSingleLine(\"PROMOS\")"; +parent._lv_catalogos.AddSingleLine(BA.ObjectToCharSequence("PROMOS")); + if (true) break; + +case 17: +//C +this.state = 18; +; + //BA.debugLineNum = 168;BA.debugLine="Sleep(100)"; +parent.__c.Sleep(ba,this,(int) (100)); +this.state = 25; +return; +case 25: +//C +this.state = 18; +; + //BA.debugLineNum = 169;BA.debugLine="l_total.Visible = False"; +parent._l_total.setVisible(parent.__c.False); + //BA.debugLineNum = 170;BA.debugLine="l_totProds.Visible = False"; +parent._l_totprods.setVisible(parent.__c.False); + //BA.debugLineNum = 171;BA.debugLine="l_total.Left = 5dip"; +parent._l_total.setLeft(parent.__c.DipToCurrent((int) (5))); + //BA.debugLineNum = 172;BA.debugLine="l_totProds.Width = Root.Width * 0.19"; +parent._l_totprods.setWidth((int) (parent._root.getWidth()*0.19)); + //BA.debugLineNum = 173;BA.debugLine="l_total.Left = l_totProds.Width + 20"; +parent._l_total.setLeft((int) (parent._l_totprods.getWidth()+20)); + //BA.debugLineNum = 174;BA.debugLine="l_total.Width = Root.Width * 0.25"; +parent._l_total.setWidth((int) (parent._root.getWidth()*0.25)); + //BA.debugLineNum = 176;BA.debugLine="Dim m As Map = Subs.traeTotalesClienteActual"; +_m = new anywheresoftware.b4a.objects.collections.Map(); +_m = parent._subs._traetotalesclienteactual /*anywheresoftware.b4a.objects.collections.Map*/ (ba); + //BA.debugLineNum = 177;BA.debugLine="prodsPedidoActual = m.Get(\"productos\")"; +parent._prodspedidoactual = BA.ObjectToString(_m.Get((Object)("productos"))); + //BA.debugLineNum = 178;BA.debugLine="montoPedidoActual = m.Get(\"monto\")"; +parent._montopedidoactual = BA.ObjectToString(_m.Get((Object)("monto"))); + //BA.debugLineNum = 179;BA.debugLine="hayPedido = Subs.hayPedido"; +parent._haypedido = parent._subs._haypedido /*boolean*/ (ba); + //BA.debugLineNum = 181;BA.debugLine="If reiniciarlistaProds Then"; +if (true) break; + +case 18: +//if +this.state = 23; +if (parent._reiniciarlistaprods) { +this.state = 20; +}else if(parent._haypedido) { +this.state = 22; +}if (true) break; + +case 20: +//C +this.state = 23; + //BA.debugLineNum = 182;BA.debugLine="Log(\"Llamamos LlenaProdsLL\")"; +parent.__c.LogImpl("356361016","Llamamos LlenaProdsLL",0); + //BA.debugLineNum = 183;BA.debugLine="LlenaProdsLL(Null)"; +parent._llenaprodsll((anywheresoftware.b4a.sql.SQL.ResultSetWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(), (android.database.Cursor)(parent.__c.Null))); + if (true) break; + +case 22: +//C +this.state = 23; + //BA.debugLineNum = 186;BA.debugLine="Log(\"Llamamos LlenaProdsLL\")"; +parent.__c.LogImpl("356361020","Llamamos LlenaProdsLL",0); + //BA.debugLineNum = 187;BA.debugLine="LlenaProdsLL(Null)"; +parent._llenaprodsll((anywheresoftware.b4a.sql.SQL.ResultSetWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(), (android.database.Cursor)(parent.__c.Null))); + if (true) break; + +case 23: +//C +this.state = -1; +; + //BA.debugLineNum = 189;BA.debugLine="clv_prods_ll.JumpToItem(0) 'Vamos al primer artíc"; +parent._clv_prods_ll._jumptoitem((int) (0)); + //BA.debugLineNum = 190;BA.debugLine="PCLV.lblHint.SetTextSizeAnimated(0,13)"; +parent._pclv._lblhint /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetTextSizeAnimated((int) (0),(float) (13)); + //BA.debugLineNum = 191;BA.debugLine="PCLV.B4XSeekBar1.Color1=Colors.DarkGray"; +parent._pclv._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._color1 /*int*/ = parent.__c.Colors.DarkGray; + //BA.debugLineNum = 192;BA.debugLine="PCLV.B4XSeekBar1.Color2=Colors.DarkGray"; +parent._pclv._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._color2 /*int*/ = parent.__c.Colors.DarkGray; + //BA.debugLineNum = 193;BA.debugLine="PCLV.B4XSeekBar1.ThumbColor=Colors.red"; +parent._pclv._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._thumbcolor /*int*/ = parent.__c.Colors.Red; + //BA.debugLineNum = 194;BA.debugLine="PCLV.B4XSeekBar1.mBase.Left=Root.Width *0.91"; +parent._pclv._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setLeft((int) (parent._root.getWidth()*0.91)); + //BA.debugLineNum = 196;BA.debugLine="PCLV.B4XSeekBar1.mBase.Height=clv_prods_ll.AsView"; +parent._pclv._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setHeight(parent._clv_prods_ll._asview().getHeight()); + //BA.debugLineNum = 197;BA.debugLine="PCLV.pnlOverlay.Height = clv_prods_ll.AsView.Heig"; +parent._pclv._pnloverlay /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setHeight(parent._clv_prods_ll._asview().getHeight()); + //BA.debugLineNum = 198;BA.debugLine="PCLV.B4XSeekBar1.Update"; +parent._pclv._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._update /*String*/ (); + //BA.debugLineNum = 199;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.c_productos parent) { +this.parent = parent; +} +keymon.lat.medicomed.c_productos 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 = 378;BA.debugLine="If l_info.Visible Then"; +if (true) break; + +case 1: +//if +this.state = 16; +if (parent._l_info.getVisible()) { +this.state = 3; +}else if(parent._p_vistapreviatrans.getVisible()) { +this.state = 5; +}else if(parent._lv_promos.getVisible()) { +this.state = 7; +}else if(parent._clv_prods_ll._asview().getVisible()) { +this.state = 9; +}else if((parent._entro).equals("4")) { +this.state = 11; +}else if((parent._entro).equals("3")) { +this.state = 13; +}else { +this.state = 15; +}if (true) break; + +case 3: +//C +this.state = 16; + //BA.debugLineNum = 379;BA.debugLine="l_info.Visible = False"; +parent._l_info.setVisible(parent.__c.False); + //BA.debugLineNum = 380;BA.debugLine="Return False"; +if (true) { +parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.False));return;}; + if (true) break; + +case 5: +//C +this.state = 16; + //BA.debugLineNum = 382;BA.debugLine="p_vistaPreviaTrans.Visible = False"; +parent._p_vistapreviatrans.setVisible(parent.__c.False); + //BA.debugLineNum = 383;BA.debugLine="Return False"; +if (true) { +parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.False));return;}; + if (true) break; + +case 7: +//C +this.state = 16; + //BA.debugLineNum = 385;BA.debugLine="lv_promos.Visible = False"; +parent._lv_promos.setVisible(parent.__c.False); + //BA.debugLineNum = 386;BA.debugLine="lv_catalogos.Visible = True"; +parent._lv_catalogos.setVisible(parent.__c.True); + //BA.debugLineNum = 387;BA.debugLine="p_botonesVenta.Visible = False"; +parent._p_botonesventa.setVisible(parent.__c.False); + //BA.debugLineNum = 388;BA.debugLine="l_total.Visible = False"; +parent._l_total.setVisible(parent.__c.False); + //BA.debugLineNum = 389;BA.debugLine="l_totProds.Visible = False"; +parent._l_totprods.setVisible(parent.__c.False); + //BA.debugLineNum = 390;BA.debugLine="Return False"; +if (true) { +parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.False));return;}; + if (true) break; + +case 9: +//C +this.state = 16; + //BA.debugLineNum = 392;BA.debugLine="lfila.text = \"CATALOGO\""; +parent._lfila.setText(BA.ObjectToCharSequence("CATALOGO")); + //BA.debugLineNum = 393;BA.debugLine="clv_prods_ll.AsView.Visible = False"; +parent._clv_prods_ll._asview().setVisible(parent.__c.False); + //BA.debugLineNum = 394;BA.debugLine="lv_subtipo.Visible = False"; +parent._lv_subtipo.setVisible(parent.__c.False); + //BA.debugLineNum = 395;BA.debugLine="p_botonesVenta.Visible = False"; +parent._p_botonesventa.setVisible(parent.__c.False); + //BA.debugLineNum = 396;BA.debugLine="l_total.Visible = False"; +parent._l_total.setVisible(parent.__c.False); + //BA.debugLineNum = 397;BA.debugLine="l_totProds.Visible = False"; +parent._l_totprods.setVisible(parent.__c.False); + //BA.debugLineNum = 398;BA.debugLine="lv_catalogos.Visible = True"; +parent._lv_catalogos.setVisible(parent.__c.True); + //BA.debugLineNum = 399;BA.debugLine="Return False"; +if (true) { +parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.False));return;}; + if (true) break; + +case 11: +//C +this.state = 16; + //BA.debugLineNum = 411;BA.debugLine="entro = \"3\""; +parent._entro = "3"; + //BA.debugLineNum = 412;BA.debugLine="B4XPage_Appear"; +parent._b4xpage_appear(); + //BA.debugLineNum = 413;BA.debugLine="Return True"; +if (true) { +parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.True));return;}; + if (true) break; + +case 13: +//C +this.state = 16; + //BA.debugLineNum = 415;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; +parent._b4xpages._showpage /*String*/ (ba,"Cliente"); + //BA.debugLineNum = 416;BA.debugLine="Return False"; +if (true) { +parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.False));return;}; + if (true) break; + +case 15: +//C +this.state = 16; + //BA.debugLineNum = 418;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; +parent._b4xpages._showpage /*String*/ (ba,"Cliente"); + //BA.debugLineNum = 419;BA.debugLine="Return False"; +if (true) { +parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.False));return;}; + if (true) break; + +case 16: +//C +this.state = -1; +; + //BA.debugLineNum = 421;BA.debugLine="End Sub"; +if (true) break; + + } + } + } +} +public String _b4xpage_created(anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ +anywheresoftware.b4a.objects.LabelWrapper _label1 = null; +int _i = 0; + //BA.debugLineNum = 87;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; + //BA.debugLineNum = 88;BA.debugLine="Root = Root1"; +_root = _root1; + //BA.debugLineNum = 91;BA.debugLine="Root.LoadLayout(\"productos\")"; +_root.LoadLayout("productos",ba); + //BA.debugLineNum = 92;BA.debugLine="ruta = File.DirInternal"; +_ruta = __c.File.getDirInternal(); + //BA.debugLineNum = 93;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; +if (__c.File.Exists(_ruta,"kmt.db")==__c.False) { + //BA.debugLineNum = 94;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; +__c.File.Copy(__c.File.getDirAssets(),"kmt.db",_ruta,"kmt.db"); + }; + //BA.debugLineNum = 96;BA.debugLine="PCLV.Initialize(Me, \"PCLV\", clv_prods_ll)"; +_pclv._initialize /*String*/ (ba,this,"PCLV",_clv_prods_ll); + //BA.debugLineNum = 97;BA.debugLine="ciclo = 1"; +_ciclo = BA.NumberToString(1); + //BA.debugLineNum = 98;BA.debugLine="l_info.Width = Root.Width * 0.8"; +_l_info.setWidth((int) (_root.getWidth()*0.8)); + //BA.debugLineNum = 99;BA.debugLine="l_info.Left = (Root.Width/2) - (l_info.Width/2)"; +_l_info.setLeft((int) ((_root.getWidth()/(double)2)-(_l_info.getWidth()/(double)2))); + //BA.debugLineNum = 100;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"select dist"; +_c = (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 distinct CAT_GP_TIPO from cat_gunaprod where CAT_GP_TIPO <> 'PROMOS' order by CAT_GP_TIPO"))); + //BA.debugLineNum = 101;BA.debugLine="If c.RowCount > 0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 102;BA.debugLine="Dim label1 As Label"; +_label1 = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 103;BA.debugLine="label1 = lv_tipo.SingleLineLayout.Label"; +_label1 = _lv_tipo.getSingleLineLayout().Label; + //BA.debugLineNum = 104;BA.debugLine="label1.TextSize = 17"; +_label1.setTextSize((float) (17)); + //BA.debugLineNum = 105;BA.debugLine="label1.TextColor = Colors.Black"; +_label1.setTextColor(__c.Colors.Black); + //BA.debugLineNum = 106;BA.debugLine="lv_tipo.Clear"; +_lv_tipo.Clear(); + //BA.debugLineNum = 107;BA.debugLine="For i=0 To c.RowCount-1"; +{ +final int step18 = 1; +final int limit18 = (int) (_c.getRowCount()-1); +_i = (int) (0) ; +for (;_i <= limit18 ;_i = _i + step18 ) { + //BA.debugLineNum = 108;BA.debugLine="c.Position=i"; +_c.setPosition(_i); + //BA.debugLineNum = 109;BA.debugLine="lv_tipo.AddSingleLine(c.GetString(\"CAT_GP_TIPO\""; +_lv_tipo.AddSingleLine(BA.ObjectToCharSequence(_c.GetString("CAT_GP_TIPO"))); + } +}; + }; + //BA.debugLineNum = 112;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 115;BA.debugLine="listaTiempos.Initialize"; +_listatiempos.Initialize(); + //BA.debugLineNum = 116;BA.debugLine="listaProds.Initialize"; +_listaprods.Initialize(); + //BA.debugLineNum = 117;BA.debugLine="pedidoMap.Initialize"; +_pedidomap.Initialize(); + //BA.debugLineNum = 118;BA.debugLine="listaHints.Initialize"; +_listahints.Initialize(); + //BA.debugLineNum = 119;BA.debugLine="Log(\"Llamamos LlenaProdsLL\")"; +__c.LogImpl("356295456","Llamamos LlenaProdsLL",0); + //BA.debugLineNum = 120;BA.debugLine="LlenaProdsLL(Null)"; +_llenaprodsll((anywheresoftware.b4a.sql.SQL.ResultSetWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(), (android.database.Cursor)(__c.Null))); + //BA.debugLineNum = 121;BA.debugLine="prodsMap.Initialize"; +_prodsmap.Initialize(); + //BA.debugLineNum = 122;BA.debugLine="End Sub"; +return ""; +} +public void _busca_textchanged(String _old,String _new) throws Exception{ +ResumableSub_Busca_TextChanged rsub = new ResumableSub_Busca_TextChanged(this,_old,_new); +rsub.resume(ba, null); +} +public static class ResumableSub_Busca_TextChanged extends BA.ResumableSub { +public ResumableSub_Busca_TextChanged(keymon.lat.medicomed.c_productos parent,String _old,String _new) { +this.parent = parent; +this._old = _old; +this._new = _new; +} +keymon.lat.medicomed.c_productos parent; +String _old; +String _new; +anywheresoftware.b4a.sql.SQL.ResultSetWrapper _p = 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 = 858;BA.debugLine="If Not(clv_prods_ll.AsView.Visible) Then clv_prod"; if (true) break; case 1: //if this.state = 6; -if (parent.__c.Not(__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._asview().getVisible())) { +if (parent.__c.Not(parent._clv_prods_ll._asview().getVisible())) { this.state = 3; ;}if (true) break; case 3: //C this.state = 6; -__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._asview().setVisible(parent.__c.True); +parent._clv_prods_ll._asview().setVisible(parent.__c.True); if (true) break; case 6: //C this.state = 7; ; -RDebugUtils.currentLine=25296899; - //BA.debugLineNum = 25296899;BA.debugLine="If (New.Length = 1 Or New.Length = 2) And Not(for"; + //BA.debugLineNum = 859;BA.debugLine="If (New.Length = 1 Or New.Length = 2) And Not(for"; if (true) break; case 7: //if this.state = 12; -if ((_new.length()==1 || _new.length()==2) && parent.__c.Not(__ref._forzarbusqueda /*boolean*/ )) { +if ((_new.length()==1 || _new.length()==2) && parent.__c.Not(parent._forzarbusqueda)) { this.state = 9; ;}if (true) break; @@ -241,766 +990,404 @@ case 12: //C this.state = -1; ; -RDebugUtils.currentLine=25296900; - //BA.debugLineNum = 25296900;BA.debugLine="forzarBusqueda = False"; -__ref._forzarbusqueda /*boolean*/ = parent.__c.False; -RDebugUtils.currentLine=25296901; - //BA.debugLineNum = 25296901;BA.debugLine="clv_prods_ll.Clear"; -__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._clear(); -RDebugUtils.currentLine=25296902; - //BA.debugLineNum = 25296902;BA.debugLine="listaProds.Initialize"; -__ref._listaprods /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=25296903; - //BA.debugLineNum = 25296903;BA.debugLine="listaHints.Initialize"; -__ref._listahints /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=25296904; - //BA.debugLineNum = 25296904;BA.debugLine="Sleep(0)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "c_productos", "busca_textchanged"),(int) (0)); + //BA.debugLineNum = 860;BA.debugLine="forzarBusqueda = False"; +parent._forzarbusqueda = parent.__c.False; + //BA.debugLineNum = 861;BA.debugLine="clv_prods_ll.Clear"; +parent._clv_prods_ll._clear(); + //BA.debugLineNum = 862;BA.debugLine="listaProds.Initialize"; +parent._listaprods.Initialize(); + //BA.debugLineNum = 863;BA.debugLine="listaHints.Initialize"; +parent._listahints.Initialize(); + //BA.debugLineNum = 864;BA.debugLine="Sleep(0)"; +parent.__c.Sleep(ba,this,(int) (0)); this.state = 13; return; case 13: //C this.state = -1; ; -RDebugUtils.currentLine=25296905; - //BA.debugLineNum = 25296905;BA.debugLine="Dim p As ResultSet = B4XPages.MainPage.skmt.ExecQ"; + //BA.debugLineNum = 865;BA.debugLine="Dim p As ResultSet = B4XPages.MainPage.skmt.ExecQ"; _p = new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(); _p = (anywheresoftware.b4a.sql.SQL.ResultSetWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select CAT_GP_ID, CAT_GP_NOMBRE, CAT_GP_ALMACEN, CAT_GP_PRECIO, CAT_GP_TIPOPROD from CAT_GUNAPROD where CAT_GP_NOMBRE like '%"+parent.__c.SmartStringFormatter("",(Object)(_new))+"%' and CAT_GP_PRECIO > 0 AND CAT_GP_ALMACEN > 0 and CAT_GP_CLASIF <> 'PROMOS' And CAT_GP_TIPOPROD2 <> '2' order by CAT_GP_NOMBRE")))); -RDebugUtils.currentLine=25296906; - //BA.debugLineNum = 25296906;BA.debugLine="Log(\"Llamamos LlenaProdsLL\")"; -parent.__c.LogImpl("325296906","Llamamos LlenaProdsLL",0); -RDebugUtils.currentLine=25296907; - //BA.debugLineNum = 25296907;BA.debugLine="LlenaProdsLL(p)"; -__ref._llenaprodsll /*String*/ (null,_p); -RDebugUtils.currentLine=25296926; - //BA.debugLineNum = 25296926;BA.debugLine="End Sub"; + //BA.debugLineNum = 866;BA.debugLine="Log(\"Llamamos LlenaProdsLL\")"; +parent.__c.LogImpl("358261514","Llamamos LlenaProdsLL",0); + //BA.debugLineNum = 867;BA.debugLine="LlenaProdsLL(p)"; +parent._llenaprodsll(_p); + //BA.debugLineNum = 886;BA.debugLine="End Sub"; if (true) break; } } } } -public String _b_continuar_click(keymon.lat.medicomed.c_productos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "b_continuar_click", false)) - {return ((String) Debug.delegate(ba, "b_continuar_click", null));} -anywheresoftware.b4a.objects.collections.Map _p1 = null; -String _p = ""; -String _pn = ""; -anywheresoftware.b4a.objects.collections.Map _m = null; -RDebugUtils.currentLine=24379392; - //BA.debugLineNum = 24379392;BA.debugLine="Private Sub b_continuar_Click"; -RDebugUtils.currentLine=24379393; - //BA.debugLineNum = 24379393;BA.debugLine="Log(\"b_continuar_Click\")"; -__c.LogImpl("324379393","b_continuar_Click",0); -RDebugUtils.currentLine=24379394; - //BA.debugLineNum = 24379394;BA.debugLine="cuentaProds"; -__ref._cuentaprods /*String*/ (null); -RDebugUtils.currentLine=24379395; - //BA.debugLineNum = 24379395;BA.debugLine="Private p1 As Map"; -_p1 = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=24379396; - //BA.debugLineNum = 24379396;BA.debugLine="For Each p As String In prodsMap.Keys"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Private Root As B4XView 'ignore"; +_root = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 3;BA.debugLine="Private xui As XUI 'ignore"; +_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); + //BA.debugLineNum = 4;BA.debugLine="Dim ruta As String"; +_ruta = ""; + //BA.debugLineNum = 5;BA.debugLine="Dim q_buscar As String"; +_q_buscar = ""; + //BA.debugLineNum = 6;BA.debugLine="Dim forzarBusqueda As Boolean = False"; +_forzarbusqueda = __c.False; + //BA.debugLineNum = 7;BA.debugLine="Dim skmt As SQL"; +_skmt = new anywheresoftware.b4a.sql.SQL(); + //BA.debugLineNum = 8;BA.debugLine="Dim c As Cursor"; +_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); + //BA.debugLineNum = 9;BA.debugLine="Dim c2 As Cursor"; +_c2 = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); + //BA.debugLineNum = 10;BA.debugLine="Dim C3 As Cursor"; +_c3 = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); + //BA.debugLineNum = 11;BA.debugLine="Dim s As Cursor"; +_s = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); + //BA.debugLineNum = 12;BA.debugLine="Dim lv_catalogos As ListView"; +_lv_catalogos = new anywheresoftware.b4a.objects.ListViewWrapper(); + //BA.debugLineNum = 13;BA.debugLine="Dim lv_promos As ListView"; +_lv_promos = new anywheresoftware.b4a.objects.ListViewWrapper(); + //BA.debugLineNum = 14;BA.debugLine="Dim entro As String"; +_entro = ""; + //BA.debugLineNum = 15;BA.debugLine="Dim gest As Button"; +_gest = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 16;BA.debugLine="Dim lfila As Label"; +_lfila = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 17;BA.debugLine="Dim marca As String"; +_marca = ""; + //BA.debugLineNum = 18;BA.debugLine="Dim tipo As String"; +_tipo = ""; + //BA.debugLineNum = 19;BA.debugLine="Dim subtipo As String"; +_subtipo = ""; + //BA.debugLineNum = 20;BA.debugLine="Private BUSCA As EditText"; +_busca = new anywheresoftware.b4a.objects.EditTextWrapper(); + //BA.debugLineNum = 21;BA.debugLine="Dim ya_entro As String"; +_ya_entro = ""; + //BA.debugLineNum = 22;BA.debugLine="Dim TIENE_PROMOS As String"; +_tiene_promos = ""; + //BA.debugLineNum = 23;BA.debugLine="Dim RES As String"; +_res = ""; + //BA.debugLineNum = 24;BA.debugLine="Dim S1 As Cursor"; +_s1 = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); + //BA.debugLineNum = 25;BA.debugLine="Dim bmp As Bitmap"; +_bmp = new anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper(); + //BA.debugLineNum = 26;BA.debugLine="Dim ciclo As String"; +_ciclo = ""; + //BA.debugLineNum = 27;BA.debugLine="Private b_qr As Button"; +_b_qr = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 28;BA.debugLine="Private p_productos As Panel"; +_p_productos = new anywheresoftware.b4a.objects.PanelWrapper(); + //BA.debugLineNum = 29;BA.debugLine="Dim clv_productos As CustomListView"; +_clv_productos = new b4a.example3.customlistview(); + //BA.debugLineNum = 30;BA.debugLine="Private ImageView1 As ImageView"; +_imageview1 = new anywheresoftware.b4a.objects.ImageViewWrapper(); + //BA.debugLineNum = 31;BA.debugLine="Private Panel3 As Panel"; +_panel3 = new anywheresoftware.b4a.objects.PanelWrapper(); + //BA.debugLineNum = 32;BA.debugLine="Private p_prods As Panel"; +_p_prods = new anywheresoftware.b4a.objects.PanelWrapper(); + //BA.debugLineNum = 33;BA.debugLine="Private i_prod As ImageView"; +_i_prod = new anywheresoftware.b4a.objects.ImageViewWrapper(); + //BA.debugLineNum = 34;BA.debugLine="Private l_prodX As Label"; +_l_prodx = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 35;BA.debugLine="Private b_prodMas As Button"; +_b_prodmas = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 36;BA.debugLine="Private l_pCant As Label"; +_l_pcant = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 37;BA.debugLine="Private et_pCant As EditText"; +_et_pcant = new anywheresoftware.b4a.objects.EditTextWrapper(); + //BA.debugLineNum = 38;BA.debugLine="Private b_prodMenos As Button"; +_b_prodmenos = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 39;BA.debugLine="Dim b_terminar1 As Button"; +_b_terminar1 = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 40;BA.debugLine="Dim b_continuar As Button"; +_b_continuar = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 41;BA.debugLine="Private l_total As Label"; +_l_total = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 42;BA.debugLine="Private l_totProds As Label"; +_l_totprods = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 43;BA.debugLine="Dim totalProds As Int = 0"; +_totalprods = (int) (0); + //BA.debugLineNum = 44;BA.debugLine="Dim totalCompra As Float = 0"; +_totalcompra = (float) (0); + //BA.debugLineNum = 45;BA.debugLine="Dim etCantHasFocus As Boolean = False"; +_etcanthasfocus = __c.False; + //BA.debugLineNum = 46;BA.debugLine="Dim prodsMap As Map"; +_prodsmap = new anywheresoftware.b4a.objects.collections.Map(); + //BA.debugLineNum = 47;BA.debugLine="Private l_Cargando As Label"; +_l_cargando = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 48;BA.debugLine="Private l_info As Label"; +_l_info = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 49;BA.debugLine="Private b_buscar As Button"; +_b_buscar = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 50;BA.debugLine="Private p_botonesVenta As Panel"; +_p_botonesventa = new anywheresoftware.b4a.objects.PanelWrapper(); + //BA.debugLineNum = 51;BA.debugLine="Private lv_tipo As ListView"; +_lv_tipo = new anywheresoftware.b4a.objects.ListViewWrapper(); + //BA.debugLineNum = 52;BA.debugLine="Private lv_subtipo As ListView"; +_lv_subtipo = new anywheresoftware.b4a.objects.ListViewWrapper(); + //BA.debugLineNum = 53;BA.debugLine="Private p_vistaPreviaTrans As Panel"; +_p_vistapreviatrans = new anywheresoftware.b4a.objects.PanelWrapper(); + //BA.debugLineNum = 54;BA.debugLine="Private lv_prodsPedido As ListView"; +_lv_prodspedido = new anywheresoftware.b4a.objects.ListViewWrapper(); + //BA.debugLineNum = 55;BA.debugLine="Private b_rechazar As Button"; +_b_rechazar = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 56;BA.debugLine="Private b_aceptar As Button"; +_b_aceptar = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 57;BA.debugLine="Private p_vistaPrevia As Panel"; +_p_vistaprevia = new anywheresoftware.b4a.objects.PanelWrapper(); + //BA.debugLineNum = 58;BA.debugLine="Dim folio As String"; +_folio = ""; + //BA.debugLineNum = 59;BA.debugLine="Dim result As String"; +_result = ""; + //BA.debugLineNum = 60;BA.debugLine="Private l_cant As Label"; +_l_cant = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 61;BA.debugLine="Private l_total2 As Label"; +_l_total2 = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 62;BA.debugLine="Dim prodsPedidoActual As String"; +_prodspedidoactual = ""; + //BA.debugLineNum = 63;BA.debugLine="Dim montoPedidoActual As String"; +_montopedidoactual = ""; + //BA.debugLineNum = 65;BA.debugLine="Private clv_prods_ll As CustomListView"; +_clv_prods_ll = new b4a.example3.customlistview(); + //BA.debugLineNum = 66;BA.debugLine="Private PCLV As PreoptimizedCLV"; +_pclv = new keymon.lat.medicomed.preoptimizedclv(); + //BA.debugLineNum = 67;BA.debugLine="Dim listaProds As List"; +_listaprods = new anywheresoftware.b4a.objects.collections.List(); + //BA.debugLineNum = 69;BA.debugLine="Dim pedidoMap As Map"; +_pedidomap = new anywheresoftware.b4a.objects.collections.Map(); + //BA.debugLineNum = 70;BA.debugLine="Private p_botMasMen As Panel"; +_p_botmasmen = new anywheresoftware.b4a.objects.PanelWrapper(); + //BA.debugLineNum = 71;BA.debugLine="Dim reiniciarlistaProds As Boolean= False"; +_reiniciarlistaprods = __c.False; + //BA.debugLineNum = 73;BA.debugLine="Dim listaTiempos As List"; +_listatiempos = new anywheresoftware.b4a.objects.collections.List(); + //BA.debugLineNum = 74;BA.debugLine="Dim clienteId As String"; +_clienteid = ""; + //BA.debugLineNum = 75;BA.debugLine="Dim rutaUsuario As String"; +_rutausuario = ""; + //BA.debugLineNum = 76;BA.debugLine="Dim hayPedido As Boolean"; +_haypedido = false; + //BA.debugLineNum = 77;BA.debugLine="Dim listaHints As List"; +_listahints = new anywheresoftware.b4a.objects.collections.List(); + //BA.debugLineNum = 78;BA.debugLine="Dim h As Cursor"; +_h = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); + //BA.debugLineNum = 79;BA.debugLine="End Sub"; +return ""; +} +public String _clv_prods_ll_itemclick(int _index,Object _value) throws Exception{ + //BA.debugLineNum = 801;BA.debugLine="Private Sub clv_prods_ll_ItemClick (Index As Int,"; + //BA.debugLineNum = 803;BA.debugLine="End Sub"; +return ""; +} +public String _clv_prods_ll_visiblerangechanged(int _firstindex,int _lastindex) throws Exception{ +int _extrasize = 0; +int _i = 0; +anywheresoftware.b4a.objects.B4XViewWrapper _pnl = null; +anywheresoftware.b4a.objects.CSBuilder _cs = null; +String _precio = ""; + //BA.debugLineNum = 815;BA.debugLine="Private Sub clv_prods_ll_VisibleRangeChanged (Firs"; + //BA.debugLineNum = 818;BA.debugLine="Dim ExtraSize As Int = 30 'List size"; +_extrasize = (int) (30); + //BA.debugLineNum = 819;BA.debugLine="For i = Max(0, FirstIndex - ExtraSize) To Min(Las"; { -final anywheresoftware.b4a.BA.IterableList group4 = __ref._prodsmap /*anywheresoftware.b4a.objects.collections.Map*/ .Keys(); -final int groupLen4 = group4.getSize() -;int index4 = 0; -; -for (; index4 < groupLen4;index4++){ -_p = BA.ObjectToString(group4.Get(index4)); -RDebugUtils.currentLine=24379397; - //BA.debugLineNum = 24379397;BA.debugLine="p1 = prodsMap.Get(p)"; -_p1 = (anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(__ref._prodsmap /*anywheresoftware.b4a.objects.collections.Map*/ .Get((Object)(_p)))); -RDebugUtils.currentLine=24379398; - //BA.debugLineNum = 24379398;BA.debugLine="Log(p & \"|\" & p1)"; -__c.LogImpl("324379398",_p+"|"+BA.ObjectToString(_p1),0); -RDebugUtils.currentLine=24379399; - //BA.debugLineNum = 24379399;BA.debugLine="Private pn As String = Subs.traeProdNombre(p)"; -_pn = _subs._traeprodnombre /*String*/ (ba,_p); -RDebugUtils.currentLine=24379400; - //BA.debugLineNum = 24379400;BA.debugLine="Subs.guardaProductoSinGestion(Subs.traeAlmacen,"; -_subs._guardaproductosingestion /*String*/ (ba,_subs._traealmacen /*String*/ (ba),BA.ObjectToString(_p1.Get((Object)("precio"))),BA.ObjectToString(_p1.Get((Object)("cant"))),_pn,_p,__ref._clienteid /*String*/ ,_subs._traefecha /*String*/ (ba),_subs._traeusuariodebd /*String*/ (ba),__ref._rutausuario /*String*/ ,BA.NumberToString(0),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ ); +final int step2 = 1; +final int limit2 = (int) (__c.Min(_lastindex+_extrasize,_clv_prods_ll._getsize()-1)); +_i = (int) (__c.Max(0,_firstindex-_extrasize)) ; +for (;_i <= limit2 ;_i = _i + step2 ) { + //BA.debugLineNum = 820;BA.debugLine="Dim Pnl As B4XView = clv_prods_ll.GetPanel(i)"; +_pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_pnl = _clv_prods_ll._getpanel(_i); + //BA.debugLineNum = 821;BA.debugLine="If i > FirstIndex - ExtraSize And i < LastIndex"; +if (_i>_firstindex-_extrasize && _i<_lastindex+_extrasize) { + //BA.debugLineNum = 823;BA.debugLine="If Pnl.NumberOfViews = 0 Then 'Add each item/la"; +if (_pnl.getNumberOfViews()==0) { + //BA.debugLineNum = 824;BA.debugLine="Pnl.LoadLayout(\"proditem\")"; +_pnl.LoadLayout("proditem",ba); + //BA.debugLineNum = 825;BA.debugLine="p_prods.Width = Root.Width * 0.92"; +_p_prods.setWidth((int) (_root.getWidth()*0.92)); + //BA.debugLineNum = 826;BA.debugLine="p_botMasMen.Left = p_prods.Width - (p_botMasMe"; +_p_botmasmen.setLeft((int) (_p_prods.getWidth()-(_p_botmasmen.getWidth()+5))); + //BA.debugLineNum = 827;BA.debugLine="Pnl.Height = p_prods.Height"; +_pnl.setHeight(_p_prods.getHeight()); + //BA.debugLineNum = 828;BA.debugLine="Private cs As CSBuilder"; +_cs = new anywheresoftware.b4a.objects.CSBuilder(); + //BA.debugLineNum = 829;BA.debugLine="cs.Initialize"; +_cs.Initialize(); + //BA.debugLineNum = 830;BA.debugLine="l_prodX.SetTextSizeAnimated(0, 13)"; +_l_prodx.SetTextSizeAnimated((int) (0),(float) (13)); + //BA.debugLineNum = 831;BA.debugLine="If clv_prods_ll.GetValue(i).As(Map).Get(\"cant\""; +if (((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_clv_prods_ll._getvalue(_i)))).Get((Object)("cant"))!= null && (double)(BA.ObjectToNumber(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_clv_prods_ll._getvalue(_i)))).Get((Object)("cant"))))>0) { + //BA.debugLineNum = 832;BA.debugLine="p_prods.Color=0xFFE2EEFF"; +_p_prods.setColor(((int)0xffe2eeff)); + //BA.debugLineNum = 833;BA.debugLine="et_pCant.TextColor=Colors.Red"; +_et_pcant.setTextColor(__c.Colors.Red); + //BA.debugLineNum = 834;BA.debugLine="If Subs.pedidoGuardado Then"; +if (_subs._pedidoguardado /*boolean*/ (ba)) { + //BA.debugLineNum = 835;BA.debugLine="Log(\"YA SE GUARDO\")"; +__c.LogImpl("358195988","YA SE GUARDO",0); + //BA.debugLineNum = 836;BA.debugLine="et_pCant.Enabled = False"; +_et_pcant.setEnabled(__c.False); + //BA.debugLineNum = 838;BA.debugLine="b_prodMenos.Enabled = False"; +_b_prodmenos.setEnabled(__c.False); + }; + }; + //BA.debugLineNum = 841;BA.debugLine="Private precio As String=NumberFormat2(clv_pro"; +_precio = __c.NumberFormat2(((double)(BA.ObjectToNumber(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_clv_prods_ll._getvalue(_i)))).Get((Object)("precio"))))),(int) (1),(int) (2),(int) (2),__c.False); + //BA.debugLineNum = 842;BA.debugLine="If clv_prods_ll.GetValue(i).As(Map).Get(\"cant\""; +if (((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_clv_prods_ll._getvalue(_i)))).Get((Object)("cant"))!= null) { +_et_pcant.setText(BA.ObjectToCharSequence(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_clv_prods_ll._getvalue(_i)))).Get((Object)("cant"))));}; + //BA.debugLineNum = 843;BA.debugLine="l_prodX.Text = cs.Color(Colors.red).append(clv"; +_l_prodx.setText(BA.ObjectToCharSequence(_cs.Color(__c.Colors.Red).Append(BA.ObjectToCharSequence(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_clv_prods_ll._getvalue(_i)))).Get((Object)("prod")))).Pop().Append(BA.ObjectToCharSequence(__c.CRLF)).Append(BA.ObjectToCharSequence("Existencias: "+BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_clv_prods_ll._getvalue(_i)))).Get((Object)("almacen"))))).Color(((int)0xff017f01)).Append(BA.ObjectToCharSequence((" $"+__c.SmartStringFormatter("",(Object)(_precio))+""))).PopAll().getObject())); + }; + }else { + }; + //BA.debugLineNum = 851;BA.debugLine="PCLV.B4XSeekBar1.Value = clv_prods_ll.Size - Fir"; +_pclv._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._setvalue /*int*/ ((int) (_clv_prods_ll._getsize()-_firstindex)); } }; -RDebugUtils.currentLine=24379402; - //BA.debugLineNum = 24379402;BA.debugLine="Log(\"promos-inv, prods-inv, cat-vis\")"; -__c.LogImpl("324379402","promos-inv, prods-inv, cat-vis",0); -RDebugUtils.currentLine=24379403; - //BA.debugLineNum = 24379403;BA.debugLine="lv_promos.Visible = False"; -__ref._lv_promos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=24379404; - //BA.debugLineNum = 24379404;BA.debugLine="clv_prods_ll.AsView.Visible = False"; -__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._asview().setVisible(__c.False); -RDebugUtils.currentLine=24379405; - //BA.debugLineNum = 24379405;BA.debugLine="lv_subtipo.Visible = False"; -__ref._lv_subtipo /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=24379406; - //BA.debugLineNum = 24379406;BA.debugLine="lv_tipo.Visible = False"; -__ref._lv_tipo /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=24379407; - //BA.debugLineNum = 24379407;BA.debugLine="lv_catalogos.Visible = True"; -__ref._lv_catalogos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=24379408; - //BA.debugLineNum = 24379408;BA.debugLine="Log(\"Continuar\")"; -__c.LogImpl("324379408","Continuar",0); -RDebugUtils.currentLine=24379409; - //BA.debugLineNum = 24379409;BA.debugLine="Dim m As Map = Subs.traeTotalesClienteActual"; -_m = new anywheresoftware.b4a.objects.collections.Map(); -_m = _subs._traetotalesclienteactual /*anywheresoftware.b4a.objects.collections.Map*/ (ba); -RDebugUtils.currentLine=24379410; - //BA.debugLineNum = 24379410;BA.debugLine="prodsPedidoActual = m.Get(\"productos\")"; -__ref._prodspedidoactual /*String*/ = BA.ObjectToString(_m.Get((Object)("productos"))); -RDebugUtils.currentLine=24379411; - //BA.debugLineNum = 24379411;BA.debugLine="montoPedidoActual = m.Get(\"monto\")"; -__ref._montopedidoactual /*String*/ = BA.ObjectToString(_m.Get((Object)("monto"))); -RDebugUtils.currentLine=24379412; - //BA.debugLineNum = 24379412;BA.debugLine="End Sub"; + //BA.debugLineNum = 854;BA.debugLine="End Sub"; return ""; } -public String _cuentaprods(keymon.lat.medicomed.c_productos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "cuentaprods", false)) - {return ((String) Debug.delegate(ba, "cuentaprods", null));} -RDebugUtils.currentLine=24182784; - //BA.debugLineNum = 24182784;BA.debugLine="Sub cuentaProds"; -RDebugUtils.currentLine=24182786; - //BA.debugLineNum = 24182786;BA.debugLine="Log(\"===========================\")"; -__c.LogImpl("324182786","===========================",0); -RDebugUtils.currentLine=24182787; - //BA.debugLineNum = 24182787;BA.debugLine="Private c As Cursor = B4XPages.MainPage.skmt.Exec"; +public anywheresoftware.b4a.objects.PanelWrapper _createlistitem(String _text,String _preciou,int _inv,int _width,int _height,anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _img,String _prodid,int _bc,int _tc) throws Exception{ + //BA.debugLineNum = 452;BA.debugLine="Sub CreateListItem(Text As String, precioU As Stri"; + //BA.debugLineNum = 467;BA.debugLine="End Sub"; +return null; +} +public String _cuentaprods() throws Exception{ + //BA.debugLineNum = 558;BA.debugLine="Sub cuentaProds"; + //BA.debugLineNum = 560;BA.debugLine="Log(\"===========================\")"; +__c.LogImpl("357147394","===========================",0); + //BA.debugLineNum = 561;BA.debugLine="Private c As Cursor = B4XPages.MainPage.skmt.Exec"; _c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select sum(PE_COSTO_TOT) as total, sum(PE_CANT) as cant from PEDIDO where PE_CLIENTE = '"+__c.SmartStringFormatter("",(Object)(__ref._clienteid /*String*/ ))+"'")))); -RDebugUtils.currentLine=24182790; - //BA.debugLineNum = 24182790;BA.debugLine="p_botonesVenta.Visible = True"; -__ref._p_botonesventa /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=24182791; - //BA.debugLineNum = 24182791;BA.debugLine="p_botonesVenta.BringToFront"; -__ref._p_botonesventa /*anywheresoftware.b4a.objects.PanelWrapper*/ .BringToFront(); -RDebugUtils.currentLine=24182792; - //BA.debugLineNum = 24182792;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=24182793; - //BA.debugLineNum = 24182793;BA.debugLine="Log($\"Total Prods: ${c.GetString(\"cant\")}, Total"; -__c.LogImpl("324182793",("Total Prods: "+__c.SmartStringFormatter("",(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("cant")))+", Total Compra: $"+__c.SmartStringFormatter("1.2",(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("total")))+""),0); -RDebugUtils.currentLine=24182794; - //BA.debugLineNum = 24182794;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=24182795; - //BA.debugLineNum = 24182795;BA.debugLine="End Sub"; +_c = (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 sum(PE_COSTO_TOT) as total, sum(PE_CANT) as cant from PEDIDO where PE_CLIENTE = '"+__c.SmartStringFormatter("",(Object)(_clienteid))+"'")))); + //BA.debugLineNum = 564;BA.debugLine="p_botonesVenta.Visible = True"; +_p_botonesventa.setVisible(__c.True); + //BA.debugLineNum = 565;BA.debugLine="p_botonesVenta.BringToFront"; +_p_botonesventa.BringToFront(); + //BA.debugLineNum = 566;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 567;BA.debugLine="Log($\"Total Prods: ${c.GetString(\"cant\")}, Total"; +__c.LogImpl("357147401",("Total Prods: "+__c.SmartStringFormatter("",(Object)(_c.GetString("cant")))+", Total Compra: $"+__c.SmartStringFormatter("1.2",(Object)(_c.GetString("total")))+""),0); + //BA.debugLineNum = 568;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 569;BA.debugLine="End Sub"; return ""; } -public String _b_prodmas_click(keymon.lat.medicomed.c_productos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "b_prodmas_click", false)) - {return ((String) Debug.delegate(ba, "b_prodmas_click", null));} +public String _et_pcant_focuschanged(boolean _hasfocus) throws Exception{ + //BA.debugLineNum = 571;BA.debugLine="Private Sub et_pCant_FocusChanged (HasFocus As Boo"; + //BA.debugLineNum = 572;BA.debugLine="LogColor($\"focus changed=${HasFocus}\"$, Colors.Ma"; +__c.LogImpl("357212929",("focus changed="+__c.SmartStringFormatter("",(Object)(_hasfocus))+""),__c.Colors.Magenta); + //BA.debugLineNum = 573;BA.debugLine="etCantHasFocus = HasFocus"; +_etcanthasfocus = _hasfocus; + //BA.debugLineNum = 574;BA.debugLine="cuentaProds"; +_cuentaprods(); + //BA.debugLineNum = 575;BA.debugLine="End Sub"; +return ""; +} +public String _et_pcant_textchanged(String _old,String _new) throws Exception{ int _index = 0; anywheresoftware.b4a.objects.B4XViewWrapper _pnl0 = null; anywheresoftware.b4a.objects.B4XViewWrapper _pnl = null; anywheresoftware.b4a.objects.B4XViewWrapper _lacant = null; +String _id = ""; String _precio = ""; String _inv = ""; -String _id = ""; -RDebugUtils.currentLine=24051712; - //BA.debugLineNum = 24051712;BA.debugLine="Sub b_prodMas_Click"; -RDebugUtils.currentLine=24051713; - //BA.debugLineNum = 24051713;BA.debugLine="etCantHasFocus = False"; -__ref._etcanthasfocus /*boolean*/ = __c.False; -RDebugUtils.currentLine=24051715; - //BA.debugLineNum = 24051715;BA.debugLine="Dim index As Int = clv_prods_ll.GetItemFromView(S"; -_index = __ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getitemfromview((anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba)))); -RDebugUtils.currentLine=24051716; - //BA.debugLineNum = 24051716;BA.debugLine="Dim pnl0 As B4XView = clv_prods_ll.GetPanel(index"; + //BA.debugLineNum = 523;BA.debugLine="Private Sub et_pCant_TextChanged (Old As String, N"; + //BA.debugLineNum = 535;BA.debugLine="If etCantHasFocus = True Then"; +if (_etcanthasfocus==__c.True) { + //BA.debugLineNum = 538;BA.debugLine="Dim index As Int = clv_prods_ll.GetItemFromView("; +_index = _clv_prods_ll._getitemfromview((anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba)))); + //BA.debugLineNum = 539;BA.debugLine="Dim pnl0 As B4XView = clv_prods_ll.GetPanel(inde"; _pnl0 = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_pnl0 = __ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getpanel(_index); -RDebugUtils.currentLine=24051717; - //BA.debugLineNum = 24051717;BA.debugLine="Dim pnl As B4XView = pnl0.GetView(0)"; +_pnl0 = _clv_prods_ll._getpanel(_index); + //BA.debugLineNum = 540;BA.debugLine="Dim pnl As B4XView = pnl0.GetView(0)"; _pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); _pnl = _pnl0.GetView((int) (0)); -RDebugUtils.currentLine=24051718; - //BA.debugLineNum = 24051718;BA.debugLine="Dim laCant As B4XView = pnl.GetView(2).GetView(2)"; + //BA.debugLineNum = 541;BA.debugLine="Dim laCant As B4XView = pnl.GetView(2).GetView(2"; _lacant = new anywheresoftware.b4a.objects.B4XViewWrapper(); _lacant = _pnl.GetView((int) (2)).GetView((int) (2)); -RDebugUtils.currentLine=24051720; - //BA.debugLineNum = 24051720;BA.debugLine="Private precio As String=clv_prods_ll.GetValue(in"; -_precio = BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getvalue(_index)))).Get((Object)("precio"))); -RDebugUtils.currentLine=24051721; - //BA.debugLineNum = 24051721;BA.debugLine="Private inv As String=clv_prods_ll.GetValue(index"; -_inv = BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getvalue(_index)))).Get((Object)("almacen"))); -RDebugUtils.currentLine=24051722; - //BA.debugLineNum = 24051722;BA.debugLine="If laCant.Text = \"\" Then laCant.Text = 0"; -if ((_lacant.getText()).equals("")) { -_lacant.setText(BA.ObjectToCharSequence(0));}; -RDebugUtils.currentLine=24051724; - //BA.debugLineNum = 24051724;BA.debugLine="If laCant.Text + 1 <= inv Then"; -if ((double)(Double.parseDouble(_lacant.getText()))+1<=(double)(Double.parseDouble(_inv))) { -RDebugUtils.currentLine=24051725; - //BA.debugLineNum = 24051725;BA.debugLine="Log(NumberFormat2(laCant.Text+1,0,0,0,False))"; -__c.LogImpl("324051725",__c.NumberFormat2((double)(Double.parseDouble(_lacant.getText()))+1,(int) (0),(int) (0),(int) (0),__c.False),0); -RDebugUtils.currentLine=24051726; - //BA.debugLineNum = 24051726;BA.debugLine="laCant.Text = $\"${NumberFormat2(laCant.Text+1,0,"; -_lacant.setText(BA.ObjectToCharSequence((""+__c.SmartStringFormatter("",(Object)(__c.NumberFormat2((double)(Double.parseDouble(_lacant.getText()))+1,(int) (0),(int) (0),(int) (0),__c.False)))+""))); -RDebugUtils.currentLine=24051728; - //BA.debugLineNum = 24051728;BA.debugLine="Private id As String=clv_prods_ll.GetValue(index"; -_id = BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getvalue(_index)))).Get((Object)("id"))); + //BA.debugLineNum = 542;BA.debugLine="Private id As String=clv_prods_ll.GetValue(index"; +_id = BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_clv_prods_ll._getvalue(_index)))).Get((Object)("id"))); + //BA.debugLineNum = 543;BA.debugLine="Private precio As String=clv_prods_ll.GetValue(i"; +_precio = BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_clv_prods_ll._getvalue(_index)))).Get((Object)("precio"))); + //BA.debugLineNum = 544;BA.debugLine="Private inv As String=clv_prods_ll.GetValue(inde"; +_inv = BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_clv_prods_ll._getvalue(_index)))).Get((Object)("almacen"))); + //BA.debugLineNum = 545;BA.debugLine="Private inv As String=clv_prods_ll.GetValue(inde"; +_inv = BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_clv_prods_ll._getvalue(_index)))).Get((Object)("almacen"))); + //BA.debugLineNum = 546;BA.debugLine="If(New = \"\" Or New = Null) Then New = 0"; +if (((_new).equals("") || _new== null)) { +_new = BA.NumberToString(0);}; + //BA.debugLineNum = 547;BA.debugLine="If(New > inv) Then"; +if (((double)(Double.parseDouble(_new))>(double)(Double.parseDouble(_inv)))) { + //BA.debugLineNum = 548;BA.debugLine="Sender.As(EditText).text = inv"; +((anywheresoftware.b4a.objects.EditTextWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.EditTextWrapper(), (android.widget.EditText)(__c.Sender(ba)))).setText(BA.ObjectToCharSequence(_inv)); }; -RDebugUtils.currentLine=24051735; - //BA.debugLineNum = 24051735;BA.debugLine="Subs.actualizaProducto(Subs.traeAlmacen, precio,"; -_subs._actualizaproducto /*String*/ (ba,_subs._traealmacen /*String*/ (ba),_precio,_lacant.getText(),_subs._traeprodnombre /*String*/ (ba,_id),_id,__ref._clienteid /*String*/ ,_subs._traefecha /*String*/ (ba),_subs._traeusuariodebd /*String*/ (ba),__ref._rutausuario /*String*/ ,BA.NumberToString(0),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ ); -RDebugUtils.currentLine=24051736; - //BA.debugLineNum = 24051736;BA.debugLine="cuentaProds"; -__ref._cuentaprods /*String*/ (null); -RDebugUtils.currentLine=24051738; - //BA.debugLineNum = 24051738;BA.debugLine="End Sub"; + //BA.debugLineNum = 551;BA.debugLine="If Not(Old = \"0\" And New = \"\") And laCant.Text <"; +if (__c.Not((_old).equals("0") && (_new).equals("")) && _lacant.getText()!= null && (_lacant.getText()).equals(BA.NumberToString(0)) == false && (_lacant.getText()).equals("") == false && _etcanthasfocus) { + //BA.debugLineNum = 552;BA.debugLine="Subs.actualizaProducto(Subs.traeAlmacen, precio"; +_subs._actualizaproducto /*String*/ (ba,_subs._traealmacen /*String*/ (ba),_precio,_lacant.getText(),_subs._traeprodnombre /*String*/ (ba,_id),_id,_clienteid,_subs._traefecha /*String*/ (ba),_subs._traeusuariodebd /*String*/ (ba),_rutausuario,BA.NumberToString(0),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ ); + //BA.debugLineNum = 553;BA.debugLine="cuentaProds"; +_cuentaprods(); + }; + }; + //BA.debugLineNum = 556;BA.debugLine="End Sub"; return ""; } -public String _b_prodmenos_click(keymon.lat.medicomed.c_productos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "b_prodmenos_click", false)) - {return ((String) Debug.delegate(ba, "b_prodmenos_click", null));} +public Object _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 82;BA.debugLine="Public Sub Initialize As Object"; + //BA.debugLineNum = 83;BA.debugLine="Return Me"; +if (true) return this; + //BA.debugLineNum = 84;BA.debugLine="End Sub"; +return null; +} +public String _l_info_click() throws Exception{ + //BA.debugLineNum = 651;BA.debugLine="Private Sub l_info_Click"; + //BA.debugLineNum = 652;BA.debugLine="l_info.Visible = False"; +_l_info.setVisible(__c.False); + //BA.debugLineNum = 653;BA.debugLine="End Sub"; +return ""; +} +public String _l_prodx_click() throws Exception{ int _index = 0; -anywheresoftware.b4a.objects.B4XViewWrapper _pnl0 = null; -anywheresoftware.b4a.objects.B4XViewWrapper _pnl = null; -anywheresoftware.b4a.objects.B4XViewWrapper _lacant = null; -anywheresoftware.b4a.objects.collections.Map _tmpmap = null; -String _precio = ""; -String _id = ""; -RDebugUtils.currentLine=23986176; - //BA.debugLineNum = 23986176;BA.debugLine="Sub b_prodMenos_Click"; -RDebugUtils.currentLine=23986177; - //BA.debugLineNum = 23986177;BA.debugLine="etCantHasFocus = False"; -__ref._etcanthasfocus /*boolean*/ = __c.False; -RDebugUtils.currentLine=23986179; - //BA.debugLineNum = 23986179;BA.debugLine="Dim index As Int = clv_prods_ll.GetItemFromView(S"; -_index = __ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getitemfromview((anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba)))); -RDebugUtils.currentLine=23986180; - //BA.debugLineNum = 23986180;BA.debugLine="Dim pnl0 As B4XView = clv_prods_ll.GetPanel(index"; -_pnl0 = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_pnl0 = __ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getpanel(_index); -RDebugUtils.currentLine=23986181; - //BA.debugLineNum = 23986181;BA.debugLine="Dim pnl As B4XView = pnl0.GetView(0)"; -_pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_pnl = _pnl0.GetView((int) (0)); -RDebugUtils.currentLine=23986182; - //BA.debugLineNum = 23986182;BA.debugLine="Dim laCant As B4XView = pnl.GetView(2).GetView(2)"; -_lacant = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_lacant = _pnl.GetView((int) (2)).GetView((int) (2)); -RDebugUtils.currentLine=23986184; - //BA.debugLineNum = 23986184;BA.debugLine="If laCant.Text = \"\" Then laCant.Text = 0"; -if ((_lacant.getText()).equals("")) { -_lacant.setText(BA.ObjectToCharSequence(0));}; -RDebugUtils.currentLine=23986186; - //BA.debugLineNum = 23986186;BA.debugLine="laCant.Text = $\"${NumberFormat2(laCant.Text-1,0,0"; -_lacant.setText(BA.ObjectToCharSequence((""+__c.SmartStringFormatter("",(Object)(__c.NumberFormat2((double)(Double.parseDouble(_lacant.getText()))-1,(int) (0),(int) (0),(int) (0),__c.False)))+""))); -RDebugUtils.currentLine=23986187; - //BA.debugLineNum = 23986187;BA.debugLine="If laCant.Text < 0 Then laCant.Text = 0"; -if ((double)(Double.parseDouble(_lacant.getText()))<0) { -_lacant.setText(BA.ObjectToCharSequence(0));}; -RDebugUtils.currentLine=23986188; - //BA.debugLineNum = 23986188;BA.debugLine="Private tmpMap As Map = clv_prods_ll.GetValue(ind"; -_tmpmap = new anywheresoftware.b4a.objects.collections.Map(); -_tmpmap = ((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getvalue(_index)))); -RDebugUtils.currentLine=23986189; - //BA.debugLineNum = 23986189;BA.debugLine="Private precio As String=clv_prods_ll.GetValue(in"; -_precio = BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getvalue(_index)))).Get((Object)("precio"))); -RDebugUtils.currentLine=23986190; - //BA.debugLineNum = 23986190;BA.debugLine="Private id As String=clv_prods_ll.GetValue(index)"; -_id = BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getvalue(_index)))).Get((Object)("id"))); -RDebugUtils.currentLine=23986191; - //BA.debugLineNum = 23986191;BA.debugLine="Private tmpMap As Map = CreateMap(\"precio\":precio"; -_tmpmap = new anywheresoftware.b4a.objects.collections.Map(); -_tmpmap = __c.createMap(new Object[] {(Object)("precio"),(Object)(_precio),(Object)("cant"),(Object)(_lacant.getText()),(Object)("almacen"),(Object)(_subs._traealmacen /*String*/ (ba))}); -RDebugUtils.currentLine=23986194; - //BA.debugLineNum = 23986194;BA.debugLine="If laCant.Text = 0 Then prodsMap.Remove(id)"; -if ((_lacant.getText()).equals(BA.NumberToString(0))) { -__ref._prodsmap /*anywheresoftware.b4a.objects.collections.Map*/ .Remove((Object)(_id));}; -RDebugUtils.currentLine=23986197; - //BA.debugLineNum = 23986197;BA.debugLine="Subs.actualizaProducto(Subs.traeAlmacen, precio,"; -_subs._actualizaproducto /*String*/ (ba,_subs._traealmacen /*String*/ (ba),_precio,_lacant.getText(),_subs._traeprodnombre /*String*/ (ba,_id),_id,__ref._clienteid /*String*/ ,_subs._traefecha /*String*/ (ba),_subs._traeusuariodebd /*String*/ (ba),__ref._rutausuario /*String*/ ,BA.NumberToString(0),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ ); -RDebugUtils.currentLine=23986198; - //BA.debugLineNum = 23986198;BA.debugLine="cuentaProds"; -__ref._cuentaprods /*String*/ (null); -RDebugUtils.currentLine=23986200; - //BA.debugLineNum = 23986200;BA.debugLine="End Sub"; +anywheresoftware.b4a.objects.B4XViewWrapper _p0 = null; +anywheresoftware.b4a.objects.B4XViewWrapper _p = null; +anywheresoftware.b4a.objects.B4XViewWrapper _cant1 = null; + //BA.debugLineNum = 805;BA.debugLine="Sub l_prodx_click"; + //BA.debugLineNum = 806;BA.debugLine="Dim index As Int = clv_prods_ll.GetItemFromView(S"; +_index = _clv_prods_ll._getitemfromview((anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba)))); + //BA.debugLineNum = 807;BA.debugLine="Private p0 As B4XView = clv_prods_ll.GetPanel(ind"; +_p0 = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_p0 = _clv_prods_ll._getpanel(_index); + //BA.debugLineNum = 808;BA.debugLine="Private p As B4XView = p0.GetView(0)"; +_p = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_p = _p0.GetView((int) (0)); + //BA.debugLineNum = 809;BA.debugLine="Private cant1 As B4XView = p.GetView(2).GetView(2"; +_cant1 = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_cant1 = _p.GetView((int) (2)).GetView((int) (2)); + //BA.debugLineNum = 810;BA.debugLine="Dim index As Int = clv_prods_ll.GetItemFromView(S"; +_index = _clv_prods_ll._getitemfromview((anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba)))); + //BA.debugLineNum = 812;BA.debugLine="Log(cant1.Text)"; +__c.LogImpl("358130439",_cant1.getText(),0); + //BA.debugLineNum = 813;BA.debugLine="End Sub"; return ""; } -public String _b_qr_click(keymon.lat.medicomed.c_productos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "b_qr_click", false)) - {return ((String) Debug.delegate(ba, "b_qr_click", null));} -RDebugUtils.currentLine=23855104; - //BA.debugLineNum = 23855104;BA.debugLine="Sub b_QR_Click"; -RDebugUtils.currentLine=23855105; - //BA.debugLineNum = 23855105;BA.debugLine="If ciclo = 1 Then"; -if ((__ref._ciclo /*String*/ ).equals(BA.NumberToString(1))) { -RDebugUtils.currentLine=23855106; - //BA.debugLineNum = 23855106;BA.debugLine="ciclo = 2"; -__ref._ciclo /*String*/ = BA.NumberToString(2); -RDebugUtils.currentLine=23855107; - //BA.debugLineNum = 23855107;BA.debugLine="ya_entro = \"0\""; -__ref._ya_entro /*String*/ = "0"; -RDebugUtils.currentLine=23855108; - //BA.debugLineNum = 23855108;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*void*/ (null); - }else -{RDebugUtils.currentLine=23855109; - //BA.debugLineNum = 23855109;BA.debugLine="else if ciclo = 2 Then"; -if ((__ref._ciclo /*String*/ ).equals(BA.NumberToString(2))) { -RDebugUtils.currentLine=23855110; - //BA.debugLineNum = 23855110;BA.debugLine="ciclo = 3"; -__ref._ciclo /*String*/ = BA.NumberToString(3); -RDebugUtils.currentLine=23855111; - //BA.debugLineNum = 23855111;BA.debugLine="ya_entro = \"0\""; -__ref._ya_entro /*String*/ = "0"; -RDebugUtils.currentLine=23855112; - //BA.debugLineNum = 23855112;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*void*/ (null); - }else -{RDebugUtils.currentLine=23855113; - //BA.debugLineNum = 23855113;BA.debugLine="else if ciclo = 3 Then"; -if ((__ref._ciclo /*String*/ ).equals(BA.NumberToString(3))) { -RDebugUtils.currentLine=23855114; - //BA.debugLineNum = 23855114;BA.debugLine="ciclo = 4"; -__ref._ciclo /*String*/ = BA.NumberToString(4); -RDebugUtils.currentLine=23855115; - //BA.debugLineNum = 23855115;BA.debugLine="ya_entro = \"0\""; -__ref._ya_entro /*String*/ = "0"; -RDebugUtils.currentLine=23855116; - //BA.debugLineNum = 23855116;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*void*/ (null); - }else -{RDebugUtils.currentLine=23855117; - //BA.debugLineNum = 23855117;BA.debugLine="else if ciclo = 4 Then"; -if ((__ref._ciclo /*String*/ ).equals(BA.NumberToString(4))) { -RDebugUtils.currentLine=23855118; - //BA.debugLineNum = 23855118;BA.debugLine="ciclo = 5"; -__ref._ciclo /*String*/ = BA.NumberToString(5); -RDebugUtils.currentLine=23855119; - //BA.debugLineNum = 23855119;BA.debugLine="ya_entro = \"0\""; -__ref._ya_entro /*String*/ = "0"; -RDebugUtils.currentLine=23855120; - //BA.debugLineNum = 23855120;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*void*/ (null); - }else -{RDebugUtils.currentLine=23855121; - //BA.debugLineNum = 23855121;BA.debugLine="else if ciclo = 5 Then"; -if ((__ref._ciclo /*String*/ ).equals(BA.NumberToString(5))) { -RDebugUtils.currentLine=23855122; - //BA.debugLineNum = 23855122;BA.debugLine="ciclo = 1"; -__ref._ciclo /*String*/ = BA.NumberToString(1); -RDebugUtils.currentLine=23855123; - //BA.debugLineNum = 23855123;BA.debugLine="ya_entro = \"0\""; -__ref._ya_entro /*String*/ = "0"; -RDebugUtils.currentLine=23855124; - //BA.debugLineNum = 23855124;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*void*/ (null); - }}}}} -; -RDebugUtils.currentLine=23855126; - //BA.debugLineNum = 23855126;BA.debugLine="End Sub"; +public String _l_prodx_longclick() throws Exception{ + //BA.debugLineNum = 645;BA.debugLine="Private Sub l_prodX_LongClick"; + //BA.debugLineNum = 646;BA.debugLine="Log(\"longclic = \"&Sender.as(Label).tag)"; +__c.LogImpl("357409537","longclic = "+BA.ObjectToString(((anywheresoftware.b4a.objects.LabelWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.LabelWrapper(), (android.widget.TextView)(__c.Sender(ba)))).getTag()),0); + //BA.debugLineNum = 647;BA.debugLine="l_info.Text = Sender.as(Label).tag"; +_l_info.setText(BA.ObjectToCharSequence(((anywheresoftware.b4a.objects.LabelWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.LabelWrapper(), (android.widget.TextView)(__c.Sender(ba)))).getTag())); + //BA.debugLineNum = 648;BA.debugLine="l_info.Visible = True"; +_l_info.setVisible(__c.True); + //BA.debugLineNum = 649;BA.debugLine="End Sub"; return ""; } -public void _b4xpage_appear(keymon.lat.medicomed.c_productos __ref) throws Exception{ -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "b4xpage_appear", false)) - {Debug.delegate(ba, "b4xpage_appear", null); return;} -ResumableSub_B4XPage_Appear rsub = new ResumableSub_B4XPage_Appear(this,__ref); -rsub.resume(ba, null); -} -public static class ResumableSub_B4XPage_Appear extends BA.ResumableSub { -public ResumableSub_B4XPage_Appear(keymon.lat.medicomed.c_productos parent,keymon.lat.medicomed.c_productos __ref) { -this.parent = parent; -this.__ref = __ref; -this.__ref = parent; -} -keymon.lat.medicomed.c_productos __ref; -keymon.lat.medicomed.c_productos parent; -anywheresoftware.b4a.objects.LabelWrapper _label1 = null; -anywheresoftware.b4a.objects.collections.Map _m = null; - -@Override -public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="c_productos"; - - while (true) { - switch (state) { - case -1: -return; - -case 0: -//C -this.state = 1; -RDebugUtils.currentLine=23396353; - //BA.debugLineNum = 23396353;BA.debugLine="clienteId = Subs.traeCliente"; -__ref._clienteid /*String*/ = parent._subs._traecliente /*String*/ (ba); -RDebugUtils.currentLine=23396354; - //BA.debugLineNum = 23396354;BA.debugLine="rutaUsuario = Subs.traeRuta"; -__ref._rutausuario /*String*/ = parent._subs._traeruta /*String*/ (ba); -RDebugUtils.currentLine=23396355; - //BA.debugLineNum = 23396355;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE CAT_"; -parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE CAT_GUNAPROD SET CAT_GP_TIPOPROD = (?) WHERE CAT_GP_TIPOPROD = (?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("PRIORITARIO"),(Object)("1")})); -RDebugUtils.currentLine=23396356; - //BA.debugLineNum = 23396356;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE CAT_"; -parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE CAT_GUNAPROD SET CAT_GP_TIPOPROD = (?) WHERE CAT_GP_TIPOPROD = (?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("ESTRATEGICO"),(Object)("2")})); -RDebugUtils.currentLine=23396357; - //BA.debugLineNum = 23396357;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE CAT_"; -parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE CAT_GUNAPROD SET CAT_GP_TIPOPROD = (?) WHERE CAT_GP_TIPOPROD = (?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("COMPLEMENTARIO"),(Object)("3")})); -RDebugUtils.currentLine=23396358; - //BA.debugLineNum = 23396358;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE CAT_"; -parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE CAT_GUNAPROD SET CAT_GP_TIPOPROD = (?) WHERE CAT_GP_TIPOPROD = (?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("CATALOGO REGULAR"),(Object)("0")})); -RDebugUtils.currentLine=23396359; - //BA.debugLineNum = 23396359;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE CAT_"; -parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE CAT_GUNAPROD SET CAT_GP_TIPOPROD = (?) WHERE CAT_GP_CLASIF = (?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("PROMOS"),(Object)("PROMOS")})); -RDebugUtils.currentLine=23396360; - //BA.debugLineNum = 23396360;BA.debugLine="clv_prods_ll.GetBase.SetLayoutAnimated(0, 5dip, 1"; -__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getbase().SetLayoutAnimated((int) (0),parent.__c.DipToCurrent((int) (5)),parent.__c.DipToCurrent((int) (130)),(int) (__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()+10),(int) (__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()*0.68)); -RDebugUtils.currentLine=23396361; - //BA.debugLineNum = 23396361;BA.debugLine="clv_prods_ll.Base_Resize(clv_prods_ll.GetBase.Wid"; -__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._base_resize(__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getbase().getWidth(),__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getbase().getHeight()); -RDebugUtils.currentLine=23396362; - //BA.debugLineNum = 23396362;BA.debugLine="If B4XPages.MainPage.bTerminarClicked Then"; -if (true) break; - -case 1: -//if -this.state = 4; -if (parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._bterminarclicked /*boolean*/ ) { -this.state = 3; -}if (true) break; - -case 3: -//C -this.state = 4; -RDebugUtils.currentLine=23396363; - //BA.debugLineNum = 23396363;BA.debugLine="lv_catalogos.Visible = True"; -__ref._lv_catalogos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(parent.__c.True); -RDebugUtils.currentLine=23396364; - //BA.debugLineNum = 23396364;BA.debugLine="lv_promos.Visible = False"; -__ref._lv_promos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(parent.__c.False); -RDebugUtils.currentLine=23396365; - //BA.debugLineNum = 23396365;BA.debugLine="lv_tipo.Visible = False"; -__ref._lv_tipo /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(parent.__c.False); -RDebugUtils.currentLine=23396366; - //BA.debugLineNum = 23396366;BA.debugLine="lv_subtipo.Visible = False"; -__ref._lv_subtipo /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(parent.__c.False); -RDebugUtils.currentLine=23396367; - //BA.debugLineNum = 23396367;BA.debugLine="clv_prods_ll.AsView.Visible = False"; -__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._asview().setVisible(parent.__c.False); -RDebugUtils.currentLine=23396368; - //BA.debugLineNum = 23396368;BA.debugLine="B4XPages.MainPage.bTerminarClicked = False"; -parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._bterminarclicked /*boolean*/ = parent.__c.False; - if (true) break; -; -RDebugUtils.currentLine=23396370; - //BA.debugLineNum = 23396370;BA.debugLine="If ya_entro <> \"1\" Then"; - -case 4: -//if -this.state = 13; -if ((__ref._ya_entro /*String*/ ).equals("1") == false) { -this.state = 6; -}if (true) break; - -case 6: -//C -this.state = 7; -RDebugUtils.currentLine=23396371; - //BA.debugLineNum = 23396371;BA.debugLine="If BUSCA.Text <> \"\" Then BUSCA.Text =\"\""; -if (true) break; - -case 7: -//if -this.state = 12; -if ((__ref._busca /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()).equals("") == false) { -this.state = 9; -;}if (true) break; - -case 9: -//C -this.state = 12; -__ref._busca /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence("")); -if (true) break; - -case 12: -//C -this.state = 13; -; -RDebugUtils.currentLine=23396372; - //BA.debugLineNum = 23396372;BA.debugLine="entro =\"3\""; -__ref._entro /*String*/ = "3"; -RDebugUtils.currentLine=23396373; - //BA.debugLineNum = 23396373;BA.debugLine="lv_catalogos.Clear"; -__ref._lv_catalogos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear(); -RDebugUtils.currentLine=23396374; - //BA.debugLineNum = 23396374;BA.debugLine="Sleep(100)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "c_productos", "b4xpage_appear"),(int) (100)); -this.state = 24; -return; -case 24: -//C -this.state = 13; -; -RDebugUtils.currentLine=23396375; - //BA.debugLineNum = 23396375;BA.debugLine="lfila.Text = \"CATALOGOS\""; -__ref._lfila /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("CATALOGOS")); -RDebugUtils.currentLine=23396376; - //BA.debugLineNum = 23396376;BA.debugLine="p_productos.Height = Root.Height"; -__ref._p_productos /*anywheresoftware.b4a.objects.PanelWrapper*/ .setHeight(__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=23396377; - //BA.debugLineNum = 23396377;BA.debugLine="clv_prods_ll.AsView.Visible = False"; -__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._asview().setVisible(parent.__c.False); -RDebugUtils.currentLine=23396378; - //BA.debugLineNum = 23396378;BA.debugLine="lv_catalogos.Visible = True"; -__ref._lv_catalogos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(parent.__c.True); -RDebugUtils.currentLine=23396379; - //BA.debugLineNum = 23396379;BA.debugLine="p_botonesVenta.Visible = False"; -__ref._p_botonesventa /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(parent.__c.False); -RDebugUtils.currentLine=23396380; - //BA.debugLineNum = 23396380;BA.debugLine="p_botonesVenta.Top = clv_prods_ll.AsView.top + c"; -__ref._p_botonesventa /*anywheresoftware.b4a.objects.PanelWrapper*/ .setTop((int) (__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._asview().getTop()+__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._asview().getHeight()-25)); -RDebugUtils.currentLine=23396381; - //BA.debugLineNum = 23396381;BA.debugLine="lv_promos.Visible = False"; -__ref._lv_promos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(parent.__c.False); - if (true) break; - -case 13: -//C -this.state = 14; -; -RDebugUtils.currentLine=23396383; - //BA.debugLineNum = 23396383;BA.debugLine="Dim label1 As Label"; -_label1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=23396384; - //BA.debugLineNum = 23396384;BA.debugLine="label1 = lv_catalogos.SingleLineLayout.Label"; -_label1 = __ref._lv_catalogos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getSingleLineLayout().Label; -RDebugUtils.currentLine=23396385; - //BA.debugLineNum = 23396385;BA.debugLine="label1.TextSize = 17"; -_label1.setTextSize((float) (17)); -RDebugUtils.currentLine=23396386; - //BA.debugLineNum = 23396386;BA.debugLine="label1.TextColor = Colors.Black"; -_label1.setTextColor(parent.__c.Colors.Black); -RDebugUtils.currentLine=23396387; - //BA.debugLineNum = 23396387;BA.debugLine="lv_catalogos.Clear"; -__ref._lv_catalogos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear(); -RDebugUtils.currentLine=23396388; - //BA.debugLineNum = 23396388;BA.debugLine="lv_catalogos.AddSingleLine(\"CATALOGO\")"; -__ref._lv_catalogos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddSingleLine(BA.ObjectToCharSequence("CATALOGO")); -RDebugUtils.currentLine=23396389; - //BA.debugLineNum = 23396389;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"select coun"; -__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)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select count(*) as hayPromos from cat_gunaprod where CAT_GP_TIPOPROD = 'PROMOS'"))); -RDebugUtils.currentLine=23396390; - //BA.debugLineNum = 23396390;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=23396391; - //BA.debugLineNum = 23396391;BA.debugLine="If c.GetInt(\"hayPromos\") > 0 Then"; -if (true) break; - -case 14: -//if -this.state = 17; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetInt("hayPromos")>0) { -this.state = 16; -}if (true) break; - -case 16: -//C -this.state = 17; -RDebugUtils.currentLine=23396392; - //BA.debugLineNum = 23396392;BA.debugLine="lv_catalogos.AddSingleLine(\"PROMOS\")"; -__ref._lv_catalogos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddSingleLine(BA.ObjectToCharSequence("PROMOS")); - if (true) break; - -case 17: -//C -this.state = 18; -; -RDebugUtils.currentLine=23396394; - //BA.debugLineNum = 23396394;BA.debugLine="Sleep(100)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "c_productos", "b4xpage_appear"),(int) (100)); -this.state = 25; -return; -case 25: -//C -this.state = 18; -; -RDebugUtils.currentLine=23396395; - //BA.debugLineNum = 23396395;BA.debugLine="l_total.Visible = False"; -__ref._l_total /*anywheresoftware.b4a.objects.LabelWrapper*/ .setVisible(parent.__c.False); -RDebugUtils.currentLine=23396396; - //BA.debugLineNum = 23396396;BA.debugLine="l_totProds.Visible = False"; -__ref._l_totprods /*anywheresoftware.b4a.objects.LabelWrapper*/ .setVisible(parent.__c.False); -RDebugUtils.currentLine=23396397; - //BA.debugLineNum = 23396397;BA.debugLine="l_total.Left = 5dip"; -__ref._l_total /*anywheresoftware.b4a.objects.LabelWrapper*/ .setLeft(parent.__c.DipToCurrent((int) (5))); -RDebugUtils.currentLine=23396398; - //BA.debugLineNum = 23396398;BA.debugLine="l_totProds.Width = Root.Width * 0.19"; -__ref._l_totprods /*anywheresoftware.b4a.objects.LabelWrapper*/ .setWidth((int) (__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()*0.19)); -RDebugUtils.currentLine=23396399; - //BA.debugLineNum = 23396399;BA.debugLine="l_total.Left = l_totProds.Width + 20"; -__ref._l_total /*anywheresoftware.b4a.objects.LabelWrapper*/ .setLeft((int) (__ref._l_totprods /*anywheresoftware.b4a.objects.LabelWrapper*/ .getWidth()+20)); -RDebugUtils.currentLine=23396400; - //BA.debugLineNum = 23396400;BA.debugLine="l_total.Width = Root.Width * 0.25"; -__ref._l_total /*anywheresoftware.b4a.objects.LabelWrapper*/ .setWidth((int) (__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()*0.25)); -RDebugUtils.currentLine=23396402; - //BA.debugLineNum = 23396402;BA.debugLine="Dim m As Map = Subs.traeTotalesClienteActual"; -_m = new anywheresoftware.b4a.objects.collections.Map(); -_m = parent._subs._traetotalesclienteactual /*anywheresoftware.b4a.objects.collections.Map*/ (ba); -RDebugUtils.currentLine=23396403; - //BA.debugLineNum = 23396403;BA.debugLine="prodsPedidoActual = m.Get(\"productos\")"; -__ref._prodspedidoactual /*String*/ = BA.ObjectToString(_m.Get((Object)("productos"))); -RDebugUtils.currentLine=23396404; - //BA.debugLineNum = 23396404;BA.debugLine="montoPedidoActual = m.Get(\"monto\")"; -__ref._montopedidoactual /*String*/ = BA.ObjectToString(_m.Get((Object)("monto"))); -RDebugUtils.currentLine=23396405; - //BA.debugLineNum = 23396405;BA.debugLine="hayPedido = Subs.hayPedido"; -__ref._haypedido /*boolean*/ = parent._subs._haypedido /*boolean*/ (ba); -RDebugUtils.currentLine=23396407; - //BA.debugLineNum = 23396407;BA.debugLine="If reiniciarlistaProds Then"; -if (true) break; - -case 18: -//if -this.state = 23; -if (__ref._reiniciarlistaprods /*boolean*/ ) { -this.state = 20; -}else -{RDebugUtils.currentLine=23396410; - //BA.debugLineNum = 23396410;BA.debugLine="else If hayPedido Then"; -if (__ref._haypedido /*boolean*/ ) { -this.state = 22; -}} -if (true) break; - -case 20: -//C -this.state = 23; -RDebugUtils.currentLine=23396408; - //BA.debugLineNum = 23396408;BA.debugLine="Log(\"Llamamos LlenaProdsLL\")"; -parent.__c.LogImpl("323396408","Llamamos LlenaProdsLL",0); -RDebugUtils.currentLine=23396409; - //BA.debugLineNum = 23396409;BA.debugLine="LlenaProdsLL(Null)"; -__ref._llenaprodsll /*String*/ (null,(anywheresoftware.b4a.sql.SQL.ResultSetWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(), (android.database.Cursor)(parent.__c.Null))); - if (true) break; - -case 22: -//C -this.state = 23; -RDebugUtils.currentLine=23396412; - //BA.debugLineNum = 23396412;BA.debugLine="Log(\"Llamamos LlenaProdsLL\")"; -parent.__c.LogImpl("323396412","Llamamos LlenaProdsLL",0); -RDebugUtils.currentLine=23396413; - //BA.debugLineNum = 23396413;BA.debugLine="LlenaProdsLL(Null)"; -__ref._llenaprodsll /*String*/ (null,(anywheresoftware.b4a.sql.SQL.ResultSetWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(), (android.database.Cursor)(parent.__c.Null))); - if (true) break; - -case 23: -//C -this.state = -1; -; -RDebugUtils.currentLine=23396415; - //BA.debugLineNum = 23396415;BA.debugLine="clv_prods_ll.JumpToItem(0) 'Vamos al primer artíc"; -__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._jumptoitem((int) (0)); -RDebugUtils.currentLine=23396416; - //BA.debugLineNum = 23396416;BA.debugLine="PCLV.lblHint.SetTextSizeAnimated(0,13)"; -__ref._pclv /*keymon.lat.medicomed.preoptimizedclv*/ ._lblhint /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetTextSizeAnimated((int) (0),(float) (13)); -RDebugUtils.currentLine=23396417; - //BA.debugLineNum = 23396417;BA.debugLine="PCLV.B4XSeekBar1.Color1=Colors.DarkGray"; -__ref._pclv /*keymon.lat.medicomed.preoptimizedclv*/ ._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._color1 /*int*/ = parent.__c.Colors.DarkGray; -RDebugUtils.currentLine=23396418; - //BA.debugLineNum = 23396418;BA.debugLine="PCLV.B4XSeekBar1.Color2=Colors.DarkGray"; -__ref._pclv /*keymon.lat.medicomed.preoptimizedclv*/ ._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._color2 /*int*/ = parent.__c.Colors.DarkGray; -RDebugUtils.currentLine=23396419; - //BA.debugLineNum = 23396419;BA.debugLine="PCLV.B4XSeekBar1.ThumbColor=Colors.red"; -__ref._pclv /*keymon.lat.medicomed.preoptimizedclv*/ ._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._thumbcolor /*int*/ = parent.__c.Colors.Red; -RDebugUtils.currentLine=23396420; - //BA.debugLineNum = 23396420;BA.debugLine="PCLV.B4XSeekBar1.mBase.Left=Root.Width *0.91"; -__ref._pclv /*keymon.lat.medicomed.preoptimizedclv*/ ._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setLeft((int) (__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()*0.91)); -RDebugUtils.currentLine=23396422; - //BA.debugLineNum = 23396422;BA.debugLine="PCLV.B4XSeekBar1.mBase.Height=clv_prods_ll.AsView"; -__ref._pclv /*keymon.lat.medicomed.preoptimizedclv*/ ._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setHeight(__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._asview().getHeight()); -RDebugUtils.currentLine=23396423; - //BA.debugLineNum = 23396423;BA.debugLine="PCLV.pnlOverlay.Height = clv_prods_ll.AsView.Heig"; -__ref._pclv /*keymon.lat.medicomed.preoptimizedclv*/ ._pnloverlay /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setHeight(__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._asview().getHeight()); -RDebugUtils.currentLine=23396424; - //BA.debugLineNum = 23396424;BA.debugLine="PCLV.B4XSeekBar1.Update"; -__ref._pclv /*keymon.lat.medicomed.preoptimizedclv*/ ._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._update /*String*/ (null); -RDebugUtils.currentLine=23396425; - //BA.debugLineNum = 23396425;BA.debugLine="End Sub"; -if (true) break; - - } - } - } -} -public String _b_rechazar_click(keymon.lat.medicomed.c_productos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "b_rechazar_click", false)) - {return ((String) Debug.delegate(ba, "b_rechazar_click", null));} -RDebugUtils.currentLine=24903680; - //BA.debugLineNum = 24903680;BA.debugLine="Private Sub b_rechazar_Click"; -RDebugUtils.currentLine=24903681; - //BA.debugLineNum = 24903681;BA.debugLine="If folio <> \"\" Then"; -if ((__ref._folio /*String*/ ).equals("") == false) { -RDebugUtils.currentLine=24903682; - //BA.debugLineNum = 24903682;BA.debugLine="result = Msgbox2($\"Seguro que desea borrar el p"; -__ref._result /*String*/ = BA.NumberToString(__c.Msgbox2(BA.ObjectToCharSequence(("Seguro que desea borrar el pedido completo?"+__c.SmartStringFormatter("",(Object)(__c.CRLF))+"Haciendo clic largo sobre un producto se pueden borrar articulos independientes.")),BA.ObjectToCharSequence("Rechazar Pedido"),"Si","","No",(android.graphics.Bitmap)(__c.LoadBitmap(__c.File.getDirAssets(),"alert2.png").getObject()),ba)); -RDebugUtils.currentLine=24903683; - //BA.debugLineNum = 24903683;BA.debugLine="If result = DialogResponse.POSITIVE Then"; -if ((__ref._result /*String*/ ).equals(BA.NumberToString(__c.DialogResponse.POSITIVE))) { -RDebugUtils.currentLine=24903684; - //BA.debugLineNum = 24903684;BA.debugLine="Subs.borraPedidoClienteActual"; -_subs._borrapedidoclienteactual /*String*/ (ba); -RDebugUtils.currentLine=24903685; - //BA.debugLineNum = 24903685;BA.debugLine="prodsMap.Initialize"; -__ref._prodsmap /*anywheresoftware.b4a.objects.collections.Map*/ .Initialize(); -RDebugUtils.currentLine=24903686; - //BA.debugLineNum = 24903686;BA.debugLine="B4XPages.MainPage.promos.promosMap.Initialize"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._promos /*keymon.lat.medicomed.c_promos*/ ._promosmap /*anywheresoftware.b4a.objects.collections.Map*/ .Initialize(); -RDebugUtils.currentLine=24903687; - //BA.debugLineNum = 24903687;BA.debugLine="Log(\"Llamamos LlenaProdsLL\")"; -__c.LogImpl("324903687","Llamamos LlenaProdsLL",0); -RDebugUtils.currentLine=24903688; - //BA.debugLineNum = 24903688;BA.debugLine="LlenaProdsLL(Null)"; -__ref._llenaprodsll /*String*/ (null,(anywheresoftware.b4a.sql.SQL.ResultSetWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(), (android.database.Cursor)(__c.Null))); -RDebugUtils.currentLine=24903689; - //BA.debugLineNum = 24903689;BA.debugLine="Log(\"Positivo\")"; -__c.LogImpl("324903689","Positivo",0); -RDebugUtils.currentLine=24903690; - //BA.debugLineNum = 24903690;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; -_b4xpages._showpage /*String*/ (ba,"Cliente"); - }else { -RDebugUtils.currentLine=24903692; - //BA.debugLineNum = 24903692;BA.debugLine="Log(\"NO Positivo\")"; -__c.LogImpl("324903692","NO Positivo",0); -RDebugUtils.currentLine=24903693; - //BA.debugLineNum = 24903693;BA.debugLine="p_vistaPreviaTrans.Visible = False"; -__ref._p_vistapreviatrans /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); - }; - }else { -RDebugUtils.currentLine=24903696; - //BA.debugLineNum = 24903696;BA.debugLine="Msgbox(\"CLIENTE YA SE TRANSMITIO, FAVOR DE LLAMA"; -__c.Msgbox(BA.ObjectToCharSequence("CLIENTE YA SE TRANSMITIO, FAVOR DE LLAMAR A SOPORTE PARA ASISTENCIA"),BA.ObjectToCharSequence("AVISO"),ba); - }; -RDebugUtils.currentLine=24903698; - //BA.debugLineNum = 24903698;BA.debugLine="p_vistaPreviaTrans.Visible=False"; -__ref._p_vistapreviatrans /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=24903699; - //BA.debugLineNum = 24903699;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; -_b4xpages._showpage /*String*/ (ba,"Cliente"); -RDebugUtils.currentLine=24903700; - //BA.debugLineNum = 24903700;BA.debugLine="End Sub"; +public String _llenacatalogo(String _subtipo1) throws Exception{ + //BA.debugLineNum = 350;BA.debugLine="Sub llenaCatalogo(subtipo1 As String)"; + //BA.debugLineNum = 373;BA.debugLine="End Sub"; return ""; } -public String _llenaprodsll(keymon.lat.medicomed.c_productos __ref,anywheresoftware.b4a.sql.SQL.ResultSetWrapper _p) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "llenaprodsll", false)) - {return ((String) Debug.delegate(ba, "llenaprodsll", new Object[] {_p}));} +public String _llenaprodsll(anywheresoftware.b4a.sql.SQL.ResultSetWrapper _p) throws Exception{ anywheresoftware.b4a.objects.collections.Map _cantsmap = null; anywheresoftware.b4a.sql.SQL.ResultSetWrapper _pe = null; int _cant = 0; @@ -1012,1302 +1399,248 @@ int _cont = 0; int _pr0 = 0; anywheresoftware.b4a.objects.B4XViewWrapper _pnl = null; int _pr = 0; -RDebugUtils.currentLine=25362432; - //BA.debugLineNum = 25362432;BA.debugLine="Sub LlenaProdsLL(p As ResultSet)"; -RDebugUtils.currentLine=25362434; - //BA.debugLineNum = 25362434;BA.debugLine="listaProds.Initialize"; -__ref._listaprods /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=25362435; - //BA.debugLineNum = 25362435;BA.debugLine="If hayPedido Then 'Si hay pedido obtenemos las ca"; -if (__ref._haypedido /*boolean*/ ) { -RDebugUtils.currentLine=25362436; - //BA.debugLineNum = 25362436;BA.debugLine="Dim cantsMap As Map"; + //BA.debugLineNum = 888;BA.debugLine="Sub LlenaProdsLL(p As ResultSet)"; + //BA.debugLineNum = 890;BA.debugLine="listaProds.Initialize"; +_listaprods.Initialize(); + //BA.debugLineNum = 891;BA.debugLine="If hayPedido Then 'Si hay pedido obtenemos las ca"; +if (_haypedido) { + //BA.debugLineNum = 892;BA.debugLine="Dim cantsMap As Map"; _cantsmap = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=25362437; - //BA.debugLineNum = 25362437;BA.debugLine="cantsMap.Initialize"; + //BA.debugLineNum = 893;BA.debugLine="cantsMap.Initialize"; _cantsmap.Initialize(); -RDebugUtils.currentLine=25362438; - //BA.debugLineNum = 25362438;BA.debugLine="Dim pe As ResultSet = B4XPages.MainPage.skmt.Exe"; + //BA.debugLineNum = 894;BA.debugLine="Dim pe As ResultSet = B4XPages.MainPage.skmt.Exe"; _pe = new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(); -_pe = (anywheresoftware.b4a.sql.SQL.ResultSetWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(), (android.database.Cursor)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select PE_PROID, PE_CANT from PEDIDO where PE_CLIENTE = '"+__c.SmartStringFormatter("",(Object)(__ref._clienteid /*String*/ ))+"' and PE_CEDIS = '"+__c.SmartStringFormatter("",(Object)(_subs._traealmacen /*String*/ (ba)))+"'")))); -RDebugUtils.currentLine=25362440; - //BA.debugLineNum = 25362440;BA.debugLine="Do While pe.NextRow"; +_pe = (anywheresoftware.b4a.sql.SQL.ResultSetWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(), (android.database.Cursor)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select PE_PROID, PE_CANT from PEDIDO where PE_CLIENTE = '"+__c.SmartStringFormatter("",(Object)(_clienteid))+"' and PE_CEDIS = '"+__c.SmartStringFormatter("",(Object)(_subs._traealmacen /*String*/ (ba)))+"'")))); + //BA.debugLineNum = 896;BA.debugLine="Do While pe.NextRow"; while (_pe.NextRow()) { -RDebugUtils.currentLine=25362441; - //BA.debugLineNum = 25362441;BA.debugLine="Private cant As Int = 0"; + //BA.debugLineNum = 897;BA.debugLine="Private cant As Int = 0"; _cant = (int) (0); -RDebugUtils.currentLine=25362442; - //BA.debugLineNum = 25362442;BA.debugLine="cantsMap.put(pe.GetString(\"PE_PROID\"), pe.GetSt"; + //BA.debugLineNum = 898;BA.debugLine="cantsMap.put(pe.GetString(\"PE_PROID\"), pe.GetSt"; _cantsmap.Put((Object)(_pe.GetString("PE_PROID")),(Object)(_pe.GetString("PE_CANT"))); } ; -RDebugUtils.currentLine=25362444; - //BA.debugLineNum = 25362444;BA.debugLine="pe.Close"; + //BA.debugLineNum = 900;BA.debugLine="pe.Close"; _pe.Close(); }; -RDebugUtils.currentLine=25362447; - //BA.debugLineNum = 25362447;BA.debugLine="If p.IsInitialized Then"; + //BA.debugLineNum = 903;BA.debugLine="If p.IsInitialized Then"; if (_p.IsInitialized()) { }else { -RDebugUtils.currentLine=25362451; - //BA.debugLineNum = 25362451;BA.debugLine="Dim p As ResultSet = B4XPages.MainPage.skmt.Exec"; + //BA.debugLineNum = 907;BA.debugLine="Dim p As ResultSet = B4XPages.MainPage.skmt.Exec"; _p = new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(); _p = (anywheresoftware.b4a.sql.SQL.ResultSetWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(), (android.database.Cursor)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select CAT_GP_ID, CAT_GP_NOMBRE, CAT_GP_ALMACEN, CAT_GP_PRECIO, CAT_GP_TIPOPROD from CAT_GUNAPROD where CAT_GP_PRECIO > 0 And CAT_GP_ALMACEN > 0 And CAT_GP_CLASIF <> 'PROMOS' And CAT_GP_TIPOPROD2 <> '2' order by CAT_GP_NOMBRE")))); }; -RDebugUtils.currentLine=25362454; - //BA.debugLineNum = 25362454;BA.debugLine="Do While p.NextRow"; + //BA.debugLineNum = 910;BA.debugLine="Do While p.NextRow"; while (_p.NextRow()) { -RDebugUtils.currentLine=25362455; - //BA.debugLineNum = 25362455;BA.debugLine="Private cant As Int = 0"; + //BA.debugLineNum = 911;BA.debugLine="Private cant As Int = 0"; _cant = (int) (0); -RDebugUtils.currentLine=25362456; - //BA.debugLineNum = 25362456;BA.debugLine="If hayPedido And cantsMap.ContainsKey(p.GetStrin"; -if (__ref._haypedido /*boolean*/ && _cantsmap.ContainsKey((Object)(_p.GetString("CAT_GP_ID")))) { + //BA.debugLineNum = 912;BA.debugLine="If hayPedido And cantsMap.ContainsKey(p.GetStrin"; +if (_haypedido && _cantsmap.ContainsKey((Object)(_p.GetString("CAT_GP_ID")))) { _cant = (int)(BA.ObjectToNumber(_cantsmap.Get((Object)(_p.GetString("CAT_GP_ID")))));}; -RDebugUtils.currentLine=25362457; - //BA.debugLineNum = 25362457;BA.debugLine="Dim tempMap As Map = CreateMap(\"prod\":p.GetStrin"; + //BA.debugLineNum = 913;BA.debugLine="Dim tempMap As Map = CreateMap(\"prod\":p.GetStrin"; _tempmap = new anywheresoftware.b4a.objects.collections.Map(); _tempmap = __c.createMap(new Object[] {(Object)("prod"),(Object)(_p.GetString("CAT_GP_NOMBRE")),(Object)("precio"),(Object)(_p.GetString("CAT_GP_PRECIO")),(Object)("almacen"),(Object)(_p.GetString("CAT_GP_ALMACEN")),(Object)("id"),(Object)(_p.GetString("CAT_GP_ID")),(Object)("cant"),(Object)(_cant)}); -RDebugUtils.currentLine=25362458; - //BA.debugLineNum = 25362458;BA.debugLine="listaProds.Add(tempMap)"; -__ref._listaprods /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(_tempmap.getObject())); + //BA.debugLineNum = 914;BA.debugLine="listaProds.Add(tempMap)"; +_listaprods.Add((Object)(_tempmap.getObject())); } ; -RDebugUtils.currentLine=25362460; - //BA.debugLineNum = 25362460;BA.debugLine="p.Close"; + //BA.debugLineNum = 916;BA.debugLine="p.Close"; _p.Close(); -RDebugUtils.currentLine=25362462; - //BA.debugLineNum = 25362462;BA.debugLine="PCLV.Commit"; -__ref._pclv /*keymon.lat.medicomed.preoptimizedclv*/ ._commit /*String*/ (null); -RDebugUtils.currentLine=25362463; - //BA.debugLineNum = 25362463;BA.debugLine="clv_prods_ll.Clear"; -__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._clear(); -RDebugUtils.currentLine=25362464; - //BA.debugLineNum = 25362464;BA.debugLine="Private listaProdsConCant, listaProdsConCantIndex"; + //BA.debugLineNum = 918;BA.debugLine="PCLV.Commit"; +_pclv._commit /*String*/ (); + //BA.debugLineNum = 919;BA.debugLine="clv_prods_ll.Clear"; +_clv_prods_ll._clear(); + //BA.debugLineNum = 920;BA.debugLine="Private listaProdsConCant, listaProdsConCantIndex"; _listaprodsconcant = new anywheresoftware.b4a.objects.collections.List(); _listaprodsconcantindex = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=25362465; - //BA.debugLineNum = 25362465;BA.debugLine="listaProdsConCant.Initialize"; + //BA.debugLineNum = 921;BA.debugLine="listaProdsConCant.Initialize"; _listaprodsconcant.Initialize(); -RDebugUtils.currentLine=25362466; - //BA.debugLineNum = 25362466;BA.debugLine="listaProdsConCantIndex.Initialize"; + //BA.debugLineNum = 922;BA.debugLine="listaProdsConCantIndex.Initialize"; _listaprodsconcantindex.Initialize(); -RDebugUtils.currentLine=25362467; - //BA.debugLineNum = 25362467;BA.debugLine="listaHints.Initialize"; -__ref._listahints /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=25362468; - //BA.debugLineNum = 25362468;BA.debugLine="For q=0 To listaProds.Size-1' Sacamos los product"; + //BA.debugLineNum = 923;BA.debugLine="listaHints.Initialize"; +_listahints.Initialize(); + //BA.debugLineNum = 924;BA.debugLine="For q=0 To listaProds.Size-1' Sacamos los product"; { final int step29 = 1; -final int limit29 = (int) (__ref._listaprods /*anywheresoftware.b4a.objects.collections.List*/ .getSize()-1); +final int limit29 = (int) (_listaprods.getSize()-1); _q = (int) (0) ; for (;_q <= limit29 ;_q = _q + step29 ) { -RDebugUtils.currentLine=25362469; - //BA.debugLineNum = 25362469;BA.debugLine="If listaProds.Get(q).As(Map).Get(\"cant\").As(Int)"; -if (((int)(BA.ObjectToNumber(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(__ref._listaprods /*anywheresoftware.b4a.objects.collections.List*/ .Get(_q)))).Get((Object)("cant")))))!=0) { -RDebugUtils.currentLine=25362471; - //BA.debugLineNum = 25362471;BA.debugLine="listaProdsConCant.Add(listaProds.Get(q))"; -_listaprodsconcant.Add(__ref._listaprods /*anywheresoftware.b4a.objects.collections.List*/ .Get(_q)); -RDebugUtils.currentLine=25362472; - //BA.debugLineNum = 25362472;BA.debugLine="listaProdsConCantIndex.Add(q)"; + //BA.debugLineNum = 925;BA.debugLine="If listaProds.Get(q).As(Map).Get(\"cant\").As(Int)"; +if (((int)(BA.ObjectToNumber(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_listaprods.Get(_q)))).Get((Object)("cant")))))!=0) { + //BA.debugLineNum = 927;BA.debugLine="listaProdsConCant.Add(listaProds.Get(q))"; +_listaprodsconcant.Add(_listaprods.Get(_q)); + //BA.debugLineNum = 928;BA.debugLine="listaProdsConCantIndex.Add(q)"; _listaprodsconcantindex.Add((Object)(_q)); }; } }; -RDebugUtils.currentLine=25362476; - //BA.debugLineNum = 25362476;BA.debugLine="Private cont As Int = 0"; + //BA.debugLineNum = 932;BA.debugLine="Private cont As Int = 0"; _cont = (int) (0); -RDebugUtils.currentLine=25362477; - //BA.debugLineNum = 25362477;BA.debugLine="For pr0=0 To listaProdsConCant.Size - 1 'Agregamo"; + //BA.debugLineNum = 933;BA.debugLine="For pr0=0 To listaProdsConCant.Size - 1 'Agregamo"; { final int step36 = 1; final int limit36 = (int) (_listaprodsconcant.getSize()-1); _pr0 = (int) (0) ; for (;_pr0 <= limit36 ;_pr0 = _pr0 + step36 ) { -RDebugUtils.currentLine=25362478; - //BA.debugLineNum = 25362478;BA.debugLine="Private Pnl As B4XView = xui.CreatePanel(\"\")"; + //BA.debugLineNum = 934;BA.debugLine="Private Pnl As B4XView = xui.CreatePanel(\"\")"; _pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_pnl = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,""); -RDebugUtils.currentLine=25362479; - //BA.debugLineNum = 25362479;BA.debugLine="Pnl.SetLayoutAnimated(0, 0, 0, clv_prods_ll.AsVi"; -_pnl.SetLayoutAnimated((int) (0),(int) (0),(int) (0),__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._asview().getWidth(),__c.DipToCurrent((int) (50))); -RDebugUtils.currentLine=25362480; - //BA.debugLineNum = 25362480;BA.debugLine="clv_prods_ll.Add(Pnl, listaProdsConCant.Get(pr0)"; -__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._add(_pnl,_listaprodsconcant.Get(_pr0)); -RDebugUtils.currentLine=25362481; - //BA.debugLineNum = 25362481;BA.debugLine="listaHints.Add(listaProdsConCant.get(pr0).As(Map"; -__ref._listahints /*anywheresoftware.b4a.objects.collections.List*/ .Add(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_listaprodsconcant.Get(_pr0)))).Get((Object)("prod"))); -RDebugUtils.currentLine=25362482; - //BA.debugLineNum = 25362482;BA.debugLine="cont = cont + 1"; +_pnl = _xui.CreatePanel(ba,""); + //BA.debugLineNum = 935;BA.debugLine="Pnl.SetLayoutAnimated(0, 0, 0, clv_prods_ll.AsVi"; +_pnl.SetLayoutAnimated((int) (0),(int) (0),(int) (0),_clv_prods_ll._asview().getWidth(),__c.DipToCurrent((int) (50))); + //BA.debugLineNum = 936;BA.debugLine="clv_prods_ll.Add(Pnl, listaProdsConCant.Get(pr0)"; +_clv_prods_ll._add(_pnl,_listaprodsconcant.Get(_pr0)); + //BA.debugLineNum = 937;BA.debugLine="listaHints.Add(listaProdsConCant.get(pr0).As(Map"; +_listahints.Add(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_listaprodsconcant.Get(_pr0)))).Get((Object)("prod"))); + //BA.debugLineNum = 938;BA.debugLine="cont = cont + 1"; _cont = (int) (_cont+1); } }; -RDebugUtils.currentLine=25362486; - //BA.debugLineNum = 25362486;BA.debugLine="For pr=0 To listaProds.Size-1"; + //BA.debugLineNum = 942;BA.debugLine="For pr=0 To listaProds.Size-1"; { final int step43 = 1; -final int limit43 = (int) (__ref._listaprods /*anywheresoftware.b4a.objects.collections.List*/ .getSize()-1); +final int limit43 = (int) (_listaprods.getSize()-1); _pr = (int) (0) ; for (;_pr <= limit43 ;_pr = _pr + step43 ) { -RDebugUtils.currentLine=25362487; - //BA.debugLineNum = 25362487;BA.debugLine="If listaProdsConCantIndex.IndexOf(pr) = -1 Then"; + //BA.debugLineNum = 943;BA.debugLine="If listaProdsConCantIndex.IndexOf(pr) = -1 Then"; if (_listaprodsconcantindex.IndexOf((Object)(_pr))==-1) { -RDebugUtils.currentLine=25362488; - //BA.debugLineNum = 25362488;BA.debugLine="Private Pnl As B4XView = xui.CreatePanel(\"\")"; + //BA.debugLineNum = 944;BA.debugLine="Private Pnl As B4XView = xui.CreatePanel(\"\")"; _pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_pnl = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,""); -RDebugUtils.currentLine=25362489; - //BA.debugLineNum = 25362489;BA.debugLine="Pnl.SetLayoutAnimated(0, 0, 0, clv_prods_ll.AsV"; -_pnl.SetLayoutAnimated((int) (0),(int) (0),(int) (0),__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._asview().getWidth(),__c.DipToCurrent((int) (50))); -RDebugUtils.currentLine=25362490; - //BA.debugLineNum = 25362490;BA.debugLine="clv_prods_ll.Add(Pnl, listaProds.Get(pr))"; -__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._add(_pnl,__ref._listaprods /*anywheresoftware.b4a.objects.collections.List*/ .Get(_pr)); -RDebugUtils.currentLine=25362491; - //BA.debugLineNum = 25362491;BA.debugLine="listaHints.Add(listaProds.get(pr).As(Map).Get(\""; -__ref._listahints /*anywheresoftware.b4a.objects.collections.List*/ .Add(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(__ref._listaprods /*anywheresoftware.b4a.objects.collections.List*/ .Get(_pr)))).Get((Object)("prod"))); -RDebugUtils.currentLine=25362492; - //BA.debugLineNum = 25362492;BA.debugLine="cont = cont + 1"; +_pnl = _xui.CreatePanel(ba,""); + //BA.debugLineNum = 945;BA.debugLine="Pnl.SetLayoutAnimated(0, 0, 0, clv_prods_ll.AsV"; +_pnl.SetLayoutAnimated((int) (0),(int) (0),(int) (0),_clv_prods_ll._asview().getWidth(),__c.DipToCurrent((int) (50))); + //BA.debugLineNum = 946;BA.debugLine="clv_prods_ll.Add(Pnl, listaProds.Get(pr))"; +_clv_prods_ll._add(_pnl,_listaprods.Get(_pr)); + //BA.debugLineNum = 947;BA.debugLine="listaHints.Add(listaProds.get(pr).As(Map).Get(\""; +_listahints.Add(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_listaprods.Get(_pr)))).Get((Object)("prod"))); + //BA.debugLineNum = 948;BA.debugLine="cont = cont + 1"; _cont = (int) (_cont+1); }; } }; -RDebugUtils.currentLine=25362499; - //BA.debugLineNum = 25362499;BA.debugLine="PCLV.B4XSeekBar1.MaxValue = clv_prods_ll.Size"; -__ref._pclv /*keymon.lat.medicomed.preoptimizedclv*/ ._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._maxvalue /*int*/ = __ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getsize(); -RDebugUtils.currentLine=25362500; - //BA.debugLineNum = 25362500;BA.debugLine="PCLV.B4XSeekBar1.MinValue = 0"; -__ref._pclv /*keymon.lat.medicomed.preoptimizedclv*/ ._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._minvalue /*int*/ = (int) (0); -RDebugUtils.currentLine=25362501; - //BA.debugLineNum = 25362501;BA.debugLine="PCLV.B4XSeekBar1.Interval = clv_prods_ll.Size/20"; -__ref._pclv /*keymon.lat.medicomed.preoptimizedclv*/ ._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._interval /*int*/ = (int) (__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getsize()/(double)20); -RDebugUtils.currentLine=25362502; - //BA.debugLineNum = 25362502;BA.debugLine="PCLV.B4XSeekBar1.Value = clv_prods_ll.Size"; -__ref._pclv /*keymon.lat.medicomed.preoptimizedclv*/ ._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._setvalue /*int*/ (null,__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getsize()); -RDebugUtils.currentLine=25362503; - //BA.debugLineNum = 25362503;BA.debugLine="PCLV.B4XSeekBar1.Update"; -__ref._pclv /*keymon.lat.medicomed.preoptimizedclv*/ ._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._update /*String*/ (null); -RDebugUtils.currentLine=25362505; - //BA.debugLineNum = 25362505;BA.debugLine="reiniciarlistaProds = False"; -__ref._reiniciarlistaprods /*boolean*/ = __c.False; -RDebugUtils.currentLine=25362506; - //BA.debugLineNum = 25362506;BA.debugLine="End Sub"; -return ""; -} -public String _b_terminar1_click(keymon.lat.medicomed.c_productos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "b_terminar1_click", false)) - {return ((String) Debug.delegate(ba, "b_terminar1_click", null));} -anywheresoftware.b4a.sql.SQL.CursorWrapper _c_prods = null; -anywheresoftware.b4a.objects.CSBuilder _cs = null; -int _i = 0; -anywheresoftware.b4a.objects.LabelWrapper _label1 = null; -int _textcolor = 0; -anywheresoftware.b4a.objects.LabelWrapper _label2 = null; -RDebugUtils.currentLine=24313856; - //BA.debugLineNum = 24313856;BA.debugLine="Sub b_terminar1_Click"; -RDebugUtils.currentLine=24313859; - //BA.debugLineNum = 24313859;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete from"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("delete from PEDIDO WHERE PE_PRONOMBRE = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("N/A")})); -RDebugUtils.currentLine=24313861; - //BA.debugLineNum = 24313861;BA.debugLine="lv_promos.Visible = False"; -__ref._lv_promos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=24313862; - //BA.debugLineNum = 24313862;BA.debugLine="clv_prods_ll.AsView.Visible = False"; -__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._asview().setVisible(__c.False); -RDebugUtils.currentLine=24313863; - //BA.debugLineNum = 24313863;BA.debugLine="lv_catalogos.Visible = True"; -__ref._lv_catalogos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=24313864; - //BA.debugLineNum = 24313864;BA.debugLine="lv_prodsPedido.Clear"; -__ref._lv_prodspedido /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear(); -RDebugUtils.currentLine=24313866; - //BA.debugLineNum = 24313866;BA.debugLine="Private c_prods As Cursor=B4XPages.MainPage.skmt."; -_c_prods = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -_c_prods = (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 PE_PRONOMBRE,PE_COSTO_TOT, PE_CANT, PE_FOLIO, PE_CEDIS FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa) order by PE_CEDIS, PE_PRONOMBRE"))); -RDebugUtils.currentLine=24313867; - //BA.debugLineNum = 24313867;BA.debugLine="If c_prods.RowCount > 0 Then"; -if (_c_prods.getRowCount()>0) { -RDebugUtils.currentLine=24313868; - //BA.debugLineNum = 24313868;BA.debugLine="Private cs As CSBuilder"; -_cs = new anywheresoftware.b4a.objects.CSBuilder(); -RDebugUtils.currentLine=24313869; - //BA.debugLineNum = 24313869;BA.debugLine="For i=0 To c_prods.RowCount -1"; -{ -final int step9 = 1; -final int limit9 = (int) (_c_prods.getRowCount()-1); -_i = (int) (0) ; -for (;_i <= limit9 ;_i = _i + step9 ) { -RDebugUtils.currentLine=24313870; - //BA.debugLineNum = 24313870;BA.debugLine="cs.Initialize"; -_cs.Initialize(); -RDebugUtils.currentLine=24313871; - //BA.debugLineNum = 24313871;BA.debugLine="c_prods.Position=i"; -_c_prods.setPosition(_i); -RDebugUtils.currentLine=24313872; - //BA.debugLineNum = 24313872;BA.debugLine="Dim label1 As Label"; -_label1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=24313873; - //BA.debugLineNum = 24313873;BA.debugLine="label1 = lv_prodsPedido.TwoLinesLayout.Label"; -_label1 = __ref._lv_prodspedido /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().Label; -RDebugUtils.currentLine=24313874; - //BA.debugLineNum = 24313874;BA.debugLine="label1.TextSize = 15"; -_label1.setTextSize((float) (15)); -RDebugUtils.currentLine=24313875; - //BA.debugLineNum = 24313875;BA.debugLine="label1.TextColor = Colors.Black"; -_label1.setTextColor(__c.Colors.Black); -RDebugUtils.currentLine=24313876; - //BA.debugLineNum = 24313876;BA.debugLine="label1.color = Colors.White"; -_label1.setColor(__c.Colors.White); -RDebugUtils.currentLine=24313877; - //BA.debugLineNum = 24313877;BA.debugLine="Private textColor As Int = Colors.black"; -_textcolor = __c.Colors.Black; -RDebugUtils.currentLine=24313878; - //BA.debugLineNum = 24313878;BA.debugLine="If Not(IsNumber(c_prods.GetString(\"PE_CEDIS\")))"; -if (__c.Not(__c.IsNumber(_c_prods.GetString("PE_CEDIS")))) { -_textcolor = __c.Colors.RGB((int) (210),(int) (105),(int) (30));}; -RDebugUtils.currentLine=24313880; - //BA.debugLineNum = 24313880;BA.debugLine="Dim label2 As Label"; -_label2 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=24313881; - //BA.debugLineNum = 24313881;BA.debugLine="label2 = lv_prodsPedido.TwoLinesLayout.SecondLa"; -_label2 = __ref._lv_prodspedido /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().SecondLabel; -RDebugUtils.currentLine=24313882; - //BA.debugLineNum = 24313882;BA.debugLine="label2.TextSize = 15"; -_label2.setTextSize((float) (15)); -RDebugUtils.currentLine=24313883; - //BA.debugLineNum = 24313883;BA.debugLine="label2.TextColor = Colors.Blue"; -_label2.setTextColor(__c.Colors.Blue); -RDebugUtils.currentLine=24313884; - //BA.debugLineNum = 24313884;BA.debugLine="lv_prodsPedido.AddTwoLines(cs.Color(textColor)."; -__ref._lv_prodspedido /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddTwoLines(BA.ObjectToCharSequence(_cs.Color(_textcolor).Append(BA.ObjectToCharSequence(_c_prods.GetString("PE_PRONOMBRE"))).Pop().getObject()),BA.ObjectToCharSequence("Cantidad #"+_c_prods.GetString("PE_CANT")+" SubTotal $"+_c_prods.GetString("PE_COSTO_TOT")+" Folio "+_c_prods.GetString("PE_FOLIO"))); -RDebugUtils.currentLine=24313885; - //BA.debugLineNum = 24313885;BA.debugLine="folio = c_prods.GetString(\"PE_FOLIO\")"; -__ref._folio /*String*/ = _c_prods.GetString("PE_FOLIO"); - } -}; -RDebugUtils.currentLine=24313888; - //BA.debugLineNum = 24313888;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(P"; -__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 sum(PE_CANT) as PC_NOART, sum (PE_COSTO_TOT) as PC_MONTO from PEDIDO where PE_CLIENTE in (Select CUENTA from cuentaa) AND PE_PROID NOT IN (SELECT CAT_PA_ID FROM PROMOS_COMP )"))); -RDebugUtils.currentLine=24313889; - //BA.debugLineNum = 24313889;BA.debugLine="C.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=24313890; - //BA.debugLineNum = 24313890;BA.debugLine="l_cant.Text = c.GetString(\"PC_NOART\")"; -__ref._l_cant /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_NOART"))); -RDebugUtils.currentLine=24313891; - //BA.debugLineNum = 24313891;BA.debugLine="l_total2.Text = c.GetString(\"PC_MONTO\")"; -__ref._l_total2 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_MONTO"))); -RDebugUtils.currentLine=24313892; - //BA.debugLineNum = 24313892;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); - }; -RDebugUtils.currentLine=24313894; - //BA.debugLineNum = 24313894;BA.debugLine="c_prods.Close"; -_c_prods.Close(); -RDebugUtils.currentLine=24313895; - //BA.debugLineNum = 24313895;BA.debugLine="p_vistaPreviaTrans.Width = Root.Width"; -__ref._p_vistapreviatrans /*anywheresoftware.b4a.objects.PanelWrapper*/ .setWidth(__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()); -RDebugUtils.currentLine=24313896; - //BA.debugLineNum = 24313896;BA.debugLine="Subs.centraPanel(p_vistaPrevia, Root.Width)"; -_subs._centrapanel /*String*/ (ba,__ref._p_vistaprevia /*anywheresoftware.b4a.objects.PanelWrapper*/ ,__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()); -RDebugUtils.currentLine=24313897; - //BA.debugLineNum = 24313897;BA.debugLine="If Subs.pedidoGuardado Then b_rechazar.Enabled ="; -if (_subs._pedidoguardado /*boolean*/ (ba)) { -__ref._b_rechazar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setEnabled(__c.False);} -else { -__ref._b_rechazar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setEnabled(__c.True);}; -RDebugUtils.currentLine=24313898; - //BA.debugLineNum = 24313898;BA.debugLine="p_vistaPrevia.Visible=True"; -__ref._p_vistaprevia /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=24313899; - //BA.debugLineNum = 24313899;BA.debugLine="p_vistaPreviaTrans.Visible=True"; -__ref._p_vistapreviatrans /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=24313900; - //BA.debugLineNum = 24313900;BA.debugLine="End Sub"; -return ""; -} -public anywheresoftware.b4a.keywords.Common.ResumableSubWrapper _b4xpage_closerequest(keymon.lat.medicomed.c_productos __ref) throws Exception{ -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "b4xpage_closerequest", false)) - {return ((anywheresoftware.b4a.keywords.Common.ResumableSubWrapper) Debug.delegate(ba, "b4xpage_closerequest", null));} -ResumableSub_B4XPage_CloseRequest rsub = new ResumableSub_B4XPage_CloseRequest(this,__ref); -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.c_productos parent,keymon.lat.medicomed.c_productos __ref) { -this.parent = parent; -this.__ref = __ref; -this.__ref = parent; -} -keymon.lat.medicomed.c_productos __ref; -keymon.lat.medicomed.c_productos parent; - -@Override -public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="c_productos"; - - while (true) { - switch (state) { - case -1: -{ -parent.__c.ReturnFromResumableSub(this,null);return;} -case 0: -//C -this.state = 1; -RDebugUtils.currentLine=23789571; - //BA.debugLineNum = 23789571;BA.debugLine="If l_info.Visible Then"; -if (true) break; - -case 1: -//if -this.state = 16; -if (__ref._l_info /*anywheresoftware.b4a.objects.LabelWrapper*/ .getVisible()) { -this.state = 3; -}else -{RDebugUtils.currentLine=23789574; - //BA.debugLineNum = 23789574;BA.debugLine="else if p_vistaPreviaTrans.Visible Then"; -if (__ref._p_vistapreviatrans /*anywheresoftware.b4a.objects.PanelWrapper*/ .getVisible()) { -this.state = 5; -}else -{RDebugUtils.currentLine=23789577; - //BA.debugLineNum = 23789577;BA.debugLine="else if lv_promos.visible Then"; -if (__ref._lv_promos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getVisible()) { -this.state = 7; -}else -{RDebugUtils.currentLine=23789584; - //BA.debugLineNum = 23789584;BA.debugLine="else if clv_prods_ll.AsView.Visible Then"; -if (__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._asview().getVisible()) { -this.state = 9; -}else -{RDebugUtils.currentLine=23789603; - //BA.debugLineNum = 23789603;BA.debugLine="else If entro = \"4\" Then"; -if ((__ref._entro /*String*/ ).equals("4")) { -this.state = 11; -}else -{RDebugUtils.currentLine=23789607; - //BA.debugLineNum = 23789607;BA.debugLine="Else If entro = \"3\" Then"; -if ((__ref._entro /*String*/ ).equals("3")) { -this.state = 13; -}else { -this.state = 15; -}}}}}} -if (true) break; - -case 3: -//C -this.state = 16; -RDebugUtils.currentLine=23789572; - //BA.debugLineNum = 23789572;BA.debugLine="l_info.Visible = False"; -__ref._l_info /*anywheresoftware.b4a.objects.LabelWrapper*/ .setVisible(parent.__c.False); -RDebugUtils.currentLine=23789573; - //BA.debugLineNum = 23789573;BA.debugLine="Return False"; -if (true) { -parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.False));return;}; - if (true) break; - -case 5: -//C -this.state = 16; -RDebugUtils.currentLine=23789575; - //BA.debugLineNum = 23789575;BA.debugLine="p_vistaPreviaTrans.Visible = False"; -__ref._p_vistapreviatrans /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(parent.__c.False); -RDebugUtils.currentLine=23789576; - //BA.debugLineNum = 23789576;BA.debugLine="Return False"; -if (true) { -parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.False));return;}; - if (true) break; - -case 7: -//C -this.state = 16; -RDebugUtils.currentLine=23789578; - //BA.debugLineNum = 23789578;BA.debugLine="lv_promos.Visible = False"; -__ref._lv_promos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(parent.__c.False); -RDebugUtils.currentLine=23789579; - //BA.debugLineNum = 23789579;BA.debugLine="lv_catalogos.Visible = True"; -__ref._lv_catalogos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(parent.__c.True); -RDebugUtils.currentLine=23789580; - //BA.debugLineNum = 23789580;BA.debugLine="p_botonesVenta.Visible = False"; -__ref._p_botonesventa /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(parent.__c.False); -RDebugUtils.currentLine=23789581; - //BA.debugLineNum = 23789581;BA.debugLine="l_total.Visible = False"; -__ref._l_total /*anywheresoftware.b4a.objects.LabelWrapper*/ .setVisible(parent.__c.False); -RDebugUtils.currentLine=23789582; - //BA.debugLineNum = 23789582;BA.debugLine="l_totProds.Visible = False"; -__ref._l_totprods /*anywheresoftware.b4a.objects.LabelWrapper*/ .setVisible(parent.__c.False); -RDebugUtils.currentLine=23789583; - //BA.debugLineNum = 23789583;BA.debugLine="Return False"; -if (true) { -parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.False));return;}; - if (true) break; - -case 9: -//C -this.state = 16; -RDebugUtils.currentLine=23789585; - //BA.debugLineNum = 23789585;BA.debugLine="lfila.text = \"CATALOGO\""; -__ref._lfila /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("CATALOGO")); -RDebugUtils.currentLine=23789586; - //BA.debugLineNum = 23789586;BA.debugLine="clv_prods_ll.AsView.Visible = False"; -__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._asview().setVisible(parent.__c.False); -RDebugUtils.currentLine=23789587; - //BA.debugLineNum = 23789587;BA.debugLine="lv_subtipo.Visible = False"; -__ref._lv_subtipo /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(parent.__c.False); -RDebugUtils.currentLine=23789588; - //BA.debugLineNum = 23789588;BA.debugLine="p_botonesVenta.Visible = False"; -__ref._p_botonesventa /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(parent.__c.False); -RDebugUtils.currentLine=23789589; - //BA.debugLineNum = 23789589;BA.debugLine="l_total.Visible = False"; -__ref._l_total /*anywheresoftware.b4a.objects.LabelWrapper*/ .setVisible(parent.__c.False); -RDebugUtils.currentLine=23789590; - //BA.debugLineNum = 23789590;BA.debugLine="l_totProds.Visible = False"; -__ref._l_totprods /*anywheresoftware.b4a.objects.LabelWrapper*/ .setVisible(parent.__c.False); -RDebugUtils.currentLine=23789591; - //BA.debugLineNum = 23789591;BA.debugLine="lv_catalogos.Visible = True"; -__ref._lv_catalogos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(parent.__c.True); -RDebugUtils.currentLine=23789592; - //BA.debugLineNum = 23789592;BA.debugLine="Return False"; -if (true) { -parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.False));return;}; - if (true) break; - -case 11: -//C -this.state = 16; -RDebugUtils.currentLine=23789604; - //BA.debugLineNum = 23789604;BA.debugLine="entro = \"3\""; -__ref._entro /*String*/ = "3"; -RDebugUtils.currentLine=23789605; - //BA.debugLineNum = 23789605;BA.debugLine="B4XPage_Appear"; -__ref._b4xpage_appear /*void*/ (null); -RDebugUtils.currentLine=23789606; - //BA.debugLineNum = 23789606;BA.debugLine="Return True"; -if (true) { -parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.True));return;}; - if (true) break; - -case 13: -//C -this.state = 16; -RDebugUtils.currentLine=23789608; - //BA.debugLineNum = 23789608;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; -parent._b4xpages._showpage /*String*/ (ba,"Cliente"); -RDebugUtils.currentLine=23789609; - //BA.debugLineNum = 23789609;BA.debugLine="Return False"; -if (true) { -parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.False));return;}; - if (true) break; - -case 15: -//C -this.state = 16; -RDebugUtils.currentLine=23789611; - //BA.debugLineNum = 23789611;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; -parent._b4xpages._showpage /*String*/ (ba,"Cliente"); -RDebugUtils.currentLine=23789612; - //BA.debugLineNum = 23789612;BA.debugLine="Return False"; -if (true) { -parent.__c.ReturnFromResumableSub(this,(Object)(parent.__c.False));return;}; - if (true) break; - -case 16: -//C -this.state = -1; -; -RDebugUtils.currentLine=23789614; - //BA.debugLineNum = 23789614;BA.debugLine="End Sub"; -if (true) break; - - } - } - } -} -public String _b4xpage_created(keymon.lat.medicomed.c_productos __ref,anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "b4xpage_created", false)) - {return ((String) Debug.delegate(ba, "b4xpage_created", new Object[] {_root1}));} -anywheresoftware.b4a.objects.LabelWrapper _label1 = null; -int _i = 0; -RDebugUtils.currentLine=23330816; - //BA.debugLineNum = 23330816;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -RDebugUtils.currentLine=23330817; - //BA.debugLineNum = 23330817;BA.debugLine="Root = Root1"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = _root1; -RDebugUtils.currentLine=23330820; - //BA.debugLineNum = 23330820;BA.debugLine="Root.LoadLayout(\"productos\")"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .LoadLayout("productos",ba); -RDebugUtils.currentLine=23330821; - //BA.debugLineNum = 23330821;BA.debugLine="ruta = File.DirInternal"; -__ref._ruta /*String*/ = __c.File.getDirInternal(); -RDebugUtils.currentLine=23330822; - //BA.debugLineNum = 23330822;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; -if (__c.File.Exists(__ref._ruta /*String*/ ,"kmt.db")==__c.False) { -RDebugUtils.currentLine=23330823; - //BA.debugLineNum = 23330823;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=23330825; - //BA.debugLineNum = 23330825;BA.debugLine="PCLV.Initialize(Me, \"PCLV\", clv_prods_ll)"; -__ref._pclv /*keymon.lat.medicomed.preoptimizedclv*/ ._initialize /*String*/ (null,ba,this,"PCLV",__ref._clv_prods_ll /*b4a.example3.customlistview*/ ); -RDebugUtils.currentLine=23330826; - //BA.debugLineNum = 23330826;BA.debugLine="ciclo = 1"; -__ref._ciclo /*String*/ = BA.NumberToString(1); -RDebugUtils.currentLine=23330827; - //BA.debugLineNum = 23330827;BA.debugLine="l_info.Width = Root.Width * 0.8"; -__ref._l_info /*anywheresoftware.b4a.objects.LabelWrapper*/ .setWidth((int) (__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()*0.8)); -RDebugUtils.currentLine=23330828; - //BA.debugLineNum = 23330828;BA.debugLine="l_info.Left = (Root.Width/2) - (l_info.Width/2)"; -__ref._l_info /*anywheresoftware.b4a.objects.LabelWrapper*/ .setLeft((int) ((__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()/(double)2)-(__ref._l_info /*anywheresoftware.b4a.objects.LabelWrapper*/ .getWidth()/(double)2))); -RDebugUtils.currentLine=23330829; - //BA.debugLineNum = 23330829;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"select dist"; -__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 distinct CAT_GP_TIPO from cat_gunaprod where CAT_GP_TIPO <> 'PROMOS' order by CAT_GP_TIPO"))); -RDebugUtils.currentLine=23330830; - //BA.debugLineNum = 23330830;BA.debugLine="If c.RowCount > 0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=23330831; - //BA.debugLineNum = 23330831;BA.debugLine="Dim label1 As Label"; -_label1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=23330832; - //BA.debugLineNum = 23330832;BA.debugLine="label1 = lv_tipo.SingleLineLayout.Label"; -_label1 = __ref._lv_tipo /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getSingleLineLayout().Label; -RDebugUtils.currentLine=23330833; - //BA.debugLineNum = 23330833;BA.debugLine="label1.TextSize = 17"; -_label1.setTextSize((float) (17)); -RDebugUtils.currentLine=23330834; - //BA.debugLineNum = 23330834;BA.debugLine="label1.TextColor = Colors.Black"; -_label1.setTextColor(__c.Colors.Black); -RDebugUtils.currentLine=23330835; - //BA.debugLineNum = 23330835;BA.debugLine="lv_tipo.Clear"; -__ref._lv_tipo /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear(); -RDebugUtils.currentLine=23330836; - //BA.debugLineNum = 23330836;BA.debugLine="For i=0 To c.RowCount-1"; -{ -final int step18 = 1; -final int limit18 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); -_i = (int) (0) ; -for (;_i <= limit18 ;_i = _i + step18 ) { -RDebugUtils.currentLine=23330837; - //BA.debugLineNum = 23330837;BA.debugLine="c.Position=i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=23330838; - //BA.debugLineNum = 23330838;BA.debugLine="lv_tipo.AddSingleLine(c.GetString(\"CAT_GP_TIPO\""; -__ref._lv_tipo /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddSingleLine(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_TIPO"))); - } -}; - }; -RDebugUtils.currentLine=23330841; - //BA.debugLineNum = 23330841;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=23330844; - //BA.debugLineNum = 23330844;BA.debugLine="listaTiempos.Initialize"; -__ref._listatiempos /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=23330845; - //BA.debugLineNum = 23330845;BA.debugLine="listaProds.Initialize"; -__ref._listaprods /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=23330846; - //BA.debugLineNum = 23330846;BA.debugLine="pedidoMap.Initialize"; -__ref._pedidomap /*anywheresoftware.b4a.objects.collections.Map*/ .Initialize(); -RDebugUtils.currentLine=23330847; - //BA.debugLineNum = 23330847;BA.debugLine="listaHints.Initialize"; -__ref._listahints /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=23330848; - //BA.debugLineNum = 23330848;BA.debugLine="Log(\"Llamamos LlenaProdsLL\")"; -__c.LogImpl("323330848","Llamamos LlenaProdsLL",0); -RDebugUtils.currentLine=23330849; - //BA.debugLineNum = 23330849;BA.debugLine="LlenaProdsLL(Null)"; -__ref._llenaprodsll /*String*/ (null,(anywheresoftware.b4a.sql.SQL.ResultSetWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(), (android.database.Cursor)(__c.Null))); -RDebugUtils.currentLine=23330850; - //BA.debugLineNum = 23330850;BA.debugLine="prodsMap.Initialize"; -__ref._prodsmap /*anywheresoftware.b4a.objects.collections.Map*/ .Initialize(); -RDebugUtils.currentLine=23330851; - //BA.debugLineNum = 23330851;BA.debugLine="End Sub"; -return ""; -} -public String _class_globals(keymon.lat.medicomed.c_productos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -RDebugUtils.currentLine=23199744; - //BA.debugLineNum = 23199744;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=23199745; - //BA.debugLineNum = 23199745;BA.debugLine="Private Root As B4XView 'ignore"; -_root = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=23199746; - //BA.debugLineNum = 23199746;BA.debugLine="Private xui As XUI 'ignore"; -_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=23199747; - //BA.debugLineNum = 23199747;BA.debugLine="Dim ruta As String"; -_ruta = ""; -RDebugUtils.currentLine=23199748; - //BA.debugLineNum = 23199748;BA.debugLine="Dim q_buscar As String"; -_q_buscar = ""; -RDebugUtils.currentLine=23199749; - //BA.debugLineNum = 23199749;BA.debugLine="Dim forzarBusqueda As Boolean = False"; -_forzarbusqueda = __c.False; -RDebugUtils.currentLine=23199750; - //BA.debugLineNum = 23199750;BA.debugLine="Dim skmt As SQL"; -_skmt = new anywheresoftware.b4a.sql.SQL(); -RDebugUtils.currentLine=23199751; - //BA.debugLineNum = 23199751;BA.debugLine="Dim c As Cursor"; -_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=23199752; - //BA.debugLineNum = 23199752;BA.debugLine="Dim c2 As Cursor"; -_c2 = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=23199753; - //BA.debugLineNum = 23199753;BA.debugLine="Dim C3 As Cursor"; -_c3 = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=23199754; - //BA.debugLineNum = 23199754;BA.debugLine="Dim s As Cursor"; -_s = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=23199755; - //BA.debugLineNum = 23199755;BA.debugLine="Dim lv_catalogos As ListView"; -_lv_catalogos = new anywheresoftware.b4a.objects.ListViewWrapper(); -RDebugUtils.currentLine=23199756; - //BA.debugLineNum = 23199756;BA.debugLine="Dim lv_promos As ListView"; -_lv_promos = new anywheresoftware.b4a.objects.ListViewWrapper(); -RDebugUtils.currentLine=23199757; - //BA.debugLineNum = 23199757;BA.debugLine="Dim entro As String"; -_entro = ""; -RDebugUtils.currentLine=23199758; - //BA.debugLineNum = 23199758;BA.debugLine="Dim gest As Button"; -_gest = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=23199759; - //BA.debugLineNum = 23199759;BA.debugLine="Dim lfila As Label"; -_lfila = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=23199760; - //BA.debugLineNum = 23199760;BA.debugLine="Dim marca As String"; -_marca = ""; -RDebugUtils.currentLine=23199761; - //BA.debugLineNum = 23199761;BA.debugLine="Dim tipo As String"; -_tipo = ""; -RDebugUtils.currentLine=23199762; - //BA.debugLineNum = 23199762;BA.debugLine="Dim subtipo As String"; -_subtipo = ""; -RDebugUtils.currentLine=23199763; - //BA.debugLineNum = 23199763;BA.debugLine="Private BUSCA As EditText"; -_busca = new anywheresoftware.b4a.objects.EditTextWrapper(); -RDebugUtils.currentLine=23199764; - //BA.debugLineNum = 23199764;BA.debugLine="Dim ya_entro As String"; -_ya_entro = ""; -RDebugUtils.currentLine=23199765; - //BA.debugLineNum = 23199765;BA.debugLine="Dim TIENE_PROMOS As String"; -_tiene_promos = ""; -RDebugUtils.currentLine=23199766; - //BA.debugLineNum = 23199766;BA.debugLine="Dim RES As String"; -_res = ""; -RDebugUtils.currentLine=23199767; - //BA.debugLineNum = 23199767;BA.debugLine="Dim S1 As Cursor"; -_s1 = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=23199768; - //BA.debugLineNum = 23199768;BA.debugLine="Dim bmp As Bitmap"; -_bmp = new anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper(); -RDebugUtils.currentLine=23199769; - //BA.debugLineNum = 23199769;BA.debugLine="Dim ciclo As String"; -_ciclo = ""; -RDebugUtils.currentLine=23199770; - //BA.debugLineNum = 23199770;BA.debugLine="Private b_qr As Button"; -_b_qr = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=23199771; - //BA.debugLineNum = 23199771;BA.debugLine="Private p_productos As Panel"; -_p_productos = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=23199772; - //BA.debugLineNum = 23199772;BA.debugLine="Dim clv_productos As CustomListView"; -_clv_productos = new b4a.example3.customlistview(); -RDebugUtils.currentLine=23199773; - //BA.debugLineNum = 23199773;BA.debugLine="Private ImageView1 As ImageView"; -_imageview1 = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=23199774; - //BA.debugLineNum = 23199774;BA.debugLine="Private Panel3 As Panel"; -_panel3 = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=23199775; - //BA.debugLineNum = 23199775;BA.debugLine="Private p_prods As Panel"; -_p_prods = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=23199776; - //BA.debugLineNum = 23199776;BA.debugLine="Private i_prod As ImageView"; -_i_prod = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=23199777; - //BA.debugLineNum = 23199777;BA.debugLine="Private l_prodX As Label"; -_l_prodx = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=23199778; - //BA.debugLineNum = 23199778;BA.debugLine="Private b_prodMas As Button"; -_b_prodmas = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=23199779; - //BA.debugLineNum = 23199779;BA.debugLine="Private l_pCant As Label"; -_l_pcant = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=23199780; - //BA.debugLineNum = 23199780;BA.debugLine="Private et_pCant As EditText"; -_et_pcant = new anywheresoftware.b4a.objects.EditTextWrapper(); -RDebugUtils.currentLine=23199781; - //BA.debugLineNum = 23199781;BA.debugLine="Private b_prodMenos As Button"; -_b_prodmenos = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=23199782; - //BA.debugLineNum = 23199782;BA.debugLine="Dim b_terminar1 As Button"; -_b_terminar1 = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=23199783; - //BA.debugLineNum = 23199783;BA.debugLine="Dim b_continuar As Button"; -_b_continuar = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=23199784; - //BA.debugLineNum = 23199784;BA.debugLine="Private l_total As Label"; -_l_total = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=23199785; - //BA.debugLineNum = 23199785;BA.debugLine="Private l_totProds As Label"; -_l_totprods = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=23199786; - //BA.debugLineNum = 23199786;BA.debugLine="Dim totalProds As Int = 0"; -_totalprods = (int) (0); -RDebugUtils.currentLine=23199787; - //BA.debugLineNum = 23199787;BA.debugLine="Dim totalCompra As Float = 0"; -_totalcompra = (float) (0); -RDebugUtils.currentLine=23199788; - //BA.debugLineNum = 23199788;BA.debugLine="Dim etCantHasFocus As Boolean = False"; -_etcanthasfocus = __c.False; -RDebugUtils.currentLine=23199789; - //BA.debugLineNum = 23199789;BA.debugLine="Dim prodsMap As Map"; -_prodsmap = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=23199790; - //BA.debugLineNum = 23199790;BA.debugLine="Private l_Cargando As Label"; -_l_cargando = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=23199791; - //BA.debugLineNum = 23199791;BA.debugLine="Private l_info As Label"; -_l_info = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=23199792; - //BA.debugLineNum = 23199792;BA.debugLine="Private b_buscar As Button"; -_b_buscar = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=23199793; - //BA.debugLineNum = 23199793;BA.debugLine="Private p_botonesVenta As Panel"; -_p_botonesventa = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=23199794; - //BA.debugLineNum = 23199794;BA.debugLine="Private lv_tipo As ListView"; -_lv_tipo = new anywheresoftware.b4a.objects.ListViewWrapper(); -RDebugUtils.currentLine=23199795; - //BA.debugLineNum = 23199795;BA.debugLine="Private lv_subtipo As ListView"; -_lv_subtipo = new anywheresoftware.b4a.objects.ListViewWrapper(); -RDebugUtils.currentLine=23199796; - //BA.debugLineNum = 23199796;BA.debugLine="Private p_vistaPreviaTrans As Panel"; -_p_vistapreviatrans = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=23199797; - //BA.debugLineNum = 23199797;BA.debugLine="Private lv_prodsPedido As ListView"; -_lv_prodspedido = new anywheresoftware.b4a.objects.ListViewWrapper(); -RDebugUtils.currentLine=23199798; - //BA.debugLineNum = 23199798;BA.debugLine="Private b_rechazar As Button"; -_b_rechazar = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=23199799; - //BA.debugLineNum = 23199799;BA.debugLine="Private b_aceptar As Button"; -_b_aceptar = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=23199800; - //BA.debugLineNum = 23199800;BA.debugLine="Private p_vistaPrevia As Panel"; -_p_vistaprevia = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=23199801; - //BA.debugLineNum = 23199801;BA.debugLine="Dim folio As String"; -_folio = ""; -RDebugUtils.currentLine=23199802; - //BA.debugLineNum = 23199802;BA.debugLine="Dim result As String"; -_result = ""; -RDebugUtils.currentLine=23199803; - //BA.debugLineNum = 23199803;BA.debugLine="Private l_cant As Label"; -_l_cant = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=23199804; - //BA.debugLineNum = 23199804;BA.debugLine="Private l_total2 As Label"; -_l_total2 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=23199805; - //BA.debugLineNum = 23199805;BA.debugLine="Dim prodsPedidoActual As String"; -_prodspedidoactual = ""; -RDebugUtils.currentLine=23199806; - //BA.debugLineNum = 23199806;BA.debugLine="Dim montoPedidoActual As String"; -_montopedidoactual = ""; -RDebugUtils.currentLine=23199808; - //BA.debugLineNum = 23199808;BA.debugLine="Private clv_prods_ll As CustomListView"; -_clv_prods_ll = new b4a.example3.customlistview(); -RDebugUtils.currentLine=23199809; - //BA.debugLineNum = 23199809;BA.debugLine="Private PCLV As PreoptimizedCLV"; -_pclv = new keymon.lat.medicomed.preoptimizedclv(); -RDebugUtils.currentLine=23199810; - //BA.debugLineNum = 23199810;BA.debugLine="Dim listaProds As List"; -_listaprods = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=23199812; - //BA.debugLineNum = 23199812;BA.debugLine="Dim pedidoMap As Map"; -_pedidomap = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=23199813; - //BA.debugLineNum = 23199813;BA.debugLine="Private p_botMasMen As Panel"; -_p_botmasmen = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=23199814; - //BA.debugLineNum = 23199814;BA.debugLine="Dim reiniciarlistaProds As Boolean= False"; + //BA.debugLineNum = 955;BA.debugLine="PCLV.B4XSeekBar1.MaxValue = clv_prods_ll.Size"; +_pclv._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._maxvalue /*int*/ = _clv_prods_ll._getsize(); + //BA.debugLineNum = 956;BA.debugLine="PCLV.B4XSeekBar1.MinValue = 0"; +_pclv._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._minvalue /*int*/ = (int) (0); + //BA.debugLineNum = 957;BA.debugLine="PCLV.B4XSeekBar1.Interval = clv_prods_ll.Size/20"; +_pclv._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._interval /*int*/ = (int) (_clv_prods_ll._getsize()/(double)20); + //BA.debugLineNum = 958;BA.debugLine="PCLV.B4XSeekBar1.Value = clv_prods_ll.Size"; +_pclv._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._setvalue /*int*/ (_clv_prods_ll._getsize()); + //BA.debugLineNum = 959;BA.debugLine="PCLV.B4XSeekBar1.Update"; +_pclv._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._update /*String*/ (); + //BA.debugLineNum = 961;BA.debugLine="reiniciarlistaProds = False"; _reiniciarlistaprods = __c.False; -RDebugUtils.currentLine=23199816; - //BA.debugLineNum = 23199816;BA.debugLine="Dim listaTiempos As List"; -_listatiempos = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=23199817; - //BA.debugLineNum = 23199817;BA.debugLine="Dim clienteId As String"; -_clienteid = ""; -RDebugUtils.currentLine=23199818; - //BA.debugLineNum = 23199818;BA.debugLine="Dim rutaUsuario As String"; -_rutausuario = ""; -RDebugUtils.currentLine=23199819; - //BA.debugLineNum = 23199819;BA.debugLine="Dim hayPedido As Boolean"; -_haypedido = false; -RDebugUtils.currentLine=23199820; - //BA.debugLineNum = 23199820;BA.debugLine="Dim listaHints As List"; -_listahints = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=23199821; - //BA.debugLineNum = 23199821;BA.debugLine="Dim h As Cursor"; -_h = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=23199822; - //BA.debugLineNum = 23199822;BA.debugLine="End Sub"; + //BA.debugLineNum = 962;BA.debugLine="End Sub"; return ""; } -public String _clv_prods_ll_itemclick(keymon.lat.medicomed.c_productos __ref,int _index,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "clv_prods_ll_itemclick", false)) - {return ((String) Debug.delegate(ba, "clv_prods_ll_itemclick", new Object[] {_index,_value}));} -RDebugUtils.currentLine=25100288; - //BA.debugLineNum = 25100288;BA.debugLine="Private Sub clv_prods_ll_ItemClick (Index As Int,"; -RDebugUtils.currentLine=25100290; - //BA.debugLineNum = 25100290;BA.debugLine="End Sub"; -return ""; -} -public String _clv_prods_ll_visiblerangechanged(keymon.lat.medicomed.c_productos __ref,int _firstindex,int _lastindex) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "clv_prods_ll_visiblerangechanged", false)) - {return ((String) Debug.delegate(ba, "clv_prods_ll_visiblerangechanged", new Object[] {_firstindex,_lastindex}));} -int _extrasize = 0; -int _i = 0; -anywheresoftware.b4a.objects.B4XViewWrapper _pnl = null; -anywheresoftware.b4a.objects.CSBuilder _cs = null; -String _precio = ""; -RDebugUtils.currentLine=25231360; - //BA.debugLineNum = 25231360;BA.debugLine="Private Sub clv_prods_ll_VisibleRangeChanged (Firs"; -RDebugUtils.currentLine=25231363; - //BA.debugLineNum = 25231363;BA.debugLine="Dim ExtraSize As Int = 30 'List size"; -_extrasize = (int) (30); -RDebugUtils.currentLine=25231364; - //BA.debugLineNum = 25231364;BA.debugLine="For i = Max(0, FirstIndex - ExtraSize) To Min(Las"; -{ -final int step2 = 1; -final int limit2 = (int) (__c.Min(_lastindex+_extrasize,__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getsize()-1)); -_i = (int) (__c.Max(0,_firstindex-_extrasize)) ; -for (;_i <= limit2 ;_i = _i + step2 ) { -RDebugUtils.currentLine=25231365; - //BA.debugLineNum = 25231365;BA.debugLine="Dim Pnl As B4XView = clv_prods_ll.GetPanel(i)"; -_pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_pnl = __ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getpanel(_i); -RDebugUtils.currentLine=25231366; - //BA.debugLineNum = 25231366;BA.debugLine="If i > FirstIndex - ExtraSize And i < LastIndex"; -if (_i>_firstindex-_extrasize && _i<_lastindex+_extrasize) { -RDebugUtils.currentLine=25231368; - //BA.debugLineNum = 25231368;BA.debugLine="If Pnl.NumberOfViews = 0 Then 'Add each item/la"; -if (_pnl.getNumberOfViews()==0) { -RDebugUtils.currentLine=25231369; - //BA.debugLineNum = 25231369;BA.debugLine="Pnl.LoadLayout(\"proditem\")"; -_pnl.LoadLayout("proditem",ba); -RDebugUtils.currentLine=25231370; - //BA.debugLineNum = 25231370;BA.debugLine="p_prods.Width = Root.Width * 0.92"; -__ref._p_prods /*anywheresoftware.b4a.objects.PanelWrapper*/ .setWidth((int) (__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()*0.92)); -RDebugUtils.currentLine=25231371; - //BA.debugLineNum = 25231371;BA.debugLine="p_botMasMen.Left = p_prods.Width - (p_botMasMe"; -__ref._p_botmasmen /*anywheresoftware.b4a.objects.PanelWrapper*/ .setLeft((int) (__ref._p_prods /*anywheresoftware.b4a.objects.PanelWrapper*/ .getWidth()-(__ref._p_botmasmen /*anywheresoftware.b4a.objects.PanelWrapper*/ .getWidth()+5))); -RDebugUtils.currentLine=25231372; - //BA.debugLineNum = 25231372;BA.debugLine="Pnl.Height = p_prods.Height"; -_pnl.setHeight(__ref._p_prods /*anywheresoftware.b4a.objects.PanelWrapper*/ .getHeight()); -RDebugUtils.currentLine=25231373; - //BA.debugLineNum = 25231373;BA.debugLine="Private cs As CSBuilder"; -_cs = new anywheresoftware.b4a.objects.CSBuilder(); -RDebugUtils.currentLine=25231374; - //BA.debugLineNum = 25231374;BA.debugLine="cs.Initialize"; -_cs.Initialize(); -RDebugUtils.currentLine=25231375; - //BA.debugLineNum = 25231375;BA.debugLine="l_prodX.SetTextSizeAnimated(0, 13)"; -__ref._l_prodx /*anywheresoftware.b4a.objects.LabelWrapper*/ .SetTextSizeAnimated((int) (0),(float) (13)); -RDebugUtils.currentLine=25231376; - //BA.debugLineNum = 25231376;BA.debugLine="If clv_prods_ll.GetValue(i).As(Map).Get(\"cant\""; -if (((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getvalue(_i)))).Get((Object)("cant"))!= null && (double)(BA.ObjectToNumber(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getvalue(_i)))).Get((Object)("cant"))))>0) { -RDebugUtils.currentLine=25231377; - //BA.debugLineNum = 25231377;BA.debugLine="p_prods.Color=0xFFE2EEFF"; -__ref._p_prods /*anywheresoftware.b4a.objects.PanelWrapper*/ .setColor(((int)0xffe2eeff)); -RDebugUtils.currentLine=25231378; - //BA.debugLineNum = 25231378;BA.debugLine="et_pCant.TextColor=Colors.Red"; -__ref._et_pcant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setTextColor(__c.Colors.Red); -RDebugUtils.currentLine=25231379; - //BA.debugLineNum = 25231379;BA.debugLine="If Subs.pedidoGuardado Then"; -if (_subs._pedidoguardado /*boolean*/ (ba)) { -RDebugUtils.currentLine=25231380; - //BA.debugLineNum = 25231380;BA.debugLine="Log(\"YA SE GUARDO\")"; -__c.LogImpl("325231380","YA SE GUARDO",0); -RDebugUtils.currentLine=25231381; - //BA.debugLineNum = 25231381;BA.debugLine="et_pCant.Enabled = False"; -__ref._et_pcant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setEnabled(__c.False); -RDebugUtils.currentLine=25231383; - //BA.debugLineNum = 25231383;BA.debugLine="b_prodMenos.Enabled = False"; -__ref._b_prodmenos /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setEnabled(__c.False); - }; - }; -RDebugUtils.currentLine=25231386; - //BA.debugLineNum = 25231386;BA.debugLine="Private precio As String=NumberFormat2(clv_pro"; -_precio = __c.NumberFormat2(((double)(BA.ObjectToNumber(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getvalue(_i)))).Get((Object)("precio"))))),(int) (1),(int) (2),(int) (2),__c.False); -RDebugUtils.currentLine=25231387; - //BA.debugLineNum = 25231387;BA.debugLine="If clv_prods_ll.GetValue(i).As(Map).Get(\"cant\""; -if (((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getvalue(_i)))).Get((Object)("cant"))!= null) { -__ref._et_pcant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getvalue(_i)))).Get((Object)("cant"))));}; -RDebugUtils.currentLine=25231388; - //BA.debugLineNum = 25231388;BA.debugLine="l_prodX.Text = cs.Color(Colors.red).append(clv"; -__ref._l_prodx /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(_cs.Color(__c.Colors.Red).Append(BA.ObjectToCharSequence(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getvalue(_i)))).Get((Object)("prod")))).Pop().Append(BA.ObjectToCharSequence(__c.CRLF)).Append(BA.ObjectToCharSequence("Existencias: "+BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getvalue(_i)))).Get((Object)("almacen"))))).Color(((int)0xff017f01)).Append(BA.ObjectToCharSequence((" $"+__c.SmartStringFormatter("",(Object)(_precio))+""))).PopAll().getObject())); - }; - }else { - }; -RDebugUtils.currentLine=25231396; - //BA.debugLineNum = 25231396;BA.debugLine="PCLV.B4XSeekBar1.Value = clv_prods_ll.Size - Fir"; -__ref._pclv /*keymon.lat.medicomed.preoptimizedclv*/ ._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._setvalue /*int*/ (null,(int) (__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getsize()-_firstindex)); - } -}; -RDebugUtils.currentLine=25231399; - //BA.debugLineNum = 25231399;BA.debugLine="End Sub"; -return ""; -} -public anywheresoftware.b4a.objects.PanelWrapper _createlistitem(keymon.lat.medicomed.c_productos __ref,String _text,String _preciou,int _inv,int _width,int _height,anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _img,String _prodid,int _bc,int _tc) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "createlistitem", false)) - {return ((anywheresoftware.b4a.objects.PanelWrapper) Debug.delegate(ba, "createlistitem", new Object[] {_text,_preciou,_inv,_width,_height,_img,_prodid,_bc,_tc}));} -RDebugUtils.currentLine=23920640; - //BA.debugLineNum = 23920640;BA.debugLine="Sub CreateListItem(Text As String, precioU As Stri"; -RDebugUtils.currentLine=23920655; - //BA.debugLineNum = 23920655;BA.debugLine="End Sub"; -return null; -} -public String _et_pcant_focuschanged(keymon.lat.medicomed.c_productos __ref,boolean _hasfocus) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "et_pcant_focuschanged", false)) - {return ((String) Debug.delegate(ba, "et_pcant_focuschanged", new Object[] {_hasfocus}));} -RDebugUtils.currentLine=24248320; - //BA.debugLineNum = 24248320;BA.debugLine="Private Sub et_pCant_FocusChanged (HasFocus As Boo"; -RDebugUtils.currentLine=24248321; - //BA.debugLineNum = 24248321;BA.debugLine="LogColor($\"focus changed=${HasFocus}\"$, Colors.Ma"; -__c.LogImpl("324248321",("focus changed="+__c.SmartStringFormatter("",(Object)(_hasfocus))+""),__c.Colors.Magenta); -RDebugUtils.currentLine=24248322; - //BA.debugLineNum = 24248322;BA.debugLine="etCantHasFocus = HasFocus"; -__ref._etcanthasfocus /*boolean*/ = _hasfocus; -RDebugUtils.currentLine=24248323; - //BA.debugLineNum = 24248323;BA.debugLine="cuentaProds"; -__ref._cuentaprods /*String*/ (null); -RDebugUtils.currentLine=24248324; - //BA.debugLineNum = 24248324;BA.debugLine="End Sub"; -return ""; -} -public String _et_pcant_textchanged(keymon.lat.medicomed.c_productos __ref,String _old,String _new) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "et_pcant_textchanged", false)) - {return ((String) Debug.delegate(ba, "et_pcant_textchanged", new Object[] {_old,_new}));} -int _index = 0; -anywheresoftware.b4a.objects.B4XViewWrapper _pnl0 = null; -anywheresoftware.b4a.objects.B4XViewWrapper _pnl = null; -anywheresoftware.b4a.objects.B4XViewWrapper _lacant = null; -String _id = ""; -String _precio = ""; -String _inv = ""; -RDebugUtils.currentLine=24117248; - //BA.debugLineNum = 24117248;BA.debugLine="Private Sub et_pCant_TextChanged (Old As String, N"; -RDebugUtils.currentLine=24117260; - //BA.debugLineNum = 24117260;BA.debugLine="If etCantHasFocus = True Then"; -if (__ref._etcanthasfocus /*boolean*/ ==__c.True) { -RDebugUtils.currentLine=24117263; - //BA.debugLineNum = 24117263;BA.debugLine="Dim index As Int = clv_prods_ll.GetItemFromView("; -_index = __ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getitemfromview((anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba)))); -RDebugUtils.currentLine=24117264; - //BA.debugLineNum = 24117264;BA.debugLine="Dim pnl0 As B4XView = clv_prods_ll.GetPanel(inde"; -_pnl0 = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_pnl0 = __ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getpanel(_index); -RDebugUtils.currentLine=24117265; - //BA.debugLineNum = 24117265;BA.debugLine="Dim pnl As B4XView = pnl0.GetView(0)"; -_pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_pnl = _pnl0.GetView((int) (0)); -RDebugUtils.currentLine=24117266; - //BA.debugLineNum = 24117266;BA.debugLine="Dim laCant As B4XView = pnl.GetView(2).GetView(2"; -_lacant = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_lacant = _pnl.GetView((int) (2)).GetView((int) (2)); -RDebugUtils.currentLine=24117267; - //BA.debugLineNum = 24117267;BA.debugLine="Private id As String=clv_prods_ll.GetValue(index"; -_id = BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getvalue(_index)))).Get((Object)("id"))); -RDebugUtils.currentLine=24117268; - //BA.debugLineNum = 24117268;BA.debugLine="Private precio As String=clv_prods_ll.GetValue(i"; -_precio = BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getvalue(_index)))).Get((Object)("precio"))); -RDebugUtils.currentLine=24117269; - //BA.debugLineNum = 24117269;BA.debugLine="Private inv As String=clv_prods_ll.GetValue(inde"; -_inv = BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getvalue(_index)))).Get((Object)("almacen"))); -RDebugUtils.currentLine=24117270; - //BA.debugLineNum = 24117270;BA.debugLine="Private inv As String=clv_prods_ll.GetValue(inde"; -_inv = BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getvalue(_index)))).Get((Object)("almacen"))); -RDebugUtils.currentLine=24117271; - //BA.debugLineNum = 24117271;BA.debugLine="If(New = \"\" Or New = Null) Then New = 0"; -if (((_new).equals("") || _new== null)) { -_new = BA.NumberToString(0);}; -RDebugUtils.currentLine=24117272; - //BA.debugLineNum = 24117272;BA.debugLine="If(New > inv) Then"; -if (((double)(Double.parseDouble(_new))>(double)(Double.parseDouble(_inv)))) { -RDebugUtils.currentLine=24117273; - //BA.debugLineNum = 24117273;BA.debugLine="Sender.As(EditText).text = inv"; -((anywheresoftware.b4a.objects.EditTextWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.EditTextWrapper(), (android.widget.EditText)(__c.Sender(ba)))).setText(BA.ObjectToCharSequence(_inv)); - }; -RDebugUtils.currentLine=24117276; - //BA.debugLineNum = 24117276;BA.debugLine="If Not(Old = \"0\" And New = \"\") And laCant.Text <"; -if (__c.Not((_old).equals("0") && (_new).equals("")) && _lacant.getText()!= null && (_lacant.getText()).equals(BA.NumberToString(0)) == false && (_lacant.getText()).equals("") == false && __ref._etcanthasfocus /*boolean*/ ) { -RDebugUtils.currentLine=24117277; - //BA.debugLineNum = 24117277;BA.debugLine="Subs.actualizaProducto(Subs.traeAlmacen, precio"; -_subs._actualizaproducto /*String*/ (ba,_subs._traealmacen /*String*/ (ba),_precio,_lacant.getText(),_subs._traeprodnombre /*String*/ (ba,_id),_id,__ref._clienteid /*String*/ ,_subs._traefecha /*String*/ (ba),_subs._traeusuariodebd /*String*/ (ba),__ref._rutausuario /*String*/ ,BA.NumberToString(0),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ ); -RDebugUtils.currentLine=24117278; - //BA.debugLineNum = 24117278;BA.debugLine="cuentaProds"; -__ref._cuentaprods /*String*/ (null); - }; - }; -RDebugUtils.currentLine=24117281; - //BA.debugLineNum = 24117281;BA.debugLine="End Sub"; -return ""; -} -public String _l_info_click(keymon.lat.medicomed.c_productos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "l_info_click", false)) - {return ((String) Debug.delegate(ba, "l_info_click", null));} -RDebugUtils.currentLine=24510464; - //BA.debugLineNum = 24510464;BA.debugLine="Private Sub l_info_Click"; -RDebugUtils.currentLine=24510465; - //BA.debugLineNum = 24510465;BA.debugLine="l_info.Visible = False"; -__ref._l_info /*anywheresoftware.b4a.objects.LabelWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=24510466; - //BA.debugLineNum = 24510466;BA.debugLine="End Sub"; -return ""; -} -public String _l_prodx_click(keymon.lat.medicomed.c_productos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "l_prodx_click", false)) - {return ((String) Debug.delegate(ba, "l_prodx_click", null));} -int _index = 0; -anywheresoftware.b4a.objects.B4XViewWrapper _p0 = null; -anywheresoftware.b4a.objects.B4XViewWrapper _p = null; -anywheresoftware.b4a.objects.B4XViewWrapper _cant1 = null; -RDebugUtils.currentLine=25165824; - //BA.debugLineNum = 25165824;BA.debugLine="Sub l_prodx_click"; -RDebugUtils.currentLine=25165825; - //BA.debugLineNum = 25165825;BA.debugLine="Dim index As Int = clv_prods_ll.GetItemFromView(S"; -_index = __ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getitemfromview((anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba)))); -RDebugUtils.currentLine=25165826; - //BA.debugLineNum = 25165826;BA.debugLine="Private p0 As B4XView = clv_prods_ll.GetPanel(ind"; -_p0 = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_p0 = __ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getpanel(_index); -RDebugUtils.currentLine=25165827; - //BA.debugLineNum = 25165827;BA.debugLine="Private p As B4XView = p0.GetView(0)"; -_p = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_p = _p0.GetView((int) (0)); -RDebugUtils.currentLine=25165828; - //BA.debugLineNum = 25165828;BA.debugLine="Private cant1 As B4XView = p.GetView(2).GetView(2"; -_cant1 = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_cant1 = _p.GetView((int) (2)).GetView((int) (2)); -RDebugUtils.currentLine=25165829; - //BA.debugLineNum = 25165829;BA.debugLine="Dim index As Int = clv_prods_ll.GetItemFromView(S"; -_index = __ref._clv_prods_ll /*b4a.example3.customlistview*/ ._getitemfromview((anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba)))); -RDebugUtils.currentLine=25165831; - //BA.debugLineNum = 25165831;BA.debugLine="Log(cant1.Text)"; -__c.LogImpl("325165831",_cant1.getText(),0); -RDebugUtils.currentLine=25165832; - //BA.debugLineNum = 25165832;BA.debugLine="End Sub"; -return ""; -} -public String _l_prodx_longclick(keymon.lat.medicomed.c_productos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "l_prodx_longclick", false)) - {return ((String) Debug.delegate(ba, "l_prodx_longclick", null));} -RDebugUtils.currentLine=24444928; - //BA.debugLineNum = 24444928;BA.debugLine="Private Sub l_prodX_LongClick"; -RDebugUtils.currentLine=24444929; - //BA.debugLineNum = 24444929;BA.debugLine="Log(\"longclic = \"&Sender.as(Label).tag)"; -__c.LogImpl("324444929","longclic = "+BA.ObjectToString(((anywheresoftware.b4a.objects.LabelWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.LabelWrapper(), (android.widget.TextView)(__c.Sender(ba)))).getTag()),0); -RDebugUtils.currentLine=24444930; - //BA.debugLineNum = 24444930;BA.debugLine="l_info.Text = Sender.as(Label).tag"; -__ref._l_info /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(((anywheresoftware.b4a.objects.LabelWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.LabelWrapper(), (android.widget.TextView)(__c.Sender(ba)))).getTag())); -RDebugUtils.currentLine=24444931; - //BA.debugLineNum = 24444931;BA.debugLine="l_info.Visible = True"; -__ref._l_info /*anywheresoftware.b4a.objects.LabelWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=24444932; - //BA.debugLineNum = 24444932;BA.debugLine="End Sub"; -return ""; -} -public String _llenacatalogo(keymon.lat.medicomed.c_productos __ref,String _subtipo1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "llenacatalogo", false)) - {return ((String) Debug.delegate(ba, "llenacatalogo", new Object[] {_subtipo1}));} -RDebugUtils.currentLine=23724032; - //BA.debugLineNum = 23724032;BA.debugLine="Sub llenaCatalogo(subtipo1 As String)"; -RDebugUtils.currentLine=23724055; - //BA.debugLineNum = 23724055;BA.debugLine="End Sub"; -return ""; -} -public String _lv_catalogos_itemclick(keymon.lat.medicomed.c_productos __ref,int _position,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "lv_catalogos_itemclick", false)) - {return ((String) Debug.delegate(ba, "lv_catalogos_itemclick", new Object[] {_position,_value}));} +public String _lv_catalogos_itemclick(int _position,Object _value) throws Exception{ anywheresoftware.b4a.objects.LabelWrapper _label1 = null; anywheresoftware.b4a.objects.LabelWrapper _label2 = null; anywheresoftware.b4a.objects.LabelWrapper _label13 = null; anywheresoftware.b4a.objects.LabelWrapper _label14 = null; int _i = 0; anywheresoftware.b4a.objects.collections.Map _tm = null; -RDebugUtils.currentLine=23527424; - //BA.debugLineNum = 23527424;BA.debugLine="Sub lv_catalogos_ItemClick (Position As Int, Value"; -RDebugUtils.currentLine=23527425; - //BA.debugLineNum = 23527425;BA.debugLine="If Value = \"CATALOGO\" Then"; + //BA.debugLineNum = 205;BA.debugLine="Sub lv_catalogos_ItemClick (Position As Int, Value"; + //BA.debugLineNum = 206;BA.debugLine="If Value = \"CATALOGO\" Then"; if ((_value).equals((Object)("CATALOGO"))) { -RDebugUtils.currentLine=23527427; - //BA.debugLineNum = 23527427;BA.debugLine="lfila.text = \"PRODUCTOS\""; -__ref._lfila /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("PRODUCTOS")); -RDebugUtils.currentLine=23527428; - //BA.debugLineNum = 23527428;BA.debugLine="lv_catalogos.Visible = False"; -__ref._lv_catalogos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=23527430; - //BA.debugLineNum = 23527430;BA.debugLine="clv_prods_ll.AsView.Visible = True"; -__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._asview().setVisible(__c.True); -RDebugUtils.currentLine=23527431; - //BA.debugLineNum = 23527431;BA.debugLine="If hayPedido Then p_botonesVenta.Visible = True"; -if (__ref._haypedido /*boolean*/ ) { -__ref._p_botonesventa /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.True);}; + //BA.debugLineNum = 208;BA.debugLine="lfila.text = \"PRODUCTOS\""; +_lfila.setText(BA.ObjectToCharSequence("PRODUCTOS")); + //BA.debugLineNum = 209;BA.debugLine="lv_catalogos.Visible = False"; +_lv_catalogos.setVisible(__c.False); + //BA.debugLineNum = 211;BA.debugLine="clv_prods_ll.AsView.Visible = True"; +_clv_prods_ll._asview().setVisible(__c.True); + //BA.debugLineNum = 212;BA.debugLine="If hayPedido Then p_botonesVenta.Visible = True"; +if (_haypedido) { +_p_botonesventa.setVisible(__c.True);}; }else { -RDebugUtils.currentLine=23527433; - //BA.debugLineNum = 23527433;BA.debugLine="clv_prods_ll.AsView.Visible = False"; -__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._asview().setVisible(__c.False); -RDebugUtils.currentLine=23527434; - //BA.debugLineNum = 23527434;BA.debugLine="lv_promos.Visible = True"; -__ref._lv_promos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=23527435; - //BA.debugLineNum = 23527435;BA.debugLine="lfila.text = \"PROMOCIONES\""; -__ref._lfila /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("PROMOCIONES")); -RDebugUtils.currentLine=23527436; - //BA.debugLineNum = 23527436;BA.debugLine="lv_catalogos.Visible = False"; -__ref._lv_catalogos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=23527437; - //BA.debugLineNum = 23527437;BA.debugLine="lv_promos.Clear"; -__ref._lv_promos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear(); -RDebugUtils.currentLine=23527438; - //BA.debugLineNum = 23527438;BA.debugLine="Dim label1 As Label"; + //BA.debugLineNum = 214;BA.debugLine="clv_prods_ll.AsView.Visible = False"; +_clv_prods_ll._asview().setVisible(__c.False); + //BA.debugLineNum = 215;BA.debugLine="lv_promos.Visible = True"; +_lv_promos.setVisible(__c.True); + //BA.debugLineNum = 216;BA.debugLine="lfila.text = \"PROMOCIONES\""; +_lfila.setText(BA.ObjectToCharSequence("PROMOCIONES")); + //BA.debugLineNum = 217;BA.debugLine="lv_catalogos.Visible = False"; +_lv_catalogos.setVisible(__c.False); + //BA.debugLineNum = 218;BA.debugLine="lv_promos.Clear"; +_lv_promos.Clear(); + //BA.debugLineNum = 219;BA.debugLine="Dim label1 As Label"; _label1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=23527439; - //BA.debugLineNum = 23527439;BA.debugLine="label1 = lv_promos.TwoLinesLayout.Label"; -_label1 = __ref._lv_promos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().Label; -RDebugUtils.currentLine=23527440; - //BA.debugLineNum = 23527440;BA.debugLine="label1.TextSize = 15"; + //BA.debugLineNum = 220;BA.debugLine="label1 = lv_promos.TwoLinesLayout.Label"; +_label1 = _lv_promos.getTwoLinesLayout().Label; + //BA.debugLineNum = 221;BA.debugLine="label1.TextSize = 15"; _label1.setTextSize((float) (15)); -RDebugUtils.currentLine=23527441; - //BA.debugLineNum = 23527441;BA.debugLine="label1.TextColor = Colors.Black"; + //BA.debugLineNum = 222;BA.debugLine="label1.TextColor = Colors.Black"; _label1.setTextColor(__c.Colors.Black); -RDebugUtils.currentLine=23527442; - //BA.debugLineNum = 23527442;BA.debugLine="Dim label2 As Label"; + //BA.debugLineNum = 223;BA.debugLine="Dim label2 As Label"; _label2 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=23527443; - //BA.debugLineNum = 23527443;BA.debugLine="label2 = lv_promos.TwoLinesLayout.SecondLabel"; -_label2 = __ref._lv_promos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().SecondLabel; -RDebugUtils.currentLine=23527444; - //BA.debugLineNum = 23527444;BA.debugLine="label2.TextSize = 15"; + //BA.debugLineNum = 224;BA.debugLine="label2 = lv_promos.TwoLinesLayout.SecondLabel"; +_label2 = _lv_promos.getTwoLinesLayout().SecondLabel; + //BA.debugLineNum = 225;BA.debugLine="label2.TextSize = 15"; _label2.setTextSize((float) (15)); -RDebugUtils.currentLine=23527445; - //BA.debugLineNum = 23527445;BA.debugLine="label2.TextColor = Colors.Black"; + //BA.debugLineNum = 226;BA.debugLine="label2.TextColor = Colors.Black"; _label2.setTextColor(__c.Colors.Black); -RDebugUtils.currentLine=23527446; - //BA.debugLineNum = 23527446;BA.debugLine="Dim label13 As Label"; + //BA.debugLineNum = 227;BA.debugLine="Dim label13 As Label"; _label13 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=23527447; - //BA.debugLineNum = 23527447;BA.debugLine="label13 = lv_promos.TwoLinesAndBitmap.Label"; -_label13 = __ref._lv_promos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesAndBitmap().Label; -RDebugUtils.currentLine=23527448; - //BA.debugLineNum = 23527448;BA.debugLine="label13.TextSize = 15"; + //BA.debugLineNum = 228;BA.debugLine="label13 = lv_promos.TwoLinesAndBitmap.Label"; +_label13 = _lv_promos.getTwoLinesAndBitmap().Label; + //BA.debugLineNum = 229;BA.debugLine="label13.TextSize = 15"; _label13.setTextSize((float) (15)); -RDebugUtils.currentLine=23527449; - //BA.debugLineNum = 23527449;BA.debugLine="label13.TextColor = Colors.Black"; + //BA.debugLineNum = 230;BA.debugLine="label13.TextColor = Colors.Black"; _label13.setTextColor(__c.Colors.Black); -RDebugUtils.currentLine=23527450; - //BA.debugLineNum = 23527450;BA.debugLine="Dim label14 As Label"; + //BA.debugLineNum = 231;BA.debugLine="Dim label14 As Label"; _label14 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=23527451; - //BA.debugLineNum = 23527451;BA.debugLine="label14 = lv_promos.TwoLinesAndBitmap.SecondLabe"; -_label14 = __ref._lv_promos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesAndBitmap().SecondLabel; -RDebugUtils.currentLine=23527452; - //BA.debugLineNum = 23527452;BA.debugLine="label14.TextSize = 15"; + //BA.debugLineNum = 232;BA.debugLine="label14 = lv_promos.TwoLinesAndBitmap.SecondLabe"; +_label14 = _lv_promos.getTwoLinesAndBitmap().SecondLabel; + //BA.debugLineNum = 233;BA.debugLine="label14.TextSize = 15"; _label14.setTextSize((float) (15)); -RDebugUtils.currentLine=23527453; - //BA.debugLineNum = 23527453;BA.debugLine="label14.TextColor = Colors.Black"; + //BA.debugLineNum = 234;BA.debugLine="label14.TextColor = Colors.Black"; _label14.setTextColor(__c.Colors.Black); -RDebugUtils.currentLine=23527454; - //BA.debugLineNum = 23527454;BA.debugLine="lfila.text = \"PROMOS\""; -__ref._lfila /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("PROMOS")); -RDebugUtils.currentLine=23527455; - //BA.debugLineNum = 23527455;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery2(\"select CA"; -__ref._c2 /*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*/ .ExecQuery2("select CAT_GP_ID, CAT_GP_NOMBRE, CAT_GP_PRECIO, CAT_GP_ALMACEN, CAT_GP_IMG from cat_gunaprod where CAT_GP_PRECIO > 0 AND CAT_GP_ALMACEN > 0 and CAT_GP_TIPOPROD = ? AND CAT_GP_TIPO = ? AND CAT_GP_SUBTIPO = ? AND CAT_GP_ID NOT IN (SELECT PE_PROID FROM PEDIDO WHERE PE_CLIENTE IN (Select cuenta from cuentaa) )",new String[]{BA.ObjectToString(_value),BA.ObjectToString(_value),BA.ObjectToString(_value)}))); -RDebugUtils.currentLine=23527456; - //BA.debugLineNum = 23527456;BA.debugLine="Log($\"res:${c2.RowCount}, ${Value}, ${marca}, ${"; -__c.LogImpl("323527456",("res:"+__c.SmartStringFormatter("",(Object)(__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()))+", "+__c.SmartStringFormatter("",_value)+", "+__c.SmartStringFormatter("",(Object)(__ref._marca /*String*/ ))+", "+__c.SmartStringFormatter("",(Object)(__ref._tipo /*String*/ ))+""),0); -RDebugUtils.currentLine=23527457; - //BA.debugLineNum = 23527457;BA.debugLine="If c2.RowCount > 0 Then"; -if (__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=23527458; - //BA.debugLineNum = 23527458;BA.debugLine="For i=0 To c2.RowCount -1"; + //BA.debugLineNum = 235;BA.debugLine="lfila.text = \"PROMOS\""; +_lfila.setText(BA.ObjectToCharSequence("PROMOS")); + //BA.debugLineNum = 236;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery2(\"select CA"; +_c2 = (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*/ .ExecQuery2("select CAT_GP_ID, CAT_GP_NOMBRE, CAT_GP_PRECIO, CAT_GP_ALMACEN, CAT_GP_IMG from cat_gunaprod where CAT_GP_PRECIO > 0 AND CAT_GP_ALMACEN > 0 and CAT_GP_TIPOPROD = ? AND CAT_GP_TIPO = ? AND CAT_GP_SUBTIPO = ? AND CAT_GP_ID NOT IN (SELECT PE_PROID FROM PEDIDO WHERE PE_CLIENTE IN (Select cuenta from cuentaa) )",new String[]{BA.ObjectToString(_value),BA.ObjectToString(_value),BA.ObjectToString(_value)}))); + //BA.debugLineNum = 237;BA.debugLine="Log($\"res:${c2.RowCount}, ${Value}, ${marca}, ${"; +__c.LogImpl("356492064",("res:"+__c.SmartStringFormatter("",(Object)(_c2.getRowCount()))+", "+__c.SmartStringFormatter("",_value)+", "+__c.SmartStringFormatter("",(Object)(_marca))+", "+__c.SmartStringFormatter("",(Object)(_tipo))+""),0); + //BA.debugLineNum = 238;BA.debugLine="If c2.RowCount > 0 Then"; +if (_c2.getRowCount()>0) { + //BA.debugLineNum = 239;BA.debugLine="For i=0 To c2.RowCount -1"; { final int step32 = 1; -final int limit32 = (int) (__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit32 = (int) (_c2.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit32 ;_i = _i + step32 ) { -RDebugUtils.currentLine=23527459; - //BA.debugLineNum = 23527459;BA.debugLine="c2.Position=i"; -__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=23527460; - //BA.debugLineNum = 23527460;BA.debugLine="Private tm As Map = Subs.procesaPromocion(c2.G"; + //BA.debugLineNum = 240;BA.debugLine="c2.Position=i"; +_c2.setPosition(_i); + //BA.debugLineNum = 241;BA.debugLine="Private tm As Map = Subs.procesaPromocion(c2.G"; _tm = new anywheresoftware.b4a.objects.collections.Map(); -_tm = _subs._procesapromocion /*anywheresoftware.b4a.objects.collections.Map*/ (ba,__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_ID"),__ref._clienteid /*String*/ ); -RDebugUtils.currentLine=23527461; - //BA.debugLineNum = 23527461;BA.debugLine="If tm.Get(\"status\") = \"ok\" Then 'Solo muestral"; +_tm = _subs._procesapromocion /*anywheresoftware.b4a.objects.collections.Map*/ (ba,_c2.GetString("CAT_GP_ID"),_clienteid); + //BA.debugLineNum = 242;BA.debugLine="If tm.Get(\"status\") = \"ok\" Then 'Solo muestral"; if ((_tm.Get((Object)("status"))).equals((Object)("ok"))) { -RDebugUtils.currentLine=23527462; - //BA.debugLineNum = 23527462;BA.debugLine="lv_promos.AddTwoLines(c2.GetString(\"CAT_GP_NO"; -__ref._lv_promos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddTwoLines(BA.ObjectToCharSequence(__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_NOMBRE")),BA.ObjectToCharSequence("# "+__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_ALMACEN")+" $ "+__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_PRECIO")+" F:"+BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_tm.Get((Object)("mp"))))).Get((Object)("prodsFijosCant")))+" V:"+BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_tm.Get((Object)("mp"))))).Get((Object)("prodsVariablesCant"))))); + //BA.debugLineNum = 243;BA.debugLine="lv_promos.AddTwoLines(c2.GetString(\"CAT_GP_NO"; +_lv_promos.AddTwoLines(BA.ObjectToCharSequence(_c2.GetString("CAT_GP_NOMBRE")),BA.ObjectToCharSequence("# "+_c2.GetString("CAT_GP_ALMACEN")+" $ "+_c2.GetString("CAT_GP_PRECIO")+" F:"+BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_tm.Get((Object)("mp"))))).Get((Object)("prodsFijosCant")))+" V:"+BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_tm.Get((Object)("mp"))))).Get((Object)("prodsVariablesCant"))))); }; } }; }else { -RDebugUtils.currentLine=23527466; - //BA.debugLineNum = 23527466;BA.debugLine="ToastMessageShow(\"No hay promociones disponible"; + //BA.debugLineNum = 247;BA.debugLine="ToastMessageShow(\"No hay promociones disponible"; __c.ToastMessageShow(BA.ObjectToCharSequence("No hay promociones disponibles."),__c.False); }; -RDebugUtils.currentLine=23527468; - //BA.debugLineNum = 23527468;BA.debugLine="c2.Close"; -__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=23527469; - //BA.debugLineNum = 23527469;BA.debugLine="entro = \"4\""; -__ref._entro /*String*/ = "4"; + //BA.debugLineNum = 249;BA.debugLine="c2.Close"; +_c2.Close(); + //BA.debugLineNum = 250;BA.debugLine="entro = \"4\""; +_entro = "4"; }; -RDebugUtils.currentLine=23527471; - //BA.debugLineNum = 23527471;BA.debugLine="End Sub"; + //BA.debugLineNum = 252;BA.debugLine="End Sub"; return ""; } -public void _lv_catalogos2_itemclick(keymon.lat.medicomed.c_productos __ref,int _position,Object _value) throws Exception{ -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "lv_catalogos2_itemclick", false)) - {Debug.delegate(ba, "lv_catalogos2_itemclick", new Object[] {_position,_value}); return;} -ResumableSub_lv_catalogos2_ItemClick rsub = new ResumableSub_lv_catalogos2_ItemClick(this,__ref,_position,_value); +public void _lv_catalogos2_itemclick(int _position,Object _value) throws Exception{ +ResumableSub_lv_catalogos2_ItemClick rsub = new ResumableSub_lv_catalogos2_ItemClick(this,_position,_value); rsub.resume(ba, null); } public static class ResumableSub_lv_catalogos2_ItemClick extends BA.ResumableSub { -public ResumableSub_lv_catalogos2_ItemClick(keymon.lat.medicomed.c_productos parent,keymon.lat.medicomed.c_productos __ref,int _position,Object _value) { +public ResumableSub_lv_catalogos2_ItemClick(keymon.lat.medicomed.c_productos parent,int _position,Object _value) { this.parent = parent; -this.__ref = __ref; this._position = _position; this._value = _value; -this.__ref = parent; } -keymon.lat.medicomed.c_productos __ref; keymon.lat.medicomed.c_productos parent; int _position; Object _value; @@ -2324,7 +1657,6 @@ int limit57; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="c_productos"; while (true) { switch (state) { @@ -2334,20 +1666,15 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=23592961; - //BA.debugLineNum = 23592961;BA.debugLine="clv_prods_ll.AsView.Visible = False"; -__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._asview().setVisible(parent.__c.False); -RDebugUtils.currentLine=23592962; - //BA.debugLineNum = 23592962;BA.debugLine="BUSCA.Text = \"\""; -__ref._busca /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence("")); -RDebugUtils.currentLine=23592963; - //BA.debugLineNum = 23592963;BA.debugLine="Dim cliente As C_Cliente = B4XPages.GetPage(\"Clie"; + //BA.debugLineNum = 255;BA.debugLine="clv_prods_ll.AsView.Visible = False"; +parent._clv_prods_ll._asview().setVisible(parent.__c.False); + //BA.debugLineNum = 256;BA.debugLine="BUSCA.Text = \"\""; +parent._busca.setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 257;BA.debugLine="Dim cliente As C_Cliente = B4XPages.GetPage(\"Clie"; _cliente = (keymon.lat.medicomed.c_cliente)(parent._b4xpages._getpage /*Object*/ (ba,"Cliente")); -RDebugUtils.currentLine=23592964; - //BA.debugLineNum = 23592964;BA.debugLine="Log($\"value=${Value}\"$)"; -parent.__c.LogImpl("323592964",("value="+parent.__c.SmartStringFormatter("",_value)+""),0); -RDebugUtils.currentLine=23592965; - //BA.debugLineNum = 23592965;BA.debugLine="If Value = \"PROMOS\" And cliente.cuenta <> \"N\" The"; + //BA.debugLineNum = 258;BA.debugLine="Log($\"value=${Value}\"$)"; +parent.__c.LogImpl("356557572",("value="+parent.__c.SmartStringFormatter("",_value)+""),0); + //BA.debugLineNum = 259;BA.debugLine="If Value = \"PROMOS\" And cliente.cuenta <> \"N\" The"; if (true) break; case 1: @@ -2355,41 +1682,31 @@ case 1: this.state = 6; if ((_value).equals((Object)("PROMOS")) && (_cliente._cuenta /*String*/ ).equals("N") == false) { this.state = 3; -}else -{RDebugUtils.currentLine=23592969; - //BA.debugLineNum = 23592969;BA.debugLine="Else if Value = \"PROMOS\" And cliente.cuenta = \"N\""; -if ((_value).equals((Object)("PROMOS")) && (_cliente._cuenta /*String*/ ).equals("N")) { +}else if((_value).equals((Object)("PROMOS")) && (_cliente._cuenta /*String*/ ).equals("N")) { this.state = 5; -}} -if (true) break; +}if (true) break; case 3: //C this.state = 6; -RDebugUtils.currentLine=23592966; - //BA.debugLineNum = 23592966;BA.debugLine="entro = \"3\""; -__ref._entro /*String*/ = "3"; -RDebugUtils.currentLine=23592967; - //BA.debugLineNum = 23592967;BA.debugLine="marca = \"PROMOS\""; -__ref._marca /*String*/ = "PROMOS"; -RDebugUtils.currentLine=23592968; - //BA.debugLineNum = 23592968;BA.debugLine="tipo = \"PROMOS\""; -__ref._tipo /*String*/ = "PROMOS"; + //BA.debugLineNum = 260;BA.debugLine="entro = \"3\""; +parent._entro = "3"; + //BA.debugLineNum = 261;BA.debugLine="marca = \"PROMOS\""; +parent._marca = "PROMOS"; + //BA.debugLineNum = 262;BA.debugLine="tipo = \"PROMOS\""; +parent._tipo = "PROMOS"; if (true) break; case 5: //C this.state = 6; -RDebugUtils.currentLine=23592970; - //BA.debugLineNum = 23592970;BA.debugLine="entro = \"5\""; -__ref._entro /*String*/ = "5"; -RDebugUtils.currentLine=23592971; - //BA.debugLineNum = 23592971;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; + //BA.debugLineNum = 264;BA.debugLine="entro = \"5\""; +parent._entro = "5"; + //BA.debugLineNum = 265;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; parent._b4xpages._showpage /*String*/ (ba,"Cliente"); if (true) break; ; -RDebugUtils.currentLine=23592973; - //BA.debugLineNum = 23592973;BA.debugLine="If Value = \"PROMOS\" Then"; + //BA.debugLineNum = 267;BA.debugLine="If Value = \"PROMOS\" Then"; case 6: //if @@ -2403,27 +1720,22 @@ this.state = 10; case 8: //C this.state = 11; -RDebugUtils.currentLine=23592974; - //BA.debugLineNum = 23592974;BA.debugLine="LogColor(\"Promos\", Colors.red)"; -parent.__c.LogImpl("323592974","Promos",parent.__c.Colors.Red); -RDebugUtils.currentLine=23592975; - //BA.debugLineNum = 23592975;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery2(\"select CA"; -__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery2("select CAT_GP_ID, CAT_GP_NOMBRE, CAT_GP_PRECIO, CAT_GP_ALMACEN, CAT_GP_IMG from cat_gunaprod where CAT_GP_PRECIO > 0 AND CAT_GP_ALMACEN > 0 and CAT_GP_TIPOPROD = ? AND CAT_GP_TIPO = ? AND CAT_GP_SUBTIPO = ? AND CAT_GP_ID NOT IN (SELECT PE_PROID FROM PEDIDO WHERE PE_CLIENTE IN (Select cuenta from cuentaa) )",new String[]{BA.ObjectToString(_value),__ref._marca /*String*/ ,__ref._tipo /*String*/ }))); + //BA.debugLineNum = 268;BA.debugLine="LogColor(\"Promos\", Colors.red)"; +parent.__c.LogImpl("356557582","Promos",parent.__c.Colors.Red); + //BA.debugLineNum = 269;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery2(\"select CA"; +parent._c2 = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery2("select CAT_GP_ID, CAT_GP_NOMBRE, CAT_GP_PRECIO, CAT_GP_ALMACEN, CAT_GP_IMG from cat_gunaprod where CAT_GP_PRECIO > 0 AND CAT_GP_ALMACEN > 0 and CAT_GP_TIPOPROD = ? AND CAT_GP_TIPO = ? AND CAT_GP_SUBTIPO = ? AND CAT_GP_ID NOT IN (SELECT PE_PROID FROM PEDIDO WHERE PE_CLIENTE IN (Select cuenta from cuentaa) )",new String[]{BA.ObjectToString(_value),parent._marca,parent._tipo}))); if (true) break; case 10: //C this.state = 11; -RDebugUtils.currentLine=23592977; - //BA.debugLineNum = 23592977;BA.debugLine="LogColor(\"Catalogo\", Colors.red)"; -parent.__c.LogImpl("323592977","Catalogo",parent.__c.Colors.Red); -RDebugUtils.currentLine=23592978; - //BA.debugLineNum = 23592978;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_"; -__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select CAT_GP_ID, CAT_GP_NOMBRE, CAT_GP_PRECIO, CAT_GP_ALMACEN, CAT_GP_IMG, CAT_GP_TIPOPROD, CAT_GP_INICIATIVA from cat_gunaprod where CAT_GP_PRECIO > 0 AND CAT_GP_ALMACEN > 0 and CAT_GP_TIPOPROD <> 'PROMOS' "))); + //BA.debugLineNum = 271;BA.debugLine="LogColor(\"Catalogo\", Colors.red)"; +parent.__c.LogImpl("356557585","Catalogo",parent.__c.Colors.Red); + //BA.debugLineNum = 272;BA.debugLine="c2=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_"; +parent._c2 = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select CAT_GP_ID, CAT_GP_NOMBRE, CAT_GP_PRECIO, CAT_GP_ALMACEN, CAT_GP_IMG, CAT_GP_TIPOPROD, CAT_GP_INICIATIVA from cat_gunaprod where CAT_GP_PRECIO > 0 AND CAT_GP_ALMACEN > 0 and CAT_GP_TIPOPROD <> 'PROMOS' "))); if (true) break; ; -RDebugUtils.currentLine=23592980; - //BA.debugLineNum = 23592980;BA.debugLine="If Value = \"CATALOGO\" Then"; + //BA.debugLineNum = 274;BA.debugLine="If Value = \"CATALOGO\" Then"; case 11: //if @@ -2437,142 +1749,106 @@ this.state = 15; case 13: //C this.state = 28; -RDebugUtils.currentLine=23592981; - //BA.debugLineNum = 23592981;BA.debugLine="lv_catalogos.Visible = False"; -__ref._lv_catalogos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(parent.__c.False); -RDebugUtils.currentLine=23592982; - //BA.debugLineNum = 23592982;BA.debugLine="lv_promos.Visible = False"; -__ref._lv_promos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(parent.__c.False); -RDebugUtils.currentLine=23592983; - //BA.debugLineNum = 23592983;BA.debugLine="lfila.text = \"CATALOGO\""; -__ref._lfila /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("CATALOGO")); -RDebugUtils.currentLine=23592984; - //BA.debugLineNum = 23592984;BA.debugLine="Log(\"PGS\")"; -parent.__c.LogImpl("323592984","PGS",0); -RDebugUtils.currentLine=23592985; - //BA.debugLineNum = 23592985;BA.debugLine="ProgressDialogShow(\"Cargando catalogo ...\")"; + //BA.debugLineNum = 275;BA.debugLine="lv_catalogos.Visible = False"; +parent._lv_catalogos.setVisible(parent.__c.False); + //BA.debugLineNum = 276;BA.debugLine="lv_promos.Visible = False"; +parent._lv_promos.setVisible(parent.__c.False); + //BA.debugLineNum = 277;BA.debugLine="lfila.text = \"CATALOGO\""; +parent._lfila.setText(BA.ObjectToCharSequence("CATALOGO")); + //BA.debugLineNum = 278;BA.debugLine="Log(\"PGS\")"; +parent.__c.LogImpl("356557592","PGS",0); + //BA.debugLineNum = 279;BA.debugLine="ProgressDialogShow(\"Cargando catalogo ...\")"; parent.__c.ProgressDialogShow(ba,BA.ObjectToCharSequence("Cargando catalogo ...")); -RDebugUtils.currentLine=23592986; - //BA.debugLineNum = 23592986;BA.debugLine="Sleep(100)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "c_productos", "lv_catalogos2_itemclick"),(int) (100)); + //BA.debugLineNum = 280;BA.debugLine="Sleep(100)"; +parent.__c.Sleep(ba,this,(int) (100)); this.state = 29; return; case 29: //C this.state = 28; ; -RDebugUtils.currentLine=23592987; - //BA.debugLineNum = 23592987;BA.debugLine="Private inicioContador As String = DateTime.Now"; + //BA.debugLineNum = 281;BA.debugLine="Private inicioContador As String = DateTime.Now"; _iniciocontador = BA.NumberToString(parent.__c.DateTime.getNow()); -RDebugUtils.currentLine=23592988; - //BA.debugLineNum = 23592988;BA.debugLine="llenaCatalogo(False)"; -__ref._llenacatalogo /*String*/ (null,BA.ObjectToString(parent.__c.False)); -RDebugUtils.currentLine=23592989; - //BA.debugLineNum = 23592989;BA.debugLine="clv_prods_ll.AsView.Visible = True"; -__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._asview().setVisible(parent.__c.True); -RDebugUtils.currentLine=23592990; - //BA.debugLineNum = 23592990;BA.debugLine="Log(\"PGH\")"; -parent.__c.LogImpl("323592990","PGH",0); -RDebugUtils.currentLine=23592991; - //BA.debugLineNum = 23592991;BA.debugLine="LogColor(\"TIEMPO DE PROCESO DEL CATALOGO: \" & (("; -parent.__c.LogImpl("323592991","TIEMPO DE PROCESO DEL CATALOGO: "+BA.NumberToString(((parent.__c.DateTime.getNow()-(double)(Double.parseDouble(_iniciocontador)))/(double)1000)),parent.__c.Colors.Red); -RDebugUtils.currentLine=23592992; - //BA.debugLineNum = 23592992;BA.debugLine="ProgressDialogHide"; + //BA.debugLineNum = 282;BA.debugLine="llenaCatalogo(False)"; +parent._llenacatalogo(BA.ObjectToString(parent.__c.False)); + //BA.debugLineNum = 283;BA.debugLine="clv_prods_ll.AsView.Visible = True"; +parent._clv_prods_ll._asview().setVisible(parent.__c.True); + //BA.debugLineNum = 284;BA.debugLine="Log(\"PGH\")"; +parent.__c.LogImpl("356557598","PGH",0); + //BA.debugLineNum = 285;BA.debugLine="LogColor(\"TIEMPO DE PROCESO DEL CATALOGO: \" & (("; +parent.__c.LogImpl("356557599","TIEMPO DE PROCESO DEL CATALOGO: "+BA.NumberToString(((parent.__c.DateTime.getNow()-(double)(Double.parseDouble(_iniciocontador)))/(double)1000)),parent.__c.Colors.Red); + //BA.debugLineNum = 286;BA.debugLine="ProgressDialogHide"; parent.__c.ProgressDialogHide(); -RDebugUtils.currentLine=23592993; - //BA.debugLineNum = 23592993;BA.debugLine="c2.Close"; -__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 287;BA.debugLine="c2.Close"; +parent._c2.Close(); if (true) break; case 15: //C this.state = 16; -RDebugUtils.currentLine=23592995; - //BA.debugLineNum = 23592995;BA.debugLine="clv_prods_ll.AsView.Visible = False"; -__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._asview().setVisible(parent.__c.False); -RDebugUtils.currentLine=23592996; - //BA.debugLineNum = 23592996;BA.debugLine="lv_promos.Visible = True"; -__ref._lv_promos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(parent.__c.True); -RDebugUtils.currentLine=23592997; - //BA.debugLineNum = 23592997;BA.debugLine="lv_catalogos.Visible = False"; -__ref._lv_catalogos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(parent.__c.False); -RDebugUtils.currentLine=23592998; - //BA.debugLineNum = 23592998;BA.debugLine="lv_promos.Clear"; -__ref._lv_promos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear(); -RDebugUtils.currentLine=23592999; - //BA.debugLineNum = 23592999;BA.debugLine="Dim label1 As Label"; + //BA.debugLineNum = 289;BA.debugLine="clv_prods_ll.AsView.Visible = False"; +parent._clv_prods_ll._asview().setVisible(parent.__c.False); + //BA.debugLineNum = 290;BA.debugLine="lv_promos.Visible = True"; +parent._lv_promos.setVisible(parent.__c.True); + //BA.debugLineNum = 291;BA.debugLine="lv_catalogos.Visible = False"; +parent._lv_catalogos.setVisible(parent.__c.False); + //BA.debugLineNum = 292;BA.debugLine="lv_promos.Clear"; +parent._lv_promos.Clear(); + //BA.debugLineNum = 293;BA.debugLine="Dim label1 As Label"; _label1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=23593000; - //BA.debugLineNum = 23593000;BA.debugLine="label1 = lv_promos.TwoLinesLayout.Label"; -_label1 = __ref._lv_promos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().Label; -RDebugUtils.currentLine=23593001; - //BA.debugLineNum = 23593001;BA.debugLine="label1.TextSize = 15"; + //BA.debugLineNum = 294;BA.debugLine="label1 = lv_promos.TwoLinesLayout.Label"; +_label1 = parent._lv_promos.getTwoLinesLayout().Label; + //BA.debugLineNum = 295;BA.debugLine="label1.TextSize = 15"; _label1.setTextSize((float) (15)); -RDebugUtils.currentLine=23593002; - //BA.debugLineNum = 23593002;BA.debugLine="label1.TextColor = Colors.Black"; + //BA.debugLineNum = 296;BA.debugLine="label1.TextColor = Colors.Black"; _label1.setTextColor(parent.__c.Colors.Black); -RDebugUtils.currentLine=23593003; - //BA.debugLineNum = 23593003;BA.debugLine="Dim label2 As Label"; + //BA.debugLineNum = 297;BA.debugLine="Dim label2 As Label"; _label2 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=23593004; - //BA.debugLineNum = 23593004;BA.debugLine="label2 = lv_promos.TwoLinesLayout.SecondLabel"; -_label2 = __ref._lv_promos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().SecondLabel; -RDebugUtils.currentLine=23593005; - //BA.debugLineNum = 23593005;BA.debugLine="label2.TextSize = 15"; + //BA.debugLineNum = 298;BA.debugLine="label2 = lv_promos.TwoLinesLayout.SecondLabel"; +_label2 = parent._lv_promos.getTwoLinesLayout().SecondLabel; + //BA.debugLineNum = 299;BA.debugLine="label2.TextSize = 15"; _label2.setTextSize((float) (15)); -RDebugUtils.currentLine=23593006; - //BA.debugLineNum = 23593006;BA.debugLine="label2.TextColor = Colors.Black"; + //BA.debugLineNum = 300;BA.debugLine="label2.TextColor = Colors.Black"; _label2.setTextColor(parent.__c.Colors.Black); -RDebugUtils.currentLine=23593007; - //BA.debugLineNum = 23593007;BA.debugLine="Dim label13 As Label"; + //BA.debugLineNum = 301;BA.debugLine="Dim label13 As Label"; _label13 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=23593008; - //BA.debugLineNum = 23593008;BA.debugLine="label13 = lv_promos.TwoLinesAndBitmap.Label"; -_label13 = __ref._lv_promos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesAndBitmap().Label; -RDebugUtils.currentLine=23593009; - //BA.debugLineNum = 23593009;BA.debugLine="label13.TextSize = 15"; + //BA.debugLineNum = 302;BA.debugLine="label13 = lv_promos.TwoLinesAndBitmap.Label"; +_label13 = parent._lv_promos.getTwoLinesAndBitmap().Label; + //BA.debugLineNum = 303;BA.debugLine="label13.TextSize = 15"; _label13.setTextSize((float) (15)); -RDebugUtils.currentLine=23593010; - //BA.debugLineNum = 23593010;BA.debugLine="label13.TextColor = Colors.Black"; + //BA.debugLineNum = 304;BA.debugLine="label13.TextColor = Colors.Black"; _label13.setTextColor(parent.__c.Colors.Black); -RDebugUtils.currentLine=23593011; - //BA.debugLineNum = 23593011;BA.debugLine="Dim label14 As Label"; + //BA.debugLineNum = 305;BA.debugLine="Dim label14 As Label"; _label14 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=23593012; - //BA.debugLineNum = 23593012;BA.debugLine="label14 = lv_promos.TwoLinesAndBitmap.SecondLabe"; -_label14 = __ref._lv_promos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesAndBitmap().SecondLabel; -RDebugUtils.currentLine=23593013; - //BA.debugLineNum = 23593013;BA.debugLine="label14.TextSize = 15"; + //BA.debugLineNum = 306;BA.debugLine="label14 = lv_promos.TwoLinesAndBitmap.SecondLabe"; +_label14 = parent._lv_promos.getTwoLinesAndBitmap().SecondLabel; + //BA.debugLineNum = 307;BA.debugLine="label14.TextSize = 15"; _label14.setTextSize((float) (15)); -RDebugUtils.currentLine=23593014; - //BA.debugLineNum = 23593014;BA.debugLine="label14.TextColor = Colors.Black"; + //BA.debugLineNum = 308;BA.debugLine="label14.TextColor = Colors.Black"; _label14.setTextColor(parent.__c.Colors.Black); -RDebugUtils.currentLine=23593015; - //BA.debugLineNum = 23593015;BA.debugLine="lfila.text = \"PROMOS\""; -__ref._lfila /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("PROMOS")); -RDebugUtils.currentLine=23593016; - //BA.debugLineNum = 23593016;BA.debugLine="If c2.RowCount > 0 Then"; + //BA.debugLineNum = 309;BA.debugLine="lfila.text = \"PROMOS\""; +parent._lfila.setText(BA.ObjectToCharSequence("PROMOS")); + //BA.debugLineNum = 310;BA.debugLine="If c2.RowCount > 0 Then"; if (true) break; case 16: //if this.state = 27; -if (__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { +if (parent._c2.getRowCount()>0) { this.state = 18; }if (true) break; case 18: //C this.state = 19; -RDebugUtils.currentLine=23593017; - //BA.debugLineNum = 23593017;BA.debugLine="For i=0 To c2.RowCount -1"; + //BA.debugLineNum = 311;BA.debugLine="For i=0 To c2.RowCount -1"; if (true) break; case 19: //for this.state = 26; step57 = 1; -limit57 = (int) (__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +limit57 = (int) (parent._c2.getRowCount()-1); _i = (int) (0) ; this.state = 30; if (true) break; @@ -2592,15 +1868,12 @@ if (true) break; case 21: //C this.state = 22; -RDebugUtils.currentLine=23593018; - //BA.debugLineNum = 23593018;BA.debugLine="c2.Position=i"; -__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=23593019; - //BA.debugLineNum = 23593019;BA.debugLine="Private tm As Map = Subs.procesaPromocion(c2.G"; + //BA.debugLineNum = 312;BA.debugLine="c2.Position=i"; +parent._c2.setPosition(_i); + //BA.debugLineNum = 313;BA.debugLine="Private tm As Map = Subs.procesaPromocion(c2.G"; _tm = new anywheresoftware.b4a.objects.collections.Map(); -_tm = parent._subs._procesapromocion /*anywheresoftware.b4a.objects.collections.Map*/ (ba,__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_ID"),__ref._clienteid /*String*/ ); -RDebugUtils.currentLine=23593020; - //BA.debugLineNum = 23593020;BA.debugLine="If tm.Get(\"status\") = \"ok\" Then 'Solo muestral"; +_tm = parent._subs._procesapromocion /*anywheresoftware.b4a.objects.collections.Map*/ (ba,parent._c2.GetString("CAT_GP_ID"),parent._clienteid); + //BA.debugLineNum = 314;BA.debugLine="If tm.Get(\"status\") = \"ok\" Then 'Solo muestral"; if (true) break; case 22: @@ -2613,9 +1886,8 @@ this.state = 24; case 24: //C this.state = 25; -RDebugUtils.currentLine=23593021; - //BA.debugLineNum = 23593021;BA.debugLine="lv_promos.AddTwoLines(c2.GetString(\"CAT_GP_NO"; -__ref._lv_promos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddTwoLines(BA.ObjectToCharSequence(__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_NOMBRE")),BA.ObjectToCharSequence("# "+__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_ALMACEN")+" $ "+__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_PRECIO")+" F:"+BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_tm.Get((Object)("mp"))))).Get((Object)("prodsFijosCant")))+" V:"+BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_tm.Get((Object)("mp"))))).Get((Object)("prodsVariablesCant"))))); + //BA.debugLineNum = 315;BA.debugLine="lv_promos.AddTwoLines(c2.GetString(\"CAT_GP_NO"; +parent._lv_promos.AddTwoLines(BA.ObjectToCharSequence(parent._c2.GetString("CAT_GP_NOMBRE")),BA.ObjectToCharSequence("# "+parent._c2.GetString("CAT_GP_ALMACEN")+" $ "+parent._c2.GetString("CAT_GP_PRECIO")+" F:"+BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_tm.Get((Object)("mp"))))).Get((Object)("prodsFijosCant")))+" V:"+BA.ObjectToString(((anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_tm.Get((Object)("mp"))))).Get((Object)("prodsVariablesCant"))))); if (true) break; case 25: @@ -2635,372 +1907,243 @@ case 27: //C this.state = 28; ; -RDebugUtils.currentLine=23593025; - //BA.debugLineNum = 23593025;BA.debugLine="c2.Close"; -__ref._c2 /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 319;BA.debugLine="c2.Close"; +parent._c2.Close(); if (true) break; case 28: //C this.state = -1; ; -RDebugUtils.currentLine=23593027; - //BA.debugLineNum = 23593027;BA.debugLine="entro = \"4\""; -__ref._entro /*String*/ = "4"; -RDebugUtils.currentLine=23593028; - //BA.debugLineNum = 23593028;BA.debugLine="End Sub"; + //BA.debugLineNum = 321;BA.debugLine="entro = \"4\""; +parent._entro = "4"; + //BA.debugLineNum = 322;BA.debugLine="End Sub"; if (true) break; } } } } -public String _lv_prodspedido_itemlongclick(keymon.lat.medicomed.c_productos __ref,int _position,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "lv_prodspedido_itemlongclick", false)) - {return ((String) Debug.delegate(ba, "lv_prodspedido_itemlongclick", new Object[] {_position,_value}));} +public String _lv_prodspedido_itemlongclick(int _position,Object _value) throws Exception{ String _sdate = ""; String _stime = ""; String _clie_id = ""; String _usuario = ""; -RDebugUtils.currentLine=25034752; - //BA.debugLineNum = 25034752;BA.debugLine="Private Sub lv_prodsPedido_ItemLongClick (Position"; -RDebugUtils.currentLine=25034753; - //BA.debugLineNum = 25034753;BA.debugLine="Private sDate,sTime, clie_id, usuario As String"; + //BA.debugLineNum = 739;BA.debugLine="Private Sub lv_prodsPedido_ItemLongClick (Position"; + //BA.debugLineNum = 740;BA.debugLine="Private sDate,sTime, clie_id, usuario As String"; _sdate = ""; _stime = ""; _clie_id = ""; _usuario = ""; -RDebugUtils.currentLine=25034754; - //BA.debugLineNum = 25034754;BA.debugLine="If Not(Subs.pedidoGuardado) Then"; + //BA.debugLineNum = 741;BA.debugLine="If Not(Subs.pedidoGuardado) Then"; if (__c.Not(_subs._pedidoguardado /*boolean*/ (ba))) { -RDebugUtils.currentLine=25034755; - //BA.debugLineNum = 25034755;BA.debugLine="result = Msgbox2(\"Seguro que desea borrar este"; -__ref._result /*String*/ = BA.NumberToString(__c.Msgbox2(BA.ObjectToCharSequence("Seguro que desea borrar este articulo?"),BA.ObjectToCharSequence("Borrar Articulo"),"Si","","No",(android.graphics.Bitmap)(__c.LoadBitmap(__c.File.getDirAssets(),"alert2.png").getObject()),ba)); -RDebugUtils.currentLine=25034756; - //BA.debugLineNum = 25034756;BA.debugLine="If result = DialogResponse.POSITIVE Then"; -if ((__ref._result /*String*/ ).equals(BA.NumberToString(__c.DialogResponse.POSITIVE))) { -RDebugUtils.currentLine=25034757; - //BA.debugLineNum = 25034757;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"select PE_"; -__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*/ .ExecQuery2("select PE_PROID,PE_CANT FROM PEDIDO where pe_pronombre = ? and pe_cliente in (Select CUENTA from cuentaa) ",new String[]{BA.ObjectToString(_value)}))); -RDebugUtils.currentLine=25034758; - //BA.debugLineNum = 25034758;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=25034759; - //BA.debugLineNum = 25034759;BA.debugLine="Log(\"aqui1\")"; -__c.LogImpl("325034759","aqui1",0); -RDebugUtils.currentLine=25034760; - //BA.debugLineNum = 25034760;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update ca"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen + ? where cat_gp_id = ?",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_CANT")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_PROID"))})); -RDebugUtils.currentLine=25034761; - //BA.debugLineNum = 25034761;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT IN"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO INVENT_X_ENVIAR (ALMACEN , PROID , CANTIDAD ) VALUES(?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_subs._traealmacen /*String*/ (ba)),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_PROID")),(Object)((double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PE_CANT")))*-1)})); -RDebugUtils.currentLine=25034762; - //BA.debugLineNum = 25034762;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=25034763; - //BA.debugLineNum = 25034763;BA.debugLine="Log(\"aqui2\")"; -__c.LogImpl("325034763","aqui2",0); -RDebugUtils.currentLine=25034764; - //BA.debugLineNum = 25034764;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"select cou"; -__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*/ .ExecQuery2("select count(*) AS CUANTOS from cat_gunaprod where CAT_GP_ID in (select pe_cedis from pedido where pe_pronombre = ? and pe_cliente in (Select CUENTA from cuentaa)) and CAT_GP_CLASIF = 'PROMOS' AND CAT_GP_TIPO = 'PROMOS' AND CAT_GP_SUBTIPO = 'PROMOS'",new String[]{BA.ObjectToString(_value)}))); -RDebugUtils.currentLine=25034765; - //BA.debugLineNum = 25034765;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=25034766; - //BA.debugLineNum = 25034766;BA.debugLine="If c.GetString(\"CUANTOS\") > 0 Then"; -if ((double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")))>0) { -RDebugUtils.currentLine=25034767; - //BA.debugLineNum = 25034767;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete f"; + //BA.debugLineNum = 742;BA.debugLine="result = Msgbox2(\"Seguro que desea borrar este"; +_result = BA.NumberToString(__c.Msgbox2(BA.ObjectToCharSequence("Seguro que desea borrar este articulo?"),BA.ObjectToCharSequence("Borrar Articulo"),"Si","","No",(android.graphics.Bitmap)(__c.LoadBitmap(__c.File.getDirAssets(),"alert2.png").getObject()),ba)); + //BA.debugLineNum = 743;BA.debugLine="If result = DialogResponse.POSITIVE Then"; +if ((_result).equals(BA.NumberToString(__c.DialogResponse.POSITIVE))) { + //BA.debugLineNum = 744;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"select PE_"; +_c = (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*/ .ExecQuery2("select PE_PROID,PE_CANT FROM PEDIDO where pe_pronombre = ? and pe_cliente in (Select CUENTA from cuentaa) ",new String[]{BA.ObjectToString(_value)}))); + //BA.debugLineNum = 745;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 746;BA.debugLine="Log(\"aqui1\")"; +__c.LogImpl("357999367","aqui1",0); + //BA.debugLineNum = 747;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update ca"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen + ? where cat_gp_id = ?",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_c.GetString("PE_CANT")),(Object)(_c.GetString("PE_PROID"))})); + //BA.debugLineNum = 748;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT IN"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO INVENT_X_ENVIAR (ALMACEN , PROID , CANTIDAD ) VALUES(?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_subs._traealmacen /*String*/ (ba)),(Object)(_c.GetString("PE_PROID")),(Object)((double)(Double.parseDouble(_c.GetString("PE_CANT")))*-1)})); + //BA.debugLineNum = 749;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 750;BA.debugLine="Log(\"aqui2\")"; +__c.LogImpl("357999371","aqui2",0); + //BA.debugLineNum = 751;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery2(\"select cou"; +_c = (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*/ .ExecQuery2("select count(*) AS CUANTOS from cat_gunaprod where CAT_GP_ID in (select pe_cedis from pedido where pe_pronombre = ? and pe_cliente in (Select CUENTA from cuentaa)) and CAT_GP_CLASIF = 'PROMOS' AND CAT_GP_TIPO = 'PROMOS' AND CAT_GP_SUBTIPO = 'PROMOS'",new String[]{BA.ObjectToString(_value)}))); + //BA.debugLineNum = 752;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 753;BA.debugLine="If c.GetString(\"CUANTOS\") > 0 Then"; +if ((double)(Double.parseDouble(_c.GetString("CUANTOS")))>0) { + //BA.debugLineNum = 754;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete f"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("delete from pedido where pe_cedis in (select pe_cedis from pedido where pe_pronombre = ?) and pe_cliente in (Select CUENTA from cuentaa)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{_value})); -RDebugUtils.currentLine=25034768; - //BA.debugLineNum = 25034768;BA.debugLine="Log(\"aqui3\")"; -__c.LogImpl("325034768","aqui3",0); + //BA.debugLineNum = 755;BA.debugLine="Log(\"aqui3\")"; +__c.LogImpl("357999376","aqui3",0); }else { -RDebugUtils.currentLine=25034770; - //BA.debugLineNum = 25034770;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete f"; + //BA.debugLineNum = 757;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete f"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("delete from pedido where pe_pronombre = ? and pe_cliente in (Select CUENTA from cuentaa)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{_value})); -RDebugUtils.currentLine=25034771; - //BA.debugLineNum = 25034771;BA.debugLine="Log(\"aqui4\")"; -__c.LogImpl("325034771","aqui4",0); + //BA.debugLineNum = 758;BA.debugLine="Log(\"aqui4\")"; +__c.LogImpl("357999379","aqui4",0); }; -RDebugUtils.currentLine=25034773; - //BA.debugLineNum = 25034773;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; + //BA.debugLineNum = 760;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; __c.DateTime.setDateFormat("MM/dd/yyyy"); -RDebugUtils.currentLine=25034774; - //BA.debugLineNum = 25034774;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; + //BA.debugLineNum = 761;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; _sdate = __c.DateTime.Date(__c.DateTime.getNow()); -RDebugUtils.currentLine=25034775; - //BA.debugLineNum = 25034775;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; + //BA.debugLineNum = 762;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; _stime = __c.DateTime.Time(__c.DateTime.getNow()); -RDebugUtils.currentLine=25034776; - //BA.debugLineNum = 25034776;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUEN"; -__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 CUENTA from cuentaa"))); -RDebugUtils.currentLine=25034777; - //BA.debugLineNum = 25034777;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=25034778; - //BA.debugLineNum = 25034778;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; -_clie_id = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUENTA"); -RDebugUtils.currentLine=25034779; - //BA.debugLineNum = 25034779;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUA"; -__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=25034780; - //BA.debugLineNum = 25034780;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=25034781; - //BA.debugLineNum = 25034781;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; -_usuario = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("USUARIO"); -RDebugUtils.currentLine=25034782; - //BA.debugLineNum = 25034782;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum("; -__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 sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, count(*) as CUANTOS FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); -RDebugUtils.currentLine=25034783; - //BA.debugLineNum = 25034783;BA.debugLine="c.Position=0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=25034784; - //BA.debugLineNum = 25034784;BA.debugLine="If c.GetString(\"CUANTOS\") > 0 Then"; -if ((double)(Double.parseDouble(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")))>0) { -RDebugUtils.currentLine=25034785; - //BA.debugLineNum = 25034785;BA.debugLine="Log(\"aqui5\")"; -__c.LogImpl("325034785","aqui5",0); -RDebugUtils.currentLine=25034786; - //BA.debugLineNum = 25034786;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fr"; + //BA.debugLineNum = 763;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUEN"; +_c = (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 CUENTA from cuentaa"))); + //BA.debugLineNum = 764;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 765;BA.debugLine="clie_id = c.GetString(\"CUENTA\")"; +_clie_id = _c.GetString("CUENTA"); + //BA.debugLineNum = 766;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select USUA"; +_c = (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"))); + //BA.debugLineNum = 767;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 768;BA.debugLine="usuario = c.GetString(\"USUARIO\")"; +_usuario = _c.GetString("USUARIO"); + //BA.debugLineNum = 769;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum("; +_c = (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 sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, count(*) as CUANTOS FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); + //BA.debugLineNum = 770;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 771;BA.debugLine="If c.GetString(\"CUANTOS\") > 0 Then"; +if ((double)(Double.parseDouble(_c.GetString("CUANTOS")))>0) { + //BA.debugLineNum = 772;BA.debugLine="Log(\"aqui5\")"; +__c.LogImpl("357999393","aqui5",0); + //BA.debugLineNum = 773;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fr"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=25034787; - //BA.debugLineNum = 25034787;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert i"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT) VALUES (?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_clie_id),(Object)(_sdate+_stime),(Object)(_usuario),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CANT_CLIE")),(Object)(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("TOTAL_CLIE")),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ )})); -RDebugUtils.currentLine=25034790; - //BA.debugLineNum = 25034790;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fr"; + //BA.debugLineNum = 774;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert i"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT) VALUES (?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_clie_id),(Object)(_sdate+_stime),(Object)(_usuario),(Object)(_c.GetString("CANT_CLIE")),(Object)(_c.GetString("TOTAL_CLIE")),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lon_gps /*String*/ ),(Object)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._lat_gps /*String*/ )})); + //BA.debugLineNum = 777;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fr"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=25034791; - //BA.debugLineNum = 25034791;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE km"; + //BA.debugLineNum = 778;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE km"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("UPDATE kmt_info set gestion = 0 where CAT_CL_CODIGO In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=25034792; - //BA.debugLineNum = 25034792;BA.debugLine="h =B4XPages.MainPage.skmt.ExecQuery(\"select su"; -__ref._h /*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 sum(PE_CANT) as PC_NOART, sum (PE_COSTO_TOT) as PC_MONTO from PEDIDO where PE_CLIENTE in (Select CUENTA from cuentaa) AND PE_PROID NOT IN (SELECT CAT_PA_ID FROM PROMOS_COMP )"))); -RDebugUtils.currentLine=25034793; - //BA.debugLineNum = 25034793;BA.debugLine="h.Position=0"; -__ref._h /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=25034794; - //BA.debugLineNum = 25034794;BA.debugLine="l_cant.Text = h.GetString(\"PC_NOART\")"; -__ref._l_cant /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._h /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_NOART"))); -RDebugUtils.currentLine=25034795; - //BA.debugLineNum = 25034795;BA.debugLine="l_total2.Text = h.GetString(\"PC_MONTO\")"; -__ref._l_total2 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(__ref._h /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("PC_MONTO"))); -RDebugUtils.currentLine=25034796; - //BA.debugLineNum = 25034796;BA.debugLine="h.Close"; -__ref._h /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 779;BA.debugLine="h =B4XPages.MainPage.skmt.ExecQuery(\"select su"; +_h = (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 sum(PE_CANT) as PC_NOART, sum (PE_COSTO_TOT) as PC_MONTO from PEDIDO where PE_CLIENTE in (Select CUENTA from cuentaa) AND PE_PROID NOT IN (SELECT CAT_PA_ID FROM PROMOS_COMP )"))); + //BA.debugLineNum = 780;BA.debugLine="h.Position=0"; +_h.setPosition((int) (0)); + //BA.debugLineNum = 781;BA.debugLine="l_cant.Text = h.GetString(\"PC_NOART\")"; +_l_cant.setText(BA.ObjectToCharSequence(_h.GetString("PC_NOART"))); + //BA.debugLineNum = 782;BA.debugLine="l_total2.Text = h.GetString(\"PC_MONTO\")"; +_l_total2.setText(BA.ObjectToCharSequence(_h.GetString("PC_MONTO"))); + //BA.debugLineNum = 783;BA.debugLine="h.Close"; +_h.Close(); }else { -RDebugUtils.currentLine=25034798; - //BA.debugLineNum = 25034798;BA.debugLine="Log(\"aqui6\")"; -__c.LogImpl("325034798","aqui6",0); -RDebugUtils.currentLine=25034799; - //BA.debugLineNum = 25034799;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fr"; + //BA.debugLineNum = 785;BA.debugLine="Log(\"aqui6\")"; +__c.LogImpl("357999406","aqui6",0); + //BA.debugLineNum = 786;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete fr"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=25034800; - //BA.debugLineNum = 25034800;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE km"; + //BA.debugLineNum = 787;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE km"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("UPDATE kmt_info set gestion = 0 where CAT_CL_CODIGO In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=25034801; - //BA.debugLineNum = 25034801;BA.debugLine="h =B4XPages.MainPage.skmt.ExecQuery(\"select su"; -__ref._h /*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 sum(PE_CANT) as PC_NOART, sum (PE_COSTO_TOT) as PC_MONTO from PEDIDO where PE_CLIENTE in (Select CUENTA from cuentaa) AND PE_PROID NOT IN (SELECT CAT_PA_ID FROM PROMOS_COMP )"))); -RDebugUtils.currentLine=25034802; - //BA.debugLineNum = 25034802;BA.debugLine="h.Position=0"; -__ref._h /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=25034803; - //BA.debugLineNum = 25034803;BA.debugLine="l_cant.Text = 0"; -__ref._l_cant /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(0)); -RDebugUtils.currentLine=25034804; - //BA.debugLineNum = 25034804;BA.debugLine="l_total2.Text = 0"; -__ref._l_total2 /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(0)); -RDebugUtils.currentLine=25034805; - //BA.debugLineNum = 25034805;BA.debugLine="h.Close"; -__ref._h /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 788;BA.debugLine="h =B4XPages.MainPage.skmt.ExecQuery(\"select su"; +_h = (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 sum(PE_CANT) as PC_NOART, sum (PE_COSTO_TOT) as PC_MONTO from PEDIDO where PE_CLIENTE in (Select CUENTA from cuentaa) AND PE_PROID NOT IN (SELECT CAT_PA_ID FROM PROMOS_COMP )"))); + //BA.debugLineNum = 789;BA.debugLine="h.Position=0"; +_h.setPosition((int) (0)); + //BA.debugLineNum = 790;BA.debugLine="l_cant.Text = 0"; +_l_cant.setText(BA.ObjectToCharSequence(0)); + //BA.debugLineNum = 791;BA.debugLine="l_total2.Text = 0"; +_l_total2.setText(BA.ObjectToCharSequence(0)); + //BA.debugLineNum = 792;BA.debugLine="h.Close"; +_h.Close(); }; -RDebugUtils.currentLine=25034807; - //BA.debugLineNum = 25034807;BA.debugLine="b_terminar1_Click"; -__ref._b_terminar1_click /*String*/ (null); + //BA.debugLineNum = 794;BA.debugLine="b_terminar1_Click"; +_b_terminar1_click(); }; }else { -RDebugUtils.currentLine=25034810; - //BA.debugLineNum = 25034810;BA.debugLine="ToastMessageShow(\"Esta venta ya esta guardada, n"; + //BA.debugLineNum = 797;BA.debugLine="ToastMessageShow(\"Esta venta ya esta guardada, n"; __c.ToastMessageShow(BA.ObjectToCharSequence("Esta venta ya esta guardada, no se puede editar ni borrar."),__c.False); }; -RDebugUtils.currentLine=25034812; - //BA.debugLineNum = 25034812;BA.debugLine="End Sub"; + //BA.debugLineNum = 799;BA.debugLine="End Sub"; return ""; } -public String _lv_promos_itemclick(keymon.lat.medicomed.c_productos __ref,int _position,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "lv_promos_itemclick", false)) - {return ((String) Debug.delegate(ba, "lv_promos_itemclick", new Object[] {_position,_value}));} +public String _lv_promos_itemclick(int _position,Object _value) throws Exception{ keymon.lat.medicomed.c_cliente _cliente = null; keymon.lat.medicomed.c_promos _promos = null; -RDebugUtils.currentLine=23658496; - //BA.debugLineNum = 23658496;BA.debugLine="Sub lv_promos_ItemClick (Position As Int, Value As"; -RDebugUtils.currentLine=23658497; - //BA.debugLineNum = 23658497;BA.debugLine="clv_prods_ll.AsView.Visible = False"; -__ref._clv_prods_ll /*b4a.example3.customlistview*/ ._asview().setVisible(__c.False); -RDebugUtils.currentLine=23658498; - //BA.debugLineNum = 23658498;BA.debugLine="Dim cliente As C_Cliente = B4XPages.GetPage(\"Clie"; + //BA.debugLineNum = 324;BA.debugLine="Sub lv_promos_ItemClick (Position As Int, Value As"; + //BA.debugLineNum = 325;BA.debugLine="clv_prods_ll.AsView.Visible = False"; +_clv_prods_ll._asview().setVisible(__c.False); + //BA.debugLineNum = 326;BA.debugLine="Dim cliente As C_Cliente = B4XPages.GetPage(\"Clie"; _cliente = (keymon.lat.medicomed.c_cliente)(_b4xpages._getpage /*Object*/ (ba,"Cliente")); -RDebugUtils.currentLine=23658500; - //BA.debugLineNum = 23658500;BA.debugLine="If Value = \"PROMOS\" And cliente.cuenta <> \"N\" The"; + //BA.debugLineNum = 328;BA.debugLine="If Value = \"PROMOS\" And cliente.cuenta <> \"N\" The"; if ((_value).equals((Object)("PROMOS")) && (_cliente._cuenta /*String*/ ).equals("N") == false) { -RDebugUtils.currentLine=23658501; - //BA.debugLineNum = 23658501;BA.debugLine="entro = \"3\""; -__ref._entro /*String*/ = "3"; -RDebugUtils.currentLine=23658502; - //BA.debugLineNum = 23658502;BA.debugLine="marca = \"PROMOS\""; -__ref._marca /*String*/ = "PROMOS"; -RDebugUtils.currentLine=23658503; - //BA.debugLineNum = 23658503;BA.debugLine="tipo = \"PROMOS\""; -__ref._tipo /*String*/ = "PROMOS"; - }else -{RDebugUtils.currentLine=23658504; - //BA.debugLineNum = 23658504;BA.debugLine="Else if Value = \"PROMOS\" And cliente.cuenta = \"N\""; -if ((_value).equals((Object)("PROMOS")) && (_cliente._cuenta /*String*/ ).equals("N")) { -RDebugUtils.currentLine=23658505; - //BA.debugLineNum = 23658505;BA.debugLine="entro = \"5\""; -__ref._entro /*String*/ = "5"; -RDebugUtils.currentLine=23658506; - //BA.debugLineNum = 23658506;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; + //BA.debugLineNum = 329;BA.debugLine="entro = \"3\""; +_entro = "3"; + //BA.debugLineNum = 330;BA.debugLine="marca = \"PROMOS\""; +_marca = "PROMOS"; + //BA.debugLineNum = 331;BA.debugLine="tipo = \"PROMOS\""; +_tipo = "PROMOS"; + }else if((_value).equals((Object)("PROMOS")) && (_cliente._cuenta /*String*/ ).equals("N")) { + //BA.debugLineNum = 333;BA.debugLine="entro = \"5\""; +_entro = "5"; + //BA.debugLineNum = 334;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; _b4xpages._showpage /*String*/ (ba,"Cliente"); - }} -; -RDebugUtils.currentLine=23658508; - //BA.debugLineNum = 23658508;BA.debugLine="If entro = \"3\" Then"; -if ((__ref._entro /*String*/ ).equals("3")) { - }else -{RDebugUtils.currentLine=23658510; - //BA.debugLineNum = 23658510;BA.debugLine="Else If entro = \"4\" Then"; -if ((__ref._entro /*String*/ ).equals("4")) { -RDebugUtils.currentLine=23658511; - //BA.debugLineNum = 23658511;BA.debugLine="Log(\"Entro = 4\")"; -__c.LogImpl("323658511","Entro = 4",0); -RDebugUtils.currentLine=23658512; - //BA.debugLineNum = 23658512;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + }; + //BA.debugLineNum = 336;BA.debugLine="If entro = \"3\" Then"; +if ((_entro).equals("3")) { + }else if((_entro).equals("4")) { + //BA.debugLineNum = 339;BA.debugLine="Log(\"Entro = 4\")"; +__c.LogImpl("356623119","Entro = 4",0); + //BA.debugLineNum = 340;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from PROID"); -RDebugUtils.currentLine=23658513; - //BA.debugLineNum = 23658513;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; + //BA.debugLineNum = 341;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PROID VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{_value})); -RDebugUtils.currentLine=23658514; - //BA.debugLineNum = 23658514;BA.debugLine="Dim promos As C_Promos = B4XPages.GetPage(\"Promo"; + //BA.debugLineNum = 342;BA.debugLine="Dim promos As C_Promos = B4XPages.GetPage(\"Promo"; _promos = (keymon.lat.medicomed.c_promos)(_b4xpages._getpage /*Object*/ (ba,"Promos")); -RDebugUtils.currentLine=23658515; - //BA.debugLineNum = 23658515;BA.debugLine="promos.laPromo = Subs.traeProdIdDeBD.Get(\"id\")"; + //BA.debugLineNum = 343;BA.debugLine="promos.laPromo = Subs.traeProdIdDeBD.Get(\"id\")"; _promos._lapromo /*String*/ = BA.ObjectToString(_subs._traeprodiddebd /*anywheresoftware.b4a.objects.collections.Map*/ (ba).Get((Object)("id"))); -RDebugUtils.currentLine=23658516; - //BA.debugLineNum = 23658516;BA.debugLine="promos.elCliente = Subs.traeUsuarioDeBD"; + //BA.debugLineNum = 344;BA.debugLine="promos.elCliente = Subs.traeUsuarioDeBD"; _promos._elcliente /*String*/ = _subs._traeusuariodebd /*String*/ (ba); -RDebugUtils.currentLine=23658517; - //BA.debugLineNum = 23658517;BA.debugLine="B4XPages.ShowPage(\"Promos\")"; + //BA.debugLineNum = 345;BA.debugLine="B4XPages.ShowPage(\"Promos\")"; _b4xpages._showpage /*String*/ (ba,"Promos"); - }} -; -RDebugUtils.currentLine=23658519; - //BA.debugLineNum = 23658519;BA.debugLine="End Sub"; + }; + //BA.debugLineNum = 347;BA.debugLine="End Sub"; return ""; } -public String _lv_promos_itemlongclick(keymon.lat.medicomed.c_productos __ref,int _position,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "lv_promos_itemlongclick", false)) - {return ((String) Debug.delegate(ba, "lv_promos_itemlongclick", new Object[] {_position,_value}));} +public String _lv_promos_itemlongclick(int _position,Object _value) throws Exception{ String _id = ""; -RDebugUtils.currentLine=24576000; - //BA.debugLineNum = 24576000;BA.debugLine="Private Sub lv_promos_ItemLongClick (Position As I"; -RDebugUtils.currentLine=24576001; - //BA.debugLineNum = 24576001;BA.debugLine="Log(\"Promo longclic = \"&Value)"; -__c.LogImpl("324576001","Promo longclic = "+BA.ObjectToString(_value),0); -RDebugUtils.currentLine=24576002; - //BA.debugLineNum = 24576002;BA.debugLine="Private id As String = \"\""; + //BA.debugLineNum = 655;BA.debugLine="Private Sub lv_promos_ItemLongClick (Position As I"; + //BA.debugLineNum = 656;BA.debugLine="Log(\"Promo longclic = \"&Value)"; +__c.LogImpl("357540609","Promo longclic = "+BA.ObjectToString(_value),0); + //BA.debugLineNum = 657;BA.debugLine="Private id As String = \"\""; _id = ""; -RDebugUtils.currentLine=24576003; - //BA.debugLineNum = 24576003;BA.debugLine="Dim c As Cursor = B4XPages.MainPage.skmt.ExecQuer"; + //BA.debugLineNum = 658;BA.debugLine="Dim c As Cursor = B4XPages.MainPage.skmt.ExecQuer"; _c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); _c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select CAT_GP_ID from cat_gunaprod where CAT_GP_TIPO = 'PROMOS' and CAT_GP_NOMBRE = '"+__c.SmartStringFormatter("",_value)+"'")))); -RDebugUtils.currentLine=24576004; - //BA.debugLineNum = 24576004;BA.debugLine="If c.RowCount > 0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=24576005; - //BA.debugLineNum = 24576005;BA.debugLine="c.Position = 0"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=24576006; - //BA.debugLineNum = 24576006;BA.debugLine="id = c.GetString(\"CAT_GP_ID\")"; -_id = __ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CAT_GP_ID"); + //BA.debugLineNum = 659;BA.debugLine="If c.RowCount > 0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 660;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 661;BA.debugLine="id = c.GetString(\"CAT_GP_ID\")"; +_id = _c.GetString("CAT_GP_ID"); }; -RDebugUtils.currentLine=24576008; - //BA.debugLineNum = 24576008;BA.debugLine="l_info.Text = $\"ID: ${id}${CRLF}${Value}\"$"; -__ref._l_info /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(("ID: "+__c.SmartStringFormatter("",(Object)(_id))+""+__c.SmartStringFormatter("",(Object)(__c.CRLF))+""+__c.SmartStringFormatter("",_value)+""))); -RDebugUtils.currentLine=24576009; - //BA.debugLineNum = 24576009;BA.debugLine="l_info.Visible = True"; -__ref._l_info /*anywheresoftware.b4a.objects.LabelWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=24576010; - //BA.debugLineNum = 24576010;BA.debugLine="End Sub"; + //BA.debugLineNum = 663;BA.debugLine="l_info.Text = $\"ID: ${id}${CRLF}${Value}\"$"; +_l_info.setText(BA.ObjectToCharSequence(("ID: "+__c.SmartStringFormatter("",(Object)(_id))+""+__c.SmartStringFormatter("",(Object)(__c.CRLF))+""+__c.SmartStringFormatter("",_value)+""))); + //BA.debugLineNum = 664;BA.debugLine="l_info.Visible = True"; +_l_info.setVisible(__c.True); + //BA.debugLineNum = 665;BA.debugLine="End Sub"; return ""; } -public String _lv_subtipo_itemclick(keymon.lat.medicomed.c_productos __ref,int _position,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "lv_subtipo_itemclick", false)) - {return ((String) Debug.delegate(ba, "lv_subtipo_itemclick", new Object[] {_position,_value}));} -RDebugUtils.currentLine=24772608; - //BA.debugLineNum = 24772608;BA.debugLine="Private Sub lv_subtipo_ItemClick (Position As Int,"; -RDebugUtils.currentLine=24772622; - //BA.debugLineNum = 24772622;BA.debugLine="End Sub"; +public String _lv_subtipo_itemclick(int _position,Object _value) throws Exception{ + //BA.debugLineNum = 692;BA.debugLine="Private Sub lv_subtipo_ItemClick (Position As Int,"; + //BA.debugLineNum = 706;BA.debugLine="End Sub"; return ""; } -public String _lv_tipo_itemclick(keymon.lat.medicomed.c_productos __ref,int _position,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "lv_tipo_itemclick", false)) - {return ((String) Debug.delegate(ba, "lv_tipo_itemclick", new Object[] {_position,_value}));} -RDebugUtils.currentLine=24707072; - //BA.debugLineNum = 24707072;BA.debugLine="Private Sub lv_tipo_ItemClick (Position As Int, Va"; -RDebugUtils.currentLine=24707090; - //BA.debugLineNum = 24707090;BA.debugLine="End Sub"; +public String _lv_tipo_itemclick(int _position,Object _value) throws Exception{ + //BA.debugLineNum = 672;BA.debugLine="Private Sub lv_tipo_ItemClick (Position As Int, Va"; + //BA.debugLineNum = 690;BA.debugLine="End Sub"; return ""; } -public String _p_vistapreviatrans_click(keymon.lat.medicomed.c_productos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "p_vistapreviatrans_click", false)) - {return ((String) Debug.delegate(ba, "p_vistapreviatrans_click", null));} -RDebugUtils.currentLine=24838144; - //BA.debugLineNum = 24838144;BA.debugLine="Private Sub p_vistaPreviaTrans_Click"; -RDebugUtils.currentLine=24838146; - //BA.debugLineNum = 24838146;BA.debugLine="End Sub"; +public String _p_vistapreviatrans_click() throws Exception{ + //BA.debugLineNum = 708;BA.debugLine="Private Sub p_vistaPreviaTrans_Click"; + //BA.debugLineNum = 710;BA.debugLine="End Sub"; return ""; } -public String _pclv_addprods(keymon.lat.medicomed.c_productos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "pclv_addprods", false)) - {return ((String) Debug.delegate(ba, "pclv_addprods", null));} -RDebugUtils.currentLine=23461888; - //BA.debugLineNum = 23461888;BA.debugLine="Sub PCLV_AddProds"; -RDebugUtils.currentLine=23461890; - //BA.debugLineNum = 23461890;BA.debugLine="End Sub"; +public String _pclv_addprods() throws Exception{ + //BA.debugLineNum = 201;BA.debugLine="Sub PCLV_AddProds"; + //BA.debugLineNum = 203;BA.debugLine="End Sub"; return ""; } -public Object _pclv_hintrequested(keymon.lat.medicomed.c_productos __ref,int _index) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_productos"; -if (Debug.shouldDelegate(ba, "pclv_hintrequested", false)) - {return ((Object) Debug.delegate(ba, "pclv_hintrequested", new Object[] {_index}));} +public Object _pclv_hintrequested(int _index) throws Exception{ String _word = ""; -RDebugUtils.currentLine=25427968; - //BA.debugLineNum = 25427968;BA.debugLine="Sub PCLV_HintRequested(Index As Int) As Object"; -RDebugUtils.currentLine=25427969; - //BA.debugLineNum = 25427969;BA.debugLine="Dim word As String = listaHints.get(Index)"; -_word = BA.ObjectToString(__ref._listahints /*anywheresoftware.b4a.objects.collections.List*/ .Get(_index)); -RDebugUtils.currentLine=25427970; - //BA.debugLineNum = 25427970;BA.debugLine="Return word"; + //BA.debugLineNum = 965;BA.debugLine="Sub PCLV_HintRequested(Index As Int) As Object"; + //BA.debugLineNum = 966;BA.debugLine="Dim word As String = listaHints.get(Index)"; +_word = BA.ObjectToString(_listahints.Get(_index)); + //BA.debugLineNum = 967;BA.debugLine="Return word"; if (true) return (Object)(_word); -RDebugUtils.currentLine=25427971; - //BA.debugLineNum = 25427971;BA.debugLine="End Sub"; + //BA.debugLineNum = 968;BA.debugLine="End Sub"; return null; } -} \ No newline at end of file +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]); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/c_promos.java b/B4A/Objects/src/keymon/lat/medicomed/c_promos.java index 93f3eae..68a476c 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/c_promos.java +++ b/B4A/Objects/src/keymon/lat/medicomed/c_promos.java @@ -10,7 +10,7 @@ public class c_promos extends B4AClass.ImplB4AClass implements BA.SubDelegator{ private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.c_promos"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.c_promos"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class c_promos extends B4AClass.ImplB4AClass implements BA.SubDelegator{ 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.keywords.Common __c = null; public anywheresoftware.b4a.objects.B4XViewWrapper _root = null; public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; public anywheresoftware.b4a.objects.LabelWrapper _l_promodesc = null; @@ -88,26 +81,7 @@ 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_promos __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="c_promos"; -if (Debug.shouldDelegate(ba, "initialize", false)) - {return ((Object) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=25624576; - //BA.debugLineNum = 25624576;BA.debugLine="Public Sub Initialize As Object"; -RDebugUtils.currentLine=25624577; - //BA.debugLineNum = 25624577;BA.debugLine="Return Me"; -if (true) return this; -RDebugUtils.currentLine=25624578; - //BA.debugLineNum = 25624578;BA.debugLine="End Sub"; -return null; -} -public String _agregafijosalista(keymon.lat.medicomed.c_promos __ref,anywheresoftware.b4a.objects.collections.Map _mp,boolean _addlistitem) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_promos"; -if (Debug.shouldDelegate(ba, "agregafijosalista", false)) - {return ((String) Debug.delegate(ba, "agregafijosalista", new Object[] {_mp,_addlistitem}));} +public String _agregafijosalista(anywheresoftware.b4a.objects.collections.Map _mp,boolean _addlistitem) throws Exception{ boolean _thislog = false; int _cont = 0; anywheresoftware.b4a.objects.collections.List _pf = null; @@ -115,45 +89,32 @@ String _p = ""; String _tpi = ""; String _tpr = ""; int _ntpi = 0; -RDebugUtils.currentLine=25886720; - //BA.debugLineNum = 25886720;BA.debugLine="Sub agregaFijosALista(mp As Map, addListItem As Bo"; -RDebugUtils.currentLine=25886721; - //BA.debugLineNum = 25886721;BA.debugLine="Private thisLog As Boolean = False"; + //BA.debugLineNum = 162;BA.debugLine="Sub agregaFijosALista(mp As Map, addListItem As Bo"; + //BA.debugLineNum = 163;BA.debugLine="Private thisLog As Boolean = False"; _thislog = __c.False; -RDebugUtils.currentLine=25886722; - //BA.debugLineNum = 25886722;BA.debugLine="Private cont As Int = 0"; + //BA.debugLineNum = 164;BA.debugLine="Private cont As Int = 0"; _cont = (int) (0); -RDebugUtils.currentLine=25886723; - //BA.debugLineNum = 25886723;BA.debugLine="prodsFijosTot = 0"; -__ref._prodsfijostot /*float*/ = (float) (0); -RDebugUtils.currentLine=25886724; - //BA.debugLineNum = 25886724;BA.debugLine="Dim pf As List = mp.Get(\"prodsFijos\")"; + //BA.debugLineNum = 165;BA.debugLine="prodsFijosTot = 0"; +_prodsfijostot = (float) (0); + //BA.debugLineNum = 166;BA.debugLine="Dim pf As List = mp.Get(\"prodsFijos\")"; _pf = new anywheresoftware.b4a.objects.collections.List(); _pf = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_mp.Get((Object)("prodsFijos")))); -RDebugUtils.currentLine=25886725; - //BA.debugLineNum = 25886725;BA.debugLine="If pf.Size < 1 Then pf.Add(\"Sin productos fijos.\""; + //BA.debugLineNum = 167;BA.debugLine="If pf.Size < 1 Then pf.Add(\"Sin productos fijos.\""; if (_pf.getSize()<1) { _pf.Add((Object)("Sin productos fijos."));}; -RDebugUtils.currentLine=25886729; - //BA.debugLineNum = 25886729;BA.debugLine="prodsIds.clear"; -__ref._prodsids /*anywheresoftware.b4a.objects.collections.List*/ .Clear(); -RDebugUtils.currentLine=25886730; - //BA.debugLineNum = 25886730;BA.debugLine="prodsCants.clear"; -__ref._prodscants /*anywheresoftware.b4a.objects.collections.List*/ .Clear(); -RDebugUtils.currentLine=25886731; - //BA.debugLineNum = 25886731;BA.debugLine="prodsPrecios.clear"; -__ref._prodsprecios /*anywheresoftware.b4a.objects.collections.List*/ .Clear(); -RDebugUtils.currentLine=25886732; - //BA.debugLineNum = 25886732;BA.debugLine="prodsIds.Add(estaPromo)"; -__ref._prodsids /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(__ref._estapromo /*String*/ )); -RDebugUtils.currentLine=25886733; - //BA.debugLineNum = 25886733;BA.debugLine="prodsCants.Add(et_promoCant.text.As(Int))"; -__ref._prodscants /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(((int)(Double.parseDouble(__ref._et_promocant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))))); -RDebugUtils.currentLine=25886734; - //BA.debugLineNum = 25886734;BA.debugLine="prodsPrecios.Add(0)"; -__ref._prodsprecios /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(0)); -RDebugUtils.currentLine=25886735; - //BA.debugLineNum = 25886735;BA.debugLine="For Each p As String In pf"; + //BA.debugLineNum = 171;BA.debugLine="prodsIds.clear"; +_prodsids.Clear(); + //BA.debugLineNum = 172;BA.debugLine="prodsCants.clear"; +_prodscants.Clear(); + //BA.debugLineNum = 173;BA.debugLine="prodsPrecios.clear"; +_prodsprecios.Clear(); + //BA.debugLineNum = 174;BA.debugLine="prodsIds.Add(estaPromo)"; +_prodsids.Add((Object)(_estapromo)); + //BA.debugLineNum = 175;BA.debugLine="prodsCants.Add(et_promoCant.text.As(Int))"; +_prodscants.Add((Object)(((int)(Double.parseDouble(_et_promocant.getText()))))); + //BA.debugLineNum = 176;BA.debugLine="prodsPrecios.Add(0)"; +_prodsprecios.Add((Object)(0)); + //BA.debugLineNum = 177;BA.debugLine="For Each p As String In pf"; { final anywheresoftware.b4a.BA.IterableList group12 = _pf; final int groupLen12 = group12.getSize() @@ -161,140 +122,462 @@ final int groupLen12 = group12.getSize() ; for (; index12 < groupLen12;index12++){ _p = BA.ObjectToString(group12.Get(index12)); -RDebugUtils.currentLine=25886737; - //BA.debugLineNum = 25886737;BA.debugLine="If mp.Get(\"prodsFijosPiezas\").As(List).Size > 0"; + //BA.debugLineNum = 179;BA.debugLine="If mp.Get(\"prodsFijosPiezas\").As(List).Size > 0"; if (((anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_mp.Get((Object)("prodsFijosPiezas"))))).getSize()>0) { -RDebugUtils.currentLine=25886738; - //BA.debugLineNum = 25886738;BA.debugLine="Private tpi As String = mp.Get(\"prodsFijosPieza"; + //BA.debugLineNum = 180;BA.debugLine="Private tpi As String = mp.Get(\"prodsFijosPieza"; _tpi = BA.ObjectToString(((anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_mp.Get((Object)("prodsFijosPiezas"))))).Get(_cont)); }else { -RDebugUtils.currentLine=25886740; - //BA.debugLineNum = 25886740;BA.debugLine="Private tpi As String = 0"; + //BA.debugLineNum = 182;BA.debugLine="Private tpi As String = 0"; _tpi = BA.NumberToString(0); }; -RDebugUtils.currentLine=25886742; - //BA.debugLineNum = 25886742;BA.debugLine="If mp.Get(\"prodsFijosPrecios\").As(List).Size > 0"; + //BA.debugLineNum = 184;BA.debugLine="If mp.Get(\"prodsFijosPrecios\").As(List).Size > 0"; if (((anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_mp.Get((Object)("prodsFijosPrecios"))))).getSize()>0) { -RDebugUtils.currentLine=25886743; - //BA.debugLineNum = 25886743;BA.debugLine="Private tpr As String = mp.Get(\"prodsFijosPreci"; + //BA.debugLineNum = 185;BA.debugLine="Private tpr As String = mp.Get(\"prodsFijosPreci"; _tpr = BA.ObjectToString(((anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_mp.Get((Object)("prodsFijosPrecios"))))).Get(_cont)); }else { -RDebugUtils.currentLine=25886745; - //BA.debugLineNum = 25886745;BA.debugLine="Private tpr As String = 0"; + //BA.debugLineNum = 187;BA.debugLine="Private tpr As String = 0"; _tpr = BA.NumberToString(0); }; -RDebugUtils.currentLine=25886747; - //BA.debugLineNum = 25886747;BA.debugLine="prodsFijosTot = prodsFijosTot + (tpi * tpr)"; -__ref._prodsfijostot /*float*/ = (float) (__ref._prodsfijostot /*float*/ +((double)(Double.parseDouble(_tpi))*(double)(Double.parseDouble(_tpr)))); -RDebugUtils.currentLine=25886748; - //BA.debugLineNum = 25886748;BA.debugLine="If thisLog Then Log(\"|\"&tpi&\"|\"&p)"; + //BA.debugLineNum = 189;BA.debugLine="prodsFijosTot = prodsFijosTot + (tpi * tpr)"; +_prodsfijostot = (float) (_prodsfijostot+((double)(Double.parseDouble(_tpi))*(double)(Double.parseDouble(_tpr)))); + //BA.debugLineNum = 190;BA.debugLine="If thisLog Then Log(\"|\"&tpi&\"|\"&p)"; if (_thislog) { -__c.LogImpl("325886748","|"+_tpi+"|"+_p,0);}; -RDebugUtils.currentLine=25886749; - //BA.debugLineNum = 25886749;BA.debugLine="Private ntpi As Int = tpi * et_promoCant.text"; -_ntpi = (int) ((double)(Double.parseDouble(_tpi))*(double)(Double.parseDouble(__ref._et_promocant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))); -RDebugUtils.currentLine=25886750; - //BA.debugLineNum = 25886750;BA.debugLine="If addListItem And tpi > 0 Then lv_prodsFijos.Ad"; +__c.LogImpl("358851356","|"+_tpi+"|"+_p,0);}; + //BA.debugLineNum = 191;BA.debugLine="Private ntpi As Int = tpi * et_promoCant.text"; +_ntpi = (int) ((double)(Double.parseDouble(_tpi))*(double)(Double.parseDouble(_et_promocant.getText()))); + //BA.debugLineNum = 192;BA.debugLine="If addListItem And tpi > 0 Then lv_prodsFijos.Ad"; if (_addlistitem && (double)(Double.parseDouble(_tpi))>0) { -__ref._lv_prodsfijos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddSingleLine(BA.ObjectToCharSequence(BA.NumberToString(_ntpi)+" "+_subs._traeprodnombre /*String*/ (ba,_p)+" - $"+_tpr));}; -RDebugUtils.currentLine=25886751; - //BA.debugLineNum = 25886751;BA.debugLine="cont = cont+1"; +_lv_prodsfijos.AddSingleLine(BA.ObjectToCharSequence(BA.NumberToString(_ntpi)+" "+_subs._traeprodnombre /*String*/ (ba,_p)+" - $"+_tpr));}; + //BA.debugLineNum = 193;BA.debugLine="cont = cont+1"; _cont = (int) (_cont+1); -RDebugUtils.currentLine=25886754; - //BA.debugLineNum = 25886754;BA.debugLine="prodsIds.Add(p)"; -__ref._prodsids /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(_p)); -RDebugUtils.currentLine=25886755; - //BA.debugLineNum = 25886755;BA.debugLine="prodsCants.Add(tpi.As(Int)*et_promoCant.text.As("; -__ref._prodscants /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(((int)(Double.parseDouble(_tpi)))*((int)(Double.parseDouble(__ref._et_promocant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))))); -RDebugUtils.currentLine=25886756; - //BA.debugLineNum = 25886756;BA.debugLine="prodsPrecios.Add(tpr) '*et_promoCant.text.As(Int"; -__ref._prodsprecios /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(_tpr)); + //BA.debugLineNum = 196;BA.debugLine="prodsIds.Add(p)"; +_prodsids.Add((Object)(_p)); + //BA.debugLineNum = 197;BA.debugLine="prodsCants.Add(tpi.As(Int)*et_promoCant.text.As("; +_prodscants.Add((Object)(((int)(Double.parseDouble(_tpi)))*((int)(Double.parseDouble(_et_promocant.getText()))))); + //BA.debugLineNum = 198;BA.debugLine="prodsPrecios.Add(tpr) '*et_promoCant.text.As(Int"; +_prodsprecios.Add((Object)(_tpr)); } }; -RDebugUtils.currentLine=25886758; - //BA.debugLineNum = 25886758;BA.debugLine="End Sub"; + //BA.debugLineNum = 200;BA.debugLine="End Sub"; return ""; } -public String _b_continuar_click(keymon.lat.medicomed.c_promos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_promos"; -if (Debug.shouldDelegate(ba, "b_continuar_click", false)) - {return ((String) Debug.delegate(ba, "b_continuar_click", null));} +public String _b_continuar_click() throws Exception{ int _t = 0; String _pn = ""; keymon.lat.medicomed.c_productos _prodspage = null; -RDebugUtils.currentLine=26542080; - //BA.debugLineNum = 26542080;BA.debugLine="Private Sub b_continuar_Click"; -RDebugUtils.currentLine=26542081; - //BA.debugLineNum = 26542081;BA.debugLine="cuentaProds"; -__ref._cuentaprods /*String*/ (null); -RDebugUtils.currentLine=26542082; - //BA.debugLineNum = 26542082;BA.debugLine="Log(\"============================================"; -__c.LogImpl("326542082","====================================================================",0); -RDebugUtils.currentLine=26542083; - //BA.debugLineNum = 26542083;BA.debugLine="For t = 0 To prodsIds.Size - 1 'Guardamos los pro"; + //BA.debugLineNum = 394;BA.debugLine="Private Sub b_continuar_Click"; + //BA.debugLineNum = 395;BA.debugLine="cuentaProds"; +_cuentaprods(); + //BA.debugLineNum = 396;BA.debugLine="Log(\"============================================"; +__c.LogImpl("359506690","====================================================================",0); + //BA.debugLineNum = 397;BA.debugLine="For t = 0 To prodsIds.Size - 1 'Guardamos los pro"; { final int step3 = 1; -final int limit3 = (int) (__ref._prodsids /*anywheresoftware.b4a.objects.collections.List*/ .getSize()-1); +final int limit3 = (int) (_prodsids.getSize()-1); _t = (int) (0) ; for (;_t <= limit3 ;_t = _t + step3 ) { -RDebugUtils.currentLine=26542084; - //BA.debugLineNum = 26542084;BA.debugLine="Private pn As String = Subs.traeProdNombre(prods"; -_pn = _subs._traeprodnombre /*String*/ (ba,BA.ObjectToString(__ref._prodsids /*anywheresoftware.b4a.objects.collections.List*/ .Get(_t))); -RDebugUtils.currentLine=26542085; - //BA.debugLineNum = 26542085;BA.debugLine="Subs.guardaProductoSinGestion(estaPromo, prodsPr"; -_subs._guardaproductosingestion /*String*/ (ba,__ref._estapromo /*String*/ ,BA.ObjectToString(__ref._prodsprecios /*anywheresoftware.b4a.objects.collections.List*/ .Get(_t)),BA.ObjectToString(__ref._prodscants /*anywheresoftware.b4a.objects.collections.List*/ .Get(_t)),_pn,BA.ObjectToString(__ref._prodsids /*anywheresoftware.b4a.objects.collections.List*/ .Get(_t)),_subs._traecliente /*String*/ (ba),_subs._traefecha /*String*/ (ba),_subs._traeusuariodebd /*String*/ (ba),_subs._traeruta /*String*/ (ba),BA.NumberToString(0),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ ); + //BA.debugLineNum = 398;BA.debugLine="Private pn As String = Subs.traeProdNombre(prods"; +_pn = _subs._traeprodnombre /*String*/ (ba,BA.ObjectToString(_prodsids.Get(_t))); + //BA.debugLineNum = 399;BA.debugLine="Subs.guardaProductoSinGestion(estaPromo, prodsPr"; +_subs._guardaproductosingestion /*String*/ (ba,_estapromo,BA.ObjectToString(_prodsprecios.Get(_t)),BA.ObjectToString(_prodscants.Get(_t)),_pn,BA.ObjectToString(_prodsids.Get(_t)),_subs._traecliente /*String*/ (ba),_subs._traefecha /*String*/ (ba),_subs._traeusuariodebd /*String*/ (ba),_subs._traeruta /*String*/ (ba),BA.NumberToString(0),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ ); } }; -RDebugUtils.currentLine=26542087; - //BA.debugLineNum = 26542087;BA.debugLine="For t = 0 To prodsIds2.Size - 1 'Guardamos los pr"; + //BA.debugLineNum = 401;BA.debugLine="For t = 0 To prodsIds2.Size - 1 'Guardamos los pr"; { final int step7 = 1; -final int limit7 = (int) (__ref._prodsids2 /*anywheresoftware.b4a.objects.collections.List*/ .getSize()-1); +final int limit7 = (int) (_prodsids2.getSize()-1); _t = (int) (0) ; for (;_t <= limit7 ;_t = _t + step7 ) { -RDebugUtils.currentLine=26542088; - //BA.debugLineNum = 26542088;BA.debugLine="Private pn As String = Subs.traeProdNombre(prods"; -_pn = _subs._traeprodnombre /*String*/ (ba,BA.ObjectToString(__ref._prodsids2 /*anywheresoftware.b4a.objects.collections.List*/ .Get(_t))); -RDebugUtils.currentLine=26542089; - //BA.debugLineNum = 26542089;BA.debugLine="Subs.guardaProductoSinGestion(estaPromo, prodsPr"; -_subs._guardaproductosingestion /*String*/ (ba,__ref._estapromo /*String*/ ,BA.ObjectToString(__ref._prodsprecios2 /*anywheresoftware.b4a.objects.collections.List*/ .Get(_t)),BA.ObjectToString(__ref._prodscants2 /*anywheresoftware.b4a.objects.collections.List*/ .Get(_t)),_pn,BA.ObjectToString(__ref._prodsids2 /*anywheresoftware.b4a.objects.collections.List*/ .Get(_t)),_subs._traecliente /*String*/ (ba),_subs._traefecha /*String*/ (ba),_subs._traeusuariodebd /*String*/ (ba),_subs._traeruta /*String*/ (ba),BA.NumberToString(0),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ ); + //BA.debugLineNum = 402;BA.debugLine="Private pn As String = Subs.traeProdNombre(prods"; +_pn = _subs._traeprodnombre /*String*/ (ba,BA.ObjectToString(_prodsids2.Get(_t))); + //BA.debugLineNum = 403;BA.debugLine="Subs.guardaProductoSinGestion(estaPromo, prodsPr"; +_subs._guardaproductosingestion /*String*/ (ba,_estapromo,BA.ObjectToString(_prodsprecios2.Get(_t)),BA.ObjectToString(_prodscants2.Get(_t)),_pn,BA.ObjectToString(_prodsids2.Get(_t)),_subs._traecliente /*String*/ (ba),_subs._traefecha /*String*/ (ba),_subs._traeusuariodebd /*String*/ (ba),_subs._traeruta /*String*/ (ba),BA.NumberToString(0),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ ); } }; -RDebugUtils.currentLine=26542103; - //BA.debugLineNum = 26542103;BA.debugLine="lv_prodsFijos.Clear"; -__ref._lv_prodsfijos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear(); -RDebugUtils.currentLine=26542106; - //BA.debugLineNum = 26542106;BA.debugLine="Private prodspage As C_Productos"; + //BA.debugLineNum = 417;BA.debugLine="lv_prodsFijos.Clear"; +_lv_prodsfijos.Clear(); + //BA.debugLineNum = 420;BA.debugLine="Private prodspage As C_Productos"; _prodspage = new keymon.lat.medicomed.c_productos(); -RDebugUtils.currentLine=26542107; - //BA.debugLineNum = 26542107;BA.debugLine="If prodspage.IsInitialized Then"; + //BA.debugLineNum = 421;BA.debugLine="If prodspage.IsInitialized Then"; if (_prodspage.IsInitialized /*boolean*/ ()) { -RDebugUtils.currentLine=26542108; - //BA.debugLineNum = 26542108;BA.debugLine="prodspage.lv_catalogos.Visible = True"; + //BA.debugLineNum = 422;BA.debugLine="prodspage.lv_catalogos.Visible = True"; _prodspage._lv_catalogos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=26542109; - //BA.debugLineNum = 26542109;BA.debugLine="prodspage.lv_promos.Visible = False"; + //BA.debugLineNum = 423;BA.debugLine="prodspage.lv_promos.Visible = False"; _prodspage._lv_promos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=26542110; - //BA.debugLineNum = 26542110;BA.debugLine="prodspage.clv_productos.AsView.Visible = False"; + //BA.debugLineNum = 424;BA.debugLine="prodspage.clv_productos.AsView.Visible = False"; _prodspage._clv_productos /*b4a.example3.customlistview*/ ._asview().setVisible(__c.False); }; -RDebugUtils.currentLine=26542112; - //BA.debugLineNum = 26542112;BA.debugLine="B4XPages.MainPage.bTerminarClicked = True"; + //BA.debugLineNum = 426;BA.debugLine="B4XPages.MainPage.bTerminarClicked = True"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._bterminarclicked /*boolean*/ = __c.True; -RDebugUtils.currentLine=26542113; - //BA.debugLineNum = 26542113;BA.debugLine="B4XPages.ShowPage(\"productos\")"; + //BA.debugLineNum = 427;BA.debugLine="B4XPages.ShowPage(\"productos\")"; _b4xpages._showpage /*String*/ (ba,"productos"); -RDebugUtils.currentLine=26542114; - //BA.debugLineNum = 26542114;BA.debugLine="End Sub"; + //BA.debugLineNum = 428;BA.debugLine="End Sub"; return ""; } -public String _cuentaprods(keymon.lat.medicomed.c_promos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_promos"; -if (Debug.shouldDelegate(ba, "cuentaprods", false)) - {return ((String) Debug.delegate(ba, "cuentaprods", null));} +public String _b_prodmas_click() throws Exception{ +int _index = 0; +anywheresoftware.b4a.objects.B4XViewWrapper _pnl0 = null; +anywheresoftware.b4a.objects.B4XViewWrapper _pnl = null; +anywheresoftware.b4a.objects.B4XViewWrapper _lacant = null; +anywheresoftware.b4a.objects.collections.List _estetag = null; +String _precio = ""; +String _prodid = ""; +anywheresoftware.b4a.objects.collections.Map _tmpmap = null; + //BA.debugLineNum = 244;BA.debugLine="Sub b_prodMas_Click"; + //BA.debugLineNum = 245;BA.debugLine="If totalProds < prodsVarReq + tpf Then"; +if (_totalprods<_prodsvarreq+_tpf) { + //BA.debugLineNum = 246;BA.debugLine="Dim index As Int = clv_prodsVariabes.GetItemFrom"; +_index = _clv_prodsvariabes._getitemfromview((anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba)))); + //BA.debugLineNum = 247;BA.debugLine="Dim pnl0 As B4XView = clv_prodsVariabes.GetPanel"; +_pnl0 = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_pnl0 = _clv_prodsvariabes._getpanel(_index); + //BA.debugLineNum = 248;BA.debugLine="Dim pnl As B4XView = pnl0.GetView(0)"; +_pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_pnl = _pnl0.GetView((int) (0)); + //BA.debugLineNum = 250;BA.debugLine="Dim laCant As B4XView = pnl.GetView(2).GetView(4"; +_lacant = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_lacant = _pnl.GetView((int) (2)).GetView((int) (4)); + //BA.debugLineNum = 253;BA.debugLine="Dim esteTag As List = Regex.Split(\"\\|\", laCant.T"; +_estetag = new anywheresoftware.b4a.objects.collections.List(); +_estetag = anywheresoftware.b4a.keywords.Common.ArrayToList(__c.Regex.Split("\\|",BA.ObjectToString(_lacant.getTag()))); + //BA.debugLineNum = 255;BA.debugLine="If laCant.Text + 1 <= esteTag.get(1) Then"; +if ((double)(Double.parseDouble(_lacant.getText()))+1<=(double)(BA.ObjectToNumber(_estetag.Get((int) (1))))) { + //BA.debugLineNum = 256;BA.debugLine="laCant.Text = $\"$1.0{laCant.Text+1}\"$"; +_lacant.setText(BA.ObjectToCharSequence((""+__c.SmartStringFormatter("1.0",(Object)((double)(Double.parseDouble(_lacant.getText()))+1))+""))); + //BA.debugLineNum = 257;BA.debugLine="cuentaProds"; +_cuentaprods(); + }; + //BA.debugLineNum = 260;BA.debugLine="Log(Regex.Split(\"\\|\", laCant.tag)(0))"; +__c.LogImpl("359047952",__c.Regex.Split("\\|",BA.ObjectToString(_lacant.getTag()))[(int) (0)],0); + //BA.debugLineNum = 261;BA.debugLine="Private precio As String = Regex.Split(\"\\|\", laC"; +_precio = __c.Regex.Split("\\|",BA.ObjectToString(_lacant.getTag()))[(int) (0)]; + //BA.debugLineNum = 263;BA.debugLine="Private prodId As String = Regex.Split(\"\\|\", laC"; +_prodid = __c.Regex.Split("\\|",BA.ObjectToString(_lacant.getTag()))[(int) (2)]; + //BA.debugLineNum = 264;BA.debugLine="Private tmpMap As Map = CreateMap(\"precio\":preci"; +_tmpmap = new anywheresoftware.b4a.objects.collections.Map(); +_tmpmap = __c.createMap(new Object[] {(Object)("precio"),(Object)(_precio),(Object)("cant"),(Object)(_lacant.getText()),(Object)("almacen"),(Object)(_estapromo)}); + //BA.debugLineNum = 265;BA.debugLine="Log(tmpMap)"; +__c.LogImpl("359047957",BA.ObjectToString(_tmpmap),0); + //BA.debugLineNum = 266;BA.debugLine="promosMap.Put(prodId, tmpMap)"; +_promosmap.Put((Object)(_prodid),(Object)(_tmpmap.getObject())); + //BA.debugLineNum = 267;BA.debugLine="LogColor(promosMap, Colors.Magenta)"; +__c.LogImpl("359047959",BA.ObjectToString(_promosmap),__c.Colors.Magenta); + }; + //BA.debugLineNum = 272;BA.debugLine="End Sub"; +return ""; +} +public String _b_prodmenos_click() throws Exception{ +int _index = 0; +anywheresoftware.b4a.objects.B4XViewWrapper _pnl0 = null; +anywheresoftware.b4a.objects.B4XViewWrapper _pnl = null; +anywheresoftware.b4a.objects.B4XViewWrapper _lacant = null; +String _precio = ""; +String _prodid = ""; +anywheresoftware.b4a.objects.collections.Map _tmpmap = null; + //BA.debugLineNum = 220;BA.debugLine="Sub b_prodMenos_Click"; + //BA.debugLineNum = 221;BA.debugLine="Dim index As Int = clv_prodsVariabes.GetItemFromV"; +_index = _clv_prodsvariabes._getitemfromview((anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba)))); + //BA.debugLineNum = 222;BA.debugLine="Dim pnl0 As B4XView = clv_prodsVariabes.GetPanel("; +_pnl0 = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_pnl0 = _clv_prodsvariabes._getpanel(_index); + //BA.debugLineNum = 223;BA.debugLine="Dim pnl As B4XView = pnl0.GetView(0)"; +_pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_pnl = _pnl0.GetView((int) (0)); + //BA.debugLineNum = 225;BA.debugLine="Dim laCant As B4XView = pnl.GetView(2).GetView(4)"; +_lacant = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_lacant = _pnl.GetView((int) (2)).GetView((int) (4)); + //BA.debugLineNum = 227;BA.debugLine="laCant.Text = $\"$1.0{laCant.Text-1}\"$"; +_lacant.setText(BA.ObjectToCharSequence((""+__c.SmartStringFormatter("1.0",(Object)((double)(Double.parseDouble(_lacant.getText()))-1))+""))); + //BA.debugLineNum = 228;BA.debugLine="If laCant.Text < 0 Then laCant.Text = 0"; +if ((double)(Double.parseDouble(_lacant.getText()))<0) { +_lacant.setText(BA.ObjectToCharSequence(0));}; + //BA.debugLineNum = 230;BA.debugLine="Log(Regex.Split(\"\\|\", laCant.tag)(0))"; +__c.LogImpl("358982410",__c.Regex.Split("\\|",BA.ObjectToString(_lacant.getTag()))[(int) (0)],0); + //BA.debugLineNum = 231;BA.debugLine="Private precio As String = Regex.Split(\"\\|\", laCa"; +_precio = __c.Regex.Split("\\|",BA.ObjectToString(_lacant.getTag()))[(int) (0)]; + //BA.debugLineNum = 233;BA.debugLine="Private prodId As String = Regex.Split(\"\\|\", laCa"; +_prodid = __c.Regex.Split("\\|",BA.ObjectToString(_lacant.getTag()))[(int) (2)]; + //BA.debugLineNum = 234;BA.debugLine="Private tmpMap As Map = CreateMap(\"precio\":precio"; +_tmpmap = new anywheresoftware.b4a.objects.collections.Map(); +_tmpmap = __c.createMap(new Object[] {(Object)("precio"),(Object)(_precio),(Object)("cant"),(Object)(_lacant.getText()),(Object)("almacen"),(Object)(_estapromo)}); + //BA.debugLineNum = 235;BA.debugLine="Log(tmpMap)"; +__c.LogImpl("358982415",BA.ObjectToString(_tmpmap),0); + //BA.debugLineNum = 236;BA.debugLine="promosMap.Put(prodId, tmpMap)"; +_promosmap.Put((Object)(_prodid),(Object)(_tmpmap.getObject())); + //BA.debugLineNum = 237;BA.debugLine="If laCant.Text = 0 Then promosMap.Remove(prodId)"; +if ((_lacant.getText()).equals(BA.NumberToString(0))) { +_promosmap.Remove((Object)(_prodid));}; + //BA.debugLineNum = 238;BA.debugLine="LogColor(promosMap, Colors.Magenta)"; +__c.LogImpl("358982418",BA.ObjectToString(_promosmap),__c.Colors.Magenta); + //BA.debugLineNum = 239;BA.debugLine="cuentaProds"; +_cuentaprods(); + //BA.debugLineNum = 242;BA.debugLine="End Sub"; +return ""; +} +public String _b_promomas_click() throws Exception{ + //BA.debugLineNum = 352;BA.debugLine="Private Sub b_promoMas_Click"; + //BA.debugLineNum = 353;BA.debugLine="If et_promoCant.Text < maxCantPromos Then"; +if ((double)(Double.parseDouble(_et_promocant.getText()))<_maxcantpromos) { + //BA.debugLineNum = 354;BA.debugLine="et_promoCant.Text = et_promoCant.Text.As(Int) +"; +_et_promocant.setText(BA.ObjectToCharSequence(((int)(Double.parseDouble(_et_promocant.getText())))+1)); + //BA.debugLineNum = 355;BA.debugLine="l_prodsFijos.Text = $\"Productos fijos (${tpf2 *"; +_l_prodsfijos.setText(BA.ObjectToCharSequence(("Productos fijos ("+__c.SmartStringFormatter("",(Object)(_tpf2*((int)(Double.parseDouble(_et_promocant.getText())))))+")"))); + //BA.debugLineNum = 356;BA.debugLine="l_prodsVariables.Text = $\"Productos variables re"; +_l_prodsvariables.setText(BA.ObjectToCharSequence(("Productos variables requeridos: "+__c.SmartStringFormatter("",(Object)(_prodsvarreq2*((int)(Double.parseDouble(_et_promocant.getText())))))+""))); + //BA.debugLineNum = 357;BA.debugLine="tpf = tpf2 * et_promoCant.Text.As(Int)"; +_tpf = (int) (_tpf2*((int)(Double.parseDouble(_et_promocant.getText())))); + //BA.debugLineNum = 358;BA.debugLine="prodsVarReq = prodsVarReq2 * et_promoCant.Text.A"; +_prodsvarreq = (int) (_prodsvarreq2*((int)(Double.parseDouble(_et_promocant.getText())))); + //BA.debugLineNum = 359;BA.debugLine="Log($\"Max promos=${et_promoCant.Text.As(Int)}, P"; +__c.LogImpl("359375623",("Max promos="+__c.SmartStringFormatter("",(Object)(((int)(Double.parseDouble(_et_promocant.getText())))))+", Prods fijos="+__c.SmartStringFormatter("",(Object)(_tpf))+", "),0); + }; + //BA.debugLineNum = 361;BA.debugLine="If et_promoCant.text > maxCantPromos Then et_prom"; +if ((double)(Double.parseDouble(_et_promocant.getText()))>_maxcantpromos) { +_et_promocant.setText(BA.ObjectToCharSequence(_maxcantpromos));}; + //BA.debugLineNum = 362;BA.debugLine="cuentaProds"; +_cuentaprods(); + //BA.debugLineNum = 363;BA.debugLine="End Sub"; +return ""; +} +public String _b_promomenos_click() throws Exception{ + //BA.debugLineNum = 340;BA.debugLine="Private Sub b_promoMenos_Click"; + //BA.debugLineNum = 341;BA.debugLine="If et_promoCant.Text > 1 Then"; +if ((double)(Double.parseDouble(_et_promocant.getText()))>1) { + //BA.debugLineNum = 342;BA.debugLine="et_promoCant.Text = et_promoCant.Text.As(Int) -"; +_et_promocant.setText(BA.ObjectToCharSequence(((int)(Double.parseDouble(_et_promocant.getText())))-1)); + }; + //BA.debugLineNum = 344;BA.debugLine="l_prodsFijos.Text = $\"Productos fijos (${tpf2 * e"; +_l_prodsfijos.setText(BA.ObjectToCharSequence(("Productos fijos ("+__c.SmartStringFormatter("",(Object)(_tpf2*((int)(Double.parseDouble(_et_promocant.getText())))))+")"))); + //BA.debugLineNum = 345;BA.debugLine="l_prodsVariables.Text = $\"Productos variables req"; +_l_prodsvariables.setText(BA.ObjectToCharSequence(("Productos variables requeridos: "+__c.SmartStringFormatter("",(Object)(_prodsvarreq2*((int)(Double.parseDouble(_et_promocant.getText())))))+""))); + //BA.debugLineNum = 346;BA.debugLine="tpf = tpf2 * et_promoCant.Text.As(Int)"; +_tpf = (int) (_tpf2*((int)(Double.parseDouble(_et_promocant.getText())))); + //BA.debugLineNum = 347;BA.debugLine="prodsVarReq = prodsVarReq2 * et_promoCant.Text.As"; +_prodsvarreq = (int) (_prodsvarreq2*((int)(Double.parseDouble(_et_promocant.getText())))); + //BA.debugLineNum = 348;BA.debugLine="Log($\"Max promos=${et_promoCant.Text.As(Int)}, Pr"; +__c.LogImpl("359310088",("Max promos="+__c.SmartStringFormatter("",(Object)(((int)(Double.parseDouble(_et_promocant.getText())))))+", Prods fijos="+__c.SmartStringFormatter("",(Object)(_tpf))+", "),0); + //BA.debugLineNum = 349;BA.debugLine="cuentaProds"; +_cuentaprods(); + //BA.debugLineNum = 350;BA.debugLine="End Sub"; +return ""; +} +public String _b_terminar1_click() throws Exception{ +int _t = 0; +String _pn = ""; + //BA.debugLineNum = 365;BA.debugLine="Private Sub b_terminar1_Click"; + //BA.debugLineNum = 366;BA.debugLine="cuentaProds"; +_cuentaprods(); + //BA.debugLineNum = 367;BA.debugLine="Log(\"============================================"; +__c.LogImpl("359441154","====================================================================",0); + //BA.debugLineNum = 368;BA.debugLine="For t = 0 To prodsIds.Size - 1 'Guardamos los pro"; +{ +final int step3 = 1; +final int limit3 = (int) (_prodsids.getSize()-1); +_t = (int) (0) ; +for (;_t <= limit3 ;_t = _t + step3 ) { + //BA.debugLineNum = 369;BA.debugLine="Private pn As String = Subs.traeProdNombre(prods"; +_pn = _subs._traeprodnombre /*String*/ (ba,BA.ObjectToString(_prodsids.Get(_t))); + //BA.debugLineNum = 370;BA.debugLine="If prodsCants.Get(t) > 0 Then Subs.guardaProduct"; +if ((double)(BA.ObjectToNumber(_prodscants.Get(_t)))>0) { +_subs._guardaproductosingestion /*String*/ (ba,_estapromo,BA.ObjectToString(_prodsprecios.Get(_t)),BA.ObjectToString(_prodscants.Get(_t)),_pn,BA.ObjectToString(_prodsids.Get(_t)),_subs._traecliente /*String*/ (ba),_subs._traefecha /*String*/ (ba),_subs._traeusuariodebd /*String*/ (ba),_subs._traeruta /*String*/ (ba),BA.NumberToString(0),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ );}; + } +}; + //BA.debugLineNum = 372;BA.debugLine="For t = 0 To prodsIds2.Size - 1 'Guardamos los pr"; +{ +final int step7 = 1; +final int limit7 = (int) (_prodsids2.getSize()-1); +_t = (int) (0) ; +for (;_t <= limit7 ;_t = _t + step7 ) { + //BA.debugLineNum = 373;BA.debugLine="Private pn As String = Subs.traeProdNombre(prods"; +_pn = _subs._traeprodnombre /*String*/ (ba,BA.ObjectToString(_prodsids2.Get(_t))); + //BA.debugLineNum = 374;BA.debugLine="Subs.guardaProductoSinGestion(estaPromo, prodsPr"; +_subs._guardaproductosingestion /*String*/ (ba,_estapromo,BA.ObjectToString(_prodsprecios2.Get(_t)),BA.ObjectToString(_prodscants2.Get(_t)),_pn,BA.ObjectToString(_prodsids2.Get(_t)),_subs._traecliente /*String*/ (ba),_subs._traefecha /*String*/ (ba),_subs._traeusuariodebd /*String*/ (ba),_subs._traeruta /*String*/ (ba),BA.NumberToString(0),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ ); + } +}; + //BA.debugLineNum = 388;BA.debugLine="lv_prodsFijos.Clear"; +_lv_prodsfijos.Clear(); + //BA.debugLineNum = 389;BA.debugLine="B4XPages.MainPage.bTerminarClicked = True"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._bterminarclicked /*boolean*/ = __c.True; + //BA.debugLineNum = 390;BA.debugLine="B4XPages.ShowPage(\"productos\")"; +_b4xpages._showpage /*String*/ (ba,"productos"); + //BA.debugLineNum = 391;BA.debugLine="B4XPages.MainPage.productos.b_terminar1_Click"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._productos /*keymon.lat.medicomed.c_productos*/ ._b_terminar1_click /*String*/ (); + //BA.debugLineNum = 392;BA.debugLine="End Sub"; +return ""; +} +public String _b4xpage_appear() throws Exception{ +anywheresoftware.b4a.objects.collections.Map _m = null; + //BA.debugLineNum = 59;BA.debugLine="Sub B4XPage_Appear"; + //BA.debugLineNum = 61;BA.debugLine="p_promociones.Top=0"; +_p_promociones.setTop((int) (0)); + //BA.debugLineNum = 62;BA.debugLine="p_promociones.Left=0"; +_p_promociones.setLeft((int) (0)); + //BA.debugLineNum = 63;BA.debugLine="p_promociones.Height=Root.Height"; +_p_promociones.setHeight(_root.getHeight()); + //BA.debugLineNum = 64;BA.debugLine="p_promociones.Width=Root.Width"; +_p_promociones.setWidth(_root.getWidth()); + //BA.debugLineNum = 65;BA.debugLine="b_terminar1.Left = Root.Width - (b_terminar1.Widt"; +_b_terminar1.setLeft((int) (_root.getWidth()-(_b_terminar1.getWidth()+10))); + //BA.debugLineNum = 66;BA.debugLine="b_continuar.Left = Root.Width - b_terminar1.Width"; +_b_continuar.setLeft((int) (_root.getWidth()-_b_terminar1.getWidth()-(_b_continuar.getWidth()+20))); + //BA.debugLineNum = 67;BA.debugLine="prodsIds.Initialize"; +_prodsids.Initialize(); + //BA.debugLineNum = 68;BA.debugLine="prodsCants.Initialize"; +_prodscants.Initialize(); + //BA.debugLineNum = 69;BA.debugLine="prodsPrecios.Initialize"; +_prodsprecios.Initialize(); + //BA.debugLineNum = 70;BA.debugLine="prodsIds2.Initialize"; +_prodsids2.Initialize(); + //BA.debugLineNum = 71;BA.debugLine="prodsCants2.Initialize"; +_prodscants2.Initialize(); + //BA.debugLineNum = 72;BA.debugLine="prodsPrecios2.Initialize"; +_prodsprecios2.Initialize(); + //BA.debugLineNum = 73;BA.debugLine="Dim m As Map = Subs.traeTotalesClienteActual"; +_m = new anywheresoftware.b4a.objects.collections.Map(); +_m = _subs._traetotalesclienteactual /*anywheresoftware.b4a.objects.collections.Map*/ (ba); + //BA.debugLineNum = 74;BA.debugLine="prodsPedidoActual = m.Get(\"productos\")"; +_prodspedidoactual = BA.ObjectToString(_m.Get((Object)("productos"))); + //BA.debugLineNum = 75;BA.debugLine="montoPedidoActual = m.Get(\"monto\")"; +_montopedidoactual = BA.ObjectToString(_m.Get((Object)("monto"))); + //BA.debugLineNum = 77;BA.debugLine="If laPromo <> \"\" Then muestraPromo(laPromo, elCli"; +if ((_lapromo).equals("") == false) { +_muestrapromo(_lapromo,_elcliente);}; + //BA.debugLineNum = 78;BA.debugLine="End Sub"; +return ""; +} +public String _b4xpage_created(anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ + //BA.debugLineNum = 52;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; + //BA.debugLineNum = 53;BA.debugLine="Root = Root1"; +_root = _root1; + //BA.debugLineNum = 55;BA.debugLine="Root.LoadLayout(\"promociones\")"; +_root.LoadLayout("promociones",ba); + //BA.debugLineNum = 56;BA.debugLine="promosMap.Initialize"; +_promosmap.Initialize(); + //BA.debugLineNum = 57;BA.debugLine="End Sub"; +return ""; +} +public String _class_globals() throws Exception{ + //BA.debugLineNum = 5;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 6;BA.debugLine="Private Root As B4XView 'ignore"; +_root = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 7;BA.debugLine="Private xui As XUI"; +_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); + //BA.debugLineNum = 8;BA.debugLine="Private l_promoDesc As Label"; +_l_promodesc = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 9;BA.debugLine="Private lv_prodsFijos As ListView"; +_lv_prodsfijos = new anywheresoftware.b4a.objects.ListViewWrapper(); + //BA.debugLineNum = 10;BA.debugLine="Private clv_prodsVariabes As CustomListView"; +_clv_prodsvariabes = new b4a.example3.customlistview(); + //BA.debugLineNum = 11;BA.debugLine="Private l_prodsFijos As Label"; +_l_prodsfijos = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 12;BA.debugLine="Private l_prodsVariables As Label"; +_l_prodsvariables = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 13;BA.debugLine="Private i_prod As ImageView"; +_i_prod = new anywheresoftware.b4a.objects.ImageViewWrapper(); + //BA.debugLineNum = 14;BA.debugLine="Private l_prodX As Label"; +_l_prodx = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 15;BA.debugLine="Private p_prods As Panel"; +_p_prods = new anywheresoftware.b4a.objects.PanelWrapper(); + //BA.debugLineNum = 16;BA.debugLine="Private b_prodMenos As Button"; +_b_prodmenos = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 17;BA.debugLine="Private et_pCant As EditText"; +_et_pcant = new anywheresoftware.b4a.objects.EditTextWrapper(); + //BA.debugLineNum = 18;BA.debugLine="Private b_prodMas As Button"; +_b_prodmas = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 19;BA.debugLine="Private l_pCant As Label"; +_l_pcant = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 20;BA.debugLine="Dim totalProds As Int = 0"; +_totalprods = (int) (0); + //BA.debugLineNum = 21;BA.debugLine="Dim prodsVarReq As Int = 0"; +_prodsvarreq = (int) (0); + //BA.debugLineNum = 22;BA.debugLine="Dim prodsVarReq2 As Int = 0"; +_prodsvarreq2 = (int) (0); + //BA.debugLineNum = 23;BA.debugLine="Dim totalCompra As Float = 0"; +_totalcompra = (float) (0); + //BA.debugLineNum = 24;BA.debugLine="Dim prodsFijosTot As Float = 0"; +_prodsfijostot = (float) (0); + //BA.debugLineNum = 25;BA.debugLine="Dim tpf As Int = 0"; +_tpf = (int) (0); + //BA.debugLineNum = 26;BA.debugLine="Dim tpf2 As Int = 0"; +_tpf2 = (int) (0); + //BA.debugLineNum = 27;BA.debugLine="Dim maxCantPromos As Int = 1"; +_maxcantpromos = (int) (1); + //BA.debugLineNum = 28;BA.debugLine="Private l_totProds As Label"; +_l_totprods = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 29;BA.debugLine="Private l_total As Label"; +_l_total = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 30;BA.debugLine="Private b_terminar1 As Button"; +_b_terminar1 = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 31;BA.debugLine="Private p_promociones As Panel"; +_p_promociones = new anywheresoftware.b4a.objects.PanelWrapper(); + //BA.debugLineNum = 32;BA.debugLine="Dim prodsIds, prodsCants, prodsPrecios, prodsIds2"; +_prodsids = new anywheresoftware.b4a.objects.collections.List(); +_prodscants = new anywheresoftware.b4a.objects.collections.List(); +_prodsprecios = new anywheresoftware.b4a.objects.collections.List(); +_prodsids2 = new anywheresoftware.b4a.objects.collections.List(); +_prodscants2 = new anywheresoftware.b4a.objects.collections.List(); +_prodsprecios2 = new anywheresoftware.b4a.objects.collections.List(); + //BA.debugLineNum = 33;BA.debugLine="Dim estaPromo, esteCliente As String"; +_estapromo = ""; +_estecliente = ""; + //BA.debugLineNum = 34;BA.debugLine="Private b_promoMas As Button"; +_b_promomas = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 35;BA.debugLine="Private b_promoMenos As Button"; +_b_promomenos = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 36;BA.debugLine="Private et_promoCant As EditText"; +_et_promocant = new anywheresoftware.b4a.objects.EditTextWrapper(); + //BA.debugLineNum = 37;BA.debugLine="Private l_promosCant As Label"; +_l_promoscant = new anywheresoftware.b4a.objects.LabelWrapper(); + //BA.debugLineNum = 38;BA.debugLine="Private b_continuar As Button"; +_b_continuar = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 39;BA.debugLine="Private p_prodsVariables As Panel"; +_p_prodsvariables = new anywheresoftware.b4a.objects.PanelWrapper(); + //BA.debugLineNum = 40;BA.debugLine="Dim laPromo = \"\", elCliente = \"\" As String"; +_lapromo = ""; +_elcliente = ""; + //BA.debugLineNum = 41;BA.debugLine="Dim prodsPedidoActual As String"; +_prodspedidoactual = ""; + //BA.debugLineNum = 42;BA.debugLine="Dim montoPedidoActual As String"; +_montopedidoactual = ""; + //BA.debugLineNum = 43;BA.debugLine="Dim promosMap As Map"; +_promosmap = new anywheresoftware.b4a.objects.collections.Map(); + //BA.debugLineNum = 44;BA.debugLine="End Sub"; +return ""; +} +public anywheresoftware.b4a.objects.PanelWrapper _createlistitem(String _text,String _preciou,int _inv,int _width,int _height,anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _img,String _prodid) throws Exception{ +anywheresoftware.b4a.objects.B4XViewWrapper _p = null; + //BA.debugLineNum = 202;BA.debugLine="Sub CreateListItem(Text As String, precioU As Stri"; + //BA.debugLineNum = 203;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"\")"; +_p = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_p = _xui.CreatePanel(ba,""); + //BA.debugLineNum = 204;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, Width, Height)"; +_p.SetLayoutAnimated((int) (0),(int) (0),(int) (0),_width,_height); + //BA.debugLineNum = 205;BA.debugLine="p.LoadLayout(\"proditempromo\")"; +_p.LoadLayout("proditempromo",ba); + //BA.debugLineNum = 206;BA.debugLine="l_prodX.TextSize = 15"; +_l_prodx.setTextSize((float) (15)); + //BA.debugLineNum = 207;BA.debugLine="l_prodX.Text = Text"; +_l_prodx.setText(BA.ObjectToCharSequence(_text)); + //BA.debugLineNum = 208;BA.debugLine="l_prodX.TextSize = 15"; +_l_prodx.setTextSize((float) (15)); + //BA.debugLineNum = 209;BA.debugLine="p_prods.Height = Height"; +_p_prods.setHeight(_height); + //BA.debugLineNum = 210;BA.debugLine="p_prods.Width = clv_prodsVariabes.GetBase.Width"; +_p_prods.setWidth(_clv_prodsvariabes._getbase().getWidth()); + //BA.debugLineNum = 211;BA.debugLine="l_prodX.Height = Height"; +_l_prodx.setHeight(_height); + //BA.debugLineNum = 213;BA.debugLine="l_pCant.Tag = precioU&\"|\"&inv&\"|\"&prodId"; +_l_pcant.setTag((Object)(_preciou+"|"+BA.NumberToString(_inv)+"|"+_prodid)); + //BA.debugLineNum = 214;BA.debugLine="et_pCant.Tag = precioU&\"|\"&inv&\"|\"&prodId"; +_et_pcant.setTag((Object)(_preciou+"|"+BA.NumberToString(_inv)+"|"+_prodid)); + //BA.debugLineNum = 215;BA.debugLine="et_pCant.BringToFront"; +_et_pcant.BringToFront(); + //BA.debugLineNum = 217;BA.debugLine="Return p"; +if (true) return (anywheresoftware.b4a.objects.PanelWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.PanelWrapper(), (android.view.ViewGroup)(_p.getObject())); + //BA.debugLineNum = 218;BA.debugLine="End Sub"; +return null; +} +public String _cuentaprods() throws Exception{ boolean _thislog = false; float _tcpf = 0f; int _pf = 0; @@ -303,506 +586,146 @@ anywheresoftware.b4a.objects.B4XViewWrapper _p0 = null; anywheresoftware.b4a.objects.B4XViewWrapper _p = null; anywheresoftware.b4a.objects.B4XViewWrapper _cant1 = null; anywheresoftware.b4a.objects.collections.List _estetag = null; -RDebugUtils.currentLine=26214400; - //BA.debugLineNum = 26214400;BA.debugLine="Sub cuentaProds"; -RDebugUtils.currentLine=26214403; - //BA.debugLineNum = 26214403;BA.debugLine="Private thisLog As Boolean = False"; + //BA.debugLineNum = 279;BA.debugLine="Sub cuentaProds"; + //BA.debugLineNum = 282;BA.debugLine="Private thisLog As Boolean = False"; _thislog = __c.False; -RDebugUtils.currentLine=26214404; - //BA.debugLineNum = 26214404;BA.debugLine="If thisLog Then LogColor($\"ProdsFijos=${tpf}, tot"; + //BA.debugLineNum = 283;BA.debugLine="If thisLog Then LogColor($\"ProdsFijos=${tpf}, tot"; if (_thislog) { -__c.LogImpl("326214404",("ProdsFijos="+__c.SmartStringFormatter("",(Object)(__ref._tpf /*int*/ ))+", totalProds="+__c.SmartStringFormatter("",(Object)(__ref._totalprods /*int*/ ))+", totalCompra="+__c.SmartStringFormatter("",(Object)(__ref._totalcompra /*float*/ ))+""),__c.Colors.Red);}; -RDebugUtils.currentLine=26214405; - //BA.debugLineNum = 26214405;BA.debugLine="prodsIds2.Clear"; -__ref._prodsids2 /*anywheresoftware.b4a.objects.collections.List*/ .Clear(); -RDebugUtils.currentLine=26214406; - //BA.debugLineNum = 26214406;BA.debugLine="prodsCants2.Clear"; -__ref._prodscants2 /*anywheresoftware.b4a.objects.collections.List*/ .Clear(); -RDebugUtils.currentLine=26214407; - //BA.debugLineNum = 26214407;BA.debugLine="prodsPrecios2.Clear"; -__ref._prodsprecios2 /*anywheresoftware.b4a.objects.collections.List*/ .Clear(); -RDebugUtils.currentLine=26214408; - //BA.debugLineNum = 26214408;BA.debugLine="lv_prodsFijos.Clear"; -__ref._lv_prodsfijos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear(); -RDebugUtils.currentLine=26214409; - //BA.debugLineNum = 26214409;BA.debugLine="agregaFijosALista(Subs.traePromo(estaPromo, esteC"; -__ref._agregafijosalista /*String*/ (null,_subs._traepromo /*anywheresoftware.b4a.objects.collections.Map*/ (ba,__ref._estapromo /*String*/ ,__ref._estecliente /*String*/ ),__c.True); -RDebugUtils.currentLine=26214411; - //BA.debugLineNum = 26214411;BA.debugLine="Private tcpf As Float = 0 'Total de compra de pro"; +__c.LogImpl("359179012",("ProdsFijos="+__c.SmartStringFormatter("",(Object)(_tpf))+", totalProds="+__c.SmartStringFormatter("",(Object)(_totalprods))+", totalCompra="+__c.SmartStringFormatter("",(Object)(_totalcompra))+""),__c.Colors.Red);}; + //BA.debugLineNum = 284;BA.debugLine="prodsIds2.Clear"; +_prodsids2.Clear(); + //BA.debugLineNum = 285;BA.debugLine="prodsCants2.Clear"; +_prodscants2.Clear(); + //BA.debugLineNum = 286;BA.debugLine="prodsPrecios2.Clear"; +_prodsprecios2.Clear(); + //BA.debugLineNum = 287;BA.debugLine="lv_prodsFijos.Clear"; +_lv_prodsfijos.Clear(); + //BA.debugLineNum = 288;BA.debugLine="agregaFijosALista(Subs.traePromo(estaPromo, esteC"; +_agregafijosalista(_subs._traepromo /*anywheresoftware.b4a.objects.collections.Map*/ (ba,_estapromo,_estecliente),__c.True); + //BA.debugLineNum = 290;BA.debugLine="Private tcpf As Float = 0 'Total de compra de pro"; _tcpf = (float) (0); -RDebugUtils.currentLine=26214412; - //BA.debugLineNum = 26214412;BA.debugLine="For pf = 0 To prodsIds.Size - 1"; + //BA.debugLineNum = 291;BA.debugLine="For pf = 0 To prodsIds.Size - 1"; { final int step9 = 1; -final int limit9 = (int) (__ref._prodsids /*anywheresoftware.b4a.objects.collections.List*/ .getSize()-1); +final int limit9 = (int) (_prodsids.getSize()-1); _pf = (int) (0) ; for (;_pf <= limit9 ;_pf = _pf + step9 ) { -RDebugUtils.currentLine=26214413; - //BA.debugLineNum = 26214413;BA.debugLine="If thisLog Then Log($\"${tcpf} + ${prodsCants.Get"; + //BA.debugLineNum = 292;BA.debugLine="If thisLog Then Log($\"${tcpf} + ${prodsCants.Get"; if (_thislog) { -__c.LogImpl("326214413",(""+__c.SmartStringFormatter("",(Object)(_tcpf))+" + "+__c.SmartStringFormatter("",__ref._prodscants /*anywheresoftware.b4a.objects.collections.List*/ .Get(_pf))+" * "+__c.SmartStringFormatter("",__ref._prodsprecios /*anywheresoftware.b4a.objects.collections.List*/ .Get(_pf))+" = "+__c.SmartStringFormatter("",(Object)(((double)(BA.ObjectToNumber(__ref._prodsprecios /*anywheresoftware.b4a.objects.collections.List*/ .Get(_pf)))*(double)(BA.ObjectToNumber(__ref._prodscants /*anywheresoftware.b4a.objects.collections.List*/ .Get(_pf))))))+""),0);}; -RDebugUtils.currentLine=26214414; - //BA.debugLineNum = 26214414;BA.debugLine="tcpf = tcpf + (prodsPrecios.Get(pf) * prodsCants"; -_tcpf = (float) (_tcpf+((double)(BA.ObjectToNumber(__ref._prodsprecios /*anywheresoftware.b4a.objects.collections.List*/ .Get(_pf)))*(double)(BA.ObjectToNumber(__ref._prodscants /*anywheresoftware.b4a.objects.collections.List*/ .Get(_pf))))); +__c.LogImpl("359179021",(""+__c.SmartStringFormatter("",(Object)(_tcpf))+" + "+__c.SmartStringFormatter("",_prodscants.Get(_pf))+" * "+__c.SmartStringFormatter("",_prodsprecios.Get(_pf))+" = "+__c.SmartStringFormatter("",(Object)(((double)(BA.ObjectToNumber(_prodsprecios.Get(_pf)))*(double)(BA.ObjectToNumber(_prodscants.Get(_pf))))))+""),0);}; + //BA.debugLineNum = 293;BA.debugLine="tcpf = tcpf + (prodsPrecios.Get(pf) * prodsCants"; +_tcpf = (float) (_tcpf+((double)(BA.ObjectToNumber(_prodsprecios.Get(_pf)))*(double)(BA.ObjectToNumber(_prodscants.Get(_pf))))); } }; -RDebugUtils.currentLine=26214417; - //BA.debugLineNum = 26214417;BA.debugLine="totalCompra = tcpf"; -__ref._totalcompra /*float*/ = _tcpf; -RDebugUtils.currentLine=26214418; - //BA.debugLineNum = 26214418;BA.debugLine="totalProds = tpf 'Cantidad total de productos fij"; -__ref._totalprods /*int*/ = __ref._tpf /*int*/ ; -RDebugUtils.currentLine=26214419; - //BA.debugLineNum = 26214419;BA.debugLine="For i = 0 To clv_prodsVariabes.GetSize - 1"; + //BA.debugLineNum = 296;BA.debugLine="totalCompra = tcpf"; +_totalcompra = _tcpf; + //BA.debugLineNum = 297;BA.debugLine="totalProds = tpf 'Cantidad total de productos fij"; +_totalprods = _tpf; + //BA.debugLineNum = 298;BA.debugLine="For i = 0 To clv_prodsVariabes.GetSize - 1"; { final int step15 = 1; -final int limit15 = (int) (__ref._clv_prodsvariabes /*b4a.example3.customlistview*/ ._getsize()-1); +final int limit15 = (int) (_clv_prodsvariabes._getsize()-1); _i = (int) (0) ; for (;_i <= limit15 ;_i = _i + step15 ) { -RDebugUtils.currentLine=26214420; - //BA.debugLineNum = 26214420;BA.debugLine="Private p0 As B4XView = clv_prodsVariabes.GetPan"; + //BA.debugLineNum = 299;BA.debugLine="Private p0 As B4XView = clv_prodsVariabes.GetPan"; _p0 = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_p0 = __ref._clv_prodsvariabes /*b4a.example3.customlistview*/ ._getpanel(_i); -RDebugUtils.currentLine=26214421; - //BA.debugLineNum = 26214421;BA.debugLine="Private p As B4XView = p0.GetView(0)"; +_p0 = _clv_prodsvariabes._getpanel(_i); + //BA.debugLineNum = 300;BA.debugLine="Private p As B4XView = p0.GetView(0)"; _p = new anywheresoftware.b4a.objects.B4XViewWrapper(); _p = _p0.GetView((int) (0)); -RDebugUtils.currentLine=26214422; - //BA.debugLineNum = 26214422;BA.debugLine="Private cant1 As B4XView = p.GetView(2).GetView("; + //BA.debugLineNum = 301;BA.debugLine="Private cant1 As B4XView = p.GetView(2).GetView("; _cant1 = new anywheresoftware.b4a.objects.B4XViewWrapper(); _cant1 = _p.GetView((int) (2)).GetView((int) (4)); -RDebugUtils.currentLine=26214424; - //BA.debugLineNum = 26214424;BA.debugLine="totalProds = totalProds + cant1.Text"; -__ref._totalprods /*int*/ = (int) (__ref._totalprods /*int*/ +(double)(Double.parseDouble(_cant1.getText()))); -RDebugUtils.currentLine=26214425; - //BA.debugLineNum = 26214425;BA.debugLine="Private esteTag As List = Regex.Split(\"\\|\", cant"; + //BA.debugLineNum = 303;BA.debugLine="totalProds = totalProds + cant1.Text"; +_totalprods = (int) (_totalprods+(double)(Double.parseDouble(_cant1.getText()))); + //BA.debugLineNum = 304;BA.debugLine="Private esteTag As List = Regex.Split(\"\\|\", cant"; _estetag = new anywheresoftware.b4a.objects.collections.List(); _estetag = anywheresoftware.b4a.keywords.Common.ArrayToList(__c.Regex.Split("\\|",BA.ObjectToString(_cant1.getTag()))); -RDebugUtils.currentLine=26214426; - //BA.debugLineNum = 26214426;BA.debugLine="If cant1.Text > esteTag.Get(1) Then cant1.Text ="; + //BA.debugLineNum = 305;BA.debugLine="If cant1.Text > esteTag.Get(1) Then cant1.Text ="; if ((double)(Double.parseDouble(_cant1.getText()))>(double)(BA.ObjectToNumber(_estetag.Get((int) (1))))) { _cant1.setText(BA.ObjectToCharSequence(_estetag.Get((int) (1))));}; -RDebugUtils.currentLine=26214427; - //BA.debugLineNum = 26214427;BA.debugLine="If cant1.Text > 0 Then"; + //BA.debugLineNum = 306;BA.debugLine="If cant1.Text > 0 Then"; if ((double)(Double.parseDouble(_cant1.getText()))>0) { -RDebugUtils.currentLine=26214428; - //BA.debugLineNum = 26214428;BA.debugLine="Log(esteTag.Get(2) & \"|\" & cant1.Text)"; -__c.LogImpl("326214428",BA.ObjectToString(_estetag.Get((int) (2)))+"|"+_cant1.getText(),0); -RDebugUtils.currentLine=26214429; - //BA.debugLineNum = 26214429;BA.debugLine="totalCompra = totalCompra + (esteTag.get(0) * c"; -__ref._totalcompra /*float*/ = (float) (__ref._totalcompra /*float*/ +((double)(BA.ObjectToNumber(_estetag.Get((int) (0))))*(double)(Double.parseDouble(_cant1.getText())))); -RDebugUtils.currentLine=26214430; - //BA.debugLineNum = 26214430;BA.debugLine="If thisLog Then Log($\"Cant: ${cant1.Text}, Suma"; + //BA.debugLineNum = 307;BA.debugLine="Log(esteTag.Get(2) & \"|\" & cant1.Text)"; +__c.LogImpl("359179036",BA.ObjectToString(_estetag.Get((int) (2)))+"|"+_cant1.getText(),0); + //BA.debugLineNum = 308;BA.debugLine="totalCompra = totalCompra + (esteTag.get(0) * c"; +_totalcompra = (float) (_totalcompra+((double)(BA.ObjectToNumber(_estetag.Get((int) (0))))*(double)(Double.parseDouble(_cant1.getText())))); + //BA.debugLineNum = 309;BA.debugLine="If thisLog Then Log($\"Cant: ${cant1.Text}, Suma"; if (_thislog) { -__c.LogImpl("326214430",("Cant: "+__c.SmartStringFormatter("",(Object)(_cant1.getText()))+", Suma: "+__c.SmartStringFormatter("",(Object)(__ref._totalcompra /*float*/ ))+""),0);}; -RDebugUtils.currentLine=26214431; - //BA.debugLineNum = 26214431;BA.debugLine="prodsIds2.Add(esteTag.Get(2))"; -__ref._prodsids2 /*anywheresoftware.b4a.objects.collections.List*/ .Add(_estetag.Get((int) (2))); -RDebugUtils.currentLine=26214432; - //BA.debugLineNum = 26214432;BA.debugLine="prodsCants2.Add(cant1.Text)"; -__ref._prodscants2 /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(_cant1.getText())); -RDebugUtils.currentLine=26214433; - //BA.debugLineNum = 26214433;BA.debugLine="prodsPrecios2.Add(esteTag.get(0))"; -__ref._prodsprecios2 /*anywheresoftware.b4a.objects.collections.List*/ .Add(_estetag.Get((int) (0))); +__c.LogImpl("359179038",("Cant: "+__c.SmartStringFormatter("",(Object)(_cant1.getText()))+", Suma: "+__c.SmartStringFormatter("",(Object)(_totalcompra))+""),0);}; + //BA.debugLineNum = 310;BA.debugLine="prodsIds2.Add(esteTag.Get(2))"; +_prodsids2.Add(_estetag.Get((int) (2))); + //BA.debugLineNum = 311;BA.debugLine="prodsCants2.Add(cant1.Text)"; +_prodscants2.Add((Object)(_cant1.getText())); + //BA.debugLineNum = 312;BA.debugLine="prodsPrecios2.Add(esteTag.get(0))"; +_prodsprecios2.Add(_estetag.Get((int) (0))); }; -RDebugUtils.currentLine=26214435; - //BA.debugLineNum = 26214435;BA.debugLine="l_total.Text = $\"Total: $$1.2{totalCompra}\"$"; -__ref._l_total /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(("Total: $"+__c.SmartStringFormatter("1.2",(Object)(__ref._totalcompra /*float*/ ))+""))); -RDebugUtils.currentLine=26214436; - //BA.debugLineNum = 26214436;BA.debugLine="l_totProds.text = $\"Productos: ${totalProds}\"$"; -__ref._l_totprods /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(("Productos: "+__c.SmartStringFormatter("",(Object)(__ref._totalprods /*int*/ ))+""))); + //BA.debugLineNum = 314;BA.debugLine="l_total.Text = $\"Total: $$1.2{totalCompra}\"$"; +_l_total.setText(BA.ObjectToCharSequence(("Total: $"+__c.SmartStringFormatter("1.2",(Object)(_totalcompra))+""))); + //BA.debugLineNum = 315;BA.debugLine="l_totProds.text = $\"Productos: ${totalProds}\"$"; +_l_totprods.setText(BA.ObjectToCharSequence(("Productos: "+__c.SmartStringFormatter("",(Object)(_totalprods))+""))); } }; -RDebugUtils.currentLine=26214438; - //BA.debugLineNum = 26214438;BA.debugLine="If thisLog Then Log($\"Total Prods: ${totalProds},"; + //BA.debugLineNum = 317;BA.debugLine="If thisLog Then Log($\"Total Prods: ${totalProds},"; if (_thislog) { -__c.LogImpl("326214438",("Total Prods: "+__c.SmartStringFormatter("",(Object)(__ref._totalprods /*int*/ ))+", Total: $"+__c.SmartStringFormatter("1.2",(Object)(__ref._totalcompra /*float*/ ))+""),0);}; -RDebugUtils.currentLine=26214439; - //BA.debugLineNum = 26214439;BA.debugLine="l_total.Text = $\"Total: $$1.2{totalCompra}\"$"; -__ref._l_total /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(("Total: $"+__c.SmartStringFormatter("1.2",(Object)(__ref._totalcompra /*float*/ ))+""))); -RDebugUtils.currentLine=26214440; - //BA.debugLineNum = 26214440;BA.debugLine="l_totProds.text = $\"Productos: ${totalProds}\"$"; -__ref._l_totprods /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(("Productos: "+__c.SmartStringFormatter("",(Object)(__ref._totalprods /*int*/ ))+""))); -RDebugUtils.currentLine=26214441; - //BA.debugLineNum = 26214441;BA.debugLine="If totalProds < prodsVarReq + tpf Or totalProds >"; -if (__ref._totalprods /*int*/ <__ref._prodsvarreq /*int*/ +__ref._tpf /*int*/ || __ref._totalprods /*int*/ >__ref._prodsvarreq /*int*/ +__ref._tpf /*int*/ ) { -RDebugUtils.currentLine=26214443; - //BA.debugLineNum = 26214443;BA.debugLine="b_terminar1.Visible = False"; -__ref._b_terminar1 /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=26214444; - //BA.debugLineNum = 26214444;BA.debugLine="b_continuar.Visible = False"; -__ref._b_continuar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); +__c.LogImpl("359179046",("Total Prods: "+__c.SmartStringFormatter("",(Object)(_totalprods))+", Total: $"+__c.SmartStringFormatter("1.2",(Object)(_totalcompra))+""),0);}; + //BA.debugLineNum = 318;BA.debugLine="l_total.Text = $\"Total: $$1.2{totalCompra}\"$"; +_l_total.setText(BA.ObjectToCharSequence(("Total: $"+__c.SmartStringFormatter("1.2",(Object)(_totalcompra))+""))); + //BA.debugLineNum = 319;BA.debugLine="l_totProds.text = $\"Productos: ${totalProds}\"$"; +_l_totprods.setText(BA.ObjectToCharSequence(("Productos: "+__c.SmartStringFormatter("",(Object)(_totalprods))+""))); + //BA.debugLineNum = 320;BA.debugLine="If totalProds < prodsVarReq + tpf Or totalProds >"; +if (_totalprods<_prodsvarreq+_tpf || _totalprods>_prodsvarreq+_tpf) { + //BA.debugLineNum = 322;BA.debugLine="b_terminar1.Visible = False"; +_b_terminar1.setVisible(__c.False); + //BA.debugLineNum = 323;BA.debugLine="b_continuar.Visible = False"; +_b_continuar.setVisible(__c.False); }else { -RDebugUtils.currentLine=26214447; - //BA.debugLineNum = 26214447;BA.debugLine="b_terminar1.Visible = True"; -__ref._b_terminar1 /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=26214448; - //BA.debugLineNum = 26214448;BA.debugLine="b_continuar.Visible = True"; -__ref._b_continuar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.True); + //BA.debugLineNum = 326;BA.debugLine="b_terminar1.Visible = True"; +_b_terminar1.setVisible(__c.True); + //BA.debugLineNum = 327;BA.debugLine="b_continuar.Visible = True"; +_b_continuar.setVisible(__c.True); }; -RDebugUtils.currentLine=26214450; - //BA.debugLineNum = 26214450;BA.debugLine="If thisLog Then LogColor($\"${prodsIds}${CRLF}${pr"; + //BA.debugLineNum = 329;BA.debugLine="If thisLog Then LogColor($\"${prodsIds}${CRLF}${pr"; if (_thislog) { -__c.LogImpl("326214450",(""+__c.SmartStringFormatter("",(Object)(__ref._prodsids /*anywheresoftware.b4a.objects.collections.List*/ .getObject()))+""+__c.SmartStringFormatter("",(Object)(__c.CRLF))+""+__c.SmartStringFormatter("",(Object)(__ref._prodscants /*anywheresoftware.b4a.objects.collections.List*/ .getObject()))+""+__c.SmartStringFormatter("",(Object)(__c.CRLF))+""+__c.SmartStringFormatter("",(Object)(__ref._prodsprecios /*anywheresoftware.b4a.objects.collections.List*/ .getObject()))+""),__c.Colors.Blue);}; -RDebugUtils.currentLine=26214451; - //BA.debugLineNum = 26214451;BA.debugLine="If thisLog Then LogColor($\"${prodsIds2}${CRLF}${p"; +__c.LogImpl("359179058",(""+__c.SmartStringFormatter("",(Object)(_prodsids.getObject()))+""+__c.SmartStringFormatter("",(Object)(__c.CRLF))+""+__c.SmartStringFormatter("",(Object)(_prodscants.getObject()))+""+__c.SmartStringFormatter("",(Object)(__c.CRLF))+""+__c.SmartStringFormatter("",(Object)(_prodsprecios.getObject()))+""),__c.Colors.Blue);}; + //BA.debugLineNum = 330;BA.debugLine="If thisLog Then LogColor($\"${prodsIds2}${CRLF}${p"; if (_thislog) { -__c.LogImpl("326214451",(""+__c.SmartStringFormatter("",(Object)(__ref._prodsids2 /*anywheresoftware.b4a.objects.collections.List*/ .getObject()))+""+__c.SmartStringFormatter("",(Object)(__c.CRLF))+""+__c.SmartStringFormatter("",(Object)(__ref._prodscants2 /*anywheresoftware.b4a.objects.collections.List*/ .getObject()))+""+__c.SmartStringFormatter("",(Object)(__c.CRLF))+""+__c.SmartStringFormatter("",(Object)(__ref._prodsprecios2 /*anywheresoftware.b4a.objects.collections.List*/ .getObject()))+""),__c.Colors.Magenta);}; -RDebugUtils.currentLine=26214453; - //BA.debugLineNum = 26214453;BA.debugLine="LogColor($\"Total Prods: ${totalProds}, Total: $$1"; -__c.LogImpl("326214453",("Total Prods: "+__c.SmartStringFormatter("",(Object)(__ref._totalprods /*int*/ ))+", Total: $"+__c.SmartStringFormatter("1.2",(Object)(__ref._totalcompra /*float*/ ))+""),__c.Colors.Blue); -RDebugUtils.currentLine=26214454; - //BA.debugLineNum = 26214454;BA.debugLine="End Sub"; +__c.LogImpl("359179059",(""+__c.SmartStringFormatter("",(Object)(_prodsids2.getObject()))+""+__c.SmartStringFormatter("",(Object)(__c.CRLF))+""+__c.SmartStringFormatter("",(Object)(_prodscants2.getObject()))+""+__c.SmartStringFormatter("",(Object)(__c.CRLF))+""+__c.SmartStringFormatter("",(Object)(_prodsprecios2.getObject()))+""),__c.Colors.Magenta);}; + //BA.debugLineNum = 332;BA.debugLine="LogColor($\"Total Prods: ${totalProds}, Total: $$1"; +__c.LogImpl("359179061",("Total Prods: "+__c.SmartStringFormatter("",(Object)(_totalprods))+", Total: $"+__c.SmartStringFormatter("1.2",(Object)(_totalcompra))+""),__c.Colors.Blue); + //BA.debugLineNum = 333;BA.debugLine="End Sub"; return ""; } -public String _b_prodmas_click(keymon.lat.medicomed.c_promos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_promos"; -if (Debug.shouldDelegate(ba, "b_prodmas_click", false)) - {return ((String) Debug.delegate(ba, "b_prodmas_click", null));} -int _index = 0; -anywheresoftware.b4a.objects.B4XViewWrapper _pnl0 = null; -anywheresoftware.b4a.objects.B4XViewWrapper _pnl = null; -anywheresoftware.b4a.objects.B4XViewWrapper _lacant = null; -anywheresoftware.b4a.objects.collections.List _estetag = null; -String _precio = ""; -String _prodid = ""; -anywheresoftware.b4a.objects.collections.Map _tmpmap = null; -RDebugUtils.currentLine=26083328; - //BA.debugLineNum = 26083328;BA.debugLine="Sub b_prodMas_Click"; -RDebugUtils.currentLine=26083329; - //BA.debugLineNum = 26083329;BA.debugLine="If totalProds < prodsVarReq + tpf Then"; -if (__ref._totalprods /*int*/ <__ref._prodsvarreq /*int*/ +__ref._tpf /*int*/ ) { -RDebugUtils.currentLine=26083330; - //BA.debugLineNum = 26083330;BA.debugLine="Dim index As Int = clv_prodsVariabes.GetItemFrom"; -_index = __ref._clv_prodsvariabes /*b4a.example3.customlistview*/ ._getitemfromview((anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba)))); -RDebugUtils.currentLine=26083331; - //BA.debugLineNum = 26083331;BA.debugLine="Dim pnl0 As B4XView = clv_prodsVariabes.GetPanel"; -_pnl0 = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_pnl0 = __ref._clv_prodsvariabes /*b4a.example3.customlistview*/ ._getpanel(_index); -RDebugUtils.currentLine=26083332; - //BA.debugLineNum = 26083332;BA.debugLine="Dim pnl As B4XView = pnl0.GetView(0)"; -_pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_pnl = _pnl0.GetView((int) (0)); -RDebugUtils.currentLine=26083334; - //BA.debugLineNum = 26083334;BA.debugLine="Dim laCant As B4XView = pnl.GetView(2).GetView(4"; -_lacant = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_lacant = _pnl.GetView((int) (2)).GetView((int) (4)); -RDebugUtils.currentLine=26083337; - //BA.debugLineNum = 26083337;BA.debugLine="Dim esteTag As List = Regex.Split(\"\\|\", laCant.T"; -_estetag = new anywheresoftware.b4a.objects.collections.List(); -_estetag = anywheresoftware.b4a.keywords.Common.ArrayToList(__c.Regex.Split("\\|",BA.ObjectToString(_lacant.getTag()))); -RDebugUtils.currentLine=26083339; - //BA.debugLineNum = 26083339;BA.debugLine="If laCant.Text + 1 <= esteTag.get(1) Then"; -if ((double)(Double.parseDouble(_lacant.getText()))+1<=(double)(BA.ObjectToNumber(_estetag.Get((int) (1))))) { -RDebugUtils.currentLine=26083340; - //BA.debugLineNum = 26083340;BA.debugLine="laCant.Text = $\"$1.0{laCant.Text+1}\"$"; -_lacant.setText(BA.ObjectToCharSequence((""+__c.SmartStringFormatter("1.0",(Object)((double)(Double.parseDouble(_lacant.getText()))+1))+""))); -RDebugUtils.currentLine=26083341; - //BA.debugLineNum = 26083341;BA.debugLine="cuentaProds"; -__ref._cuentaprods /*String*/ (null); - }; -RDebugUtils.currentLine=26083344; - //BA.debugLineNum = 26083344;BA.debugLine="Log(Regex.Split(\"\\|\", laCant.tag)(0))"; -__c.LogImpl("326083344",__c.Regex.Split("\\|",BA.ObjectToString(_lacant.getTag()))[(int) (0)],0); -RDebugUtils.currentLine=26083345; - //BA.debugLineNum = 26083345;BA.debugLine="Private precio As String = Regex.Split(\"\\|\", laC"; -_precio = __c.Regex.Split("\\|",BA.ObjectToString(_lacant.getTag()))[(int) (0)]; -RDebugUtils.currentLine=26083347; - //BA.debugLineNum = 26083347;BA.debugLine="Private prodId As String = Regex.Split(\"\\|\", laC"; -_prodid = __c.Regex.Split("\\|",BA.ObjectToString(_lacant.getTag()))[(int) (2)]; -RDebugUtils.currentLine=26083348; - //BA.debugLineNum = 26083348;BA.debugLine="Private tmpMap As Map = CreateMap(\"precio\":preci"; -_tmpmap = new anywheresoftware.b4a.objects.collections.Map(); -_tmpmap = __c.createMap(new Object[] {(Object)("precio"),(Object)(_precio),(Object)("cant"),(Object)(_lacant.getText()),(Object)("almacen"),(Object)(__ref._estapromo /*String*/ )}); -RDebugUtils.currentLine=26083349; - //BA.debugLineNum = 26083349;BA.debugLine="Log(tmpMap)"; -__c.LogImpl("326083349",BA.ObjectToString(_tmpmap),0); -RDebugUtils.currentLine=26083350; - //BA.debugLineNum = 26083350;BA.debugLine="promosMap.Put(prodId, tmpMap)"; -__ref._promosmap /*anywheresoftware.b4a.objects.collections.Map*/ .Put((Object)(_prodid),(Object)(_tmpmap.getObject())); -RDebugUtils.currentLine=26083351; - //BA.debugLineNum = 26083351;BA.debugLine="LogColor(promosMap, Colors.Magenta)"; -__c.LogImpl("326083351",BA.ObjectToString(__ref._promosmap /*anywheresoftware.b4a.objects.collections.Map*/ ),__c.Colors.Magenta); - }; -RDebugUtils.currentLine=26083356; - //BA.debugLineNum = 26083356;BA.debugLine="End Sub"; +public String _et_pcant_focuschanged(boolean _hasfocus) throws Exception{ + //BA.debugLineNum = 335;BA.debugLine="Private Sub et_pCant_FocusChanged (HasFocus As Boo"; + //BA.debugLineNum = 336;BA.debugLine="LogColor(\"focus changed\", Colors.Magenta)"; +__c.LogImpl("359244545","focus changed",__c.Colors.Magenta); + //BA.debugLineNum = 337;BA.debugLine="cuentaProds"; +_cuentaprods(); + //BA.debugLineNum = 338;BA.debugLine="End Sub"; return ""; } -public String _b_prodmenos_click(keymon.lat.medicomed.c_promos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_promos"; -if (Debug.shouldDelegate(ba, "b_prodmenos_click", false)) - {return ((String) Debug.delegate(ba, "b_prodmenos_click", null));} -int _index = 0; -anywheresoftware.b4a.objects.B4XViewWrapper _pnl0 = null; -anywheresoftware.b4a.objects.B4XViewWrapper _pnl = null; -anywheresoftware.b4a.objects.B4XViewWrapper _lacant = null; -String _precio = ""; -String _prodid = ""; -anywheresoftware.b4a.objects.collections.Map _tmpmap = null; -RDebugUtils.currentLine=26017792; - //BA.debugLineNum = 26017792;BA.debugLine="Sub b_prodMenos_Click"; -RDebugUtils.currentLine=26017793; - //BA.debugLineNum = 26017793;BA.debugLine="Dim index As Int = clv_prodsVariabes.GetItemFromV"; -_index = __ref._clv_prodsvariabes /*b4a.example3.customlistview*/ ._getitemfromview((anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__c.Sender(ba)))); -RDebugUtils.currentLine=26017794; - //BA.debugLineNum = 26017794;BA.debugLine="Dim pnl0 As B4XView = clv_prodsVariabes.GetPanel("; -_pnl0 = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_pnl0 = __ref._clv_prodsvariabes /*b4a.example3.customlistview*/ ._getpanel(_index); -RDebugUtils.currentLine=26017795; - //BA.debugLineNum = 26017795;BA.debugLine="Dim pnl As B4XView = pnl0.GetView(0)"; -_pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_pnl = _pnl0.GetView((int) (0)); -RDebugUtils.currentLine=26017797; - //BA.debugLineNum = 26017797;BA.debugLine="Dim laCant As B4XView = pnl.GetView(2).GetView(4)"; -_lacant = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_lacant = _pnl.GetView((int) (2)).GetView((int) (4)); -RDebugUtils.currentLine=26017799; - //BA.debugLineNum = 26017799;BA.debugLine="laCant.Text = $\"$1.0{laCant.Text-1}\"$"; -_lacant.setText(BA.ObjectToCharSequence((""+__c.SmartStringFormatter("1.0",(Object)((double)(Double.parseDouble(_lacant.getText()))-1))+""))); -RDebugUtils.currentLine=26017800; - //BA.debugLineNum = 26017800;BA.debugLine="If laCant.Text < 0 Then laCant.Text = 0"; -if ((double)(Double.parseDouble(_lacant.getText()))<0) { -_lacant.setText(BA.ObjectToCharSequence(0));}; -RDebugUtils.currentLine=26017802; - //BA.debugLineNum = 26017802;BA.debugLine="Log(Regex.Split(\"\\|\", laCant.tag)(0))"; -__c.LogImpl("326017802",__c.Regex.Split("\\|",BA.ObjectToString(_lacant.getTag()))[(int) (0)],0); -RDebugUtils.currentLine=26017803; - //BA.debugLineNum = 26017803;BA.debugLine="Private precio As String = Regex.Split(\"\\|\", laCa"; -_precio = __c.Regex.Split("\\|",BA.ObjectToString(_lacant.getTag()))[(int) (0)]; -RDebugUtils.currentLine=26017805; - //BA.debugLineNum = 26017805;BA.debugLine="Private prodId As String = Regex.Split(\"\\|\", laCa"; -_prodid = __c.Regex.Split("\\|",BA.ObjectToString(_lacant.getTag()))[(int) (2)]; -RDebugUtils.currentLine=26017806; - //BA.debugLineNum = 26017806;BA.debugLine="Private tmpMap As Map = CreateMap(\"precio\":precio"; -_tmpmap = new anywheresoftware.b4a.objects.collections.Map(); -_tmpmap = __c.createMap(new Object[] {(Object)("precio"),(Object)(_precio),(Object)("cant"),(Object)(_lacant.getText()),(Object)("almacen"),(Object)(__ref._estapromo /*String*/ )}); -RDebugUtils.currentLine=26017807; - //BA.debugLineNum = 26017807;BA.debugLine="Log(tmpMap)"; -__c.LogImpl("326017807",BA.ObjectToString(_tmpmap),0); -RDebugUtils.currentLine=26017808; - //BA.debugLineNum = 26017808;BA.debugLine="promosMap.Put(prodId, tmpMap)"; -__ref._promosmap /*anywheresoftware.b4a.objects.collections.Map*/ .Put((Object)(_prodid),(Object)(_tmpmap.getObject())); -RDebugUtils.currentLine=26017809; - //BA.debugLineNum = 26017809;BA.debugLine="If laCant.Text = 0 Then promosMap.Remove(prodId)"; -if ((_lacant.getText()).equals(BA.NumberToString(0))) { -__ref._promosmap /*anywheresoftware.b4a.objects.collections.Map*/ .Remove((Object)(_prodid));}; -RDebugUtils.currentLine=26017810; - //BA.debugLineNum = 26017810;BA.debugLine="LogColor(promosMap, Colors.Magenta)"; -__c.LogImpl("326017810",BA.ObjectToString(__ref._promosmap /*anywheresoftware.b4a.objects.collections.Map*/ ),__c.Colors.Magenta); -RDebugUtils.currentLine=26017811; - //BA.debugLineNum = 26017811;BA.debugLine="cuentaProds"; -__ref._cuentaprods /*String*/ (null); -RDebugUtils.currentLine=26017814; - //BA.debugLineNum = 26017814;BA.debugLine="End Sub"; +public String _et_pcant_textchanged(String _old,String _new) throws Exception{ + //BA.debugLineNum = 274;BA.debugLine="Private Sub et_pCant_TextChanged (Old As String, N"; + //BA.debugLineNum = 276;BA.debugLine="cuentaProds"; +_cuentaprods(); + //BA.debugLineNum = 277;BA.debugLine="End Sub"; return ""; } -public String _b_promomas_click(keymon.lat.medicomed.c_promos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_promos"; -if (Debug.shouldDelegate(ba, "b_promomas_click", false)) - {return ((String) Debug.delegate(ba, "b_promomas_click", null));} -RDebugUtils.currentLine=26411008; - //BA.debugLineNum = 26411008;BA.debugLine="Private Sub b_promoMas_Click"; -RDebugUtils.currentLine=26411009; - //BA.debugLineNum = 26411009;BA.debugLine="If et_promoCant.Text < maxCantPromos Then"; -if ((double)(Double.parseDouble(__ref._et_promocant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))<__ref._maxcantpromos /*int*/ ) { -RDebugUtils.currentLine=26411010; - //BA.debugLineNum = 26411010;BA.debugLine="et_promoCant.Text = et_promoCant.Text.As(Int) +"; -__ref._et_promocant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence(((int)(Double.parseDouble(__ref._et_promocant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText())))+1)); -RDebugUtils.currentLine=26411011; - //BA.debugLineNum = 26411011;BA.debugLine="l_prodsFijos.Text = $\"Productos fijos (${tpf2 *"; -__ref._l_prodsfijos /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(("Productos fijos ("+__c.SmartStringFormatter("",(Object)(__ref._tpf2 /*int*/ *((int)(Double.parseDouble(__ref._et_promocant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText())))))+")"))); -RDebugUtils.currentLine=26411012; - //BA.debugLineNum = 26411012;BA.debugLine="l_prodsVariables.Text = $\"Productos variables re"; -__ref._l_prodsvariables /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(("Productos variables requeridos: "+__c.SmartStringFormatter("",(Object)(__ref._prodsvarreq2 /*int*/ *((int)(Double.parseDouble(__ref._et_promocant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText())))))+""))); -RDebugUtils.currentLine=26411013; - //BA.debugLineNum = 26411013;BA.debugLine="tpf = tpf2 * et_promoCant.Text.As(Int)"; -__ref._tpf /*int*/ = (int) (__ref._tpf2 /*int*/ *((int)(Double.parseDouble(__ref._et_promocant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText())))); -RDebugUtils.currentLine=26411014; - //BA.debugLineNum = 26411014;BA.debugLine="prodsVarReq = prodsVarReq2 * et_promoCant.Text.A"; -__ref._prodsvarreq /*int*/ = (int) (__ref._prodsvarreq2 /*int*/ *((int)(Double.parseDouble(__ref._et_promocant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText())))); -RDebugUtils.currentLine=26411015; - //BA.debugLineNum = 26411015;BA.debugLine="Log($\"Max promos=${et_promoCant.Text.As(Int)}, P"; -__c.LogImpl("326411015",("Max promos="+__c.SmartStringFormatter("",(Object)(((int)(Double.parseDouble(__ref._et_promocant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText())))))+", Prods fijos="+__c.SmartStringFormatter("",(Object)(__ref._tpf /*int*/ ))+", "),0); - }; -RDebugUtils.currentLine=26411017; - //BA.debugLineNum = 26411017;BA.debugLine="If et_promoCant.text > maxCantPromos Then et_prom"; -if ((double)(Double.parseDouble(__ref._et_promocant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))>__ref._maxcantpromos /*int*/ ) { -__ref._et_promocant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence(__ref._maxcantpromos /*int*/ ));}; -RDebugUtils.currentLine=26411018; - //BA.debugLineNum = 26411018;BA.debugLine="cuentaProds"; -__ref._cuentaprods /*String*/ (null); -RDebugUtils.currentLine=26411019; - //BA.debugLineNum = 26411019;BA.debugLine="End Sub"; +public Object _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 47;BA.debugLine="Public Sub Initialize As Object"; + //BA.debugLineNum = 48;BA.debugLine="Return Me"; +if (true) return this; + //BA.debugLineNum = 49;BA.debugLine="End Sub"; +return null; +} +public String _mods() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Mods"; + //BA.debugLineNum = 3;BA.debugLine="End Sub"; return ""; } -public String _b_promomenos_click(keymon.lat.medicomed.c_promos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_promos"; -if (Debug.shouldDelegate(ba, "b_promomenos_click", false)) - {return ((String) Debug.delegate(ba, "b_promomenos_click", null));} -RDebugUtils.currentLine=26345472; - //BA.debugLineNum = 26345472;BA.debugLine="Private Sub b_promoMenos_Click"; -RDebugUtils.currentLine=26345473; - //BA.debugLineNum = 26345473;BA.debugLine="If et_promoCant.Text > 1 Then"; -if ((double)(Double.parseDouble(__ref._et_promocant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText()))>1) { -RDebugUtils.currentLine=26345474; - //BA.debugLineNum = 26345474;BA.debugLine="et_promoCant.Text = et_promoCant.Text.As(Int) -"; -__ref._et_promocant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence(((int)(Double.parseDouble(__ref._et_promocant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText())))-1)); - }; -RDebugUtils.currentLine=26345476; - //BA.debugLineNum = 26345476;BA.debugLine="l_prodsFijos.Text = $\"Productos fijos (${tpf2 * e"; -__ref._l_prodsfijos /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(("Productos fijos ("+__c.SmartStringFormatter("",(Object)(__ref._tpf2 /*int*/ *((int)(Double.parseDouble(__ref._et_promocant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText())))))+")"))); -RDebugUtils.currentLine=26345477; - //BA.debugLineNum = 26345477;BA.debugLine="l_prodsVariables.Text = $\"Productos variables req"; -__ref._l_prodsvariables /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(("Productos variables requeridos: "+__c.SmartStringFormatter("",(Object)(__ref._prodsvarreq2 /*int*/ *((int)(Double.parseDouble(__ref._et_promocant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText())))))+""))); -RDebugUtils.currentLine=26345478; - //BA.debugLineNum = 26345478;BA.debugLine="tpf = tpf2 * et_promoCant.Text.As(Int)"; -__ref._tpf /*int*/ = (int) (__ref._tpf2 /*int*/ *((int)(Double.parseDouble(__ref._et_promocant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText())))); -RDebugUtils.currentLine=26345479; - //BA.debugLineNum = 26345479;BA.debugLine="prodsVarReq = prodsVarReq2 * et_promoCant.Text.As"; -__ref._prodsvarreq /*int*/ = (int) (__ref._prodsvarreq2 /*int*/ *((int)(Double.parseDouble(__ref._et_promocant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText())))); -RDebugUtils.currentLine=26345480; - //BA.debugLineNum = 26345480;BA.debugLine="Log($\"Max promos=${et_promoCant.Text.As(Int)}, Pr"; -__c.LogImpl("326345480",("Max promos="+__c.SmartStringFormatter("",(Object)(((int)(Double.parseDouble(__ref._et_promocant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .getText())))))+", Prods fijos="+__c.SmartStringFormatter("",(Object)(__ref._tpf /*int*/ ))+", "),0); -RDebugUtils.currentLine=26345481; - //BA.debugLineNum = 26345481;BA.debugLine="cuentaProds"; -__ref._cuentaprods /*String*/ (null); -RDebugUtils.currentLine=26345482; - //BA.debugLineNum = 26345482;BA.debugLine="End Sub"; -return ""; -} -public String _b_terminar1_click(keymon.lat.medicomed.c_promos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_promos"; -if (Debug.shouldDelegate(ba, "b_terminar1_click", false)) - {return ((String) Debug.delegate(ba, "b_terminar1_click", null));} -int _t = 0; -String _pn = ""; -RDebugUtils.currentLine=26476544; - //BA.debugLineNum = 26476544;BA.debugLine="Private Sub b_terminar1_Click"; -RDebugUtils.currentLine=26476545; - //BA.debugLineNum = 26476545;BA.debugLine="cuentaProds"; -__ref._cuentaprods /*String*/ (null); -RDebugUtils.currentLine=26476546; - //BA.debugLineNum = 26476546;BA.debugLine="Log(\"============================================"; -__c.LogImpl("326476546","====================================================================",0); -RDebugUtils.currentLine=26476547; - //BA.debugLineNum = 26476547;BA.debugLine="For t = 0 To prodsIds.Size - 1 'Guardamos los pro"; -{ -final int step3 = 1; -final int limit3 = (int) (__ref._prodsids /*anywheresoftware.b4a.objects.collections.List*/ .getSize()-1); -_t = (int) (0) ; -for (;_t <= limit3 ;_t = _t + step3 ) { -RDebugUtils.currentLine=26476548; - //BA.debugLineNum = 26476548;BA.debugLine="Private pn As String = Subs.traeProdNombre(prods"; -_pn = _subs._traeprodnombre /*String*/ (ba,BA.ObjectToString(__ref._prodsids /*anywheresoftware.b4a.objects.collections.List*/ .Get(_t))); -RDebugUtils.currentLine=26476549; - //BA.debugLineNum = 26476549;BA.debugLine="If prodsCants.Get(t) > 0 Then Subs.guardaProduct"; -if ((double)(BA.ObjectToNumber(__ref._prodscants /*anywheresoftware.b4a.objects.collections.List*/ .Get(_t)))>0) { -_subs._guardaproductosingestion /*String*/ (ba,__ref._estapromo /*String*/ ,BA.ObjectToString(__ref._prodsprecios /*anywheresoftware.b4a.objects.collections.List*/ .Get(_t)),BA.ObjectToString(__ref._prodscants /*anywheresoftware.b4a.objects.collections.List*/ .Get(_t)),_pn,BA.ObjectToString(__ref._prodsids /*anywheresoftware.b4a.objects.collections.List*/ .Get(_t)),_subs._traecliente /*String*/ (ba),_subs._traefecha /*String*/ (ba),_subs._traeusuariodebd /*String*/ (ba),_subs._traeruta /*String*/ (ba),BA.NumberToString(0),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ );}; - } -}; -RDebugUtils.currentLine=26476551; - //BA.debugLineNum = 26476551;BA.debugLine="For t = 0 To prodsIds2.Size - 1 'Guardamos los pr"; -{ -final int step7 = 1; -final int limit7 = (int) (__ref._prodsids2 /*anywheresoftware.b4a.objects.collections.List*/ .getSize()-1); -_t = (int) (0) ; -for (;_t <= limit7 ;_t = _t + step7 ) { -RDebugUtils.currentLine=26476552; - //BA.debugLineNum = 26476552;BA.debugLine="Private pn As String = Subs.traeProdNombre(prods"; -_pn = _subs._traeprodnombre /*String*/ (ba,BA.ObjectToString(__ref._prodsids2 /*anywheresoftware.b4a.objects.collections.List*/ .Get(_t))); -RDebugUtils.currentLine=26476553; - //BA.debugLineNum = 26476553;BA.debugLine="Subs.guardaProductoSinGestion(estaPromo, prodsPr"; -_subs._guardaproductosingestion /*String*/ (ba,__ref._estapromo /*String*/ ,BA.ObjectToString(__ref._prodsprecios2 /*anywheresoftware.b4a.objects.collections.List*/ .Get(_t)),BA.ObjectToString(__ref._prodscants2 /*anywheresoftware.b4a.objects.collections.List*/ .Get(_t)),_pn,BA.ObjectToString(__ref._prodsids2 /*anywheresoftware.b4a.objects.collections.List*/ .Get(_t)),_subs._traecliente /*String*/ (ba),_subs._traefecha /*String*/ (ba),_subs._traeusuariodebd /*String*/ (ba),_subs._traeruta /*String*/ (ba),BA.NumberToString(0),_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._tipo_venta /*String*/ ); - } -}; -RDebugUtils.currentLine=26476567; - //BA.debugLineNum = 26476567;BA.debugLine="lv_prodsFijos.Clear"; -__ref._lv_prodsfijos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear(); -RDebugUtils.currentLine=26476568; - //BA.debugLineNum = 26476568;BA.debugLine="B4XPages.MainPage.bTerminarClicked = True"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._bterminarclicked /*boolean*/ = __c.True; -RDebugUtils.currentLine=26476569; - //BA.debugLineNum = 26476569;BA.debugLine="B4XPages.ShowPage(\"productos\")"; -_b4xpages._showpage /*String*/ (ba,"productos"); -RDebugUtils.currentLine=26476570; - //BA.debugLineNum = 26476570;BA.debugLine="B4XPages.MainPage.productos.b_terminar1_Click"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._productos /*keymon.lat.medicomed.c_productos*/ ._b_terminar1_click /*String*/ (null); -RDebugUtils.currentLine=26476571; - //BA.debugLineNum = 26476571;BA.debugLine="End Sub"; -return ""; -} -public String _b4xpage_appear(keymon.lat.medicomed.c_promos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_promos"; -if (Debug.shouldDelegate(ba, "b4xpage_appear", false)) - {return ((String) Debug.delegate(ba, "b4xpage_appear", null));} -anywheresoftware.b4a.objects.collections.Map _m = null; -RDebugUtils.currentLine=25755648; - //BA.debugLineNum = 25755648;BA.debugLine="Sub B4XPage_Appear"; -RDebugUtils.currentLine=25755650; - //BA.debugLineNum = 25755650;BA.debugLine="p_promociones.Top=0"; -__ref._p_promociones /*anywheresoftware.b4a.objects.PanelWrapper*/ .setTop((int) (0)); -RDebugUtils.currentLine=25755651; - //BA.debugLineNum = 25755651;BA.debugLine="p_promociones.Left=0"; -__ref._p_promociones /*anywheresoftware.b4a.objects.PanelWrapper*/ .setLeft((int) (0)); -RDebugUtils.currentLine=25755652; - //BA.debugLineNum = 25755652;BA.debugLine="p_promociones.Height=Root.Height"; -__ref._p_promociones /*anywheresoftware.b4a.objects.PanelWrapper*/ .setHeight(__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=25755653; - //BA.debugLineNum = 25755653;BA.debugLine="p_promociones.Width=Root.Width"; -__ref._p_promociones /*anywheresoftware.b4a.objects.PanelWrapper*/ .setWidth(__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()); -RDebugUtils.currentLine=25755654; - //BA.debugLineNum = 25755654;BA.debugLine="b_terminar1.Left = Root.Width - (b_terminar1.Widt"; -__ref._b_terminar1 /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setLeft((int) (__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()-(__ref._b_terminar1 /*anywheresoftware.b4a.objects.ButtonWrapper*/ .getWidth()+10))); -RDebugUtils.currentLine=25755655; - //BA.debugLineNum = 25755655;BA.debugLine="b_continuar.Left = Root.Width - b_terminar1.Width"; -__ref._b_continuar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setLeft((int) (__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()-__ref._b_terminar1 /*anywheresoftware.b4a.objects.ButtonWrapper*/ .getWidth()-(__ref._b_continuar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .getWidth()+20))); -RDebugUtils.currentLine=25755656; - //BA.debugLineNum = 25755656;BA.debugLine="prodsIds.Initialize"; -__ref._prodsids /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=25755657; - //BA.debugLineNum = 25755657;BA.debugLine="prodsCants.Initialize"; -__ref._prodscants /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=25755658; - //BA.debugLineNum = 25755658;BA.debugLine="prodsPrecios.Initialize"; -__ref._prodsprecios /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=25755659; - //BA.debugLineNum = 25755659;BA.debugLine="prodsIds2.Initialize"; -__ref._prodsids2 /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=25755660; - //BA.debugLineNum = 25755660;BA.debugLine="prodsCants2.Initialize"; -__ref._prodscants2 /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=25755661; - //BA.debugLineNum = 25755661;BA.debugLine="prodsPrecios2.Initialize"; -__ref._prodsprecios2 /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=25755662; - //BA.debugLineNum = 25755662;BA.debugLine="Dim m As Map = Subs.traeTotalesClienteActual"; -_m = new anywheresoftware.b4a.objects.collections.Map(); -_m = _subs._traetotalesclienteactual /*anywheresoftware.b4a.objects.collections.Map*/ (ba); -RDebugUtils.currentLine=25755663; - //BA.debugLineNum = 25755663;BA.debugLine="prodsPedidoActual = m.Get(\"productos\")"; -__ref._prodspedidoactual /*String*/ = BA.ObjectToString(_m.Get((Object)("productos"))); -RDebugUtils.currentLine=25755664; - //BA.debugLineNum = 25755664;BA.debugLine="montoPedidoActual = m.Get(\"monto\")"; -__ref._montopedidoactual /*String*/ = BA.ObjectToString(_m.Get((Object)("monto"))); -RDebugUtils.currentLine=25755666; - //BA.debugLineNum = 25755666;BA.debugLine="If laPromo <> \"\" Then muestraPromo(laPromo, elCli"; -if ((__ref._lapromo /*String*/ ).equals("") == false) { -__ref._muestrapromo /*String*/ (null,__ref._lapromo /*String*/ ,__ref._elcliente /*String*/ );}; -RDebugUtils.currentLine=25755667; - //BA.debugLineNum = 25755667;BA.debugLine="End Sub"; -return ""; -} -public String _muestrapromo(keymon.lat.medicomed.c_promos __ref,String _promo,String _cliente) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_promos"; -if (Debug.shouldDelegate(ba, "muestrapromo", false)) - {return ((String) Debug.delegate(ba, "muestrapromo", new Object[] {_promo,_cliente}));} +public String _muestrapromo(String _promo,String _cliente) throws Exception{ boolean _thislog = false; anywheresoftware.b4a.objects.collections.Map _mp = null; anywheresoftware.b4a.objects.collections.Map _prodspromo = null; @@ -813,79 +736,57 @@ int _pfp = 0; anywheresoftware.b4a.objects.LabelWrapper _label1 = null; String _p = ""; anywheresoftware.b4a.objects.collections.Map _thisprod = null; -RDebugUtils.currentLine=25821184; - //BA.debugLineNum = 25821184;BA.debugLine="Sub muestraPromo(promo As String, cliente As Strin"; -RDebugUtils.currentLine=25821185; - //BA.debugLineNum = 25821185;BA.debugLine="Private thisLog As Boolean = False"; + //BA.debugLineNum = 81;BA.debugLine="Sub muestraPromo(promo As String, cliente As Strin"; + //BA.debugLineNum = 82;BA.debugLine="Private thisLog As Boolean = False"; _thislog = __c.False; -RDebugUtils.currentLine=25821187; - //BA.debugLineNum = 25821187;BA.debugLine="estaPromo = promo"; -__ref._estapromo /*String*/ = _promo; -RDebugUtils.currentLine=25821188; - //BA.debugLineNum = 25821188;BA.debugLine="esteCliente = cliente"; -__ref._estecliente /*String*/ = _cliente; -RDebugUtils.currentLine=25821189; - //BA.debugLineNum = 25821189;BA.debugLine="Private mp As Map = Subs.traePromo(promo, cliente"; + //BA.debugLineNum = 84;BA.debugLine="estaPromo = promo"; +_estapromo = _promo; + //BA.debugLineNum = 85;BA.debugLine="esteCliente = cliente"; +_estecliente = _cliente; + //BA.debugLineNum = 86;BA.debugLine="Private mp As Map = Subs.traePromo(promo, cliente"; _mp = new anywheresoftware.b4a.objects.collections.Map(); _mp = _subs._traepromo /*anywheresoftware.b4a.objects.collections.Map*/ (ba,_promo,_cliente); -RDebugUtils.currentLine=25821190; - //BA.debugLineNum = 25821190;BA.debugLine="Private prodsPromo As Map = mp.Get(\"productos\") '"; + //BA.debugLineNum = 87;BA.debugLine="Private prodsPromo As Map = mp.Get(\"productos\") '"; _prodspromo = new anywheresoftware.b4a.objects.collections.Map(); _prodspromo = (anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_mp.Get((Object)("productos")))); -RDebugUtils.currentLine=25821191; - //BA.debugLineNum = 25821191;BA.debugLine="Private invDispPromo As Map = Subs.traemosInventa"; + //BA.debugLineNum = 88;BA.debugLine="Private invDispPromo As Map = Subs.traemosInventa"; _invdisppromo = new anywheresoftware.b4a.objects.collections.Map(); _invdisppromo = _subs._traemosinventariodisponibleparapromo /*anywheresoftware.b4a.objects.collections.Map*/ (ba,_promo); -RDebugUtils.currentLine=25821193; - //BA.debugLineNum = 25821193;BA.debugLine="If thisLog Then Log(\"Max promos por inv de prods"; + //BA.debugLineNum = 90;BA.debugLine="If thisLog Then Log(\"Max promos por inv de prods"; if (_thislog) { -__c.LogImpl("325821193","Max promos por inv de prods FIJOS: "+BA.NumberToString(_subs._revisamaxpromosprodsfijosporinventario /*int*/ (ba,_mp)),0);}; -RDebugUtils.currentLine=25821194; - //BA.debugLineNum = 25821194;BA.debugLine="If thisLog Then Log(\"Max promos por inv de prods"; +__c.LogImpl("358785801","Max promos por inv de prods FIJOS: "+BA.NumberToString(_subs._revisamaxpromosprodsfijosporinventario /*int*/ (ba,_mp)),0);}; + //BA.debugLineNum = 91;BA.debugLine="If thisLog Then Log(\"Max promos por inv de prods"; if (_thislog) { -__c.LogImpl("325821194","Max promos por inv de prods VARIABLES: "+BA.NumberToString(_subs._revisamaxpromosprodsvariablesporinventario /*int*/ (ba,_mp)),0);}; -RDebugUtils.currentLine=25821195; - //BA.debugLineNum = 25821195;BA.debugLine="maxCantPromos = Subs.revisaMaxPromosProdsVariable"; -__ref._maxcantpromos /*int*/ = _subs._revisamaxpromosprodsvariablesporinventario /*int*/ (ba,_mp); -RDebugUtils.currentLine=25821196; - //BA.debugLineNum = 25821196;BA.debugLine="et_promoCant.Text = 1"; -__ref._et_promocant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setText(BA.ObjectToCharSequence(1)); -RDebugUtils.currentLine=25821197; - //BA.debugLineNum = 25821197;BA.debugLine="l_promosCant.text = \"Max promos: \" & maxCantPromo"; -__ref._l_promoscant /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence("Max promos: "+BA.NumberToString(__ref._maxcantpromos /*int*/ ))); -RDebugUtils.currentLine=25821198; - //BA.debugLineNum = 25821198;BA.debugLine="Private cs As CSBuilder"; +__c.LogImpl("358785802","Max promos por inv de prods VARIABLES: "+BA.NumberToString(_subs._revisamaxpromosprodsvariablesporinventario /*int*/ (ba,_mp)),0);}; + //BA.debugLineNum = 92;BA.debugLine="maxCantPromos = Subs.revisaMaxPromosProdsVariable"; +_maxcantpromos = _subs._revisamaxpromosprodsvariablesporinventario /*int*/ (ba,_mp); + //BA.debugLineNum = 93;BA.debugLine="et_promoCant.Text = 1"; +_et_promocant.setText(BA.ObjectToCharSequence(1)); + //BA.debugLineNum = 94;BA.debugLine="l_promosCant.text = \"Max promos: \" & maxCantPromo"; +_l_promoscant.setText(BA.ObjectToCharSequence("Max promos: "+BA.NumberToString(_maxcantpromos))); + //BA.debugLineNum = 95;BA.debugLine="Private cs As CSBuilder"; _cs = new anywheresoftware.b4a.objects.CSBuilder(); -RDebugUtils.currentLine=25821199; - //BA.debugLineNum = 25821199;BA.debugLine="cs.Initialize"; + //BA.debugLineNum = 96;BA.debugLine="cs.Initialize"; _cs.Initialize(); -RDebugUtils.currentLine=25821200; - //BA.debugLineNum = 25821200;BA.debugLine="If thisLog Then Log(mp)"; + //BA.debugLineNum = 97;BA.debugLine="If thisLog Then Log(mp)"; if (_thislog) { -__c.LogImpl("325821200",BA.ObjectToString(_mp),0);}; -RDebugUtils.currentLine=25821201; - //BA.debugLineNum = 25821201;BA.debugLine="If thisLog Then Log(prodsPromo)"; +__c.LogImpl("358785808",BA.ObjectToString(_mp),0);}; + //BA.debugLineNum = 98;BA.debugLine="If thisLog Then Log(prodsPromo)"; if (_thislog) { -__c.LogImpl("325821201",BA.ObjectToString(_prodspromo),0);}; -RDebugUtils.currentLine=25821205; - //BA.debugLineNum = 25821205;BA.debugLine="l_promoDesc.Text = cs.Color(Colors.RGB(100,149,23"; -__ref._l_promodesc /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(_cs.Color(__c.Colors.RGB((int) (100),(int) (149),(int) (237))).Append(BA.ObjectToCharSequence("Promocion: ")).Pop().Append(BA.ObjectToCharSequence(__c.CRLF)).Append(BA.ObjectToCharSequence(_promo)).Append(BA.ObjectToCharSequence(__c.CRLF)).Append(BA.ObjectToCharSequence(_mp.Get((Object)("descripcion")))).PopAll().getObject())); -RDebugUtils.currentLine=25821206; - //BA.debugLineNum = 25821206;BA.debugLine="prodsFijosTot = 0"; -__ref._prodsfijostot /*float*/ = (float) (0); -RDebugUtils.currentLine=25821209; - //BA.debugLineNum = 25821209;BA.debugLine="Dim pv As List = mp.Get(\"prodsVariables\")"; +__c.LogImpl("358785809",BA.ObjectToString(_prodspromo),0);}; + //BA.debugLineNum = 102;BA.debugLine="l_promoDesc.Text = cs.Color(Colors.RGB(100,149,23"; +_l_promodesc.setText(BA.ObjectToCharSequence(_cs.Color(__c.Colors.RGB((int) (100),(int) (149),(int) (237))).Append(BA.ObjectToCharSequence("Promocion: ")).Pop().Append(BA.ObjectToCharSequence(__c.CRLF)).Append(BA.ObjectToCharSequence(_promo)).Append(BA.ObjectToCharSequence(__c.CRLF)).Append(BA.ObjectToCharSequence(_mp.Get((Object)("descripcion")))).PopAll().getObject())); + //BA.debugLineNum = 103;BA.debugLine="prodsFijosTot = 0"; +_prodsfijostot = (float) (0); + //BA.debugLineNum = 106;BA.debugLine="Dim pv As List = mp.Get(\"prodsVariables\")"; _pv = new anywheresoftware.b4a.objects.collections.List(); _pv = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_mp.Get((Object)("prodsVariables")))); -RDebugUtils.currentLine=25821210; - //BA.debugLineNum = 25821210;BA.debugLine="If thisLog Then Log(mp)"; + //BA.debugLineNum = 107;BA.debugLine="If thisLog Then Log(mp)"; if (_thislog) { -__c.LogImpl("325821210",BA.ObjectToString(_mp),0);}; -RDebugUtils.currentLine=25821211; - //BA.debugLineNum = 25821211;BA.debugLine="tpf = 0"; -__ref._tpf /*int*/ = (int) (0); -RDebugUtils.currentLine=25821212; - //BA.debugLineNum = 25821212;BA.debugLine="For Each pfp As Int In mp.Get(\"prodsFijosPiezas\")"; +__c.LogImpl("358785818",BA.ObjectToString(_mp),0);}; + //BA.debugLineNum = 108;BA.debugLine="tpf = 0"; +_tpf = (int) (0); + //BA.debugLineNum = 109;BA.debugLine="For Each pfp As Int In mp.Get(\"prodsFijosPiezas\")"; { final anywheresoftware.b4a.BA.IterableList group21 = ((anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_mp.Get((Object)("prodsFijosPiezas"))))); final int groupLen21 = group21.getSize() @@ -893,84 +794,60 @@ final int groupLen21 = group21.getSize() ; for (; index21 < groupLen21;index21++){ _pfp = (int)(BA.ObjectToNumber(group21.Get(index21))); -RDebugUtils.currentLine=25821213; - //BA.debugLineNum = 25821213;BA.debugLine="tpf = tpf + pfp"; -__ref._tpf /*int*/ = (int) (__ref._tpf /*int*/ +_pfp); + //BA.debugLineNum = 110;BA.debugLine="tpf = tpf + pfp"; +_tpf = (int) (_tpf+_pfp); } }; -RDebugUtils.currentLine=25821215; - //BA.debugLineNum = 25821215;BA.debugLine="tpf2 = tpf"; -__ref._tpf2 /*int*/ = __ref._tpf /*int*/ ; -RDebugUtils.currentLine=25821217; - //BA.debugLineNum = 25821217;BA.debugLine="l_prodsFijos.Text = $\"Productos fijos (${tpf})\"$"; -__ref._l_prodsfijos /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(("Productos fijos ("+__c.SmartStringFormatter("",(Object)(__ref._tpf /*int*/ ))+")"))); -RDebugUtils.currentLine=25821218; - //BA.debugLineNum = 25821218;BA.debugLine="prodsVarReq = mp.Get(\"prodsVariablesRequeridos\")"; -__ref._prodsvarreq /*int*/ = (int)(BA.ObjectToNumber(_mp.Get((Object)("prodsVariablesRequeridos")))); -RDebugUtils.currentLine=25821219; - //BA.debugLineNum = 25821219;BA.debugLine="prodsVarReq2 = prodsVarReq"; -__ref._prodsvarreq2 /*int*/ = __ref._prodsvarreq /*int*/ ; -RDebugUtils.currentLine=25821220; - //BA.debugLineNum = 25821220;BA.debugLine="l_prodsVariables.Text = $\"Productos variables req"; -__ref._l_prodsvariables /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(("Productos variables requeridos: "+__c.SmartStringFormatter("",(Object)(__ref._prodsvarreq /*int*/ ))+""))); -RDebugUtils.currentLine=25821221; - //BA.debugLineNum = 25821221;BA.debugLine="If prodsVarReq = 0 Then"; -if (__ref._prodsvarreq /*int*/ ==0) { -RDebugUtils.currentLine=25821222; - //BA.debugLineNum = 25821222;BA.debugLine="p_prodsVariables.Visible = False"; -__ref._p_prodsvariables /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.False); + //BA.debugLineNum = 112;BA.debugLine="tpf2 = tpf"; +_tpf2 = _tpf; + //BA.debugLineNum = 114;BA.debugLine="l_prodsFijos.Text = $\"Productos fijos (${tpf})\"$"; +_l_prodsfijos.setText(BA.ObjectToCharSequence(("Productos fijos ("+__c.SmartStringFormatter("",(Object)(_tpf))+")"))); + //BA.debugLineNum = 115;BA.debugLine="prodsVarReq = mp.Get(\"prodsVariablesRequeridos\")"; +_prodsvarreq = (int)(BA.ObjectToNumber(_mp.Get((Object)("prodsVariablesRequeridos")))); + //BA.debugLineNum = 116;BA.debugLine="prodsVarReq2 = prodsVarReq"; +_prodsvarreq2 = _prodsvarreq; + //BA.debugLineNum = 117;BA.debugLine="l_prodsVariables.Text = $\"Productos variables req"; +_l_prodsvariables.setText(BA.ObjectToCharSequence(("Productos variables requeridos: "+__c.SmartStringFormatter("",(Object)(_prodsvarreq))+""))); + //BA.debugLineNum = 118;BA.debugLine="If prodsVarReq = 0 Then"; +if (_prodsvarreq==0) { + //BA.debugLineNum = 119;BA.debugLine="p_prodsVariables.Visible = False"; +_p_prodsvariables.setVisible(__c.False); }else { -RDebugUtils.currentLine=25821224; - //BA.debugLineNum = 25821224;BA.debugLine="p_prodsVariables.Visible = True"; -__ref._p_prodsvariables /*anywheresoftware.b4a.objects.PanelWrapper*/ .setVisible(__c.True); + //BA.debugLineNum = 121;BA.debugLine="p_prodsVariables.Visible = True"; +_p_prodsvariables.setVisible(__c.True); }; -RDebugUtils.currentLine=25821227; - //BA.debugLineNum = 25821227;BA.debugLine="Dim label1 As Label"; + //BA.debugLineNum = 124;BA.debugLine="Dim label1 As Label"; _label1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=25821228; - //BA.debugLineNum = 25821228;BA.debugLine="label1 = lv_prodsFijos.SingleLineLayout.Label"; -_label1 = __ref._lv_prodsfijos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getSingleLineLayout().Label; -RDebugUtils.currentLine=25821229; - //BA.debugLineNum = 25821229;BA.debugLine="label1.TextSize = 13"; + //BA.debugLineNum = 125;BA.debugLine="label1 = lv_prodsFijos.SingleLineLayout.Label"; +_label1 = _lv_prodsfijos.getSingleLineLayout().Label; + //BA.debugLineNum = 126;BA.debugLine="label1.TextSize = 13"; _label1.setTextSize((float) (13)); -RDebugUtils.currentLine=25821230; - //BA.debugLineNum = 25821230;BA.debugLine="label1.TextColor = Colors.black"; + //BA.debugLineNum = 127;BA.debugLine="label1.TextColor = Colors.black"; _label1.setTextColor(__c.Colors.Black); -RDebugUtils.currentLine=25821231; - //BA.debugLineNum = 25821231;BA.debugLine="lv_prodsFijos.SingleLineLayout.ItemHeight = 30dip"; -__ref._lv_prodsfijos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getSingleLineLayout().setItemHeight(__c.DipToCurrent((int) (30))); -RDebugUtils.currentLine=25821232; - //BA.debugLineNum = 25821232;BA.debugLine="lv_prodsFijos.Clear"; -__ref._lv_prodsfijos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear(); -RDebugUtils.currentLine=25821234; - //BA.debugLineNum = 25821234;BA.debugLine="lv_prodsFijos.Clear"; -__ref._lv_prodsfijos /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear(); -RDebugUtils.currentLine=25821235; - //BA.debugLineNum = 25821235;BA.debugLine="agregaFijosALista(mp, True)"; -__ref._agregafijosalista /*String*/ (null,_mp,__c.True); -RDebugUtils.currentLine=25821236; - //BA.debugLineNum = 25821236;BA.debugLine="If thisLog Then Log(\"Total prods fijos = \" & prod"; + //BA.debugLineNum = 128;BA.debugLine="lv_prodsFijos.SingleLineLayout.ItemHeight = 30dip"; +_lv_prodsfijos.getSingleLineLayout().setItemHeight(__c.DipToCurrent((int) (30))); + //BA.debugLineNum = 129;BA.debugLine="lv_prodsFijos.Clear"; +_lv_prodsfijos.Clear(); + //BA.debugLineNum = 131;BA.debugLine="lv_prodsFijos.Clear"; +_lv_prodsfijos.Clear(); + //BA.debugLineNum = 132;BA.debugLine="agregaFijosALista(mp, True)"; +_agregafijosalista(_mp,__c.True); + //BA.debugLineNum = 133;BA.debugLine="If thisLog Then Log(\"Total prods fijos = \" & prod"; if (_thislog) { -__c.LogImpl("325821236","Total prods fijos = "+BA.NumberToString(__ref._prodsfijostot /*float*/ ),0);}; -RDebugUtils.currentLine=25821238; - //BA.debugLineNum = 25821238;BA.debugLine="l_totProds.text = $\"Productos: ${tpf}\"$"; -__ref._l_totprods /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(("Productos: "+__c.SmartStringFormatter("",(Object)(__ref._tpf /*int*/ ))+""))); -RDebugUtils.currentLine=25821239; - //BA.debugLineNum = 25821239;BA.debugLine="l_total.Text = $\"Total: $$1.2{prodsFijosTot}\"$"; -__ref._l_total /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(("Total: $"+__c.SmartStringFormatter("1.2",(Object)(__ref._prodsfijostot /*float*/ ))+""))); -RDebugUtils.currentLine=25821245; - //BA.debugLineNum = 25821245;BA.debugLine="If thisLog Then Log(pv)"; +__c.LogImpl("358785844","Total prods fijos = "+BA.NumberToString(_prodsfijostot),0);}; + //BA.debugLineNum = 135;BA.debugLine="l_totProds.text = $\"Productos: ${tpf}\"$"; +_l_totprods.setText(BA.ObjectToCharSequence(("Productos: "+__c.SmartStringFormatter("",(Object)(_tpf))+""))); + //BA.debugLineNum = 136;BA.debugLine="l_total.Text = $\"Total: $$1.2{prodsFijosTot}\"$"; +_l_total.setText(BA.ObjectToCharSequence(("Total: $"+__c.SmartStringFormatter("1.2",(Object)(_prodsfijostot))+""))); + //BA.debugLineNum = 142;BA.debugLine="If thisLog Then Log(pv)"; if (_thislog) { -__c.LogImpl("325821245",BA.ObjectToString(_pv),0);}; -RDebugUtils.currentLine=25821246; - //BA.debugLineNum = 25821246;BA.debugLine="If thisLog Then Log(\"invDisp=\" & invDispPromo)"; +__c.LogImpl("358785853",BA.ObjectToString(_pv),0);}; + //BA.debugLineNum = 143;BA.debugLine="If thisLog Then Log(\"invDisp=\" & invDispPromo)"; if (_thislog) { -__c.LogImpl("325821246","invDisp="+BA.ObjectToString(_invdisppromo),0);}; -RDebugUtils.currentLine=25821247; - //BA.debugLineNum = 25821247;BA.debugLine="clv_prodsVariabes.Clear"; -__ref._clv_prodsvariabes /*b4a.example3.customlistview*/ ._clear(); -RDebugUtils.currentLine=25821248; - //BA.debugLineNum = 25821248;BA.debugLine="For Each p As String In pv"; +__c.LogImpl("358785854","invDisp="+BA.ObjectToString(_invdisppromo),0);}; + //BA.debugLineNum = 144;BA.debugLine="clv_prodsVariabes.Clear"; +_clv_prodsvariabes._clear(); + //BA.debugLineNum = 145;BA.debugLine="For Each p As String In pv"; { final anywheresoftware.b4a.BA.IterableList group48 = _pv; final int groupLen48 = group48.getSize() @@ -978,278 +855,32 @@ final int groupLen48 = group48.getSize() ; for (; index48 < groupLen48;index48++){ _p = BA.ObjectToString(group48.Get(index48)); -RDebugUtils.currentLine=25821249; - //BA.debugLineNum = 25821249;BA.debugLine="If invDispPromo.ContainsKey(p) Then 'Si no esta"; + //BA.debugLineNum = 146;BA.debugLine="If invDispPromo.ContainsKey(p) Then 'Si no esta"; if (_invdisppromo.ContainsKey((Object)(_p))) { -RDebugUtils.currentLine=25821254; - //BA.debugLineNum = 25821254;BA.debugLine="Private thisProd As Map = prodsPromo.Get(p)"; + //BA.debugLineNum = 151;BA.debugLine="Private thisProd As Map = prodsPromo.Get(p)"; _thisprod = new anywheresoftware.b4a.objects.collections.Map(); _thisprod = (anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_prodspromo.Get((Object)(_p)))); -RDebugUtils.currentLine=25821255; - //BA.debugLineNum = 25821255;BA.debugLine="If thisLog Then Log(thisProd)"; + //BA.debugLineNum = 152;BA.debugLine="If thisLog Then Log(thisProd)"; if (_thislog) { -__c.LogImpl("325821255",BA.ObjectToString(_thisprod),0);}; -RDebugUtils.currentLine=25821256; - //BA.debugLineNum = 25821256;BA.debugLine="clv_prodsVariabes.Add(CreateListItem(Subs.traeP"; -__ref._clv_prodsvariabes /*b4a.example3.customlistview*/ ._add((anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__ref._createlistitem /*anywheresoftware.b4a.objects.PanelWrapper*/ (null,_subs._traeprodnombre /*String*/ (ba,_p)+__c.CRLF+"Hay "+BA.ObjectToString(_invdisppromo.Get((Object)(_p)))+" $"+BA.ObjectToString(_thisprod.Get((Object)("precio"))),BA.ObjectToString(_thisprod.Get((Object)("precio"))),(int)(BA.ObjectToNumber(_invdisppromo.Get((Object)(_p)))),__ref._clv_prodsvariabes /*b4a.example3.customlistview*/ ._asview().getWidth(),__c.DipToCurrent((int) (50)),(anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper(), (android.graphics.Bitmap)(__c.Null)),_p).getObject())),(Object)(_p)); +__c.LogImpl("358785863",BA.ObjectToString(_thisprod),0);}; + //BA.debugLineNum = 153;BA.debugLine="clv_prodsVariabes.Add(CreateListItem(Subs.traeP"; +_clv_prodsvariabes._add((anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_createlistitem(_subs._traeprodnombre /*String*/ (ba,_p)+__c.CRLF+"Hay "+BA.ObjectToString(_invdisppromo.Get((Object)(_p)))+" $"+BA.ObjectToString(_thisprod.Get((Object)("precio"))),BA.ObjectToString(_thisprod.Get((Object)("precio"))),(int)(BA.ObjectToNumber(_invdisppromo.Get((Object)(_p)))),_clv_prodsvariabes._asview().getWidth(),__c.DipToCurrent((int) (50)),(anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper(), (android.graphics.Bitmap)(__c.Null)),_p).getObject())),(Object)(_p)); }; } }; -RDebugUtils.currentLine=25821259; - //BA.debugLineNum = 25821259;BA.debugLine="b_terminar1.Visible = False"; -__ref._b_terminar1 /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=25821260; - //BA.debugLineNum = 25821260;BA.debugLine="b_continuar.Visible = False"; -__ref._b_continuar /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setVisible(__c.False); -RDebugUtils.currentLine=25821261; - //BA.debugLineNum = 25821261;BA.debugLine="cuentaProds"; -__ref._cuentaprods /*String*/ (null); -RDebugUtils.currentLine=25821262; - //BA.debugLineNum = 25821262;BA.debugLine="End Sub"; + //BA.debugLineNum = 156;BA.debugLine="b_terminar1.Visible = False"; +_b_terminar1.setVisible(__c.False); + //BA.debugLineNum = 157;BA.debugLine="b_continuar.Visible = False"; +_b_continuar.setVisible(__c.False); + //BA.debugLineNum = 158;BA.debugLine="cuentaProds"; +_cuentaprods(); + //BA.debugLineNum = 159;BA.debugLine="End Sub"; return ""; } -public String _b4xpage_created(keymon.lat.medicomed.c_promos __ref,anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_promos"; -if (Debug.shouldDelegate(ba, "b4xpage_created", false)) - {return ((String) Debug.delegate(ba, "b4xpage_created", new Object[] {_root1}));} -RDebugUtils.currentLine=25690112; - //BA.debugLineNum = 25690112;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -RDebugUtils.currentLine=25690113; - //BA.debugLineNum = 25690113;BA.debugLine="Root = Root1"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = _root1; -RDebugUtils.currentLine=25690115; - //BA.debugLineNum = 25690115;BA.debugLine="Root.LoadLayout(\"promociones\")"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .LoadLayout("promociones",ba); -RDebugUtils.currentLine=25690116; - //BA.debugLineNum = 25690116;BA.debugLine="promosMap.Initialize"; -__ref._promosmap /*anywheresoftware.b4a.objects.collections.Map*/ .Initialize(); -RDebugUtils.currentLine=25690117; - //BA.debugLineNum = 25690117;BA.debugLine="End Sub"; -return ""; +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]); +return BA.SubDelegator.SubNotFound; } -public String _class_globals(keymon.lat.medicomed.c_promos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_promos"; -RDebugUtils.currentLine=25559040; - //BA.debugLineNum = 25559040;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=25559041; - //BA.debugLineNum = 25559041;BA.debugLine="Private Root As B4XView 'ignore"; -_root = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=25559042; - //BA.debugLineNum = 25559042;BA.debugLine="Private xui As XUI"; -_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=25559043; - //BA.debugLineNum = 25559043;BA.debugLine="Private l_promoDesc As Label"; -_l_promodesc = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=25559044; - //BA.debugLineNum = 25559044;BA.debugLine="Private lv_prodsFijos As ListView"; -_lv_prodsfijos = new anywheresoftware.b4a.objects.ListViewWrapper(); -RDebugUtils.currentLine=25559045; - //BA.debugLineNum = 25559045;BA.debugLine="Private clv_prodsVariabes As CustomListView"; -_clv_prodsvariabes = new b4a.example3.customlistview(); -RDebugUtils.currentLine=25559046; - //BA.debugLineNum = 25559046;BA.debugLine="Private l_prodsFijos As Label"; -_l_prodsfijos = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=25559047; - //BA.debugLineNum = 25559047;BA.debugLine="Private l_prodsVariables As Label"; -_l_prodsvariables = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=25559048; - //BA.debugLineNum = 25559048;BA.debugLine="Private i_prod As ImageView"; -_i_prod = new anywheresoftware.b4a.objects.ImageViewWrapper(); -RDebugUtils.currentLine=25559049; - //BA.debugLineNum = 25559049;BA.debugLine="Private l_prodX As Label"; -_l_prodx = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=25559050; - //BA.debugLineNum = 25559050;BA.debugLine="Private p_prods As Panel"; -_p_prods = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=25559051; - //BA.debugLineNum = 25559051;BA.debugLine="Private b_prodMenos As Button"; -_b_prodmenos = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=25559052; - //BA.debugLineNum = 25559052;BA.debugLine="Private et_pCant As EditText"; -_et_pcant = new anywheresoftware.b4a.objects.EditTextWrapper(); -RDebugUtils.currentLine=25559053; - //BA.debugLineNum = 25559053;BA.debugLine="Private b_prodMas As Button"; -_b_prodmas = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=25559054; - //BA.debugLineNum = 25559054;BA.debugLine="Private l_pCant As Label"; -_l_pcant = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=25559055; - //BA.debugLineNum = 25559055;BA.debugLine="Dim totalProds As Int = 0"; -_totalprods = (int) (0); -RDebugUtils.currentLine=25559056; - //BA.debugLineNum = 25559056;BA.debugLine="Dim prodsVarReq As Int = 0"; -_prodsvarreq = (int) (0); -RDebugUtils.currentLine=25559057; - //BA.debugLineNum = 25559057;BA.debugLine="Dim prodsVarReq2 As Int = 0"; -_prodsvarreq2 = (int) (0); -RDebugUtils.currentLine=25559058; - //BA.debugLineNum = 25559058;BA.debugLine="Dim totalCompra As Float = 0"; -_totalcompra = (float) (0); -RDebugUtils.currentLine=25559059; - //BA.debugLineNum = 25559059;BA.debugLine="Dim prodsFijosTot As Float = 0"; -_prodsfijostot = (float) (0); -RDebugUtils.currentLine=25559060; - //BA.debugLineNum = 25559060;BA.debugLine="Dim tpf As Int = 0"; -_tpf = (int) (0); -RDebugUtils.currentLine=25559061; - //BA.debugLineNum = 25559061;BA.debugLine="Dim tpf2 As Int = 0"; -_tpf2 = (int) (0); -RDebugUtils.currentLine=25559062; - //BA.debugLineNum = 25559062;BA.debugLine="Dim maxCantPromos As Int = 1"; -_maxcantpromos = (int) (1); -RDebugUtils.currentLine=25559063; - //BA.debugLineNum = 25559063;BA.debugLine="Private l_totProds As Label"; -_l_totprods = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=25559064; - //BA.debugLineNum = 25559064;BA.debugLine="Private l_total As Label"; -_l_total = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=25559065; - //BA.debugLineNum = 25559065;BA.debugLine="Private b_terminar1 As Button"; -_b_terminar1 = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=25559066; - //BA.debugLineNum = 25559066;BA.debugLine="Private p_promociones As Panel"; -_p_promociones = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=25559067; - //BA.debugLineNum = 25559067;BA.debugLine="Dim prodsIds, prodsCants, prodsPrecios, prodsIds2"; -_prodsids = new anywheresoftware.b4a.objects.collections.List(); -_prodscants = new anywheresoftware.b4a.objects.collections.List(); -_prodsprecios = new anywheresoftware.b4a.objects.collections.List(); -_prodsids2 = new anywheresoftware.b4a.objects.collections.List(); -_prodscants2 = new anywheresoftware.b4a.objects.collections.List(); -_prodsprecios2 = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=25559068; - //BA.debugLineNum = 25559068;BA.debugLine="Dim estaPromo, esteCliente As String"; -_estapromo = ""; -_estecliente = ""; -RDebugUtils.currentLine=25559069; - //BA.debugLineNum = 25559069;BA.debugLine="Private b_promoMas As Button"; -_b_promomas = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=25559070; - //BA.debugLineNum = 25559070;BA.debugLine="Private b_promoMenos As Button"; -_b_promomenos = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=25559071; - //BA.debugLineNum = 25559071;BA.debugLine="Private et_promoCant As EditText"; -_et_promocant = new anywheresoftware.b4a.objects.EditTextWrapper(); -RDebugUtils.currentLine=25559072; - //BA.debugLineNum = 25559072;BA.debugLine="Private l_promosCant As Label"; -_l_promoscant = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=25559073; - //BA.debugLineNum = 25559073;BA.debugLine="Private b_continuar As Button"; -_b_continuar = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=25559074; - //BA.debugLineNum = 25559074;BA.debugLine="Private p_prodsVariables As Panel"; -_p_prodsvariables = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=25559075; - //BA.debugLineNum = 25559075;BA.debugLine="Dim laPromo = \"\", elCliente = \"\" As String"; -_lapromo = ""; -_elcliente = ""; -RDebugUtils.currentLine=25559076; - //BA.debugLineNum = 25559076;BA.debugLine="Dim prodsPedidoActual As String"; -_prodspedidoactual = ""; -RDebugUtils.currentLine=25559077; - //BA.debugLineNum = 25559077;BA.debugLine="Dim montoPedidoActual As String"; -_montopedidoactual = ""; -RDebugUtils.currentLine=25559078; - //BA.debugLineNum = 25559078;BA.debugLine="Dim promosMap As Map"; -_promosmap = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=25559079; - //BA.debugLineNum = 25559079;BA.debugLine="End Sub"; -return ""; } -public anywheresoftware.b4a.objects.PanelWrapper _createlistitem(keymon.lat.medicomed.c_promos __ref,String _text,String _preciou,int _inv,int _width,int _height,anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _img,String _prodid) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_promos"; -if (Debug.shouldDelegate(ba, "createlistitem", false)) - {return ((anywheresoftware.b4a.objects.PanelWrapper) Debug.delegate(ba, "createlistitem", new Object[] {_text,_preciou,_inv,_width,_height,_img,_prodid}));} -anywheresoftware.b4a.objects.B4XViewWrapper _p = null; -RDebugUtils.currentLine=25952256; - //BA.debugLineNum = 25952256;BA.debugLine="Sub CreateListItem(Text As String, precioU As Stri"; -RDebugUtils.currentLine=25952257; - //BA.debugLineNum = 25952257;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"\")"; -_p = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_p = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,""); -RDebugUtils.currentLine=25952258; - //BA.debugLineNum = 25952258;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, Width, Height)"; -_p.SetLayoutAnimated((int) (0),(int) (0),(int) (0),_width,_height); -RDebugUtils.currentLine=25952259; - //BA.debugLineNum = 25952259;BA.debugLine="p.LoadLayout(\"proditempromo\")"; -_p.LoadLayout("proditempromo",ba); -RDebugUtils.currentLine=25952260; - //BA.debugLineNum = 25952260;BA.debugLine="l_prodX.TextSize = 15"; -__ref._l_prodx /*anywheresoftware.b4a.objects.LabelWrapper*/ .setTextSize((float) (15)); -RDebugUtils.currentLine=25952261; - //BA.debugLineNum = 25952261;BA.debugLine="l_prodX.Text = Text"; -__ref._l_prodx /*anywheresoftware.b4a.objects.LabelWrapper*/ .setText(BA.ObjectToCharSequence(_text)); -RDebugUtils.currentLine=25952262; - //BA.debugLineNum = 25952262;BA.debugLine="l_prodX.TextSize = 15"; -__ref._l_prodx /*anywheresoftware.b4a.objects.LabelWrapper*/ .setTextSize((float) (15)); -RDebugUtils.currentLine=25952263; - //BA.debugLineNum = 25952263;BA.debugLine="p_prods.Height = Height"; -__ref._p_prods /*anywheresoftware.b4a.objects.PanelWrapper*/ .setHeight(_height); -RDebugUtils.currentLine=25952264; - //BA.debugLineNum = 25952264;BA.debugLine="p_prods.Width = clv_prodsVariabes.GetBase.Width"; -__ref._p_prods /*anywheresoftware.b4a.objects.PanelWrapper*/ .setWidth(__ref._clv_prodsvariabes /*b4a.example3.customlistview*/ ._getbase().getWidth()); -RDebugUtils.currentLine=25952265; - //BA.debugLineNum = 25952265;BA.debugLine="l_prodX.Height = Height"; -__ref._l_prodx /*anywheresoftware.b4a.objects.LabelWrapper*/ .setHeight(_height); -RDebugUtils.currentLine=25952267; - //BA.debugLineNum = 25952267;BA.debugLine="l_pCant.Tag = precioU&\"|\"&inv&\"|\"&prodId"; -__ref._l_pcant /*anywheresoftware.b4a.objects.LabelWrapper*/ .setTag((Object)(_preciou+"|"+BA.NumberToString(_inv)+"|"+_prodid)); -RDebugUtils.currentLine=25952268; - //BA.debugLineNum = 25952268;BA.debugLine="et_pCant.Tag = precioU&\"|\"&inv&\"|\"&prodId"; -__ref._et_pcant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .setTag((Object)(_preciou+"|"+BA.NumberToString(_inv)+"|"+_prodid)); -RDebugUtils.currentLine=25952269; - //BA.debugLineNum = 25952269;BA.debugLine="et_pCant.BringToFront"; -__ref._et_pcant /*anywheresoftware.b4a.objects.EditTextWrapper*/ .BringToFront(); -RDebugUtils.currentLine=25952271; - //BA.debugLineNum = 25952271;BA.debugLine="Return p"; -if (true) return (anywheresoftware.b4a.objects.PanelWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.PanelWrapper(), (android.view.ViewGroup)(_p.getObject())); -RDebugUtils.currentLine=25952272; - //BA.debugLineNum = 25952272;BA.debugLine="End Sub"; -return null; -} -public String _et_pcant_focuschanged(keymon.lat.medicomed.c_promos __ref,boolean _hasfocus) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_promos"; -if (Debug.shouldDelegate(ba, "et_pcant_focuschanged", false)) - {return ((String) Debug.delegate(ba, "et_pcant_focuschanged", new Object[] {_hasfocus}));} -RDebugUtils.currentLine=26279936; - //BA.debugLineNum = 26279936;BA.debugLine="Private Sub et_pCant_FocusChanged (HasFocus As Boo"; -RDebugUtils.currentLine=26279937; - //BA.debugLineNum = 26279937;BA.debugLine="LogColor(\"focus changed\", Colors.Magenta)"; -__c.LogImpl("326279937","focus changed",__c.Colors.Magenta); -RDebugUtils.currentLine=26279938; - //BA.debugLineNum = 26279938;BA.debugLine="cuentaProds"; -__ref._cuentaprods /*String*/ (null); -RDebugUtils.currentLine=26279939; - //BA.debugLineNum = 26279939;BA.debugLine="End Sub"; -return ""; -} -public String _et_pcant_textchanged(keymon.lat.medicomed.c_promos __ref,String _old,String _new) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_promos"; -if (Debug.shouldDelegate(ba, "et_pcant_textchanged", false)) - {return ((String) Debug.delegate(ba, "et_pcant_textchanged", new Object[] {_old,_new}));} -RDebugUtils.currentLine=26148864; - //BA.debugLineNum = 26148864;BA.debugLine="Private Sub et_pCant_TextChanged (Old As String, N"; -RDebugUtils.currentLine=26148866; - //BA.debugLineNum = 26148866;BA.debugLine="cuentaProds"; -__ref._cuentaprods /*String*/ (null); -RDebugUtils.currentLine=26148867; - //BA.debugLineNum = 26148867;BA.debugLine="End Sub"; -return ""; -} -public String _mods(keymon.lat.medicomed.c_promos __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_promos"; -if (Debug.shouldDelegate(ba, "mods", false)) - {return ((String) Debug.delegate(ba, "mods", null));} -RDebugUtils.currentLine=25493504; - //BA.debugLineNum = 25493504;BA.debugLine="Sub Mods"; -RDebugUtils.currentLine=25493506; - //BA.debugLineNum = 25493506;BA.debugLine="End Sub"; -return ""; -} -} \ No newline at end of file diff --git a/B4A/Objects/src/keymon/lat/medicomed/c_ticketsdia.java b/B4A/Objects/src/keymon/lat/medicomed/c_ticketsdia.java index 2fe0aac..e1b078d 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/c_ticketsdia.java +++ b/B4A/Objects/src/keymon/lat/medicomed/c_ticketsdia.java @@ -10,7 +10,7 @@ public class c_ticketsdia extends B4AClass.ImplB4AClass implements BA.SubDelegat private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.c_ticketsdia"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.c_ticketsdia"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class c_ticketsdia extends B4AClass.ImplB4AClass implements BA.SubDelegat 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.keywords.Common __c = null; public anywheresoftware.b4a.objects.B4XViewWrapper _root = null; public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; public anywheresoftware.b4a.objects.PanelWrapper _p_ticketsdia = null; @@ -53,423 +46,281 @@ 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_ticketsdia __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="c_ticketsdia"; -if (Debug.shouldDelegate(ba, "initialize", false)) - {return ((Object) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=15400960; - //BA.debugLineNum = 15400960;BA.debugLine="Public Sub Initialize As Object"; -RDebugUtils.currentLine=15400961; - //BA.debugLineNum = 15400961;BA.debugLine="Return Me"; -if (true) return this; -RDebugUtils.currentLine=15400962; - //BA.debugLineNum = 15400962;BA.debugLine="End Sub"; -return null; -} -public boolean _activity_keypress(keymon.lat.medicomed.c_ticketsdia __ref,int _key) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_ticketsdia"; -if (Debug.shouldDelegate(ba, "activity_keypress", false)) - {return ((Boolean) Debug.delegate(ba, "activity_keypress", new Object[] {_key}));} -RDebugUtils.currentLine=15663104; - //BA.debugLineNum = 15663104;BA.debugLine="Sub Activity_KeyPress (key As Int) As Boolean"; -RDebugUtils.currentLine=15663106; - //BA.debugLineNum = 15663106;BA.debugLine="If key=KeyCodes.KEYCODE_BACK Then"; +public boolean _activity_keypress(int _key) throws Exception{ + //BA.debugLineNum = 110;BA.debugLine="Sub Activity_KeyPress (key As Int) As Boolean"; + //BA.debugLineNum = 112;BA.debugLine="If key=KeyCodes.KEYCODE_BACK Then"; if (_key==__c.KeyCodes.KEYCODE_BACK) { -RDebugUtils.currentLine=15663108; - //BA.debugLineNum = 15663108;BA.debugLine="B4XPages.ShowPage(\"principal\")"; + //BA.debugLineNum = 114;BA.debugLine="B4XPages.ShowPage(\"principal\")"; _b4xpages._showpage /*String*/ (ba,"principal"); }; -RDebugUtils.currentLine=15663112; - //BA.debugLineNum = 15663112;BA.debugLine="Return False"; + //BA.debugLineNum = 118;BA.debugLine="Return False"; if (true) return __c.False; -RDebugUtils.currentLine=15663113; - //BA.debugLineNum = 15663113;BA.debugLine="End Sub"; + //BA.debugLineNum = 119;BA.debugLine="End Sub"; return false; } -public String _b_noventa_click(keymon.lat.medicomed.c_ticketsdia __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_ticketsdia"; -if (Debug.shouldDelegate(ba, "b_noventa_click", false)) - {return ((String) Debug.delegate(ba, "b_noventa_click", null));} +public String _b_noventa_click() throws Exception{ int _i = 0; anywheresoftware.b4a.objects.LabelWrapper _label1 = null; anywheresoftware.b4a.objects.LabelWrapper _label2 = null; -RDebugUtils.currentLine=15794176; - //BA.debugLineNum = 15794176;BA.debugLine="Sub b_noventa_Click"; -RDebugUtils.currentLine=15794177; - //BA.debugLineNum = 15794177;BA.debugLine="If nombre_boton = \"NOVENTA\" Then"; -if ((__ref._nombre_boton /*String*/ ).equals("NOVENTA")) { -RDebugUtils.currentLine=15794178; - //BA.debugLineNum = 15794178;BA.debugLine="nombre_boton = \"VENTA\""; -__ref._nombre_boton /*String*/ = "VENTA"; -RDebugUtils.currentLine=15794179; - //BA.debugLineNum = 15794179;BA.debugLine="b_noventa.Text =\"VENTA\""; -__ref._b_noventa /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setText(BA.ObjectToCharSequence("VENTA")); -RDebugUtils.currentLine=15794180; - //BA.debugLineNum = 15794180;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"select * f"; -__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 * from venta_no_venta where eventov = 'SinVenta'"))); -RDebugUtils.currentLine=15794181; - //BA.debugLineNum = 15794181;BA.debugLine="ListView1.Clear"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear(); -RDebugUtils.currentLine=15794182; - //BA.debugLineNum = 15794182;BA.debugLine="If c.RowCount > 0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=15794183; - //BA.debugLineNum = 15794183;BA.debugLine="For i = 0 To c.RowCount - 1"; + //BA.debugLineNum = 139;BA.debugLine="Sub b_noventa_Click"; + //BA.debugLineNum = 140;BA.debugLine="If nombre_boton = \"NOVENTA\" Then"; +if ((_nombre_boton).equals("NOVENTA")) { + //BA.debugLineNum = 141;BA.debugLine="nombre_boton = \"VENTA\""; +_nombre_boton = "VENTA"; + //BA.debugLineNum = 142;BA.debugLine="b_noventa.Text =\"VENTA\""; +_b_noventa.setText(BA.ObjectToCharSequence("VENTA")); + //BA.debugLineNum = 143;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"select * f"; +_c = (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 * from venta_no_venta where eventov = 'SinVenta'"))); + //BA.debugLineNum = 144;BA.debugLine="ListView1.Clear"; +_listview1.Clear(); + //BA.debugLineNum = 145;BA.debugLine="If c.RowCount > 0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 146;BA.debugLine="For i = 0 To c.RowCount - 1"; { final int step7 = 1; -final int limit7 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit7 = (int) (_c.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit7 ;_i = _i + step7 ) { -RDebugUtils.currentLine=15794184; - //BA.debugLineNum = 15794184;BA.debugLine="c.Position = i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=15794185; - //BA.debugLineNum = 15794185;BA.debugLine="Dim label1 As Label"; + //BA.debugLineNum = 147;BA.debugLine="c.Position = i"; +_c.setPosition(_i); + //BA.debugLineNum = 148;BA.debugLine="Dim label1 As Label"; _label1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=15794186; - //BA.debugLineNum = 15794186;BA.debugLine="label1 = ListView1.TwoLinesLayout.Label"; -_label1 = __ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().Label; -RDebugUtils.currentLine=15794187; - //BA.debugLineNum = 15794187;BA.debugLine="label1.TextSize = 10"; + //BA.debugLineNum = 149;BA.debugLine="label1 = ListView1.TwoLinesLayout.Label"; +_label1 = _listview1.getTwoLinesLayout().Label; + //BA.debugLineNum = 150;BA.debugLine="label1.TextSize = 10"; _label1.setTextSize((float) (10)); -RDebugUtils.currentLine=15794188; - //BA.debugLineNum = 15794188;BA.debugLine="label1.TextColor = Colors.Black"; + //BA.debugLineNum = 151;BA.debugLine="label1.TextColor = Colors.Black"; _label1.setTextColor(__c.Colors.Black); -RDebugUtils.currentLine=15794189; - //BA.debugLineNum = 15794189;BA.debugLine="Dim label2 As Label"; + //BA.debugLineNum = 152;BA.debugLine="Dim label2 As Label"; _label2 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=15794190; - //BA.debugLineNum = 15794190;BA.debugLine="label2 = ListView1.TwoLinesLayout.SecondLabel"; -_label2 = __ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().SecondLabel; -RDebugUtils.currentLine=15794191; - //BA.debugLineNum = 15794191;BA.debugLine="label2.TextSize = 15"; + //BA.debugLineNum = 153;BA.debugLine="label2 = ListView1.TwoLinesLayout.SecondLabel"; +_label2 = _listview1.getTwoLinesLayout().SecondLabel; + //BA.debugLineNum = 154;BA.debugLine="label2.TextSize = 15"; _label2.setTextSize((float) (15)); -RDebugUtils.currentLine=15794192; - //BA.debugLineNum = 15794192;BA.debugLine="label2.TextColor = Colors.Blue"; + //BA.debugLineNum = 155;BA.debugLine="label2.TextColor = Colors.Blue"; _label2.setTextColor(__c.Colors.Blue); -RDebugUtils.currentLine=15794193; - //BA.debugLineNum = 15794193;BA.debugLine="label2.Height = 60dip"; + //BA.debugLineNum = 156;BA.debugLine="label2.Height = 60dip"; _label2.setHeight(__c.DipToCurrent((int) (60))); -RDebugUtils.currentLine=15794194; - //BA.debugLineNum = 15794194;BA.debugLine="label2.Width = ListView1.Width * 0.99"; -_label2.setWidth((int) (__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getWidth()*0.99)); -RDebugUtils.currentLine=15794195; - //BA.debugLineNum = 15794195;BA.debugLine="ListView1.TwoLinesLayout.ItemHeight = 80dip"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().setItemHeight(__c.DipToCurrent((int) (80))); -RDebugUtils.currentLine=15794196; - //BA.debugLineNum = 15794196;BA.debugLine="ListView1.AddTwoLines(c.GetString(\"clientev\"),"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddTwoLines(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("clientev")),BA.ObjectToCharSequence("SubTotal $"+__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("montoVentav"))); -RDebugUtils.currentLine=15794197; - //BA.debugLineNum = 15794197;BA.debugLine="Log(c.GetString(\"clientev\") & \"SubTotal $\" & c"; -__c.LogImpl("315794197",__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("clientev")+"SubTotal $"+__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("montoVentav"),0); + //BA.debugLineNum = 157;BA.debugLine="label2.Width = ListView1.Width * 0.99"; +_label2.setWidth((int) (_listview1.getWidth()*0.99)); + //BA.debugLineNum = 158;BA.debugLine="ListView1.TwoLinesLayout.ItemHeight = 80dip"; +_listview1.getTwoLinesLayout().setItemHeight(__c.DipToCurrent((int) (80))); + //BA.debugLineNum = 159;BA.debugLine="ListView1.AddTwoLines(c.GetString(\"clientev\"),"; +_listview1.AddTwoLines(BA.ObjectToCharSequence(_c.GetString("clientev")),BA.ObjectToCharSequence("SubTotal $"+_c.GetString("montoVentav"))); + //BA.debugLineNum = 160;BA.debugLine="Log(c.GetString(\"clientev\") & \"SubTotal $\" & c"; +__c.LogImpl("352101141",_c.GetString("clientev")+"SubTotal $"+_c.GetString("montoVentav"),0); } }; }; }else { -RDebugUtils.currentLine=15794201; - //BA.debugLineNum = 15794201;BA.debugLine="nombre_boton = \"NOVENTA\""; -__ref._nombre_boton /*String*/ = "NOVENTA"; -RDebugUtils.currentLine=15794202; - //BA.debugLineNum = 15794202;BA.debugLine="b_noventa.Text =\"NO VENTA\""; -__ref._b_noventa /*anywheresoftware.b4a.objects.ButtonWrapper*/ .setText(BA.ObjectToCharSequence("NO VENTA")); -RDebugUtils.currentLine=15794203; - //BA.debugLineNum = 15794203;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"select * f"; -__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 * from venta_no_venta where eventov <> 'SinVenta'"))); -RDebugUtils.currentLine=15794204; - //BA.debugLineNum = 15794204;BA.debugLine="ListView1.Clear"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear(); -RDebugUtils.currentLine=15794205; - //BA.debugLineNum = 15794205;BA.debugLine="If c.RowCount > 0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=15794206; - //BA.debugLineNum = 15794206;BA.debugLine="For i = 0 To c.RowCount - 1"; + //BA.debugLineNum = 164;BA.debugLine="nombre_boton = \"NOVENTA\""; +_nombre_boton = "NOVENTA"; + //BA.debugLineNum = 165;BA.debugLine="b_noventa.Text =\"NO VENTA\""; +_b_noventa.setText(BA.ObjectToCharSequence("NO VENTA")); + //BA.debugLineNum = 166;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"select * f"; +_c = (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 * from venta_no_venta where eventov <> 'SinVenta'"))); + //BA.debugLineNum = 167;BA.debugLine="ListView1.Clear"; +_listview1.Clear(); + //BA.debugLineNum = 168;BA.debugLine="If c.RowCount > 0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 169;BA.debugLine="For i = 0 To c.RowCount - 1"; { final int step30 = 1; -final int limit30 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit30 = (int) (_c.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit30 ;_i = _i + step30 ) { -RDebugUtils.currentLine=15794207; - //BA.debugLineNum = 15794207;BA.debugLine="c.Position = i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=15794208; - //BA.debugLineNum = 15794208;BA.debugLine="Dim label1 As Label"; + //BA.debugLineNum = 170;BA.debugLine="c.Position = i"; +_c.setPosition(_i); + //BA.debugLineNum = 171;BA.debugLine="Dim label1 As Label"; _label1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=15794209; - //BA.debugLineNum = 15794209;BA.debugLine="label1 = ListView1.TwoLinesLayout.Label"; -_label1 = __ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().Label; -RDebugUtils.currentLine=15794210; - //BA.debugLineNum = 15794210;BA.debugLine="label1.TextSize = 10"; + //BA.debugLineNum = 172;BA.debugLine="label1 = ListView1.TwoLinesLayout.Label"; +_label1 = _listview1.getTwoLinesLayout().Label; + //BA.debugLineNum = 173;BA.debugLine="label1.TextSize = 10"; _label1.setTextSize((float) (10)); -RDebugUtils.currentLine=15794211; - //BA.debugLineNum = 15794211;BA.debugLine="label1.TextColor = Colors.Black"; + //BA.debugLineNum = 174;BA.debugLine="label1.TextColor = Colors.Black"; _label1.setTextColor(__c.Colors.Black); -RDebugUtils.currentLine=15794212; - //BA.debugLineNum = 15794212;BA.debugLine="Dim label2 As Label"; + //BA.debugLineNum = 175;BA.debugLine="Dim label2 As Label"; _label2 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=15794213; - //BA.debugLineNum = 15794213;BA.debugLine="label2 = ListView1.TwoLinesLayout.SecondLabel"; -_label2 = __ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().SecondLabel; -RDebugUtils.currentLine=15794214; - //BA.debugLineNum = 15794214;BA.debugLine="label2.TextSize = 15"; + //BA.debugLineNum = 176;BA.debugLine="label2 = ListView1.TwoLinesLayout.SecondLabel"; +_label2 = _listview1.getTwoLinesLayout().SecondLabel; + //BA.debugLineNum = 177;BA.debugLine="label2.TextSize = 15"; _label2.setTextSize((float) (15)); -RDebugUtils.currentLine=15794215; - //BA.debugLineNum = 15794215;BA.debugLine="label2.TextColor = Colors.Blue"; + //BA.debugLineNum = 178;BA.debugLine="label2.TextColor = Colors.Blue"; _label2.setTextColor(__c.Colors.Blue); -RDebugUtils.currentLine=15794216; - //BA.debugLineNum = 15794216;BA.debugLine="label2.Height = 60dip"; + //BA.debugLineNum = 179;BA.debugLine="label2.Height = 60dip"; _label2.setHeight(__c.DipToCurrent((int) (60))); -RDebugUtils.currentLine=15794217; - //BA.debugLineNum = 15794217;BA.debugLine="label2.Width = ListView1.Width * 0.99"; -_label2.setWidth((int) (__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getWidth()*0.99)); -RDebugUtils.currentLine=15794218; - //BA.debugLineNum = 15794218;BA.debugLine="ListView1.TwoLinesLayout.ItemHeight = 80dip"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().setItemHeight(__c.DipToCurrent((int) (80))); -RDebugUtils.currentLine=15794219; - //BA.debugLineNum = 15794219;BA.debugLine="ListView1.AddTwoLines(c.GetString(\"clientev\"),"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddTwoLines(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("clientev")),BA.ObjectToCharSequence("SubTotal $"+__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("montoVentav"))); -RDebugUtils.currentLine=15794220; - //BA.debugLineNum = 15794220;BA.debugLine="Log(c.GetString(\"clientev\") & \"SubTotal $\" & c"; -__c.LogImpl("315794220",__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("clientev")+"SubTotal $"+__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("montoVentav"),0); + //BA.debugLineNum = 180;BA.debugLine="label2.Width = ListView1.Width * 0.99"; +_label2.setWidth((int) (_listview1.getWidth()*0.99)); + //BA.debugLineNum = 181;BA.debugLine="ListView1.TwoLinesLayout.ItemHeight = 80dip"; +_listview1.getTwoLinesLayout().setItemHeight(__c.DipToCurrent((int) (80))); + //BA.debugLineNum = 182;BA.debugLine="ListView1.AddTwoLines(c.GetString(\"clientev\"),"; +_listview1.AddTwoLines(BA.ObjectToCharSequence(_c.GetString("clientev")),BA.ObjectToCharSequence("SubTotal $"+_c.GetString("montoVentav"))); + //BA.debugLineNum = 183;BA.debugLine="Log(c.GetString(\"clientev\") & \"SubTotal $\" & c"; +__c.LogImpl("352101164",_c.GetString("clientev")+"SubTotal $"+_c.GetString("montoVentav"),0); } }; }; -RDebugUtils.currentLine=15794223; - //BA.debugLineNum = 15794223;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); + //BA.debugLineNum = 186;BA.debugLine="c.Close"; +_c.Close(); }; -RDebugUtils.currentLine=15794225; - //BA.debugLineNum = 15794225;BA.debugLine="End Sub"; + //BA.debugLineNum = 188;BA.debugLine="End Sub"; return ""; } -public String _b4xpage_appear(keymon.lat.medicomed.c_ticketsdia __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_ticketsdia"; -if (Debug.shouldDelegate(ba, "b4xpage_appear", false)) - {return ((String) Debug.delegate(ba, "b4xpage_appear", null));} +public String _b4xpage_appear() throws Exception{ int _i = 0; anywheresoftware.b4a.objects.LabelWrapper _label1 = null; anywheresoftware.b4a.objects.LabelWrapper _label2 = null; -RDebugUtils.currentLine=15532032; - //BA.debugLineNum = 15532032;BA.debugLine="Sub B4XPage_Appear"; -RDebugUtils.currentLine=15532033; - //BA.debugLineNum = 15532033;BA.debugLine="nombre_boton = \"NOVENTA\""; -__ref._nombre_boton /*String*/ = "NOVENTA"; -RDebugUtils.currentLine=15532051; - //BA.debugLineNum = 15532051;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"select * fr"; -__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 * from venta_no_venta where eventov <> 'SinVenta'"))); -RDebugUtils.currentLine=15532052; - //BA.debugLineNum = 15532052;BA.debugLine="ListView1.Clear"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .Clear(); -RDebugUtils.currentLine=15532053; - //BA.debugLineNum = 15532053;BA.debugLine="If c.RowCount > 0 Then"; -if (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()>0) { -RDebugUtils.currentLine=15532054; - //BA.debugLineNum = 15532054;BA.debugLine="For i = 0 To c.RowCount - 1"; + //BA.debugLineNum = 65;BA.debugLine="Sub B4XPage_Appear"; + //BA.debugLineNum = 66;BA.debugLine="nombre_boton = \"NOVENTA\""; +_nombre_boton = "NOVENTA"; + //BA.debugLineNum = 84;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"select * fr"; +_c = (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 * from venta_no_venta where eventov <> 'SinVenta'"))); + //BA.debugLineNum = 85;BA.debugLine="ListView1.Clear"; +_listview1.Clear(); + //BA.debugLineNum = 86;BA.debugLine="If c.RowCount > 0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 87;BA.debugLine="For i = 0 To c.RowCount - 1"; { final int step5 = 1; -final int limit5 = (int) (__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .getRowCount()-1); +final int limit5 = (int) (_c.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit5 ;_i = _i + step5 ) { -RDebugUtils.currentLine=15532055; - //BA.debugLineNum = 15532055;BA.debugLine="c.Position = i"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition(_i); -RDebugUtils.currentLine=15532056; - //BA.debugLineNum = 15532056;BA.debugLine="Dim label1 As Label"; + //BA.debugLineNum = 88;BA.debugLine="c.Position = i"; +_c.setPosition(_i); + //BA.debugLineNum = 89;BA.debugLine="Dim label1 As Label"; _label1 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=15532057; - //BA.debugLineNum = 15532057;BA.debugLine="label1 = ListView1.TwoLinesLayout.Label"; -_label1 = __ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().Label; -RDebugUtils.currentLine=15532058; - //BA.debugLineNum = 15532058;BA.debugLine="label1.TextSize = 10"; + //BA.debugLineNum = 90;BA.debugLine="label1 = ListView1.TwoLinesLayout.Label"; +_label1 = _listview1.getTwoLinesLayout().Label; + //BA.debugLineNum = 91;BA.debugLine="label1.TextSize = 10"; _label1.setTextSize((float) (10)); -RDebugUtils.currentLine=15532059; - //BA.debugLineNum = 15532059;BA.debugLine="label1.TextColor = Colors.Black"; + //BA.debugLineNum = 92;BA.debugLine="label1.TextColor = Colors.Black"; _label1.setTextColor(__c.Colors.Black); -RDebugUtils.currentLine=15532060; - //BA.debugLineNum = 15532060;BA.debugLine="Dim label2 As Label"; + //BA.debugLineNum = 93;BA.debugLine="Dim label2 As Label"; _label2 = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=15532061; - //BA.debugLineNum = 15532061;BA.debugLine="label2 = ListView1.TwoLinesLayout.SecondLabel"; -_label2 = __ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().SecondLabel; -RDebugUtils.currentLine=15532062; - //BA.debugLineNum = 15532062;BA.debugLine="label2.TextSize = 15"; + //BA.debugLineNum = 94;BA.debugLine="label2 = ListView1.TwoLinesLayout.SecondLabel"; +_label2 = _listview1.getTwoLinesLayout().SecondLabel; + //BA.debugLineNum = 95;BA.debugLine="label2.TextSize = 15"; _label2.setTextSize((float) (15)); -RDebugUtils.currentLine=15532063; - //BA.debugLineNum = 15532063;BA.debugLine="label2.TextColor = Colors.Blue"; + //BA.debugLineNum = 96;BA.debugLine="label2.TextColor = Colors.Blue"; _label2.setTextColor(__c.Colors.Blue); -RDebugUtils.currentLine=15532064; - //BA.debugLineNum = 15532064;BA.debugLine="label2.Height = 60dip"; + //BA.debugLineNum = 97;BA.debugLine="label2.Height = 60dip"; _label2.setHeight(__c.DipToCurrent((int) (60))); -RDebugUtils.currentLine=15532065; - //BA.debugLineNum = 15532065;BA.debugLine="label2.Width = ListView1.Width * 0.99"; -_label2.setWidth((int) (__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getWidth()*0.99)); -RDebugUtils.currentLine=15532066; - //BA.debugLineNum = 15532066;BA.debugLine="ListView1.TwoLinesLayout.ItemHeight = 80dip"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .getTwoLinesLayout().setItemHeight(__c.DipToCurrent((int) (80))); -RDebugUtils.currentLine=15532067; - //BA.debugLineNum = 15532067;BA.debugLine="ListView1.AddTwoLines(c.GetString(\"clientev\"),"; -__ref._listview1 /*anywheresoftware.b4a.objects.ListViewWrapper*/ .AddTwoLines(BA.ObjectToCharSequence(__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("clientev")),BA.ObjectToCharSequence("SubTotal $"+__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("montoVentav"))); -RDebugUtils.currentLine=15532068; - //BA.debugLineNum = 15532068;BA.debugLine="Log(c.GetString(\"clientev\") & \"SubTotal $\" & c."; -__c.LogImpl("315532068",__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("clientev")+"SubTotal $"+__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("montoVentav"),0); + //BA.debugLineNum = 98;BA.debugLine="label2.Width = ListView1.Width * 0.99"; +_label2.setWidth((int) (_listview1.getWidth()*0.99)); + //BA.debugLineNum = 99;BA.debugLine="ListView1.TwoLinesLayout.ItemHeight = 80dip"; +_listview1.getTwoLinesLayout().setItemHeight(__c.DipToCurrent((int) (80))); + //BA.debugLineNum = 100;BA.debugLine="ListView1.AddTwoLines(c.GetString(\"clientev\"),"; +_listview1.AddTwoLines(BA.ObjectToCharSequence(_c.GetString("clientev")),BA.ObjectToCharSequence("SubTotal $"+_c.GetString("montoVentav"))); + //BA.debugLineNum = 101;BA.debugLine="Log(c.GetString(\"clientev\") & \"SubTotal $\" & c."; +__c.LogImpl("351839012",_c.GetString("clientev")+"SubTotal $"+_c.GetString("montoVentav"),0); } }; }; -RDebugUtils.currentLine=15532071; - //BA.debugLineNum = 15532071;BA.debugLine="c.Close"; -__ref._c /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .Close(); -RDebugUtils.currentLine=15532072; - //BA.debugLineNum = 15532072;BA.debugLine="End Sub"; + //BA.debugLineNum = 104;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 105;BA.debugLine="End Sub"; return ""; } -public String _b4xpage_created(keymon.lat.medicomed.c_ticketsdia __ref,anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_ticketsdia"; -if (Debug.shouldDelegate(ba, "b4xpage_created", false)) - {return ((String) Debug.delegate(ba, "b4xpage_created", new Object[] {_root1}));} -RDebugUtils.currentLine=15466496; - //BA.debugLineNum = 15466496;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -RDebugUtils.currentLine=15466497; - //BA.debugLineNum = 15466497;BA.debugLine="Root = Root1"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = _root1; -RDebugUtils.currentLine=15466499; - //BA.debugLineNum = 15466499;BA.debugLine="ruta = File.DirInternal"; -__ref._ruta /*String*/ = __c.File.getDirInternal(); -RDebugUtils.currentLine=15466500; - //BA.debugLineNum = 15466500;BA.debugLine="Root.LoadLayout(\"ticketsdia\")"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .LoadLayout("ticketsdia",ba); -RDebugUtils.currentLine=15466501; - //BA.debugLineNum = 15466501;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; -if (__c.File.Exists(__ref._ruta /*String*/ ,"kmt.db")==__c.False) { -RDebugUtils.currentLine=15466502; - //BA.debugLineNum = 15466502;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; -__c.File.Copy(__c.File.getDirAssets(),"kmt.db",__ref._ruta /*String*/ ,"kmt.db"); +public String _b4xpage_created(anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ + //BA.debugLineNum = 51;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; + //BA.debugLineNum = 52;BA.debugLine="Root = Root1"; +_root = _root1; + //BA.debugLineNum = 54;BA.debugLine="ruta = File.DirInternal"; +_ruta = __c.File.getDirInternal(); + //BA.debugLineNum = 55;BA.debugLine="Root.LoadLayout(\"ticketsdia\")"; +_root.LoadLayout("ticketsdia",ba); + //BA.debugLineNum = 56;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; +if (__c.File.Exists(_ruta,"kmt.db")==__c.False) { + //BA.debugLineNum = 57;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; +__c.File.Copy(__c.File.getDirAssets(),"kmt.db",_ruta,"kmt.db"); }; -RDebugUtils.currentLine=15466505; - //BA.debugLineNum = 15466505;BA.debugLine="End Sub"; + //BA.debugLineNum = 60;BA.debugLine="End Sub"; return ""; } -public String _class_globals(keymon.lat.medicomed.c_ticketsdia __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_ticketsdia"; -RDebugUtils.currentLine=15335424; - //BA.debugLineNum = 15335424;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=15335425; - //BA.debugLineNum = 15335425;BA.debugLine="Private Root As B4XView 'ignore"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Private Root As B4XView 'ignore"; _root = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=15335426; - //BA.debugLineNum = 15335426;BA.debugLine="Private xui As XUI 'ignore"; + //BA.debugLineNum = 3;BA.debugLine="Private xui As XUI 'ignore"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=15335427; - //BA.debugLineNum = 15335427;BA.debugLine="Private p_ticketsdia As Panel"; + //BA.debugLineNum = 4;BA.debugLine="Private p_ticketsdia As Panel"; _p_ticketsdia = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=15335429; - //BA.debugLineNum = 15335429;BA.debugLine="Dim c As Cursor"; + //BA.debugLineNum = 6;BA.debugLine="Dim c As Cursor"; _c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=15335430; - //BA.debugLineNum = 15335430;BA.debugLine="Dim S As Cursor"; + //BA.debugLineNum = 7;BA.debugLine="Dim S As Cursor"; _s = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=15335431; - //BA.debugLineNum = 15335431;BA.debugLine="Dim ruta As String"; + //BA.debugLineNum = 8;BA.debugLine="Dim ruta As String"; _ruta = ""; -RDebugUtils.currentLine=15335432; - //BA.debugLineNum = 15335432;BA.debugLine="Dim ListView1 As ListView"; + //BA.debugLineNum = 9;BA.debugLine="Dim ListView1 As ListView"; _listview1 = new anywheresoftware.b4a.objects.ListViewWrapper(); -RDebugUtils.currentLine=15335433; - //BA.debugLineNum = 15335433;BA.debugLine="Dim b_noventa As Button"; + //BA.debugLineNum = 10;BA.debugLine="Dim b_noventa As Button"; _b_noventa = new anywheresoftware.b4a.objects.ButtonWrapper(); -RDebugUtils.currentLine=15335434; - //BA.debugLineNum = 15335434;BA.debugLine="Dim nombre_boton As String"; + //BA.debugLineNum = 11;BA.debugLine="Dim nombre_boton As String"; _nombre_boton = ""; -RDebugUtils.currentLine=15335435; - //BA.debugLineNum = 15335435;BA.debugLine="Dim STIME As String"; + //BA.debugLineNum = 12;BA.debugLine="Dim STIME As String"; _stime = ""; -RDebugUtils.currentLine=15335436; - //BA.debugLineNum = 15335436;BA.debugLine="End Sub"; + //BA.debugLineNum = 13;BA.debugLine="End Sub"; return ""; } -public String _listview1_itemlongclick(keymon.lat.medicomed.c_ticketsdia __ref,int _position,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_ticketsdia"; -if (Debug.shouldDelegate(ba, "listview1_itemlongclick", false)) - {return ((String) Debug.delegate(ba, "listview1_itemlongclick", new Object[] {_position,_value}));} -RDebugUtils.currentLine=15728640; - //BA.debugLineNum = 15728640;BA.debugLine="Sub ListView1_ItemLongClick (Position As Int, Valu"; -RDebugUtils.currentLine=15728641; - //BA.debugLineNum = 15728641;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; +public Object _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 16;BA.debugLine="Public Sub Initialize As Object"; + //BA.debugLineNum = 17;BA.debugLine="Return Me"; +if (true) return this; + //BA.debugLineNum = 18;BA.debugLine="End Sub"; +return null; +} +public String _listview1_itemlongclick(int _position,Object _value) throws Exception{ + //BA.debugLineNum = 120;BA.debugLine="Sub ListView1_ItemLongClick (Position As Int, Valu"; + //BA.debugLineNum = 121;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from CUENTAA"); -RDebugUtils.currentLine=15728642; - //BA.debugLineNum = 15728642;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; + //BA.debugLineNum = 122;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO CUENTAA VALUES (?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{_value})); -RDebugUtils.currentLine=15728643; - //BA.debugLineNum = 15728643;BA.debugLine="DateTime.TimeFormat = \"HHmmss\""; + //BA.debugLineNum = 123;BA.debugLine="DateTime.TimeFormat = \"HHmmss\""; __c.DateTime.setTimeFormat("HHmmss"); -RDebugUtils.currentLine=15728644; - //BA.debugLineNum = 15728644;BA.debugLine="STIME=DateTime.Time(DateTime.Now)"; -__ref._stime /*String*/ = __c.DateTime.Time(__c.DateTime.getNow()); -RDebugUtils.currentLine=15728645; - //BA.debugLineNum = 15728645;BA.debugLine="s=B4XPages.MainPage.skmt.ExecQuery(\"SELECT COUNT("; -__ref._s /*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 COUNT(*) AS CUANTOS FROM HIST_STAY_STORE WHERE HSS_IN = 0 AND HSS_CODIGO In (select cuenta from cuentaa)"))); -RDebugUtils.currentLine=15728646; - //BA.debugLineNum = 15728646;BA.debugLine="s.Position = 0"; -__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .setPosition((int) (0)); -RDebugUtils.currentLine=15728647; - //BA.debugLineNum = 15728647;BA.debugLine="If s.GetString(\"CUANTOS\") = 1 Then"; -if ((__ref._s /*anywheresoftware.b4a.sql.SQL.CursorWrapper*/ .GetString("CUANTOS")).equals(BA.NumberToString(1))) { -RDebugUtils.currentLine=15728648; - //BA.debugLineNum = 15728648;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HIS"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE HIST_STAY_STORE set HSS_IN = ? where HSS_IN = 0 AND HSS_CODIGO In (select cuenta from cuentaa)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._stime /*String*/ )})); + //BA.debugLineNum = 124;BA.debugLine="STIME=DateTime.Time(DateTime.Now)"; +_stime = __c.DateTime.Time(__c.DateTime.getNow()); + //BA.debugLineNum = 125;BA.debugLine="s=B4XPages.MainPage.skmt.ExecQuery(\"SELECT COUNT("; +_s = (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 COUNT(*) AS CUANTOS FROM HIST_STAY_STORE WHERE HSS_IN = 0 AND HSS_CODIGO In (select cuenta from cuentaa)"))); + //BA.debugLineNum = 126;BA.debugLine="s.Position = 0"; +_s.setPosition((int) (0)); + //BA.debugLineNum = 127;BA.debugLine="If s.GetString(\"CUANTOS\") = 1 Then"; +if ((_s.GetString("CUANTOS")).equals(BA.NumberToString(1))) { + //BA.debugLineNum = 128;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HIS"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE HIST_STAY_STORE set HSS_IN = ? where HSS_IN = 0 AND HSS_CODIGO In (select cuenta from cuentaa)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_stime)})); }else { -RDebugUtils.currentLine=15728650; - //BA.debugLineNum = 15728650;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; + //BA.debugLineNum = 130;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; _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[]{_value})); -RDebugUtils.currentLine=15728651; - //BA.debugLineNum = 15728651;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HIS"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE HIST_STAY_STORE set HSS_IN = ? where HSS_IN = 0 AND HSS_CODIGO In (select cuenta from cuentaa)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(__ref._stime /*String*/ )})); + //BA.debugLineNum = 131;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"UPDATE HIS"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("UPDATE HIST_STAY_STORE set HSS_IN = ? where HSS_IN = 0 AND HSS_CODIGO In (select cuenta from cuentaa)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_stime)})); }; -RDebugUtils.currentLine=15728653; - //BA.debugLineNum = 15728653;BA.debugLine="DateTime.TimeFormat = \"HH:mm:ss\""; + //BA.debugLineNum = 133;BA.debugLine="DateTime.TimeFormat = \"HH:mm:ss\""; __c.DateTime.setTimeFormat("HH:mm:ss"); -RDebugUtils.currentLine=15728654; - //BA.debugLineNum = 15728654;BA.debugLine="Subs.guardaClienteHoraInicio(Value)"; + //BA.debugLineNum = 134;BA.debugLine="Subs.guardaClienteHoraInicio(Value)"; _subs._guardaclientehorainicio /*String*/ (ba,BA.ObjectToString(_value)); -RDebugUtils.currentLine=15728655; - //BA.debugLineNum = 15728655;BA.debugLine="B4XPages.MainPage.cliente.venimosDeTicketsDia = T"; + //BA.debugLineNum = 135;BA.debugLine="B4XPages.MainPage.cliente.venimosDeTicketsDia = T"; _b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._cliente /*keymon.lat.medicomed.c_cliente*/ ._venimosdeticketsdia /*boolean*/ = __c.True; -RDebugUtils.currentLine=15728656; - //BA.debugLineNum = 15728656;BA.debugLine="B4XPages.ShowPage(\"cliente\")"; + //BA.debugLineNum = 136;BA.debugLine="B4XPages.ShowPage(\"cliente\")"; _b4xpages._showpage /*String*/ (ba,"cliente"); -RDebugUtils.currentLine=15728657; - //BA.debugLineNum = 15728657;BA.debugLine="End Sub"; + //BA.debugLineNum = 137;BA.debugLine="End Sub"; return ""; } -public String _p_ticketsdia_click(keymon.lat.medicomed.c_ticketsdia __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_ticketsdia"; -if (Debug.shouldDelegate(ba, "p_ticketsdia_click", false)) - {return ((String) Debug.delegate(ba, "p_ticketsdia_click", null));} -RDebugUtils.currentLine=15859712; - //BA.debugLineNum = 15859712;BA.debugLine="Private Sub p_ticketsdia_Click"; -RDebugUtils.currentLine=15859714; - //BA.debugLineNum = 15859714;BA.debugLine="End Sub"; +public String _p_ticketsdia_click() throws Exception{ + //BA.debugLineNum = 190;BA.debugLine="Private Sub p_ticketsdia_Click"; + //BA.debugLineNum = 192;BA.debugLine="End Sub"; return ""; } -public String _regresar_click(keymon.lat.medicomed.c_ticketsdia __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_ticketsdia"; -if (Debug.shouldDelegate(ba, "regresar_click", false)) - {return ((String) Debug.delegate(ba, "regresar_click", null));} -RDebugUtils.currentLine=15597568; - //BA.debugLineNum = 15597568;BA.debugLine="Sub Regresar_Click"; -RDebugUtils.currentLine=15597569; - //BA.debugLineNum = 15597569;BA.debugLine="B4XPages.ShowPage(\"cliente\")"; +public String _regresar_click() throws Exception{ + //BA.debugLineNum = 107;BA.debugLine="Sub Regresar_Click"; + //BA.debugLineNum = 108;BA.debugLine="B4XPages.ShowPage(\"cliente\")"; _b4xpages._showpage /*String*/ (ba,"cliente"); -RDebugUtils.currentLine=15597570; - //BA.debugLineNum = 15597570;BA.debugLine="End Sub"; + //BA.debugLineNum = 109;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +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]); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/c_updateavailable.java b/B4A/Objects/src/keymon/lat/medicomed/c_updateavailable.java index 70b4f88..ca2b305 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/c_updateavailable.java +++ b/B4A/Objects/src/keymon/lat/medicomed/c_updateavailable.java @@ -10,7 +10,7 @@ public class c_updateavailable extends B4AClass.ImplB4AClass implements BA.SubDe private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.c_updateavailable"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.c_updateavailable"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class c_updateavailable extends B4AClass.ImplB4AClass implements BA.SubDe 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.keywords.Common __c = null; public anywheresoftware.b4a.objects.B4XViewWrapper _root = null; public anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; public b4a.example.dateutils _dateutils = null; @@ -45,42 +38,20 @@ 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_updateavailable __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="c_updateavailable"; -if (Debug.shouldDelegate(ba, "initialize", false)) - {return ((Object) Debug.delegate(ba, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=26673152; - //BA.debugLineNum = 26673152;BA.debugLine="Public Sub Initialize As Object"; -RDebugUtils.currentLine=26673153; - //BA.debugLineNum = 26673153;BA.debugLine="Return Me"; -if (true) return this; -RDebugUtils.currentLine=26673154; - //BA.debugLineNum = 26673154;BA.debugLine="End Sub"; -return null; -} -public void _b4xpage_appear(keymon.lat.medicomed.c_updateavailable __ref) throws Exception{ -RDebugUtils.currentModule="c_updateavailable"; -if (Debug.shouldDelegate(ba, "b4xpage_appear", false)) - {Debug.delegate(ba, "b4xpage_appear", null); return;} -ResumableSub_B4XPage_Appear rsub = new ResumableSub_B4XPage_Appear(this,__ref); +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.c_updateavailable parent,keymon.lat.medicomed.c_updateavailable __ref) { +public ResumableSub_B4XPage_Appear(keymon.lat.medicomed.c_updateavailable parent) { this.parent = parent; -this.__ref = __ref; -this.__ref = parent; } -keymon.lat.medicomed.c_updateavailable __ref; keymon.lat.medicomed.c_updateavailable parent; int _result = 0; anywheresoftware.b4a.objects.IntentWrapper _in = null; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="c_updateavailable"; while (true) { try { @@ -92,8 +63,7 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=26804225; - //BA.debugLineNum = 26804225;BA.debugLine="Try"; + //BA.debugLineNum = 19;BA.debugLine="Try"; if (true) break; case 1: @@ -107,14 +77,13 @@ case 3: //C this.state = 4; this.catchState = 9; -RDebugUtils.currentLine=26804226; - //BA.debugLineNum = 26804226;BA.debugLine="Do While Not(CanRequestPackageInstalls)"; + //BA.debugLineNum = 20;BA.debugLine="Do While Not(CanRequestPackageInstalls)"; if (true) break; case 4: //do while this.state = 7; -while (parent.__c.Not(__ref._canrequestpackageinstalls /*boolean*/ (null))) { +while (parent.__c.Not(parent._canrequestpackageinstalls())) { this.state = 6; if (true) break; } @@ -123,27 +92,22 @@ if (true) break; case 6: //C this.state = 4; -RDebugUtils.currentLine=26804227; - //BA.debugLineNum = 26804227;BA.debugLine="MsgboxAsync($\"Por favor permita que ${Applicati"; + //BA.debugLineNum = 21;BA.debugLine="MsgboxAsync($\"Por favor permita que ${Applicati"; parent.__c.MsgboxAsync(BA.ObjectToCharSequence(("Por favor permita que "+parent.__c.SmartStringFormatter("",(Object)(parent.__c.Application.getPackageName()))+" instale actualizaciones")),BA.ObjectToCharSequence("Instalar actualización"),ba); -RDebugUtils.currentLine=26804228; - //BA.debugLineNum = 26804228;BA.debugLine="Wait For Msgbox_Result(Result As Int)"; -parent.__c.WaitFor("msgbox_result", ba, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "c_updateavailable", "b4xpage_appear"), null); + //BA.debugLineNum = 22;BA.debugLine="Wait For Msgbox_Result(Result As Int)"; +parent.__c.WaitFor("msgbox_result", ba, this, null); this.state = 16; return; case 16: //C this.state = 4; -_result = (Integer) result[1]; +_result = (Integer) result[0]; ; -RDebugUtils.currentLine=26804229; - //BA.debugLineNum = 26804229;BA.debugLine="Dim in As Intent"; + //BA.debugLineNum = 23;BA.debugLine="Dim in As Intent"; _in = new anywheresoftware.b4a.objects.IntentWrapper(); -RDebugUtils.currentLine=26804230; - //BA.debugLineNum = 26804230;BA.debugLine="in.Initialize(\"android.settings.\", \"package:\" &"; + //BA.debugLineNum = 24;BA.debugLine="in.Initialize(\"android.settings.\", \"package:\" &"; _in.Initialize("android.settings.","package:"+parent.__c.Application.getPackageName()); -RDebugUtils.currentLine=26804231; - //BA.debugLineNum = 26804231;BA.debugLine="StartActivity(in)"; + //BA.debugLineNum = 25;BA.debugLine="StartActivity(in)"; parent.__c.StartActivity(ba,(Object)(_in.getObject())); if (true) break; @@ -157,14 +121,12 @@ case 9: //C this.state = 10; this.catchState = 0; -RDebugUtils.currentLine=26804234; - //BA.debugLineNum = 26804234;BA.debugLine="Log(\"updateAvailable() Error - \" & LastException"; -parent.__c.LogImpl("326804234","updateAvailable() Error - "+parent.__c.LastException(ba).getMessage(),0); + //BA.debugLineNum = 28;BA.debugLine="Log(\"updateAvailable() Error - \" & LastException"; +parent.__c.LogImpl("359768842","updateAvailable() Error - "+parent.__c.LastException(ba).getMessage(),0); if (true) break; if (true) break; ; -RDebugUtils.currentLine=26804236; - //BA.debugLineNum = 26804236;BA.debugLine="If appUpdater.newApp.update Then"; + //BA.debugLineNum = 30;BA.debugLine="If appUpdater.newApp.update Then"; case 10: //if @@ -179,25 +141,22 @@ this.state = 14; case 12: //C this.state = 15; -RDebugUtils.currentLine=26804237; - //BA.debugLineNum = 26804237;BA.debugLine="ofreceActualizacion"; -__ref._ofreceactualizacion /*String*/ (null); + //BA.debugLineNum = 31;BA.debugLine="ofreceActualizacion"; +parent._ofreceactualizacion(); if (true) break; case 14: //C this.state = 15; -RDebugUtils.currentLine=26804239; - //BA.debugLineNum = 26804239;BA.debugLine="sinActualizacion"; -__ref._sinactualizacion /*String*/ (null); + //BA.debugLineNum = 33;BA.debugLine="sinActualizacion"; +parent._sinactualizacion(); if (true) break; case 15: //C this.state = -1; ; -RDebugUtils.currentLine=26804241; - //BA.debugLineNum = 26804241;BA.debugLine="End Sub"; + //BA.debugLineNum = 35;BA.debugLine="End Sub"; if (true) break; }} catch (Exception e0) { @@ -211,109 +170,81 @@ ba.setLastException(e0);} } } } -public boolean _canrequestpackageinstalls(keymon.lat.medicomed.c_updateavailable __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_updateavailable"; -if (Debug.shouldDelegate(ba, "canrequestpackageinstalls", false)) - {return ((Boolean) Debug.delegate(ba, "canrequestpackageinstalls", null));} +public void _msgbox_result(int _result) throws Exception{ +} +public String _b4xpage_created(anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ + //BA.debugLineNum = 12;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; + //BA.debugLineNum = 13;BA.debugLine="Root = Root1"; +_root = _root1; + //BA.debugLineNum = 15;BA.debugLine="Root.Color = Colors.Transparent"; +_root.setColor(__c.Colors.Transparent); + //BA.debugLineNum = 16;BA.debugLine="End Sub"; +return ""; +} +public boolean _canrequestpackageinstalls() throws Exception{ anywheresoftware.b4j.object.JavaObject _ctxt = null; anywheresoftware.b4j.object.JavaObject _packagemanager = null; -RDebugUtils.currentLine=26869760; - //BA.debugLineNum = 26869760;BA.debugLine="public Sub CanRequestPackageInstalls As Boolean"; -RDebugUtils.currentLine=26869762; - //BA.debugLineNum = 26869762;BA.debugLine="Dim ctxt As JavaObject"; + //BA.debugLineNum = 43;BA.debugLine="public Sub CanRequestPackageInstalls As Boolean"; + //BA.debugLineNum = 45;BA.debugLine="Dim ctxt As JavaObject"; _ctxt = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=26869763; - //BA.debugLineNum = 26869763;BA.debugLine="ctxt.InitializeContext"; + //BA.debugLineNum = 46;BA.debugLine="ctxt.InitializeContext"; _ctxt.InitializeContext(ba); -RDebugUtils.currentLine=26869764; - //BA.debugLineNum = 26869764;BA.debugLine="Dim PackageManager As JavaObject = ctxt.RunMethod"; + //BA.debugLineNum = 47;BA.debugLine="Dim PackageManager As JavaObject = ctxt.RunMethod"; _packagemanager = new anywheresoftware.b4j.object.JavaObject(); _packagemanager = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_ctxt.RunMethod("getPackageManager",(Object[])(__c.Null)))); -RDebugUtils.currentLine=26869765; - //BA.debugLineNum = 26869765;BA.debugLine="Return PackageManager.RunMethod(\"canRequestPackag"; + //BA.debugLineNum = 48;BA.debugLine="Return PackageManager.RunMethod(\"canRequestPackag"; if (true) return BA.ObjectToBoolean(_packagemanager.RunMethod("canRequestPackageInstalls",(Object[])(__c.Null))); -RDebugUtils.currentLine=26869766; - //BA.debugLineNum = 26869766;BA.debugLine="End Sub"; + //BA.debugLineNum = 49;BA.debugLine="End Sub"; return false; } -public String _ofreceactualizacion(keymon.lat.medicomed.c_updateavailable __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_updateavailable"; -if (Debug.shouldDelegate(ba, "ofreceactualizacion", false)) - {return ((String) Debug.delegate(ba, "ofreceactualizacion", null));} -RDebugUtils.currentLine=26935296; - //BA.debugLineNum = 26935296;BA.debugLine="Sub ofreceActualizacion"; -RDebugUtils.currentLine=26935297; - //BA.debugLineNum = 26935297;BA.debugLine="If Msgbox2(appUpdater.newApp.newMsg,\"Actualizació"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Private Root As B4XView 'ignore"; +_root = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 3;BA.debugLine="Private xui As XUI 'ignore"; +_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); + //BA.debugLineNum = 4;BA.debugLine="End Sub"; +return ""; +} +public Object _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 7;BA.debugLine="Public Sub Initialize As Object"; + //BA.debugLineNum = 8;BA.debugLine="Return Me"; +if (true) return this; + //BA.debugLineNum = 9;BA.debugLine="End Sub"; +return null; +} +public String _ofreceactualizacion() throws Exception{ + //BA.debugLineNum = 51;BA.debugLine="Sub ofreceActualizacion"; + //BA.debugLineNum = 52;BA.debugLine="If Msgbox2(appUpdater.newApp.newMsg,\"Actualizació"; if (__c.Msgbox2(BA.ObjectToCharSequence(_appupdater._newapp /*keymon.lat.medicomed.appupdater._mnewversion*/ .newMsg /*String*/ ),BA.ObjectToCharSequence("Actualización disponible"),"Si","","No",(android.graphics.Bitmap)(__c.Null),ba)==__c.DialogResponse.POSITIVE) { -RDebugUtils.currentLine=26935299; - //BA.debugLineNum = 26935299;BA.debugLine="CallSubDelayed(appUpdater, \"download_newApk\")"; + //BA.debugLineNum = 54;BA.debugLine="CallSubDelayed(appUpdater, \"download_newApk\")"; __c.CallSubDelayed(ba,(Object)(_appupdater.getObject()),"download_newApk"); }; -RDebugUtils.currentLine=26935302; - //BA.debugLineNum = 26935302;BA.debugLine="B4XPages.MainPage.ocultaProgreso"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._ocultaprogreso /*String*/ (null); -RDebugUtils.currentLine=26935303; - //BA.debugLineNum = 26935303;BA.debugLine="StartActivity(Main)"; + //BA.debugLineNum = 57;BA.debugLine="B4XPages.MainPage.ocultaProgreso"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._ocultaprogreso /*String*/ (); + //BA.debugLineNum = 58;BA.debugLine="StartActivity(Main)"; __c.StartActivity(ba,(Object)(_main.getObject())); -RDebugUtils.currentLine=26935305; - //BA.debugLineNum = 26935305;BA.debugLine="B4XPages.ShowPage(\"Login\")"; + //BA.debugLineNum = 60;BA.debugLine="B4XPages.ShowPage(\"Login\")"; _b4xpages._showpage /*String*/ (ba,"Login"); -RDebugUtils.currentLine=26935306; - //BA.debugLineNum = 26935306;BA.debugLine="End Sub"; + //BA.debugLineNum = 61;BA.debugLine="End Sub"; return ""; } -public String _sinactualizacion(keymon.lat.medicomed.c_updateavailable __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_updateavailable"; -if (Debug.shouldDelegate(ba, "sinactualizacion", false)) - {return ((String) Debug.delegate(ba, "sinactualizacion", null));} -RDebugUtils.currentLine=27000832; - //BA.debugLineNum = 27000832;BA.debugLine="Sub sinActualizacion"; -RDebugUtils.currentLine=27000833; - //BA.debugLineNum = 27000833;BA.debugLine="Msgbox(appUpdater.newApp.okMsg, \"Aplicación al co"; +public String _sinactualizacion() throws Exception{ + //BA.debugLineNum = 63;BA.debugLine="Sub sinActualizacion"; + //BA.debugLineNum = 64;BA.debugLine="Msgbox(appUpdater.newApp.okMsg, \"Aplicación al co"; __c.Msgbox(BA.ObjectToCharSequence(_appupdater._newapp /*keymon.lat.medicomed.appupdater._mnewversion*/ .okMsg /*String*/ ),BA.ObjectToCharSequence("Aplicación al corriente"),ba); -RDebugUtils.currentLine=27000835; - //BA.debugLineNum = 27000835;BA.debugLine="B4XPages.MainPage.ocultaProgreso"; -_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._ocultaprogreso /*String*/ (null); -RDebugUtils.currentLine=27000836; - //BA.debugLineNum = 27000836;BA.debugLine="B4XPages.ShowPage(\"Login\")"; + //BA.debugLineNum = 66;BA.debugLine="B4XPages.MainPage.ocultaProgreso"; +_b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (ba)._ocultaprogreso /*String*/ (); + //BA.debugLineNum = 67;BA.debugLine="B4XPages.ShowPage(\"Login\")"; _b4xpages._showpage /*String*/ (ba,"Login"); -RDebugUtils.currentLine=27000837; - //BA.debugLineNum = 27000837;BA.debugLine="End Sub"; + //BA.debugLineNum = 68;BA.debugLine="End Sub"; return ""; } -public String _b4xpage_created(keymon.lat.medicomed.c_updateavailable __ref,anywheresoftware.b4a.objects.B4XViewWrapper _root1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_updateavailable"; -if (Debug.shouldDelegate(ba, "b4xpage_created", false)) - {return ((String) Debug.delegate(ba, "b4xpage_created", new Object[] {_root1}));} -RDebugUtils.currentLine=26738688; - //BA.debugLineNum = 26738688;BA.debugLine="Private Sub B4XPage_Created (Root1 As B4XView)"; -RDebugUtils.currentLine=26738689; - //BA.debugLineNum = 26738689;BA.debugLine="Root = Root1"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = _root1; -RDebugUtils.currentLine=26738691; - //BA.debugLineNum = 26738691;BA.debugLine="Root.Color = Colors.Transparent"; -__ref._root /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setColor(__c.Colors.Transparent); -RDebugUtils.currentLine=26738692; - //BA.debugLineNum = 26738692;BA.debugLine="End Sub"; -return ""; +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]); +return BA.SubDelegator.SubNotFound; } -public String _class_globals(keymon.lat.medicomed.c_updateavailable __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="c_updateavailable"; -RDebugUtils.currentLine=26607616; - //BA.debugLineNum = 26607616;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=26607617; - //BA.debugLineNum = 26607617;BA.debugLine="Private Root As B4XView 'ignore"; -_root = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=26607618; - //BA.debugLineNum = 26607618;BA.debugLine="Private xui As XUI 'ignore"; -_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=26607619; - //BA.debugLineNum = 26607619;BA.debugLine="End Sub"; -return ""; } -} \ No newline at end of file diff --git a/B4A/Objects/src/keymon/lat/medicomed/cameraexclass2.java b/B4A/Objects/src/keymon/lat/medicomed/cameraexclass2.java index 9c18021..5259f9f 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/cameraexclass2.java +++ b/B4A/Objects/src/keymon/lat/medicomed/cameraexclass2.java @@ -10,7 +10,7 @@ public class cameraexclass2 extends B4AClass.ImplB4AClass implements BA.SubDeleg private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.cameraexclass2"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.cameraexclass2"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class cameraexclass2 extends B4AClass.ImplB4AClass implements BA.SubDeleg 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.keywords.Common __c = null; public Object _nativecam = null; public anywheresoftware.b4a.objects.CameraW _cam = null; public anywheresoftware.b4a.agraham.reflection.Reflection _r = null; @@ -50,256 +43,97 @@ 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 _camera_focusdone(keymon.lat.medicomed.cameraexclass2 __ref,boolean _success) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "camera_focusdone", false)) - {return ((String) Debug.delegate(ba, "camera_focusdone", new Object[] {_success}));} -RDebugUtils.currentLine=18415616; - //BA.debugLineNum = 18415616;BA.debugLine="Private Sub Camera_FocusDone (Success As Boolean)"; -RDebugUtils.currentLine=18415617; - //BA.debugLineNum = 18415617;BA.debugLine="If Success Then"; +public String _camera_focusdone(boolean _success) throws Exception{ + //BA.debugLineNum = 318;BA.debugLine="Private Sub Camera_FocusDone (Success As Boolean)"; + //BA.debugLineNum = 319;BA.debugLine="If Success Then"; if (_success) { -RDebugUtils.currentLine=18415618; - //BA.debugLineNum = 18415618;BA.debugLine="TakePicture"; -__ref._takepicture /*String*/ (null); + //BA.debugLineNum = 320;BA.debugLine="TakePicture"; +_takepicture(); }else { -RDebugUtils.currentLine=18415620; - //BA.debugLineNum = 18415620;BA.debugLine="Log(\"AutoFocus error.\")"; -__c.LogImpl("318415620","AutoFocus error.",0); + //BA.debugLineNum = 322;BA.debugLine="Log(\"AutoFocus error.\")"; +__c.LogImpl("362521348","AutoFocus error.",0); }; -RDebugUtils.currentLine=18415622; - //BA.debugLineNum = 18415622;BA.debugLine="End Sub"; + //BA.debugLineNum = 324;BA.debugLine="End Sub"; return ""; } -public String _takepicture(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "takepicture", false)) - {return ((String) Debug.delegate(ba, "takepicture", null));} -RDebugUtils.currentLine=16252928; - //BA.debugLineNum = 16252928;BA.debugLine="Public Sub TakePicture"; -RDebugUtils.currentLine=16252929; - //BA.debugLineNum = 16252929;BA.debugLine="cam.TakePicture"; -__ref._cam /*anywheresoftware.b4a.objects.CameraW*/ .TakePicture(); -RDebugUtils.currentLine=16252930; - //BA.debugLineNum = 16252930;BA.debugLine="End Sub"; +public String _camera_picturetaken(byte[] _data) throws Exception{ + //BA.debugLineNum = 106;BA.debugLine="Private Sub Camera_PictureTaken (Data() As Byte)"; + //BA.debugLineNum = 107;BA.debugLine="CallSub2(target, event & \"_PictureTaken\", Data)"; +__c.CallSubNew2(ba,_target,_event+"_PictureTaken",(Object)(_data)); + //BA.debugLineNum = 108;BA.debugLine="End Sub"; return ""; } -public String _camera_picturetaken(keymon.lat.medicomed.cameraexclass2 __ref,byte[] _data) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "camera_picturetaken", false)) - {return ((String) Debug.delegate(ba, "camera_picturetaken", new Object[] {_data}));} -RDebugUtils.currentLine=16318464; - //BA.debugLineNum = 16318464;BA.debugLine="Private Sub Camera_PictureTaken (Data() As Byte)"; -RDebugUtils.currentLine=16318465; - //BA.debugLineNum = 16318465;BA.debugLine="CallSub2(target, event & \"_PictureTaken\", Data)"; -__c.CallSubNew2(ba,__ref._target /*Object*/ ,__ref._event /*String*/ +"_PictureTaken",(Object)(_data)); -RDebugUtils.currentLine=16318466; - //BA.debugLineNum = 16318466;BA.debugLine="End Sub"; -return ""; -} -public String _camera_ready(keymon.lat.medicomed.cameraexclass2 __ref,boolean _success) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "camera_ready", false)) - {return ((String) Debug.delegate(ba, "camera_ready", new Object[] {_success}));} -RDebugUtils.currentLine=16187392; - //BA.debugLineNum = 16187392;BA.debugLine="Private Sub Camera_Ready (Success As Boolean)"; -RDebugUtils.currentLine=16187393; - //BA.debugLineNum = 16187393;BA.debugLine="If Success Then"; +public String _camera_ready(boolean _success) throws Exception{ + //BA.debugLineNum = 83;BA.debugLine="Private Sub Camera_Ready (Success As Boolean)"; + //BA.debugLineNum = 84;BA.debugLine="If Success Then"; if (_success) { -RDebugUtils.currentLine=16187394; - //BA.debugLineNum = 16187394;BA.debugLine="r.target = cam"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = (Object)(__ref._cam /*anywheresoftware.b4a.objects.CameraW*/ ); -RDebugUtils.currentLine=16187395; - //BA.debugLineNum = 16187395;BA.debugLine="nativeCam = r.GetField(\"camera\")"; -__ref._nativecam /*Object*/ = __ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .GetField("camera"); -RDebugUtils.currentLine=16187396; - //BA.debugLineNum = 16187396;BA.debugLine="r.target = nativeCam"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._nativecam /*Object*/ ; -RDebugUtils.currentLine=16187397; - //BA.debugLineNum = 16187397;BA.debugLine="parameters = r.RunMethod(\"getParameters\")"; -__ref._parameters /*Object*/ = __ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getParameters"); -RDebugUtils.currentLine=16187398; - //BA.debugLineNum = 16187398;BA.debugLine="SetDisplayOrientation"; -__ref._setdisplayorientation /*String*/ (null); + //BA.debugLineNum = 85;BA.debugLine="r.target = cam"; +_r.Target = (Object)(_cam); + //BA.debugLineNum = 86;BA.debugLine="nativeCam = r.GetField(\"camera\")"; +_nativecam = _r.GetField("camera"); + //BA.debugLineNum = 87;BA.debugLine="r.target = nativeCam"; +_r.Target = _nativecam; + //BA.debugLineNum = 88;BA.debugLine="parameters = r.RunMethod(\"getParameters\")"; +_parameters = _r.RunMethod("getParameters"); + //BA.debugLineNum = 89;BA.debugLine="SetDisplayOrientation"; +_setdisplayorientation(); }else { -RDebugUtils.currentLine=16187400; - //BA.debugLineNum = 16187400;BA.debugLine="Log(\"success = false, \" & LastException)"; -__c.LogImpl("316187400","success = false, "+BA.ObjectToString(__c.LastException(ba)),0); + //BA.debugLineNum = 91;BA.debugLine="Log(\"success = false, \" & LastException)"; +__c.LogImpl("360293128","success = false, "+BA.ObjectToString(__c.LastException(ba)),0); }; -RDebugUtils.currentLine=16187402; - //BA.debugLineNum = 16187402;BA.debugLine="CallSub2(target, event & \"_ready\", Success)"; -__c.CallSubNew2(ba,__ref._target /*Object*/ ,__ref._event /*String*/ +"_ready",(Object)(_success)); -RDebugUtils.currentLine=16187403; - //BA.debugLineNum = 16187403;BA.debugLine="End Sub"; + //BA.debugLineNum = 93;BA.debugLine="CallSub2(target, event & \"_ready\", Success)"; +__c.CallSubNew2(ba,_target,_event+"_ready",(Object)(_success)); + //BA.debugLineNum = 94;BA.debugLine="End Sub"; return ""; } -public String _setdisplayorientation(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "setdisplayorientation", false)) - {return ((String) Debug.delegate(ba, "setdisplayorientation", null));} -int _previewresult = 0; -int _result = 0; -int _degrees = 0; -keymon.lat.medicomed.main._camerainfoandid _ci = null; -int _orientation = 0; -RDebugUtils.currentLine=16121856; - //BA.debugLineNum = 16121856;BA.debugLine="Private Sub SetDisplayOrientation"; -RDebugUtils.currentLine=16121857; - //BA.debugLineNum = 16121857;BA.debugLine="r.target = r.GetActivity"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = (Object)(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .GetActivity(ba)); -RDebugUtils.currentLine=16121858; - //BA.debugLineNum = 16121858;BA.debugLine="r.target = r.RunMethod(\"getWindowManager\")"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getWindowManager"); -RDebugUtils.currentLine=16121859; - //BA.debugLineNum = 16121859;BA.debugLine="r.target = r.RunMethod(\"getDefaultDisplay\")"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getDefaultDisplay"); -RDebugUtils.currentLine=16121860; - //BA.debugLineNum = 16121860;BA.debugLine="r.target = r.RunMethod(\"getRotation\")"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getRotation"); -RDebugUtils.currentLine=16121861; - //BA.debugLineNum = 16121861;BA.debugLine="Dim previewResult, result, degrees As Int = r.tar"; -_previewresult = 0; -_result = 0; -_degrees = (int) ((double)(BA.ObjectToNumber(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target))*90); -RDebugUtils.currentLine=16121862; - //BA.debugLineNum = 16121862;BA.debugLine="Dim ci As CameraInfoAndId = FindCamera(Front)"; -_ci = __ref._findcamera /*keymon.lat.medicomed.main._camerainfoandid*/ (null,__ref._front /*boolean*/ ); -RDebugUtils.currentLine=16121863; - //BA.debugLineNum = 16121863;BA.debugLine="r.target = ci.CameraInfo"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = _ci.CameraInfo /*Object*/ ; -RDebugUtils.currentLine=16121864; - //BA.debugLineNum = 16121864;BA.debugLine="Dim orientation As Int = r.GetField(\"orientation\""; -_orientation = (int)(BA.ObjectToNumber(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .GetField("orientation"))); -RDebugUtils.currentLine=16121865; - //BA.debugLineNum = 16121865;BA.debugLine="If Front Then"; -if (__ref._front /*boolean*/ ) { -RDebugUtils.currentLine=16121866; - //BA.debugLineNum = 16121866;BA.debugLine="previewResult = (orientation + degrees) Mod 360"; -_previewresult = (int) ((_orientation+_degrees)%360); -RDebugUtils.currentLine=16121867; - //BA.debugLineNum = 16121867;BA.debugLine="result = previewResult"; -_result = _previewresult; -RDebugUtils.currentLine=16121868; - //BA.debugLineNum = 16121868;BA.debugLine="previewResult = (360 - previewResult) Mod 360"; -_previewresult = (int) ((360-_previewresult)%360); - }else { -RDebugUtils.currentLine=16121870; - //BA.debugLineNum = 16121870;BA.debugLine="previewResult = (orientation - degrees + 360) Mo"; -_previewresult = (int) ((_orientation-_degrees+360)%360); -RDebugUtils.currentLine=16121871; - //BA.debugLineNum = 16121871;BA.debugLine="result = previewResult"; -_result = _previewresult; -RDebugUtils.currentLine=16121872; - //BA.debugLineNum = 16121872;BA.debugLine="Log(previewResult)"; -__c.LogImpl("316121872",BA.NumberToString(_previewresult),0); - }; -RDebugUtils.currentLine=16121874; - //BA.debugLineNum = 16121874;BA.debugLine="r.target = nativeCam"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._nativecam /*Object*/ ; -RDebugUtils.currentLine=16121875; - //BA.debugLineNum = 16121875;BA.debugLine="r.RunMethod2(\"setDisplayOrientation\", previewResu"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod2("setDisplayOrientation",BA.NumberToString(_previewresult),"java.lang.int"); -RDebugUtils.currentLine=16121876; - //BA.debugLineNum = 16121876;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=16121877; - //BA.debugLineNum = 16121877;BA.debugLine="r.RunMethod2(\"setRotation\", result, \"java.lang.in"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod2("setRotation",BA.NumberToString(_result),"java.lang.int"); -RDebugUtils.currentLine=16121878; - //BA.debugLineNum = 16121878;BA.debugLine="CommitParameters"; -__ref._commitparameters /*String*/ (null); -RDebugUtils.currentLine=16121879; - //BA.debugLineNum = 16121879;BA.debugLine="End Sub"; -return ""; -} -public String _class_globals(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -RDebugUtils.currentLine=15925248; - //BA.debugLineNum = 15925248;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=15925249; - //BA.debugLineNum = 15925249;BA.debugLine="Private nativeCam As Object"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 6;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 7;BA.debugLine="Private nativeCam As Object"; _nativecam = new Object(); -RDebugUtils.currentLine=15925250; - //BA.debugLineNum = 15925250;BA.debugLine="Private cam As Camera"; + //BA.debugLineNum = 8;BA.debugLine="Private cam As Camera"; _cam = new anywheresoftware.b4a.objects.CameraW(); -RDebugUtils.currentLine=15925251; - //BA.debugLineNum = 15925251;BA.debugLine="Private r As Reflector"; + //BA.debugLineNum = 9;BA.debugLine="Private r As Reflector"; _r = new anywheresoftware.b4a.agraham.reflection.Reflection(); -RDebugUtils.currentLine=15925252; - //BA.debugLineNum = 15925252;BA.debugLine="Private target As Object"; + //BA.debugLineNum = 10;BA.debugLine="Private target As Object"; _target = new Object(); -RDebugUtils.currentLine=15925253; - //BA.debugLineNum = 15925253;BA.debugLine="Private event As String"; + //BA.debugLineNum = 11;BA.debugLine="Private event As String"; _event = ""; -RDebugUtils.currentLine=15925254; - //BA.debugLineNum = 15925254;BA.debugLine="Public Front As Boolean"; + //BA.debugLineNum = 12;BA.debugLine="Public Front As Boolean"; _front = false; -RDebugUtils.currentLine=15925255; - //BA.debugLineNum = 15925255;BA.debugLine="Private parameters As Object"; + //BA.debugLineNum = 13;BA.debugLine="Private parameters As Object"; _parameters = new Object(); -RDebugUtils.currentLine=15925256; - //BA.debugLineNum = 15925256;BA.debugLine="End Sub"; + //BA.debugLineNum = 14;BA.debugLine="End Sub"; return ""; } -public String _closenow(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "closenow", false)) - {return ((String) Debug.delegate(ba, "closenow", null));} -RDebugUtils.currentLine=18284544; - //BA.debugLineNum = 18284544;BA.debugLine="Public Sub CloseNow"; -RDebugUtils.currentLine=18284545; - //BA.debugLineNum = 18284545;BA.debugLine="cam.Release"; -__ref._cam /*anywheresoftware.b4a.objects.CameraW*/ .Release(); -RDebugUtils.currentLine=18284546; - //BA.debugLineNum = 18284546;BA.debugLine="r.target = cam"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = (Object)(__ref._cam /*anywheresoftware.b4a.objects.CameraW*/ ); -RDebugUtils.currentLine=18284547; - //BA.debugLineNum = 18284547;BA.debugLine="r.RunMethod2(\"releaseCameras\", True, \"java.lang.b"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod2("releaseCameras",BA.ObjectToString(__c.True),"java.lang.boolean"); -RDebugUtils.currentLine=18284548; - //BA.debugLineNum = 18284548;BA.debugLine="End Sub"; +public String _closenow() throws Exception{ + //BA.debugLineNum = 307;BA.debugLine="Public Sub CloseNow"; + //BA.debugLineNum = 308;BA.debugLine="cam.Release"; +_cam.Release(); + //BA.debugLineNum = 309;BA.debugLine="r.target = cam"; +_r.Target = (Object)(_cam); + //BA.debugLineNum = 310;BA.debugLine="r.RunMethod2(\"releaseCameras\", True, \"java.lang.b"; +_r.RunMethod2("releaseCameras",BA.ObjectToString(__c.True),"java.lang.boolean"); + //BA.debugLineNum = 311;BA.debugLine="End Sub"; return ""; } -public String _commitparameters(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "commitparameters", false)) - {return ((String) Debug.delegate(ba, "commitparameters", null));} -RDebugUtils.currentLine=16777216; - //BA.debugLineNum = 16777216;BA.debugLine="Public Sub CommitParameters"; -RDebugUtils.currentLine=16777218; - //BA.debugLineNum = 16777218;BA.debugLine="r.target = nativeCam"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._nativecam /*Object*/ ; -RDebugUtils.currentLine=16777219; - //BA.debugLineNum = 16777219;BA.debugLine="r.RunMethod4(\"setParameters\", Array As Object(pa"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod4("setParameters",new Object[]{__ref._parameters /*Object*/ },new String[]{"android.hardware.Camera$Parameters"}); -RDebugUtils.currentLine=16777224; - //BA.debugLineNum = 16777224;BA.debugLine="End Sub"; +public String _commitparameters() throws Exception{ + //BA.debugLineNum = 139;BA.debugLine="Public Sub CommitParameters"; + //BA.debugLineNum = 141;BA.debugLine="r.target = nativeCam"; +_r.Target = _nativecam; + //BA.debugLineNum = 142;BA.debugLine="r.RunMethod4(\"setParameters\", Array As Object(pa"; +_r.RunMethod4("setParameters",new Object[]{_parameters},new String[]{"android.hardware.Camera$Parameters"}); + //BA.debugLineNum = 147;BA.debugLine="End Sub"; return ""; } -public Object _facedetection_event(keymon.lat.medicomed.cameraexclass2 __ref,String _methodname,Object[] _args) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "facedetection_event", false)) - {return ((Object) Debug.delegate(ba, "facedetection_event", new Object[] {_methodname,_args}));} +public Object _facedetection_event(String _methodname,Object[] _args) throws Exception{ Object[] _faces = null; Object _f = null; anywheresoftware.b4j.object.JavaObject _jo = null; anywheresoftware.b4a.objects.drawable.CanvasWrapper.RectWrapper _facerect = null; -RDebugUtils.currentLine=19070976; - //BA.debugLineNum = 19070976;BA.debugLine="Private Sub FaceDetection_Event (MethodName As Str"; -RDebugUtils.currentLine=19070977; - //BA.debugLineNum = 19070977;BA.debugLine="Dim faces() As Object = Args(0)"; + //BA.debugLineNum = 372;BA.debugLine="Private Sub FaceDetection_Event (MethodName As Str"; + //BA.debugLineNum = 373;BA.debugLine="Dim faces() As Object = Args(0)"; _faces = (Object[])(_args[(int) (0)]); -RDebugUtils.currentLine=19070978; - //BA.debugLineNum = 19070978;BA.debugLine="For Each f As Object In faces"; + //BA.debugLineNum = 374;BA.debugLine="For Each f As Object In faces"; { final Object[] group2 = _faces; final int groupLen2 = group2.length @@ -307,428 +141,254 @@ final int groupLen2 = group2.length ; for (; index2 < groupLen2;index2++){ _f = group2[index2]; -RDebugUtils.currentLine=19070979; - //BA.debugLineNum = 19070979;BA.debugLine="Dim jo As JavaObject = f"; + //BA.debugLineNum = 375;BA.debugLine="Dim jo As JavaObject = f"; _jo = new anywheresoftware.b4j.object.JavaObject(); _jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_f)); -RDebugUtils.currentLine=19070980; - //BA.debugLineNum = 19070980;BA.debugLine="Dim faceRect As Rect = jo.GetField(\"rect\")"; + //BA.debugLineNum = 376;BA.debugLine="Dim faceRect As Rect = jo.GetField(\"rect\")"; _facerect = new anywheresoftware.b4a.objects.drawable.CanvasWrapper.RectWrapper(); _facerect = (anywheresoftware.b4a.objects.drawable.CanvasWrapper.RectWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.drawable.CanvasWrapper.RectWrapper(), (android.graphics.Rect)(_jo.GetField("rect"))); -RDebugUtils.currentLine=19070981; - //BA.debugLineNum = 19070981;BA.debugLine="Log(faceRect)"; -__c.LogImpl("319070981",BA.ObjectToString(_facerect),0); + //BA.debugLineNum = 377;BA.debugLine="Log(faceRect)"; +__c.LogImpl("363176709",BA.ObjectToString(_facerect),0); } }; -RDebugUtils.currentLine=19070983; - //BA.debugLineNum = 19070983;BA.debugLine="Return Null"; + //BA.debugLineNum = 379;BA.debugLine="Return Null"; if (true) return __c.Null; -RDebugUtils.currentLine=19070984; - //BA.debugLineNum = 19070984;BA.debugLine="End Sub"; + //BA.debugLineNum = 380;BA.debugLine="End Sub"; return null; } -public keymon.lat.medicomed.main._camerainfoandid _findcamera(keymon.lat.medicomed.cameraexclass2 __ref,boolean _frontcamera) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "findcamera", false)) - {return ((keymon.lat.medicomed.main._camerainfoandid) Debug.delegate(ba, "findcamera", new Object[] {_frontcamera}));} +public keymon.lat.medicomed.main._camerainfoandid _findcamera(boolean _frontcamera) throws Exception{ keymon.lat.medicomed.main._camerainfoandid _ci = null; Object _camerainfo = null; int _cameravalue = 0; int _numberofcameras = 0; int _i = 0; -RDebugUtils.currentLine=16056320; - //BA.debugLineNum = 16056320;BA.debugLine="Private Sub FindCamera (frontCamera As Boolean) As"; -RDebugUtils.currentLine=16056321; - //BA.debugLineNum = 16056321;BA.debugLine="Dim ci As CameraInfoAndId"; + //BA.debugLineNum = 33;BA.debugLine="Private Sub FindCamera (frontCamera As Boolean) As"; + //BA.debugLineNum = 34;BA.debugLine="Dim ci As CameraInfoAndId"; _ci = new keymon.lat.medicomed.main._camerainfoandid(); -RDebugUtils.currentLine=16056322; - //BA.debugLineNum = 16056322;BA.debugLine="Dim cameraInfo As Object"; + //BA.debugLineNum = 35;BA.debugLine="Dim cameraInfo As Object"; _camerainfo = new Object(); -RDebugUtils.currentLine=16056323; - //BA.debugLineNum = 16056323;BA.debugLine="Dim cameraValue As Int"; + //BA.debugLineNum = 36;BA.debugLine="Dim cameraValue As Int"; _cameravalue = 0; -RDebugUtils.currentLine=16056324; - //BA.debugLineNum = 16056324;BA.debugLine="Log(\"findCamera\")"; -__c.LogImpl("316056324","findCamera",0); -RDebugUtils.currentLine=16056325; - //BA.debugLineNum = 16056325;BA.debugLine="If frontCamera Then cameraValue = 1 Else cameraVa"; + //BA.debugLineNum = 37;BA.debugLine="Log(\"findCamera\")"; +__c.LogImpl("360162052","findCamera",0); + //BA.debugLineNum = 38;BA.debugLine="If frontCamera Then cameraValue = 1 Else cameraVa"; if (_frontcamera) { _cameravalue = (int) (1);} else { _cameravalue = (int) (0);}; -RDebugUtils.currentLine=16056326; - //BA.debugLineNum = 16056326;BA.debugLine="cameraInfo = r.CreateObject(\"android.hardware.Cam"; -_camerainfo = __ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .CreateObject("android.hardware.Camera$CameraInfo"); -RDebugUtils.currentLine=16056327; - //BA.debugLineNum = 16056327;BA.debugLine="Dim numberOfCameras As Int = r.RunStaticMethod(\"a"; -_numberofcameras = (int)(BA.ObjectToNumber(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunStaticMethod("android.hardware.Camera","getNumberOfCameras",(Object[])(__c.Null),(String[])(__c.Null)))); -RDebugUtils.currentLine=16056328; - //BA.debugLineNum = 16056328;BA.debugLine="Log(r.target)"; -__c.LogImpl("316056328",BA.ObjectToString(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target),0); -RDebugUtils.currentLine=16056329; - //BA.debugLineNum = 16056329;BA.debugLine="Log(numberOfCameras)"; -__c.LogImpl("316056329",BA.NumberToString(_numberofcameras),0); -RDebugUtils.currentLine=16056330; - //BA.debugLineNum = 16056330;BA.debugLine="For i = 0 To numberOfCameras - 1"; + //BA.debugLineNum = 39;BA.debugLine="cameraInfo = r.CreateObject(\"android.hardware.Cam"; +_camerainfo = _r.CreateObject("android.hardware.Camera$CameraInfo"); + //BA.debugLineNum = 40;BA.debugLine="Dim numberOfCameras As Int = r.RunStaticMethod(\"a"; +_numberofcameras = (int)(BA.ObjectToNumber(_r.RunStaticMethod("android.hardware.Camera","getNumberOfCameras",(Object[])(__c.Null),(String[])(__c.Null)))); + //BA.debugLineNum = 41;BA.debugLine="Log(r.target)"; +__c.LogImpl("360162056",BA.ObjectToString(_r.Target),0); + //BA.debugLineNum = 42;BA.debugLine="Log(numberOfCameras)"; +__c.LogImpl("360162057",BA.NumberToString(_numberofcameras),0); + //BA.debugLineNum = 43;BA.debugLine="For i = 0 To numberOfCameras - 1"; { final int step10 = 1; final int limit10 = (int) (_numberofcameras-1); _i = (int) (0) ; for (;_i <= limit10 ;_i = _i + step10 ) { -RDebugUtils.currentLine=16056331; - //BA.debugLineNum = 16056331;BA.debugLine="r.RunStaticMethod(\"android.hardware.Camera\", \"ge"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunStaticMethod("android.hardware.Camera","getCameraInfo",new Object[]{(Object)(_i),_camerainfo},new String[]{"java.lang.int","android.hardware.Camera$CameraInfo"}); -RDebugUtils.currentLine=16056333; - //BA.debugLineNum = 16056333;BA.debugLine="r.target = cameraInfo"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = _camerainfo; -RDebugUtils.currentLine=16056334; - //BA.debugLineNum = 16056334;BA.debugLine="Log(\"facing: \" & r.GetField(\"facing\") & \", \" & c"; -__c.LogImpl("316056334","facing: "+BA.ObjectToString(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .GetField("facing"))+", "+BA.NumberToString(_cameravalue),0); -RDebugUtils.currentLine=16056335; - //BA.debugLineNum = 16056335;BA.debugLine="If r.GetField(\"facing\") = cameraValue Then"; -if ((__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .GetField("facing")).equals((Object)(_cameravalue))) { -RDebugUtils.currentLine=16056336; - //BA.debugLineNum = 16056336;BA.debugLine="ci.cameraInfo = r.target"; -_ci.CameraInfo /*Object*/ = __ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target; -RDebugUtils.currentLine=16056337; - //BA.debugLineNum = 16056337;BA.debugLine="ci.Id = i"; + //BA.debugLineNum = 44;BA.debugLine="r.RunStaticMethod(\"android.hardware.Camera\", \"ge"; +_r.RunStaticMethod("android.hardware.Camera","getCameraInfo",new Object[]{(Object)(_i),_camerainfo},new String[]{"java.lang.int","android.hardware.Camera$CameraInfo"}); + //BA.debugLineNum = 46;BA.debugLine="r.target = cameraInfo"; +_r.Target = _camerainfo; + //BA.debugLineNum = 47;BA.debugLine="Log(\"facing: \" & r.GetField(\"facing\") & \", \" & c"; +__c.LogImpl("360162062","facing: "+BA.ObjectToString(_r.GetField("facing"))+", "+BA.NumberToString(_cameravalue),0); + //BA.debugLineNum = 48;BA.debugLine="If r.GetField(\"facing\") = cameraValue Then"; +if ((_r.GetField("facing")).equals((Object)(_cameravalue))) { + //BA.debugLineNum = 49;BA.debugLine="ci.cameraInfo = r.target"; +_ci.CameraInfo /*Object*/ = _r.Target; + //BA.debugLineNum = 50;BA.debugLine="ci.Id = i"; _ci.Id /*int*/ = _i; -RDebugUtils.currentLine=16056338; - //BA.debugLineNum = 16056338;BA.debugLine="Return ci"; + //BA.debugLineNum = 51;BA.debugLine="Return ci"; if (true) return _ci; }; } }; -RDebugUtils.currentLine=16056341; - //BA.debugLineNum = 16056341;BA.debugLine="ci.id = -1"; + //BA.debugLineNum = 54;BA.debugLine="ci.id = -1"; _ci.Id /*int*/ = (int) (-1); -RDebugUtils.currentLine=16056342; - //BA.debugLineNum = 16056342;BA.debugLine="Return ci"; + //BA.debugLineNum = 55;BA.debugLine="Return ci"; if (true) return _ci; -RDebugUtils.currentLine=16056343; - //BA.debugLineNum = 16056343;BA.debugLine="End Sub"; + //BA.debugLineNum = 56;BA.debugLine="End Sub"; return null; } -public String _focusandtakepicture(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "focusandtakepicture", false)) - {return ((String) Debug.delegate(ba, "focusandtakepicture", null));} -RDebugUtils.currentLine=18350080; - //BA.debugLineNum = 18350080;BA.debugLine="Public Sub FocusAndTakePicture"; -RDebugUtils.currentLine=18350081; - //BA.debugLineNum = 18350081;BA.debugLine="cam.AutoFocus"; -__ref._cam /*anywheresoftware.b4a.objects.CameraW*/ .AutoFocus(); -RDebugUtils.currentLine=18350082; - //BA.debugLineNum = 18350082;BA.debugLine="End Sub"; +public String _focusandtakepicture() throws Exception{ + //BA.debugLineNum = 313;BA.debugLine="Public Sub FocusAndTakePicture"; + //BA.debugLineNum = 314;BA.debugLine="cam.AutoFocus"; +_cam.AutoFocus(); + //BA.debugLineNum = 315;BA.debugLine="End Sub"; return ""; } -public String _getcoloreffect(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "getcoloreffect", false)) - {return ((String) Debug.delegate(ba, "getcoloreffect", null));} -RDebugUtils.currentLine=16842752; - //BA.debugLineNum = 16842752;BA.debugLine="Public Sub GetColorEffect As String"; -RDebugUtils.currentLine=16842753; - //BA.debugLineNum = 16842753;BA.debugLine="Return GetParameter(\"effect\")"; -if (true) return __ref._getparameter /*String*/ (null,"effect"); -RDebugUtils.currentLine=16842754; - //BA.debugLineNum = 16842754;BA.debugLine="End Sub"; +public String _getcoloreffect() throws Exception{ + //BA.debugLineNum = 149;BA.debugLine="Public Sub GetColorEffect As String"; + //BA.debugLineNum = 150;BA.debugLine="Return GetParameter(\"effect\")"; +if (true) return _getparameter("effect"); + //BA.debugLineNum = 151;BA.debugLine="End Sub"; return ""; } -public String _getparameter(keymon.lat.medicomed.cameraexclass2 __ref,String _key) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "getparameter", false)) - {return ((String) Debug.delegate(ba, "getparameter", new Object[] {_key}));} -RDebugUtils.currentLine=16711680; - //BA.debugLineNum = 16711680;BA.debugLine="Public Sub GetParameter(Key As String) As String"; -RDebugUtils.currentLine=16711681; - //BA.debugLineNum = 16711681;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=16711682; - //BA.debugLineNum = 16711682;BA.debugLine="Return r.RunMethod2(\"get\", Key, \"java.lang.String"; -if (true) return BA.ObjectToString(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod2("get",_key,"java.lang.String")); -RDebugUtils.currentLine=16711683; - //BA.debugLineNum = 16711683;BA.debugLine="End Sub"; -return ""; -} -public int _getexposurecompensation(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "getexposurecompensation", false)) - {return ((Integer) Debug.delegate(ba, "getexposurecompensation", null));} -RDebugUtils.currentLine=18743296; - //BA.debugLineNum = 18743296;BA.debugLine="Public Sub getExposureCompensation As Int"; -RDebugUtils.currentLine=18743297; - //BA.debugLineNum = 18743297;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=18743298; - //BA.debugLineNum = 18743298;BA.debugLine="Return r.RunMethod(\"getExposureCompensation\")"; -if (true) return (int)(BA.ObjectToNumber(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getExposureCompensation"))); -RDebugUtils.currentLine=18743299; - //BA.debugLineNum = 18743299;BA.debugLine="End Sub"; +public int _getexposurecompensation() throws Exception{ + //BA.debugLineNum = 346;BA.debugLine="Public Sub getExposureCompensation As Int"; + //BA.debugLineNum = 347;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 348;BA.debugLine="Return r.RunMethod(\"getExposureCompensation\")"; +if (true) return (int)(BA.ObjectToNumber(_r.RunMethod("getExposureCompensation"))); + //BA.debugLineNum = 349;BA.debugLine="End Sub"; return 0; } -public String _getflashmode(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "getflashmode", false)) - {return ((String) Debug.delegate(ba, "getflashmode", null));} -RDebugUtils.currentLine=17367040; - //BA.debugLineNum = 17367040;BA.debugLine="Public Sub GetFlashMode As String"; -RDebugUtils.currentLine=17367041; - //BA.debugLineNum = 17367041;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=17367042; - //BA.debugLineNum = 17367042;BA.debugLine="Return r.RunMethod(\"getFlashMode\")"; -if (true) return BA.ObjectToString(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getFlashMode")); -RDebugUtils.currentLine=17367043; - //BA.debugLineNum = 17367043;BA.debugLine="End Sub"; +public String _getflashmode() throws Exception{ + //BA.debugLineNum = 200;BA.debugLine="Public Sub GetFlashMode As String"; + //BA.debugLineNum = 201;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 202;BA.debugLine="Return r.RunMethod(\"getFlashMode\")"; +if (true) return BA.ObjectToString(_r.RunMethod("getFlashMode")); + //BA.debugLineNum = 203;BA.debugLine="End Sub"; return ""; } -public float[] _getfocusdistances(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "getfocusdistances", false)) - {return ((float[]) Debug.delegate(ba, "getfocusdistances", null));} +public float[] _getfocusdistances() throws Exception{ float[] _f = null; -RDebugUtils.currentLine=18153472; - //BA.debugLineNum = 18153472;BA.debugLine="Public Sub GetFocusDistances As Float()"; -RDebugUtils.currentLine=18153473; - //BA.debugLineNum = 18153473;BA.debugLine="Dim F(3) As Float"; + //BA.debugLineNum = 294;BA.debugLine="Public Sub GetFocusDistances As Float()"; + //BA.debugLineNum = 295;BA.debugLine="Dim F(3) As Float"; _f = new float[(int) (3)]; ; -RDebugUtils.currentLine=18153474; - //BA.debugLineNum = 18153474;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=18153475; - //BA.debugLineNum = 18153475;BA.debugLine="r.RunMethod4(\"getFocusDistances\", Array As Object"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod4("getFocusDistances",new Object[]{(Object)(_f)},new String[]{"[F"}); -RDebugUtils.currentLine=18153476; - //BA.debugLineNum = 18153476;BA.debugLine="Return F"; + //BA.debugLineNum = 296;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 297;BA.debugLine="r.RunMethod4(\"getFocusDistances\", Array As Object"; +_r.RunMethod4("getFocusDistances",new Object[]{(Object)(_f)},new String[]{"[F"}); + //BA.debugLineNum = 298;BA.debugLine="Return F"; if (true) return _f; -RDebugUtils.currentLine=18153477; - //BA.debugLineNum = 18153477;BA.debugLine="End Sub"; + //BA.debugLineNum = 299;BA.debugLine="End Sub"; return null; } -public int _getmaxexposurecompensation(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "getmaxexposurecompensation", false)) - {return ((Integer) Debug.delegate(ba, "getmaxexposurecompensation", null));} -RDebugUtils.currentLine=18939904; - //BA.debugLineNum = 18939904;BA.debugLine="Public Sub getMaxExposureCompensation As Int"; -RDebugUtils.currentLine=18939905; - //BA.debugLineNum = 18939905;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=18939906; - //BA.debugLineNum = 18939906;BA.debugLine="Return r.RunMethod(\"getMaxExposureCompensation\")"; -if (true) return (int)(BA.ObjectToNumber(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getMaxExposureCompensation"))); -RDebugUtils.currentLine=18939907; - //BA.debugLineNum = 18939907;BA.debugLine="End Sub"; +public int _getmaxexposurecompensation() throws Exception{ + //BA.debugLineNum = 361;BA.debugLine="Public Sub getMaxExposureCompensation As Int"; + //BA.debugLineNum = 362;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 363;BA.debugLine="Return r.RunMethod(\"getMaxExposureCompensation\")"; +if (true) return (int)(BA.ObjectToNumber(_r.RunMethod("getMaxExposureCompensation"))); + //BA.debugLineNum = 364;BA.debugLine="End Sub"; return 0; } -public int _getmaxzoom(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "getmaxzoom", false)) - {return ((Integer) Debug.delegate(ba, "getmaxzoom", null));} -RDebugUtils.currentLine=18546688; - //BA.debugLineNum = 18546688;BA.debugLine="Public Sub GetMaxZoom As Int"; -RDebugUtils.currentLine=18546689; - //BA.debugLineNum = 18546689;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=18546690; - //BA.debugLineNum = 18546690;BA.debugLine="Return r.RunMethod(\"getMaxZoom\")"; -if (true) return (int)(BA.ObjectToNumber(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getMaxZoom"))); -RDebugUtils.currentLine=18546691; - //BA.debugLineNum = 18546691;BA.debugLine="End Sub"; +public int _getmaxzoom() throws Exception{ + //BA.debugLineNum = 331;BA.debugLine="Public Sub GetMaxZoom As Int"; + //BA.debugLineNum = 332;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 333;BA.debugLine="Return r.RunMethod(\"getMaxZoom\")"; +if (true) return (int)(BA.ObjectToNumber(_r.RunMethod("getMaxZoom"))); + //BA.debugLineNum = 334;BA.debugLine="End Sub"; return 0; } -public int _getminexposurecompensation(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "getminexposurecompensation", false)) - {return ((Integer) Debug.delegate(ba, "getminexposurecompensation", null));} -RDebugUtils.currentLine=18874368; - //BA.debugLineNum = 18874368;BA.debugLine="Public Sub getMinExposureCompensation As Int"; -RDebugUtils.currentLine=18874369; - //BA.debugLineNum = 18874369;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=18874370; - //BA.debugLineNum = 18874370;BA.debugLine="Return r.RunMethod(\"getMinExposureCompensation\")"; -if (true) return (int)(BA.ObjectToNumber(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getMinExposureCompensation"))); -RDebugUtils.currentLine=18874371; - //BA.debugLineNum = 18874371;BA.debugLine="End Sub"; +public int _getminexposurecompensation() throws Exception{ + //BA.debugLineNum = 356;BA.debugLine="Public Sub getMinExposureCompensation As Int"; + //BA.debugLineNum = 357;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 358;BA.debugLine="Return r.RunMethod(\"getMinExposureCompensation\")"; +if (true) return (int)(BA.ObjectToNumber(_r.RunMethod("getMinExposureCompensation"))); + //BA.debugLineNum = 359;BA.debugLine="End Sub"; return 0; } -public keymon.lat.medicomed.main._camerasize _getpicturesize(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "getpicturesize", false)) - {return ((keymon.lat.medicomed.main._camerasize) Debug.delegate(ba, "getpicturesize", null));} -keymon.lat.medicomed.main._camerasize _cs = null; -RDebugUtils.currentLine=17825792; - //BA.debugLineNum = 17825792;BA.debugLine="Public Sub GetPictureSize As CameraSize"; -RDebugUtils.currentLine=17825793; - //BA.debugLineNum = 17825793;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=17825794; - //BA.debugLineNum = 17825794;BA.debugLine="r.target = r.RunMethod(\"getPictureSize\")"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getPictureSize"); -RDebugUtils.currentLine=17825795; - //BA.debugLineNum = 17825795;BA.debugLine="Dim cs As CameraSize"; -_cs = new keymon.lat.medicomed.main._camerasize(); -RDebugUtils.currentLine=17825796; - //BA.debugLineNum = 17825796;BA.debugLine="cs.Width = r.GetField(\"width\")"; -_cs.Width /*int*/ = (int)(BA.ObjectToNumber(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .GetField("width"))); -RDebugUtils.currentLine=17825797; - //BA.debugLineNum = 17825797;BA.debugLine="cs.Height = r.GetField(\"height\")"; -_cs.Height /*int*/ = (int)(BA.ObjectToNumber(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .GetField("height"))); -RDebugUtils.currentLine=17825798; - //BA.debugLineNum = 17825798;BA.debugLine="Return cs"; -if (true) return _cs; -RDebugUtils.currentLine=17825799; - //BA.debugLineNum = 17825799;BA.debugLine="End Sub"; -return null; -} -public String _getpreviewfpsrange(keymon.lat.medicomed.cameraexclass2 __ref,int[] _range) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "getpreviewfpsrange", false)) - {return ((String) Debug.delegate(ba, "getpreviewfpsrange", new Object[] {_range}));} -RDebugUtils.currentLine=17629184; - //BA.debugLineNum = 17629184;BA.debugLine="Public Sub GetPreviewFpsRange(Range() As Int)"; -RDebugUtils.currentLine=17629185; - //BA.debugLineNum = 17629185;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=17629186; - //BA.debugLineNum = 17629186;BA.debugLine="r.RunMethod4(\"getPreviewFpsRange\", Array As Objec"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod4("getPreviewFpsRange",new Object[]{(Object)(_range)},new String[]{"[I"}); -RDebugUtils.currentLine=17629187; - //BA.debugLineNum = 17629187;BA.debugLine="End Sub"; +public String _getparameter(String _key) throws Exception{ + //BA.debugLineNum = 134;BA.debugLine="Public Sub GetParameter(Key As String) As String"; + //BA.debugLineNum = 135;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 136;BA.debugLine="Return r.RunMethod2(\"get\", Key, \"java.lang.String"; +if (true) return BA.ObjectToString(_r.RunMethod2("get",_key,"java.lang.String")); + //BA.debugLineNum = 137;BA.debugLine="End Sub"; return ""; } -public keymon.lat.medicomed.main._camerasize _getpreviewsize(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "getpreviewsize", false)) - {return ((keymon.lat.medicomed.main._camerasize) Debug.delegate(ba, "getpreviewsize", null));} +public keymon.lat.medicomed.main._camerasize _getpicturesize() throws Exception{ keymon.lat.medicomed.main._camerasize _cs = null; -RDebugUtils.currentLine=17760256; - //BA.debugLineNum = 17760256;BA.debugLine="Public Sub GetPreviewSize As CameraSize"; -RDebugUtils.currentLine=17760257; - //BA.debugLineNum = 17760257;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=17760258; - //BA.debugLineNum = 17760258;BA.debugLine="r.target = r.RunMethod(\"getPreviewSize\")"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getPreviewSize"); -RDebugUtils.currentLine=17760259; - //BA.debugLineNum = 17760259;BA.debugLine="Dim cs As CameraSize"; + //BA.debugLineNum = 242;BA.debugLine="Public Sub GetPictureSize As CameraSize"; + //BA.debugLineNum = 243;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 244;BA.debugLine="r.target = r.RunMethod(\"getPictureSize\")"; +_r.Target = _r.RunMethod("getPictureSize"); + //BA.debugLineNum = 245;BA.debugLine="Dim cs As CameraSize"; _cs = new keymon.lat.medicomed.main._camerasize(); -RDebugUtils.currentLine=17760260; - //BA.debugLineNum = 17760260;BA.debugLine="cs.Width = r.GetField(\"width\")"; -_cs.Width /*int*/ = (int)(BA.ObjectToNumber(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .GetField("width"))); -RDebugUtils.currentLine=17760261; - //BA.debugLineNum = 17760261;BA.debugLine="cs.Height = r.GetField(\"height\")"; -_cs.Height /*int*/ = (int)(BA.ObjectToNumber(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .GetField("height"))); -RDebugUtils.currentLine=17760262; - //BA.debugLineNum = 17760262;BA.debugLine="Return cs"; + //BA.debugLineNum = 246;BA.debugLine="cs.Width = r.GetField(\"width\")"; +_cs.Width /*int*/ = (int)(BA.ObjectToNumber(_r.GetField("width"))); + //BA.debugLineNum = 247;BA.debugLine="cs.Height = r.GetField(\"height\")"; +_cs.Height /*int*/ = (int)(BA.ObjectToNumber(_r.GetField("height"))); + //BA.debugLineNum = 248;BA.debugLine="Return cs"; if (true) return _cs; -RDebugUtils.currentLine=17760263; - //BA.debugLineNum = 17760263;BA.debugLine="End Sub"; + //BA.debugLineNum = 249;BA.debugLine="End Sub"; return null; } -public anywheresoftware.b4a.objects.collections.List _getsupportedcoloreffects(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "getsupportedcoloreffects", false)) - {return ((anywheresoftware.b4a.objects.collections.List) Debug.delegate(ba, "getsupportedcoloreffects", null));} -RDebugUtils.currentLine=17498112; - //BA.debugLineNum = 17498112;BA.debugLine="Public Sub GetSupportedColorEffects As List"; -RDebugUtils.currentLine=17498113; - //BA.debugLineNum = 17498113;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=17498114; - //BA.debugLineNum = 17498114;BA.debugLine="Return r.RunMethod(\"getSupportedColorEffects\")"; -if (true) return (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getSupportedColorEffects"))); -RDebugUtils.currentLine=17498115; - //BA.debugLineNum = 17498115;BA.debugLine="End Sub"; +public String _getpreviewfpsrange(int[] _range) throws Exception{ + //BA.debugLineNum = 222;BA.debugLine="Public Sub GetPreviewFpsRange(Range() As Int)"; + //BA.debugLineNum = 223;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 224;BA.debugLine="r.RunMethod4(\"getPreviewFpsRange\", Array As Objec"; +_r.RunMethod4("getPreviewFpsRange",new Object[]{(Object)(_range)},new String[]{"[I"}); + //BA.debugLineNum = 225;BA.debugLine="End Sub"; +return ""; +} +public keymon.lat.medicomed.main._camerasize _getpreviewsize() throws Exception{ +keymon.lat.medicomed.main._camerasize _cs = null; + //BA.debugLineNum = 233;BA.debugLine="Public Sub GetPreviewSize As CameraSize"; + //BA.debugLineNum = 234;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 235;BA.debugLine="r.target = r.RunMethod(\"getPreviewSize\")"; +_r.Target = _r.RunMethod("getPreviewSize"); + //BA.debugLineNum = 236;BA.debugLine="Dim cs As CameraSize"; +_cs = new keymon.lat.medicomed.main._camerasize(); + //BA.debugLineNum = 237;BA.debugLine="cs.Width = r.GetField(\"width\")"; +_cs.Width /*int*/ = (int)(BA.ObjectToNumber(_r.GetField("width"))); + //BA.debugLineNum = 238;BA.debugLine="cs.Height = r.GetField(\"height\")"; +_cs.Height /*int*/ = (int)(BA.ObjectToNumber(_r.GetField("height"))); + //BA.debugLineNum = 239;BA.debugLine="Return cs"; +if (true) return _cs; + //BA.debugLineNum = 240;BA.debugLine="End Sub"; return null; } -public anywheresoftware.b4a.objects.collections.List _getsupportedflashmodes(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "getsupportedflashmodes", false)) - {return ((anywheresoftware.b4a.objects.collections.List) Debug.delegate(ba, "getsupportedflashmodes", null));} -RDebugUtils.currentLine=17432576; - //BA.debugLineNum = 17432576;BA.debugLine="Public Sub GetSupportedFlashModes As List"; -RDebugUtils.currentLine=17432577; - //BA.debugLineNum = 17432577;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=17432578; - //BA.debugLineNum = 17432578;BA.debugLine="Return r.RunMethod(\"getSupportedFlashModes\")"; -if (true) return (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getSupportedFlashModes"))); -RDebugUtils.currentLine=17432579; - //BA.debugLineNum = 17432579;BA.debugLine="End Sub"; +public anywheresoftware.b4a.objects.collections.List _getsupportedcoloreffects() throws Exception{ + //BA.debugLineNum = 210;BA.debugLine="Public Sub GetSupportedColorEffects As List"; + //BA.debugLineNum = 211;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 212;BA.debugLine="Return r.RunMethod(\"getSupportedColorEffects\")"; +if (true) return (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_r.RunMethod("getSupportedColorEffects"))); + //BA.debugLineNum = 213;BA.debugLine="End Sub"; return null; } -public anywheresoftware.b4a.objects.collections.List _getsupportedfocusmodes(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "getsupportedfocusmodes", false)) - {return ((anywheresoftware.b4a.objects.collections.List) Debug.delegate(ba, "getsupportedfocusmodes", null));} -RDebugUtils.currentLine=17956864; - //BA.debugLineNum = 17956864;BA.debugLine="Public Sub GetSupportedFocusModes As List"; -RDebugUtils.currentLine=17956865; - //BA.debugLineNum = 17956865;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=17956866; - //BA.debugLineNum = 17956866;BA.debugLine="Return r.RunMethod(\"getSupportedFocusModes\")"; -if (true) return (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getSupportedFocusModes"))); -RDebugUtils.currentLine=17956867; - //BA.debugLineNum = 17956867;BA.debugLine="End Sub"; +public anywheresoftware.b4a.objects.collections.List _getsupportedflashmodes() throws Exception{ + //BA.debugLineNum = 205;BA.debugLine="Public Sub GetSupportedFlashModes As List"; + //BA.debugLineNum = 206;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 207;BA.debugLine="Return r.RunMethod(\"getSupportedFlashModes\")"; +if (true) return (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_r.RunMethod("getSupportedFlashModes"))); + //BA.debugLineNum = 208;BA.debugLine="End Sub"; return null; } -public anywheresoftware.b4a.objects.collections.List _getsupportedpictureformats(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "getsupportedpictureformats", false)) - {return ((anywheresoftware.b4a.objects.collections.List) Debug.delegate(ba, "getsupportedpictureformats", null));} -RDebugUtils.currentLine=18219008; - //BA.debugLineNum = 18219008;BA.debugLine="Public Sub GetSupportedPictureFormats As List"; -RDebugUtils.currentLine=18219009; - //BA.debugLineNum = 18219009;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=18219010; - //BA.debugLineNum = 18219010;BA.debugLine="Return r.RunMethod(\"getSupportedPictureFormats"; -if (true) return (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getSupportedPictureFormats"))); -RDebugUtils.currentLine=18219011; - //BA.debugLineNum = 18219011;BA.debugLine="End Sub"; +public anywheresoftware.b4a.objects.collections.List _getsupportedfocusmodes() throws Exception{ + //BA.debugLineNum = 273;BA.debugLine="Public Sub GetSupportedFocusModes As List"; + //BA.debugLineNum = 274;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 275;BA.debugLine="Return r.RunMethod(\"getSupportedFocusModes\")"; +if (true) return (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_r.RunMethod("getSupportedFocusModes"))); + //BA.debugLineNum = 276;BA.debugLine="End Sub"; return null; } -public keymon.lat.medicomed.main._camerasize[] _getsupportedpicturessizes(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "getsupportedpicturessizes", false)) - {return ((keymon.lat.medicomed.main._camerasize[]) Debug.delegate(ba, "getsupportedpicturessizes", null));} +public anywheresoftware.b4a.objects.collections.List _getsupportedpictureformats() throws Exception{ + //BA.debugLineNum = 301;BA.debugLine="Public Sub GetSupportedPictureFormats As List"; + //BA.debugLineNum = 302;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 303;BA.debugLine="Return r.RunMethod(\"getSupportedPictureFormats"; +if (true) return (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_r.RunMethod("getSupportedPictureFormats"))); + //BA.debugLineNum = 304;BA.debugLine="End Sub"; +return null; +} +public keymon.lat.medicomed.main._camerasize[] _getsupportedpicturessizes() throws Exception{ anywheresoftware.b4a.objects.collections.List _list1 = null; keymon.lat.medicomed.main._camerasize[] _cs = null; int _i = 0; -RDebugUtils.currentLine=17104896; - //BA.debugLineNum = 17104896;BA.debugLine="Public Sub GetSupportedPicturesSizes As CameraSize"; -RDebugUtils.currentLine=17104897; - //BA.debugLineNum = 17104897;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=17104898; - //BA.debugLineNum = 17104898;BA.debugLine="Dim list1 As List = r.RunMethod(\"getSupportedPict"; + //BA.debugLineNum = 173;BA.debugLine="Public Sub GetSupportedPicturesSizes As CameraSize"; + //BA.debugLineNum = 174;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 175;BA.debugLine="Dim list1 As List = r.RunMethod(\"getSupportedPict"; _list1 = new anywheresoftware.b4a.objects.collections.List(); -_list1 = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getSupportedPictureSizes"))); -RDebugUtils.currentLine=17104899; - //BA.debugLineNum = 17104899;BA.debugLine="Dim cs(list1.Size) As CameraSize"; +_list1 = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_r.RunMethod("getSupportedPictureSizes"))); + //BA.debugLineNum = 176;BA.debugLine="Dim cs(list1.Size) As CameraSize"; _cs = new keymon.lat.medicomed.main._camerasize[_list1.getSize()]; { int d0 = _cs.length; @@ -737,67 +397,45 @@ _cs[i0] = new keymon.lat.medicomed.main._camerasize(); } } ; -RDebugUtils.currentLine=17104900; - //BA.debugLineNum = 17104900;BA.debugLine="For i = 0 To list1.Size - 1"; + //BA.debugLineNum = 177;BA.debugLine="For i = 0 To list1.Size - 1"; { final int step4 = 1; final int limit4 = (int) (_list1.getSize()-1); _i = (int) (0) ; for (;_i <= limit4 ;_i = _i + step4 ) { -RDebugUtils.currentLine=17104901; - //BA.debugLineNum = 17104901;BA.debugLine="r.target = list1.get(i)"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = _list1.Get(_i); -RDebugUtils.currentLine=17104902; - //BA.debugLineNum = 17104902;BA.debugLine="cs(i).Width = r.GetField(\"width\")"; -_cs[_i].Width /*int*/ = (int)(BA.ObjectToNumber(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .GetField("width"))); -RDebugUtils.currentLine=17104903; - //BA.debugLineNum = 17104903;BA.debugLine="cs(i).Height = r.GetField(\"height\")"; -_cs[_i].Height /*int*/ = (int)(BA.ObjectToNumber(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .GetField("height"))); + //BA.debugLineNum = 178;BA.debugLine="r.target = list1.get(i)"; +_r.Target = _list1.Get(_i); + //BA.debugLineNum = 179;BA.debugLine="cs(i).Width = r.GetField(\"width\")"; +_cs[_i].Width /*int*/ = (int)(BA.ObjectToNumber(_r.GetField("width"))); + //BA.debugLineNum = 180;BA.debugLine="cs(i).Height = r.GetField(\"height\")"; +_cs[_i].Height /*int*/ = (int)(BA.ObjectToNumber(_r.GetField("height"))); } }; -RDebugUtils.currentLine=17104905; - //BA.debugLineNum = 17104905;BA.debugLine="Return cs"; + //BA.debugLineNum = 182;BA.debugLine="Return cs"; if (true) return _cs; -RDebugUtils.currentLine=17104906; - //BA.debugLineNum = 17104906;BA.debugLine="End Sub"; + //BA.debugLineNum = 183;BA.debugLine="End Sub"; return null; } -public anywheresoftware.b4a.objects.collections.List _getsupportedpreviewfpsrange(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "getsupportedpreviewfpsrange", false)) - {return ((anywheresoftware.b4a.objects.collections.List) Debug.delegate(ba, "getsupportedpreviewfpsrange", null));} -RDebugUtils.currentLine=17563648; - //BA.debugLineNum = 17563648;BA.debugLine="Public Sub GetSupportedPreviewFpsRange As List"; -RDebugUtils.currentLine=17563649; - //BA.debugLineNum = 17563649;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=17563650; - //BA.debugLineNum = 17563650;BA.debugLine="Return r.RunMethod(\"getSupportedPreviewFpsRange\")"; -if (true) return (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getSupportedPreviewFpsRange"))); -RDebugUtils.currentLine=17563651; - //BA.debugLineNum = 17563651;BA.debugLine="End Sub"; +public anywheresoftware.b4a.objects.collections.List _getsupportedpreviewfpsrange() throws Exception{ + //BA.debugLineNum = 216;BA.debugLine="Public Sub GetSupportedPreviewFpsRange As List"; + //BA.debugLineNum = 217;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 218;BA.debugLine="Return r.RunMethod(\"getSupportedPreviewFpsRange\")"; +if (true) return (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_r.RunMethod("getSupportedPreviewFpsRange"))); + //BA.debugLineNum = 219;BA.debugLine="End Sub"; return null; } -public keymon.lat.medicomed.main._camerasize[] _getsupportedpreviewsizes(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "getsupportedpreviewsizes", false)) - {return ((keymon.lat.medicomed.main._camerasize[]) Debug.delegate(ba, "getsupportedpreviewsizes", null));} +public keymon.lat.medicomed.main._camerasize[] _getsupportedpreviewsizes() throws Exception{ anywheresoftware.b4a.objects.collections.List _list1 = null; keymon.lat.medicomed.main._camerasize[] _cs = null; int _i = 0; -RDebugUtils.currentLine=16973824; - //BA.debugLineNum = 16973824;BA.debugLine="Public Sub GetSupportedPreviewSizes As CameraSize("; -RDebugUtils.currentLine=16973825; - //BA.debugLineNum = 16973825;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=16973826; - //BA.debugLineNum = 16973826;BA.debugLine="Dim list1 As List = r.RunMethod(\"getSupportedPrev"; + //BA.debugLineNum = 157;BA.debugLine="Public Sub GetSupportedPreviewSizes As CameraSize("; + //BA.debugLineNum = 158;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 159;BA.debugLine="Dim list1 As List = r.RunMethod(\"getSupportedPrev"; _list1 = new anywheresoftware.b4a.objects.collections.List(); -_list1 = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getSupportedPreviewSizes"))); -RDebugUtils.currentLine=16973827; - //BA.debugLineNum = 16973827;BA.debugLine="Dim cs(list1.Size) As CameraSize"; +_list1 = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_r.RunMethod("getSupportedPreviewSizes"))); + //BA.debugLineNum = 160;BA.debugLine="Dim cs(list1.Size) As CameraSize"; _cs = new keymon.lat.medicomed.main._camerasize[_list1.getSize()]; { int d0 = _cs.length; @@ -806,121 +444,77 @@ _cs[i0] = new keymon.lat.medicomed.main._camerasize(); } } ; -RDebugUtils.currentLine=16973828; - //BA.debugLineNum = 16973828;BA.debugLine="For i = 0 To list1.Size - 1"; + //BA.debugLineNum = 161;BA.debugLine="For i = 0 To list1.Size - 1"; { final int step4 = 1; final int limit4 = (int) (_list1.getSize()-1); _i = (int) (0) ; for (;_i <= limit4 ;_i = _i + step4 ) { -RDebugUtils.currentLine=16973829; - //BA.debugLineNum = 16973829;BA.debugLine="r.target = list1.get(i)"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = _list1.Get(_i); -RDebugUtils.currentLine=16973830; - //BA.debugLineNum = 16973830;BA.debugLine="cs(i).Width = r.GetField(\"width\")"; -_cs[_i].Width /*int*/ = (int)(BA.ObjectToNumber(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .GetField("width"))); -RDebugUtils.currentLine=16973831; - //BA.debugLineNum = 16973831;BA.debugLine="cs(i).Height = r.GetField(\"height\")"; -_cs[_i].Height /*int*/ = (int)(BA.ObjectToNumber(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .GetField("height"))); + //BA.debugLineNum = 162;BA.debugLine="r.target = list1.get(i)"; +_r.Target = _list1.Get(_i); + //BA.debugLineNum = 163;BA.debugLine="cs(i).Width = r.GetField(\"width\")"; +_cs[_i].Width /*int*/ = (int)(BA.ObjectToNumber(_r.GetField("width"))); + //BA.debugLineNum = 164;BA.debugLine="cs(i).Height = r.GetField(\"height\")"; +_cs[_i].Height /*int*/ = (int)(BA.ObjectToNumber(_r.GetField("height"))); } }; -RDebugUtils.currentLine=16973833; - //BA.debugLineNum = 16973833;BA.debugLine="Return cs"; + //BA.debugLineNum = 166;BA.debugLine="Return cs"; if (true) return _cs; -RDebugUtils.currentLine=16973834; - //BA.debugLineNum = 16973834;BA.debugLine="End Sub"; + //BA.debugLineNum = 167;BA.debugLine="End Sub"; return null; } -public int _getzoom(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "getzoom", false)) - {return ((Integer) Debug.delegate(ba, "getzoom", null));} -RDebugUtils.currentLine=18612224; - //BA.debugLineNum = 18612224;BA.debugLine="Public Sub getZoom() As Int"; -RDebugUtils.currentLine=18612225; - //BA.debugLineNum = 18612225;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=18612226; - //BA.debugLineNum = 18612226;BA.debugLine="Return r.RunMethod(\"getZoom\")"; -if (true) return (int)(BA.ObjectToNumber(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getZoom"))); -RDebugUtils.currentLine=18612227; - //BA.debugLineNum = 18612227;BA.debugLine="End Sub"; +public int _getzoom() throws Exception{ + //BA.debugLineNum = 336;BA.debugLine="Public Sub getZoom() As Int"; + //BA.debugLineNum = 337;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 338;BA.debugLine="Return r.RunMethod(\"getZoom\")"; +if (true) return (int)(BA.ObjectToNumber(_r.RunMethod("getZoom"))); + //BA.debugLineNum = 339;BA.debugLine="End Sub"; return 0; } -public String _initialize(keymon.lat.medicomed.cameraexclass2 __ref,anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.PanelWrapper _panel1,boolean _frontcamera,Object _targetmodule,String _eventname) throws Exception{ -__ref = this; +public String _initialize(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.PanelWrapper _panel1,boolean _frontcamera,Object _targetmodule,String _eventname) throws Exception{ innerInitialize(_ba); -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "initialize", false)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_panel1,_frontcamera,_targetmodule,_eventname}));} int _id = 0; -RDebugUtils.currentLine=15990784; - //BA.debugLineNum = 15990784;BA.debugLine="Public Sub Initialize (Panel1 As Panel, FrontCamer"; -RDebugUtils.currentLine=15990785; - //BA.debugLineNum = 15990785;BA.debugLine="target = TargetModule"; -__ref._target /*Object*/ = _targetmodule; -RDebugUtils.currentLine=15990786; - //BA.debugLineNum = 15990786;BA.debugLine="event = EventName"; -__ref._event /*String*/ = _eventname; -RDebugUtils.currentLine=15990787; - //BA.debugLineNum = 15990787;BA.debugLine="Front = FrontCamera"; -__ref._front /*boolean*/ = _frontcamera; -RDebugUtils.currentLine=15990788; - //BA.debugLineNum = 15990788;BA.debugLine="Dim id As Int"; + //BA.debugLineNum = 16;BA.debugLine="Public Sub Initialize (Panel1 As Panel, FrontCamer"; + //BA.debugLineNum = 17;BA.debugLine="target = TargetModule"; +_target = _targetmodule; + //BA.debugLineNum = 18;BA.debugLine="event = EventName"; +_event = _eventname; + //BA.debugLineNum = 19;BA.debugLine="Front = FrontCamera"; +_front = _frontcamera; + //BA.debugLineNum = 20;BA.debugLine="Dim id As Int"; _id = 0; -RDebugUtils.currentLine=15990789; - //BA.debugLineNum = 15990789;BA.debugLine="id = FindCamera(Front).id"; -_id = __ref._findcamera /*keymon.lat.medicomed.main._camerainfoandid*/ (null,__ref._front /*boolean*/ ).Id /*int*/ ; -RDebugUtils.currentLine=15990790; - //BA.debugLineNum = 15990790;BA.debugLine="If id = -1 Then"; + //BA.debugLineNum = 21;BA.debugLine="id = FindCamera(Front).id"; +_id = _findcamera(_front).Id /*int*/ ; + //BA.debugLineNum = 22;BA.debugLine="If id = -1 Then"; if (_id==-1) { -RDebugUtils.currentLine=15990791; - //BA.debugLineNum = 15990791;BA.debugLine="Front = Not(Front) 'try different camera"; -__ref._front /*boolean*/ = __c.Not(__ref._front /*boolean*/ ); -RDebugUtils.currentLine=15990792; - //BA.debugLineNum = 15990792;BA.debugLine="id = FindCamera(Front).id"; -_id = __ref._findcamera /*keymon.lat.medicomed.main._camerainfoandid*/ (null,__ref._front /*boolean*/ ).Id /*int*/ ; -RDebugUtils.currentLine=15990793; - //BA.debugLineNum = 15990793;BA.debugLine="If id = -1 Then"; + //BA.debugLineNum = 23;BA.debugLine="Front = Not(Front) 'try different camera"; +_front = __c.Not(_front); + //BA.debugLineNum = 24;BA.debugLine="id = FindCamera(Front).id"; +_id = _findcamera(_front).Id /*int*/ ; + //BA.debugLineNum = 25;BA.debugLine="If id = -1 Then"; if (_id==-1) { -RDebugUtils.currentLine=15990794; - //BA.debugLineNum = 15990794;BA.debugLine="ToastMessageShow(\"No camera found.\", True)"; + //BA.debugLineNum = 26;BA.debugLine="ToastMessageShow(\"No camera found.\", True)"; __c.ToastMessageShow(BA.ObjectToCharSequence("No camera found."),__c.True); -RDebugUtils.currentLine=15990795; - //BA.debugLineNum = 15990795;BA.debugLine="Return"; + //BA.debugLineNum = 27;BA.debugLine="Return"; if (true) return ""; }; }; -RDebugUtils.currentLine=15990798; - //BA.debugLineNum = 15990798;BA.debugLine="cam.Initialize2(Panel1, \"camera\", id)"; -__ref._cam /*anywheresoftware.b4a.objects.CameraW*/ .Initialize2(ba,(android.view.ViewGroup)(_panel1.getObject()),"camera",_id); -RDebugUtils.currentLine=15990799; - //BA.debugLineNum = 15990799;BA.debugLine="End Sub"; + //BA.debugLineNum = 30;BA.debugLine="cam.Initialize2(Panel1, \"camera\", id)"; +_cam.Initialize2(ba,(android.view.ViewGroup)(_panel1.getObject()),"camera",_id); + //BA.debugLineNum = 31;BA.debugLine="End Sub"; return ""; } -public boolean _iszoomsupported(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "iszoomsupported", false)) - {return ((Boolean) Debug.delegate(ba, "iszoomsupported", null));} -RDebugUtils.currentLine=18481152; - //BA.debugLineNum = 18481152;BA.debugLine="Public Sub IsZoomSupported As Boolean"; -RDebugUtils.currentLine=18481153; - //BA.debugLineNum = 18481153;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=18481154; - //BA.debugLineNum = 18481154;BA.debugLine="Return r.RunMethod(\"isZoomSupported\")"; -if (true) return BA.ObjectToBoolean(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("isZoomSupported")); -RDebugUtils.currentLine=18481155; - //BA.debugLineNum = 18481155;BA.debugLine="End Sub"; +public boolean _iszoomsupported() throws Exception{ + //BA.debugLineNum = 326;BA.debugLine="Public Sub IsZoomSupported As Boolean"; + //BA.debugLineNum = 327;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 328;BA.debugLine="Return r.RunMethod(\"isZoomSupported\")"; +if (true) return BA.ObjectToBoolean(_r.RunMethod("isZoomSupported")); + //BA.debugLineNum = 329;BA.debugLine="End Sub"; return false; } -public byte[] _previewimagetojpeg(keymon.lat.medicomed.cameraexclass2 __ref,byte[] _data,int _quality) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "previewimagetojpeg", false)) - {return ((byte[]) Debug.delegate(ba, "previewimagetojpeg", new Object[] {_data,_quality}));} +public byte[] _previewimagetojpeg(byte[] _data,int _quality) throws Exception{ Object _size = null; Object _previewformat = null; int _width = 0; @@ -928,381 +522,281 @@ int _height = 0; Object _yuvimage = null; anywheresoftware.b4a.objects.drawable.CanvasWrapper.RectWrapper _rect1 = null; anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out = null; -RDebugUtils.currentLine=17891328; - //BA.debugLineNum = 17891328;BA.debugLine="Public Sub PreviewImageToJpeg(data() As Byte, qual"; -RDebugUtils.currentLine=17891329; - //BA.debugLineNum = 17891329;BA.debugLine="Dim size, previewFormat As Object"; + //BA.debugLineNum = 253;BA.debugLine="Public Sub PreviewImageToJpeg(data() As Byte, qual"; + //BA.debugLineNum = 254;BA.debugLine="Dim size, previewFormat As Object"; _size = new Object(); _previewformat = new Object(); -RDebugUtils.currentLine=17891330; - //BA.debugLineNum = 17891330;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=17891331; - //BA.debugLineNum = 17891331;BA.debugLine="size = r.RunMethod(\"getPreviewSize\")"; -_size = __ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getPreviewSize"); -RDebugUtils.currentLine=17891332; - //BA.debugLineNum = 17891332;BA.debugLine="previewFormat = r.RunMethod(\"getPreviewFormat\")"; -_previewformat = __ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getPreviewFormat"); -RDebugUtils.currentLine=17891333; - //BA.debugLineNum = 17891333;BA.debugLine="r.target = size"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = _size; -RDebugUtils.currentLine=17891334; - //BA.debugLineNum = 17891334;BA.debugLine="Dim width = r.GetField(\"width\"), height = r.GetFi"; -_width = (int)(BA.ObjectToNumber(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .GetField("width"))); -_height = (int)(BA.ObjectToNumber(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .GetField("height"))); -RDebugUtils.currentLine=17891335; - //BA.debugLineNum = 17891335;BA.debugLine="Dim yuvImage As Object = r.CreateObject2(\"android"; -_yuvimage = __ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .CreateObject2("android.graphics.YuvImage",new Object[]{(Object)(_data),_previewformat,(Object)(_width),(Object)(_height),__c.Null},new String[]{"[B","java.lang.int","java.lang.int","java.lang.int","[I"}); -RDebugUtils.currentLine=17891338; - //BA.debugLineNum = 17891338;BA.debugLine="r.target = yuvImage"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = _yuvimage; -RDebugUtils.currentLine=17891339; - //BA.debugLineNum = 17891339;BA.debugLine="Dim rect1 As Rect"; + //BA.debugLineNum = 255;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 256;BA.debugLine="size = r.RunMethod(\"getPreviewSize\")"; +_size = _r.RunMethod("getPreviewSize"); + //BA.debugLineNum = 257;BA.debugLine="previewFormat = r.RunMethod(\"getPreviewFormat\")"; +_previewformat = _r.RunMethod("getPreviewFormat"); + //BA.debugLineNum = 258;BA.debugLine="r.target = size"; +_r.Target = _size; + //BA.debugLineNum = 259;BA.debugLine="Dim width = r.GetField(\"width\"), height = r.GetFi"; +_width = (int)(BA.ObjectToNumber(_r.GetField("width"))); +_height = (int)(BA.ObjectToNumber(_r.GetField("height"))); + //BA.debugLineNum = 260;BA.debugLine="Dim yuvImage As Object = r.CreateObject2(\"android"; +_yuvimage = _r.CreateObject2("android.graphics.YuvImage",new Object[]{(Object)(_data),_previewformat,(Object)(_width),(Object)(_height),__c.Null},new String[]{"[B","java.lang.int","java.lang.int","java.lang.int","[I"}); + //BA.debugLineNum = 263;BA.debugLine="r.target = yuvImage"; +_r.Target = _yuvimage; + //BA.debugLineNum = 264;BA.debugLine="Dim rect1 As Rect"; _rect1 = new anywheresoftware.b4a.objects.drawable.CanvasWrapper.RectWrapper(); -RDebugUtils.currentLine=17891340; - //BA.debugLineNum = 17891340;BA.debugLine="rect1.Initialize(0, 0, r.RunMethod(\"getWidth\"), r"; -_rect1.Initialize((int) (0),(int) (0),(int)(BA.ObjectToNumber(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getWidth"))),(int)(BA.ObjectToNumber(__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod("getHeight")))); -RDebugUtils.currentLine=17891341; - //BA.debugLineNum = 17891341;BA.debugLine="Dim out As OutputStream"; + //BA.debugLineNum = 265;BA.debugLine="rect1.Initialize(0, 0, r.RunMethod(\"getWidth\"), r"; +_rect1.Initialize((int) (0),(int) (0),(int)(BA.ObjectToNumber(_r.RunMethod("getWidth"))),(int)(BA.ObjectToNumber(_r.RunMethod("getHeight")))); + //BA.debugLineNum = 266;BA.debugLine="Dim out As OutputStream"; _out = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); -RDebugUtils.currentLine=17891342; - //BA.debugLineNum = 17891342;BA.debugLine="out.InitializeToBytesArray(100)"; + //BA.debugLineNum = 267;BA.debugLine="out.InitializeToBytesArray(100)"; _out.InitializeToBytesArray((int) (100)); -RDebugUtils.currentLine=17891343; - //BA.debugLineNum = 17891343;BA.debugLine="r.RunMethod4(\"compressToJpeg\", Array As Object(re"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod4("compressToJpeg",new Object[]{(Object)(_rect1.getObject()),(Object)(_quality),(Object)(_out.getObject())},new String[]{"android.graphics.Rect","java.lang.int","java.io.OutputStream"}); -RDebugUtils.currentLine=17891345; - //BA.debugLineNum = 17891345;BA.debugLine="Return out.ToBytesArray"; + //BA.debugLineNum = 268;BA.debugLine="r.RunMethod4(\"compressToJpeg\", Array As Object(re"; +_r.RunMethod4("compressToJpeg",new Object[]{(Object)(_rect1.getObject()),(Object)(_quality),(Object)(_out.getObject())},new String[]{"android.graphics.Rect","java.lang.int","java.io.OutputStream"}); + //BA.debugLineNum = 270;BA.debugLine="Return out.ToBytesArray"; if (true) return _out.ToBytesArray(); -RDebugUtils.currentLine=17891346; - //BA.debugLineNum = 17891346;BA.debugLine="End Sub"; + //BA.debugLineNum = 271;BA.debugLine="End Sub"; return null; } -public String _release(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "release", false)) - {return ((String) Debug.delegate(ba, "release", null));} -RDebugUtils.currentLine=16515072; - //BA.debugLineNum = 16515072;BA.debugLine="Public Sub Release"; -RDebugUtils.currentLine=16515073; - //BA.debugLineNum = 16515073;BA.debugLine="cam.Release"; -__ref._cam /*anywheresoftware.b4a.objects.CameraW*/ .Release(); -RDebugUtils.currentLine=16515074; - //BA.debugLineNum = 16515074;BA.debugLine="End Sub"; +public String _release() throws Exception{ + //BA.debugLineNum = 118;BA.debugLine="Public Sub Release"; + //BA.debugLineNum = 119;BA.debugLine="cam.Release"; +_cam.Release(); + //BA.debugLineNum = 120;BA.debugLine="End Sub"; return ""; } -public String _savepicturetofile(keymon.lat.medicomed.cameraexclass2 __ref,byte[] _data,String _dir,String _filename) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "savepicturetofile", false)) - {return ((String) Debug.delegate(ba, "savepicturetofile", new Object[] {_data,_dir,_filename}));} +public String _savepicturetofile(byte[] _data,String _dir,String _filename) throws Exception{ anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out = null; -RDebugUtils.currentLine=16580608; - //BA.debugLineNum = 16580608;BA.debugLine="Public Sub SavePictureToFile(Data() As Byte, Dir A"; -RDebugUtils.currentLine=16580609; - //BA.debugLineNum = 16580609;BA.debugLine="Dim out As OutputStream = File.OpenOutput(Dir, Fi"; + //BA.debugLineNum = 123;BA.debugLine="Public Sub SavePictureToFile(Data() As Byte, Dir A"; + //BA.debugLineNum = 124;BA.debugLine="Dim out As OutputStream = File.OpenOutput(Dir, Fi"; _out = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); _out = __c.File.OpenOutput(_dir,_filename,__c.False); -RDebugUtils.currentLine=16580610; - //BA.debugLineNum = 16580610;BA.debugLine="out.WriteBytes(Data, 0, Data.Length)"; + //BA.debugLineNum = 125;BA.debugLine="out.WriteBytes(Data, 0, Data.Length)"; _out.WriteBytes(_data,(int) (0),_data.length); -RDebugUtils.currentLine=16580611; - //BA.debugLineNum = 16580611;BA.debugLine="out.Close"; + //BA.debugLineNum = 126;BA.debugLine="out.Close"; _out.Close(); -RDebugUtils.currentLine=16580612; - //BA.debugLineNum = 16580612;BA.debugLine="End Sub"; + //BA.debugLineNum = 127;BA.debugLine="End Sub"; return ""; } -public String _setcoloreffect(keymon.lat.medicomed.cameraexclass2 __ref,String _effect) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "setcoloreffect", false)) - {return ((String) Debug.delegate(ba, "setcoloreffect", new Object[] {_effect}));} -RDebugUtils.currentLine=16908288; - //BA.debugLineNum = 16908288;BA.debugLine="Public Sub SetColorEffect(Effect As String)"; -RDebugUtils.currentLine=16908289; - //BA.debugLineNum = 16908289;BA.debugLine="SetParameter(\"effect\", Effect)"; -__ref._setparameter /*String*/ (null,"effect",_effect); -RDebugUtils.currentLine=16908290; - //BA.debugLineNum = 16908290;BA.debugLine="End Sub"; +public String _setcoloreffect(String _effect) throws Exception{ + //BA.debugLineNum = 153;BA.debugLine="Public Sub SetColorEffect(Effect As String)"; + //BA.debugLineNum = 154;BA.debugLine="SetParameter(\"effect\", Effect)"; +_setparameter("effect",_effect); + //BA.debugLineNum = 155;BA.debugLine="End Sub"; return ""; } -public String _setparameter(keymon.lat.medicomed.cameraexclass2 __ref,String _key,String _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "setparameter", false)) - {return ((String) Debug.delegate(ba, "setparameter", new Object[] {_key,_value}));} -RDebugUtils.currentLine=16646144; - //BA.debugLineNum = 16646144;BA.debugLine="Public Sub SetParameter(Key As String, Value As St"; -RDebugUtils.currentLine=16646145; - //BA.debugLineNum = 16646145;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=16646146; - //BA.debugLineNum = 16646146;BA.debugLine="r.RunMethod3(\"set\", Key, \"java.lang.String\", Valu"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod3("set",_key,"java.lang.String",_value,"java.lang.String"); -RDebugUtils.currentLine=16646147; - //BA.debugLineNum = 16646147;BA.debugLine="End Sub"; -return ""; -} -public String _setcontinuousautofocus(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "setcontinuousautofocus", false)) - {return ((String) Debug.delegate(ba, "setcontinuousautofocus", null));} +public String _setcontinuousautofocus() throws Exception{ anywheresoftware.b4a.objects.collections.List _modes = null; -RDebugUtils.currentLine=18022400; - //BA.debugLineNum = 18022400;BA.debugLine="Public Sub SetContinuousAutoFocus"; -RDebugUtils.currentLine=18022401; - //BA.debugLineNum = 18022401;BA.debugLine="Dim modes As List = GetSupportedFocusModes"; + //BA.debugLineNum = 278;BA.debugLine="Public Sub SetContinuousAutoFocus"; + //BA.debugLineNum = 279;BA.debugLine="Dim modes As List = GetSupportedFocusModes"; _modes = new anywheresoftware.b4a.objects.collections.List(); -_modes = __ref._getsupportedfocusmodes /*anywheresoftware.b4a.objects.collections.List*/ (null); -RDebugUtils.currentLine=18022402; - //BA.debugLineNum = 18022402;BA.debugLine="If modes.IndexOf(\"continuous-picture\") > -1 Th"; +_modes = _getsupportedfocusmodes(); + //BA.debugLineNum = 280;BA.debugLine="If modes.IndexOf(\"continuous-picture\") > -1 Th"; if (_modes.IndexOf((Object)("continuous-picture"))>-1) { -RDebugUtils.currentLine=18022403; - //BA.debugLineNum = 18022403;BA.debugLine="SetFocusMode(\"continuous-picture\")"; -__ref._setfocusmode /*String*/ (null,"continuous-picture"); - }else -{RDebugUtils.currentLine=18022404; - //BA.debugLineNum = 18022404;BA.debugLine="Else If modes.IndexOf(\"continuous-video\") > -1"; -if (_modes.IndexOf((Object)("continuous-video"))>-1) { -RDebugUtils.currentLine=18022405; - //BA.debugLineNum = 18022405;BA.debugLine="SetFocusMode(\"continuous-video\")"; -__ref._setfocusmode /*String*/ (null,"continuous-video"); + //BA.debugLineNum = 281;BA.debugLine="SetFocusMode(\"continuous-picture\")"; +_setfocusmode("continuous-picture"); + }else if(_modes.IndexOf((Object)("continuous-video"))>-1) { + //BA.debugLineNum = 283;BA.debugLine="SetFocusMode(\"continuous-video\")"; +_setfocusmode("continuous-video"); }else { -RDebugUtils.currentLine=18022407; - //BA.debugLineNum = 18022407;BA.debugLine="Log(\"Continuous focus mode is not availabl"; -__c.LogImpl("318022407","Continuous focus mode is not available",0); - }} -; -RDebugUtils.currentLine=18022409; - //BA.debugLineNum = 18022409;BA.debugLine="End Sub"; + //BA.debugLineNum = 285;BA.debugLine="Log(\"Continuous focus mode is not availabl"; +__c.LogImpl("362128135","Continuous focus mode is not available",0); + }; + //BA.debugLineNum = 287;BA.debugLine="End Sub"; return ""; } -public String _setfocusmode(keymon.lat.medicomed.cameraexclass2 __ref,String _mode) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "setfocusmode", false)) - {return ((String) Debug.delegate(ba, "setfocusmode", new Object[] {_mode}));} -RDebugUtils.currentLine=18087936; - //BA.debugLineNum = 18087936;BA.debugLine="Public Sub SetFocusMode(Mode As String)"; -RDebugUtils.currentLine=18087937; - //BA.debugLineNum = 18087937;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=18087938; - //BA.debugLineNum = 18087938;BA.debugLine="r.RunMethod2(\"setFocusMode\", Mode, \"java.lang."; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod2("setFocusMode",_mode,"java.lang.String"); -RDebugUtils.currentLine=18087939; - //BA.debugLineNum = 18087939;BA.debugLine="End Sub"; +public String _setdisplayorientation() throws Exception{ +int _previewresult = 0; +int _result = 0; +int _degrees = 0; +keymon.lat.medicomed.main._camerainfoandid _ci = null; +int _orientation = 0; + //BA.debugLineNum = 58;BA.debugLine="Private Sub SetDisplayOrientation"; + //BA.debugLineNum = 59;BA.debugLine="r.target = r.GetActivity"; +_r.Target = (Object)(_r.GetActivity(ba)); + //BA.debugLineNum = 60;BA.debugLine="r.target = r.RunMethod(\"getWindowManager\")"; +_r.Target = _r.RunMethod("getWindowManager"); + //BA.debugLineNum = 61;BA.debugLine="r.target = r.RunMethod(\"getDefaultDisplay\")"; +_r.Target = _r.RunMethod("getDefaultDisplay"); + //BA.debugLineNum = 62;BA.debugLine="r.target = r.RunMethod(\"getRotation\")"; +_r.Target = _r.RunMethod("getRotation"); + //BA.debugLineNum = 63;BA.debugLine="Dim previewResult, result, degrees As Int = r.tar"; +_previewresult = 0; +_result = 0; +_degrees = (int) ((double)(BA.ObjectToNumber(_r.Target))*90); + //BA.debugLineNum = 64;BA.debugLine="Dim ci As CameraInfoAndId = FindCamera(Front)"; +_ci = _findcamera(_front); + //BA.debugLineNum = 65;BA.debugLine="r.target = ci.CameraInfo"; +_r.Target = _ci.CameraInfo /*Object*/ ; + //BA.debugLineNum = 66;BA.debugLine="Dim orientation As Int = r.GetField(\"orientation\""; +_orientation = (int)(BA.ObjectToNumber(_r.GetField("orientation"))); + //BA.debugLineNum = 67;BA.debugLine="If Front Then"; +if (_front) { + //BA.debugLineNum = 68;BA.debugLine="previewResult = (orientation + degrees) Mod 360"; +_previewresult = (int) ((_orientation+_degrees)%360); + //BA.debugLineNum = 69;BA.debugLine="result = previewResult"; +_result = _previewresult; + //BA.debugLineNum = 70;BA.debugLine="previewResult = (360 - previewResult) Mod 360"; +_previewresult = (int) ((360-_previewresult)%360); + }else { + //BA.debugLineNum = 72;BA.debugLine="previewResult = (orientation - degrees + 360) Mo"; +_previewresult = (int) ((_orientation-_degrees+360)%360); + //BA.debugLineNum = 73;BA.debugLine="result = previewResult"; +_result = _previewresult; + //BA.debugLineNum = 74;BA.debugLine="Log(previewResult)"; +__c.LogImpl("360227600",BA.NumberToString(_previewresult),0); + }; + //BA.debugLineNum = 76;BA.debugLine="r.target = nativeCam"; +_r.Target = _nativecam; + //BA.debugLineNum = 77;BA.debugLine="r.RunMethod2(\"setDisplayOrientation\", previewResu"; +_r.RunMethod2("setDisplayOrientation",BA.NumberToString(_previewresult),"java.lang.int"); + //BA.debugLineNum = 78;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 79;BA.debugLine="r.RunMethod2(\"setRotation\", result, \"java.lang.in"; +_r.RunMethod2("setRotation",BA.NumberToString(_result),"java.lang.int"); + //BA.debugLineNum = 80;BA.debugLine="CommitParameters"; +_commitparameters(); + //BA.debugLineNum = 81;BA.debugLine="End Sub"; return ""; } -public String _setexposurecompensation(keymon.lat.medicomed.cameraexclass2 __ref,int _v) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "setexposurecompensation", false)) - {return ((String) Debug.delegate(ba, "setexposurecompensation", new Object[] {_v}));} -RDebugUtils.currentLine=18808832; - //BA.debugLineNum = 18808832;BA.debugLine="Public Sub setExposureCompensation(v As Int)"; -RDebugUtils.currentLine=18808833; - //BA.debugLineNum = 18808833;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=18808834; - //BA.debugLineNum = 18808834;BA.debugLine="r.RunMethod2(\"setExposureCompensation\", v, \"java."; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod2("setExposureCompensation",BA.NumberToString(_v),"java.lang.int"); -RDebugUtils.currentLine=18808835; - //BA.debugLineNum = 18808835;BA.debugLine="End Sub"; +public String _setexposurecompensation(int _v) throws Exception{ + //BA.debugLineNum = 351;BA.debugLine="Public Sub setExposureCompensation(v As Int)"; + //BA.debugLineNum = 352;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 353;BA.debugLine="r.RunMethod2(\"setExposureCompensation\", v, \"java."; +_r.RunMethod2("setExposureCompensation",BA.NumberToString(_v),"java.lang.int"); + //BA.debugLineNum = 354;BA.debugLine="End Sub"; return ""; } -public String _setfacedetectionlistener(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "setfacedetectionlistener", false)) - {return ((String) Debug.delegate(ba, "setfacedetectionlistener", null));} +public String _setfacedetectionlistener() throws Exception{ anywheresoftware.b4j.object.JavaObject _jo = null; Object _e = null; -RDebugUtils.currentLine=19005440; - //BA.debugLineNum = 19005440;BA.debugLine="Public Sub SetFaceDetectionListener"; -RDebugUtils.currentLine=19005441; - //BA.debugLineNum = 19005441;BA.debugLine="Dim jo As JavaObject = nativeCam"; + //BA.debugLineNum = 366;BA.debugLine="Public Sub SetFaceDetectionListener"; + //BA.debugLineNum = 367;BA.debugLine="Dim jo As JavaObject = nativeCam"; _jo = new anywheresoftware.b4j.object.JavaObject(); -_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(__ref._nativecam /*Object*/ )); -RDebugUtils.currentLine=19005442; - //BA.debugLineNum = 19005442;BA.debugLine="Dim e As Object = jo.CreateEvent(\"android.hardwar"; +_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_nativecam)); + //BA.debugLineNum = 368;BA.debugLine="Dim e As Object = jo.CreateEvent(\"android.hardwar"; _e = _jo.CreateEvent(ba,"android.hardware.Camera.FaceDetectionListener","FaceDetection",__c.Null); -RDebugUtils.currentLine=19005443; - //BA.debugLineNum = 19005443;BA.debugLine="jo.RunMethod(\"setFaceDetectionListener\", Array(e)"; + //BA.debugLineNum = 369;BA.debugLine="jo.RunMethod(\"setFaceDetectionListener\", Array(e)"; _jo.RunMethod("setFaceDetectionListener",new Object[]{_e}); -RDebugUtils.currentLine=19005444; - //BA.debugLineNum = 19005444;BA.debugLine="End Sub"; + //BA.debugLineNum = 370;BA.debugLine="End Sub"; return ""; } -public String _setflashmode(keymon.lat.medicomed.cameraexclass2 __ref,String _mode) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "setflashmode", false)) - {return ((String) Debug.delegate(ba, "setflashmode", new Object[] {_mode}));} -RDebugUtils.currentLine=17301504; - //BA.debugLineNum = 17301504;BA.debugLine="Public Sub SetFlashMode(Mode As String)"; -RDebugUtils.currentLine=17301505; - //BA.debugLineNum = 17301505;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=17301506; - //BA.debugLineNum = 17301506;BA.debugLine="r.RunMethod2(\"setFlashMode\", Mode, \"java.lang.Str"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod2("setFlashMode",_mode,"java.lang.String"); -RDebugUtils.currentLine=17301507; - //BA.debugLineNum = 17301507;BA.debugLine="End Sub"; +public String _setflashmode(String _mode) throws Exception{ + //BA.debugLineNum = 195;BA.debugLine="Public Sub SetFlashMode(Mode As String)"; + //BA.debugLineNum = 196;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 197;BA.debugLine="r.RunMethod2(\"setFlashMode\", Mode, \"java.lang.Str"; +_r.RunMethod2("setFlashMode",_mode,"java.lang.String"); + //BA.debugLineNum = 198;BA.debugLine="End Sub"; return ""; } -public String _setjpegquality(keymon.lat.medicomed.cameraexclass2 __ref,int _quality) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "setjpegquality", false)) - {return ((String) Debug.delegate(ba, "setjpegquality", new Object[] {_quality}));} -RDebugUtils.currentLine=17235968; - //BA.debugLineNum = 17235968;BA.debugLine="Public Sub SetJpegQuality(Quality As Int)"; -RDebugUtils.currentLine=17235969; - //BA.debugLineNum = 17235969;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=17235970; - //BA.debugLineNum = 17235970;BA.debugLine="r.RunMethod2(\"setJpegQuality\", Quality, \"java.lan"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod2("setJpegQuality",BA.NumberToString(_quality),"java.lang.int"); -RDebugUtils.currentLine=17235971; - //BA.debugLineNum = 17235971;BA.debugLine="End Sub"; +public String _setfocusmode(String _mode) throws Exception{ + //BA.debugLineNum = 289;BA.debugLine="Public Sub SetFocusMode(Mode As String)"; + //BA.debugLineNum = 290;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 291;BA.debugLine="r.RunMethod2(\"setFocusMode\", Mode, \"java.lang."; +_r.RunMethod2("setFocusMode",_mode,"java.lang.String"); + //BA.debugLineNum = 292;BA.debugLine="End Sub"; return ""; } -public String _setpicturesize(keymon.lat.medicomed.cameraexclass2 __ref,int _width,int _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "setpicturesize", false)) - {return ((String) Debug.delegate(ba, "setpicturesize", new Object[] {_width,_height}));} -RDebugUtils.currentLine=17170432; - //BA.debugLineNum = 17170432;BA.debugLine="Public Sub SetPictureSize(Width As Int, Height As"; -RDebugUtils.currentLine=17170433; - //BA.debugLineNum = 17170433;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=17170434; - //BA.debugLineNum = 17170434;BA.debugLine="r.RunMethod3(\"setPictureSize\", Width, \"java.lang."; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod3("setPictureSize",BA.NumberToString(_width),"java.lang.int",BA.NumberToString(_height),"java.lang.int"); -RDebugUtils.currentLine=17170435; - //BA.debugLineNum = 17170435;BA.debugLine="End Sub"; +public String _setjpegquality(int _quality) throws Exception{ + //BA.debugLineNum = 190;BA.debugLine="Public Sub SetJpegQuality(Quality As Int)"; + //BA.debugLineNum = 191;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 192;BA.debugLine="r.RunMethod2(\"setJpegQuality\", Quality, \"java.lan"; +_r.RunMethod2("setJpegQuality",BA.NumberToString(_quality),"java.lang.int"); + //BA.debugLineNum = 193;BA.debugLine="End Sub"; return ""; } -public String _setpreviewfpsrange(keymon.lat.medicomed.cameraexclass2 __ref,int _minvalue,int _maxvalue) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "setpreviewfpsrange", false)) - {return ((String) Debug.delegate(ba, "setpreviewfpsrange", new Object[] {_minvalue,_maxvalue}));} -RDebugUtils.currentLine=17694720; - //BA.debugLineNum = 17694720;BA.debugLine="Public Sub SetPreviewFpsRange(MinValue As Int, Max"; -RDebugUtils.currentLine=17694721; - //BA.debugLineNum = 17694721;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=17694722; - //BA.debugLineNum = 17694722;BA.debugLine="r.RunMethod4(\"setPreviewFpsRange\", Array As Objec"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod4("setPreviewFpsRange",new Object[]{(Object)(_minvalue),(Object)(_maxvalue)},new String[]{"java.lang.int","java.lang.int"}); -RDebugUtils.currentLine=17694724; - //BA.debugLineNum = 17694724;BA.debugLine="End Sub"; +public String _setparameter(String _key,String _value) throws Exception{ + //BA.debugLineNum = 129;BA.debugLine="Public Sub SetParameter(Key As String, Value As St"; + //BA.debugLineNum = 130;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 131;BA.debugLine="r.RunMethod3(\"set\", Key, \"java.lang.String\", Valu"; +_r.RunMethod3("set",_key,"java.lang.String",_value,"java.lang.String"); + //BA.debugLineNum = 132;BA.debugLine="End Sub"; return ""; } -public String _setpreviewsize(keymon.lat.medicomed.cameraexclass2 __ref,int _width,int _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "setpreviewsize", false)) - {return ((String) Debug.delegate(ba, "setpreviewsize", new Object[] {_width,_height}));} -RDebugUtils.currentLine=17039360; - //BA.debugLineNum = 17039360;BA.debugLine="Public Sub SetPreviewSize(Width As Int, Height As"; -RDebugUtils.currentLine=17039361; - //BA.debugLineNum = 17039361;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=17039362; - //BA.debugLineNum = 17039362;BA.debugLine="r.RunMethod3(\"setPreviewSize\", Width, \"java.lang."; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod3("setPreviewSize",BA.NumberToString(_width),"java.lang.int",BA.NumberToString(_height),"java.lang.int"); -RDebugUtils.currentLine=17039363; - //BA.debugLineNum = 17039363;BA.debugLine="End Sub"; +public String _setpicturesize(int _width,int _height) throws Exception{ + //BA.debugLineNum = 185;BA.debugLine="Public Sub SetPictureSize(Width As Int, Height As"; + //BA.debugLineNum = 186;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 187;BA.debugLine="r.RunMethod3(\"setPictureSize\", Width, \"java.lang."; +_r.RunMethod3("setPictureSize",BA.NumberToString(_width),"java.lang.int",BA.NumberToString(_height),"java.lang.int"); + //BA.debugLineNum = 188;BA.debugLine="End Sub"; return ""; } -public String _setzoom(keymon.lat.medicomed.cameraexclass2 __ref,int _zoomvalue) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "setzoom", false)) - {return ((String) Debug.delegate(ba, "setzoom", new Object[] {_zoomvalue}));} -RDebugUtils.currentLine=18677760; - //BA.debugLineNum = 18677760;BA.debugLine="Public Sub setZoom(ZoomValue As Int)"; -RDebugUtils.currentLine=18677761; - //BA.debugLineNum = 18677761;BA.debugLine="r.target = parameters"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .Target = __ref._parameters /*Object*/ ; -RDebugUtils.currentLine=18677762; - //BA.debugLineNum = 18677762;BA.debugLine="r.RunMethod2(\"setZoom\", ZoomValue, \"java.lang.in"; -__ref._r /*anywheresoftware.b4a.agraham.reflection.Reflection*/ .RunMethod2("setZoom",BA.NumberToString(_zoomvalue),"java.lang.int"); -RDebugUtils.currentLine=18677763; - //BA.debugLineNum = 18677763;BA.debugLine="End Sub"; +public String _setpreviewfpsrange(int _minvalue,int _maxvalue) throws Exception{ + //BA.debugLineNum = 227;BA.debugLine="Public Sub SetPreviewFpsRange(MinValue As Int, Max"; + //BA.debugLineNum = 228;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 229;BA.debugLine="r.RunMethod4(\"setPreviewFpsRange\", Array As Objec"; +_r.RunMethod4("setPreviewFpsRange",new Object[]{(Object)(_minvalue),(Object)(_maxvalue)},new String[]{"java.lang.int","java.lang.int"}); + //BA.debugLineNum = 231;BA.debugLine="End Sub"; return ""; } -public String _startfacedetection(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "startfacedetection", false)) - {return ((String) Debug.delegate(ba, "startfacedetection", null));} +public String _setpreviewsize(int _width,int _height) throws Exception{ + //BA.debugLineNum = 169;BA.debugLine="Public Sub SetPreviewSize(Width As Int, Height As"; + //BA.debugLineNum = 170;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 171;BA.debugLine="r.RunMethod3(\"setPreviewSize\", Width, \"java.lang."; +_r.RunMethod3("setPreviewSize",BA.NumberToString(_width),"java.lang.int",BA.NumberToString(_height),"java.lang.int"); + //BA.debugLineNum = 172;BA.debugLine="End Sub"; +return ""; +} +public String _setzoom(int _zoomvalue) throws Exception{ + //BA.debugLineNum = 341;BA.debugLine="Public Sub setZoom(ZoomValue As Int)"; + //BA.debugLineNum = 342;BA.debugLine="r.target = parameters"; +_r.Target = _parameters; + //BA.debugLineNum = 343;BA.debugLine="r.RunMethod2(\"setZoom\", ZoomValue, \"java.lang.in"; +_r.RunMethod2("setZoom",BA.NumberToString(_zoomvalue),"java.lang.int"); + //BA.debugLineNum = 344;BA.debugLine="End Sub"; +return ""; +} +public String _startfacedetection() throws Exception{ anywheresoftware.b4j.object.JavaObject _jo = null; -RDebugUtils.currentLine=19136512; - //BA.debugLineNum = 19136512;BA.debugLine="Public Sub StartFaceDetection"; -RDebugUtils.currentLine=19136513; - //BA.debugLineNum = 19136513;BA.debugLine="Dim jo As JavaObject = nativeCam"; + //BA.debugLineNum = 384;BA.debugLine="Public Sub StartFaceDetection"; + //BA.debugLineNum = 385;BA.debugLine="Dim jo As JavaObject = nativeCam"; _jo = new anywheresoftware.b4j.object.JavaObject(); -_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(__ref._nativecam /*Object*/ )); -RDebugUtils.currentLine=19136514; - //BA.debugLineNum = 19136514;BA.debugLine="jo.RunMethod(\"startFaceDetection\", Null)"; +_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_nativecam)); + //BA.debugLineNum = 386;BA.debugLine="jo.RunMethod(\"startFaceDetection\", Null)"; _jo.RunMethod("startFaceDetection",(Object[])(__c.Null)); -RDebugUtils.currentLine=19136515; - //BA.debugLineNum = 19136515;BA.debugLine="End Sub"; + //BA.debugLineNum = 387;BA.debugLine="End Sub"; return ""; } -public String _startpreview(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "startpreview", false)) - {return ((String) Debug.delegate(ba, "startpreview", null));} -RDebugUtils.currentLine=16384000; - //BA.debugLineNum = 16384000;BA.debugLine="Public Sub StartPreview"; -RDebugUtils.currentLine=16384001; - //BA.debugLineNum = 16384001;BA.debugLine="cam.StartPreview"; -__ref._cam /*anywheresoftware.b4a.objects.CameraW*/ .StartPreview(); -RDebugUtils.currentLine=16384002; - //BA.debugLineNum = 16384002;BA.debugLine="End Sub"; +public String _startpreview() throws Exception{ + //BA.debugLineNum = 110;BA.debugLine="Public Sub StartPreview"; + //BA.debugLineNum = 111;BA.debugLine="cam.StartPreview"; +_cam.StartPreview(); + //BA.debugLineNum = 112;BA.debugLine="End Sub"; return ""; } -public String _stopfacedetection(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "stopfacedetection", false)) - {return ((String) Debug.delegate(ba, "stopfacedetection", null));} +public String _stopfacedetection() throws Exception{ anywheresoftware.b4j.object.JavaObject _jo = null; -RDebugUtils.currentLine=19202048; - //BA.debugLineNum = 19202048;BA.debugLine="Public Sub StopFaceDetection"; -RDebugUtils.currentLine=19202049; - //BA.debugLineNum = 19202049;BA.debugLine="Dim jo As JavaObject = nativeCam"; + //BA.debugLineNum = 389;BA.debugLine="Public Sub StopFaceDetection"; + //BA.debugLineNum = 390;BA.debugLine="Dim jo As JavaObject = nativeCam"; _jo = new anywheresoftware.b4j.object.JavaObject(); -_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(__ref._nativecam /*Object*/ )); -RDebugUtils.currentLine=19202050; - //BA.debugLineNum = 19202050;BA.debugLine="jo.RunMethod(\"stopFaceDetection\", Null)"; +_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_nativecam)); + //BA.debugLineNum = 391;BA.debugLine="jo.RunMethod(\"stopFaceDetection\", Null)"; _jo.RunMethod("stopFaceDetection",(Object[])(__c.Null)); -RDebugUtils.currentLine=19202051; - //BA.debugLineNum = 19202051;BA.debugLine="End Sub"; + //BA.debugLineNum = 392;BA.debugLine="End Sub"; return ""; } -public String _stoppreview(keymon.lat.medicomed.cameraexclass2 __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cameraexclass2"; -if (Debug.shouldDelegate(ba, "stoppreview", false)) - {return ((String) Debug.delegate(ba, "stoppreview", null));} -RDebugUtils.currentLine=16449536; - //BA.debugLineNum = 16449536;BA.debugLine="Public Sub StopPreview"; -RDebugUtils.currentLine=16449537; - //BA.debugLineNum = 16449537;BA.debugLine="cam.StopPreview"; -__ref._cam /*anywheresoftware.b4a.objects.CameraW*/ .StopPreview(); -RDebugUtils.currentLine=16449538; - //BA.debugLineNum = 16449538;BA.debugLine="End Sub"; +public String _stoppreview() throws Exception{ + //BA.debugLineNum = 114;BA.debugLine="Public Sub StopPreview"; + //BA.debugLineNum = 115;BA.debugLine="cam.StopPreview"; +_cam.StopPreview(); + //BA.debugLineNum = 116;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +public String _takepicture() throws Exception{ + //BA.debugLineNum = 102;BA.debugLine="Public Sub TakePicture"; + //BA.debugLineNum = 103;BA.debugLine="cam.TakePicture"; +_cam.TakePicture(); + //BA.debugLineNum = 104;BA.debugLine="End Sub"; +return ""; +} +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/cl_appupdate.java b/B4A/Objects/src/keymon/lat/medicomed/cl_appupdate.java index 2b5ed24..88d3ddd 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/cl_appupdate.java +++ b/B4A/Objects/src/keymon/lat/medicomed/cl_appupdate.java @@ -10,7 +10,7 @@ public class cl_appupdate extends B4AClass.ImplB4AClass implements BA.SubDelegat private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.cl_appupdate"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.cl_appupdate"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class cl_appupdate extends B4AClass.ImplB4AClass implements BA.SubDelegat 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.keywords.Common __c = null; public int _err_nopkg = 0; public int _err_notxt = 0; public int _err_noapk = 0; @@ -79,213 +72,142 @@ 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 boolean _canrequestpackageinstalls(keymon.lat.medicomed.cl_appupdate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "canrequestpackageinstalls", true)) - {return ((Boolean) Debug.delegate(ba, "canrequestpackageinstalls", null));} +public boolean _canrequestpackageinstalls() throws Exception{ anywheresoftware.b4j.object.JavaObject _ctxt = null; anywheresoftware.b4j.object.JavaObject _packagemanager = null; -RDebugUtils.currentLine=32112640; - //BA.debugLineNum = 32112640;BA.debugLine="Public Sub CanRequestPackageInstalls As Boolean"; -RDebugUtils.currentLine=32112641; - //BA.debugLineNum = 32112641;BA.debugLine="Dim ctxt As JavaObject"; + //BA.debugLineNum = 448;BA.debugLine="Public Sub CanRequestPackageInstalls As Boolean"; + //BA.debugLineNum = 449;BA.debugLine="Dim ctxt As JavaObject"; _ctxt = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=32112642; - //BA.debugLineNum = 32112642;BA.debugLine="ctxt.InitializeContext"; + //BA.debugLineNum = 450;BA.debugLine="ctxt.InitializeContext"; _ctxt.InitializeContext(ba); -RDebugUtils.currentLine=32112643; - //BA.debugLineNum = 32112643;BA.debugLine="Dim PackageManager As JavaObject = ctxt.RunMethod"; + //BA.debugLineNum = 451;BA.debugLine="Dim PackageManager As JavaObject = ctxt.RunMethod"; _packagemanager = new anywheresoftware.b4j.object.JavaObject(); _packagemanager = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_ctxt.RunMethod("getPackageManager",(Object[])(__c.Null)))); -RDebugUtils.currentLine=32112644; - //BA.debugLineNum = 32112644;BA.debugLine="Return PackageManager.RunMethod(\"canRequestPackag"; + //BA.debugLineNum = 452;BA.debugLine="Return PackageManager.RunMethod(\"canRequestPackag"; if (true) return BA.ObjectToBoolean(_packagemanager.RunMethod("canRequestPackageInstalls",(Object[])(__c.Null))); -RDebugUtils.currentLine=32112645; - //BA.debugLineNum = 32112645;BA.debugLine="End Sub"; + //BA.debugLineNum = 453;BA.debugLine="End Sub"; return false; } -public boolean _checknonmarketappsenabled(keymon.lat.medicomed.cl_appupdate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "checknonmarketappsenabled", true)) - {return ((Boolean) Debug.delegate(ba, "checknonmarketappsenabled", null));} +public boolean _checknonmarketappsenabled() throws Exception{ anywheresoftware.b4j.object.JavaObject _context = null; anywheresoftware.b4j.object.JavaObject _resolver = null; anywheresoftware.b4j.object.JavaObject _global = null; -RDebugUtils.currentLine=32178176; - //BA.debugLineNum = 32178176;BA.debugLine="Public Sub CheckNonMarketAppsEnabled As Boolean"; -RDebugUtils.currentLine=32178177; - //BA.debugLineNum = 32178177;BA.debugLine="If phone.SdkVersion >= 26 Then Return True"; -if (__ref._phone /*anywheresoftware.b4a.phone.Phone*/ .getSdkVersion()>=26) { + //BA.debugLineNum = 471;BA.debugLine="Public Sub CheckNonMarketAppsEnabled As Boolean"; + //BA.debugLineNum = 472;BA.debugLine="If phone.SdkVersion >= 26 Then Return True"; +if (_phone.getSdkVersion()>=26) { if (true) return __c.True;}; -RDebugUtils.currentLine=32178178; - //BA.debugLineNum = 32178178;BA.debugLine="If phone.SdkVersion < 17 Or phone.SdkVersion >= 2"; -if (__ref._phone /*anywheresoftware.b4a.phone.Phone*/ .getSdkVersion()<17 || __ref._phone /*anywheresoftware.b4a.phone.Phone*/ .getSdkVersion()>=21) { -RDebugUtils.currentLine=32178179; - //BA.debugLineNum = 32178179;BA.debugLine="Return phone.GetSettings(\"install_non_market_app"; -if (true) return (__ref._phone /*anywheresoftware.b4a.phone.Phone*/ .GetSettings("install_non_market_apps")).equals("1"); + //BA.debugLineNum = 473;BA.debugLine="If phone.SdkVersion < 17 Or phone.SdkVersion >= 2"; +if (_phone.getSdkVersion()<17 || _phone.getSdkVersion()>=21) { + //BA.debugLineNum = 474;BA.debugLine="Return phone.GetSettings(\"install_non_market_app"; +if (true) return (_phone.GetSettings("install_non_market_apps")).equals("1"); }else { -RDebugUtils.currentLine=32178181; - //BA.debugLineNum = 32178181;BA.debugLine="Dim context As JavaObject"; + //BA.debugLineNum = 476;BA.debugLine="Dim context As JavaObject"; _context = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=32178182; - //BA.debugLineNum = 32178182;BA.debugLine="context.InitializeContext"; + //BA.debugLineNum = 477;BA.debugLine="context.InitializeContext"; _context.InitializeContext(ba); -RDebugUtils.currentLine=32178183; - //BA.debugLineNum = 32178183;BA.debugLine="Dim resolver As JavaObject = context.RunMethod(\""; + //BA.debugLineNum = 478;BA.debugLine="Dim resolver As JavaObject = context.RunMethod(\""; _resolver = new anywheresoftware.b4j.object.JavaObject(); _resolver = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_context.RunMethod("getContentResolver",(Object[])(__c.Null)))); -RDebugUtils.currentLine=32178184; - //BA.debugLineNum = 32178184;BA.debugLine="Dim global As JavaObject"; + //BA.debugLineNum = 479;BA.debugLine="Dim global As JavaObject"; _global = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=32178185; - //BA.debugLineNum = 32178185;BA.debugLine="global.InitializeStatic(\"android.provider.Settin"; + //BA.debugLineNum = 480;BA.debugLine="global.InitializeStatic(\"android.provider.Settin"; _global.InitializeStatic("android.provider.Settings.Global"); -RDebugUtils.currentLine=32178186; - //BA.debugLineNum = 32178186;BA.debugLine="Return global.RunMethod(\"getString\", Array(resol"; + //BA.debugLineNum = 481;BA.debugLine="Return global.RunMethod(\"getString\", Array(resol"; if (true) return (_global.RunMethod("getString",new Object[]{(Object)(_resolver.getObject()),(Object)("install_non_market_apps")})).equals((Object)("1")); }; -RDebugUtils.currentLine=32178188; - //BA.debugLineNum = 32178188;BA.debugLine="End Sub"; + //BA.debugLineNum = 483;BA.debugLine="End Sub"; return false; } -public String _class_globals(keymon.lat.medicomed.cl_appupdate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -RDebugUtils.currentLine=30212096; - //BA.debugLineNum = 30212096;BA.debugLine="Private Sub Class_Globals"; -RDebugUtils.currentLine=30212098; - //BA.debugLineNum = 30212098;BA.debugLine="Public ERR_NOPKG = -1 As Int 'missing package"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 6;BA.debugLine="Private Sub Class_Globals"; + //BA.debugLineNum = 8;BA.debugLine="Public ERR_NOPKG = -1 As Int 'missing package"; _err_nopkg = (int) (-1); -RDebugUtils.currentLine=30212099; - //BA.debugLineNum = 30212099;BA.debugLine="Public ERR_NOTXT = -2 As Int 'missing webserve"; + //BA.debugLineNum = 9;BA.debugLine="Public ERR_NOTXT = -2 As Int 'missing webserve"; _err_notxt = (int) (-2); -RDebugUtils.currentLine=30212100; - //BA.debugLineNum = 30212100;BA.debugLine="Public ERR_NOAPK = -3 As Int 'missing webserve"; + //BA.debugLineNum = 10;BA.debugLine="Public ERR_NOAPK = -3 As Int 'missing webserve"; _err_noapk = (int) (-3); -RDebugUtils.currentLine=30212101; - //BA.debugLineNum = 30212101;BA.debugLine="Public ERR_TXTROW = -4 As Int 'wrong row forma"; + //BA.debugLineNum = 11;BA.debugLine="Public ERR_TXTROW = -4 As Int 'wrong row forma"; _err_txtrow = (int) (-4); -RDebugUtils.currentLine=30212102; - //BA.debugLineNum = 30212102;BA.debugLine="Public ERR_HTML = -5 As Int 'website returned"; + //BA.debugLineNum = 12;BA.debugLine="Public ERR_HTML = -5 As Int 'website returned"; _err_html = (int) (-5); -RDebugUtils.currentLine=30212103; - //BA.debugLineNum = 30212103;BA.debugLine="Public ERR_NOSPACE = -6 As Int 'no enough spac"; + //BA.debugLineNum = 13;BA.debugLine="Public ERR_NOSPACE = -6 As Int 'no enough spac"; _err_nospace = (int) (-6); -RDebugUtils.currentLine=30212104; - //BA.debugLineNum = 30212104;BA.debugLine="Public ERR_NOPERM = -7 As Int 'no permissions"; + //BA.debugLineNum = 14;BA.debugLine="Public ERR_NOPERM = -7 As Int 'no permissions"; _err_noperm = (int) (-7); -RDebugUtils.currentLine=30212105; - //BA.debugLineNum = 30212105;BA.debugLine="Public ERR_DOWNLOAD = -8 As Int 'failed to dow"; + //BA.debugLineNum = 15;BA.debugLine="Public ERR_DOWNLOAD = -8 As Int 'failed to dow"; _err_download = (int) (-8); -RDebugUtils.currentLine=30212106; - //BA.debugLineNum = 30212106;BA.debugLine="Public ERR_HTTP = -100 As Int 'HttpUtils error"; + //BA.debugLineNum = 16;BA.debugLine="Public ERR_HTTP = -100 As Int 'HttpUtils error"; _err_http = (int) (-100); -RDebugUtils.currentLine=30212107; - //BA.debugLineNum = 30212107;BA.debugLine="Public OK_INIT = 0 As Int"; + //BA.debugLineNum = 17;BA.debugLine="Public OK_INIT = 0 As Int"; _ok_init = (int) (0); -RDebugUtils.currentLine=30212108; - //BA.debugLineNum = 30212108;BA.debugLine="Public OK_CURVER = 1 As Int 'curver has valid"; + //BA.debugLineNum = 18;BA.debugLine="Public OK_CURVER = 1 As Int 'curver has valid"; _ok_curver = (int) (1); -RDebugUtils.currentLine=30212109; - //BA.debugLineNum = 30212109;BA.debugLine="Public OK_WEBVER = 2 As Int"; + //BA.debugLineNum = 19;BA.debugLine="Public OK_WEBVER = 2 As Int"; _ok_webver = (int) (2); -RDebugUtils.currentLine=30212110; - //BA.debugLineNum = 30212110;BA.debugLine="Public NO_NEWERAPK = 3 As Int 'apk version on"; + //BA.debugLineNum = 20;BA.debugLine="Public NO_NEWERAPK = 3 As Int 'apk version on"; _no_newerapk = (int) (3); -RDebugUtils.currentLine=30212111; - //BA.debugLineNum = 30212111;BA.debugLine="Public OK_NEWERAPK = 4 As Int 'current apk has"; + //BA.debugLineNum = 21;BA.debugLine="Public OK_NEWERAPK = 4 As Int 'current apk has"; _ok_newerapk = (int) (4); -RDebugUtils.currentLine=30212112; - //BA.debugLineNum = 30212112;BA.debugLine="Public OK_DOWNLOAD = 5 As Int 'newer apk corre"; + //BA.debugLineNum = 22;BA.debugLine="Public OK_DOWNLOAD = 5 As Int 'newer apk corre"; _ok_download = (int) (5); -RDebugUtils.currentLine=30212113; - //BA.debugLineNum = 30212113;BA.debugLine="Public OK_INSTALL = 6 As Int 'user asked to in"; + //BA.debugLineNum = 23;BA.debugLine="Public OK_INSTALL = 6 As Int 'user asked to in"; _ok_install = (int) (6); -RDebugUtils.currentLine=30212116; - //BA.debugLineNum = 30212116;BA.debugLine="Private Callback As Object"; + //BA.debugLineNum = 26;BA.debugLine="Private Callback As Object"; _callback = new Object(); -RDebugUtils.currentLine=30212117; - //BA.debugLineNum = 30212117;BA.debugLine="Private Event As String"; + //BA.debugLineNum = 27;BA.debugLine="Private Event As String"; _event = ""; -RDebugUtils.currentLine=30212118; - //BA.debugLineNum = 30212118;BA.debugLine="Private sPackageName As String 'ex: com.te"; + //BA.debugLineNum = 28;BA.debugLine="Private sPackageName As String 'ex: com.te"; _spackagename = ""; -RDebugUtils.currentLine=30212119; - //BA.debugLineNum = 30212119;BA.debugLine="Private sNewVerTxt As String 'ex: http:/"; + //BA.debugLineNum = 29;BA.debugLine="Private sNewVerTxt As String 'ex: http:/"; _snewvertxt = ""; -RDebugUtils.currentLine=30212120; - //BA.debugLineNum = 30212120;BA.debugLine="Private sNewVerApk As String 'ex: http:/"; + //BA.debugLineNum = 30;BA.debugLine="Private sNewVerApk As String 'ex: http:/"; _snewverapk = ""; -RDebugUtils.currentLine=30212121; - //BA.debugLineNum = 30212121;BA.debugLine="Private sStatusCode As Int 'negatives"; + //BA.debugLineNum = 31;BA.debugLine="Private sStatusCode As Int 'negatives"; _sstatuscode = 0; -RDebugUtils.currentLine=30212122; - //BA.debugLineNum = 30212122;BA.debugLine="Private sUserName As String 'user name"; + //BA.debugLineNum = 32;BA.debugLine="Private sUserName As String 'user name"; _susername = ""; -RDebugUtils.currentLine=30212123; - //BA.debugLineNum = 30212123;BA.debugLine="Private sUPassword As String 'password r"; + //BA.debugLineNum = 33;BA.debugLine="Private sUPassword As String 'password r"; _supassword = ""; -RDebugUtils.currentLine=30212124; - //BA.debugLineNum = 30212124;BA.debugLine="Private curver, webver As String 'curver = c"; + //BA.debugLineNum = 34;BA.debugLine="Private curver, webver As String 'curver = c"; _curver = ""; _webver = ""; -RDebugUtils.currentLine=30212125; - //BA.debugLineNum = 30212125;BA.debugLine="Private webclog As String 'webclog = optional"; + //BA.debugLineNum = 35;BA.debugLine="Private webclog As String 'webclog = optional"; _webclog = ""; -RDebugUtils.currentLine=30212126; - //BA.debugLineNum = 30212126;BA.debugLine="Private webfsize As String 'webfsize = option"; + //BA.debugLineNum = 36;BA.debugLine="Private webfsize As String 'webfsize = option"; _webfsize = ""; -RDebugUtils.currentLine=30212127; - //BA.debugLineNum = 30212127;BA.debugLine="Private sVerbose As Boolean 'TRUE = a lot of"; + //BA.debugLineNum = 37;BA.debugLine="Private sVerbose As Boolean 'TRUE = a lot of"; _sverbose = false; -RDebugUtils.currentLine=30212128; - //BA.debugLineNum = 30212128;BA.debugLine="Private pnlSplash As Panel 'panel used to sup"; + //BA.debugLineNum = 38;BA.debugLine="Private pnlSplash As Panel 'panel used to sup"; _pnlsplash = new anywheresoftware.b4a.objects.PanelWrapper(); -RDebugUtils.currentLine=30212129; - //BA.debugLineNum = 30212129;BA.debugLine="Private SplashShowing As Boolean 'True = splash"; + //BA.debugLineNum = 39;BA.debugLine="Private SplashShowing As Boolean 'True = splash"; _splashshowing = false; -RDebugUtils.currentLine=30212130; - //BA.debugLineNum = 30212130;BA.debugLine="Private phone As Phone"; + //BA.debugLineNum = 40;BA.debugLine="Private phone As Phone"; _phone = new anywheresoftware.b4a.phone.Phone(); -RDebugUtils.currentLine=30212131; - //BA.debugLineNum = 30212131;BA.debugLine="Private rp As RuntimePermissions"; + //BA.debugLineNum = 41;BA.debugLine="Private rp As RuntimePermissions"; _rp = new anywheresoftware.b4a.objects.RuntimePermissions(); -RDebugUtils.currentLine=30212132; - //BA.debugLineNum = 30212132;BA.debugLine="Private SharedFolder As String 'Foder where to"; + //BA.debugLineNum = 42;BA.debugLine="Private SharedFolder As String 'Foder where to"; _sharedfolder = ""; -RDebugUtils.currentLine=30212133; - //BA.debugLineNum = 30212133;BA.debugLine="Private UseFileProvider As Boolean 'TRUE = SDK"; + //BA.debugLineNum = 43;BA.debugLine="Private UseFileProvider As Boolean 'TRUE = SDK"; _usefileprovider = false; -RDebugUtils.currentLine=30212134; - //BA.debugLineNum = 30212134;BA.debugLine="Private LogColor1 As Int = 0xFFFF8C00 'first col"; + //BA.debugLineNum = 44;BA.debugLine="Private LogColor1 As Int = 0xFFFF8C00 'first col"; _logcolor1 = ((int)0xffff8c00); -RDebugUtils.currentLine=30212135; - //BA.debugLineNum = 30212135;BA.debugLine="End Sub"; + //BA.debugLineNum = 45;BA.debugLine="End Sub"; return ""; } -public void _downloadapk(keymon.lat.medicomed.cl_appupdate __ref) throws Exception{ -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "downloadapk", true)) - {Debug.delegate(ba, "downloadapk", null); return;} -ResumableSub_DownloadApk rsub = new ResumableSub_DownloadApk(this,__ref); +public void _downloadapk() throws Exception{ +ResumableSub_DownloadApk rsub = new ResumableSub_DownloadApk(this); rsub.resume(ba, null); } public static class ResumableSub_DownloadApk extends BA.ResumableSub { -public ResumableSub_DownloadApk(keymon.lat.medicomed.cl_appupdate parent,keymon.lat.medicomed.cl_appupdate __ref) { +public ResumableSub_DownloadApk(keymon.lat.medicomed.cl_appupdate parent) { this.parent = parent; -this.__ref = __ref; -this.__ref = parent; } -keymon.lat.medicomed.cl_appupdate __ref; keymon.lat.medicomed.cl_appupdate parent; keymon.lat.medicomed.httpjob _j = null; anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out = null; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="cl_appupdate"; while (true) { switch (state) { @@ -295,52 +217,46 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=31260673; - //BA.debugLineNum = 31260673;BA.debugLine="LogColor(\"---- AppUpdating.DownloadApk\", LogColor"; -parent.__c.LogImpl("931260673","---- AppUpdating.DownloadApk",__ref._logcolor1 /*int*/ ); -RDebugUtils.currentLine=31260675; - //BA.debugLineNum = 31260675;BA.debugLine="If sNewVerApk = \"\" Then"; + //BA.debugLineNum = 159;BA.debugLine="LogColor(\"---- AppUpdating.DownloadApk\", LogColor"; +parent.__c.LogImpl("92949121","---- AppUpdating.DownloadApk",parent._logcolor1); + //BA.debugLineNum = 161;BA.debugLine="If sNewVerApk = \"\" Then"; if (true) break; case 1: //if this.state = 10; -if ((__ref._snewverapk /*String*/ ).equals("")) { +if ((parent._snewverapk).equals("")) { this.state = 3; }if (true) break; case 3: //C this.state = 4; -RDebugUtils.currentLine=31260676; - //BA.debugLineNum = 31260676;BA.debugLine="sStatusCode = ERR_NOAPK"; -__ref._sstatuscode /*int*/ = __ref._err_noapk /*int*/ ; -RDebugUtils.currentLine=31260677; - //BA.debugLineNum = 31260677;BA.debugLine="If sVerbose Then Log($\"${TAB}missing apk file fu"; + //BA.debugLineNum = 162;BA.debugLine="sStatusCode = ERR_NOAPK"; +parent._sstatuscode = parent._err_noapk; + //BA.debugLineNum = 163;BA.debugLine="If sVerbose Then Log($\"${TAB}missing apk file fu"; if (true) break; case 4: //if this.state = 9; -if (__ref._sverbose /*boolean*/ ) { +if (parent._sverbose) { this.state = 6; ;}if (true) break; case 6: //C this.state = 9; -parent.__c.LogImpl("931260677",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"missing apk file full path indication"),0); +parent.__c.LogImpl("92949125",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"missing apk file full path indication"),0); if (true) break; case 9: //C this.state = 10; ; -RDebugUtils.currentLine=31260678; - //BA.debugLineNum = 31260678;BA.debugLine="Finito"; -__ref._finito /*String*/ (null); -RDebugUtils.currentLine=31260679; - //BA.debugLineNum = 31260679;BA.debugLine="Return"; + //BA.debugLineNum = 164;BA.debugLine="Finito"; +parent._finito(); + //BA.debugLineNum = 165;BA.debugLine="Return"; if (true) return ; if (true) break; @@ -348,36 +264,28 @@ case 10: //C this.state = 11; ; -RDebugUtils.currentLine=31260682; - //BA.debugLineNum = 31260682;BA.debugLine="Dim j As HttpJob"; + //BA.debugLineNum = 168;BA.debugLine="Dim j As HttpJob"; _j = new keymon.lat.medicomed.httpjob(); -RDebugUtils.currentLine=31260683; - //BA.debugLineNum = 31260683;BA.debugLine="j.Initialize(\"\", Me)"; -_j._initialize /*String*/ (null,ba,"",parent); -RDebugUtils.currentLine=31260684; - //BA.debugLineNum = 31260684;BA.debugLine="j.Username = sUserName"; -_j._username /*String*/ = __ref._susername /*String*/ ; -RDebugUtils.currentLine=31260685; - //BA.debugLineNum = 31260685;BA.debugLine="j.Password = sUPassword"; -_j._password /*String*/ = __ref._supassword /*String*/ ; -RDebugUtils.currentLine=31260686; - //BA.debugLineNum = 31260686;BA.debugLine="j.Download(sNewVerApk) 'ex: j.Download(\"htt"; -_j._download /*String*/ (null,__ref._snewverapk /*String*/ ); -RDebugUtils.currentLine=31260687; - //BA.debugLineNum = 31260687;BA.debugLine="Wait For (j) JobDone(j As HttpJob)"; -parent.__c.WaitFor("jobdone", ba, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "cl_appupdate", "downloadapk"), (Object)(_j)); + //BA.debugLineNum = 169;BA.debugLine="j.Initialize(\"\", Me)"; +_j._initialize /*String*/ (ba,"",parent); + //BA.debugLineNum = 170;BA.debugLine="j.Username = sUserName"; +_j._username /*String*/ = parent._susername; + //BA.debugLineNum = 171;BA.debugLine="j.Password = sUPassword"; +_j._password /*String*/ = parent._supassword; + //BA.debugLineNum = 172;BA.debugLine="j.Download(sNewVerApk) 'ex: j.Download(\"htt"; +_j._download /*String*/ (parent._snewverapk); + //BA.debugLineNum = 173;BA.debugLine="Wait For (j) JobDone(j As HttpJob)"; +parent.__c.WaitFor("jobdone", ba, this, (Object)(_j)); this.state = 29; return; case 29: //C this.state = 11; -_j = (keymon.lat.medicomed.httpjob) result[1]; +_j = (keymon.lat.medicomed.httpjob) result[0]; ; -RDebugUtils.currentLine=31260688; - //BA.debugLineNum = 31260688;BA.debugLine="Log($\"Donload ok? ${j.Success}\"$)"; -parent.__c.LogImpl("931260688",("Donload ok? "+parent.__c.SmartStringFormatter("",(Object)(_j._success /*boolean*/ ))+""),0); -RDebugUtils.currentLine=31260689; - //BA.debugLineNum = 31260689;BA.debugLine="If j.Success Then"; + //BA.debugLineNum = 174;BA.debugLine="Log($\"Donload ok? ${j.Success}\"$)"; +parent.__c.LogImpl("92949136",("Donload ok? "+parent.__c.SmartStringFormatter("",(Object)(_j._success /*boolean*/ ))+""),0); + //BA.debugLineNum = 175;BA.debugLine="If j.Success Then"; if (true) break; case 11: @@ -392,39 +300,32 @@ this.state = 21; case 13: //C this.state = 14; -RDebugUtils.currentLine=31260691; - //BA.debugLineNum = 31260691;BA.debugLine="Dim out As OutputStream"; + //BA.debugLineNum = 177;BA.debugLine="Dim out As OutputStream"; _out = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); -RDebugUtils.currentLine=31260692; - //BA.debugLineNum = 31260692;BA.debugLine="out = File.OpenOutput(SharedFolder,\"tmp.apk\",Fal"; -_out = parent.__c.File.OpenOutput(__ref._sharedfolder /*String*/ ,"tmp.apk",parent.__c.False); -RDebugUtils.currentLine=31260693; - //BA.debugLineNum = 31260693;BA.debugLine="File.Copy2(J.GetInputStream, out)"; -parent.__c.File.Copy2((java.io.InputStream)(_j._getinputstream /*anywheresoftware.b4a.objects.streams.File.InputStreamWrapper*/ (null).getObject()),(java.io.OutputStream)(_out.getObject())); -RDebugUtils.currentLine=31260694; - //BA.debugLineNum = 31260694;BA.debugLine="out.Close"; + //BA.debugLineNum = 178;BA.debugLine="out = File.OpenOutput(SharedFolder,\"tmp.apk\",Fal"; +_out = parent.__c.File.OpenOutput(parent._sharedfolder,"tmp.apk",parent.__c.False); + //BA.debugLineNum = 179;BA.debugLine="File.Copy2(J.GetInputStream, out)"; +parent.__c.File.Copy2((java.io.InputStream)(_j._getinputstream /*anywheresoftware.b4a.objects.streams.File.InputStreamWrapper*/ ().getObject()),(java.io.OutputStream)(_out.getObject())); + //BA.debugLineNum = 180;BA.debugLine="out.Close"; _out.Close(); -RDebugUtils.currentLine=31260695; - //BA.debugLineNum = 31260695;BA.debugLine="Log($\"Copy2 (saving) ok? TRUE\"$)"; -parent.__c.LogImpl("931260695",("Copy2 (saving) ok? TRUE"),0); -RDebugUtils.currentLine=31260696; - //BA.debugLineNum = 31260696;BA.debugLine="sStatusCode = OK_DOWNLOAD"; -__ref._sstatuscode /*int*/ = __ref._ok_download /*int*/ ; -RDebugUtils.currentLine=31260697; - //BA.debugLineNum = 31260697;BA.debugLine="If sVerbose Then Log($\"${TAB}new apk version dow"; + //BA.debugLineNum = 181;BA.debugLine="Log($\"Copy2 (saving) ok? TRUE\"$)"; +parent.__c.LogImpl("92949143",("Copy2 (saving) ok? TRUE"),0); + //BA.debugLineNum = 182;BA.debugLine="sStatusCode = OK_DOWNLOAD"; +parent._sstatuscode = parent._ok_download; + //BA.debugLineNum = 183;BA.debugLine="If sVerbose Then Log($\"${TAB}new apk version dow"; if (true) break; case 14: //if this.state = 19; -if (__ref._sverbose /*boolean*/ ) { +if (parent._sverbose) { this.state = 16; ;}if (true) break; case 16: //C this.state = 19; -parent.__c.LogImpl("931260697",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"new apk version downloaded and ready to install"),0); +parent.__c.LogImpl("92949145",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"new apk version downloaded and ready to install"),0); if (true) break; case 19: @@ -436,35 +337,31 @@ this.state = 28; case 21: //C this.state = 22; -RDebugUtils.currentLine=31260699; - //BA.debugLineNum = 31260699;BA.debugLine="Log($\"${TAB}Error: ${J.ErrorMessage}\"$)"; -parent.__c.LogImpl("931260699",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"Error: "+parent.__c.SmartStringFormatter("",(Object)(_j._errormessage /*String*/ ))+""),0); -RDebugUtils.currentLine=31260700; - //BA.debugLineNum = 31260700;BA.debugLine="sStatusCode = ERR_HTTP"; -__ref._sstatuscode /*int*/ = __ref._err_http /*int*/ ; -RDebugUtils.currentLine=31260701; - //BA.debugLineNum = 31260701;BA.debugLine="If sVerbose Then Log($\"${TAB}error in httputils2"; + //BA.debugLineNum = 185;BA.debugLine="Log($\"${TAB}Error: ${J.ErrorMessage}\"$)"; +parent.__c.LogImpl("92949147",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"Error: "+parent.__c.SmartStringFormatter("",(Object)(_j._errormessage /*String*/ ))+""),0); + //BA.debugLineNum = 186;BA.debugLine="sStatusCode = ERR_HTTP"; +parent._sstatuscode = parent._err_http; + //BA.debugLineNum = 187;BA.debugLine="If sVerbose Then Log($\"${TAB}error in httputils2"; if (true) break; case 22: //if this.state = 27; -if (__ref._sverbose /*boolean*/ ) { +if (parent._sverbose) { this.state = 24; ;}if (true) break; case 24: //C this.state = 27; -parent.__c.LogImpl("931260701",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"error in httputils2"),0); +parent.__c.LogImpl("92949149",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"error in httputils2"),0); if (true) break; case 27: //C this.state = 28; ; -RDebugUtils.currentLine=31260702; - //BA.debugLineNum = 31260702;BA.debugLine="ToastMessageShow(\"Error: \" & J.ErrorMessage, Tru"; + //BA.debugLineNum = 188;BA.debugLine="ToastMessageShow(\"Error: \" & J.ErrorMessage, Tru"; parent.__c.ToastMessageShow(BA.ObjectToCharSequence("Error: "+_j._errormessage /*String*/ ),parent.__c.True); if (true) break; @@ -472,648 +369,389 @@ case 28: //C this.state = -1; ; -RDebugUtils.currentLine=31260704; - //BA.debugLineNum = 31260704;BA.debugLine="j.Release"; -_j._release /*String*/ (null); -RDebugUtils.currentLine=31260705; - //BA.debugLineNum = 31260705;BA.debugLine="Finito"; -__ref._finito /*String*/ (null); -RDebugUtils.currentLine=31260706; - //BA.debugLineNum = 31260706;BA.debugLine="End Sub"; + //BA.debugLineNum = 190;BA.debugLine="j.Release"; +_j._release /*String*/ (); + //BA.debugLineNum = 191;BA.debugLine="Finito"; +parent._finito(); + //BA.debugLineNum = 192;BA.debugLine="End Sub"; if (true) break; } } } } -public String _finito(keymon.lat.medicomed.cl_appupdate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "finito", true)) - {return ((String) Debug.delegate(ba, "finito", null));} -RDebugUtils.currentLine=31522816; - //BA.debugLineNum = 31522816;BA.debugLine="Private Sub Finito"; -RDebugUtils.currentLine=31522817; - //BA.debugLineNum = 31522817;BA.debugLine="If SubExists(Callback,Event&\"_UpdateComplete\") Th"; -if (__c.SubExists(ba,__ref._callback /*Object*/ ,__ref._event /*String*/ +"_UpdateComplete")) { -RDebugUtils.currentLine=31522818; - //BA.debugLineNum = 31522818;BA.debugLine="CallSub(Callback,Event&\"_UpdateComplete\")"; -__c.CallSubNew(ba,__ref._callback /*Object*/ ,__ref._event /*String*/ +"_UpdateComplete"); - }; -RDebugUtils.currentLine=31522820; - //BA.debugLineNum = 31522820;BA.debugLine="End Sub"; -return ""; +public void _jobdone(keymon.lat.medicomed.httpjob _j) throws Exception{ } -public String _extractcl(keymon.lat.medicomed.cl_appupdate __ref,String _txtrow) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "extractcl", true)) - {return ((String) Debug.delegate(ba, "extractcl", new Object[] {_txtrow}));} +public String _extractcl(String _txtrow) throws Exception{ int _i = 0; int _j1 = 0; int _j2 = 0; -RDebugUtils.currentLine=31784960; - //BA.debugLineNum = 31784960;BA.debugLine="Private Sub ExtractCL(TxtRow As String) As String"; -RDebugUtils.currentLine=31784961; - //BA.debugLineNum = 31784961;BA.debugLine="Dim i As Int"; + //BA.debugLineNum = 381;BA.debugLine="Private Sub ExtractCL(TxtRow As String) As String"; + //BA.debugLineNum = 382;BA.debugLine="Dim i As Int"; _i = 0; -RDebugUtils.currentLine=31784962; - //BA.debugLineNum = 31784962;BA.debugLine="i = TxtRow.IndexOf(\"\")"; + //BA.debugLineNum = 383;BA.debugLine="i = TxtRow.IndexOf(\"\")"; _i = _txtrow.indexOf(""); -RDebugUtils.currentLine=31784963; - //BA.debugLineNum = 31784963;BA.debugLine="If i <> -1 Then"; + //BA.debugLineNum = 384;BA.debugLine="If i <> -1 Then"; if (_i!=-1) { -RDebugUtils.currentLine=31784964; - //BA.debugLineNum = 31784964;BA.debugLine="Dim j1 As Int = TxtRow.IndexOf(\"\")"; + //BA.debugLineNum = 385;BA.debugLine="Dim j1 As Int = TxtRow.IndexOf(\"\")"; _j1 = _txtrow.indexOf(""); -RDebugUtils.currentLine=31784965; - //BA.debugLineNum = 31784965;BA.debugLine="If j1 = -1 Then"; + //BA.debugLineNum = 386;BA.debugLine="If j1 = -1 Then"; if (_j1==-1) { -RDebugUtils.currentLine=31784966; - //BA.debugLineNum = 31784966;BA.debugLine="Dim j2 As Int = TxtRow.IndexOf(\"\") 'l"; + //BA.debugLineNum = 387;BA.debugLine="Dim j2 As Int = TxtRow.IndexOf(\"\") 'l"; _j2 = _txtrow.indexOf(""); -RDebugUtils.currentLine=31784967; - //BA.debugLineNum = 31784967;BA.debugLine="j1 = j2"; + //BA.debugLineNum = 388;BA.debugLine="j1 = j2"; _j1 = _j2; -RDebugUtils.currentLine=31784968; - //BA.debugLineNum = 31784968;BA.debugLine="If j1 < i Then j1 = -1"; + //BA.debugLineNum = 389;BA.debugLine="If j1 < i Then j1 = -1"; if (_j1<_i) { _j1 = (int) (-1);}; }; -RDebugUtils.currentLine=31784970; - //BA.debugLineNum = 31784970;BA.debugLine="If j1 <> -1 Then Return TxtRow.SubString2(i+11,j"; + //BA.debugLineNum = 391;BA.debugLine="If j1 <> -1 Then Return TxtRow.SubString2(i+11,j"; if (_j1!=-1) { if (true) return _txtrow.substring((int) (_i+11),_j1);} else { if (true) return _txtrow.substring((int) (_i+11));}; }else { -RDebugUtils.currentLine=31784972; - //BA.debugLineNum = 31784972;BA.debugLine="Return \"\""; + //BA.debugLineNum = 393;BA.debugLine="Return \"\""; if (true) return ""; }; -RDebugUtils.currentLine=31784974; - //BA.debugLineNum = 31784974;BA.debugLine="End Sub"; + //BA.debugLineNum = 395;BA.debugLine="End Sub"; return ""; } -public String _extractsz(keymon.lat.medicomed.cl_appupdate __ref,String _txtrow) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "extractsz", true)) - {return ((String) Debug.delegate(ba, "extractsz", new Object[] {_txtrow}));} +public String _extractsz(String _txtrow) throws Exception{ int _i = 0; int _j1 = 0; int _j2 = 0; String _s = ""; -RDebugUtils.currentLine=31850496; - //BA.debugLineNum = 31850496;BA.debugLine="Private Sub ExtractSZ(TxtRow As String) As String"; -RDebugUtils.currentLine=31850497; - //BA.debugLineNum = 31850497;BA.debugLine="Dim i As Int"; + //BA.debugLineNum = 399;BA.debugLine="Private Sub ExtractSZ(TxtRow As String) As String"; + //BA.debugLineNum = 400;BA.debugLine="Dim i As Int"; _i = 0; -RDebugUtils.currentLine=31850498; - //BA.debugLineNum = 31850498;BA.debugLine="i = TxtRow.IndexOf(\"\")"; + //BA.debugLineNum = 401;BA.debugLine="i = TxtRow.IndexOf(\"\")"; _i = _txtrow.indexOf(""); -RDebugUtils.currentLine=31850499; - //BA.debugLineNum = 31850499;BA.debugLine="If i <> -1 Then"; + //BA.debugLineNum = 402;BA.debugLine="If i <> -1 Then"; if (_i!=-1) { -RDebugUtils.currentLine=31850500; - //BA.debugLineNum = 31850500;BA.debugLine="Dim j1 As Int = TxtRow.IndexOf(\"\") '"; + //BA.debugLineNum = 403;BA.debugLine="Dim j1 As Int = TxtRow.IndexOf(\"\") '"; _j1 = _txtrow.indexOf(""); -RDebugUtils.currentLine=31850501; - //BA.debugLineNum = 31850501;BA.debugLine="If j1 = -1 Then"; + //BA.debugLineNum = 404;BA.debugLine="If j1 = -1 Then"; if (_j1==-1) { -RDebugUtils.currentLine=31850502; - //BA.debugLineNum = 31850502;BA.debugLine="Dim j2 As Int = TxtRow.IndexOf(\"\") '"; + //BA.debugLineNum = 405;BA.debugLine="Dim j2 As Int = TxtRow.IndexOf(\"\") '"; _j2 = _txtrow.indexOf(""); -RDebugUtils.currentLine=31850503; - //BA.debugLineNum = 31850503;BA.debugLine="j1 = j2"; + //BA.debugLineNum = 406;BA.debugLine="j1 = j2"; _j1 = _j2; -RDebugUtils.currentLine=31850504; - //BA.debugLineNum = 31850504;BA.debugLine="If j1 < i Then j1 = -1"; + //BA.debugLineNum = 407;BA.debugLine="If j1 < i Then j1 = -1"; if (_j1<_i) { _j1 = (int) (-1);}; }; -RDebugUtils.currentLine=31850506; - //BA.debugLineNum = 31850506;BA.debugLine="Dim s As String"; + //BA.debugLineNum = 409;BA.debugLine="Dim s As String"; _s = ""; -RDebugUtils.currentLine=31850507; - //BA.debugLineNum = 31850507;BA.debugLine="If j1 <> -1 Then s = TxtRow.SubString2(i+10,j1)"; + //BA.debugLineNum = 410;BA.debugLine="If j1 <> -1 Then s = TxtRow.SubString2(i+10,j1)"; if (_j1!=-1) { _s = _txtrow.substring((int) (_i+10),_j1);} else { _s = _txtrow.substring((int) (_i+10));}; -RDebugUtils.currentLine=31850508; - //BA.debugLineNum = 31850508;BA.debugLine="s = s.Replace(CRLF,\"\")"; + //BA.debugLineNum = 411;BA.debugLine="s = s.Replace(CRLF,\"\")"; _s = _s.replace(__c.CRLF,""); -RDebugUtils.currentLine=31850509; - //BA.debugLineNum = 31850509;BA.debugLine="s=s.Replace(Chr(13),\"\")"; + //BA.debugLineNum = 412;BA.debugLine="s=s.Replace(Chr(13),\"\")"; _s = _s.replace(BA.ObjectToString(__c.Chr((int) (13))),""); -RDebugUtils.currentLine=31850510; - //BA.debugLineNum = 31850510;BA.debugLine="Return s"; + //BA.debugLineNum = 413;BA.debugLine="Return s"; if (true) return _s; }else { -RDebugUtils.currentLine=31850512; - //BA.debugLineNum = 31850512;BA.debugLine="Return \"\""; + //BA.debugLineNum = 415;BA.debugLine="Return \"\""; if (true) return ""; }; -RDebugUtils.currentLine=31850514; - //BA.debugLineNum = 31850514;BA.debugLine="End Sub"; + //BA.debugLineNum = 417;BA.debugLine="End Sub"; return ""; } -public String _extractvn(keymon.lat.medicomed.cl_appupdate __ref,String _txtrow) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "extractvn", true)) - {return ((String) Debug.delegate(ba, "extractvn", new Object[] {_txtrow}));} +public String _extractvn(String _txtrow) throws Exception{ int _i = 0; int _j1 = 0; int _j2 = 0; int _j = 0; String _s = ""; -RDebugUtils.currentLine=31719424; - //BA.debugLineNum = 31719424;BA.debugLine="Private Sub ExtractVN(TxtRow As String) As String"; -RDebugUtils.currentLine=31719425; - //BA.debugLineNum = 31719425;BA.debugLine="Dim i As Int"; + //BA.debugLineNum = 360;BA.debugLine="Private Sub ExtractVN(TxtRow As String) As String"; + //BA.debugLineNum = 361;BA.debugLine="Dim i As Int"; _i = 0; -RDebugUtils.currentLine=31719426; - //BA.debugLineNum = 31719426;BA.debugLine="i = TxtRow.IndexOf(\"=\")"; + //BA.debugLineNum = 362;BA.debugLine="i = TxtRow.IndexOf(\"=\")"; _i = _txtrow.indexOf("="); -RDebugUtils.currentLine=31719427; - //BA.debugLineNum = 31719427;BA.debugLine="If i <> -1 Then"; + //BA.debugLineNum = 363;BA.debugLine="If i <> -1 Then"; if (_i!=-1) { -RDebugUtils.currentLine=31719428; - //BA.debugLineNum = 31719428;BA.debugLine="Dim j1 As Int = TxtRow.IndexOf(\"\") 'l"; + //BA.debugLineNum = 364;BA.debugLine="Dim j1 As Int = TxtRow.IndexOf(\"\") 'l"; _j1 = _txtrow.indexOf(""); -RDebugUtils.currentLine=31719429; - //BA.debugLineNum = 31719429;BA.debugLine="Dim j2 As Int = TxtRow.IndexOf(\"\") 'lo"; + //BA.debugLineNum = 365;BA.debugLine="Dim j2 As Int = TxtRow.IndexOf(\"\") 'lo"; _j2 = _txtrow.indexOf(""); -RDebugUtils.currentLine=31719430; - //BA.debugLineNum = 31719430;BA.debugLine="Dim j As Int = Min(j1, j2)"; + //BA.debugLineNum = 366;BA.debugLine="Dim j As Int = Min(j1, j2)"; _j = (int) (__c.Min(_j1,_j2)); -RDebugUtils.currentLine=31719431; - //BA.debugLineNum = 31719431;BA.debugLine="If j = -1 Then j = Max(j1,j2)"; + //BA.debugLineNum = 367;BA.debugLine="If j = -1 Then j = Max(j1,j2)"; if (_j==-1) { _j = (int) (__c.Max(_j1,_j2));}; -RDebugUtils.currentLine=31719432; - //BA.debugLineNum = 31719432;BA.debugLine="Dim s As String"; + //BA.debugLineNum = 368;BA.debugLine="Dim s As String"; _s = ""; -RDebugUtils.currentLine=31719433; - //BA.debugLineNum = 31719433;BA.debugLine="If j <> - 1 Then s=TxtRow.SubString2(i+1,j) Else"; + //BA.debugLineNum = 369;BA.debugLine="If j <> - 1 Then s=TxtRow.SubString2(i+1,j) Else"; if (_j!=-1) { _s = _txtrow.substring((int) (_i+1),_j);} else { _s = _txtrow.substring((int) (_i+1));}; -RDebugUtils.currentLine=31719434; - //BA.debugLineNum = 31719434;BA.debugLine="s=s.Replace(CRLF,\"\")"; + //BA.debugLineNum = 370;BA.debugLine="s=s.Replace(CRLF,\"\")"; _s = _s.replace(__c.CRLF,""); -RDebugUtils.currentLine=31719435; - //BA.debugLineNum = 31719435;BA.debugLine="s=s.Replace(Chr(13),\"\")"; + //BA.debugLineNum = 371;BA.debugLine="s=s.Replace(Chr(13),\"\")"; _s = _s.replace(BA.ObjectToString(__c.Chr((int) (13))),""); -RDebugUtils.currentLine=31719436; - //BA.debugLineNum = 31719436;BA.debugLine="Return s"; + //BA.debugLineNum = 372;BA.debugLine="Return s"; if (true) return _s; }else { -RDebugUtils.currentLine=31719438; - //BA.debugLineNum = 31719438;BA.debugLine="Return \"\""; + //BA.debugLineNum = 374;BA.debugLine="Return \"\""; if (true) return ""; }; -RDebugUtils.currentLine=31719440; - //BA.debugLineNum = 31719440;BA.debugLine="End Sub"; + //BA.debugLineNum = 376;BA.debugLine="End Sub"; return ""; } -public long _getavailablespace(keymon.lat.medicomed.cl_appupdate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "getavailablespace", true)) - {return ((Long) Debug.delegate(ba, "getavailablespace", null));} -RDebugUtils.currentLine=31064064; - //BA.debugLineNum = 31064064;BA.debugLine="Public Sub GetAvailableSpace As Long"; -RDebugUtils.currentLine=31064065; - //BA.debugLineNum = 31064065;BA.debugLine="Return GetFreeSpace"; -if (true) return __ref._getfreespace /*long*/ (null); -RDebugUtils.currentLine=31064066; - //BA.debugLineNum = 31064066;BA.debugLine="End Sub"; -return 0L; -} -public long _getfreespace(keymon.lat.medicomed.cl_appupdate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "getfreespace", true)) - {return ((Long) Debug.delegate(ba, "getfreespace", null));} -anywheresoftware.b4j.object.JavaObject _jo = null; -RDebugUtils.currentLine=31916032; - //BA.debugLineNum = 31916032;BA.debugLine="Private Sub GetFreeSpace As Long"; -RDebugUtils.currentLine=31916033; - //BA.debugLineNum = 31916033;BA.debugLine="Dim jo As JavaObject"; -_jo = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=31916034; - //BA.debugLineNum = 31916034;BA.debugLine="jo.InitializeNewInstance(\"java.io.File\", Array(Sh"; -_jo.InitializeNewInstance("java.io.File",new Object[]{(Object)(__ref._sharedfolder /*String*/ )}); -RDebugUtils.currentLine=31916035; - //BA.debugLineNum = 31916035;BA.debugLine="Return jo.RunMethod(\"getFreeSpace\", Null)"; -if (true) return BA.ObjectToLongNumber(_jo.RunMethod("getFreeSpace",(Object[])(__c.Null))); -RDebugUtils.currentLine=31916036; - //BA.debugLineNum = 31916036;BA.debugLine="End Sub"; -return 0L; -} -public String _getcurvn(keymon.lat.medicomed.cl_appupdate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "getcurvn", true)) - {return ((String) Debug.delegate(ba, "getcurvn", null));} -RDebugUtils.currentLine=30801920; - //BA.debugLineNum = 30801920;BA.debugLine="Public Sub getCurVN As String"; -RDebugUtils.currentLine=30801921; - //BA.debugLineNum = 30801921;BA.debugLine="Return curver"; -if (true) return __ref._curver /*String*/ ; -RDebugUtils.currentLine=30801922; - //BA.debugLineNum = 30801922;BA.debugLine="End Sub"; +public String _finito() throws Exception{ + //BA.debugLineNum = 290;BA.debugLine="Private Sub Finito"; + //BA.debugLineNum = 291;BA.debugLine="If SubExists(Callback,Event&\"_UpdateComplete\") Th"; +if (__c.SubExists(ba,_callback,_event+"_UpdateComplete")) { + //BA.debugLineNum = 292;BA.debugLine="CallSub(Callback,Event&\"_UpdateComplete\")"; +__c.CallSubNew(ba,_callback,_event+"_UpdateComplete"); + }; + //BA.debugLineNum = 294;BA.debugLine="End Sub"; return ""; } -public Object _getfileuri(keymon.lat.medicomed.cl_appupdate __ref,String _filename) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "getfileuri", true)) - {return ((Object) Debug.delegate(ba, "getfileuri", new Object[] {_filename}));} +public long _getavailablespace() throws Exception{ + //BA.debugLineNum = 137;BA.debugLine="Public Sub GetAvailableSpace As Long"; + //BA.debugLineNum = 138;BA.debugLine="Return GetFreeSpace"; +if (true) return _getfreespace(); + //BA.debugLineNum = 139;BA.debugLine="End Sub"; +return 0L; +} +public String _getcurvn() throws Exception{ + //BA.debugLineNum = 114;BA.debugLine="Public Sub getCurVN As String"; + //BA.debugLineNum = 115;BA.debugLine="Return curver"; +if (true) return _curver; + //BA.debugLineNum = 116;BA.debugLine="End Sub"; +return ""; +} +public Object _getfileuri(String _filename) throws Exception{ anywheresoftware.b4j.object.JavaObject _uri = null; anywheresoftware.b4j.object.JavaObject _f = null; anywheresoftware.b4j.object.JavaObject _fp = null; anywheresoftware.b4j.object.JavaObject _context = null; -RDebugUtils.currentLine=32309248; - //BA.debugLineNum = 32309248;BA.debugLine="Private Sub GetFileUri (FileName As String) As Obj"; -RDebugUtils.currentLine=32309249; - //BA.debugLineNum = 32309249;BA.debugLine="If UseFileProvider = False Then"; -if (__ref._usefileprovider /*boolean*/ ==__c.False) { -RDebugUtils.currentLine=32309250; - //BA.debugLineNum = 32309250;BA.debugLine="Dim uri As JavaObject"; + //BA.debugLineNum = 503;BA.debugLine="Private Sub GetFileUri (FileName As String) As Obj"; + //BA.debugLineNum = 504;BA.debugLine="If UseFileProvider = False Then"; +if (_usefileprovider==__c.False) { + //BA.debugLineNum = 505;BA.debugLine="Dim uri As JavaObject"; _uri = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=32309251; - //BA.debugLineNum = 32309251;BA.debugLine="Return uri.InitializeStatic(\"android.net.Uri\").R"; -if (true) return _uri.InitializeStatic("android.net.Uri").RunMethod("parse",new Object[]{(Object)("file://"+__c.File.Combine(__ref._sharedfolder /*String*/ ,_filename))}); + //BA.debugLineNum = 506;BA.debugLine="Return uri.InitializeStatic(\"android.net.Uri\").R"; +if (true) return _uri.InitializeStatic("android.net.Uri").RunMethod("parse",new Object[]{(Object)("file://"+__c.File.Combine(_sharedfolder,_filename))}); }else { -RDebugUtils.currentLine=32309253; - //BA.debugLineNum = 32309253;BA.debugLine="Dim f As JavaObject"; + //BA.debugLineNum = 508;BA.debugLine="Dim f As JavaObject"; _f = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=32309254; - //BA.debugLineNum = 32309254;BA.debugLine="f.InitializeNewInstance(\"java.io.File\", Array(Sh"; -_f.InitializeNewInstance("java.io.File",new Object[]{(Object)(__ref._sharedfolder /*String*/ ),(Object)(_filename)}); -RDebugUtils.currentLine=32309255; - //BA.debugLineNum = 32309255;BA.debugLine="Dim fp As JavaObject"; + //BA.debugLineNum = 509;BA.debugLine="f.InitializeNewInstance(\"java.io.File\", Array(Sh"; +_f.InitializeNewInstance("java.io.File",new Object[]{(Object)(_sharedfolder),(Object)(_filename)}); + //BA.debugLineNum = 510;BA.debugLine="Dim fp As JavaObject"; _fp = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=32309256; - //BA.debugLineNum = 32309256;BA.debugLine="Dim context As JavaObject"; + //BA.debugLineNum = 511;BA.debugLine="Dim context As JavaObject"; _context = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=32309257; - //BA.debugLineNum = 32309257;BA.debugLine="context.InitializeContext"; + //BA.debugLineNum = 512;BA.debugLine="context.InitializeContext"; _context.InitializeContext(ba); -RDebugUtils.currentLine=32309258; - //BA.debugLineNum = 32309258;BA.debugLine="fp.InitializeStatic(\"android.support.v4.content."; + //BA.debugLineNum = 513;BA.debugLine="fp.InitializeStatic(\"android.support.v4.content."; _fp.InitializeStatic("androidx.core.content.FileProvider"); -RDebugUtils.currentLine=32309259; - //BA.debugLineNum = 32309259;BA.debugLine="Return fp.RunMethod(\"getUriForFile\", Array(conte"; + //BA.debugLineNum = 514;BA.debugLine="Return fp.RunMethod(\"getUriForFile\", Array(conte"; if (true) return _fp.RunMethod("getUriForFile",new Object[]{(Object)(_context.getObject()),(Object)(__c.Application.getPackageName()+".provider"),(Object)(_f.getObject())}); }; -RDebugUtils.currentLine=32309261; - //BA.debugLineNum = 32309261;BA.debugLine="End Sub"; + //BA.debugLineNum = 516;BA.debugLine="End Sub"; return null; } -public String _getnmappinst(keymon.lat.medicomed.cl_appupdate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "getnmappinst", true)) - {return ((String) Debug.delegate(ba, "getnmappinst", null));} +public long _getfreespace() throws Exception{ +anywheresoftware.b4j.object.JavaObject _jo = null; + //BA.debugLineNum = 421;BA.debugLine="Private Sub GetFreeSpace As Long"; + //BA.debugLineNum = 422;BA.debugLine="Dim jo As JavaObject"; +_jo = new anywheresoftware.b4j.object.JavaObject(); + //BA.debugLineNum = 423;BA.debugLine="jo.InitializeNewInstance(\"java.io.File\", Array(Sh"; +_jo.InitializeNewInstance("java.io.File",new Object[]{(Object)(_sharedfolder)}); + //BA.debugLineNum = 424;BA.debugLine="Return jo.RunMethod(\"getFreeSpace\", Null)"; +if (true) return BA.ObjectToLongNumber(_jo.RunMethod("getFreeSpace",(Object[])(__c.Null))); + //BA.debugLineNum = 425;BA.debugLine="End Sub"; +return 0L; +} +public String _getnmappinst() throws Exception{ anywheresoftware.b4j.object.JavaObject _jo = null; anywheresoftware.b4j.object.JavaObject _context = null; anywheresoftware.b4j.object.JavaObject _resolver = null; -RDebugUtils.currentLine=32047104; - //BA.debugLineNum = 32047104;BA.debugLine="Private Sub GetNMAppInst As String"; -RDebugUtils.currentLine=32047105; - //BA.debugLineNum = 32047105;BA.debugLine="Dim jo As JavaObject"; + //BA.debugLineNum = 435;BA.debugLine="Private Sub GetNMAppInst As String"; + //BA.debugLineNum = 436;BA.debugLine="Dim jo As JavaObject"; _jo = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=32047106; - //BA.debugLineNum = 32047106;BA.debugLine="jo.InitializeStatic(\"android.provider.Settings.Se"; + //BA.debugLineNum = 437;BA.debugLine="jo.InitializeStatic(\"android.provider.Settings.Se"; _jo.InitializeStatic("android.provider.Settings.Secure"); -RDebugUtils.currentLine=32047107; - //BA.debugLineNum = 32047107;BA.debugLine="Dim context As JavaObject"; + //BA.debugLineNum = 438;BA.debugLine="Dim context As JavaObject"; _context = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=32047108; - //BA.debugLineNum = 32047108;BA.debugLine="context.InitializeContext"; + //BA.debugLineNum = 439;BA.debugLine="context.InitializeContext"; _context.InitializeContext(ba); -RDebugUtils.currentLine=32047109; - //BA.debugLineNum = 32047109;BA.debugLine="Dim resolver As JavaObject = context.RunMethod(\"g"; + //BA.debugLineNum = 440;BA.debugLine="Dim resolver As JavaObject = context.RunMethod(\"g"; _resolver = new anywheresoftware.b4j.object.JavaObject(); _resolver = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_context.RunMethod("getContentResolver",(Object[])(__c.Null)))); -RDebugUtils.currentLine=32047110; - //BA.debugLineNum = 32047110;BA.debugLine="Return jo.RunMethod(\"getString\", Array(resolver,"; + //BA.debugLineNum = 441;BA.debugLine="Return jo.RunMethod(\"getString\", Array(resolver,"; if (true) return BA.ObjectToString(_jo.RunMethod("getString",new Object[]{(Object)(_resolver.getObject()),(Object)("install_non_market_apps")})); -RDebugUtils.currentLine=32047111; - //BA.debugLineNum = 32047111;BA.debugLine="End Sub"; + //BA.debugLineNum = 442;BA.debugLine="End Sub"; return ""; } -public String _getpackagename(keymon.lat.medicomed.cl_appupdate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "getpackagename", true)) - {return ((String) Debug.delegate(ba, "getpackagename", null));} -RDebugUtils.currentLine=30408704; - //BA.debugLineNum = 30408704;BA.debugLine="Public Sub getPackageName As String"; -RDebugUtils.currentLine=30408705; - //BA.debugLineNum = 30408705;BA.debugLine="Return sPackageName"; -if (true) return __ref._spackagename /*String*/ ; -RDebugUtils.currentLine=30408706; - //BA.debugLineNum = 30408706;BA.debugLine="End Sub"; +public String _getpackagename() throws Exception{ + //BA.debugLineNum = 79;BA.debugLine="Public Sub getPackageName As String"; + //BA.debugLineNum = 80;BA.debugLine="Return sPackageName"; +if (true) return _spackagename; + //BA.debugLineNum = 81;BA.debugLine="End Sub"; return ""; } -public int _getsdkversion(keymon.lat.medicomed.cl_appupdate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "getsdkversion", true)) - {return ((Integer) Debug.delegate(ba, "getsdkversion", null));} +public int _getsdkversion() throws Exception{ anywheresoftware.b4j.object.JavaObject _jo = null; -RDebugUtils.currentLine=31981568; - //BA.debugLineNum = 31981568;BA.debugLine="Private Sub GetSDKVersion As Int"; -RDebugUtils.currentLine=31981569; - //BA.debugLineNum = 31981569;BA.debugLine="Dim jo As JavaObject"; + //BA.debugLineNum = 428;BA.debugLine="Private Sub GetSDKVersion As Int"; + //BA.debugLineNum = 429;BA.debugLine="Dim jo As JavaObject"; _jo = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=31981570; - //BA.debugLineNum = 31981570;BA.debugLine="jo.InitializeStatic(\"android.os.Build.VERSION\")"; + //BA.debugLineNum = 430;BA.debugLine="jo.InitializeStatic(\"android.os.Build.VERSION\")"; _jo.InitializeStatic("android.os.Build.VERSION"); -RDebugUtils.currentLine=31981571; - //BA.debugLineNum = 31981571;BA.debugLine="Return jo.GetField(\"SDK_INT\")"; + //BA.debugLineNum = 431;BA.debugLine="Return jo.GetField(\"SDK_INT\")"; if (true) return (int)(BA.ObjectToNumber(_jo.GetField("SDK_INT"))); -RDebugUtils.currentLine=31981572; - //BA.debugLineNum = 31981572;BA.debugLine="End Sub"; + //BA.debugLineNum = 432;BA.debugLine="End Sub"; return 0; } -public int _getstatus(keymon.lat.medicomed.cl_appupdate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "getstatus", true)) - {return ((Integer) Debug.delegate(ba, "getstatus", null));} -RDebugUtils.currentLine=30736384; - //BA.debugLineNum = 30736384;BA.debugLine="Public Sub getStatus As Int"; -RDebugUtils.currentLine=30736385; - //BA.debugLineNum = 30736385;BA.debugLine="Return sStatusCode"; -if (true) return __ref._sstatuscode /*int*/ ; -RDebugUtils.currentLine=30736386; - //BA.debugLineNum = 30736386;BA.debugLine="End Sub"; +public int _getstatus() throws Exception{ + //BA.debugLineNum = 108;BA.debugLine="Public Sub getStatus As Int"; + //BA.debugLineNum = 109;BA.debugLine="Return sStatusCode"; +if (true) return _sstatuscode; + //BA.debugLineNum = 110;BA.debugLine="End Sub"; return 0; } -public String _getwebchangelog(keymon.lat.medicomed.cl_appupdate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "getwebchangelog", true)) - {return ((String) Debug.delegate(ba, "getwebchangelog", null));} -RDebugUtils.currentLine=30932992; - //BA.debugLineNum = 30932992;BA.debugLine="Public Sub getWebChangeLog As String"; -RDebugUtils.currentLine=30932993; - //BA.debugLineNum = 30932993;BA.debugLine="Return webclog"; -if (true) return __ref._webclog /*String*/ ; -RDebugUtils.currentLine=30932994; - //BA.debugLineNum = 30932994;BA.debugLine="End Sub"; +public String _getwebchangelog() throws Exception{ + //BA.debugLineNum = 126;BA.debugLine="Public Sub getWebChangeLog As String"; + //BA.debugLineNum = 127;BA.debugLine="Return webclog"; +if (true) return _webclog; + //BA.debugLineNum = 128;BA.debugLine="End Sub"; return ""; } -public String _getwebfilesize(keymon.lat.medicomed.cl_appupdate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "getwebfilesize", true)) - {return ((String) Debug.delegate(ba, "getwebfilesize", null));} -RDebugUtils.currentLine=30998528; - //BA.debugLineNum = 30998528;BA.debugLine="Public Sub getWebFileSize As String"; -RDebugUtils.currentLine=30998529; - //BA.debugLineNum = 30998529;BA.debugLine="Return webfsize"; -if (true) return __ref._webfsize /*String*/ ; -RDebugUtils.currentLine=30998530; - //BA.debugLineNum = 30998530;BA.debugLine="End Sub"; +public String _getwebfilesize() throws Exception{ + //BA.debugLineNum = 132;BA.debugLine="Public Sub getWebFileSize As String"; + //BA.debugLineNum = 133;BA.debugLine="Return webfsize"; +if (true) return _webfsize; + //BA.debugLineNum = 134;BA.debugLine="End Sub"; return ""; } -public String _getwebvn(keymon.lat.medicomed.cl_appupdate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "getwebvn", true)) - {return ((String) Debug.delegate(ba, "getwebvn", null));} -RDebugUtils.currentLine=30867456; - //BA.debugLineNum = 30867456;BA.debugLine="Public Sub getWebVN As String"; -RDebugUtils.currentLine=30867457; - //BA.debugLineNum = 30867457;BA.debugLine="Return webver"; -if (true) return __ref._webver /*String*/ ; -RDebugUtils.currentLine=30867458; - //BA.debugLineNum = 30867458;BA.debugLine="End Sub"; +public String _getwebvn() throws Exception{ + //BA.debugLineNum = 120;BA.debugLine="Public Sub getWebVN As String"; + //BA.debugLineNum = 121;BA.debugLine="Return webver"; +if (true) return _webver; + //BA.debugLineNum = 122;BA.debugLine="End Sub"; return ""; } -public String _initialize(keymon.lat.medicomed.cl_appupdate __ref,anywheresoftware.b4a.BA _ba,Object _callbackmodule,String _eventname) throws Exception{ -__ref = this; +public String _initialize(anywheresoftware.b4a.BA _ba,Object _callbackmodule,String _eventname) throws Exception{ innerInitialize(_ba); -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_callbackmodule,_eventname}));} anywheresoftware.b4a.phone.Phone _p = null; -RDebugUtils.currentLine=30277632; - //BA.debugLineNum = 30277632;BA.debugLine="Public Sub Initialize(CallbackModule As Object, Ev"; -RDebugUtils.currentLine=30277633; - //BA.debugLineNum = 30277633;BA.debugLine="Callback = CallbackModule"; -__ref._callback /*Object*/ = _callbackmodule; -RDebugUtils.currentLine=30277634; - //BA.debugLineNum = 30277634;BA.debugLine="Event = EventName"; -__ref._event /*String*/ = _eventname; -RDebugUtils.currentLine=30277635; - //BA.debugLineNum = 30277635;BA.debugLine="sPackageName = \"\""; -__ref._spackagename /*String*/ = ""; -RDebugUtils.currentLine=30277636; - //BA.debugLineNum = 30277636;BA.debugLine="sNewVerTxt = \"\""; -__ref._snewvertxt /*String*/ = ""; -RDebugUtils.currentLine=30277637; - //BA.debugLineNum = 30277637;BA.debugLine="sNewVerApk = \"\""; -__ref._snewverapk /*String*/ = ""; -RDebugUtils.currentLine=30277638; - //BA.debugLineNum = 30277638;BA.debugLine="sUserName = \"\""; -__ref._susername /*String*/ = ""; -RDebugUtils.currentLine=30277639; - //BA.debugLineNum = 30277639;BA.debugLine="sUPassword = \"\""; -__ref._supassword /*String*/ = ""; -RDebugUtils.currentLine=30277640; - //BA.debugLineNum = 30277640;BA.debugLine="sStatusCode = OK_INIT"; -__ref._sstatuscode /*int*/ = __ref._ok_init /*int*/ ; -RDebugUtils.currentLine=30277641; - //BA.debugLineNum = 30277641;BA.debugLine="curver = \"\""; -__ref._curver /*String*/ = ""; -RDebugUtils.currentLine=30277642; - //BA.debugLineNum = 30277642;BA.debugLine="webver = \"\""; -__ref._webver /*String*/ = ""; -RDebugUtils.currentLine=30277643; - //BA.debugLineNum = 30277643;BA.debugLine="sVerbose = False"; -__ref._sverbose /*boolean*/ = __c.False; -RDebugUtils.currentLine=30277644; - //BA.debugLineNum = 30277644;BA.debugLine="Dim p As Phone"; + //BA.debugLineNum = 48;BA.debugLine="Public Sub Initialize(CallbackModule As Object, Ev"; + //BA.debugLineNum = 49;BA.debugLine="Callback = CallbackModule"; +_callback = _callbackmodule; + //BA.debugLineNum = 50;BA.debugLine="Event = EventName"; +_event = _eventname; + //BA.debugLineNum = 51;BA.debugLine="sPackageName = \"\""; +_spackagename = ""; + //BA.debugLineNum = 52;BA.debugLine="sNewVerTxt = \"\""; +_snewvertxt = ""; + //BA.debugLineNum = 53;BA.debugLine="sNewVerApk = \"\""; +_snewverapk = ""; + //BA.debugLineNum = 54;BA.debugLine="sUserName = \"\""; +_susername = ""; + //BA.debugLineNum = 55;BA.debugLine="sUPassword = \"\""; +_supassword = ""; + //BA.debugLineNum = 56;BA.debugLine="sStatusCode = OK_INIT"; +_sstatuscode = _ok_init; + //BA.debugLineNum = 57;BA.debugLine="curver = \"\""; +_curver = ""; + //BA.debugLineNum = 58;BA.debugLine="webver = \"\""; +_webver = ""; + //BA.debugLineNum = 59;BA.debugLine="sVerbose = False"; +_sverbose = __c.False; + //BA.debugLineNum = 60;BA.debugLine="Dim p As Phone"; _p = new anywheresoftware.b4a.phone.Phone(); -RDebugUtils.currentLine=30277645; - //BA.debugLineNum = 30277645;BA.debugLine="If p.SdkVersion >= 24 Or File.ExternalWritable ="; + //BA.debugLineNum = 61;BA.debugLine="If p.SdkVersion >= 24 Or File.ExternalWritable ="; if (_p.getSdkVersion()>=24 || __c.File.getExternalWritable()==__c.False) { -RDebugUtils.currentLine=30277646; - //BA.debugLineNum = 30277646;BA.debugLine="UseFileProvider = True"; -__ref._usefileprovider /*boolean*/ = __c.True; -RDebugUtils.currentLine=30277647; - //BA.debugLineNum = 30277647;BA.debugLine="SharedFolder = File.Combine(File.DirInternal, \"s"; -__ref._sharedfolder /*String*/ = __c.File.Combine(__c.File.getDirInternal(),"shared"); -RDebugUtils.currentLine=30277648; - //BA.debugLineNum = 30277648;BA.debugLine="File.MakeDir(\"\", SharedFolder)"; -__c.File.MakeDir("",__ref._sharedfolder /*String*/ ); + //BA.debugLineNum = 62;BA.debugLine="UseFileProvider = True"; +_usefileprovider = __c.True; + //BA.debugLineNum = 63;BA.debugLine="SharedFolder = File.Combine(File.DirInternal, \"s"; +_sharedfolder = __c.File.Combine(__c.File.getDirInternal(),"shared"); + //BA.debugLineNum = 64;BA.debugLine="File.MakeDir(\"\", SharedFolder)"; +__c.File.MakeDir("",_sharedfolder); }else { -RDebugUtils.currentLine=30277650; - //BA.debugLineNum = 30277650;BA.debugLine="UseFileProvider = False"; -__ref._usefileprovider /*boolean*/ = __c.False; -RDebugUtils.currentLine=30277651; - //BA.debugLineNum = 30277651;BA.debugLine="SharedFolder = rp.GetSafeDirDefaultExternal(\"sha"; -__ref._sharedfolder /*String*/ = __ref._rp /*anywheresoftware.b4a.objects.RuntimePermissions*/ .GetSafeDirDefaultExternal("shared"); + //BA.debugLineNum = 66;BA.debugLine="UseFileProvider = False"; +_usefileprovider = __c.False; + //BA.debugLineNum = 67;BA.debugLine="SharedFolder = rp.GetSafeDirDefaultExternal(\"sha"; +_sharedfolder = _rp.GetSafeDirDefaultExternal("shared"); }; -RDebugUtils.currentLine=30277653; - //BA.debugLineNum = 30277653;BA.debugLine="Log($\"SDK#: ${p.SdkVersion} - UseFP: ${UseFilePro"; -__c.LogImpl("930277653",("SDK#: "+__c.SmartStringFormatter("",(Object)(_p.getSdkVersion()))+" - UseFP: "+__c.SmartStringFormatter("",(Object)(__ref._usefileprovider /*boolean*/ ))+" - SharedFolder: "+__c.SmartStringFormatter("",(Object)(__ref._sharedfolder /*String*/ ))+""),0); -RDebugUtils.currentLine=30277654; - //BA.debugLineNum = 30277654;BA.debugLine="End Sub"; + //BA.debugLineNum = 69;BA.debugLine="Log($\"SDK#: ${p.SdkVersion} - UseFP: ${UseFilePro"; +__c.LogImpl("91966101",("SDK#: "+__c.SmartStringFormatter("",(Object)(_p.getSdkVersion()))+" - UseFP: "+__c.SmartStringFormatter("",(Object)(_usefileprovider))+" - SharedFolder: "+__c.SmartStringFormatter("",(Object)(_sharedfolder))+""),0); + //BA.debugLineNum = 70;BA.debugLine="End Sub"; return ""; } -public String _installapk(keymon.lat.medicomed.cl_appupdate __ref,boolean _pstatus) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "installapk", true)) - {return ((String) Debug.delegate(ba, "installapk", new Object[] {_pstatus}));} -RDebugUtils.currentLine=31326208; - //BA.debugLineNum = 31326208;BA.debugLine="Public Sub InstallApk(pstatus As Boolean)"; -RDebugUtils.currentLine=31326209; - //BA.debugLineNum = 31326209;BA.debugLine="LogColor(\"---- AppUpdating.InstallApk\", LogColor1"; -__c.LogImpl("931326209","---- AppUpdating.InstallApk",__ref._logcolor1 /*int*/ ); -RDebugUtils.currentLine=31326210; - //BA.debugLineNum = 31326210;BA.debugLine="If pstatus Then"; +public String _installapk(boolean _pstatus) throws Exception{ + //BA.debugLineNum = 195;BA.debugLine="Public Sub InstallApk(pstatus As Boolean)"; + //BA.debugLineNum = 196;BA.debugLine="LogColor(\"---- AppUpdating.InstallApk\", LogColor1"; +__c.LogImpl("93014657","---- AppUpdating.InstallApk",_logcolor1); + //BA.debugLineNum = 197;BA.debugLine="If pstatus Then"; if (_pstatus) { -RDebugUtils.currentLine=31326211; - //BA.debugLineNum = 31326211;BA.debugLine="SendInstallIntent"; -__ref._sendinstallintent /*String*/ (null); -RDebugUtils.currentLine=31326212; - //BA.debugLineNum = 31326212;BA.debugLine="sStatusCode = OK_INSTALL"; -__ref._sstatuscode /*int*/ = __ref._ok_install /*int*/ ; -RDebugUtils.currentLine=31326213; - //BA.debugLineNum = 31326213;BA.debugLine="If sVerbose Then Log(TAB & \"user asked to instal"; -if (__ref._sverbose /*boolean*/ ) { -__c.LogImpl("931326213",__c.TAB+"user asked to install new apk",0);}; + //BA.debugLineNum = 198;BA.debugLine="SendInstallIntent"; +_sendinstallintent(); + //BA.debugLineNum = 199;BA.debugLine="sStatusCode = OK_INSTALL"; +_sstatuscode = _ok_install; + //BA.debugLineNum = 200;BA.debugLine="If sVerbose Then Log(TAB & \"user asked to instal"; +if (_sverbose) { +__c.LogImpl("93014661",__c.TAB+"user asked to install new apk",0);}; }else { -RDebugUtils.currentLine=31326215; - //BA.debugLineNum = 31326215;BA.debugLine="sStatusCode = ERR_NOPERM"; -__ref._sstatuscode /*int*/ = __ref._err_noperm /*int*/ ; -RDebugUtils.currentLine=31326216; - //BA.debugLineNum = 31326216;BA.debugLine="If sVerbose Then Log(TAB & \"no permissions from"; -if (__ref._sverbose /*boolean*/ ) { -__c.LogImpl("931326216",__c.TAB+"no permissions from user to install new apk",0);}; + //BA.debugLineNum = 202;BA.debugLine="sStatusCode = ERR_NOPERM"; +_sstatuscode = _err_noperm; + //BA.debugLineNum = 203;BA.debugLine="If sVerbose Then Log(TAB & \"no permissions from"; +if (_sverbose) { +__c.LogImpl("93014664",__c.TAB+"no permissions from user to install new apk",0);}; }; -RDebugUtils.currentLine=31326218; - //BA.debugLineNum = 31326218;BA.debugLine="Finito"; -__ref._finito /*String*/ (null); -RDebugUtils.currentLine=31326219; - //BA.debugLineNum = 31326219;BA.debugLine="End Sub"; + //BA.debugLineNum = 205;BA.debugLine="Finito"; +_finito(); + //BA.debugLineNum = 206;BA.debugLine="End Sub"; return ""; } -public String _sendinstallintent(keymon.lat.medicomed.cl_appupdate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "sendinstallintent", true)) - {return ((String) Debug.delegate(ba, "sendinstallintent", null));} -String _apkname = ""; -anywheresoftware.b4a.objects.IntentWrapper _i = null; -RDebugUtils.currentLine=32243712; - //BA.debugLineNum = 32243712;BA.debugLine="Private Sub SendInstallIntent"; -RDebugUtils.currentLine=32243713; - //BA.debugLineNum = 32243713;BA.debugLine="Dim ApkName As String = \"tmp.apk\""; -_apkname = "tmp.apk"; -RDebugUtils.currentLine=32243714; - //BA.debugLineNum = 32243714;BA.debugLine="Dim i As Intent"; -_i = new anywheresoftware.b4a.objects.IntentWrapper(); -RDebugUtils.currentLine=32243715; - //BA.debugLineNum = 32243715;BA.debugLine="If phone.SdkVersion >= 24 Then 'Nouga"; -if (__ref._phone /*anywheresoftware.b4a.phone.Phone*/ .getSdkVersion()>=24) { -RDebugUtils.currentLine=32243716; - //BA.debugLineNum = 32243716;BA.debugLine="i.Initialize(\"android.intent.action.INSTALL_PACK"; -_i.Initialize("android.intent.action.INSTALL_PACKAGE",BA.ObjectToString(__ref._getfileuri /*Object*/ (null,_apkname))); -RDebugUtils.currentLine=32243717; - //BA.debugLineNum = 32243717;BA.debugLine="i.Flags = Bit.Or(i.Flags, 1) 'FLAG_GRANT_READ_UR"; -_i.setFlags(__c.Bit.Or(_i.getFlags(),(int) (1))); - }else { -RDebugUtils.currentLine=32243719; - //BA.debugLineNum = 32243719;BA.debugLine="i.Initialize(i.ACTION_VIEW, \"file://\" & File.Com"; -_i.Initialize(_i.ACTION_VIEW,"file://"+__c.File.Combine(__ref._sharedfolder /*String*/ ,_apkname)); -RDebugUtils.currentLine=32243720; - //BA.debugLineNum = 32243720;BA.debugLine="i.SetType(\"application/vnd.android.package-archi"; -_i.SetType("application/vnd.android.package-archive"); - }; -RDebugUtils.currentLine=32243722; - //BA.debugLineNum = 32243722;BA.debugLine="StartActivity(i)"; -__c.StartActivity(ba,(Object)(_i.getObject())); -RDebugUtils.currentLine=32243723; - //BA.debugLineNum = 32243723;BA.debugLine="End Sub"; -return ""; -} -public boolean _isvalidcv(keymon.lat.medicomed.cl_appupdate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "isvalidcv", true)) - {return ((Boolean) Debug.delegate(ba, "isvalidcv", null));} +public boolean _isvalidcv() throws Exception{ anywheresoftware.b4a.phone.PackageManagerWrapper _pm = null; -RDebugUtils.currentLine=31588352; - //BA.debugLineNum = 31588352;BA.debugLine="Private Sub IsValidCV As Boolean"; -RDebugUtils.currentLine=31588353; - //BA.debugLineNum = 31588353;BA.debugLine="If sPackageName = \"\" Then"; -if ((__ref._spackagename /*String*/ ).equals("")) { -RDebugUtils.currentLine=31588354; - //BA.debugLineNum = 31588354;BA.debugLine="curver = \"\""; -__ref._curver /*String*/ = ""; -RDebugUtils.currentLine=31588355; - //BA.debugLineNum = 31588355;BA.debugLine="sStatusCode = ERR_NOPKG"; -__ref._sstatuscode /*int*/ = __ref._err_nopkg /*int*/ ; -RDebugUtils.currentLine=31588356; - //BA.debugLineNum = 31588356;BA.debugLine="If sVerbose Then Log($\"${TAB}missing package nam"; -if (__ref._sverbose /*boolean*/ ) { -__c.LogImpl("931588356",(""+__c.SmartStringFormatter("",(Object)(__c.TAB))+"missing package name for current version check"),0);}; + //BA.debugLineNum = 297;BA.debugLine="Private Sub IsValidCV As Boolean"; + //BA.debugLineNum = 298;BA.debugLine="If sPackageName = \"\" Then"; +if ((_spackagename).equals("")) { + //BA.debugLineNum = 299;BA.debugLine="curver = \"\""; +_curver = ""; + //BA.debugLineNum = 300;BA.debugLine="sStatusCode = ERR_NOPKG"; +_sstatuscode = _err_nopkg; + //BA.debugLineNum = 301;BA.debugLine="If sVerbose Then Log($\"${TAB}missing package nam"; +if (_sverbose) { +__c.LogImpl("93276804",(""+__c.SmartStringFormatter("",(Object)(__c.TAB))+"missing package name for current version check"),0);}; }else { -RDebugUtils.currentLine=31588358; - //BA.debugLineNum = 31588358;BA.debugLine="Dim pm As PackageManager"; + //BA.debugLineNum = 303;BA.debugLine="Dim pm As PackageManager"; _pm = new anywheresoftware.b4a.phone.PackageManagerWrapper(); -RDebugUtils.currentLine=31588359; - //BA.debugLineNum = 31588359;BA.debugLine="curver = pm.GetVersionName(sPackageName)"; -__ref._curver /*String*/ = _pm.GetVersionName(__ref._spackagename /*String*/ ); -RDebugUtils.currentLine=31588360; - //BA.debugLineNum = 31588360;BA.debugLine="sStatusCode = OK_CURVER 'got current ve"; -__ref._sstatuscode /*int*/ = __ref._ok_curver /*int*/ ; -RDebugUtils.currentLine=31588361; - //BA.debugLineNum = 31588361;BA.debugLine="If sVerbose Then Log($\"${TAB}Current Version: ${"; -if (__ref._sverbose /*boolean*/ ) { -__c.LogImpl("931588361",(""+__c.SmartStringFormatter("",(Object)(__c.TAB))+"Current Version: "+__c.SmartStringFormatter("",(Object)(__ref._curver /*String*/ ))+""),0);}; + //BA.debugLineNum = 304;BA.debugLine="curver = pm.GetVersionName(sPackageName)"; +_curver = _pm.GetVersionName(_spackagename); + //BA.debugLineNum = 305;BA.debugLine="sStatusCode = OK_CURVER 'got current ve"; +_sstatuscode = _ok_curver; + //BA.debugLineNum = 306;BA.debugLine="If sVerbose Then Log($\"${TAB}Current Version: ${"; +if (_sverbose) { +__c.LogImpl("93276809",(""+__c.SmartStringFormatter("",(Object)(__c.TAB))+"Current Version: "+__c.SmartStringFormatter("",(Object)(_curver))+""),0);}; }; -RDebugUtils.currentLine=31588363; - //BA.debugLineNum = 31588363;BA.debugLine="Return (sStatusCode == OK_CURVER)"; -if (true) return (__ref._sstatuscode /*int*/ ==__ref._ok_curver /*int*/ ); -RDebugUtils.currentLine=31588364; - //BA.debugLineNum = 31588364;BA.debugLine="End Sub"; + //BA.debugLineNum = 308;BA.debugLine="Return (sStatusCode == OK_CURVER)"; +if (true) return (_sstatuscode==_ok_curver); + //BA.debugLineNum = 309;BA.debugLine="End Sub"; return false; } -public anywheresoftware.b4a.keywords.Common.ResumableSubWrapper _isvalidwv(keymon.lat.medicomed.cl_appupdate __ref) throws Exception{ -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "isvalidwv", true)) - {return ((anywheresoftware.b4a.keywords.Common.ResumableSubWrapper) Debug.delegate(ba, "isvalidwv", null));} -ResumableSub_IsvalidWV rsub = new ResumableSub_IsvalidWV(this,__ref); +public anywheresoftware.b4a.keywords.Common.ResumableSubWrapper _isvalidwv() throws Exception{ +ResumableSub_IsvalidWV rsub = new ResumableSub_IsvalidWV(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_IsvalidWV extends BA.ResumableSub { -public ResumableSub_IsvalidWV(keymon.lat.medicomed.cl_appupdate parent,keymon.lat.medicomed.cl_appupdate __ref) { +public ResumableSub_IsvalidWV(keymon.lat.medicomed.cl_appupdate parent) { this.parent = parent; -this.__ref = __ref; -this.__ref = parent; } -keymon.lat.medicomed.cl_appupdate __ref; keymon.lat.medicomed.cl_appupdate parent; keymon.lat.medicomed.httpjob _j = null; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="cl_appupdate"; while (true) { switch (state) { @@ -1123,17 +761,15 @@ parent.__c.ReturnFromResumableSub(this,null);return;} case 0: //C this.state = 1; -RDebugUtils.currentLine=31653889; - //BA.debugLineNum = 31653889;BA.debugLine="Log(\"IsValidComplete start\")"; -parent.__c.LogImpl("931653889","IsValidComplete start",0); -RDebugUtils.currentLine=31653890; - //BA.debugLineNum = 31653890;BA.debugLine="If sNewVerTxt = \"\" Then"; + //BA.debugLineNum = 313;BA.debugLine="Log(\"IsValidComplete start\")"; +parent.__c.LogImpl("93342337","IsValidComplete start",0); + //BA.debugLineNum = 314;BA.debugLine="If sNewVerTxt = \"\" Then"; if (true) break; case 1: //if this.state = 60; -if ((__ref._snewvertxt /*String*/ ).equals("")) { +if ((parent._snewvertxt).equals("")) { this.state = 3; }else { this.state = 11; @@ -1142,27 +778,24 @@ this.state = 11; case 3: //C this.state = 4; -RDebugUtils.currentLine=31653891; - //BA.debugLineNum = 31653891;BA.debugLine="webver = \"\""; -__ref._webver /*String*/ = ""; -RDebugUtils.currentLine=31653892; - //BA.debugLineNum = 31653892;BA.debugLine="sStatusCode = ERR_NOTXT"; -__ref._sstatuscode /*int*/ = __ref._err_notxt /*int*/ ; -RDebugUtils.currentLine=31653893; - //BA.debugLineNum = 31653893;BA.debugLine="If sVerbose Then Log($\"${TAB}missing info file f"; + //BA.debugLineNum = 315;BA.debugLine="webver = \"\""; +parent._webver = ""; + //BA.debugLineNum = 316;BA.debugLine="sStatusCode = ERR_NOTXT"; +parent._sstatuscode = parent._err_notxt; + //BA.debugLineNum = 317;BA.debugLine="If sVerbose Then Log($\"${TAB}missing info file f"; if (true) break; case 4: //if this.state = 9; -if (__ref._sverbose /*boolean*/ ) { +if (parent._sverbose) { this.state = 6; ;}if (true) break; case 6: //C this.state = 9; -parent.__c.LogImpl("931653893",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"missing info file full path indication"),0); +parent.__c.LogImpl("93342341",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"missing info file full path indication"),0); if (true) break; case 9: @@ -1174,39 +807,30 @@ this.state = 60; case 11: //C this.state = 12; -RDebugUtils.currentLine=31653896; - //BA.debugLineNum = 31653896;BA.debugLine="Dim j As HttpJob"; + //BA.debugLineNum = 320;BA.debugLine="Dim j As HttpJob"; _j = new keymon.lat.medicomed.httpjob(); -RDebugUtils.currentLine=31653897; - //BA.debugLineNum = 31653897;BA.debugLine="j.Initialize(\"\", Me)"; -_j._initialize /*String*/ (null,ba,"",parent); -RDebugUtils.currentLine=31653898; - //BA.debugLineNum = 31653898;BA.debugLine="j.Username = sUserName"; -_j._username /*String*/ = __ref._susername /*String*/ ; -RDebugUtils.currentLine=31653899; - //BA.debugLineNum = 31653899;BA.debugLine="j.Password = sUPassword"; -_j._password /*String*/ = __ref._supassword /*String*/ ; -RDebugUtils.currentLine=31653900; - //BA.debugLineNum = 31653900;BA.debugLine="j.Download(sNewVerTxt) 'ex: jobapk.Downlo"; -_j._download /*String*/ (null,__ref._snewvertxt /*String*/ ); -RDebugUtils.currentLine=31653901; - //BA.debugLineNum = 31653901;BA.debugLine="Log(\"before\")"; -parent.__c.LogImpl("931653901","before",0); -RDebugUtils.currentLine=31653902; - //BA.debugLineNum = 31653902;BA.debugLine="Wait For (j) JobDone(j As HttpJob)"; -parent.__c.WaitFor("jobdone", ba, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "cl_appupdate", "isvalidwv"), (Object)(_j)); + //BA.debugLineNum = 321;BA.debugLine="j.Initialize(\"\", Me)"; +_j._initialize /*String*/ (ba,"",parent); + //BA.debugLineNum = 322;BA.debugLine="j.Username = sUserName"; +_j._username /*String*/ = parent._susername; + //BA.debugLineNum = 323;BA.debugLine="j.Password = sUPassword"; +_j._password /*String*/ = parent._supassword; + //BA.debugLineNum = 324;BA.debugLine="j.Download(sNewVerTxt) 'ex: jobapk.Downlo"; +_j._download /*String*/ (parent._snewvertxt); + //BA.debugLineNum = 325;BA.debugLine="Log(\"before\")"; +parent.__c.LogImpl("93342349","before",0); + //BA.debugLineNum = 326;BA.debugLine="Wait For (j) JobDone(j As HttpJob)"; +parent.__c.WaitFor("jobdone", ba, this, (Object)(_j)); this.state = 61; return; case 61: //C this.state = 12; -_j = (keymon.lat.medicomed.httpjob) result[1]; +_j = (keymon.lat.medicomed.httpjob) result[0]; ; -RDebugUtils.currentLine=31653903; - //BA.debugLineNum = 31653903;BA.debugLine="Log(\"after\")"; -parent.__c.LogImpl("931653903","after",0); -RDebugUtils.currentLine=31653904; - //BA.debugLineNum = 31653904;BA.debugLine="If j.Success Then"; + //BA.debugLineNum = 327;BA.debugLine="Log(\"after\")"; +parent.__c.LogImpl("93342351","after",0); + //BA.debugLineNum = 328;BA.debugLine="If j.Success Then"; if (true) break; case 12: @@ -1221,35 +845,33 @@ this.state = 52; case 14: //C this.state = 15; -RDebugUtils.currentLine=31653905; - //BA.debugLineNum = 31653905;BA.debugLine="If sVerbose Then Log($\"Webserver's info file co"; + //BA.debugLineNum = 329;BA.debugLine="If sVerbose Then Log($\"Webserver's info file co"; if (true) break; case 15: //if this.state = 20; -if (__ref._sverbose /*boolean*/ ) { +if (parent._sverbose) { this.state = 17; ;}if (true) break; case 17: //C this.state = 20; -parent.__c.LogImpl("931653905",("Webserver's info file content: "+parent.__c.SmartStringFormatter("",(Object)(parent.__c.CRLF))+""+parent.__c.SmartStringFormatter("",(Object)(_j._getstring /*String*/ (null)))+""),0); +parent.__c.LogImpl("93342353",("Webserver's info file content: "+parent.__c.SmartStringFormatter("",(Object)(parent.__c.CRLF))+""+parent.__c.SmartStringFormatter("",(Object)(_j._getstring /*String*/ ()))+""),0); if (true) break; case 20: //C this.state = 21; ; -RDebugUtils.currentLine=31653906; - //BA.debugLineNum = 31653906;BA.debugLine="If Not(J.GetString.Contains(\"\"))"; + //BA.debugLineNum = 330;BA.debugLine="If Not(J.GetString.Contains(\"\"))"; if (true) break; case 21: //if this.state = 50; -if (parent.__c.Not(_j._getstring /*String*/ (null).contains(""))) { +if (parent.__c.Not(_j._getstring /*String*/ ().contains(""))) { this.state = 23; }else { this.state = 43; @@ -1258,23 +880,19 @@ this.state = 43; case 23: //C this.state = 24; -RDebugUtils.currentLine=31653907; - //BA.debugLineNum = 31653907;BA.debugLine="webver = ExtractVN(J.GetString)"; -__ref._webver /*String*/ = __ref._extractvn /*String*/ (null,_j._getstring /*String*/ (null)); -RDebugUtils.currentLine=31653908; - //BA.debugLineNum = 31653908;BA.debugLine="webclog = ExtractCL(J.GetString) 'optional"; -__ref._webclog /*String*/ = __ref._extractcl /*String*/ (null,_j._getstring /*String*/ (null)); -RDebugUtils.currentLine=31653909; - //BA.debugLineNum = 31653909;BA.debugLine="webfsize = ExtractSZ(J.GetString) 'optiona"; -__ref._webfsize /*String*/ = __ref._extractsz /*String*/ (null,_j._getstring /*String*/ (null)); -RDebugUtils.currentLine=31653910; - //BA.debugLineNum = 31653910;BA.debugLine="If webver = \"\" Then"; + //BA.debugLineNum = 331;BA.debugLine="webver = ExtractVN(J.GetString)"; +parent._webver = parent._extractvn(_j._getstring /*String*/ ()); + //BA.debugLineNum = 332;BA.debugLine="webclog = ExtractCL(J.GetString) 'optional"; +parent._webclog = parent._extractcl(_j._getstring /*String*/ ()); + //BA.debugLineNum = 333;BA.debugLine="webfsize = ExtractSZ(J.GetString) 'optiona"; +parent._webfsize = parent._extractsz(_j._getstring /*String*/ ()); + //BA.debugLineNum = 334;BA.debugLine="If webver = \"\" Then"; if (true) break; case 24: //if this.state = 41; -if ((__ref._webver /*String*/ ).equals("")) { +if ((parent._webver).equals("")) { this.state = 26; }else { this.state = 34; @@ -1283,24 +901,22 @@ this.state = 34; case 26: //C this.state = 27; -RDebugUtils.currentLine=31653911; - //BA.debugLineNum = 31653911;BA.debugLine="sStatusCode = ERR_TXTROW"; -__ref._sstatuscode /*int*/ = __ref._err_txtrow /*int*/ ; -RDebugUtils.currentLine=31653912; - //BA.debugLineNum = 31653912;BA.debugLine="If sVerbose Then Log($\"${TAB}wrong row format"; + //BA.debugLineNum = 335;BA.debugLine="sStatusCode = ERR_TXTROW"; +parent._sstatuscode = parent._err_txtrow; + //BA.debugLineNum = 336;BA.debugLine="If sVerbose Then Log($\"${TAB}wrong row format"; if (true) break; case 27: //if this.state = 32; -if (__ref._sverbose /*boolean*/ ) { +if (parent._sverbose) { this.state = 29; ;}if (true) break; case 29: //C this.state = 32; -parent.__c.LogImpl("931653912",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"wrong row format in info file "),0); +parent.__c.LogImpl("93342360",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"wrong row format in info file "),0); if (true) break; case 32: @@ -1312,24 +928,22 @@ this.state = 41; case 34: //C this.state = 35; -RDebugUtils.currentLine=31653914; - //BA.debugLineNum = 31653914;BA.debugLine="sStatusCode = OK_WEBVER 'read apk's ver"; -__ref._sstatuscode /*int*/ = __ref._ok_webver /*int*/ ; -RDebugUtils.currentLine=31653915; - //BA.debugLineNum = 31653915;BA.debugLine="If sVerbose Then Log($\"${TAB}Web version numb"; + //BA.debugLineNum = 338;BA.debugLine="sStatusCode = OK_WEBVER 'read apk's ver"; +parent._sstatuscode = parent._ok_webver; + //BA.debugLineNum = 339;BA.debugLine="If sVerbose Then Log($\"${TAB}Web version numb"; if (true) break; case 35: //if this.state = 40; -if (__ref._sverbose /*boolean*/ ) { +if (parent._sverbose) { this.state = 37; ;}if (true) break; case 37: //C this.state = 40; -parent.__c.LogImpl("931653915",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"Web version number: "+parent.__c.SmartStringFormatter("",(Object)(__ref._webver /*String*/ ))+""),0); +parent.__c.LogImpl("93342363",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"Web version number: "+parent.__c.SmartStringFormatter("",(Object)(parent._webver))+""),0); if (true) break; case 40: @@ -1347,24 +961,22 @@ this.state = 50; case 43: //C this.state = 44; -RDebugUtils.currentLine=31653918; - //BA.debugLineNum = 31653918;BA.debugLine="sStatusCode = ERR_HTML 'website returne"; -__ref._sstatuscode /*int*/ = __ref._err_html /*int*/ ; -RDebugUtils.currentLine=31653919; - //BA.debugLineNum = 31653919;BA.debugLine="If sVerbose Then Log($\"${TAB}ERROR: website re"; + //BA.debugLineNum = 342;BA.debugLine="sStatusCode = ERR_HTML 'website returne"; +parent._sstatuscode = parent._err_html; + //BA.debugLineNum = 343;BA.debugLine="If sVerbose Then Log($\"${TAB}ERROR: website re"; if (true) break; case 44: //if this.state = 49; -if (__ref._sverbose /*boolean*/ ) { +if (parent._sverbose) { this.state = 46; ;}if (true) break; case 46: //C this.state = 49; -parent.__c.LogImpl("931653919",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"ERROR: website returned an HTML error page"),0); +parent.__c.LogImpl("93342367",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"ERROR: website returned an HTML error page"),0); if (true) break; case 49: @@ -1382,35 +994,31 @@ this.state = 59; case 52: //C this.state = 53; -RDebugUtils.currentLine=31653922; - //BA.debugLineNum = 31653922;BA.debugLine="Log($\"${TAB}Error: ${J.ErrorMessage}\"$)"; -parent.__c.LogImpl("931653922",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"Error: "+parent.__c.SmartStringFormatter("",(Object)(_j._errormessage /*String*/ ))+""),0); -RDebugUtils.currentLine=31653923; - //BA.debugLineNum = 31653923;BA.debugLine="sStatusCode = ERR_HTTP"; -__ref._sstatuscode /*int*/ = __ref._err_http /*int*/ ; -RDebugUtils.currentLine=31653924; - //BA.debugLineNum = 31653924;BA.debugLine="If sVerbose Then Log($\"${TAB}error in httputils"; + //BA.debugLineNum = 346;BA.debugLine="Log($\"${TAB}Error: ${J.ErrorMessage}\"$)"; +parent.__c.LogImpl("93342370",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"Error: "+parent.__c.SmartStringFormatter("",(Object)(_j._errormessage /*String*/ ))+""),0); + //BA.debugLineNum = 347;BA.debugLine="sStatusCode = ERR_HTTP"; +parent._sstatuscode = parent._err_http; + //BA.debugLineNum = 348;BA.debugLine="If sVerbose Then Log($\"${TAB}error in httputils"; if (true) break; case 53: //if this.state = 58; -if (__ref._sverbose /*boolean*/ ) { +if (parent._sverbose) { this.state = 55; ;}if (true) break; case 55: //C this.state = 58; -parent.__c.LogImpl("931653924",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"error in httputils2"),0); +parent.__c.LogImpl("93342372",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"error in httputils2"),0); if (true) break; case 58: //C this.state = 59; ; -RDebugUtils.currentLine=31653925; - //BA.debugLineNum = 31653925;BA.debugLine="ToastMessageShow(\"Error: \" & J.ErrorMessage, Tr"; + //BA.debugLineNum = 349;BA.debugLine="ToastMessageShow(\"Error: \" & J.ErrorMessage, Tr"; parent.__c.ToastMessageShow(BA.ObjectToCharSequence("Error: "+_j._errormessage /*String*/ ),parent.__c.True); if (true) break; @@ -1418,67 +1026,48 @@ case 59: //C this.state = 60; ; -RDebugUtils.currentLine=31653927; - //BA.debugLineNum = 31653927;BA.debugLine="j.Release"; -_j._release /*String*/ (null); + //BA.debugLineNum = 351;BA.debugLine="j.Release"; +_j._release /*String*/ (); if (true) break; case 60: //C this.state = -1; ; -RDebugUtils.currentLine=31653929; - //BA.debugLineNum = 31653929;BA.debugLine="Return (sStatusCode == OK_WEBVER)"; + //BA.debugLineNum = 353;BA.debugLine="Return (sStatusCode == OK_WEBVER)"; if (true) { -parent.__c.ReturnFromResumableSub(this,(Object)((__ref._sstatuscode /*int*/ ==__ref._ok_webver /*int*/ )));return;}; -RDebugUtils.currentLine=31653930; - //BA.debugLineNum = 31653930;BA.debugLine="End Sub"; +parent.__c.ReturnFromResumableSub(this,(Object)((parent._sstatuscode==parent._ok_webver)));return;}; + //BA.debugLineNum = 354;BA.debugLine="End Sub"; if (true) break; } } } } -public String _readcurvn(keymon.lat.medicomed.cl_appupdate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "readcurvn", true)) - {return ((String) Debug.delegate(ba, "readcurvn", null));} -RDebugUtils.currentLine=31129600; - //BA.debugLineNum = 31129600;BA.debugLine="Public Sub ReadCurVN"; -RDebugUtils.currentLine=31129601; - //BA.debugLineNum = 31129601;BA.debugLine="LogColor(\"---- AppUpdating.ReadCurVN\", LogColor1)"; -__c.LogImpl("931129601","---- AppUpdating.ReadCurVN",__ref._logcolor1 /*int*/ ); -RDebugUtils.currentLine=31129602; - //BA.debugLineNum = 31129602;BA.debugLine="IsValidCV 'we don't care about its resu"; -__ref._isvalidcv /*boolean*/ (null); -RDebugUtils.currentLine=31129603; - //BA.debugLineNum = 31129603;BA.debugLine="Finito"; -__ref._finito /*String*/ (null); -RDebugUtils.currentLine=31129604; - //BA.debugLineNum = 31129604;BA.debugLine="End Sub"; +public String _readcurvn() throws Exception{ + //BA.debugLineNum = 143;BA.debugLine="Public Sub ReadCurVN"; + //BA.debugLineNum = 144;BA.debugLine="LogColor(\"---- AppUpdating.ReadCurVN\", LogColor1)"; +__c.LogImpl("92818049","---- AppUpdating.ReadCurVN",_logcolor1); + //BA.debugLineNum = 145;BA.debugLine="IsValidCV 'we don't care about its resu"; +_isvalidcv(); + //BA.debugLineNum = 146;BA.debugLine="Finito"; +_finito(); + //BA.debugLineNum = 147;BA.debugLine="End Sub"; return ""; } -public void _readwebvn(keymon.lat.medicomed.cl_appupdate __ref) throws Exception{ -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "readwebvn", true)) - {Debug.delegate(ba, "readwebvn", null); return;} -ResumableSub_ReadWebVN rsub = new ResumableSub_ReadWebVN(this,__ref); +public void _readwebvn() throws Exception{ +ResumableSub_ReadWebVN rsub = new ResumableSub_ReadWebVN(this); rsub.resume(ba, null); } public static class ResumableSub_ReadWebVN extends BA.ResumableSub { -public ResumableSub_ReadWebVN(keymon.lat.medicomed.cl_appupdate parent,keymon.lat.medicomed.cl_appupdate __ref) { +public ResumableSub_ReadWebVN(keymon.lat.medicomed.cl_appupdate parent) { this.parent = parent; -this.__ref = __ref; -this.__ref = parent; } -keymon.lat.medicomed.cl_appupdate __ref; keymon.lat.medicomed.cl_appupdate parent; boolean _okwebver = false; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="cl_appupdate"; while (true) { switch (state) { @@ -1488,213 +1077,158 @@ return; case 0: //C this.state = -1; -RDebugUtils.currentLine=31195137; - //BA.debugLineNum = 31195137;BA.debugLine="LogColor(\"---- AppUpdating.ReadWebVN\", LogColor1)"; -parent.__c.LogImpl("931195137","---- AppUpdating.ReadWebVN",__ref._logcolor1 /*int*/ ); -RDebugUtils.currentLine=31195138; - //BA.debugLineNum = 31195138;BA.debugLine="Wait For(IsvalidWV) Complete (OkWebVer As Boolean"; -parent.__c.WaitFor("complete", ba, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "cl_appupdate", "readwebvn"), __ref._isvalidwv /*anywheresoftware.b4a.keywords.Common.ResumableSubWrapper*/ (null)); + //BA.debugLineNum = 152;BA.debugLine="LogColor(\"---- AppUpdating.ReadWebVN\", LogColor1)"; +parent.__c.LogImpl("92883585","---- AppUpdating.ReadWebVN",parent._logcolor1); + //BA.debugLineNum = 153;BA.debugLine="Wait For(IsvalidWV) Complete (OkWebVer As Boolean"; +parent.__c.WaitFor("complete", ba, this, parent._isvalidwv()); this.state = 1; return; case 1: //C this.state = -1; -_okwebver = (Boolean) result[1]; +_okwebver = (Boolean) result[0]; ; -RDebugUtils.currentLine=31195139; - //BA.debugLineNum = 31195139;BA.debugLine="Finito"; -__ref._finito /*String*/ (null); -RDebugUtils.currentLine=31195140; - //BA.debugLineNum = 31195140;BA.debugLine="End Sub"; + //BA.debugLineNum = 154;BA.debugLine="Finito"; +parent._finito(); + //BA.debugLineNum = 155;BA.debugLine="End Sub"; if (true) break; } } } } -public String _setandstartsplashscreen(keymon.lat.medicomed.cl_appupdate __ref,anywheresoftware.b4a.objects.ActivityWrapper _callingact,anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _bm) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "setandstartsplashscreen", true)) - {return ((String) Debug.delegate(ba, "setandstartsplashscreen", new Object[] {_callingact,_bm}));} -anywheresoftware.b4a.objects.drawable.BitmapDrawable _bitimage = null; -RDebugUtils.currentLine=32440320; - //BA.debugLineNum = 32440320;BA.debugLine="Public Sub SetAndStartSplashScreen(CallingAct As A"; -RDebugUtils.currentLine=32440321; - //BA.debugLineNum = 32440321;BA.debugLine="If BM.IsInitialized Then"; -if (_bm.IsInitialized()) { -RDebugUtils.currentLine=32440322; - //BA.debugLineNum = 32440322;BA.debugLine="pnlSplash.Initialize(\"pnl1\")"; -__ref._pnlsplash /*anywheresoftware.b4a.objects.PanelWrapper*/ .Initialize(ba,"pnl1"); -RDebugUtils.currentLine=32440323; - //BA.debugLineNum = 32440323;BA.debugLine="pnlSplash.Tag = \"splash\""; -__ref._pnlsplash /*anywheresoftware.b4a.objects.PanelWrapper*/ .setTag((Object)("splash")); -RDebugUtils.currentLine=32440324; - //BA.debugLineNum = 32440324;BA.debugLine="Dim BitImage As BitmapDrawable"; -_bitimage = new anywheresoftware.b4a.objects.drawable.BitmapDrawable(); -RDebugUtils.currentLine=32440325; - //BA.debugLineNum = 32440325;BA.debugLine="BitImage.Initialize(BM)"; -_bitimage.Initialize((android.graphics.Bitmap)(_bm.getObject())); -RDebugUtils.currentLine=32440326; - //BA.debugLineNum = 32440326;BA.debugLine="BitImage.Gravity = Gravity.FILL"; -_bitimage.setGravity(__c.Gravity.FILL); -RDebugUtils.currentLine=32440327; - //BA.debugLineNum = 32440327;BA.debugLine="CallingAct.AddView(pnlSplash, 0, 0, CallingAct.W"; -_callingact.AddView((android.view.View)(__ref._pnlsplash /*anywheresoftware.b4a.objects.PanelWrapper*/ .getObject()),(int) (0),(int) (0),_callingact.getWidth(),_callingact.getHeight()); -RDebugUtils.currentLine=32440328; - //BA.debugLineNum = 32440328;BA.debugLine="pnlSplash.Background = BitImage"; -__ref._pnlsplash /*anywheresoftware.b4a.objects.PanelWrapper*/ .setBackground((android.graphics.drawable.Drawable)(_bitimage.getObject())); -RDebugUtils.currentLine=32440329; - //BA.debugLineNum = 32440329;BA.debugLine="pnlSplash.BringToFront"; -__ref._pnlsplash /*anywheresoftware.b4a.objects.PanelWrapper*/ .BringToFront(); -RDebugUtils.currentLine=32440330; - //BA.debugLineNum = 32440330;BA.debugLine="SplashShowing = True"; -__ref._splashshowing /*boolean*/ = __c.True; +public void _complete(boolean _okwebver) throws Exception{ +} +public String _sendinstallintent() throws Exception{ +String _apkname = ""; +anywheresoftware.b4a.objects.IntentWrapper _i = null; + //BA.debugLineNum = 487;BA.debugLine="Private Sub SendInstallIntent"; + //BA.debugLineNum = 488;BA.debugLine="Dim ApkName As String = \"tmp.apk\""; +_apkname = "tmp.apk"; + //BA.debugLineNum = 489;BA.debugLine="Dim i As Intent"; +_i = new anywheresoftware.b4a.objects.IntentWrapper(); + //BA.debugLineNum = 490;BA.debugLine="If phone.SdkVersion >= 24 Then 'Nouga"; +if (_phone.getSdkVersion()>=24) { + //BA.debugLineNum = 491;BA.debugLine="i.Initialize(\"android.intent.action.INSTALL_PACK"; +_i.Initialize("android.intent.action.INSTALL_PACKAGE",BA.ObjectToString(_getfileuri(_apkname))); + //BA.debugLineNum = 492;BA.debugLine="i.Flags = Bit.Or(i.Flags, 1) 'FLAG_GRANT_READ_UR"; +_i.setFlags(__c.Bit.Or(_i.getFlags(),(int) (1))); + }else { + //BA.debugLineNum = 494;BA.debugLine="i.Initialize(i.ACTION_VIEW, \"file://\" & File.Com"; +_i.Initialize(_i.ACTION_VIEW,"file://"+__c.File.Combine(_sharedfolder,_apkname)); + //BA.debugLineNum = 495;BA.debugLine="i.SetType(\"application/vnd.android.package-archi"; +_i.SetType("application/vnd.android.package-archive"); }; -RDebugUtils.currentLine=32440332; - //BA.debugLineNum = 32440332;BA.debugLine="End Sub"; + //BA.debugLineNum = 497;BA.debugLine="StartActivity(i)"; +__c.StartActivity(ba,(Object)(_i.getObject())); + //BA.debugLineNum = 498;BA.debugLine="End Sub"; return ""; } -public String _setcredentials(keymon.lat.medicomed.cl_appupdate __ref,String _usern,String _userp) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "setcredentials", true)) - {return ((String) Debug.delegate(ba, "setcredentials", new Object[] {_usern,_userp}));} -RDebugUtils.currentLine=30605312; - //BA.debugLineNum = 30605312;BA.debugLine="Public Sub setCredentials(UserN As String, UserP A"; -RDebugUtils.currentLine=30605313; - //BA.debugLineNum = 30605313;BA.debugLine="sUserName = UserN"; -__ref._susername /*String*/ = _usern; -RDebugUtils.currentLine=30605314; - //BA.debugLineNum = 30605314;BA.debugLine="sUPassword = UserP"; -__ref._supassword /*String*/ = _userp; -RDebugUtils.currentLine=30605315; - //BA.debugLineNum = 30605315;BA.debugLine="End Sub"; +public String _setandstartsplashscreen(anywheresoftware.b4a.objects.ActivityWrapper _callingact,anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _bm) throws Exception{ +anywheresoftware.b4a.objects.drawable.BitmapDrawable _bitimage = null; + //BA.debugLineNum = 532;BA.debugLine="Public Sub SetAndStartSplashScreen(CallingAct As A"; + //BA.debugLineNum = 533;BA.debugLine="If BM.IsInitialized Then"; +if (_bm.IsInitialized()) { + //BA.debugLineNum = 534;BA.debugLine="pnlSplash.Initialize(\"pnl1\")"; +_pnlsplash.Initialize(ba,"pnl1"); + //BA.debugLineNum = 535;BA.debugLine="pnlSplash.Tag = \"splash\""; +_pnlsplash.setTag((Object)("splash")); + //BA.debugLineNum = 536;BA.debugLine="Dim BitImage As BitmapDrawable"; +_bitimage = new anywheresoftware.b4a.objects.drawable.BitmapDrawable(); + //BA.debugLineNum = 537;BA.debugLine="BitImage.Initialize(BM)"; +_bitimage.Initialize((android.graphics.Bitmap)(_bm.getObject())); + //BA.debugLineNum = 538;BA.debugLine="BitImage.Gravity = Gravity.FILL"; +_bitimage.setGravity(__c.Gravity.FILL); + //BA.debugLineNum = 539;BA.debugLine="CallingAct.AddView(pnlSplash, 0, 0, CallingAct.W"; +_callingact.AddView((android.view.View)(_pnlsplash.getObject()),(int) (0),(int) (0),_callingact.getWidth(),_callingact.getHeight()); + //BA.debugLineNum = 540;BA.debugLine="pnlSplash.Background = BitImage"; +_pnlsplash.setBackground((android.graphics.drawable.Drawable)(_bitimage.getObject())); + //BA.debugLineNum = 541;BA.debugLine="pnlSplash.BringToFront"; +_pnlsplash.BringToFront(); + //BA.debugLineNum = 542;BA.debugLine="SplashShowing = True"; +_splashshowing = __c.True; + }; + //BA.debugLineNum = 544;BA.debugLine="End Sub"; return ""; } -public String _setfileuriasintentdata(keymon.lat.medicomed.cl_appupdate __ref,anywheresoftware.b4a.objects.IntentWrapper _intent,String _filename) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "setfileuriasintentdata", true)) - {return ((String) Debug.delegate(ba, "setfileuriasintentdata", new Object[] {_intent,_filename}));} +public String _setcredentials(String _usern,String _userp) throws Exception{ + //BA.debugLineNum = 96;BA.debugLine="Public Sub setCredentials(UserN As String, UserP A"; + //BA.debugLineNum = 97;BA.debugLine="sUserName = UserN"; +_susername = _usern; + //BA.debugLineNum = 98;BA.debugLine="sUPassword = UserP"; +_supassword = _userp; + //BA.debugLineNum = 99;BA.debugLine="End Sub"; +return ""; +} +public String _setfileuriasintentdata(anywheresoftware.b4a.objects.IntentWrapper _intent,String _filename) throws Exception{ anywheresoftware.b4j.object.JavaObject _jo = null; -RDebugUtils.currentLine=32374784; - //BA.debugLineNum = 32374784;BA.debugLine="Private Sub SetFileUriAsIntentData (Intent As Inte"; -RDebugUtils.currentLine=32374785; - //BA.debugLineNum = 32374785;BA.debugLine="Dim jo As JavaObject = Intent"; + //BA.debugLineNum = 520;BA.debugLine="Private Sub SetFileUriAsIntentData (Intent As Inte"; + //BA.debugLineNum = 521;BA.debugLine="Dim jo As JavaObject = Intent"; _jo = new anywheresoftware.b4j.object.JavaObject(); _jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_intent.getObject())); -RDebugUtils.currentLine=32374786; - //BA.debugLineNum = 32374786;BA.debugLine="jo.RunMethod(\"setData\", Array(GetFileUri(FileName"; -_jo.RunMethod("setData",new Object[]{__ref._getfileuri /*Object*/ (null,_filename)}); -RDebugUtils.currentLine=32374787; - //BA.debugLineNum = 32374787;BA.debugLine="Intent.Flags = Bit.Or(Intent.Flags, 1) 'FLAG_GRAN"; + //BA.debugLineNum = 522;BA.debugLine="jo.RunMethod(\"setData\", Array(GetFileUri(FileName"; +_jo.RunMethod("setData",new Object[]{_getfileuri(_filename)}); + //BA.debugLineNum = 523;BA.debugLine="Intent.Flags = Bit.Or(Intent.Flags, 1) 'FLAG_GRAN"; _intent.setFlags(__c.Bit.Or(_intent.getFlags(),(int) (1))); -RDebugUtils.currentLine=32374788; - //BA.debugLineNum = 32374788;BA.debugLine="End Sub"; + //BA.debugLineNum = 524;BA.debugLine="End Sub"; return ""; } -public String _setnewverapk(keymon.lat.medicomed.cl_appupdate __ref,String _nva) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "setnewverapk", true)) - {return ((String) Debug.delegate(ba, "setnewverapk", new Object[] {_nva}));} -RDebugUtils.currentLine=30539776; - //BA.debugLineNum = 30539776;BA.debugLine="Public Sub setNewVerApk(NVA As String)"; -RDebugUtils.currentLine=30539777; - //BA.debugLineNum = 30539777;BA.debugLine="sNewVerApk = NVA"; -__ref._snewverapk /*String*/ = _nva; -RDebugUtils.currentLine=30539778; - //BA.debugLineNum = 30539778;BA.debugLine="End Sub"; +public String _setnewverapk(String _nva) throws Exception{ + //BA.debugLineNum = 91;BA.debugLine="Public Sub setNewVerApk(NVA As String)"; + //BA.debugLineNum = 92;BA.debugLine="sNewVerApk = NVA"; +_snewverapk = _nva; + //BA.debugLineNum = 93;BA.debugLine="End Sub"; return ""; } -public String _setnewvertxt(keymon.lat.medicomed.cl_appupdate __ref,String _nvt) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "setnewvertxt", true)) - {return ((String) Debug.delegate(ba, "setnewvertxt", new Object[] {_nvt}));} -RDebugUtils.currentLine=30474240; - //BA.debugLineNum = 30474240;BA.debugLine="Public Sub setNewVerTxt(NVT As String)"; -RDebugUtils.currentLine=30474241; - //BA.debugLineNum = 30474241;BA.debugLine="sNewVerTxt = NVT"; -__ref._snewvertxt /*String*/ = _nvt; -RDebugUtils.currentLine=30474242; - //BA.debugLineNum = 30474242;BA.debugLine="End Sub"; +public String _setnewvertxt(String _nvt) throws Exception{ + //BA.debugLineNum = 86;BA.debugLine="Public Sub setNewVerTxt(NVT As String)"; + //BA.debugLineNum = 87;BA.debugLine="sNewVerTxt = NVT"; +_snewvertxt = _nvt; + //BA.debugLineNum = 88;BA.debugLine="End Sub"; return ""; } -public String _setpackagename(keymon.lat.medicomed.cl_appupdate __ref,String _pn) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "setpackagename", true)) - {return ((String) Debug.delegate(ba, "setpackagename", new Object[] {_pn}));} -RDebugUtils.currentLine=30343168; - //BA.debugLineNum = 30343168;BA.debugLine="Public Sub setPackageName(PN As String)"; -RDebugUtils.currentLine=30343169; - //BA.debugLineNum = 30343169;BA.debugLine="sPackageName = PN"; -__ref._spackagename /*String*/ = _pn; -RDebugUtils.currentLine=30343170; - //BA.debugLineNum = 30343170;BA.debugLine="End Sub"; +public String _setpackagename(String _pn) throws Exception{ + //BA.debugLineNum = 74;BA.debugLine="Public Sub setPackageName(PN As String)"; + //BA.debugLineNum = 75;BA.debugLine="sPackageName = PN"; +_spackagename = _pn; + //BA.debugLineNum = 76;BA.debugLine="End Sub"; return ""; } -public String _setverbose(keymon.lat.medicomed.cl_appupdate __ref,boolean _verbose) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "setverbose", true)) - {return ((String) Debug.delegate(ba, "setverbose", new Object[] {_verbose}));} -RDebugUtils.currentLine=30670848; - //BA.debugLineNum = 30670848;BA.debugLine="Public Sub setVerbose(Verbose As Boolean)"; -RDebugUtils.currentLine=30670849; - //BA.debugLineNum = 30670849;BA.debugLine="sVerbose = Verbose"; -__ref._sverbose /*boolean*/ = _verbose; -RDebugUtils.currentLine=30670850; - //BA.debugLineNum = 30670850;BA.debugLine="newinst2.svcVerbose = Verbose"; +public String _setverbose(boolean _verbose) throws Exception{ + //BA.debugLineNum = 102;BA.debugLine="Public Sub setVerbose(Verbose As Boolean)"; + //BA.debugLineNum = 103;BA.debugLine="sVerbose = Verbose"; +_sverbose = _verbose; + //BA.debugLineNum = 104;BA.debugLine="newinst2.svcVerbose = Verbose"; _newinst2._svcverbose /*boolean*/ = _verbose; -RDebugUtils.currentLine=30670851; - //BA.debugLineNum = 30670851;BA.debugLine="End Sub"; + //BA.debugLineNum = 105;BA.debugLine="End Sub"; return ""; } -public String _stopsplashscreen(keymon.lat.medicomed.cl_appupdate __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "stopsplashscreen", true)) - {return ((String) Debug.delegate(ba, "stopsplashscreen", null));} -RDebugUtils.currentLine=32505856; - //BA.debugLineNum = 32505856;BA.debugLine="Public Sub StopSplashScreen"; -RDebugUtils.currentLine=32505857; - //BA.debugLineNum = 32505857;BA.debugLine="If SplashShowing Then"; -if (__ref._splashshowing /*boolean*/ ) { -RDebugUtils.currentLine=32505858; - //BA.debugLineNum = 32505858;BA.debugLine="SplashShowing = False"; -__ref._splashshowing /*boolean*/ = __c.False; -RDebugUtils.currentLine=32505859; - //BA.debugLineNum = 32505859;BA.debugLine="pnlSplash.RemoveView"; -__ref._pnlsplash /*anywheresoftware.b4a.objects.PanelWrapper*/ .RemoveView(); +public String _stopsplashscreen() throws Exception{ + //BA.debugLineNum = 547;BA.debugLine="Public Sub StopSplashScreen"; + //BA.debugLineNum = 548;BA.debugLine="If SplashShowing Then"; +if (_splashshowing) { + //BA.debugLineNum = 549;BA.debugLine="SplashShowing = False"; +_splashshowing = __c.False; + //BA.debugLineNum = 550;BA.debugLine="pnlSplash.RemoveView"; +_pnlsplash.RemoveView(); }; -RDebugUtils.currentLine=32505861; - //BA.debugLineNum = 32505861;BA.debugLine="End Sub"; + //BA.debugLineNum = 552;BA.debugLine="End Sub"; return ""; } -public void _tryapkupdate(keymon.lat.medicomed.cl_appupdate __ref) throws Exception{ -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "tryapkupdate", true)) - {Debug.delegate(ba, "tryapkupdate", null); return;} -ResumableSub_TryApkUpdate rsub = new ResumableSub_TryApkUpdate(this,__ref); +public void _tryapkupdate() throws Exception{ +ResumableSub_TryApkUpdate rsub = new ResumableSub_TryApkUpdate(this); rsub.resume(ba, null); } public static class ResumableSub_TryApkUpdate extends BA.ResumableSub { -public ResumableSub_TryApkUpdate(keymon.lat.medicomed.cl_appupdate parent,keymon.lat.medicomed.cl_appupdate __ref) { +public ResumableSub_TryApkUpdate(keymon.lat.medicomed.cl_appupdate parent) { this.parent = parent; -this.__ref = __ref; -this.__ref = parent; } -keymon.lat.medicomed.cl_appupdate __ref; keymon.lat.medicomed.cl_appupdate parent; keymon.lat.medicomed.httpjob _j = null; anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out = null; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="cl_appupdate"; while (true) { try { @@ -1706,53 +1240,43 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=31457281; - //BA.debugLineNum = 31457281;BA.debugLine="LogColor($\"${TAB}-- TryApkUpdate\"$, LogColor1)"; -parent.__c.LogImpl("931457281",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"-- TryApkUpdate"),__ref._logcolor1 /*int*/ ); -RDebugUtils.currentLine=31457283; - //BA.debugLineNum = 31457283;BA.debugLine="If ((sStatusCode >= 0) And (sStatusCode <> NO_NEW"; + //BA.debugLineNum = 246;BA.debugLine="LogColor($\"${TAB}-- TryApkUpdate\"$, LogColor1)"; +parent.__c.LogImpl("93145729",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"-- TryApkUpdate"),parent._logcolor1); + //BA.debugLineNum = 248;BA.debugLine="If ((sStatusCode >= 0) And (sStatusCode <> NO_NEW"; if (true) break; case 1: //if this.state = 44; -if (((__ref._sstatuscode /*int*/ >=0) && (__ref._sstatuscode /*int*/ !=__ref._no_newerapk /*int*/ ))) { +if (((parent._sstatuscode>=0) && (parent._sstatuscode!=parent._no_newerapk))) { this.state = 3; }if (true) break; case 3: //C this.state = 4; -RDebugUtils.currentLine=31457285; - //BA.debugLineNum = 31457285;BA.debugLine="Dim j As HttpJob"; + //BA.debugLineNum = 250;BA.debugLine="Dim j As HttpJob"; _j = new keymon.lat.medicomed.httpjob(); -RDebugUtils.currentLine=31457286; - //BA.debugLineNum = 31457286;BA.debugLine="j.Initialize(\"\", Me)"; -_j._initialize /*String*/ (null,ba,"",parent); -RDebugUtils.currentLine=31457287; - //BA.debugLineNum = 31457287;BA.debugLine="j.Username = sUserName"; -_j._username /*String*/ = __ref._susername /*String*/ ; -RDebugUtils.currentLine=31457288; - //BA.debugLineNum = 31457288;BA.debugLine="j.Password = sUPassword"; -_j._password /*String*/ = __ref._supassword /*String*/ ; -RDebugUtils.currentLine=31457289; - //BA.debugLineNum = 31457289;BA.debugLine="j.Download(sNewVerApk) 'ex: jobapk.Downlo"; -_j._download /*String*/ (null,__ref._snewverapk /*String*/ ); -RDebugUtils.currentLine=31457290; - //BA.debugLineNum = 31457290;BA.debugLine="Wait For (j) JobDone(j As HttpJob)"; -parent.__c.WaitFor("jobdone", ba, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "cl_appupdate", "tryapkupdate"), (Object)(_j)); + //BA.debugLineNum = 251;BA.debugLine="j.Initialize(\"\", Me)"; +_j._initialize /*String*/ (ba,"",parent); + //BA.debugLineNum = 252;BA.debugLine="j.Username = sUserName"; +_j._username /*String*/ = parent._susername; + //BA.debugLineNum = 253;BA.debugLine="j.Password = sUPassword"; +_j._password /*String*/ = parent._supassword; + //BA.debugLineNum = 254;BA.debugLine="j.Download(sNewVerApk) 'ex: jobapk.Downlo"; +_j._download /*String*/ (parent._snewverapk); + //BA.debugLineNum = 255;BA.debugLine="Wait For (j) JobDone(j As HttpJob)"; +parent.__c.WaitFor("jobdone", ba, this, (Object)(_j)); this.state = 45; return; case 45: //C this.state = 4; -_j = (keymon.lat.medicomed.httpjob) result[1]; +_j = (keymon.lat.medicomed.httpjob) result[0]; ; -RDebugUtils.currentLine=31457291; - //BA.debugLineNum = 31457291;BA.debugLine="Log($\"Donload ok? ${j.Success}\"$)"; -parent.__c.LogImpl("931457291",("Donload ok? "+parent.__c.SmartStringFormatter("",(Object)(_j._success /*boolean*/ ))+""),0); -RDebugUtils.currentLine=31457292; - //BA.debugLineNum = 31457292;BA.debugLine="If j.Success Then"; + //BA.debugLineNum = 256;BA.debugLine="Log($\"Donload ok? ${j.Success}\"$)"; +parent.__c.LogImpl("93145739",("Donload ok? "+parent.__c.SmartStringFormatter("",(Object)(_j._success /*boolean*/ ))+""),0); + //BA.debugLineNum = 257;BA.debugLine="If j.Success Then"; if (true) break; case 4: @@ -1767,8 +1291,7 @@ this.state = 26; case 6: //C this.state = 7; -RDebugUtils.currentLine=31457293; - //BA.debugLineNum = 31457293;BA.debugLine="Try"; + //BA.debugLineNum = 258;BA.debugLine="Try"; if (true) break; case 7: @@ -1782,39 +1305,32 @@ case 9: //C this.state = 10; this.catchState = 17; -RDebugUtils.currentLine=31457295; - //BA.debugLineNum = 31457295;BA.debugLine="Dim out As OutputStream"; + //BA.debugLineNum = 260;BA.debugLine="Dim out As OutputStream"; _out = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); -RDebugUtils.currentLine=31457296; - //BA.debugLineNum = 31457296;BA.debugLine="out = File.OpenOutput(SharedFolder,\"tmp.apk\",F"; -_out = parent.__c.File.OpenOutput(__ref._sharedfolder /*String*/ ,"tmp.apk",parent.__c.False); -RDebugUtils.currentLine=31457297; - //BA.debugLineNum = 31457297;BA.debugLine="File.Copy2(j.GetInputStream, out)"; -parent.__c.File.Copy2((java.io.InputStream)(_j._getinputstream /*anywheresoftware.b4a.objects.streams.File.InputStreamWrapper*/ (null).getObject()),(java.io.OutputStream)(_out.getObject())); -RDebugUtils.currentLine=31457298; - //BA.debugLineNum = 31457298;BA.debugLine="out.Close"; + //BA.debugLineNum = 261;BA.debugLine="out = File.OpenOutput(SharedFolder,\"tmp.apk\",F"; +_out = parent.__c.File.OpenOutput(parent._sharedfolder,"tmp.apk",parent.__c.False); + //BA.debugLineNum = 262;BA.debugLine="File.Copy2(j.GetInputStream, out)"; +parent.__c.File.Copy2((java.io.InputStream)(_j._getinputstream /*anywheresoftware.b4a.objects.streams.File.InputStreamWrapper*/ ().getObject()),(java.io.OutputStream)(_out.getObject())); + //BA.debugLineNum = 263;BA.debugLine="out.Close"; _out.Close(); -RDebugUtils.currentLine=31457299; - //BA.debugLineNum = 31457299;BA.debugLine="Log($\"Copy2 (saving) ok? TRUE\"$)"; -parent.__c.LogImpl("931457299",("Copy2 (saving) ok? TRUE"),0); -RDebugUtils.currentLine=31457300; - //BA.debugLineNum = 31457300;BA.debugLine="sStatusCode = OK_DOWNLOAD"; -__ref._sstatuscode /*int*/ = __ref._ok_download /*int*/ ; -RDebugUtils.currentLine=31457301; - //BA.debugLineNum = 31457301;BA.debugLine="If sVerbose Then Log($\"${TAB}new apk version d"; + //BA.debugLineNum = 264;BA.debugLine="Log($\"Copy2 (saving) ok? TRUE\"$)"; +parent.__c.LogImpl("93145747",("Copy2 (saving) ok? TRUE"),0); + //BA.debugLineNum = 265;BA.debugLine="sStatusCode = OK_DOWNLOAD"; +parent._sstatuscode = parent._ok_download; + //BA.debugLineNum = 266;BA.debugLine="If sVerbose Then Log($\"${TAB}new apk version d"; if (true) break; case 10: //if this.state = 15; -if (__ref._sverbose /*boolean*/ ) { +if (parent._sverbose) { this.state = 12; ;}if (true) break; case 12: //C this.state = 15; -parent.__c.LogImpl("931457301",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"new apk version downloaded and ready to install"),0); +parent.__c.LogImpl("93145749",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"new apk version downloaded and ready to install"),0); if (true) break; case 15: @@ -1827,35 +1343,31 @@ case 17: //C this.state = 18; this.catchState = 0; -RDebugUtils.currentLine=31457303; - //BA.debugLineNum = 31457303;BA.debugLine="Log($\"Copy2 (saving) ok? FALSE\"$)"; -parent.__c.LogImpl("931457303",("Copy2 (saving) ok? FALSE"),0); -RDebugUtils.currentLine=31457304; - //BA.debugLineNum = 31457304;BA.debugLine="sStatusCode = ERR_DOWNLOAD"; -__ref._sstatuscode /*int*/ = __ref._err_download /*int*/ ; -RDebugUtils.currentLine=31457305; - //BA.debugLineNum = 31457305;BA.debugLine="If sVerbose Then Log($\"${TAB}failed download o"; + //BA.debugLineNum = 268;BA.debugLine="Log($\"Copy2 (saving) ok? FALSE\"$)"; +parent.__c.LogImpl("93145751",("Copy2 (saving) ok? FALSE"),0); + //BA.debugLineNum = 269;BA.debugLine="sStatusCode = ERR_DOWNLOAD"; +parent._sstatuscode = parent._err_download; + //BA.debugLineNum = 270;BA.debugLine="If sVerbose Then Log($\"${TAB}failed download o"; if (true) break; case 18: //if this.state = 23; -if (__ref._sverbose /*boolean*/ ) { +if (parent._sverbose) { this.state = 20; ;}if (true) break; case 20: //C this.state = 23; -parent.__c.LogImpl("931457305",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"failed download of new apk version"),0); +parent.__c.LogImpl("93145753",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"failed download of new apk version"),0); if (true) break; case 23: //C this.state = 24; ; -RDebugUtils.currentLine=31457306; - //BA.debugLineNum = 31457306;BA.debugLine="ToastMessageShow(LastException, True)"; + //BA.debugLineNum = 271;BA.debugLine="ToastMessageShow(LastException, True)"; parent.__c.ToastMessageShow(BA.ObjectToCharSequence(parent.__c.LastException(ba).getObject()),parent.__c.True); if (true) break; if (true) break; @@ -1870,35 +1382,31 @@ this.catchState = 0; case 26: //C this.state = 27; -RDebugUtils.currentLine=31457309; - //BA.debugLineNum = 31457309;BA.debugLine="Log($\"${TAB}Error: ${J.ErrorMessage}\"$)"; -parent.__c.LogImpl("931457309",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"Error: "+parent.__c.SmartStringFormatter("",(Object)(_j._errormessage /*String*/ ))+""),0); -RDebugUtils.currentLine=31457310; - //BA.debugLineNum = 31457310;BA.debugLine="sStatusCode = ERR_HTTP"; -__ref._sstatuscode /*int*/ = __ref._err_http /*int*/ ; -RDebugUtils.currentLine=31457311; - //BA.debugLineNum = 31457311;BA.debugLine="If sVerbose Then Log($\"${TAB}error in httputils"; + //BA.debugLineNum = 274;BA.debugLine="Log($\"${TAB}Error: ${J.ErrorMessage}\"$)"; +parent.__c.LogImpl("93145757",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"Error: "+parent.__c.SmartStringFormatter("",(Object)(_j._errormessage /*String*/ ))+""),0); + //BA.debugLineNum = 275;BA.debugLine="sStatusCode = ERR_HTTP"; +parent._sstatuscode = parent._err_http; + //BA.debugLineNum = 276;BA.debugLine="If sVerbose Then Log($\"${TAB}error in httputils"; if (true) break; case 27: //if this.state = 32; -if (__ref._sverbose /*boolean*/ ) { +if (parent._sverbose) { this.state = 29; ;}if (true) break; case 29: //C this.state = 32; -parent.__c.LogImpl("931457311",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"error in httputils2"),0); +parent.__c.LogImpl("93145759",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"error in httputils2"),0); if (true) break; case 32: //C this.state = 33; ; -RDebugUtils.currentLine=31457312; - //BA.debugLineNum = 31457312;BA.debugLine="ToastMessageShow($\"Error: ${J.ErrorMessage}\"$,"; + //BA.debugLineNum = 277;BA.debugLine="ToastMessageShow($\"Error: ${J.ErrorMessage}\"$,"; parent.__c.ToastMessageShow(BA.ObjectToCharSequence(("Error: "+parent.__c.SmartStringFormatter("",(Object)(_j._errormessage /*String*/ ))+"")),parent.__c.True); if (true) break; @@ -1906,44 +1414,39 @@ case 33: //C this.state = 34; ; -RDebugUtils.currentLine=31457314; - //BA.debugLineNum = 31457314;BA.debugLine="j.Release"; -_j._release /*String*/ (null); -RDebugUtils.currentLine=31457315; - //BA.debugLineNum = 31457315;BA.debugLine="If sStatusCode == OK_DOWNLOAD Then"; + //BA.debugLineNum = 279;BA.debugLine="j.Release"; +_j._release /*String*/ (); + //BA.debugLineNum = 280;BA.debugLine="If sStatusCode == OK_DOWNLOAD Then"; if (true) break; case 34: //if this.state = 43; -if (__ref._sstatuscode /*int*/ ==__ref._ok_download /*int*/ ) { +if (parent._sstatuscode==parent._ok_download) { this.state = 36; }if (true) break; case 36: //C this.state = 37; -RDebugUtils.currentLine=31457316; - //BA.debugLineNum = 31457316;BA.debugLine="SendInstallIntent"; -__ref._sendinstallintent /*String*/ (null); -RDebugUtils.currentLine=31457317; - //BA.debugLineNum = 31457317;BA.debugLine="sStatusCode = OK_INSTALL"; -__ref._sstatuscode /*int*/ = __ref._ok_install /*int*/ ; -RDebugUtils.currentLine=31457318; - //BA.debugLineNum = 31457318;BA.debugLine="If sVerbose Then Log($\"${TAB}user asked to inst"; + //BA.debugLineNum = 281;BA.debugLine="SendInstallIntent"; +parent._sendinstallintent(); + //BA.debugLineNum = 282;BA.debugLine="sStatusCode = OK_INSTALL"; +parent._sstatuscode = parent._ok_install; + //BA.debugLineNum = 283;BA.debugLine="If sVerbose Then Log($\"${TAB}user asked to inst"; if (true) break; case 37: //if this.state = 42; -if (__ref._sverbose /*boolean*/ ) { +if (parent._sverbose) { this.state = 39; ;}if (true) break; case 39: //C this.state = 42; -parent.__c.LogImpl("931457318",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"user asked to install new apk"),0); +parent.__c.LogImpl("93145766",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"user asked to install new apk"),0); if (true) break; case 42: @@ -1962,11 +1465,9 @@ case 44: //C this.state = -1; ; -RDebugUtils.currentLine=31457321; - //BA.debugLineNum = 31457321;BA.debugLine="Finito"; -__ref._finito /*String*/ (null); -RDebugUtils.currentLine=31457322; - //BA.debugLineNum = 31457322;BA.debugLine="End Sub"; + //BA.debugLineNum = 286;BA.debugLine="Finito"; +parent._finito(); + //BA.debugLineNum = 287;BA.debugLine="End Sub"; if (true) break; }} catch (Exception e0) { @@ -1980,21 +1481,15 @@ ba.setLastException(e0);} } } } -public void _updateapk(keymon.lat.medicomed.cl_appupdate __ref,boolean _pstatus) throws Exception{ -RDebugUtils.currentModule="cl_appupdate"; -if (Debug.shouldDelegate(ba, "updateapk", true)) - {Debug.delegate(ba, "updateapk", new Object[] {_pstatus}); return;} -ResumableSub_UpdateApk rsub = new ResumableSub_UpdateApk(this,__ref,_pstatus); +public void _updateapk(boolean _pstatus) throws Exception{ +ResumableSub_UpdateApk rsub = new ResumableSub_UpdateApk(this,_pstatus); rsub.resume(ba, null); } public static class ResumableSub_UpdateApk extends BA.ResumableSub { -public ResumableSub_UpdateApk(keymon.lat.medicomed.cl_appupdate parent,keymon.lat.medicomed.cl_appupdate __ref,boolean _pstatus) { +public ResumableSub_UpdateApk(keymon.lat.medicomed.cl_appupdate parent,boolean _pstatus) { this.parent = parent; -this.__ref = __ref; this._pstatus = _pstatus; -this.__ref = parent; } -keymon.lat.medicomed.cl_appupdate __ref; keymon.lat.medicomed.cl_appupdate parent; boolean _pstatus; boolean _okwebver = false; @@ -2002,7 +1497,6 @@ long _fsize = 0L; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="cl_appupdate"; while (true) { switch (state) { @@ -2012,11 +1506,9 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=31391745; - //BA.debugLineNum = 31391745;BA.debugLine="LogColor(\"---- AppUpdating.UpdateApk\", LogColor1)"; -parent.__c.LogImpl("931391745","---- AppUpdating.UpdateApk",__ref._logcolor1 /*int*/ ); -RDebugUtils.currentLine=31391746; - //BA.debugLineNum = 31391746;BA.debugLine="If Not(pstatus) Then"; + //BA.debugLineNum = 211;BA.debugLine="LogColor(\"---- AppUpdating.UpdateApk\", LogColor1)"; +parent.__c.LogImpl("93080193","---- AppUpdating.UpdateApk",parent._logcolor1); + //BA.debugLineNum = 212;BA.debugLine="If Not(pstatus) Then"; if (true) break; case 1: @@ -2031,24 +1523,22 @@ this.state = 11; case 3: //C this.state = 4; -RDebugUtils.currentLine=31391747; - //BA.debugLineNum = 31391747;BA.debugLine="sStatusCode = ERR_NOPERM"; -__ref._sstatuscode /*int*/ = __ref._err_noperm /*int*/ ; -RDebugUtils.currentLine=31391748; - //BA.debugLineNum = 31391748;BA.debugLine="If sVerbose Then Log(TAB & \"no permissions from"; + //BA.debugLineNum = 213;BA.debugLine="sStatusCode = ERR_NOPERM"; +parent._sstatuscode = parent._err_noperm; + //BA.debugLineNum = 214;BA.debugLine="If sVerbose Then Log(TAB & \"no permissions from"; if (true) break; case 4: //if this.state = 9; -if (__ref._sverbose /*boolean*/ ) { +if (parent._sverbose) { this.state = 6; ;}if (true) break; case 6: //C this.state = 9; -parent.__c.LogImpl("931391748",parent.__c.TAB+"no permissions from user to install new apk",0); +parent.__c.LogImpl("93080196",parent.__c.TAB+"no permissions from user to install new apk",0); if (true) break; case 9: @@ -2060,38 +1550,35 @@ this.state = 61; case 11: //C this.state = 12; -RDebugUtils.currentLine=31391750; - //BA.debugLineNum = 31391750;BA.debugLine="Wait For(IsvalidWV) Complete (OkWebVer As Boolea"; -parent.__c.WaitFor("complete", ba, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "cl_appupdate", "updateapk"), __ref._isvalidwv /*anywheresoftware.b4a.keywords.Common.ResumableSubWrapper*/ (null)); + //BA.debugLineNum = 216;BA.debugLine="Wait For(IsvalidWV) Complete (OkWebVer As Boolea"; +parent.__c.WaitFor("complete", ba, this, parent._isvalidwv()); this.state = 62; return; case 62: //C this.state = 12; -_okwebver = (Boolean) result[1]; +_okwebver = (Boolean) result[0]; ; -RDebugUtils.currentLine=31391751; - //BA.debugLineNum = 31391751;BA.debugLine="If (IsValidCV And OkWebVer) Then 'here we"; + //BA.debugLineNum = 217;BA.debugLine="If (IsValidCV And OkWebVer) Then 'here we"; if (true) break; case 12: //if this.state = 60; -if ((__ref._isvalidcv /*boolean*/ (null) && _okwebver)) { +if ((parent._isvalidcv() && _okwebver)) { this.state = 14; }if (true) break; case 14: //C this.state = 15; -RDebugUtils.currentLine=31391752; - //BA.debugLineNum = 31391752;BA.debugLine="If curver < webver Then"; + //BA.debugLineNum = 218;BA.debugLine="If curver < webver Then"; if (true) break; case 15: //if this.state = 59; -if ((double)(Double.parseDouble(__ref._curver /*String*/ ))<(double)(Double.parseDouble(__ref._webver /*String*/ ))) { +if ((double)(Double.parseDouble(parent._curver))<(double)(Double.parseDouble(parent._webver))) { this.state = 17; }else { this.state = 52; @@ -2100,55 +1587,50 @@ this.state = 52; case 17: //C this.state = 18; -RDebugUtils.currentLine=31391754; - //BA.debugLineNum = 31391754;BA.debugLine="If IsNumber(webfsize) Then"; + //BA.debugLineNum = 220;BA.debugLine="If IsNumber(webfsize) Then"; if (true) break; case 18: //if this.state = 31; -if (parent.__c.IsNumber(__ref._webfsize /*String*/ )) { +if (parent.__c.IsNumber(parent._webfsize)) { this.state = 20; }if (true) break; case 20: //C this.state = 21; -RDebugUtils.currentLine=31391755; - //BA.debugLineNum = 31391755;BA.debugLine="Dim fsize As Long = webfsize"; -_fsize = (long)(Double.parseDouble(__ref._webfsize /*String*/ )); -RDebugUtils.currentLine=31391756; - //BA.debugLineNum = 31391756;BA.debugLine="If fsize*2 > GetFreeSpace Then"; + //BA.debugLineNum = 221;BA.debugLine="Dim fsize As Long = webfsize"; +_fsize = (long)(Double.parseDouble(parent._webfsize)); + //BA.debugLineNum = 222;BA.debugLine="If fsize*2 > GetFreeSpace Then"; if (true) break; case 21: //if this.state = 30; -if (_fsize*2>__ref._getfreespace /*long*/ (null)) { +if (_fsize*2>parent._getfreespace()) { this.state = 23; }if (true) break; case 23: //C this.state = 24; -RDebugUtils.currentLine=31391757; - //BA.debugLineNum = 31391757;BA.debugLine="sStatusCode = ERR_NOSPACE"; -__ref._sstatuscode /*int*/ = __ref._err_nospace /*int*/ ; -RDebugUtils.currentLine=31391758; - //BA.debugLineNum = 31391758;BA.debugLine="If sVerbose Then Log($\"${TAB}no enough avail"; + //BA.debugLineNum = 223;BA.debugLine="sStatusCode = ERR_NOSPACE"; +parent._sstatuscode = parent._err_nospace; + //BA.debugLineNum = 224;BA.debugLine="If sVerbose Then Log($\"${TAB}no enough avail"; if (true) break; case 24: //if this.state = 29; -if (__ref._sverbose /*boolean*/ ) { +if (parent._sverbose) { this.state = 26; ;}if (true) break; case 26: //C this.state = 29; -parent.__c.LogImpl("931391758",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"no enough available space to download apk"),0); +parent.__c.LogImpl("93080206",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"no enough available space to download apk"),0); if (true) break; case 29: @@ -2163,75 +1645,69 @@ this.state = 31; ; if (true) break; ; -RDebugUtils.currentLine=31391761; - //BA.debugLineNum = 31391761;BA.debugLine="If sStatusCode >= 0 Then"; + //BA.debugLineNum = 227;BA.debugLine="If sStatusCode >= 0 Then"; case 31: //if this.state = 50; -if (__ref._sstatuscode /*int*/ >=0) { +if (parent._sstatuscode>=0) { this.state = 33; }if (true) break; case 33: //C this.state = 34; -RDebugUtils.currentLine=31391762; - //BA.debugLineNum = 31391762;BA.debugLine="sStatusCode = OK_NEWERAPK 'info file tells"; -__ref._sstatuscode /*int*/ = __ref._ok_newerapk /*int*/ ; -RDebugUtils.currentLine=31391763; - //BA.debugLineNum = 31391763;BA.debugLine="If sVerbose Then Log($\"${TAB}Newer version av"; + //BA.debugLineNum = 228;BA.debugLine="sStatusCode = OK_NEWERAPK 'info file tells"; +parent._sstatuscode = parent._ok_newerapk; + //BA.debugLineNum = 229;BA.debugLine="If sVerbose Then Log($\"${TAB}Newer version av"; if (true) break; case 34: //if this.state = 39; -if (__ref._sverbose /*boolean*/ ) { +if (parent._sverbose) { this.state = 36; ;}if (true) break; case 36: //C this.state = 39; -parent.__c.LogImpl("931391763",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"Newer version available. Now I try its downloading"),0); +parent.__c.LogImpl("93080211",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"Newer version available. Now I try its downloading"),0); if (true) break; case 39: //C this.state = 40; ; -RDebugUtils.currentLine=31391764; - //BA.debugLineNum = 31391764;BA.debugLine="If sNewVerApk = \"\" Then"; + //BA.debugLineNum = 230;BA.debugLine="If sNewVerApk = \"\" Then"; if (true) break; case 40: //if this.state = 49; -if ((__ref._snewverapk /*String*/ ).equals("")) { +if ((parent._snewverapk).equals("")) { this.state = 42; }if (true) break; case 42: //C this.state = 43; -RDebugUtils.currentLine=31391765; - //BA.debugLineNum = 31391765;BA.debugLine="sStatusCode = ERR_NOAPK"; -__ref._sstatuscode /*int*/ = __ref._err_noapk /*int*/ ; -RDebugUtils.currentLine=31391766; - //BA.debugLineNum = 31391766;BA.debugLine="If sVerbose Then Log($\"${TAB}missing apk fil"; + //BA.debugLineNum = 231;BA.debugLine="sStatusCode = ERR_NOAPK"; +parent._sstatuscode = parent._err_noapk; + //BA.debugLineNum = 232;BA.debugLine="If sVerbose Then Log($\"${TAB}missing apk fil"; if (true) break; case 43: //if this.state = 48; -if (__ref._sverbose /*boolean*/ ) { +if (parent._sverbose) { this.state = 45; ;}if (true) break; case 45: //C this.state = 48; -parent.__c.LogImpl("931391766",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"missing apk file full path indication"),0); +parent.__c.LogImpl("93080214",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"missing apk file full path indication"),0); if (true) break; case 48: @@ -2255,24 +1731,22 @@ this.state = 59; case 52: //C this.state = 53; -RDebugUtils.currentLine=31391770; - //BA.debugLineNum = 31391770;BA.debugLine="sStatusCode = NO_NEWERAPK"; -__ref._sstatuscode /*int*/ = __ref._no_newerapk /*int*/ ; -RDebugUtils.currentLine=31391771; - //BA.debugLineNum = 31391771;BA.debugLine="If sVerbose Then Log($\"${TAB}No newer version"; + //BA.debugLineNum = 236;BA.debugLine="sStatusCode = NO_NEWERAPK"; +parent._sstatuscode = parent._no_newerapk; + //BA.debugLineNum = 237;BA.debugLine="If sVerbose Then Log($\"${TAB}No newer version"; if (true) break; case 53: //if this.state = 58; -if (__ref._sverbose /*boolean*/ ) { +if (parent._sverbose) { this.state = 55; ;}if (true) break; case 55: //C this.state = 58; -parent.__c.LogImpl("931391771",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"No newer version available on webserver."),0); +parent.__c.LogImpl("93080219",(""+parent.__c.SmartStringFormatter("",(Object)(parent.__c.TAB))+"No newer version available on webserver."),0); if (true) break; case 58: @@ -2297,15 +1771,17 @@ case 61: //C this.state = -1; ; -RDebugUtils.currentLine=31391775; - //BA.debugLineNum = 31391775;BA.debugLine="TryApkUpdate 'if available and permitted, do"; -__ref._tryapkupdate /*void*/ (null); -RDebugUtils.currentLine=31391776; - //BA.debugLineNum = 31391776;BA.debugLine="End Sub"; + //BA.debugLineNum = 241;BA.debugLine="TryApkUpdate 'if available and permitted, do"; +parent._tryapkupdate(); + //BA.debugLineNum = 242;BA.debugLine="End Sub"; if (true) break; } } } } -} \ No newline at end of file +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/dbrequestmanager.java b/B4A/Objects/src/keymon/lat/medicomed/dbrequestmanager.java index c8a05af..25780b2 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/dbrequestmanager.java +++ b/B4A/Objects/src/keymon/lat/medicomed/dbrequestmanager.java @@ -10,7 +10,7 @@ public class dbrequestmanager extends B4AClass.ImplB4AClass implements BA.SubDel private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.dbrequestmanager"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.dbrequestmanager"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,13 +23,34 @@ public class dbrequestmanager extends B4AClass.ImplB4AClass implements BA.SubDel 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 Object _mtarget = null; +public String _link = ""; +public anywheresoftware.b4a.agraham.byteconverter.ByteConverter _bc = null; +public byte _t_null = (byte)0; +public byte _t_string = (byte)0; +public byte _t_short = (byte)0; +public byte _t_int = (byte)0; +public byte _t_long = (byte)0; +public byte _t_float = (byte)0; +public byte _t_double = (byte)0; +public byte _t_boolean = (byte)0; +public byte _t_blob = (byte)0; +public float _version = 0f; +public Object[] _temparray = null; +public String _jobtaganterior = ""; +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 static class _dbresult{ public boolean IsInitialized; public Object Tag; @@ -65,96 +86,150 @@ Parameters[i0] = new Object(); public String toString() { return BA.TypeToString(this, false); }} -public anywheresoftware.b4a.keywords.Common __c = null; -public Object _mtarget = null; -public String _link = ""; -public anywheresoftware.b4a.agraham.byteconverter.ByteConverter _bc = null; -public byte _t_null = (byte)0; -public byte _t_string = (byte)0; -public byte _t_short = (byte)0; -public byte _t_int = (byte)0; -public byte _t_long = (byte)0; -public byte _t_float = (byte)0; -public byte _t_double = (byte)0; -public byte _t_boolean = (byte)0; -public byte _t_blob = (byte)0; -public float _version = 0f; -public Object[] _temparray = null; -public String _jobtaganterior = ""; -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 _initialize(keymon.lat.medicomed.dbrequestmanager __ref,anywheresoftware.b4a.BA _ba,Object _target,String _connectorlink) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="dbrequestmanager"; -if (Debug.shouldDelegate(ba, "initialize", false)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_target,_connectorlink}));} -RDebugUtils.currentLine=27131904; - //BA.debugLineNum = 27131904;BA.debugLine="Public Sub Initialize (Target As Object, Connector"; -RDebugUtils.currentLine=27131905; - //BA.debugLineNum = 27131905;BA.debugLine="mTarget = Target"; -__ref._mtarget /*Object*/ = _target; -RDebugUtils.currentLine=27131906; - //BA.debugLineNum = 27131906;BA.debugLine="link = ConnectorLink"; -__ref._link /*String*/ = _connectorlink; -RDebugUtils.currentLine=27131907; - //BA.debugLineNum = 27131907;BA.debugLine="End Sub"; +public anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _bytestoimage(byte[] _bytes) throws Exception{ +anywheresoftware.b4a.objects.streams.File.InputStreamWrapper _in = null; +anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _bmp = null; + //BA.debugLineNum = 242;BA.debugLine="Public Sub BytesToImage(bytes() As Byte) As Bitmap"; + //BA.debugLineNum = 243;BA.debugLine="Dim In As InputStream"; +_in = new anywheresoftware.b4a.objects.streams.File.InputStreamWrapper(); + //BA.debugLineNum = 244;BA.debugLine="In.InitializeFromBytesArray(bytes, 0, bytes.Lengt"; +_in.InitializeFromBytesArray(_bytes,(int) (0),_bytes.length); + //BA.debugLineNum = 245;BA.debugLine="Dim bmp As Bitmap"; +_bmp = new anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper(); + //BA.debugLineNum = 246;BA.debugLine="bmp.Initialize2(In)"; +_bmp.Initialize2((java.io.InputStream)(_in.getObject())); + //BA.debugLineNum = 247;BA.debugLine="Return bmp"; +if (true) return _bmp; + //BA.debugLineNum = 248;BA.debugLine="End Sub"; +return null; +} +public String _class_globals() throws Exception{ + //BA.debugLineNum = 4;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 5;BA.debugLine="Private mTarget As Object"; +_mtarget = new Object(); + //BA.debugLineNum = 6;BA.debugLine="Type DBResult (Tag As Object, Columns As Map, Row"; +; + //BA.debugLineNum = 7;BA.debugLine="Type DBCommand (Name As String, Parameters() As O"; +; + //BA.debugLineNum = 8;BA.debugLine="Private link As String"; +_link = ""; + //BA.debugLineNum = 9;BA.debugLine="Private bc As ByteConverter"; +_bc = new anywheresoftware.b4a.agraham.byteconverter.ByteConverter(); + //BA.debugLineNum = 10;BA.debugLine="Private T_NULL = 0, T_STRING = 1, T_SHORT = 2, T_"; +_t_null = (byte) (0); +_t_string = (byte) (1); +_t_short = (byte) (2); +_t_int = (byte) (3); +_t_long = (byte) (4); +_t_float = (byte) (5); +_t_double = (byte) (6); +_t_boolean = (byte) (7); +_t_blob = (byte) (8); + //BA.debugLineNum = 12;BA.debugLine="Private VERSION As Float = 0.9"; +_version = (float) (0.9); + //BA.debugLineNum = 13;BA.debugLine="Private tempArray(1) As Object"; +_temparray = new Object[(int) (1)]; +{ +int d0 = _temparray.length; +for (int i0 = 0;i0 < d0;i0++) { +_temparray[i0] = new Object(); +} +} +; + //BA.debugLineNum = 14;BA.debugLine="Dim jobTagAnterior As String = \"\" 'Mod por CHV -"; +_jobtaganterior = ""; + //BA.debugLineNum = 15;BA.debugLine="End Sub"; return ""; } -public String _executequery(keymon.lat.medicomed.dbrequestmanager __ref,keymon.lat.medicomed.dbrequestmanager._dbcommand _command,int _limit,Object _tag) throws Exception{ -__ref = this; -RDebugUtils.currentModule="dbrequestmanager"; -if (Debug.shouldDelegate(ba, "executequery", false)) - {return ((String) Debug.delegate(ba, "executequery", new Object[] {_command,_limit,_tag}));} +public String _executebatch(anywheresoftware.b4a.objects.collections.List _listofcommands,Object _tag) throws Exception{ keymon.lat.medicomed.httpjob _j = null; anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _ms = null; anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out2 = null; -RDebugUtils.currentLine=27197440; - //BA.debugLineNum = 27197440;BA.debugLine="Public Sub ExecuteQuery(Command As DBCommand, Limi"; -RDebugUtils.currentLine=27197441; - //BA.debugLineNum = 27197441;BA.debugLine="Dim j As HttpJob"; +keymon.lat.medicomed.dbrequestmanager._dbcommand _command = null; + //BA.debugLineNum = 43;BA.debugLine="Public Sub ExecuteBatch(ListOfCommands As List, Ta"; + //BA.debugLineNum = 44;BA.debugLine="Dim j As HttpJob"; _j = new keymon.lat.medicomed.httpjob(); -RDebugUtils.currentLine=27197442; - //BA.debugLineNum = 27197442;BA.debugLine="Dim ms As OutputStream"; + //BA.debugLineNum = 45;BA.debugLine="Dim ms As OutputStream"; _ms = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); -RDebugUtils.currentLine=27197443; - //BA.debugLineNum = 27197443;BA.debugLine="Dim out2 As OutputStream = StartJob(j,ms, Tag)"; + //BA.debugLineNum = 46;BA.debugLine="Dim out2 As OutputStream = StartJob(j,ms, Tag)"; _out2 = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); -_out2 = __ref._startjob /*anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper*/ (null,_j,_ms,_tag); -RDebugUtils.currentLine=27197445; - //BA.debugLineNum = 27197445;BA.debugLine="WriteObject(Command.Name, out2)"; -__ref._writeobject /*String*/ (null,(Object)(_command.Name /*String*/ ),_out2); -RDebugUtils.currentLine=27197446; - //BA.debugLineNum = 27197446;BA.debugLine="WriteInt(Limit, out2)"; -__ref._writeint /*String*/ (null,_limit,_out2); -RDebugUtils.currentLine=27197447; - //BA.debugLineNum = 27197447;BA.debugLine="WriteList(Command.Parameters, out2)"; -__ref._writelist /*String*/ (null,anywheresoftware.b4a.keywords.Common.ArrayToList(_command.Parameters /*Object[]*/ ),_out2); -RDebugUtils.currentLine=27197448; - //BA.debugLineNum = 27197448;BA.debugLine="out2.Close"; +_out2 = _startjob(_j,_ms,_tag); + //BA.debugLineNum = 47;BA.debugLine="WriteInt(ListOfCommands.Size, out2)"; +_writeint(_listofcommands.getSize(),_out2); + //BA.debugLineNum = 48;BA.debugLine="For Each Command As DBCommand In ListOfCommands"; +{ +final anywheresoftware.b4a.BA.IterableList group5 = _listofcommands; +final int groupLen5 = group5.getSize() +;int index5 = 0; +; +for (; index5 < groupLen5;index5++){ +_command = (keymon.lat.medicomed.dbrequestmanager._dbcommand)(group5.Get(index5)); + //BA.debugLineNum = 49;BA.debugLine="WriteObject(Command.Name, out2)"; +_writeobject((Object)(_command.Name /*String*/ ),_out2); + //BA.debugLineNum = 50;BA.debugLine="WriteList(Command.Parameters, out2)"; +_writelist(anywheresoftware.b4a.keywords.Common.ArrayToList(_command.Parameters /*Object[]*/ ),_out2); + } +}; + //BA.debugLineNum = 52;BA.debugLine="out2.Close"; _out2.Close(); -RDebugUtils.currentLine=27197449; - //BA.debugLineNum = 27197449;BA.debugLine="j.PostBytes(link & \"?method=query\", ms.ToBytesArr"; -_j._postbytes /*String*/ (null,__ref._link /*String*/ +"?method=query",_ms.ToBytesArray()); -RDebugUtils.currentLine=27197450; - //BA.debugLineNum = 27197450;BA.debugLine="End Sub"; + //BA.debugLineNum = 53;BA.debugLine="j.PostBytes(link & \"?method=batch\", ms.ToBytesArr"; +_j._postbytes /*String*/ (_link+"?method=batch",_ms.ToBytesArray()); + //BA.debugLineNum = 54;BA.debugLine="End Sub"; return ""; } -public keymon.lat.medicomed.dbrequestmanager._dbresult _handlejob(keymon.lat.medicomed.dbrequestmanager __ref,keymon.lat.medicomed.httpjob _job) throws Exception{ -__ref = this; -RDebugUtils.currentModule="dbrequestmanager"; -if (Debug.shouldDelegate(ba, "handlejob", false)) - {return ((keymon.lat.medicomed.dbrequestmanager._dbresult) Debug.delegate(ba, "handlejob", new Object[] {_job}));} +public String _executecommand(keymon.lat.medicomed.dbrequestmanager._dbcommand _command,Object _tag) throws Exception{ + //BA.debugLineNum = 57;BA.debugLine="Public Sub ExecuteCommand(Command As DBCommand, Ta"; + //BA.debugLineNum = 58;BA.debugLine="ExecuteBatch(Array As DBCommand(Command), Tag)"; +_executebatch(anywheresoftware.b4a.keywords.Common.ArrayToList(new keymon.lat.medicomed.dbrequestmanager._dbcommand[]{_command}),_tag); + //BA.debugLineNum = 59;BA.debugLine="End Sub"; +return ""; +} +public String _executequery(keymon.lat.medicomed.dbrequestmanager._dbcommand _command,int _limit,Object _tag) throws Exception{ +keymon.lat.medicomed.httpjob _j = null; +anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _ms = null; +anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out2 = null; + //BA.debugLineNum = 28;BA.debugLine="Public Sub ExecuteQuery(Command As DBCommand, Limi"; + //BA.debugLineNum = 29;BA.debugLine="Dim j As HttpJob"; +_j = new keymon.lat.medicomed.httpjob(); + //BA.debugLineNum = 30;BA.debugLine="Dim ms As OutputStream"; +_ms = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); + //BA.debugLineNum = 31;BA.debugLine="Dim out2 As OutputStream = StartJob(j,ms, Tag)"; +_out2 = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); +_out2 = _startjob(_j,_ms,_tag); + //BA.debugLineNum = 33;BA.debugLine="WriteObject(Command.Name, out2)"; +_writeobject((Object)(_command.Name /*String*/ ),_out2); + //BA.debugLineNum = 34;BA.debugLine="WriteInt(Limit, out2)"; +_writeint(_limit,_out2); + //BA.debugLineNum = 35;BA.debugLine="WriteList(Command.Parameters, out2)"; +_writelist(anywheresoftware.b4a.keywords.Common.ArrayToList(_command.Parameters /*Object[]*/ ),_out2); + //BA.debugLineNum = 36;BA.debugLine="out2.Close"; +_out2.Close(); + //BA.debugLineNum = 37;BA.debugLine="j.PostBytes(link & \"?method=query\", ms.ToBytesArr"; +_j._postbytes /*String*/ (_link+"?method=query",_ms.ToBytesArray()); + //BA.debugLineNum = 38;BA.debugLine="End Sub"; +return ""; +} +public byte[] _filetobytes(String _dir,String _filename) throws Exception{ +anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out = null; +anywheresoftware.b4a.objects.streams.File.InputStreamWrapper _in = null; + //BA.debugLineNum = 223;BA.debugLine="Public Sub FileToBytes(Dir As String, FileName As"; + //BA.debugLineNum = 224;BA.debugLine="Dim out As OutputStream"; +_out = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); + //BA.debugLineNum = 225;BA.debugLine="out.InitializeToBytesArray(0)"; +_out.InitializeToBytesArray((int) (0)); + //BA.debugLineNum = 226;BA.debugLine="Dim In As InputStream = File.OpenInput(Dir, FileN"; +_in = new anywheresoftware.b4a.objects.streams.File.InputStreamWrapper(); +_in = __c.File.OpenInput(_dir,_filename); + //BA.debugLineNum = 227;BA.debugLine="File.Copy2(In, out)"; +__c.File.Copy2((java.io.InputStream)(_in.getObject()),(java.io.OutputStream)(_out.getObject())); + //BA.debugLineNum = 228;BA.debugLine="out.Close"; +_out.Close(); + //BA.debugLineNum = 229;BA.debugLine="Return out.ToBytesArray"; +if (true) return _out.ToBytesArray(); + //BA.debugLineNum = 230;BA.debugLine="End Sub"; +return null; +} +public keymon.lat.medicomed.dbrequestmanager._dbresult _handlejob(keymon.lat.medicomed.httpjob _job) throws Exception{ long _start = 0L; anywheresoftware.b4a.objects.streams.File.InputStreamWrapper _in = null; anywheresoftware.b4a.randomaccessfile.CompressedStreams _cs = null; @@ -167,72 +242,52 @@ Object[] _rowobjects = null; int _col = 0; Object _o = null; int _rows = 0; -RDebugUtils.currentLine=27918336; - //BA.debugLineNum = 27918336;BA.debugLine="Public Sub HandleJob(Job As HttpJob) As DBResult"; -RDebugUtils.currentLine=27918337; - //BA.debugLineNum = 27918337;BA.debugLine="Dim start As Long = DateTime.Now"; + //BA.debugLineNum = 184;BA.debugLine="Public Sub HandleJob(Job As HttpJob) As DBResult"; + //BA.debugLineNum = 185;BA.debugLine="Dim start As Long = DateTime.Now"; _start = __c.DateTime.getNow(); -RDebugUtils.currentLine=27918338; - //BA.debugLineNum = 27918338;BA.debugLine="Dim In As InputStream = Job.GetInputStream"; + //BA.debugLineNum = 186;BA.debugLine="Dim In As InputStream = Job.GetInputStream"; _in = new anywheresoftware.b4a.objects.streams.File.InputStreamWrapper(); -_in = _job._getinputstream /*anywheresoftware.b4a.objects.streams.File.InputStreamWrapper*/ (null); -RDebugUtils.currentLine=27918339; - //BA.debugLineNum = 27918339;BA.debugLine="Dim cs As CompressedStreams"; +_in = _job._getinputstream /*anywheresoftware.b4a.objects.streams.File.InputStreamWrapper*/ (); + //BA.debugLineNum = 187;BA.debugLine="Dim cs As CompressedStreams"; _cs = new anywheresoftware.b4a.randomaccessfile.CompressedStreams(); -RDebugUtils.currentLine=27918340; - //BA.debugLineNum = 27918340;BA.debugLine="In = cs.WrapInputStream(In, \"gzip\")"; + //BA.debugLineNum = 188;BA.debugLine="In = cs.WrapInputStream(In, \"gzip\")"; _in = _cs.WrapInputStream((java.io.InputStream)(_in.getObject()),"gzip"); -RDebugUtils.currentLine=27918341; - //BA.debugLineNum = 27918341;BA.debugLine="Dim serverVersion As Float = ReadObject(In) 'igno"; -_serverversion = (float)(BA.ObjectToNumber(__ref._readobject /*Object*/ (null,_in))); -RDebugUtils.currentLine=27918342; - //BA.debugLineNum = 27918342;BA.debugLine="Dim method As String = ReadObject(In)"; -_method = BA.ObjectToString(__ref._readobject /*Object*/ (null,_in)); -RDebugUtils.currentLine=27918343; - //BA.debugLineNum = 27918343;BA.debugLine="Dim table As DBResult"; + //BA.debugLineNum = 189;BA.debugLine="Dim serverVersion As Float = ReadObject(In) 'igno"; +_serverversion = (float)(BA.ObjectToNumber(_readobject(_in))); + //BA.debugLineNum = 190;BA.debugLine="Dim method As String = ReadObject(In)"; +_method = BA.ObjectToString(_readobject(_in)); + //BA.debugLineNum = 191;BA.debugLine="Dim table As DBResult"; _table = new keymon.lat.medicomed.dbrequestmanager._dbresult(); -RDebugUtils.currentLine=27918344; - //BA.debugLineNum = 27918344;BA.debugLine="table.Initialize"; + //BA.debugLineNum = 192;BA.debugLine="table.Initialize"; _table.Initialize(); -RDebugUtils.currentLine=27918345; - //BA.debugLineNum = 27918345;BA.debugLine="table.Columns.Initialize"; + //BA.debugLineNum = 193;BA.debugLine="table.Columns.Initialize"; _table.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Initialize(); -RDebugUtils.currentLine=27918346; - //BA.debugLineNum = 27918346;BA.debugLine="table.rows.Initialize"; + //BA.debugLineNum = 194;BA.debugLine="table.rows.Initialize"; _table.Rows /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=27918347; - //BA.debugLineNum = 27918347;BA.debugLine="table.Tag = Job.Tag"; + //BA.debugLineNum = 195;BA.debugLine="table.Tag = Job.Tag"; _table.Tag /*Object*/ = _job._tag /*Object*/ ; -RDebugUtils.currentLine=27918348; - //BA.debugLineNum = 27918348;BA.debugLine="If jobTagAnterior <> Job.Tag Then LogColor(\"Handl"; -if ((__ref._jobtaganterior /*String*/ ).equals(BA.ObjectToString(_job._tag /*Object*/ )) == false) { -__c.LogImpl("327918348","HandleJob: '"+BA.ObjectToString(_job._tag /*Object*/ )+"'",__c.Colors.Blue);}; -RDebugUtils.currentLine=27918349; - //BA.debugLineNum = 27918349;BA.debugLine="jobTagAnterior = Job.Tag 'Mod por CHV - 211023"; -__ref._jobtaganterior /*String*/ = BA.ObjectToString(_job._tag /*Object*/ ); -RDebugUtils.currentLine=27918350; - //BA.debugLineNum = 27918350;BA.debugLine="If method = \"query\" Then"; + //BA.debugLineNum = 196;BA.debugLine="If jobTagAnterior <> Job.Tag Then LogColor(\"Handl"; +if ((_jobtaganterior).equals(BA.ObjectToString(_job._tag /*Object*/ )) == false) { +__c.LogImpl("364225292","HandleJob: '"+BA.ObjectToString(_job._tag /*Object*/ )+"'",__c.Colors.Blue);}; + //BA.debugLineNum = 197;BA.debugLine="jobTagAnterior = Job.Tag 'Mod por CHV - 211023"; +_jobtaganterior = BA.ObjectToString(_job._tag /*Object*/ ); + //BA.debugLineNum = 198;BA.debugLine="If method = \"query\" Then"; if ((_method).equals("query")) { -RDebugUtils.currentLine=27918351; - //BA.debugLineNum = 27918351;BA.debugLine="Dim numberOfColumns As Int = ReadInt(In)"; -_numberofcolumns = __ref._readint /*int*/ (null,_in); -RDebugUtils.currentLine=27918352; - //BA.debugLineNum = 27918352;BA.debugLine="For i = 0 To numberOfColumns - 1"; + //BA.debugLineNum = 199;BA.debugLine="Dim numberOfColumns As Int = ReadInt(In)"; +_numberofcolumns = _readint(_in); + //BA.debugLineNum = 200;BA.debugLine="For i = 0 To numberOfColumns - 1"; { final int step16 = 1; final int limit16 = (int) (_numberofcolumns-1); _i = (int) (0) ; for (;_i <= limit16 ;_i = _i + step16 ) { -RDebugUtils.currentLine=27918353; - //BA.debugLineNum = 27918353;BA.debugLine="table.Columns.Put(ReadObject(In), i)"; -_table.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Put(__ref._readobject /*Object*/ (null,_in),(Object)(_i)); + //BA.debugLineNum = 201;BA.debugLine="table.Columns.Put(ReadObject(In), i)"; +_table.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Put(_readobject(_in),(Object)(_i)); } }; -RDebugUtils.currentLine=27918355; - //BA.debugLineNum = 27918355;BA.debugLine="Do While ReadByte(In) = 1"; -while (__ref._readbyte /*byte*/ (null,_in)==1) { -RDebugUtils.currentLine=27918356; - //BA.debugLineNum = 27918356;BA.debugLine="Dim rowObjects(numberOfColumns) As Object"; + //BA.debugLineNum = 203;BA.debugLine="Do While ReadByte(In) = 1"; +while (_readbyte(_in)==1) { + //BA.debugLineNum = 204;BA.debugLine="Dim rowObjects(numberOfColumns) As Object"; _rowobjects = new Object[_numberofcolumns]; { int d0 = _rowobjects.length; @@ -241,666 +296,84 @@ _rowobjects[i0] = new Object(); } } ; -RDebugUtils.currentLine=27918357; - //BA.debugLineNum = 27918357;BA.debugLine="table.rows.Add(rowObjects)"; + //BA.debugLineNum = 205;BA.debugLine="table.rows.Add(rowObjects)"; _table.Rows /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(_rowobjects)); -RDebugUtils.currentLine=27918358; - //BA.debugLineNum = 27918358;BA.debugLine="For col = 0 To numberOfColumns - 1"; + //BA.debugLineNum = 206;BA.debugLine="For col = 0 To numberOfColumns - 1"; { final int step22 = 1; final int limit22 = (int) (_numberofcolumns-1); _col = (int) (0) ; for (;_col <= limit22 ;_col = _col + step22 ) { -RDebugUtils.currentLine=27918359; - //BA.debugLineNum = 27918359;BA.debugLine="Dim o As Object = ReadObject(In)"; -_o = __ref._readobject /*Object*/ (null,_in); -RDebugUtils.currentLine=27918360; - //BA.debugLineNum = 27918360;BA.debugLine="rowObjects(col) = o"; + //BA.debugLineNum = 207;BA.debugLine="Dim o As Object = ReadObject(In)"; +_o = _readobject(_in); + //BA.debugLineNum = 208;BA.debugLine="rowObjects(col) = o"; _rowobjects[_col] = _o; } }; } ; - }else -{RDebugUtils.currentLine=27918363; - //BA.debugLineNum = 27918363;BA.debugLine="Else If method = \"batch\" Then"; -if ((_method).equals("batch")) { -RDebugUtils.currentLine=27918364; - //BA.debugLineNum = 27918364;BA.debugLine="table.Columns.Put(\"AffectedRows\", 0)"; + }else if((_method).equals("batch")) { + //BA.debugLineNum = 212;BA.debugLine="table.Columns.Put(\"AffectedRows\", 0)"; _table.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Put((Object)("AffectedRows"),(Object)(0)); -RDebugUtils.currentLine=27918365; - //BA.debugLineNum = 27918365;BA.debugLine="Dim rows As Int = ReadInt(In)"; -_rows = __ref._readint /*int*/ (null,_in); -RDebugUtils.currentLine=27918366; - //BA.debugLineNum = 27918366;BA.debugLine="For i = 0 To rows - 1"; + //BA.debugLineNum = 213;BA.debugLine="Dim rows As Int = ReadInt(In)"; +_rows = _readint(_in); + //BA.debugLineNum = 214;BA.debugLine="For i = 0 To rows - 1"; { final int step30 = 1; final int limit30 = (int) (_rows-1); _i = (int) (0) ; for (;_i <= limit30 ;_i = _i + step30 ) { -RDebugUtils.currentLine=27918367; - //BA.debugLineNum = 27918367;BA.debugLine="table.rows.Add(Array As Object(ReadInt(In)))"; -_table.Rows /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(new Object[]{(Object)(__ref._readint /*int*/ (null,_in))})); + //BA.debugLineNum = 215;BA.debugLine="table.rows.Add(Array As Object(ReadInt(In)))"; +_table.Rows /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(new Object[]{(Object)(_readint(_in))})); } }; - }} -; -RDebugUtils.currentLine=27918370; - //BA.debugLineNum = 27918370;BA.debugLine="In.Close"; -_in.Close(); -RDebugUtils.currentLine=27918372; - //BA.debugLineNum = 27918372;BA.debugLine="Return table"; -if (true) return _table; -RDebugUtils.currentLine=27918373; - //BA.debugLineNum = 27918373;BA.debugLine="End Sub"; -return null; -} -public String _executecommand(keymon.lat.medicomed.dbrequestmanager __ref,keymon.lat.medicomed.dbrequestmanager._dbcommand _command,Object _tag) throws Exception{ -__ref = this; -RDebugUtils.currentModule="dbrequestmanager"; -if (Debug.shouldDelegate(ba, "executecommand", false)) - {return ((String) Debug.delegate(ba, "executecommand", new Object[] {_command,_tag}));} -RDebugUtils.currentLine=27328512; - //BA.debugLineNum = 27328512;BA.debugLine="Public Sub ExecuteCommand(Command As DBCommand, Ta"; -RDebugUtils.currentLine=27328513; - //BA.debugLineNum = 27328513;BA.debugLine="ExecuteBatch(Array As DBCommand(Command), Tag)"; -__ref._executebatch /*String*/ (null,anywheresoftware.b4a.keywords.Common.ArrayToList(new keymon.lat.medicomed.dbrequestmanager._dbcommand[]{_command}),_tag); -RDebugUtils.currentLine=27328514; - //BA.debugLineNum = 27328514;BA.debugLine="End Sub"; -return ""; -} -public anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _bytestoimage(keymon.lat.medicomed.dbrequestmanager __ref,byte[] _bytes) throws Exception{ -__ref = this; -RDebugUtils.currentModule="dbrequestmanager"; -if (Debug.shouldDelegate(ba, "bytestoimage", false)) - {return ((anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper) Debug.delegate(ba, "bytestoimage", new Object[] {_bytes}));} -anywheresoftware.b4a.objects.streams.File.InputStreamWrapper _in = null; -anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _bmp = null; -RDebugUtils.currentLine=28114944; - //BA.debugLineNum = 28114944;BA.debugLine="Public Sub BytesToImage(bytes() As Byte) As Bitmap"; -RDebugUtils.currentLine=28114945; - //BA.debugLineNum = 28114945;BA.debugLine="Dim In As InputStream"; -_in = new anywheresoftware.b4a.objects.streams.File.InputStreamWrapper(); -RDebugUtils.currentLine=28114946; - //BA.debugLineNum = 28114946;BA.debugLine="In.InitializeFromBytesArray(bytes, 0, bytes.Lengt"; -_in.InitializeFromBytesArray(_bytes,(int) (0),_bytes.length); -RDebugUtils.currentLine=28114947; - //BA.debugLineNum = 28114947;BA.debugLine="Dim bmp As Bitmap"; -_bmp = new anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper(); -RDebugUtils.currentLine=28114948; - //BA.debugLineNum = 28114948;BA.debugLine="bmp.Initialize2(In)"; -_bmp.Initialize2((java.io.InputStream)(_in.getObject())); -RDebugUtils.currentLine=28114949; - //BA.debugLineNum = 28114949;BA.debugLine="Return bmp"; -if (true) return _bmp; -RDebugUtils.currentLine=28114950; - //BA.debugLineNum = 28114950;BA.debugLine="End Sub"; -return null; -} -public String _class_globals(keymon.lat.medicomed.dbrequestmanager __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="dbrequestmanager"; -RDebugUtils.currentLine=27066368; - //BA.debugLineNum = 27066368;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=27066369; - //BA.debugLineNum = 27066369;BA.debugLine="Private mTarget As Object"; -_mtarget = new Object(); -RDebugUtils.currentLine=27066370; - //BA.debugLineNum = 27066370;BA.debugLine="Type DBResult (Tag As Object, Columns As Map, Row"; -; -RDebugUtils.currentLine=27066371; - //BA.debugLineNum = 27066371;BA.debugLine="Type DBCommand (Name As String, Parameters() As O"; -; -RDebugUtils.currentLine=27066372; - //BA.debugLineNum = 27066372;BA.debugLine="Private link As String"; -_link = ""; -RDebugUtils.currentLine=27066373; - //BA.debugLineNum = 27066373;BA.debugLine="Private bc As ByteConverter"; -_bc = new anywheresoftware.b4a.agraham.byteconverter.ByteConverter(); -RDebugUtils.currentLine=27066374; - //BA.debugLineNum = 27066374;BA.debugLine="Private T_NULL = 0, T_STRING = 1, T_SHORT = 2, T_"; -_t_null = (byte) (0); -_t_string = (byte) (1); -_t_short = (byte) (2); -_t_int = (byte) (3); -_t_long = (byte) (4); -_t_float = (byte) (5); -_t_double = (byte) (6); -_t_boolean = (byte) (7); -_t_blob = (byte) (8); -RDebugUtils.currentLine=27066376; - //BA.debugLineNum = 27066376;BA.debugLine="Private VERSION As Float = 0.9"; -_version = (float) (0.9); -RDebugUtils.currentLine=27066377; - //BA.debugLineNum = 27066377;BA.debugLine="Private tempArray(1) As Object"; -_temparray = new Object[(int) (1)]; -{ -int d0 = _temparray.length; -for (int i0 = 0;i0 < d0;i0++) { -_temparray[i0] = new Object(); -} -} -; -RDebugUtils.currentLine=27066378; - //BA.debugLineNum = 27066378;BA.debugLine="Dim jobTagAnterior As String = \"\" 'Mod por CHV -"; -_jobtaganterior = ""; -RDebugUtils.currentLine=27066379; - //BA.debugLineNum = 27066379;BA.debugLine="End Sub"; -return ""; -} -public String _executebatch(keymon.lat.medicomed.dbrequestmanager __ref,anywheresoftware.b4a.objects.collections.List _listofcommands,Object _tag) throws Exception{ -__ref = this; -RDebugUtils.currentModule="dbrequestmanager"; -if (Debug.shouldDelegate(ba, "executebatch", false)) - {return ((String) Debug.delegate(ba, "executebatch", new Object[] {_listofcommands,_tag}));} -keymon.lat.medicomed.httpjob _j = null; -anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _ms = null; -anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out2 = null; -keymon.lat.medicomed.dbrequestmanager._dbcommand _command = null; -RDebugUtils.currentLine=27262976; - //BA.debugLineNum = 27262976;BA.debugLine="Public Sub ExecuteBatch(ListOfCommands As List, Ta"; -RDebugUtils.currentLine=27262977; - //BA.debugLineNum = 27262977;BA.debugLine="Dim j As HttpJob"; -_j = new keymon.lat.medicomed.httpjob(); -RDebugUtils.currentLine=27262978; - //BA.debugLineNum = 27262978;BA.debugLine="Dim ms As OutputStream"; -_ms = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); -RDebugUtils.currentLine=27262979; - //BA.debugLineNum = 27262979;BA.debugLine="Dim out2 As OutputStream = StartJob(j,ms, Tag)"; -_out2 = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); -_out2 = __ref._startjob /*anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper*/ (null,_j,_ms,_tag); -RDebugUtils.currentLine=27262980; - //BA.debugLineNum = 27262980;BA.debugLine="WriteInt(ListOfCommands.Size, out2)"; -__ref._writeint /*String*/ (null,_listofcommands.getSize(),_out2); -RDebugUtils.currentLine=27262981; - //BA.debugLineNum = 27262981;BA.debugLine="For Each Command As DBCommand In ListOfCommands"; -{ -final anywheresoftware.b4a.BA.IterableList group5 = _listofcommands; -final int groupLen5 = group5.getSize() -;int index5 = 0; -; -for (; index5 < groupLen5;index5++){ -_command = (keymon.lat.medicomed.dbrequestmanager._dbcommand)(group5.Get(index5)); -RDebugUtils.currentLine=27262982; - //BA.debugLineNum = 27262982;BA.debugLine="WriteObject(Command.Name, out2)"; -__ref._writeobject /*String*/ (null,(Object)(_command.Name /*String*/ ),_out2); -RDebugUtils.currentLine=27262983; - //BA.debugLineNum = 27262983;BA.debugLine="WriteList(Command.Parameters, out2)"; -__ref._writelist /*String*/ (null,anywheresoftware.b4a.keywords.Common.ArrayToList(_command.Parameters /*Object[]*/ ),_out2); - } -}; -RDebugUtils.currentLine=27262985; - //BA.debugLineNum = 27262985;BA.debugLine="out2.Close"; -_out2.Close(); -RDebugUtils.currentLine=27262986; - //BA.debugLineNum = 27262986;BA.debugLine="j.PostBytes(link & \"?method=batch\", ms.ToBytesArr"; -_j._postbytes /*String*/ (null,__ref._link /*String*/ +"?method=batch",_ms.ToBytesArray()); -RDebugUtils.currentLine=27262987; - //BA.debugLineNum = 27262987;BA.debugLine="End Sub"; -return ""; -} -public anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _startjob(keymon.lat.medicomed.dbrequestmanager __ref,keymon.lat.medicomed.httpjob _j,anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _memorystream,Object _tag) throws Exception{ -__ref = this; -RDebugUtils.currentModule="dbrequestmanager"; -if (Debug.shouldDelegate(ba, "startjob", false)) - {return ((anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper) Debug.delegate(ba, "startjob", new Object[] {_j,_memorystream,_tag}));} -anywheresoftware.b4a.randomaccessfile.CompressedStreams _compress = null; -anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out = null; -RDebugUtils.currentLine=27394048; - //BA.debugLineNum = 27394048;BA.debugLine="Private Sub StartJob(j As HttpJob, MemoryStream As"; -RDebugUtils.currentLine=27394049; - //BA.debugLineNum = 27394049;BA.debugLine="j.Initialize(\"DBRequest\", mTarget)"; -_j._initialize /*String*/ (null,ba,"DBRequest",__ref._mtarget /*Object*/ ); -RDebugUtils.currentLine=27394050; - //BA.debugLineNum = 27394050;BA.debugLine="j.Tag = Tag"; -_j._tag /*Object*/ = _tag; -RDebugUtils.currentLine=27394051; - //BA.debugLineNum = 27394051;BA.debugLine="MemoryStream.InitializeToBytesArray(0)"; -_memorystream.InitializeToBytesArray((int) (0)); -RDebugUtils.currentLine=27394052; - //BA.debugLineNum = 27394052;BA.debugLine="Dim compress As CompressedStreams"; -_compress = new anywheresoftware.b4a.randomaccessfile.CompressedStreams(); -RDebugUtils.currentLine=27394053; - //BA.debugLineNum = 27394053;BA.debugLine="Dim out As OutputStream = compress.WrapOutputStre"; -_out = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); -_out = _compress.WrapOutputStream((java.io.OutputStream)(_memorystream.getObject()),"gzip"); -RDebugUtils.currentLine=27394054; - //BA.debugLineNum = 27394054;BA.debugLine="WriteObject(VERSION, out)"; -__ref._writeobject /*String*/ (null,(Object)(__ref._version /*float*/ ),_out); -RDebugUtils.currentLine=27394055; - //BA.debugLineNum = 27394055;BA.debugLine="Return out"; -if (true) return _out; -RDebugUtils.currentLine=27394056; - //BA.debugLineNum = 27394056;BA.debugLine="End Sub"; -return null; -} -public String _writeint(keymon.lat.medicomed.dbrequestmanager __ref,int _i,anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out) throws Exception{ -__ref = this; -RDebugUtils.currentModule="dbrequestmanager"; -if (Debug.shouldDelegate(ba, "writeint", false)) - {return ((String) Debug.delegate(ba, "writeint", new Object[] {_i,_out}));} -byte[] _data = null; -RDebugUtils.currentLine=27721728; - //BA.debugLineNum = 27721728;BA.debugLine="Private Sub WriteInt(i As Int, out As OutputStream"; -RDebugUtils.currentLine=27721729; - //BA.debugLineNum = 27721729;BA.debugLine="Dim data() As Byte"; -_data = new byte[(int) (0)]; -; -RDebugUtils.currentLine=27721730; - //BA.debugLineNum = 27721730;BA.debugLine="data = bc.IntsToBytes(Array As Int(i))"; -_data = __ref._bc /*anywheresoftware.b4a.agraham.byteconverter.ByteConverter*/ .IntsToBytes(new int[]{_i}); -RDebugUtils.currentLine=27721731; - //BA.debugLineNum = 27721731;BA.debugLine="out.WriteBytes(data, 0, data.Length)"; -_out.WriteBytes(_data,(int) (0),_data.length); -RDebugUtils.currentLine=27721732; - //BA.debugLineNum = 27721732;BA.debugLine="End Sub"; -return ""; -} -public String _writeobject(keymon.lat.medicomed.dbrequestmanager __ref,Object _o,anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out) throws Exception{ -__ref = this; -RDebugUtils.currentModule="dbrequestmanager"; -if (Debug.shouldDelegate(ba, "writeobject", false)) - {return ((String) Debug.delegate(ba, "writeobject", new Object[] {_o,_out}));} -byte[] _data = null; -boolean _b = false; -RDebugUtils.currentLine=27525120; - //BA.debugLineNum = 27525120;BA.debugLine="Private Sub WriteObject(o As Object, out As Output"; -RDebugUtils.currentLine=27525121; - //BA.debugLineNum = 27525121;BA.debugLine="Dim data() As Byte"; -_data = new byte[(int) (0)]; -; -RDebugUtils.currentLine=27525122; - //BA.debugLineNum = 27525122;BA.debugLine="tempArray(0) = o"; -__ref._temparray /*Object[]*/ [(int) (0)] = _o; -RDebugUtils.currentLine=27525123; - //BA.debugLineNum = 27525123;BA.debugLine="If tempArray(0) = Null Then"; -if (__ref._temparray /*Object[]*/ [(int) (0)]== null) { -RDebugUtils.currentLine=27525124; - //BA.debugLineNum = 27525124;BA.debugLine="out.WriteBytes(Array As Byte(T_NULL), 0, 1)"; -_out.WriteBytes(new byte[]{__ref._t_null /*byte*/ },(int) (0),(int) (1)); - }else -{RDebugUtils.currentLine=27525125; - //BA.debugLineNum = 27525125;BA.debugLine="Else If tempArray(0) Is Short Then"; -if (__ref._temparray /*Object[]*/ [(int) (0)] instanceof Short) { -RDebugUtils.currentLine=27525126; - //BA.debugLineNum = 27525126;BA.debugLine="out.WriteBytes(Array As Byte(T_SHORT), 0, 1)"; -_out.WriteBytes(new byte[]{__ref._t_short /*byte*/ },(int) (0),(int) (1)); -RDebugUtils.currentLine=27525127; - //BA.debugLineNum = 27525127;BA.debugLine="data = bc.ShortsToBytes(Array As Short(o))"; -_data = __ref._bc /*anywheresoftware.b4a.agraham.byteconverter.ByteConverter*/ .ShortsToBytes(new short[]{(short)(BA.ObjectToNumber(_o))}); - }else -{RDebugUtils.currentLine=27525128; - //BA.debugLineNum = 27525128;BA.debugLine="Else If tempArray(0) Is Int Then"; -if (__ref._temparray /*Object[]*/ [(int) (0)] instanceof Integer) { -RDebugUtils.currentLine=27525129; - //BA.debugLineNum = 27525129;BA.debugLine="out.WriteBytes(Array As Byte(T_INT), 0, 1)"; -_out.WriteBytes(new byte[]{__ref._t_int /*byte*/ },(int) (0),(int) (1)); -RDebugUtils.currentLine=27525130; - //BA.debugLineNum = 27525130;BA.debugLine="data = bc.IntsToBytes(Array As Int(o))"; -_data = __ref._bc /*anywheresoftware.b4a.agraham.byteconverter.ByteConverter*/ .IntsToBytes(new int[]{(int)(BA.ObjectToNumber(_o))}); - }else -{RDebugUtils.currentLine=27525131; - //BA.debugLineNum = 27525131;BA.debugLine="Else If tempArray(0) Is Float Then"; -if (__ref._temparray /*Object[]*/ [(int) (0)] instanceof Float) { -RDebugUtils.currentLine=27525132; - //BA.debugLineNum = 27525132;BA.debugLine="out.WriteBytes(Array As Byte(T_FLOAT), 0, 1)"; -_out.WriteBytes(new byte[]{__ref._t_float /*byte*/ },(int) (0),(int) (1)); -RDebugUtils.currentLine=27525133; - //BA.debugLineNum = 27525133;BA.debugLine="data = bc.FloatsToBytes(Array As Float(o))"; -_data = __ref._bc /*anywheresoftware.b4a.agraham.byteconverter.ByteConverter*/ .FloatsToBytes(new float[]{(float)(BA.ObjectToNumber(_o))}); - }else -{RDebugUtils.currentLine=27525134; - //BA.debugLineNum = 27525134;BA.debugLine="Else If tempArray(0) Is Double Then"; -if (__ref._temparray /*Object[]*/ [(int) (0)] instanceof Double) { -RDebugUtils.currentLine=27525135; - //BA.debugLineNum = 27525135;BA.debugLine="out.WriteBytes(Array As Byte(T_DOUBLE), 0, 1)"; -_out.WriteBytes(new byte[]{__ref._t_double /*byte*/ },(int) (0),(int) (1)); -RDebugUtils.currentLine=27525136; - //BA.debugLineNum = 27525136;BA.debugLine="data = bc.DoublesToBytes(Array As Double(o))"; -_data = __ref._bc /*anywheresoftware.b4a.agraham.byteconverter.ByteConverter*/ .DoublesToBytes(new double[]{(double)(BA.ObjectToNumber(_o))}); - }else -{RDebugUtils.currentLine=27525137; - //BA.debugLineNum = 27525137;BA.debugLine="Else If tempArray(0) Is Long Then"; -if (__ref._temparray /*Object[]*/ [(int) (0)] instanceof Long) { -RDebugUtils.currentLine=27525138; - //BA.debugLineNum = 27525138;BA.debugLine="out.WriteBytes(Array As Byte(T_LONG), 0, 1)"; -_out.WriteBytes(new byte[]{__ref._t_long /*byte*/ },(int) (0),(int) (1)); -RDebugUtils.currentLine=27525139; - //BA.debugLineNum = 27525139;BA.debugLine="data = bc.LongsToBytes(Array As Long(o))"; -_data = __ref._bc /*anywheresoftware.b4a.agraham.byteconverter.ByteConverter*/ .LongsToBytes(new long[]{BA.ObjectToLongNumber(_o)}); - }else -{RDebugUtils.currentLine=27525140; - //BA.debugLineNum = 27525140;BA.debugLine="Else If tempArray(0) Is Boolean Then"; -if (__ref._temparray /*Object[]*/ [(int) (0)] instanceof Boolean) { -RDebugUtils.currentLine=27525141; - //BA.debugLineNum = 27525141;BA.debugLine="out.WriteBytes(Array As Byte(T_BOOLEAN), 0, 1)"; -_out.WriteBytes(new byte[]{__ref._t_boolean /*byte*/ },(int) (0),(int) (1)); -RDebugUtils.currentLine=27525142; - //BA.debugLineNum = 27525142;BA.debugLine="Dim b As Boolean = 0"; -_b = BA.ObjectToBoolean(0); -RDebugUtils.currentLine=27525143; - //BA.debugLineNum = 27525143;BA.debugLine="Dim data(1) As Byte"; -_data = new byte[(int) (1)]; -; -RDebugUtils.currentLine=27525144; - //BA.debugLineNum = 27525144;BA.debugLine="If b Then data(0) = 1 Else data(0) = 0"; -if (_b) { -_data[(int) (0)] = (byte) (1);} -else { -_data[(int) (0)] = (byte) (0);}; - }else -{RDebugUtils.currentLine=27525145; - //BA.debugLineNum = 27525145;BA.debugLine="Else If GetType(tempArray(0)) = \"[B\" Then"; -if ((__c.GetType(__ref._temparray /*Object[]*/ [(int) (0)])).equals("[B")) { -RDebugUtils.currentLine=27525146; - //BA.debugLineNum = 27525146;BA.debugLine="data = o"; -_data = (byte[])(_o); -RDebugUtils.currentLine=27525147; - //BA.debugLineNum = 27525147;BA.debugLine="out.WriteBytes(Array As Byte(T_BLOB), 0, 1)"; -_out.WriteBytes(new byte[]{__ref._t_blob /*byte*/ },(int) (0),(int) (1)); -RDebugUtils.currentLine=27525148; - //BA.debugLineNum = 27525148;BA.debugLine="WriteInt(data.Length, out)"; -__ref._writeint /*String*/ (null,_data.length,_out); - }else { -RDebugUtils.currentLine=27525150; - //BA.debugLineNum = 27525150;BA.debugLine="out.WriteBytes(Array As Byte(T_STRING), 0, 1)"; -_out.WriteBytes(new byte[]{__ref._t_string /*byte*/ },(int) (0),(int) (1)); -RDebugUtils.currentLine=27525151; - //BA.debugLineNum = 27525151;BA.debugLine="data = bc.StringToBytes(o, \"UTF8\")"; -_data = __ref._bc /*anywheresoftware.b4a.agraham.byteconverter.ByteConverter*/ .StringToBytes(BA.ObjectToString(_o),"UTF8"); -RDebugUtils.currentLine=27525152; - //BA.debugLineNum = 27525152;BA.debugLine="WriteInt(data.Length, out)"; -__ref._writeint /*String*/ (null,_data.length,_out); - }}}}}}}} -; -RDebugUtils.currentLine=27525154; - //BA.debugLineNum = 27525154;BA.debugLine="If data.Length > 0 Then out.WriteBytes(data, 0, d"; -if (_data.length>0) { -_out.WriteBytes(_data,(int) (0),_data.length);}; -RDebugUtils.currentLine=27525155; - //BA.debugLineNum = 27525155;BA.debugLine="End Sub"; -return ""; -} -public String _writelist(keymon.lat.medicomed.dbrequestmanager __ref,anywheresoftware.b4a.objects.collections.List _parameters,anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out) throws Exception{ -__ref = this; -RDebugUtils.currentModule="dbrequestmanager"; -if (Debug.shouldDelegate(ba, "writelist", false)) - {return ((String) Debug.delegate(ba, "writelist", new Object[] {_parameters,_out}));} -byte[] _data = null; -Object _o = null; -RDebugUtils.currentLine=27459584; - //BA.debugLineNum = 27459584;BA.debugLine="Private Sub WriteList(Parameters As List, out As O"; -RDebugUtils.currentLine=27459585; - //BA.debugLineNum = 27459585;BA.debugLine="Dim data() As Byte"; -_data = new byte[(int) (0)]; -; -RDebugUtils.currentLine=27459586; - //BA.debugLineNum = 27459586;BA.debugLine="If Parameters = Null Or Parameters.IsInitialized"; -if (_parameters== null || _parameters.IsInitialized()==__c.False) { -RDebugUtils.currentLine=27459587; - //BA.debugLineNum = 27459587;BA.debugLine="Dim Parameters As List"; -_parameters = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=27459588; - //BA.debugLineNum = 27459588;BA.debugLine="Parameters.Initialize"; -_parameters.Initialize(); }; -RDebugUtils.currentLine=27459590; - //BA.debugLineNum = 27459590;BA.debugLine="data = bc.IntsToBytes(Array As Int(Parameters.Siz"; -_data = __ref._bc /*anywheresoftware.b4a.agraham.byteconverter.ByteConverter*/ .IntsToBytes(new int[]{_parameters.getSize()}); -RDebugUtils.currentLine=27459591; - //BA.debugLineNum = 27459591;BA.debugLine="out.WriteBytes(data, 0, data.Length)"; -_out.WriteBytes(_data,(int) (0),_data.length); -RDebugUtils.currentLine=27459592; - //BA.debugLineNum = 27459592;BA.debugLine="For Each o As Object In Parameters"; -{ -final anywheresoftware.b4a.BA.IterableList group8 = _parameters; -final int groupLen8 = group8.getSize() -;int index8 = 0; -; -for (; index8 < groupLen8;index8++){ -_o = group8.Get(index8); -RDebugUtils.currentLine=27459593; - //BA.debugLineNum = 27459593;BA.debugLine="WriteObject(o, out)"; -__ref._writeobject /*String*/ (null,_o,_out); - } -}; -RDebugUtils.currentLine=27459595; - //BA.debugLineNum = 27459595;BA.debugLine="End Sub"; + //BA.debugLineNum = 218;BA.debugLine="In.Close"; +_in.Close(); + //BA.debugLineNum = 220;BA.debugLine="Return table"; +if (true) return _table; + //BA.debugLineNum = 221;BA.debugLine="End Sub"; +return null; +} +public byte[] _imagetobytes(anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _image) throws Exception{ +anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out = null; + //BA.debugLineNum = 233;BA.debugLine="Public Sub ImageToBytes(Image As Bitmap) As Byte()"; + //BA.debugLineNum = 234;BA.debugLine="Dim out As OutputStream"; +_out = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); + //BA.debugLineNum = 235;BA.debugLine="out.InitializeToBytesArray(0)"; +_out.InitializeToBytesArray((int) (0)); + //BA.debugLineNum = 236;BA.debugLine="Image.WriteToStream(out, 100, \"JPEG\")"; +_image.WriteToStream((java.io.OutputStream)(_out.getObject()),(int) (100),BA.getEnumFromString(android.graphics.Bitmap.CompressFormat.class,"JPEG")); + //BA.debugLineNum = 237;BA.debugLine="out.Close"; +_out.Close(); + //BA.debugLineNum = 238;BA.debugLine="Return out.ToBytesArray"; +if (true) return _out.ToBytesArray(); + //BA.debugLineNum = 239;BA.debugLine="End Sub"; +return null; +} +public String _initialize(anywheresoftware.b4a.BA _ba,Object _target,String _connectorlink) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 19;BA.debugLine="Public Sub Initialize (Target As Object, Connector"; + //BA.debugLineNum = 20;BA.debugLine="mTarget = Target"; +_mtarget = _target; + //BA.debugLineNum = 21;BA.debugLine="link = ConnectorLink"; +_link = _connectorlink; + //BA.debugLineNum = 22;BA.debugLine="End Sub"; return ""; } -public byte[] _filetobytes(keymon.lat.medicomed.dbrequestmanager __ref,String _dir,String _filename) throws Exception{ -__ref = this; -RDebugUtils.currentModule="dbrequestmanager"; -if (Debug.shouldDelegate(ba, "filetobytes", false)) - {return ((byte[]) Debug.delegate(ba, "filetobytes", new Object[] {_dir,_filename}));} -anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out = null; -anywheresoftware.b4a.objects.streams.File.InputStreamWrapper _in = null; -RDebugUtils.currentLine=27983872; - //BA.debugLineNum = 27983872;BA.debugLine="Public Sub FileToBytes(Dir As String, FileName As"; -RDebugUtils.currentLine=27983873; - //BA.debugLineNum = 27983873;BA.debugLine="Dim out As OutputStream"; -_out = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); -RDebugUtils.currentLine=27983874; - //BA.debugLineNum = 27983874;BA.debugLine="out.InitializeToBytesArray(0)"; -_out.InitializeToBytesArray((int) (0)); -RDebugUtils.currentLine=27983875; - //BA.debugLineNum = 27983875;BA.debugLine="Dim In As InputStream = File.OpenInput(Dir, FileN"; -_in = new anywheresoftware.b4a.objects.streams.File.InputStreamWrapper(); -_in = __c.File.OpenInput(_dir,_filename); -RDebugUtils.currentLine=27983876; - //BA.debugLineNum = 27983876;BA.debugLine="File.Copy2(In, out)"; -__c.File.Copy2((java.io.InputStream)(_in.getObject()),(java.io.OutputStream)(_out.getObject())); -RDebugUtils.currentLine=27983877; - //BA.debugLineNum = 27983877;BA.debugLine="out.Close"; -_out.Close(); -RDebugUtils.currentLine=27983878; - //BA.debugLineNum = 27983878;BA.debugLine="Return out.ToBytesArray"; -if (true) return _out.ToBytesArray(); -RDebugUtils.currentLine=27983879; - //BA.debugLineNum = 27983879;BA.debugLine="End Sub"; -return null; -} -public Object _readobject(keymon.lat.medicomed.dbrequestmanager __ref,anywheresoftware.b4a.objects.streams.File.InputStreamWrapper _in) throws Exception{ -__ref = this; -RDebugUtils.currentModule="dbrequestmanager"; -if (Debug.shouldDelegate(ba, "readobject", false)) - {return ((Object) Debug.delegate(ba, "readobject", new Object[] {_in}));} -byte[] _data = null; -byte _b = (byte)0; -int _len = 0; -RDebugUtils.currentLine=27590656; - //BA.debugLineNum = 27590656;BA.debugLine="Private Sub ReadObject(In As InputStream) As Objec"; -RDebugUtils.currentLine=27590657; - //BA.debugLineNum = 27590657;BA.debugLine="Dim data(1) As Byte"; -_data = new byte[(int) (1)]; -; -RDebugUtils.currentLine=27590658; - //BA.debugLineNum = 27590658;BA.debugLine="In.ReadBytes(data, 0, 1)"; -_in.ReadBytes(_data,(int) (0),(int) (1)); -RDebugUtils.currentLine=27590659; - //BA.debugLineNum = 27590659;BA.debugLine="Select data(0)"; -switch (BA.switchObjectToInt(_data[(int) (0)],__ref._t_null /*byte*/ ,__ref._t_short /*byte*/ ,__ref._t_int /*byte*/ ,__ref._t_long /*byte*/ ,__ref._t_float /*byte*/ ,__ref._t_double /*byte*/ ,__ref._t_boolean /*byte*/ ,__ref._t_blob /*byte*/ )) { -case 0: { -RDebugUtils.currentLine=27590661; - //BA.debugLineNum = 27590661;BA.debugLine="Return Null"; -if (true) return __c.Null; - break; } -case 1: { -RDebugUtils.currentLine=27590663; - //BA.debugLineNum = 27590663;BA.debugLine="Dim data(2) As Byte"; -_data = new byte[(int) (2)]; -; -RDebugUtils.currentLine=27590664; - //BA.debugLineNum = 27590664;BA.debugLine="Return bc.ShortsFromBytes(ReadBytesFully(In, da"; -if (true) return (Object)(__ref._bc /*anywheresoftware.b4a.agraham.byteconverter.ByteConverter*/ .ShortsFromBytes(__ref._readbytesfully /*byte[]*/ (null,_in,_data,_data.length))[(int) (0)]); - break; } -case 2: { -RDebugUtils.currentLine=27590666; - //BA.debugLineNum = 27590666;BA.debugLine="Dim data(4) As Byte"; -_data = new byte[(int) (4)]; -; -RDebugUtils.currentLine=27590667; - //BA.debugLineNum = 27590667;BA.debugLine="Return bc.IntsFromBytes(ReadBytesFully(In, data"; -if (true) return (Object)(__ref._bc /*anywheresoftware.b4a.agraham.byteconverter.ByteConverter*/ .IntsFromBytes(__ref._readbytesfully /*byte[]*/ (null,_in,_data,_data.length))[(int) (0)]); - break; } -case 3: { -RDebugUtils.currentLine=27590669; - //BA.debugLineNum = 27590669;BA.debugLine="Dim data(8) As Byte"; -_data = new byte[(int) (8)]; -; -RDebugUtils.currentLine=27590670; - //BA.debugLineNum = 27590670;BA.debugLine="Return bc.LongsFromBytes(ReadBytesFully(In, dat"; -if (true) return (Object)(__ref._bc /*anywheresoftware.b4a.agraham.byteconverter.ByteConverter*/ .LongsFromBytes(__ref._readbytesfully /*byte[]*/ (null,_in,_data,_data.length))[(int) (0)]); - break; } -case 4: { -RDebugUtils.currentLine=27590672; - //BA.debugLineNum = 27590672;BA.debugLine="Dim data(4) As Byte"; -_data = new byte[(int) (4)]; -; -RDebugUtils.currentLine=27590673; - //BA.debugLineNum = 27590673;BA.debugLine="Return bc.FloatsFromBytes(ReadBytesFully(In, da"; -if (true) return (Object)(__ref._bc /*anywheresoftware.b4a.agraham.byteconverter.ByteConverter*/ .FloatsFromBytes(__ref._readbytesfully /*byte[]*/ (null,_in,_data,_data.length))[(int) (0)]); - break; } -case 5: { -RDebugUtils.currentLine=27590675; - //BA.debugLineNum = 27590675;BA.debugLine="Dim data(8) As Byte"; -_data = new byte[(int) (8)]; -; -RDebugUtils.currentLine=27590676; - //BA.debugLineNum = 27590676;BA.debugLine="Return bc.DoublesFromBytes(ReadBytesFully(In, d"; -if (true) return (Object)(__ref._bc /*anywheresoftware.b4a.agraham.byteconverter.ByteConverter*/ .DoublesFromBytes(__ref._readbytesfully /*byte[]*/ (null,_in,_data,_data.length))[(int) (0)]); - break; } -case 6: { -RDebugUtils.currentLine=27590678; - //BA.debugLineNum = 27590678;BA.debugLine="Dim b As Byte = ReadByte(In)"; -_b = __ref._readbyte /*byte*/ (null,_in); -RDebugUtils.currentLine=27590679; - //BA.debugLineNum = 27590679;BA.debugLine="Return b = 1"; -if (true) return (Object)(_b==1); - break; } -case 7: { -RDebugUtils.currentLine=27590681; - //BA.debugLineNum = 27590681;BA.debugLine="Dim len As Int = ReadInt(In)"; -_len = __ref._readint /*int*/ (null,_in); -RDebugUtils.currentLine=27590682; - //BA.debugLineNum = 27590682;BA.debugLine="Dim data(len) As Byte"; -_data = new byte[_len]; -; -RDebugUtils.currentLine=27590683; - //BA.debugLineNum = 27590683;BA.debugLine="Return ReadBytesFully(In, data, data.Length)"; -if (true) return (Object)(__ref._readbytesfully /*byte[]*/ (null,_in,_data,_data.length)); - break; } -default: { -RDebugUtils.currentLine=27590685; - //BA.debugLineNum = 27590685;BA.debugLine="Dim len As Int = ReadInt(In)"; -_len = __ref._readint /*int*/ (null,_in); -RDebugUtils.currentLine=27590686; - //BA.debugLineNum = 27590686;BA.debugLine="Dim data(len) As Byte"; -_data = new byte[_len]; -; -RDebugUtils.currentLine=27590687; - //BA.debugLineNum = 27590687;BA.debugLine="ReadBytesFully(In, data, data.Length)"; -__ref._readbytesfully /*byte[]*/ (null,_in,_data,_data.length); -RDebugUtils.currentLine=27590688; - //BA.debugLineNum = 27590688;BA.debugLine="Return BytesToString(data, 0, data.Length, \"UTF"; -if (true) return (Object)(__c.BytesToString(_data,(int) (0),_data.length,"UTF8")); - break; } -} -; -RDebugUtils.currentLine=27590690; - //BA.debugLineNum = 27590690;BA.debugLine="End Sub"; -return null; -} -public int _readint(keymon.lat.medicomed.dbrequestmanager __ref,anywheresoftware.b4a.objects.streams.File.InputStreamWrapper _in) throws Exception{ -__ref = this; -RDebugUtils.currentModule="dbrequestmanager"; -if (Debug.shouldDelegate(ba, "readint", false)) - {return ((Integer) Debug.delegate(ba, "readint", new Object[] {_in}));} -byte[] _data = null; -RDebugUtils.currentLine=27787264; - //BA.debugLineNum = 27787264;BA.debugLine="Private Sub ReadInt(In As InputStream) As Int"; -RDebugUtils.currentLine=27787265; - //BA.debugLineNum = 27787265;BA.debugLine="Dim data(4) As Byte"; -_data = new byte[(int) (4)]; -; -RDebugUtils.currentLine=27787266; - //BA.debugLineNum = 27787266;BA.debugLine="Return bc.IntsFromBytes(ReadBytesFully(In, data,"; -if (true) return __ref._bc /*anywheresoftware.b4a.agraham.byteconverter.ByteConverter*/ .IntsFromBytes(__ref._readbytesfully /*byte[]*/ (null,_in,_data,_data.length))[(int) (0)]; -RDebugUtils.currentLine=27787267; - //BA.debugLineNum = 27787267;BA.debugLine="End Sub"; -return 0; -} -public byte _readbyte(keymon.lat.medicomed.dbrequestmanager __ref,anywheresoftware.b4a.objects.streams.File.InputStreamWrapper _in) throws Exception{ -__ref = this; -RDebugUtils.currentModule="dbrequestmanager"; -if (Debug.shouldDelegate(ba, "readbyte", false)) - {return ((Byte) Debug.delegate(ba, "readbyte", new Object[] {_in}));} -byte[] _data = null; -RDebugUtils.currentLine=27852800; - //BA.debugLineNum = 27852800;BA.debugLine="Private Sub ReadByte(In As InputStream) As Byte"; -RDebugUtils.currentLine=27852801; - //BA.debugLineNum = 27852801;BA.debugLine="Dim data(1) As Byte"; -_data = new byte[(int) (1)]; -; -RDebugUtils.currentLine=27852802; - //BA.debugLineNum = 27852802;BA.debugLine="In.ReadBytes(data, 0, 1)"; -_in.ReadBytes(_data,(int) (0),(int) (1)); -RDebugUtils.currentLine=27852803; - //BA.debugLineNum = 27852803;BA.debugLine="Return data(0)"; -if (true) return _data[(int) (0)]; -RDebugUtils.currentLine=27852804; - //BA.debugLineNum = 27852804;BA.debugLine="End Sub"; -return (byte)0; -} -public byte[] _imagetobytes(keymon.lat.medicomed.dbrequestmanager __ref,anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _image) throws Exception{ -__ref = this; -RDebugUtils.currentModule="dbrequestmanager"; -if (Debug.shouldDelegate(ba, "imagetobytes", false)) - {return ((byte[]) Debug.delegate(ba, "imagetobytes", new Object[] {_image}));} -anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out = null; -RDebugUtils.currentLine=28049408; - //BA.debugLineNum = 28049408;BA.debugLine="Public Sub ImageToBytes(Image As Bitmap) As Byte()"; -RDebugUtils.currentLine=28049409; - //BA.debugLineNum = 28049409;BA.debugLine="Dim out As OutputStream"; -_out = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); -RDebugUtils.currentLine=28049410; - //BA.debugLineNum = 28049410;BA.debugLine="out.InitializeToBytesArray(0)"; -_out.InitializeToBytesArray((int) (0)); -RDebugUtils.currentLine=28049411; - //BA.debugLineNum = 28049411;BA.debugLine="Image.WriteToStream(out, 100, \"JPEG\")"; -_image.WriteToStream((java.io.OutputStream)(_out.getObject()),(int) (100),BA.getEnumFromString(android.graphics.Bitmap.CompressFormat.class,"JPEG")); -RDebugUtils.currentLine=28049412; - //BA.debugLineNum = 28049412;BA.debugLine="out.Close"; -_out.Close(); -RDebugUtils.currentLine=28049413; - //BA.debugLineNum = 28049413;BA.debugLine="Return out.ToBytesArray"; -if (true) return _out.ToBytesArray(); -RDebugUtils.currentLine=28049414; - //BA.debugLineNum = 28049414;BA.debugLine="End Sub"; -return null; -} -public String _printtable(keymon.lat.medicomed.dbrequestmanager __ref,keymon.lat.medicomed.dbrequestmanager._dbresult _table) throws Exception{ -__ref = this; -RDebugUtils.currentModule="dbrequestmanager"; -if (Debug.shouldDelegate(ba, "printtable", false)) - {return ((String) Debug.delegate(ba, "printtable", new Object[] {_table}));} +public String _printtable(keymon.lat.medicomed.dbrequestmanager._dbresult _table) throws Exception{ anywheresoftware.b4a.keywords.StringBuilderWrapper _sb = null; Object _col = null; Object[] _row = null; Object _record = null; -RDebugUtils.currentLine=28180480; - //BA.debugLineNum = 28180480;BA.debugLine="Public Sub PrintTable(Table As DBResult)"; -RDebugUtils.currentLine=28180481; - //BA.debugLineNum = 28180481;BA.debugLine="Log(\"Tag: \" & Table.Tag & \", Columns: \" & Table.C"; -__c.LogImpl("328180481","Tag: "+BA.ObjectToString(_table.Tag /*Object*/ )+", Columns: "+BA.NumberToString(_table.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .getSize())+", Rows: "+BA.NumberToString(_table.Rows /*anywheresoftware.b4a.objects.collections.List*/ .getSize()),0); -RDebugUtils.currentLine=28180482; - //BA.debugLineNum = 28180482;BA.debugLine="Dim sb As StringBuilder"; + //BA.debugLineNum = 251;BA.debugLine="Public Sub PrintTable(Table As DBResult)"; + //BA.debugLineNum = 252;BA.debugLine="Log(\"Tag: \" & Table.Tag & \", Columns: \" & Table.C"; +__c.LogImpl("364487425","Tag: "+BA.ObjectToString(_table.Tag /*Object*/ )+", Columns: "+BA.NumberToString(_table.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .getSize())+", Rows: "+BA.NumberToString(_table.Rows /*anywheresoftware.b4a.objects.collections.List*/ .getSize()),0); + //BA.debugLineNum = 253;BA.debugLine="Dim sb As StringBuilder"; _sb = new anywheresoftware.b4a.keywords.StringBuilderWrapper(); -RDebugUtils.currentLine=28180483; - //BA.debugLineNum = 28180483;BA.debugLine="sb.Initialize"; + //BA.debugLineNum = 254;BA.debugLine="sb.Initialize"; _sb.Initialize(); -RDebugUtils.currentLine=28180484; - //BA.debugLineNum = 28180484;BA.debugLine="For Each col In Table.Columns.Keys"; + //BA.debugLineNum = 255;BA.debugLine="For Each col In Table.Columns.Keys"; { final anywheresoftware.b4a.BA.IterableList group4 = _table.Columns /*anywheresoftware.b4a.objects.collections.Map*/ .Keys(); final int groupLen4 = group4.getSize() @@ -908,16 +381,13 @@ final int groupLen4 = group4.getSize() ; for (; index4 < groupLen4;index4++){ _col = group4.Get(index4); -RDebugUtils.currentLine=28180485; - //BA.debugLineNum = 28180485;BA.debugLine="sb.Append(col).Append(TAB)"; + //BA.debugLineNum = 256;BA.debugLine="sb.Append(col).Append(TAB)"; _sb.Append(BA.ObjectToString(_col)).Append(__c.TAB); } }; -RDebugUtils.currentLine=28180487; - //BA.debugLineNum = 28180487;BA.debugLine="Log(sb.ToString)"; -__c.LogImpl("328180487",_sb.ToString(),0); -RDebugUtils.currentLine=28180488; - //BA.debugLineNum = 28180488;BA.debugLine="For Each row() As Object In Table.Rows"; + //BA.debugLineNum = 258;BA.debugLine="Log(sb.ToString)"; +__c.LogImpl("364487431",_sb.ToString(),0); + //BA.debugLineNum = 259;BA.debugLine="For Each row() As Object In Table.Rows"; { final anywheresoftware.b4a.BA.IterableList group8 = _table.Rows /*anywheresoftware.b4a.objects.collections.List*/ ; final int groupLen8 = group8.getSize() @@ -925,14 +395,11 @@ final int groupLen8 = group8.getSize() ; for (; index8 < groupLen8;index8++){ _row = (Object[])(group8.Get(index8)); -RDebugUtils.currentLine=28180489; - //BA.debugLineNum = 28180489;BA.debugLine="Dim sb As StringBuilder"; + //BA.debugLineNum = 260;BA.debugLine="Dim sb As StringBuilder"; _sb = new anywheresoftware.b4a.keywords.StringBuilderWrapper(); -RDebugUtils.currentLine=28180490; - //BA.debugLineNum = 28180490;BA.debugLine="sb.Initialize"; + //BA.debugLineNum = 261;BA.debugLine="sb.Initialize"; _sb.Initialize(); -RDebugUtils.currentLine=28180491; - //BA.debugLineNum = 28180491;BA.debugLine="For Each record As Object In row"; + //BA.debugLineNum = 262;BA.debugLine="For Each record As Object In row"; { final Object[] group11 = _row; final int groupLen11 = group11.length @@ -940,49 +407,285 @@ final int groupLen11 = group11.length ; for (; index11 < groupLen11;index11++){ _record = group11[index11]; -RDebugUtils.currentLine=28180492; - //BA.debugLineNum = 28180492;BA.debugLine="sb.Append(record).Append(TAB)"; + //BA.debugLineNum = 263;BA.debugLine="sb.Append(record).Append(TAB)"; _sb.Append(BA.ObjectToString(_record)).Append(__c.TAB); } }; -RDebugUtils.currentLine=28180494; - //BA.debugLineNum = 28180494;BA.debugLine="ToastMessageShow(sb.ToString, True)"; + //BA.debugLineNum = 265;BA.debugLine="ToastMessageShow(sb.ToString, True)"; __c.ToastMessageShow(BA.ObjectToCharSequence(_sb.ToString()),__c.True); } }; -RDebugUtils.currentLine=28180496; - //BA.debugLineNum = 28180496;BA.debugLine="End Sub"; + //BA.debugLineNum = 267;BA.debugLine="End Sub"; return ""; } -public byte[] _readbytesfully(keymon.lat.medicomed.dbrequestmanager __ref,anywheresoftware.b4a.objects.streams.File.InputStreamWrapper _in,byte[] _data,int _len) throws Exception{ -__ref = this; -RDebugUtils.currentModule="dbrequestmanager"; -if (Debug.shouldDelegate(ba, "readbytesfully", false)) - {return ((byte[]) Debug.delegate(ba, "readbytesfully", new Object[] {_in,_data,_len}));} +public byte _readbyte(anywheresoftware.b4a.objects.streams.File.InputStreamWrapper _in) throws Exception{ +byte[] _data = null; + //BA.debugLineNum = 177;BA.debugLine="Private Sub ReadByte(In As InputStream) As Byte"; + //BA.debugLineNum = 178;BA.debugLine="Dim data(1) As Byte"; +_data = new byte[(int) (1)]; +; + //BA.debugLineNum = 179;BA.debugLine="In.ReadBytes(data, 0, 1)"; +_in.ReadBytes(_data,(int) (0),(int) (1)); + //BA.debugLineNum = 180;BA.debugLine="Return data(0)"; +if (true) return _data[(int) (0)]; + //BA.debugLineNum = 181;BA.debugLine="End Sub"; +return (byte)0; +} +public byte[] _readbytesfully(anywheresoftware.b4a.objects.streams.File.InputStreamWrapper _in,byte[] _data,int _len) throws Exception{ int _count = 0; int _read = 0; -RDebugUtils.currentLine=27656192; - //BA.debugLineNum = 27656192;BA.debugLine="Private Sub ReadBytesFully(In As InputStream, Data"; -RDebugUtils.currentLine=27656193; - //BA.debugLineNum = 27656193;BA.debugLine="Dim count = 0, read As Int"; + //BA.debugLineNum = 157;BA.debugLine="Private Sub ReadBytesFully(In As InputStream, Data"; + //BA.debugLineNum = 158;BA.debugLine="Dim count = 0, read As Int"; _count = (int) (0); _read = 0; -RDebugUtils.currentLine=27656194; - //BA.debugLineNum = 27656194;BA.debugLine="Do While count < Len And read > -1"; + //BA.debugLineNum = 159;BA.debugLine="Do While count < Len And read > -1"; while (_count<_len && _read>-1) { -RDebugUtils.currentLine=27656195; - //BA.debugLineNum = 27656195;BA.debugLine="read = In.ReadBytes(Data, count, Len - count)"; + //BA.debugLineNum = 160;BA.debugLine="read = In.ReadBytes(Data, count, Len - count)"; _read = _in.ReadBytes(_data,_count,(int) (_len-_count)); -RDebugUtils.currentLine=27656196; - //BA.debugLineNum = 27656196;BA.debugLine="count = count + read"; + //BA.debugLineNum = 161;BA.debugLine="count = count + read"; _count = (int) (_count+_read); } ; -RDebugUtils.currentLine=27656198; - //BA.debugLineNum = 27656198;BA.debugLine="Return Data"; + //BA.debugLineNum = 163;BA.debugLine="Return Data"; if (true) return _data; -RDebugUtils.currentLine=27656199; - //BA.debugLineNum = 27656199;BA.debugLine="End Sub"; + //BA.debugLineNum = 164;BA.debugLine="End Sub"; return null; } -} \ No newline at end of file +public int _readint(anywheresoftware.b4a.objects.streams.File.InputStreamWrapper _in) throws Exception{ +byte[] _data = null; + //BA.debugLineNum = 172;BA.debugLine="Private Sub ReadInt(In As InputStream) As Int"; + //BA.debugLineNum = 173;BA.debugLine="Dim data(4) As Byte"; +_data = new byte[(int) (4)]; +; + //BA.debugLineNum = 174;BA.debugLine="Return bc.IntsFromBytes(ReadBytesFully(In, data,"; +if (true) return _bc.IntsFromBytes(_readbytesfully(_in,_data,_data.length))[(int) (0)]; + //BA.debugLineNum = 175;BA.debugLine="End Sub"; +return 0; +} +public Object _readobject(anywheresoftware.b4a.objects.streams.File.InputStreamWrapper _in) throws Exception{ +byte[] _data = null; +byte _b = (byte)0; +int _len = 0; + //BA.debugLineNum = 121;BA.debugLine="Private Sub ReadObject(In As InputStream) As Objec"; + //BA.debugLineNum = 122;BA.debugLine="Dim data(1) As Byte"; +_data = new byte[(int) (1)]; +; + //BA.debugLineNum = 123;BA.debugLine="In.ReadBytes(data, 0, 1)"; +_in.ReadBytes(_data,(int) (0),(int) (1)); + //BA.debugLineNum = 124;BA.debugLine="Select data(0)"; +switch (BA.switchObjectToInt(_data[(int) (0)],_t_null,_t_short,_t_int,_t_long,_t_float,_t_double,_t_boolean,_t_blob)) { +case 0: { + //BA.debugLineNum = 126;BA.debugLine="Return Null"; +if (true) return __c.Null; + break; } +case 1: { + //BA.debugLineNum = 128;BA.debugLine="Dim data(2) As Byte"; +_data = new byte[(int) (2)]; +; + //BA.debugLineNum = 129;BA.debugLine="Return bc.ShortsFromBytes(ReadBytesFully(In, da"; +if (true) return (Object)(_bc.ShortsFromBytes(_readbytesfully(_in,_data,_data.length))[(int) (0)]); + break; } +case 2: { + //BA.debugLineNum = 131;BA.debugLine="Dim data(4) As Byte"; +_data = new byte[(int) (4)]; +; + //BA.debugLineNum = 132;BA.debugLine="Return bc.IntsFromBytes(ReadBytesFully(In, data"; +if (true) return (Object)(_bc.IntsFromBytes(_readbytesfully(_in,_data,_data.length))[(int) (0)]); + break; } +case 3: { + //BA.debugLineNum = 134;BA.debugLine="Dim data(8) As Byte"; +_data = new byte[(int) (8)]; +; + //BA.debugLineNum = 135;BA.debugLine="Return bc.LongsFromBytes(ReadBytesFully(In, dat"; +if (true) return (Object)(_bc.LongsFromBytes(_readbytesfully(_in,_data,_data.length))[(int) (0)]); + break; } +case 4: { + //BA.debugLineNum = 137;BA.debugLine="Dim data(4) As Byte"; +_data = new byte[(int) (4)]; +; + //BA.debugLineNum = 138;BA.debugLine="Return bc.FloatsFromBytes(ReadBytesFully(In, da"; +if (true) return (Object)(_bc.FloatsFromBytes(_readbytesfully(_in,_data,_data.length))[(int) (0)]); + break; } +case 5: { + //BA.debugLineNum = 140;BA.debugLine="Dim data(8) As Byte"; +_data = new byte[(int) (8)]; +; + //BA.debugLineNum = 141;BA.debugLine="Return bc.DoublesFromBytes(ReadBytesFully(In, d"; +if (true) return (Object)(_bc.DoublesFromBytes(_readbytesfully(_in,_data,_data.length))[(int) (0)]); + break; } +case 6: { + //BA.debugLineNum = 143;BA.debugLine="Dim b As Byte = ReadByte(In)"; +_b = _readbyte(_in); + //BA.debugLineNum = 144;BA.debugLine="Return b = 1"; +if (true) return (Object)(_b==1); + break; } +case 7: { + //BA.debugLineNum = 146;BA.debugLine="Dim len As Int = ReadInt(In)"; +_len = _readint(_in); + //BA.debugLineNum = 147;BA.debugLine="Dim data(len) As Byte"; +_data = new byte[_len]; +; + //BA.debugLineNum = 148;BA.debugLine="Return ReadBytesFully(In, data, data.Length)"; +if (true) return (Object)(_readbytesfully(_in,_data,_data.length)); + break; } +default: { + //BA.debugLineNum = 150;BA.debugLine="Dim len As Int = ReadInt(In)"; +_len = _readint(_in); + //BA.debugLineNum = 151;BA.debugLine="Dim data(len) As Byte"; +_data = new byte[_len]; +; + //BA.debugLineNum = 152;BA.debugLine="ReadBytesFully(In, data, data.Length)"; +_readbytesfully(_in,_data,_data.length); + //BA.debugLineNum = 153;BA.debugLine="Return BytesToString(data, 0, data.Length, \"UTF"; +if (true) return (Object)(__c.BytesToString(_data,(int) (0),_data.length,"UTF8")); + break; } +} +; + //BA.debugLineNum = 155;BA.debugLine="End Sub"; +return null; +} +public anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _startjob(keymon.lat.medicomed.httpjob _j,anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _memorystream,Object _tag) throws Exception{ +anywheresoftware.b4a.randomaccessfile.CompressedStreams _compress = null; +anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out = null; + //BA.debugLineNum = 61;BA.debugLine="Private Sub StartJob(j As HttpJob, MemoryStream As"; + //BA.debugLineNum = 62;BA.debugLine="j.Initialize(\"DBRequest\", mTarget)"; +_j._initialize /*String*/ (ba,"DBRequest",_mtarget); + //BA.debugLineNum = 63;BA.debugLine="j.Tag = Tag"; +_j._tag /*Object*/ = _tag; + //BA.debugLineNum = 64;BA.debugLine="MemoryStream.InitializeToBytesArray(0)"; +_memorystream.InitializeToBytesArray((int) (0)); + //BA.debugLineNum = 65;BA.debugLine="Dim compress As CompressedStreams"; +_compress = new anywheresoftware.b4a.randomaccessfile.CompressedStreams(); + //BA.debugLineNum = 66;BA.debugLine="Dim out As OutputStream = compress.WrapOutputStre"; +_out = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); +_out = _compress.WrapOutputStream((java.io.OutputStream)(_memorystream.getObject()),"gzip"); + //BA.debugLineNum = 67;BA.debugLine="WriteObject(VERSION, out)"; +_writeobject((Object)(_version),_out); + //BA.debugLineNum = 68;BA.debugLine="Return out"; +if (true) return _out; + //BA.debugLineNum = 69;BA.debugLine="End Sub"; +return null; +} +public String _writeint(int _i,anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out) throws Exception{ +byte[] _data = null; + //BA.debugLineNum = 166;BA.debugLine="Private Sub WriteInt(i As Int, out As OutputStream"; + //BA.debugLineNum = 167;BA.debugLine="Dim data() As Byte"; +_data = new byte[(int) (0)]; +; + //BA.debugLineNum = 168;BA.debugLine="data = bc.IntsToBytes(Array As Int(i))"; +_data = _bc.IntsToBytes(new int[]{_i}); + //BA.debugLineNum = 169;BA.debugLine="out.WriteBytes(data, 0, data.Length)"; +_out.WriteBytes(_data,(int) (0),_data.length); + //BA.debugLineNum = 170;BA.debugLine="End Sub"; +return ""; +} +public String _writelist(anywheresoftware.b4a.objects.collections.List _parameters,anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out) throws Exception{ +byte[] _data = null; +Object _o = null; + //BA.debugLineNum = 71;BA.debugLine="Private Sub WriteList(Parameters As List, out As O"; + //BA.debugLineNum = 72;BA.debugLine="Dim data() As Byte"; +_data = new byte[(int) (0)]; +; + //BA.debugLineNum = 73;BA.debugLine="If Parameters = Null Or Parameters.IsInitialized"; +if (_parameters== null || _parameters.IsInitialized()==__c.False) { + //BA.debugLineNum = 74;BA.debugLine="Dim Parameters As List"; +_parameters = new anywheresoftware.b4a.objects.collections.List(); + //BA.debugLineNum = 75;BA.debugLine="Parameters.Initialize"; +_parameters.Initialize(); + }; + //BA.debugLineNum = 77;BA.debugLine="data = bc.IntsToBytes(Array As Int(Parameters.Siz"; +_data = _bc.IntsToBytes(new int[]{_parameters.getSize()}); + //BA.debugLineNum = 78;BA.debugLine="out.WriteBytes(data, 0, data.Length)"; +_out.WriteBytes(_data,(int) (0),_data.length); + //BA.debugLineNum = 79;BA.debugLine="For Each o As Object In Parameters"; +{ +final anywheresoftware.b4a.BA.IterableList group8 = _parameters; +final int groupLen8 = group8.getSize() +;int index8 = 0; +; +for (; index8 < groupLen8;index8++){ +_o = group8.Get(index8); + //BA.debugLineNum = 80;BA.debugLine="WriteObject(o, out)"; +_writeobject(_o,_out); + } +}; + //BA.debugLineNum = 82;BA.debugLine="End Sub"; +return ""; +} +public String _writeobject(Object _o,anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out) throws Exception{ +byte[] _data = null; +boolean _b = false; + //BA.debugLineNum = 84;BA.debugLine="Private Sub WriteObject(o As Object, out As Output"; + //BA.debugLineNum = 85;BA.debugLine="Dim data() As Byte"; +_data = new byte[(int) (0)]; +; + //BA.debugLineNum = 86;BA.debugLine="tempArray(0) = o"; +_temparray[(int) (0)] = _o; + //BA.debugLineNum = 87;BA.debugLine="If tempArray(0) = Null Then"; +if (_temparray[(int) (0)]== null) { + //BA.debugLineNum = 88;BA.debugLine="out.WriteBytes(Array As Byte(T_NULL), 0, 1)"; +_out.WriteBytes(new byte[]{_t_null},(int) (0),(int) (1)); + }else if(_temparray[(int) (0)] instanceof Short) { + //BA.debugLineNum = 90;BA.debugLine="out.WriteBytes(Array As Byte(T_SHORT), 0, 1)"; +_out.WriteBytes(new byte[]{_t_short},(int) (0),(int) (1)); + //BA.debugLineNum = 91;BA.debugLine="data = bc.ShortsToBytes(Array As Short(o))"; +_data = _bc.ShortsToBytes(new short[]{(short)(BA.ObjectToNumber(_o))}); + }else if(_temparray[(int) (0)] instanceof Integer) { + //BA.debugLineNum = 93;BA.debugLine="out.WriteBytes(Array As Byte(T_INT), 0, 1)"; +_out.WriteBytes(new byte[]{_t_int},(int) (0),(int) (1)); + //BA.debugLineNum = 94;BA.debugLine="data = bc.IntsToBytes(Array As Int(o))"; +_data = _bc.IntsToBytes(new int[]{(int)(BA.ObjectToNumber(_o))}); + }else if(_temparray[(int) (0)] instanceof Float) { + //BA.debugLineNum = 96;BA.debugLine="out.WriteBytes(Array As Byte(T_FLOAT), 0, 1)"; +_out.WriteBytes(new byte[]{_t_float},(int) (0),(int) (1)); + //BA.debugLineNum = 97;BA.debugLine="data = bc.FloatsToBytes(Array As Float(o))"; +_data = _bc.FloatsToBytes(new float[]{(float)(BA.ObjectToNumber(_o))}); + }else if(_temparray[(int) (0)] instanceof Double) { + //BA.debugLineNum = 99;BA.debugLine="out.WriteBytes(Array As Byte(T_DOUBLE), 0, 1)"; +_out.WriteBytes(new byte[]{_t_double},(int) (0),(int) (1)); + //BA.debugLineNum = 100;BA.debugLine="data = bc.DoublesToBytes(Array As Double(o))"; +_data = _bc.DoublesToBytes(new double[]{(double)(BA.ObjectToNumber(_o))}); + }else if(_temparray[(int) (0)] instanceof Long) { + //BA.debugLineNum = 102;BA.debugLine="out.WriteBytes(Array As Byte(T_LONG), 0, 1)"; +_out.WriteBytes(new byte[]{_t_long},(int) (0),(int) (1)); + //BA.debugLineNum = 103;BA.debugLine="data = bc.LongsToBytes(Array As Long(o))"; +_data = _bc.LongsToBytes(new long[]{BA.ObjectToLongNumber(_o)}); + }else if(_temparray[(int) (0)] instanceof Boolean) { + //BA.debugLineNum = 105;BA.debugLine="out.WriteBytes(Array As Byte(T_BOOLEAN), 0, 1)"; +_out.WriteBytes(new byte[]{_t_boolean},(int) (0),(int) (1)); + //BA.debugLineNum = 106;BA.debugLine="Dim b As Boolean = 0"; +_b = BA.ObjectToBoolean(0); + //BA.debugLineNum = 107;BA.debugLine="Dim data(1) As Byte"; +_data = new byte[(int) (1)]; +; + //BA.debugLineNum = 108;BA.debugLine="If b Then data(0) = 1 Else data(0) = 0"; +if (_b) { +_data[(int) (0)] = (byte) (1);} +else { +_data[(int) (0)] = (byte) (0);}; + }else if((__c.GetType(_temparray[(int) (0)])).equals("[B")) { + //BA.debugLineNum = 110;BA.debugLine="data = o"; +_data = (byte[])(_o); + //BA.debugLineNum = 111;BA.debugLine="out.WriteBytes(Array As Byte(T_BLOB), 0, 1)"; +_out.WriteBytes(new byte[]{_t_blob},(int) (0),(int) (1)); + //BA.debugLineNum = 112;BA.debugLine="WriteInt(data.Length, out)"; +_writeint(_data.length,_out); + }else { + //BA.debugLineNum = 114;BA.debugLine="out.WriteBytes(Array As Byte(T_STRING), 0, 1)"; +_out.WriteBytes(new byte[]{_t_string},(int) (0),(int) (1)); + //BA.debugLineNum = 115;BA.debugLine="data = bc.StringToBytes(o, \"UTF8\")"; +_data = _bc.StringToBytes(BA.ObjectToString(_o),"UTF8"); + //BA.debugLineNum = 116;BA.debugLine="WriteInt(data.Length, out)"; +_writeint(_data.length,_out); + }; + //BA.debugLineNum = 118;BA.debugLine="If data.Length > 0 Then out.WriteBytes(data, 0, d"; +if (_data.length>0) { +_out.WriteBytes(_data,(int) (0),_data.length);}; + //BA.debugLineNum = 119;BA.debugLine="End Sub"; +return ""; +} +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/fileprovider.java b/B4A/Objects/src/keymon/lat/medicomed/fileprovider.java index dcb361a..6c6183c 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/fileprovider.java +++ b/B4A/Objects/src/keymon/lat/medicomed/fileprovider.java @@ -10,7 +10,7 @@ public class fileprovider extends B4AClass.ImplB4AClass implements BA.SubDelegat private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.fileprovider"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.fileprovider"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class fileprovider extends B4AClass.ImplB4AClass implements BA.SubDelegat 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.keywords.Common __c = null; public String _sharedfolder = ""; public boolean _usefileprovider = false; public anywheresoftware.b4a.objects.RuntimePermissions _rp = null; @@ -46,130 +39,88 @@ 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 _getfileuri(keymon.lat.medicomed.fileprovider __ref,String _filename) throws Exception{ -__ref = this; -RDebugUtils.currentModule="fileprovider"; -if (Debug.shouldDelegate(ba, "getfileuri", true)) - {return ((Object) Debug.delegate(ba, "getfileuri", new Object[] {_filename}));} +public String _class_globals() throws Exception{ + //BA.debugLineNum = 2;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 3;BA.debugLine="Public SharedFolder As String"; +_sharedfolder = ""; + //BA.debugLineNum = 4;BA.debugLine="Public UseFileProvider As Boolean"; +_usefileprovider = false; + //BA.debugLineNum = 5;BA.debugLine="Private rp As RuntimePermissions"; +_rp = new anywheresoftware.b4a.objects.RuntimePermissions(); + //BA.debugLineNum = 6;BA.debugLine="End Sub"; +return ""; +} +public Object _getfileuri(String _filename) throws Exception{ anywheresoftware.b4j.object.JavaObject _uri = null; anywheresoftware.b4j.object.JavaObject _f = null; anywheresoftware.b4j.object.JavaObject _fp = null; anywheresoftware.b4j.object.JavaObject _context = null; -RDebugUtils.currentLine=66387968; - //BA.debugLineNum = 66387968;BA.debugLine="Public Sub GetFileUri (FileName As String) As Obje"; -RDebugUtils.currentLine=66387970; - //BA.debugLineNum = 66387970;BA.debugLine="If UseFileProvider = False Then"; -if (__ref._usefileprovider /*boolean*/ ==__c.False) { -RDebugUtils.currentLine=66387971; - //BA.debugLineNum = 66387971;BA.debugLine="Dim uri As JavaObject"; + //BA.debugLineNum = 22;BA.debugLine="Public Sub GetFileUri (FileName As String) As Obje"; + //BA.debugLineNum = 24;BA.debugLine="If UseFileProvider = False Then"; +if (_usefileprovider==__c.False) { + //BA.debugLineNum = 25;BA.debugLine="Dim uri As JavaObject"; _uri = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=66387972; - //BA.debugLineNum = 66387972;BA.debugLine="Return uri.InitializeStatic(\"android.net.Uri\").R"; -if (true) return _uri.InitializeStatic("android.net.Uri").RunMethod("parse",new Object[]{(Object)("file://"+__c.File.Combine(__ref._sharedfolder /*String*/ ,_filename))}); + //BA.debugLineNum = 26;BA.debugLine="Return uri.InitializeStatic(\"android.net.Uri\").R"; +if (true) return _uri.InitializeStatic("android.net.Uri").RunMethod("parse",new Object[]{(Object)("file://"+__c.File.Combine(_sharedfolder,_filename))}); }else { -RDebugUtils.currentLine=66387974; - //BA.debugLineNum = 66387974;BA.debugLine="Dim f As JavaObject"; + //BA.debugLineNum = 28;BA.debugLine="Dim f As JavaObject"; _f = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=66387975; - //BA.debugLineNum = 66387975;BA.debugLine="f.InitializeNewInstance(\"java.io.File\", Array(Sh"; -_f.InitializeNewInstance("java.io.File",new Object[]{(Object)(__ref._sharedfolder /*String*/ ),(Object)(_filename)}); -RDebugUtils.currentLine=66387976; - //BA.debugLineNum = 66387976;BA.debugLine="Dim fp As JavaObject"; + //BA.debugLineNum = 29;BA.debugLine="f.InitializeNewInstance(\"java.io.File\", Array(Sh"; +_f.InitializeNewInstance("java.io.File",new Object[]{(Object)(_sharedfolder),(Object)(_filename)}); + //BA.debugLineNum = 30;BA.debugLine="Dim fp As JavaObject"; _fp = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=66387977; - //BA.debugLineNum = 66387977;BA.debugLine="Dim context As JavaObject"; + //BA.debugLineNum = 31;BA.debugLine="Dim context As JavaObject"; _context = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=66387978; - //BA.debugLineNum = 66387978;BA.debugLine="context.InitializeContext"; + //BA.debugLineNum = 32;BA.debugLine="context.InitializeContext"; _context.InitializeContext(ba); -RDebugUtils.currentLine=66387979; - //BA.debugLineNum = 66387979;BA.debugLine="fp.InitializeStatic(\"android.support.v4.content."; + //BA.debugLineNum = 33;BA.debugLine="fp.InitializeStatic(\"android.support.v4.content."; _fp.InitializeStatic("androidx.core.content.FileProvider"); -RDebugUtils.currentLine=66387980; - //BA.debugLineNum = 66387980;BA.debugLine="Return fp.RunMethod(\"getUriForFile\", Array(conte"; + //BA.debugLineNum = 34;BA.debugLine="Return fp.RunMethod(\"getUriForFile\", Array(conte"; if (true) return _fp.RunMethod("getUriForFile",new Object[]{(Object)(_context.getObject()),(Object)(__c.Application.getPackageName()+".provider"),(Object)(_f.getObject())}); }; -RDebugUtils.currentLine=66387982; - //BA.debugLineNum = 66387982;BA.debugLine="End Sub"; + //BA.debugLineNum = 36;BA.debugLine="End Sub"; return null; } -public String _initialize(keymon.lat.medicomed.fileprovider __ref,anywheresoftware.b4a.BA _ba) throws Exception{ -__ref = this; +public String _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ innerInitialize(_ba); -RDebugUtils.currentModule="fileprovider"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba}));} anywheresoftware.b4a.phone.Phone _p = null; -RDebugUtils.currentLine=66322432; - //BA.debugLineNum = 66322432;BA.debugLine="Public Sub Initialize"; -RDebugUtils.currentLine=66322433; - //BA.debugLineNum = 66322433;BA.debugLine="Dim p As Phone"; + //BA.debugLineNum = 8;BA.debugLine="Public Sub Initialize"; + //BA.debugLineNum = 9;BA.debugLine="Dim p As Phone"; _p = new anywheresoftware.b4a.phone.Phone(); -RDebugUtils.currentLine=66322434; - //BA.debugLineNum = 66322434;BA.debugLine="If p.SdkVersion >= 24 Or File.ExternalWritable ="; + //BA.debugLineNum = 10;BA.debugLine="If p.SdkVersion >= 24 Or File.ExternalWritable ="; if (_p.getSdkVersion()>=24 || __c.File.getExternalWritable()==__c.False) { -RDebugUtils.currentLine=66322435; - //BA.debugLineNum = 66322435;BA.debugLine="UseFileProvider = True"; -__ref._usefileprovider /*boolean*/ = __c.True; -RDebugUtils.currentLine=66322436; - //BA.debugLineNum = 66322436;BA.debugLine="SharedFolder = File.Combine(File.DirInternal, \"s"; -__ref._sharedfolder /*String*/ = __c.File.Combine(__c.File.getDirInternal(),"shared"); -RDebugUtils.currentLine=66322437; - //BA.debugLineNum = 66322437;BA.debugLine="File.MakeDir(\"\", SharedFolder)"; -__c.File.MakeDir("",__ref._sharedfolder /*String*/ ); + //BA.debugLineNum = 11;BA.debugLine="UseFileProvider = True"; +_usefileprovider = __c.True; + //BA.debugLineNum = 12;BA.debugLine="SharedFolder = File.Combine(File.DirInternal, \"s"; +_sharedfolder = __c.File.Combine(__c.File.getDirInternal(),"shared"); + //BA.debugLineNum = 13;BA.debugLine="File.MakeDir(\"\", SharedFolder)"; +__c.File.MakeDir("",_sharedfolder); }else { -RDebugUtils.currentLine=66322439; - //BA.debugLineNum = 66322439;BA.debugLine="UseFileProvider = False"; -__ref._usefileprovider /*boolean*/ = __c.False; -RDebugUtils.currentLine=66322440; - //BA.debugLineNum = 66322440;BA.debugLine="SharedFolder = rp.GetSafeDirDefaultExternal(\"sha"; -__ref._sharedfolder /*String*/ = __ref._rp /*anywheresoftware.b4a.objects.RuntimePermissions*/ .GetSafeDirDefaultExternal("shared"); + //BA.debugLineNum = 15;BA.debugLine="UseFileProvider = False"; +_usefileprovider = __c.False; + //BA.debugLineNum = 16;BA.debugLine="SharedFolder = rp.GetSafeDirDefaultExternal(\"sha"; +_sharedfolder = _rp.GetSafeDirDefaultExternal("shared"); }; -RDebugUtils.currentLine=66322442; - //BA.debugLineNum = 66322442;BA.debugLine="Log($\"Using FileProvider? ${UseFileProvider}\"$)"; -__c.LogImpl("966322442",("Using FileProvider? "+__c.SmartStringFormatter("",(Object)(__ref._usefileprovider /*boolean*/ ))+""),0); -RDebugUtils.currentLine=66322443; - //BA.debugLineNum = 66322443;BA.debugLine="End Sub"; + //BA.debugLineNum = 18;BA.debugLine="Log($\"Using FileProvider? ${UseFileProvider}\"$)"; +__c.LogImpl("938010890",("Using FileProvider? "+__c.SmartStringFormatter("",(Object)(_usefileprovider))+""),0); + //BA.debugLineNum = 19;BA.debugLine="End Sub"; return ""; } -public String _class_globals(keymon.lat.medicomed.fileprovider __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="fileprovider"; -RDebugUtils.currentLine=66256896; - //BA.debugLineNum = 66256896;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=66256897; - //BA.debugLineNum = 66256897;BA.debugLine="Public SharedFolder As String"; -_sharedfolder = ""; -RDebugUtils.currentLine=66256898; - //BA.debugLineNum = 66256898;BA.debugLine="Public UseFileProvider As Boolean"; -_usefileprovider = false; -RDebugUtils.currentLine=66256899; - //BA.debugLineNum = 66256899;BA.debugLine="Private rp As RuntimePermissions"; -_rp = new anywheresoftware.b4a.objects.RuntimePermissions(); -RDebugUtils.currentLine=66256900; - //BA.debugLineNum = 66256900;BA.debugLine="End Sub"; -return ""; -} -public String _setfileuriasintentdata(keymon.lat.medicomed.fileprovider __ref,anywheresoftware.b4a.objects.IntentWrapper _intent,String _filename) throws Exception{ -__ref = this; -RDebugUtils.currentModule="fileprovider"; -if (Debug.shouldDelegate(ba, "setfileuriasintentdata", true)) - {return ((String) Debug.delegate(ba, "setfileuriasintentdata", new Object[] {_intent,_filename}));} +public String _setfileuriasintentdata(anywheresoftware.b4a.objects.IntentWrapper _intent,String _filename) throws Exception{ anywheresoftware.b4j.object.JavaObject _jo = null; -RDebugUtils.currentLine=66453504; - //BA.debugLineNum = 66453504;BA.debugLine="Public Sub SetFileUriAsIntentData (Intent As Inten"; -RDebugUtils.currentLine=66453505; - //BA.debugLineNum = 66453505;BA.debugLine="Dim jo As JavaObject = Intent"; + //BA.debugLineNum = 40;BA.debugLine="Public Sub SetFileUriAsIntentData (Intent As Inten"; + //BA.debugLineNum = 41;BA.debugLine="Dim jo As JavaObject = Intent"; _jo = new anywheresoftware.b4j.object.JavaObject(); _jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_intent.getObject())); -RDebugUtils.currentLine=66453506; - //BA.debugLineNum = 66453506;BA.debugLine="jo.RunMethod(\"setData\", Array(GetFileUri(FileName"; -_jo.RunMethod("setData",new Object[]{__ref._getfileuri /*Object*/ (null,_filename)}); -RDebugUtils.currentLine=66453507; - //BA.debugLineNum = 66453507;BA.debugLine="Intent.Flags = Bit.Or(Intent.Flags, 1) 'FLAG_GRAN"; + //BA.debugLineNum = 42;BA.debugLine="jo.RunMethod(\"setData\", Array(GetFileUri(FileName"; +_jo.RunMethod("setData",new Object[]{_getfileuri(_filename)}); + //BA.debugLineNum = 43;BA.debugLine="Intent.Flags = Bit.Or(Intent.Flags, 1) 'FLAG_GRAN"; _intent.setFlags(__c.Bit.Or(_intent.getFlags(),(int) (1))); -RDebugUtils.currentLine=66453508; - //BA.debugLineNum = 66453508;BA.debugLine="End Sub"; + //BA.debugLineNum = 44;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/httpjob.java b/B4A/Objects/src/keymon/lat/medicomed/httpjob.java index ca0168e..6326b9d 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/httpjob.java +++ b/B4A/Objects/src/keymon/lat/medicomed/httpjob.java @@ -10,7 +10,7 @@ public class httpjob extends B4AClass.ImplB4AClass implements BA.SubDelegator{ private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.httpjob"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.httpjob"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,31 +23,7 @@ public class httpjob extends B4AClass.ImplB4AClass implements BA.SubDelegator{ 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 static class _multipartfiledata{ -public boolean IsInitialized; -public String Dir; -public String FileName; -public String KeyName; -public String ContentType; -public void Initialize() { -IsInitialized = true; -Dir = ""; -FileName = ""; -KeyName = ""; -ContentType = ""; -} -@Override - public String toString() { - return BA.TypeToString(this, false); - }} -public anywheresoftware.b4a.keywords.Common __c = null; + public anywheresoftware.b4a.keywords.Common __c = null; public String _jobname = ""; public boolean _success = false; public String _username = ""; @@ -72,620 +48,394 @@ 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 _release(keymon.lat.medicomed.httpjob __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "release", true)) - {return ((String) Debug.delegate(ba, "release", null));} -RDebugUtils.currentLine=43450368; - //BA.debugLineNum = 43450368;BA.debugLine="Public Sub Release"; -RDebugUtils.currentLine=43450370; - //BA.debugLineNum = 43450370;BA.debugLine="File.Delete(HttpUtils2Service.TempFolder, taskId)"; -__c.File.Delete(_httputils2service._tempfolder /*String*/ ,__ref._taskid /*String*/ ); -RDebugUtils.currentLine=43450372; - //BA.debugLineNum = 43450372;BA.debugLine="End Sub"; -return ""; +public static class _multipartfiledata{ +public boolean IsInitialized; +public String Dir; +public String FileName; +public String KeyName; +public String ContentType; +public void Initialize() { +IsInitialized = true; +Dir = ""; +FileName = ""; +KeyName = ""; +ContentType = ""; } -public String _initialize(keymon.lat.medicomed.httpjob __ref,anywheresoftware.b4a.BA _ba,String _name,Object _targetmodule) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_name,_targetmodule}));} -RDebugUtils.currentLine=42336256; - //BA.debugLineNum = 42336256;BA.debugLine="Public Sub Initialize (Name As String, TargetModul"; -RDebugUtils.currentLine=42336257; - //BA.debugLineNum = 42336257;BA.debugLine="JobName = Name"; -__ref._jobname /*String*/ = _name; -RDebugUtils.currentLine=42336258; - //BA.debugLineNum = 42336258;BA.debugLine="target = TargetModule"; -__ref._target /*Object*/ = _targetmodule; -RDebugUtils.currentLine=42336266; - //BA.debugLineNum = 42336266;BA.debugLine="End Sub"; -return ""; -} -public String _download(keymon.lat.medicomed.httpjob __ref,String _link) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "download", true)) - {return ((String) Debug.delegate(ba, "download", new Object[] {_link}));} -RDebugUtils.currentLine=43122688; - //BA.debugLineNum = 43122688;BA.debugLine="Public Sub Download(Link As String)"; -RDebugUtils.currentLine=43122689; - //BA.debugLineNum = 43122689;BA.debugLine="Try"; -try {RDebugUtils.currentLine=43122690; - //BA.debugLineNum = 43122690;BA.debugLine="Link = AddScheme(Link)"; -_link = __ref._addscheme /*String*/ (null,_link); -RDebugUtils.currentLine=43122691; - //BA.debugLineNum = 43122691;BA.debugLine="req.InitializeGet(Link)"; -__ref._req /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ .InitializeGet(_link); - } - catch (Exception e5) { - ba.setLastException(e5);RDebugUtils.currentLine=43122693; - //BA.debugLineNum = 43122693;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; -__c.LogImpl("943122693",("Invalid link: "+__c.SmartStringFormatter("",(Object)(_link))+""),0); -RDebugUtils.currentLine=43122694; - //BA.debugLineNum = 43122694;BA.debugLine="req.InitializeGet(InvalidURL)"; -__ref._req /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ .InitializeGet(__ref._invalidurl /*String*/ ); - }; -RDebugUtils.currentLine=43122696; - //BA.debugLineNum = 43122696;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; -__c.CallSubDelayed2(ba,(Object)(_httputils2service.getObject()),"SubmitJob",this); -RDebugUtils.currentLine=43122697; - //BA.debugLineNum = 43122697;BA.debugLine="End Sub"; -return ""; -} -public anywheresoftware.b4a.objects.streams.File.InputStreamWrapper _getinputstream(keymon.lat.medicomed.httpjob __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "getinputstream", true)) - {return ((anywheresoftware.b4a.objects.streams.File.InputStreamWrapper) Debug.delegate(ba, "getinputstream", null));} -anywheresoftware.b4a.objects.streams.File.InputStreamWrapper _in = null; -RDebugUtils.currentLine=43974656; - //BA.debugLineNum = 43974656;BA.debugLine="Public Sub GetInputStream As InputStream"; -RDebugUtils.currentLine=43974657; - //BA.debugLineNum = 43974657;BA.debugLine="Dim In As InputStream"; -_in = new anywheresoftware.b4a.objects.streams.File.InputStreamWrapper(); -RDebugUtils.currentLine=43974658; - //BA.debugLineNum = 43974658;BA.debugLine="In = File.OpenInput(HttpUtils2Service.TempFolder,"; -_in = __c.File.OpenInput(_httputils2service._tempfolder /*String*/ ,__ref._taskid /*String*/ ); -RDebugUtils.currentLine=43974659; - //BA.debugLineNum = 43974659;BA.debugLine="Return In"; -if (true) return _in; -RDebugUtils.currentLine=43974660; - //BA.debugLineNum = 43974660;BA.debugLine="End Sub"; -return null; -} -public String _getstring(keymon.lat.medicomed.httpjob __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "getstring", true)) - {return ((String) Debug.delegate(ba, "getstring", null));} -RDebugUtils.currentLine=43515904; - //BA.debugLineNum = 43515904;BA.debugLine="Public Sub GetString As String"; -RDebugUtils.currentLine=43515905; - //BA.debugLineNum = 43515905;BA.debugLine="Return GetString2(\"UTF8\")"; -if (true) return __ref._getstring2 /*String*/ (null,"UTF8"); -RDebugUtils.currentLine=43515906; - //BA.debugLineNum = 43515906;BA.debugLine="End Sub"; -return ""; -} -public String _postbytes(keymon.lat.medicomed.httpjob __ref,String _link,byte[] _data) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "postbytes", true)) - {return ((String) Debug.delegate(ba, "postbytes", new Object[] {_link,_data}));} -RDebugUtils.currentLine=42532864; - //BA.debugLineNum = 42532864;BA.debugLine="Public Sub PostBytes(Link As String, Data() As Byt"; -RDebugUtils.currentLine=42532865; - //BA.debugLineNum = 42532865;BA.debugLine="Try"; -try {RDebugUtils.currentLine=42532866; - //BA.debugLineNum = 42532866;BA.debugLine="Link = AddScheme(Link)"; -_link = __ref._addscheme /*String*/ (null,_link); -RDebugUtils.currentLine=42532867; - //BA.debugLineNum = 42532867;BA.debugLine="req.InitializePost2(Link, Data)"; -__ref._req /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ .InitializePost2(_link,_data); - } - catch (Exception e5) { - ba.setLastException(e5);RDebugUtils.currentLine=42532869; - //BA.debugLineNum = 42532869;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; -__c.LogImpl("942532869",("Invalid link: "+__c.SmartStringFormatter("",(Object)(_link))+""),0); -RDebugUtils.currentLine=42532870; - //BA.debugLineNum = 42532870;BA.debugLine="req.InitializePost2(InvalidURL, Data)"; -__ref._req /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ .InitializePost2(__ref._invalidurl /*String*/ ,_data); - }; -RDebugUtils.currentLine=42532872; - //BA.debugLineNum = 42532872;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; -__c.CallSubDelayed2(ba,(Object)(_httputils2service.getObject()),"SubmitJob",this); -RDebugUtils.currentLine=42532873; - //BA.debugLineNum = 42532873;BA.debugLine="End Sub"; -return ""; -} -public String _complete(keymon.lat.medicomed.httpjob __ref,int _id) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "complete", true)) - {return ((String) Debug.delegate(ba, "complete", new Object[] {_id}));} -RDebugUtils.currentLine=43712512; - //BA.debugLineNum = 43712512;BA.debugLine="Public Sub Complete (id As Int)"; -RDebugUtils.currentLine=43712513; - //BA.debugLineNum = 43712513;BA.debugLine="taskId = id"; -__ref._taskid /*String*/ = BA.NumberToString(_id); -RDebugUtils.currentLine=43712514; - //BA.debugLineNum = 43712514;BA.debugLine="CallSubDelayed2(target, \"JobDone\", Me)"; -__c.CallSubDelayed2(ba,__ref._target /*Object*/ ,"JobDone",this); -RDebugUtils.currentLine=43712515; - //BA.debugLineNum = 43712515;BA.debugLine="End Sub"; -return ""; -} -public anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest _getrequest(keymon.lat.medicomed.httpjob __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "getrequest", true)) - {return ((anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest) Debug.delegate(ba, "getrequest", null));} -RDebugUtils.currentLine=43646976; - //BA.debugLineNum = 43646976;BA.debugLine="Public Sub GetRequest As OkHttpRequest"; -RDebugUtils.currentLine=43646977; - //BA.debugLineNum = 43646977;BA.debugLine="Return req"; -if (true) return __ref._req /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ ; -RDebugUtils.currentLine=43646978; - //BA.debugLineNum = 43646978;BA.debugLine="End Sub"; -return null; -} -public String _addscheme(keymon.lat.medicomed.httpjob __ref,String _link) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "addscheme", true)) - {return ((String) Debug.delegate(ba, "addscheme", new Object[] {_link}));} -RDebugUtils.currentLine=42401792; - //BA.debugLineNum = 42401792;BA.debugLine="Private Sub AddScheme (Link As String) As String"; -RDebugUtils.currentLine=42401793; - //BA.debugLineNum = 42401793;BA.debugLine="If DefaultScheme = \"\" Or Link.Contains(\":\") Then"; -if ((__ref._defaultscheme /*String*/ ).equals("") || _link.contains(":")) { +@Override + public String toString() { + return BA.TypeToString(this, false); + }} +public String _addscheme(String _link) throws Exception{ + //BA.debugLineNum = 52;BA.debugLine="Private Sub AddScheme (Link As String) As String"; + //BA.debugLineNum = 53;BA.debugLine="If DefaultScheme = \"\" Or Link.Contains(\":\") Then"; +if ((_defaultscheme).equals("") || _link.contains(":")) { if (true) return _link;}; -RDebugUtils.currentLine=42401794; - //BA.debugLineNum = 42401794;BA.debugLine="Return DefaultScheme & \"://\" & Link"; -if (true) return __ref._defaultscheme /*String*/ +"://"+_link; -RDebugUtils.currentLine=42401795; - //BA.debugLineNum = 42401795;BA.debugLine="End Sub"; + //BA.debugLineNum = 54;BA.debugLine="Return DefaultScheme & \"://\" & Link"; +if (true) return _defaultscheme+"://"+_link; + //BA.debugLineNum = 55;BA.debugLine="End Sub"; return ""; } -public String _class_globals(keymon.lat.medicomed.httpjob __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -RDebugUtils.currentLine=42270720; - //BA.debugLineNum = 42270720;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=42270721; - //BA.debugLineNum = 42270721;BA.debugLine="Public JobName As String"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 2;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 3;BA.debugLine="Public JobName As String"; _jobname = ""; -RDebugUtils.currentLine=42270722; - //BA.debugLineNum = 42270722;BA.debugLine="Public Success As Boolean"; + //BA.debugLineNum = 4;BA.debugLine="Public Success As Boolean"; _success = false; -RDebugUtils.currentLine=42270723; - //BA.debugLineNum = 42270723;BA.debugLine="Public Username, Password As String"; + //BA.debugLineNum = 5;BA.debugLine="Public Username, Password As String"; _username = ""; _password = ""; -RDebugUtils.currentLine=42270724; - //BA.debugLineNum = 42270724;BA.debugLine="Public ErrorMessage As String"; + //BA.debugLineNum = 6;BA.debugLine="Public ErrorMessage As String"; _errormessage = ""; -RDebugUtils.currentLine=42270725; - //BA.debugLineNum = 42270725;BA.debugLine="Private target As Object"; + //BA.debugLineNum = 7;BA.debugLine="Private target As Object"; _target = new Object(); -RDebugUtils.currentLine=42270731; - //BA.debugLineNum = 42270731;BA.debugLine="Private taskId As String"; + //BA.debugLineNum = 13;BA.debugLine="Private taskId As String"; _taskid = ""; -RDebugUtils.currentLine=42270733; - //BA.debugLineNum = 42270733;BA.debugLine="Private req As OkHttpRequest"; + //BA.debugLineNum = 15;BA.debugLine="Private req As OkHttpRequest"; _req = new anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest(); -RDebugUtils.currentLine=42270734; - //BA.debugLineNum = 42270734;BA.debugLine="Public Response As OkHttpResponse"; + //BA.debugLineNum = 16;BA.debugLine="Public Response As OkHttpResponse"; _response = new anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpResponse(); -RDebugUtils.currentLine=42270743; - //BA.debugLineNum = 42270743;BA.debugLine="Public Tag As Object"; + //BA.debugLineNum = 25;BA.debugLine="Public Tag As Object"; _tag = new Object(); -RDebugUtils.currentLine=42270744; - //BA.debugLineNum = 42270744;BA.debugLine="Type MultipartFileData (Dir As String, FileName A"; + //BA.debugLineNum = 26;BA.debugLine="Type MultipartFileData (Dir As String, FileName A"; ; -RDebugUtils.currentLine=42270748; - //BA.debugLineNum = 42270748;BA.debugLine="Private Const InvalidURL As String = \"https://inv"; + //BA.debugLineNum = 30;BA.debugLine="Private Const InvalidURL As String = \"https://inv"; _invalidurl = "https://invalid-url/"; -RDebugUtils.currentLine=42270749; - //BA.debugLineNum = 42270749;BA.debugLine="Public DefaultScheme As String = \"https\""; + //BA.debugLineNum = 31;BA.debugLine="Public DefaultScheme As String = \"https\""; _defaultscheme = "https"; -RDebugUtils.currentLine=42270750; - //BA.debugLineNum = 42270750;BA.debugLine="End Sub"; + //BA.debugLineNum = 32;BA.debugLine="End Sub"; return ""; } -public String _delete(keymon.lat.medicomed.httpjob __ref,String _link) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "delete", true)) - {return ((String) Debug.delegate(ba, "delete", new Object[] {_link}));} -RDebugUtils.currentLine=43319296; - //BA.debugLineNum = 43319296;BA.debugLine="Public Sub Delete(Link As String)"; -RDebugUtils.currentLine=43319297; - //BA.debugLineNum = 43319297;BA.debugLine="Try"; -try {RDebugUtils.currentLine=43319298; - //BA.debugLineNum = 43319298;BA.debugLine="Link = AddScheme(Link)"; -_link = __ref._addscheme /*String*/ (null,_link); -RDebugUtils.currentLine=43319299; - //BA.debugLineNum = 43319299;BA.debugLine="req.InitializeDelete(Link)"; -__ref._req /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ .InitializeDelete(_link); +public String _complete(int _id) throws Exception{ + //BA.debugLineNum = 315;BA.debugLine="Public Sub Complete (id As Int)"; + //BA.debugLineNum = 316;BA.debugLine="taskId = id"; +_taskid = BA.NumberToString(_id); + //BA.debugLineNum = 317;BA.debugLine="CallSubDelayed2(target, \"JobDone\", Me)"; +__c.CallSubDelayed2(ba,_target,"JobDone",this); + //BA.debugLineNum = 318;BA.debugLine="End Sub"; +return ""; +} +public String _delete(String _link) throws Exception{ + //BA.debugLineNum = 261;BA.debugLine="Public Sub Delete(Link As String)"; + //BA.debugLineNum = 262;BA.debugLine="Try"; +try { //BA.debugLineNum = 263;BA.debugLine="Link = AddScheme(Link)"; +_link = _addscheme(_link); + //BA.debugLineNum = 264;BA.debugLine="req.InitializeDelete(Link)"; +_req.InitializeDelete(_link); } catch (Exception e5) { - ba.setLastException(e5);RDebugUtils.currentLine=43319301; - //BA.debugLineNum = 43319301;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; -__c.LogImpl("943319301",("Invalid link: "+__c.SmartStringFormatter("",(Object)(_link))+""),0); -RDebugUtils.currentLine=43319302; - //BA.debugLineNum = 43319302;BA.debugLine="req.InitializeDelete(InvalidURL)"; -__ref._req /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ .InitializeDelete(__ref._invalidurl /*String*/ ); + ba.setLastException(e5); //BA.debugLineNum = 266;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; +__c.LogImpl("915007749",("Invalid link: "+__c.SmartStringFormatter("",(Object)(_link))+""),0); + //BA.debugLineNum = 267;BA.debugLine="req.InitializeDelete(InvalidURL)"; +_req.InitializeDelete(_invalidurl); }; -RDebugUtils.currentLine=43319304; - //BA.debugLineNum = 43319304;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; + //BA.debugLineNum = 269;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; __c.CallSubDelayed2(ba,(Object)(_httputils2service.getObject()),"SubmitJob",this); -RDebugUtils.currentLine=43319305; - //BA.debugLineNum = 43319305;BA.debugLine="End Sub"; + //BA.debugLineNum = 270;BA.debugLine="End Sub"; return ""; } -public String _delete2(keymon.lat.medicomed.httpjob __ref,String _link,String[] _parameters) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "delete2", true)) - {return ((String) Debug.delegate(ba, "delete2", new Object[] {_link,_parameters}));} -RDebugUtils.currentLine=43384832; - //BA.debugLineNum = 43384832;BA.debugLine="Public Sub Delete2(Link As String, Parameters() As"; -RDebugUtils.currentLine=43384833; - //BA.debugLineNum = 43384833;BA.debugLine="Try"; -try {RDebugUtils.currentLine=43384834; - //BA.debugLineNum = 43384834;BA.debugLine="Link = AddScheme(Link)"; -_link = __ref._addscheme /*String*/ (null,_link); -RDebugUtils.currentLine=43384835; - //BA.debugLineNum = 43384835;BA.debugLine="req.InitializeDelete(escapeLink(Link, Parameters"; -__ref._req /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ .InitializeDelete(__ref._escapelink /*String*/ (null,_link,_parameters)); +public String _delete2(String _link,String[] _parameters) throws Exception{ + //BA.debugLineNum = 272;BA.debugLine="Public Sub Delete2(Link As String, Parameters() As"; + //BA.debugLineNum = 273;BA.debugLine="Try"; +try { //BA.debugLineNum = 274;BA.debugLine="Link = AddScheme(Link)"; +_link = _addscheme(_link); + //BA.debugLineNum = 275;BA.debugLine="req.InitializeDelete(escapeLink(Link, Parameters"; +_req.InitializeDelete(_escapelink(_link,_parameters)); } catch (Exception e5) { - ba.setLastException(e5);RDebugUtils.currentLine=43384837; - //BA.debugLineNum = 43384837;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; -__c.LogImpl("943384837",("Invalid link: "+__c.SmartStringFormatter("",(Object)(_link))+""),0); -RDebugUtils.currentLine=43384838; - //BA.debugLineNum = 43384838;BA.debugLine="req.InitializeDelete(escapeLink(InvalidURL, Para"; -__ref._req /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ .InitializeDelete(__ref._escapelink /*String*/ (null,__ref._invalidurl /*String*/ ,_parameters)); + ba.setLastException(e5); //BA.debugLineNum = 277;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; +__c.LogImpl("915073285",("Invalid link: "+__c.SmartStringFormatter("",(Object)(_link))+""),0); + //BA.debugLineNum = 278;BA.debugLine="req.InitializeDelete(escapeLink(InvalidURL, Para"; +_req.InitializeDelete(_escapelink(_invalidurl,_parameters)); }; -RDebugUtils.currentLine=43384840; - //BA.debugLineNum = 43384840;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; + //BA.debugLineNum = 280;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; __c.CallSubDelayed2(ba,(Object)(_httputils2service.getObject()),"SubmitJob",this); -RDebugUtils.currentLine=43384841; - //BA.debugLineNum = 43384841;BA.debugLine="End Sub"; + //BA.debugLineNum = 281;BA.debugLine="End Sub"; return ""; } -public String _escapelink(keymon.lat.medicomed.httpjob __ref,String _link,String[] _parameters) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "escapelink", true)) - {return ((String) Debug.delegate(ba, "escapelink", new Object[] {_link,_parameters}));} +public String _download(String _link) throws Exception{ + //BA.debugLineNum = 219;BA.debugLine="Public Sub Download(Link As String)"; + //BA.debugLineNum = 220;BA.debugLine="Try"; +try { //BA.debugLineNum = 221;BA.debugLine="Link = AddScheme(Link)"; +_link = _addscheme(_link); + //BA.debugLineNum = 222;BA.debugLine="req.InitializeGet(Link)"; +_req.InitializeGet(_link); + } + catch (Exception e5) { + ba.setLastException(e5); //BA.debugLineNum = 224;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; +__c.LogImpl("914811141",("Invalid link: "+__c.SmartStringFormatter("",(Object)(_link))+""),0); + //BA.debugLineNum = 225;BA.debugLine="req.InitializeGet(InvalidURL)"; +_req.InitializeGet(_invalidurl); + }; + //BA.debugLineNum = 227;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; +__c.CallSubDelayed2(ba,(Object)(_httputils2service.getObject()),"SubmitJob",this); + //BA.debugLineNum = 228;BA.debugLine="End Sub"; +return ""; +} +public String _download2(String _link,String[] _parameters) throws Exception{ + //BA.debugLineNum = 235;BA.debugLine="Public Sub Download2(Link As String, Parameters()"; + //BA.debugLineNum = 236;BA.debugLine="Try"; +try { //BA.debugLineNum = 237;BA.debugLine="Link = AddScheme(Link)"; +_link = _addscheme(_link); + //BA.debugLineNum = 238;BA.debugLine="req.InitializeGet(escapeLink(Link, Parameters))"; +_req.InitializeGet(_escapelink(_link,_parameters)); + } + catch (Exception e5) { + ba.setLastException(e5); //BA.debugLineNum = 240;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; +__c.LogImpl("914876677",("Invalid link: "+__c.SmartStringFormatter("",(Object)(_link))+""),0); + //BA.debugLineNum = 241;BA.debugLine="req.InitializeGet(escapeLink(InvalidURL, Paramet"; +_req.InitializeGet(_escapelink(_invalidurl,_parameters)); + }; + //BA.debugLineNum = 243;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; +__c.CallSubDelayed2(ba,(Object)(_httputils2service.getObject()),"SubmitJob",this); + //BA.debugLineNum = 244;BA.debugLine="End Sub"; +return ""; +} +public String _escapelink(String _link,String[] _parameters) throws Exception{ anywheresoftware.b4a.keywords.StringBuilderWrapper _sb = null; anywheresoftware.b4a.objects.StringUtils _su = null; int _i = 0; -RDebugUtils.currentLine=43253760; - //BA.debugLineNum = 43253760;BA.debugLine="Private Sub escapeLink(Link As String, Parameters("; -RDebugUtils.currentLine=43253761; - //BA.debugLineNum = 43253761;BA.debugLine="Dim sb As StringBuilder"; + //BA.debugLineNum = 246;BA.debugLine="Private Sub escapeLink(Link As String, Parameters("; + //BA.debugLineNum = 247;BA.debugLine="Dim sb As StringBuilder"; _sb = new anywheresoftware.b4a.keywords.StringBuilderWrapper(); -RDebugUtils.currentLine=43253762; - //BA.debugLineNum = 43253762;BA.debugLine="sb.Initialize"; + //BA.debugLineNum = 248;BA.debugLine="sb.Initialize"; _sb.Initialize(); -RDebugUtils.currentLine=43253763; - //BA.debugLineNum = 43253763;BA.debugLine="sb.Append(Link)"; + //BA.debugLineNum = 249;BA.debugLine="sb.Append(Link)"; _sb.Append(_link); -RDebugUtils.currentLine=43253764; - //BA.debugLineNum = 43253764;BA.debugLine="If Parameters.Length > 0 Then sb.Append(\"?\")"; + //BA.debugLineNum = 250;BA.debugLine="If Parameters.Length > 0 Then sb.Append(\"?\")"; if (_parameters.length>0) { _sb.Append("?");}; -RDebugUtils.currentLine=43253765; - //BA.debugLineNum = 43253765;BA.debugLine="Dim su As StringUtils"; + //BA.debugLineNum = 251;BA.debugLine="Dim su As StringUtils"; _su = new anywheresoftware.b4a.objects.StringUtils(); -RDebugUtils.currentLine=43253766; - //BA.debugLineNum = 43253766;BA.debugLine="For i = 0 To Parameters.Length - 1 Step 2"; + //BA.debugLineNum = 252;BA.debugLine="For i = 0 To Parameters.Length - 1 Step 2"; { final int step6 = 2; final int limit6 = (int) (_parameters.length-1); _i = (int) (0) ; for (;_i <= limit6 ;_i = _i + step6 ) { -RDebugUtils.currentLine=43253767; - //BA.debugLineNum = 43253767;BA.debugLine="If i > 0 Then sb.Append(\"&\")"; + //BA.debugLineNum = 253;BA.debugLine="If i > 0 Then sb.Append(\"&\")"; if (_i>0) { _sb.Append("&");}; -RDebugUtils.currentLine=43253768; - //BA.debugLineNum = 43253768;BA.debugLine="sb.Append(su.EncodeUrl(Parameters(i), \"UTF8\")).A"; + //BA.debugLineNum = 254;BA.debugLine="sb.Append(su.EncodeUrl(Parameters(i), \"UTF8\")).A"; _sb.Append(_su.EncodeUrl(_parameters[_i],"UTF8")).Append("="); -RDebugUtils.currentLine=43253769; - //BA.debugLineNum = 43253769;BA.debugLine="sb.Append(su.EncodeUrl(Parameters(i + 1), \"UTF8\""; + //BA.debugLineNum = 255;BA.debugLine="sb.Append(su.EncodeUrl(Parameters(i + 1), \"UTF8\""; _sb.Append(_su.EncodeUrl(_parameters[(int) (_i+1)],"UTF8")); } }; -RDebugUtils.currentLine=43253771; - //BA.debugLineNum = 43253771;BA.debugLine="Return sb.ToString"; + //BA.debugLineNum = 257;BA.debugLine="Return sb.ToString"; if (true) return _sb.ToString(); -RDebugUtils.currentLine=43253772; - //BA.debugLineNum = 43253772;BA.debugLine="End Sub"; + //BA.debugLineNum = 258;BA.debugLine="End Sub"; return ""; } -public String _download2(keymon.lat.medicomed.httpjob __ref,String _link,String[] _parameters) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "download2", true)) - {return ((String) Debug.delegate(ba, "download2", new Object[] {_link,_parameters}));} -RDebugUtils.currentLine=43188224; - //BA.debugLineNum = 43188224;BA.debugLine="Public Sub Download2(Link As String, Parameters()"; -RDebugUtils.currentLine=43188225; - //BA.debugLineNum = 43188225;BA.debugLine="Try"; -try {RDebugUtils.currentLine=43188226; - //BA.debugLineNum = 43188226;BA.debugLine="Link = AddScheme(Link)"; -_link = __ref._addscheme /*String*/ (null,_link); -RDebugUtils.currentLine=43188227; - //BA.debugLineNum = 43188227;BA.debugLine="req.InitializeGet(escapeLink(Link, Parameters))"; -__ref._req /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ .InitializeGet(__ref._escapelink /*String*/ (null,_link,_parameters)); - } - catch (Exception e5) { - ba.setLastException(e5);RDebugUtils.currentLine=43188229; - //BA.debugLineNum = 43188229;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; -__c.LogImpl("943188229",("Invalid link: "+__c.SmartStringFormatter("",(Object)(_link))+""),0); -RDebugUtils.currentLine=43188230; - //BA.debugLineNum = 43188230;BA.debugLine="req.InitializeGet(escapeLink(InvalidURL, Paramet"; -__ref._req /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ .InitializeGet(__ref._escapelink /*String*/ (null,__ref._invalidurl /*String*/ ,_parameters)); - }; -RDebugUtils.currentLine=43188232; - //BA.debugLineNum = 43188232;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; -__c.CallSubDelayed2(ba,(Object)(_httputils2service.getObject()),"SubmitJob",this); -RDebugUtils.currentLine=43188233; - //BA.debugLineNum = 43188233;BA.debugLine="End Sub"; -return ""; -} -public anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _getbitmap(keymon.lat.medicomed.httpjob __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "getbitmap", true)) - {return ((anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper) Debug.delegate(ba, "getbitmap", null));} +public anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _getbitmap() throws Exception{ anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _b = null; -RDebugUtils.currentLine=43778048; - //BA.debugLineNum = 43778048;BA.debugLine="Public Sub GetBitmap As Bitmap"; -RDebugUtils.currentLine=43778049; - //BA.debugLineNum = 43778049;BA.debugLine="Dim b As Bitmap"; + //BA.debugLineNum = 330;BA.debugLine="Public Sub GetBitmap As Bitmap"; + //BA.debugLineNum = 331;BA.debugLine="Dim b As Bitmap"; _b = new anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper(); -RDebugUtils.currentLine=43778050; - //BA.debugLineNum = 43778050;BA.debugLine="b = LoadBitmap(HttpUtils2Service.TempFolder, task"; -_b = __c.LoadBitmap(_httputils2service._tempfolder /*String*/ ,__ref._taskid /*String*/ ); -RDebugUtils.currentLine=43778051; - //BA.debugLineNum = 43778051;BA.debugLine="Return b"; + //BA.debugLineNum = 332;BA.debugLine="b = LoadBitmap(HttpUtils2Service.TempFolder, task"; +_b = __c.LoadBitmap(_httputils2service._tempfolder /*String*/ ,_taskid); + //BA.debugLineNum = 333;BA.debugLine="Return b"; if (true) return _b; -RDebugUtils.currentLine=43778052; - //BA.debugLineNum = 43778052;BA.debugLine="End Sub"; + //BA.debugLineNum = 334;BA.debugLine="End Sub"; return null; } -public anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _getbitmapresize(keymon.lat.medicomed.httpjob __ref,int _width,int _height,boolean _keepaspectratio) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "getbitmapresize", true)) - {return ((anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper) Debug.delegate(ba, "getbitmapresize", new Object[] {_width,_height,_keepaspectratio}));} -RDebugUtils.currentLine=43909120; - //BA.debugLineNum = 43909120;BA.debugLine="Public Sub GetBitmapResize(Width As Int, Height As"; -RDebugUtils.currentLine=43909121; - //BA.debugLineNum = 43909121;BA.debugLine="Return LoadBitmapResize(HttpUtils2Service.TempFol"; -if (true) return __c.LoadBitmapResize(_httputils2service._tempfolder /*String*/ ,__ref._taskid /*String*/ ,_width,_height,_keepaspectratio); -RDebugUtils.currentLine=43909122; - //BA.debugLineNum = 43909122;BA.debugLine="End Sub"; +public anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _getbitmapresize(int _width,int _height,boolean _keepaspectratio) throws Exception{ + //BA.debugLineNum = 341;BA.debugLine="Public Sub GetBitmapResize(Width As Int, Height As"; + //BA.debugLineNum = 342;BA.debugLine="Return LoadBitmapResize(HttpUtils2Service.TempFol"; +if (true) return __c.LoadBitmapResize(_httputils2service._tempfolder /*String*/ ,_taskid,_width,_height,_keepaspectratio); + //BA.debugLineNum = 343;BA.debugLine="End Sub"; return null; } -public anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _getbitmapsample(keymon.lat.medicomed.httpjob __ref,int _width,int _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "getbitmapsample", true)) - {return ((anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper) Debug.delegate(ba, "getbitmapsample", new Object[] {_width,_height}));} -RDebugUtils.currentLine=43843584; - //BA.debugLineNum = 43843584;BA.debugLine="Public Sub GetBitmapSample(Width As Int, Height As"; -RDebugUtils.currentLine=43843585; - //BA.debugLineNum = 43843585;BA.debugLine="Return LoadBitmapSample(HttpUtils2Service.TempFol"; -if (true) return __c.LoadBitmapSample(_httputils2service._tempfolder /*String*/ ,__ref._taskid /*String*/ ,_width,_height); -RDebugUtils.currentLine=43843586; - //BA.debugLineNum = 43843586;BA.debugLine="End Sub"; +public anywheresoftware.b4a.objects.drawable.CanvasWrapper.BitmapWrapper _getbitmapsample(int _width,int _height) throws Exception{ + //BA.debugLineNum = 337;BA.debugLine="Public Sub GetBitmapSample(Width As Int, Height As"; + //BA.debugLineNum = 338;BA.debugLine="Return LoadBitmapSample(HttpUtils2Service.TempFol"; +if (true) return __c.LoadBitmapSample(_httputils2service._tempfolder /*String*/ ,_taskid,_width,_height); + //BA.debugLineNum = 339;BA.debugLine="End Sub"; return null; } -public String _getstring2(keymon.lat.medicomed.httpjob __ref,String _encoding) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "getstring2", true)) - {return ((String) Debug.delegate(ba, "getstring2", new Object[] {_encoding}));} +public anywheresoftware.b4a.objects.streams.File.InputStreamWrapper _getinputstream() throws Exception{ +anywheresoftware.b4a.objects.streams.File.InputStreamWrapper _in = null; + //BA.debugLineNum = 347;BA.debugLine="Public Sub GetInputStream As InputStream"; + //BA.debugLineNum = 348;BA.debugLine="Dim In As InputStream"; +_in = new anywheresoftware.b4a.objects.streams.File.InputStreamWrapper(); + //BA.debugLineNum = 349;BA.debugLine="In = File.OpenInput(HttpUtils2Service.TempFolder,"; +_in = __c.File.OpenInput(_httputils2service._tempfolder /*String*/ ,_taskid); + //BA.debugLineNum = 350;BA.debugLine="Return In"; +if (true) return _in; + //BA.debugLineNum = 351;BA.debugLine="End Sub"; +return null; +} +public anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest _getrequest() throws Exception{ + //BA.debugLineNum = 310;BA.debugLine="Public Sub GetRequest As OkHttpRequest"; + //BA.debugLineNum = 311;BA.debugLine="Return req"; +if (true) return _req; + //BA.debugLineNum = 312;BA.debugLine="End Sub"; +return null; +} +public String _getstring() throws Exception{ + //BA.debugLineNum = 291;BA.debugLine="Public Sub GetString As String"; + //BA.debugLineNum = 292;BA.debugLine="Return GetString2(\"UTF8\")"; +if (true) return _getstring2("UTF8"); + //BA.debugLineNum = 293;BA.debugLine="End Sub"; +return ""; +} +public String _getstring2(String _encoding) throws Exception{ anywheresoftware.b4a.objects.streams.File.TextReaderWrapper _tr = null; String _res = ""; -RDebugUtils.currentLine=43581440; - //BA.debugLineNum = 43581440;BA.debugLine="Public Sub GetString2(Encoding As String) As Strin"; -RDebugUtils.currentLine=43581444; - //BA.debugLineNum = 43581444;BA.debugLine="Dim tr As TextReader"; + //BA.debugLineNum = 296;BA.debugLine="Public Sub GetString2(Encoding As String) As Strin"; + //BA.debugLineNum = 300;BA.debugLine="Dim tr As TextReader"; _tr = new anywheresoftware.b4a.objects.streams.File.TextReaderWrapper(); -RDebugUtils.currentLine=43581445; - //BA.debugLineNum = 43581445;BA.debugLine="tr.Initialize2(File.OpenInput(HttpUtils2Service.T"; -_tr.Initialize2((java.io.InputStream)(__c.File.OpenInput(_httputils2service._tempfolder /*String*/ ,__ref._taskid /*String*/ ).getObject()),_encoding); -RDebugUtils.currentLine=43581446; - //BA.debugLineNum = 43581446;BA.debugLine="Dim res As String = tr.ReadAll"; + //BA.debugLineNum = 301;BA.debugLine="tr.Initialize2(File.OpenInput(HttpUtils2Service.T"; +_tr.Initialize2((java.io.InputStream)(__c.File.OpenInput(_httputils2service._tempfolder /*String*/ ,_taskid).getObject()),_encoding); + //BA.debugLineNum = 302;BA.debugLine="Dim res As String = tr.ReadAll"; _res = _tr.ReadAll(); -RDebugUtils.currentLine=43581447; - //BA.debugLineNum = 43581447;BA.debugLine="tr.Close"; + //BA.debugLineNum = 303;BA.debugLine="tr.Close"; _tr.Close(); -RDebugUtils.currentLine=43581448; - //BA.debugLineNum = 43581448;BA.debugLine="Return res"; + //BA.debugLineNum = 304;BA.debugLine="Return res"; if (true) return _res; -RDebugUtils.currentLine=43581450; - //BA.debugLineNum = 43581450;BA.debugLine="End Sub"; + //BA.debugLineNum = 306;BA.debugLine="End Sub"; return ""; } -public String _head(keymon.lat.medicomed.httpjob __ref,String _link) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "head", true)) - {return ((String) Debug.delegate(ba, "head", new Object[] {_link}));} -RDebugUtils.currentLine=42860544; - //BA.debugLineNum = 42860544;BA.debugLine="Public Sub Head(Link As String)"; -RDebugUtils.currentLine=42860545; - //BA.debugLineNum = 42860545;BA.debugLine="Try"; -try {RDebugUtils.currentLine=42860546; - //BA.debugLineNum = 42860546;BA.debugLine="Link = AddScheme(Link)"; -_link = __ref._addscheme /*String*/ (null,_link); -RDebugUtils.currentLine=42860547; - //BA.debugLineNum = 42860547;BA.debugLine="req.InitializeHead(Link)"; -__ref._req /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ .InitializeHead(_link); +public String _head(String _link) throws Exception{ + //BA.debugLineNum = 119;BA.debugLine="Public Sub Head(Link As String)"; + //BA.debugLineNum = 120;BA.debugLine="Try"; +try { //BA.debugLineNum = 121;BA.debugLine="Link = AddScheme(Link)"; +_link = _addscheme(_link); + //BA.debugLineNum = 122;BA.debugLine="req.InitializeHead(Link)"; +_req.InitializeHead(_link); } catch (Exception e5) { - ba.setLastException(e5);RDebugUtils.currentLine=42860549; - //BA.debugLineNum = 42860549;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; -__c.LogImpl("942860549",("Invalid link: "+__c.SmartStringFormatter("",(Object)(_link))+""),0); -RDebugUtils.currentLine=42860550; - //BA.debugLineNum = 42860550;BA.debugLine="req.InitializeHead(InvalidURL)"; -__ref._req /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ .InitializeHead(__ref._invalidurl /*String*/ ); + ba.setLastException(e5); //BA.debugLineNum = 124;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; +__c.LogImpl("914548997",("Invalid link: "+__c.SmartStringFormatter("",(Object)(_link))+""),0); + //BA.debugLineNum = 125;BA.debugLine="req.InitializeHead(InvalidURL)"; +_req.InitializeHead(_invalidurl); }; -RDebugUtils.currentLine=42860552; - //BA.debugLineNum = 42860552;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; + //BA.debugLineNum = 127;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; __c.CallSubDelayed2(ba,(Object)(_httputils2service.getObject()),"SubmitJob",this); -RDebugUtils.currentLine=42860553; - //BA.debugLineNum = 42860553;BA.debugLine="End Sub"; + //BA.debugLineNum = 128;BA.debugLine="End Sub"; return ""; } -public boolean _multipartstartsection(keymon.lat.medicomed.httpjob __ref,anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _stream,boolean _empty) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "multipartstartsection", true)) - {return ((Boolean) Debug.delegate(ba, "multipartstartsection", new Object[] {_stream,_empty}));} -RDebugUtils.currentLine=42991616; - //BA.debugLineNum = 42991616;BA.debugLine="Private Sub MultipartStartSection (stream As Outpu"; -RDebugUtils.currentLine=42991617; - //BA.debugLineNum = 42991617;BA.debugLine="If empty = False Then"; +public String _initialize(anywheresoftware.b4a.BA _ba,String _name,Object _targetmodule) throws Exception{ +innerInitialize(_ba); +anywheresoftware.b4j.object.JavaObject _jo = null; + //BA.debugLineNum = 38;BA.debugLine="Public Sub Initialize (Name As String, TargetModul"; + //BA.debugLineNum = 39;BA.debugLine="JobName = Name"; +_jobname = _name; + //BA.debugLineNum = 40;BA.debugLine="target = TargetModule"; +_target = _targetmodule; + //BA.debugLineNum = 42;BA.debugLine="If HttpUtils2Service.TempFolder = \"\" Then"; +if ((_httputils2service._tempfolder /*String*/ ).equals("")) { + //BA.debugLineNum = 43;BA.debugLine="Dim jo As JavaObject"; +_jo = new anywheresoftware.b4j.object.JavaObject(); + //BA.debugLineNum = 44;BA.debugLine="jo.InitializeNewInstance(Application.PackageName"; +_jo.InitializeNewInstance(__c.Application.getPackageName()+".httputils2service",(Object[])(__c.Null)); + //BA.debugLineNum = 45;BA.debugLine="jo.RunMethod(\"onReceive\", Array(Null, Null))"; +_jo.RunMethod("onReceive",new Object[]{__c.Null,__c.Null}); + }; + //BA.debugLineNum = 48;BA.debugLine="End Sub"; +return ""; +} +public boolean _multipartstartsection(anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _stream,boolean _empty) throws Exception{ + //BA.debugLineNum = 179;BA.debugLine="Private Sub MultipartStartSection (stream As Outpu"; + //BA.debugLineNum = 180;BA.debugLine="If empty = False Then"; if (_empty==__c.False) { -RDebugUtils.currentLine=42991618; - //BA.debugLineNum = 42991618;BA.debugLine="stream.WriteBytes(Array As Byte(13, 10), 0, 2)"; + //BA.debugLineNum = 181;BA.debugLine="stream.WriteBytes(Array As Byte(13, 10), 0, 2)"; _stream.WriteBytes(new byte[]{(byte) (13),(byte) (10)},(int) (0),(int) (2)); }else { -RDebugUtils.currentLine=42991620; - //BA.debugLineNum = 42991620;BA.debugLine="empty = False"; + //BA.debugLineNum = 183;BA.debugLine="empty = False"; _empty = __c.False; }; -RDebugUtils.currentLine=42991622; - //BA.debugLineNum = 42991622;BA.debugLine="Return empty"; + //BA.debugLineNum = 185;BA.debugLine="Return empty"; if (true) return _empty; -RDebugUtils.currentLine=42991623; - //BA.debugLineNum = 42991623;BA.debugLine="End Sub"; + //BA.debugLineNum = 186;BA.debugLine="End Sub"; return false; } -public String _patchbytes(keymon.lat.medicomed.httpjob __ref,String _link,byte[] _data) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "patchbytes", true)) - {return ((String) Debug.delegate(ba, "patchbytes", new Object[] {_link,_data}));} -RDebugUtils.currentLine=42795008; - //BA.debugLineNum = 42795008;BA.debugLine="Public Sub PatchBytes(Link As String, Data() As By"; -RDebugUtils.currentLine=42795009; - //BA.debugLineNum = 42795009;BA.debugLine="Link = AddScheme(Link)"; -_link = __ref._addscheme /*String*/ (null,_link); -RDebugUtils.currentLine=42795017; - //BA.debugLineNum = 42795017;BA.debugLine="Try"; -try {RDebugUtils.currentLine=42795018; - //BA.debugLineNum = 42795018;BA.debugLine="req.InitializePatch2(Link, Data)"; -__ref._req /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ .InitializePatch2(_link,_data); +public String _patchbytes(String _link,byte[] _data) throws Exception{ + //BA.debugLineNum = 97;BA.debugLine="Public Sub PatchBytes(Link As String, Data() As By"; + //BA.debugLineNum = 98;BA.debugLine="Link = AddScheme(Link)"; +_link = _addscheme(_link); + //BA.debugLineNum = 106;BA.debugLine="Try"; +try { //BA.debugLineNum = 107;BA.debugLine="req.InitializePatch2(Link, Data)"; +_req.InitializePatch2(_link,_data); } catch (Exception e5) { - ba.setLastException(e5);RDebugUtils.currentLine=42795020; - //BA.debugLineNum = 42795020;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; -__c.LogImpl("942795020",("Invalid link: "+__c.SmartStringFormatter("",(Object)(_link))+""),0); -RDebugUtils.currentLine=42795021; - //BA.debugLineNum = 42795021;BA.debugLine="req.InitializePatch2(InvalidURL, Data)"; -__ref._req /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ .InitializePatch2(__ref._invalidurl /*String*/ ,_data); + ba.setLastException(e5); //BA.debugLineNum = 109;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; +__c.LogImpl("914483468",("Invalid link: "+__c.SmartStringFormatter("",(Object)(_link))+""),0); + //BA.debugLineNum = 110;BA.debugLine="req.InitializePatch2(InvalidURL, Data)"; +_req.InitializePatch2(_invalidurl,_data); }; -RDebugUtils.currentLine=42795025; - //BA.debugLineNum = 42795025;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; + //BA.debugLineNum = 114;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; __c.CallSubDelayed2(ba,(Object)(_httputils2service.getObject()),"SubmitJob",this); -RDebugUtils.currentLine=42795026; - //BA.debugLineNum = 42795026;BA.debugLine="End Sub"; + //BA.debugLineNum = 115;BA.debugLine="End Sub"; return ""; } -public String _patchstring(keymon.lat.medicomed.httpjob __ref,String _link,String _text) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "patchstring", true)) - {return ((String) Debug.delegate(ba, "patchstring", new Object[] {_link,_text}));} -RDebugUtils.currentLine=42729472; - //BA.debugLineNum = 42729472;BA.debugLine="Public Sub PatchString(Link As String, Text As Str"; -RDebugUtils.currentLine=42729473; - //BA.debugLineNum = 42729473;BA.debugLine="PatchBytes(Link, Text.GetBytes(\"UTF8\"))"; -__ref._patchbytes /*String*/ (null,_link,_text.getBytes("UTF8")); -RDebugUtils.currentLine=42729474; - //BA.debugLineNum = 42729474;BA.debugLine="End Sub"; +public String _patchstring(String _link,String _text) throws Exception{ + //BA.debugLineNum = 92;BA.debugLine="Public Sub PatchString(Link As String, Text As Str"; + //BA.debugLineNum = 93;BA.debugLine="PatchBytes(Link, Text.GetBytes(\"UTF8\"))"; +_patchbytes(_link,_text.getBytes("UTF8")); + //BA.debugLineNum = 94;BA.debugLine="End Sub"; return ""; } -public String _postfile(keymon.lat.medicomed.httpjob __ref,String _link,String _dir,String _filename) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "postfile", true)) - {return ((String) Debug.delegate(ba, "postfile", new Object[] {_link,_dir,_filename}));} +public String _postbytes(String _link,byte[] _data) throws Exception{ + //BA.debugLineNum = 63;BA.debugLine="Public Sub PostBytes(Link As String, Data() As Byt"; + //BA.debugLineNum = 64;BA.debugLine="Try"; +try { //BA.debugLineNum = 65;BA.debugLine="Link = AddScheme(Link)"; +_link = _addscheme(_link); + //BA.debugLineNum = 66;BA.debugLine="req.InitializePost2(Link, Data)"; +_req.InitializePost2(_link,_data); + } + catch (Exception e5) { + ba.setLastException(e5); //BA.debugLineNum = 68;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; +__c.LogImpl("914221317",("Invalid link: "+__c.SmartStringFormatter("",(Object)(_link))+""),0); + //BA.debugLineNum = 69;BA.debugLine="req.InitializePost2(InvalidURL, Data)"; +_req.InitializePost2(_invalidurl,_data); + }; + //BA.debugLineNum = 71;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; +__c.CallSubDelayed2(ba,(Object)(_httputils2service.getObject()),"SubmitJob",this); + //BA.debugLineNum = 72;BA.debugLine="End Sub"; +return ""; +} +public String _postfile(String _link,String _dir,String _filename) throws Exception{ int _length = 0; anywheresoftware.b4a.objects.streams.File.InputStreamWrapper _in = null; anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out = null; -RDebugUtils.currentLine=43057152; - //BA.debugLineNum = 43057152;BA.debugLine="Public Sub PostFile(Link As String, Dir As String,"; -RDebugUtils.currentLine=43057153; - //BA.debugLineNum = 43057153;BA.debugLine="Link = AddScheme(Link)"; -_link = __ref._addscheme /*String*/ (null,_link); -RDebugUtils.currentLine=43057158; - //BA.debugLineNum = 43057158;BA.debugLine="Dim length As Int"; + //BA.debugLineNum = 190;BA.debugLine="Public Sub PostFile(Link As String, Dir As String,"; + //BA.debugLineNum = 191;BA.debugLine="Link = AddScheme(Link)"; +_link = _addscheme(_link); + //BA.debugLineNum = 196;BA.debugLine="Dim length As Int"; _length = 0; -RDebugUtils.currentLine=43057159; - //BA.debugLineNum = 43057159;BA.debugLine="If Dir = File.DirAssets Then"; + //BA.debugLineNum = 197;BA.debugLine="If Dir = File.DirAssets Then"; if ((_dir).equals(__c.File.getDirAssets())) { -RDebugUtils.currentLine=43057160; - //BA.debugLineNum = 43057160;BA.debugLine="Log(\"Cannot send files from the assets folder.\")"; -__c.LogImpl("943057160","Cannot send files from the assets folder.",0); -RDebugUtils.currentLine=43057161; - //BA.debugLineNum = 43057161;BA.debugLine="Return"; + //BA.debugLineNum = 198;BA.debugLine="Log(\"Cannot send files from the assets folder.\")"; +__c.LogImpl("914745608","Cannot send files from the assets folder.",0); + //BA.debugLineNum = 199;BA.debugLine="Return"; if (true) return ""; }; -RDebugUtils.currentLine=43057163; - //BA.debugLineNum = 43057163;BA.debugLine="length = File.Size(Dir, FileName)"; + //BA.debugLineNum = 201;BA.debugLine="length = File.Size(Dir, FileName)"; _length = (int) (__c.File.Size(_dir,_filename)); -RDebugUtils.currentLine=43057164; - //BA.debugLineNum = 43057164;BA.debugLine="Dim In As InputStream"; + //BA.debugLineNum = 202;BA.debugLine="Dim In As InputStream"; _in = new anywheresoftware.b4a.objects.streams.File.InputStreamWrapper(); -RDebugUtils.currentLine=43057165; - //BA.debugLineNum = 43057165;BA.debugLine="In = File.OpenInput(Dir, FileName)"; + //BA.debugLineNum = 203;BA.debugLine="In = File.OpenInput(Dir, FileName)"; _in = __c.File.OpenInput(_dir,_filename); -RDebugUtils.currentLine=43057166; - //BA.debugLineNum = 43057166;BA.debugLine="If length < 1000000 Then '1mb"; + //BA.debugLineNum = 204;BA.debugLine="If length < 1000000 Then '1mb"; if (_length<1000000) { -RDebugUtils.currentLine=43057169; - //BA.debugLineNum = 43057169;BA.debugLine="Dim out As OutputStream"; + //BA.debugLineNum = 207;BA.debugLine="Dim out As OutputStream"; _out = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); -RDebugUtils.currentLine=43057170; - //BA.debugLineNum = 43057170;BA.debugLine="out.InitializeToBytesArray(length)"; + //BA.debugLineNum = 208;BA.debugLine="out.InitializeToBytesArray(length)"; _out.InitializeToBytesArray(_length); -RDebugUtils.currentLine=43057171; - //BA.debugLineNum = 43057171;BA.debugLine="File.Copy2(In, out)"; + //BA.debugLineNum = 209;BA.debugLine="File.Copy2(In, out)"; __c.File.Copy2((java.io.InputStream)(_in.getObject()),(java.io.OutputStream)(_out.getObject())); -RDebugUtils.currentLine=43057172; - //BA.debugLineNum = 43057172;BA.debugLine="PostBytes(Link, out.ToBytesArray)"; -__ref._postbytes /*String*/ (null,_link,_out.ToBytesArray()); + //BA.debugLineNum = 210;BA.debugLine="PostBytes(Link, out.ToBytesArray)"; +_postbytes(_link,_out.ToBytesArray()); }else { -RDebugUtils.currentLine=43057174; - //BA.debugLineNum = 43057174;BA.debugLine="req.InitializePost(Link, In, length)"; -__ref._req /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ .InitializePost(_link,(java.io.InputStream)(_in.getObject()),_length); -RDebugUtils.currentLine=43057175; - //BA.debugLineNum = 43057175;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\","; + //BA.debugLineNum = 212;BA.debugLine="req.InitializePost(Link, In, length)"; +_req.InitializePost(_link,(java.io.InputStream)(_in.getObject()),_length); + //BA.debugLineNum = 213;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\","; __c.CallSubDelayed2(ba,(Object)(_httputils2service.getObject()),"SubmitJob",this); }; -RDebugUtils.currentLine=43057178; - //BA.debugLineNum = 43057178;BA.debugLine="End Sub"; + //BA.debugLineNum = 216;BA.debugLine="End Sub"; return ""; } -public String _postmultipart(keymon.lat.medicomed.httpjob __ref,String _link,anywheresoftware.b4a.objects.collections.Map _namevalues,anywheresoftware.b4a.objects.collections.List _files) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "postmultipart", true)) - {return ((String) Debug.delegate(ba, "postmultipart", new Object[] {_link,_namevalues,_files}));} +public String _postmultipart(String _link,anywheresoftware.b4a.objects.collections.Map _namevalues,anywheresoftware.b4a.objects.collections.List _files) throws Exception{ String _boundary = ""; anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _stream = null; byte[] _b = null; @@ -696,32 +446,23 @@ String _value = ""; String _s = ""; keymon.lat.medicomed.httpjob._multipartfiledata _fd = null; anywheresoftware.b4a.objects.streams.File.InputStreamWrapper _in = null; -RDebugUtils.currentLine=42926080; - //BA.debugLineNum = 42926080;BA.debugLine="Public Sub PostMultipart(Link As String, NameValue"; -RDebugUtils.currentLine=42926081; - //BA.debugLineNum = 42926081;BA.debugLine="Dim boundary As String = \"-----------------------"; + //BA.debugLineNum = 133;BA.debugLine="Public Sub PostMultipart(Link As String, NameValue"; + //BA.debugLineNum = 134;BA.debugLine="Dim boundary As String = \"-----------------------"; _boundary = "---------------------------1461124740692"; -RDebugUtils.currentLine=42926082; - //BA.debugLineNum = 42926082;BA.debugLine="Dim stream As OutputStream"; + //BA.debugLineNum = 135;BA.debugLine="Dim stream As OutputStream"; _stream = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); -RDebugUtils.currentLine=42926083; - //BA.debugLineNum = 42926083;BA.debugLine="stream.InitializeToBytesArray(0)"; + //BA.debugLineNum = 136;BA.debugLine="stream.InitializeToBytesArray(0)"; _stream.InitializeToBytesArray((int) (0)); -RDebugUtils.currentLine=42926084; - //BA.debugLineNum = 42926084;BA.debugLine="Dim b() As Byte"; + //BA.debugLineNum = 137;BA.debugLine="Dim b() As Byte"; _b = new byte[(int) (0)]; ; -RDebugUtils.currentLine=42926085; - //BA.debugLineNum = 42926085;BA.debugLine="Dim eol As String = Chr(13) & Chr(10)"; + //BA.debugLineNum = 138;BA.debugLine="Dim eol As String = Chr(13) & Chr(10)"; _eol = BA.ObjectToString(__c.Chr((int) (13)))+BA.ObjectToString(__c.Chr((int) (10))); -RDebugUtils.currentLine=42926086; - //BA.debugLineNum = 42926086;BA.debugLine="Dim empty As Boolean = True"; + //BA.debugLineNum = 139;BA.debugLine="Dim empty As Boolean = True"; _empty = __c.True; -RDebugUtils.currentLine=42926087; - //BA.debugLineNum = 42926087;BA.debugLine="If NameValues <> Null And NameValues.IsInitialize"; + //BA.debugLineNum = 140;BA.debugLine="If NameValues <> Null And NameValues.IsInitialize"; if (_namevalues!= null && _namevalues.IsInitialized()) { -RDebugUtils.currentLine=42926088; - //BA.debugLineNum = 42926088;BA.debugLine="For Each key As String In NameValues.Keys"; + //BA.debugLineNum = 141;BA.debugLine="For Each key As String In NameValues.Keys"; { final anywheresoftware.b4a.BA.IterableList group8 = _namevalues.Keys(); final int groupLen8 = group8.getSize() @@ -729,29 +470,22 @@ final int groupLen8 = group8.getSize() ; for (; index8 < groupLen8;index8++){ _key = BA.ObjectToString(group8.Get(index8)); -RDebugUtils.currentLine=42926089; - //BA.debugLineNum = 42926089;BA.debugLine="Dim value As String = NameValues.Get(key)"; + //BA.debugLineNum = 142;BA.debugLine="Dim value As String = NameValues.Get(key)"; _value = BA.ObjectToString(_namevalues.Get((Object)(_key))); -RDebugUtils.currentLine=42926090; - //BA.debugLineNum = 42926090;BA.debugLine="empty = MultipartStartSection (stream, empty)"; -_empty = __ref._multipartstartsection /*boolean*/ (null,_stream,_empty); -RDebugUtils.currentLine=42926091; - //BA.debugLineNum = 42926091;BA.debugLine="Dim s As String = _ $\"--${boundary} Content-Dis"; + //BA.debugLineNum = 143;BA.debugLine="empty = MultipartStartSection (stream, empty)"; +_empty = _multipartstartsection(_stream,_empty); + //BA.debugLineNum = 144;BA.debugLine="Dim s As String = _ $\"--${boundary} Content-Dis"; _s = ("--"+__c.SmartStringFormatter("",(Object)(_boundary))+"\n"+"Content-Disposition: form-data; name=\""+__c.SmartStringFormatter("",(Object)(_key))+"\"\n"+"\n"+""+__c.SmartStringFormatter("",(Object)(_value))+""); -RDebugUtils.currentLine=42926096; - //BA.debugLineNum = 42926096;BA.debugLine="b = s.Replace(CRLF, eol).GetBytes(\"UTF8\")"; + //BA.debugLineNum = 149;BA.debugLine="b = s.Replace(CRLF, eol).GetBytes(\"UTF8\")"; _b = _s.replace(__c.CRLF,_eol).getBytes("UTF8"); -RDebugUtils.currentLine=42926097; - //BA.debugLineNum = 42926097;BA.debugLine="stream.WriteBytes(b, 0, b.Length)"; + //BA.debugLineNum = 150;BA.debugLine="stream.WriteBytes(b, 0, b.Length)"; _stream.WriteBytes(_b,(int) (0),_b.length); } }; }; -RDebugUtils.currentLine=42926100; - //BA.debugLineNum = 42926100;BA.debugLine="If Files <> Null And Files.IsInitialized Then"; + //BA.debugLineNum = 153;BA.debugLine="If Files <> Null And Files.IsInitialized Then"; if (_files!= null && _files.IsInitialized()) { -RDebugUtils.currentLine=42926101; - //BA.debugLineNum = 42926101;BA.debugLine="For Each fd As MultipartFileData In Files"; + //BA.debugLineNum = 154;BA.debugLine="For Each fd As MultipartFileData In Files"; { final anywheresoftware.b4a.BA.IterableList group17 = _files; final int groupLen17 = group17.getSize() @@ -759,110 +493,81 @@ final int groupLen17 = group17.getSize() ; for (; index17 < groupLen17;index17++){ _fd = (keymon.lat.medicomed.httpjob._multipartfiledata)(group17.Get(index17)); -RDebugUtils.currentLine=42926102; - //BA.debugLineNum = 42926102;BA.debugLine="empty = MultipartStartSection (stream, empty)"; -_empty = __ref._multipartstartsection /*boolean*/ (null,_stream,_empty); -RDebugUtils.currentLine=42926103; - //BA.debugLineNum = 42926103;BA.debugLine="Dim s As String = _ $\"--${boundary} Content-Dis"; + //BA.debugLineNum = 155;BA.debugLine="empty = MultipartStartSection (stream, empty)"; +_empty = _multipartstartsection(_stream,_empty); + //BA.debugLineNum = 156;BA.debugLine="Dim s As String = _ $\"--${boundary} Content-Dis"; _s = ("--"+__c.SmartStringFormatter("",(Object)(_boundary))+"\n"+"Content-Disposition: form-data; name=\""+__c.SmartStringFormatter("",(Object)(_fd.KeyName /*String*/ ))+"\"; filename=\""+__c.SmartStringFormatter("",(Object)(_fd.FileName /*String*/ ))+"\"\n"+"Content-Type: "+__c.SmartStringFormatter("",(Object)(_fd.ContentType /*String*/ ))+"\n"+"\n"+""); -RDebugUtils.currentLine=42926109; - //BA.debugLineNum = 42926109;BA.debugLine="b = s.Replace(CRLF, eol).GetBytes(\"UTF8\")"; + //BA.debugLineNum = 162;BA.debugLine="b = s.Replace(CRLF, eol).GetBytes(\"UTF8\")"; _b = _s.replace(__c.CRLF,_eol).getBytes("UTF8"); -RDebugUtils.currentLine=42926110; - //BA.debugLineNum = 42926110;BA.debugLine="stream.WriteBytes(b, 0, b.Length)"; + //BA.debugLineNum = 163;BA.debugLine="stream.WriteBytes(b, 0, b.Length)"; _stream.WriteBytes(_b,(int) (0),_b.length); -RDebugUtils.currentLine=42926111; - //BA.debugLineNum = 42926111;BA.debugLine="Dim in As InputStream = File.OpenInput(fd.Dir,"; + //BA.debugLineNum = 164;BA.debugLine="Dim in As InputStream = File.OpenInput(fd.Dir,"; _in = new anywheresoftware.b4a.objects.streams.File.InputStreamWrapper(); _in = __c.File.OpenInput(_fd.Dir /*String*/ ,_fd.FileName /*String*/ ); -RDebugUtils.currentLine=42926112; - //BA.debugLineNum = 42926112;BA.debugLine="File.Copy2(in, stream)"; + //BA.debugLineNum = 165;BA.debugLine="File.Copy2(in, stream)"; __c.File.Copy2((java.io.InputStream)(_in.getObject()),(java.io.OutputStream)(_stream.getObject())); } }; }; -RDebugUtils.currentLine=42926115; - //BA.debugLineNum = 42926115;BA.debugLine="empty = MultipartStartSection (stream, empty)"; -_empty = __ref._multipartstartsection /*boolean*/ (null,_stream,_empty); -RDebugUtils.currentLine=42926116; - //BA.debugLineNum = 42926116;BA.debugLine="s = _ $\"--${boundary}-- \"$"; + //BA.debugLineNum = 168;BA.debugLine="empty = MultipartStartSection (stream, empty)"; +_empty = _multipartstartsection(_stream,_empty); + //BA.debugLineNum = 169;BA.debugLine="s = _ $\"--${boundary}-- \"$"; _s = ("--"+__c.SmartStringFormatter("",(Object)(_boundary))+"--\n"+""); -RDebugUtils.currentLine=42926119; - //BA.debugLineNum = 42926119;BA.debugLine="b = s.Replace(CRLF, eol).GetBytes(\"UTF8\")"; + //BA.debugLineNum = 172;BA.debugLine="b = s.Replace(CRLF, eol).GetBytes(\"UTF8\")"; _b = _s.replace(__c.CRLF,_eol).getBytes("UTF8"); -RDebugUtils.currentLine=42926120; - //BA.debugLineNum = 42926120;BA.debugLine="stream.WriteBytes(b, 0, b.Length)"; + //BA.debugLineNum = 173;BA.debugLine="stream.WriteBytes(b, 0, b.Length)"; _stream.WriteBytes(_b,(int) (0),_b.length); -RDebugUtils.currentLine=42926121; - //BA.debugLineNum = 42926121;BA.debugLine="PostBytes(Link, stream.ToBytesArray)"; -__ref._postbytes /*String*/ (null,_link,_stream.ToBytesArray()); -RDebugUtils.currentLine=42926122; - //BA.debugLineNum = 42926122;BA.debugLine="req.SetContentType(\"multipart/form-data; boundary"; -__ref._req /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ .SetContentType("multipart/form-data; boundary="+_boundary); -RDebugUtils.currentLine=42926123; - //BA.debugLineNum = 42926123;BA.debugLine="req.SetContentEncoding(\"UTF8\")"; -__ref._req /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ .SetContentEncoding("UTF8"); -RDebugUtils.currentLine=42926124; - //BA.debugLineNum = 42926124;BA.debugLine="End Sub"; + //BA.debugLineNum = 174;BA.debugLine="PostBytes(Link, stream.ToBytesArray)"; +_postbytes(_link,_stream.ToBytesArray()); + //BA.debugLineNum = 175;BA.debugLine="req.SetContentType(\"multipart/form-data; boundary"; +_req.SetContentType("multipart/form-data; boundary="+_boundary); + //BA.debugLineNum = 176;BA.debugLine="req.SetContentEncoding(\"UTF8\")"; +_req.SetContentEncoding("UTF8"); + //BA.debugLineNum = 177;BA.debugLine="End Sub"; return ""; } -public String _poststring(keymon.lat.medicomed.httpjob __ref,String _link,String _text) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "poststring", true)) - {return ((String) Debug.delegate(ba, "poststring", new Object[] {_link,_text}));} -RDebugUtils.currentLine=42467328; - //BA.debugLineNum = 42467328;BA.debugLine="Public Sub PostString(Link As String, Text As Stri"; -RDebugUtils.currentLine=42467329; - //BA.debugLineNum = 42467329;BA.debugLine="PostBytes(Link, Text.GetBytes(\"UTF8\"))"; -__ref._postbytes /*String*/ (null,_link,_text.getBytes("UTF8")); -RDebugUtils.currentLine=42467330; - //BA.debugLineNum = 42467330;BA.debugLine="End Sub"; +public String _poststring(String _link,String _text) throws Exception{ + //BA.debugLineNum = 58;BA.debugLine="Public Sub PostString(Link As String, Text As Stri"; + //BA.debugLineNum = 59;BA.debugLine="PostBytes(Link, Text.GetBytes(\"UTF8\"))"; +_postbytes(_link,_text.getBytes("UTF8")); + //BA.debugLineNum = 60;BA.debugLine="End Sub"; return ""; } -public String _putbytes(keymon.lat.medicomed.httpjob __ref,String _link,byte[] _data) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "putbytes", true)) - {return ((String) Debug.delegate(ba, "putbytes", new Object[] {_link,_data}));} -RDebugUtils.currentLine=42663936; - //BA.debugLineNum = 42663936;BA.debugLine="Public Sub PutBytes(Link As String, Data() As Byte"; -RDebugUtils.currentLine=42663937; - //BA.debugLineNum = 42663937;BA.debugLine="Try"; -try {RDebugUtils.currentLine=42663938; - //BA.debugLineNum = 42663938;BA.debugLine="Link = AddScheme(Link)"; -_link = __ref._addscheme /*String*/ (null,_link); -RDebugUtils.currentLine=42663939; - //BA.debugLineNum = 42663939;BA.debugLine="req.InitializePut2(Link, Data)"; -__ref._req /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ .InitializePut2(_link,_data); +public String _putbytes(String _link,byte[] _data) throws Exception{ + //BA.debugLineNum = 80;BA.debugLine="Public Sub PutBytes(Link As String, Data() As Byte"; + //BA.debugLineNum = 81;BA.debugLine="Try"; +try { //BA.debugLineNum = 82;BA.debugLine="Link = AddScheme(Link)"; +_link = _addscheme(_link); + //BA.debugLineNum = 83;BA.debugLine="req.InitializePut2(Link, Data)"; +_req.InitializePut2(_link,_data); } catch (Exception e5) { - ba.setLastException(e5);RDebugUtils.currentLine=42663941; - //BA.debugLineNum = 42663941;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; -__c.LogImpl("942663941",("Invalid link: "+__c.SmartStringFormatter("",(Object)(_link))+""),0); -RDebugUtils.currentLine=42663942; - //BA.debugLineNum = 42663942;BA.debugLine="req.InitializePut2(InvalidURL, Data)"; -__ref._req /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ .InitializePut2(__ref._invalidurl /*String*/ ,_data); + ba.setLastException(e5); //BA.debugLineNum = 85;BA.debugLine="Log($\"Invalid link: ${Link}\"$)"; +__c.LogImpl("914352389",("Invalid link: "+__c.SmartStringFormatter("",(Object)(_link))+""),0); + //BA.debugLineNum = 86;BA.debugLine="req.InitializePut2(InvalidURL, Data)"; +_req.InitializePut2(_invalidurl,_data); }; -RDebugUtils.currentLine=42663944; - //BA.debugLineNum = 42663944;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; + //BA.debugLineNum = 88;BA.debugLine="CallSubDelayed2(HttpUtils2Service, \"SubmitJob\", M"; __c.CallSubDelayed2(ba,(Object)(_httputils2service.getObject()),"SubmitJob",this); -RDebugUtils.currentLine=42663945; - //BA.debugLineNum = 42663945;BA.debugLine="End Sub"; + //BA.debugLineNum = 89;BA.debugLine="End Sub"; return ""; } -public String _putstring(keymon.lat.medicomed.httpjob __ref,String _link,String _text) throws Exception{ -__ref = this; -RDebugUtils.currentModule="httpjob"; -if (Debug.shouldDelegate(ba, "putstring", true)) - {return ((String) Debug.delegate(ba, "putstring", new Object[] {_link,_text}));} -RDebugUtils.currentLine=42598400; - //BA.debugLineNum = 42598400;BA.debugLine="Public Sub PutString(Link As String, Text As Strin"; -RDebugUtils.currentLine=42598401; - //BA.debugLineNum = 42598401;BA.debugLine="PutBytes(Link, Text.GetBytes(\"UTF8\"))"; -__ref._putbytes /*String*/ (null,_link,_text.getBytes("UTF8")); -RDebugUtils.currentLine=42598402; - //BA.debugLineNum = 42598402;BA.debugLine="End Sub"; +public String _putstring(String _link,String _text) throws Exception{ + //BA.debugLineNum = 75;BA.debugLine="Public Sub PutString(Link As String, Text As Strin"; + //BA.debugLineNum = 76;BA.debugLine="PutBytes(Link, Text.GetBytes(\"UTF8\"))"; +_putbytes(_link,_text.getBytes("UTF8")); + //BA.debugLineNum = 77;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +public String _release() throws Exception{ + //BA.debugLineNum = 284;BA.debugLine="Public Sub Release"; + //BA.debugLineNum = 286;BA.debugLine="File.Delete(HttpUtils2Service.TempFolder, taskId)"; +__c.File.Delete(_httputils2service._tempfolder /*String*/ ,_taskid); + //BA.debugLineNum = 288;BA.debugLine="End Sub"; +return ""; +} +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/httputils2service.java b/B4A/Objects/src/keymon/lat/medicomed/httputils2service.java index 8660ff9..7f29ae8 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/httputils2service.java +++ b/B4A/Objects/src/keymon/lat/medicomed/httputils2service.java @@ -20,7 +20,7 @@ public class httputils2service extends android.content.BroadcastReceiver{ if (processBA == null) { - processBA = new anywheresoftware.b4a.ShellBA(context, null, null, anywheresoftware.b4a.BA.SharedProcessBA.ModuleType.RECEIVER, "keymon.lat.medicomed.httputils2service"); + processBA = new BA(context, null, null, anywheresoftware.b4a.BA.SharedProcessBA.ModuleType.RECEIVER, "keymon.lat.medicomed.httputils2service"); if (BA.isShellModeRuntimeCheck(processBA)) { processBA.raiseEvent2(null, true, "SHELL", false); } @@ -43,7 +43,6 @@ public class httputils2service extends android.content.BroadcastReceiver{ firstTime = false; } - public anywheresoftware.b4a.keywords.Common __c = null; public static anywheresoftware.b4h.okhttp.OkHttpClientWrapper _hc = null; public static anywheresoftware.b4a.objects.collections.Map _taskidtojob = null; @@ -61,254 +60,175 @@ public keymon.lat.medicomed.b4xpages _b4xpages = null; public keymon.lat.medicomed.b4xcollections _b4xcollections = null; public keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; public static String _completejob(int _taskid,boolean _success,String _errormessage) throws Exception{ -RDebugUtils.currentModule="httputils2service"; -if (Debug.shouldDelegate(processBA, "completejob", false)) - {return ((String) Debug.delegate(processBA, "completejob", new Object[] {_taskid,_success,_errormessage}));} keymon.lat.medicomed.httpjob _job = null; -RDebugUtils.currentLine=42205184; - //BA.debugLineNum = 42205184;BA.debugLine="Sub CompleteJob(TaskId As Int, success As Boolean,"; -RDebugUtils.currentLine=42205188; - //BA.debugLineNum = 42205188;BA.debugLine="Dim job As HttpJob = TaskIdToJob.Get(TaskId)"; + //BA.debugLineNum = 152;BA.debugLine="Sub CompleteJob(TaskId As Int, success As Boolean,"; + //BA.debugLineNum = 156;BA.debugLine="Dim job As HttpJob = TaskIdToJob.Get(TaskId)"; _job = (keymon.lat.medicomed.httpjob)(_taskidtojob.Get((Object)(_taskid))); -RDebugUtils.currentLine=42205189; - //BA.debugLineNum = 42205189;BA.debugLine="If job = Null Then"; + //BA.debugLineNum = 157;BA.debugLine="If job = Null Then"; if (_job== null) { -RDebugUtils.currentLine=42205190; - //BA.debugLineNum = 42205190;BA.debugLine="Log(\"HttpUtils2Service: job completed multiple t"; -anywheresoftware.b4a.keywords.Common.LogImpl("342205190","HttpUtils2Service: job completed multiple times - "+BA.NumberToString(_taskid),0); -RDebugUtils.currentLine=42205191; - //BA.debugLineNum = 42205191;BA.debugLine="Return"; + //BA.debugLineNum = 158;BA.debugLine="Log(\"HttpUtils2Service: job completed multiple t"; +anywheresoftware.b4a.keywords.Common.LogImpl("313893638","HttpUtils2Service: job completed multiple times - "+BA.NumberToString(_taskid),0); + //BA.debugLineNum = 159;BA.debugLine="Return"; if (true) return ""; }; -RDebugUtils.currentLine=42205193; - //BA.debugLineNum = 42205193;BA.debugLine="TaskIdToJob.Remove(TaskId)"; + //BA.debugLineNum = 161;BA.debugLine="TaskIdToJob.Remove(TaskId)"; _taskidtojob.Remove((Object)(_taskid)); -RDebugUtils.currentLine=42205194; - //BA.debugLineNum = 42205194;BA.debugLine="job.success = success"; + //BA.debugLineNum = 162;BA.debugLine="job.success = success"; _job._success /*boolean*/ = _success; -RDebugUtils.currentLine=42205195; - //BA.debugLineNum = 42205195;BA.debugLine="job.errorMessage = errorMessage"; + //BA.debugLineNum = 163;BA.debugLine="job.errorMessage = errorMessage"; _job._errormessage /*String*/ = _errormessage; -RDebugUtils.currentLine=42205197; - //BA.debugLineNum = 42205197;BA.debugLine="job.Complete(TaskId)"; -_job._complete /*String*/ (null,_taskid); -RDebugUtils.currentLine=42205201; - //BA.debugLineNum = 42205201;BA.debugLine="End Sub"; + //BA.debugLineNum = 165;BA.debugLine="job.Complete(TaskId)"; +_job._complete /*String*/ (_taskid); + //BA.debugLineNum = 169;BA.debugLine="End Sub"; return ""; } public static String _hc_responseerror(anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpResponse _response,String _reason,int _statuscode,int _taskid) throws Exception{ -RDebugUtils.currentModule="httputils2service"; -if (Debug.shouldDelegate(processBA, "hc_responseerror", false)) - {return ((String) Debug.delegate(processBA, "hc_responseerror", new Object[] {_response,_reason,_statuscode,_taskid}));} keymon.lat.medicomed.httpjob _job = null; -RDebugUtils.currentLine=42139648; - //BA.debugLineNum = 42139648;BA.debugLine="Sub hc_ResponseError (Response As OkHttpResponse,"; -RDebugUtils.currentLine=42139650; - //BA.debugLineNum = 42139650;BA.debugLine="Log($\"ResponseError. Reason: ${Reason}, Response:"; -anywheresoftware.b4a.keywords.Common.LogImpl("342139650",("ResponseError. Reason: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_reason))+", Response: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_response.getErrorResponse()))+""),0); -RDebugUtils.currentLine=42139652; - //BA.debugLineNum = 42139652;BA.debugLine="Response.Release"; + //BA.debugLineNum = 115;BA.debugLine="Sub hc_ResponseError (Response As OkHttpResponse,"; + //BA.debugLineNum = 117;BA.debugLine="Log($\"ResponseError. Reason: ${Reason}, Response:"; +anywheresoftware.b4a.keywords.Common.LogImpl("313828098",("ResponseError. Reason: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_reason))+", Response: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_response.getErrorResponse()))+""),0); + //BA.debugLineNum = 119;BA.debugLine="Response.Release"; _response.Release(); -RDebugUtils.currentLine=42139653; - //BA.debugLineNum = 42139653;BA.debugLine="Dim job As HttpJob = TaskIdToJob.Get(TaskId)"; + //BA.debugLineNum = 120;BA.debugLine="Dim job As HttpJob = TaskIdToJob.Get(TaskId)"; _job = (keymon.lat.medicomed.httpjob)(_taskidtojob.Get((Object)(_taskid))); -RDebugUtils.currentLine=42139654; - //BA.debugLineNum = 42139654;BA.debugLine="If job = Null Then"; + //BA.debugLineNum = 121;BA.debugLine="If job = Null Then"; if (_job== null) { -RDebugUtils.currentLine=42139655; - //BA.debugLineNum = 42139655;BA.debugLine="Log(\"HttpUtils2Service (hc_ResponseError): job c"; -anywheresoftware.b4a.keywords.Common.LogImpl("342139655","HttpUtils2Service (hc_ResponseError): job completed multiple times - "+BA.NumberToString(_taskid),0); -RDebugUtils.currentLine=42139656; - //BA.debugLineNum = 42139656;BA.debugLine="Return"; + //BA.debugLineNum = 122;BA.debugLine="Log(\"HttpUtils2Service (hc_ResponseError): job c"; +anywheresoftware.b4a.keywords.Common.LogImpl("313828103","HttpUtils2Service (hc_ResponseError): job completed multiple times - "+BA.NumberToString(_taskid),0); + //BA.debugLineNum = 123;BA.debugLine="Return"; if (true) return ""; }; -RDebugUtils.currentLine=42139658; - //BA.debugLineNum = 42139658;BA.debugLine="job.Response = Response"; + //BA.debugLineNum = 125;BA.debugLine="job.Response = Response"; _job._response /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpResponse*/ = _response; -RDebugUtils.currentLine=42139659; - //BA.debugLineNum = 42139659;BA.debugLine="If Response.ErrorResponse <> \"\" Then"; + //BA.debugLineNum = 126;BA.debugLine="If Response.ErrorResponse <> \"\" Then"; if ((_response.getErrorResponse()).equals("") == false) { -RDebugUtils.currentLine=42139660; - //BA.debugLineNum = 42139660;BA.debugLine="CompleteJob(TaskId, False, Response.ErrorRespons"; + //BA.debugLineNum = 127;BA.debugLine="CompleteJob(TaskId, False, Response.ErrorRespons"; _completejob(_taskid,anywheresoftware.b4a.keywords.Common.False,_response.getErrorResponse()); }else { -RDebugUtils.currentLine=42139662; - //BA.debugLineNum = 42139662;BA.debugLine="CompleteJob(TaskId, False, Reason)"; + //BA.debugLineNum = 129;BA.debugLine="CompleteJob(TaskId, False, Reason)"; _completejob(_taskid,anywheresoftware.b4a.keywords.Common.False,_reason); }; -RDebugUtils.currentLine=42139664; - //BA.debugLineNum = 42139664;BA.debugLine="End Sub"; + //BA.debugLineNum = 131;BA.debugLine="End Sub"; return ""; } public static String _hc_responsesuccess(anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpResponse _response,int _taskid) throws Exception{ -RDebugUtils.currentModule="httputils2service"; -if (Debug.shouldDelegate(processBA, "hc_responsesuccess", false)) - {return ((String) Debug.delegate(processBA, "hc_responsesuccess", new Object[] {_response,_taskid}));} keymon.lat.medicomed.httpjob _job = null; anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out = null; -RDebugUtils.currentLine=42008576; - //BA.debugLineNum = 42008576;BA.debugLine="Sub hc_ResponseSuccess (Response As OkHttpResponse"; -RDebugUtils.currentLine=42008577; - //BA.debugLineNum = 42008577;BA.debugLine="Dim job As HttpJob = TaskIdToJob.Get(TaskId)"; + //BA.debugLineNum = 92;BA.debugLine="Sub hc_ResponseSuccess (Response As OkHttpResponse"; + //BA.debugLineNum = 93;BA.debugLine="Dim job As HttpJob = TaskIdToJob.Get(TaskId)"; _job = (keymon.lat.medicomed.httpjob)(_taskidtojob.Get((Object)(_taskid))); -RDebugUtils.currentLine=42008578; - //BA.debugLineNum = 42008578;BA.debugLine="If job = Null Then"; + //BA.debugLineNum = 94;BA.debugLine="If job = Null Then"; if (_job== null) { -RDebugUtils.currentLine=42008579; - //BA.debugLineNum = 42008579;BA.debugLine="Log(\"HttpUtils2Service (hc_ResponseSuccess): job"; -anywheresoftware.b4a.keywords.Common.LogImpl("342008579","HttpUtils2Service (hc_ResponseSuccess): job completed multiple times - "+BA.NumberToString(_taskid),0); -RDebugUtils.currentLine=42008580; - //BA.debugLineNum = 42008580;BA.debugLine="Return"; + //BA.debugLineNum = 95;BA.debugLine="Log(\"HttpUtils2Service (hc_ResponseSuccess): job"; +anywheresoftware.b4a.keywords.Common.LogImpl("313697027","HttpUtils2Service (hc_ResponseSuccess): job completed multiple times - "+BA.NumberToString(_taskid),0); + //BA.debugLineNum = 96;BA.debugLine="Return"; if (true) return ""; }; -RDebugUtils.currentLine=42008582; - //BA.debugLineNum = 42008582;BA.debugLine="job.Response = Response"; + //BA.debugLineNum = 98;BA.debugLine="job.Response = Response"; _job._response /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpResponse*/ = _response; -RDebugUtils.currentLine=42008583; - //BA.debugLineNum = 42008583;BA.debugLine="Dim out As OutputStream = File.OpenOutput(TempFol"; + //BA.debugLineNum = 99;BA.debugLine="Dim out As OutputStream = File.OpenOutput(TempFol"; _out = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); _out = anywheresoftware.b4a.keywords.Common.File.OpenOutput(_tempfolder,BA.NumberToString(_taskid),anywheresoftware.b4a.keywords.Common.False); -RDebugUtils.currentLine=42008587; - //BA.debugLineNum = 42008587;BA.debugLine="Response.GetAsynchronously(\"response\", out , _"; + //BA.debugLineNum = 103;BA.debugLine="Response.GetAsynchronously(\"response\", out , _"; _response.GetAsynchronously(processBA,"response",(java.io.OutputStream)(_out.getObject()),anywheresoftware.b4a.keywords.Common.True,_taskid); -RDebugUtils.currentLine=42008589; - //BA.debugLineNum = 42008589;BA.debugLine="End Sub"; + //BA.debugLineNum = 105;BA.debugLine="End Sub"; +return ""; +} +public static String _process_globals() throws Exception{ + //BA.debugLineNum = 2;BA.debugLine="Sub Process_Globals"; + //BA.debugLineNum = 12;BA.debugLine="Private hc As OkHttpClient"; +_hc = new anywheresoftware.b4h.okhttp.OkHttpClientWrapper(); + //BA.debugLineNum = 16;BA.debugLine="Private TaskIdToJob As Map"; +_taskidtojob = new anywheresoftware.b4a.objects.collections.Map(); + //BA.debugLineNum = 19;BA.debugLine="Public TempFolder As String"; +_tempfolder = ""; + //BA.debugLineNum = 23;BA.debugLine="Private taskCounter As Int"; +_taskcounter = 0; + //BA.debugLineNum = 25;BA.debugLine="End Sub"; return ""; } public static String _receiver_receive(boolean _firsttime,anywheresoftware.b4a.objects.IntentWrapper _startingintent) throws Exception{ -RDebugUtils.currentModule="httputils2service"; -if (Debug.shouldDelegate(processBA, "receiver_receive", false)) - {return ((String) Debug.delegate(processBA, "receiver_receive", new Object[] {_firsttime,_startingintent}));} -RDebugUtils.currentLine=41746432; - //BA.debugLineNum = 41746432;BA.debugLine="Private Sub Receiver_Receive (FirstTime As Boolean"; -RDebugUtils.currentLine=41746433; - //BA.debugLineNum = 41746433;BA.debugLine="If FirstTime Then"; + //BA.debugLineNum = 58;BA.debugLine="Private Sub Receiver_Receive (FirstTime As Boolean"; + //BA.debugLineNum = 59;BA.debugLine="If FirstTime Then"; if (_firsttime) { -RDebugUtils.currentLine=41746434; - //BA.debugLineNum = 41746434;BA.debugLine="Service_Create"; + //BA.debugLineNum = 60;BA.debugLine="Service_Create"; _service_create(); }; -RDebugUtils.currentLine=41746436; - //BA.debugLineNum = 41746436;BA.debugLine="End Sub"; -return ""; -} -public static String _service_create() throws Exception{ -RDebugUtils.currentModule="httputils2service"; -if (Debug.shouldDelegate(processBA, "service_create", false)) - {return ((String) Debug.delegate(processBA, "service_create", null));} -RDebugUtils.currentLine=41680896; - //BA.debugLineNum = 41680896;BA.debugLine="Sub Service_Create"; -RDebugUtils.currentLine=41680898; - //BA.debugLineNum = 41680898;BA.debugLine="TempFolder = File.DirInternalCache"; -_tempfolder = anywheresoftware.b4a.keywords.Common.File.getDirInternalCache(); -RDebugUtils.currentLine=41680899; - //BA.debugLineNum = 41680899;BA.debugLine="Try"; -try {RDebugUtils.currentLine=41680900; - //BA.debugLineNum = 41680900;BA.debugLine="File.WriteString(TempFolder, \"~test.test\", \"test"; -anywheresoftware.b4a.keywords.Common.File.WriteString(_tempfolder,"~test.test","test"); -RDebugUtils.currentLine=41680901; - //BA.debugLineNum = 41680901;BA.debugLine="File.Delete(TempFolder, \"~test.test\")"; -anywheresoftware.b4a.keywords.Common.File.Delete(_tempfolder,"~test.test"); - } - catch (Exception e6) { - processBA.setLastException(e6);RDebugUtils.currentLine=41680903; - //BA.debugLineNum = 41680903;BA.debugLine="Log(LastException)"; -anywheresoftware.b4a.keywords.Common.LogImpl("341680903",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(processBA)),0); -RDebugUtils.currentLine=41680904; - //BA.debugLineNum = 41680904;BA.debugLine="Log(\"Switching to File.DirInternal\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("341680904","Switching to File.DirInternal",0); -RDebugUtils.currentLine=41680905; - //BA.debugLineNum = 41680905;BA.debugLine="TempFolder = File.DirInternal"; -_tempfolder = anywheresoftware.b4a.keywords.Common.File.getDirInternal(); - }; -RDebugUtils.currentLine=41680910; - //BA.debugLineNum = 41680910;BA.debugLine="If hc.IsInitialized = False Then"; -if (_hc.IsInitialized()==anywheresoftware.b4a.keywords.Common.False) { -RDebugUtils.currentLine=41680915; - //BA.debugLineNum = 41680915;BA.debugLine="hc.Initialize(\"hc\")"; -_hc.Initialize("hc"); - }; -RDebugUtils.currentLine=41680923; - //BA.debugLineNum = 41680923;BA.debugLine="TaskIdToJob.Initialize"; -_taskidtojob.Initialize(); -RDebugUtils.currentLine=41680925; - //BA.debugLineNum = 41680925;BA.debugLine="End Sub"; + //BA.debugLineNum = 62;BA.debugLine="End Sub"; return ""; } public static String _response_streamfinish(boolean _success,int _taskid) throws Exception{ -RDebugUtils.currentModule="httputils2service"; -if (Debug.shouldDelegate(processBA, "response_streamfinish", false)) - {return ((String) Debug.delegate(processBA, "response_streamfinish", new Object[] {_success,_taskid}));} -RDebugUtils.currentLine=42074112; - //BA.debugLineNum = 42074112;BA.debugLine="Private Sub Response_StreamFinish (Success As Bool"; -RDebugUtils.currentLine=42074113; - //BA.debugLineNum = 42074113;BA.debugLine="If Success Then"; + //BA.debugLineNum = 107;BA.debugLine="Private Sub Response_StreamFinish (Success As Bool"; + //BA.debugLineNum = 108;BA.debugLine="If Success Then"; if (_success) { -RDebugUtils.currentLine=42074114; - //BA.debugLineNum = 42074114;BA.debugLine="CompleteJob(TaskId, Success, \"\")"; + //BA.debugLineNum = 109;BA.debugLine="CompleteJob(TaskId, Success, \"\")"; _completejob(_taskid,_success,""); }else { -RDebugUtils.currentLine=42074116; - //BA.debugLineNum = 42074116;BA.debugLine="CompleteJob(TaskId, Success, LastException.Messa"; + //BA.debugLineNum = 111;BA.debugLine="CompleteJob(TaskId, Success, LastException.Messa"; _completejob(_taskid,_success,anywheresoftware.b4a.keywords.Common.LastException(processBA).getMessage()); }; -RDebugUtils.currentLine=42074118; - //BA.debugLineNum = 42074118;BA.debugLine="End Sub"; + //BA.debugLineNum = 113;BA.debugLine="End Sub"; +return ""; +} +public static String _service_create() throws Exception{ + //BA.debugLineNum = 27;BA.debugLine="Sub Service_Create"; + //BA.debugLineNum = 29;BA.debugLine="TempFolder = File.DirInternalCache"; +_tempfolder = anywheresoftware.b4a.keywords.Common.File.getDirInternalCache(); + //BA.debugLineNum = 30;BA.debugLine="Try"; +try { //BA.debugLineNum = 31;BA.debugLine="File.WriteString(TempFolder, \"~test.test\", \"test"; +anywheresoftware.b4a.keywords.Common.File.WriteString(_tempfolder,"~test.test","test"); + //BA.debugLineNum = 32;BA.debugLine="File.Delete(TempFolder, \"~test.test\")"; +anywheresoftware.b4a.keywords.Common.File.Delete(_tempfolder,"~test.test"); + } + catch (Exception e6) { + processBA.setLastException(e6); //BA.debugLineNum = 34;BA.debugLine="Log(LastException)"; +anywheresoftware.b4a.keywords.Common.LogImpl("313369351",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(processBA)),0); + //BA.debugLineNum = 35;BA.debugLine="Log(\"Switching to File.DirInternal\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("313369352","Switching to File.DirInternal",0); + //BA.debugLineNum = 36;BA.debugLine="TempFolder = File.DirInternal"; +_tempfolder = anywheresoftware.b4a.keywords.Common.File.getDirInternal(); + }; + //BA.debugLineNum = 41;BA.debugLine="If hc.IsInitialized = False Then"; +if (_hc.IsInitialized()==anywheresoftware.b4a.keywords.Common.False) { + //BA.debugLineNum = 46;BA.debugLine="hc.Initialize(\"hc\")"; +_hc.Initialize("hc"); + }; + //BA.debugLineNum = 54;BA.debugLine="TaskIdToJob.Initialize"; +_taskidtojob.Initialize(); + //BA.debugLineNum = 56;BA.debugLine="End Sub"; return ""; } public static String _service_destroy() throws Exception{ -RDebugUtils.currentModule="httputils2service"; -if (Debug.shouldDelegate(processBA, "service_destroy", false)) - {return ((String) Debug.delegate(processBA, "service_destroy", null));} -RDebugUtils.currentLine=41877504; - //BA.debugLineNum = 41877504;BA.debugLine="Sub Service_Destroy"; -RDebugUtils.currentLine=41877506; - //BA.debugLineNum = 41877506;BA.debugLine="End Sub"; + //BA.debugLineNum = 68;BA.debugLine="Sub Service_Destroy"; + //BA.debugLineNum = 70;BA.debugLine="End Sub"; return ""; } public static String _service_start(anywheresoftware.b4a.objects.IntentWrapper _startingintent) throws Exception{ -RDebugUtils.currentModule="httputils2service"; -if (Debug.shouldDelegate(processBA, "service_start", false)) - {return ((String) Debug.delegate(processBA, "service_start", new Object[] {_startingintent}));} -RDebugUtils.currentLine=41811968; - //BA.debugLineNum = 41811968;BA.debugLine="Sub Service_Start (StartingIntent As Intent)"; -RDebugUtils.currentLine=41811970; - //BA.debugLineNum = 41811970;BA.debugLine="End Sub"; + //BA.debugLineNum = 64;BA.debugLine="Sub Service_Start (StartingIntent As Intent)"; + //BA.debugLineNum = 66;BA.debugLine="End Sub"; return ""; } public static String _submitjob(keymon.lat.medicomed.httpjob _job) throws Exception{ -RDebugUtils.currentModule="httputils2service"; -if (Debug.shouldDelegate(processBA, "submitjob", false)) - {return ((String) Debug.delegate(processBA, "submitjob", new Object[] {_job}));} int _taskid = 0; -RDebugUtils.currentLine=41943040; - //BA.debugLineNum = 41943040;BA.debugLine="Public Sub SubmitJob(job As HttpJob)"; -RDebugUtils.currentLine=41943041; - //BA.debugLineNum = 41943041;BA.debugLine="If TaskIdToJob.IsInitialized = False Then Service"; + //BA.debugLineNum = 74;BA.debugLine="Public Sub SubmitJob(job As HttpJob)"; + //BA.debugLineNum = 75;BA.debugLine="If TaskIdToJob.IsInitialized = False Then Service"; if (_taskidtojob.IsInitialized()==anywheresoftware.b4a.keywords.Common.False) { _service_create();}; -RDebugUtils.currentLine=41943045; - //BA.debugLineNum = 41943045;BA.debugLine="taskCounter = taskCounter + 1"; + //BA.debugLineNum = 79;BA.debugLine="taskCounter = taskCounter + 1"; _taskcounter = (int) (_taskcounter+1); -RDebugUtils.currentLine=41943046; - //BA.debugLineNum = 41943046;BA.debugLine="Dim TaskId As Int = taskCounter"; + //BA.debugLineNum = 80;BA.debugLine="Dim TaskId As Int = taskCounter"; _taskid = _taskcounter; -RDebugUtils.currentLine=41943048; - //BA.debugLineNum = 41943048;BA.debugLine="TaskIdToJob.Put(TaskId, job)"; + //BA.debugLineNum = 82;BA.debugLine="TaskIdToJob.Put(TaskId, job)"; _taskidtojob.Put((Object)(_taskid),(Object)(_job)); -RDebugUtils.currentLine=41943049; - //BA.debugLineNum = 41943049;BA.debugLine="If job.Username <> \"\" And job.Password <> \"\" Then"; + //BA.debugLineNum = 83;BA.debugLine="If job.Username <> \"\" And job.Password <> \"\" Then"; if ((_job._username /*String*/ ).equals("") == false && (_job._password /*String*/ ).equals("") == false) { -RDebugUtils.currentLine=41943050; - //BA.debugLineNum = 41943050;BA.debugLine="hc.ExecuteCredentials(job.GetRequest, TaskId, jo"; -_hc.ExecuteCredentials(processBA,_job._getrequest /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ (null),_taskid,_job._username /*String*/ ,_job._password /*String*/ ); + //BA.debugLineNum = 84;BA.debugLine="hc.ExecuteCredentials(job.GetRequest, TaskId, jo"; +_hc.ExecuteCredentials(processBA,_job._getrequest /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ (),_taskid,_job._username /*String*/ ,_job._password /*String*/ ); }else { -RDebugUtils.currentLine=41943052; - //BA.debugLineNum = 41943052;BA.debugLine="hc.Execute(job.GetRequest, TaskId)"; -_hc.Execute(processBA,_job._getrequest /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ (null),_taskid); + //BA.debugLineNum = 86;BA.debugLine="hc.Execute(job.GetRequest, TaskId)"; +_hc.Execute(processBA,_job._getrequest /*anywheresoftware.b4h.okhttp.OkHttpClientWrapper.OkHttpRequest*/ (),_taskid); }; -RDebugUtils.currentLine=41943054; - //BA.debugLineNum = 41943054;BA.debugLine="End Sub"; + //BA.debugLineNum = 88;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/madewithlove.java b/B4A/Objects/src/keymon/lat/medicomed/madewithlove.java index 8af0ad9..cd6552a 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/madewithlove.java +++ b/B4A/Objects/src/keymon/lat/medicomed/madewithlove.java @@ -10,7 +10,7 @@ public class madewithlove extends B4AClass.ImplB4AClass implements BA.SubDelegat private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.madewithlove"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.madewithlove"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class madewithlove extends B4AClass.ImplB4AClass implements BA.SubDelegat 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.keywords.Common __c = null; public String _meventname = ""; public Object _mcallback = null; public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null; @@ -48,101 +41,66 @@ 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 _base_resize(keymon.lat.medicomed.madewithlove __ref,double _width,double _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="madewithlove"; -if (Debug.shouldDelegate(ba, "base_resize", true)) - {return ((String) Debug.delegate(ba, "base_resize", new Object[] {_width,_height}));} -RDebugUtils.currentLine=61800448; - //BA.debugLineNum = 61800448;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; -RDebugUtils.currentLine=61800449; - //BA.debugLineNum = 61800449;BA.debugLine="mBase.GetView(0).SetLayoutAnimated(0, 0, 0, Wid"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .GetView((int) (0)).SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); -RDebugUtils.currentLine=61800450; - //BA.debugLineNum = 61800450;BA.debugLine="End Sub"; +public String _base_resize(double _width,double _height) throws Exception{ + //BA.debugLineNum = 47;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; + //BA.debugLineNum = 48;BA.debugLine="mBase.GetView(0).SetLayoutAnimated(0, 0, 0, Wid"; +_mbase.GetView((int) (0)).SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); + //BA.debugLineNum = 49;BA.debugLine="End Sub"; return ""; } -public String _class_globals(keymon.lat.medicomed.madewithlove __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="madewithlove"; -RDebugUtils.currentLine=61603840; - //BA.debugLineNum = 61603840;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=61603841; - //BA.debugLineNum = 61603841;BA.debugLine="Private mEventName As String 'ignore"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 1;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 2;BA.debugLine="Private mEventName As String 'ignore"; _meventname = ""; -RDebugUtils.currentLine=61603842; - //BA.debugLineNum = 61603842;BA.debugLine="Private mCallBack As Object 'ignore"; + //BA.debugLineNum = 3;BA.debugLine="Private mCallBack As Object 'ignore"; _mcallback = new Object(); -RDebugUtils.currentLine=61603843; - //BA.debugLineNum = 61603843;BA.debugLine="Public mBase As B4XView"; + //BA.debugLineNum = 4;BA.debugLine="Public mBase As B4XView"; _mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=61603844; - //BA.debugLineNum = 61603844;BA.debugLine="Private xui As XUI 'ignore"; + //BA.debugLineNum = 5;BA.debugLine="Private xui As XUI 'ignore"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=61603845; - //BA.debugLineNum = 61603845;BA.debugLine="Public Tag As Object"; + //BA.debugLineNum = 6;BA.debugLine="Public Tag As Object"; _tag = new Object(); -RDebugUtils.currentLine=61603846; - //BA.debugLineNum = 61603846;BA.debugLine="End Sub"; + //BA.debugLineNum = 7;BA.debugLine="End Sub"; return ""; } -public String _designercreateview(keymon.lat.medicomed.madewithlove __ref,Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ -__ref = this; -RDebugUtils.currentModule="madewithlove"; -if (Debug.shouldDelegate(ba, "designercreateview", true)) - {return ((String) Debug.delegate(ba, "designercreateview", new Object[] {_base,_lbl,_props}));} +public String _designercreateview(Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ anywheresoftware.b4a.objects.B4XViewWrapper _xlbl = null; anywheresoftware.b4a.objects.CSBuilder _cs = null; -RDebugUtils.currentLine=61734912; - //BA.debugLineNum = 61734912;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; -RDebugUtils.currentLine=61734913; - //BA.debugLineNum = 61734913;BA.debugLine="mBase = Base"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); -RDebugUtils.currentLine=61734914; - //BA.debugLineNum = 61734914;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._tag /*Object*/ = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getTag(); -RDebugUtils.currentLine=61734914; - //BA.debugLineNum = 61734914;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag(this); -RDebugUtils.currentLine=61734915; - //BA.debugLineNum = 61734915;BA.debugLine="Dim xlbl As B4XView = Lbl"; + //BA.debugLineNum = 15;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; + //BA.debugLineNum = 16;BA.debugLine="mBase = Base"; +_mbase = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); + //BA.debugLineNum = 17;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_tag = _mbase.getTag(); + //BA.debugLineNum = 17;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_mbase.setTag(this); + //BA.debugLineNum = 18;BA.debugLine="Dim xlbl As B4XView = Lbl"; _xlbl = new anywheresoftware.b4a.objects.B4XViewWrapper(); _xlbl = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lbl.getObject())); -RDebugUtils.currentLine=61734930; - //BA.debugLineNum = 61734930;BA.debugLine="Dim cs As CSBuilder"; + //BA.debugLineNum = 33;BA.debugLine="Dim cs As CSBuilder"; _cs = new anywheresoftware.b4a.objects.CSBuilder(); -RDebugUtils.currentLine=61734931; - //BA.debugLineNum = 61734931;BA.debugLine="cs.Initialize.Append(\"Made with \").Typeface(Typef"; -_cs.Initialize().Append(BA.ObjectToCharSequence("Made with ")).Typeface(__c.Typeface.getFONTAWESOME()).Color(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Red).Append(BA.ObjectToCharSequence(__c.Chr(((int)0xf004)))).Pop().Pop().Append(BA.ObjectToCharSequence(" in B4X")).PopAll(); -RDebugUtils.currentLine=61734932; - //BA.debugLineNum = 61734932;BA.debugLine="xlbl.Text = cs"; + //BA.debugLineNum = 34;BA.debugLine="cs.Initialize.Append(\"Made with \").Typeface(Typef"; +_cs.Initialize().Append(BA.ObjectToCharSequence("Made with ")).Typeface(__c.Typeface.getFONTAWESOME()).Color(_xui.Color_Red).Append(BA.ObjectToCharSequence(__c.Chr(((int)0xf004)))).Pop().Pop().Append(BA.ObjectToCharSequence(" in B4X")).PopAll(); + //BA.debugLineNum = 35;BA.debugLine="xlbl.Text = cs"; _xlbl.setText(BA.ObjectToCharSequence(_cs.getObject())); -RDebugUtils.currentLine=61734933; - //BA.debugLineNum = 61734933;BA.debugLine="xlbl.SetTextAlignment(\"CENTER\", \"CENTER\")"; + //BA.debugLineNum = 36;BA.debugLine="xlbl.SetTextAlignment(\"CENTER\", \"CENTER\")"; _xlbl.SetTextAlignment("CENTER","CENTER"); -RDebugUtils.currentLine=61734934; - //BA.debugLineNum = 61734934;BA.debugLine="mBase.AddView(xlbl, 0, 0, mBase.Width, mBase.Heig"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(_xlbl.getObject()),(int) (0),(int) (0),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=61734942; - //BA.debugLineNum = 61734942;BA.debugLine="End Sub"; + //BA.debugLineNum = 37;BA.debugLine="mBase.AddView(xlbl, 0, 0, mBase.Width, mBase.Heig"; +_mbase.AddView((android.view.View)(_xlbl.getObject()),(int) (0),(int) (0),_mbase.getWidth(),_mbase.getHeight()); + //BA.debugLineNum = 45;BA.debugLine="End Sub"; return ""; } -public String _initialize(keymon.lat.medicomed.madewithlove __ref,anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ -__ref = this; +public String _initialize(anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ innerInitialize(_ba); -RDebugUtils.currentModule="madewithlove"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_callback,_eventname}));} -RDebugUtils.currentLine=61669376; - //BA.debugLineNum = 61669376;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -RDebugUtils.currentLine=61669377; - //BA.debugLineNum = 61669377;BA.debugLine="mEventName = EventName"; -__ref._meventname /*String*/ = _eventname; -RDebugUtils.currentLine=61669378; - //BA.debugLineNum = 61669378;BA.debugLine="mCallBack = Callback"; -__ref._mcallback /*Object*/ = _callback; -RDebugUtils.currentLine=61669379; - //BA.debugLineNum = 61669379;BA.debugLine="End Sub"; + //BA.debugLineNum = 9;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; + //BA.debugLineNum = 10;BA.debugLine="mEventName = EventName"; +_meventname = _eventname; + //BA.debugLineNum = 11;BA.debugLine="mCallBack = Callback"; +_mcallback = _callback; + //BA.debugLineNum = 12;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/main.java b/B4A/Objects/src/keymon/lat/medicomed/main.java index cd35773..2d47c5c 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/main.java +++ b/B4A/Objects/src/keymon/lat/medicomed/main.java @@ -34,7 +34,7 @@ public class main extends Activity implements B4AActivity{ super.onCreate(savedInstanceState); mostCurrent = this; if (processBA == null) { - processBA = new anywheresoftware.b4a.ShellBA(this.getApplicationContext(), null, null, "keymon.lat.medicomed", "keymon.lat.medicomed.main"); + processBA = new BA(this.getApplicationContext(), null, null, "keymon.lat.medicomed", "keymon.lat.medicomed.main"); processBA.loadHtSubs(this.getClass()); float deviceScale = getApplicationContext().getResources().getDisplayMetrics().density; BALayout.setDeviceScale(deviceScale); @@ -335,7 +335,19 @@ public class main extends Activity implements B4AActivity{ } - +public anywheresoftware.b4a.keywords.Common __c = null; +public static boolean _actionbarhomeclicked = false; +public b4a.example.dateutils _dateutils = 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 static class _camerainfoandid{ public boolean IsInitialized; public Object CameraInfo; @@ -363,172 +375,104 @@ Height = 0; return BA.TypeToString(this, false); }} +public static boolean isAnyActivityVisible() { + boolean vis = false; +vis = vis | (main.mostCurrent != null); +vis = vis | (mapa_rutas.mostCurrent != null); +return vis;} +public static String _activity_actionbarhomeclick() throws Exception{ + //BA.debugLineNum = 36;BA.debugLine="Sub Activity_ActionBarHomeClick"; + //BA.debugLineNum = 37;BA.debugLine="ActionBarHomeClicked = True"; +_actionbarhomeclicked = anywheresoftware.b4a.keywords.Common.True; + //BA.debugLineNum = 38;BA.debugLine="B4XPages.Delegate.Activity_ActionBarHomeClick"; +mostCurrent._b4xpages._delegate /*keymon.lat.medicomed.b4xpagesdelegator*/ ._activity_actionbarhomeclick /*String*/ (); + //BA.debugLineNum = 39;BA.debugLine="ActionBarHomeClicked = False"; +_actionbarhomeclicked = anywheresoftware.b4a.keywords.Common.False; + //BA.debugLineNum = 40;BA.debugLine="End Sub"; +return ""; +} +public static String _activity_create(boolean _firsttime) throws Exception{ +keymon.lat.medicomed.b4xpagesmanager _pm = null; + //BA.debugLineNum = 28;BA.debugLine="Sub Activity_Create(FirstTime As Boolean)"; + //BA.debugLineNum = 29;BA.debugLine="Dim pm As B4XPagesManager"; +_pm = new keymon.lat.medicomed.b4xpagesmanager(); + //BA.debugLineNum = 30;BA.debugLine="pm.Initialize(Activity)"; +_pm._initialize /*String*/ (mostCurrent.activityBA,mostCurrent._activity); + //BA.debugLineNum = 31;BA.debugLine="End Sub"; +return ""; +} +public static boolean _activity_keypress(int _keycode) throws Exception{ + //BA.debugLineNum = 42;BA.debugLine="Sub Activity_KeyPress (KeyCode As Int) As Boolean"; + //BA.debugLineNum = 43;BA.debugLine="Return B4XPages.Delegate.Activity_KeyPress(KeyCod"; +if (true) return mostCurrent._b4xpages._delegate /*keymon.lat.medicomed.b4xpagesdelegator*/ ._activity_keypress /*boolean*/ (_keycode); + //BA.debugLineNum = 44;BA.debugLine="End Sub"; +return false; +} +public static String _activity_pause(boolean _userclosed) throws Exception{ + //BA.debugLineNum = 50;BA.debugLine="Sub Activity_Pause (UserClosed As Boolean)"; + //BA.debugLineNum = 51;BA.debugLine="B4XPages.Delegate.Activity_Pause"; +mostCurrent._b4xpages._delegate /*keymon.lat.medicomed.b4xpagesdelegator*/ ._activity_pause /*String*/ (); + //BA.debugLineNum = 52;BA.debugLine="End Sub"; +return ""; +} +public static String _activity_permissionresult(String _permission,boolean _result) throws Exception{ + //BA.debugLineNum = 54;BA.debugLine="Sub Activity_PermissionResult (Permission As Strin"; + //BA.debugLineNum = 55;BA.debugLine="B4XPages.Delegate.Activity_PermissionResult(Permi"; +mostCurrent._b4xpages._delegate /*keymon.lat.medicomed.b4xpagesdelegator*/ ._activity_permissionresult /*String*/ (_permission,_result); + //BA.debugLineNum = 56;BA.debugLine="End Sub"; +return ""; +} +public static String _activity_resume() throws Exception{ + //BA.debugLineNum = 46;BA.debugLine="Sub Activity_Resume"; + //BA.debugLineNum = 47;BA.debugLine="B4XPages.Delegate.Activity_Resume"; +mostCurrent._b4xpages._delegate /*keymon.lat.medicomed.b4xpagesdelegator*/ ._activity_resume /*String*/ (); + //BA.debugLineNum = 48;BA.debugLine="End Sub"; +return ""; +} +public static String _create_menu(Object _menu) throws Exception{ + //BA.debugLineNum = 58;BA.debugLine="Sub Create_Menu (Menu As Object)"; + //BA.debugLineNum = 59;BA.debugLine="B4XPages.Delegate.Create_Menu(Menu)"; +mostCurrent._b4xpages._delegate /*keymon.lat.medicomed.b4xpagesdelegator*/ ._create_menu /*String*/ (_menu); + //BA.debugLineNum = 60;BA.debugLine="End Sub"; +return ""; +} +public static String _globals() throws Exception{ + //BA.debugLineNum = 23;BA.debugLine="Sub Globals"; + //BA.debugLineNum = 24;BA.debugLine="Type CameraInfoAndId (CameraInfo As Object, Id As"; +; + //BA.debugLineNum = 25;BA.debugLine="Type CameraSize (Width As Int, Height As Int)"; +; + //BA.debugLineNum = 26;BA.debugLine="End Sub"; +return ""; +} + public static void initializeProcessGlobals() { if (main.processGlobalsRun == false) { main.processGlobalsRun = true; try { b4a.example.dateutils._process_globals(); +main._process_globals(); +starter._process_globals(); +subs._process_globals(); +appupdater._process_globals(); +mapa_rutas._process_globals(); +tracker._process_globals(); +newinst2._process_globals(); +b4xpages._process_globals(); +b4xcollections._process_globals(); +httputils2service._process_globals(); +xuiviewsutils._process_globals(); } catch (Exception e) { throw new RuntimeException(e); } } -} -public static boolean isAnyActivityVisible() { - boolean vis = false; -vis = vis | (main.mostCurrent != null); -vis = vis | (mapa_rutas.mostCurrent != null); -return vis;} - -private static BA killProgramHelper(BA ba) { - if (ba == null) - return null; - anywheresoftware.b4a.BA.SharedProcessBA sharedProcessBA = ba.sharedProcessBA; - if (sharedProcessBA == null || sharedProcessBA.activityBA == null) - return null; - return sharedProcessBA.activityBA.get(); -} -public static void killProgram() { - { - Activity __a = null; - if (main.previousOne != null) { - __a = main.previousOne.get(); - } - else { - BA ba = killProgramHelper(main.mostCurrent == null ? null : main.mostCurrent.processBA); - if (ba != null) __a = ba.activity; - } - if (__a != null) - __a.finish();} - -BA.applicationContext.stopService(new android.content.Intent(BA.applicationContext, starter.class)); -BA.applicationContext.stopService(new android.content.Intent(BA.applicationContext, appupdater.class)); - { - Activity __a = null; - if (mapa_rutas.previousOne != null) { - __a = mapa_rutas.previousOne.get(); - } - else { - BA ba = killProgramHelper(mapa_rutas.mostCurrent == null ? null : mapa_rutas.mostCurrent.processBA); - if (ba != null) __a = ba.activity; - } - if (__a != null) - __a.finish();} - -BA.applicationContext.stopService(new android.content.Intent(BA.applicationContext, tracker.class)); -BA.applicationContext.stopService(new android.content.Intent(BA.applicationContext, newinst2.class)); -} -public anywheresoftware.b4a.keywords.Common __c = null; -public static boolean _actionbarhomeclicked = false; -public b4a.example.dateutils _dateutils = 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 static String _activity_actionbarhomeclick() throws Exception{ -RDebugUtils.currentModule="main"; -if (Debug.shouldDelegate(mostCurrent.activityBA, "activity_actionbarhomeclick", false)) - {return ((String) Debug.delegate(mostCurrent.activityBA, "activity_actionbarhomeclick", null));} -RDebugUtils.currentLine=196608; - //BA.debugLineNum = 196608;BA.debugLine="Sub Activity_ActionBarHomeClick"; -RDebugUtils.currentLine=196609; - //BA.debugLineNum = 196609;BA.debugLine="ActionBarHomeClicked = True"; -_actionbarhomeclicked = anywheresoftware.b4a.keywords.Common.True; -RDebugUtils.currentLine=196610; - //BA.debugLineNum = 196610;BA.debugLine="B4XPages.Delegate.Activity_ActionBarHomeClick"; -mostCurrent._b4xpages._delegate /*keymon.lat.medicomed.b4xpagesdelegator*/ ._activity_actionbarhomeclick /*String*/ (null); -RDebugUtils.currentLine=196611; - //BA.debugLineNum = 196611;BA.debugLine="ActionBarHomeClicked = False"; -_actionbarhomeclicked = anywheresoftware.b4a.keywords.Common.False; -RDebugUtils.currentLine=196612; - //BA.debugLineNum = 196612;BA.debugLine="End Sub"; -return ""; -} -public static String _activity_create(boolean _firsttime) throws Exception{ -RDebugUtils.currentModule="main"; -if (Debug.shouldDelegate(mostCurrent.activityBA, "activity_create", false)) - {return ((String) Debug.delegate(mostCurrent.activityBA, "activity_create", new Object[] {_firsttime}));} -keymon.lat.medicomed.b4xpagesmanager _pm = null; -RDebugUtils.currentLine=131072; - //BA.debugLineNum = 131072;BA.debugLine="Sub Activity_Create(FirstTime As Boolean)"; -RDebugUtils.currentLine=131073; - //BA.debugLineNum = 131073;BA.debugLine="Dim pm As B4XPagesManager"; -_pm = new keymon.lat.medicomed.b4xpagesmanager(); -RDebugUtils.currentLine=131074; - //BA.debugLineNum = 131074;BA.debugLine="pm.Initialize(Activity)"; -_pm._initialize /*String*/ (null,mostCurrent.activityBA,mostCurrent._activity); -RDebugUtils.currentLine=131075; - //BA.debugLineNum = 131075;BA.debugLine="End Sub"; -return ""; -} -public static boolean _activity_keypress(int _keycode) throws Exception{ -RDebugUtils.currentModule="main"; -if (Debug.shouldDelegate(mostCurrent.activityBA, "activity_keypress", false)) - {return ((Boolean) Debug.delegate(mostCurrent.activityBA, "activity_keypress", new Object[] {_keycode}));} -RDebugUtils.currentLine=262144; - //BA.debugLineNum = 262144;BA.debugLine="Sub Activity_KeyPress (KeyCode As Int) As Boolean"; -RDebugUtils.currentLine=262145; - //BA.debugLineNum = 262145;BA.debugLine="Return B4XPages.Delegate.Activity_KeyPress(KeyCod"; -if (true) return mostCurrent._b4xpages._delegate /*keymon.lat.medicomed.b4xpagesdelegator*/ ._activity_keypress /*boolean*/ (null,_keycode); -RDebugUtils.currentLine=262146; - //BA.debugLineNum = 262146;BA.debugLine="End Sub"; -return false; -} -public static String _activity_pause(boolean _userclosed) throws Exception{ -RDebugUtils.currentModule="main"; -RDebugUtils.currentLine=393216; - //BA.debugLineNum = 393216;BA.debugLine="Sub Activity_Pause (UserClosed As Boolean)"; -RDebugUtils.currentLine=393217; - //BA.debugLineNum = 393217;BA.debugLine="B4XPages.Delegate.Activity_Pause"; -mostCurrent._b4xpages._delegate /*keymon.lat.medicomed.b4xpagesdelegator*/ ._activity_pause /*String*/ (null); -RDebugUtils.currentLine=393218; - //BA.debugLineNum = 393218;BA.debugLine="End Sub"; -return ""; -} -public static String _activity_permissionresult(String _permission,boolean _result) throws Exception{ -RDebugUtils.currentModule="main"; -if (Debug.shouldDelegate(mostCurrent.activityBA, "activity_permissionresult", false)) - {return ((String) Debug.delegate(mostCurrent.activityBA, "activity_permissionresult", new Object[] {_permission,_result}));} -RDebugUtils.currentLine=458752; - //BA.debugLineNum = 458752;BA.debugLine="Sub Activity_PermissionResult (Permission As Strin"; -RDebugUtils.currentLine=458753; - //BA.debugLineNum = 458753;BA.debugLine="B4XPages.Delegate.Activity_PermissionResult(Permi"; -mostCurrent._b4xpages._delegate /*keymon.lat.medicomed.b4xpagesdelegator*/ ._activity_permissionresult /*String*/ (null,_permission,_result); -RDebugUtils.currentLine=458754; - //BA.debugLineNum = 458754;BA.debugLine="End Sub"; -return ""; -} -public static String _activity_resume() throws Exception{ -RDebugUtils.currentModule="main"; -if (Debug.shouldDelegate(mostCurrent.activityBA, "activity_resume", false)) - {return ((String) Debug.delegate(mostCurrent.activityBA, "activity_resume", null));} -RDebugUtils.currentLine=327680; - //BA.debugLineNum = 327680;BA.debugLine="Sub Activity_Resume"; -RDebugUtils.currentLine=327681; - //BA.debugLineNum = 327681;BA.debugLine="B4XPages.Delegate.Activity_Resume"; -mostCurrent._b4xpages._delegate /*keymon.lat.medicomed.b4xpagesdelegator*/ ._activity_resume /*String*/ (null); -RDebugUtils.currentLine=327682; - //BA.debugLineNum = 327682;BA.debugLine="End Sub"; -return ""; -} -public static String _create_menu(Object _menu) throws Exception{ -RDebugUtils.currentModule="main"; -if (Debug.shouldDelegate(mostCurrent.activityBA, "create_menu", false)) - {return ((String) Debug.delegate(mostCurrent.activityBA, "create_menu", new Object[] {_menu}));} -RDebugUtils.currentLine=524288; - //BA.debugLineNum = 524288;BA.debugLine="Sub Create_Menu (Menu As Object)"; -RDebugUtils.currentLine=524289; - //BA.debugLineNum = 524289;BA.debugLine="B4XPages.Delegate.Create_Menu(Menu)"; -mostCurrent._b4xpages._delegate /*keymon.lat.medicomed.b4xpagesdelegator*/ ._create_menu /*String*/ (null,_menu); -RDebugUtils.currentLine=524290; - //BA.debugLineNum = 524290;BA.debugLine="End Sub"; +}public static String _process_globals() throws Exception{ + //BA.debugLineNum = 19;BA.debugLine="Sub Process_Globals"; + //BA.debugLineNum = 20;BA.debugLine="Public ActionBarHomeClicked As Boolean"; +_actionbarhomeclicked = false; + //BA.debugLineNum = 21;BA.debugLine="End Sub"; return ""; } public boolean _onCreateOptionsMenu(android.view.Menu menu) { @@ -536,4 +480,4 @@ public boolean _onCreateOptionsMenu(android.view.Menu menu) { return true; } -} \ No newline at end of file +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/mapa_rutas.java b/B4A/Objects/src/keymon/lat/medicomed/mapa_rutas.java index 8704838..8ca500c 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/mapa_rutas.java +++ b/B4A/Objects/src/keymon/lat/medicomed/mapa_rutas.java @@ -34,7 +34,7 @@ public class mapa_rutas extends Activity implements B4AActivity{ super.onCreate(savedInstanceState); mostCurrent = this; if (processBA == null) { - processBA = new anywheresoftware.b4a.ShellBA(this.getApplicationContext(), null, null, "keymon.lat.medicomed", "keymon.lat.medicomed.mapa_rutas"); + processBA = new BA(this.getApplicationContext(), null, null, "keymon.lat.medicomed", "keymon.lat.medicomed.mapa_rutas"); processBA.loadHtSubs(this.getClass()); float deviceScale = getApplicationContext().getResources().getDisplayMetrics().density; BALayout.setDeviceScale(deviceScale); @@ -335,15 +335,6 @@ public class mapa_rutas extends Activity implements B4AActivity{ } - - -public static void initializeProcessGlobals() { - try { - Class.forName(BA.applicationContext.getPackageName() + ".main").getMethod("initializeProcessGlobals").invoke(null, null); - } catch (Exception e) { - throw new RuntimeException(e); - } -} public anywheresoftware.b4a.keywords.Common __c = null; public static anywheresoftware.b4a.gps.GPS _gps = null; public static anywheresoftware.b4a.objects.RuntimePermissions _rp = null; @@ -400,10 +391,15 @@ 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 static void initializeProcessGlobals() { + try { + Class.forName(BA.applicationContext.getPackageName() + ".main").getMethod("initializeProcessGlobals").invoke(null, null); + } catch (Exception e) { + throw new RuntimeException(e); + } +} public static void _activity_create(boolean _firsttime) throws Exception{ -RDebugUtils.currentModule="mapa_rutas"; -if (Debug.shouldDelegate(mostCurrent.activityBA, "activity_create", false)) - {Debug.delegate(mostCurrent.activityBA, "activity_create", new Object[] {_firsttime}); return;} ResumableSub_Activity_Create rsub = new ResumableSub_Activity_Create(null,_firsttime); rsub.resume(processBA, null); } @@ -419,7 +415,6 @@ boolean _result = false; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="mapa_rutas"; while (true) { switch (state) { @@ -429,14 +424,11 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=28377089; - //BA.debugLineNum = 28377089;BA.debugLine="Activity.LoadLayout(\"MAPA_RUTAS\")"; + //BA.debugLineNum = 57;BA.debugLine="Activity.LoadLayout(\"MAPA_RUTAS\")"; parent.mostCurrent._activity.LoadLayout("MAPA_RUTAS",mostCurrent.activityBA); -RDebugUtils.currentLine=28377093; - //BA.debugLineNum = 28377093;BA.debugLine="ruta = File.DirInternal"; + //BA.debugLineNum = 61;BA.debugLine="ruta = File.DirInternal"; parent._ruta = anywheresoftware.b4a.keywords.Common.File.getDirInternal(); -RDebugUtils.currentLine=28377095; - //BA.debugLineNum = 28377095;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; + //BA.debugLineNum = 63;BA.debugLine="If File.Exists(ruta, \"kmt.db\") = False Then"; if (true) break; case 1: @@ -449,8 +441,7 @@ this.state = 3; case 3: //C this.state = 4; -RDebugUtils.currentLine=28377096; - //BA.debugLineNum = 28377096;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; + //BA.debugLineNum = 64;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", ruta, \"kmt.d"; anywheresoftware.b4a.keywords.Common.File.Copy(anywheresoftware.b4a.keywords.Common.File.getDirAssets(),"kmt.db",parent._ruta,"kmt.db"); if (true) break; @@ -458,15 +449,12 @@ case 4: //C this.state = 5; ; -RDebugUtils.currentLine=28377098; - //BA.debugLineNum = 28377098;BA.debugLine="skmt.Initialize(ruta,\"kmt.db\", True)"; + //BA.debugLineNum = 66;BA.debugLine="skmt.Initialize(ruta,\"kmt.db\", True)"; parent._skmt.Initialize(parent._ruta,"kmt.db",anywheresoftware.b4a.keywords.Common.True); -RDebugUtils.currentLine=28377100; - //BA.debugLineNum = 28377100;BA.debugLine="Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_"; + //BA.debugLineNum = 68;BA.debugLine="Starter.rp.CheckAndRequest(Starter.rp.PERMISSION_"; parent.mostCurrent._starter._rp /*anywheresoftware.b4a.objects.RuntimePermissions*/ .CheckAndRequest(processBA,parent.mostCurrent._starter._rp /*anywheresoftware.b4a.objects.RuntimePermissions*/ .PERMISSION_ACCESS_FINE_LOCATION); -RDebugUtils.currentLine=28377101; - //BA.debugLineNum = 28377101;BA.debugLine="Wait For Activity_PermissionResult (Permission As"; -anywheresoftware.b4a.keywords.Common.WaitFor("activity_permissionresult", processBA, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "mapa_rutas", "activity_create"), null); + //BA.debugLineNum = 69;BA.debugLine="Wait For Activity_PermissionResult (Permission As"; +anywheresoftware.b4a.keywords.Common.WaitFor("activity_permissionresult", processBA, this, null); this.state = 19; return; case 19: @@ -475,8 +463,7 @@ this.state = 5; _permission = (String) result[0]; _result = (Boolean) result[1]; ; -RDebugUtils.currentLine=28377102; - //BA.debugLineNum = 28377102;BA.debugLine="If Result Then"; + //BA.debugLineNum = 70;BA.debugLine="If Result Then"; if (true) break; case 5: @@ -491,14 +478,11 @@ this.state = 13; case 7: //C this.state = 8; -RDebugUtils.currentLine=28377103; - //BA.debugLineNum = 28377103;BA.debugLine="StartService(Tracker)"; + //BA.debugLineNum = 71;BA.debugLine="StartService(Tracker)"; anywheresoftware.b4a.keywords.Common.StartService(processBA,(Object)(parent.mostCurrent._tracker.getObject())); -RDebugUtils.currentLine=28377104; - //BA.debugLineNum = 28377104;BA.debugLine="Log(\"Start Tracker\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("328377104","Start Tracker",0); -RDebugUtils.currentLine=28377105; - //BA.debugLineNum = 28377105;BA.debugLine="If MapFragment1.IsGooglePlayServicesAvailable ="; + //BA.debugLineNum = 72;BA.debugLine="Log(\"Start Tracker\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("364684048","Start Tracker",0); + //BA.debugLineNum = 73;BA.debugLine="If MapFragment1.IsGooglePlayServicesAvailable ="; if (true) break; case 8: @@ -511,8 +495,7 @@ this.state = 10; case 10: //C this.state = 11; -RDebugUtils.currentLine=28377106; - //BA.debugLineNum = 28377106;BA.debugLine="ToastMessageShow(\"Please install Google Play Se"; + //BA.debugLineNum = 74;BA.debugLine="ToastMessageShow(\"Please install Google Play Se"; anywheresoftware.b4a.keywords.Common.ToastMessageShow(BA.ObjectToCharSequence("Please install Google Play Services."),anywheresoftware.b4a.keywords.Common.True); if (true) break; @@ -525,11 +508,9 @@ this.state = 14; case 13: //C this.state = 14; -RDebugUtils.currentLine=28377109; - //BA.debugLineNum = 28377109;BA.debugLine="ToastMessageShow(\"No permission\", True)"; + //BA.debugLineNum = 77;BA.debugLine="ToastMessageShow(\"No permission\", True)"; anywheresoftware.b4a.keywords.Common.ToastMessageShow(BA.ObjectToCharSequence("No permission"),anywheresoftware.b4a.keywords.Common.True); -RDebugUtils.currentLine=28377110; - //BA.debugLineNum = 28377110;BA.debugLine="B4XPages.ShowPage(\"Principal\")"; + //BA.debugLineNum = 78;BA.debugLine="B4XPages.ShowPage(\"Principal\")"; parent.mostCurrent._b4xpages._showpage /*String*/ (mostCurrent.activityBA,"Principal"); if (true) break; @@ -537,50 +518,35 @@ case 14: //C this.state = 15; ; -RDebugUtils.currentLine=28377125; - //BA.debugLineNum = 28377125;BA.debugLine="MARK_AZUL.IsInitialized"; + //BA.debugLineNum = 93;BA.debugLine="MARK_AZUL.IsInitialized"; parent.mostCurrent._mark_azul.IsInitialized(); -RDebugUtils.currentLine=28377126; - //BA.debugLineNum = 28377126;BA.debugLine="MARK_ROJO.IsInitialized"; + //BA.debugLineNum = 94;BA.debugLine="MARK_ROJO.IsInitialized"; parent.mostCurrent._mark_rojo.IsInitialized(); -RDebugUtils.currentLine=28377127; - //BA.debugLineNum = 28377127;BA.debugLine="MARK_VERDE.IsInitialized"; + //BA.debugLineNum = 95;BA.debugLine="MARK_VERDE.IsInitialized"; parent.mostCurrent._mark_verde.IsInitialized(); -RDebugUtils.currentLine=28377129; - //BA.debugLineNum = 28377129;BA.debugLine="LIST_AZUL.Initialize"; + //BA.debugLineNum = 97;BA.debugLine="LIST_AZUL.Initialize"; parent.mostCurrent._list_azul.Initialize(); -RDebugUtils.currentLine=28377130; - //BA.debugLineNum = 28377130;BA.debugLine="LIST_ROJO.Initialize"; + //BA.debugLineNum = 98;BA.debugLine="LIST_ROJO.Initialize"; parent.mostCurrent._list_rojo.Initialize(); -RDebugUtils.currentLine=28377131; - //BA.debugLineNum = 28377131;BA.debugLine="LIST_VERDE.Initialize"; + //BA.debugLineNum = 99;BA.debugLine="LIST_VERDE.Initialize"; parent.mostCurrent._list_verde.Initialize(); -RDebugUtils.currentLine=28377132; - //BA.debugLineNum = 28377132;BA.debugLine="verde = 0"; + //BA.debugLineNum = 100;BA.debugLine="verde = 0"; parent.mostCurrent._verde = BA.NumberToString(0); -RDebugUtils.currentLine=28377133; - //BA.debugLineNum = 28377133;BA.debugLine="azul = 0"; + //BA.debugLineNum = 101;BA.debugLine="azul = 0"; parent.mostCurrent._azul = BA.NumberToString(0); -RDebugUtils.currentLine=28377134; - //BA.debugLineNum = 28377134;BA.debugLine="rojo = 0"; + //BA.debugLineNum = 102;BA.debugLine="rojo = 0"; parent.mostCurrent._rojo = BA.NumberToString(0); -RDebugUtils.currentLine=28377135; - //BA.debugLineNum = 28377135;BA.debugLine="todos = 1"; + //BA.debugLineNum = 103;BA.debugLine="todos = 1"; parent.mostCurrent._todos = BA.NumberToString(1); -RDebugUtils.currentLine=28377136; - //BA.debugLineNum = 28377136;BA.debugLine="c=skmt.ExecQuery2(\"select count(*) AS CUANTOS fro"; + //BA.debugLineNum = 104;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[]{"SEMANA"}))); -RDebugUtils.currentLine=28377137; - //BA.debugLineNum = 28377137;BA.debugLine="c.Position =0"; + //BA.debugLineNum = 105;BA.debugLine="c.Position =0"; parent._c.setPosition((int) (0)); -RDebugUtils.currentLine=28377138; - //BA.debugLineNum = 28377138;BA.debugLine="SEMANA = c.GetString(\"CUANTOS\")"; + //BA.debugLineNum = 106;BA.debugLine="SEMANA = c.GetString(\"CUANTOS\")"; parent.mostCurrent._semana = parent._c.GetString("CUANTOS"); -RDebugUtils.currentLine=28377139; - //BA.debugLineNum = 28377139;BA.debugLine="c.Close"; + //BA.debugLineNum = 107;BA.debugLine="c.Close"; parent._c.Close(); -RDebugUtils.currentLine=28377141; - //BA.debugLineNum = 28377141;BA.debugLine="If SEMANA > 0 Then"; + //BA.debugLineNum = 109;BA.debugLine="If SEMANA > 0 Then"; if (true) break; case 15: @@ -593,17 +559,13 @@ this.state = 17; case 17: //C this.state = 18; -RDebugUtils.currentLine=28377142; - //BA.debugLineNum = 28377142;BA.debugLine="c=skmt.ExecQuery2(\"select CAT_VA_VALOR from CAT_"; + //BA.debugLineNum = 110;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[]{"SEMANA"}))); -RDebugUtils.currentLine=28377143; - //BA.debugLineNum = 28377143;BA.debugLine="c.Position =0"; + //BA.debugLineNum = 111;BA.debugLine="c.Position =0"; parent._c.setPosition((int) (0)); -RDebugUtils.currentLine=28377144; - //BA.debugLineNum = 28377144;BA.debugLine="SEMANA = c.GetString(\"CAT_VA_VALOR\")"; + //BA.debugLineNum = 112;BA.debugLine="SEMANA = c.GetString(\"CAT_VA_VALOR\")"; parent.mostCurrent._semana = parent._c.GetString("CAT_VA_VALOR"); -RDebugUtils.currentLine=28377145; - //BA.debugLineNum = 28377145;BA.debugLine="c.Close"; + //BA.debugLineNum = 113;BA.debugLine="c.Close"; parent._c.Close(); if (true) break; @@ -611,29 +573,23 @@ case 18: //C this.state = -1; ; -RDebugUtils.currentLine=28377147; - //BA.debugLineNum = 28377147;BA.debugLine="End Sub"; + //BA.debugLineNum = 115;BA.debugLine="End Sub"; if (true) break; } } } } +public static void _activity_permissionresult(String _permission,boolean _result) throws Exception{ +} public static String _activity_pause(boolean _userclosed) throws Exception{ -RDebugUtils.currentModule="mapa_rutas"; -RDebugUtils.currentLine=28704768; - //BA.debugLineNum = 28704768;BA.debugLine="Sub Activity_Pause (UserClosed As Boolean)"; -RDebugUtils.currentLine=28704769; - //BA.debugLineNum = 28704769;BA.debugLine="GPS.Stop"; + //BA.debugLineNum = 301;BA.debugLine="Sub Activity_Pause (UserClosed As Boolean)"; + //BA.debugLineNum = 302;BA.debugLine="GPS.Stop"; _gps.Stop(); -RDebugUtils.currentLine=28704770; - //BA.debugLineNum = 28704770;BA.debugLine="End Sub"; + //BA.debugLineNum = 303;BA.debugLine="End Sub"; return ""; } public static void _activity_resume() throws Exception{ -RDebugUtils.currentModule="mapa_rutas"; -if (Debug.shouldDelegate(mostCurrent.activityBA, "activity_resume", false)) - {Debug.delegate(mostCurrent.activityBA, "activity_resume", null); return;} ResumableSub_Activity_Resume rsub = new ResumableSub_Activity_Resume(null); rsub.resume(processBA, null); } @@ -647,7 +603,6 @@ boolean _result = false; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="mapa_rutas"; while (true) { switch (state) { @@ -657,12 +612,10 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=28442625; - //BA.debugLineNum = 28442625;BA.debugLine="Starter.rp.Check(Starter.rp.PERMISSION_ACCESS_FIN"; + //BA.debugLineNum = 118;BA.debugLine="Starter.rp.Check(Starter.rp.PERMISSION_ACCESS_FIN"; parent.mostCurrent._starter._rp /*anywheresoftware.b4a.objects.RuntimePermissions*/ .Check(parent.mostCurrent._starter._rp /*anywheresoftware.b4a.objects.RuntimePermissions*/ .PERMISSION_ACCESS_FINE_LOCATION); -RDebugUtils.currentLine=28442626; - //BA.debugLineNum = 28442626;BA.debugLine="Wait For Activity_PermissionResult (Permission As"; -anywheresoftware.b4a.keywords.Common.WaitFor("activity_permissionresult", processBA, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "mapa_rutas", "activity_resume"), null); + //BA.debugLineNum = 119;BA.debugLine="Wait For Activity_PermissionResult (Permission As"; +anywheresoftware.b4a.keywords.Common.WaitFor("activity_permissionresult", processBA, this, null); this.state = 11; return; case 11: @@ -671,8 +624,7 @@ this.state = 1; _permission = (String) result[0]; _result = (Boolean) result[1]; ; -RDebugUtils.currentLine=28442627; - //BA.debugLineNum = 28442627;BA.debugLine="If Result Then"; + //BA.debugLineNum = 120;BA.debugLine="If Result Then"; if (true) break; case 1: @@ -685,8 +637,7 @@ this.state = 3; case 3: //C this.state = 4; -RDebugUtils.currentLine=28442628; - //BA.debugLineNum = 28442628;BA.debugLine="If Starter.GPS.GPSEnabled = False Then"; + //BA.debugLineNum = 121;BA.debugLine="If Starter.GPS.GPSEnabled = False Then"; if (true) break; case 4: @@ -701,19 +652,16 @@ this.state = 8; case 6: //C this.state = 9; -RDebugUtils.currentLine=28442629; - //BA.debugLineNum = 28442629;BA.debugLine="ToastMessageShow(\"Debe Activar el GPS del Equip"; + //BA.debugLineNum = 122;BA.debugLine="ToastMessageShow(\"Debe Activar el GPS del Equip"; anywheresoftware.b4a.keywords.Common.ToastMessageShow(BA.ObjectToCharSequence("Debe Activar el GPS del Equipo."),anywheresoftware.b4a.keywords.Common.True); -RDebugUtils.currentLine=28442630; - //BA.debugLineNum = 28442630;BA.debugLine="StartActivity(Starter.GPS.LocationSettingsInten"; + //BA.debugLineNum = 123;BA.debugLine="StartActivity(Starter.GPS.LocationSettingsInten"; anywheresoftware.b4a.keywords.Common.StartActivity(processBA,(Object)(parent.mostCurrent._starter._gps /*anywheresoftware.b4a.gps.GPS*/ .getLocationSettingsIntent())); if (true) break; case 8: //C this.state = 9; -RDebugUtils.currentLine=28442632; - //BA.debugLineNum = 28442632;BA.debugLine="Starter.GPS.Start(0, 0)"; + //BA.debugLineNum = 125;BA.debugLine="Starter.GPS.Start(0, 0)"; parent.mostCurrent._starter._gps /*anywheresoftware.b4a.gps.GPS*/ .Start(processBA,(long) (0),(float) (0)); if (true) break; @@ -727,29 +675,21 @@ case 10: //C this.state = -1; ; -RDebugUtils.currentLine=28442635; - //BA.debugLineNum = 28442635;BA.debugLine="LIST_AZUL.Initialize"; + //BA.debugLineNum = 128;BA.debugLine="LIST_AZUL.Initialize"; parent.mostCurrent._list_azul.Initialize(); -RDebugUtils.currentLine=28442636; - //BA.debugLineNum = 28442636;BA.debugLine="LIST_ROJO.Initialize"; + //BA.debugLineNum = 129;BA.debugLine="LIST_ROJO.Initialize"; parent.mostCurrent._list_rojo.Initialize(); -RDebugUtils.currentLine=28442637; - //BA.debugLineNum = 28442637;BA.debugLine="LIST_VERDE.Initialize"; + //BA.debugLineNum = 130;BA.debugLine="LIST_VERDE.Initialize"; parent.mostCurrent._list_verde.Initialize(); -RDebugUtils.currentLine=28442638; - //BA.debugLineNum = 28442638;BA.debugLine="verde = 0"; + //BA.debugLineNum = 131;BA.debugLine="verde = 0"; parent.mostCurrent._verde = BA.NumberToString(0); -RDebugUtils.currentLine=28442639; - //BA.debugLineNum = 28442639;BA.debugLine="azul = 1"; + //BA.debugLineNum = 132;BA.debugLine="azul = 1"; parent.mostCurrent._azul = BA.NumberToString(1); -RDebugUtils.currentLine=28442640; - //BA.debugLineNum = 28442640;BA.debugLine="rojo = 0"; + //BA.debugLineNum = 133;BA.debugLine="rojo = 0"; parent.mostCurrent._rojo = BA.NumberToString(0); -RDebugUtils.currentLine=28442641; - //BA.debugLineNum = 28442641;BA.debugLine="todos = 0"; + //BA.debugLineNum = 134;BA.debugLine="todos = 0"; parent.mostCurrent._todos = BA.NumberToString(0); -RDebugUtils.currentLine=28442642; - //BA.debugLineNum = 28442642;BA.debugLine="End Sub"; + //BA.debugLineNum = 135;BA.debugLine="End Sub"; if (true) break; } @@ -757,37 +697,155 @@ if (true) break; } } public static String _b_azul_click() throws Exception{ -RDebugUtils.currentModule="mapa_rutas"; -if (Debug.shouldDelegate(mostCurrent.activityBA, "b_azul_click", false)) - {return ((String) Debug.delegate(mostCurrent.activityBA, "b_azul_click", null));} -RDebugUtils.currentLine=28966912; - //BA.debugLineNum = 28966912;BA.debugLine="Sub B_AZUL_Click"; -RDebugUtils.currentLine=28966913; - //BA.debugLineNum = 28966913;BA.debugLine="azul = 1"; + //BA.debugLineNum = 337;BA.debugLine="Sub B_AZUL_Click"; + //BA.debugLineNum = 338;BA.debugLine="azul = 1"; mostCurrent._azul = BA.NumberToString(1); -RDebugUtils.currentLine=28966914; - //BA.debugLineNum = 28966914;BA.debugLine="verde = 0"; + //BA.debugLineNum = 339;BA.debugLine="verde = 0"; mostCurrent._verde = BA.NumberToString(0); -RDebugUtils.currentLine=28966915; - //BA.debugLineNum = 28966915;BA.debugLine="rojo = 0"; + //BA.debugLineNum = 340;BA.debugLine="rojo = 0"; mostCurrent._rojo = BA.NumberToString(0); -RDebugUtils.currentLine=28966916; - //BA.debugLineNum = 28966916;BA.debugLine="todos = 0"; + //BA.debugLineNum = 341;BA.debugLine="todos = 0"; mostCurrent._todos = BA.NumberToString(0); -RDebugUtils.currentLine=28966917; - //BA.debugLineNum = 28966917;BA.debugLine="gmap.Clear"; + //BA.debugLineNum = 342;BA.debugLine="gmap.Clear"; mostCurrent._gmap.Clear(); -RDebugUtils.currentLine=28966919; - //BA.debugLineNum = 28966919;BA.debugLine="MapFragment1_Ready"; + //BA.debugLineNum = 344;BA.debugLine="MapFragment1_Ready"; _mapfragment1_ready(); -RDebugUtils.currentLine=28966921; - //BA.debugLineNum = 28966921;BA.debugLine="End Sub"; + //BA.debugLineNum = 346;BA.debugLine="End Sub"; +return ""; +} +public static String _b_rojo_click() throws Exception{ + //BA.debugLineNum = 326;BA.debugLine="Sub B_ROJO_Click"; + //BA.debugLineNum = 327;BA.debugLine="rojo = 1"; +mostCurrent._rojo = BA.NumberToString(1); + //BA.debugLineNum = 328;BA.debugLine="verde = 0"; +mostCurrent._verde = BA.NumberToString(0); + //BA.debugLineNum = 329;BA.debugLine="azul = 0"; +mostCurrent._azul = BA.NumberToString(0); + //BA.debugLineNum = 330;BA.debugLine="todos = 0"; +mostCurrent._todos = BA.NumberToString(0); + //BA.debugLineNum = 331;BA.debugLine="gmap.Clear"; +mostCurrent._gmap.Clear(); + //BA.debugLineNum = 333;BA.debugLine="MapFragment1_Ready"; +_mapfragment1_ready(); + //BA.debugLineNum = 335;BA.debugLine="End Sub"; +return ""; +} +public static String _b_todos_click() throws Exception{ + //BA.debugLineNum = 306;BA.debugLine="Sub B_TODOS_Click"; + //BA.debugLineNum = 307;BA.debugLine="todos =1"; +mostCurrent._todos = BA.NumberToString(1); + //BA.debugLineNum = 308;BA.debugLine="verde = 0"; +mostCurrent._verde = BA.NumberToString(0); + //BA.debugLineNum = 309;BA.debugLine="azul = 0"; +mostCurrent._azul = BA.NumberToString(0); + //BA.debugLineNum = 310;BA.debugLine="rojo = 0"; +mostCurrent._rojo = BA.NumberToString(0); + //BA.debugLineNum = 312;BA.debugLine="MapFragment1_Ready"; +_mapfragment1_ready(); + //BA.debugLineNum = 314;BA.debugLine="End Sub"; +return ""; +} +public static String _b_verde_click() throws Exception{ + //BA.debugLineNum = 316;BA.debugLine="Sub B_VERDE_Click"; + //BA.debugLineNum = 317;BA.debugLine="verde = 1"; +mostCurrent._verde = BA.NumberToString(1); + //BA.debugLineNum = 318;BA.debugLine="azul = 0"; +mostCurrent._azul = BA.NumberToString(0); + //BA.debugLineNum = 319;BA.debugLine="rojo = 0"; +mostCurrent._rojo = BA.NumberToString(0); + //BA.debugLineNum = 320;BA.debugLine="todos = 0"; +mostCurrent._todos = BA.NumberToString(0); + //BA.debugLineNum = 321;BA.debugLine="gmap.Clear"; +mostCurrent._gmap.Clear(); + //BA.debugLineNum = 322;BA.debugLine="MapFragment1_Ready"; +_mapfragment1_ready(); + //BA.debugLineNum = 324;BA.debugLine="End Sub"; +return ""; +} +public static String _globals() throws Exception{ + //BA.debugLineNum = 18;BA.debugLine="Sub Globals"; + //BA.debugLineNum = 19;BA.debugLine="Private gmap As GoogleMap"; +mostCurrent._gmap = new anywheresoftware.b4a.objects.MapFragmentWrapper.GoogleMapWrapper(); + //BA.debugLineNum = 20;BA.debugLine="Private MapFragment1 As MapFragment"; +mostCurrent._mapfragment1 = new anywheresoftware.b4a.objects.MapFragmentWrapper(); + //BA.debugLineNum = 21;BA.debugLine="Dim Latitud As Double = 0"; +_latitud = 0; + //BA.debugLineNum = 22;BA.debugLine="Dim Longitud As Double = 0"; +_longitud = 0; + //BA.debugLineNum = 23;BA.debugLine="Dim Lat2 As Double = 0"; +_lat2 = 0; + //BA.debugLineNum = 24;BA.debugLine="Dim Lon2 As Double = 0"; +_lon2 = 0; + //BA.debugLineNum = 25;BA.debugLine="Dim p1, p2 As Location"; +mostCurrent._p1 = new anywheresoftware.b4a.gps.LocationWrapper(); +mostCurrent._p2 = new anywheresoftware.b4a.gps.LocationWrapper(); + //BA.debugLineNum = 26;BA.debugLine="Dim Distance As Float"; +_distance = 0f; + //BA.debugLineNum = 27;BA.debugLine="Dim boton1 As Button"; +mostCurrent._boton1 = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 28;BA.debugLine="Dim HUE_BLUE As Float"; +_hue_blue = 0f; + //BA.debugLineNum = 29;BA.debugLine="Dim HUE_RED As Float"; +_hue_red = 0f; + //BA.debugLineNum = 30;BA.debugLine="Dim HUE_GREEN As Float"; +_hue_green = 0f; + //BA.debugLineNum = 31;BA.debugLine="Private B_AZUL As Button"; +mostCurrent._b_azul = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 32;BA.debugLine="Private B_ROJO As Button"; +mostCurrent._b_rojo = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 33;BA.debugLine="Private B_VERDE As Button"; +mostCurrent._b_verde = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 34;BA.debugLine="Private B_TODOS As Button"; +mostCurrent._b_todos = new anywheresoftware.b4a.objects.ButtonWrapper(); + //BA.debugLineNum = 35;BA.debugLine="Dim Tienda As String"; +mostCurrent._tienda = ""; + //BA.debugLineNum = 36;BA.debugLine="Dim LatitudRu As Double"; +_latitudru = 0; + //BA.debugLineNum = 37;BA.debugLine="Dim LongitudRU As Double"; +_longitudru = 0; + //BA.debugLineNum = 38;BA.debugLine="Dim LIST_AZUL As List"; +mostCurrent._list_azul = new anywheresoftware.b4a.objects.collections.List(); + //BA.debugLineNum = 39;BA.debugLine="Dim LIST_ROJO As List"; +mostCurrent._list_rojo = new anywheresoftware.b4a.objects.collections.List(); + //BA.debugLineNum = 40;BA.debugLine="Dim LIST_VERDE As List"; +mostCurrent._list_verde = new anywheresoftware.b4a.objects.collections.List(); + //BA.debugLineNum = 41;BA.debugLine="Dim MARK_AZUL As Marker"; +mostCurrent._mark_azul = new anywheresoftware.b4a.objects.MapFragmentWrapper.MarkerWrapper(); + //BA.debugLineNum = 42;BA.debugLine="Dim MARK_ROJO As Marker"; +mostCurrent._mark_rojo = new anywheresoftware.b4a.objects.MapFragmentWrapper.MarkerWrapper(); + //BA.debugLineNum = 43;BA.debugLine="Dim MARK_VERDE As Marker"; +mostCurrent._mark_verde = new anywheresoftware.b4a.objects.MapFragmentWrapper.MarkerWrapper(); + //BA.debugLineNum = 44;BA.debugLine="Dim MARK_CEDIS As Marker"; +mostCurrent._mark_cedis = new anywheresoftware.b4a.objects.MapFragmentWrapper.MarkerWrapper(); + //BA.debugLineNum = 45;BA.debugLine="Dim rojo As String"; +mostCurrent._rojo = ""; + //BA.debugLineNum = 46;BA.debugLine="Dim azul As String"; +mostCurrent._azul = ""; + //BA.debugLineNum = 47;BA.debugLine="Dim verde As String"; +mostCurrent._verde = ""; + //BA.debugLineNum = 48;BA.debugLine="Dim todos As String"; +mostCurrent._todos = ""; + //BA.debugLineNum = 49;BA.debugLine="Dim NumSerie As Int"; +_numserie = 0; + //BA.debugLineNum = 50;BA.debugLine="Dim OnInfoWindowClickListener1 As OnInfoWindowCli"; +mostCurrent._oninfowindowclicklistener1 = new uk.co.martinpearman.b4a.com.google.android.gms.maps.googlemap.OnInfoWindowClickListener(); + //BA.debugLineNum = 51;BA.debugLine="Dim GoogleMapEXTRA As GoogleMapsExtras"; +mostCurrent._googlemapextra = new uk.co.martinpearman.b4a.googlemapsextras.GoogleMapsExtras(); + //BA.debugLineNum = 52;BA.debugLine="Dim CODIGO As String"; +mostCurrent._codigo = ""; + //BA.debugLineNum = 53;BA.debugLine="Private SEMANA As String"; +mostCurrent._semana = ""; + //BA.debugLineNum = 54;BA.debugLine="End Sub"; +return ""; +} +public static String _gps_locationchanged(anywheresoftware.b4a.gps.LocationWrapper _parametro) throws Exception{ + //BA.debugLineNum = 280;BA.debugLine="Sub GPS_LocationChanged (Parametro As Location)"; + //BA.debugLineNum = 281;BA.debugLine="MARK_CEDIS.IsInitialized"; +mostCurrent._mark_cedis.IsInitialized(); + //BA.debugLineNum = 299;BA.debugLine="End Sub"; return ""; } public static void _mapfragment1_ready() throws Exception{ -RDebugUtils.currentModule="mapa_rutas"; -if (Debug.shouldDelegate(mostCurrent.activityBA, "mapfragment1_ready", false)) - {Debug.delegate(mostCurrent.activityBA, "mapfragment1_ready", null); return;} ResumableSub_MapFragment1_Ready rsub = new ResumableSub_MapFragment1_Ready(null); rsub.resume(processBA, null); } @@ -814,7 +872,6 @@ int limit84; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="mapa_rutas"; while (true) { switch (state) { @@ -824,21 +881,16 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=28508161; - //BA.debugLineNum = 28508161;BA.debugLine="Log(\"ENTRANDO MapFragment1_Ready\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("328508161","ENTRANDO MapFragment1_Ready",0); -RDebugUtils.currentLine=28508162; - //BA.debugLineNum = 28508162;BA.debugLine="gmap = MapFragment1.GetMap"; + //BA.debugLineNum = 138;BA.debugLine="Log(\"ENTRANDO MapFragment1_Ready\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("364815105","ENTRANDO MapFragment1_Ready",0); + //BA.debugLineNum = 139;BA.debugLine="gmap = MapFragment1.GetMap"; parent.mostCurrent._gmap = parent.mostCurrent._mapfragment1.GetMap(); -RDebugUtils.currentLine=28508163; - //BA.debugLineNum = 28508163;BA.debugLine="gmap.IsInitialized"; + //BA.debugLineNum = 140;BA.debugLine="gmap.IsInitialized"; parent.mostCurrent._gmap.IsInitialized(); -RDebugUtils.currentLine=28508167; - //BA.debugLineNum = 28508167;BA.debugLine="rp.CheckAndRequest(rp.PERMISSION_ACCESS_FINE_LOCA"; + //BA.debugLineNum = 144;BA.debugLine="rp.CheckAndRequest(rp.PERMISSION_ACCESS_FINE_LOCA"; parent._rp.CheckAndRequest(processBA,parent._rp.PERMISSION_ACCESS_FINE_LOCATION); -RDebugUtils.currentLine=28508168; - //BA.debugLineNum = 28508168;BA.debugLine="Wait For Activity_PermissionResult (Permission As"; -anywheresoftware.b4a.keywords.Common.WaitFor("activity_permissionresult", processBA, new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "mapa_rutas", "mapfragment1_ready"), null); + //BA.debugLineNum = 145;BA.debugLine="Wait For Activity_PermissionResult (Permission As"; +anywheresoftware.b4a.keywords.Common.WaitFor("activity_permissionresult", processBA, this, null); this.state = 80; return; case 80: @@ -847,20 +899,15 @@ this.state = 1; _permission = (String) result[0]; _result = (Boolean) result[1]; ; -RDebugUtils.currentLine=28508169; - //BA.debugLineNum = 28508169;BA.debugLine="gmap.MyLocationEnabled = Result"; + //BA.debugLineNum = 146;BA.debugLine="gmap.MyLocationEnabled = Result"; parent.mostCurrent._gmap.setMyLocationEnabled(_result); -RDebugUtils.currentLine=28508171; - //BA.debugLineNum = 28508171;BA.debugLine="Dim JavaMapsObject As JavaObject"; + //BA.debugLineNum = 148;BA.debugLine="Dim JavaMapsObject As JavaObject"; _javamapsobject = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=28508172; - //BA.debugLineNum = 28508172;BA.debugLine="JavaMapsObject = gmap.GetUiSettings"; + //BA.debugLineNum = 149;BA.debugLine="JavaMapsObject = gmap.GetUiSettings"; _javamapsobject = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(parent.mostCurrent._gmap.GetUiSettings().getObject())); -RDebugUtils.currentLine=28508173; - //BA.debugLineNum = 28508173;BA.debugLine="JavaMapsObject.RunMethod(\"setMapToolbarEnabled\","; + //BA.debugLineNum = 150;BA.debugLine="JavaMapsObject.RunMethod(\"setMapToolbarEnabled\","; _javamapsobject.RunMethod("setMapToolbarEnabled",new Object[]{(Object)(anywheresoftware.b4a.keywords.Common.True)}); -RDebugUtils.currentLine=28508175; - //BA.debugLineNum = 28508175;BA.debugLine="If azul = 1 Or todos = 1 Then"; + //BA.debugLineNum = 152;BA.debugLine="If azul = 1 Or todos = 1 Then"; if (true) break; case 1: @@ -873,17 +920,13 @@ this.state = 3; case 3: //C this.state = 4; -RDebugUtils.currentLine=28508176; - //BA.debugLineNum = 28508176;BA.debugLine="c.IsInitialized"; + //BA.debugLineNum = 153;BA.debugLine="c.IsInitialized"; parent._c.IsInitialized(); -RDebugUtils.currentLine=28508177; - //BA.debugLineNum = 28508177;BA.debugLine="c=skmt.ExecQuery(\"select CAT_CL_CODIGO,CAT_CL_NO"; + //BA.debugLineNum = 154;BA.debugLine="c=skmt.ExecQuery(\"select CAT_CL_CODIGO,CAT_CL_NO"; parent._c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._skmt.ExecQuery("select CAT_CL_CODIGO,CAT_CL_NOMBRE,CAT_CL_LAT,CAT_CL_LONG,CAT_CL_SECUENCIA from kmt_info where gestion = 0 and CAT_CL_LAT is not null and CAT_CL_LONG is not null and CAT_CL_LAT <> 0 and CAT_CL_LONG <> 0 and CAT_CL_LAT <> ' ' and CAT_CL_LONG <> ' ' "))); -RDebugUtils.currentLine=28508179; - //BA.debugLineNum = 28508179;BA.debugLine="Log($\"============== Resultados = ${c.RowCount}\""; -anywheresoftware.b4a.keywords.Common.LogImpl("328508179",("============== Resultados = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(parent._c.getRowCount()))+""),0); -RDebugUtils.currentLine=28508180; - //BA.debugLineNum = 28508180;BA.debugLine="If c.RowCount > 0 Then"; + //BA.debugLineNum = 156;BA.debugLine="Log($\"============== Resultados = ${c.RowCount}\""; +anywheresoftware.b4a.keywords.Common.LogImpl("364815123",("============== Resultados = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(parent._c.getRowCount()))+""),0); + //BA.debugLineNum = 157;BA.debugLine="If c.RowCount > 0 Then"; if (true) break; case 4: @@ -896,8 +939,7 @@ this.state = 6; case 6: //C this.state = 7; -RDebugUtils.currentLine=28508181; - //BA.debugLineNum = 28508181;BA.debugLine="For i = 0 To c.RowCount - 1"; + //BA.debugLineNum = 158;BA.debugLine="For i = 0 To c.RowCount - 1"; if (true) break; case 7: @@ -924,14 +966,11 @@ if (true) break; case 9: //C this.state = 10; -RDebugUtils.currentLine=28508182; - //BA.debugLineNum = 28508182;BA.debugLine="c.Position = i"; + //BA.debugLineNum = 159;BA.debugLine="c.Position = i"; parent._c.setPosition(_i); -RDebugUtils.currentLine=28508185; - //BA.debugLineNum = 28508185;BA.debugLine="LatitudRu = 0"; + //BA.debugLineNum = 162;BA.debugLine="LatitudRu = 0"; parent._latitudru = 0; -RDebugUtils.currentLine=28508186; - //BA.debugLineNum = 28508186;BA.debugLine="If c.GetString(\"CAT_CL_LAT\") <> \"\" Then Latitu"; + //BA.debugLineNum = 163;BA.debugLine="If c.GetString(\"CAT_CL_LAT\") <> \"\" Then Latitu"; if (true) break; case 10: @@ -951,11 +990,9 @@ case 15: //C this.state = 16; ; -RDebugUtils.currentLine=28508187; - //BA.debugLineNum = 28508187;BA.debugLine="LongitudRU = 0"; + //BA.debugLineNum = 164;BA.debugLine="LongitudRU = 0"; parent._longitudru = 0; -RDebugUtils.currentLine=28508188; - //BA.debugLineNum = 28508188;BA.debugLine="If c.GetString(\"CAT_CL_LONG\") <> \"\" Then Longi"; + //BA.debugLineNum = 165;BA.debugLine="If c.GetString(\"CAT_CL_LONG\") <> \"\" Then Longi"; if (true) break; case 16: @@ -975,20 +1012,15 @@ case 21: //C this.state = 82; ; -RDebugUtils.currentLine=28508189; - //BA.debugLineNum = 28508189;BA.debugLine="CODIGO=c.GetString(\"CAT_CL_CODIGO\")"; + //BA.debugLineNum = 166;BA.debugLine="CODIGO=c.GetString(\"CAT_CL_CODIGO\")"; parent.mostCurrent._codigo = parent._c.GetString("CAT_CL_CODIGO"); -RDebugUtils.currentLine=28508190; - //BA.debugLineNum = 28508190;BA.debugLine="Tienda= c.GetString(\"CAT_CL_NOMBRE\")"; + //BA.debugLineNum = 167;BA.debugLine="Tienda= c.GetString(\"CAT_CL_NOMBRE\")"; parent.mostCurrent._tienda = parent._c.GetString("CAT_CL_NOMBRE"); -RDebugUtils.currentLine=28508191; - //BA.debugLineNum = 28508191;BA.debugLine="NumSerie=c.GetInt(\"CAT_CL_SECUENCIA\")"; + //BA.debugLineNum = 168;BA.debugLine="NumSerie=c.GetInt(\"CAT_CL_SECUENCIA\")"; parent._numserie = parent._c.GetInt("CAT_CL_SECUENCIA"); -RDebugUtils.currentLine=28508192; - //BA.debugLineNum = 28508192;BA.debugLine="MARK_AZUL = gmap.AddMarker3(LatitudRu,Longitud"; + //BA.debugLineNum = 169;BA.debugLine="MARK_AZUL = gmap.AddMarker3(LatitudRu,Longitud"; parent.mostCurrent._mark_azul = parent.mostCurrent._gmap.AddMarker3(parent._latitudru,parent._longitudru,parent.mostCurrent._codigo,(android.graphics.Bitmap)(anywheresoftware.b4a.keywords.Common.LoadBitmap(anywheresoftware.b4a.keywords.Common.File.getDirAssets(),"marker-azul-"+BA.NumberToString(parent._numserie)+".png").getObject())); -RDebugUtils.currentLine=28508193; - //BA.debugLineNum = 28508193;BA.debugLine="MARK_AZUL.Snippet = Tienda"; + //BA.debugLineNum = 170;BA.debugLine="MARK_AZUL.Snippet = Tienda"; parent.mostCurrent._mark_azul.setSnippet(parent.mostCurrent._tienda); if (true) break; if (true) break; @@ -1003,11 +1035,9 @@ case 23: //C this.state = 24; ; -RDebugUtils.currentLine=28508196; - //BA.debugLineNum = 28508196;BA.debugLine="c .Close"; + //BA.debugLineNum = 173;BA.debugLine="c .Close"; parent._c.Close(); -RDebugUtils.currentLine=28508199; - //BA.debugLineNum = 28508199;BA.debugLine="If MARK_AZUL.IsInitialized Then LIST_AZUL.Add(MA"; + //BA.debugLineNum = 176;BA.debugLine="If MARK_AZUL.IsInitialized Then LIST_AZUL.Add(MA"; if (true) break; case 24: @@ -1029,8 +1059,7 @@ this.state = 30; ; if (true) break; ; -RDebugUtils.currentLine=28508202; - //BA.debugLineNum = 28508202;BA.debugLine="If verde =1 Or todos = 1 Then"; + //BA.debugLineNum = 179;BA.debugLine="If verde =1 Or todos = 1 Then"; case 30: //if @@ -1044,17 +1073,13 @@ this.state = 42; case 32: //C this.state = 33; -RDebugUtils.currentLine=28508203; - //BA.debugLineNum = 28508203;BA.debugLine="c2.IsInitialized"; + //BA.debugLineNum = 180;BA.debugLine="c2.IsInitialized"; parent._c2.IsInitialized(); -RDebugUtils.currentLine=28508204; - //BA.debugLineNum = 28508204;BA.debugLine="c2=skmt.ExecQuery(\"select CAT_CL_CODIGO, CAT_CL_"; + //BA.debugLineNum = 181;BA.debugLine="c2=skmt.ExecQuery(\"select CAT_CL_CODIGO, CAT_CL_"; parent._c2 = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._skmt.ExecQuery("select CAT_CL_CODIGO, CAT_CL_NOMBRE,CAT_CL_LONG,CAT_CL_LAT,CAT_CL_SECUENCIA from kmt_info where gestion = 2 and CAT_CL_LAT is not null and CAT_CL_LONG is not null and CAT_CL_LAT <> 0 and CAT_CL_LONG <> 0"))); -RDebugUtils.currentLine=28508205; - //BA.debugLineNum = 28508205;BA.debugLine="Log($\"============== Resultados = ${c2.RowCount}"; -anywheresoftware.b4a.keywords.Common.LogImpl("328508205",("============== Resultados = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(parent._c2.getRowCount()))+""),0); -RDebugUtils.currentLine=28508206; - //BA.debugLineNum = 28508206;BA.debugLine="For i = 0 To c2.RowCount -1"; + //BA.debugLineNum = 182;BA.debugLine="Log($\"============== Resultados = ${c2.RowCount}"; +anywheresoftware.b4a.keywords.Common.LogImpl("364815149",("============== Resultados = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(parent._c2.getRowCount()))+""),0); + //BA.debugLineNum = 183;BA.debugLine="For i = 0 To c2.RowCount -1"; if (true) break; case 33: @@ -1081,11 +1106,9 @@ if (true) break; case 35: //C this.state = 36; -RDebugUtils.currentLine=28508207; - //BA.debugLineNum = 28508207;BA.debugLine="c2.Position = i"; + //BA.debugLineNum = 184;BA.debugLine="c2.Position = i"; parent._c2.setPosition(_i); -RDebugUtils.currentLine=28508209; - //BA.debugLineNum = 28508209;BA.debugLine="If IsNumber(c2.GetString(\"CAT_CL_LONG\")) Then"; + //BA.debugLineNum = 186;BA.debugLine="If IsNumber(c2.GetString(\"CAT_CL_LONG\")) Then"; if (true) break; case 36: @@ -1098,26 +1121,19 @@ this.state = 38; case 38: //C this.state = 39; -RDebugUtils.currentLine=28508210; - //BA.debugLineNum = 28508210;BA.debugLine="LongitudRU = c2.GetString(\"CAT_CL_LONG\")"; + //BA.debugLineNum = 187;BA.debugLine="LongitudRU = c2.GetString(\"CAT_CL_LONG\")"; parent._longitudru = (double)(Double.parseDouble(parent._c2.GetString("CAT_CL_LONG"))); -RDebugUtils.currentLine=28508211; - //BA.debugLineNum = 28508211;BA.debugLine="LatitudRu = c2.GetString(\"CAT_CL_LAT\")"; + //BA.debugLineNum = 188;BA.debugLine="LatitudRu = c2.GetString(\"CAT_CL_LAT\")"; parent._latitudru = (double)(Double.parseDouble(parent._c2.GetString("CAT_CL_LAT"))); -RDebugUtils.currentLine=28508212; - //BA.debugLineNum = 28508212;BA.debugLine="CODIGO=c2.GetString(\"CAT_CL_CODIGO\")"; + //BA.debugLineNum = 189;BA.debugLine="CODIGO=c2.GetString(\"CAT_CL_CODIGO\")"; parent.mostCurrent._codigo = parent._c2.GetString("CAT_CL_CODIGO"); -RDebugUtils.currentLine=28508213; - //BA.debugLineNum = 28508213;BA.debugLine="Tienda= c2.GetString(\"CAT_CL_NOMBRE\")"; + //BA.debugLineNum = 190;BA.debugLine="Tienda= c2.GetString(\"CAT_CL_NOMBRE\")"; parent.mostCurrent._tienda = parent._c2.GetString("CAT_CL_NOMBRE"); -RDebugUtils.currentLine=28508214; - //BA.debugLineNum = 28508214;BA.debugLine="NumSerie=c2.GetInt(\"CAT_CL_SECUENCIA\")"; + //BA.debugLineNum = 191;BA.debugLine="NumSerie=c2.GetInt(\"CAT_CL_SECUENCIA\")"; parent._numserie = parent._c2.GetInt("CAT_CL_SECUENCIA"); -RDebugUtils.currentLine=28508215; - //BA.debugLineNum = 28508215;BA.debugLine="MARK_VERDE = gmap.AddMarker3(LatitudRu,Longitu"; + //BA.debugLineNum = 192;BA.debugLine="MARK_VERDE = gmap.AddMarker3(LatitudRu,Longitu"; parent.mostCurrent._mark_verde = parent.mostCurrent._gmap.AddMarker3(parent._latitudru,parent._longitudru,parent.mostCurrent._codigo,(android.graphics.Bitmap)(anywheresoftware.b4a.keywords.Common.LoadBitmap(anywheresoftware.b4a.keywords.Common.File.getDirAssets(),"marker-verde-"+BA.NumberToString(parent._numserie)+".png").getObject())); -RDebugUtils.currentLine=28508216; - //BA.debugLineNum = 28508216;BA.debugLine="MARK_VERDE.Snippet = Tienda"; + //BA.debugLineNum = 193;BA.debugLine="MARK_VERDE.Snippet = Tienda"; parent.mostCurrent._mark_verde.setSnippet(parent.mostCurrent._tienda); if (true) break; @@ -1137,8 +1153,7 @@ this.state = 57; case 42: //C this.state = 43; -RDebugUtils.currentLine=28508220; - //BA.debugLineNum = 28508220;BA.debugLine="If verde =1 Or todos = 1 Then"; + //BA.debugLineNum = 197;BA.debugLine="If verde =1 Or todos = 1 Then"; if (true) break; case 43: @@ -1151,17 +1166,13 @@ this.state = 45; case 45: //C this.state = 46; -RDebugUtils.currentLine=28508221; - //BA.debugLineNum = 28508221;BA.debugLine="c2.IsInitialized"; + //BA.debugLineNum = 198;BA.debugLine="c2.IsInitialized"; parent._c2.IsInitialized(); -RDebugUtils.currentLine=28508222; - //BA.debugLineNum = 28508222;BA.debugLine="c2=skmt.ExecQuery(\"select CAT_CL_CODIGO, CAT_CL"; + //BA.debugLineNum = 199;BA.debugLine="c2=skmt.ExecQuery(\"select CAT_CL_CODIGO, CAT_CL"; parent._c2 = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._skmt.ExecQuery("select CAT_CL_CODIGO, CAT_CL_NOMBRE,CAT_CL_LONG,CAT_CL_LAT from kmt_info where gestion = 2 and CAT_CL_LAT is not null and CAT_CL_LONG is not null and CAT_CL_LAT <> 0 and CAT_CL_LONG <> 0"))); -RDebugUtils.currentLine=28508223; - //BA.debugLineNum = 28508223;BA.debugLine="Log($\"============== Resultados = ${c2.RowCount"; -anywheresoftware.b4a.keywords.Common.LogImpl("328508223",("============== Resultados = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(parent._c2.getRowCount()))+""),0); -RDebugUtils.currentLine=28508224; - //BA.debugLineNum = 28508224;BA.debugLine="For i = 0 To c2.RowCount -1"; + //BA.debugLineNum = 200;BA.debugLine="Log($\"============== Resultados = ${c2.RowCount"; +anywheresoftware.b4a.keywords.Common.LogImpl("364815167",("============== Resultados = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(parent._c2.getRowCount()))+""),0); + //BA.debugLineNum = 201;BA.debugLine="For i = 0 To c2.RowCount -1"; if (true) break; case 46: @@ -1188,26 +1199,19 @@ if (true) break; case 48: //C this.state = 86; -RDebugUtils.currentLine=28508225; - //BA.debugLineNum = 28508225;BA.debugLine="c2.Position = i"; + //BA.debugLineNum = 202;BA.debugLine="c2.Position = i"; parent._c2.setPosition(_i); -RDebugUtils.currentLine=28508227; - //BA.debugLineNum = 28508227;BA.debugLine="LongitudRU = c2.GetString(\"CAT_CL_LONG\")"; + //BA.debugLineNum = 204;BA.debugLine="LongitudRU = c2.GetString(\"CAT_CL_LONG\")"; parent._longitudru = (double)(Double.parseDouble(parent._c2.GetString("CAT_CL_LONG"))); -RDebugUtils.currentLine=28508228; - //BA.debugLineNum = 28508228;BA.debugLine="LatitudRu = c2.GetString(\"CAT_CL_LAT\")"; + //BA.debugLineNum = 205;BA.debugLine="LatitudRu = c2.GetString(\"CAT_CL_LAT\")"; parent._latitudru = (double)(Double.parseDouble(parent._c2.GetString("CAT_CL_LAT"))); -RDebugUtils.currentLine=28508229; - //BA.debugLineNum = 28508229;BA.debugLine="CODIGO=c2.GetString(\"CAT_CL_CODIGO\")"; + //BA.debugLineNum = 206;BA.debugLine="CODIGO=c2.GetString(\"CAT_CL_CODIGO\")"; parent.mostCurrent._codigo = parent._c2.GetString("CAT_CL_CODIGO"); -RDebugUtils.currentLine=28508230; - //BA.debugLineNum = 28508230;BA.debugLine="Tienda= c2.GetString(\"CAT_CL_NOMBRE\")"; + //BA.debugLineNum = 207;BA.debugLine="Tienda= c2.GetString(\"CAT_CL_NOMBRE\")"; parent.mostCurrent._tienda = parent._c2.GetString("CAT_CL_NOMBRE"); -RDebugUtils.currentLine=28508231; - //BA.debugLineNum = 28508231;BA.debugLine="MARK_VERDE = gmap.AddMarker2(LatitudRu,Longitu"; + //BA.debugLineNum = 208;BA.debugLine="MARK_VERDE = gmap.AddMarker2(LatitudRu,Longitu"; parent.mostCurrent._mark_verde = parent.mostCurrent._gmap.AddMarker2(parent._latitudru,parent._longitudru,parent.mostCurrent._codigo,parent.mostCurrent._gmap.HUE_GREEN); -RDebugUtils.currentLine=28508232; - //BA.debugLineNum = 28508232;BA.debugLine="MARK_VERDE.Snippet = Tienda"; + //BA.debugLineNum = 209;BA.debugLine="MARK_VERDE.Snippet = Tienda"; parent.mostCurrent._mark_verde.setSnippet(parent.mostCurrent._tienda); if (true) break; if (true) break; @@ -1216,11 +1220,9 @@ case 49: //C this.state = 50; ; -RDebugUtils.currentLine=28508234; - //BA.debugLineNum = 28508234;BA.debugLine="c2 .Close"; + //BA.debugLineNum = 211;BA.debugLine="c2 .Close"; parent._c2.Close(); -RDebugUtils.currentLine=28508235; - //BA.debugLineNum = 28508235;BA.debugLine="If MARK_VERDE.IsInitialized Then LIST_VERDE.Add"; + //BA.debugLineNum = 212;BA.debugLine="If MARK_VERDE.IsInitialized Then LIST_VERDE.Add"; if (true) break; case 50: @@ -1248,8 +1250,7 @@ this.state = 57; ; if (true) break; ; -RDebugUtils.currentLine=28508240; - //BA.debugLineNum = 28508240;BA.debugLine="If rojo =1 Or todos = 1 Then"; + //BA.debugLineNum = 217;BA.debugLine="If rojo =1 Or todos = 1 Then"; case 57: //if @@ -1263,17 +1264,13 @@ this.state = 65; case 59: //C this.state = 60; -RDebugUtils.currentLine=28508241; - //BA.debugLineNum = 28508241;BA.debugLine="c3.IsInitialized"; + //BA.debugLineNum = 218;BA.debugLine="c3.IsInitialized"; parent._c3.IsInitialized(); -RDebugUtils.currentLine=28508242; - //BA.debugLineNum = 28508242;BA.debugLine="c3=skmt.ExecQuery(\"select CAT_CL_CODIGO, CAT_CL_"; + //BA.debugLineNum = 219;BA.debugLine="c3=skmt.ExecQuery(\"select CAT_CL_CODIGO, CAT_CL_"; parent._c3 = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._skmt.ExecQuery("select CAT_CL_CODIGO, CAT_CL_NOMBRE,CAT_CL_LONG,CAT_CL_LAT,CAT_CL_SECUENCIA from kmt_info where gestion = 3 and CAT_CL_LAT is not null and CAT_CL_LONG is not null and CAT_CL_LAT <> 0 and CAT_CL_LONG <> 0"))); -RDebugUtils.currentLine=28508243; - //BA.debugLineNum = 28508243;BA.debugLine="Log($\"============== Resultados = ${c3.RowCount}"; -anywheresoftware.b4a.keywords.Common.LogImpl("328508243",("============== Resultados = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(parent._c3.getRowCount()))+""),0); -RDebugUtils.currentLine=28508244; - //BA.debugLineNum = 28508244;BA.debugLine="For i = 0 To c3.RowCount -1"; + //BA.debugLineNum = 220;BA.debugLine="Log($\"============== Resultados = ${c3.RowCount}"; +anywheresoftware.b4a.keywords.Common.LogImpl("364815187",("============== Resultados = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(parent._c3.getRowCount()))+""),0); + //BA.debugLineNum = 221;BA.debugLine="For i = 0 To c3.RowCount -1"; if (true) break; case 60: @@ -1300,29 +1297,21 @@ if (true) break; case 62: //C this.state = 88; -RDebugUtils.currentLine=28508245; - //BA.debugLineNum = 28508245;BA.debugLine="c3.Position = i"; + //BA.debugLineNum = 222;BA.debugLine="c3.Position = i"; parent._c3.setPosition(_i); -RDebugUtils.currentLine=28508247; - //BA.debugLineNum = 28508247;BA.debugLine="LongitudRU = c3.GetDouble(\"CAT_CL_LONG\")"; + //BA.debugLineNum = 224;BA.debugLine="LongitudRU = c3.GetDouble(\"CAT_CL_LONG\")"; parent._longitudru = parent._c3.GetDouble("CAT_CL_LONG"); -RDebugUtils.currentLine=28508248; - //BA.debugLineNum = 28508248;BA.debugLine="LatitudRu = c3.GetDouble(\"CAT_CL_LAT\")"; + //BA.debugLineNum = 225;BA.debugLine="LatitudRu = c3.GetDouble(\"CAT_CL_LAT\")"; parent._latitudru = parent._c3.GetDouble("CAT_CL_LAT"); -RDebugUtils.currentLine=28508249; - //BA.debugLineNum = 28508249;BA.debugLine="CODIGO=c3.GetString(\"CAT_CL_CODIGO\")"; + //BA.debugLineNum = 226;BA.debugLine="CODIGO=c3.GetString(\"CAT_CL_CODIGO\")"; parent.mostCurrent._codigo = parent._c3.GetString("CAT_CL_CODIGO"); -RDebugUtils.currentLine=28508250; - //BA.debugLineNum = 28508250;BA.debugLine="Tienda= c3.GetString(\"CAT_CL_NOMBRE\")"; + //BA.debugLineNum = 227;BA.debugLine="Tienda= c3.GetString(\"CAT_CL_NOMBRE\")"; parent.mostCurrent._tienda = parent._c3.GetString("CAT_CL_NOMBRE"); -RDebugUtils.currentLine=28508251; - //BA.debugLineNum = 28508251;BA.debugLine="NumSerie=c3.GetInt(\"CAT_CL_SECUENCIA\")"; + //BA.debugLineNum = 228;BA.debugLine="NumSerie=c3.GetInt(\"CAT_CL_SECUENCIA\")"; parent._numserie = parent._c3.GetInt("CAT_CL_SECUENCIA"); -RDebugUtils.currentLine=28508252; - //BA.debugLineNum = 28508252;BA.debugLine="MARK_ROJO = gmap.AddMarker3(LatitudRu,LongitudR"; + //BA.debugLineNum = 229;BA.debugLine="MARK_ROJO = gmap.AddMarker3(LatitudRu,LongitudR"; parent.mostCurrent._mark_rojo = parent.mostCurrent._gmap.AddMarker3(parent._latitudru,parent._longitudru,parent.mostCurrent._codigo,(android.graphics.Bitmap)(anywheresoftware.b4a.keywords.Common.LoadBitmap(anywheresoftware.b4a.keywords.Common.File.getDirAssets(),"marker-rojo-"+BA.NumberToString(parent._numserie)+".png").getObject())); -RDebugUtils.currentLine=28508253; - //BA.debugLineNum = 28508253;BA.debugLine="MARK_ROJO.Snippet = Tienda"; + //BA.debugLineNum = 230;BA.debugLine="MARK_ROJO.Snippet = Tienda"; parent.mostCurrent._mark_rojo.setSnippet(parent.mostCurrent._tienda); if (true) break; if (true) break; @@ -1336,8 +1325,7 @@ this.state = 79; case 65: //C this.state = 66; -RDebugUtils.currentLine=28508256; - //BA.debugLineNum = 28508256;BA.debugLine="If rojo =1 Or todos = 1 Then"; + //BA.debugLineNum = 233;BA.debugLine="If rojo =1 Or todos = 1 Then"; if (true) break; case 66: @@ -1350,17 +1338,13 @@ this.state = 68; case 68: //C this.state = 69; -RDebugUtils.currentLine=28508257; - //BA.debugLineNum = 28508257;BA.debugLine="c3.IsInitialized"; + //BA.debugLineNum = 234;BA.debugLine="c3.IsInitialized"; parent._c3.IsInitialized(); -RDebugUtils.currentLine=28508258; - //BA.debugLineNum = 28508258;BA.debugLine="c3=skmt.ExecQuery(\"select CAT_CL_CODIGO, CAT_CL"; + //BA.debugLineNum = 235;BA.debugLine="c3=skmt.ExecQuery(\"select CAT_CL_CODIGO, CAT_CL"; parent._c3 = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(parent._skmt.ExecQuery("select CAT_CL_CODIGO, CAT_CL_NOMBRE,CAT_CL_LONG,CAT_CL_LAT from kmt_info where gestion = 3 and CAT_CL_LAT is not null and CAT_CL_LONG is not null and CAT_CL_LAT <> 0 and CAT_CL_LONG <> 0"))); -RDebugUtils.currentLine=28508259; - //BA.debugLineNum = 28508259;BA.debugLine="Log($\"============== Resultados = ${c3.RowCount"; -anywheresoftware.b4a.keywords.Common.LogImpl("328508259",("============== Resultados = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(parent._c3.getRowCount()))+""),0); -RDebugUtils.currentLine=28508260; - //BA.debugLineNum = 28508260;BA.debugLine="For i = 0 To c3.RowCount -1"; + //BA.debugLineNum = 236;BA.debugLine="Log($\"============== Resultados = ${c3.RowCount"; +anywheresoftware.b4a.keywords.Common.LogImpl("364815203",("============== Resultados = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(parent._c3.getRowCount()))+""),0); + //BA.debugLineNum = 237;BA.debugLine="For i = 0 To c3.RowCount -1"; if (true) break; case 69: @@ -1387,32 +1371,24 @@ if (true) break; case 71: //C this.state = 90; -RDebugUtils.currentLine=28508261; - //BA.debugLineNum = 28508261;BA.debugLine="c3.Position = i"; + //BA.debugLineNum = 238;BA.debugLine="c3.Position = i"; parent._c3.setPosition(_i); -RDebugUtils.currentLine=28508263; - //BA.debugLineNum = 28508263;BA.debugLine="LongitudRU = c3.GetDouble(\"CAT_CL_LONG\")"; + //BA.debugLineNum = 240;BA.debugLine="LongitudRU = c3.GetDouble(\"CAT_CL_LONG\")"; parent._longitudru = parent._c3.GetDouble("CAT_CL_LONG"); -RDebugUtils.currentLine=28508264; - //BA.debugLineNum = 28508264;BA.debugLine="LatitudRu = c3.GetDouble(\"CAT_CL_LAT\")"; + //BA.debugLineNum = 241;BA.debugLine="LatitudRu = c3.GetDouble(\"CAT_CL_LAT\")"; parent._latitudru = parent._c3.GetDouble("CAT_CL_LAT"); -RDebugUtils.currentLine=28508265; - //BA.debugLineNum = 28508265;BA.debugLine="CODIGO=c3.GetString(\"CAT_CL_CODIGO\")"; + //BA.debugLineNum = 242;BA.debugLine="CODIGO=c3.GetString(\"CAT_CL_CODIGO\")"; parent.mostCurrent._codigo = parent._c3.GetString("CAT_CL_CODIGO"); -RDebugUtils.currentLine=28508266; - //BA.debugLineNum = 28508266;BA.debugLine="Tienda= c3.GetString(\"CAT_CL_NOMBRE\")"; + //BA.debugLineNum = 243;BA.debugLine="Tienda= c3.GetString(\"CAT_CL_NOMBRE\")"; parent.mostCurrent._tienda = parent._c3.GetString("CAT_CL_NOMBRE"); -RDebugUtils.currentLine=28508267; - //BA.debugLineNum = 28508267;BA.debugLine="MARK_ROJO = gmap.AddMarker2(LatitudRu,Longitud"; + //BA.debugLineNum = 244;BA.debugLine="MARK_ROJO = gmap.AddMarker2(LatitudRu,Longitud"; parent.mostCurrent._mark_rojo = parent.mostCurrent._gmap.AddMarker2(parent._latitudru,parent._longitudru,parent.mostCurrent._tienda,parent.mostCurrent._gmap.HUE_RED); -RDebugUtils.currentLine=28508268; - //BA.debugLineNum = 28508268;BA.debugLine="MARK_ROJO.Snippet = Tienda"; + //BA.debugLineNum = 245;BA.debugLine="MARK_ROJO.Snippet = Tienda"; parent.mostCurrent._mark_rojo.setSnippet(parent.mostCurrent._tienda); if (true) break; if (true) break; ; -RDebugUtils.currentLine=28508270; - //BA.debugLineNum = 28508270;BA.debugLine="If MARK_ROJO.IsInitialized Then LIST_ROJO.Add(M"; + //BA.debugLineNum = 247;BA.debugLine="If MARK_ROJO.IsInitialized Then LIST_ROJO.Add(M"; case 72: //if @@ -1431,8 +1407,7 @@ case 77: //C this.state = 78; ; -RDebugUtils.currentLine=28508271; - //BA.debugLineNum = 28508271;BA.debugLine="c3.Close"; + //BA.debugLineNum = 248;BA.debugLine="c3.Close"; parent._c3.Close(); if (true) break; @@ -1446,149 +1421,59 @@ case 79: //C this.state = -1; ; -RDebugUtils.currentLine=28508280; - //BA.debugLineNum = 28508280;BA.debugLine="Dim aa As CameraPosition"; + //BA.debugLineNum = 257;BA.debugLine="Dim aa As CameraPosition"; _aa = new anywheresoftware.b4a.objects.MapFragmentWrapper.CameraPositionWrapper(); -RDebugUtils.currentLine=28508281; - //BA.debugLineNum = 28508281;BA.debugLine="aa.Initialize(LatitudRu,LongitudRU,15)''' RECOMEN"; + //BA.debugLineNum = 258;BA.debugLine="aa.Initialize(LatitudRu,LongitudRU,15)''' RECOMEN"; _aa.Initialize(parent._latitudru,parent._longitudru,(float) (15)); -RDebugUtils.currentLine=28508282; - //BA.debugLineNum = 28508282;BA.debugLine="gmap.AnimateCamera(aa)"; + //BA.debugLineNum = 259;BA.debugLine="gmap.AnimateCamera(aa)"; parent.mostCurrent._gmap.AnimateCamera((com.google.android.gms.maps.model.CameraPosition)(_aa.getObject())); -RDebugUtils.currentLine=28508285; - //BA.debugLineNum = 28508285;BA.debugLine="Dim OnInfoWindowClickListener1 As OnInfoWindowCli"; + //BA.debugLineNum = 262;BA.debugLine="Dim OnInfoWindowClickListener1 As OnInfoWindowCli"; parent.mostCurrent._oninfowindowclicklistener1 = new uk.co.martinpearman.b4a.com.google.android.gms.maps.googlemap.OnInfoWindowClickListener(); -RDebugUtils.currentLine=28508286; - //BA.debugLineNum = 28508286;BA.debugLine="OnInfoWindowClickListener1.Initialize(\"OnInfoWind"; + //BA.debugLineNum = 263;BA.debugLine="OnInfoWindowClickListener1.Initialize(\"OnInfoWind"; parent.mostCurrent._oninfowindowclicklistener1.Initialize(mostCurrent.activityBA,"OnInfoWindowClickListener1"); -RDebugUtils.currentLine=28508287; - //BA.debugLineNum = 28508287;BA.debugLine="GoogleMapEXTRA.SetOnInfoWindowClickListener(gmap,"; + //BA.debugLineNum = 264;BA.debugLine="GoogleMapEXTRA.SetOnInfoWindowClickListener(gmap,"; parent.mostCurrent._googlemapextra.SetOnInfoWindowClickListener((com.google.android.gms.maps.GoogleMap)(parent.mostCurrent._gmap.getObject()),(com.google.android.gms.maps.GoogleMap.OnInfoWindowClickListener)(parent.mostCurrent._oninfowindowclicklistener1.getObject())); -RDebugUtils.currentLine=28508289; - //BA.debugLineNum = 28508289;BA.debugLine="End Sub"; + //BA.debugLineNum = 266;BA.debugLine="End Sub"; if (true) break; } } } } -public static String _b_rojo_click() throws Exception{ -RDebugUtils.currentModule="mapa_rutas"; -if (Debug.shouldDelegate(mostCurrent.activityBA, "b_rojo_click", false)) - {return ((String) Debug.delegate(mostCurrent.activityBA, "b_rojo_click", null));} -RDebugUtils.currentLine=28901376; - //BA.debugLineNum = 28901376;BA.debugLine="Sub B_ROJO_Click"; -RDebugUtils.currentLine=28901377; - //BA.debugLineNum = 28901377;BA.debugLine="rojo = 1"; -mostCurrent._rojo = BA.NumberToString(1); -RDebugUtils.currentLine=28901378; - //BA.debugLineNum = 28901378;BA.debugLine="verde = 0"; -mostCurrent._verde = BA.NumberToString(0); -RDebugUtils.currentLine=28901379; - //BA.debugLineNum = 28901379;BA.debugLine="azul = 0"; -mostCurrent._azul = BA.NumberToString(0); -RDebugUtils.currentLine=28901380; - //BA.debugLineNum = 28901380;BA.debugLine="todos = 0"; -mostCurrent._todos = BA.NumberToString(0); -RDebugUtils.currentLine=28901381; - //BA.debugLineNum = 28901381;BA.debugLine="gmap.Clear"; -mostCurrent._gmap.Clear(); -RDebugUtils.currentLine=28901383; - //BA.debugLineNum = 28901383;BA.debugLine="MapFragment1_Ready"; -_mapfragment1_ready(); -RDebugUtils.currentLine=28901385; - //BA.debugLineNum = 28901385;BA.debugLine="End Sub"; -return ""; -} -public static String _b_todos_click() throws Exception{ -RDebugUtils.currentModule="mapa_rutas"; -if (Debug.shouldDelegate(mostCurrent.activityBA, "b_todos_click", false)) - {return ((String) Debug.delegate(mostCurrent.activityBA, "b_todos_click", null));} -RDebugUtils.currentLine=28770304; - //BA.debugLineNum = 28770304;BA.debugLine="Sub B_TODOS_Click"; -RDebugUtils.currentLine=28770305; - //BA.debugLineNum = 28770305;BA.debugLine="todos =1"; -mostCurrent._todos = BA.NumberToString(1); -RDebugUtils.currentLine=28770306; - //BA.debugLineNum = 28770306;BA.debugLine="verde = 0"; -mostCurrent._verde = BA.NumberToString(0); -RDebugUtils.currentLine=28770307; - //BA.debugLineNum = 28770307;BA.debugLine="azul = 0"; -mostCurrent._azul = BA.NumberToString(0); -RDebugUtils.currentLine=28770308; - //BA.debugLineNum = 28770308;BA.debugLine="rojo = 0"; -mostCurrent._rojo = BA.NumberToString(0); -RDebugUtils.currentLine=28770310; - //BA.debugLineNum = 28770310;BA.debugLine="MapFragment1_Ready"; -_mapfragment1_ready(); -RDebugUtils.currentLine=28770312; - //BA.debugLineNum = 28770312;BA.debugLine="End Sub"; -return ""; -} -public static String _b_verde_click() throws Exception{ -RDebugUtils.currentModule="mapa_rutas"; -if (Debug.shouldDelegate(mostCurrent.activityBA, "b_verde_click", false)) - {return ((String) Debug.delegate(mostCurrent.activityBA, "b_verde_click", null));} -RDebugUtils.currentLine=28835840; - //BA.debugLineNum = 28835840;BA.debugLine="Sub B_VERDE_Click"; -RDebugUtils.currentLine=28835841; - //BA.debugLineNum = 28835841;BA.debugLine="verde = 1"; -mostCurrent._verde = BA.NumberToString(1); -RDebugUtils.currentLine=28835842; - //BA.debugLineNum = 28835842;BA.debugLine="azul = 0"; -mostCurrent._azul = BA.NumberToString(0); -RDebugUtils.currentLine=28835843; - //BA.debugLineNum = 28835843;BA.debugLine="rojo = 0"; -mostCurrent._rojo = BA.NumberToString(0); -RDebugUtils.currentLine=28835844; - //BA.debugLineNum = 28835844;BA.debugLine="todos = 0"; -mostCurrent._todos = BA.NumberToString(0); -RDebugUtils.currentLine=28835845; - //BA.debugLineNum = 28835845;BA.debugLine="gmap.Clear"; -mostCurrent._gmap.Clear(); -RDebugUtils.currentLine=28835846; - //BA.debugLineNum = 28835846;BA.debugLine="MapFragment1_Ready"; -_mapfragment1_ready(); -RDebugUtils.currentLine=28835848; - //BA.debugLineNum = 28835848;BA.debugLine="End Sub"; -return ""; -} -public static String _gps_locationchanged(anywheresoftware.b4a.gps.LocationWrapper _parametro) throws Exception{ -RDebugUtils.currentModule="mapa_rutas"; -if (Debug.shouldDelegate(mostCurrent.activityBA, "gps_locationchanged", false)) - {return ((String) Debug.delegate(mostCurrent.activityBA, "gps_locationchanged", new Object[] {_parametro}));} -RDebugUtils.currentLine=28639232; - //BA.debugLineNum = 28639232;BA.debugLine="Sub GPS_LocationChanged (Parametro As Location)"; -RDebugUtils.currentLine=28639233; - //BA.debugLineNum = 28639233;BA.debugLine="MARK_CEDIS.IsInitialized"; -mostCurrent._mark_cedis.IsInitialized(); -RDebugUtils.currentLine=28639251; - //BA.debugLineNum = 28639251;BA.debugLine="End Sub"; -return ""; -} public static String _oninfowindowclicklistener1_click(anywheresoftware.b4a.objects.MapFragmentWrapper.MarkerWrapper _marker1) throws Exception{ -RDebugUtils.currentModule="mapa_rutas"; -if (Debug.shouldDelegate(mostCurrent.activityBA, "oninfowindowclicklistener1_click", false)) - {return ((String) Debug.delegate(mostCurrent.activityBA, "oninfowindowclicklistener1_click", new Object[] {_marker1}));} -RDebugUtils.currentLine=28573696; - //BA.debugLineNum = 28573696;BA.debugLine="Sub OnInfoWindowClickListener1_click(Marker1 As Ma"; -RDebugUtils.currentLine=28573697; - //BA.debugLineNum = 28573697;BA.debugLine="skmt.ExecNonQuery(\"delete from CUENTAA\")"; + //BA.debugLineNum = 271;BA.debugLine="Sub OnInfoWindowClickListener1_click(Marker1 As Ma"; + //BA.debugLineNum = 272;BA.debugLine="skmt.ExecNonQuery(\"delete from CUENTAA\")"; _skmt.ExecNonQuery("delete from CUENTAA"); -RDebugUtils.currentLine=28573698; - //BA.debugLineNum = 28573698;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO CUENTAA VALUES (?"; + //BA.debugLineNum = 273;BA.debugLine="skmt.ExecNonQuery2(\"INSERT INTO CUENTAA VALUES (?"; _skmt.ExecNonQuery2("INSERT INTO CUENTAA VALUES (?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_marker1.getTitle())})); -RDebugUtils.currentLine=28573699; - //BA.debugLineNum = 28573699;BA.debugLine="Subs.guardaClienteHoraInicio(Marker1.Title)"; + //BA.debugLineNum = 274;BA.debugLine="Subs.guardaClienteHoraInicio(Marker1.Title)"; mostCurrent._subs._guardaclientehorainicio /*String*/ (mostCurrent.activityBA,_marker1.getTitle()); -RDebugUtils.currentLine=28573700; - //BA.debugLineNum = 28573700;BA.debugLine="Activity.Finish"; + //BA.debugLineNum = 275;BA.debugLine="Activity.Finish"; mostCurrent._activity.Finish(); -RDebugUtils.currentLine=28573701; - //BA.debugLineNum = 28573701;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; + //BA.debugLineNum = 276;BA.debugLine="B4XPages.ShowPage(\"Cliente\")"; mostCurrent._b4xpages._showpage /*String*/ (mostCurrent.activityBA,"Cliente"); -RDebugUtils.currentLine=28573702; - //BA.debugLineNum = 28573702;BA.debugLine="End Sub"; + //BA.debugLineNum = 277;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +public static String _process_globals() throws Exception{ + //BA.debugLineNum = 7;BA.debugLine="Sub Process_Globals"; + //BA.debugLineNum = 8;BA.debugLine="Dim GPS As GPS"; +_gps = new anywheresoftware.b4a.gps.GPS(); + //BA.debugLineNum = 9;BA.debugLine="Dim rp As RuntimePermissions"; +_rp = new anywheresoftware.b4a.objects.RuntimePermissions(); + //BA.debugLineNum = 10;BA.debugLine="Dim ruta As String"; +_ruta = ""; + //BA.debugLineNum = 11;BA.debugLine="Dim skmt As SQL"; +_skmt = new anywheresoftware.b4a.sql.SQL(); + //BA.debugLineNum = 12;BA.debugLine="Dim c As Cursor"; +_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); + //BA.debugLineNum = 13;BA.debugLine="Dim c2 As Cursor"; +_c2 = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); + //BA.debugLineNum = 14;BA.debugLine="Dim c22 As Cursor"; +_c22 = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); + //BA.debugLineNum = 15;BA.debugLine="Dim c3 As Cursor"; +_c3 = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); + //BA.debugLineNum = 16;BA.debugLine="End Sub"; +return ""; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/newinst2.java b/B4A/Objects/src/keymon/lat/medicomed/newinst2.java index 49e3917..2be5f7d 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/newinst2.java +++ b/B4A/Objects/src/keymon/lat/medicomed/newinst2.java @@ -14,7 +14,7 @@ public class newinst2 extends android.app.Service{ android.content.Intent in = new android.content.Intent(context, newinst2.class); if (intent != null) in.putExtra("b4a_internal_intent", intent); - ServiceHelper.StarterHelper.startServiceFromReceiver (context, in, false, anywheresoftware.b4a.ShellBA.class); + ServiceHelper.StarterHelper.startServiceFromReceiver (context, in, false, BA.class); } } @@ -29,7 +29,7 @@ public class newinst2 extends android.app.Service{ super.onCreate(); mostCurrent = this; if (processBA == null) { - processBA = new anywheresoftware.b4a.ShellBA(this, null, null, "keymon.lat.medicomed", "keymon.lat.medicomed.newinst2"); + processBA = new BA(this, null, null, "keymon.lat.medicomed", "keymon.lat.medicomed.newinst2"); if (BA.isShellModeRuntimeCheck(processBA)) { processBA.raiseEvent2(null, true, "SHELL", false); } @@ -127,8 +127,7 @@ public class newinst2 extends android.app.Service{ @Override public android.os.IBinder onBind(android.content.Intent intent) { return null; - } -public anywheresoftware.b4a.keywords.Common __c = null; + }public anywheresoftware.b4a.keywords.Common __c = null; public static String _pkg = ""; public static boolean _svcverbose = false; public static int _logcolor1 = 0; @@ -144,117 +143,84 @@ public keymon.lat.medicomed.b4xcollections _b4xcollections = null; public keymon.lat.medicomed.httputils2service _httputils2service = null; public keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; public static String _getpackagename() throws Exception{ -RDebugUtils.currentModule="newinst2"; -if (Debug.shouldDelegate(processBA, "getpackagename", false)) - {return ((String) Debug.delegate(processBA, "getpackagename", null));} anywheresoftware.b4a.agraham.reflection.Reflection _r = null; -RDebugUtils.currentLine=32833536; - //BA.debugLineNum = 32833536;BA.debugLine="Sub GetPackageName As String"; -RDebugUtils.currentLine=32833537; - //BA.debugLineNum = 32833537;BA.debugLine="Dim r As Reflector"; + //BA.debugLineNum = 38;BA.debugLine="Sub GetPackageName As String"; + //BA.debugLineNum = 39;BA.debugLine="Dim r As Reflector"; _r = new anywheresoftware.b4a.agraham.reflection.Reflection(); -RDebugUtils.currentLine=32833538; - //BA.debugLineNum = 32833538;BA.debugLine="Return r.GetStaticField(\"anywheresoftware.b4a.BA\""; + //BA.debugLineNum = 40;BA.debugLine="Return r.GetStaticField(\"anywheresoftware.b4a.BA\""; if (true) return BA.ObjectToString(_r.GetStaticField("anywheresoftware.b4a.BA","packageName")); -RDebugUtils.currentLine=32833539; - //BA.debugLineNum = 32833539;BA.debugLine="End Sub"; + //BA.debugLineNum = 41;BA.debugLine="End Sub"; return ""; } public static String _myappreload() throws Exception{ -RDebugUtils.currentModule="newinst2"; -if (Debug.shouldDelegate(processBA, "myappreload", false)) - {return ((String) Debug.delegate(processBA, "myappreload", null));} -RDebugUtils.currentLine=32899072; - //BA.debugLineNum = 32899072;BA.debugLine="Sub MyAppReload"; -RDebugUtils.currentLine=32899073; - //BA.debugLineNum = 32899073;BA.debugLine="If svcVerbose Then Log(\"-- AppUpdating.NewInst2:"; + //BA.debugLineNum = 43;BA.debugLine="Sub MyAppReload"; + //BA.debugLineNum = 44;BA.debugLine="If svcVerbose Then Log(\"-- AppUpdating.NewInst2:"; if (_svcverbose) { -anywheresoftware.b4a.keywords.Common.LogImpl("332899073","-- AppUpdating.NewInst2: processing MyAppReload",0);}; -RDebugUtils.currentLine=32899074; - //BA.debugLineNum = 32899074;BA.debugLine="If IsPaused(\"main\") Then"; +anywheresoftware.b4a.keywords.Common.LogImpl("34587521","-- AppUpdating.NewInst2: processing MyAppReload",0);}; + //BA.debugLineNum = 45;BA.debugLine="If IsPaused(\"main\") Then"; if (anywheresoftware.b4a.keywords.Common.IsPaused(processBA,(Object)("main"))) { -RDebugUtils.currentLine=32899075; - //BA.debugLineNum = 32899075;BA.debugLine="StartActivity(\"main\")"; + //BA.debugLineNum = 46;BA.debugLine="StartActivity(\"main\")"; anywheresoftware.b4a.keywords.Common.StartActivity(processBA,(Object)("main")); }; -RDebugUtils.currentLine=32899079; - //BA.debugLineNum = 32899079;BA.debugLine="End Sub"; + //BA.debugLineNum = 50;BA.debugLine="End Sub"; +return ""; +} +public static String _process_globals() throws Exception{ + //BA.debugLineNum = 5;BA.debugLine="Sub Process_Globals"; + //BA.debugLineNum = 8;BA.debugLine="Dim pkg As String 'app's package name"; +_pkg = ""; + //BA.debugLineNum = 9;BA.debugLine="Dim svcVerbose As Boolean 'True = shows start"; +_svcverbose = false; + //BA.debugLineNum = 10;BA.debugLine="Private LogColor1 As Int = 0xFFFF8C00 'color for"; +_logcolor1 = ((int)0xffff8c00); + //BA.debugLineNum = 11;BA.debugLine="End Sub"; return ""; } public static String _service_create() throws Exception{ -RDebugUtils.currentModule="newinst2"; -if (Debug.shouldDelegate(processBA, "service_create", false)) - {return ((String) Debug.delegate(processBA, "service_create", null));} -RDebugUtils.currentLine=32636928; - //BA.debugLineNum = 32636928;BA.debugLine="Sub Service_Create"; -RDebugUtils.currentLine=32636929; - //BA.debugLineNum = 32636929;BA.debugLine="LogColor(\"---- AppUpdating.newinst2: service crea"; -anywheresoftware.b4a.keywords.Common.LogImpl("332636929","---- AppUpdating.newinst2: service created",_logcolor1); -RDebugUtils.currentLine=32636930; - //BA.debugLineNum = 32636930;BA.debugLine="pkg = \"\""; + //BA.debugLineNum = 13;BA.debugLine="Sub Service_Create"; + //BA.debugLineNum = 14;BA.debugLine="LogColor(\"---- AppUpdating.newinst2: service crea"; +anywheresoftware.b4a.keywords.Common.LogImpl("34325377","---- AppUpdating.newinst2: service created",_logcolor1); + //BA.debugLineNum = 15;BA.debugLine="pkg = \"\""; _pkg = ""; -RDebugUtils.currentLine=32636931; - //BA.debugLineNum = 32636931;BA.debugLine="svcVerbose = False"; + //BA.debugLineNum = 16;BA.debugLine="svcVerbose = False"; _svcverbose = anywheresoftware.b4a.keywords.Common.False; -RDebugUtils.currentLine=32636932; - //BA.debugLineNum = 32636932;BA.debugLine="End Sub"; + //BA.debugLineNum = 17;BA.debugLine="End Sub"; return ""; } public static String _service_destroy() throws Exception{ -RDebugUtils.currentModule="newinst2"; -if (Debug.shouldDelegate(processBA, "service_destroy", false)) - {return ((String) Debug.delegate(processBA, "service_destroy", null));} -RDebugUtils.currentLine=32768000; - //BA.debugLineNum = 32768000;BA.debugLine="Sub Service_Destroy"; -RDebugUtils.currentLine=32768001; - //BA.debugLineNum = 32768001;BA.debugLine="End Sub"; + //BA.debugLineNum = 35;BA.debugLine="Sub Service_Destroy"; + //BA.debugLineNum = 36;BA.debugLine="End Sub"; return ""; } public static String _service_start(anywheresoftware.b4a.objects.IntentWrapper _startingintent) throws Exception{ -RDebugUtils.currentModule="newinst2"; -if (Debug.shouldDelegate(processBA, "service_start", false)) - {return ((String) Debug.delegate(processBA, "service_start", new Object[] {_startingintent}));} -RDebugUtils.currentLine=32702464; - //BA.debugLineNum = 32702464;BA.debugLine="Sub Service_Start (StartingIntent As Intent)"; -RDebugUtils.currentLine=32702465; - //BA.debugLineNum = 32702465;BA.debugLine="LogColor(\"---- AppUpdating.newinst2: service_star"; -anywheresoftware.b4a.keywords.Common.LogImpl("332702465","---- AppUpdating.newinst2: service_started",_logcolor1); -RDebugUtils.currentLine=32702466; - //BA.debugLineNum = 32702466;BA.debugLine="If svcVerbose Then"; + //BA.debugLineNum = 19;BA.debugLine="Sub Service_Start (StartingIntent As Intent)"; + //BA.debugLineNum = 20;BA.debugLine="LogColor(\"---- AppUpdating.newinst2: service_star"; +anywheresoftware.b4a.keywords.Common.LogImpl("34390913","---- AppUpdating.newinst2: service_started",_logcolor1); + //BA.debugLineNum = 21;BA.debugLine="If svcVerbose Then"; if (_svcverbose) { -RDebugUtils.currentLine=32702467; - //BA.debugLineNum = 32702467;BA.debugLine="Log($\"${TAB}intent: ${StartingIntent}\"$)"; -anywheresoftware.b4a.keywords.Common.LogImpl("332702467",(""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(anywheresoftware.b4a.keywords.Common.TAB))+"intent: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_startingintent.getObject()))+""),0); -RDebugUtils.currentLine=32702468; - //BA.debugLineNum = 32702468;BA.debugLine="Log($\"${TAB}action: ${StartingIntent.Action}\"$)"; -anywheresoftware.b4a.keywords.Common.LogImpl("332702468",(""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(anywheresoftware.b4a.keywords.Common.TAB))+"action: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_startingintent.getAction()))+""),0); -RDebugUtils.currentLine=32702469; - //BA.debugLineNum = 32702469;BA.debugLine="Log($\"${TAB}extra: ${StartingIntent.ExtrasToStri"; -anywheresoftware.b4a.keywords.Common.LogImpl("332702469",(""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(anywheresoftware.b4a.keywords.Common.TAB))+"extra: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_startingintent.ExtrasToString()))+""),0); -RDebugUtils.currentLine=32702470; - //BA.debugLineNum = 32702470;BA.debugLine="Log($\"${TAB}data: ${StartingIntent.GetData}\"$)"; -anywheresoftware.b4a.keywords.Common.LogImpl("332702470",(""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(anywheresoftware.b4a.keywords.Common.TAB))+"data: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_startingintent.GetData()))+""),0); + //BA.debugLineNum = 22;BA.debugLine="Log($\"${TAB}intent: ${StartingIntent}\"$)"; +anywheresoftware.b4a.keywords.Common.LogImpl("34390915",(""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(anywheresoftware.b4a.keywords.Common.TAB))+"intent: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_startingintent.getObject()))+""),0); + //BA.debugLineNum = 23;BA.debugLine="Log($\"${TAB}action: ${StartingIntent.Action}\"$)"; +anywheresoftware.b4a.keywords.Common.LogImpl("34390916",(""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(anywheresoftware.b4a.keywords.Common.TAB))+"action: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_startingintent.getAction()))+""),0); + //BA.debugLineNum = 24;BA.debugLine="Log($\"${TAB}extra: ${StartingIntent.ExtrasToStri"; +anywheresoftware.b4a.keywords.Common.LogImpl("34390917",(""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(anywheresoftware.b4a.keywords.Common.TAB))+"extra: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_startingintent.ExtrasToString()))+""),0); + //BA.debugLineNum = 25;BA.debugLine="Log($\"${TAB}data: ${StartingIntent.GetData}\"$)"; +anywheresoftware.b4a.keywords.Common.LogImpl("34390918",(""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(anywheresoftware.b4a.keywords.Common.TAB))+"data: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_startingintent.GetData()))+""),0); }; -RDebugUtils.currentLine=32702472; - //BA.debugLineNum = 32702472;BA.debugLine="If StartingIntent.Action = \"android.intent.action"; + //BA.debugLineNum = 27;BA.debugLine="If StartingIntent.Action = \"android.intent.action"; if ((_startingintent.getAction()).equals("android.intent.action.MY_PACKAGE_REPLACED")) { -RDebugUtils.currentLine=32702473; - //BA.debugLineNum = 32702473;BA.debugLine="If svcVerbose Then Log($\"${TAB}Intent MY_PACKAGE"; + //BA.debugLineNum = 28;BA.debugLine="If svcVerbose Then Log($\"${TAB}Intent MY_PACKAGE"; if (_svcverbose) { -anywheresoftware.b4a.keywords.Common.LogImpl("332702473",(""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(anywheresoftware.b4a.keywords.Common.TAB))+"Intent MY_PACKAGE_REPLACED received!"),0);}; -RDebugUtils.currentLine=32702474; - //BA.debugLineNum = 32702474;BA.debugLine="pkg = GetPackageName"; +anywheresoftware.b4a.keywords.Common.LogImpl("34390921",(""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(anywheresoftware.b4a.keywords.Common.TAB))+"Intent MY_PACKAGE_REPLACED received!"),0);}; + //BA.debugLineNum = 29;BA.debugLine="pkg = GetPackageName"; _pkg = _getpackagename(); -RDebugUtils.currentLine=32702475; - //BA.debugLineNum = 32702475;BA.debugLine="If svcVerbose Then Log($\"${TAB}package: ${pkg}\"$"; + //BA.debugLineNum = 30;BA.debugLine="If svcVerbose Then Log($\"${TAB}package: ${pkg}\"$"; if (_svcverbose) { -anywheresoftware.b4a.keywords.Common.LogImpl("332702475",(""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(anywheresoftware.b4a.keywords.Common.TAB))+"package: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pkg))+""),0);}; -RDebugUtils.currentLine=32702476; - //BA.debugLineNum = 32702476;BA.debugLine="MyAppReload"; +anywheresoftware.b4a.keywords.Common.LogImpl("34390923",(""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(anywheresoftware.b4a.keywords.Common.TAB))+"package: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pkg))+""),0);}; + //BA.debugLineNum = 31;BA.debugLine="MyAppReload"; _myappreload(); }; -RDebugUtils.currentLine=32702478; - //BA.debugLineNum = 32702478;BA.debugLine="End Sub"; + //BA.debugLineNum = 33;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/preoptimizedclv.java b/B4A/Objects/src/keymon/lat/medicomed/preoptimizedclv.java index 4ec7d14..b8ca4b1 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/preoptimizedclv.java +++ b/B4A/Objects/src/keymon/lat/medicomed/preoptimizedclv.java @@ -10,7 +10,7 @@ public class preoptimizedclv extends B4AClass.ImplB4AClass implements BA.SubDele private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.preoptimizedclv"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.preoptimizedclv"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class preoptimizedclv extends B4AClass.ImplB4AClass implements BA.SubDele 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.keywords.Common __c = null; public b4a.example3.customlistview _mclv = null; public anywheresoftware.b4a.objects.collections.List _items = null; public anywheresoftware.b4a.objects.collections.List _panelscache = null; @@ -63,187 +56,39 @@ 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 _initialize(keymon.lat.medicomed.preoptimizedclv __ref,anywheresoftware.b4a.BA _ba,Object _callback,String _eventname,b4a.example3.customlistview _clv) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="preoptimizedclv"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_callback,_eventname,_clv}));} -RDebugUtils.currentLine=65404928; - //BA.debugLineNum = 65404928;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -RDebugUtils.currentLine=65404929; - //BA.debugLineNum = 65404929;BA.debugLine="mCLV = CLV"; -__ref._mclv /*b4a.example3.customlistview*/ = _clv; -RDebugUtils.currentLine=65404930; - //BA.debugLineNum = 65404930;BA.debugLine="jclv = mCLV 'ignore"; -__ref._jclv /*anywheresoftware.b4j.object.JavaObject*/ = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(__ref._mclv /*b4a.example3.customlistview*/ )); -RDebugUtils.currentLine=65404935; - //BA.debugLineNum = 65404935;BA.debugLine="items = jclv.GetFieldJO(\"_items\").RunMethod(\"getO"; -__ref._items /*anywheresoftware.b4a.objects.collections.List*/ = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(__ref._jclv /*anywheresoftware.b4j.object.JavaObject*/ .GetFieldJO("_items").RunMethod("getObject",(Object[])(__c.Null)))); -RDebugUtils.currentLine=65404936; - //BA.debugLineNum = 65404936;BA.debugLine="horizontal = jclv.GetField(\"_horizontal\")"; -__ref._horizontal /*boolean*/ = BA.ObjectToBoolean(__ref._jclv /*anywheresoftware.b4j.object.JavaObject*/ .GetField("_horizontal")); -RDebugUtils.currentLine=65404938; - //BA.debugLineNum = 65404938;BA.debugLine="PanelsCache.Initialize"; -__ref._panelscache /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=65404939; - //BA.debugLineNum = 65404939;BA.debugLine="StubPanel = CreatePanel"; -__ref._stubpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._createpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ (null); -RDebugUtils.currentLine=65404940; - //BA.debugLineNum = 65404940;BA.debugLine="StubPanel.AddView(xui.CreatePanel(\"\"), 0, 0, 10di"; -__ref._stubpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,"").getObject()),(int) (0),(int) (0),__c.DipToCurrent((int) (10)),__c.DipToCurrent((int) (10))); -RDebugUtils.currentLine=65404941; - //BA.debugLineNum = 65404941;BA.debugLine="AssignedItems = Array As B4XSet(B4XCollections.Cr"; -__ref._assigneditems /*keymon.lat.medicomed.b4xset[]*/ = new keymon.lat.medicomed.b4xset[]{_b4xcollections._createset /*keymon.lat.medicomed.b4xset*/ (ba),_b4xcollections._createset /*keymon.lat.medicomed.b4xset*/ (ba)}; -RDebugUtils.currentLine=65404942; - //BA.debugLineNum = 65404942;BA.debugLine="ListOfItemsThatShouldBeUpdated.Initialize"; -__ref._listofitemsthatshouldbeupdated /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=65404943; - //BA.debugLineNum = 65404943;BA.debugLine="mCLV.AsView.LoadLayout(\"PCLVSeekBar\")"; -__ref._mclv /*b4a.example3.customlistview*/ ._asview().LoadLayout("PCLVSeekBar",ba); -RDebugUtils.currentLine=65404944; - //BA.debugLineNum = 65404944;BA.debugLine="B4XSeekBar1.Size1 = 1dip"; -__ref._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._size1 /*int*/ = __c.DipToCurrent((int) (1)); -RDebugUtils.currentLine=65404945; - //BA.debugLineNum = 65404945;BA.debugLine="B4XSeekBar1.Size2 = 1dip"; -__ref._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._size2 /*int*/ = __c.DipToCurrent((int) (1)); -RDebugUtils.currentLine=65404946; - //BA.debugLineNum = 65404946;BA.debugLine="B4XSeekBar1.Radius1 = 8dip"; -__ref._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._radius1 /*int*/ = __c.DipToCurrent((int) (8)); -RDebugUtils.currentLine=65404947; - //BA.debugLineNum = 65404947;BA.debugLine="B4XSeekBar1.Update"; -__ref._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._update /*String*/ (null); -RDebugUtils.currentLine=65404948; - //BA.debugLineNum = 65404948;BA.debugLine="mCallback = Callback"; -__ref._mcallback /*Object*/ = _callback; -RDebugUtils.currentLine=65404949; - //BA.debugLineNum = 65404949;BA.debugLine="mEventName = EventName"; -__ref._meventname /*String*/ = _eventname; -RDebugUtils.currentLine=65404950; - //BA.debugLineNum = 65404950;BA.debugLine="End Sub"; -return ""; -} -public String _commit(keymon.lat.medicomed.preoptimizedclv __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="preoptimizedclv"; -if (Debug.shouldDelegate(ba, "commit", true)) - {return ((String) Debug.delegate(ba, "commit", null));} -int _dividersize = 0; -int _totalsize = 0; -int _i = 0; -b4a.example3.customlistview._clvitem _it = null; -RDebugUtils.currentLine=65536000; - //BA.debugLineNum = 65536000;BA.debugLine="Public Sub Commit"; -RDebugUtils.currentLine=65536001; - //BA.debugLineNum = 65536001;BA.debugLine="ClearAssignedItems"; -__ref._clearassigneditems /*String*/ (null); -RDebugUtils.currentLine=65536002; - //BA.debugLineNum = 65536002;BA.debugLine="Dim DividerSize As Int = mCLV.DividerSize"; -_dividersize = (int) (__ref._mclv /*b4a.example3.customlistview*/ ._getdividersize()); -RDebugUtils.currentLine=65536003; - //BA.debugLineNum = 65536003;BA.debugLine="Dim TotalSize As Int = DividerSize"; -_totalsize = _dividersize; -RDebugUtils.currentLine=65536004; - //BA.debugLineNum = 65536004;BA.debugLine="For i = 0 To items.Size - 1"; -{ -final int step4 = 1; -final int limit4 = (int) (__ref._items /*anywheresoftware.b4a.objects.collections.List*/ .getSize()-1); -_i = (int) (0) ; -for (;_i <= limit4 ;_i = _i + step4 ) { -RDebugUtils.currentLine=65536005; - //BA.debugLineNum = 65536005;BA.debugLine="Dim it As CLVItem = items.Get(i)"; -_it = (b4a.example3.customlistview._clvitem)(__ref._items /*anywheresoftware.b4a.objects.collections.List*/ .Get(_i)); -RDebugUtils.currentLine=65536006; - //BA.debugLineNum = 65536006;BA.debugLine="it.Offset = TotalSize"; -_it.Offset = _totalsize; -RDebugUtils.currentLine=65536007; - //BA.debugLineNum = 65536007;BA.debugLine="TotalSize = TotalSize + it.Size + DividerSize"; -_totalsize = (int) (_totalsize+_it.Size+_dividersize); - } -}; -RDebugUtils.currentLine=65536009; - //BA.debugLineNum = 65536009;BA.debugLine="If horizontal Then"; -if (__ref._horizontal /*boolean*/ ) { -RDebugUtils.currentLine=65536010; - //BA.debugLineNum = 65536010;BA.debugLine="mCLV.sv.ScrollViewContentWidth = TotalSize"; -__ref._mclv /*b4a.example3.customlistview*/ ._sv.setScrollViewContentWidth(_totalsize); - }else { -RDebugUtils.currentLine=65536012; - //BA.debugLineNum = 65536012;BA.debugLine="mCLV.sv.ScrollViewContentHeight = TotalSize"; -__ref._mclv /*b4a.example3.customlistview*/ ._sv.setScrollViewContentHeight(_totalsize); - }; -RDebugUtils.currentLine=65536014; - //BA.debugLineNum = 65536014;BA.debugLine="B4XSeekBar1.mBase.Visible = ShowScrollBar"; -__ref._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setVisible(__ref._showscrollbar /*boolean*/ ); -RDebugUtils.currentLine=65536015; - //BA.debugLineNum = 65536015;BA.debugLine="If ShowScrollBar Then"; -if (__ref._showscrollbar /*boolean*/ ) { -RDebugUtils.currentLine=65536016; - //BA.debugLineNum = 65536016;BA.debugLine="B4XSeekBar1.MaxValue = items.Size"; -__ref._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._maxvalue /*int*/ = __ref._items /*anywheresoftware.b4a.objects.collections.List*/ .getSize(); -RDebugUtils.currentLine=65536017; - //BA.debugLineNum = 65536017;BA.debugLine="B4XSeekBar1.Interval = items.Size / NumberOfStep"; -__ref._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._interval /*int*/ = (int) (__ref._items /*anywheresoftware.b4a.objects.collections.List*/ .getSize()/(double)__ref._numberofsteps /*int*/ ); - }; -RDebugUtils.currentLine=65536019; - //BA.debugLineNum = 65536019;BA.debugLine="RaiseVisibleRangeEvent"; -__ref._raisevisiblerangeevent /*String*/ (null); -RDebugUtils.currentLine=65536021; - //BA.debugLineNum = 65536021;BA.debugLine="End Sub"; -return ""; -} -public String _additem(keymon.lat.medicomed.preoptimizedclv __ref,int _size,int _clr,Object _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="preoptimizedclv"; -if (Debug.shouldDelegate(ba, "additem", true)) - {return ((String) Debug.delegate(ba, "additem", new Object[] {_size,_clr,_value}));} +public String _additem(int _size,int _clr,Object _value) throws Exception{ b4a.example3.customlistview._clvitem _newitem = null; -RDebugUtils.currentLine=65470464; - //BA.debugLineNum = 65470464;BA.debugLine="Public Sub AddItem (Size As Int, Clr As Int, Value"; -RDebugUtils.currentLine=65470465; - //BA.debugLineNum = 65470465;BA.debugLine="Dim NewItem As CLVItem"; + //BA.debugLineNum = 53;BA.debugLine="Public Sub AddItem (Size As Int, Clr As Int, Value"; + //BA.debugLineNum = 54;BA.debugLine="Dim NewItem As CLVItem"; _newitem = new b4a.example3.customlistview._clvitem(); -RDebugUtils.currentLine=65470466; - //BA.debugLineNum = 65470466;BA.debugLine="NewItem.Color = Clr"; + //BA.debugLineNum = 55;BA.debugLine="NewItem.Color = Clr"; _newitem.Color = _clr; -RDebugUtils.currentLine=65470467; - //BA.debugLineNum = 65470467;BA.debugLine="NewItem.Panel = StubPanel"; -_newitem.Panel = __ref._stubpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ; -RDebugUtils.currentLine=65470468; - //BA.debugLineNum = 65470468;BA.debugLine="NewItem.Value = Value"; + //BA.debugLineNum = 56;BA.debugLine="NewItem.Panel = StubPanel"; +_newitem.Panel = _stubpanel; + //BA.debugLineNum = 57;BA.debugLine="NewItem.Value = Value"; _newitem.Value = _value; -RDebugUtils.currentLine=65470469; - //BA.debugLineNum = 65470469;BA.debugLine="NewItem.Size = Size"; + //BA.debugLineNum = 58;BA.debugLine="NewItem.Size = Size"; _newitem.Size = _size; -RDebugUtils.currentLine=65470470; - //BA.debugLineNum = 65470470;BA.debugLine="items.Add(NewItem)"; -__ref._items /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(_newitem)); -RDebugUtils.currentLine=65470471; - //BA.debugLineNum = 65470471;BA.debugLine="End Sub"; + //BA.debugLineNum = 59;BA.debugLine="items.Add(NewItem)"; +_items.Add((Object)(_newitem)); + //BA.debugLineNum = 60;BA.debugLine="End Sub"; return ""; } -public void _b4xseekbar1_touchstatechanged(keymon.lat.medicomed.preoptimizedclv __ref,boolean _pressed) throws Exception{ -RDebugUtils.currentModule="preoptimizedclv"; -if (Debug.shouldDelegate(ba, "b4xseekbar1_touchstatechanged", true)) - {Debug.delegate(ba, "b4xseekbar1_touchstatechanged", new Object[] {_pressed}); return;} -ResumableSub_B4XSeekBar1_TouchStateChanged rsub = new ResumableSub_B4XSeekBar1_TouchStateChanged(this,__ref,_pressed); +public void _b4xseekbar1_touchstatechanged(boolean _pressed) throws Exception{ +ResumableSub_B4XSeekBar1_TouchStateChanged rsub = new ResumableSub_B4XSeekBar1_TouchStateChanged(this,_pressed); rsub.resume(ba, null); } public static class ResumableSub_B4XSeekBar1_TouchStateChanged extends BA.ResumableSub { -public ResumableSub_B4XSeekBar1_TouchStateChanged(keymon.lat.medicomed.preoptimizedclv parent,keymon.lat.medicomed.preoptimizedclv __ref,boolean _pressed) { +public ResumableSub_B4XSeekBar1_TouchStateChanged(keymon.lat.medicomed.preoptimizedclv parent,boolean _pressed) { this.parent = parent; -this.__ref = __ref; this._pressed = _pressed; -this.__ref = parent; } -keymon.lat.medicomed.preoptimizedclv __ref; keymon.lat.medicomed.preoptimizedclv parent; boolean _pressed; anywheresoftware.b4j.object.JavaObject _jo = null; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="preoptimizedclv"; while (true) { switch (state) { @@ -253,8 +98,7 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=66060289; - //BA.debugLineNum = 66060289;BA.debugLine="If Pressed = False Then"; + //BA.debugLineNum = 164;BA.debugLine="If Pressed = False Then"; if (true) break; case 1: @@ -269,35 +113,29 @@ this.state = 5; case 3: //C this.state = 6; -RDebugUtils.currentLine=66060290; - //BA.debugLineNum = 66060290;BA.debugLine="mCLV.JumpToItem(LastUserChangeIndex)"; -__ref._mclv /*b4a.example3.customlistview*/ ._jumptoitem(__ref._lastuserchangeindex /*int*/ ); -RDebugUtils.currentLine=66060291; - //BA.debugLineNum = 66060291;BA.debugLine="Sleep(DelayBeforeHidingOverlay)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "preoptimizedclv", "b4xseekbar1_touchstatechanged"),__ref._delaybeforehidingoverlay /*int*/ ); + //BA.debugLineNum = 165;BA.debugLine="mCLV.JumpToItem(LastUserChangeIndex)"; +parent._mclv._jumptoitem(parent._lastuserchangeindex); + //BA.debugLineNum = 166;BA.debugLine="Sleep(DelayBeforeHidingOverlay)"; +parent.__c.Sleep(ba,this,parent._delaybeforehidingoverlay); this.state = 7; return; case 7: //C this.state = 6; ; -RDebugUtils.currentLine=66060292; - //BA.debugLineNum = 66060292;BA.debugLine="pnlOverlay.Visible = False"; -__ref._pnloverlay /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setVisible(parent.__c.False); + //BA.debugLineNum = 167;BA.debugLine="pnlOverlay.Visible = False"; +parent._pnloverlay.setVisible(parent.__c.False); if (true) break; case 5: //C this.state = 6; -RDebugUtils.currentLine=66060294; - //BA.debugLineNum = 66060294;BA.debugLine="pnlOverlay.Visible = True"; -__ref._pnloverlay /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setVisible(parent.__c.True); -RDebugUtils.currentLine=66060296; - //BA.debugLineNum = 66060296;BA.debugLine="Dim jo As JavaObject = mCLV.sv"; + //BA.debugLineNum = 169;BA.debugLine="pnlOverlay.Visible = True"; +parent._pnloverlay.setVisible(parent.__c.True); + //BA.debugLineNum = 171;BA.debugLine="Dim jo As JavaObject = mCLV.sv"; _jo = new anywheresoftware.b4j.object.JavaObject(); -_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(__ref._mclv /*b4a.example3.customlistview*/ ._sv.getObject())); -RDebugUtils.currentLine=66060297; - //BA.debugLineNum = 66060297;BA.debugLine="jo.RunMethod(\"fling\", Array(0))"; +_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(parent._mclv._sv.getObject())); + //BA.debugLineNum = 172;BA.debugLine="jo.RunMethod(\"fling\", Array(0))"; _jo.RunMethod("fling",new Object[]{(Object)(0)}); if (true) break; @@ -305,86 +143,49 @@ case 6: //C this.state = -1; ; -RDebugUtils.currentLine=66060300; - //BA.debugLineNum = 66060300;BA.debugLine="End Sub"; + //BA.debugLineNum = 175;BA.debugLine="End Sub"; if (true) break; } } } } -public String _b4xseekbar1_valuechanged(keymon.lat.medicomed.preoptimizedclv __ref,int _value) throws Exception{ -__ref = this; -RDebugUtils.currentModule="preoptimizedclv"; -if (Debug.shouldDelegate(ba, "b4xseekbar1_valuechanged", true)) - {return ((String) Debug.delegate(ba, "b4xseekbar1_valuechanged", new Object[] {_value}));} +public String _b4xseekbar1_valuechanged(int _value) throws Exception{ Object _t = null; -RDebugUtils.currentLine=66125824; - //BA.debugLineNum = 66125824;BA.debugLine="Sub B4XSeekBar1_ValueChanged (Value As Int)"; -RDebugUtils.currentLine=66125825; - //BA.debugLineNum = 66125825;BA.debugLine="LastUserChangeIndex = Max(0, items.Size - 1 - Val"; -__ref._lastuserchangeindex /*int*/ = (int) (__c.Max(0,__ref._items /*anywheresoftware.b4a.objects.collections.List*/ .getSize()-1-_value)); -RDebugUtils.currentLine=66125826; - //BA.debugLineNum = 66125826;BA.debugLine="If LastUserChangeIndex < B4XSeekBar1.Interval The"; -if (__ref._lastuserchangeindex /*int*/ <__ref._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._interval /*int*/ ) { -__ref._lastuserchangeindex /*int*/ = (int) (0);}; -RDebugUtils.currentLine=66125827; - //BA.debugLineNum = 66125827;BA.debugLine="lblHint.Text = \"\""; -__ref._lblhint /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setText(BA.ObjectToCharSequence("")); -RDebugUtils.currentLine=66125828; - //BA.debugLineNum = 66125828;BA.debugLine="If xui.SubExists(mCallback, mEventName & \"_HintRe"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .SubExists(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_HintRequested",(int) (1))) { -RDebugUtils.currentLine=66125829; - //BA.debugLineNum = 66125829;BA.debugLine="Dim t As Object = CallSub2(mCallback, mEventName"; -_t = __c.CallSubNew2(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_HintRequested",(Object)(__ref._lastuserchangeindex /*int*/ )); -RDebugUtils.currentLine=66125830; - //BA.debugLineNum = 66125830;BA.debugLine="If t <> Null Then"; + //BA.debugLineNum = 177;BA.debugLine="Sub B4XSeekBar1_ValueChanged (Value As Int)"; + //BA.debugLineNum = 178;BA.debugLine="LastUserChangeIndex = Max(0, items.Size - 1 - Val"; +_lastuserchangeindex = (int) (__c.Max(0,_items.getSize()-1-_value)); + //BA.debugLineNum = 179;BA.debugLine="If LastUserChangeIndex < B4XSeekBar1.Interval The"; +if (_lastuserchangeindex<_b4xseekbar1._interval /*int*/ ) { +_lastuserchangeindex = (int) (0);}; + //BA.debugLineNum = 180;BA.debugLine="lblHint.Text = \"\""; +_lblhint.setText(BA.ObjectToCharSequence("")); + //BA.debugLineNum = 181;BA.debugLine="If xui.SubExists(mCallback, mEventName & \"_HintRe"; +if (_xui.SubExists(ba,_mcallback,_meventname+"_HintRequested",(int) (1))) { + //BA.debugLineNum = 182;BA.debugLine="Dim t As Object = CallSub2(mCallback, mEventName"; +_t = __c.CallSubNew2(ba,_mcallback,_meventname+"_HintRequested",(Object)(_lastuserchangeindex)); + //BA.debugLineNum = 183;BA.debugLine="If t <> Null Then"; if (_t!= null) { -RDebugUtils.currentLine=66125831; - //BA.debugLineNum = 66125831;BA.debugLine="InternalSetTextOrCSBuilderToLabel(lblHint, t)"; -__ref._internalsettextorcsbuildertolabel /*String*/ (null,__ref._lblhint /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ,_t); + //BA.debugLineNum = 184;BA.debugLine="InternalSetTextOrCSBuilderToLabel(lblHint, t)"; +_internalsettextorcsbuildertolabel(_lblhint,_t); }; }; -RDebugUtils.currentLine=66125834; - //BA.debugLineNum = 66125834;BA.debugLine="End Sub"; + //BA.debugLineNum = 187;BA.debugLine="End Sub"; return ""; } -public String _internalsettextorcsbuildertolabel(keymon.lat.medicomed.preoptimizedclv __ref,anywheresoftware.b4a.objects.B4XViewWrapper _xlbl,Object _text) throws Exception{ -__ref = this; -RDebugUtils.currentModule="preoptimizedclv"; -if (Debug.shouldDelegate(ba, "internalsettextorcsbuildertolabel", true)) - {return ((String) Debug.delegate(ba, "internalsettextorcsbuildertolabel", new Object[] {_xlbl,_text}));} -RDebugUtils.currentLine=66191360; - //BA.debugLineNum = 66191360;BA.debugLine="Private Sub InternalSetTextOrCSBuilderToLabel(xlbl"; -RDebugUtils.currentLine=66191362; - //BA.debugLineNum = 66191362;BA.debugLine="xlbl.Text = Text"; -_xlbl.setText(BA.ObjectToCharSequence(_text)); -RDebugUtils.currentLine=66191372; - //BA.debugLineNum = 66191372;BA.debugLine="End Sub"; -return ""; -} -public String _class_globals(keymon.lat.medicomed.preoptimizedclv __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="preoptimizedclv"; -RDebugUtils.currentLine=65339392; - //BA.debugLineNum = 65339392;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=65339393; - //BA.debugLineNum = 65339393;BA.debugLine="Private mCLV As CustomListView"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 2;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 3;BA.debugLine="Private mCLV As CustomListView"; _mclv = new b4a.example3.customlistview(); -RDebugUtils.currentLine=65339394; - //BA.debugLineNum = 65339394;BA.debugLine="Private items As List"; + //BA.debugLineNum = 4;BA.debugLine="Private items As List"; _items = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=65339395; - //BA.debugLineNum = 65339395;BA.debugLine="Private PanelsCache As List"; + //BA.debugLineNum = 5;BA.debugLine="Private PanelsCache As List"; _panelscache = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=65339396; - //BA.debugLineNum = 65339396;BA.debugLine="Private StubPanel As B4XView"; + //BA.debugLineNum = 6;BA.debugLine="Private StubPanel As B4XView"; _stubpanel = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=65339397; - //BA.debugLineNum = 65339397;BA.debugLine="Private horizontal As Boolean"; + //BA.debugLineNum = 7;BA.debugLine="Private horizontal As Boolean"; _horizontal = false; -RDebugUtils.currentLine=65339398; - //BA.debugLineNum = 65339398;BA.debugLine="Private AssignedItems() As B4XSet"; + //BA.debugLineNum = 8;BA.debugLine="Private AssignedItems() As B4XSet"; _assigneditems = new keymon.lat.medicomed.b4xset[(int) (0)]; { int d0 = _assigneditems.length; @@ -393,172 +194,193 @@ _assigneditems[i0] = new keymon.lat.medicomed.b4xset(); } } ; -RDebugUtils.currentLine=65339399; - //BA.debugLineNum = 65339399;BA.debugLine="Private AssignedItemsAsIndex As Int"; + //BA.debugLineNum = 9;BA.debugLine="Private AssignedItemsAsIndex As Int"; _assigneditemsasindex = 0; -RDebugUtils.currentLine=65339403; - //BA.debugLineNum = 65339403;BA.debugLine="Private jclv As JavaObject"; + //BA.debugLineNum = 13;BA.debugLine="Private jclv As JavaObject"; _jclv = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=65339405; - //BA.debugLineNum = 65339405;BA.debugLine="Public ExtraItems As Int = 3"; + //BA.debugLineNum = 15;BA.debugLine="Public ExtraItems As Int = 3"; _extraitems = (int) (3); -RDebugUtils.currentLine=65339406; - //BA.debugLineNum = 65339406;BA.debugLine="Private ListOfItemsThatShouldBeUpdated As List"; + //BA.debugLineNum = 16;BA.debugLine="Private ListOfItemsThatShouldBeUpdated As List"; _listofitemsthatshouldbeupdated = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=65339407; - //BA.debugLineNum = 65339407;BA.debugLine="Private xui As XUI"; + //BA.debugLineNum = 17;BA.debugLine="Private xui As XUI"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=65339408; - //BA.debugLineNum = 65339408;BA.debugLine="Public ShowScrollBar As Boolean = True"; + //BA.debugLineNum = 18;BA.debugLine="Public ShowScrollBar As Boolean = True"; _showscrollbar = __c.True; -RDebugUtils.currentLine=65339409; - //BA.debugLineNum = 65339409;BA.debugLine="Public B4XSeekBar1 As B4XSeekBar"; + //BA.debugLineNum = 19;BA.debugLine="Public B4XSeekBar1 As B4XSeekBar"; _b4xseekbar1 = new keymon.lat.medicomed.b4xseekbar(); -RDebugUtils.currentLine=65339410; - //BA.debugLineNum = 65339410;BA.debugLine="Public pnlOverlay As B4XView"; + //BA.debugLineNum = 20;BA.debugLine="Public pnlOverlay As B4XView"; _pnloverlay = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=65339411; - //BA.debugLineNum = 65339411;BA.debugLine="Public lblHint As B4XView"; + //BA.debugLineNum = 21;BA.debugLine="Public lblHint As B4XView"; _lblhint = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=65339412; - //BA.debugLineNum = 65339412;BA.debugLine="Private LastUserChangeIndex As Int"; + //BA.debugLineNum = 22;BA.debugLine="Private LastUserChangeIndex As Int"; _lastuserchangeindex = 0; -RDebugUtils.currentLine=65339413; - //BA.debugLineNum = 65339413;BA.debugLine="Public NumberOfSteps As Int = 20"; + //BA.debugLineNum = 23;BA.debugLine="Public NumberOfSteps As Int = 20"; _numberofsteps = (int) (20); -RDebugUtils.currentLine=65339414; - //BA.debugLineNum = 65339414;BA.debugLine="Public DelayBeforeHidingOverlay As Int = 50"; + //BA.debugLineNum = 24;BA.debugLine="Public DelayBeforeHidingOverlay As Int = 50"; _delaybeforehidingoverlay = (int) (50); -RDebugUtils.currentLine=65339415; - //BA.debugLineNum = 65339415;BA.debugLine="Private mCallback As Object"; + //BA.debugLineNum = 25;BA.debugLine="Private mCallback As Object"; _mcallback = new Object(); -RDebugUtils.currentLine=65339416; - //BA.debugLineNum = 65339416;BA.debugLine="Private mEventName As String"; + //BA.debugLineNum = 26;BA.debugLine="Private mEventName As String"; _meventname = ""; -RDebugUtils.currentLine=65339417; - //BA.debugLineNum = 65339417;BA.debugLine="End Sub"; + //BA.debugLineNum = 27;BA.debugLine="End Sub"; return ""; } -public String _clearassigneditems(keymon.lat.medicomed.preoptimizedclv __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="preoptimizedclv"; -if (Debug.shouldDelegate(ba, "clearassigneditems", true)) - {return ((String) Debug.delegate(ba, "clearassigneditems", null));} +public String _clearassigneditems() throws Exception{ keymon.lat.medicomed.b4xset _s = null; -RDebugUtils.currentLine=65929216; - //BA.debugLineNum = 65929216;BA.debugLine="Private Sub ClearAssignedItems"; -RDebugUtils.currentLine=65929217; - //BA.debugLineNum = 65929217;BA.debugLine="For Each s As B4XSet In AssignedItems"; + //BA.debugLineNum = 151;BA.debugLine="Private Sub ClearAssignedItems"; + //BA.debugLineNum = 152;BA.debugLine="For Each s As B4XSet In AssignedItems"; { -final keymon.lat.medicomed.b4xset[] group1 = __ref._assigneditems /*keymon.lat.medicomed.b4xset[]*/ ; +final keymon.lat.medicomed.b4xset[] group1 = _assigneditems; final int groupLen1 = group1.length ;int index1 = 0; ; for (; index1 < groupLen1;index1++){ _s = group1[index1]; -RDebugUtils.currentLine=65929218; - //BA.debugLineNum = 65929218;BA.debugLine="s.Clear"; -_s._clear /*String*/ (null); + //BA.debugLineNum = 153;BA.debugLine="s.Clear"; +_s._clear /*String*/ (); } }; -RDebugUtils.currentLine=65929220; - //BA.debugLineNum = 65929220;BA.debugLine="End Sub"; + //BA.debugLineNum = 155;BA.debugLine="End Sub"; return ""; } -public String _raisevisiblerangeevent(keymon.lat.medicomed.preoptimizedclv __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="preoptimizedclv"; -if (Debug.shouldDelegate(ba, "raisevisiblerangeevent", true)) - {return ((String) Debug.delegate(ba, "raisevisiblerangeevent", null));} -RDebugUtils.currentLine=65601536; - //BA.debugLineNum = 65601536;BA.debugLine="Private Sub RaiseVisibleRangeEvent"; -RDebugUtils.currentLine=65601537; - //BA.debugLineNum = 65601537;BA.debugLine="jclv.RunMethod(\"_resetvisibles\", Null)"; -__ref._jclv /*anywheresoftware.b4j.object.JavaObject*/ .RunMethod("_resetvisibles",(Object[])(__c.Null)); -RDebugUtils.currentLine=65601538; - //BA.debugLineNum = 65601538;BA.debugLine="jclv.RunMethod(\"_updatevisiblerange\", Null)"; -__ref._jclv /*anywheresoftware.b4j.object.JavaObject*/ .RunMethod("_updatevisiblerange",(Object[])(__c.Null)); -RDebugUtils.currentLine=65601539; - //BA.debugLineNum = 65601539;BA.debugLine="End Sub"; +public String _commit() throws Exception{ +int _dividersize = 0; +int _totalsize = 0; +int _i = 0; +b4a.example3.customlistview._clvitem _it = null; + //BA.debugLineNum = 62;BA.debugLine="Public Sub Commit"; + //BA.debugLineNum = 63;BA.debugLine="ClearAssignedItems"; +_clearassigneditems(); + //BA.debugLineNum = 64;BA.debugLine="Dim DividerSize As Int = mCLV.DividerSize"; +_dividersize = (int) (_mclv._getdividersize()); + //BA.debugLineNum = 65;BA.debugLine="Dim TotalSize As Int = DividerSize"; +_totalsize = _dividersize; + //BA.debugLineNum = 66;BA.debugLine="For i = 0 To items.Size - 1"; +{ +final int step4 = 1; +final int limit4 = (int) (_items.getSize()-1); +_i = (int) (0) ; +for (;_i <= limit4 ;_i = _i + step4 ) { + //BA.debugLineNum = 67;BA.debugLine="Dim it As CLVItem = items.Get(i)"; +_it = (b4a.example3.customlistview._clvitem)(_items.Get(_i)); + //BA.debugLineNum = 68;BA.debugLine="it.Offset = TotalSize"; +_it.Offset = _totalsize; + //BA.debugLineNum = 69;BA.debugLine="TotalSize = TotalSize + it.Size + DividerSize"; +_totalsize = (int) (_totalsize+_it.Size+_dividersize); + } +}; + //BA.debugLineNum = 71;BA.debugLine="If horizontal Then"; +if (_horizontal) { + //BA.debugLineNum = 72;BA.debugLine="mCLV.sv.ScrollViewContentWidth = TotalSize"; +_mclv._sv.setScrollViewContentWidth(_totalsize); + }else { + //BA.debugLineNum = 74;BA.debugLine="mCLV.sv.ScrollViewContentHeight = TotalSize"; +_mclv._sv.setScrollViewContentHeight(_totalsize); + }; + //BA.debugLineNum = 76;BA.debugLine="B4XSeekBar1.mBase.Visible = ShowScrollBar"; +_b4xseekbar1._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setVisible(_showscrollbar); + //BA.debugLineNum = 77;BA.debugLine="If ShowScrollBar Then"; +if (_showscrollbar) { + //BA.debugLineNum = 78;BA.debugLine="B4XSeekBar1.MaxValue = items.Size"; +_b4xseekbar1._maxvalue /*int*/ = _items.getSize(); + //BA.debugLineNum = 79;BA.debugLine="B4XSeekBar1.Interval = items.Size / NumberOfStep"; +_b4xseekbar1._interval /*int*/ = (int) (_items.getSize()/(double)_numberofsteps); + }; + //BA.debugLineNum = 81;BA.debugLine="RaiseVisibleRangeEvent"; +_raisevisiblerangeevent(); + //BA.debugLineNum = 83;BA.debugLine="End Sub"; return ""; } -public anywheresoftware.b4a.objects.B4XViewWrapper _createpanel(keymon.lat.medicomed.preoptimizedclv __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="preoptimizedclv"; -if (Debug.shouldDelegate(ba, "createpanel", true)) - {return ((anywheresoftware.b4a.objects.B4XViewWrapper) Debug.delegate(ba, "createpanel", null));} -RDebugUtils.currentLine=65667072; - //BA.debugLineNum = 65667072;BA.debugLine="Private Sub CreatePanel As B4XView"; -RDebugUtils.currentLine=65667076; - //BA.debugLineNum = 65667076;BA.debugLine="Return jclv.RunMethodJO(\"_createpanel\", Array(\"Pa"; -if (true) return (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__ref._jclv /*anywheresoftware.b4j.object.JavaObject*/ .RunMethodJO("_createpanel",new Object[]{(Object)("Panel")}).RunMethod("getObject",(Object[])(__c.Null)))); -RDebugUtils.currentLine=65667078; - //BA.debugLineNum = 65667078;BA.debugLine="End Sub"; +public anywheresoftware.b4a.objects.B4XViewWrapper _createpanel() throws Exception{ + //BA.debugLineNum = 90;BA.debugLine="Private Sub CreatePanel As B4XView"; + //BA.debugLineNum = 94;BA.debugLine="Return jclv.RunMethodJO(\"_createpanel\", Array(\"Pa"; +if (true) return (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_jclv.RunMethodJO("_createpanel",new Object[]{(Object)("Panel")}).RunMethod("getObject",(Object[])(__c.Null)))); + //BA.debugLineNum = 96;BA.debugLine="End Sub"; return null; } -public anywheresoftware.b4a.objects.B4XViewWrapper _getpanel(keymon.lat.medicomed.preoptimizedclv __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="preoptimizedclv"; -if (Debug.shouldDelegate(ba, "getpanel", true)) - {return ((anywheresoftware.b4a.objects.B4XViewWrapper) Debug.delegate(ba, "getpanel", null));} +public anywheresoftware.b4a.objects.B4XViewWrapper _getpanel() throws Exception{ anywheresoftware.b4a.objects.B4XViewWrapper _p = null; -RDebugUtils.currentLine=65863680; - //BA.debugLineNum = 65863680;BA.debugLine="Private Sub GetPanel As B4XView"; -RDebugUtils.currentLine=65863681; - //BA.debugLineNum = 65863681;BA.debugLine="If PanelsCache.Size = 0 Then Return CreatePanel"; -if (__ref._panelscache /*anywheresoftware.b4a.objects.collections.List*/ .getSize()==0) { -if (true) return __ref._createpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ (null);}; -RDebugUtils.currentLine=65863682; - //BA.debugLineNum = 65863682;BA.debugLine="Dim p As B4XView = PanelsCache.Get(PanelsCache.Si"; + //BA.debugLineNum = 144;BA.debugLine="Private Sub GetPanel As B4XView"; + //BA.debugLineNum = 145;BA.debugLine="If PanelsCache.Size = 0 Then Return CreatePanel"; +if (_panelscache.getSize()==0) { +if (true) return _createpanel();}; + //BA.debugLineNum = 146;BA.debugLine="Dim p As B4XView = PanelsCache.Get(PanelsCache.Si"; _p = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_p = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(__ref._panelscache /*anywheresoftware.b4a.objects.collections.List*/ .Get((int) (__ref._panelscache /*anywheresoftware.b4a.objects.collections.List*/ .getSize()-1)))); -RDebugUtils.currentLine=65863683; - //BA.debugLineNum = 65863683;BA.debugLine="PanelsCache.RemoveAt(PanelsCache.Size - 1)"; -__ref._panelscache /*anywheresoftware.b4a.objects.collections.List*/ .RemoveAt((int) (__ref._panelscache /*anywheresoftware.b4a.objects.collections.List*/ .getSize()-1)); -RDebugUtils.currentLine=65863684; - //BA.debugLineNum = 65863684;BA.debugLine="Return p"; +_p = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_panelscache.Get((int) (_panelscache.getSize()-1)))); + //BA.debugLineNum = 147;BA.debugLine="PanelsCache.RemoveAt(PanelsCache.Size - 1)"; +_panelscache.RemoveAt((int) (_panelscache.getSize()-1)); + //BA.debugLineNum = 148;BA.debugLine="Return p"; if (true) return _p; -RDebugUtils.currentLine=65863685; - //BA.debugLineNum = 65863685;BA.debugLine="End Sub"; + //BA.debugLineNum = 149;BA.debugLine="End Sub"; return null; } -public String _handlescrollbar(keymon.lat.medicomed.preoptimizedclv __ref,int _firstvisible) throws Exception{ -__ref = this; -RDebugUtils.currentModule="preoptimizedclv"; -if (Debug.shouldDelegate(ba, "handlescrollbar", true)) - {return ((String) Debug.delegate(ba, "handlescrollbar", new Object[] {_firstvisible}));} -RDebugUtils.currentLine=65798144; - //BA.debugLineNum = 65798144;BA.debugLine="Private Sub HandleScrollBar (FirstVisible As Int)"; -RDebugUtils.currentLine=65798145; - //BA.debugLineNum = 65798145;BA.debugLine="If ShowScrollBar = False Then Return"; -if (__ref._showscrollbar /*boolean*/ ==__c.False) { +public String _handlescrollbar(int _firstvisible) throws Exception{ + //BA.debugLineNum = 139;BA.debugLine="Private Sub HandleScrollBar (FirstVisible As Int)"; + //BA.debugLineNum = 140;BA.debugLine="If ShowScrollBar = False Then Return"; +if (_showscrollbar==__c.False) { if (true) return "";}; -RDebugUtils.currentLine=65798146; - //BA.debugLineNum = 65798146;BA.debugLine="B4XSeekBar1.Value = items.Size - FirstVisible"; -__ref._b4xseekbar1 /*keymon.lat.medicomed.b4xseekbar*/ ._setvalue /*int*/ (null,(int) (__ref._items /*anywheresoftware.b4a.objects.collections.List*/ .getSize()-_firstvisible)); -RDebugUtils.currentLine=65798147; - //BA.debugLineNum = 65798147;BA.debugLine="End Sub"; + //BA.debugLineNum = 141;BA.debugLine="B4XSeekBar1.Value = items.Size - FirstVisible"; +_b4xseekbar1._setvalue /*int*/ ((int) (_items.getSize()-_firstvisible)); + //BA.debugLineNum = 142;BA.debugLine="End Sub"; return ""; } -public void _listchangedexternally(keymon.lat.medicomed.preoptimizedclv __ref) throws Exception{ -RDebugUtils.currentModule="preoptimizedclv"; -if (Debug.shouldDelegate(ba, "listchangedexternally", true)) - {Debug.delegate(ba, "listchangedexternally", null); return;} -ResumableSub_ListChangedExternally rsub = new ResumableSub_ListChangedExternally(this,__ref); +public String _initialize(anywheresoftware.b4a.BA _ba,Object _callback,String _eventname,b4a.example3.customlistview _clv) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 29;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; + //BA.debugLineNum = 30;BA.debugLine="mCLV = CLV"; +_mclv = _clv; + //BA.debugLineNum = 31;BA.debugLine="jclv = mCLV 'ignore"; +_jclv = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_mclv)); + //BA.debugLineNum = 36;BA.debugLine="items = jclv.GetFieldJO(\"_items\").RunMethod(\"getO"; +_items = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_jclv.GetFieldJO("_items").RunMethod("getObject",(Object[])(__c.Null)))); + //BA.debugLineNum = 37;BA.debugLine="horizontal = jclv.GetField(\"_horizontal\")"; +_horizontal = BA.ObjectToBoolean(_jclv.GetField("_horizontal")); + //BA.debugLineNum = 39;BA.debugLine="PanelsCache.Initialize"; +_panelscache.Initialize(); + //BA.debugLineNum = 40;BA.debugLine="StubPanel = CreatePanel"; +_stubpanel = _createpanel(); + //BA.debugLineNum = 41;BA.debugLine="StubPanel.AddView(xui.CreatePanel(\"\"), 0, 0, 10di"; +_stubpanel.AddView((android.view.View)(_xui.CreatePanel(ba,"").getObject()),(int) (0),(int) (0),__c.DipToCurrent((int) (10)),__c.DipToCurrent((int) (10))); + //BA.debugLineNum = 42;BA.debugLine="AssignedItems = Array As B4XSet(B4XCollections.Cr"; +_assigneditems = new keymon.lat.medicomed.b4xset[]{_b4xcollections._createset /*keymon.lat.medicomed.b4xset*/ (ba),_b4xcollections._createset /*keymon.lat.medicomed.b4xset*/ (ba)}; + //BA.debugLineNum = 43;BA.debugLine="ListOfItemsThatShouldBeUpdated.Initialize"; +_listofitemsthatshouldbeupdated.Initialize(); + //BA.debugLineNum = 44;BA.debugLine="mCLV.AsView.LoadLayout(\"PCLVSeekBar\")"; +_mclv._asview().LoadLayout("PCLVSeekBar",ba); + //BA.debugLineNum = 45;BA.debugLine="B4XSeekBar1.Size1 = 1dip"; +_b4xseekbar1._size1 /*int*/ = __c.DipToCurrent((int) (1)); + //BA.debugLineNum = 46;BA.debugLine="B4XSeekBar1.Size2 = 1dip"; +_b4xseekbar1._size2 /*int*/ = __c.DipToCurrent((int) (1)); + //BA.debugLineNum = 47;BA.debugLine="B4XSeekBar1.Radius1 = 8dip"; +_b4xseekbar1._radius1 /*int*/ = __c.DipToCurrent((int) (8)); + //BA.debugLineNum = 48;BA.debugLine="B4XSeekBar1.Update"; +_b4xseekbar1._update /*String*/ (); + //BA.debugLineNum = 49;BA.debugLine="mCallback = Callback"; +_mcallback = _callback; + //BA.debugLineNum = 50;BA.debugLine="mEventName = EventName"; +_meventname = _eventname; + //BA.debugLineNum = 51;BA.debugLine="End Sub"; +return ""; +} +public String _internalsettextorcsbuildertolabel(anywheresoftware.b4a.objects.B4XViewWrapper _xlbl,Object _text) throws Exception{ + //BA.debugLineNum = 189;BA.debugLine="Private Sub InternalSetTextOrCSBuilderToLabel(xlbl"; + //BA.debugLineNum = 191;BA.debugLine="xlbl.Text = Text"; +_xlbl.setText(BA.ObjectToCharSequence(_text)); + //BA.debugLineNum = 201;BA.debugLine="End Sub"; +return ""; +} +public void _listchangedexternally() throws Exception{ +ResumableSub_ListChangedExternally rsub = new ResumableSub_ListChangedExternally(this); rsub.resume(ba, null); } public static class ResumableSub_ListChangedExternally extends BA.ResumableSub { -public ResumableSub_ListChangedExternally(keymon.lat.medicomed.preoptimizedclv parent,keymon.lat.medicomed.preoptimizedclv __ref) { +public ResumableSub_ListChangedExternally(keymon.lat.medicomed.preoptimizedclv parent) { this.parent = parent; -this.__ref = __ref; -this.__ref = parent; } -keymon.lat.medicomed.preoptimizedclv __ref; keymon.lat.medicomed.preoptimizedclv parent; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="preoptimizedclv"; while (true) { switch (state) { @@ -568,34 +390,35 @@ return; case 0: //C this.state = -1; -RDebugUtils.currentLine=65994753; - //BA.debugLineNum = 65994753;BA.debugLine="ClearAssignedItems"; -__ref._clearassigneditems /*String*/ (null); -RDebugUtils.currentLine=65994754; - //BA.debugLineNum = 65994754;BA.debugLine="Sleep(0)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "preoptimizedclv", "listchangedexternally"),(int) (0)); + //BA.debugLineNum = 158;BA.debugLine="ClearAssignedItems"; +parent._clearassigneditems(); + //BA.debugLineNum = 159;BA.debugLine="Sleep(0)"; +parent.__c.Sleep(ba,this,(int) (0)); this.state = 1; return; case 1: //C this.state = -1; ; -RDebugUtils.currentLine=65994755; - //BA.debugLineNum = 65994755;BA.debugLine="RaiseVisibleRangeEvent"; -__ref._raisevisiblerangeevent /*String*/ (null); -RDebugUtils.currentLine=65994756; - //BA.debugLineNum = 65994756;BA.debugLine="End Sub"; + //BA.debugLineNum = 160;BA.debugLine="RaiseVisibleRangeEvent"; +parent._raisevisiblerangeevent(); + //BA.debugLineNum = 161;BA.debugLine="End Sub"; if (true) break; } } } } -public anywheresoftware.b4a.objects.collections.List _visiblerangechanged(keymon.lat.medicomed.preoptimizedclv __ref,int _firstindex,int _lastindex) throws Exception{ -__ref = this; -RDebugUtils.currentModule="preoptimizedclv"; -if (Debug.shouldDelegate(ba, "visiblerangechanged", true)) - {return ((anywheresoftware.b4a.objects.collections.List) Debug.delegate(ba, "visiblerangechanged", new Object[] {_firstindex,_lastindex}));} +public String _raisevisiblerangeevent() throws Exception{ + //BA.debugLineNum = 85;BA.debugLine="Private Sub RaiseVisibleRangeEvent"; + //BA.debugLineNum = 86;BA.debugLine="jclv.RunMethod(\"_resetvisibles\", Null)"; +_jclv.RunMethod("_resetvisibles",(Object[])(__c.Null)); + //BA.debugLineNum = 87;BA.debugLine="jclv.RunMethod(\"_updatevisiblerange\", Null)"; +_jclv.RunMethod("_updatevisiblerange",(Object[])(__c.Null)); + //BA.debugLineNum = 88;BA.debugLine="End Sub"; +return ""; +} +public anywheresoftware.b4a.objects.collections.List _visiblerangechanged(int _firstindex,int _lastindex) throws Exception{ int _fromindex = 0; int _toindex = 0; keymon.lat.medicomed.b4xset _prevset = null; @@ -603,125 +426,95 @@ keymon.lat.medicomed.b4xset _nextset = null; int _i = 0; b4a.example3.customlistview._clvitem _it = null; anywheresoftware.b4a.objects.B4XViewWrapper _pnl = null; -RDebugUtils.currentLine=65732608; - //BA.debugLineNum = 65732608;BA.debugLine="Public Sub VisibleRangeChanged (FirstIndex As Int,"; -RDebugUtils.currentLine=65732609; - //BA.debugLineNum = 65732609;BA.debugLine="Dim FromIndex As Int = Max(0, FirstIndex - ExtraI"; -_fromindex = (int) (__c.Max(0,_firstindex-__ref._extraitems /*int*/ )); -RDebugUtils.currentLine=65732610; - //BA.debugLineNum = 65732610;BA.debugLine="Dim ToIndex As Int = Min(mCLV.Size - 1, LastIndex"; -_toindex = (int) (__c.Min(__ref._mclv /*b4a.example3.customlistview*/ ._getsize()-1,_lastindex+__ref._extraitems /*int*/ )); -RDebugUtils.currentLine=65732611; - //BA.debugLineNum = 65732611;BA.debugLine="Dim PrevSet As B4XSet = AssignedItems(AssignedIte"; -_prevset = __ref._assigneditems /*keymon.lat.medicomed.b4xset[]*/ [__ref._assigneditemsasindex /*int*/ ]; -RDebugUtils.currentLine=65732612; - //BA.debugLineNum = 65732612;BA.debugLine="AssignedItemsAsIndex = (AssignedItemsAsIndex + 1)"; -__ref._assigneditemsasindex /*int*/ = (int) ((__ref._assigneditemsasindex /*int*/ +1)%2); -RDebugUtils.currentLine=65732613; - //BA.debugLineNum = 65732613;BA.debugLine="Dim NextSet As B4XSet = AssignedItems(AssignedIte"; -_nextset = __ref._assigneditems /*keymon.lat.medicomed.b4xset[]*/ [__ref._assigneditemsasindex /*int*/ ]; -RDebugUtils.currentLine=65732614; - //BA.debugLineNum = 65732614;BA.debugLine="NextSet.Clear"; -_nextset._clear /*String*/ (null); -RDebugUtils.currentLine=65732615; - //BA.debugLineNum = 65732615;BA.debugLine="ListOfItemsThatShouldBeUpdated.Initialize"; -__ref._listofitemsthatshouldbeupdated /*anywheresoftware.b4a.objects.collections.List*/ .Initialize(); -RDebugUtils.currentLine=65732616; - //BA.debugLineNum = 65732616;BA.debugLine="For i = FromIndex To ToIndex"; + //BA.debugLineNum = 98;BA.debugLine="Public Sub VisibleRangeChanged (FirstIndex As Int,"; + //BA.debugLineNum = 99;BA.debugLine="Dim FromIndex As Int = Max(0, FirstIndex - ExtraI"; +_fromindex = (int) (__c.Max(0,_firstindex-_extraitems)); + //BA.debugLineNum = 100;BA.debugLine="Dim ToIndex As Int = Min(mCLV.Size - 1, LastIndex"; +_toindex = (int) (__c.Min(_mclv._getsize()-1,_lastindex+_extraitems)); + //BA.debugLineNum = 101;BA.debugLine="Dim PrevSet As B4XSet = AssignedItems(AssignedIte"; +_prevset = _assigneditems[_assigneditemsasindex]; + //BA.debugLineNum = 102;BA.debugLine="AssignedItemsAsIndex = (AssignedItemsAsIndex + 1)"; +_assigneditemsasindex = (int) ((_assigneditemsasindex+1)%2); + //BA.debugLineNum = 103;BA.debugLine="Dim NextSet As B4XSet = AssignedItems(AssignedIte"; +_nextset = _assigneditems[_assigneditemsasindex]; + //BA.debugLineNum = 104;BA.debugLine="NextSet.Clear"; +_nextset._clear /*String*/ (); + //BA.debugLineNum = 105;BA.debugLine="ListOfItemsThatShouldBeUpdated.Initialize"; +_listofitemsthatshouldbeupdated.Initialize(); + //BA.debugLineNum = 106;BA.debugLine="For i = FromIndex To ToIndex"; { final int step8 = 1; final int limit8 = _toindex; _i = _fromindex ; for (;_i <= limit8 ;_i = _i + step8 ) { -RDebugUtils.currentLine=65732617; - //BA.debugLineNum = 65732617;BA.debugLine="Dim it As CLVItem = items.Get(i)"; -_it = (b4a.example3.customlistview._clvitem)(__ref._items /*anywheresoftware.b4a.objects.collections.List*/ .Get(_i)); -RDebugUtils.currentLine=65732618; - //BA.debugLineNum = 65732618;BA.debugLine="If it.Panel = StubPanel Then"; -if ((_it.Panel).equals(__ref._stubpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ )) { -RDebugUtils.currentLine=65732619; - //BA.debugLineNum = 65732619;BA.debugLine="it.Panel = GetPanel"; -_it.Panel = __ref._getpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ (null); -RDebugUtils.currentLine=65732620; - //BA.debugLineNum = 65732620;BA.debugLine="it.Panel.Tag = i"; + //BA.debugLineNum = 107;BA.debugLine="Dim it As CLVItem = items.Get(i)"; +_it = (b4a.example3.customlistview._clvitem)(_items.Get(_i)); + //BA.debugLineNum = 108;BA.debugLine="If it.Panel = StubPanel Then"; +if ((_it.Panel).equals(_stubpanel)) { + //BA.debugLineNum = 109;BA.debugLine="it.Panel = GetPanel"; +_it.Panel = _getpanel(); + //BA.debugLineNum = 110;BA.debugLine="it.Panel.Tag = i"; _it.Panel.setTag((Object)(_i)); -RDebugUtils.currentLine=65732621; - //BA.debugLineNum = 65732621;BA.debugLine="it.Panel.Color = it.Color"; + //BA.debugLineNum = 111;BA.debugLine="it.Panel.Color = it.Color"; _it.Panel.setColor(_it.Color); -RDebugUtils.currentLine=65732622; - //BA.debugLineNum = 65732622;BA.debugLine="If horizontal Then"; -if (__ref._horizontal /*boolean*/ ) { -RDebugUtils.currentLine=65732623; - //BA.debugLineNum = 65732623;BA.debugLine="mCLV.sv.ScrollViewInnerPanel.AddView(it.Panel,"; -__ref._mclv /*b4a.example3.customlistview*/ ._sv.getScrollViewInnerPanel().AddView((android.view.View)(_it.Panel.getObject()),_it.Offset,(int) (0),_it.Size,__ref._mclv /*b4a.example3.customlistview*/ ._sv.getHeight()); + //BA.debugLineNum = 112;BA.debugLine="If horizontal Then"; +if (_horizontal) { + //BA.debugLineNum = 113;BA.debugLine="mCLV.sv.ScrollViewInnerPanel.AddView(it.Panel,"; +_mclv._sv.getScrollViewInnerPanel().AddView((android.view.View)(_it.Panel.getObject()),_it.Offset,(int) (0),_it.Size,_mclv._sv.getHeight()); }else { -RDebugUtils.currentLine=65732625; - //BA.debugLineNum = 65732625;BA.debugLine="mCLV.sv.ScrollViewInnerPanel.AddView(it.Panel,"; -__ref._mclv /*b4a.example3.customlistview*/ ._sv.getScrollViewInnerPanel().AddView((android.view.View)(_it.Panel.getObject()),(int) (0),_it.Offset,__ref._mclv /*b4a.example3.customlistview*/ ._sv.getWidth(),_it.Size); + //BA.debugLineNum = 115;BA.debugLine="mCLV.sv.ScrollViewInnerPanel.AddView(it.Panel,"; +_mclv._sv.getScrollViewInnerPanel().AddView((android.view.View)(_it.Panel.getObject()),(int) (0),_it.Offset,_mclv._sv.getWidth(),_it.Size); + }; + //BA.debugLineNum = 117;BA.debugLine="NextSet.Add(it.Panel)"; +_nextset._add /*String*/ ((Object)(_it.Panel.getObject())); + //BA.debugLineNum = 118;BA.debugLine="ListOfItemsThatShouldBeUpdated.Add(i)"; +_listofitemsthatshouldbeupdated.Add((Object)(_i)); + }else if(_prevset._contains /*boolean*/ ((Object)(_it.Panel.getObject()))) { + //BA.debugLineNum = 120;BA.debugLine="NextSet.Add(it.Panel)"; +_nextset._add /*String*/ ((Object)(_it.Panel.getObject())); }; -RDebugUtils.currentLine=65732627; - //BA.debugLineNum = 65732627;BA.debugLine="NextSet.Add(it.Panel)"; -_nextset._add /*String*/ (null,(Object)(_it.Panel.getObject())); -RDebugUtils.currentLine=65732628; - //BA.debugLineNum = 65732628;BA.debugLine="ListOfItemsThatShouldBeUpdated.Add(i)"; -__ref._listofitemsthatshouldbeupdated /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(_i)); - }else -{RDebugUtils.currentLine=65732629; - //BA.debugLineNum = 65732629;BA.debugLine="Else if PrevSet.Contains(it.Panel) Then"; -if (_prevset._contains /*boolean*/ (null,(Object)(_it.Panel.getObject()))) { -RDebugUtils.currentLine=65732630; - //BA.debugLineNum = 65732630;BA.debugLine="NextSet.Add(it.Panel)"; -_nextset._add /*String*/ (null,(Object)(_it.Panel.getObject())); - }} -; } }; -RDebugUtils.currentLine=65732633; - //BA.debugLineNum = 65732633;BA.debugLine="For Each pnl As B4XView In PrevSet.AsList"; + //BA.debugLineNum = 123;BA.debugLine="For Each pnl As B4XView In PrevSet.AsList"; _pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); { -final anywheresoftware.b4a.BA.IterableList group25 = _prevset._aslist /*anywheresoftware.b4a.objects.collections.List*/ (null); +final anywheresoftware.b4a.BA.IterableList group25 = _prevset._aslist /*anywheresoftware.b4a.objects.collections.List*/ (); final int groupLen25 = group25.getSize() ;int index25 = 0; ; for (; index25 < groupLen25;index25++){ _pnl = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(group25.Get(index25))); -RDebugUtils.currentLine=65732634; - //BA.debugLineNum = 65732634;BA.debugLine="If NextSet.Contains(pnl) = False Then"; -if (_nextset._contains /*boolean*/ (null,(Object)(_pnl.getObject()))==__c.False) { -RDebugUtils.currentLine=65732635; - //BA.debugLineNum = 65732635;BA.debugLine="If pnl.Parent.IsInitialized Then"; + //BA.debugLineNum = 124;BA.debugLine="If NextSet.Contains(pnl) = False Then"; +if (_nextset._contains /*boolean*/ ((Object)(_pnl.getObject()))==__c.False) { + //BA.debugLineNum = 125;BA.debugLine="If pnl.Parent.IsInitialized Then"; if (_pnl.getParent().IsInitialized()) { -RDebugUtils.currentLine=65732636; - //BA.debugLineNum = 65732636;BA.debugLine="pnl.RemoveViewFromParent"; + //BA.debugLineNum = 126;BA.debugLine="pnl.RemoveViewFromParent"; _pnl.RemoveViewFromParent(); -RDebugUtils.currentLine=65732637; - //BA.debugLineNum = 65732637;BA.debugLine="pnl.GetView(0).RemoveAllViews"; + //BA.debugLineNum = 127;BA.debugLine="pnl.GetView(0).RemoveAllViews"; _pnl.GetView((int) (0)).RemoveAllViews(); -RDebugUtils.currentLine=65732638; - //BA.debugLineNum = 65732638;BA.debugLine="pnl.RemoveAllViews"; + //BA.debugLineNum = 128;BA.debugLine="pnl.RemoveAllViews"; _pnl.RemoveAllViews(); -RDebugUtils.currentLine=65732639; - //BA.debugLineNum = 65732639;BA.debugLine="PanelsCache.Add(pnl)"; -__ref._panelscache /*anywheresoftware.b4a.objects.collections.List*/ .Add((Object)(_pnl.getObject())); -RDebugUtils.currentLine=65732640; - //BA.debugLineNum = 65732640;BA.debugLine="Dim it As CLVItem = items.Get(pnl.Tag)"; -_it = (b4a.example3.customlistview._clvitem)(__ref._items /*anywheresoftware.b4a.objects.collections.List*/ .Get((int)(BA.ObjectToNumber(_pnl.getTag())))); -RDebugUtils.currentLine=65732641; - //BA.debugLineNum = 65732641;BA.debugLine="it.Panel = StubPanel"; -_it.Panel = __ref._stubpanel /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ; + //BA.debugLineNum = 129;BA.debugLine="PanelsCache.Add(pnl)"; +_panelscache.Add((Object)(_pnl.getObject())); + //BA.debugLineNum = 130;BA.debugLine="Dim it As CLVItem = items.Get(pnl.Tag)"; +_it = (b4a.example3.customlistview._clvitem)(_items.Get((int)(BA.ObjectToNumber(_pnl.getTag())))); + //BA.debugLineNum = 131;BA.debugLine="it.Panel = StubPanel"; +_it.Panel = _stubpanel; }; }; } }; -RDebugUtils.currentLine=65732645; - //BA.debugLineNum = 65732645;BA.debugLine="HandleScrollBar (FirstIndex)"; -__ref._handlescrollbar /*String*/ (null,_firstindex); -RDebugUtils.currentLine=65732646; - //BA.debugLineNum = 65732646;BA.debugLine="Return ListOfItemsThatShouldBeUpdated"; -if (true) return __ref._listofitemsthatshouldbeupdated /*anywheresoftware.b4a.objects.collections.List*/ ; -RDebugUtils.currentLine=65732647; - //BA.debugLineNum = 65732647;BA.debugLine="End Sub"; + //BA.debugLineNum = 135;BA.debugLine="HandleScrollBar (FirstIndex)"; +_handlescrollbar(_firstindex); + //BA.debugLineNum = 136;BA.debugLine="Return ListOfItemsThatShouldBeUpdated"; +if (true) return _listofitemsthatshouldbeupdated; + //BA.debugLineNum = 137;BA.debugLine="End Sub"; return null; } -} \ No newline at end of file +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +if (BA.fastSubCompare(sub, "GETPANEL")) + return _getpanel(); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/roundslider.java b/B4A/Objects/src/keymon/lat/medicomed/roundslider.java index 144feed..f3d5366 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/roundslider.java +++ b/B4A/Objects/src/keymon/lat/medicomed/roundslider.java @@ -10,7 +10,7 @@ public class roundslider extends B4AClass.ImplB4AClass implements BA.SubDelegato private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.roundslider"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.roundslider"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class roundslider extends B4AClass.ImplB4AClass implements BA.SubDelegato 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.keywords.Common __c = null; public String _meventname = ""; public Object _mcallback = null; public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null; @@ -64,105 +57,156 @@ 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 _base_resize(keymon.lat.medicomed.roundslider __ref,double _width,double _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="roundslider"; -if (Debug.shouldDelegate(ba, "base_resize", true)) - {return ((String) Debug.delegate(ba, "base_resize", new Object[] {_width,_height}));} -RDebugUtils.currentLine=62914560; - //BA.debugLineNum = 62914560;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; -RDebugUtils.currentLine=62914561; - //BA.debugLineNum = 62914561;BA.debugLine="cvs.Resize(Width, Height)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Resize((float) (_width),(float) (_height)); -RDebugUtils.currentLine=62914562; - //BA.debugLineNum = 62914562;BA.debugLine="pnl.SetLayoutAnimated(0, 0, 0, Width, Height)"; -__ref._pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); -RDebugUtils.currentLine=62914563; - //BA.debugLineNum = 62914563;BA.debugLine="If thumb.IsInitialized = False Then CreateThumb"; -if (__ref._thumb /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ .IsInitialized()==__c.False) { -__ref._createthumb /*String*/ (null);}; -RDebugUtils.currentLine=62914564; - //BA.debugLineNum = 62914564;BA.debugLine="CircleRect.Initialize(ThumbSize + stroke, ThumbSi"; -__ref._circlerect /*anywheresoftware.b4a.objects.B4XCanvas.B4XRect*/ .Initialize((float) (__ref._thumbsize /*int*/ +__ref._stroke /*int*/ ),(float) (__ref._thumbsize /*int*/ +__ref._stroke /*int*/ ),(float) (_width-__ref._thumbsize /*int*/ -__ref._stroke /*int*/ ),(float) (_height-__ref._thumbsize /*int*/ -__ref._stroke /*int*/ )); -RDebugUtils.currentLine=62914565; - //BA.debugLineNum = 62914565;BA.debugLine="xlbl.SetLayoutAnimated(0, CircleRect.Left, Circle"; -__ref._xlbl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetLayoutAnimated((int) (0),(int) (__ref._circlerect /*anywheresoftware.b4a.objects.B4XCanvas.B4XRect*/ .getLeft()),(int) (__ref._circlerect /*anywheresoftware.b4a.objects.B4XCanvas.B4XRect*/ .getTop()),(int) (__ref._circlerect /*anywheresoftware.b4a.objects.B4XCanvas.B4XRect*/ .getWidth()),(int) (__ref._circlerect /*anywheresoftware.b4a.objects.B4XCanvas.B4XRect*/ .getHeight())); -RDebugUtils.currentLine=62914566; - //BA.debugLineNum = 62914566;BA.debugLine="Draw"; -__ref._draw /*String*/ (null); -RDebugUtils.currentLine=62914567; - //BA.debugLineNum = 62914567;BA.debugLine="End Sub"; +public String _base_resize(double _width,double _height) throws Exception{ + //BA.debugLineNum = 89;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; + //BA.debugLineNum = 90;BA.debugLine="cvs.Resize(Width, Height)"; +_cvs.Resize((float) (_width),(float) (_height)); + //BA.debugLineNum = 91;BA.debugLine="pnl.SetLayoutAnimated(0, 0, 0, Width, Height)"; +_pnl.SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); + //BA.debugLineNum = 92;BA.debugLine="If thumb.IsInitialized = False Then CreateThumb"; +if (_thumb.IsInitialized()==__c.False) { +_createthumb();}; + //BA.debugLineNum = 93;BA.debugLine="CircleRect.Initialize(ThumbSize + stroke, ThumbSi"; +_circlerect.Initialize((float) (_thumbsize+_stroke),(float) (_thumbsize+_stroke),(float) (_width-_thumbsize-_stroke),(float) (_height-_thumbsize-_stroke)); + //BA.debugLineNum = 94;BA.debugLine="xlbl.SetLayoutAnimated(0, CircleRect.Left, Circle"; +_xlbl.SetLayoutAnimated((int) (0),(int) (_circlerect.getLeft()),(int) (_circlerect.getTop()),(int) (_circlerect.getWidth()),(int) (_circlerect.getHeight())); + //BA.debugLineNum = 95;BA.debugLine="Draw"; +_draw(); + //BA.debugLineNum = 96;BA.debugLine="End Sub"; return ""; } -public String _createthumb(keymon.lat.medicomed.roundslider __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="roundslider"; -if (Debug.shouldDelegate(ba, "createthumb", true)) - {return ((String) Debug.delegate(ba, "createthumb", null));} +public String _class_globals() throws Exception{ + //BA.debugLineNum = 6;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 7;BA.debugLine="Private mEventName As String 'ignore"; +_meventname = ""; + //BA.debugLineNum = 8;BA.debugLine="Private mCallBack As Object 'ignore"; +_mcallback = new Object(); + //BA.debugLineNum = 9;BA.debugLine="Public mBase As B4XView 'ignore"; +_mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 10;BA.debugLine="Private xui As XUI 'ignore"; +_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); + //BA.debugLineNum = 11;BA.debugLine="Private cvs As B4XCanvas"; +_cvs = new anywheresoftware.b4a.objects.B4XCanvas(); + //BA.debugLineNum = 12;BA.debugLine="Private mValue As Int = 75"; +_mvalue = (int) (75); + //BA.debugLineNum = 13;BA.debugLine="Private mMin, mMax As Int"; +_mmin = 0; +_mmax = 0; + //BA.debugLineNum = 14;BA.debugLine="Private thumb As B4XBitmap"; +_thumb = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper(); + //BA.debugLineNum = 15;BA.debugLine="Private pnl As B4XView"; +_pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 16;BA.debugLine="Private xlbl As B4XView"; +_xlbl = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 17;BA.debugLine="Private CircleRect As B4XRect"; +_circlerect = new anywheresoftware.b4a.objects.B4XCanvas.B4XRect(); + //BA.debugLineNum = 18;BA.debugLine="Private ValueColor As Int"; +_valuecolor = 0; + //BA.debugLineNum = 19;BA.debugLine="Private stroke As Int"; +_stroke = 0; + //BA.debugLineNum = 20;BA.debugLine="Private ThumbSize As Int"; +_thumbsize = 0; + //BA.debugLineNum = 21;BA.debugLine="Public Tag As Object"; +_tag = new Object(); + //BA.debugLineNum = 22;BA.debugLine="Private mThumbBorderColor As Int = 0xFF5B5B5B"; +_mthumbbordercolor = ((int)0xff5b5b5b); + //BA.debugLineNum = 23;BA.debugLine="Private mThumbInnerColor As Int = xui.Color_White"; +_mthumbinnercolor = _xui.Color_White; + //BA.debugLineNum = 24;BA.debugLine="Private mCircleFillColor As Int = xui.Color_White"; +_mcirclefillcolor = _xui.Color_White; + //BA.debugLineNum = 25;BA.debugLine="Private mCircleNonValueColor As Int = 0xFFB6B6B6"; +_mcirclenonvaluecolor = ((int)0xffb6b6b6); + //BA.debugLineNum = 26;BA.debugLine="Private mRollOver As Boolean"; +_mrollover = false; + //BA.debugLineNum = 27;BA.debugLine="End Sub"; +return ""; +} +public String _createthumb() throws Exception{ b4a.example.bcpath _p = null; int _r = 0; int _g = 0; int _l = 0; b4a.example.bitmapcreator _bc = null; -RDebugUtils.currentLine=62849024; - //BA.debugLineNum = 62849024;BA.debugLine="Private Sub CreateThumb"; -RDebugUtils.currentLine=62849025; - //BA.debugLineNum = 62849025;BA.debugLine="Dim p As BCPath"; + //BA.debugLineNum = 70;BA.debugLine="Private Sub CreateThumb"; + //BA.debugLineNum = 71;BA.debugLine="Dim p As BCPath"; _p = new b4a.example.bcpath(); -RDebugUtils.currentLine=62849026; - //BA.debugLineNum = 62849026;BA.debugLine="Dim r As Int = 80dip"; + //BA.debugLineNum = 72;BA.debugLine="Dim r As Int = 80dip"; _r = __c.DipToCurrent((int) (80)); -RDebugUtils.currentLine=62849027; - //BA.debugLineNum = 62849027;BA.debugLine="Dim g As Int = 8dip"; + //BA.debugLineNum = 73;BA.debugLine="Dim g As Int = 8dip"; _g = __c.DipToCurrent((int) (8)); -RDebugUtils.currentLine=62849028; - //BA.debugLineNum = 62849028;BA.debugLine="Dim l As Int = 28dip"; + //BA.debugLineNum = 74;BA.debugLine="Dim l As Int = 28dip"; _l = __c.DipToCurrent((int) (28)); -RDebugUtils.currentLine=62849029; - //BA.debugLineNum = 62849029;BA.debugLine="Dim bc As BitmapCreator"; + //BA.debugLineNum = 75;BA.debugLine="Dim bc As BitmapCreator"; _bc = new b4a.example.bitmapcreator(); -RDebugUtils.currentLine=62849030; - //BA.debugLineNum = 62849030;BA.debugLine="bc.Initialize(2 * r + g + 3dip, 2 * r + l + g)"; + //BA.debugLineNum = 76;BA.debugLine="bc.Initialize(2 * r + g + 3dip, 2 * r + l + g)"; _bc._initialize(ba,(int) (2*_r+_g+__c.DipToCurrent((int) (3))),(int) (2*_r+_l+_g)); -RDebugUtils.currentLine=62849031; - //BA.debugLineNum = 62849031;BA.debugLine="p.Initialize(r - l + g, 2 * r - 2dip + g)"; + //BA.debugLineNum = 77;BA.debugLine="p.Initialize(r - l + g, 2 * r - 2dip + g)"; _p._initialize(ba,(float) (_r-_l+_g),(float) (2*_r-__c.DipToCurrent((int) (2))+_g)); -RDebugUtils.currentLine=62849032; - //BA.debugLineNum = 62849032;BA.debugLine="p.LineTo(r + l + g, 2 * r - 2dip + g)"; + //BA.debugLineNum = 78;BA.debugLine="p.LineTo(r + l + g, 2 * r - 2dip + g)"; _p._lineto((float) (_r+_l+_g),(float) (2*_r-__c.DipToCurrent((int) (2))+_g)); -RDebugUtils.currentLine=62849033; - //BA.debugLineNum = 62849033;BA.debugLine="p.LineTo(r + g, 2 * r + l + g)"; + //BA.debugLineNum = 79;BA.debugLine="p.LineTo(r + g, 2 * r + l + g)"; _p._lineto((float) (_r+_g),(float) (2*_r+_l+_g)); -RDebugUtils.currentLine=62849034; - //BA.debugLineNum = 62849034;BA.debugLine="p.LineTo(r - l + g, 2 * r - 2dip + g)"; + //BA.debugLineNum = 80;BA.debugLine="p.LineTo(r - l + g, 2 * r - 2dip + g)"; _p._lineto((float) (_r-_l+_g),(float) (2*_r-__c.DipToCurrent((int) (2))+_g)); -RDebugUtils.currentLine=62849035; - //BA.debugLineNum = 62849035;BA.debugLine="bc.DrawPath(p, mThumbBorderColor, True, 0)"; -_bc._drawpath(_p,__ref._mthumbbordercolor /*int*/ ,__c.True,(int) (0)); -RDebugUtils.currentLine=62849036; - //BA.debugLineNum = 62849036;BA.debugLine="bc.DrawCircle(r + g, r + g, r, mThumbInnerColor,"; -_bc._drawcircle((float) (_r+_g),(float) (_r+_g),(float) (_r),__ref._mthumbinnercolor /*int*/ ,__c.True,(int) (0)); -RDebugUtils.currentLine=62849037; - //BA.debugLineNum = 62849037;BA.debugLine="bc.DrawCircle(r + g, r + g, r, mThumbBorderColor,"; -_bc._drawcircle((float) (_r+_g),(float) (_r+_g),(float) (_r),__ref._mthumbbordercolor /*int*/ ,__c.False,__c.DipToCurrent((int) (10))); -RDebugUtils.currentLine=62849038; - //BA.debugLineNum = 62849038;BA.debugLine="thumb = bc.Bitmap"; -__ref._thumb /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ = _bc._getbitmap(); -RDebugUtils.currentLine=62849039; - //BA.debugLineNum = 62849039;BA.debugLine="ThumbSize = thumb.Height / 4"; -__ref._thumbsize /*int*/ = (int) (__ref._thumb /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ .getHeight()/(double)4); -RDebugUtils.currentLine=62849040; - //BA.debugLineNum = 62849040;BA.debugLine="xlbl.SetTextAlignment(\"CENTER\", \"CENTER\")"; -__ref._xlbl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetTextAlignment("CENTER","CENTER"); -RDebugUtils.currentLine=62849041; - //BA.debugLineNum = 62849041;BA.debugLine="End Sub"; + //BA.debugLineNum = 81;BA.debugLine="bc.DrawPath(p, mThumbBorderColor, True, 0)"; +_bc._drawpath(_p,_mthumbbordercolor,__c.True,(int) (0)); + //BA.debugLineNum = 82;BA.debugLine="bc.DrawCircle(r + g, r + g, r, mThumbInnerColor,"; +_bc._drawcircle((float) (_r+_g),(float) (_r+_g),(float) (_r),_mthumbinnercolor,__c.True,(int) (0)); + //BA.debugLineNum = 83;BA.debugLine="bc.DrawCircle(r + g, r + g, r, mThumbBorderColor,"; +_bc._drawcircle((float) (_r+_g),(float) (_r+_g),(float) (_r),_mthumbbordercolor,__c.False,__c.DipToCurrent((int) (10))); + //BA.debugLineNum = 84;BA.debugLine="thumb = bc.Bitmap"; +_thumb = _bc._getbitmap(); + //BA.debugLineNum = 85;BA.debugLine="ThumbSize = thumb.Height / 4"; +_thumbsize = (int) (_thumb.getHeight()/(double)4); + //BA.debugLineNum = 86;BA.debugLine="xlbl.SetTextAlignment(\"CENTER\", \"CENTER\")"; +_xlbl.SetTextAlignment("CENTER","CENTER"); + //BA.debugLineNum = 87;BA.debugLine="End Sub"; return ""; } -public String _draw(keymon.lat.medicomed.roundslider __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="roundslider"; -if (Debug.shouldDelegate(ba, "draw", true)) - {return ((String) Debug.delegate(ba, "draw", null));} +public String _designercreateview(Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ + //BA.debugLineNum = 35;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; + //BA.debugLineNum = 36;BA.debugLine="mBase = Base"; +_mbase = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); + //BA.debugLineNum = 37;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_tag = _mbase.getTag(); + //BA.debugLineNum = 37;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_mbase.setTag(this); + //BA.debugLineNum = 38;BA.debugLine="cvs.Initialize(mBase)"; +_cvs.Initialize(_mbase); + //BA.debugLineNum = 39;BA.debugLine="mMin = Props.Get(\"Min\")"; +_mmin = (int)(BA.ObjectToNumber(_props.Get((Object)("Min")))); + //BA.debugLineNum = 40;BA.debugLine="mMax = Props.Get(\"Max\")"; +_mmax = (int)(BA.ObjectToNumber(_props.Get((Object)("Max")))); + //BA.debugLineNum = 41;BA.debugLine="mValue = mMin"; +_mvalue = _mmin; + //BA.debugLineNum = 42;BA.debugLine="pnl = xui.CreatePanel(\"pnl\")"; +_pnl = _xui.CreatePanel(ba,"pnl"); + //BA.debugLineNum = 43;BA.debugLine="xlbl = Lbl"; +_xlbl = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lbl.getObject())); + //BA.debugLineNum = 44;BA.debugLine="xlbl.Visible = True"; +_xlbl.setVisible(__c.True); + //BA.debugLineNum = 45;BA.debugLine="mBase.AddView(xlbl, 0, 0, 0, 0)"; +_mbase.AddView((android.view.View)(_xlbl.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 46;BA.debugLine="mBase.AddView(pnl, 0, 0, 0, 0)"; +_mbase.AddView((android.view.View)(_pnl.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 47;BA.debugLine="ValueColor = xui.PaintOrColorToColor(Props.Get(\"V"; +_valuecolor = _xui.PaintOrColorToColor(_props.Get((Object)("ValueColor"))); + //BA.debugLineNum = 48;BA.debugLine="mRollOver = Props.GetDefault(\"RollOver\", False)"; +_mrollover = BA.ObjectToBoolean(_props.GetDefault((Object)("RollOver"),(Object)(__c.False))); + //BA.debugLineNum = 49;BA.debugLine="If xui.IsB4A Or xui.IsB4i Then"; +if (_xui.getIsB4A() || _xui.getIsB4i()) { + //BA.debugLineNum = 50;BA.debugLine="stroke = 8dip"; +_stroke = __c.DipToCurrent((int) (8)); + }else if(_xui.getIsB4J()) { + //BA.debugLineNum = 52;BA.debugLine="stroke = 6dip"; +_stroke = __c.DipToCurrent((int) (6)); + }; + //BA.debugLineNum = 54;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; +_base_resize(_mbase.getWidth(),_mbase.getHeight()); + //BA.debugLineNum = 55;BA.debugLine="End Sub"; +return ""; +} +public String _draw() throws Exception{ int _radius = 0; anywheresoftware.b4a.objects.B4XCanvas.B4XPath _p = null; int _angle = 0; @@ -171,415 +215,178 @@ anywheresoftware.b4a.objects.B4XCanvas.B4XRect _dest = null; int _r = 0; int _cx = 0; int _cy = 0; -RDebugUtils.currentLine=62980096; - //BA.debugLineNum = 62980096;BA.debugLine="Public Sub Draw"; -RDebugUtils.currentLine=62980097; - //BA.debugLineNum = 62980097;BA.debugLine="cvs.ClearRect(cvs.TargetRect)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .ClearRect(__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect()); -RDebugUtils.currentLine=62980098; - //BA.debugLineNum = 62980098;BA.debugLine="Dim radius As Int = CircleRect.Width / 2"; -_radius = (int) (__ref._circlerect /*anywheresoftware.b4a.objects.B4XCanvas.B4XRect*/ .getWidth()/(double)2); -RDebugUtils.currentLine=62980099; - //BA.debugLineNum = 62980099;BA.debugLine="cvs.DrawCircle(CircleRect.CenterX, CircleRect.Cen"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawCircle(__ref._circlerect /*anywheresoftware.b4a.objects.B4XCanvas.B4XRect*/ .getCenterX(),__ref._circlerect /*anywheresoftware.b4a.objects.B4XCanvas.B4XRect*/ .getCenterY(),(float) (_radius),__ref._mcirclenonvaluecolor /*int*/ ,__c.False,(float) (__ref._stroke /*int*/ )); -RDebugUtils.currentLine=62980100; - //BA.debugLineNum = 62980100;BA.debugLine="Dim p As B4XPath"; + //BA.debugLineNum = 98;BA.debugLine="Public Sub Draw"; + //BA.debugLineNum = 99;BA.debugLine="cvs.ClearRect(cvs.TargetRect)"; +_cvs.ClearRect(_cvs.getTargetRect()); + //BA.debugLineNum = 100;BA.debugLine="Dim radius As Int = CircleRect.Width / 2"; +_radius = (int) (_circlerect.getWidth()/(double)2); + //BA.debugLineNum = 101;BA.debugLine="cvs.DrawCircle(CircleRect.CenterX, CircleRect.Cen"; +_cvs.DrawCircle(_circlerect.getCenterX(),_circlerect.getCenterY(),(float) (_radius),_mcirclenonvaluecolor,__c.False,(float) (_stroke)); + //BA.debugLineNum = 102;BA.debugLine="Dim p As B4XPath"; _p = new anywheresoftware.b4a.objects.B4XCanvas.B4XPath(); -RDebugUtils.currentLine=62980101; - //BA.debugLineNum = 62980101;BA.debugLine="Dim angle As Int = (mValue - mMin) / (mMax - mMin"; -_angle = (int) ((__ref._mvalue /*int*/ -__ref._mmin /*int*/ )/(double)(__ref._mmax /*int*/ -__ref._mmin /*int*/ )*360); -RDebugUtils.currentLine=62980102; - //BA.debugLineNum = 62980102;BA.debugLine="Dim B4JStrokeOffset As Int"; + //BA.debugLineNum = 103;BA.debugLine="Dim angle As Int = (mValue - mMin) / (mMax - mMin"; +_angle = (int) ((_mvalue-_mmin)/(double)(_mmax-_mmin)*360); + //BA.debugLineNum = 104;BA.debugLine="Dim B4JStrokeOffset As Int"; _b4jstrokeoffset = 0; -RDebugUtils.currentLine=62980103; - //BA.debugLineNum = 62980103;BA.debugLine="If xui.IsB4J Then B4JStrokeOffset = stroke / 2"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4J()) { -_b4jstrokeoffset = (int) (__ref._stroke /*int*/ /(double)2);}; -RDebugUtils.currentLine=62980104; - //BA.debugLineNum = 62980104;BA.debugLine="If mValue = mMax Then"; -if (__ref._mvalue /*int*/ ==__ref._mmax /*int*/ ) { -RDebugUtils.currentLine=62980105; - //BA.debugLineNum = 62980105;BA.debugLine="cvs.DrawCircle(CircleRect.CenterX, CircleRect.Ce"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawCircle(__ref._circlerect /*anywheresoftware.b4a.objects.B4XCanvas.B4XRect*/ .getCenterX(),__ref._circlerect /*anywheresoftware.b4a.objects.B4XCanvas.B4XRect*/ .getCenterY(),(float) (_radius),__ref._valuecolor /*int*/ ,__c.False,(float) (__ref._stroke /*int*/ )); + //BA.debugLineNum = 105;BA.debugLine="If xui.IsB4J Then B4JStrokeOffset = stroke / 2"; +if (_xui.getIsB4J()) { +_b4jstrokeoffset = (int) (_stroke/(double)2);}; + //BA.debugLineNum = 106;BA.debugLine="If mValue = mMax Then"; +if (_mvalue==_mmax) { + //BA.debugLineNum = 107;BA.debugLine="cvs.DrawCircle(CircleRect.CenterX, CircleRect.Ce"; +_cvs.DrawCircle(_circlerect.getCenterX(),_circlerect.getCenterY(),(float) (_radius),_valuecolor,__c.False,(float) (_stroke)); }else { -RDebugUtils.currentLine=62980107; - //BA.debugLineNum = 62980107;BA.debugLine="p.InitializeArc(CircleRect.CenterX, CircleRect.C"; -_p.InitializeArc(__ref._circlerect /*anywheresoftware.b4a.objects.B4XCanvas.B4XRect*/ .getCenterX(),__ref._circlerect /*anywheresoftware.b4a.objects.B4XCanvas.B4XRect*/ .getCenterY(),(float) (_radius+_b4jstrokeoffset),(float) (-90),(float) (_angle)); -RDebugUtils.currentLine=62980108; - //BA.debugLineNum = 62980108;BA.debugLine="cvs.DrawPath(p, ValueColor, False, stroke)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawPath(_p,__ref._valuecolor /*int*/ ,__c.False,(float) (__ref._stroke /*int*/ )); + //BA.debugLineNum = 109;BA.debugLine="p.InitializeArc(CircleRect.CenterX, CircleRect.C"; +_p.InitializeArc(_circlerect.getCenterX(),_circlerect.getCenterY(),(float) (_radius+_b4jstrokeoffset),(float) (-90),(float) (_angle)); + //BA.debugLineNum = 110;BA.debugLine="cvs.DrawPath(p, ValueColor, False, stroke)"; +_cvs.DrawPath(_p,_valuecolor,__c.False,(float) (_stroke)); }; -RDebugUtils.currentLine=62980110; - //BA.debugLineNum = 62980110;BA.debugLine="cvs.DrawCircle(CircleRect.CenterX, CircleRect.Cen"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawCircle(__ref._circlerect /*anywheresoftware.b4a.objects.B4XCanvas.B4XRect*/ .getCenterX(),__ref._circlerect /*anywheresoftware.b4a.objects.B4XCanvas.B4XRect*/ .getCenterY(),(float) (_radius-_b4jstrokeoffset),__ref._mcirclefillcolor /*int*/ ,__c.True,(float) (0)); -RDebugUtils.currentLine=62980111; - //BA.debugLineNum = 62980111;BA.debugLine="Dim dest As B4XRect"; + //BA.debugLineNum = 112;BA.debugLine="cvs.DrawCircle(CircleRect.CenterX, CircleRect.Cen"; +_cvs.DrawCircle(_circlerect.getCenterX(),_circlerect.getCenterY(),(float) (_radius-_b4jstrokeoffset),_mcirclefillcolor,__c.True,(float) (0)); + //BA.debugLineNum = 113;BA.debugLine="Dim dest As B4XRect"; _dest = new anywheresoftware.b4a.objects.B4XCanvas.B4XRect(); -RDebugUtils.currentLine=62980112; - //BA.debugLineNum = 62980112;BA.debugLine="Dim r As Int = radius + ThumbSize / 2 + stroke /"; -_r = (int) (_radius+__ref._thumbsize /*int*/ /(double)2+__ref._stroke /*int*/ /(double)2); -RDebugUtils.currentLine=62980113; - //BA.debugLineNum = 62980113;BA.debugLine="Dim cx As Int = CircleRect.CenterX + r * CosD(ang"; -_cx = (int) (__ref._circlerect /*anywheresoftware.b4a.objects.B4XCanvas.B4XRect*/ .getCenterX()+_r*__c.CosD(_angle-90)); -RDebugUtils.currentLine=62980114; - //BA.debugLineNum = 62980114;BA.debugLine="Dim cy As Int = CircleRect.CenterY + r * SinD(ang"; -_cy = (int) (__ref._circlerect /*anywheresoftware.b4a.objects.B4XCanvas.B4XRect*/ .getCenterY()+_r*__c.SinD(_angle-90)); -RDebugUtils.currentLine=62980115; - //BA.debugLineNum = 62980115;BA.debugLine="dest.Initialize(cx - thumb.Width / 8, cy - ThumbS"; -_dest.Initialize((float) (_cx-__ref._thumb /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ .getWidth()/(double)8),(float) (_cy-__ref._thumbsize /*int*/ /(double)2),(float) (_cx+__ref._thumb /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ .getWidth()/(double)8),(float) (_cy+__ref._thumbsize /*int*/ /(double)2)); -RDebugUtils.currentLine=62980116; - //BA.debugLineNum = 62980116;BA.debugLine="cvs.DrawBitmapRotated(thumb, dest, angle)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawBitmapRotated((android.graphics.Bitmap)(__ref._thumb /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper*/ .getObject()),_dest,(float) (_angle)); -RDebugUtils.currentLine=62980117; - //BA.debugLineNum = 62980117;BA.debugLine="cvs.Invalidate"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Invalidate(); -RDebugUtils.currentLine=62980118; - //BA.debugLineNum = 62980118;BA.debugLine="xlbl.Text = mValue"; -__ref._xlbl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setText(BA.ObjectToCharSequence(__ref._mvalue /*int*/ )); -RDebugUtils.currentLine=62980119; - //BA.debugLineNum = 62980119;BA.debugLine="End Sub"; + //BA.debugLineNum = 114;BA.debugLine="Dim r As Int = radius + ThumbSize / 2 + stroke /"; +_r = (int) (_radius+_thumbsize/(double)2+_stroke/(double)2); + //BA.debugLineNum = 115;BA.debugLine="Dim cx As Int = CircleRect.CenterX + r * CosD(ang"; +_cx = (int) (_circlerect.getCenterX()+_r*__c.CosD(_angle-90)); + //BA.debugLineNum = 116;BA.debugLine="Dim cy As Int = CircleRect.CenterY + r * SinD(ang"; +_cy = (int) (_circlerect.getCenterY()+_r*__c.SinD(_angle-90)); + //BA.debugLineNum = 117;BA.debugLine="dest.Initialize(cx - thumb.Width / 8, cy - ThumbS"; +_dest.Initialize((float) (_cx-_thumb.getWidth()/(double)8),(float) (_cy-_thumbsize/(double)2),(float) (_cx+_thumb.getWidth()/(double)8),(float) (_cy+_thumbsize/(double)2)); + //BA.debugLineNum = 118;BA.debugLine="cvs.DrawBitmapRotated(thumb, dest, angle)"; +_cvs.DrawBitmapRotated((android.graphics.Bitmap)(_thumb.getObject()),_dest,(float) (_angle)); + //BA.debugLineNum = 119;BA.debugLine="cvs.Invalidate"; +_cvs.Invalidate(); + //BA.debugLineNum = 120;BA.debugLine="xlbl.Text = mValue"; +_xlbl.setText(BA.ObjectToCharSequence(_mvalue)); + //BA.debugLineNum = 121;BA.debugLine="End Sub"; return ""; } -public String _class_globals(keymon.lat.medicomed.roundslider __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="roundslider"; -RDebugUtils.currentLine=62521344; - //BA.debugLineNum = 62521344;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=62521345; - //BA.debugLineNum = 62521345;BA.debugLine="Private mEventName As String 'ignore"; -_meventname = ""; -RDebugUtils.currentLine=62521346; - //BA.debugLineNum = 62521346;BA.debugLine="Private mCallBack As Object 'ignore"; -_mcallback = new Object(); -RDebugUtils.currentLine=62521347; - //BA.debugLineNum = 62521347;BA.debugLine="Public mBase As B4XView 'ignore"; -_mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=62521348; - //BA.debugLineNum = 62521348;BA.debugLine="Private xui As XUI 'ignore"; -_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=62521349; - //BA.debugLineNum = 62521349;BA.debugLine="Private cvs As B4XCanvas"; -_cvs = new anywheresoftware.b4a.objects.B4XCanvas(); -RDebugUtils.currentLine=62521350; - //BA.debugLineNum = 62521350;BA.debugLine="Private mValue As Int = 75"; -_mvalue = (int) (75); -RDebugUtils.currentLine=62521351; - //BA.debugLineNum = 62521351;BA.debugLine="Private mMin, mMax As Int"; -_mmin = 0; -_mmax = 0; -RDebugUtils.currentLine=62521352; - //BA.debugLineNum = 62521352;BA.debugLine="Private thumb As B4XBitmap"; -_thumb = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper(); -RDebugUtils.currentLine=62521353; - //BA.debugLineNum = 62521353;BA.debugLine="Private pnl As B4XView"; -_pnl = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=62521354; - //BA.debugLineNum = 62521354;BA.debugLine="Private xlbl As B4XView"; -_xlbl = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=62521355; - //BA.debugLineNum = 62521355;BA.debugLine="Private CircleRect As B4XRect"; -_circlerect = new anywheresoftware.b4a.objects.B4XCanvas.B4XRect(); -RDebugUtils.currentLine=62521356; - //BA.debugLineNum = 62521356;BA.debugLine="Private ValueColor As Int"; -_valuecolor = 0; -RDebugUtils.currentLine=62521357; - //BA.debugLineNum = 62521357;BA.debugLine="Private stroke As Int"; -_stroke = 0; -RDebugUtils.currentLine=62521358; - //BA.debugLineNum = 62521358;BA.debugLine="Private ThumbSize As Int"; -_thumbsize = 0; -RDebugUtils.currentLine=62521359; - //BA.debugLineNum = 62521359;BA.debugLine="Public Tag As Object"; -_tag = new Object(); -RDebugUtils.currentLine=62521360; - //BA.debugLineNum = 62521360;BA.debugLine="Private mThumbBorderColor As Int = 0xFF5B5B5B"; -_mthumbbordercolor = ((int)0xff5b5b5b); -RDebugUtils.currentLine=62521361; - //BA.debugLineNum = 62521361;BA.debugLine="Private mThumbInnerColor As Int = xui.Color_White"; -_mthumbinnercolor = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_White; -RDebugUtils.currentLine=62521362; - //BA.debugLineNum = 62521362;BA.debugLine="Private mCircleFillColor As Int = xui.Color_White"; -_mcirclefillcolor = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_White; -RDebugUtils.currentLine=62521363; - //BA.debugLineNum = 62521363;BA.debugLine="Private mCircleNonValueColor As Int = 0xFFB6B6B6"; -_mcirclenonvaluecolor = ((int)0xffb6b6b6); -RDebugUtils.currentLine=62521364; - //BA.debugLineNum = 62521364;BA.debugLine="Private mRollOver As Boolean"; -_mrollover = false; -RDebugUtils.currentLine=62521365; - //BA.debugLineNum = 62521365;BA.debugLine="End Sub"; -return ""; -} -public String _designercreateview(keymon.lat.medicomed.roundslider __ref,Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ -__ref = this; -RDebugUtils.currentModule="roundslider"; -if (Debug.shouldDelegate(ba, "designercreateview", true)) - {return ((String) Debug.delegate(ba, "designercreateview", new Object[] {_base,_lbl,_props}));} -RDebugUtils.currentLine=62652416; - //BA.debugLineNum = 62652416;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; -RDebugUtils.currentLine=62652417; - //BA.debugLineNum = 62652417;BA.debugLine="mBase = Base"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); -RDebugUtils.currentLine=62652418; - //BA.debugLineNum = 62652418;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._tag /*Object*/ = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getTag(); -RDebugUtils.currentLine=62652418; - //BA.debugLineNum = 62652418;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag(this); -RDebugUtils.currentLine=62652419; - //BA.debugLineNum = 62652419;BA.debugLine="cvs.Initialize(mBase)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Initialize(__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ); -RDebugUtils.currentLine=62652420; - //BA.debugLineNum = 62652420;BA.debugLine="mMin = Props.Get(\"Min\")"; -__ref._mmin /*int*/ = (int)(BA.ObjectToNumber(_props.Get((Object)("Min")))); -RDebugUtils.currentLine=62652421; - //BA.debugLineNum = 62652421;BA.debugLine="mMax = Props.Get(\"Max\")"; -__ref._mmax /*int*/ = (int)(BA.ObjectToNumber(_props.Get((Object)("Max")))); -RDebugUtils.currentLine=62652422; - //BA.debugLineNum = 62652422;BA.debugLine="mValue = mMin"; -__ref._mvalue /*int*/ = __ref._mmin /*int*/ ; -RDebugUtils.currentLine=62652423; - //BA.debugLineNum = 62652423;BA.debugLine="pnl = xui.CreatePanel(\"pnl\")"; -__ref._pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,"pnl"); -RDebugUtils.currentLine=62652424; - //BA.debugLineNum = 62652424;BA.debugLine="xlbl = Lbl"; -__ref._xlbl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lbl.getObject())); -RDebugUtils.currentLine=62652425; - //BA.debugLineNum = 62652425;BA.debugLine="xlbl.Visible = True"; -__ref._xlbl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=62652426; - //BA.debugLineNum = 62652426;BA.debugLine="mBase.AddView(xlbl, 0, 0, 0, 0)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._xlbl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=62652427; - //BA.debugLineNum = 62652427;BA.debugLine="mBase.AddView(pnl, 0, 0, 0, 0)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=62652428; - //BA.debugLineNum = 62652428;BA.debugLine="ValueColor = xui.PaintOrColorToColor(Props.Get(\"V"; -__ref._valuecolor /*int*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor(_props.Get((Object)("ValueColor"))); -RDebugUtils.currentLine=62652429; - //BA.debugLineNum = 62652429;BA.debugLine="mRollOver = Props.GetDefault(\"RollOver\", False)"; -__ref._mrollover /*boolean*/ = BA.ObjectToBoolean(_props.GetDefault((Object)("RollOver"),(Object)(__c.False))); -RDebugUtils.currentLine=62652430; - //BA.debugLineNum = 62652430;BA.debugLine="If xui.IsB4A Or xui.IsB4i Then"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4A() || __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4i()) { -RDebugUtils.currentLine=62652431; - //BA.debugLineNum = 62652431;BA.debugLine="stroke = 8dip"; -__ref._stroke /*int*/ = __c.DipToCurrent((int) (8)); - }else -{RDebugUtils.currentLine=62652432; - //BA.debugLineNum = 62652432;BA.debugLine="Else If xui.IsB4J Then"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .getIsB4J()) { -RDebugUtils.currentLine=62652433; - //BA.debugLineNum = 62652433;BA.debugLine="stroke = 6dip"; -__ref._stroke /*int*/ = __c.DipToCurrent((int) (6)); - }} -; -RDebugUtils.currentLine=62652435; - //BA.debugLineNum = 62652435;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; -__ref._base_resize /*String*/ (null,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=62652436; - //BA.debugLineNum = 62652436;BA.debugLine="End Sub"; -return ""; -} -public int _getvalue(keymon.lat.medicomed.roundslider __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="roundslider"; -if (Debug.shouldDelegate(ba, "getvalue", true)) - {return ((Integer) Debug.delegate(ba, "getvalue", null));} -RDebugUtils.currentLine=63242240; - //BA.debugLineNum = 63242240;BA.debugLine="Public Sub getValue As Int"; -RDebugUtils.currentLine=63242241; - //BA.debugLineNum = 63242241;BA.debugLine="Return mValue"; -if (true) return __ref._mvalue /*int*/ ; -RDebugUtils.currentLine=63242242; - //BA.debugLineNum = 63242242;BA.debugLine="End Sub"; +public int _getvalue() throws Exception{ + //BA.debugLineNum = 182;BA.debugLine="Public Sub getValue As Int"; + //BA.debugLineNum = 183;BA.debugLine="Return mValue"; +if (true) return _mvalue; + //BA.debugLineNum = 184;BA.debugLine="End Sub"; return 0; } -public String _initialize(keymon.lat.medicomed.roundslider __ref,anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ -__ref = this; +public String _initialize(anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ innerInitialize(_ba); -RDebugUtils.currentModule="roundslider"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_callback,_eventname}));} -RDebugUtils.currentLine=62586880; - //BA.debugLineNum = 62586880;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -RDebugUtils.currentLine=62586881; - //BA.debugLineNum = 62586881;BA.debugLine="mEventName = EventName"; -__ref._meventname /*String*/ = _eventname; -RDebugUtils.currentLine=62586882; - //BA.debugLineNum = 62586882;BA.debugLine="mCallBack = Callback"; -__ref._mcallback /*Object*/ = _callback; -RDebugUtils.currentLine=62586883; - //BA.debugLineNum = 62586883;BA.debugLine="End Sub"; + //BA.debugLineNum = 29;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; + //BA.debugLineNum = 30;BA.debugLine="mEventName = EventName"; +_meventname = _eventname; + //BA.debugLineNum = 31;BA.debugLine="mCallBack = Callback"; +_mcallback = _callback; + //BA.debugLineNum = 32;BA.debugLine="End Sub"; return ""; } -public String _pnl_touch(keymon.lat.medicomed.roundslider __ref,int _action,float _x,float _y) throws Exception{ -__ref = this; -RDebugUtils.currentModule="roundslider"; -if (Debug.shouldDelegate(ba, "pnl_touch", true)) - {return ((String) Debug.delegate(ba, "pnl_touch", new Object[] {_action,_x,_y}));} +public String _pnl_touch(int _action,float _x,float _y) throws Exception{ int _dx = 0; int _dy = 0; float _dist = 0f; int _angle = 0; int _newvalue = 0; -RDebugUtils.currentLine=63045632; - //BA.debugLineNum = 63045632;BA.debugLine="Private Sub pnl_Touch (Action As Int, X As Float,"; -RDebugUtils.currentLine=63045633; - //BA.debugLineNum = 63045633;BA.debugLine="If Action = pnl.TOUCH_ACTION_MOVE_NOTOUCH Then Re"; -if (_action==__ref._pnl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .TOUCH_ACTION_MOVE_NOTOUCH) { + //BA.debugLineNum = 123;BA.debugLine="Private Sub pnl_Touch (Action As Int, X As Float,"; + //BA.debugLineNum = 124;BA.debugLine="If Action = pnl.TOUCH_ACTION_MOVE_NOTOUCH Then Re"; +if (_action==_pnl.TOUCH_ACTION_MOVE_NOTOUCH) { if (true) return "";}; -RDebugUtils.currentLine=63045634; - //BA.debugLineNum = 63045634;BA.debugLine="Dim dx As Int = x - CircleRect.CenterX"; -_dx = (int) (_x-__ref._circlerect /*anywheresoftware.b4a.objects.B4XCanvas.B4XRect*/ .getCenterX()); -RDebugUtils.currentLine=63045635; - //BA.debugLineNum = 63045635;BA.debugLine="Dim dy As Int = y - CircleRect.CenterY"; -_dy = (int) (_y-__ref._circlerect /*anywheresoftware.b4a.objects.B4XCanvas.B4XRect*/ .getCenterY()); -RDebugUtils.currentLine=63045636; - //BA.debugLineNum = 63045636;BA.debugLine="Dim dist As Float = Sqrt(Power(dx, 2) + Power(dy,"; + //BA.debugLineNum = 125;BA.debugLine="Dim dx As Int = x - CircleRect.CenterX"; +_dx = (int) (_x-_circlerect.getCenterX()); + //BA.debugLineNum = 126;BA.debugLine="Dim dy As Int = y - CircleRect.CenterY"; +_dy = (int) (_y-_circlerect.getCenterY()); + //BA.debugLineNum = 127;BA.debugLine="Dim dist As Float = Sqrt(Power(dx, 2) + Power(dy,"; _dist = (float) (__c.Sqrt(__c.Power(_dx,2)+__c.Power(_dy,2))); -RDebugUtils.currentLine=63045637; - //BA.debugLineNum = 63045637;BA.debugLine="If dist > CircleRect.Width / 2 Then"; -if (_dist>__ref._circlerect /*anywheresoftware.b4a.objects.B4XCanvas.B4XRect*/ .getWidth()/(double)2) { -RDebugUtils.currentLine=63045638; - //BA.debugLineNum = 63045638;BA.debugLine="Dim angle As Int = Round(ATan2D(dy, dx))"; + //BA.debugLineNum = 128;BA.debugLine="If dist > CircleRect.Width / 2 Then"; +if (_dist>_circlerect.getWidth()/(double)2) { + //BA.debugLineNum = 129;BA.debugLine="Dim angle As Int = Round(ATan2D(dy, dx))"; _angle = (int) (__c.Round(__c.ATan2D(_dy,_dx))); -RDebugUtils.currentLine=63045639; - //BA.debugLineNum = 63045639;BA.debugLine="angle = angle + 90"; + //BA.debugLineNum = 130;BA.debugLine="angle = angle + 90"; _angle = (int) (_angle+90); -RDebugUtils.currentLine=63045640; - //BA.debugLineNum = 63045640;BA.debugLine="angle = (angle + 360) Mod 360"; + //BA.debugLineNum = 131;BA.debugLine="angle = (angle + 360) Mod 360"; _angle = (int) ((_angle+360)%360); -RDebugUtils.currentLine=63045641; - //BA.debugLineNum = 63045641;BA.debugLine="Dim NewValue As Int = mMin + angle / 360 * (mMax"; -_newvalue = (int) (__ref._mmin /*int*/ +_angle/(double)360*(__ref._mmax /*int*/ -__ref._mmin /*int*/ )); -RDebugUtils.currentLine=63045642; - //BA.debugLineNum = 63045642;BA.debugLine="NewValue = Max(mMin, Min(mMax, NewValue))"; -_newvalue = (int) (__c.Max(__ref._mmin /*int*/ ,__c.Min(__ref._mmax /*int*/ ,_newvalue))); -RDebugUtils.currentLine=63045643; - //BA.debugLineNum = 63045643;BA.debugLine="If NewValue <> mValue Then"; -if (_newvalue!=__ref._mvalue /*int*/ ) { -RDebugUtils.currentLine=63045644; - //BA.debugLineNum = 63045644;BA.debugLine="If mRollOver = False Then"; -if (__ref._mrollover /*boolean*/ ==__c.False) { -RDebugUtils.currentLine=63045645; - //BA.debugLineNum = 63045645;BA.debugLine="If Abs(NewValue - mValue) > (mMax - mMin) / 2"; -if (__c.Abs(_newvalue-__ref._mvalue /*int*/ )>(__ref._mmax /*int*/ -__ref._mmin /*int*/ )/(double)2) { -RDebugUtils.currentLine=63045646; - //BA.debugLineNum = 63045646;BA.debugLine="If mValue >= (mMax + mMin) / 2 Then"; -if (__ref._mvalue /*int*/ >=(__ref._mmax /*int*/ +__ref._mmin /*int*/ )/(double)2) { -RDebugUtils.currentLine=63045647; - //BA.debugLineNum = 63045647;BA.debugLine="mValue = mMax"; -__ref._mvalue /*int*/ = __ref._mmax /*int*/ ; + //BA.debugLineNum = 132;BA.debugLine="Dim NewValue As Int = mMin + angle / 360 * (mMax"; +_newvalue = (int) (_mmin+_angle/(double)360*(_mmax-_mmin)); + //BA.debugLineNum = 133;BA.debugLine="NewValue = Max(mMin, Min(mMax, NewValue))"; +_newvalue = (int) (__c.Max(_mmin,__c.Min(_mmax,_newvalue))); + //BA.debugLineNum = 134;BA.debugLine="If NewValue <> mValue Then"; +if (_newvalue!=_mvalue) { + //BA.debugLineNum = 135;BA.debugLine="If mRollOver = False Then"; +if (_mrollover==__c.False) { + //BA.debugLineNum = 136;BA.debugLine="If Abs(NewValue - mValue) > (mMax - mMin) / 2"; +if (__c.Abs(_newvalue-_mvalue)>(_mmax-_mmin)/(double)2) { + //BA.debugLineNum = 137;BA.debugLine="If mValue >= (mMax + mMin) / 2 Then"; +if (_mvalue>=(_mmax+_mmin)/(double)2) { + //BA.debugLineNum = 138;BA.debugLine="mValue = mMax"; +_mvalue = _mmax; }else { -RDebugUtils.currentLine=63045649; - //BA.debugLineNum = 63045649;BA.debugLine="mValue = mMin"; -__ref._mvalue /*int*/ = __ref._mmin /*int*/ ; + //BA.debugLineNum = 140;BA.debugLine="mValue = mMin"; +_mvalue = _mmin; }; }else { -RDebugUtils.currentLine=63045652; - //BA.debugLineNum = 63045652;BA.debugLine="mValue = NewValue"; -__ref._mvalue /*int*/ = _newvalue; + //BA.debugLineNum = 143;BA.debugLine="mValue = NewValue"; +_mvalue = _newvalue; }; }else { -RDebugUtils.currentLine=63045655; - //BA.debugLineNum = 63045655;BA.debugLine="mValue = NewValue"; -__ref._mvalue /*int*/ = _newvalue; + //BA.debugLineNum = 146;BA.debugLine="mValue = NewValue"; +_mvalue = _newvalue; }; -RDebugUtils.currentLine=63045657; - //BA.debugLineNum = 63045657;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_Valu"; -if (__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .SubExists(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_ValueChanged",(int) (1))) { -RDebugUtils.currentLine=63045658; - //BA.debugLineNum = 63045658;BA.debugLine="CallSub2(mCallBack, mEventName & \"_ValueChange"; -__c.CallSubNew2(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_ValueChanged",(Object)(__ref._mvalue /*int*/ )); + //BA.debugLineNum = 148;BA.debugLine="If xui.SubExists(mCallBack, mEventName & \"_Valu"; +if (_xui.SubExists(ba,_mcallback,_meventname+"_ValueChanged",(int) (1))) { + //BA.debugLineNum = 149;BA.debugLine="CallSub2(mCallBack, mEventName & \"_ValueChange"; +__c.CallSubNew2(ba,_mcallback,_meventname+"_ValueChanged",(Object)(_mvalue)); }; }; -RDebugUtils.currentLine=63045661; - //BA.debugLineNum = 63045661;BA.debugLine="Draw"; -__ref._draw /*String*/ (null); + //BA.debugLineNum = 152;BA.debugLine="Draw"; +_draw(); }; -RDebugUtils.currentLine=63045663; - //BA.debugLineNum = 63045663;BA.debugLine="End Sub"; + //BA.debugLineNum = 154;BA.debugLine="End Sub"; return ""; } -public String _setcirclecolor(keymon.lat.medicomed.roundslider __ref,int _nonvaluecolor,int _innercolor) throws Exception{ -__ref = this; -RDebugUtils.currentModule="roundslider"; -if (Debug.shouldDelegate(ba, "setcirclecolor", true)) - {return ((String) Debug.delegate(ba, "setcirclecolor", new Object[] {_nonvaluecolor,_innercolor}));} -RDebugUtils.currentLine=62783488; - //BA.debugLineNum = 62783488;BA.debugLine="Public Sub SetCircleColor (NonValueColor As Int, I"; -RDebugUtils.currentLine=62783489; - //BA.debugLineNum = 62783489;BA.debugLine="mCircleNonValueColor = NonValueColor"; -__ref._mcirclenonvaluecolor /*int*/ = _nonvaluecolor; -RDebugUtils.currentLine=62783490; - //BA.debugLineNum = 62783490;BA.debugLine="mCircleFillColor = InnerColor"; -__ref._mcirclefillcolor /*int*/ = _innercolor; -RDebugUtils.currentLine=62783491; - //BA.debugLineNum = 62783491;BA.debugLine="Draw"; -__ref._draw /*String*/ (null); -RDebugUtils.currentLine=62783492; - //BA.debugLineNum = 62783492;BA.debugLine="End Sub"; +public String _setcirclecolor(int _nonvaluecolor,int _innercolor) throws Exception{ + //BA.debugLineNum = 64;BA.debugLine="Public Sub SetCircleColor (NonValueColor As Int, I"; + //BA.debugLineNum = 65;BA.debugLine="mCircleNonValueColor = NonValueColor"; +_mcirclenonvaluecolor = _nonvaluecolor; + //BA.debugLineNum = 66;BA.debugLine="mCircleFillColor = InnerColor"; +_mcirclefillcolor = _innercolor; + //BA.debugLineNum = 67;BA.debugLine="Draw"; +_draw(); + //BA.debugLineNum = 68;BA.debugLine="End Sub"; return ""; } -public String _setrange(keymon.lat.medicomed.roundslider __ref,int _newmin,int _newmax) throws Exception{ -__ref = this; -RDebugUtils.currentModule="roundslider"; -if (Debug.shouldDelegate(ba, "setrange", true)) - {return ((String) Debug.delegate(ba, "setrange", new Object[] {_newmin,_newmax}));} -RDebugUtils.currentLine=63176704; - //BA.debugLineNum = 63176704;BA.debugLine="Public Sub SetRange(NewMin As Int, NewMax As Int)"; -RDebugUtils.currentLine=63176705; - //BA.debugLineNum = 63176705;BA.debugLine="mMin = NewMin"; -__ref._mmin /*int*/ = _newmin; -RDebugUtils.currentLine=63176706; - //BA.debugLineNum = 63176706;BA.debugLine="mMax = NewMax"; -__ref._mmax /*int*/ = _newmax; -RDebugUtils.currentLine=63176707; - //BA.debugLineNum = 63176707;BA.debugLine="setValue(mValue)"; -__ref._setvalue /*String*/ (null,__ref._mvalue /*int*/ ); -RDebugUtils.currentLine=63176708; - //BA.debugLineNum = 63176708;BA.debugLine="End Sub"; +public String _setrange(int _newmin,int _newmax) throws Exception{ + //BA.debugLineNum = 176;BA.debugLine="Public Sub SetRange(NewMin As Int, NewMax As Int)"; + //BA.debugLineNum = 177;BA.debugLine="mMin = NewMin"; +_mmin = _newmin; + //BA.debugLineNum = 178;BA.debugLine="mMax = NewMax"; +_mmax = _newmax; + //BA.debugLineNum = 179;BA.debugLine="setValue(mValue)"; +_setvalue(_mvalue); + //BA.debugLineNum = 180;BA.debugLine="End Sub"; return ""; } -public String _setvalue(keymon.lat.medicomed.roundslider __ref,int _v) throws Exception{ -__ref = this; -RDebugUtils.currentModule="roundslider"; -if (Debug.shouldDelegate(ba, "setvalue", true)) - {return ((String) Debug.delegate(ba, "setvalue", new Object[] {_v}));} -RDebugUtils.currentLine=63111168; - //BA.debugLineNum = 63111168;BA.debugLine="Public Sub setValue (v As Int)"; -RDebugUtils.currentLine=63111169; - //BA.debugLineNum = 63111169;BA.debugLine="mValue = Max(mMin, Min(mMax, v))"; -__ref._mvalue /*int*/ = (int) (__c.Max(__ref._mmin /*int*/ ,__c.Min(__ref._mmax /*int*/ ,_v))); -RDebugUtils.currentLine=63111170; - //BA.debugLineNum = 63111170;BA.debugLine="Draw"; -__ref._draw /*String*/ (null); -RDebugUtils.currentLine=63111171; - //BA.debugLineNum = 63111171;BA.debugLine="End Sub"; +public String _setthumbcolor(int _bordercolor,int _innercolor) throws Exception{ + //BA.debugLineNum = 57;BA.debugLine="Public Sub SetThumbColor(BorderColor As Int, Inner"; + //BA.debugLineNum = 58;BA.debugLine="mThumbBorderColor = BorderColor"; +_mthumbbordercolor = _bordercolor; + //BA.debugLineNum = 59;BA.debugLine="mThumbInnerColor = InnerColor"; +_mthumbinnercolor = _innercolor; + //BA.debugLineNum = 60;BA.debugLine="CreateThumb"; +_createthumb(); + //BA.debugLineNum = 61;BA.debugLine="Draw"; +_draw(); + //BA.debugLineNum = 62;BA.debugLine="End Sub"; return ""; } -public String _setthumbcolor(keymon.lat.medicomed.roundslider __ref,int _bordercolor,int _innercolor) throws Exception{ -__ref = this; -RDebugUtils.currentModule="roundslider"; -if (Debug.shouldDelegate(ba, "setthumbcolor", true)) - {return ((String) Debug.delegate(ba, "setthumbcolor", new Object[] {_bordercolor,_innercolor}));} -RDebugUtils.currentLine=62717952; - //BA.debugLineNum = 62717952;BA.debugLine="Public Sub SetThumbColor(BorderColor As Int, Inner"; -RDebugUtils.currentLine=62717953; - //BA.debugLineNum = 62717953;BA.debugLine="mThumbBorderColor = BorderColor"; -__ref._mthumbbordercolor /*int*/ = _bordercolor; -RDebugUtils.currentLine=62717954; - //BA.debugLineNum = 62717954;BA.debugLine="mThumbInnerColor = InnerColor"; -__ref._mthumbinnercolor /*int*/ = _innercolor; -RDebugUtils.currentLine=62717955; - //BA.debugLineNum = 62717955;BA.debugLine="CreateThumb"; -__ref._createthumb /*String*/ (null); -RDebugUtils.currentLine=62717956; - //BA.debugLineNum = 62717956;BA.debugLine="Draw"; -__ref._draw /*String*/ (null); -RDebugUtils.currentLine=62717957; - //BA.debugLineNum = 62717957;BA.debugLine="End Sub"; +public String _setvalue(int _v) throws Exception{ + //BA.debugLineNum = 170;BA.debugLine="Public Sub setValue (v As Int)"; + //BA.debugLineNum = 171;BA.debugLine="mValue = Max(mMin, Min(mMax, v))"; +_mvalue = (int) (__c.Max(_mmin,__c.Min(_mmax,_v))); + //BA.debugLineNum = 172;BA.debugLine="Draw"; +_draw(); + //BA.debugLineNum = 173;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/scrollinglabel.java b/B4A/Objects/src/keymon/lat/medicomed/scrollinglabel.java index 1ac4da7..b1b1fb7 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/scrollinglabel.java +++ b/B4A/Objects/src/keymon/lat/medicomed/scrollinglabel.java @@ -10,7 +10,7 @@ public class scrollinglabel extends B4AClass.ImplB4AClass implements BA.SubDeleg private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.scrollinglabel"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.scrollinglabel"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class scrollinglabel extends B4AClass.ImplB4AClass implements BA.SubDeleg 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.keywords.Common __c = null; public String _meventname = ""; public Object _mcallback = null; public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null; @@ -55,28 +48,115 @@ 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 _base_resize(keymon.lat.medicomed.scrollinglabel __ref,double _width,double _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="scrollinglabel"; -if (Debug.shouldDelegate(ba, "base_resize", true)) - {return ((String) Debug.delegate(ba, "base_resize", new Object[] {_width,_height}));} -RDebugUtils.currentLine=63504384; - //BA.debugLineNum = 63504384;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; -RDebugUtils.currentLine=63504385; - //BA.debugLineNum = 63504385;BA.debugLine="mBase.GetView(0).SetLayoutAnimated(0, 0, 0, Width"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .GetView((int) (0)).SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); -RDebugUtils.currentLine=63504386; - //BA.debugLineNum = 63504386;BA.debugLine="setText(mText)"; -__ref._settext /*String*/ (null,__ref._mtext /*String*/ ); -RDebugUtils.currentLine=63504387; - //BA.debugLineNum = 63504387;BA.debugLine="End Sub"; +public String _base_resize(double _width,double _height) throws Exception{ + //BA.debugLineNum = 40;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; + //BA.debugLineNum = 41;BA.debugLine="mBase.GetView(0).SetLayoutAnimated(0, 0, 0, Width"; +_mbase.GetView((int) (0)).SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); + //BA.debugLineNum = 42;BA.debugLine="setText(mText)"; +_settext(_mtext); + //BA.debugLineNum = 43;BA.debugLine="End Sub"; return ""; } -public String _settext(keymon.lat.medicomed.scrollinglabel __ref,String _t) throws Exception{ -__ref = this; -RDebugUtils.currentModule="scrollinglabel"; -if (Debug.shouldDelegate(ba, "settext", true)) - {return ((String) Debug.delegate(ba, "settext", new Object[] {_t}));} +public String _class_globals() throws Exception{ + //BA.debugLineNum = 2;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 3;BA.debugLine="Private mEventName As String 'ignore"; +_meventname = ""; + //BA.debugLineNum = 4;BA.debugLine="Private mCallBack As Object 'ignore"; +_mcallback = new Object(); + //BA.debugLineNum = 5;BA.debugLine="Public mBase As B4XView"; +_mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); + //BA.debugLineNum = 6;BA.debugLine="Private xui As XUI 'ignore"; +_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); + //BA.debugLineNum = 7;BA.debugLine="Private mText As String"; +_mtext = ""; + //BA.debugLineNum = 8;BA.debugLine="Private taskIndex As Int"; +_taskindex = 0; + //BA.debugLineNum = 9;BA.debugLine="Private fnt As B4XFont"; +_fnt = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont(); + //BA.debugLineNum = 10;BA.debugLine="Private cvs As B4XCanvas"; +_cvs = new anywheresoftware.b4a.objects.B4XCanvas(); + //BA.debugLineNum = 11;BA.debugLine="Public Tag As Object"; +_tag = new Object(); + //BA.debugLineNum = 12;BA.debugLine="Public WidthPerSecond As Int = 100dip"; +_widthpersecond = __c.DipToCurrent((int) (100)); + //BA.debugLineNum = 13;BA.debugLine="Public StartPositionDelay As Int = 1000"; +_startpositiondelay = (int) (1000); + //BA.debugLineNum = 14;BA.debugLine="Private mTextColor As Int = xui.Color_Black"; +_mtextcolor = _xui.Color_Black; + //BA.debugLineNum = 15;BA.debugLine="End Sub"; +return ""; +} +public String _designercreateview(Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ +anywheresoftware.b4a.objects.B4XViewWrapper _p = null; +anywheresoftware.b4a.objects.B4XViewWrapper _l = null; + //BA.debugLineNum = 23;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; + //BA.debugLineNum = 24;BA.debugLine="mBase = Base"; +_mbase = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); + //BA.debugLineNum = 25;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_tag = _mbase.getTag(); + //BA.debugLineNum = 25;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_mbase.setTag(this); + //BA.debugLineNum = 27;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"\")"; +_p = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_p = _xui.CreatePanel(ba,""); + //BA.debugLineNum = 28;BA.debugLine="mBase.AddView(p, 0, 0, mBase.Width, mBase.Height)"; +_mbase.AddView((android.view.View)(_p.getObject()),(int) (0),(int) (0),_mbase.getWidth(),_mbase.getHeight()); + //BA.debugLineNum = 29;BA.debugLine="mText = Lbl.Text"; +_mtext = _lbl.getText(); + //BA.debugLineNum = 30;BA.debugLine="Dim l As B4XView = Lbl"; +_l = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_l = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lbl.getObject())); + //BA.debugLineNum = 31;BA.debugLine="fnt = l.Font"; +_fnt = _l.getFont(); + //BA.debugLineNum = 32;BA.debugLine="mTextColor = l.TextColor"; +_mtextcolor = _l.getTextColor(); + //BA.debugLineNum = 33;BA.debugLine="If mTextColor = xui.Color_Transparent Then mTextC"; +if (_mtextcolor==_xui.Color_Transparent) { +_mtextcolor = _xui.Color_Black;}; + //BA.debugLineNum = 34;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"\")"; +_p = new anywheresoftware.b4a.objects.B4XViewWrapper(); +_p = _xui.CreatePanel(ba,""); + //BA.debugLineNum = 35;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, 2dip, 2dip)"; +_p.SetLayoutAnimated((int) (0),(int) (0),(int) (0),__c.DipToCurrent((int) (2)),__c.DipToCurrent((int) (2))); + //BA.debugLineNum = 36;BA.debugLine="cvs.Initialize(p)"; +_cvs.Initialize(_p); + //BA.debugLineNum = 37;BA.debugLine="setText(mText)"; +_settext(_mtext); + //BA.debugLineNum = 38;BA.debugLine="End Sub"; +return ""; +} +public String _gettext() throws Exception{ + //BA.debugLineNum = 93;BA.debugLine="Public Sub getText As String"; + //BA.debugLineNum = 94;BA.debugLine="Return mText"; +if (true) return _mtext; + //BA.debugLineNum = 95;BA.debugLine="End Sub"; +return ""; +} +public int _gettextcolor() throws Exception{ + //BA.debugLineNum = 126;BA.debugLine="Public Sub getTextColor As Int"; + //BA.debugLineNum = 127;BA.debugLine="Return mTextColor"; +if (true) return _mtextcolor; + //BA.debugLineNum = 128;BA.debugLine="End Sub"; +return 0; +} +public String _initialize(anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ +innerInitialize(_ba); + //BA.debugLineNum = 18;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; + //BA.debugLineNum = 19;BA.debugLine="mEventName = EventName"; +_meventname = _eventname; + //BA.debugLineNum = 20;BA.debugLine="mCallBack = Callback"; +_mcallback = _callback; + //BA.debugLineNum = 21;BA.debugLine="End Sub"; +return ""; +} +public float _measuretextwidth(String _s,anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont _font1) throws Exception{ + //BA.debugLineNum = 117;BA.debugLine="Private Sub MeasureTextWidth(s As String, font1 As"; + //BA.debugLineNum = 118;BA.debugLine="Return cvs.MeasureText(s, font1).Width"; +if (true) return _cvs.MeasureText(_s,_font1).getWidth(); + //BA.debugLineNum = 119;BA.debugLine="End Sub"; +return 0f; +} +public String _settext(String _t) throws Exception{ boolean _needtocreatenewlabel = false; anywheresoftware.b4a.objects.B4XViewWrapper _parent = null; anywheresoftware.b4a.objects.B4XViewWrapper _p = null; @@ -85,321 +165,109 @@ float _originaltextwidth = 0f; anywheresoftware.b4a.objects.LabelWrapper _lbl = null; String _duplicatetext = ""; float _width = 0f; -RDebugUtils.currentLine=63569920; - //BA.debugLineNum = 63569920;BA.debugLine="Public Sub setText(t As String)"; -RDebugUtils.currentLine=63569921; - //BA.debugLineNum = 63569921;BA.debugLine="Dim NeedToCreateNewLabel As Boolean = True"; + //BA.debugLineNum = 45;BA.debugLine="Public Sub setText(t As String)"; + //BA.debugLineNum = 46;BA.debugLine="Dim NeedToCreateNewLabel As Boolean = True"; _needtocreatenewlabel = __c.True; -RDebugUtils.currentLine=63569922; - //BA.debugLineNum = 63569922;BA.debugLine="Dim parent As B4XView = mBase.GetView(0)"; + //BA.debugLineNum = 47;BA.debugLine="Dim parent As B4XView = mBase.GetView(0)"; _parent = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_parent = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .GetView((int) (0)); -RDebugUtils.currentLine=63569923; - //BA.debugLineNum = 63569923;BA.debugLine="If parent.NumberOfViews > 0 Then"; +_parent = _mbase.GetView((int) (0)); + //BA.debugLineNum = 48;BA.debugLine="If parent.NumberOfViews > 0 Then"; if (_parent.getNumberOfViews()>0) { -RDebugUtils.currentLine=63569925; - //BA.debugLineNum = 63569925;BA.debugLine="Dim p As B4XView = parent.GetView(0)"; + //BA.debugLineNum = 50;BA.debugLine="Dim p As B4XView = parent.GetView(0)"; _p = new anywheresoftware.b4a.objects.B4XViewWrapper(); _p = _parent.GetView((int) (0)); -RDebugUtils.currentLine=63569926; - //BA.debugLineNum = 63569926;BA.debugLine="If p.Tag = \"static\" Then"; + //BA.debugLineNum = 51;BA.debugLine="If p.Tag = \"static\" Then"; if ((_p.getTag()).equals((Object)("static"))) { -RDebugUtils.currentLine=63569927; - //BA.debugLineNum = 63569927;BA.debugLine="NeedToCreateNewLabel = False"; + //BA.debugLineNum = 52;BA.debugLine="NeedToCreateNewLabel = False"; _needtocreatenewlabel = __c.False; -RDebugUtils.currentLine=63569928; - //BA.debugLineNum = 63569928;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, parent.Width, pare"; + //BA.debugLineNum = 53;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, parent.Width, pare"; _p.SetLayoutAnimated((int) (0),(int) (0),(int) (0),_parent.getWidth(),_parent.getHeight()); -RDebugUtils.currentLine=63569929; - //BA.debugLineNum = 63569929;BA.debugLine="Dim xlbl As B4XView = p.GetView(0)"; + //BA.debugLineNum = 54;BA.debugLine="Dim xlbl As B4XView = p.GetView(0)"; _xlbl = new anywheresoftware.b4a.objects.B4XViewWrapper(); _xlbl = _p.GetView((int) (0)); -RDebugUtils.currentLine=63569930; - //BA.debugLineNum = 63569930;BA.debugLine="xlbl.SetLayoutAnimated(0, 0, 0, parent.Width, p"; + //BA.debugLineNum = 55;BA.debugLine="xlbl.SetLayoutAnimated(0, 0, 0, parent.Width, p"; _xlbl.SetLayoutAnimated((int) (0),(int) (0),(int) (0),_parent.getWidth(),_parent.getHeight()); }; }; -RDebugUtils.currentLine=63569934; - //BA.debugLineNum = 63569934;BA.debugLine="Dim originalTextWidth As Float = MeasureTextWidth"; -_originaltextwidth = __ref._measuretextwidth /*float*/ (null,_t,__ref._fnt /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ ); -RDebugUtils.currentLine=63569935; - //BA.debugLineNum = 63569935;BA.debugLine="mText = t"; -__ref._mtext /*String*/ = _t; -RDebugUtils.currentLine=63569936; - //BA.debugLineNum = 63569936;BA.debugLine="If NeedToCreateNewLabel Then"; + //BA.debugLineNum = 59;BA.debugLine="Dim originalTextWidth As Float = MeasureTextWidth"; +_originaltextwidth = _measuretextwidth(_t,_fnt); + //BA.debugLineNum = 60;BA.debugLine="mText = t"; +_mtext = _t; + //BA.debugLineNum = 61;BA.debugLine="If NeedToCreateNewLabel Then"; if (_needtocreatenewlabel) { -RDebugUtils.currentLine=63569937; - //BA.debugLineNum = 63569937;BA.debugLine="parent.RemoveAllViews"; + //BA.debugLineNum = 62;BA.debugLine="parent.RemoveAllViews"; _parent.RemoveAllViews(); -RDebugUtils.currentLine=63569938; - //BA.debugLineNum = 63569938;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"\")"; + //BA.debugLineNum = 63;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"\")"; _p = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_p = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,""); -RDebugUtils.currentLine=63569939; - //BA.debugLineNum = 63569939;BA.debugLine="parent.AddView(p, 0, 0, parent.Width, parent.Hei"; +_p = _xui.CreatePanel(ba,""); + //BA.debugLineNum = 64;BA.debugLine="parent.AddView(p, 0, 0, parent.Width, parent.Hei"; _parent.AddView((android.view.View)(_p.getObject()),(int) (0),(int) (0),_parent.getWidth(),_parent.getHeight()); -RDebugUtils.currentLine=63569940; - //BA.debugLineNum = 63569940;BA.debugLine="Dim lbl As Label"; + //BA.debugLineNum = 65;BA.debugLine="Dim lbl As Label"; _lbl = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=63569941; - //BA.debugLineNum = 63569941;BA.debugLine="lbl.Initialize(\"\")"; + //BA.debugLineNum = 66;BA.debugLine="lbl.Initialize(\"\")"; _lbl.Initialize(ba,""); -RDebugUtils.currentLine=63569943; - //BA.debugLineNum = 63569943;BA.debugLine="lbl.SingleLine = True"; + //BA.debugLineNum = 68;BA.debugLine="lbl.SingleLine = True"; _lbl.setSingleLine(__c.True); -RDebugUtils.currentLine=63569944; - //BA.debugLineNum = 63569944;BA.debugLine="lbl.Padding = Array As Int(0, 0, 0, 0)"; + //BA.debugLineNum = 69;BA.debugLine="lbl.Padding = Array As Int(0, 0, 0, 0)"; _lbl.setPadding(new int[]{(int) (0),(int) (0),(int) (0),(int) (0)}); -RDebugUtils.currentLine=63569946; - //BA.debugLineNum = 63569946;BA.debugLine="Dim xlbl As B4XView = lbl"; + //BA.debugLineNum = 71;BA.debugLine="Dim xlbl As B4XView = lbl"; _xlbl = new anywheresoftware.b4a.objects.B4XViewWrapper(); _xlbl = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lbl.getObject())); -RDebugUtils.currentLine=63569947; - //BA.debugLineNum = 63569947;BA.debugLine="xlbl.SetTextAlignment(\"CENTER\", \"LEFT\")"; + //BA.debugLineNum = 72;BA.debugLine="xlbl.SetTextAlignment(\"CENTER\", \"LEFT\")"; _xlbl.SetTextAlignment("CENTER","LEFT"); -RDebugUtils.currentLine=63569948; - //BA.debugLineNum = 63569948;BA.debugLine="xlbl.Font = fnt"; -_xlbl.setFont(__ref._fnt /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ ); -RDebugUtils.currentLine=63569950; - //BA.debugLineNum = 63569950;BA.debugLine="p.AddView(xlbl, 0, 0, mBase.Width, mBase.Height)"; -_p.AddView((android.view.View)(_xlbl.getObject()),(int) (0),(int) (0),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); + //BA.debugLineNum = 73;BA.debugLine="xlbl.Font = fnt"; +_xlbl.setFont(_fnt); + //BA.debugLineNum = 75;BA.debugLine="p.AddView(xlbl, 0, 0, mBase.Width, mBase.Height)"; +_p.AddView((android.view.View)(_xlbl.getObject()),(int) (0),(int) (0),_mbase.getWidth(),_mbase.getHeight()); }; -RDebugUtils.currentLine=63569952; - //BA.debugLineNum = 63569952;BA.debugLine="xlbl.TextColor = mTextColor"; -_xlbl.setTextColor(__ref._mtextcolor /*int*/ ); -RDebugUtils.currentLine=63569953; - //BA.debugLineNum = 63569953;BA.debugLine="If originalTextWidth <= mBase.Width Then"; -if (_originaltextwidth<=__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()) { -RDebugUtils.currentLine=63569954; - //BA.debugLineNum = 63569954;BA.debugLine="xlbl.Text = t"; + //BA.debugLineNum = 77;BA.debugLine="xlbl.TextColor = mTextColor"; +_xlbl.setTextColor(_mtextcolor); + //BA.debugLineNum = 78;BA.debugLine="If originalTextWidth <= mBase.Width Then"; +if (_originaltextwidth<=_mbase.getWidth()) { + //BA.debugLineNum = 79;BA.debugLine="xlbl.Text = t"; _xlbl.setText(BA.ObjectToCharSequence(_t)); -RDebugUtils.currentLine=63569955; - //BA.debugLineNum = 63569955;BA.debugLine="p.Tag = \"static\""; + //BA.debugLineNum = 80;BA.debugLine="p.Tag = \"static\""; _p.setTag((Object)("static")); -RDebugUtils.currentLine=63569956; - //BA.debugLineNum = 63569956;BA.debugLine="StopScrolling"; -__ref._stopscrolling /*String*/ (null); + //BA.debugLineNum = 81;BA.debugLine="StopScrolling"; +_stopscrolling(); }else { -RDebugUtils.currentLine=63569958; - //BA.debugLineNum = 63569958;BA.debugLine="p.Tag = \"\""; + //BA.debugLineNum = 83;BA.debugLine="p.Tag = \"\""; _p.setTag((Object)("")); -RDebugUtils.currentLine=63569959; - //BA.debugLineNum = 63569959;BA.debugLine="Dim duplicateText As String = t & \" \" & t"; + //BA.debugLineNum = 84;BA.debugLine="Dim duplicateText As String = t & \" \" & t"; _duplicatetext = _t+" "+_t; -RDebugUtils.currentLine=63569960; - //BA.debugLineNum = 63569960;BA.debugLine="Dim Width As Float = MeasureTextWidth(duplicateT"; -_width = __ref._measuretextwidth /*float*/ (null,_duplicatetext,__ref._fnt /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ ); -RDebugUtils.currentLine=63569961; - //BA.debugLineNum = 63569961;BA.debugLine="p.Width = Width"; + //BA.debugLineNum = 85;BA.debugLine="Dim Width As Float = MeasureTextWidth(duplicateT"; +_width = _measuretextwidth(_duplicatetext,_fnt); + //BA.debugLineNum = 86;BA.debugLine="p.Width = Width"; _p.setWidth((int) (_width)); -RDebugUtils.currentLine=63569962; - //BA.debugLineNum = 63569962;BA.debugLine="xlbl.Width = Width"; + //BA.debugLineNum = 87;BA.debugLine="xlbl.Width = Width"; _xlbl.setWidth((int) (_width)); -RDebugUtils.currentLine=63569963; - //BA.debugLineNum = 63569963;BA.debugLine="xlbl.Text = duplicateText"; + //BA.debugLineNum = 88;BA.debugLine="xlbl.Text = duplicateText"; _xlbl.setText(BA.ObjectToCharSequence(_duplicatetext)); -RDebugUtils.currentLine=63569964; - //BA.debugLineNum = 63569964;BA.debugLine="StartScrolling (p, originalTextWidth)"; -__ref._startscrolling /*void*/ (null,_p,_originaltextwidth); + //BA.debugLineNum = 89;BA.debugLine="StartScrolling (p, originalTextWidth)"; +_startscrolling(_p,_originaltextwidth); }; -RDebugUtils.currentLine=63569966; - //BA.debugLineNum = 63569966;BA.debugLine="End Sub"; + //BA.debugLineNum = 91;BA.debugLine="End Sub"; return ""; } -public String _class_globals(keymon.lat.medicomed.scrollinglabel __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="scrollinglabel"; -RDebugUtils.currentLine=63307776; - //BA.debugLineNum = 63307776;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=63307777; - //BA.debugLineNum = 63307777;BA.debugLine="Private mEventName As String 'ignore"; -_meventname = ""; -RDebugUtils.currentLine=63307778; - //BA.debugLineNum = 63307778;BA.debugLine="Private mCallBack As Object 'ignore"; -_mcallback = new Object(); -RDebugUtils.currentLine=63307779; - //BA.debugLineNum = 63307779;BA.debugLine="Public mBase As B4XView"; -_mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=63307780; - //BA.debugLineNum = 63307780;BA.debugLine="Private xui As XUI 'ignore"; -_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=63307781; - //BA.debugLineNum = 63307781;BA.debugLine="Private mText As String"; -_mtext = ""; -RDebugUtils.currentLine=63307782; - //BA.debugLineNum = 63307782;BA.debugLine="Private taskIndex As Int"; -_taskindex = 0; -RDebugUtils.currentLine=63307783; - //BA.debugLineNum = 63307783;BA.debugLine="Private fnt As B4XFont"; -_fnt = new anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont(); -RDebugUtils.currentLine=63307784; - //BA.debugLineNum = 63307784;BA.debugLine="Private cvs As B4XCanvas"; -_cvs = new anywheresoftware.b4a.objects.B4XCanvas(); -RDebugUtils.currentLine=63307785; - //BA.debugLineNum = 63307785;BA.debugLine="Public Tag As Object"; -_tag = new Object(); -RDebugUtils.currentLine=63307786; - //BA.debugLineNum = 63307786;BA.debugLine="Public WidthPerSecond As Int = 100dip"; -_widthpersecond = __c.DipToCurrent((int) (100)); -RDebugUtils.currentLine=63307787; - //BA.debugLineNum = 63307787;BA.debugLine="Public StartPositionDelay As Int = 1000"; -_startpositiondelay = (int) (1000); -RDebugUtils.currentLine=63307788; - //BA.debugLineNum = 63307788;BA.debugLine="Private mTextColor As Int = xui.Color_Black"; -_mtextcolor = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Black; -RDebugUtils.currentLine=63307789; - //BA.debugLineNum = 63307789;BA.debugLine="End Sub"; +public String _settextcolor(int _c) throws Exception{ + //BA.debugLineNum = 121;BA.debugLine="Public Sub setTextColor(c As Int)"; + //BA.debugLineNum = 122;BA.debugLine="mTextColor = c"; +_mtextcolor = _c; + //BA.debugLineNum = 123;BA.debugLine="setText(mText)"; +_settext(_mtext); + //BA.debugLineNum = 124;BA.debugLine="End Sub"; return ""; } -public String _designercreateview(keymon.lat.medicomed.scrollinglabel __ref,Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ -__ref = this; -RDebugUtils.currentModule="scrollinglabel"; -if (Debug.shouldDelegate(ba, "designercreateview", true)) - {return ((String) Debug.delegate(ba, "designercreateview", new Object[] {_base,_lbl,_props}));} -anywheresoftware.b4a.objects.B4XViewWrapper _p = null; -anywheresoftware.b4a.objects.B4XViewWrapper _l = null; -RDebugUtils.currentLine=63438848; - //BA.debugLineNum = 63438848;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; -RDebugUtils.currentLine=63438849; - //BA.debugLineNum = 63438849;BA.debugLine="mBase = Base"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); -RDebugUtils.currentLine=63438850; - //BA.debugLineNum = 63438850;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._tag /*Object*/ = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getTag(); -RDebugUtils.currentLine=63438850; - //BA.debugLineNum = 63438850;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag(this); -RDebugUtils.currentLine=63438852; - //BA.debugLineNum = 63438852;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"\")"; -_p = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_p = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,""); -RDebugUtils.currentLine=63438853; - //BA.debugLineNum = 63438853;BA.debugLine="mBase.AddView(p, 0, 0, mBase.Width, mBase.Height)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(_p.getObject()),(int) (0),(int) (0),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=63438854; - //BA.debugLineNum = 63438854;BA.debugLine="mText = Lbl.Text"; -__ref._mtext /*String*/ = _lbl.getText(); -RDebugUtils.currentLine=63438855; - //BA.debugLineNum = 63438855;BA.debugLine="Dim l As B4XView = Lbl"; -_l = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_l = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lbl.getObject())); -RDebugUtils.currentLine=63438856; - //BA.debugLineNum = 63438856;BA.debugLine="fnt = l.Font"; -__ref._fnt /*anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont*/ = _l.getFont(); -RDebugUtils.currentLine=63438857; - //BA.debugLineNum = 63438857;BA.debugLine="mTextColor = l.TextColor"; -__ref._mtextcolor /*int*/ = _l.getTextColor(); -RDebugUtils.currentLine=63438858; - //BA.debugLineNum = 63438858;BA.debugLine="If mTextColor = xui.Color_Transparent Then mTextC"; -if (__ref._mtextcolor /*int*/ ==__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent) { -__ref._mtextcolor /*int*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Black;}; -RDebugUtils.currentLine=63438859; - //BA.debugLineNum = 63438859;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"\")"; -_p = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_p = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,""); -RDebugUtils.currentLine=63438860; - //BA.debugLineNum = 63438860;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, 2dip, 2dip)"; -_p.SetLayoutAnimated((int) (0),(int) (0),(int) (0),__c.DipToCurrent((int) (2)),__c.DipToCurrent((int) (2))); -RDebugUtils.currentLine=63438861; - //BA.debugLineNum = 63438861;BA.debugLine="cvs.Initialize(p)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Initialize(_p); -RDebugUtils.currentLine=63438862; - //BA.debugLineNum = 63438862;BA.debugLine="setText(mText)"; -__ref._settext /*String*/ (null,__ref._mtext /*String*/ ); -RDebugUtils.currentLine=63438863; - //BA.debugLineNum = 63438863;BA.debugLine="End Sub"; -return ""; -} -public String _gettext(keymon.lat.medicomed.scrollinglabel __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="scrollinglabel"; -if (Debug.shouldDelegate(ba, "gettext", true)) - {return ((String) Debug.delegate(ba, "gettext", null));} -RDebugUtils.currentLine=63635456; - //BA.debugLineNum = 63635456;BA.debugLine="Public Sub getText As String"; -RDebugUtils.currentLine=63635457; - //BA.debugLineNum = 63635457;BA.debugLine="Return mText"; -if (true) return __ref._mtext /*String*/ ; -RDebugUtils.currentLine=63635458; - //BA.debugLineNum = 63635458;BA.debugLine="End Sub"; -return ""; -} -public int _gettextcolor(keymon.lat.medicomed.scrollinglabel __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="scrollinglabel"; -if (Debug.shouldDelegate(ba, "gettextcolor", true)) - {return ((Integer) Debug.delegate(ba, "gettextcolor", null));} -RDebugUtils.currentLine=63963136; - //BA.debugLineNum = 63963136;BA.debugLine="Public Sub getTextColor As Int"; -RDebugUtils.currentLine=63963137; - //BA.debugLineNum = 63963137;BA.debugLine="Return mTextColor"; -if (true) return __ref._mtextcolor /*int*/ ; -RDebugUtils.currentLine=63963138; - //BA.debugLineNum = 63963138;BA.debugLine="End Sub"; -return 0; -} -public String _initialize(keymon.lat.medicomed.scrollinglabel __ref,anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ -__ref = this; -innerInitialize(_ba); -RDebugUtils.currentModule="scrollinglabel"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_callback,_eventname}));} -RDebugUtils.currentLine=63373312; - //BA.debugLineNum = 63373312;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -RDebugUtils.currentLine=63373313; - //BA.debugLineNum = 63373313;BA.debugLine="mEventName = EventName"; -__ref._meventname /*String*/ = _eventname; -RDebugUtils.currentLine=63373314; - //BA.debugLineNum = 63373314;BA.debugLine="mCallBack = Callback"; -__ref._mcallback /*Object*/ = _callback; -RDebugUtils.currentLine=63373315; - //BA.debugLineNum = 63373315;BA.debugLine="End Sub"; -return ""; -} -public float _measuretextwidth(keymon.lat.medicomed.scrollinglabel __ref,String _s,anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont _font1) throws Exception{ -__ref = this; -RDebugUtils.currentModule="scrollinglabel"; -if (Debug.shouldDelegate(ba, "measuretextwidth", true)) - {return ((Float) Debug.delegate(ba, "measuretextwidth", new Object[] {_s,_font1}));} -RDebugUtils.currentLine=63832064; - //BA.debugLineNum = 63832064;BA.debugLine="Private Sub MeasureTextWidth(s As String, font1 As"; -RDebugUtils.currentLine=63832065; - //BA.debugLineNum = 63832065;BA.debugLine="Return cvs.MeasureText(s, font1).Width"; -if (true) return __ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .MeasureText(_s,_font1).getWidth(); -RDebugUtils.currentLine=63832066; - //BA.debugLineNum = 63832066;BA.debugLine="End Sub"; -return 0f; -} -public String _stopscrolling(keymon.lat.medicomed.scrollinglabel __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="scrollinglabel"; -if (Debug.shouldDelegate(ba, "stopscrolling", true)) - {return ((String) Debug.delegate(ba, "stopscrolling", null));} -RDebugUtils.currentLine=63700992; - //BA.debugLineNum = 63700992;BA.debugLine="Private Sub StopScrolling"; -RDebugUtils.currentLine=63700993; - //BA.debugLineNum = 63700993;BA.debugLine="taskIndex = taskIndex + 1"; -__ref._taskindex /*int*/ = (int) (__ref._taskindex /*int*/ +1); -RDebugUtils.currentLine=63700994; - //BA.debugLineNum = 63700994;BA.debugLine="End Sub"; -return ""; -} -public void _startscrolling(keymon.lat.medicomed.scrollinglabel __ref,anywheresoftware.b4a.objects.B4XViewWrapper _p,float _originalwidth) throws Exception{ -RDebugUtils.currentModule="scrollinglabel"; -if (Debug.shouldDelegate(ba, "startscrolling", true)) - {Debug.delegate(ba, "startscrolling", new Object[] {_p,_originalwidth}); return;} -ResumableSub_StartScrolling rsub = new ResumableSub_StartScrolling(this,__ref,_p,_originalwidth); +public void _startscrolling(anywheresoftware.b4a.objects.B4XViewWrapper _p,float _originalwidth) throws Exception{ +ResumableSub_StartScrolling rsub = new ResumableSub_StartScrolling(this,_p,_originalwidth); rsub.resume(ba, null); } public static class ResumableSub_StartScrolling extends BA.ResumableSub { -public ResumableSub_StartScrolling(keymon.lat.medicomed.scrollinglabel parent,keymon.lat.medicomed.scrollinglabel __ref,anywheresoftware.b4a.objects.B4XViewWrapper _p,float _originalwidth) { +public ResumableSub_StartScrolling(keymon.lat.medicomed.scrollinglabel parent,anywheresoftware.b4a.objects.B4XViewWrapper _p,float _originalwidth) { this.parent = parent; -this.__ref = __ref; this._p = _p; this._originalwidth = _originalwidth; -this.__ref = parent; } -keymon.lat.medicomed.scrollinglabel __ref; keymon.lat.medicomed.scrollinglabel parent; anywheresoftware.b4a.objects.B4XViewWrapper _p; float _originalwidth; @@ -408,7 +276,6 @@ int _duration = 0; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="scrollinglabel"; while (true) { switch (state) { @@ -418,32 +285,27 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=63766529; - //BA.debugLineNum = 63766529;BA.debugLine="taskIndex = taskIndex + 1"; -__ref._taskindex /*int*/ = (int) (__ref._taskindex /*int*/ +1); -RDebugUtils.currentLine=63766530; - //BA.debugLineNum = 63766530;BA.debugLine="Dim myIndex As Int = taskIndex"; -_myindex = __ref._taskindex /*int*/ ; -RDebugUtils.currentLine=63766531; - //BA.debugLineNum = 63766531;BA.debugLine="Dim duration As Int = p.Width / WidthPerSecond *"; -_duration = (int) (_p.getWidth()/(double)__ref._widthpersecond /*int*/ *1000); -RDebugUtils.currentLine=63766532; - //BA.debugLineNum = 63766532;BA.debugLine="Sleep(StartPositionDelay)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "scrollinglabel", "startscrolling"),__ref._startpositiondelay /*int*/ ); + //BA.debugLineNum = 102;BA.debugLine="taskIndex = taskIndex + 1"; +parent._taskindex = (int) (parent._taskindex+1); + //BA.debugLineNum = 103;BA.debugLine="Dim myIndex As Int = taskIndex"; +_myindex = parent._taskindex; + //BA.debugLineNum = 104;BA.debugLine="Dim duration As Int = p.Width / WidthPerSecond *"; +_duration = (int) (_p.getWidth()/(double)parent._widthpersecond*1000); + //BA.debugLineNum = 105;BA.debugLine="Sleep(StartPositionDelay)"; +parent.__c.Sleep(ba,this,parent._startpositiondelay); this.state = 23; return; case 23: //C this.state = 1; ; -RDebugUtils.currentLine=63766533; - //BA.debugLineNum = 63766533;BA.debugLine="If myIndex <> taskIndex Then Return"; + //BA.debugLineNum = 106;BA.debugLine="If myIndex <> taskIndex Then Return"; if (true) break; case 1: //if this.state = 6; -if (_myindex!=__ref._taskindex /*int*/ ) { +if (_myindex!=parent._taskindex) { this.state = 3; ;}if (true) break; @@ -457,8 +319,7 @@ case 6: //C this.state = 7; ; -RDebugUtils.currentLine=63766534; - //BA.debugLineNum = 63766534;BA.debugLine="Do While True"; + //BA.debugLineNum = 107;BA.debugLine="Do While True"; if (true) break; case 7: @@ -473,26 +334,23 @@ if (true) break; case 9: //C this.state = 10; -RDebugUtils.currentLine=63766535; - //BA.debugLineNum = 63766535;BA.debugLine="p.SetLayoutAnimated(duration, -(p.Width - Origin"; + //BA.debugLineNum = 108;BA.debugLine="p.SetLayoutAnimated(duration, -(p.Width - Origin"; _p.SetLayoutAnimated(_duration,(int) (-(_p.getWidth()-_originalwidth)),_p.getTop(),_p.getWidth(),_p.getHeight()); -RDebugUtils.currentLine=63766536; - //BA.debugLineNum = 63766536;BA.debugLine="Sleep(duration)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "scrollinglabel", "startscrolling"),_duration); + //BA.debugLineNum = 109;BA.debugLine="Sleep(duration)"; +parent.__c.Sleep(ba,this,_duration); this.state = 24; return; case 24: //C this.state = 10; ; -RDebugUtils.currentLine=63766537; - //BA.debugLineNum = 63766537;BA.debugLine="If myIndex <> taskIndex Then Return"; + //BA.debugLineNum = 110;BA.debugLine="If myIndex <> taskIndex Then Return"; if (true) break; case 10: //if this.state = 15; -if (_myindex!=__ref._taskindex /*int*/ ) { +if (_myindex!=parent._taskindex) { this.state = 12; ;}if (true) break; @@ -506,23 +364,21 @@ case 15: //C this.state = 16; ; -RDebugUtils.currentLine=63766538; - //BA.debugLineNum = 63766538;BA.debugLine="Sleep(StartPositionDelay)"; -parent.__c.Sleep(ba,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "scrollinglabel", "startscrolling"),__ref._startpositiondelay /*int*/ ); + //BA.debugLineNum = 111;BA.debugLine="Sleep(StartPositionDelay)"; +parent.__c.Sleep(ba,this,parent._startpositiondelay); this.state = 25; return; case 25: //C this.state = 16; ; -RDebugUtils.currentLine=63766539; - //BA.debugLineNum = 63766539;BA.debugLine="If myIndex <> taskIndex Then Return"; + //BA.debugLineNum = 112;BA.debugLine="If myIndex <> taskIndex Then Return"; if (true) break; case 16: //if this.state = 21; -if (_myindex!=__ref._taskindex /*int*/ ) { +if (_myindex!=parent._taskindex) { this.state = 18; ;}if (true) break; @@ -536,8 +392,7 @@ case 21: //C this.state = 7; ; -RDebugUtils.currentLine=63766540; - //BA.debugLineNum = 63766540;BA.debugLine="p.SetLayoutAnimated(0, 0, p.Top, p.Width, p.Heig"; + //BA.debugLineNum = 113;BA.debugLine="p.SetLayoutAnimated(0, 0, p.Top, p.Width, p.Heig"; _p.SetLayoutAnimated((int) (0),(int) (0),_p.getTop(),_p.getWidth(),_p.getHeight()); if (true) break; @@ -545,29 +400,22 @@ case 22: //C this.state = -1; ; -RDebugUtils.currentLine=63766542; - //BA.debugLineNum = 63766542;BA.debugLine="End Sub"; + //BA.debugLineNum = 115;BA.debugLine="End Sub"; if (true) break; } } } } -public String _settextcolor(keymon.lat.medicomed.scrollinglabel __ref,int _c) throws Exception{ -__ref = this; -RDebugUtils.currentModule="scrollinglabel"; -if (Debug.shouldDelegate(ba, "settextcolor", true)) - {return ((String) Debug.delegate(ba, "settextcolor", new Object[] {_c}));} -RDebugUtils.currentLine=63897600; - //BA.debugLineNum = 63897600;BA.debugLine="Public Sub setTextColor(c As Int)"; -RDebugUtils.currentLine=63897601; - //BA.debugLineNum = 63897601;BA.debugLine="mTextColor = c"; -__ref._mtextcolor /*int*/ = _c; -RDebugUtils.currentLine=63897602; - //BA.debugLineNum = 63897602;BA.debugLine="setText(mText)"; -__ref._settext /*String*/ (null,__ref._mtext /*String*/ ); -RDebugUtils.currentLine=63897603; - //BA.debugLineNum = 63897603;BA.debugLine="End Sub"; +public String _stopscrolling() throws Exception{ + //BA.debugLineNum = 97;BA.debugLine="Private Sub StopScrolling"; + //BA.debugLineNum = 98;BA.debugLine="taskIndex = taskIndex + 1"; +_taskindex = (int) (_taskindex+1); + //BA.debugLineNum = 99;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/starter.java b/B4A/Objects/src/keymon/lat/medicomed/starter.java index 53a9bb4..9a6c22b 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/starter.java +++ b/B4A/Objects/src/keymon/lat/medicomed/starter.java @@ -14,7 +14,7 @@ public class starter extends android.app.Service{ android.content.Intent in = new android.content.Intent(context, starter.class); if (intent != null) in.putExtra("b4a_internal_intent", intent); - ServiceHelper.StarterHelper.startServiceFromReceiver (context, in, true, anywheresoftware.b4a.ShellBA.class); + ServiceHelper.StarterHelper.startServiceFromReceiver (context, in, true, BA.class); } } @@ -29,7 +29,7 @@ public class starter extends android.app.Service{ super.onCreate(); mostCurrent = this; if (processBA == null) { - processBA = new anywheresoftware.b4a.ShellBA(this, null, null, "keymon.lat.medicomed", "keymon.lat.medicomed.starter"); + processBA = new BA(this, null, null, "keymon.lat.medicomed", "keymon.lat.medicomed.starter"); if (BA.isShellModeRuntimeCheck(processBA)) { processBA.raiseEvent2(null, true, "SHELL", false); } @@ -127,8 +127,7 @@ public class starter extends android.app.Service{ @Override public android.os.IBinder onBind(android.content.Intent intent) { return null; - } -public anywheresoftware.b4a.keywords.Common __c = null; + }public anywheresoftware.b4a.keywords.Common __c = null; public static anywheresoftware.b4a.gps.GPS _gps = null; public static anywheresoftware.b4a.phone.Phone _ph = null; public static anywheresoftware.b4a.objects.RuntimePermissions _rp = null; @@ -157,278 +156,238 @@ public keymon.lat.medicomed.b4xcollections _b4xcollections = null; public keymon.lat.medicomed.httputils2service _httputils2service = null; public keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; public static boolean _application_error(anywheresoftware.b4a.objects.B4AException _error,String _stacktrace) throws Exception{ -RDebugUtils.currentModule="starter"; -if (Debug.shouldDelegate(processBA, "application_error", false)) - {return ((Boolean) Debug.delegate(processBA, "application_error", new Object[] {_error,_stacktrace}));} anywheresoftware.b4j.object.JavaObject _jo = null; long _l = 0L; -RDebugUtils.currentLine=2752512; - //BA.debugLineNum = 2752512;BA.debugLine="Sub Application_Error (Error As Exception, StackTr"; -RDebugUtils.currentLine=2752514; - //BA.debugLineNum = 2752514;BA.debugLine="Dim jo As JavaObject"; + //BA.debugLineNum = 122;BA.debugLine="Sub Application_Error (Error As Exception, StackTr"; + //BA.debugLineNum = 124;BA.debugLine="Dim jo As JavaObject"; _jo = new anywheresoftware.b4j.object.JavaObject(); -RDebugUtils.currentLine=2752515; - //BA.debugLineNum = 2752515;BA.debugLine="Dim l As Long = 500: jo.InitializeStatic(\"java.la"; + //BA.debugLineNum = 125;BA.debugLine="Dim l As Long = 500: jo.InitializeStatic(\"java.la"; _l = (long) (500); -RDebugUtils.currentLine=2752515; - //BA.debugLineNum = 2752515;BA.debugLine="Dim l As Long = 500: jo.InitializeStatic(\"java.la"; + //BA.debugLineNum = 125;BA.debugLine="Dim l As Long = 500: jo.InitializeStatic(\"java.la"; _jo.InitializeStatic("java.lang.Thread").RunMethod("sleep",new Object[]{(Object)(_l)}); -RDebugUtils.currentLine=2752516; - //BA.debugLineNum = 2752516;BA.debugLine="logcat.LogCatStop"; + //BA.debugLineNum = 126;BA.debugLine="logcat.LogCatStop"; _logcat.LogCatStop(); -RDebugUtils.currentLine=2752517; - //BA.debugLineNum = 2752517;BA.debugLine="logs.Append(StackTrace)"; + //BA.debugLineNum = 127;BA.debugLine="logs.Append(StackTrace)"; _logs.Append(_stacktrace); -RDebugUtils.currentLine=2752518; - //BA.debugLineNum = 2752518;BA.debugLine="Subs.revisaBD"; + //BA.debugLineNum = 128;BA.debugLine="Subs.revisaBD"; mostCurrent._subs._revisabd /*String*/ (processBA); -RDebugUtils.currentLine=2752519; - //BA.debugLineNum = 2752519;BA.debugLine="Subs.errorLog.ExecNonQuery2(\"INSERT INTO errores("; + //BA.debugLineNum = 129;BA.debugLine="Subs.errorLog.ExecNonQuery2(\"INSERT INTO errores("; mostCurrent._subs._errorlog /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO errores(fecha, error) VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(mostCurrent._subs._fechakmt /*String*/ (processBA,BA.NumberToString(anywheresoftware.b4a.keywords.Common.DateTime.getNow()))),(Object)(_logs.getObject())})); -RDebugUtils.currentLine=2752520; - //BA.debugLineNum = 2752520;BA.debugLine="Return True"; + //BA.debugLineNum = 130;BA.debugLine="Return True"; if (true) return anywheresoftware.b4a.keywords.Common.True; -RDebugUtils.currentLine=2752521; - //BA.debugLineNum = 2752521;BA.debugLine="End Sub"; + //BA.debugLineNum = 131;BA.debugLine="End Sub"; return false; } public static String _envia_ultima_gps() throws Exception{ -RDebugUtils.currentModule="starter"; -if (Debug.shouldDelegate(processBA, "envia_ultima_gps", false)) - {return ((String) Debug.delegate(processBA, "envia_ultima_gps", null));} anywheresoftware.b4a.sql.SQL _skmt = null; keymon.lat.medicomed.dbrequestmanager._dbcommand _cmd = null; -RDebugUtils.currentLine=2621440; - //BA.debugLineNum = 2621440;BA.debugLine="Sub ENVIA_ULTIMA_GPS"; -RDebugUtils.currentLine=2621441; - //BA.debugLineNum = 2621441;BA.debugLine="If IsConnectedToInternet Or 1 = 1 Then"; +anywheresoftware.b4a.sql.SQL.CursorWrapper _cursor = null; +anywheresoftware.b4a.sql.SQL.CursorWrapper _cursor2 = null; +anywheresoftware.b4a.sql.SQL.CursorWrapper _cursor3 = null; + //BA.debugLineNum = 73;BA.debugLine="Sub ENVIA_ULTIMA_GPS"; + //BA.debugLineNum = 74;BA.debugLine="If IsConnectedToInternet Or 1 = 1 Then"; if (_isconnectedtointernet() || 1==1) { -RDebugUtils.currentLine=2621442; - //BA.debugLineNum = 2621442;BA.debugLine="Dim logger As Boolean = True"; + //BA.debugLineNum = 75;BA.debugLine="Dim logger As Boolean = True"; _logger = anywheresoftware.b4a.keywords.Common.True; -RDebugUtils.currentLine=2621444; - //BA.debugLineNum = 2621444;BA.debugLine="Dim skmt As SQL"; + //BA.debugLineNum = 77;BA.debugLine="Dim skmt As SQL"; _skmt = new anywheresoftware.b4a.sql.SQL(); -RDebugUtils.currentLine=2621445; - //BA.debugLineNum = 2621445;BA.debugLine="Dim cmd As DBCommand"; + //BA.debugLineNum = 78;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=2621446; - //BA.debugLineNum = 2621446;BA.debugLine="skmt.Initialize(ruta,\"kmt.db\", False)"; + //BA.debugLineNum = 79;BA.debugLine="skmt.Initialize(ruta,\"kmt.db\", False)"; _skmt.Initialize(_ruta,"kmt.db",anywheresoftware.b4a.keywords.Common.False); -RDebugUtils.currentLine=2621450; - //BA.debugLineNum = 2621450;BA.debugLine="Dim cmd As DBCommand"; + //BA.debugLineNum = 83;BA.debugLine="Dim cmd As DBCommand"; _cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=2621451; - //BA.debugLineNum = 2621451;BA.debugLine="cmd.Initialize"; + //BA.debugLineNum = 84;BA.debugLine="cmd.Initialize"; _cmd.Initialize(); -RDebugUtils.currentLine=2621452; - //BA.debugLineNum = 2621452;BA.debugLine="cmd.Name = \"UPDATE_MEDI_ACTUAL2_GPS\""; + //BA.debugLineNum = 85;BA.debugLine="cmd.Name = \"UPDATE_MEDI_ACTUAL2_GPS\""; _cmd.Name /*String*/ = "UPDATE_MEDI_ACTUAL2_GPS"; -RDebugUtils.currentLine=2621453; - //BA.debugLineNum = 2621453;BA.debugLine="If B4XPages.MainPage.lat_gps.Length < 15 Then B4"; + //BA.debugLineNum = 86;BA.debugLine="If B4XPages.MainPage.lat_gps.Length < 15 Then B4"; if (mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._lat_gps /*String*/ .length()<15) { mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._lat_gps /*String*/ = mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._lat_gps /*String*/ +"0";}; -RDebugUtils.currentLine=2621455; - //BA.debugLineNum = 2621455;BA.debugLine="cmd.Parameters = Array As Object(B4XPages.MainPa"; -_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._montoactual /*String*/ ),(Object)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._clientestotal /*String*/ ),(Object)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._clientesventa /*String*/ ),(Object)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._clientesvisitados /*String*/ ),(Object)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._lat_gps /*String*/ ),(Object)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._lon_gps /*String*/ ),(Object)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._batt /*int*/ ),(Object)(0),(Object)(0),(Object)(0),(Object)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._almacen /*String*/ ),(Object)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._rutapreventa /*String*/ )}; -RDebugUtils.currentLine=2621457; - //BA.debugLineNum = 2621457;BA.debugLine="reqManager.ExecuteCommand(cmd, \"inst_visitas\")"; -_reqmanager._executecommand /*String*/ (null,_cmd,(Object)("inst_visitas")); -RDebugUtils.currentLine=2621458; - //BA.debugLineNum = 2621458;BA.debugLine="skmt.ExecNonQuery2(\"Update cat_variables set CAT"; + //BA.debugLineNum = 88;BA.debugLine="Private cursor As Cursor = B4XPages.MainPage.skm"; +_cursor = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); +_cursor = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("SELECT Sum(montoVentav) AS MONTO_VENTA FROM VENTA_NO_VENTA"))); + //BA.debugLineNum = 89;BA.debugLine="cursor.Position = 0"; +_cursor.setPosition((int) (0)); + //BA.debugLineNum = 90;BA.debugLine="Private cursor2 As Cursor = B4XPages.MainPage.sk"; +_cursor2 = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); +_cursor2 = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("SELECT COUNT (*) AS CUENTA_TODO FROM VENTA_NO_VENTA"))); + //BA.debugLineNum = 91;BA.debugLine="cursor2.Position = 0"; +_cursor2.setPosition((int) (0)); + //BA.debugLineNum = 92;BA.debugLine="Private cursor3 As Cursor = B4XPages.MainPage.sk"; +_cursor3 = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); +_cursor3 = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("SELECT COUNT (*) AS CUENTA_VENTA FROM VENTA_NO_VENTA WHERE montoVentaV <> 0"))); + //BA.debugLineNum = 93;BA.debugLine="cursor3.Position = 0"; +_cursor3.setPosition((int) (0)); + //BA.debugLineNum = 95;BA.debugLine="cmd.Parameters = Array As String(cursor.GetStrin"; +_cmd.Parameters /*Object[]*/ = (Object[])(new String[]{_cursor.GetString("MONTO_VENTA"),_cursor2.GetString("CUENTA_TODO"),_cursor3.GetString("CUENTA_VENTA"),mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._clientesvisitados /*String*/ ,mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._lat_gps /*String*/ ,mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._lon_gps /*String*/ ,BA.NumberToString(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._batt /*int*/ ),BA.NumberToString(0),BA.NumberToString(0),BA.NumberToString(0),mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._almacen /*String*/ ,mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._rutapreventa /*String*/ }); + //BA.debugLineNum = 96;BA.debugLine="cursor.Close"; +_cursor.Close(); + //BA.debugLineNum = 97;BA.debugLine="cursor2.Close"; +_cursor2.Close(); + //BA.debugLineNum = 98;BA.debugLine="cursor3.Close"; +_cursor3.Close(); + //BA.debugLineNum = 101;BA.debugLine="reqManager.ExecuteCommand(cmd, \"inst_visitas\")"; +_reqmanager._executecommand /*String*/ (_cmd,(Object)("inst_visitas")); + //BA.debugLineNum = 102;BA.debugLine="skmt.ExecNonQuery2(\"Update cat_variables set CAT"; _skmt.ExecNonQuery2("Update cat_variables set CAT_VA_VALOR = ? WHERE CAT_VA_DESCRIPCION = ?",anywheresoftware.b4a.keywords.Common.ArrayToList(new String[]{anywheresoftware.b4a.keywords.Common.DateTime.Time(anywheresoftware.b4a.keywords.Common.DateTime.getNow()),"HoraIngreso"})); -RDebugUtils.currentLine=2621460; - //BA.debugLineNum = 2621460;BA.debugLine="Timer1.Enabled = False"; + //BA.debugLineNum = 104;BA.debugLine="Timer1.Enabled = False"; _timer1.setEnabled(anywheresoftware.b4a.keywords.Common.False); -RDebugUtils.currentLine=2621461; - //BA.debugLineNum = 2621461;BA.debugLine="Timer1.Interval = Interval * 1000"; + //BA.debugLineNum = 105;BA.debugLine="Timer1.Interval = Interval * 1000"; _timer1.setInterval((long) (_interval*1000)); -RDebugUtils.currentLine=2621462; - //BA.debugLineNum = 2621462;BA.debugLine="Timer1.Enabled = True"; + //BA.debugLineNum = 106;BA.debugLine="Timer1.Enabled = True"; _timer1.setEnabled(anywheresoftware.b4a.keywords.Common.True); }else { -RDebugUtils.currentLine=2621464; - //BA.debugLineNum = 2621464;BA.debugLine="Log(\"Sin conexión a internet, no se envió UTR!\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("32621464","Sin conexión a internet, no se envió UTR!",0); + //BA.debugLineNum = 108;BA.debugLine="Log(\"Sin conexión a internet, no se envió UTR!\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("338928419","Sin conexión a internet, no se envió UTR!",0); }; -RDebugUtils.currentLine=2621467; - //BA.debugLineNum = 2621467;BA.debugLine="End Sub"; + //BA.debugLineNum = 111;BA.debugLine="End Sub"; +return ""; +} +public static String _gps_locationchanged(anywheresoftware.b4a.gps.LocationWrapper _location1) throws Exception{ + //BA.debugLineNum = 61;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; + //BA.debugLineNum = 63;BA.debugLine="End Sub"; return ""; } public static boolean _isconnectedtointernet() throws Exception{ -RDebugUtils.currentModule="starter"; -if (Debug.shouldDelegate(processBA, "isconnectedtointernet", false)) - {return ((Boolean) Debug.delegate(processBA, "isconnectedtointernet", null));} anywheresoftware.b4a.agraham.reflection.Reflection _r = null; -RDebugUtils.currentLine=2949120; - //BA.debugLineNum = 2949120;BA.debugLine="Sub IsConnectedToInternet As Boolean 'ignore"; -RDebugUtils.currentLine=2949121; - //BA.debugLineNum = 2949121;BA.debugLine="Dim r As Reflector"; + //BA.debugLineNum = 154;BA.debugLine="Sub IsConnectedToInternet As Boolean 'ignore"; + //BA.debugLineNum = 155;BA.debugLine="Dim r As Reflector"; _r = new anywheresoftware.b4a.agraham.reflection.Reflection(); -RDebugUtils.currentLine=2949122; - //BA.debugLineNum = 2949122;BA.debugLine="r.Target = r.GetContext"; + //BA.debugLineNum = 156;BA.debugLine="r.Target = r.GetContext"; _r.Target = (Object)(_r.GetContext(processBA)); -RDebugUtils.currentLine=2949123; - //BA.debugLineNum = 2949123;BA.debugLine="r.Target = r.RunMethod2(\"getSystemService\", \"conn"; + //BA.debugLineNum = 157;BA.debugLine="r.Target = r.RunMethod2(\"getSystemService\", \"conn"; _r.Target = _r.RunMethod2("getSystemService","connectivity","java.lang.String"); -RDebugUtils.currentLine=2949124; - //BA.debugLineNum = 2949124;BA.debugLine="r.Target = r.RunMethod(\"getActiveNetworkInfo\")"; + //BA.debugLineNum = 158;BA.debugLine="r.Target = r.RunMethod(\"getActiveNetworkInfo\")"; _r.Target = _r.RunMethod("getActiveNetworkInfo"); -RDebugUtils.currentLine=2949125; - //BA.debugLineNum = 2949125;BA.debugLine="If r.Target <> Null Then"; + //BA.debugLineNum = 159;BA.debugLine="If r.Target <> Null Then"; if (_r.Target!= null) { -RDebugUtils.currentLine=2949126; - //BA.debugLineNum = 2949126;BA.debugLine="Return r.RunMethod(\"isConnectedOrConnecting\")"; + //BA.debugLineNum = 160;BA.debugLine="Return r.RunMethod(\"isConnectedOrConnecting\")"; if (true) return BA.ObjectToBoolean(_r.RunMethod("isConnectedOrConnecting")); }; -RDebugUtils.currentLine=2949128; - //BA.debugLineNum = 2949128;BA.debugLine="Return False"; + //BA.debugLineNum = 162;BA.debugLine="Return False"; if (true) return anywheresoftware.b4a.keywords.Common.False; -RDebugUtils.currentLine=2949129; - //BA.debugLineNum = 2949129;BA.debugLine="End Sub"; + //BA.debugLineNum = 163;BA.debugLine="End Sub"; return false; } -public static String _gps_locationchanged(anywheresoftware.b4a.gps.LocationWrapper _location1) throws Exception{ -RDebugUtils.currentModule="starter"; -if (Debug.shouldDelegate(processBA, "gps_locationchanged", false)) - {return ((String) Debug.delegate(processBA, "gps_locationchanged", new Object[] {_location1}));} -RDebugUtils.currentLine=2424832; - //BA.debugLineNum = 2424832;BA.debugLine="Sub GPS_LocationChanged (Location1 As Location)"; -RDebugUtils.currentLine=2424834; - //BA.debugLineNum = 2424834;BA.debugLine="End Sub"; -return ""; -} public static String _jobdone(keymon.lat.medicomed.httpjob _job) throws Exception{ -RDebugUtils.currentModule="starter"; -if (Debug.shouldDelegate(processBA, "jobdone", false)) - {return ((String) Debug.delegate(processBA, "jobdone", new Object[] {_job}));} -RDebugUtils.currentLine=2883584; - //BA.debugLineNum = 2883584;BA.debugLine="Sub JobDone(Job As HttpJob)"; -RDebugUtils.currentLine=2883588; - //BA.debugLineNum = 2883588;BA.debugLine="If Job.Success = False Then"; + //BA.debugLineNum = 139;BA.debugLine="Sub JobDone(Job As HttpJob)"; + //BA.debugLineNum = 143;BA.debugLine="If Job.Success = False Then"; if (_job._success /*boolean*/ ==anywheresoftware.b4a.keywords.Common.False) { -RDebugUtils.currentLine=2883590; - //BA.debugLineNum = 2883590;BA.debugLine="If Job.ErrorMessage.Contains(\"failed to connect\""; + //BA.debugLineNum = 145;BA.debugLine="If Job.ErrorMessage.Contains(\"failed to connect\""; if (_job._errormessage /*String*/ .contains("failed to connect") || _job._errormessage /*String*/ .contains("Failed to connect")) { -RDebugUtils.currentLine=2883591; - //BA.debugLineNum = 2883591;BA.debugLine="ToastMessageShow(\"¡Hubo un error contactando al"; + //BA.debugLineNum = 146;BA.debugLine="ToastMessageShow(\"¡Hubo un error contactando al"; anywheresoftware.b4a.keywords.Common.ToastMessageShow(BA.ObjectToCharSequence("¡Hubo un error contactando al servidor, por favor revise su conexión!"),anywheresoftware.b4a.keywords.Common.True); }; }else { }; -RDebugUtils.currentLine=2883597; - //BA.debugLineNum = 2883597;BA.debugLine="End Sub"; + //BA.debugLineNum = 152;BA.debugLine="End Sub"; return ""; } public static String _logcat_logcatdata(byte[] _buffer,int _length) throws Exception{ -RDebugUtils.currentModule="starter"; -if (Debug.shouldDelegate(processBA, "logcat_logcatdata", false)) - {return ((String) Debug.delegate(processBA, "logcat_logcatdata", new Object[] {_buffer,_length}));} -RDebugUtils.currentLine=2686976; - //BA.debugLineNum = 2686976;BA.debugLine="Private Sub logcat_LogCatData (Buffer() As Byte, L"; -RDebugUtils.currentLine=2686977; - //BA.debugLineNum = 2686977;BA.debugLine="logs.Append(BytesToString(Buffer, 0, Length, \"utf"; + //BA.debugLineNum = 114;BA.debugLine="Private Sub logcat_LogCatData (Buffer() As Byte, L"; + //BA.debugLineNum = 115;BA.debugLine="logs.Append(BytesToString(Buffer, 0, Length, \"utf"; _logs.Append(anywheresoftware.b4a.keywords.Common.BytesToString(_buffer,(int) (0),_length,"utf8")); -RDebugUtils.currentLine=2686978; - //BA.debugLineNum = 2686978;BA.debugLine="If logs.Length > 4000 Then"; + //BA.debugLineNum = 116;BA.debugLine="If logs.Length > 4000 Then"; if (_logs.getLength()>4000) { -RDebugUtils.currentLine=2686979; - //BA.debugLineNum = 2686979;BA.debugLine="logs.Remove(0, logs.Length - 2000) 'Obtenemos lo"; + //BA.debugLineNum = 117;BA.debugLine="logs.Remove(0, logs.Length - 2000) 'Obtenemos lo"; _logs.Remove((int) (0),(int) (_logs.getLength()-2000)); }; -RDebugUtils.currentLine=2686981; - //BA.debugLineNum = 2686981;BA.debugLine="End Sub"; + //BA.debugLineNum = 119;BA.debugLine="End Sub"; +return ""; +} +public static String _process_globals() throws Exception{ + //BA.debugLineNum = 6;BA.debugLine="Sub Process_Globals"; + //BA.debugLineNum = 9;BA.debugLine="Public gps As GPS"; +_gps = new anywheresoftware.b4a.gps.GPS(); + //BA.debugLineNum = 10;BA.debugLine="Dim ph As Phone"; +_ph = new anywheresoftware.b4a.phone.Phone(); + //BA.debugLineNum = 11;BA.debugLine="Public rp As RuntimePermissions"; +_rp = new anywheresoftware.b4a.objects.RuntimePermissions(); + //BA.debugLineNum = 12;BA.debugLine="Public FLP As FusedLocationProvider"; +_flp = new uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper(); + //BA.debugLineNum = 13;BA.debugLine="Dim reqManager As DBRequestManager"; +_reqmanager = new keymon.lat.medicomed.dbrequestmanager(); + //BA.debugLineNum = 14;BA.debugLine="Dim enVenta As Boolean = False"; +_enventa = anywheresoftware.b4a.keywords.Common.False; + //BA.debugLineNum = 16;BA.debugLine="Dim reqManager As DBRequestManager"; +_reqmanager = new keymon.lat.medicomed.dbrequestmanager(); + //BA.debugLineNum = 17;BA.debugLine="Dim server As String = \"http://187.189.244.154:17"; +_server = "http://187.189.244.154:1781"; + //BA.debugLineNum = 21;BA.debugLine="Dim Timer1 As Timer"; +_timer1 = new anywheresoftware.b4a.objects.Timer(); + //BA.debugLineNum = 22;BA.debugLine="Dim Interval As Int = 300"; +_interval = (int) (300); + //BA.debugLineNum = 23;BA.debugLine="Dim ruta As String = File.DirInternal"; +_ruta = anywheresoftware.b4a.keywords.Common.File.getDirInternal(); + //BA.debugLineNum = 25;BA.debugLine="Private logs As StringBuilder"; +_logs = new anywheresoftware.b4a.keywords.StringBuilderWrapper(); + //BA.debugLineNum = 26;BA.debugLine="Private logcat As LogCat"; +_logcat = new anywheresoftware.b4a.phone.Phone.LogCat(); + //BA.debugLineNum = 27;BA.debugLine="Dim dia_semana As String = \"\""; +_dia_semana = ""; + //BA.debugLineNum = 28;BA.debugLine="Dim logger As Boolean = True"; +_logger = anywheresoftware.b4a.keywords.Common.True; + //BA.debugLineNum = 29;BA.debugLine="Dim marcaCel As String = ph.manufacturer"; +_marcacel = _ph.getManufacturer(); + //BA.debugLineNum = 30;BA.debugLine="Public rp As RuntimePermissions"; +_rp = new anywheresoftware.b4a.objects.RuntimePermissions(); + //BA.debugLineNum = 31;BA.debugLine="Dim muestraProgreso = 0"; +_muestraprogreso = BA.NumberToString(0); + //BA.debugLineNum = 32;BA.debugLine="End Sub"; return ""; } public static String _reinicializareqmanager() throws Exception{ -RDebugUtils.currentModule="starter"; -if (Debug.shouldDelegate(processBA, "reinicializareqmanager", false)) - {return ((String) Debug.delegate(processBA, "reinicializareqmanager", null));} -RDebugUtils.currentLine=2818048; - //BA.debugLineNum = 2818048;BA.debugLine="Sub reinicializaReqManager"; -RDebugUtils.currentLine=2818049; - //BA.debugLineNum = 2818049;BA.debugLine="reqManager.Initialize(Me, server)"; -_reqmanager._initialize /*String*/ (null,processBA,starter.getObject(),_server); -RDebugUtils.currentLine=2818051; - //BA.debugLineNum = 2818051;BA.debugLine="If logger Then Log(server)"; + //BA.debugLineNum = 133;BA.debugLine="Sub reinicializaReqManager"; + //BA.debugLineNum = 134;BA.debugLine="reqManager.Initialize(Me, server)"; +_reqmanager._initialize /*String*/ (processBA,starter.getObject(),_server); + //BA.debugLineNum = 136;BA.debugLine="If logger Then Log(server)"; if (_logger) { -anywheresoftware.b4a.keywords.Common.LogImpl("32818051",_server,0);}; -RDebugUtils.currentLine=2818052; - //BA.debugLineNum = 2818052;BA.debugLine="End Sub"; +anywheresoftware.b4a.keywords.Common.LogImpl("339124995",_server,0);}; + //BA.debugLineNum = 137;BA.debugLine="End Sub"; return ""; } public static String _service_create() throws Exception{ -RDebugUtils.currentModule="starter"; -if (Debug.shouldDelegate(processBA, "service_create", false)) - {return ((String) Debug.delegate(processBA, "service_create", null));} -RDebugUtils.currentLine=2228224; - //BA.debugLineNum = 2228224;BA.debugLine="Sub Service_Create"; -RDebugUtils.currentLine=2228227; - //BA.debugLineNum = 2228227;BA.debugLine="gps.Initialize(\"GPS\")"; + //BA.debugLineNum = 34;BA.debugLine="Sub Service_Create"; + //BA.debugLineNum = 37;BA.debugLine="gps.Initialize(\"GPS\")"; _gps.Initialize("GPS"); -RDebugUtils.currentLine=2228229; - //BA.debugLineNum = 2228229;BA.debugLine="Timer1.Initialize(\"Timer1\", Interval * 1000)"; + //BA.debugLineNum = 39;BA.debugLine="Timer1.Initialize(\"Timer1\", Interval * 1000)"; _timer1.Initialize(processBA,"Timer1",(long) (_interval*1000)); -RDebugUtils.currentLine=2228230; - //BA.debugLineNum = 2228230;BA.debugLine="Timer1.Enabled = True"; + //BA.debugLineNum = 40;BA.debugLine="Timer1.Enabled = True"; _timer1.setEnabled(anywheresoftware.b4a.keywords.Common.True); -RDebugUtils.currentLine=2228235; - //BA.debugLineNum = 2228235;BA.debugLine="logs.Initialize"; + //BA.debugLineNum = 43;BA.debugLine="logcat.LogCatStart(Array As String(\"-v\",\"raw\",\"*:"; +_logcat.LogCatStart(processBA,new String[]{"-v","raw","*:F","B4A:v"},"logcat"); + //BA.debugLineNum = 45;BA.debugLine="logs.Initialize"; _logs.Initialize(); -RDebugUtils.currentLine=2228237; - //BA.debugLineNum = 2228237;BA.debugLine="End Sub"; + //BA.debugLineNum = 47;BA.debugLine="End Sub"; return ""; } public static String _service_destroy() throws Exception{ -RDebugUtils.currentModule="starter"; -if (Debug.shouldDelegate(processBA, "service_destroy", false)) - {return ((String) Debug.delegate(processBA, "service_destroy", null));} -RDebugUtils.currentLine=2555904; - //BA.debugLineNum = 2555904;BA.debugLine="Sub Service_Destroy"; -RDebugUtils.currentLine=2555906; - //BA.debugLineNum = 2555906;BA.debugLine="End Sub"; + //BA.debugLineNum = 69;BA.debugLine="Sub Service_Destroy"; + //BA.debugLineNum = 71;BA.debugLine="End Sub"; return ""; } public static String _service_start(anywheresoftware.b4a.objects.IntentWrapper _startingintent) throws Exception{ -RDebugUtils.currentModule="starter"; -if (Debug.shouldDelegate(processBA, "service_start", false)) - {return ((String) Debug.delegate(processBA, "service_start", new Object[] {_startingintent}));} -RDebugUtils.currentLine=2293760; - //BA.debugLineNum = 2293760;BA.debugLine="Sub Service_Start (StartingIntent As Intent)"; -RDebugUtils.currentLine=2293761; - //BA.debugLineNum = 2293761;BA.debugLine="Service.StopAutomaticForeground 'Starter service"; + //BA.debugLineNum = 49;BA.debugLine="Sub Service_Start (StartingIntent As Intent)"; + //BA.debugLineNum = 50;BA.debugLine="Service.StopAutomaticForeground 'Starter service"; mostCurrent._service.StopAutomaticForeground(); -RDebugUtils.currentLine=2293762; - //BA.debugLineNum = 2293762;BA.debugLine="Subs.revisaBD"; + //BA.debugLineNum = 51;BA.debugLine="Subs.revisaBD"; mostCurrent._subs._revisabd /*String*/ (processBA); -RDebugUtils.currentLine=2293764; - //BA.debugLineNum = 2293764;BA.debugLine="reqManager.Initialize(Me, server)"; -_reqmanager._initialize /*String*/ (null,processBA,starter.getObject(),_server); -RDebugUtils.currentLine=2293765; - //BA.debugLineNum = 2293765;BA.debugLine="End Sub"; + //BA.debugLineNum = 53;BA.debugLine="reqManager.Initialize(Me, server)"; +_reqmanager._initialize /*String*/ (processBA,starter.getObject(),_server); + //BA.debugLineNum = 54;BA.debugLine="End Sub"; return ""; } public static String _service_taskremoved() throws Exception{ -RDebugUtils.currentModule="starter"; -if (Debug.shouldDelegate(processBA, "service_taskremoved", false)) - {return ((String) Debug.delegate(processBA, "service_taskremoved", null));} -RDebugUtils.currentLine=2490368; - //BA.debugLineNum = 2490368;BA.debugLine="Sub Service_TaskRemoved"; -RDebugUtils.currentLine=2490370; - //BA.debugLineNum = 2490370;BA.debugLine="End Sub"; + //BA.debugLineNum = 65;BA.debugLine="Sub Service_TaskRemoved"; + //BA.debugLineNum = 67;BA.debugLine="End Sub"; return ""; } public static String _timer1_tick() throws Exception{ -RDebugUtils.currentModule="starter"; -if (Debug.shouldDelegate(processBA, "timer1_tick", false)) - {return ((String) Debug.delegate(processBA, "timer1_tick", null));} -RDebugUtils.currentLine=2359296; - //BA.debugLineNum = 2359296;BA.debugLine="Private Sub Timer1_Tick"; -RDebugUtils.currentLine=2359298; - //BA.debugLineNum = 2359298;BA.debugLine="ENVIA_ULTIMA_GPS"; + //BA.debugLineNum = 56;BA.debugLine="Private Sub Timer1_Tick"; + //BA.debugLineNum = 58;BA.debugLine="ENVIA_ULTIMA_GPS"; _envia_ultima_gps(); -RDebugUtils.currentLine=2359299; - //BA.debugLineNum = 2359299;BA.debugLine="End Sub"; + //BA.debugLineNum = 59;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/subs.java b/B4A/Objects/src/keymon/lat/medicomed/subs.java index 6ee040e..893381e 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/subs.java +++ b/B4A/Objects/src/keymon/lat/medicomed/subs.java @@ -10,8 +10,7 @@ private static subs mostCurrent = new subs(); public static Object getObject() { throw new RuntimeException("Code module does not support this method."); } - -public anywheresoftware.b4a.keywords.Common __c = null; + public anywheresoftware.b4a.keywords.Common __c = null; public static de.donmanfred.GZipStringswrapper _gzip = null; public static anywheresoftware.b4a.objects.StringUtils _su = null; public static anywheresoftware.b4a.phone.Phone _phn = null; @@ -33,1044 +32,124 @@ 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 static String _panelvisible(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.PanelWrapper _panel,int _top,int _left) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "panelvisible", false)) - {return ((String) Debug.delegate(null, "panelvisible", new Object[] {_ba,_panel,_top,_left}));} -RDebugUtils.currentLine=12648448; - //BA.debugLineNum = 12648448;BA.debugLine="Sub panelVisible(panel As Panel, top As Int, left"; -RDebugUtils.currentLine=12648449; - //BA.debugLineNum = 12648449;BA.debugLine="panel.BringToFront"; -_panel.BringToFront(); -RDebugUtils.currentLine=12648450; - //BA.debugLineNum = 12648450;BA.debugLine="panel.Visible = True"; -_panel.setVisible(anywheresoftware.b4a.keywords.Common.True); -RDebugUtils.currentLine=12648451; - //BA.debugLineNum = 12648451;BA.debugLine="panel.Top = top"; -_panel.setTop(_top); -RDebugUtils.currentLine=12648452; - //BA.debugLineNum = 12648452;BA.debugLine="panel.Left = left"; -_panel.setLeft(_left); -RDebugUtils.currentLine=12648453; - //BA.debugLineNum = 12648453;BA.debugLine="End Sub"; -return ""; -} -public static String _agregacolumna(anywheresoftware.b4a.BA _ba,String _tabla,String _columna,String _tipo) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "agregacolumna", false)) - {return ((String) Debug.delegate(null, "agregacolumna", new Object[] {_ba,_tabla,_columna,_tipo}));} -anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; -RDebugUtils.currentLine=15269888; - //BA.debugLineNum = 15269888;BA.debugLine="Sub agregaColumna(tabla As String, columna As Stri"; -RDebugUtils.currentLine=15269889; - //BA.debugLineNum = 15269889;BA.debugLine="Try 'Intentamos usar \"pragma_table_info\" para rev"; -try {RDebugUtils.currentLine=15269890; - //BA.debugLineNum = 15269890;BA.debugLine="Private c As Cursor = B4XPages.MainPage.skmt.Exe"; -_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("SELECT COUNT(*) AS fCol FROM pragma_table_info('"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tabla))+"') WHERE name='"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_columna))+"'")))); -RDebugUtils.currentLine=15269891; - //BA.debugLineNum = 15269891;BA.debugLine="c.Position = 0"; -_c.setPosition((int) (0)); -RDebugUtils.currentLine=15269892; - //BA.debugLineNum = 15269892;BA.debugLine="If c.GetString(\"fCol\") = 0 Then 'Si no esta la c"; -if ((_c.GetString("fCol")).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=15269893; - //BA.debugLineNum = 15269893;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"ALTER TAB"; -mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("ALTER TABLE "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tabla))+" ADD COLUMN "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_columna))+" "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tipo))+"")); -RDebugUtils.currentLine=15269894; - //BA.debugLineNum = 15269894;BA.debugLine="Log($\"Columna \"${columna} ${tipo}\", agregada a"; -anywheresoftware.b4a.keywords.Common.LogImpl("315269894",("Columna \""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_columna))+" "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tipo))+"\", agregada a \""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tabla))+"\"."),0); - }; -RDebugUtils.currentLine=15269896; - //BA.debugLineNum = 15269896;BA.debugLine="Log(1)"; -anywheresoftware.b4a.keywords.Common.LogImpl("315269896",BA.NumberToString(1),0); - } - catch (Exception e10) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e10);RDebugUtils.currentLine=15269898; - //BA.debugLineNum = 15269898;BA.debugLine="Try"; -try {RDebugUtils.currentLine=15269899; - //BA.debugLineNum = 15269899;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"ALTER TAB"; -mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("ALTER TABLE "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tabla))+" ADD COLUMN "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_columna))+" "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tipo))+"")); -RDebugUtils.currentLine=15269900; - //BA.debugLineNum = 15269900;BA.debugLine="Log($\"Columna \"${columna} ${tipo}\", agregada a"; -anywheresoftware.b4a.keywords.Common.LogImpl("315269900",("Columna \""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_columna))+" "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tipo))+"\", agregada a \""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tabla))+"\".."),0); - } - catch (Exception e14) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e14);RDebugUtils.currentLine=15269902; - //BA.debugLineNum = 15269902;BA.debugLine="Log(LastException)"; -anywheresoftware.b4a.keywords.Common.LogImpl("315269902",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),0); - }; -RDebugUtils.currentLine=15269904; - //BA.debugLineNum = 15269904;BA.debugLine="Log(2)"; -anywheresoftware.b4a.keywords.Common.LogImpl("315269904",BA.NumberToString(2),0); - }; -RDebugUtils.currentLine=15269906; - //BA.debugLineNum = 15269906;BA.debugLine="End Sub"; -return ""; -} -public static String _revisabd(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "revisabd", false)) - {return ((String) Debug.delegate(null, "revisabd", new Object[] {_ba}));} -RDebugUtils.currentLine=11468800; - //BA.debugLineNum = 11468800;BA.debugLine="Sub revisaBD 'ignore"; -RDebugUtils.currentLine=11468804; - //BA.debugLineNum = 11468804;BA.debugLine="If Not(File.Exists(Starter.ruta, \"kmt.db\")) Then"; -if (anywheresoftware.b4a.keywords.Common.Not(anywheresoftware.b4a.keywords.Common.File.Exists(mostCurrent._starter._ruta /*String*/ ,"kmt.db"))) { -RDebugUtils.currentLine=11468805; - //BA.debugLineNum = 11468805;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", Starter.ruta"; -anywheresoftware.b4a.keywords.Common.File.Copy(anywheresoftware.b4a.keywords.Common.File.getDirAssets(),"kmt.db",mostCurrent._starter._ruta /*String*/ ,"kmt.db"); -RDebugUtils.currentLine=11468806; - //BA.debugLineNum = 11468806;BA.debugLine="LogColor(\"copiamos kmt.db de \"&File.DirAssets &"; -anywheresoftware.b4a.keywords.Common.LogImpl("311468806","copiamos kmt.db de "+anywheresoftware.b4a.keywords.Common.File.getDirAssets()+" a "+mostCurrent._starter._ruta /*String*/ ,anywheresoftware.b4a.keywords.Common.Colors.Green); - }; -RDebugUtils.currentLine=11468808; - //BA.debugLineNum = 11468808;BA.debugLine="If Not(kmt.IsInitialized) Then kmt.Initialize(Sta"; -if (anywheresoftware.b4a.keywords.Common.Not(_kmt.IsInitialized())) { -_kmt.Initialize(mostCurrent._starter._ruta /*String*/ ,"kmt.db",anywheresoftware.b4a.keywords.Common.True);}; -RDebugUtils.currentLine=11468809; - //BA.debugLineNum = 11468809;BA.debugLine="kmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS RUTA"; -_kmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS RUTA_GPS(FECHA INTEGER, LAT TEXT, LON TEXT)"); -RDebugUtils.currentLine=11468811; - //BA.debugLineNum = 11468811;BA.debugLine="kmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS bita"; -_kmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS bitacora(fecha INTEGER, texto TEXT)"); -RDebugUtils.currentLine=11468812; - //BA.debugLineNum = 11468812;BA.debugLine="kmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIST"; -_kmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_AVANCE(HA_MARCA TEXT, HA_AVANCE TEXT, HA_OBJETIVO TEXT, HA_PORCENTAJE TEXT)"); -RDebugUtils.currentLine=11468813; - //BA.debugLineNum = 11468813;BA.debugLine="kmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIST"; -_kmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_FOTO_CLIENTE(CODIGO TEXT, ALMACEN TEXT, RUTA TEXT, NOM_FOTO TEXT)"); -RDebugUtils.currentLine=11468815; - //BA.debugLineNum = 11468815;BA.debugLine="kmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS CLIE"; -_kmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS CLIENTES_NUEVOS(CN_ID TEXT, CN_FECHA TEXT, CN_USER TEXT, CN_LAT TEXT, CN_LON TEXT, CN_NOMBRE TEXT, CN_DIRECCION TEXT, COLONIA TEXT, CP TEXT, CN_ALMACEN TEXT, CN_RUTA TEXT, CN_ENVIO TEXT)"); -RDebugUtils.currentLine=11468817; - //BA.debugLineNum = 11468817;BA.debugLine="Try 'Si no existe la columna CN_BANDERA la agrega"; -try {RDebugUtils.currentLine=11468818; - //BA.debugLineNum = 11468818;BA.debugLine="kmt.ExecQuery(\"select count(CN_BANDERA) from CLI"; -_kmt.ExecQuery("select count(CN_BANDERA) from CLIENTES_NUEVOS"); - } - catch (Exception e14) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e14);RDebugUtils.currentLine=11468820; - //BA.debugLineNum = 11468820;BA.debugLine="Try"; -try {RDebugUtils.currentLine=11468821; - //BA.debugLineNum = 11468821;BA.debugLine="kmt.ExecNonQuery(\"ALTER TABLE CLIENTES_NUEVOS A"; -_kmt.ExecNonQuery("ALTER TABLE CLIENTES_NUEVOS ADD COLUMN CN_BANDERA INTEGER"); - } - catch (Exception e17) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e17);RDebugUtils.currentLine=11468823; - //BA.debugLineNum = 11468823;BA.debugLine="LogColor(\"No pudimos agregar la columna CN_BAND"; -anywheresoftware.b4a.keywords.Common.LogImpl("311468823","No pudimos agregar la columna CN_BANDERA.",anywheresoftware.b4a.keywords.Common.Colors.Red); -RDebugUtils.currentLine=11468824; - //BA.debugLineNum = 11468824;BA.debugLine="LogColor(LastException, Colors.Red)"; -anywheresoftware.b4a.keywords.Common.LogImpl("311468824",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); - }; - }; -RDebugUtils.currentLine=11468828; - //BA.debugLineNum = 11468828;BA.debugLine="Try 'Si no existe la columna PC_ENVIO_OK la agreg"; -try {RDebugUtils.currentLine=11468829; - //BA.debugLineNum = 11468829;BA.debugLine="kmt.ExecQuery(\"select count(PC_ENVIO_OK) from PE"; -_kmt.ExecQuery("select count(PC_ENVIO_OK) from PEDIDO_CLIENTE"); - } - catch (Exception e24) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e24);RDebugUtils.currentLine=11468831; - //BA.debugLineNum = 11468831;BA.debugLine="Try"; -try {RDebugUtils.currentLine=11468832; - //BA.debugLineNum = 11468832;BA.debugLine="kmt.ExecNonQuery(\"ALTER TABLE PEDIDO_CLIENTE AD"; -_kmt.ExecNonQuery("ALTER TABLE PEDIDO_CLIENTE ADD COLUMN PC_ENVIO_OK INTEGER"); - } - catch (Exception e27) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e27);RDebugUtils.currentLine=11468834; - //BA.debugLineNum = 11468834;BA.debugLine="LogColor(\"No pudimos agregar la columna PC_ENVI"; -anywheresoftware.b4a.keywords.Common.LogImpl("311468834","No pudimos agregar la columna PC_ENVIO_OK.",anywheresoftware.b4a.keywords.Common.Colors.Red); -RDebugUtils.currentLine=11468835; - //BA.debugLineNum = 11468835;BA.debugLine="LogColor(LastException, Colors.Red)"; -anywheresoftware.b4a.keywords.Common.LogImpl("311468835",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); - }; - }; -RDebugUtils.currentLine=11468838; - //BA.debugLineNum = 11468838;BA.debugLine="Try 'Si no existe la columna PC_ENVIO_OK la agreg"; -try {RDebugUtils.currentLine=11468839; - //BA.debugLineNum = 11468839;BA.debugLine="kmt.ExecQuery(\"select count(PC_TIEMPO_TIENDA) fr"; -_kmt.ExecQuery("select count(PC_TIEMPO_TIENDA) from PEDIDO_CLIENTE"); - } - catch (Exception e34) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e34);RDebugUtils.currentLine=11468841; - //BA.debugLineNum = 11468841;BA.debugLine="Try"; -try {RDebugUtils.currentLine=11468842; - //BA.debugLineNum = 11468842;BA.debugLine="kmt.ExecNonQuery(\"ALTER TABLE PEDIDO_CLIENTE AD"; -_kmt.ExecNonQuery("ALTER TABLE PEDIDO_CLIENTE ADD COLUMN PC_TIEMPO_TIENDA FLOAT"); - } - catch (Exception e37) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e37);RDebugUtils.currentLine=11468844; - //BA.debugLineNum = 11468844;BA.debugLine="LogColor(\"No pudimos agregar la columna PC_TIEM"; -anywheresoftware.b4a.keywords.Common.LogImpl("311468844","No pudimos agregar la columna PC_TIEMPO_TIENDA.",anywheresoftware.b4a.keywords.Common.Colors.Red); -RDebugUtils.currentLine=11468845; - //BA.debugLineNum = 11468845;BA.debugLine="LogColor(LastException, Colors.Red)"; -anywheresoftware.b4a.keywords.Common.LogImpl("311468845",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); - }; - }; -RDebugUtils.currentLine=11468848; - //BA.debugLineNum = 11468848;BA.debugLine="Try 'Si no existe la columna PC_FACTURA la agrega"; -try {RDebugUtils.currentLine=11468849; - //BA.debugLineNum = 11468849;BA.debugLine="kmt.ExecQuery(\"select count(PC_FACTURA) from PED"; -_kmt.ExecQuery("select count(PC_FACTURA) from PEDIDO_CLIENTE"); - } - catch (Exception e44) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e44);RDebugUtils.currentLine=11468851; - //BA.debugLineNum = 11468851;BA.debugLine="Try"; -try {RDebugUtils.currentLine=11468852; - //BA.debugLineNum = 11468852;BA.debugLine="kmt.ExecNonQuery(\"ALTER TABLE PEDIDO_CLIENTE AD"; -_kmt.ExecNonQuery("ALTER TABLE PEDIDO_CLIENTE ADD COLUMN PC_FACTURA INTEGER"); - } - catch (Exception e47) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e47);RDebugUtils.currentLine=11468854; - //BA.debugLineNum = 11468854;BA.debugLine="LogColor(\"No pudimos agregar la columna PC_FACT"; -anywheresoftware.b4a.keywords.Common.LogImpl("311468854","No pudimos agregar la columna PC_FACTURA.",anywheresoftware.b4a.keywords.Common.Colors.Red); -RDebugUtils.currentLine=11468855; - //BA.debugLineNum = 11468855;BA.debugLine="LogColor(LastException, Colors.Red)"; -anywheresoftware.b4a.keywords.Common.LogImpl("311468855",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); - }; - }; -RDebugUtils.currentLine=11468859; - //BA.debugLineNum = 11468859;BA.debugLine="Try 'Si no existe la columna PC_ENVIO_OK la agreg"; -try {RDebugUtils.currentLine=11468860; - //BA.debugLineNum = 11468860;BA.debugLine="kmt.ExecQuery(\"select count(NV_NOMBRE) from NOVE"; -_kmt.ExecQuery("select count(NV_NOMBRE) from NOVENTA"); - } - catch (Exception e54) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e54);RDebugUtils.currentLine=11468862; - //BA.debugLineNum = 11468862;BA.debugLine="Try"; -try {RDebugUtils.currentLine=11468863; - //BA.debugLineNum = 11468863;BA.debugLine="kmt.ExecNonQuery(\"ALTER TABLE NOVENTA ADD COLUM"; -_kmt.ExecNonQuery("ALTER TABLE NOVENTA ADD COLUMN NV_NOMBRE TEXT"); - } - catch (Exception e57) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e57);RDebugUtils.currentLine=11468865; - //BA.debugLineNum = 11468865;BA.debugLine="LogColor(\"No pudimos agregar la columna NV_NOMB"; -anywheresoftware.b4a.keywords.Common.LogImpl("311468865","No pudimos agregar la columna NV_NOMBRE.",anywheresoftware.b4a.keywords.Common.Colors.Red); -RDebugUtils.currentLine=11468866; - //BA.debugLineNum = 11468866;BA.debugLine="LogColor(LastException, Colors.Red)"; -anywheresoftware.b4a.keywords.Common.LogImpl("311468866",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); - }; - }; -RDebugUtils.currentLine=11468870; - //BA.debugLineNum = 11468870;BA.debugLine="Try 'Si no existe la columna PC_ENVIO_OK la agreg"; -try {RDebugUtils.currentLine=11468871; - //BA.debugLineNum = 11468871;BA.debugLine="kmt.ExecQuery(\"select count(NV_DIRECCION) from N"; -_kmt.ExecQuery("select count(NV_DIRECCION) from NOVENTA"); - } - catch (Exception e64) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e64);RDebugUtils.currentLine=11468873; - //BA.debugLineNum = 11468873;BA.debugLine="Try"; -try {RDebugUtils.currentLine=11468874; - //BA.debugLineNum = 11468874;BA.debugLine="kmt.ExecNonQuery(\"ALTER TABLE NOVENTA ADD COLUM"; -_kmt.ExecNonQuery("ALTER TABLE NOVENTA ADD COLUMN NV_DIRECCION TEXT"); - } - catch (Exception e67) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e67);RDebugUtils.currentLine=11468876; - //BA.debugLineNum = 11468876;BA.debugLine="LogColor(\"No pudimos agregar la columna NV_NOMB"; -anywheresoftware.b4a.keywords.Common.LogImpl("311468876","No pudimos agregar la columna NV_NOMBRE.",anywheresoftware.b4a.keywords.Common.Colors.Red); -RDebugUtils.currentLine=11468877; - //BA.debugLineNum = 11468877;BA.debugLine="LogColor(LastException, Colors.Red)"; -anywheresoftware.b4a.keywords.Common.LogImpl("311468877",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); - }; - }; -RDebugUtils.currentLine=11468881; - //BA.debugLineNum = 11468881;BA.debugLine="Try 'Si no existe la columna NV_ENVIO la agregamo"; -try {RDebugUtils.currentLine=11468882; - //BA.debugLineNum = 11468882;BA.debugLine="kmt.ExecQuery(\"select count(NV_ENVIO) from NOVEN"; -_kmt.ExecQuery("select count(NV_ENVIO) from NOVENTA"); - } - catch (Exception e74) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e74);RDebugUtils.currentLine=11468884; - //BA.debugLineNum = 11468884;BA.debugLine="Try"; -try {RDebugUtils.currentLine=11468885; - //BA.debugLineNum = 11468885;BA.debugLine="kmt.ExecNonQuery(\"ALTER TABLE NOVENTA ADD COLUM"; -_kmt.ExecNonQuery("ALTER TABLE NOVENTA ADD COLUMN NV_ENVIO TEXT"); - } - catch (Exception e77) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e77);RDebugUtils.currentLine=11468887; - //BA.debugLineNum = 11468887;BA.debugLine="LogColor(\"No pudimos agregar la columna NV_ENVI"; -anywheresoftware.b4a.keywords.Common.LogImpl("311468887","No pudimos agregar la columna NV_ENVIO.",anywheresoftware.b4a.keywords.Common.Colors.Red); -RDebugUtils.currentLine=11468888; - //BA.debugLineNum = 11468888;BA.debugLine="LogColor(LastException, Colors.Red)"; -anywheresoftware.b4a.keywords.Common.LogImpl("311468888",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); - }; - }; -RDebugUtils.currentLine=11468892; - //BA.debugLineNum = 11468892;BA.debugLine="kmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS bita"; -_kmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS bitacora(fecha INTEGER, texto TEXT)"); -RDebugUtils.currentLine=11468894; - //BA.debugLineNum = 11468894;BA.debugLine="kmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS PEDI"; -_kmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS PEDIDO_INICIO_FINAL(PIF_CLIENTE TEXT, PIF_HORA_INICIO LONG, PIF_HORA_FINAL LONG)"); -RDebugUtils.currentLine=11468897; - //BA.debugLineNum = 11468897;BA.debugLine="If Not(errorLog.IsInitialized) Then errorLog.Init"; -if (anywheresoftware.b4a.keywords.Common.Not(_errorlog.IsInitialized())) { -_errorlog.Initialize(mostCurrent._starter._ruta /*String*/ ,"errorLog.db",anywheresoftware.b4a.keywords.Common.True);}; -RDebugUtils.currentLine=11468898; - //BA.debugLineNum = 11468898;BA.debugLine="errorLog.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS"; -_errorlog.ExecNonQuery("CREATE TABLE IF NOT EXISTS errores(fecha INTEGER, error TEXT)"); -RDebugUtils.currentLine=11468899; - //BA.debugLineNum = 11468899;BA.debugLine="End Sub"; -return ""; -} -public static String _fechakmt(anywheresoftware.b4a.BA _ba,String _fecha) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "fechakmt", false)) - {return ((String) Debug.delegate(null, "fechakmt", new Object[] {_ba,_fecha}));} -String _origformat = ""; -String _nuevafecha = ""; -RDebugUtils.currentLine=10878976; - //BA.debugLineNum = 10878976;BA.debugLine="Sub fechaKMT(fecha As String) As String 'ignore"; -RDebugUtils.currentLine=10878978; - //BA.debugLineNum = 10878978;BA.debugLine="Dim OrigFormat As String = DateTime.DateFormat '"; -_origformat = anywheresoftware.b4a.keywords.Common.DateTime.getDateFormat(); -RDebugUtils.currentLine=10878979; - //BA.debugLineNum = 10878979;BA.debugLine="DateTime.DateFormat=\"yyMMddHHmmss\""; -anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat("yyMMddHHmmss"); -RDebugUtils.currentLine=10878980; - //BA.debugLineNum = 10878980;BA.debugLine="Dim nuevaFecha As String=DateTime.Date(fecha)"; -_nuevafecha = anywheresoftware.b4a.keywords.Common.DateTime.Date((long)(Double.parseDouble(_fecha))); -RDebugUtils.currentLine=10878981; - //BA.debugLineNum = 10878981;BA.debugLine="DateTime.DateFormat=OrigFormat 'return to orig d"; -anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat(_origformat); -RDebugUtils.currentLine=10878983; - //BA.debugLineNum = 10878983;BA.debugLine="Return nuevaFecha"; -if (true) return _nuevafecha; -RDebugUtils.currentLine=10878984; - //BA.debugLineNum = 10878984;BA.debugLine="End Sub"; -return ""; -} -public static String _bitacora(anywheresoftware.b4a.BA _ba,String _fechab,String _usuariob,String _almacenb,String _rutab,String _eventob,String _clienteb,String _iniciob,String _finb,String _latitudb,String _longitudb,String _precision,String _motivonoventa,String _motivonovisita) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "bitacora", false)) - {return ((String) Debug.delegate(null, "bitacora", new Object[] {_ba,_fechab,_usuariob,_almacenb,_rutab,_eventob,_clienteb,_iniciob,_finb,_latitudb,_longitudb,_precision,_motivonoventa,_motivonovisita}));} -keymon.lat.medicomed.dbrequestmanager._dbcommand _cmd = null; -String _nombrecliente = ""; -anywheresoftware.b4a.sql.SQL.CursorWrapper _e = null; -anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; -RDebugUtils.currentLine=14876672; - //BA.debugLineNum = 14876672;BA.debugLine="Sub bitacora(fechab As String, usuariob As String,"; -RDebugUtils.currentLine=14876673; - //BA.debugLineNum = 14876673;BA.debugLine="Log(motivonovisita)"; -anywheresoftware.b4a.keywords.Common.LogImpl("314876673",_motivonovisita,0); -RDebugUtils.currentLine=14876674; - //BA.debugLineNum = 14876674;BA.debugLine="Log(\"bitacora\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("314876674","bitacora",0); -RDebugUtils.currentLine=14876675; - //BA.debugLineNum = 14876675;BA.debugLine="Log(eventob)"; -anywheresoftware.b4a.keywords.Common.LogImpl("314876675",_eventob,0); -RDebugUtils.currentLine=14876676; - //BA.debugLineNum = 14876676;BA.debugLine="Private cmd As DBCommand"; -_cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=14876677; - //BA.debugLineNum = 14876677;BA.debugLine="cmd.Initialize"; -_cmd.Initialize(); -RDebugUtils.currentLine=14876678; - //BA.debugLineNum = 14876678;BA.debugLine="cmd.Name = \"mandaBitacora_MEDICOMED\""; -_cmd.Name /*String*/ = "mandaBitacora_MEDICOMED"; -RDebugUtils.currentLine=14876679; - //BA.debugLineNum = 14876679;BA.debugLine="Log(\"BITACORA3\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("314876679","BITACORA3",0); -RDebugUtils.currentLine=14876680; - //BA.debugLineNum = 14876680;BA.debugLine="Private nombreCliente As String = traeNombreClien"; -_nombrecliente = _traenombrecliente(_ba,_clienteb); -RDebugUtils.currentLine=14876681; - //BA.debugLineNum = 14876681;BA.debugLine="If eventob = \"Llega a almacen\" Then"; -if ((_eventob).equals("Llega a almacen")) { -RDebugUtils.currentLine=14876682; - //BA.debugLineNum = 14876682;BA.debugLine="nombreCliente = \"BOLETA\""; -_nombrecliente = "BOLETA"; -RDebugUtils.currentLine=14876683; - //BA.debugLineNum = 14876683;BA.debugLine="clienteb = \"\""; -_clienteb = ""; -RDebugUtils.currentLine=14876684; - //BA.debugLineNum = 14876684;BA.debugLine="finb = iniciob"; -_finb = _iniciob; - }; -RDebugUtils.currentLine=14876686; - //BA.debugLineNum = 14876686;BA.debugLine="If eventob = \"Salida almacen\" Then nombreCliente"; -if ((_eventob).equals("Salida almacen")) { -_nombrecliente = "CHECKLIST";}; -RDebugUtils.currentLine=14876687; - //BA.debugLineNum = 14876687;BA.debugLine="If eventob = \"Fin Día\" Then nombreCliente = \"FIN"; -if ((_eventob).equals("Fin Día")) { -_nombrecliente = "FIN DIA";}; -RDebugUtils.currentLine=14876688; - //BA.debugLineNum = 14876688;BA.debugLine="If eventob = \"Carga día\" Then nombreCliente = \"CA"; -if ((_eventob).equals("Carga día")) { -_nombrecliente = "CARGA DIA";}; -RDebugUtils.currentLine=14876689; - //BA.debugLineNum = 14876689;BA.debugLine="If eventob <> \"Termina Venta\" And eventob <> \"No"; -if ((_eventob).equals("Termina Venta") == false && (_eventob).equals("No Venta") == false) { -RDebugUtils.currentLine=14876690; - //BA.debugLineNum = 14876690;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"INSERT INT"; -mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("INSERT INTO BITACORAGPS (fechab, usuariob , almacenb , rutab , eventob , clienteb , iniciob , finb , latitudb, longitudb , precision , motivonoventa , motivonovisita) VALUES ('"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_fechab))+"' ,'"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_usuariob))+"' , '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_almacenb))+"' , '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_rutab))+"' , '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_eventob))+"' , '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteb))+"' , '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_iniciob))+"' , '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_finb))+"' , '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_latitudb))+"' , '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_longitudb))+"' , '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_precision))+"' , '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_motivonoventa))+"' , '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_motivonovisita))+"')")); -RDebugUtils.currentLine=14876691; - //BA.debugLineNum = 14876691;BA.debugLine="Log($\"'${almacenb}', '${usuariob}', '${rutab}',"; -anywheresoftware.b4a.keywords.Common.LogImpl("314876691",("'"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_almacenb))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_usuariob))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_rutab))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_eventob))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteb))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_nombrecliente))+"','"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_iniciob))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_finb))+"','"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_latitudb))+"','"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_longitudb))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_precision))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_motivonoventa))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_motivonovisita))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_fechab))+"'"),0); - }else { -RDebugUtils.currentLine=14876696; - //BA.debugLineNum = 14876696;BA.debugLine="Private e As Cursor = B4XPages.MainPage.skmt.Exe"; -_e = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -_e = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select fechab from BITACORAGPS where usuariob = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_usuariob))+"' and almacenb = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_almacenb))+"' and rutab = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_rutab))+"' and clienteb = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteb))+"' and eventob = 'Inicia Venta' order by fechab desc")))); -RDebugUtils.currentLine=14876698; - //BA.debugLineNum = 14876698;BA.debugLine="If e.RowCount > 0 Then"; -if (_e.getRowCount()>0) { -RDebugUtils.currentLine=14876699; - //BA.debugLineNum = 14876699;BA.debugLine="e.Position = 0"; -_e.setPosition((int) (0)); -RDebugUtils.currentLine=14876700; - //BA.debugLineNum = 14876700;BA.debugLine="Log(\"ACTUALIZA BITACORA\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("314876700","ACTUALIZA BITACORA",0); -RDebugUtils.currentLine=14876701; - //BA.debugLineNum = 14876701;BA.debugLine="If eventob = \"Termina Venta\" Then"; -if ((_eventob).equals("Termina Venta")) { -RDebugUtils.currentLine=14876702; - //BA.debugLineNum = 14876702;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"update B"; -mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("update BITACORAGPS set finb = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_finb))+"' where rutab = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_rutab))+"' and almacenb = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_almacenb))+"' and usuariob = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_usuariob))+"' and clienteb = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteb))+"' and fechab = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_e.GetString("fechab")))+"' ")); -RDebugUtils.currentLine=14876705; - //BA.debugLineNum = 14876705;BA.debugLine="cmd.Parameters = Array As Object(finb, rutab,"; -_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_finb),(Object)(_rutab),(Object)(_almacenb),(Object)(_usuariob),(Object)(_clienteb),(Object)("Inicia Venta"),(Object)(_e.GetString("fechab"))}; - }else -{RDebugUtils.currentLine=14876708; - //BA.debugLineNum = 14876708;BA.debugLine="else if eventob = \"No Venta\" Then"; -if ((_eventob).equals("No Venta")) { -RDebugUtils.currentLine=14876709; - //BA.debugLineNum = 14876709;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"update B"; -mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("update BITACORAGPS set finb = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_finb))+"', motivonoventa = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_motivonoventa))+"', motivonovisita = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_motivonovisita))+"' where rutab = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_rutab))+"' and almacenb = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_almacenb))+"' and usuariob = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_usuariob))+"' and clienteb = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteb))+"' and fechab = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_e.GetString("fechab")))+"' ")); -RDebugUtils.currentLine=14876712; - //BA.debugLineNum = 14876712;BA.debugLine="cmd.Parameters = Array As Object(finb, motivon"; -_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_finb),(Object)(_motivonoventa),(Object)(_motivonovisita),(Object)(_rutab),(Object)(_almacenb),(Object)(_usuariob),(Object)(_clienteb),(Object)("Inicia Venta"),(Object)(_e.GetString("fechab"))}; - }} -; - }; - }; -RDebugUtils.currentLine=14876718; - //BA.debugLineNum = 14876718;BA.debugLine="If eventob <> \"Inicia Venta\" Then"; -if ((_eventob).equals("Inicia Venta") == false) { -RDebugUtils.currentLine=14876719; - //BA.debugLineNum = 14876719;BA.debugLine="Private c As Cursor = B4XPages.MainPage.skmt.Exe"; -_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select * from BITACORAGPS where usuariob = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_usuariob))+"' and almacenb = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_almacenb))+"' and rutab = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_rutab))+"' and clienteb = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteb))+"' order by fechab desc")))); -RDebugUtils.currentLine=14876720; - //BA.debugLineNum = 14876720;BA.debugLine="If c.RowCount > 0 Then"; -if (_c.getRowCount()>0) { -RDebugUtils.currentLine=14876721; - //BA.debugLineNum = 14876721;BA.debugLine="Log(c.RowCount)"; -anywheresoftware.b4a.keywords.Common.LogImpl("314876721",BA.NumberToString(_c.getRowCount()),0); -RDebugUtils.currentLine=14876722; - //BA.debugLineNum = 14876722;BA.debugLine="c.Position = 0"; -_c.setPosition((int) (0)); -RDebugUtils.currentLine=14876723; - //BA.debugLineNum = 14876723;BA.debugLine="cmd.Parameters = Array As Object(c.GetString(\"a"; -_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_c.GetString("almacenb")),(Object)(_c.GetString("usuariob")),(Object)(_c.GetString("rutab")),(Object)(_c.GetString("eventob")),(Object)(_c.GetString("clienteb")),(Object)(_nombrecliente),(Object)(_c.GetString("iniciob")),(Object)(_c.GetString("finb")),(Object)(_c.GetString("latitudb")),(Object)(_c.GetString("longitudb")),(Object)(_c.GetString("precision")),(Object)(_c.GetString("motivonoventa")),(Object)(_c.GetString("motivonovisita")),(Object)(_c.GetString("fechab"))}; -RDebugUtils.currentLine=14876724; - //BA.debugLineNum = 14876724;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cmd"; -mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (null,_cmd,(Object)("mandaBitacora")); - }; - }; -RDebugUtils.currentLine=14876727; - //BA.debugLineNum = 14876727;BA.debugLine="Log(\"Mandamos bitacora\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("314876727","Mandamos bitacora",0); -RDebugUtils.currentLine=14876728; - //BA.debugLineNum = 14876728;BA.debugLine="End Sub"; -return ""; -} -public static String _fechanormal(anywheresoftware.b4a.BA _ba,String _fecha) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "fechanormal", false)) - {return ((String) Debug.delegate(null, "fechanormal", new Object[] {_ba,_fecha}));} -String _origformat = ""; -String _nuevafecha = ""; -RDebugUtils.currentLine=15007744; - //BA.debugLineNum = 15007744;BA.debugLine="Sub fechanormal(fecha As String) As String 'ignore"; -RDebugUtils.currentLine=15007746; - //BA.debugLineNum = 15007746;BA.debugLine="Dim OrigFormat As String = DateTime.DateFormat '"; -_origformat = anywheresoftware.b4a.keywords.Common.DateTime.getDateFormat(); -RDebugUtils.currentLine=15007747; - //BA.debugLineNum = 15007747;BA.debugLine="DateTime.DateFormat = \"YYYY/MM/dd HH:mm:ss\""; -anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat("YYYY/MM/dd HH:mm:ss"); -RDebugUtils.currentLine=15007748; - //BA.debugLineNum = 15007748;BA.debugLine="Dim nuevaFecha As String=DateTime.Date(fecha)"; -_nuevafecha = anywheresoftware.b4a.keywords.Common.DateTime.Date((long)(Double.parseDouble(_fecha))); -RDebugUtils.currentLine=15007749; - //BA.debugLineNum = 15007749;BA.debugLine="DateTime.DateFormat = OrigFormat 'return to orig"; -anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat(_origformat); -RDebugUtils.currentLine=15007751; - //BA.debugLineNum = 15007751;BA.debugLine="Return nuevaFecha"; -if (true) return _nuevafecha; -RDebugUtils.currentLine=15007752; - //BA.debugLineNum = 15007752;BA.debugLine="End Sub"; -return ""; -} -public static String _centrapanel(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.PanelWrapper _elemento,int _anchoelementosuperior) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "centrapanel", false)) - {return ((String) Debug.delegate(null, "centrapanel", new Object[] {_ba,_elemento,_anchoelementosuperior}));} -RDebugUtils.currentLine=12779520; - //BA.debugLineNum = 12779520;BA.debugLine="Sub centraPanel(elemento As Panel, anchoElementoSu"; -RDebugUtils.currentLine=12779521; - //BA.debugLineNum = 12779521;BA.debugLine="elemento.Left = Round(anchoElementoSuperior/2)-(e"; -_elemento.setLeft((int) (anywheresoftware.b4a.keywords.Common.Round(_anchoelementosuperior/(double)2)-(_elemento.getWidth()/(double)2))); -RDebugUtils.currentLine=12779522; - //BA.debugLineNum = 12779522;BA.debugLine="End Sub"; -return ""; -} -public static String _centrapanelv(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.PanelWrapper _elemento,int _altoelementosuperior) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "centrapanelv", false)) - {return ((String) Debug.delegate(null, "centrapanelv", new Object[] {_ba,_elemento,_altoelementosuperior}));} -RDebugUtils.currentLine=12845056; - //BA.debugLineNum = 12845056;BA.debugLine="Sub centraPanelV(elemento As Panel, altoElementoSu"; -RDebugUtils.currentLine=12845057; - //BA.debugLineNum = 12845057;BA.debugLine="elemento.Top = Round(altoElementoSuperior/2)-(ele"; -_elemento.setTop((int) (anywheresoftware.b4a.keywords.Common.Round(_altoelementosuperior/(double)2)-(_elemento.getHeight()/(double)2))); -RDebugUtils.currentLine=12845058; - //BA.debugLineNum = 12845058;BA.debugLine="End Sub"; -return ""; -} -public static String _traenombrecliente(anywheresoftware.b4a.BA _ba,String _id) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "traenombrecliente", false)) - {return ((String) Debug.delegate(null, "traenombrecliente", new Object[] {_ba,_id}));} -anywheresoftware.b4a.sql.SQL.ResultSetWrapper _c = null; -String _n = ""; -RDebugUtils.currentLine=14942208; - //BA.debugLineNum = 14942208;BA.debugLine="Sub traeNombreCliente(id As String) As String"; -RDebugUtils.currentLine=14942209; - //BA.debugLineNum = 14942209;BA.debugLine="Private c As ResultSet = B4XPages.MainPage.skmt.E"; -_c = new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(); -_c = (anywheresoftware.b4a.sql.SQL.ResultSetWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select CAT_CL_NOMBRE from kmt_info where CAT_CL_CODIGO = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_id))+"'")))); -RDebugUtils.currentLine=14942210; - //BA.debugLineNum = 14942210;BA.debugLine="Private n As String = \"N/A\""; -_n = "N/A"; -RDebugUtils.currentLine=14942211; - //BA.debugLineNum = 14942211;BA.debugLine="Do While c.NextRow"; -while (_c.NextRow()) { -RDebugUtils.currentLine=14942212; - //BA.debugLineNum = 14942212;BA.debugLine="n = c.GetString(\"CAT_CL_NOMBRE\")"; -_n = _c.GetString("CAT_CL_NOMBRE"); - } -; -RDebugUtils.currentLine=14942214; - //BA.debugLineNum = 14942214;BA.debugLine="Return n"; -if (true) return _n; -RDebugUtils.currentLine=14942215; - //BA.debugLineNum = 14942215;BA.debugLine="End Sub"; -return ""; -} -public static String _traeusuariodebd(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "traeusuariodebd", false)) - {return ((String) Debug.delegate(null, "traeusuariodebd", new Object[] {_ba}));} -anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; -String _u = ""; -RDebugUtils.currentLine=13434880; - //BA.debugLineNum = 13434880;BA.debugLine="Sub traeUsuarioDeBD As String 'ignore"; -RDebugUtils.currentLine=13434881; - //BA.debugLineNum = 13434881;BA.debugLine="Private c As Cursor"; -_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=13434882; - //BA.debugLineNum = 13434882;BA.debugLine="Private u As String = \"SinUsuario\""; -_u = "SinUsuario"; -RDebugUtils.currentLine=13434883; - //BA.debugLineNum = 13434883;BA.debugLine="If Not(kmt.IsInitialized) Then revisaBD"; -if (anywheresoftware.b4a.keywords.Common.Not(_kmt.IsInitialized())) { -_revisabd(_ba);}; -RDebugUtils.currentLine=13434884; - //BA.debugLineNum = 13434884;BA.debugLine="c=kmt.ExecQuery(\"select USUARIO from usuarioa\")"; -_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_kmt.ExecQuery("select USUARIO from usuarioa"))); -RDebugUtils.currentLine=13434885; - //BA.debugLineNum = 13434885;BA.debugLine="c.Position=0"; -_c.setPosition((int) (0)); -RDebugUtils.currentLine=13434886; - //BA.debugLineNum = 13434886;BA.debugLine="If c.RowCount > 0 Then u = c.GetString(\"USUARIO\")"; -if (_c.getRowCount()>0) { -_u = _c.GetString("USUARIO");}; -RDebugUtils.currentLine=13434887; - //BA.debugLineNum = 13434887;BA.debugLine="c.Close"; -_c.Close(); -RDebugUtils.currentLine=13434888; - //BA.debugLineNum = 13434888;BA.debugLine="Return u"; -if (true) return _u; -RDebugUtils.currentLine=13434889; - //BA.debugLineNum = 13434889;BA.debugLine="End Sub"; -return ""; -} -public static String _traeruta(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "traeruta", false)) - {return ((String) Debug.delegate(null, "traeruta", new Object[] {_ba}));} -anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; -String _r = ""; -RDebugUtils.currentLine=13238272; - //BA.debugLineNum = 13238272;BA.debugLine="Sub traeRuta As String 'ignore"; -RDebugUtils.currentLine=13238273; - //BA.debugLineNum = 13238273;BA.debugLine="Private c As Cursor"; -_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=13238274; - //BA.debugLineNum = 13238274;BA.debugLine="Private r As String"; -_r = ""; -RDebugUtils.currentLine=13238275; - //BA.debugLineNum = 13238275;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_CL"; -_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select CAT_CL_RUTA from kmt_info where CAT_CL_CODIGO In (Select cuenta from cuentaa)"))); -RDebugUtils.currentLine=13238276; - //BA.debugLineNum = 13238276;BA.debugLine="r = \"0\""; -_r = "0"; -RDebugUtils.currentLine=13238277; - //BA.debugLineNum = 13238277;BA.debugLine="If c.RowCount > 0 Then"; -if (_c.getRowCount()>0) { -RDebugUtils.currentLine=13238278; - //BA.debugLineNum = 13238278;BA.debugLine="c.Position=0"; -_c.setPosition((int) (0)); -RDebugUtils.currentLine=13238279; - //BA.debugLineNum = 13238279;BA.debugLine="r = c.GetString(\"CAT_CL_RUTA\")"; -_r = _c.GetString("CAT_CL_RUTA"); - }; -RDebugUtils.currentLine=13238281; - //BA.debugLineNum = 13238281;BA.debugLine="c.Close"; -_c.Close(); -RDebugUtils.currentLine=13238282; - //BA.debugLineNum = 13238282;BA.debugLine="Return r"; -if (true) return _r; -RDebugUtils.currentLine=13238283; - //BA.debugLineNum = 13238283;BA.debugLine="End Sub"; -return ""; -} -public static String _traecliente(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "traecliente", false)) - {return ((String) Debug.delegate(null, "traecliente", new Object[] {_ba}));} -anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; -String _cl = ""; -RDebugUtils.currentLine=13303808; - //BA.debugLineNum = 13303808;BA.debugLine="Sub traeCliente As String 'ignore"; -RDebugUtils.currentLine=13303809; - //BA.debugLineNum = 13303809;BA.debugLine="Private c As Cursor"; -_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=13303810; - //BA.debugLineNum = 13303810;BA.debugLine="Private cl As String"; -_cl = ""; -RDebugUtils.currentLine=13303811; - //BA.debugLineNum = 13303811;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENTA"; -_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("Select CUENTA from cuentaa"))); -RDebugUtils.currentLine=13303812; - //BA.debugLineNum = 13303812;BA.debugLine="c.Position=0"; -_c.setPosition((int) (0)); -RDebugUtils.currentLine=13303813; - //BA.debugLineNum = 13303813;BA.debugLine="cl = c.GetString(\"CUENTA\")"; -_cl = _c.GetString("CUENTA"); -RDebugUtils.currentLine=13303814; - //BA.debugLineNum = 13303814;BA.debugLine="c.Close"; -_c.Close(); -RDebugUtils.currentLine=13303815; - //BA.debugLineNum = 13303815;BA.debugLine="Return cl"; -if (true) return _cl; -RDebugUtils.currentLine=13303816; - //BA.debugLineNum = 13303816;BA.debugLine="End Sub"; -return ""; -} -public static String _ventanoventa(anywheresoftware.b4a.BA _ba,String _usuariov,String _almacenv,String _rutav,String _eventov,String _clientev,String _iniciov,String _latitudv,String _longitudv,String _montoventav) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "ventanoventa", false)) - {return ((String) Debug.delegate(null, "ventanoventa", new Object[] {_ba,_usuariov,_almacenv,_rutav,_eventov,_clientev,_iniciov,_latitudv,_longitudv,_montoventav}));} -keymon.lat.medicomed.dbrequestmanager._dbcommand _cmd = null; -String _nombreclientev = ""; -anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; -RDebugUtils.currentLine=15138816; - //BA.debugLineNum = 15138816;BA.debugLine="Sub ventaNoVenta(usuariov As String, almacenv As S"; -RDebugUtils.currentLine=15138817; - //BA.debugLineNum = 15138817;BA.debugLine="Log(\"ventaNoVenta\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("315138817","ventaNoVenta",0); -RDebugUtils.currentLine=15138818; - //BA.debugLineNum = 15138818;BA.debugLine="Log(eventov)"; -anywheresoftware.b4a.keywords.Common.LogImpl("315138818",_eventov,0); -RDebugUtils.currentLine=15138820; - //BA.debugLineNum = 15138820;BA.debugLine="Private cmd As DBCommand"; -_cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); -RDebugUtils.currentLine=15138821; - //BA.debugLineNum = 15138821;BA.debugLine="cmd.Initialize"; -_cmd.Initialize(); -RDebugUtils.currentLine=15138822; - //BA.debugLineNum = 15138822;BA.debugLine="cmd.Name = \"insert_venta_no_venta_MEDICOMED\""; -_cmd.Name /*String*/ = "insert_venta_no_venta_MEDICOMED"; -RDebugUtils.currentLine=15138825; - //BA.debugLineNum = 15138825;BA.debugLine="Private nombreClientev As String = traeNombreClie"; -_nombreclientev = _traenombreclientev(_ba,_clientev); -RDebugUtils.currentLine=15138828; - //BA.debugLineNum = 15138828;BA.debugLine="If eventov = \"Llega a almacen\" Then"; -if ((_eventov).equals("Llega a almacen")) { -RDebugUtils.currentLine=15138829; - //BA.debugLineNum = 15138829;BA.debugLine="nombreClientev = \"BOLETA\""; -_nombreclientev = "BOLETA"; -RDebugUtils.currentLine=15138830; - //BA.debugLineNum = 15138830;BA.debugLine="clientev = \"\""; -_clientev = ""; - }else -{RDebugUtils.currentLine=15138831; - //BA.debugLineNum = 15138831;BA.debugLine="Else If eventov = \"ConVenta\" Then"; -if ((_eventov).equals("ConVenta")) { -RDebugUtils.currentLine=15138832; - //BA.debugLineNum = 15138832;BA.debugLine="nombreClientev = \"VENTA\""; -_nombreclientev = "VENTA"; - }else -{RDebugUtils.currentLine=15138833; - //BA.debugLineNum = 15138833;BA.debugLine="Else If eventov = \"SinVenta\" Then"; -if ((_eventov).equals("SinVenta")) { -RDebugUtils.currentLine=15138834; - //BA.debugLineNum = 15138834;BA.debugLine="nombreClientev = \"Sin Venta\""; -_nombreclientev = "Sin Venta"; - }}} -; -RDebugUtils.currentLine=15138838; - //BA.debugLineNum = 15138838;BA.debugLine="Private c As Cursor = B4XPages.MainPage.skmt.Exec"; -_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("SELECT * FROM VENTA_No_VENTA WHERE usuariov = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_usuariov))+"' AND almacenv = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_almacenv))+"' AND rutav = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_rutav))+"' AND clientev = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clientev))+"' ORDER BY iniciov DESC")))); -RDebugUtils.currentLine=15138840; - //BA.debugLineNum = 15138840;BA.debugLine="If c.RowCount > 0 Then"; -if (_c.getRowCount()>0) { -RDebugUtils.currentLine=15138842; - //BA.debugLineNum = 15138842;BA.debugLine="Log(\"Actualizando registro existente\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("315138842","Actualizando registro existente",0); -RDebugUtils.currentLine=15138843; - //BA.debugLineNum = 15138843;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"UPDATE VEN"; -mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("UPDATE VENTA_No_VENTA SET eventov = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_eventov))+"', montoVentav = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_montoventav))+"' WHERE usuariov = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_usuariov))+"' AND almacenv = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_almacenv))+"' AND rutav = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_rutav))+"' AND clientev = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clientev))+"'")); - }else { -RDebugUtils.currentLine=15138846; - //BA.debugLineNum = 15138846;BA.debugLine="Log(\"Insertando nuevo registro\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("315138846","Insertando nuevo registro",0); -RDebugUtils.currentLine=15138847; - //BA.debugLineNum = 15138847;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"INSERT INT"; -mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("INSERT INTO VENTA_No_VENTA (usuariov, almacenv, rutav, eventov, clientev, iniciov, latitudv, longitudv, montoVentav) VALUES ('"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_usuariov))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_almacenv))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_rutav))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_eventov))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clientev))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_iniciov))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_latitudv))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_longitudv))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_montoventav))+"')")); - }; -RDebugUtils.currentLine=15138851; - //BA.debugLineNum = 15138851;BA.debugLine="cmd.Parameters = Array As Object(usuariov, almace"; -_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_usuariov),(Object)(_almacenv),(Object)(_rutav),(Object)(_eventov),(Object)(_clientev),(Object)(_iniciov),(Object)(_latitudv),(Object)(_longitudv),(Object)(_montoventav)}; -RDebugUtils.currentLine=15138852; - //BA.debugLineNum = 15138852;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cmd,"; -mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (null,_cmd,(Object)("ventaNoVenta")); -RDebugUtils.currentLine=15138854; - //BA.debugLineNum = 15138854;BA.debugLine="Log($\"Datos procesados: '${usuariov}', '${almacen"; -anywheresoftware.b4a.keywords.Common.LogImpl("315138854",("Datos procesados: '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_usuariov))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_almacenv))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_rutav))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_eventov))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clientev))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_iniciov))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_latitudv))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_longitudv))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_montoventav))+"'"),0); -RDebugUtils.currentLine=15138855; - //BA.debugLineNum = 15138855;BA.debugLine="Log(\"Mandamos Venta_No_Venta\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("315138855","Mandamos Venta_No_Venta",0); -RDebugUtils.currentLine=15138856; - //BA.debugLineNum = 15138856;BA.debugLine="End Sub"; -return ""; -} -public static String _traealmacen(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "traealmacen", false)) - {return ((String) Debug.delegate(null, "traealmacen", new Object[] {_ba}));} -anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; -String _a = ""; -RDebugUtils.currentLine=13107200; - //BA.debugLineNum = 13107200;BA.debugLine="Sub traeAlmacen As String 'ignore"; -RDebugUtils.currentLine=13107201; - //BA.debugLineNum = 13107201;BA.debugLine="Private c As Cursor"; -_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=13107202; - //BA.debugLineNum = 13107202;BA.debugLine="Private a As String"; -_a = ""; -RDebugUtils.currentLine=13107203; - //BA.debugLineNum = 13107203;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select ID_AL"; -_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select ID_ALMACEN from CAT_ALMACEN"))); -RDebugUtils.currentLine=13107204; - //BA.debugLineNum = 13107204;BA.debugLine="c.Position = 0"; -_c.setPosition((int) (0)); -RDebugUtils.currentLine=13107205; - //BA.debugLineNum = 13107205;BA.debugLine="a = C.GetString(\"ID_ALMACEN\")"; -_a = _c.GetString("ID_ALMACEN"); -RDebugUtils.currentLine=13107206; - //BA.debugLineNum = 13107206;BA.debugLine="c.Close"; -_c.Close(); -RDebugUtils.currentLine=13107207; - //BA.debugLineNum = 13107207;BA.debugLine="Return a"; -if (true) return _a; -RDebugUtils.currentLine=13107208; - //BA.debugLineNum = 13107208;BA.debugLine="End Sub"; -return ""; -} -public static String _iniciaactividad(anywheresoftware.b4a.BA _ba,String _ia) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "iniciaactividad", false)) - {return ((String) Debug.delegate(null, "iniciaactividad", new Object[] {_ba,_ia}));} -RDebugUtils.currentLine=15073280; - //BA.debugLineNum = 15073280;BA.debugLine="Sub iniciaActividad(ia As String)"; -RDebugUtils.currentLine=15073281; - //BA.debugLineNum = 15073281;BA.debugLine="If ia <> \"\" And ia <> Null Then"; -if ((_ia).equals("") == false && _ia!= null) { -RDebugUtils.currentLine=15073283; - //BA.debugLineNum = 15073283;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete fro"; -mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("delete from CAT_VARIABLES where CAT_VA_DESCRIPCION = ?",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("ULTIMOMODULO")})); -RDebugUtils.currentLine=15073284; - //BA.debugLineNum = 15073284;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; -mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO CAT_VARIABLES(CAT_VA_DESCRIPCION, CAT_VA_VALOR) VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("ULTIMOMODULO"),(Object)(_ia)})); -RDebugUtils.currentLine=15073285; - //BA.debugLineNum = 15073285;BA.debugLine="B4XPages.ShowPage(ia)"; -mostCurrent._b4xpages._showpage /*String*/ (_ba,_ia); - }; -RDebugUtils.currentLine=15073288; - //BA.debugLineNum = 15073288;BA.debugLine="End Sub"; -return ""; -} -public static boolean _pedidoguardado(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "pedidoguardado", false)) - {return ((Boolean) Debug.delegate(null, "pedidoguardado", new Object[] {_ba}));} -boolean _guardado = false; -anywheresoftware.b4a.sql.SQL.CursorWrapper _g = null; -RDebugUtils.currentLine=14745600; - //BA.debugLineNum = 14745600;BA.debugLine="Sub pedidoGuardado As Boolean"; -RDebugUtils.currentLine=14745601; - //BA.debugLineNum = 14745601;BA.debugLine="Private guardado As Boolean = False"; -_guardado = anywheresoftware.b4a.keywords.Common.False; -RDebugUtils.currentLine=14745602; - //BA.debugLineNum = 14745602;BA.debugLine="Private g As Cursor = B4XPages.MainPage.skmt.Exec"; -_g = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -_g = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select gestion from kmt_info where CAT_CL_CODIGO in (Select CUENTA from cuentaa)"))); -RDebugUtils.currentLine=14745603; - //BA.debugLineNum = 14745603;BA.debugLine="If g.RowCount > 0 Then"; -if (_g.getRowCount()>0) { -RDebugUtils.currentLine=14745604; - //BA.debugLineNum = 14745604;BA.debugLine="g.Position=0"; -_g.setPosition((int) (0)); -RDebugUtils.currentLine=14745605; - //BA.debugLineNum = 14745605;BA.debugLine="If g.GetString(\"gestion\") = \"2\" Then guardado ="; -if ((_g.GetString("gestion")).equals("2")) { -_guardado = anywheresoftware.b4a.keywords.Common.True;}; - }; -RDebugUtils.currentLine=14745607; - //BA.debugLineNum = 14745607;BA.debugLine="Log($\"Guardado=${guardado}\"$)"; -anywheresoftware.b4a.keywords.Common.LogImpl("314745607",("Guardado="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_guardado))+""),0); -RDebugUtils.currentLine=14745608; - //BA.debugLineNum = 14745608;BA.debugLine="Return guardado"; -if (true) return _guardado; -RDebugUtils.currentLine=14745609; - //BA.debugLineNum = 14745609;BA.debugLine="End Sub"; -return false; -} -public static String _borrapedidoclienteactual(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "borrapedidoclienteactual", false)) - {return ((String) Debug.delegate(null, "borrapedidoclienteactual", new Object[] {_ba}));} -anywheresoftware.b4a.sql.SQL.CursorWrapper _thisc = null; -int _i = 0; -RDebugUtils.currentLine=14680064; - //BA.debugLineNum = 14680064;BA.debugLine="Sub borraPedidoClienteActual As String"; -RDebugUtils.currentLine=14680065; - //BA.debugLineNum = 14680065;BA.debugLine="Private thisC As Cursor"; -_thisc = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=14680066; - //BA.debugLineNum = 14680066;BA.debugLine="thisC=B4XPages.MainPage.skmt.ExecQuery(\"select PE"; -_thisc = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select PE_PROID,PE_CANT FROM PEDIDO where pe_cliente in (Select CUENTA from cuentaa) "))); -RDebugUtils.currentLine=14680067; - //BA.debugLineNum = 14680067;BA.debugLine="If thisC.RowCount>0 Then"; -if (_thisc.getRowCount()>0) { -RDebugUtils.currentLine=14680068; - //BA.debugLineNum = 14680068;BA.debugLine="For i=0 To thisC.RowCount -1"; -{ -final int step4 = 1; -final int limit4 = (int) (_thisc.getRowCount()-1); -_i = (int) (0) ; -for (;_i <= limit4 ;_i = _i + step4 ) { -RDebugUtils.currentLine=14680069; - //BA.debugLineNum = 14680069;BA.debugLine="thisC.Position=i"; -_thisc.setPosition(_i); -RDebugUtils.currentLine=14680070; - //BA.debugLineNum = 14680070;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update ca"; -mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen + ? where cat_gp_id = ?",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_thisc.GetString("PE_CANT")),(Object)(_thisc.GetString("PE_PROID"))})); -RDebugUtils.currentLine=14680071; - //BA.debugLineNum = 14680071;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT IN"; -mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO INVENT_X_ENVIAR (ALMACEN , PROID , CANTIDAD ) VALUES(?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_traealmacen(_ba)),(Object)(_thisc.GetString("PE_PROID")),(Object)((double)(Double.parseDouble(_thisc.GetString("PE_CANT")))*-1)})); - } -}; - }; -RDebugUtils.currentLine=14680074; - //BA.debugLineNum = 14680074;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente where pc_cliente in (Select CUENTA from cuentaa)"); -RDebugUtils.currentLine=14680075; - //BA.debugLineNum = 14680075;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido where pe_cliente in (Select CUENTA from cuentaa)"); -RDebugUtils.currentLine=14680076; - //BA.debugLineNum = 14680076;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_i"; -mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("UPDATE kmt_info set gestion = 0 where CAT_CL_CODIGO In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=14680077; - //BA.debugLineNum = 14680077;BA.debugLine="Return 1"; -if (true) return BA.NumberToString(1); -RDebugUtils.currentLine=14680078; - //BA.debugLineNum = 14680078;BA.debugLine="End Sub"; -return ""; -} -public static String _guardaclientehorainicio(anywheresoftware.b4a.BA _ba,String _cliente) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "guardaclientehorainicio", false)) - {return ((String) Debug.delegate(null, "guardaclientehorainicio", new Object[] {_ba,_cliente}));} -RDebugUtils.currentLine=14483456; - //BA.debugLineNum = 14483456;BA.debugLine="Sub guardaClienteHoraInicio(cliente As String)"; -RDebugUtils.currentLine=14483457; - //BA.debugLineNum = 14483457;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert into"; -mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into PEDIDO_INICIO_FINAL(PIF_CLIENTE, PIF_HORA_INICIO, PIF_HORA_FINAL) VALUES(?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cliente),(Object)(anywheresoftware.b4a.keywords.Common.DateTime.getNow()),(Object)(0)})); -RDebugUtils.currentLine=14483459; - //BA.debugLineNum = 14483459;BA.debugLine="End Sub"; -return ""; -} public static String _actualizaproducto(anywheresoftware.b4a.BA _ba,String _cedis,String _costou,String _cant,String _nombre,String _prodid,String _clienteid,String _fecha,String _usuario,String _rutav,String _preciosin,String _tipoventa) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "actualizaproducto", false)) - {return ((String) Debug.delegate(null, "actualizaproducto", new Object[] {_ba,_cedis,_costou,_cant,_nombre,_prodid,_clienteid,_fecha,_usuario,_rutav,_preciosin,_tipoventa}));} anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; int _antcant = 0; int _difcant = 0; anywheresoftware.b4a.sql.SQL.CursorWrapper _pe = null; -RDebugUtils.currentLine=13631488; - //BA.debugLineNum = 13631488;BA.debugLine="Sub actualizaProducto(cedis As String, costoU As S"; -RDebugUtils.currentLine=13631489; - //BA.debugLineNum = 13631489;BA.debugLine="Private c As Cursor=B4XPages.MainPage.skmt.ExecQu"; + //BA.debugLineNum = 791;BA.debugLine="Sub actualizaProducto(cedis As String, costoU As S"; + //BA.debugLineNum = 792;BA.debugLine="Private c As Cursor=B4XPages.MainPage.skmt.ExecQu"; _c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); _c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select * from pedido where pe_cedis = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_cedis))+"' and pe_proid = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodid))+"' and pe_cliente = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteid))+"'")))); -RDebugUtils.currentLine=13631490; - //BA.debugLineNum = 13631490;BA.debugLine="If c.RowCount > 0 Then"; + //BA.debugLineNum = 793;BA.debugLine="If c.RowCount > 0 Then"; if (_c.getRowCount()>0) { -RDebugUtils.currentLine=13631491; - //BA.debugLineNum = 13631491;BA.debugLine="c.Position=0"; + //BA.debugLineNum = 794;BA.debugLine="c.Position=0"; _c.setPosition((int) (0)); -RDebugUtils.currentLine=13631492; - //BA.debugLineNum = 13631492;BA.debugLine="Private antCant As Int = 0"; + //BA.debugLineNum = 795;BA.debugLine="Private antCant As Int = 0"; _antcant = (int) (0); -RDebugUtils.currentLine=13631493; - //BA.debugLineNum = 13631493;BA.debugLine="If IsNumber(c.GetInt(\"PE_CANT\")) Then antCant=c."; + //BA.debugLineNum = 796;BA.debugLine="If IsNumber(c.GetInt(\"PE_CANT\")) Then antCant=c."; if (anywheresoftware.b4a.keywords.Common.IsNumber(BA.NumberToString(_c.GetInt("PE_CANT")))) { _antcant = _c.GetInt("PE_CANT");}; -RDebugUtils.currentLine=13631494; - //BA.debugLineNum = 13631494;BA.debugLine="Private difCant As Int = cant - antCant"; + //BA.debugLineNum = 797;BA.debugLine="Private difCant As Int = cant - antCant"; _difcant = (int) ((double)(Double.parseDouble(_cant))-_antcant); -RDebugUtils.currentLine=13631495; - //BA.debugLineNum = 13631495;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"update ped"; + //BA.debugLineNum = 798;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"update ped"; mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("update pedido set pe_cant = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_cant))+", pe_costo_tot = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(((double)(Double.parseDouble(_cant))*(double)(Double.parseDouble(_c.GetString("PE_COSTOU"))))))+" where pe_cedis = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_cedis))+"' and pe_proid = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodid))+"' and pe_cliente = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteid))+"' ")); -RDebugUtils.currentLine=13631496; - //BA.debugLineNum = 13631496;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"update cat"; + //BA.debugLineNum = 799;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"update cat"; mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ("+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_difcant))+") where cat_gp_id = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodid))+"' ")); -RDebugUtils.currentLine=13631497; - //BA.debugLineNum = 13631497;BA.debugLine="If cant = 0 Then"; + //BA.debugLineNum = 800;BA.debugLine="If cant = 0 Then"; if ((_cant).equals(BA.NumberToString(0))) { -RDebugUtils.currentLine=13631499; - //BA.debugLineNum = 13631499;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"delete fr"; + //BA.debugLineNum = 802;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"delete fr"; mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("delete from pedido where pe_cedis = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_cedis))+"' and pe_proid = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodid))+"' and pe_cliente = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteid))+"' ")); -RDebugUtils.currentLine=13631500; - //BA.debugLineNum = 13631500;BA.debugLine="Private pe As Cursor = B4XPages.MainPage.skmt.E"; + //BA.debugLineNum = 803;BA.debugLine="Private pe As Cursor = B4XPages.MainPage.skmt.E"; _pe = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); _pe = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select count(pe_cliente) as cuantosPedidos from pedido where pe_cliente In (select cuenta from cuentaa)"))); -RDebugUtils.currentLine=13631501; - //BA.debugLineNum = 13631501;BA.debugLine="pe.Position=0"; + //BA.debugLineNum = 804;BA.debugLine="pe.Position=0"; _pe.setPosition((int) (0)); -RDebugUtils.currentLine=13631502; - //BA.debugLineNum = 13631502;BA.debugLine="If pe.GetString(\"cuantosPedidos\") = 0 Then B4XP"; + //BA.debugLineNum = 805;BA.debugLine="If pe.GetString(\"cuantosPedidos\") = 0 Then B4XP"; if ((_pe.GetString("cuantosPedidos")).equals(BA.NumberToString(0))) { mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)");}; }; }else { -RDebugUtils.currentLine=13631506; - //BA.debugLineNum = 13631506;BA.debugLine="guardaProductoSinGestion(cedis, costoU, cant, no"; + //BA.debugLineNum = 809;BA.debugLine="guardaProductoSinGestion(cedis, costoU, cant, no"; _guardaproductosingestion(_ba,_cedis,_costou,_cant,_nombre,_prodid,_clienteid,_fecha,_usuario,_rutav,_preciosin,_tipoventa); }; -RDebugUtils.currentLine=13631508; - //BA.debugLineNum = 13631508;BA.debugLine="c.Close"; + //BA.debugLineNum = 811;BA.debugLine="c.Close"; _c.Close(); -RDebugUtils.currentLine=13631509; - //BA.debugLineNum = 13631509;BA.debugLine="End Sub"; -return ""; -} -public static String _guardaproductosingestion(anywheresoftware.b4a.BA _ba,String _cedis,String _costou,String _cant,String _nombre,String _prodid,String _clienteid,String _fecha,String _usuario,String _rutav,String _preciosin,String _tipoventa) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "guardaproductosingestion", false)) - {return ((String) Debug.delegate(null, "guardaproductosingestion", new Object[] {_ba,_cedis,_costou,_cant,_nombre,_prodid,_clienteid,_fecha,_usuario,_rutav,_preciosin,_tipoventa}));} -anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; -RDebugUtils.currentLine=13565952; - //BA.debugLineNum = 13565952;BA.debugLine="Sub guardaProductoSinGestion(cedis As String, cost"; -RDebugUtils.currentLine=13565953; - //BA.debugLineNum = 13565953;BA.debugLine="LogColor(\"guardaProductoSinGestion: \"&prodId&\", c"; -anywheresoftware.b4a.keywords.Common.LogImpl("313565953","guardaProductoSinGestion: "+_prodid+", cant="+_cant,anywheresoftware.b4a.keywords.Common.Colors.Magenta); -RDebugUtils.currentLine=13565954; - //BA.debugLineNum = 13565954;BA.debugLine="Private c As Cursor"; -_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=13565955; - //BA.debugLineNum = 13565955;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; -mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_COSTO_SIN,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cedis),(Object)(((double)(Double.parseDouble(_cant))*(double)(Double.parseDouble(_costou)))),(Object)(_costou),(Object)(_cant),(Object)(_nombre),(Object)(_prodid),(Object)(_clienteid),(Object)(_fecha),(Object)(_usuario),(Object)(_rutav),(Object)(_preciosin),(Object)(_tipoventa)})); -RDebugUtils.currentLine=13565956; - //BA.debugLineNum = 13565956;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat_"; -mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cant),(Object)(_prodid)})); -RDebugUtils.currentLine=13565957; - //BA.debugLineNum = 13565957;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(pe"; -_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, SUM(PE_COSTO_SIN) AS TOTAL_CLIE_SIN FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); -RDebugUtils.currentLine=13565958; - //BA.debugLineNum = 13565958;BA.debugLine="c.Position=0"; -_c.setPosition((int) (0)); -RDebugUtils.currentLine=13565959; - //BA.debugLineNum = 13565959;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; -mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=13565960; - //BA.debugLineNum = 13565960;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert into"; -mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT,PC_ALMACEN,PC_RUTA,PC_COSTO_SIN) VALUES (?,?,?,?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_clienteid),(Object)(_fecha),(Object)(_usuario),(Object)(_c.GetString("CANT_CLIE")),(Object)(_c.GetString("TOTAL_CLIE")),(Object)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._lon_gps /*String*/ ),(Object)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._lat_gps /*String*/ ),(Object)(_cedis),(Object)(_c.GetString("TOTAL_CLIE_SIN"))})); -RDebugUtils.currentLine=13565961; - //BA.debugLineNum = 13565961;BA.debugLine="End Sub"; + //BA.debugLineNum = 812;BA.debugLine="End Sub"; return ""; } public static String _actualizatet(anywheresoftware.b4a.BA _ba,String _cliente) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "actualizatet", false)) - {return ((String) Debug.delegate(null, "actualizatet", new Object[] {_ba,_cliente}));} anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; long _total = 0L; int _i = 0; long _subtotal = 0L; -RDebugUtils.currentLine=14548992; - //BA.debugLineNum = 14548992;BA.debugLine="Sub actualizaTET(cliente As String)"; -RDebugUtils.currentLine=14548993; - //BA.debugLineNum = 14548993;BA.debugLine="Dim c As Cursor = B4XPages.MainPage.skmt.Execquer"; + //BA.debugLineNum = 1208;BA.debugLine="Sub actualizaTET(cliente As String)"; + //BA.debugLineNum = 1209;BA.debugLine="Dim c As Cursor = B4XPages.MainPage.skmt.Execquer"; _c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); _c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery2("select * from PEDIDO_INICIO_FINAL where PIF_CLIENTE = ?",new String[]{_cliente}))); -RDebugUtils.currentLine=14548994; - //BA.debugLineNum = 14548994;BA.debugLine="Dim total As Long = 0"; + //BA.debugLineNum = 1210;BA.debugLine="Dim total As Long = 0"; _total = (long) (0); -RDebugUtils.currentLine=14548995; - //BA.debugLineNum = 14548995;BA.debugLine="If c.RowCount > 0 Then"; + //BA.debugLineNum = 1211;BA.debugLine="If c.RowCount > 0 Then"; if (_c.getRowCount()>0) { -RDebugUtils.currentLine=14548996; - //BA.debugLineNum = 14548996;BA.debugLine="c.Position=0"; + //BA.debugLineNum = 1212;BA.debugLine="c.Position=0"; _c.setPosition((int) (0)); -RDebugUtils.currentLine=14548997; - //BA.debugLineNum = 14548997;BA.debugLine="For i = 0 To c.RowCount-1"; + //BA.debugLineNum = 1213;BA.debugLine="For i = 0 To c.RowCount-1"; { final int step5 = 1; final int limit5 = (int) (_c.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit5 ;_i = _i + step5 ) { -RDebugUtils.currentLine=14548998; - //BA.debugLineNum = 14548998;BA.debugLine="c.Position=i"; + //BA.debugLineNum = 1214;BA.debugLine="c.Position=i"; _c.setPosition(_i); -RDebugUtils.currentLine=14549000; - //BA.debugLineNum = 14549000;BA.debugLine="Dim subtotal As Long = c.GetString(\"PIF_HORA_FI"; + //BA.debugLineNum = 1216;BA.debugLine="Dim subtotal As Long = c.GetString(\"PIF_HORA_FI"; _subtotal = (long) ((double)(Double.parseDouble(_c.GetString("PIF_HORA_FINAL")))-(double)(Double.parseDouble(_c.GetString("PIF_HORA_INICIO")))); -RDebugUtils.currentLine=14549001; - //BA.debugLineNum = 14549001;BA.debugLine="total = total + subtotal"; + //BA.debugLineNum = 1217;BA.debugLine="total = total + subtotal"; _total = (long) (_total+_subtotal); } }; -RDebugUtils.currentLine=14549005; - //BA.debugLineNum = 14549005;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update PED"; + //BA.debugLineNum = 1221;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update PED"; mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update PEDIDO_CLIENTE set PC_TIEMPO_TIENDA = ? where PC_CLIENTE = ?",anywheresoftware.b4a.keywords.Common.ArrayToList(new String[]{BA.NumberToString(((_total/(double)1000)/(double)60)),_cliente})); }; -RDebugUtils.currentLine=14549007; - //BA.debugLineNum = 14549007;BA.debugLine="End Sub"; + //BA.debugLineNum = 1223;BA.debugLine="End Sub"; +return ""; +} +public static String _agregacolumna(anywheresoftware.b4a.BA _ba,String _tabla,String _columna,String _tipo) throws Exception{ +anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; + //BA.debugLineNum = 1422;BA.debugLine="Sub agregaColumna(tabla As String, columna As Stri"; + //BA.debugLineNum = 1423;BA.debugLine="Try 'Intentamos usar \"pragma_table_info\" para rev"; +try { //BA.debugLineNum = 1424;BA.debugLine="Private c As Cursor = B4XPages.MainPage.skmt.Exe"; +_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); +_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("SELECT COUNT(*) AS fCol FROM pragma_table_info('"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tabla))+"') WHERE name='"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_columna))+"'")))); + //BA.debugLineNum = 1425;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 1426;BA.debugLine="If c.GetString(\"fCol\") = 0 Then 'Si no esta la c"; +if ((_c.GetString("fCol")).equals(BA.NumberToString(0))) { + //BA.debugLineNum = 1427;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"ALTER TAB"; +mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("ALTER TABLE "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tabla))+" ADD COLUMN "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_columna))+" "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tipo))+"")); + //BA.debugLineNum = 1428;BA.debugLine="Log($\"Columna \"${columna} ${tipo}\", agregada a"; +anywheresoftware.b4a.keywords.Common.LogImpl("351576838",("Columna \""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_columna))+" "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tipo))+"\", agregada a \""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tabla))+"\"."),0); + }; + //BA.debugLineNum = 1430;BA.debugLine="Log(1)"; +anywheresoftware.b4a.keywords.Common.LogImpl("351576840",BA.NumberToString(1),0); + } + catch (Exception e10) { + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e10); //BA.debugLineNum = 1432;BA.debugLine="Try"; +try { //BA.debugLineNum = 1433;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"ALTER TAB"; +mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("ALTER TABLE "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tabla))+" ADD COLUMN "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_columna))+" "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tipo))+"")); + //BA.debugLineNum = 1434;BA.debugLine="Log($\"Columna \"${columna} ${tipo}\", agregada a"; +anywheresoftware.b4a.keywords.Common.LogImpl("351576844",("Columna \""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_columna))+" "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tipo))+"\", agregada a \""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_tabla))+"\".."),0); + } + catch (Exception e14) { + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e14); //BA.debugLineNum = 1436;BA.debugLine="Log(LastException)"; +anywheresoftware.b4a.keywords.Common.LogImpl("351576846",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),0); + }; + //BA.debugLineNum = 1438;BA.debugLine="Log(2)"; +anywheresoftware.b4a.keywords.Common.LogImpl("351576848",BA.NumberToString(2),0); + }; + //BA.debugLineNum = 1440;BA.debugLine="End Sub"; return ""; } public static boolean _alcanzanlosvariablesparapromo(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.collections.Map _promomap,anywheresoftware.b4a.objects.collections.Map _inventariosinfijos) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "alcanzanlosvariablesparapromo", false)) - {return ((Boolean) Debug.delegate(null, "alcanzanlosvariablesparapromo", new Object[] {_ba,_promomap,_inventariosinfijos}));} boolean _thislog = false; int _totalprodsvariables = 0; anywheresoftware.b4a.objects.collections.List _prodsvariables = null; @@ -1078,339 +157,362 @@ int _p = 0; String _t = ""; String _p2 = ""; boolean _res = false; -RDebugUtils.currentLine=13893632; - //BA.debugLineNum = 13893632;BA.debugLine="Sub alcanzanLosVariablesParaPromo(promoMap As Map,"; -RDebugUtils.currentLine=13893633; - //BA.debugLineNum = 13893633;BA.debugLine="Private thisLog As Boolean = False 'Si es verdade"; + //BA.debugLineNum = 943;BA.debugLine="Sub alcanzanLosVariablesParaPromo(promoMap As Map,"; + //BA.debugLineNum = 944;BA.debugLine="Private thisLog As Boolean = False 'Si es verdade"; _thislog = anywheresoftware.b4a.keywords.Common.False; -RDebugUtils.currentLine=13893634; - //BA.debugLineNum = 13893634;BA.debugLine="If thisLog Then LogColor(\"Inventario inicial: \"&i"; + //BA.debugLineNum = 945;BA.debugLine="If thisLog Then LogColor(\"Inventario inicial: \"&i"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("313893634","Inventario inicial: "+BA.ObjectToString(_inventariosinfijos),anywheresoftware.b4a.keywords.Common.Colors.Gray);}; -RDebugUtils.currentLine=13893635; - //BA.debugLineNum = 13893635;BA.debugLine="Private totalProdsVariables As Int = 0"; +anywheresoftware.b4a.keywords.Common.LogImpl("350200578","Inventario inicial: "+BA.ObjectToString(_inventariosinfijos),anywheresoftware.b4a.keywords.Common.Colors.Gray);}; + //BA.debugLineNum = 946;BA.debugLine="Private totalProdsVariables As Int = 0"; _totalprodsvariables = (int) (0); -RDebugUtils.currentLine=13893637; - //BA.debugLineNum = 13893637;BA.debugLine="Private prodsVariables As List = promoMap.get(\"pr"; + //BA.debugLineNum = 948;BA.debugLine="Private prodsVariables As List = promoMap.get(\"pr"; _prodsvariables = new anywheresoftware.b4a.objects.collections.List(); _prodsvariables = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_promomap.Get((Object)("prodsVariables")))); -RDebugUtils.currentLine=13893638; - //BA.debugLineNum = 13893638;BA.debugLine="For p = 0 To prodsVariables.Size - 1"; + //BA.debugLineNum = 949;BA.debugLine="For p = 0 To prodsVariables.Size - 1"; { final int step5 = 1; final int limit5 = (int) (_prodsvariables.getSize()-1); _p = (int) (0) ; for (;_p <= limit5 ;_p = _p + step5 ) { -RDebugUtils.currentLine=13893639; - //BA.debugLineNum = 13893639;BA.debugLine="Private t As String = prodsVariables.Get(p) 'Obt"; + //BA.debugLineNum = 950;BA.debugLine="Private t As String = prodsVariables.Get(p) 'Obt"; _t = BA.ObjectToString(_prodsvariables.Get(_p)); -RDebugUtils.currentLine=13893640; - //BA.debugLineNum = 13893640;BA.debugLine="If inventarioSinFijos.ContainsKey(t) Then 'Si ex"; + //BA.debugLineNum = 951;BA.debugLine="If inventarioSinFijos.ContainsKey(t) Then 'Si ex"; if (_inventariosinfijos.ContainsKey((Object)(_t))) { -RDebugUtils.currentLine=13893641; - //BA.debugLineNum = 13893641;BA.debugLine="Private p2 As String = inventarioSinFijos.Get(t"; + //BA.debugLineNum = 952;BA.debugLine="Private p2 As String = inventarioSinFijos.Get(t"; _p2 = BA.ObjectToString(_inventariosinfijos.Get((Object)(_t))); -RDebugUtils.currentLine=13893642; - //BA.debugLineNum = 13893642;BA.debugLine="totalProdsVariables = totalProdsVariables + p2"; + //BA.debugLineNum = 953;BA.debugLine="totalProdsVariables = totalProdsVariables + p2"; _totalprodsvariables = (int) (_totalprodsvariables+(double)(Double.parseDouble(_p2))); -RDebugUtils.currentLine=13893643; - //BA.debugLineNum = 13893643;BA.debugLine="If thisLog Then Log($\"prod ${t}, hay: ${p2}\"$)"; + //BA.debugLineNum = 954;BA.debugLine="If thisLog Then Log($\"prod ${t}, hay: ${p2}\"$)"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("313893643",("prod "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_t))+", hay: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_p2))+""),0);}; +anywheresoftware.b4a.keywords.Common.LogImpl("350200587",("prod "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_t))+", hay: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_p2))+""),0);}; }; } }; -RDebugUtils.currentLine=13893646; - //BA.debugLineNum = 13893646;BA.debugLine="If thisLog Then Log(\"Total prods variables=\" & to"; + //BA.debugLineNum = 957;BA.debugLine="If thisLog Then Log(\"Total prods variables=\" & to"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("313893646","Total prods variables="+BA.NumberToString(_totalprodsvariables)+", requeridos="+BA.ObjectToString(_promomap.Get((Object)("prodsVariablesRequeridos"))),0);}; -RDebugUtils.currentLine=13893647; - //BA.debugLineNum = 13893647;BA.debugLine="Private res As Boolean = False"; +anywheresoftware.b4a.keywords.Common.LogImpl("350200590","Total prods variables="+BA.NumberToString(_totalprodsvariables)+", requeridos="+BA.ObjectToString(_promomap.Get((Object)("prodsVariablesRequeridos"))),0);}; + //BA.debugLineNum = 958;BA.debugLine="Private res As Boolean = False"; _res = anywheresoftware.b4a.keywords.Common.False; -RDebugUtils.currentLine=13893648; - //BA.debugLineNum = 13893648;BA.debugLine="If totalProdsVariables >= promoMap.Get(\"prodsVari"; + //BA.debugLineNum = 959;BA.debugLine="If totalProdsVariables >= promoMap.Get(\"prodsVari"; if (_totalprodsvariables>=(double)(BA.ObjectToNumber(_promomap.Get((Object)("prodsVariablesRequeridos"))))) { _res = anywheresoftware.b4a.keywords.Common.True;}; -RDebugUtils.currentLine=13893649; - //BA.debugLineNum = 13893649;BA.debugLine="Return res"; + //BA.debugLineNum = 960;BA.debugLine="Return res"; if (true) return _res; -RDebugUtils.currentLine=13893650; - //BA.debugLineNum = 13893650;BA.debugLine="End Sub"; + //BA.debugLineNum = 961;BA.debugLine="End Sub"; return false; } +public static String _bitacora(anywheresoftware.b4a.BA _ba,String _fechab,String _usuariob,String _almacenb,String _rutab,String _eventob,String _clienteb,String _iniciob,String _finb,String _latitudb,String _longitudb,String _precision,String _motivonoventa,String _motivonovisita) throws Exception{ +keymon.lat.medicomed.dbrequestmanager._dbcommand _cmd = null; +String _nombrecliente = ""; +anywheresoftware.b4a.sql.SQL.CursorWrapper _e = null; +anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; + //BA.debugLineNum = 1280;BA.debugLine="Sub bitacora(fechab As String, usuariob As String,"; + //BA.debugLineNum = 1281;BA.debugLine="Log(motivonovisita)"; +anywheresoftware.b4a.keywords.Common.LogImpl("351183617",_motivonovisita,0); + //BA.debugLineNum = 1282;BA.debugLine="Log(\"bitacora\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("351183618","bitacora",0); + //BA.debugLineNum = 1283;BA.debugLine="Log(eventob)"; +anywheresoftware.b4a.keywords.Common.LogImpl("351183619",_eventob,0); + //BA.debugLineNum = 1284;BA.debugLine="Private cmd As DBCommand"; +_cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); + //BA.debugLineNum = 1285;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 1286;BA.debugLine="cmd.Name = \"mandaBitacora_MEDICOMED\""; +_cmd.Name /*String*/ = "mandaBitacora_MEDICOMED"; + //BA.debugLineNum = 1287;BA.debugLine="Log(\"BITACORA3\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("351183623","BITACORA3",0); + //BA.debugLineNum = 1288;BA.debugLine="Private nombreCliente As String = traeNombreClien"; +_nombrecliente = _traenombrecliente(_ba,_clienteb); + //BA.debugLineNum = 1289;BA.debugLine="If eventob = \"Llega a almacen\" Then"; +if ((_eventob).equals("Llega a almacen")) { + //BA.debugLineNum = 1290;BA.debugLine="nombreCliente = \"BOLETA\""; +_nombrecliente = "BOLETA"; + //BA.debugLineNum = 1291;BA.debugLine="clienteb = \"\""; +_clienteb = ""; + //BA.debugLineNum = 1292;BA.debugLine="finb = iniciob"; +_finb = _iniciob; + }; + //BA.debugLineNum = 1294;BA.debugLine="If eventob = \"Salida almacen\" Then nombreCliente"; +if ((_eventob).equals("Salida almacen")) { +_nombrecliente = "CHECKLIST";}; + //BA.debugLineNum = 1295;BA.debugLine="If eventob = \"Fin Día\" Then nombreCliente = \"FIN"; +if ((_eventob).equals("Fin Día")) { +_nombrecliente = "FIN DIA";}; + //BA.debugLineNum = 1296;BA.debugLine="If eventob = \"Carga día\" Then nombreCliente = \"CA"; +if ((_eventob).equals("Carga día")) { +_nombrecliente = "CARGA DIA";}; + //BA.debugLineNum = 1297;BA.debugLine="If eventob <> \"Termina Venta\" And eventob <> \"No"; +if ((_eventob).equals("Termina Venta") == false && (_eventob).equals("No Venta") == false) { + //BA.debugLineNum = 1298;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"INSERT INT"; +mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("INSERT INTO BITACORAGPS (fechab, usuariob , almacenb , rutab , eventob , clienteb , iniciob , finb , latitudb, longitudb , precision , motivonoventa , motivonovisita) VALUES ('"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_fechab))+"' ,'"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_usuariob))+"' , '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_almacenb))+"' , '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_rutab))+"' , '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_eventob))+"' , '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteb))+"' , '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_iniciob))+"' , '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_finb))+"' , '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_latitudb))+"' , '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_longitudb))+"' , '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_precision))+"' , '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_motivonoventa))+"' , '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_motivonovisita))+"')")); + //BA.debugLineNum = 1299;BA.debugLine="Log($\"'${almacenb}', '${usuariob}', '${rutab}',"; +anywheresoftware.b4a.keywords.Common.LogImpl("351183635",("'"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_almacenb))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_usuariob))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_rutab))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_eventob))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteb))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_nombrecliente))+"','"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_iniciob))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_finb))+"','"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_latitudb))+"','"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_longitudb))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_precision))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_motivonoventa))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_motivonovisita))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_fechab))+"'"),0); + }else { + //BA.debugLineNum = 1304;BA.debugLine="Private e As Cursor = B4XPages.MainPage.skmt.Exe"; +_e = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); +_e = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select fechab from BITACORAGPS where usuariob = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_usuariob))+"' and almacenb = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_almacenb))+"' and rutab = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_rutab))+"' and clienteb = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteb))+"' and eventob = 'Inicia Venta' order by fechab desc")))); + //BA.debugLineNum = 1306;BA.debugLine="If e.RowCount > 0 Then"; +if (_e.getRowCount()>0) { + //BA.debugLineNum = 1307;BA.debugLine="e.Position = 0"; +_e.setPosition((int) (0)); + //BA.debugLineNum = 1308;BA.debugLine="Log(\"ACTUALIZA BITACORA\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("351183644","ACTUALIZA BITACORA",0); + //BA.debugLineNum = 1309;BA.debugLine="If eventob = \"Termina Venta\" Then"; +if ((_eventob).equals("Termina Venta")) { + //BA.debugLineNum = 1310;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"update B"; +mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("update BITACORAGPS set finb = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_finb))+"' where rutab = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_rutab))+"' and almacenb = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_almacenb))+"' and usuariob = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_usuariob))+"' and clienteb = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteb))+"' and fechab = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_e.GetString("fechab")))+"' ")); + //BA.debugLineNum = 1313;BA.debugLine="cmd.Parameters = Array As Object(finb, rutab,"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_finb),(Object)(_rutab),(Object)(_almacenb),(Object)(_usuariob),(Object)(_clienteb),(Object)("Inicia Venta"),(Object)(_e.GetString("fechab"))}; + }else if((_eventob).equals("No Venta")) { + //BA.debugLineNum = 1317;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"update B"; +mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("update BITACORAGPS set finb = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_finb))+"', motivonoventa = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_motivonoventa))+"', motivonovisita = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_motivonovisita))+"' where rutab = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_rutab))+"' and almacenb = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_almacenb))+"' and usuariob = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_usuariob))+"' and clienteb = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteb))+"' and fechab = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_e.GetString("fechab")))+"' ")); + //BA.debugLineNum = 1320;BA.debugLine="cmd.Parameters = Array As Object(finb, motivon"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_finb),(Object)(_motivonoventa),(Object)(_motivonovisita),(Object)(_rutab),(Object)(_almacenb),(Object)(_usuariob),(Object)(_clienteb),(Object)("Inicia Venta"),(Object)(_e.GetString("fechab"))}; + }; + }; + }; + //BA.debugLineNum = 1326;BA.debugLine="If eventob <> \"Inicia Venta\" Then"; +if ((_eventob).equals("Inicia Venta") == false) { + //BA.debugLineNum = 1327;BA.debugLine="Private c As Cursor = B4XPages.MainPage.skmt.Exe"; +_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); +_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select * from BITACORAGPS where usuariob = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_usuariob))+"' and almacenb = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_almacenb))+"' and rutab = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_rutab))+"' and clienteb = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clienteb))+"' order by fechab desc")))); + //BA.debugLineNum = 1328;BA.debugLine="If c.RowCount > 0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 1329;BA.debugLine="Log(c.RowCount)"; +anywheresoftware.b4a.keywords.Common.LogImpl("351183665",BA.NumberToString(_c.getRowCount()),0); + //BA.debugLineNum = 1330;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 1331;BA.debugLine="cmd.Parameters = Array As Object(c.GetString(\"a"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_c.GetString("almacenb")),(Object)(_c.GetString("usuariob")),(Object)(_c.GetString("rutab")),(Object)(_c.GetString("eventob")),(Object)(_c.GetString("clienteb")),(Object)(_nombrecliente),(Object)(_c.GetString("iniciob")),(Object)(_c.GetString("finb")),(Object)(_c.GetString("latitudb")),(Object)(_c.GetString("longitudb")),(Object)(_c.GetString("precision")),(Object)(_c.GetString("motivonoventa")),(Object)(_c.GetString("motivonovisita")),(Object)(_c.GetString("fechab"))}; + //BA.debugLineNum = 1332;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cmd"; +mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (_cmd,(Object)("mandaBitacora")); + }; + }; + //BA.debugLineNum = 1335;BA.debugLine="Log(\"Mandamos bitacora\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("351183671","Mandamos bitacora",0); + //BA.debugLineNum = 1336;BA.debugLine="End Sub"; +return ""; +} public static String _borraarribade100errores(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "borraarribade100errores", false)) - {return ((String) Debug.delegate(null, "borraarribade100errores", new Object[] {_ba}));} -RDebugUtils.currentLine=12189696; - //BA.debugLineNum = 12189696;BA.debugLine="Sub borraArribaDe100Errores 'ignore"; -RDebugUtils.currentLine=12189697; - //BA.debugLineNum = 12189697;BA.debugLine="revisaBD"; + //BA.debugLineNum = 495;BA.debugLine="Sub borraArribaDe100Errores 'ignore"; + //BA.debugLineNum = 496;BA.debugLine="revisaBD"; _revisabd(_ba); -RDebugUtils.currentLine=12189698; - //BA.debugLineNum = 12189698;BA.debugLine="LogColor(\"Borramos BD de log\", Colors.Magenta)"; -anywheresoftware.b4a.keywords.Common.LogImpl("312189698","Borramos BD de log",anywheresoftware.b4a.keywords.Common.Colors.Magenta); -RDebugUtils.currentLine=12189699; - //BA.debugLineNum = 12189699;BA.debugLine="errorLog.ExecNonQuery(\"DELETE FROM errores WHERE"; + //BA.debugLineNum = 497;BA.debugLine="LogColor(\"Borramos BD de log\", Colors.Magenta)"; +anywheresoftware.b4a.keywords.Common.LogImpl("348496642","Borramos BD de log",anywheresoftware.b4a.keywords.Common.Colors.Magenta); + //BA.debugLineNum = 498;BA.debugLine="errorLog.ExecNonQuery(\"DELETE FROM errores WHERE"; _errorlog.ExecNonQuery("DELETE FROM errores WHERE fecha NOT in (SELECT fecha FROM errores ORDER BY fecha desc LIMIT 99 )"); -RDebugUtils.currentLine=12189700; - //BA.debugLineNum = 12189700;BA.debugLine="errorLog.ExecNonQuery(\"vacuum;\")"; + //BA.debugLineNum = 499;BA.debugLine="errorLog.ExecNonQuery(\"vacuum;\")"; _errorlog.ExecNonQuery("vacuum;"); -RDebugUtils.currentLine=12189701; - //BA.debugLineNum = 12189701;BA.debugLine="Log(\"Borramos mas de 100 de errorLog\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("312189701","Borramos mas de 100 de errorLog",0); -RDebugUtils.currentLine=12189702; - //BA.debugLineNum = 12189702;BA.debugLine="End Sub"; + //BA.debugLineNum = 500;BA.debugLine="Log(\"Borramos mas de 100 de errorLog\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("348496645","Borramos mas de 100 de errorLog",0); + //BA.debugLineNum = 501;BA.debugLine="End Sub"; return ""; } public static String _borraarribade600renglonesbitacora(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "borraarribade600renglonesbitacora", false)) - {return ((String) Debug.delegate(null, "borraarribade600renglonesbitacora", new Object[] {_ba}));} -RDebugUtils.currentLine=12255232; - //BA.debugLineNum = 12255232;BA.debugLine="Sub borraArribaDe600RenglonesBitacora 'ignore"; -RDebugUtils.currentLine=12255233; - //BA.debugLineNum = 12255233;BA.debugLine="revisaBD"; + //BA.debugLineNum = 504;BA.debugLine="Sub borraArribaDe600RenglonesBitacora 'ignore"; + //BA.debugLineNum = 505;BA.debugLine="revisaBD"; _revisabd(_ba); -RDebugUtils.currentLine=12255234; - //BA.debugLineNum = 12255234;BA.debugLine="LogColor(\"Borramos BD de log\", Colors.Magenta)"; -anywheresoftware.b4a.keywords.Common.LogImpl("312255234","Borramos BD de log",anywheresoftware.b4a.keywords.Common.Colors.Magenta); -RDebugUtils.currentLine=12255235; - //BA.debugLineNum = 12255235;BA.debugLine="kmt.ExecNonQuery(\"DELETE FROM bitacora WHERE fech"; + //BA.debugLineNum = 506;BA.debugLine="LogColor(\"Borramos BD de log\", Colors.Magenta)"; +anywheresoftware.b4a.keywords.Common.LogImpl("348562178","Borramos BD de log",anywheresoftware.b4a.keywords.Common.Colors.Magenta); + //BA.debugLineNum = 507;BA.debugLine="kmt.ExecNonQuery(\"DELETE FROM bitacora WHERE fech"; _kmt.ExecNonQuery("DELETE FROM bitacora WHERE fecha NOT in (SELECT fecha FROM bitacora ORDER BY fecha desc LIMIT 599 )"); -RDebugUtils.currentLine=12255236; - //BA.debugLineNum = 12255236;BA.debugLine="kmt.ExecNonQuery(\"vacuum;\")"; + //BA.debugLineNum = 508;BA.debugLine="kmt.ExecNonQuery(\"vacuum;\")"; _kmt.ExecNonQuery("vacuum;"); -RDebugUtils.currentLine=12255237; - //BA.debugLineNum = 12255237;BA.debugLine="Log(\"Borramos mas de 600 de bitacora\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("312255237","Borramos mas de 600 de bitacora",0); -RDebugUtils.currentLine=12255238; - //BA.debugLineNum = 12255238;BA.debugLine="End Sub"; + //BA.debugLineNum = 509;BA.debugLine="Log(\"Borramos mas de 600 de bitacora\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("348562181","Borramos mas de 600 de bitacora",0); + //BA.debugLineNum = 510;BA.debugLine="End Sub"; return ""; } public static String _borralogdb(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "borralogdb", false)) - {return ((String) Debug.delegate(null, "borralogdb", new Object[] {_ba}));} -RDebugUtils.currentLine=11993088; - //BA.debugLineNum = 11993088;BA.debugLine="Sub borraLogDB 'ignore"; -RDebugUtils.currentLine=11993089; - //BA.debugLineNum = 11993089;BA.debugLine="LogColor(\"Borramos BD de log\", Colors.Magenta)"; -anywheresoftware.b4a.keywords.Common.LogImpl("311993089","Borramos BD de log",anywheresoftware.b4a.keywords.Common.Colors.Magenta); -RDebugUtils.currentLine=11993090; - //BA.debugLineNum = 11993090;BA.debugLine="kmt.ExecNonQuery(\"delete from bitacora\")"; + //BA.debugLineNum = 379;BA.debugLine="Sub borraLogDB 'ignore"; + //BA.debugLineNum = 380;BA.debugLine="LogColor(\"Borramos BD de log\", Colors.Magenta)"; +anywheresoftware.b4a.keywords.Common.LogImpl("348300033","Borramos BD de log",anywheresoftware.b4a.keywords.Common.Colors.Magenta); + //BA.debugLineNum = 381;BA.debugLine="kmt.ExecNonQuery(\"delete from bitacora\")"; _kmt.ExecNonQuery("delete from bitacora"); -RDebugUtils.currentLine=11993091; - //BA.debugLineNum = 11993091;BA.debugLine="kmt.ExecNonQuery(\"vacuum;\")"; + //BA.debugLineNum = 382;BA.debugLine="kmt.ExecNonQuery(\"vacuum;\")"; _kmt.ExecNonQuery("vacuum;"); -RDebugUtils.currentLine=11993092; - //BA.debugLineNum = 11993092;BA.debugLine="End Sub"; + //BA.debugLineNum = 383;BA.debugLine="End Sub"; return ""; } public static String _borramosarchivogps(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "borramosarchivogps", false)) - {return ((String) Debug.delegate(null, "borramosarchivogps", new Object[] {_ba}));} anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out = null; String _s = ""; byte[] _t = null; -RDebugUtils.currentLine=11403264; - //BA.debugLineNum = 11403264;BA.debugLine="Sub borramosArchivoGPS 'ignore"; -RDebugUtils.currentLine=11403265; - //BA.debugLineNum = 11403265;BA.debugLine="Dim out As OutputStream = File.OpenOutput(File.Di"; + //BA.debugLineNum = 175;BA.debugLine="Sub borramosArchivoGPS 'ignore"; + //BA.debugLineNum = 176;BA.debugLine="Dim out As OutputStream = File.OpenOutput(File.Di"; _out = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); _out = anywheresoftware.b4a.keywords.Common.File.OpenOutput(anywheresoftware.b4a.keywords.Common.File.getDirRootExternal(),"gps.txt",anywheresoftware.b4a.keywords.Common.False); -RDebugUtils.currentLine=11403266; - //BA.debugLineNum = 11403266;BA.debugLine="Dim s As String = \"\""; + //BA.debugLineNum = 177;BA.debugLine="Dim s As String = \"\""; _s = ""; -RDebugUtils.currentLine=11403267; - //BA.debugLineNum = 11403267;BA.debugLine="Dim t() As Byte = s.GetBytes(\"UTF-8\")"; + //BA.debugLineNum = 178;BA.debugLine="Dim t() As Byte = s.GetBytes(\"UTF-8\")"; _t = _s.getBytes("UTF-8"); -RDebugUtils.currentLine=11403268; - //BA.debugLineNum = 11403268;BA.debugLine="out.WriteBytes(t, 0, t.Length)"; + //BA.debugLineNum = 179;BA.debugLine="out.WriteBytes(t, 0, t.Length)"; _out.WriteBytes(_t,(int) (0),_t.length); -RDebugUtils.currentLine=11403269; - //BA.debugLineNum = 11403269;BA.debugLine="out.Close"; + //BA.debugLineNum = 180;BA.debugLine="out.Close"; _out.Close(); -RDebugUtils.currentLine=11403270; - //BA.debugLineNum = 11403270;BA.debugLine="End Sub"; + //BA.debugLineNum = 181;BA.debugLine="End Sub"; +return ""; +} +public static String _borrapedidoclienteactual(anywheresoftware.b4a.BA _ba) throws Exception{ +anywheresoftware.b4a.sql.SQL.CursorWrapper _thisc = null; +int _i = 0; + //BA.debugLineNum = 1239;BA.debugLine="Sub borraPedidoClienteActual As String"; + //BA.debugLineNum = 1240;BA.debugLine="Private thisC As Cursor"; +_thisc = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); + //BA.debugLineNum = 1241;BA.debugLine="thisC=B4XPages.MainPage.skmt.ExecQuery(\"select PE"; +_thisc = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select PE_PROID,PE_CANT FROM PEDIDO where pe_cliente in (Select CUENTA from cuentaa) "))); + //BA.debugLineNum = 1242;BA.debugLine="If thisC.RowCount>0 Then"; +if (_thisc.getRowCount()>0) { + //BA.debugLineNum = 1243;BA.debugLine="For i=0 To thisC.RowCount -1"; +{ +final int step4 = 1; +final int limit4 = (int) (_thisc.getRowCount()-1); +_i = (int) (0) ; +for (;_i <= limit4 ;_i = _i + step4 ) { + //BA.debugLineNum = 1244;BA.debugLine="thisC.Position=i"; +_thisc.setPosition(_i); + //BA.debugLineNum = 1245;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update ca"; +mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen + ? where cat_gp_id = ?",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_thisc.GetString("PE_CANT")),(Object)(_thisc.GetString("PE_PROID"))})); + //BA.debugLineNum = 1246;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT IN"; +mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO INVENT_X_ENVIAR (ALMACEN , PROID , CANTIDAD ) VALUES(?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_traealmacen(_ba)),(Object)(_thisc.GetString("PE_PROID")),(Object)((double)(Double.parseDouble(_thisc.GetString("PE_CANT")))*-1)})); + } +}; + }; + //BA.debugLineNum = 1249;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; +mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente where pc_cliente in (Select CUENTA from cuentaa)"); + //BA.debugLineNum = 1250;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; +mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido where pe_cliente in (Select CUENTA from cuentaa)"); + //BA.debugLineNum = 1251;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_i"; +mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("UPDATE kmt_info set gestion = 0 where CAT_CL_CODIGO In (select cuenta from cuentaa)"); + //BA.debugLineNum = 1252;BA.debugLine="Return 1"; +if (true) return BA.NumberToString(1); + //BA.debugLineNum = 1253;BA.debugLine="End Sub"; return ""; } public static String _buscadbusuario(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "buscadbusuario", false)) - {return ((String) Debug.delegate(null, "buscadbusuario", new Object[] {_ba}));} anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; String _usuario = ""; -RDebugUtils.currentLine=12976128; - //BA.debugLineNum = 12976128;BA.debugLine="Sub buscaDBUsuario As String 'ignore"; -RDebugUtils.currentLine=12976129; - //BA.debugLineNum = 12976129;BA.debugLine="Private c As Cursor"; + //BA.debugLineNum = 647;BA.debugLine="Sub buscaDBUsuario As String 'ignore"; + //BA.debugLineNum = 648;BA.debugLine="Private c As Cursor"; _c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=12976130; - //BA.debugLineNum = 12976130;BA.debugLine="Private usuario As String = \"SinUsuario\""; + //BA.debugLineNum = 649;BA.debugLine="Private usuario As String = \"SinUsuario\""; _usuario = "SinUsuario"; -RDebugUtils.currentLine=12976131; - //BA.debugLineNum = 12976131;BA.debugLine="c=kmt.ExecQuery(\"select USUARIO from usuarioa\")"; + //BA.debugLineNum = 650;BA.debugLine="c=kmt.ExecQuery(\"select USUARIO from usuarioa\")"; _c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_kmt.ExecQuery("select USUARIO from usuarioa"))); -RDebugUtils.currentLine=12976132; - //BA.debugLineNum = 12976132;BA.debugLine="c.Position=0"; + //BA.debugLineNum = 651;BA.debugLine="c.Position=0"; _c.setPosition((int) (0)); -RDebugUtils.currentLine=12976133; - //BA.debugLineNum = 12976133;BA.debugLine="If c.RowCount > 0 Then usuario = c.GetString(\"USU"; + //BA.debugLineNum = 652;BA.debugLine="If c.RowCount > 0 Then usuario = c.GetString(\"USU"; if (_c.getRowCount()>0) { _usuario = _c.GetString("USUARIO");}; -RDebugUtils.currentLine=12976134; - //BA.debugLineNum = 12976134;BA.debugLine="Return usuario"; + //BA.debugLineNum = 653;BA.debugLine="Return usuario"; if (true) return _usuario; -RDebugUtils.currentLine=12976135; - //BA.debugLineNum = 12976135;BA.debugLine="End Sub"; + //BA.debugLineNum = 654;BA.debugLine="End Sub"; return ""; } public static String _centraetiqueta(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.LabelWrapper _elemento,int _anchoelementosuperior) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "centraetiqueta", false)) - {return ((String) Debug.delegate(null, "centraetiqueta", new Object[] {_ba,_elemento,_anchoelementosuperior}));} -RDebugUtils.currentLine=12713984; - //BA.debugLineNum = 12713984;BA.debugLine="Sub centraEtiqueta(elemento As Label, anchoElement"; -RDebugUtils.currentLine=12713985; - //BA.debugLineNum = 12713985;BA.debugLine="elemento.Left = Round(anchoElementoSuperior/2)-(e"; + //BA.debugLineNum = 627;BA.debugLine="Sub centraEtiqueta(elemento As Label, anchoElement"; + //BA.debugLineNum = 628;BA.debugLine="elemento.Left = Round(anchoElementoSuperior/2)-(e"; _elemento.setLeft((int) (anywheresoftware.b4a.keywords.Common.Round(_anchoelementosuperior/(double)2)-(_elemento.getWidth()/(double)2))); -RDebugUtils.currentLine=12713986; - //BA.debugLineNum = 12713986;BA.debugLine="End Sub"; + //BA.debugLineNum = 629;BA.debugLine="End Sub"; +return ""; +} +public static String _centrapanel(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.PanelWrapper _elemento,int _anchoelementosuperior) throws Exception{ + //BA.debugLineNum = 632;BA.debugLine="Sub centraPanel(elemento As Panel, anchoElementoSu"; + //BA.debugLineNum = 633;BA.debugLine="elemento.Left = Round(anchoElementoSuperior/2)-(e"; +_elemento.setLeft((int) (anywheresoftware.b4a.keywords.Common.Round(_anchoelementosuperior/(double)2)-(_elemento.getWidth()/(double)2))); + //BA.debugLineNum = 634;BA.debugLine="End Sub"; +return ""; +} +public static String _centrapanelv(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.PanelWrapper _elemento,int _altoelementosuperior) throws Exception{ + //BA.debugLineNum = 637;BA.debugLine="Sub centraPanelV(elemento As Panel, altoElementoSu"; + //BA.debugLineNum = 638;BA.debugLine="elemento.Top = Round(altoElementoSuperior/2)-(ele"; +_elemento.setTop((int) (anywheresoftware.b4a.keywords.Common.Round(_altoelementosuperior/(double)2)-(_elemento.getHeight()/(double)2))); + //BA.debugLineNum = 639;BA.debugLine="End Sub"; return ""; } public static String _centraprogressbar(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.ProgressBarWrapper _elemento,int _anchoelementosuperior) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "centraprogressbar", false)) - {return ((String) Debug.delegate(null, "centraprogressbar", new Object[] {_ba,_elemento,_anchoelementosuperior}));} -RDebugUtils.currentLine=12910592; - //BA.debugLineNum = 12910592;BA.debugLine="Sub centraProgressBar(elemento As ProgressBar, anc"; -RDebugUtils.currentLine=12910593; - //BA.debugLineNum = 12910593;BA.debugLine="elemento.Left = Round(anchoElementoSuperior/2)-(e"; + //BA.debugLineNum = 642;BA.debugLine="Sub centraProgressBar(elemento As ProgressBar, anc"; + //BA.debugLineNum = 643;BA.debugLine="elemento.Left = Round(anchoElementoSuperior/2)-(e"; _elemento.setLeft((int) (anywheresoftware.b4a.keywords.Common.Round(_anchoelementosuperior/(double)2)-(_elemento.getWidth()/(double)2))); -RDebugUtils.currentLine=12910594; - //BA.debugLineNum = 12910594;BA.debugLine="End Sub"; + //BA.debugLineNum = 644;BA.debugLine="End Sub"; return ""; } public static String _compress(anywheresoftware.b4a.BA _ba,String _str) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "compress", false)) - {return ((String) Debug.delegate(null, "compress", new Object[] {_ba,_str}));} byte[] _compressed = null; String _base64 = ""; -RDebugUtils.currentLine=10747904; - //BA.debugLineNum = 10747904;BA.debugLine="Sub compress(str As String) As String 'ignore"; -RDebugUtils.currentLine=10747906; - //BA.debugLineNum = 10747906;BA.debugLine="Dim compressed() As Byte = GZip.compress(str)"; + //BA.debugLineNum = 40;BA.debugLine="Sub compress(str As String) As String 'ignore"; + //BA.debugLineNum = 42;BA.debugLine="Dim compressed() As Byte = GZip.compress(str)"; _compressed = _gzip.compress(_str); -RDebugUtils.currentLine=10747909; - //BA.debugLineNum = 10747909;BA.debugLine="Dim base64 As String = su.EncodeBase64(compressed"; + //BA.debugLineNum = 45;BA.debugLine="Dim base64 As String = su.EncodeBase64(compressed"; _base64 = _su.EncodeBase64(_compressed); -RDebugUtils.currentLine=10747910; - //BA.debugLineNum = 10747910;BA.debugLine="Log($\"Comprimido: ${base64.Length}\"$)"; -anywheresoftware.b4a.keywords.Common.LogImpl("310747910",("Comprimido: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_base64.length()))+""),0); -RDebugUtils.currentLine=10747912; - //BA.debugLineNum = 10747912;BA.debugLine="Return base64"; + //BA.debugLineNum = 46;BA.debugLine="Log($\"Comprimido: ${base64.Length}\"$)"; +anywheresoftware.b4a.keywords.Common.LogImpl("347054854",("Comprimido: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_base64.length()))+""),0); + //BA.debugLineNum = 48;BA.debugLine="Return base64"; if (true) return _base64; -RDebugUtils.currentLine=10747913; - //BA.debugLineNum = 10747913;BA.debugLine="End Sub"; + //BA.debugLineNum = 49;BA.debugLine="End Sub"; return ""; } public static String _copiadb(anywheresoftware.b4a.BA _ba,boolean _result) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "copiadb", false)) - {return ((String) Debug.delegate(null, "copiadb", new Object[] {_ba,_result}));} String _p = ""; String _thedir = ""; -RDebugUtils.currentLine=12582912; - //BA.debugLineNum = 12582912;BA.debugLine="Sub copiaDB(result As Boolean) 'ignore"; -RDebugUtils.currentLine=12582913; - //BA.debugLineNum = 12582913;BA.debugLine="ToastMessageShow(\"copiaDB\", False)"; + //BA.debugLineNum = 585;BA.debugLine="Sub copiaDB(result As Boolean) 'ignore"; + //BA.debugLineNum = 586;BA.debugLine="ToastMessageShow(\"copiaDB\", False)"; anywheresoftware.b4a.keywords.Common.ToastMessageShow(BA.ObjectToCharSequence("copiaDB"),anywheresoftware.b4a.keywords.Common.False); -RDebugUtils.currentLine=12582914; - //BA.debugLineNum = 12582914;BA.debugLine="If result Then"; + //BA.debugLineNum = 587;BA.debugLine="If result Then"; if (_result) { -RDebugUtils.currentLine=12582915; - //BA.debugLineNum = 12582915;BA.debugLine="Dim p As String"; + //BA.debugLineNum = 588;BA.debugLine="Dim p As String"; _p = ""; -RDebugUtils.currentLine=12582916; - //BA.debugLineNum = 12582916;BA.debugLine="If File.ExternalWritable Then"; + //BA.debugLineNum = 589;BA.debugLine="If File.ExternalWritable Then"; if (anywheresoftware.b4a.keywords.Common.File.getExternalWritable()) { -RDebugUtils.currentLine=12582917; - //BA.debugLineNum = 12582917;BA.debugLine="p = File.DirRootExternal"; + //BA.debugLineNum = 590;BA.debugLine="p = File.DirRootExternal"; _p = anywheresoftware.b4a.keywords.Common.File.getDirRootExternal(); }else { -RDebugUtils.currentLine=12582920; - //BA.debugLineNum = 12582920;BA.debugLine="p = File.DirInternal"; + //BA.debugLineNum = 593;BA.debugLine="p = File.DirInternal"; _p = anywheresoftware.b4a.keywords.Common.File.getDirInternal(); }; -RDebugUtils.currentLine=12582923; - //BA.debugLineNum = 12582923;BA.debugLine="Dim theDir As String"; + //BA.debugLineNum = 596;BA.debugLine="Dim theDir As String"; _thedir = ""; -RDebugUtils.currentLine=12582924; - //BA.debugLineNum = 12582924;BA.debugLine="Try"; -try {RDebugUtils.currentLine=12582925; - //BA.debugLineNum = 12582925;BA.debugLine="File.MakeDir(File.DirRootExternal,\"kmts\")"; + //BA.debugLineNum = 597;BA.debugLine="Try"; +try { //BA.debugLineNum = 598;BA.debugLine="File.MakeDir(File.DirRootExternal,\"kmts\")"; anywheresoftware.b4a.keywords.Common.File.MakeDir(anywheresoftware.b4a.keywords.Common.File.getDirRootExternal(),"kmts"); -RDebugUtils.currentLine=12582926; - //BA.debugLineNum = 12582926;BA.debugLine="theDir = \"/kmts\""; + //BA.debugLineNum = 599;BA.debugLine="theDir = \"/kmts\""; _thedir = "/kmts"; } catch (Exception e14) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e14);RDebugUtils.currentLine=12582928; - //BA.debugLineNum = 12582928;BA.debugLine="theDir = \"\""; + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e14); //BA.debugLineNum = 601;BA.debugLine="theDir = \"\""; _thedir = ""; }; -RDebugUtils.currentLine=12582930; - //BA.debugLineNum = 12582930;BA.debugLine="Try"; -try {RDebugUtils.currentLine=12582931; - //BA.debugLineNum = 12582931;BA.debugLine="File.Copy(File.DirInternal,\"kmt.db\",File.DirRoo"; + //BA.debugLineNum = 603;BA.debugLine="Try"; +try { //BA.debugLineNum = 604;BA.debugLine="File.Copy(File.DirInternal,\"kmt.db\",File.DirRoo"; anywheresoftware.b4a.keywords.Common.File.Copy(anywheresoftware.b4a.keywords.Common.File.getDirInternal(),"kmt.db",anywheresoftware.b4a.keywords.Common.File.getDirRootExternal()+_thedir,"cedex_kmt.db"); -RDebugUtils.currentLine=12582932; - //BA.debugLineNum = 12582932;BA.debugLine="File.Copy(File.DirInternal,\"errorLog.db\",File.D"; + //BA.debugLineNum = 605;BA.debugLine="File.Copy(File.DirInternal,\"errorLog.db\",File.D"; anywheresoftware.b4a.keywords.Common.File.Copy(anywheresoftware.b4a.keywords.Common.File.getDirInternal(),"errorLog.db",anywheresoftware.b4a.keywords.Common.File.getDirRootExternal()+_thedir,"cedex_errorLog.db"); -RDebugUtils.currentLine=12582933; - //BA.debugLineNum = 12582933;BA.debugLine="ToastMessageShow(\"BD copiada!\", False)"; + //BA.debugLineNum = 606;BA.debugLine="ToastMessageShow(\"BD copiada!\", False)"; anywheresoftware.b4a.keywords.Common.ToastMessageShow(BA.ObjectToCharSequence("BD copiada!"),anywheresoftware.b4a.keywords.Common.False); } catch (Exception e21) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e21);RDebugUtils.currentLine=12582935; - //BA.debugLineNum = 12582935;BA.debugLine="ToastMessageShow(\"No se pudo hacer la copia: \"&"; + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e21); //BA.debugLineNum = 608;BA.debugLine="ToastMessageShow(\"No se pudo hacer la copia: \"&"; anywheresoftware.b4a.keywords.Common.ToastMessageShow(BA.ObjectToCharSequence("No se pudo hacer la copia: "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba))),anywheresoftware.b4a.keywords.Common.True); }; -RDebugUtils.currentLine=12582937; - //BA.debugLineNum = 12582937;BA.debugLine="Log(\"rootExternal=\"&p)"; -anywheresoftware.b4a.keywords.Common.LogImpl("312582937","rootExternal="+_p,0); -RDebugUtils.currentLine=12582938; - //BA.debugLineNum = 12582938;BA.debugLine="Log(\"File.DirInternal=\"&File.DirInternal)"; -anywheresoftware.b4a.keywords.Common.LogImpl("312582938","File.DirInternal="+anywheresoftware.b4a.keywords.Common.File.getDirInternal(),0); -RDebugUtils.currentLine=12582939; - //BA.debugLineNum = 12582939;BA.debugLine="Log(\"File.DirRootExternal=\"&File.DirRootExternal"; -anywheresoftware.b4a.keywords.Common.LogImpl("312582939","File.DirRootExternal="+anywheresoftware.b4a.keywords.Common.File.getDirRootExternal(),0); + //BA.debugLineNum = 610;BA.debugLine="Log(\"rootExternal=\"&p)"; +anywheresoftware.b4a.keywords.Common.LogImpl("348889881","rootExternal="+_p,0); + //BA.debugLineNum = 611;BA.debugLine="Log(\"File.DirInternal=\"&File.DirInternal)"; +anywheresoftware.b4a.keywords.Common.LogImpl("348889882","File.DirInternal="+anywheresoftware.b4a.keywords.Common.File.getDirInternal(),0); + //BA.debugLineNum = 612;BA.debugLine="Log(\"File.DirRootExternal=\"&File.DirRootExternal"; +anywheresoftware.b4a.keywords.Common.LogImpl("348889883","File.DirRootExternal="+anywheresoftware.b4a.keywords.Common.File.getDirRootExternal(),0); }else { -RDebugUtils.currentLine=12582941; - //BA.debugLineNum = 12582941;BA.debugLine="ToastMessageShow(\"Sin permisos\", False)"; + //BA.debugLineNum = 614;BA.debugLine="ToastMessageShow(\"Sin permisos\", False)"; anywheresoftware.b4a.keywords.Common.ToastMessageShow(BA.ObjectToCharSequence("Sin permisos"),anywheresoftware.b4a.keywords.Common.False); }; -RDebugUtils.currentLine=12582943; - //BA.debugLineNum = 12582943;BA.debugLine="End Sub"; + //BA.debugLineNum = 616;BA.debugLine="End Sub"; return ""; } public static String _cuantosvariablestengobd(anywheresoftware.b4a.BA _ba,String _promo) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "cuantosvariablestengobd", false)) - {return ((String) Debug.delegate(null, "cuantosvariablestengobd", new Object[] {_ba,_promo}));} -RDebugUtils.currentLine=14352384; - //BA.debugLineNum = 14352384;BA.debugLine="Sub cuantosVariablesTengoBD(promo As String) As St"; -RDebugUtils.currentLine=14352395; - //BA.debugLineNum = 14352395;BA.debugLine="End Sub"; + //BA.debugLineNum = 1172;BA.debugLine="Sub cuantosVariablesTengoBD(promo As String) As St"; + //BA.debugLineNum = 1183;BA.debugLine="End Sub"; return ""; } public static String _dameerroresjson(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.sql.SQL _sql,int _maxerrores,boolean _comprimido) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "dameerroresjson", false)) - {return ((String) Debug.delegate(null, "dameerroresjson", new Object[] {_ba,_sql,_maxerrores,_comprimido}));} anywheresoftware.b4a.objects.collections.JSONParser.JSONGenerator _j = null; String _lim = ""; anywheresoftware.b4a.sql.SQL.ResultSetWrapper _cur = null; @@ -1418,1222 +520,757 @@ anywheresoftware.b4a.objects.collections.List _l = null; int _i = 0; anywheresoftware.b4a.objects.collections.Map _m = null; anywheresoftware.b4a.objects.collections.Map _m2 = null; -RDebugUtils.currentLine=12386304; - //BA.debugLineNum = 12386304;BA.debugLine="Sub dameErroresJSON(SQL As SQL, maxErrores As Int,"; -RDebugUtils.currentLine=12386305; - //BA.debugLineNum = 12386305;BA.debugLine="Log(\"dameErroresJSON\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("312386305","dameErroresJSON",0); -RDebugUtils.currentLine=12386306; - //BA.debugLineNum = 12386306;BA.debugLine="Private j As JSONGenerator"; + //BA.debugLineNum = 523;BA.debugLine="Sub dameErroresJSON(SQL As SQL, maxErrores As Int,"; + //BA.debugLineNum = 524;BA.debugLine="Log(\"dameErroresJSON\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("348693249","dameErroresJSON",0); + //BA.debugLineNum = 525;BA.debugLine="Private j As JSONGenerator"; _j = new anywheresoftware.b4a.objects.collections.JSONParser.JSONGenerator(); -RDebugUtils.currentLine=12386307; - //BA.debugLineNum = 12386307;BA.debugLine="Private lim As String"; + //BA.debugLineNum = 526;BA.debugLine="Private lim As String"; _lim = ""; -RDebugUtils.currentLine=12386308; - //BA.debugLineNum = 12386308;BA.debugLine="Private cur As ResultSet"; + //BA.debugLineNum = 527;BA.debugLine="Private cur As ResultSet"; _cur = new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(); -RDebugUtils.currentLine=12386309; - //BA.debugLineNum = 12386309;BA.debugLine="Private l As List"; + //BA.debugLineNum = 528;BA.debugLine="Private l As List"; _l = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=12386310; - //BA.debugLineNum = 12386310;BA.debugLine="Private i As Int = 0"; + //BA.debugLineNum = 529;BA.debugLine="Private i As Int = 0"; _i = (int) (0); -RDebugUtils.currentLine=12386311; - //BA.debugLineNum = 12386311;BA.debugLine="l.Initialize"; + //BA.debugLineNum = 530;BA.debugLine="l.Initialize"; _l.Initialize(); -RDebugUtils.currentLine=12386312; - //BA.debugLineNum = 12386312;BA.debugLine="Dim m, m2 As Map"; + //BA.debugLineNum = 531;BA.debugLine="Dim m, m2 As Map"; _m = new anywheresoftware.b4a.objects.collections.Map(); _m2 = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=12386313; - //BA.debugLineNum = 12386313;BA.debugLine="m2.Initialize"; + //BA.debugLineNum = 532;BA.debugLine="m2.Initialize"; _m2.Initialize(); -RDebugUtils.currentLine=12386314; - //BA.debugLineNum = 12386314;BA.debugLine="If maxErrores = 0 Then lim = \"\" Else lim = \"limit"; + //BA.debugLineNum = 533;BA.debugLine="If maxErrores = 0 Then lim = \"\" Else lim = \"limit"; if (_maxerrores==0) { _lim = "";} else { _lim = "limit "+BA.NumberToString(_maxerrores);}; -RDebugUtils.currentLine=12386315; - //BA.debugLineNum = 12386315;BA.debugLine="cur = SQL.ExecQuery(\"select * from errores order"; + //BA.debugLineNum = 534;BA.debugLine="cur = SQL.ExecQuery(\"select * from errores order"; _cur = (anywheresoftware.b4a.sql.SQL.ResultSetWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(), (android.database.Cursor)(_sql.ExecQuery("select * from errores order by fecha desc "+_lim))); -RDebugUtils.currentLine=12386316; - //BA.debugLineNum = 12386316;BA.debugLine="Do While cur.NextRow"; + //BA.debugLineNum = 535;BA.debugLine="Do While cur.NextRow"; while (_cur.NextRow()) { -RDebugUtils.currentLine=12386317; - //BA.debugLineNum = 12386317;BA.debugLine="m.Initialize"; + //BA.debugLineNum = 536;BA.debugLine="m.Initialize"; _m.Initialize(); -RDebugUtils.currentLine=12386318; - //BA.debugLineNum = 12386318;BA.debugLine="m.Put(\"fecha\", cur.GetString(\"fecha\"))"; + //BA.debugLineNum = 537;BA.debugLine="m.Put(\"fecha\", cur.GetString(\"fecha\"))"; _m.Put((Object)("fecha"),(Object)(_cur.GetString("fecha"))); -RDebugUtils.currentLine=12386319; - //BA.debugLineNum = 12386319;BA.debugLine="m.Put(\"error\", cur.GetString(\"error\"))"; + //BA.debugLineNum = 538;BA.debugLine="m.Put(\"error\", cur.GetString(\"error\"))"; _m.Put((Object)("error"),(Object)(_cur.GetString("error"))); -RDebugUtils.currentLine=12386320; - //BA.debugLineNum = 12386320;BA.debugLine="m2.Put(i,m)"; + //BA.debugLineNum = 539;BA.debugLine="m2.Put(i,m)"; _m2.Put((Object)(_i),(Object)(_m.getObject())); -RDebugUtils.currentLine=12386321; - //BA.debugLineNum = 12386321;BA.debugLine="i = i + 1"; + //BA.debugLineNum = 540;BA.debugLine="i = i + 1"; _i = (int) (_i+1); } ; -RDebugUtils.currentLine=12386323; - //BA.debugLineNum = 12386323;BA.debugLine="cur.Close"; + //BA.debugLineNum = 542;BA.debugLine="cur.Close"; _cur.Close(); -RDebugUtils.currentLine=12386324; - //BA.debugLineNum = 12386324;BA.debugLine="j.Initialize(m2)"; + //BA.debugLineNum = 543;BA.debugLine="j.Initialize(m2)"; _j.Initialize(_m2); -RDebugUtils.currentLine=12386325; - //BA.debugLineNum = 12386325;BA.debugLine="Log(j.ToString)"; -anywheresoftware.b4a.keywords.Common.LogImpl("312386325",_j.ToString(),0); -RDebugUtils.currentLine=12386326; - //BA.debugLineNum = 12386326;BA.debugLine="If comprimido Then"; + //BA.debugLineNum = 544;BA.debugLine="Log(j.ToString)"; +anywheresoftware.b4a.keywords.Common.LogImpl("348693269",_j.ToString(),0); + //BA.debugLineNum = 545;BA.debugLine="If comprimido Then"; if (_comprimido) { -RDebugUtils.currentLine=12386327; - //BA.debugLineNum = 12386327;BA.debugLine="Return compress(j.ToString)"; + //BA.debugLineNum = 546;BA.debugLine="Return compress(j.ToString)"; if (true) return _compress(_ba,_j.ToString()); }else { -RDebugUtils.currentLine=12386329; - //BA.debugLineNum = 12386329;BA.debugLine="Return j.ToString"; + //BA.debugLineNum = 548;BA.debugLine="Return j.ToString"; if (true) return _j.ToString(); }; -RDebugUtils.currentLine=12386331; - //BA.debugLineNum = 12386331;BA.debugLine="End Sub"; + //BA.debugLineNum = 550;BA.debugLine="End Sub"; return ""; } public static String _dameruta(anywheresoftware.b4a.BA _ba,String _inicioruta,String _origenruta) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "dameruta", false)) - {return ((String) Debug.delegate(null, "dameruta", new Object[] {_ba,_inicioruta,_origenruta}));} String _fechainicio = ""; anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; String _ruta2 = ""; int _i = 0; -RDebugUtils.currentLine=11206656; - //BA.debugLineNum = 11206656;BA.debugLine="Sub dameRuta(inicioRuta As String, origenRuta As S"; -RDebugUtils.currentLine=11206658; - //BA.debugLineNum = 11206658;BA.debugLine="Dim fechaInicio As String"; + //BA.debugLineNum = 131;BA.debugLine="Sub dameRuta(inicioRuta As String, origenRuta As S"; + //BA.debugLineNum = 133;BA.debugLine="Dim fechaInicio As String"; _fechainicio = ""; -RDebugUtils.currentLine=11206659; - //BA.debugLineNum = 11206659;BA.debugLine="Try 'incioRuta es numero"; -try {RDebugUtils.currentLine=11206660; - //BA.debugLineNum = 11206660;BA.debugLine="inicioRuta = inicioRuta * 1"; + //BA.debugLineNum = 134;BA.debugLine="Try 'incioRuta es numero"; +try { //BA.debugLineNum = 135;BA.debugLine="inicioRuta = inicioRuta * 1"; _inicioruta = BA.NumberToString((double)(Double.parseDouble(_inicioruta))*1); -RDebugUtils.currentLine=11206662; - //BA.debugLineNum = 11206662;BA.debugLine="fechaInicio = fechaKMT(DateTime.Now - (DateTime."; + //BA.debugLineNum = 137;BA.debugLine="fechaInicio = fechaKMT(DateTime.Now - (DateTime."; _fechainicio = _fechakmt(_ba,BA.NumberToString(anywheresoftware.b4a.keywords.Common.DateTime.getNow()-(anywheresoftware.b4a.keywords.Common.DateTime.TicksPerHour*(double)(Double.parseDouble(_inicioruta))))); } catch (Exception e6) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e6);RDebugUtils.currentLine=11206664; - //BA.debugLineNum = 11206664;BA.debugLine="fechaInicio = fechaInicioHoy"; + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e6); //BA.debugLineNum = 139;BA.debugLine="fechaInicio = fechaInicioHoy"; _fechainicio = _fechainiciohoy(_ba); }; -RDebugUtils.currentLine=11206667; - //BA.debugLineNum = 11206667;BA.debugLine="If subsLogs Then Log(\"fechaInicio: \"&fechaInicio&"; + //BA.debugLineNum = 142;BA.debugLine="If subsLogs Then Log(\"fechaInicio: \"&fechaInicio&"; if (_subslogs) { -anywheresoftware.b4a.keywords.Common.LogImpl("311206667","fechaInicio: "+_fechainicio+" | rutaHrsAtras="+BA.NumberToString(_rutahrsatras),0);}; -RDebugUtils.currentLine=11206668; - //BA.debugLineNum = 11206668;BA.debugLine="Dim c As Cursor"; +anywheresoftware.b4a.keywords.Common.LogImpl("347513611","fechaInicio: "+_fechainicio+" | rutaHrsAtras="+BA.NumberToString(_rutahrsatras),0);}; + //BA.debugLineNum = 143;BA.debugLine="Dim c As Cursor"; _c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=11206669; - //BA.debugLineNum = 11206669;BA.debugLine="If kmt.IsInitialized = False Then kmt.Initialize("; + //BA.debugLineNum = 144;BA.debugLine="If kmt.IsInitialized = False Then kmt.Initialize("; if (_kmt.IsInitialized()==anywheresoftware.b4a.keywords.Common.False) { _kmt.Initialize(mostCurrent._starter._ruta /*String*/ ,"kmt.db",anywheresoftware.b4a.keywords.Common.True);}; -RDebugUtils.currentLine=11206670; - //BA.debugLineNum = 11206670;BA.debugLine="If subsLogs Then Log(\"select FECHA, LAT, LON from"; + //BA.debugLineNum = 145;BA.debugLine="If subsLogs Then Log(\"select FECHA, LAT, LON from"; if (_subslogs) { -anywheresoftware.b4a.keywords.Common.LogImpl("311206670","select FECHA, LAT, LON from "+_origenruta+" where FECHA > "+_fechainicio+" order by FECHA desc limit "+BA.NumberToString(_rutamaxpoints),0);}; -RDebugUtils.currentLine=11206671; - //BA.debugLineNum = 11206671;BA.debugLine="c = kmt.ExecQuery(\"select FECHA, LAT, LON from \"&"; +anywheresoftware.b4a.keywords.Common.LogImpl("347513614","select FECHA, LAT, LON from "+_origenruta+" where FECHA > "+_fechainicio+" order by FECHA desc limit "+BA.NumberToString(_rutamaxpoints),0);}; + //BA.debugLineNum = 146;BA.debugLine="c = kmt.ExecQuery(\"select FECHA, LAT, LON from \"&"; _c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_kmt.ExecQuery("select FECHA, LAT, LON from "+_origenruta+" where FECHA > "+_fechainicio+" order by FECHA desc limit "+BA.NumberToString(_rutamaxpoints)))); -RDebugUtils.currentLine=11206672; - //BA.debugLineNum = 11206672;BA.debugLine="c.Position = 0"; + //BA.debugLineNum = 147;BA.debugLine="c.Position = 0"; _c.setPosition((int) (0)); -RDebugUtils.currentLine=11206673; - //BA.debugLineNum = 11206673;BA.debugLine="Dim ruta2 As String = \"\""; + //BA.debugLineNum = 148;BA.debugLine="Dim ruta2 As String = \"\""; _ruta2 = ""; -RDebugUtils.currentLine=11206674; - //BA.debugLineNum = 11206674;BA.debugLine="If c.RowCount>0 Then"; + //BA.debugLineNum = 149;BA.debugLine="If c.RowCount>0 Then"; if (_c.getRowCount()>0) { -RDebugUtils.currentLine=11206675; - //BA.debugLineNum = 11206675;BA.debugLine="For i=0 To c.RowCount -1"; + //BA.debugLineNum = 150;BA.debugLine="For i=0 To c.RowCount -1"; { final int step16 = 1; final int limit16 = (int) (_c.getRowCount()-1); _i = (int) (0) ; for (;_i <= limit16 ;_i = _i + step16 ) { -RDebugUtils.currentLine=11206676; - //BA.debugLineNum = 11206676;BA.debugLine="c.Position=i"; + //BA.debugLineNum = 151;BA.debugLine="c.Position=i"; _c.setPosition(_i); -RDebugUtils.currentLine=11206677; - //BA.debugLineNum = 11206677;BA.debugLine="ruta2=ruta2&CRLF&c.GetString(\"LAT\")&\",\"&c.GetSt"; + //BA.debugLineNum = 152;BA.debugLine="ruta2=ruta2&CRLF&c.GetString(\"LAT\")&\",\"&c.GetSt"; _ruta2 = _ruta2+anywheresoftware.b4a.keywords.Common.CRLF+_c.GetString("LAT")+","+_c.GetString("LON")+","+_c.GetString("FECHA"); -RDebugUtils.currentLine=11206678; - //BA.debugLineNum = 11206678;BA.debugLine="B4XPages.MainPage.fechaRuta = c.GetString(\"FECH"; + //BA.debugLineNum = 153;BA.debugLine="B4XPages.MainPage.fechaRuta = c.GetString(\"FECH"; mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._fecharuta /*String*/ = _c.GetString("FECHA"); } }; }; -RDebugUtils.currentLine=11206681; - //BA.debugLineNum = 11206681;BA.debugLine="c.Close"; + //BA.debugLineNum = 156;BA.debugLine="c.Close"; _c.Close(); -RDebugUtils.currentLine=11206682; - //BA.debugLineNum = 11206682;BA.debugLine="Return compress(ruta2)"; + //BA.debugLineNum = 157;BA.debugLine="Return compress(ruta2)"; if (true) return _compress(_ba,_ruta2); -RDebugUtils.currentLine=11206683; - //BA.debugLineNum = 11206683;BA.debugLine="End Sub"; -return ""; -} -public static String _fechainiciohoy(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "fechainiciohoy", false)) - {return ((String) Debug.delegate(null, "fechainiciohoy", new Object[] {_ba}));} -String _origformat = ""; -String _h = ""; -RDebugUtils.currentLine=11730944; - //BA.debugLineNum = 11730944;BA.debugLine="Sub fechaInicioHoy As String 'ignore"; -RDebugUtils.currentLine=11730945; - //BA.debugLineNum = 11730945;BA.debugLine="Dim OrigFormat As String = DateTime.DateFormat"; -_origformat = anywheresoftware.b4a.keywords.Common.DateTime.getDateFormat(); -RDebugUtils.currentLine=11730946; - //BA.debugLineNum = 11730946;BA.debugLine="DateTime.DateFormat=\"yyMMdd\""; -anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat("yyMMdd"); -RDebugUtils.currentLine=11730947; - //BA.debugLineNum = 11730947;BA.debugLine="Private h As String = DateTime.Date(DateTime.Now"; -_h = anywheresoftware.b4a.keywords.Common.DateTime.Date(anywheresoftware.b4a.keywords.Common.DateTime.getNow())+"000000"; -RDebugUtils.currentLine=11730948; - //BA.debugLineNum = 11730948;BA.debugLine="DateTime.DateFormat=OrigFormat 'return to orig"; -anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat(_origformat); -RDebugUtils.currentLine=11730949; - //BA.debugLineNum = 11730949;BA.debugLine="Log(\"Hoy=\"&h)"; -anywheresoftware.b4a.keywords.Common.LogImpl("311730949","Hoy="+_h,0); -RDebugUtils.currentLine=11730950; - //BA.debugLineNum = 11730950;BA.debugLine="Return h"; -if (true) return _h; -RDebugUtils.currentLine=11730951; - //BA.debugLineNum = 11730951;BA.debugLine="End Sub"; + //BA.debugLineNum = 158;BA.debugLine="End Sub"; return ""; } public static String _dameusuariodedb(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "dameusuariodedb", false)) - {return ((String) Debug.delegate(null, "dameusuariodedb", new Object[] {_ba}));} anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; String _u = ""; -RDebugUtils.currentLine=13041664; - //BA.debugLineNum = 13041664;BA.debugLine="Sub dameUsuarioDeDB As String 'ignore"; -RDebugUtils.currentLine=13041665; - //BA.debugLineNum = 13041665;BA.debugLine="Private c As Cursor"; + //BA.debugLineNum = 657;BA.debugLine="Sub dameUsuarioDeDB As String 'ignore"; + //BA.debugLineNum = 658;BA.debugLine="Private c As Cursor"; _c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=13041666; - //BA.debugLineNum = 13041666;BA.debugLine="Private u As String = \"SinUsuario\""; + //BA.debugLineNum = 659;BA.debugLine="Private u As String = \"SinUsuario\""; _u = "SinUsuario"; -RDebugUtils.currentLine=13041667; - //BA.debugLineNum = 13041667;BA.debugLine="If Not(kmt.IsInitialized) Then revisaBD"; + //BA.debugLineNum = 660;BA.debugLine="If Not(kmt.IsInitialized) Then revisaBD"; if (anywheresoftware.b4a.keywords.Common.Not(_kmt.IsInitialized())) { _revisabd(_ba);}; -RDebugUtils.currentLine=13041668; - //BA.debugLineNum = 13041668;BA.debugLine="c=kmt.ExecQuery(\"select USUARIO from usuarioa\")"; + //BA.debugLineNum = 661;BA.debugLine="c=kmt.ExecQuery(\"select USUARIO from usuarioa\")"; _c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_kmt.ExecQuery("select USUARIO from usuarioa"))); -RDebugUtils.currentLine=13041669; - //BA.debugLineNum = 13041669;BA.debugLine="c.Position=0"; + //BA.debugLineNum = 662;BA.debugLine="c.Position=0"; _c.setPosition((int) (0)); -RDebugUtils.currentLine=13041670; - //BA.debugLineNum = 13041670;BA.debugLine="If c.RowCount > 0 Then u = c.GetString(\"USUARIO\")"; + //BA.debugLineNum = 663;BA.debugLine="If c.RowCount > 0 Then u = c.GetString(\"USUARIO\")"; if (_c.getRowCount()>0) { _u = _c.GetString("USUARIO");}; -RDebugUtils.currentLine=13041671; - //BA.debugLineNum = 13041671;BA.debugLine="c.Close"; + //BA.debugLineNum = 664;BA.debugLine="c.Close"; _c.Close(); -RDebugUtils.currentLine=13041672; - //BA.debugLineNum = 13041672;BA.debugLine="Return u"; + //BA.debugLineNum = 665;BA.debugLine="Return u"; if (true) return _u; -RDebugUtils.currentLine=13041673; - //BA.debugLineNum = 13041673;BA.debugLine="End Sub"; + //BA.debugLineNum = 666;BA.debugLine="End Sub"; return ""; } public static String _decompress(anywheresoftware.b4a.BA _ba,String _base64) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "decompress", false)) - {return ((String) Debug.delegate(null, "decompress", new Object[] {_ba,_base64}));} byte[] _decompressedbytes = null; anywheresoftware.b4a.agraham.byteconverter.ByteConverter _bc = null; String _uncompressed = ""; -RDebugUtils.currentLine=10813440; - //BA.debugLineNum = 10813440;BA.debugLine="Sub decompress(base64 As String) As String 'ignore"; -RDebugUtils.currentLine=10813441; - //BA.debugLineNum = 10813441;BA.debugLine="Dim decompressedbytes() As Byte = su.DecodeBase64"; + //BA.debugLineNum = 52;BA.debugLine="Sub decompress(base64 As String) As String 'ignore"; + //BA.debugLineNum = 53;BA.debugLine="Dim decompressedbytes() As Byte = su.DecodeBase64"; _decompressedbytes = _su.DecodeBase64(_base64); -RDebugUtils.currentLine=10813443; - //BA.debugLineNum = 10813443;BA.debugLine="Dim bc As ByteConverter"; + //BA.debugLineNum = 55;BA.debugLine="Dim bc As ByteConverter"; _bc = new anywheresoftware.b4a.agraham.byteconverter.ByteConverter(); -RDebugUtils.currentLine=10813444; - //BA.debugLineNum = 10813444;BA.debugLine="Dim uncompressed As String = bc.StringFromBytes(d"; + //BA.debugLineNum = 56;BA.debugLine="Dim uncompressed As String = bc.StringFromBytes(d"; _uncompressed = _bc.StringFromBytes(_decompressedbytes,"UTF8"); -RDebugUtils.currentLine=10813445; - //BA.debugLineNum = 10813445;BA.debugLine="Log($\"Descomprimido: ${uncompressed.Length}\"$)"; -anywheresoftware.b4a.keywords.Common.LogImpl("310813445",("Descomprimido: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_uncompressed.length()))+""),0); -RDebugUtils.currentLine=10813447; - //BA.debugLineNum = 10813447;BA.debugLine="Return uncompressed"; + //BA.debugLineNum = 57;BA.debugLine="Log($\"Descomprimido: ${uncompressed.Length}\"$)"; +anywheresoftware.b4a.keywords.Common.LogImpl("347120389",("Descomprimido: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_uncompressed.length()))+""),0); + //BA.debugLineNum = 59;BA.debugLine="Return uncompressed"; if (true) return _uncompressed; -RDebugUtils.currentLine=10813448; - //BA.debugLineNum = 10813448;BA.debugLine="End Sub"; + //BA.debugLineNum = 60;BA.debugLine="End Sub"; return ""; } public static String _deleteerrorlog_db(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "deleteerrorlog_db", false)) - {return ((String) Debug.delegate(null, "deleteerrorlog_db", new Object[] {_ba}));} -RDebugUtils.currentLine=11337728; - //BA.debugLineNum = 11337728;BA.debugLine="Sub deleteErrorLog_DB 'ignore"; -RDebugUtils.currentLine=11337729; - //BA.debugLineNum = 11337729;BA.debugLine="errorLog.ExecNonQuery(\"delete from errores\")"; + //BA.debugLineNum = 168;BA.debugLine="Sub deleteErrorLog_DB 'ignore"; + //BA.debugLineNum = 169;BA.debugLine="errorLog.ExecNonQuery(\"delete from errores\")"; _errorlog.ExecNonQuery("delete from errores"); -RDebugUtils.currentLine=11337730; - //BA.debugLineNum = 11337730;BA.debugLine="errorLog.ExecNonQuery(\"vacuum;\")"; + //BA.debugLineNum = 170;BA.debugLine="errorLog.ExecNonQuery(\"vacuum;\")"; _errorlog.ExecNonQuery("vacuum;"); -RDebugUtils.currentLine=11337731; - //BA.debugLineNum = 11337731;BA.debugLine="ToastMessageShow(\"BD Errores Borrada\", False)"; + //BA.debugLineNum = 171;BA.debugLine="ToastMessageShow(\"BD Errores Borrada\", False)"; anywheresoftware.b4a.keywords.Common.ToastMessageShow(BA.ObjectToCharSequence("BD Errores Borrada"),anywheresoftware.b4a.keywords.Common.False); -RDebugUtils.currentLine=11337732; - //BA.debugLineNum = 11337732;BA.debugLine="End Sub"; + //BA.debugLineNum = 172;BA.debugLine="End Sub"; return ""; } public static String _deletegps_db(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "deletegps_db", false)) - {return ((String) Debug.delegate(null, "deletegps_db", new Object[] {_ba}));} -RDebugUtils.currentLine=11272192; - //BA.debugLineNum = 11272192;BA.debugLine="Sub deleteGPS_DB 'ignore"; -RDebugUtils.currentLine=11272193; - //BA.debugLineNum = 11272193;BA.debugLine="kmt.ExecNonQuery(\"delete from RUTA_GPS\")"; + //BA.debugLineNum = 161;BA.debugLine="Sub deleteGPS_DB 'ignore"; + //BA.debugLineNum = 162;BA.debugLine="kmt.ExecNonQuery(\"delete from RUTA_GPS\")"; _kmt.ExecNonQuery("delete from RUTA_GPS"); -RDebugUtils.currentLine=11272194; - //BA.debugLineNum = 11272194;BA.debugLine="kmt.ExecNonQuery(\"vacuum;\")"; + //BA.debugLineNum = 163;BA.debugLine="kmt.ExecNonQuery(\"vacuum;\")"; _kmt.ExecNonQuery("vacuum;"); -RDebugUtils.currentLine=11272195; - //BA.debugLineNum = 11272195;BA.debugLine="ToastMessageShow(\"Borramos BD Coords GPS\", False)"; + //BA.debugLineNum = 164;BA.debugLine="ToastMessageShow(\"Borramos BD Coords GPS\", False)"; anywheresoftware.b4a.keywords.Common.ToastMessageShow(BA.ObjectToCharSequence("Borramos BD Coords GPS"),anywheresoftware.b4a.keywords.Common.False); -RDebugUtils.currentLine=11272196; - //BA.debugLineNum = 11272196;BA.debugLine="End Sub"; + //BA.debugLineNum = 165;BA.debugLine="End Sub"; +return ""; +} +public static String _fechainiciohoy(anywheresoftware.b4a.BA _ba) throws Exception{ +String _origformat = ""; +String _h = ""; + //BA.debugLineNum = 338;BA.debugLine="Sub fechaInicioHoy As String 'ignore"; + //BA.debugLineNum = 339;BA.debugLine="Dim OrigFormat As String = DateTime.DateFormat"; +_origformat = anywheresoftware.b4a.keywords.Common.DateTime.getDateFormat(); + //BA.debugLineNum = 340;BA.debugLine="DateTime.DateFormat=\"yyMMdd\""; +anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat("yyMMdd"); + //BA.debugLineNum = 341;BA.debugLine="Private h As String = DateTime.Date(DateTime.Now"; +_h = anywheresoftware.b4a.keywords.Common.DateTime.Date(anywheresoftware.b4a.keywords.Common.DateTime.getNow())+"000000"; + //BA.debugLineNum = 342;BA.debugLine="DateTime.DateFormat=OrigFormat 'return to orig"; +anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat(_origformat); + //BA.debugLineNum = 343;BA.debugLine="Log(\"Hoy=\"&h)"; +anywheresoftware.b4a.keywords.Common.LogImpl("348037893","Hoy="+_h,0); + //BA.debugLineNum = 344;BA.debugLine="Return h"; +if (true) return _h; + //BA.debugLineNum = 345;BA.debugLine="End Sub"; +return ""; +} +public static String _fechakmt(anywheresoftware.b4a.BA _ba,String _fecha) throws Exception{ +String _origformat = ""; +String _nuevafecha = ""; + //BA.debugLineNum = 63;BA.debugLine="Sub fechaKMT(fecha As String) As String 'ignore"; + //BA.debugLineNum = 65;BA.debugLine="Dim OrigFormat As String = DateTime.DateFormat '"; +_origformat = anywheresoftware.b4a.keywords.Common.DateTime.getDateFormat(); + //BA.debugLineNum = 66;BA.debugLine="DateTime.DateFormat=\"yyMMddHHmmss\""; +anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat("yyMMddHHmmss"); + //BA.debugLineNum = 67;BA.debugLine="Dim nuevaFecha As String=DateTime.Date(fecha)"; +_nuevafecha = anywheresoftware.b4a.keywords.Common.DateTime.Date((long)(Double.parseDouble(_fecha))); + //BA.debugLineNum = 68;BA.debugLine="DateTime.DateFormat=OrigFormat 'return to orig d"; +anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat(_origformat); + //BA.debugLineNum = 70;BA.debugLine="Return nuevaFecha"; +if (true) return _nuevafecha; + //BA.debugLineNum = 71;BA.debugLine="End Sub"; return ""; } public static long _fechakmt2ticks(anywheresoftware.b4a.BA _ba,String _fkmt) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "fechakmt2ticks", false)) - {return ((Long) Debug.delegate(null, "fechakmt2ticks", new Object[] {_ba,_fkmt}));} String _partefecha = ""; String _partehora = ""; String _origformat = ""; long _ticks = 0L; -RDebugUtils.currentLine=12451840; - //BA.debugLineNum = 12451840;BA.debugLine="Sub fechaKMT2Ticks(fKMT As String) As Long 'ignore"; -RDebugUtils.currentLine=12451841; - //BA.debugLineNum = 12451841;BA.debugLine="Try"; -try {RDebugUtils.currentLine=12451842; - //BA.debugLineNum = 12451842;BA.debugLine="If fKMT.Length = 12 Then"; + //BA.debugLineNum = 553;BA.debugLine="Sub fechaKMT2Ticks(fKMT As String) As Long 'ignore"; + //BA.debugLineNum = 554;BA.debugLine="Try"; +try { //BA.debugLineNum = 555;BA.debugLine="If fKMT.Length = 12 Then"; if (_fkmt.length()==12) { -RDebugUtils.currentLine=12451843; - //BA.debugLineNum = 12451843;BA.debugLine="Private parteFecha As String = fKMT.SubString2("; + //BA.debugLineNum = 556;BA.debugLine="Private parteFecha As String = fKMT.SubString2("; _partefecha = _fkmt.substring((int) (0),(int) (6)); -RDebugUtils.currentLine=12451844; - //BA.debugLineNum = 12451844;BA.debugLine="Private parteHora As String = fKMT.SubString(6)"; + //BA.debugLineNum = 557;BA.debugLine="Private parteHora As String = fKMT.SubString(6)"; _partehora = _fkmt.substring((int) (6)); -RDebugUtils.currentLine=12451845; - //BA.debugLineNum = 12451845;BA.debugLine="Private OrigFormat As String = DateTime.DateFor"; + //BA.debugLineNum = 558;BA.debugLine="Private OrigFormat As String = DateTime.DateFor"; _origformat = anywheresoftware.b4a.keywords.Common.DateTime.getDateFormat(); -RDebugUtils.currentLine=12451846; - //BA.debugLineNum = 12451846;BA.debugLine="DateTime.DateFormat=\"yymmdd\""; + //BA.debugLineNum = 559;BA.debugLine="DateTime.DateFormat=\"yymmdd\""; anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat("yymmdd"); -RDebugUtils.currentLine=12451847; - //BA.debugLineNum = 12451847;BA.debugLine="DateTime.TimeFormat=\"HHmmss\""; + //BA.debugLineNum = 560;BA.debugLine="DateTime.TimeFormat=\"HHmmss\""; anywheresoftware.b4a.keywords.Common.DateTime.setTimeFormat("HHmmss"); -RDebugUtils.currentLine=12451848; - //BA.debugLineNum = 12451848;BA.debugLine="Private ticks As Long = DateTime.DateTimeParse("; + //BA.debugLineNum = 561;BA.debugLine="Private ticks As Long = DateTime.DateTimeParse("; _ticks = anywheresoftware.b4a.keywords.Common.DateTime.DateTimeParse(_partefecha,_partehora); -RDebugUtils.currentLine=12451849; - //BA.debugLineNum = 12451849;BA.debugLine="DateTime.DateFormat=OrigFormat 'return to orig"; + //BA.debugLineNum = 562;BA.debugLine="DateTime.DateFormat=OrigFormat 'return to orig"; anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat(_origformat); -RDebugUtils.currentLine=12451850; - //BA.debugLineNum = 12451850;BA.debugLine="Return ticks"; + //BA.debugLineNum = 563;BA.debugLine="Return ticks"; if (true) return _ticks; }else { -RDebugUtils.currentLine=12451852; - //BA.debugLineNum = 12451852;BA.debugLine="Log(\"Formato de fecha incorrecto, debe de ser '"; -anywheresoftware.b4a.keywords.Common.LogImpl("312451852","Formato de fecha incorrecto, debe de ser 'YYMMDDHHMMSS', no '"+_fkmt+"' largo="+BA.NumberToString(_fkmt.length()),0); -RDebugUtils.currentLine=12451853; - //BA.debugLineNum = 12451853;BA.debugLine="Return 0"; + //BA.debugLineNum = 565;BA.debugLine="Log(\"Formato de fecha incorrecto, debe de ser '"; +anywheresoftware.b4a.keywords.Common.LogImpl("348758796","Formato de fecha incorrecto, debe de ser 'YYMMDDHHMMSS', no '"+_fkmt+"' largo="+BA.NumberToString(_fkmt.length()),0); + //BA.debugLineNum = 566;BA.debugLine="Return 0"; if (true) return (long) (0); }; } catch (Exception e16) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e16);RDebugUtils.currentLine=12451856; - //BA.debugLineNum = 12451856;BA.debugLine="Log(LastException)"; -anywheresoftware.b4a.keywords.Common.LogImpl("312451856",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),0); -RDebugUtils.currentLine=12451857; - //BA.debugLineNum = 12451857;BA.debugLine="LogColor($\"Fecha dada: ${fKMT}, Parte Fecha: ${p"; -anywheresoftware.b4a.keywords.Common.LogImpl("312451857",("Fecha dada: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_fkmt))+", Parte Fecha: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_partefecha))+", Parte Hora: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_partehora))+""),anywheresoftware.b4a.keywords.Common.Colors.Red); -RDebugUtils.currentLine=12451858; - //BA.debugLineNum = 12451858;BA.debugLine="Return 0"; + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e16); //BA.debugLineNum = 569;BA.debugLine="Log(LastException)"; +anywheresoftware.b4a.keywords.Common.LogImpl("348758800",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),0); + //BA.debugLineNum = 570;BA.debugLine="LogColor($\"Fecha dada: ${fKMT}, Parte Fecha: ${p"; +anywheresoftware.b4a.keywords.Common.LogImpl("348758801",("Fecha dada: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_fkmt))+", Parte Fecha: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_partefecha))+", Parte Hora: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_partehora))+""),anywheresoftware.b4a.keywords.Common.Colors.Red); + //BA.debugLineNum = 571;BA.debugLine="Return 0"; if (true) return (long) (0); }; -RDebugUtils.currentLine=12451860; - //BA.debugLineNum = 12451860;BA.debugLine="End Sub"; + //BA.debugLineNum = 573;BA.debugLine="End Sub"; return 0L; } +public static String _fechanormal(anywheresoftware.b4a.BA _ba,String _fecha) throws Exception{ +String _origformat = ""; +String _nuevafecha = ""; + //BA.debugLineNum = 1348;BA.debugLine="Sub fechanormal(fecha As String) As String 'ignore"; + //BA.debugLineNum = 1350;BA.debugLine="Dim OrigFormat As String = DateTime.DateFormat '"; +_origformat = anywheresoftware.b4a.keywords.Common.DateTime.getDateFormat(); + //BA.debugLineNum = 1351;BA.debugLine="DateTime.DateFormat = \"YYYY/MM/dd HH:mm:ss\""; +anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat("YYYY/MM/dd HH:mm:ss"); + //BA.debugLineNum = 1352;BA.debugLine="Dim nuevaFecha As String=DateTime.Date(fecha)"; +_nuevafecha = anywheresoftware.b4a.keywords.Common.DateTime.Date((long)(Double.parseDouble(_fecha))); + //BA.debugLineNum = 1353;BA.debugLine="DateTime.DateFormat = OrigFormat 'return to orig"; +anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat(_origformat); + //BA.debugLineNum = 1355;BA.debugLine="Return nuevaFecha"; +if (true) return _nuevafecha; + //BA.debugLineNum = 1356;BA.debugLine="End Sub"; +return ""; +} public static String _getphnid(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "getphnid", false)) - {return ((String) Debug.delegate(null, "getphnid", new Object[] {_ba}));} String _t = ""; String _s = ""; -RDebugUtils.currentLine=10682368; - //BA.debugLineNum = 10682368;BA.debugLine="Sub getPhnId As String 'ignore"; -RDebugUtils.currentLine=10682370; - //BA.debugLineNum = 10682370;BA.debugLine="devModel = phn.Model"; + //BA.debugLineNum = 20;BA.debugLine="Sub getPhnId As String 'ignore"; + //BA.debugLineNum = 22;BA.debugLine="devModel = phn.Model"; _devmodel = _phn.getModel(); -RDebugUtils.currentLine=10682371; - //BA.debugLineNum = 10682371;BA.debugLine="If devModel.Length <= 3 Then 'Si phn.Model esta e"; + //BA.debugLineNum = 23;BA.debugLine="If devModel.Length <= 3 Then 'Si phn.Model esta e"; if (_devmodel.length()<=3) { -RDebugUtils.currentLine=10682372; - //BA.debugLineNum = 10682372;BA.debugLine="Dim t As String = phn.GetSettings(\"android_id\")"; + //BA.debugLineNum = 24;BA.debugLine="Dim t As String = phn.GetSettings(\"android_id\")"; _t = _phn.GetSettings("android_id"); -RDebugUtils.currentLine=10682373; - //BA.debugLineNum = 10682373;BA.debugLine="devModel = t"; + //BA.debugLineNum = 25;BA.debugLine="devModel = t"; _devmodel = _t; }; -RDebugUtils.currentLine=10682375; - //BA.debugLineNum = 10682375;BA.debugLine="If devModel.Length >= 3 Then 'Si tenemos valor pa"; + //BA.debugLineNum = 27;BA.debugLine="If devModel.Length >= 3 Then 'Si tenemos valor pa"; if (_devmodel.length()>=3) { -RDebugUtils.currentLine=10682376; - //BA.debugLineNum = 10682376;BA.debugLine="File.WriteString(File.DirInternal, \"phnId.txt\","; + //BA.debugLineNum = 28;BA.debugLine="File.WriteString(File.DirInternal, \"phnId.txt\","; anywheresoftware.b4a.keywords.Common.File.WriteString(anywheresoftware.b4a.keywords.Common.File.getDirInternal(),"phnId.txt",_devmodel); - }else -{RDebugUtils.currentLine=10682378; - //BA.debugLineNum = 10682378;BA.debugLine="Else If devModel.Length < 3 Then ' Si no tenemos"; -if (_devmodel.length()<3) { -RDebugUtils.currentLine=10682379; - //BA.debugLineNum = 10682379;BA.debugLine="Dim s As String = File.ReadString(File.DirIntern"; + }else if(_devmodel.length()<3) { + //BA.debugLineNum = 31;BA.debugLine="Dim s As String = File.ReadString(File.DirIntern"; _s = anywheresoftware.b4a.keywords.Common.File.ReadString(anywheresoftware.b4a.keywords.Common.File.getDirInternal(),"phnId.txt"); -RDebugUtils.currentLine=10682380; - //BA.debugLineNum = 10682380;BA.debugLine="devModel = s"; + //BA.debugLineNum = 32;BA.debugLine="devModel = s"; _devmodel = _s; - }} -; -RDebugUtils.currentLine=10682384; - //BA.debugLineNum = 10682384;BA.debugLine="Return devModel"; + }; + //BA.debugLineNum = 36;BA.debugLine="Return devModel"; if (true) return _devmodel; -RDebugUtils.currentLine=10682385; - //BA.debugLineNum = 10682385;BA.debugLine="End Sub"; + //BA.debugLineNum = 37;BA.debugLine="End Sub"; return ""; } public static String _getssid(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "getssid", false)) - {return ((String) Debug.delegate(null, "getssid", new Object[] {_ba}));} -RDebugUtils.currentLine=11534336; - //BA.debugLineNum = 11534336;BA.debugLine="Sub getSSID 'ignore"; -RDebugUtils.currentLine=11534341; - //BA.debugLineNum = 11534341;BA.debugLine="End Sub"; + //BA.debugLineNum = 286;BA.debugLine="Sub getSSID 'ignore"; + //BA.debugLineNum = 291;BA.debugLine="End Sub"; +return ""; +} +public static String _guardaclientehorainicio(anywheresoftware.b4a.BA _ba,String _cliente) throws Exception{ + //BA.debugLineNum = 1202;BA.debugLine="Sub guardaClienteHoraInicio(cliente As String)"; + //BA.debugLineNum = 1203;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert into"; +mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into PEDIDO_INICIO_FINAL(PIF_CLIENTE, PIF_HORA_INICIO, PIF_HORA_FINAL) VALUES(?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cliente),(Object)(anywheresoftware.b4a.keywords.Common.DateTime.getNow()),(Object)(0)})); + //BA.debugLineNum = 1205;BA.debugLine="End Sub"; return ""; } public static String _guardainfoenarchivo(anywheresoftware.b4a.BA _ba,String _coords) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "guardainfoenarchivo", false)) - {return ((String) Debug.delegate(null, "guardainfoenarchivo", new Object[] {_ba,_coords}));} String _origformat = ""; String _lastupdate = ""; String _ubic = ""; anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper _out = null; String _s = ""; byte[] _t = null; -RDebugUtils.currentLine=11075584; - //BA.debugLineNum = 11075584;BA.debugLine="Sub guardaInfoEnArchivo(coords As String) 'ignore"; -RDebugUtils.currentLine=11075586; - //BA.debugLineNum = 11075586;BA.debugLine="Dim OrigFormat As String=DateTime.DateFormat 'sa"; + //BA.debugLineNum = 102;BA.debugLine="Sub guardaInfoEnArchivo(coords As String) 'ignore"; + //BA.debugLineNum = 104;BA.debugLine="Dim OrigFormat As String=DateTime.DateFormat 'sa"; _origformat = anywheresoftware.b4a.keywords.Common.DateTime.getDateFormat(); -RDebugUtils.currentLine=11075587; - //BA.debugLineNum = 11075587;BA.debugLine="DateTime.DateFormat=\"MMM-dd HH:mm:ss\""; + //BA.debugLineNum = 105;BA.debugLine="DateTime.DateFormat=\"MMM-dd HH:mm:ss\""; anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat("MMM-dd HH:mm:ss"); -RDebugUtils.currentLine=11075588; - //BA.debugLineNum = 11075588;BA.debugLine="Dim lastUpdate As String=DateTime.Date(DateTime.N"; + //BA.debugLineNum = 106;BA.debugLine="Dim lastUpdate As String=DateTime.Date(DateTime.N"; _lastupdate = anywheresoftware.b4a.keywords.Common.DateTime.Date(anywheresoftware.b4a.keywords.Common.DateTime.getNow()); -RDebugUtils.currentLine=11075589; - //BA.debugLineNum = 11075589;BA.debugLine="DateTime.DateFormat=OrigFormat 'return to orig d"; + //BA.debugLineNum = 107;BA.debugLine="DateTime.DateFormat=OrigFormat 'return to orig d"; anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat(_origformat); -RDebugUtils.currentLine=11075591; - //BA.debugLineNum = 11075591;BA.debugLine="Dim ubic As String = coords&\",\"&lastUpdate"; + //BA.debugLineNum = 109;BA.debugLine="Dim ubic As String = coords&\",\"&lastUpdate"; _ubic = _coords+","+_lastupdate; -RDebugUtils.currentLine=11075592; - //BA.debugLineNum = 11075592;BA.debugLine="Dim out As OutputStream = File.OpenOutput(File.Di"; + //BA.debugLineNum = 110;BA.debugLine="Dim out As OutputStream = File.OpenOutput(File.Di"; _out = new anywheresoftware.b4a.objects.streams.File.OutputStreamWrapper(); _out = anywheresoftware.b4a.keywords.Common.File.OpenOutput(anywheresoftware.b4a.keywords.Common.File.getDirRootExternal(),"gps.txt",anywheresoftware.b4a.keywords.Common.True); -RDebugUtils.currentLine=11075593; - //BA.debugLineNum = 11075593;BA.debugLine="Dim s As String = ubic & CRLF"; + //BA.debugLineNum = 111;BA.debugLine="Dim s As String = ubic & CRLF"; _s = _ubic+anywheresoftware.b4a.keywords.Common.CRLF; -RDebugUtils.currentLine=11075594; - //BA.debugLineNum = 11075594;BA.debugLine="Dim t() As Byte = s.GetBytes(\"UTF-8\")"; + //BA.debugLineNum = 112;BA.debugLine="Dim t() As Byte = s.GetBytes(\"UTF-8\")"; _t = _s.getBytes("UTF-8"); -RDebugUtils.currentLine=11075595; - //BA.debugLineNum = 11075595;BA.debugLine="out.WriteBytes(t, 0, t.Length)"; + //BA.debugLineNum = 113;BA.debugLine="out.WriteBytes(t, 0, t.Length)"; _out.WriteBytes(_t,(int) (0),_t.length); -RDebugUtils.currentLine=11075596; - //BA.debugLineNum = 11075596;BA.debugLine="out.Close"; + //BA.debugLineNum = 114;BA.debugLine="out.Close"; _out.Close(); -RDebugUtils.currentLine=11075597; - //BA.debugLineNum = 11075597;BA.debugLine="End Sub"; + //BA.debugLineNum = 115;BA.debugLine="End Sub"; return ""; } public static String _guardainfoenbd(anywheresoftware.b4a.BA _ba,String _coords) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "guardainfoenbd", false)) - {return ((String) Debug.delegate(null, "guardainfoenbd", new Object[] {_ba,_coords}));} String[] _latlon = null; -RDebugUtils.currentLine=11141120; - //BA.debugLineNum = 11141120;BA.debugLine="Sub guardaInfoEnBD(coords As String) 'ignore"; -RDebugUtils.currentLine=11141121; - //BA.debugLineNum = 11141121;BA.debugLine="Log(\"Guardamos ubicacion en BD - \"&coords)"; -anywheresoftware.b4a.keywords.Common.LogImpl("311141121","Guardamos ubicacion en BD - "+_coords,0); -RDebugUtils.currentLine=11141122; - //BA.debugLineNum = 11141122;BA.debugLine="Try"; -try {RDebugUtils.currentLine=11141123; - //BA.debugLineNum = 11141123;BA.debugLine="Dim latlon() As String = Regex.Split(\"\\|\", coord"; + //BA.debugLineNum = 118;BA.debugLine="Sub guardaInfoEnBD(coords As String) 'ignore"; + //BA.debugLineNum = 119;BA.debugLine="Log(\"Guardamos ubicacion en BD - \"&coords)"; +anywheresoftware.b4a.keywords.Common.LogImpl("347448065","Guardamos ubicacion en BD - "+_coords,0); + //BA.debugLineNum = 120;BA.debugLine="Try"; +try { //BA.debugLineNum = 121;BA.debugLine="Dim latlon() As String = Regex.Split(\"\\|\", coord"; _latlon = anywheresoftware.b4a.keywords.Common.Regex.Split("\\|",_coords); -RDebugUtils.currentLine=11141124; - //BA.debugLineNum = 11141124;BA.debugLine="If latlon.Length < 2 Then latlon = Regex.Split(\""; + //BA.debugLineNum = 122;BA.debugLine="If latlon.Length < 2 Then latlon = Regex.Split(\""; if (_latlon.length<2) { _latlon = anywheresoftware.b4a.keywords.Common.Regex.Split(",",_coords);}; -RDebugUtils.currentLine=11141125; - //BA.debugLineNum = 11141125;BA.debugLine="If subsLogs Then Log(\"LatLon=\"&latlon)"; + //BA.debugLineNum = 123;BA.debugLine="If subsLogs Then Log(\"LatLon=\"&latlon)"; if (_subslogs) { -anywheresoftware.b4a.keywords.Common.LogImpl("311141125","LatLon="+BA.ObjectToString(_latlon),0);}; -RDebugUtils.currentLine=11141126; - //BA.debugLineNum = 11141126;BA.debugLine="kmt.ExecNonQuery2(\"INSERT INTO RUTA_GPS(FECHA, L"; +anywheresoftware.b4a.keywords.Common.LogImpl("347448069","LatLon="+BA.ObjectToString(_latlon),0);}; + //BA.debugLineNum = 124;BA.debugLine="kmt.ExecNonQuery2(\"INSERT INTO RUTA_GPS(FECHA, L"; _kmt.ExecNonQuery2("INSERT INTO RUTA_GPS(FECHA, LAT, LON) VALUES (?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_latlon[(int) (2)]),(Object)(_latlon[(int) (0)]),(Object)(_latlon[(int) (1)])})); } catch (Exception e8) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e8);RDebugUtils.currentLine=11141128; - //BA.debugLineNum = 11141128;BA.debugLine="LogColor(LastException, Colors.red)"; -anywheresoftware.b4a.keywords.Common.LogImpl("311141128",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e8); //BA.debugLineNum = 126;BA.debugLine="LogColor(LastException, Colors.red)"; +anywheresoftware.b4a.keywords.Common.LogImpl("347448072",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); }; -RDebugUtils.currentLine=11141130; - //BA.debugLineNum = 11141130;BA.debugLine="End Sub"; + //BA.debugLineNum = 128;BA.debugLine="End Sub"; return ""; } public static String _guardaproducto(anywheresoftware.b4a.BA _ba,String _cedis,String _costou,String _cant,String _nombre,String _prodid,String _clienteid,String _fecha,String _usuario,String _rutav,String _preciosin,String _tipoventa) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "guardaproducto", false)) - {return ((String) Debug.delegate(null, "guardaproducto", new Object[] {_ba,_cedis,_costou,_cant,_nombre,_prodid,_clienteid,_fecha,_usuario,_rutav,_preciosin,_tipoventa}));} anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; -RDebugUtils.currentLine=13500416; - //BA.debugLineNum = 13500416;BA.debugLine="Sub guardaProducto(cedis As String, costoU As Stri"; -RDebugUtils.currentLine=13500417; - //BA.debugLineNum = 13500417;BA.debugLine="LogColor(\"guardaProducto: \"&prodId&\", cant=\"&cant"; -anywheresoftware.b4a.keywords.Common.LogImpl("313500417","guardaProducto: "+_prodid+", cant="+_cant,anywheresoftware.b4a.keywords.Common.Colors.Magenta); -RDebugUtils.currentLine=13500418; - //BA.debugLineNum = 13500418;BA.debugLine="Private c As Cursor"; + //BA.debugLineNum = 765;BA.debugLine="Sub guardaProducto(cedis As String, costoU As Stri"; + //BA.debugLineNum = 766;BA.debugLine="LogColor(\"guardaProducto: \"&prodId&\", cant=\"&cant"; +anywheresoftware.b4a.keywords.Common.LogImpl("349807361","guardaProducto: "+_prodid+", cant="+_cant,anywheresoftware.b4a.keywords.Common.Colors.Magenta); + //BA.debugLineNum = 767;BA.debugLine="Private c As Cursor"; _c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=13500419; - //BA.debugLineNum = 13500419;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; + //BA.debugLineNum = 768;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_COSTO_SIN,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cedis),(Object)(((double)(Double.parseDouble(_cant))*(double)(Double.parseDouble(_costou)))),(Object)(_costou),(Object)(_cant),(Object)(_nombre),(Object)(_prodid),(Object)(_clienteid),(Object)(_fecha),(Object)(_usuario),(Object)(_rutav),(Object)(_preciosin),(Object)(_tipoventa)})); -RDebugUtils.currentLine=13500420; - //BA.debugLineNum = 13500420;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat_"; + //BA.debugLineNum = 769;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat_"; mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cant),(Object)(_prodid)})); -RDebugUtils.currentLine=13500421; - //BA.debugLineNum = 13500421;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(pe"; + //BA.debugLineNum = 770;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(pe"; _c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, SUM(PE_COSTO_SIN) AS TOTAL_CLIE_SIN FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); -RDebugUtils.currentLine=13500422; - //BA.debugLineNum = 13500422;BA.debugLine="c.Position=0"; + //BA.debugLineNum = 771;BA.debugLine="c.Position=0"; _c.setPosition((int) (0)); -RDebugUtils.currentLine=13500423; - //BA.debugLineNum = 13500423;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; + //BA.debugLineNum = 772;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=13500424; - //BA.debugLineNum = 13500424;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert into"; + //BA.debugLineNum = 773;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert into"; mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT,PC_ALMACEN,PC_RUTA,PC_COSTO_SIN) VALUES (?,?,?,?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_clienteid),(Object)(_fecha),(Object)(_usuario),(Object)(_c.GetString("CANT_CLIE")),(Object)(_c.GetString("TOTAL_CLIE")),(Object)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._lon_gps /*String*/ ),(Object)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._lat_gps /*String*/ ),(Object)(_cedis),(Object)(_c.GetString("TOTAL_CLIE_SIN"))})); -RDebugUtils.currentLine=13500425; - //BA.debugLineNum = 13500425;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_i"; + //BA.debugLineNum = 774;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"UPDATE kmt_i"; mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("UPDATE kmt_info set gestion = 2 where CAT_CL_CODIGO In (select cuenta from cuentaa)"); -RDebugUtils.currentLine=13500426; - //BA.debugLineNum = 13500426;BA.debugLine="End Sub"; + //BA.debugLineNum = 775;BA.debugLine="End Sub"; +return ""; +} +public static String _guardaproductosingestion(anywheresoftware.b4a.BA _ba,String _cedis,String _costou,String _cant,String _nombre,String _prodid,String _clienteid,String _fecha,String _usuario,String _rutav,String _preciosin,String _tipoventa) throws Exception{ +anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; + //BA.debugLineNum = 780;BA.debugLine="Sub guardaProductoSinGestion(cedis As String, cost"; + //BA.debugLineNum = 781;BA.debugLine="LogColor(\"guardaProductoSinGestion: \"&prodId&\", c"; +anywheresoftware.b4a.keywords.Common.LogImpl("349872897","guardaProductoSinGestion: "+_prodid+", cant="+_cant,anywheresoftware.b4a.keywords.Common.Colors.Magenta); + //BA.debugLineNum = 782;BA.debugLine="Private c As Cursor"; +_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); + //BA.debugLineNum = 783;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INTO"; +mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO PEDIDO (PE_CEDIS,PE_COSTO_TOT,PE_COSTOU,PE_CANT,PE_PRONOMBRE,PE_PROID,PE_CLIENTE,PE_FECHA,PE_USUARIO,PE_RUTA,PE_COSTO_SIN,PE_FOLIO) VALUES(?,?,?,?,?,?,?,?,?,?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cedis),(Object)(((double)(Double.parseDouble(_cant))*(double)(Double.parseDouble(_costou)))),(Object)(_costou),(Object)(_cant),(Object)(_nombre),(Object)(_prodid),(Object)(_clienteid),(Object)(_fecha),(Object)(_usuario),(Object)(_rutav),(Object)(_preciosin),(Object)(_tipoventa)})); + //BA.debugLineNum = 784;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"update cat_"; +mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("update cat_gunaprod set cat_gp_almacen = cat_gp_almacen - ? where cat_gp_id = ? ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_cant),(Object)(_prodid)})); + //BA.debugLineNum = 785;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select sum(pe"; +_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select sum(pe_costo_tot) as TOTAL_CLIE, SUM(PE_CANT) AS CANT_CLIE, SUM(PE_COSTO_SIN) AS TOTAL_CLIE_SIN FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa)"))); + //BA.debugLineNum = 786;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 787;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"delete from"; +mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("delete from pedido_cliente where PC_CLIENTE In (select cuenta from cuentaa)"); + //BA.debugLineNum = 788;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"insert into"; +mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("insert into pedido_cliente(PC_CLIENTE, PC_FECHA, PC_USER, PC_NOART, PC_MONTO,PC_LON, PC_LAT,PC_ALMACEN,PC_RUTA,PC_COSTO_SIN) VALUES (?,?,?,?,?,?,?,?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_clienteid),(Object)(_fecha),(Object)(_usuario),(Object)(_c.GetString("CANT_CLIE")),(Object)(_c.GetString("TOTAL_CLIE")),(Object)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._lon_gps /*String*/ ),(Object)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._lat_gps /*String*/ ),(Object)(_cedis),(Object)(_c.GetString("TOTAL_CLIE_SIN"))})); + //BA.debugLineNum = 789;BA.debugLine="End Sub"; return ""; } public static boolean _haypedido(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "haypedido", false)) - {return ((Boolean) Debug.delegate(null, "haypedido", new Object[] {_ba}));} anywheresoftware.b4a.sql.SQL.CursorWrapper _thisc = null; boolean _hay = false; -RDebugUtils.currentLine=14811136; - //BA.debugLineNum = 14811136;BA.debugLine="Sub hayPedido As Boolean"; -RDebugUtils.currentLine=14811137; - //BA.debugLineNum = 14811137;BA.debugLine="Private thisC As Cursor=B4XPages.MainPage.skmt.Ex"; + //BA.debugLineNum = 1269;BA.debugLine="Sub hayPedido As Boolean"; + //BA.debugLineNum = 1270;BA.debugLine="Private thisC As Cursor=B4XPages.MainPage.skmt.Ex"; _thisc = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); _thisc = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select count(PE_CLIENTE) as hayPedido from PEDIDO where PE_CLIENTE = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_traecliente(_ba)))+"'")))); -RDebugUtils.currentLine=14811138; - //BA.debugLineNum = 14811138;BA.debugLine="thisC.Position=0"; + //BA.debugLineNum = 1271;BA.debugLine="thisC.Position=0"; _thisc.setPosition((int) (0)); -RDebugUtils.currentLine=14811139; - //BA.debugLineNum = 14811139;BA.debugLine="Private hay As Boolean = False"; + //BA.debugLineNum = 1272;BA.debugLine="Private hay As Boolean = False"; _hay = anywheresoftware.b4a.keywords.Common.False; -RDebugUtils.currentLine=14811140; - //BA.debugLineNum = 14811140;BA.debugLine="If thisC.GetInt(\"hayPedido\") > 0 Then hay = True"; + //BA.debugLineNum = 1273;BA.debugLine="If thisC.GetInt(\"hayPedido\") > 0 Then hay = True"; if (_thisc.GetInt("hayPedido")>0) { _hay = anywheresoftware.b4a.keywords.Common.True;}; -RDebugUtils.currentLine=14811142; - //BA.debugLineNum = 14811142;BA.debugLine="Return hay"; + //BA.debugLineNum = 1275;BA.debugLine="Return hay"; if (true) return _hay; -RDebugUtils.currentLine=14811143; - //BA.debugLineNum = 14811143;BA.debugLine="End Sub"; + //BA.debugLineNum = 1276;BA.debugLine="End Sub"; return false; } +public static String _iniciaactividad(anywheresoftware.b4a.BA _ba,String _ia) throws Exception{ + //BA.debugLineNum = 1359;BA.debugLine="Sub iniciaActividad(ia As String)"; + //BA.debugLineNum = 1360;BA.debugLine="If ia <> \"\" And ia <> Null Then"; +if ((_ia).equals("") == false && _ia!= null) { + //BA.debugLineNum = 1362;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"delete fro"; +mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("delete from CAT_VARIABLES where CAT_VA_DESCRIPCION = ?",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("ULTIMOMODULO")})); + //BA.debugLineNum = 1363;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; +mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO CAT_VARIABLES(CAT_VA_DESCRIPCION, CAT_VA_VALOR) VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)("ULTIMOMODULO"),(Object)(_ia)})); + //BA.debugLineNum = 1364;BA.debugLine="B4XPages.ShowPage(ia)"; +mostCurrent._b4xpages._showpage /*String*/ (_ba,_ia); + }; + //BA.debugLineNum = 1367;BA.debugLine="End Sub"; +return ""; +} public static String _insertarenglonespruebaenerrorlog(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "insertarenglonespruebaenerrorlog", false)) - {return ((String) Debug.delegate(null, "insertarenglonespruebaenerrorlog", new Object[] {_ba}));} int _x = 0; -RDebugUtils.currentLine=12320768; - //BA.debugLineNum = 12320768;BA.debugLine="Sub insertaRenglonesPruebaEnErrorLog 'ignore"; -RDebugUtils.currentLine=12320769; - //BA.debugLineNum = 12320769;BA.debugLine="revisaBD"; + //BA.debugLineNum = 513;BA.debugLine="Sub insertaRenglonesPruebaEnErrorLog 'ignore"; + //BA.debugLineNum = 514;BA.debugLine="revisaBD"; _revisabd(_ba); -RDebugUtils.currentLine=12320770; - //BA.debugLineNum = 12320770;BA.debugLine="Log(\"insertamos 50 renglones a errorLog\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("312320770","insertamos 50 renglones a errorLog",0); -RDebugUtils.currentLine=12320771; - //BA.debugLineNum = 12320771;BA.debugLine="For x = 1 To 50"; + //BA.debugLineNum = 515;BA.debugLine="Log(\"insertamos 50 renglones a errorLog\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("348627714","insertamos 50 renglones a errorLog",0); + //BA.debugLineNum = 516;BA.debugLine="For x = 1 To 50"; { final int step3 = 1; final int limit3 = (int) (50); _x = (int) (1) ; for (;_x <= limit3 ;_x = _x + step3 ) { -RDebugUtils.currentLine=12320772; - //BA.debugLineNum = 12320772;BA.debugLine="errorLog.ExecNonQuery2(\"INSERT INTO errores(fech"; + //BA.debugLineNum = 517;BA.debugLine="errorLog.ExecNonQuery2(\"INSERT INTO errores(fech"; _errorlog.ExecNonQuery2("INSERT INTO errores(fecha, error) VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_fechakmt(_ba,BA.NumberToString(anywheresoftware.b4a.keywords.Common.DateTime.getNow()))),(Object)("abc")})); -RDebugUtils.currentLine=12320773; - //BA.debugLineNum = 12320773;BA.debugLine="Log(x)"; -anywheresoftware.b4a.keywords.Common.LogImpl("312320773",BA.NumberToString(_x),0); + //BA.debugLineNum = 518;BA.debugLine="Log(x)"; +anywheresoftware.b4a.keywords.Common.LogImpl("348627717",BA.NumberToString(_x),0); } }; -RDebugUtils.currentLine=12320775; - //BA.debugLineNum = 12320775;BA.debugLine="End Sub"; + //BA.debugLineNum = 520;BA.debugLine="End Sub"; return ""; } public static String _installapk(anywheresoftware.b4a.BA _ba,String _dir,String _apk) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "installapk", false)) - {return ((String) Debug.delegate(null, "installapk", new Object[] {_ba,_dir,_apk}));} anywheresoftware.b4a.objects.IntentWrapper _i = null; -RDebugUtils.currentLine=12517376; - //BA.debugLineNum = 12517376;BA.debugLine="Sub InstallAPK(dir As String, apk As String) 'igno"; -RDebugUtils.currentLine=12517377; - //BA.debugLineNum = 12517377;BA.debugLine="If File.Exists(dir, apk) Then"; + //BA.debugLineNum = 575;BA.debugLine="Sub InstallAPK(dir As String, apk As String) 'igno"; + //BA.debugLineNum = 576;BA.debugLine="If File.Exists(dir, apk) Then"; if (anywheresoftware.b4a.keywords.Common.File.Exists(_dir,_apk)) { -RDebugUtils.currentLine=12517378; - //BA.debugLineNum = 12517378;BA.debugLine="Dim i As Intent"; + //BA.debugLineNum = 577;BA.debugLine="Dim i As Intent"; _i = new anywheresoftware.b4a.objects.IntentWrapper(); -RDebugUtils.currentLine=12517379; - //BA.debugLineNum = 12517379;BA.debugLine="i.Initialize(i.ACTION_VIEW, \"file://\" & File.Com"; + //BA.debugLineNum = 578;BA.debugLine="i.Initialize(i.ACTION_VIEW, \"file://\" & File.Com"; _i.Initialize(_i.ACTION_VIEW,"file://"+anywheresoftware.b4a.keywords.Common.File.Combine(_dir,_apk)); -RDebugUtils.currentLine=12517380; - //BA.debugLineNum = 12517380;BA.debugLine="i.SetType(\"application/vnd.android.package-archi"; + //BA.debugLineNum = 579;BA.debugLine="i.SetType(\"application/vnd.android.package-archi"; _i.SetType("application/vnd.android.package-archive"); -RDebugUtils.currentLine=12517381; - //BA.debugLineNum = 12517381;BA.debugLine="StartActivity(i)"; + //BA.debugLineNum = 580;BA.debugLine="StartActivity(i)"; anywheresoftware.b4a.keywords.Common.StartActivity((_ba.processBA == null ? _ba : _ba.processBA),(Object)(_i.getObject())); }; -RDebugUtils.currentLine=12517383; - //BA.debugLineNum = 12517383;BA.debugLine="End Sub"; + //BA.debugLineNum = 582;BA.debugLine="End Sub"; return ""; } public static anywheresoftware.b4a.objects.collections.Map _json2map(anywheresoftware.b4a.BA _ba,String _thejson) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "json2map", false)) - {return ((anywheresoftware.b4a.objects.collections.Map) Debug.delegate(null, "json2map", new Object[] {_ba,_thejson}));} anywheresoftware.b4a.objects.collections.JSONParser _json = null; anywheresoftware.b4a.objects.collections.Map _m = null; -RDebugUtils.currentLine=11599872; - //BA.debugLineNum = 11599872;BA.debugLine="Sub JSON2Map(theJson As String) As Map 'ignore"; -RDebugUtils.currentLine=11599874; - //BA.debugLineNum = 11599874;BA.debugLine="Try"; -try {RDebugUtils.currentLine=11599875; - //BA.debugLineNum = 11599875;BA.debugLine="Private json As JSONParser"; + //BA.debugLineNum = 294;BA.debugLine="Sub JSON2Map(theJson As String) As Map 'ignore"; + //BA.debugLineNum = 296;BA.debugLine="Try"; +try { //BA.debugLineNum = 297;BA.debugLine="Private json As JSONParser"; _json = new anywheresoftware.b4a.objects.collections.JSONParser(); -RDebugUtils.currentLine=11599876; - //BA.debugLineNum = 11599876;BA.debugLine="json.Initialize(theJson)"; + //BA.debugLineNum = 298;BA.debugLine="json.Initialize(theJson)"; _json.Initialize(_thejson); -RDebugUtils.currentLine=11599877; - //BA.debugLineNum = 11599877;BA.debugLine="Return json.NextObject"; + //BA.debugLineNum = 299;BA.debugLine="Return json.NextObject"; if (true) return _json.NextObject(); } catch (Exception e6) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e6);RDebugUtils.currentLine=11599879; - //BA.debugLineNum = 11599879;BA.debugLine="Log(LastException)"; -anywheresoftware.b4a.keywords.Common.LogImpl("311599879",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),0); -RDebugUtils.currentLine=11599880; - //BA.debugLineNum = 11599880;BA.debugLine="log2DB(\"JSON2Map: \"&LastException)"; + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e6); //BA.debugLineNum = 301;BA.debugLine="Log(LastException)"; +anywheresoftware.b4a.keywords.Common.LogImpl("347906823",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),0); + //BA.debugLineNum = 302;BA.debugLine="log2DB(\"JSON2Map: \"&LastException)"; _log2db(_ba,"JSON2Map: "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba))); -RDebugUtils.currentLine=11599881; - //BA.debugLineNum = 11599881;BA.debugLine="Private m As Map = CreateMap(\"title\":\"Error gene"; + //BA.debugLineNum = 303;BA.debugLine="Private m As Map = CreateMap(\"title\":\"Error gene"; _m = new anywheresoftware.b4a.objects.collections.Map(); _m = anywheresoftware.b4a.keywords.Common.createMap(new Object[] {(Object)("title"),(Object)("Error generating JSON"),(Object)("t"),(Object)("Error"),(Object)("Message"),(Object)(anywheresoftware.b4a.keywords.Common.LastException(_ba).getObject()),(Object)("text"),(Object)(anywheresoftware.b4a.keywords.Common.LastException(_ba).getObject())}); -RDebugUtils.currentLine=11599882; - //BA.debugLineNum = 11599882;BA.debugLine="Return m"; + //BA.debugLineNum = 304;BA.debugLine="Return m"; if (true) return _m; }; -RDebugUtils.currentLine=11599884; - //BA.debugLineNum = 11599884;BA.debugLine="End Sub"; + //BA.debugLineNum = 306;BA.debugLine="End Sub"; return null; } public static String _log2db(anywheresoftware.b4a.BA _ba,String _texto) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "log2db", false)) - {return ((String) Debug.delegate(null, "log2db", new Object[] {_ba,_texto}));} -RDebugUtils.currentLine=11796480; - //BA.debugLineNum = 11796480;BA.debugLine="Sub log2DB(texto As String) 'ignore"; -RDebugUtils.currentLine=11796481; - //BA.debugLineNum = 11796481;BA.debugLine="LogColor(fechaKMT(DateTime.Now)&\" - log2BD: '\"&te"; -anywheresoftware.b4a.keywords.Common.LogImpl("311796481",_fechakmt(_ba,BA.NumberToString(anywheresoftware.b4a.keywords.Common.DateTime.getNow()))+" - log2BD: '"+_texto+"'",anywheresoftware.b4a.keywords.Common.Colors.LightGray); -RDebugUtils.currentLine=11796482; - //BA.debugLineNum = 11796482;BA.debugLine="kmt.ExecNonQuery2(\"INSERT INTO bitacora(fecha, te"; + //BA.debugLineNum = 348;BA.debugLine="Sub log2DB(texto As String) 'ignore"; + //BA.debugLineNum = 349;BA.debugLine="LogColor(fechaKMT(DateTime.Now)&\" - log2BD: '\"&te"; +anywheresoftware.b4a.keywords.Common.LogImpl("348103425",_fechakmt(_ba,BA.NumberToString(anywheresoftware.b4a.keywords.Common.DateTime.getNow()))+" - log2BD: '"+_texto+"'",anywheresoftware.b4a.keywords.Common.Colors.LightGray); + //BA.debugLineNum = 350;BA.debugLine="kmt.ExecNonQuery2(\"INSERT INTO bitacora(fecha, te"; _kmt.ExecNonQuery2("INSERT INTO bitacora(fecha, texto) VALUES (?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_fechakmt(_ba,BA.NumberToString(anywheresoftware.b4a.keywords.Common.DateTime.getNow()))),(Object)(_texto)})); -RDebugUtils.currentLine=11796483; - //BA.debugLineNum = 11796483;BA.debugLine="End Sub"; + //BA.debugLineNum = 351;BA.debugLine="End Sub"; return ""; } public static String _map2json(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.collections.Map _m) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "map2json", false)) - {return ((String) Debug.delegate(null, "map2json", new Object[] {_ba,_m}));} anywheresoftware.b4a.objects.collections.JSONParser.JSONGenerator _jg = null; String _t = ""; -RDebugUtils.currentLine=11665408; - //BA.debugLineNum = 11665408;BA.debugLine="Sub map2JSON(m As Map) As String 'ignore"; -RDebugUtils.currentLine=11665411; - //BA.debugLineNum = 11665411;BA.debugLine="Dim jg As JSONGenerator"; + //BA.debugLineNum = 309;BA.debugLine="Sub map2JSON(m As Map) As String 'ignore"; + //BA.debugLineNum = 312;BA.debugLine="Dim jg As JSONGenerator"; _jg = new anywheresoftware.b4a.objects.collections.JSONParser.JSONGenerator(); -RDebugUtils.currentLine=11665412; - //BA.debugLineNum = 11665412;BA.debugLine="jg.Initialize(m)"; + //BA.debugLineNum = 313;BA.debugLine="jg.Initialize(m)"; _jg.Initialize(_m); -RDebugUtils.currentLine=11665413; - //BA.debugLineNum = 11665413;BA.debugLine="Dim t As String = jg.ToString"; + //BA.debugLineNum = 314;BA.debugLine="Dim t As String = jg.ToString"; _t = _jg.ToString(); -RDebugUtils.currentLine=11665414; - //BA.debugLineNum = 11665414;BA.debugLine="Return t"; + //BA.debugLineNum = 315;BA.debugLine="Return t"; if (true) return _t; -RDebugUtils.currentLine=11665415; - //BA.debugLineNum = 11665415;BA.debugLine="End Sub"; + //BA.debugLineNum = 316;BA.debugLine="End Sub"; return ""; } public static boolean _masdexxmins(anywheresoftware.b4a.BA _ba,int _hora,int _mins) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "masdexxmins", false)) - {return ((Boolean) Debug.delegate(null, "masdexxmins", new Object[] {_ba,_hora,_mins}));} -RDebugUtils.currentLine=11862016; - //BA.debugLineNum = 11862016;BA.debugLine="Sub masDeXXMins(hora As Int, mins As Int) As Boole"; -RDebugUtils.currentLine=11862017; - //BA.debugLineNum = 11862017;BA.debugLine="If (hora + mins * DateTime.TicksPerMinute) < Date"; + //BA.debugLineNum = 354;BA.debugLine="Sub masDeXXMins(hora As Int, mins As Int) As Boole"; + //BA.debugLineNum = 355;BA.debugLine="If (hora + mins * DateTime.TicksPerMinute) < Date"; if ((_hora+_mins*anywheresoftware.b4a.keywords.Common.DateTime.TicksPerMinute) 0 Then"; +if (_g.getRowCount()>0) { + //BA.debugLineNum = 1261;BA.debugLine="g.Position=0"; +_g.setPosition((int) (0)); + //BA.debugLineNum = 1262;BA.debugLine="If g.GetString(\"gestion\") = \"2\" Then guardado ="; +if ((_g.GetString("gestion")).equals("2")) { +_guardado = anywheresoftware.b4a.keywords.Common.True;}; + }; + //BA.debugLineNum = 1264;BA.debugLine="Log($\"Guardado=${guardado}\"$)"; +anywheresoftware.b4a.keywords.Common.LogImpl("351052551",("Guardado="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_guardado))+""),0); + //BA.debugLineNum = 1265;BA.debugLine="Return guardado"; +if (true) return _guardado; + //BA.debugLineNum = 1266;BA.debugLine="End Sub"; +return false; +} public static anywheresoftware.b4a.objects.collections.Map _procesapromocion(anywheresoftware.b4a.BA _ba,String _idpromo,String _cliente) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "procesapromocion", false)) - {return ((anywheresoftware.b4a.objects.collections.Map) Debug.delegate(null, "procesapromocion", new Object[] {_ba,_idpromo,_cliente}));} boolean _thislog = false; String _iniciocontador = ""; anywheresoftware.b4a.objects.collections.Map _pm = null; anywheresoftware.b4a.objects.collections.Map _inventariosinfijos = null; boolean _pv = false; -RDebugUtils.currentLine=14090240; - //BA.debugLineNum = 14090240;BA.debugLine="Sub procesaPromocion(idPromo As String, cliente As"; -RDebugUtils.currentLine=14090241; - //BA.debugLineNum = 14090241;BA.debugLine="Private thisLog As Boolean = False 'Si es verdad"; + //BA.debugLineNum = 1002;BA.debugLine="Sub procesaPromocion(idPromo As String, cliente As"; + //BA.debugLineNum = 1003;BA.debugLine="Private thisLog As Boolean = False 'Si es verdad"; _thislog = anywheresoftware.b4a.keywords.Common.False; -RDebugUtils.currentLine=14090242; - //BA.debugLineNum = 14090242;BA.debugLine="Private inicioContador As String = DateTime.Now"; + //BA.debugLineNum = 1004;BA.debugLine="Private inicioContador As String = DateTime.Now"; _iniciocontador = BA.NumberToString(anywheresoftware.b4a.keywords.Common.DateTime.getNow()); -RDebugUtils.currentLine=14090243; - //BA.debugLineNum = 14090243;BA.debugLine="If thisLog Then LogColor($\"********* Iniciamos re"; + //BA.debugLineNum = 1005;BA.debugLine="If thisLog Then LogColor($\"********* Iniciamos re"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314090243",("********* Iniciamos revision de Promo "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idpromo))+" *********"),anywheresoftware.b4a.keywords.Common.Colors.Magenta);}; -RDebugUtils.currentLine=14090245; - //BA.debugLineNum = 14090245;BA.debugLine="Private pm As Map = traePromo(idPromo, cliente)"; +anywheresoftware.b4a.keywords.Common.LogImpl("350397187",("********* Iniciamos revision de Promo "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idpromo))+" *********"),anywheresoftware.b4a.keywords.Common.Colors.Magenta);}; + //BA.debugLineNum = 1007;BA.debugLine="Private pm As Map = traePromo(idPromo, cliente)"; _pm = new anywheresoftware.b4a.objects.collections.Map(); _pm = _traepromo(_ba,_idpromo,_cliente); -RDebugUtils.currentLine=14090246; - //BA.debugLineNum = 14090246;BA.debugLine="If thisLog Then LogColor(pm, Colors.Blue)"; + //BA.debugLineNum = 1008;BA.debugLine="If thisLog Then LogColor(pm, Colors.Blue)"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314090246",BA.ObjectToString(_pm),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; -RDebugUtils.currentLine=14090247; - //BA.debugLineNum = 14090247;BA.debugLine="If pm.Get(\"resultado\") = \"ok\" Then 'Si encontramo"; +anywheresoftware.b4a.keywords.Common.LogImpl("350397190",BA.ObjectToString(_pm),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; + //BA.debugLineNum = 1009;BA.debugLine="If pm.Get(\"resultado\") = \"ok\" Then 'Si encontramo"; if ((_pm.Get((Object)("resultado"))).equals((Object)("ok"))) { -RDebugUtils.currentLine=14090249; - //BA.debugLineNum = 14090249;BA.debugLine="If thisLog Then LogColor($\"Promociones permitida"; + //BA.debugLineNum = 1011;BA.debugLine="If thisLog Then LogColor($\"Promociones permitida"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314090249",("Promociones permitidas="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_traemaxpromos(_ba,_pm)))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; -RDebugUtils.currentLine=14090250; - //BA.debugLineNum = 14090250;BA.debugLine="If thisLog Then Log(\"Promos vendidas: \" & traePr"; +anywheresoftware.b4a.keywords.Common.LogImpl("350397193",("Promociones permitidas="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_traemaxpromos(_ba,_pm)))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; + //BA.debugLineNum = 1012;BA.debugLine="If thisLog Then Log(\"Promos vendidas: \" & traePr"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314090250","Promos vendidas: "+BA.NumberToString(_traepromosvendidas(_ba,_idpromo,_cliente)),0);}; -RDebugUtils.currentLine=14090251; - //BA.debugLineNum = 14090251;BA.debugLine="If traePromosVendidas(idPromo, cliente) >= traeM"; +anywheresoftware.b4a.keywords.Common.LogImpl("350397194","Promos vendidas: "+BA.NumberToString(_traepromosvendidas(_ba,_idpromo,_cliente)),0);}; + //BA.debugLineNum = 1013;BA.debugLine="If traePromosVendidas(idPromo, cliente) >= traeM"; if (_traepromosvendidas(_ba,_idpromo,_cliente)>=_traemaxpromos(_ba,_pm)) { -RDebugUtils.currentLine=14090252; - //BA.debugLineNum = 14090252;BA.debugLine="If thisLog Then LogColor(\"Ya se vendieron las p"; + //BA.debugLineNum = 1014;BA.debugLine="If thisLog Then LogColor(\"Ya se vendieron las p"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314090252","Ya se vendieron las promos PERMITIDAS para el cliente",anywheresoftware.b4a.keywords.Common.Colors.Red);}; -RDebugUtils.currentLine=14090253; - //BA.debugLineNum = 14090253;BA.debugLine="Return CreateMap(\"status\":\"ko\", \"mp\":pm)"; +anywheresoftware.b4a.keywords.Common.LogImpl("350397196","Ya se vendieron las promos PERMITIDAS para el cliente",anywheresoftware.b4a.keywords.Common.Colors.Red);}; + //BA.debugLineNum = 1015;BA.debugLine="Return CreateMap(\"status\":\"ko\", \"mp\":pm)"; if (true) return anywheresoftware.b4a.keywords.Common.createMap(new Object[] {(Object)("status"),(Object)("ko"),(Object)("mp"),(Object)(_pm.getObject())}); }; -RDebugUtils.currentLine=14090256; - //BA.debugLineNum = 14090256;BA.debugLine="Private inventarioSinFijos As Map = restaFijosPr"; + //BA.debugLineNum = 1018;BA.debugLine="Private inventarioSinFijos As Map = restaFijosPr"; _inventariosinfijos = new anywheresoftware.b4a.objects.collections.Map(); _inventariosinfijos = _restafijospromo(_ba,_pm); -RDebugUtils.currentLine=14090257; - //BA.debugLineNum = 14090257;BA.debugLine="If thisLog Then LogColor(\"inventariosfijos=\"&inv"; + //BA.debugLineNum = 1019;BA.debugLine="If thisLog Then LogColor(\"inventariosfijos=\"&inv"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314090257","inventariosfijos="+BA.ObjectToString(_inventariosinfijos),anywheresoftware.b4a.keywords.Common.Colors.Green);}; -RDebugUtils.currentLine=14090259; - //BA.debugLineNum = 14090259;BA.debugLine="If inventarioSinFijos.Get(\"resultado\") = \"ok\" Th"; +anywheresoftware.b4a.keywords.Common.LogImpl("350397201","inventariosfijos="+BA.ObjectToString(_inventariosinfijos),anywheresoftware.b4a.keywords.Common.Colors.Green);}; + //BA.debugLineNum = 1021;BA.debugLine="If inventarioSinFijos.Get(\"resultado\") = \"ok\" Th"; if ((_inventariosinfijos.Get((Object)("resultado"))).equals((Object)("ok"))) { -RDebugUtils.currentLine=14090261; - //BA.debugLineNum = 14090261;BA.debugLine="Private pv As Boolean = alcanzanLosVariablesPa"; + //BA.debugLineNum = 1023;BA.debugLine="Private pv As Boolean = alcanzanLosVariablesPa"; _pv = _alcanzanlosvariablesparapromo(_ba,_pm,_inventariosinfijos); -RDebugUtils.currentLine=14090262; - //BA.debugLineNum = 14090262;BA.debugLine="If thisLog Then Log(\"Alcanzan los variables? --"; + //BA.debugLineNum = 1024;BA.debugLine="If thisLog Then Log(\"Alcanzan los variables? --"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314090262","Alcanzan los variables? --> "+BA.ObjectToString(_pv),0);}; -RDebugUtils.currentLine=14090263; - //BA.debugLineNum = 14090263;BA.debugLine="If pv Then Return CreateMap(\"status\":\"ok\", \"mp\""; +anywheresoftware.b4a.keywords.Common.LogImpl("350397206","Alcanzan los variables? --> "+BA.ObjectToString(_pv),0);}; + //BA.debugLineNum = 1025;BA.debugLine="If pv Then Return CreateMap(\"status\":\"ok\", \"mp\""; if (_pv) { if (true) return anywheresoftware.b4a.keywords.Common.createMap(new Object[] {(Object)("status"),(Object)("ok"),(Object)("mp"),(Object)(_pm.getObject())});} else { if (true) return anywheresoftware.b4a.keywords.Common.createMap(new Object[] {(Object)("status"),(Object)("ko"),(Object)("mp"),(Object)(_pm.getObject())});}; }else { -RDebugUtils.currentLine=14090265; - //BA.debugLineNum = 14090265;BA.debugLine="If thisLog Then LogColor(\"NO HAY INVENTARIO SUF"; + //BA.debugLineNum = 1027;BA.debugLine="If thisLog Then LogColor(\"NO HAY INVENTARIO SUF"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314090265","NO HAY INVENTARIO SUFICIENTE "+_idpromo,anywheresoftware.b4a.keywords.Common.Colors.Red);}; -RDebugUtils.currentLine=14090266; - //BA.debugLineNum = 14090266;BA.debugLine="Return CreateMap(\"status\":\"ko\", \"mp\":pm)"; +anywheresoftware.b4a.keywords.Common.LogImpl("350397209","NO HAY INVENTARIO SUFICIENTE "+_idpromo,anywheresoftware.b4a.keywords.Common.Colors.Red);}; + //BA.debugLineNum = 1028;BA.debugLine="Return CreateMap(\"status\":\"ko\", \"mp\":pm)"; if (true) return anywheresoftware.b4a.keywords.Common.createMap(new Object[] {(Object)("status"),(Object)("ko"),(Object)("mp"),(Object)(_pm.getObject())}); }; }; -RDebugUtils.currentLine=14090272; - //BA.debugLineNum = 14090272;BA.debugLine="LogColor(\"TIEMPO DE PROCESO ESTA PROMO: \" & ((Dat"; -anywheresoftware.b4a.keywords.Common.LogImpl("314090272","TIEMPO DE PROCESO ESTA PROMO: "+BA.NumberToString(((anywheresoftware.b4a.keywords.Common.DateTime.getNow()-(double)(Double.parseDouble(_iniciocontador)))/(double)1000)),anywheresoftware.b4a.keywords.Common.Colors.Red); -RDebugUtils.currentLine=14090273; - //BA.debugLineNum = 14090273;BA.debugLine="End Sub"; + //BA.debugLineNum = 1034;BA.debugLine="LogColor(\"TIEMPO DE PROCESO ESTA PROMO: \" & ((Dat"; +anywheresoftware.b4a.keywords.Common.LogImpl("350397216","TIEMPO DE PROCESO ESTA PROMO: "+BA.NumberToString(((anywheresoftware.b4a.keywords.Common.DateTime.getNow()-(double)(Double.parseDouble(_iniciocontador)))/(double)1000)),anywheresoftware.b4a.keywords.Common.Colors.Red); + //BA.debugLineNum = 1035;BA.debugLine="End Sub"; return null; } -public static anywheresoftware.b4a.objects.collections.Map _traepromo(anywheresoftware.b4a.BA _ba,String _promo,String _cliente) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "traepromo", false)) - {return ((anywheresoftware.b4a.objects.collections.Map) Debug.delegate(null, "traepromo", new Object[] {_ba,_promo,_cliente}));} -String _iniciocontador = ""; -anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; -String _sihistorico = ""; -anywheresoftware.b4a.objects.collections.Map _promomap = null; -anywheresoftware.b4a.objects.collections.List _prodsfijos = null; -anywheresoftware.b4a.objects.collections.List _prodsfijosprecios = null; -anywheresoftware.b4a.objects.collections.List _prodsfijospiezas = null; -anywheresoftware.b4a.objects.collections.List _prodsvariables = null; -anywheresoftware.b4a.objects.collections.Map _prods = null; -anywheresoftware.b4a.objects.collections.Map _tipos = null; -int _i = 0; -String _pvr = ""; -RDebugUtils.currentLine=13697024; - //BA.debugLineNum = 13697024;BA.debugLine="Sub traePromo(promo As String, cliente As String)"; -RDebugUtils.currentLine=13697025; - //BA.debugLineNum = 13697025;BA.debugLine="Private inicioContador As String = DateTime.Now"; -_iniciocontador = BA.NumberToString(anywheresoftware.b4a.keywords.Common.DateTime.getNow()); -RDebugUtils.currentLine=13697026; - //BA.debugLineNum = 13697026;BA.debugLine="Private c As Cursor = B4XPages.MainPage.skmt.Exec"; -_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("Select * from promos_comp where cat_pa_id = '"+_promo+"'"))); -RDebugUtils.currentLine=13697027; - //BA.debugLineNum = 13697027;BA.debugLine="Private siHistorico As String = 0"; -_sihistorico = BA.NumberToString(0); -RDebugUtils.currentLine=13697028; - //BA.debugLineNum = 13697028;BA.debugLine="Private promoMap As Map"; -_promomap = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=13697029; - //BA.debugLineNum = 13697029;BA.debugLine="Private prodsFijos, prodsFijosPrecios, prodsFijos"; -_prodsfijos = new anywheresoftware.b4a.objects.collections.List(); -_prodsfijosprecios = new anywheresoftware.b4a.objects.collections.List(); -_prodsfijospiezas = new anywheresoftware.b4a.objects.collections.List(); -_prodsvariables = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=13697030; - //BA.debugLineNum = 13697030;BA.debugLine="promoMap.Initialize"; -_promomap.Initialize(); -RDebugUtils.currentLine=13697031; - //BA.debugLineNum = 13697031;BA.debugLine="prodsFijos.Initialize"; -_prodsfijos.Initialize(); -RDebugUtils.currentLine=13697032; - //BA.debugLineNum = 13697032;BA.debugLine="prodsFijosPrecios.Initialize"; -_prodsfijosprecios.Initialize(); -RDebugUtils.currentLine=13697033; - //BA.debugLineNum = 13697033;BA.debugLine="prodsFijosPiezas.Initialize"; -_prodsfijospiezas.Initialize(); -RDebugUtils.currentLine=13697034; - //BA.debugLineNum = 13697034;BA.debugLine="prodsVariables.Initialize"; -_prodsvariables.Initialize(); -RDebugUtils.currentLine=13697035; - //BA.debugLineNum = 13697035;BA.debugLine="c.Position = 0"; -_c.setPosition((int) (0)); -RDebugUtils.currentLine=13697036; - //BA.debugLineNum = 13697036;BA.debugLine="If c.RowCount > 0 Then promoMap = CreateMap(\"id\":"; -if (_c.getRowCount()>0) { -_promomap = anywheresoftware.b4a.keywords.Common.createMap(new Object[] {(Object)("id"),(Object)(_promo),(Object)("maxXcliente"),(Object)(_c.GetString("CAT_PA_MAXPROMCLIE")),(Object)("maxRecurrente"),(Object)(_c.GetString("CAT_PA_MAXPROMREC")),(Object)("maxPromos"),(Object)(_c.GetString("CAT_PA_MAXPROM"))});}; -RDebugUtils.currentLine=13697037; - //BA.debugLineNum = 13697037;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"Select coun"; -_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("Select count(*) as hist from HIST_PROMOS where HP_CLIENTE = '"+_cliente+"' and HP_CODIGO_PROMOCION = '"+_promo+"'"))); -RDebugUtils.currentLine=13697038; - //BA.debugLineNum = 13697038;BA.debugLine="c.Position = 0"; -_c.setPosition((int) (0)); -RDebugUtils.currentLine=13697039; - //BA.debugLineNum = 13697039;BA.debugLine="If c.GetString(\"hist\") > 0 Then siHistorico = 1"; -if ((double)(Double.parseDouble(_c.GetString("hist")))>0) { -_sihistorico = BA.NumberToString(1);}; -RDebugUtils.currentLine=13697040; - //BA.debugLineNum = 13697040;BA.debugLine="promoMap.Put(\"historico\", siHistorico)"; -_promomap.Put((Object)("historico"),(Object)(_sihistorico)); -RDebugUtils.currentLine=13697041; - //BA.debugLineNum = 13697041;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"Select * fr"; -_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("Select * from CAT_DETALLES_PAQ where CAT_DP_ID = '"+_promo+"'"))); -RDebugUtils.currentLine=13697042; - //BA.debugLineNum = 13697042;BA.debugLine="c.Position = 0"; -_c.setPosition((int) (0)); -RDebugUtils.currentLine=13697043; - //BA.debugLineNum = 13697043;BA.debugLine="If c.RowCount > 0 Then"; -if (_c.getRowCount()>0) { -RDebugUtils.currentLine=13697044; - //BA.debugLineNum = 13697044;BA.debugLine="Private prods, tipos As Map"; -_prods = new anywheresoftware.b4a.objects.collections.Map(); -_tipos = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=13697045; - //BA.debugLineNum = 13697045;BA.debugLine="prods.Initialize"; -_prods.Initialize(); -RDebugUtils.currentLine=13697046; - //BA.debugLineNum = 13697046;BA.debugLine="tipos.Initialize"; -_tipos.Initialize(); -RDebugUtils.currentLine=13697047; - //BA.debugLineNum = 13697047;BA.debugLine="For i=0 To c.RowCount -1"; -{ -final int step23 = 1; -final int limit23 = (int) (_c.getRowCount()-1); -_i = (int) (0) ; -for (;_i <= limit23 ;_i = _i + step23 ) { -RDebugUtils.currentLine=13697048; - //BA.debugLineNum = 13697048;BA.debugLine="c.Position=i"; -_c.setPosition(_i); -RDebugUtils.currentLine=13697049; - //BA.debugLineNum = 13697049;BA.debugLine="prods.Put(c.GetString(\"CAT_DP_IDPROD\"), CreateM"; -_prods.Put((Object)(_c.GetString("CAT_DP_IDPROD")),(Object)(anywheresoftware.b4a.keywords.Common.createMap(new Object[] {(Object)("idProducto"),(Object)(_c.GetString("CAT_DP_IDPROD")),(Object)("precioSimptos"),(Object)(_c.GetString("CAT_DP_PRECIO_SIMPTOS")),(Object)("precio"),(Object)(_c.GetString("CAT_DP_PRECIO")),(Object)("almacen"),(Object)(_c.GetString("CAT_DP_ALMACEN")),(Object)("tipo"),(Object)(_c.GetString("CAT_DP_TIPO")),(Object)("piezas"),(Object)(_c.GetString("CAT_DP_PZAS")),(Object)("usuario"),(Object)(_c.GetString("CAT_DP_USUARIO")),(Object)("regalo"),(Object)(_c.GetString("CAT_DP_REGALO")),(Object)("clasif"),(Object)(_c.GetString("CAT_DP_CLASIF"))}).getObject())); -RDebugUtils.currentLine=13697050; - //BA.debugLineNum = 13697050;BA.debugLine="tipos.Put(c.GetString(\"CAT_DP_IDPROD\"), c.GetSt"; -_tipos.Put((Object)(_c.GetString("CAT_DP_IDPROD")),(Object)(_c.GetString("CAT_DP_TIPO"))); -RDebugUtils.currentLine=13697051; - //BA.debugLineNum = 13697051;BA.debugLine="If c.GetString(\"CAT_DP_TIPO\") = \"0\" Then"; -if ((_c.GetString("CAT_DP_TIPO")).equals("0")) { -RDebugUtils.currentLine=13697052; - //BA.debugLineNum = 13697052;BA.debugLine="prodsFijos.Add(c.GetString(\"CAT_DP_IDPROD\"))"; -_prodsfijos.Add((Object)(_c.GetString("CAT_DP_IDPROD"))); -RDebugUtils.currentLine=13697053; - //BA.debugLineNum = 13697053;BA.debugLine="prodsFijosPrecios.Add(c.GetString(\"CAT_DP_PREC"; -_prodsfijosprecios.Add((Object)(_c.GetString("CAT_DP_PRECIO"))); -RDebugUtils.currentLine=13697054; - //BA.debugLineNum = 13697054;BA.debugLine="prodsFijosPiezas.Add(c.GetString(\"CAT_DP_PZAS\""; -_prodsfijospiezas.Add((Object)(_c.GetString("CAT_DP_PZAS"))); - }; -RDebugUtils.currentLine=13697056; - //BA.debugLineNum = 13697056;BA.debugLine="If c.GetString(\"CAT_DP_TIPO\") = \"1\" Then prodsV"; -if ((_c.GetString("CAT_DP_TIPO")).equals("1")) { -_prodsvariables.Add((Object)(_c.GetString("CAT_DP_IDPROD")));}; - } -}; -RDebugUtils.currentLine=13697059; - //BA.debugLineNum = 13697059;BA.debugLine="promoMap.Put(\"productos\", prods) 'Mapa con los p"; -_promomap.Put((Object)("productos"),(Object)(_prods.getObject())); -RDebugUtils.currentLine=13697060; - //BA.debugLineNum = 13697060;BA.debugLine="promoMap.Put(\"tipos\", tipos) 'Mapa con los produ"; -_promomap.Put((Object)("tipos"),(Object)(_tipos.getObject())); -RDebugUtils.currentLine=13697061; - //BA.debugLineNum = 13697061;BA.debugLine="promoMap.Put(\"prodsFijos\", prodsFijos) 'Lista de"; -_promomap.Put((Object)("prodsFijos"),(Object)(_prodsfijos.getObject())); -RDebugUtils.currentLine=13697062; - //BA.debugLineNum = 13697062;BA.debugLine="promoMap.Put(\"prodsVariables\", prodsVariables) '"; -_promomap.Put((Object)("prodsVariables"),(Object)(_prodsvariables.getObject())); -RDebugUtils.currentLine=13697063; - //BA.debugLineNum = 13697063;BA.debugLine="promoMap.Put(\"prodsFijosCant\", prodsFijos.Size)"; -_promomap.Put((Object)("prodsFijosCant"),(Object)(_prodsfijos.getSize())); -RDebugUtils.currentLine=13697064; - //BA.debugLineNum = 13697064;BA.debugLine="promoMap.Put(\"prodsFijosPrecios\", prodsFijosPrec"; -_promomap.Put((Object)("prodsFijosPrecios"),(Object)(_prodsfijosprecios.getObject())); -RDebugUtils.currentLine=13697065; - //BA.debugLineNum = 13697065;BA.debugLine="promoMap.Put(\"prodsFijosPiezas\", prodsFijosPieza"; -_promomap.Put((Object)("prodsFijosPiezas"),(Object)(_prodsfijospiezas.getObject())); -RDebugUtils.currentLine=13697066; - //BA.debugLineNum = 13697066;BA.debugLine="promoMap.Put(\"prodsVariablesCant\", prodsVariable"; -_promomap.Put((Object)("prodsVariablesCant"),(Object)(_prodsvariables.getSize())); -RDebugUtils.currentLine=13697067; - //BA.debugLineNum = 13697067;BA.debugLine="promoMap.Put(\"resultado\", \"ok\")"; -_promomap.Put((Object)("resultado"),(Object)("ok")); - }else { -RDebugUtils.currentLine=13697069; - //BA.debugLineNum = 13697069;BA.debugLine="promoMap.Put(\"resultado\", \"No hay datos de la pr"; -_promomap.Put((Object)("resultado"),(Object)("No hay datos de la promoción.")); - }; -RDebugUtils.currentLine=13697071; - //BA.debugLineNum = 13697071;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"Select CAT_"; -_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("Select CAT_GP_STS, CAT_GP_NOMBRE from CAT_GUNAPROD where CAT_GP_ID = '"+_promo+"'"))); -RDebugUtils.currentLine=13697072; - //BA.debugLineNum = 13697072;BA.debugLine="c.Position = 0"; -_c.setPosition((int) (0)); -RDebugUtils.currentLine=13697073; - //BA.debugLineNum = 13697073;BA.debugLine="Private pvr As String = 0"; -_pvr = BA.NumberToString(0); -RDebugUtils.currentLine=13697074; - //BA.debugLineNum = 13697074;BA.debugLine="If c.RowCount > 0 Then"; -if (_c.getRowCount()>0) { -RDebugUtils.currentLine=13697075; - //BA.debugLineNum = 13697075;BA.debugLine="c.Position = 0"; -_c.setPosition((int) (0)); -RDebugUtils.currentLine=13697076; - //BA.debugLineNum = 13697076;BA.debugLine="pvr = c.GetString(\"CAT_GP_STS\")"; -_pvr = _c.GetString("CAT_GP_STS"); -RDebugUtils.currentLine=13697077; - //BA.debugLineNum = 13697077;BA.debugLine="promoMap.Put(\"prodsVariablesRequeridos\", pvr) 'C"; -_promomap.Put((Object)("prodsVariablesRequeridos"),(Object)(_pvr)); -RDebugUtils.currentLine=13697078; - //BA.debugLineNum = 13697078;BA.debugLine="promoMap.put(\"descripcion\", c.GetString(\"CAT_GP_"; -_promomap.Put((Object)("descripcion"),(Object)(_c.GetString("CAT_GP_NOMBRE"))); - }; -RDebugUtils.currentLine=13697080; - //BA.debugLineNum = 13697080;BA.debugLine="c.Close"; -_c.Close(); -RDebugUtils.currentLine=13697085; - //BA.debugLineNum = 13697085;BA.debugLine="Return promoMap"; -if (true) return _promomap; -RDebugUtils.currentLine=13697086; - //BA.debugLineNum = 13697086;BA.debugLine="End Sub"; -return null; -} -public static int _traemaxpromos(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.collections.Map _pm) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "traemaxpromos", false)) - {return ((Integer) Debug.delegate(null, "traemaxpromos", new Object[] {_ba,_pm}));} -boolean _thislog = false; -anywheresoftware.b4a.objects.collections.List _maxpromos = null; -int _vendidas = 0; -anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; -RDebugUtils.currentLine=13959168; - //BA.debugLineNum = 13959168;BA.debugLine="Sub traeMaxPromos(pm As Map) As Int"; -RDebugUtils.currentLine=13959169; - //BA.debugLineNum = 13959169;BA.debugLine="Private thisLog As Boolean = False 'Si es verdade"; -_thislog = anywheresoftware.b4a.keywords.Common.False; -RDebugUtils.currentLine=13959170; - //BA.debugLineNum = 13959170;BA.debugLine="Private maxPromos As List"; -_maxpromos = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=13959171; - //BA.debugLineNum = 13959171;BA.debugLine="Private vendidas As Int = 0"; -_vendidas = (int) (0); -RDebugUtils.currentLine=13959172; - //BA.debugLineNum = 13959172;BA.debugLine="maxPromos.Initialize"; -_maxpromos.Initialize(); -RDebugUtils.currentLine=13959174; - //BA.debugLineNum = 13959174;BA.debugLine="If thisLog Then Log(pm)"; -if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("313959174",BA.ObjectToString(_pm),0);}; -RDebugUtils.currentLine=13959175; - //BA.debugLineNum = 13959175;BA.debugLine="If pm.Get(\"historico\") = \"1\" Then maxPromos.Add(p"; -if ((_pm.Get((Object)("historico"))).equals((Object)("1"))) { -_maxpromos.Add(_pm.Get((Object)("maxRecurrente")));}; -RDebugUtils.currentLine=13959176; - //BA.debugLineNum = 13959176;BA.debugLine="maxPromos.Add(pm.Get(\"maxPromos\")) 'Agregamos max"; -_maxpromos.Add(_pm.Get((Object)("maxPromos"))); -RDebugUtils.currentLine=13959177; - //BA.debugLineNum = 13959177;BA.debugLine="maxPromos.Add(pm.Get(\"maxXcliente\")) 'Agregamos m"; -_maxpromos.Add(_pm.Get((Object)("maxXcliente"))); -RDebugUtils.currentLine=13959178; - //BA.debugLineNum = 13959178;BA.debugLine="maxPromos.Sort(True)"; -_maxpromos.Sort(anywheresoftware.b4a.keywords.Common.True); -RDebugUtils.currentLine=13959181; - //BA.debugLineNum = 13959181;BA.debugLine="Private c As Cursor = B4XPages.MainPage.skmt.Exec"; -_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery2("select sum(PE_CANT) as vendidas from PEDIDO where PE_PROID = ? and PE_CLIENTE = ? ",new String[]{(BA.ObjectToString(_pm.Get((Object)("id")))).trim(),_traecliente(_ba).trim()}))); -RDebugUtils.currentLine=13959182; - //BA.debugLineNum = 13959182;BA.debugLine="If c.RowCount > 0 Then"; -if (_c.getRowCount()>0) { -RDebugUtils.currentLine=13959183; - //BA.debugLineNum = 13959183;BA.debugLine="c.Position = 0"; -_c.setPosition((int) (0)); -RDebugUtils.currentLine=13959184; - //BA.debugLineNum = 13959184;BA.debugLine="vendidas = c.GetInt(\"vendidas\")"; -_vendidas = _c.GetInt("vendidas"); - }; -RDebugUtils.currentLine=13959191; - //BA.debugLineNum = 13959191;BA.debugLine="Return maxPromos.Get(0) - vendidas 'Regresamos el"; -if (true) return (int) ((double)(BA.ObjectToNumber(_maxpromos.Get((int) (0))))-_vendidas); -RDebugUtils.currentLine=13959192; - //BA.debugLineNum = 13959192;BA.debugLine="End Sub"; -return 0; -} -public static int _traepromosvendidas(anywheresoftware.b4a.BA _ba,String _promo,String _cliente) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "traepromosvendidas", false)) - {return ((Integer) Debug.delegate(null, "traepromosvendidas", new Object[] {_ba,_promo,_cliente}));} -anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; -int _pv = 0; -RDebugUtils.currentLine=14024704; - //BA.debugLineNum = 14024704;BA.debugLine="Sub traePromosVendidas(promo As String, cliente As"; -RDebugUtils.currentLine=14024705; - //BA.debugLineNum = 14024705;BA.debugLine="Private c As Cursor"; -_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=14024706; - //BA.debugLineNum = 14024706;BA.debugLine="Private pv As Int = 0"; -_pv = (int) (0); -RDebugUtils.currentLine=14024707; - //BA.debugLineNum = 14024707;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery($\"select PE_CA"; -_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select PE_CANT from PEDIDO where PE_PROID = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_promo))+"' and PE_CLIENTE = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_cliente))+"'")))); -RDebugUtils.currentLine=14024708; - //BA.debugLineNum = 14024708;BA.debugLine="If c.RowCount > 0 Then"; -if (_c.getRowCount()>0) { -RDebugUtils.currentLine=14024709; - //BA.debugLineNum = 14024709;BA.debugLine="c.Position = 0"; -_c.setPosition((int) (0)); -RDebugUtils.currentLine=14024710; - //BA.debugLineNum = 14024710;BA.debugLine="pv = c.GetInt(\"PE_CANT\")"; -_pv = _c.GetInt("PE_CANT"); - }; -RDebugUtils.currentLine=14024712; - //BA.debugLineNum = 14024712;BA.debugLine="Return pv"; -if (true) return _pv; -RDebugUtils.currentLine=14024713; - //BA.debugLineNum = 14024713;BA.debugLine="End Sub"; -return 0; +public static String _process_globals() throws Exception{ + //BA.debugLineNum = 3;BA.debugLine="Sub Process_Globals"; + //BA.debugLineNum = 6;BA.debugLine="Public GZip As GZipStrings 'Usa la libreria Com"; +_gzip = new de.donmanfred.GZipStringswrapper(); + //BA.debugLineNum = 7;BA.debugLine="Private su As StringUtils 'Usa la libreria Stri"; +_su = new anywheresoftware.b4a.objects.StringUtils(); + //BA.debugLineNum = 8;BA.debugLine="Dim phn As Phone"; +_phn = new anywheresoftware.b4a.phone.Phone(); + //BA.debugLineNum = 9;BA.debugLine="Dim devModel As String"; +_devmodel = ""; + //BA.debugLineNum = 10;BA.debugLine="Dim kmt, errorLog As SQL 'Requiere la libreria \"S"; +_kmt = new anywheresoftware.b4a.sql.SQL(); +_errorlog = new anywheresoftware.b4a.sql.SQL(); + //BA.debugLineNum = 12;BA.debugLine="Dim ssid As String 'ignore"; +_ssid = ""; + //BA.debugLineNum = 13;BA.debugLine="Dim rutaMaxPoints As Int = 3000"; +_rutamaxpoints = (int) (3000); + //BA.debugLineNum = 14;BA.debugLine="Dim rutaHrsAtras As Int = 48"; +_rutahrsatras = (int) (48); + //BA.debugLineNum = 16;BA.debugLine="Private subsLogs As Boolean = False"; +_subslogs = anywheresoftware.b4a.keywords.Common.False; + //BA.debugLineNum = 17;BA.debugLine="End Sub"; +return ""; } public static anywheresoftware.b4a.objects.collections.Map _restafijospromo(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.collections.Map _promomap) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "restafijospromo", false)) - {return ((anywheresoftware.b4a.objects.collections.Map) Debug.delegate(null, "restafijospromo", new Object[] {_ba,_promomap}));} boolean _thislog = false; anywheresoftware.b4a.objects.collections.Map _inventariosdisponiblesparaestapromo = null; int _i = 0; @@ -2642,257 +1279,296 @@ anywheresoftware.b4a.objects.collections.List _prodsfijos = null; int _p = 0; String _t = ""; anywheresoftware.b4a.objects.collections.Map _p2 = null; -RDebugUtils.currentLine=13828096; - //BA.debugLineNum = 13828096;BA.debugLine="Sub restaFijosPromo(promoMap As Map) As Map 'ignor"; -RDebugUtils.currentLine=13828097; - //BA.debugLineNum = 13828097;BA.debugLine="Private thisLog As Boolean = False 'Si es verdade"; + //BA.debugLineNum = 908;BA.debugLine="Sub restaFijosPromo(promoMap As Map) As Map 'ignor"; + //BA.debugLineNum = 909;BA.debugLine="Private thisLog As Boolean = False 'Si es verdade"; _thislog = anywheresoftware.b4a.keywords.Common.False; -RDebugUtils.currentLine=13828098; - //BA.debugLineNum = 13828098;BA.debugLine="Private inventariosDisponiblesParaEstaPromo As Ma"; + //BA.debugLineNum = 910;BA.debugLine="Private inventariosDisponiblesParaEstaPromo As Ma"; _inventariosdisponiblesparaestapromo = new anywheresoftware.b4a.objects.collections.Map(); _inventariosdisponiblesparaestapromo = _traemosinventariodisponibleparapromo(_ba,BA.ObjectToString(_promomap.Get((Object)("id")))); -RDebugUtils.currentLine=13828099; - //BA.debugLineNum = 13828099;BA.debugLine="If thisLog Then LogColor(inventariosDisponiblesPa"; + //BA.debugLineNum = 911;BA.debugLine="If thisLog Then LogColor(inventariosDisponiblesPa"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("313828099",BA.ObjectToString(_inventariosdisponiblesparaestapromo),anywheresoftware.b4a.keywords.Common.Colors.Red);}; -RDebugUtils.currentLine=13828100; - //BA.debugLineNum = 13828100;BA.debugLine="If thisLog Then LogColor(\"Inventario inicial ante"; +anywheresoftware.b4a.keywords.Common.LogImpl("350135043",BA.ObjectToString(_inventariosdisponiblesparaestapromo),anywheresoftware.b4a.keywords.Common.Colors.Red);}; + //BA.debugLineNum = 912;BA.debugLine="If thisLog Then LogColor(\"Inventario inicial ante"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("313828100","Inventario inicial antes de FIJOS: "+BA.ObjectToString(_inventariosdisponiblesparaestapromo),anywheresoftware.b4a.keywords.Common.Colors.Gray);}; -RDebugUtils.currentLine=13828101; - //BA.debugLineNum = 13828101;BA.debugLine="Private i As Int"; +anywheresoftware.b4a.keywords.Common.LogImpl("350135044","Inventario inicial antes de FIJOS: "+BA.ObjectToString(_inventariosdisponiblesparaestapromo),anywheresoftware.b4a.keywords.Common.Colors.Gray);}; + //BA.debugLineNum = 913;BA.debugLine="Private i As Int"; _i = 0; -RDebugUtils.currentLine=13828102; - //BA.debugLineNum = 13828102;BA.debugLine="Private prodsmap As Map = promoMap.Get(\"productos"; + //BA.debugLineNum = 914;BA.debugLine="Private prodsmap As Map = promoMap.Get(\"productos"; _prodsmap = new anywheresoftware.b4a.objects.collections.Map(); _prodsmap = (anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_promomap.Get((Object)("productos")))); -RDebugUtils.currentLine=13828103; - //BA.debugLineNum = 13828103;BA.debugLine="Private prodsFijos As List = promoMap.get(\"prodsF"; + //BA.debugLineNum = 915;BA.debugLine="Private prodsFijos As List = promoMap.get(\"prodsF"; _prodsfijos = new anywheresoftware.b4a.objects.collections.List(); _prodsfijos = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_promomap.Get((Object)("prodsFijos")))); -RDebugUtils.currentLine=13828104; - //BA.debugLineNum = 13828104;BA.debugLine="For p = 0 To prodsFijos.Size - 1"; + //BA.debugLineNum = 916;BA.debugLine="For p = 0 To prodsFijos.Size - 1"; { final int step8 = 1; final int limit8 = (int) (_prodsfijos.getSize()-1); _p = (int) (0) ; for (;_p <= limit8 ;_p = _p + step8 ) { -RDebugUtils.currentLine=13828105; - //BA.debugLineNum = 13828105;BA.debugLine="Private t As String = prodsFijos.Get(p) 'Obtenem"; + //BA.debugLineNum = 917;BA.debugLine="Private t As String = prodsFijos.Get(p) 'Obtenem"; _t = BA.ObjectToString(_prodsfijos.Get(_p)); -RDebugUtils.currentLine=13828106; - //BA.debugLineNum = 13828106;BA.debugLine="Private p2 As Map = prodsmap.Get(t) 'Obtenemos u"; + //BA.debugLineNum = 918;BA.debugLine="Private p2 As Map = prodsmap.Get(t) 'Obtenemos u"; _p2 = new anywheresoftware.b4a.objects.collections.Map(); _p2 = (anywheresoftware.b4a.objects.collections.Map) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.Map(), (java.util.Map)(_prodsmap.Get((Object)(_t)))); -RDebugUtils.currentLine=13828107; - //BA.debugLineNum = 13828107;BA.debugLine="If thisLog Then Log($\"T: ${t}, prod ${p2.Get(\"id"; + //BA.debugLineNum = 919;BA.debugLine="If thisLog Then Log($\"T: ${t}, prod ${p2.Get(\"id"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("313828107",("T: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_t))+", prod "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_p2.Get((Object)("idProducto")))+", piezas: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_p2.Get((Object)("piezas")))+""),0);}; -RDebugUtils.currentLine=13828108; - //BA.debugLineNum = 13828108;BA.debugLine="If thisLog Then Log(\"inventariosDisponiblesParaE"; +anywheresoftware.b4a.keywords.Common.LogImpl("350135051",("T: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_t))+", prod "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_p2.Get((Object)("idProducto")))+", piezas: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_p2.Get((Object)("piezas")))+""),0);}; + //BA.debugLineNum = 920;BA.debugLine="If thisLog Then Log(\"inventariosDisponiblesParaE"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("313828108","inventariosDisponiblesParaEstaPromo="+BA.ObjectToString(_inventariosdisponiblesparaestapromo),0);}; -RDebugUtils.currentLine=13828109; - //BA.debugLineNum = 13828109;BA.debugLine="If inventariosDisponiblesParaEstaPromo.ContainsK"; +anywheresoftware.b4a.keywords.Common.LogImpl("350135052","inventariosDisponiblesParaEstaPromo="+BA.ObjectToString(_inventariosdisponiblesparaestapromo),0);}; + //BA.debugLineNum = 921;BA.debugLine="If inventariosDisponiblesParaEstaPromo.ContainsK"; if (_inventariosdisponiblesparaestapromo.ContainsKey((Object)(_t))) { -RDebugUtils.currentLine=13828110; - //BA.debugLineNum = 13828110;BA.debugLine="i = inventariosDisponiblesParaEstaPromo.get(t)"; + //BA.debugLineNum = 922;BA.debugLine="i = inventariosDisponiblesParaEstaPromo.get(t)"; _i = (int)(BA.ObjectToNumber(_inventariosdisponiblesparaestapromo.Get((Object)(_t)))); -RDebugUtils.currentLine=13828111; - //BA.debugLineNum = 13828111;BA.debugLine="If thisLog Then Log($\"Nuevo inventario de ${t}:"; + //BA.debugLineNum = 923;BA.debugLine="If thisLog Then Log($\"Nuevo inventario de ${t}:"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("313828111",("Nuevo inventario de "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_t))+": "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_i))+"-"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",((anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_promomap.Get((Object)("prodsFijosPiezas"))))).Get(_p))+" = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("1.0",(Object)(_i-(double)(BA.ObjectToNumber(((anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_promomap.Get((Object)("prodsFijosPiezas"))))).Get(_p)))))+""),0);}; -RDebugUtils.currentLine=13828112; - //BA.debugLineNum = 13828112;BA.debugLine="inventariosDisponiblesParaEstaPromo.Put(t, $\"${"; +anywheresoftware.b4a.keywords.Common.LogImpl("350135055",("Nuevo inventario de "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_t))+": "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_i))+"-"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",((anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_promomap.Get((Object)("prodsFijosPiezas"))))).Get(_p))+" = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("1.0",(Object)(_i-(double)(BA.ObjectToNumber(((anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_promomap.Get((Object)("prodsFijosPiezas"))))).Get(_p)))))+""),0);}; + //BA.debugLineNum = 924;BA.debugLine="inventariosDisponiblesParaEstaPromo.Put(t, $\"${"; _inventariosdisponiblesparaestapromo.Put((Object)(_t),(Object)((""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_i-(double)(BA.ObjectToNumber(((anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_promomap.Get((Object)("prodsFijosPiezas"))))).Get(_p)))))+""))); -RDebugUtils.currentLine=13828113; - //BA.debugLineNum = 13828113;BA.debugLine="inventariosDisponiblesParaEstaPromo.Put(\"result"; + //BA.debugLineNum = 925;BA.debugLine="inventariosDisponiblesParaEstaPromo.Put(\"result"; _inventariosdisponiblesparaestapromo.Put((Object)("resultado"),(Object)("ok")); }else { -RDebugUtils.currentLine=13828115; - //BA.debugLineNum = 13828115;BA.debugLine="inventariosDisponiblesParaEstaPromo.Put(\"result"; + //BA.debugLineNum = 927;BA.debugLine="inventariosDisponiblesParaEstaPromo.Put(\"result"; _inventariosdisponiblesparaestapromo.Put((Object)("resultado"),(Object)("No hay suficiente producto para la promocion.")); -RDebugUtils.currentLine=13828116; - //BA.debugLineNum = 13828116;BA.debugLine="LogColor(\"Sin suficiente inventario fijo: \" & t"; -anywheresoftware.b4a.keywords.Common.LogImpl("313828116","Sin suficiente inventario fijo: "+_t,anywheresoftware.b4a.keywords.Common.Colors.Blue); -RDebugUtils.currentLine=13828117; - //BA.debugLineNum = 13828117;BA.debugLine="Exit"; + //BA.debugLineNum = 928;BA.debugLine="LogColor(\"Sin suficiente inventario fijo: \" & t"; +anywheresoftware.b4a.keywords.Common.LogImpl("350135060","Sin suficiente inventario fijo: "+_t,anywheresoftware.b4a.keywords.Common.Colors.Blue); + //BA.debugLineNum = 929;BA.debugLine="Exit"; if (true) break; }; -RDebugUtils.currentLine=13828119; - //BA.debugLineNum = 13828119;BA.debugLine="If i - p2.Get(\"piezas\") < 0 Then"; + //BA.debugLineNum = 931;BA.debugLine="If i - p2.Get(\"piezas\") < 0 Then"; if (_i-(double)(BA.ObjectToNumber(_p2.Get((Object)("piezas"))))<0) { -RDebugUtils.currentLine=13828120; - //BA.debugLineNum = 13828120;BA.debugLine="inventariosDisponiblesParaEstaPromo.Put(\"result"; + //BA.debugLineNum = 932;BA.debugLine="inventariosDisponiblesParaEstaPromo.Put(\"result"; _inventariosdisponiblesparaestapromo.Put((Object)("resultado"),(Object)("No hay suficiente producto para la promocion.")); -RDebugUtils.currentLine=13828121; - //BA.debugLineNum = 13828121;BA.debugLine="Exit"; + //BA.debugLineNum = 933;BA.debugLine="Exit"; if (true) break; }; } }; -RDebugUtils.currentLine=13828124; - //BA.debugLineNum = 13828124;BA.debugLine="If prodsFijos.Size = 0 Then inventariosDisponible"; + //BA.debugLineNum = 936;BA.debugLine="If prodsFijos.Size = 0 Then inventariosDisponible"; if (_prodsfijos.getSize()==0) { _inventariosdisponiblesparaestapromo.Put((Object)("resultado"),(Object)("ok"));}; -RDebugUtils.currentLine=13828125; - //BA.debugLineNum = 13828125;BA.debugLine="If thisLog Then LogColor(\"Inventario final depues"; + //BA.debugLineNum = 937;BA.debugLine="If thisLog Then LogColor(\"Inventario final depues"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("313828125","Inventario final depues de FIJOS: "+BA.ObjectToString(_inventariosdisponiblesparaestapromo),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; -RDebugUtils.currentLine=13828126; - //BA.debugLineNum = 13828126;BA.debugLine="Return inventariosDisponiblesParaEstaPromo"; +anywheresoftware.b4a.keywords.Common.LogImpl("350135069","Inventario final depues de FIJOS: "+BA.ObjectToString(_inventariosdisponiblesparaestapromo),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; + //BA.debugLineNum = 938;BA.debugLine="Return inventariosDisponiblesParaEstaPromo"; if (true) return _inventariosdisponiblesparaestapromo; -RDebugUtils.currentLine=13828127; - //BA.debugLineNum = 13828127;BA.debugLine="End Sub"; + //BA.debugLineNum = 939;BA.debugLine="End Sub"; return null; } -public static anywheresoftware.b4a.objects.collections.Map _traemosinventariodisponibleparapromo(anywheresoftware.b4a.BA _ba,String _promo) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "traemosinventariodisponibleparapromo", false)) - {return ((anywheresoftware.b4a.objects.collections.Map) Debug.delegate(null, "traemosinventariodisponibleparapromo", new Object[] {_ba,_promo}));} -anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; -anywheresoftware.b4a.objects.collections.Map _prods = null; -int _i = 0; -RDebugUtils.currentLine=13762560; - //BA.debugLineNum = 13762560;BA.debugLine="Sub traemosInventarioDisponibleParaPromo(promo As"; -RDebugUtils.currentLine=13762561; - //BA.debugLineNum = 13762561;BA.debugLine="Private c As Cursor"; -_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=13762562; - //BA.debugLineNum = 13762562;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery2(\"SELECT CAT"; -_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery2("SELECT CAT_GP_ID, CAT_GP_ALMACEN FROM CAT_GUNAPROD WHERE CAT_GP_ID IN (select CAT_DP_IDPROD FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID = ?)",new String[]{_promo}))); -RDebugUtils.currentLine=13762565; - //BA.debugLineNum = 13762565;BA.debugLine="Private prods As Map"; -_prods = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=13762566; - //BA.debugLineNum = 13762566;BA.debugLine="prods.Initialize"; -_prods.Initialize(); -RDebugUtils.currentLine=13762567; - //BA.debugLineNum = 13762567;BA.debugLine="If c.RowCount > 0 Then"; -if (_c.getRowCount()>0) { -RDebugUtils.currentLine=13762568; - //BA.debugLineNum = 13762568;BA.debugLine="For i=0 To c.RowCount -1"; -{ -final int step6 = 1; -final int limit6 = (int) (_c.getRowCount()-1); -_i = (int) (0) ; -for (;_i <= limit6 ;_i = _i + step6 ) { -RDebugUtils.currentLine=13762569; - //BA.debugLineNum = 13762569;BA.debugLine="c.Position=i"; -_c.setPosition(_i); -RDebugUtils.currentLine=13762570; - //BA.debugLineNum = 13762570;BA.debugLine="prods.Put(c.GetString(\"CAT_GP_ID\"), c.GetString"; -_prods.Put((Object)(_c.GetString("CAT_GP_ID")),(Object)(_c.GetString("CAT_GP_ALMACEN"))); - } -}; +public static String _revisabd(anywheresoftware.b4a.BA _ba) throws Exception{ + //BA.debugLineNum = 184;BA.debugLine="Sub revisaBD 'ignore"; + //BA.debugLineNum = 188;BA.debugLine="If Not(File.Exists(Starter.ruta, \"kmt.db\")) Then"; +if (anywheresoftware.b4a.keywords.Common.Not(anywheresoftware.b4a.keywords.Common.File.Exists(mostCurrent._starter._ruta /*String*/ ,"kmt.db"))) { + //BA.debugLineNum = 189;BA.debugLine="File.Copy(File.DirAssets, \"kmt.db\", Starter.ruta"; +anywheresoftware.b4a.keywords.Common.File.Copy(anywheresoftware.b4a.keywords.Common.File.getDirAssets(),"kmt.db",mostCurrent._starter._ruta /*String*/ ,"kmt.db"); + //BA.debugLineNum = 190;BA.debugLine="LogColor(\"copiamos kmt.db de \"&File.DirAssets &"; +anywheresoftware.b4a.keywords.Common.LogImpl("347775750","copiamos kmt.db de "+anywheresoftware.b4a.keywords.Common.File.getDirAssets()+" a "+mostCurrent._starter._ruta /*String*/ ,anywheresoftware.b4a.keywords.Common.Colors.Green); }; -RDebugUtils.currentLine=13762575; - //BA.debugLineNum = 13762575;BA.debugLine="Return prods"; -if (true) return _prods; -RDebugUtils.currentLine=13762576; - //BA.debugLineNum = 13762576;BA.debugLine="End Sub"; -return null; + //BA.debugLineNum = 192;BA.debugLine="If Not(kmt.IsInitialized) Then kmt.Initialize(Sta"; +if (anywheresoftware.b4a.keywords.Common.Not(_kmt.IsInitialized())) { +_kmt.Initialize(mostCurrent._starter._ruta /*String*/ ,"kmt.db",anywheresoftware.b4a.keywords.Common.True);}; + //BA.debugLineNum = 193;BA.debugLine="kmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS RUTA"; +_kmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS RUTA_GPS(FECHA INTEGER, LAT TEXT, LON TEXT)"); + //BA.debugLineNum = 195;BA.debugLine="kmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS bita"; +_kmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS bitacora(fecha INTEGER, texto TEXT)"); + //BA.debugLineNum = 196;BA.debugLine="kmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIST"; +_kmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_AVANCE(HA_MARCA TEXT, HA_AVANCE TEXT, HA_OBJETIVO TEXT, HA_PORCENTAJE TEXT)"); + //BA.debugLineNum = 197;BA.debugLine="kmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS HIST"; +_kmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_FOTO_CLIENTE(CODIGO TEXT, ALMACEN TEXT, RUTA TEXT, NOM_FOTO TEXT)"); + //BA.debugLineNum = 199;BA.debugLine="kmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS CLIE"; +_kmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS CLIENTES_NUEVOS(CN_ID TEXT, CN_FECHA TEXT, CN_USER TEXT, CN_LAT TEXT, CN_LON TEXT, CN_NOMBRE TEXT, CN_DIRECCION TEXT, COLONIA TEXT, CP TEXT, CN_ALMACEN TEXT, CN_RUTA TEXT, CN_ENVIO TEXT)"); + //BA.debugLineNum = 201;BA.debugLine="Try 'Si no existe la columna CN_BANDERA la agrega"; +try { //BA.debugLineNum = 202;BA.debugLine="kmt.ExecQuery(\"select count(CN_BANDERA) from CLI"; +_kmt.ExecQuery("select count(CN_BANDERA) from CLIENTES_NUEVOS"); + } + catch (Exception e14) { + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e14); //BA.debugLineNum = 204;BA.debugLine="Try"; +try { //BA.debugLineNum = 205;BA.debugLine="kmt.ExecNonQuery(\"ALTER TABLE CLIENTES_NUEVOS A"; +_kmt.ExecNonQuery("ALTER TABLE CLIENTES_NUEVOS ADD COLUMN CN_BANDERA INTEGER"); + } + catch (Exception e17) { + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e17); //BA.debugLineNum = 207;BA.debugLine="LogColor(\"No pudimos agregar la columna CN_BAND"; +anywheresoftware.b4a.keywords.Common.LogImpl("347775767","No pudimos agregar la columna CN_BANDERA.",anywheresoftware.b4a.keywords.Common.Colors.Red); + //BA.debugLineNum = 208;BA.debugLine="LogColor(LastException, Colors.Red)"; +anywheresoftware.b4a.keywords.Common.LogImpl("347775768",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); + }; + }; + //BA.debugLineNum = 212;BA.debugLine="Try 'Si no existe la columna PC_ENVIO_OK la agreg"; +try { //BA.debugLineNum = 213;BA.debugLine="kmt.ExecQuery(\"select count(PC_ENVIO_OK) from PE"; +_kmt.ExecQuery("select count(PC_ENVIO_OK) from PEDIDO_CLIENTE"); + } + catch (Exception e24) { + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e24); //BA.debugLineNum = 215;BA.debugLine="Try"; +try { //BA.debugLineNum = 216;BA.debugLine="kmt.ExecNonQuery(\"ALTER TABLE PEDIDO_CLIENTE AD"; +_kmt.ExecNonQuery("ALTER TABLE PEDIDO_CLIENTE ADD COLUMN PC_ENVIO_OK INTEGER"); + } + catch (Exception e27) { + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e27); //BA.debugLineNum = 218;BA.debugLine="LogColor(\"No pudimos agregar la columna PC_ENVI"; +anywheresoftware.b4a.keywords.Common.LogImpl("347775778","No pudimos agregar la columna PC_ENVIO_OK.",anywheresoftware.b4a.keywords.Common.Colors.Red); + //BA.debugLineNum = 219;BA.debugLine="LogColor(LastException, Colors.Red)"; +anywheresoftware.b4a.keywords.Common.LogImpl("347775779",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); + }; + }; + //BA.debugLineNum = 222;BA.debugLine="Try 'Si no existe la columna PC_ENVIO_OK la agreg"; +try { //BA.debugLineNum = 223;BA.debugLine="kmt.ExecQuery(\"select count(PC_TIEMPO_TIENDA) fr"; +_kmt.ExecQuery("select count(PC_TIEMPO_TIENDA) from PEDIDO_CLIENTE"); + } + catch (Exception e34) { + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e34); //BA.debugLineNum = 225;BA.debugLine="Try"; +try { //BA.debugLineNum = 226;BA.debugLine="kmt.ExecNonQuery(\"ALTER TABLE PEDIDO_CLIENTE AD"; +_kmt.ExecNonQuery("ALTER TABLE PEDIDO_CLIENTE ADD COLUMN PC_TIEMPO_TIENDA FLOAT"); + } + catch (Exception e37) { + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e37); //BA.debugLineNum = 228;BA.debugLine="LogColor(\"No pudimos agregar la columna PC_TIEM"; +anywheresoftware.b4a.keywords.Common.LogImpl("347775788","No pudimos agregar la columna PC_TIEMPO_TIENDA.",anywheresoftware.b4a.keywords.Common.Colors.Red); + //BA.debugLineNum = 229;BA.debugLine="LogColor(LastException, Colors.Red)"; +anywheresoftware.b4a.keywords.Common.LogImpl("347775789",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); + }; + }; + //BA.debugLineNum = 232;BA.debugLine="Try 'Si no existe la columna PC_FACTURA la agrega"; +try { //BA.debugLineNum = 233;BA.debugLine="kmt.ExecQuery(\"select count(PC_FACTURA) from PED"; +_kmt.ExecQuery("select count(PC_FACTURA) from PEDIDO_CLIENTE"); + } + catch (Exception e44) { + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e44); //BA.debugLineNum = 235;BA.debugLine="Try"; +try { //BA.debugLineNum = 236;BA.debugLine="kmt.ExecNonQuery(\"ALTER TABLE PEDIDO_CLIENTE AD"; +_kmt.ExecNonQuery("ALTER TABLE PEDIDO_CLIENTE ADD COLUMN PC_FACTURA INTEGER"); + } + catch (Exception e47) { + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e47); //BA.debugLineNum = 238;BA.debugLine="LogColor(\"No pudimos agregar la columna PC_FACT"; +anywheresoftware.b4a.keywords.Common.LogImpl("347775798","No pudimos agregar la columna PC_FACTURA.",anywheresoftware.b4a.keywords.Common.Colors.Red); + //BA.debugLineNum = 239;BA.debugLine="LogColor(LastException, Colors.Red)"; +anywheresoftware.b4a.keywords.Common.LogImpl("347775799",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); + }; + }; + //BA.debugLineNum = 243;BA.debugLine="Try 'Si no existe la columna PC_ENVIO_OK la agreg"; +try { //BA.debugLineNum = 244;BA.debugLine="kmt.ExecQuery(\"select count(NV_NOMBRE) from NOVE"; +_kmt.ExecQuery("select count(NV_NOMBRE) from NOVENTA"); + } + catch (Exception e54) { + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e54); //BA.debugLineNum = 246;BA.debugLine="Try"; +try { //BA.debugLineNum = 247;BA.debugLine="kmt.ExecNonQuery(\"ALTER TABLE NOVENTA ADD COLUM"; +_kmt.ExecNonQuery("ALTER TABLE NOVENTA ADD COLUMN NV_NOMBRE TEXT"); + } + catch (Exception e57) { + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e57); //BA.debugLineNum = 249;BA.debugLine="LogColor(\"No pudimos agregar la columna NV_NOMB"; +anywheresoftware.b4a.keywords.Common.LogImpl("347775809","No pudimos agregar la columna NV_NOMBRE.",anywheresoftware.b4a.keywords.Common.Colors.Red); + //BA.debugLineNum = 250;BA.debugLine="LogColor(LastException, Colors.Red)"; +anywheresoftware.b4a.keywords.Common.LogImpl("347775810",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); + }; + }; + //BA.debugLineNum = 254;BA.debugLine="Try 'Si no existe la columna PC_ENVIO_OK la agreg"; +try { //BA.debugLineNum = 255;BA.debugLine="kmt.ExecQuery(\"select count(NV_DIRECCION) from N"; +_kmt.ExecQuery("select count(NV_DIRECCION) from NOVENTA"); + } + catch (Exception e64) { + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e64); //BA.debugLineNum = 257;BA.debugLine="Try"; +try { //BA.debugLineNum = 258;BA.debugLine="kmt.ExecNonQuery(\"ALTER TABLE NOVENTA ADD COLUM"; +_kmt.ExecNonQuery("ALTER TABLE NOVENTA ADD COLUMN NV_DIRECCION TEXT"); + } + catch (Exception e67) { + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e67); //BA.debugLineNum = 260;BA.debugLine="LogColor(\"No pudimos agregar la columna NV_NOMB"; +anywheresoftware.b4a.keywords.Common.LogImpl("347775820","No pudimos agregar la columna NV_NOMBRE.",anywheresoftware.b4a.keywords.Common.Colors.Red); + //BA.debugLineNum = 261;BA.debugLine="LogColor(LastException, Colors.Red)"; +anywheresoftware.b4a.keywords.Common.LogImpl("347775821",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); + }; + }; + //BA.debugLineNum = 265;BA.debugLine="Try 'Si no existe la columna NV_ENVIO la agregamo"; +try { //BA.debugLineNum = 266;BA.debugLine="kmt.ExecQuery(\"select count(NV_ENVIO) from NOVEN"; +_kmt.ExecQuery("select count(NV_ENVIO) from NOVENTA"); + } + catch (Exception e74) { + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e74); //BA.debugLineNum = 268;BA.debugLine="Try"; +try { //BA.debugLineNum = 269;BA.debugLine="kmt.ExecNonQuery(\"ALTER TABLE NOVENTA ADD COLUM"; +_kmt.ExecNonQuery("ALTER TABLE NOVENTA ADD COLUMN NV_ENVIO TEXT"); + } + catch (Exception e77) { + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e77); //BA.debugLineNum = 271;BA.debugLine="LogColor(\"No pudimos agregar la columna NV_ENVI"; +anywheresoftware.b4a.keywords.Common.LogImpl("347775831","No pudimos agregar la columna NV_ENVIO.",anywheresoftware.b4a.keywords.Common.Colors.Red); + //BA.debugLineNum = 272;BA.debugLine="LogColor(LastException, Colors.Red)"; +anywheresoftware.b4a.keywords.Common.LogImpl("347775832",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); + }; + }; + //BA.debugLineNum = 276;BA.debugLine="kmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS bita"; +_kmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS bitacora(fecha INTEGER, texto TEXT)"); + //BA.debugLineNum = 278;BA.debugLine="kmt.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS PEDI"; +_kmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS PEDIDO_INICIO_FINAL(PIF_CLIENTE TEXT, PIF_HORA_INICIO LONG, PIF_HORA_FINAL LONG)"); + //BA.debugLineNum = 281;BA.debugLine="If Not(errorLog.IsInitialized) Then errorLog.Init"; +if (anywheresoftware.b4a.keywords.Common.Not(_errorlog.IsInitialized())) { +_errorlog.Initialize(mostCurrent._starter._ruta /*String*/ ,"errorLog.db",anywheresoftware.b4a.keywords.Common.True);}; + //BA.debugLineNum = 282;BA.debugLine="errorLog.ExecNonQuery(\"CREATE TABLE IF NOT EXISTS"; +_errorlog.ExecNonQuery("CREATE TABLE IF NOT EXISTS errores(fecha INTEGER, error TEXT)"); + //BA.debugLineNum = 283;BA.debugLine="End Sub"; +return ""; } public static String _revisaflp(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "revisaflp", false)) - {return ((String) Debug.delegate(null, "revisaflp", new Object[] {_ba}));} boolean _todobienflp = false; -RDebugUtils.currentLine=12124160; - //BA.debugLineNum = 12124160;BA.debugLine="Sub revisaFLP 'ignore"; -RDebugUtils.currentLine=12124161; - //BA.debugLineNum = 12124161;BA.debugLine="LogColor(\"**** **** Revisamos FLP **** ****\", Col"; -anywheresoftware.b4a.keywords.Common.LogImpl("312124161","**** **** Revisamos FLP **** ****",anywheresoftware.b4a.keywords.Common.Colors.RGB((int) (78),(int) (0),(int) (227))); -RDebugUtils.currentLine=12124162; - //BA.debugLineNum = 12124162;BA.debugLine="Private todoBienFLP As Boolean = True"; + //BA.debugLineNum = 426;BA.debugLine="Sub revisaFLP 'ignore"; + //BA.debugLineNum = 427;BA.debugLine="LogColor(\"**** **** Revisamos FLP **** ****\", Col"; +anywheresoftware.b4a.keywords.Common.LogImpl("348431105","**** **** Revisamos FLP **** ****",anywheresoftware.b4a.keywords.Common.Colors.RGB((int) (78),(int) (0),(int) (227))); + //BA.debugLineNum = 428;BA.debugLine="Private todoBienFLP As Boolean = True"; _todobienflp = anywheresoftware.b4a.keywords.Common.True; -RDebugUtils.currentLine=12124163; - //BA.debugLineNum = 12124163;BA.debugLine="Try"; -try {RDebugUtils.currentLine=12124164; - //BA.debugLineNum = 12124164;BA.debugLine="If Not(Tracker.FLP.IsInitialized) Then"; + //BA.debugLineNum = 429;BA.debugLine="Try"; +try { //BA.debugLineNum = 430;BA.debugLine="If Not(Tracker.FLP.IsInitialized) Then"; if (anywheresoftware.b4a.keywords.Common.Not(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .IsInitialized())) { -RDebugUtils.currentLine=12124165; - //BA.debugLineNum = 12124165;BA.debugLine="log2DB(\"revisaFLP: No esta inicializado ... 'Re"; + //BA.debugLineNum = 431;BA.debugLine="log2DB(\"revisaFLP: No esta inicializado ... 'Re"; _log2db(_ba,"revisaFLP: No esta inicializado ... 'Reinicializando FLP'"); -RDebugUtils.currentLine=12124166; - //BA.debugLineNum = 12124166;BA.debugLine="Tracker.FLP.Initialize(\"flp\")"; + //BA.debugLineNum = 432;BA.debugLine="Tracker.FLP.Initialize(\"flp\")"; mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .Initialize((_ba.processBA == null ? _ba : _ba.processBA),"flp"); -RDebugUtils.currentLine=12124167; - //BA.debugLineNum = 12124167;BA.debugLine="todoBienFLP = False"; + //BA.debugLineNum = 433;BA.debugLine="todoBienFLP = False"; _todobienflp = anywheresoftware.b4a.keywords.Common.False; }; } catch (Exception e10) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e10);RDebugUtils.currentLine=12124170; - //BA.debugLineNum = 12124170;BA.debugLine="LogColor(\"If Not(Tracker.FLP.IsInitialized) ---"; -anywheresoftware.b4a.keywords.Common.LogImpl("312124170","If Not(Tracker.FLP.IsInitialized) --- "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e10); //BA.debugLineNum = 436;BA.debugLine="LogColor(\"If Not(Tracker.FLP.IsInitialized) ---"; +anywheresoftware.b4a.keywords.Common.LogImpl("348431114","If Not(Tracker.FLP.IsInitialized) --- "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); }; -RDebugUtils.currentLine=12124172; - //BA.debugLineNum = 12124172;BA.debugLine="Try"; -try {RDebugUtils.currentLine=12124173; - //BA.debugLineNum = 12124173;BA.debugLine="If Tracker.FLP.IsInitialized Then"; + //BA.debugLineNum = 438;BA.debugLine="Try"; +try { //BA.debugLineNum = 439;BA.debugLine="If Tracker.FLP.IsInitialized Then"; if (mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .IsInitialized()) { -RDebugUtils.currentLine=12124174; - //BA.debugLineNum = 12124174;BA.debugLine="Try"; -try {RDebugUtils.currentLine=12124175; - //BA.debugLineNum = 12124175;BA.debugLine="If Not(Tracker.FLP.IsConnected) Then"; + //BA.debugLineNum = 440;BA.debugLine="Try"; +try { //BA.debugLineNum = 441;BA.debugLine="If Not(Tracker.FLP.IsConnected) Then"; if (anywheresoftware.b4a.keywords.Common.Not(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .IsConnected())) { -RDebugUtils.currentLine=12124176; - //BA.debugLineNum = 12124176;BA.debugLine="log2DB(\"revisaFLP: No esta conectado ... 'Rec"; + //BA.debugLineNum = 442;BA.debugLine="log2DB(\"revisaFLP: No esta conectado ... 'Rec"; _log2db(_ba,"revisaFLP: No esta conectado ... 'Reconectando FLP'"); -RDebugUtils.currentLine=12124178; - //BA.debugLineNum = 12124178;BA.debugLine="CallSubDelayed(Tracker,\"StartFLP\")"; + //BA.debugLineNum = 444;BA.debugLine="CallSubDelayed(Tracker,\"StartFLP\")"; anywheresoftware.b4a.keywords.Common.CallSubDelayed((_ba.processBA == null ? _ba : _ba.processBA),(Object)(mostCurrent._tracker.getObject()),"StartFLP"); -RDebugUtils.currentLine=12124179; - //BA.debugLineNum = 12124179;BA.debugLine="todoBienFLP = False"; + //BA.debugLineNum = 445;BA.debugLine="todoBienFLP = False"; _todobienflp = anywheresoftware.b4a.keywords.Common.False; }; } catch (Exception e21) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e21);RDebugUtils.currentLine=12124182; - //BA.debugLineNum = 12124182;BA.debugLine="LogColor(\"If Not(Tracker.FLP.IsConnected) -->"; -anywheresoftware.b4a.keywords.Common.LogImpl("312124182","If Not(Tracker.FLP.IsConnected) --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e21); //BA.debugLineNum = 448;BA.debugLine="LogColor(\"If Not(Tracker.FLP.IsConnected) -->"; +anywheresoftware.b4a.keywords.Common.LogImpl("348431126","If Not(Tracker.FLP.IsConnected) --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); }; -RDebugUtils.currentLine=12124184; - //BA.debugLineNum = 12124184;BA.debugLine="Try"; -try {RDebugUtils.currentLine=12124185; - //BA.debugLineNum = 12124185;BA.debugLine="If Tracker.FLP.IsConnected And _ Tracker."; + //BA.debugLineNum = 450;BA.debugLine="Try"; +try { //BA.debugLineNum = 451;BA.debugLine="If Tracker.FLP.IsConnected And _ Tracker."; if (mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .IsConnected() && mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().IsInitialized() && mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().DistanceTo((android.location.Location)(mostCurrent._tracker._uugcoords /*anywheresoftware.b4a.gps.LocationWrapper*/ .getObject()))>500) { -RDebugUtils.currentLine=12124188; - //BA.debugLineNum = 12124188;BA.debugLine="log2DB(\"revisaFLP: 'No se esta actualizando,"; + //BA.debugLineNum = 454;BA.debugLine="log2DB(\"revisaFLP: 'No se esta actualizando,"; _log2db(_ba,"revisaFLP: 'No se esta actualizando, lo reiniciamos ...'"); -RDebugUtils.currentLine=12124189; - //BA.debugLineNum = 12124189;BA.debugLine="StartService(Tracker)"; + //BA.debugLineNum = 455;BA.debugLine="StartService(Tracker)"; anywheresoftware.b4a.keywords.Common.StartService((_ba.processBA == null ? _ba : _ba.processBA),(Object)(mostCurrent._tracker.getObject())); -RDebugUtils.currentLine=12124190; - //BA.debugLineNum = 12124190;BA.debugLine="todoBienFLP = False"; + //BA.debugLineNum = 456;BA.debugLine="todoBienFLP = False"; _todobienflp = anywheresoftware.b4a.keywords.Common.False; }; } catch (Exception e30) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e30);RDebugUtils.currentLine=12124193; - //BA.debugLineNum = 12124193;BA.debugLine="LogColor(\"If FLP.IsConnectctd and FLP.getLKL.I"; -anywheresoftware.b4a.keywords.Common.LogImpl("312124193","If FLP.IsConnectctd and FLP.getLKL.IsInitialized --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e30); //BA.debugLineNum = 459;BA.debugLine="LogColor(\"If FLP.IsConnectctd and FLP.getLKL.I"; +anywheresoftware.b4a.keywords.Common.LogImpl("348431137","If FLP.IsConnectctd and FLP.getLKL.IsInitialized --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); }; }; -RDebugUtils.currentLine=12124196; - //BA.debugLineNum = 12124196;BA.debugLine="If todoBienFLP Then LogColor(\" +++ +++ Sin error"; + //BA.debugLineNum = 462;BA.debugLine="If todoBienFLP Then LogColor(\" +++ +++ Sin error"; if (_todobienflp) { -anywheresoftware.b4a.keywords.Common.LogImpl("312124196"," +++ +++ Sin errores en FLP",anywheresoftware.b4a.keywords.Common.Colors.Green);}; +anywheresoftware.b4a.keywords.Common.LogImpl("348431140"," +++ +++ Sin errores en FLP",anywheresoftware.b4a.keywords.Common.Colors.Green);}; } catch (Exception e35) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e35);RDebugUtils.currentLine=12124198; - //BA.debugLineNum = 12124198;BA.debugLine="LogColor(\"If Tracker.FLP.IsInitialized --> \"&Las"; -anywheresoftware.b4a.keywords.Common.LogImpl("312124198","If Tracker.FLP.IsInitialized --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e35); //BA.debugLineNum = 464;BA.debugLine="LogColor(\"If Tracker.FLP.IsInitialized --> \"&Las"; +anywheresoftware.b4a.keywords.Common.LogImpl("348431142","If Tracker.FLP.IsInitialized --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); }; -RDebugUtils.currentLine=12124201; - //BA.debugLineNum = 12124201;BA.debugLine="End Sub"; + //BA.debugLineNum = 467;BA.debugLine="End Sub"; return ""; } public static int _revisamaxpromosprodsfijosporinventario(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.collections.Map _pm) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "revisamaxpromosprodsfijosporinventario", false)) - {return ((Integer) Debug.delegate(null, "revisamaxpromosprodsfijosporinventario", new Object[] {_ba,_pm}));} boolean _thislog = false; anywheresoftware.b4a.objects.collections.Map _invfijoxpromo = null; anywheresoftware.b4a.objects.collections.List _t = null; @@ -2901,102 +1577,74 @@ anywheresoftware.b4a.objects.collections.List _prodsfijospiezas = null; anywheresoftware.b4a.objects.collections.List _idprodsfijos = null; int _p = 0; String[] _x = null; -RDebugUtils.currentLine=14221312; - //BA.debugLineNum = 14221312;BA.debugLine="Sub revisaMaxPromosProdsFijosPorInventario(pm As M"; -RDebugUtils.currentLine=14221313; - //BA.debugLineNum = 14221313;BA.debugLine="Private thisLog As Boolean = False"; + //BA.debugLineNum = 1081;BA.debugLine="Sub revisaMaxPromosProdsFijosPorInventario(pm As M"; + //BA.debugLineNum = 1082;BA.debugLine="Private thisLog As Boolean = False"; _thislog = anywheresoftware.b4a.keywords.Common.False; -RDebugUtils.currentLine=14221314; - //BA.debugLineNum = 14221314;BA.debugLine="Private invFijoXpromo As Map"; + //BA.debugLineNum = 1083;BA.debugLine="Private invFijoXpromo As Map"; _invfijoxpromo = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=14221315; - //BA.debugLineNum = 14221315;BA.debugLine="Private t As List"; + //BA.debugLineNum = 1084;BA.debugLine="Private t As List"; _t = new anywheresoftware.b4a.objects.collections.List(); -RDebugUtils.currentLine=14221316; - //BA.debugLineNum = 14221316;BA.debugLine="t.Initialize"; + //BA.debugLineNum = 1085;BA.debugLine="t.Initialize"; _t.Initialize(); -RDebugUtils.currentLine=14221317; - //BA.debugLineNum = 14221317;BA.debugLine="t.Add(traeMaxPromos(pm)) ' Agregamos a la lista l"; + //BA.debugLineNum = 1086;BA.debugLine="t.Add(traeMaxPromos(pm)) ' Agregamos a la lista l"; _t.Add((Object)(_traemaxpromos(_ba,_pm))); -RDebugUtils.currentLine=14221318; - //BA.debugLineNum = 14221318;BA.debugLine="invFijoXpromo.Initialize"; + //BA.debugLineNum = 1087;BA.debugLine="invFijoXpromo.Initialize"; _invfijoxpromo.Initialize(); -RDebugUtils.currentLine=14221319; - //BA.debugLineNum = 14221319;BA.debugLine="If thisLog Then LogColor($\"pm=${pm}\"$, Colors.Blu"; + //BA.debugLineNum = 1088;BA.debugLine="If thisLog Then LogColor($\"pm=${pm}\"$, Colors.Blu"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314221319",("pm="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pm.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; -RDebugUtils.currentLine=14221320; - //BA.debugLineNum = 14221320;BA.debugLine="Private invDispParaPromo As Map = traemosInventar"; +anywheresoftware.b4a.keywords.Common.LogImpl("350528263",("pm="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pm.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; + //BA.debugLineNum = 1089;BA.debugLine="Private invDispParaPromo As Map = traemosInventar"; _invdispparapromo = new anywheresoftware.b4a.objects.collections.Map(); _invdispparapromo = _traemosinventariodisponibleparapromo(_ba,BA.ObjectToString(_pm.Get((Object)("id")))); -RDebugUtils.currentLine=14221321; - //BA.debugLineNum = 14221321;BA.debugLine="If thisLog Then Log($\"invDispParaPromo=${invDispP"; + //BA.debugLineNum = 1090;BA.debugLine="If thisLog Then Log($\"invDispParaPromo=${invDispP"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314221321",("invDispParaPromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invdispparapromo.getObject()))+""),0);}; -RDebugUtils.currentLine=14221322; - //BA.debugLineNum = 14221322;BA.debugLine="Private prodsFijosPiezas As List = pm.Get(\"prodsF"; +anywheresoftware.b4a.keywords.Common.LogImpl("350528265",("invDispParaPromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invdispparapromo.getObject()))+""),0);}; + //BA.debugLineNum = 1091;BA.debugLine="Private prodsFijosPiezas As List = pm.Get(\"prodsF"; _prodsfijospiezas = new anywheresoftware.b4a.objects.collections.List(); _prodsfijospiezas = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_pm.Get((Object)("prodsFijosPiezas")))); -RDebugUtils.currentLine=14221323; - //BA.debugLineNum = 14221323;BA.debugLine="Private idProdsFijos As List = pm.Get(\"prodsFijos"; + //BA.debugLineNum = 1092;BA.debugLine="Private idProdsFijos As List = pm.Get(\"prodsFijos"; _idprodsfijos = new anywheresoftware.b4a.objects.collections.List(); _idprodsfijos = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_pm.Get((Object)("prodsFijos")))); -RDebugUtils.currentLine=14221324; - //BA.debugLineNum = 14221324;BA.debugLine="For p = 0 To idProdsFijos.Size -1 'Generamos una"; + //BA.debugLineNum = 1093;BA.debugLine="For p = 0 To idProdsFijos.Size -1 'Generamos una"; { final int step12 = 1; final int limit12 = (int) (_idprodsfijos.getSize()-1); _p = (int) (0) ; for (;_p <= limit12 ;_p = _p + step12 ) { -RDebugUtils.currentLine=14221325; - //BA.debugLineNum = 14221325;BA.debugLine="If thisLog Then Log($\"id=${idProdsFijos.Get(p)},"; + //BA.debugLineNum = 1094;BA.debugLine="If thisLog Then Log($\"id=${idProdsFijos.Get(p)},"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314221325",("id="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_idprodsfijos.Get(_p))+", inv="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_invdispparapromo.Get(_idprodsfijos.Get(_p)))+", pzas="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_prodsfijospiezas.Get(_p))+""),0);}; -RDebugUtils.currentLine=14221326; - //BA.debugLineNum = 14221326;BA.debugLine="If thisLog Then Log($\"${(invDispParaPromo.Get(id"; +anywheresoftware.b4a.keywords.Common.LogImpl("350528269",("id="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_idprodsfijos.Get(_p))+", inv="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_invdispparapromo.Get(_idprodsfijos.Get(_p)))+", pzas="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_prodsfijospiezas.Get(_p))+""),0);}; + //BA.debugLineNum = 1095;BA.debugLine="If thisLog Then Log($\"${(invDispParaPromo.Get(id"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314221326",(""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(((double)(BA.ObjectToNumber(_invdispparapromo.Get(_idprodsfijos.Get(_p))))/(double)(double)(BA.ObjectToNumber(_prodsfijospiezas.Get(_p))))))+""),0);}; -RDebugUtils.currentLine=14221327; - //BA.debugLineNum = 14221327;BA.debugLine="Private x() As String = Regex.Split(\"\\.\", $\"${(i"; +anywheresoftware.b4a.keywords.Common.LogImpl("350528270",(""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(((double)(BA.ObjectToNumber(_invdispparapromo.Get(_idprodsfijos.Get(_p))))/(double)(double)(BA.ObjectToNumber(_prodsfijospiezas.Get(_p))))))+""),0);}; + //BA.debugLineNum = 1096;BA.debugLine="Private x() As String = Regex.Split(\"\\.\", $\"${(i"; _x = anywheresoftware.b4a.keywords.Common.Regex.Split("\\.",(""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(((double)(BA.ObjectToNumber(_invdispparapromo.Get(_idprodsfijos.Get(_p))))/(double)(double)(BA.ObjectToNumber(_prodsfijospiezas.Get(_p))))))+"")); -RDebugUtils.currentLine=14221328; - //BA.debugLineNum = 14221328;BA.debugLine="If thisLog Then Log(x(0))"; + //BA.debugLineNum = 1097;BA.debugLine="If thisLog Then Log(x(0))"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314221328",_x[(int) (0)],0);}; -RDebugUtils.currentLine=14221329; - //BA.debugLineNum = 14221329;BA.debugLine="t.Add(x(0).As(Int)) 'Solo guardamos la parte del"; +anywheresoftware.b4a.keywords.Common.LogImpl("350528272",_x[(int) (0)],0);}; + //BA.debugLineNum = 1098;BA.debugLine="t.Add(x(0).As(Int)) 'Solo guardamos la parte del"; _t.Add((Object)(((int)(Double.parseDouble(_x[(int) (0)]))))); } }; -RDebugUtils.currentLine=14221331; - //BA.debugLineNum = 14221331;BA.debugLine="t.Sort(True) 'Ordenamos la lista para que en el l"; + //BA.debugLineNum = 1100;BA.debugLine="t.Sort(True) 'Ordenamos la lista para que en el l"; _t.Sort(anywheresoftware.b4a.keywords.Common.True); -RDebugUtils.currentLine=14221332; - //BA.debugLineNum = 14221332;BA.debugLine="If thisLog Then LogColor($\"prodsFijos=${idProdsFi"; + //BA.debugLineNum = 1101;BA.debugLine="If thisLog Then LogColor($\"prodsFijos=${idProdsFi"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314221332",("prodsFijos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idprodsfijos.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; -RDebugUtils.currentLine=14221333; - //BA.debugLineNum = 14221333;BA.debugLine="If thisLog Then LogColor($\"prodsFijosPiezasReq=${"; +anywheresoftware.b4a.keywords.Common.LogImpl("350528276",("prodsFijos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idprodsfijos.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; + //BA.debugLineNum = 1102;BA.debugLine="If thisLog Then LogColor($\"prodsFijosPiezasReq=${"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314221333",("prodsFijosPiezasReq="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodsfijospiezas.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; -RDebugUtils.currentLine=14221334; - //BA.debugLineNum = 14221334;BA.debugLine="If thisLog Then LogColor($\"invFijoXpromo=${invFij"; +anywheresoftware.b4a.keywords.Common.LogImpl("350528277",("prodsFijosPiezasReq="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodsfijospiezas.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; + //BA.debugLineNum = 1103;BA.debugLine="If thisLog Then LogColor($\"invFijoXpromo=${invFij"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314221334",("invFijoXpromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invfijoxpromo.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; -RDebugUtils.currentLine=14221335; - //BA.debugLineNum = 14221335;BA.debugLine="LogColor(\"Max promos de prodsFijos POR inventario"; -anywheresoftware.b4a.keywords.Common.LogImpl("314221335","Max promos de prodsFijos POR inventario = "+BA.ObjectToString(_t.Get((int) (0))),anywheresoftware.b4a.keywords.Common.Colors.Red); -RDebugUtils.currentLine=14221336; - //BA.debugLineNum = 14221336;BA.debugLine="Return t.Get(0) 'Regresamos el resultado mas pequ"; +anywheresoftware.b4a.keywords.Common.LogImpl("350528278",("invFijoXpromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invfijoxpromo.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; + //BA.debugLineNum = 1104;BA.debugLine="LogColor(\"Max promos de prodsFijos POR inventario"; +anywheresoftware.b4a.keywords.Common.LogImpl("350528279","Max promos de prodsFijos POR inventario = "+BA.ObjectToString(_t.Get((int) (0))),anywheresoftware.b4a.keywords.Common.Colors.Red); + //BA.debugLineNum = 1105;BA.debugLine="Return t.Get(0) 'Regresamos el resultado mas pequ"; if (true) return (int)(BA.ObjectToNumber(_t.Get((int) (0)))); -RDebugUtils.currentLine=14221337; - //BA.debugLineNum = 14221337;BA.debugLine="End Sub"; + //BA.debugLineNum = 1106;BA.debugLine="End Sub"; return 0; } public static int _revisamaxpromosprodsfijosporinventario2(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.collections.Map _pm) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "revisamaxpromosprodsfijosporinventario2", false)) - {return ((Integer) Debug.delegate(null, "revisamaxpromosprodsfijosporinventario2", new Object[] {_ba,_pm}));} boolean _thislog = false; anywheresoftware.b4a.objects.collections.Map _invdispparapromo = null; String _maxpromos = ""; @@ -3011,148 +1659,110 @@ int _p = 0; int _i = 0; int _q = 0; String _q2 = ""; -RDebugUtils.currentLine=14155776; - //BA.debugLineNum = 14155776;BA.debugLine="Sub revisaMaxPromosProdsFijosPorInventario2(pm As"; -RDebugUtils.currentLine=14155777; - //BA.debugLineNum = 14155777;BA.debugLine="Private thisLog As Boolean = False"; + //BA.debugLineNum = 1038;BA.debugLine="Sub revisaMaxPromosProdsFijosPorInventario2(pm As"; + //BA.debugLineNum = 1039;BA.debugLine="Private thisLog As Boolean = False"; _thislog = anywheresoftware.b4a.keywords.Common.False; -RDebugUtils.currentLine=14155778; - //BA.debugLineNum = 14155778;BA.debugLine="If thisLog Then Log($\"pm=${pm}\"$)"; + //BA.debugLineNum = 1040;BA.debugLine="If thisLog Then Log($\"pm=${pm}\"$)"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314155778",("pm="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pm.getObject()))+""),0);}; -RDebugUtils.currentLine=14155780; - //BA.debugLineNum = 14155780;BA.debugLine="Private invDispParaPromo As Map = traemosInventar"; +anywheresoftware.b4a.keywords.Common.LogImpl("350462722",("pm="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pm.getObject()))+""),0);}; + //BA.debugLineNum = 1042;BA.debugLine="Private invDispParaPromo As Map = traemosInventar"; _invdispparapromo = new anywheresoftware.b4a.objects.collections.Map(); _invdispparapromo = _traemosinventariodisponibleparapromo(_ba,BA.ObjectToString(_pm.Get((Object)("id")))); -RDebugUtils.currentLine=14155781; - //BA.debugLineNum = 14155781;BA.debugLine="If thisLog Then Log($\"invDispParaPromo=${invDispP"; + //BA.debugLineNum = 1043;BA.debugLine="If thisLog Then Log($\"invDispParaPromo=${invDispP"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314155781",("invDispParaPromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invdispparapromo.getObject()))+""),0);}; -RDebugUtils.currentLine=14155782; - //BA.debugLineNum = 14155782;BA.debugLine="Private maxPromos As String = traeMaxPromos(pm)"; +anywheresoftware.b4a.keywords.Common.LogImpl("350462725",("invDispParaPromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invdispparapromo.getObject()))+""),0);}; + //BA.debugLineNum = 1044;BA.debugLine="Private maxPromos As String = traeMaxPromos(pm)"; _maxpromos = BA.NumberToString(_traemaxpromos(_ba,_pm)); -RDebugUtils.currentLine=14155783; - //BA.debugLineNum = 14155783;BA.debugLine="Private maxPromosFijosXinv As Int = 1"; + //BA.debugLineNum = 1045;BA.debugLine="Private maxPromosFijosXinv As Int = 1"; _maxpromosfijosxinv = (int) (1); -RDebugUtils.currentLine=14155784; - //BA.debugLineNum = 14155784;BA.debugLine="Private fpf2, pdp2 As Int"; + //BA.debugLineNum = 1046;BA.debugLine="Private fpf2, pdp2 As Int"; _fpf2 = 0; _pdp2 = 0; -RDebugUtils.currentLine=14155785; - //BA.debugLineNum = 14155785;BA.debugLine="Private salir As Boolean = False"; + //BA.debugLineNum = 1047;BA.debugLine="Private salir As Boolean = False"; _salir = anywheresoftware.b4a.keywords.Common.False; -RDebugUtils.currentLine=14155786; - //BA.debugLineNum = 14155786;BA.debugLine="Private pf As List = pm.Get(\"prodsFijos\")"; + //BA.debugLineNum = 1048;BA.debugLine="Private pf As List = pm.Get(\"prodsFijos\")"; _pf = new anywheresoftware.b4a.objects.collections.List(); _pf = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_pm.Get((Object)("prodsFijos")))); -RDebugUtils.currentLine=14155787; - //BA.debugLineNum = 14155787;BA.debugLine="Private pfp As List = pm.Get(\"prodsFijosPiezas\")"; + //BA.debugLineNum = 1049;BA.debugLine="Private pfp As List = pm.Get(\"prodsFijosPiezas\")"; _pfp = new anywheresoftware.b4a.objects.collections.List(); _pfp = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_pm.Get((Object)("prodsFijosPiezas")))); -RDebugUtils.currentLine=14155788; - //BA.debugLineNum = 14155788;BA.debugLine="If thisLog Then Log($\"maxPromos=${maxPromos}, pro"; + //BA.debugLineNum = 1050;BA.debugLine="If thisLog Then Log($\"maxPromos=${maxPromos}, pro"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314155788",("maxPromos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_maxpromos))+", prodsFijos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pf.getObject()))+", piezas="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pfp.getObject()))+""),0);}; -RDebugUtils.currentLine=14155789; - //BA.debugLineNum = 14155789;BA.debugLine="If thisLog Then LogColor($\"InvFijo disponible=${i"; +anywheresoftware.b4a.keywords.Common.LogImpl("350462732",("maxPromos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_maxpromos))+", prodsFijos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pf.getObject()))+", piezas="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pfp.getObject()))+""),0);}; + //BA.debugLineNum = 1051;BA.debugLine="If thisLog Then LogColor($\"InvFijo disponible=${i"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314155789",("InvFijo disponible="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invdispparapromo.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; -RDebugUtils.currentLine=14155790; - //BA.debugLineNum = 14155790;BA.debugLine="Private invFijoXpromo As Map"; +anywheresoftware.b4a.keywords.Common.LogImpl("350462733",("InvFijo disponible="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invdispparapromo.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; + //BA.debugLineNum = 1052;BA.debugLine="Private invFijoXpromo As Map"; _invfijoxpromo = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=14155791; - //BA.debugLineNum = 14155791;BA.debugLine="invFijoXpromo.Initialize"; + //BA.debugLineNum = 1053;BA.debugLine="invFijoXpromo.Initialize"; _invfijoxpromo.Initialize(); -RDebugUtils.currentLine=14155792; - //BA.debugLineNum = 14155792;BA.debugLine="For p = 0 To pf.Size -1 'Generamos mapa con los p"; + //BA.debugLineNum = 1054;BA.debugLine="For p = 0 To pf.Size -1 'Generamos mapa con los p"; { final int step15 = 1; final int limit15 = (int) (_pf.getSize()-1); _p = (int) (0) ; for (;_p <= limit15 ;_p = _p + step15 ) { -RDebugUtils.currentLine=14155793; - //BA.debugLineNum = 14155793;BA.debugLine="invFijoXpromo.Put(pf.Get(p), pfp.Get(p))"; + //BA.debugLineNum = 1055;BA.debugLine="invFijoXpromo.Put(pf.Get(p), pfp.Get(p))"; _invfijoxpromo.Put(_pf.Get(_p),_pfp.Get(_p)); } }; -RDebugUtils.currentLine=14155795; - //BA.debugLineNum = 14155795;BA.debugLine="If thisLog Then LogColor(\"Inv req. de prods fijos"; + //BA.debugLineNum = 1057;BA.debugLine="If thisLog Then LogColor(\"Inv req. de prods fijos"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314155795","Inv req. de prods fijos x promo"+BA.ObjectToString(_invfijoxpromo),anywheresoftware.b4a.keywords.Common.Colors.Green);}; -RDebugUtils.currentLine=14155796; - //BA.debugLineNum = 14155796;BA.debugLine="For i = 1 To maxPromos 'Revisamos cuantas promoci"; +anywheresoftware.b4a.keywords.Common.LogImpl("350462739","Inv req. de prods fijos x promo"+BA.ObjectToString(_invfijoxpromo),anywheresoftware.b4a.keywords.Common.Colors.Green);}; + //BA.debugLineNum = 1058;BA.debugLine="For i = 1 To maxPromos 'Revisamos cuantas promoci"; { final int step19 = 1; final int limit19 = (int)(Double.parseDouble(_maxpromos)); _i = (int) (1) ; for (;_i <= limit19 ;_i = _i + step19 ) { -RDebugUtils.currentLine=14155797; - //BA.debugLineNum = 14155797;BA.debugLine="If thisLog Then LogColor(\"Prods para promo \" & ("; + //BA.debugLineNum = 1059;BA.debugLine="If thisLog Then LogColor(\"Prods para promo \" & ("; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314155797","Prods para promo "+BA.NumberToString((_i+1)),anywheresoftware.b4a.keywords.Common.Colors.Magenta);}; -RDebugUtils.currentLine=14155798; - //BA.debugLineNum = 14155798;BA.debugLine="For q = 0 To pf.Size - 1"; +anywheresoftware.b4a.keywords.Common.LogImpl("350462741","Prods para promo "+BA.NumberToString((_i+1)),anywheresoftware.b4a.keywords.Common.Colors.Magenta);}; + //BA.debugLineNum = 1060;BA.debugLine="For q = 0 To pf.Size - 1"; { final int step21 = 1; final int limit21 = (int) (_pf.getSize()-1); _q = (int) (0) ; for (;_q <= limit21 ;_q = _q + step21 ) { -RDebugUtils.currentLine=14155799; - //BA.debugLineNum = 14155799;BA.debugLine="Private q2 As String = pf.Get(q)"; + //BA.debugLineNum = 1061;BA.debugLine="Private q2 As String = pf.Get(q)"; _q2 = BA.ObjectToString(_pf.Get(_q)); -RDebugUtils.currentLine=14155800; - //BA.debugLineNum = 14155800;BA.debugLine="If thisLog Then Log(\"q=\"&q2)"; + //BA.debugLineNum = 1062;BA.debugLine="If thisLog Then Log(\"q=\"&q2)"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314155800","q="+_q2,0);}; -RDebugUtils.currentLine=14155802; - //BA.debugLineNum = 14155802;BA.debugLine="fpf2 = pfp.Get(q) * i 'Multiplicamos las piezas"; +anywheresoftware.b4a.keywords.Common.LogImpl("350462744","q="+_q2,0);}; + //BA.debugLineNum = 1064;BA.debugLine="fpf2 = pfp.Get(q) * i 'Multiplicamos las piezas"; _fpf2 = (int) ((double)(BA.ObjectToNumber(_pfp.Get(_q)))*_i); -RDebugUtils.currentLine=14155803; - //BA.debugLineNum = 14155803;BA.debugLine="pdp2 = invDispParaPromo.Get(q2)"; + //BA.debugLineNum = 1065;BA.debugLine="pdp2 = invDispParaPromo.Get(q2)"; _pdp2 = (int)(BA.ObjectToNumber(_invdispparapromo.Get((Object)(_q2)))); -RDebugUtils.currentLine=14155804; - //BA.debugLineNum = 14155804;BA.debugLine="If thisLog Then Log($\"pf=${q2}, Actual=${(i)},"; + //BA.debugLineNum = 1066;BA.debugLine="If thisLog Then Log($\"pf=${q2}, Actual=${(i)},"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314155804",("pf="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_q2))+", Actual="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)((_i)))+", max promos: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pdp2))+"-"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_fpf2))+"="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pdp2-_fpf2))+""),0);}; -RDebugUtils.currentLine=14155805; - //BA.debugLineNum = 14155805;BA.debugLine="If pdp2 - fpf2 < 0 Then 'Si el inventario es ne"; +anywheresoftware.b4a.keywords.Common.LogImpl("350462748",("pf="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_q2))+", Actual="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)((_i)))+", max promos: "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pdp2))+"-"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_fpf2))+"="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pdp2-_fpf2))+""),0);}; + //BA.debugLineNum = 1067;BA.debugLine="If pdp2 - fpf2 < 0 Then 'Si el inventario es ne"; if (_pdp2-_fpf2<0) { -RDebugUtils.currentLine=14155806; - //BA.debugLineNum = 14155806;BA.debugLine="salir=True"; + //BA.debugLineNum = 1068;BA.debugLine="salir=True"; _salir = anywheresoftware.b4a.keywords.Common.True; -RDebugUtils.currentLine=14155807; - //BA.debugLineNum = 14155807;BA.debugLine="Exit"; + //BA.debugLineNum = 1069;BA.debugLine="Exit"; if (true) break; }; } }; -RDebugUtils.currentLine=14155810; - //BA.debugLineNum = 14155810;BA.debugLine="If salir Then Exit"; + //BA.debugLineNum = 1072;BA.debugLine="If salir Then Exit"; if (_salir) { if (true) break;}; -RDebugUtils.currentLine=14155811; - //BA.debugLineNum = 14155811;BA.debugLine="maxPromosFijosXinv = i"; + //BA.debugLineNum = 1073;BA.debugLine="maxPromosFijosXinv = i"; _maxpromosfijosxinv = _i; } }; -RDebugUtils.currentLine=14155813; - //BA.debugLineNum = 14155813;BA.debugLine="If thisLog Then LogColor(\"InvFijo requerido x pro"; + //BA.debugLineNum = 1075;BA.debugLine="If thisLog Then LogColor(\"InvFijo requerido x pro"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314155813","InvFijo requerido x promo="+BA.ObjectToString(_invfijoxpromo),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; -RDebugUtils.currentLine=14155814; - //BA.debugLineNum = 14155814;BA.debugLine="LogColor(\"Maximo de promociones de prodsFijos POR"; -anywheresoftware.b4a.keywords.Common.LogImpl("314155814","Maximo de promociones de prodsFijos POR inventario = "+BA.NumberToString(_maxpromosfijosxinv),anywheresoftware.b4a.keywords.Common.Colors.Red); -RDebugUtils.currentLine=14155815; - //BA.debugLineNum = 14155815;BA.debugLine="Return maxPromosFijosXinv"; +anywheresoftware.b4a.keywords.Common.LogImpl("350462757","InvFijo requerido x promo="+BA.ObjectToString(_invfijoxpromo),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; + //BA.debugLineNum = 1076;BA.debugLine="LogColor(\"Maximo de promociones de prodsFijos POR"; +anywheresoftware.b4a.keywords.Common.LogImpl("350462758","Maximo de promociones de prodsFijos POR inventario = "+BA.NumberToString(_maxpromosfijosxinv),anywheresoftware.b4a.keywords.Common.Colors.Red); + //BA.debugLineNum = 1077;BA.debugLine="Return maxPromosFijosXinv"; if (true) return _maxpromosfijosxinv; -RDebugUtils.currentLine=14155816; - //BA.debugLineNum = 14155816;BA.debugLine="End Sub"; + //BA.debugLineNum = 1078;BA.debugLine="End Sub"; return 0; } public static int _revisamaxpromosprodsvariablesporinventario(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.collections.Map _pm) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "revisamaxpromosprodsvariablesporinventario", false)) - {return ((Integer) Debug.delegate(null, "revisamaxpromosprodsvariablesporinventario", new Object[] {_ba,_pm}));} boolean _thislog = false; anywheresoftware.b4a.objects.collections.Map _invfijoxpromo = null; int _totalprodsvariablesdisponibles = 0; @@ -3170,407 +1780,689 @@ int _pzasreqesteprod = 0; int _maxpromosxvariables = 0; int _x = 0; int _i = 0; -RDebugUtils.currentLine=14286848; - //BA.debugLineNum = 14286848;BA.debugLine="Sub revisaMaxPromosProdsVariablesPorInventario(pm"; -RDebugUtils.currentLine=14286849; - //BA.debugLineNum = 14286849;BA.debugLine="Private thisLog As Boolean = False"; + //BA.debugLineNum = 1113;BA.debugLine="Sub revisaMaxPromosProdsVariablesPorInventario(pm"; + //BA.debugLineNum = 1114;BA.debugLine="Private thisLog As Boolean = False"; _thislog = anywheresoftware.b4a.keywords.Common.False; -RDebugUtils.currentLine=14286850; - //BA.debugLineNum = 14286850;BA.debugLine="If thisLog Then Log(\"============================"; + //BA.debugLineNum = 1115;BA.debugLine="If thisLog Then Log(\"============================"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314286850","======================================================",0);}; -RDebugUtils.currentLine=14286851; - //BA.debugLineNum = 14286851;BA.debugLine="If thisLog Then Log(\"============================"; +anywheresoftware.b4a.keywords.Common.LogImpl("350593794","======================================================",0);}; + //BA.debugLineNum = 1116;BA.debugLine="If thisLog Then Log(\"============================"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314286851","======================================================",0);}; -RDebugUtils.currentLine=14286852; - //BA.debugLineNum = 14286852;BA.debugLine="Private invFijoXpromo As Map"; +anywheresoftware.b4a.keywords.Common.LogImpl("350593795","======================================================",0);}; + //BA.debugLineNum = 1117;BA.debugLine="Private invFijoXpromo As Map"; _invfijoxpromo = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=14286853; - //BA.debugLineNum = 14286853;BA.debugLine="invFijoXpromo.Initialize"; + //BA.debugLineNum = 1118;BA.debugLine="invFijoXpromo.Initialize"; _invfijoxpromo.Initialize(); -RDebugUtils.currentLine=14286854; - //BA.debugLineNum = 14286854;BA.debugLine="Private totalProdsVariablesDisponibles As Int = 0"; + //BA.debugLineNum = 1119;BA.debugLine="Private totalProdsVariablesDisponibles As Int = 0"; _totalprodsvariablesdisponibles = (int) (0); -RDebugUtils.currentLine=14286855; - //BA.debugLineNum = 14286855;BA.debugLine="If thisLog Then LogColor($\"pm=${pm}\"$, Colors.Blu"; + //BA.debugLineNum = 1120;BA.debugLine="If thisLog Then LogColor($\"pm=${pm}\"$, Colors.Blu"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314286855",("pm="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pm.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; -RDebugUtils.currentLine=14286856; - //BA.debugLineNum = 14286856;BA.debugLine="Private invDispParaPromo As Map = traemosInventar"; +anywheresoftware.b4a.keywords.Common.LogImpl("350593799",("pm="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pm.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; + //BA.debugLineNum = 1121;BA.debugLine="Private invDispParaPromo As Map = traemosInventar"; _invdispparapromo = new anywheresoftware.b4a.objects.collections.Map(); _invdispparapromo = _traemosinventariodisponibleparapromo(_ba,BA.ObjectToString(_pm.Get((Object)("id")))); -RDebugUtils.currentLine=14286857; - //BA.debugLineNum = 14286857;BA.debugLine="If thisLog Then Log($\"invDispParaPromo=${invDispP"; + //BA.debugLineNum = 1122;BA.debugLine="If thisLog Then Log($\"invDispParaPromo=${invDispP"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314286857",("invDispParaPromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invdispparapromo.getObject()))+""),0);}; -RDebugUtils.currentLine=14286858; - //BA.debugLineNum = 14286858;BA.debugLine="Private maxPromos As String = traeMaxPromos(pm)"; +anywheresoftware.b4a.keywords.Common.LogImpl("350593801",("invDispParaPromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invdispparapromo.getObject()))+""),0);}; + //BA.debugLineNum = 1123;BA.debugLine="Private maxPromos As String = traeMaxPromos(pm)"; _maxpromos = BA.NumberToString(_traemaxpromos(_ba,_pm)); -RDebugUtils.currentLine=14286859; - //BA.debugLineNum = 14286859;BA.debugLine="Private maxPromosXFijos As Int = revisaMaxPromosP"; + //BA.debugLineNum = 1124;BA.debugLine="Private maxPromosXFijos As Int = revisaMaxPromosP"; _maxpromosxfijos = _revisamaxpromosprodsfijosporinventario(_ba,_pm); -RDebugUtils.currentLine=14286860; - //BA.debugLineNum = 14286860;BA.debugLine="Private idProdsVariables As List = pm.Get(\"prodsV"; + //BA.debugLineNum = 1125;BA.debugLine="Private idProdsVariables As List = pm.Get(\"prodsV"; _idprodsvariables = new anywheresoftware.b4a.objects.collections.List(); _idprodsvariables = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_pm.Get((Object)("prodsVariables")))); -RDebugUtils.currentLine=14286861; - //BA.debugLineNum = 14286861;BA.debugLine="Private prodsVariablesRequeridos As Int = pm.Get("; + //BA.debugLineNum = 1126;BA.debugLine="Private prodsVariablesRequeridos As Int = pm.Get("; _prodsvariablesrequeridos = (int)(BA.ObjectToNumber(_pm.Get((Object)("prodsVariablesRequeridos")))); -RDebugUtils.currentLine=14286862; - //BA.debugLineNum = 14286862;BA.debugLine="Private prodsFijosPiezas As List = pm.Get(\"prodsF"; + //BA.debugLineNum = 1127;BA.debugLine="Private prodsFijosPiezas As List = pm.Get(\"prodsF"; _prodsfijospiezas = new anywheresoftware.b4a.objects.collections.List(); _prodsfijospiezas = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_pm.Get((Object)("prodsFijosPiezas")))); -RDebugUtils.currentLine=14286863; - //BA.debugLineNum = 14286863;BA.debugLine="Private idProdsFijos As List = pm.Get(\"prodsFijos"; + //BA.debugLineNum = 1128;BA.debugLine="Private idProdsFijos As List = pm.Get(\"prodsFijos"; _idprodsfijos = new anywheresoftware.b4a.objects.collections.List(); _idprodsfijos = (anywheresoftware.b4a.objects.collections.List) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.collections.List(), (java.util.List)(_pm.Get((Object)("prodsFijos")))); -RDebugUtils.currentLine=14286864; - //BA.debugLineNum = 14286864;BA.debugLine="For p = 0 To idProdsFijos.Size -1 'Generamos mapa"; + //BA.debugLineNum = 1129;BA.debugLine="For p = 0 To idProdsFijos.Size -1 'Generamos mapa"; { final int step16 = 1; final int limit16 = (int) (_idprodsfijos.getSize()-1); _p = (int) (0) ; for (;_p <= limit16 ;_p = _p + step16 ) { -RDebugUtils.currentLine=14286865; - //BA.debugLineNum = 14286865;BA.debugLine="invFijoXpromo.Put(idProdsFijos.Get(p), prodsFijo"; + //BA.debugLineNum = 1130;BA.debugLine="invFijoXpromo.Put(idProdsFijos.Get(p), prodsFijo"; _invfijoxpromo.Put(_idprodsfijos.Get(_p),_prodsfijospiezas.Get(_p)); -RDebugUtils.currentLine=14286866; - //BA.debugLineNum = 14286866;BA.debugLine="Private idEsteProd As String = idProdsFijos.Get("; + //BA.debugLineNum = 1131;BA.debugLine="Private idEsteProd As String = idProdsFijos.Get("; _idesteprod = BA.ObjectToString(_idprodsfijos.Get(_p)); -RDebugUtils.currentLine=14286867; - //BA.debugLineNum = 14286867;BA.debugLine="Private invEsteProd As Int = invDispParaPromo.Ge"; + //BA.debugLineNum = 1132;BA.debugLine="Private invEsteProd As Int = invDispParaPromo.Ge"; _investeprod = (int)(BA.ObjectToNumber(_invdispparapromo.Get((Object)(_idesteprod)))); -RDebugUtils.currentLine=14286868; - //BA.debugLineNum = 14286868;BA.debugLine="Private pzasReqEsteProd As Int = prodsFijosPieza"; + //BA.debugLineNum = 1133;BA.debugLine="Private pzasReqEsteProd As Int = prodsFijosPieza"; _pzasreqesteprod = (int)(BA.ObjectToNumber(_prodsfijospiezas.Get(_p))); -RDebugUtils.currentLine=14286869; - //BA.debugLineNum = 14286869;BA.debugLine="If thisLog Then Log($\"id=${idEsteProd}, inv=${in"; + //BA.debugLineNum = 1134;BA.debugLine="If thisLog Then Log($\"id=${idEsteProd}, inv=${in"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314286869",("id="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idesteprod))+", inv="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_investeprod))+", pzas="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pzasreqesteprod))+""),0);}; +anywheresoftware.b4a.keywords.Common.LogImpl("350593813",("id="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idesteprod))+", inv="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_investeprod))+", pzas="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_pzasreqesteprod))+""),0);}; } }; -RDebugUtils.currentLine=14286872; - //BA.debugLineNum = 14286872;BA.debugLine="If thisLog Then LogColor($\"MaxPromos=${maxPromos}"; + //BA.debugLineNum = 1137;BA.debugLine="If thisLog Then LogColor($\"MaxPromos=${maxPromos}"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314286872",("MaxPromos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_maxpromos))+", promosXFijos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_maxpromosxfijos))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; -RDebugUtils.currentLine=14286873; - //BA.debugLineNum = 14286873;BA.debugLine="If thisLog Then LogColor($\"prodsFijos=${idProdsFi"; +anywheresoftware.b4a.keywords.Common.LogImpl("350593816",("MaxPromos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_maxpromos))+", promosXFijos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_maxpromosxfijos))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; + //BA.debugLineNum = 1138;BA.debugLine="If thisLog Then LogColor($\"prodsFijos=${idProdsFi"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314286873",("prodsFijos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idprodsfijos.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; -RDebugUtils.currentLine=14286874; - //BA.debugLineNum = 14286874;BA.debugLine="If thisLog Then LogColor($\"prodsFijosPiezasReq=${"; +anywheresoftware.b4a.keywords.Common.LogImpl("350593817",("prodsFijos="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idprodsfijos.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; + //BA.debugLineNum = 1139;BA.debugLine="If thisLog Then LogColor($\"prodsFijosPiezasReq=${"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314286874",("prodsFijosPiezasReq="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodsfijospiezas.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; -RDebugUtils.currentLine=14286875; - //BA.debugLineNum = 14286875;BA.debugLine="If thisLog Then LogColor($\"prodsVariables=${idPro"; +anywheresoftware.b4a.keywords.Common.LogImpl("350593818",("prodsFijosPiezasReq="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodsfijospiezas.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; + //BA.debugLineNum = 1140;BA.debugLine="If thisLog Then LogColor($\"prodsVariables=${idPro"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314286875",("prodsVariables="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idprodsvariables.getObject()))+""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(anywheresoftware.b4a.keywords.Common.CRLF))+"Variables Req="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodsvariablesrequeridos))+" "),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; -RDebugUtils.currentLine=14286876; - //BA.debugLineNum = 14286876;BA.debugLine="If thisLog Then LogColor($\"invFijoXpromo=${invFij"; +anywheresoftware.b4a.keywords.Common.LogImpl("350593819",("prodsVariables="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_idprodsvariables.getObject()))+""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(anywheresoftware.b4a.keywords.Common.CRLF))+"Variables Req="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodsvariablesrequeridos))+" "),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; + //BA.debugLineNum = 1141;BA.debugLine="If thisLog Then LogColor($\"invFijoXpromo=${invFij"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314286876",("invFijoXpromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invfijoxpromo.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; -RDebugUtils.currentLine=14286877; - //BA.debugLineNum = 14286877;BA.debugLine="If thisLog Then Log($\"Prods variables disponibles"; +anywheresoftware.b4a.keywords.Common.LogImpl("350593820",("invFijoXpromo="+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_invfijoxpromo.getObject()))+""),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; + //BA.debugLineNum = 1142;BA.debugLine="If thisLog Then Log($\"Prods variables disponibles"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314286877",("Prods variables disponibles = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_totalprodsvariablesdisponibles))+""),0);}; -RDebugUtils.currentLine=14286878; - //BA.debugLineNum = 14286878;BA.debugLine="Private maxPromosXVariables As Int = 0"; +anywheresoftware.b4a.keywords.Common.LogImpl("350593821",("Prods variables disponibles = "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_totalprodsvariablesdisponibles))+""),0);}; + //BA.debugLineNum = 1143;BA.debugLine="Private maxPromosXVariables As Int = 0"; _maxpromosxvariables = (int) (0); -RDebugUtils.currentLine=14286879; - //BA.debugLineNum = 14286879;BA.debugLine="For x = 1 To maxPromosXFijos"; + //BA.debugLineNum = 1144;BA.debugLine="For x = 1 To maxPromosXFijos"; { final int step30 = 1; final int limit30 = _maxpromosxfijos; _x = (int) (1) ; for (;_x <= limit30 ;_x = _x + step30 ) { -RDebugUtils.currentLine=14286880; - //BA.debugLineNum = 14286880;BA.debugLine="If thisLog Then Log(\"==========================="; + //BA.debugLineNum = 1145;BA.debugLine="If thisLog Then Log(\"==========================="; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314286880","=====================================================",0);}; -RDebugUtils.currentLine=14286881; - //BA.debugLineNum = 14286881;BA.debugLine="If thisLog Then Log(\"==========================="; +anywheresoftware.b4a.keywords.Common.LogImpl("350593824","=====================================================",0);}; + //BA.debugLineNum = 1146;BA.debugLine="If thisLog Then Log(\"==========================="; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314286881","=====================================================",0);}; -RDebugUtils.currentLine=14286882; - //BA.debugLineNum = 14286882;BA.debugLine="For i = 0 To idProdsFijos.Size - 1"; +anywheresoftware.b4a.keywords.Common.LogImpl("350593825","=====================================================",0);}; + //BA.debugLineNum = 1147;BA.debugLine="For i = 0 To idProdsFijos.Size - 1"; { final int step33 = 1; final int limit33 = (int) (_idprodsfijos.getSize()-1); _i = (int) (0) ; for (;_i <= limit33 ;_i = _i + step33 ) { -RDebugUtils.currentLine=14286883; - //BA.debugLineNum = 14286883;BA.debugLine="If thisLog Then Log($\"FIJO - ${idProdsFijos.Get"; + //BA.debugLineNum = 1148;BA.debugLine="If thisLog Then Log($\"FIJO - ${idProdsFijos.Get"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314286883",("FIJO - "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_idprodsfijos.Get(_i))+", "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_invdispparapromo.Get(_idprodsfijos.Get(_i)))+" - "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(((int)(BA.ObjectToNumber(_prodsfijospiezas.Get(_i))))*(_i+1)))+""),0);}; -RDebugUtils.currentLine=14286884; - //BA.debugLineNum = 14286884;BA.debugLine="invDispParaPromo.Put(idProdsFijos.Get(i), invDi"; +anywheresoftware.b4a.keywords.Common.LogImpl("350593827",("FIJO - "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_idprodsfijos.Get(_i))+", "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",_invdispparapromo.Get(_idprodsfijos.Get(_i)))+" - "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(((int)(BA.ObjectToNumber(_prodsfijospiezas.Get(_i))))*(_i+1)))+""),0);}; + //BA.debugLineNum = 1149;BA.debugLine="invDispParaPromo.Put(idProdsFijos.Get(i), invDi"; _invdispparapromo.Put(_idprodsfijos.Get(_i),(Object)(((int)(BA.ObjectToNumber(_invdispparapromo.Get(_idprodsfijos.Get(_i)))))-((int)(BA.ObjectToNumber(_prodsfijospiezas.Get(_i))))*(_i+1))); } }; -RDebugUtils.currentLine=14286886; - //BA.debugLineNum = 14286886;BA.debugLine="If thisLog Then LogColor(\"Inv disponible despues"; + //BA.debugLineNum = 1151;BA.debugLine="If thisLog Then LogColor(\"Inv disponible despues"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314286886","Inv disponible despues de restar fijos = "+BA.ObjectToString(_invdispparapromo),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; -RDebugUtils.currentLine=14286888; - //BA.debugLineNum = 14286888;BA.debugLine="totalProdsVariablesDisponibles = 0"; +anywheresoftware.b4a.keywords.Common.LogImpl("350593830","Inv disponible despues de restar fijos = "+BA.ObjectToString(_invdispparapromo),anywheresoftware.b4a.keywords.Common.Colors.Blue);}; + //BA.debugLineNum = 1153;BA.debugLine="totalProdsVariablesDisponibles = 0"; _totalprodsvariablesdisponibles = (int) (0); -RDebugUtils.currentLine=14286889; - //BA.debugLineNum = 14286889;BA.debugLine="For i = 0 To idProdsVariables.Size - 1 'Obtenemo"; + //BA.debugLineNum = 1154;BA.debugLine="For i = 0 To idProdsVariables.Size - 1 'Obtenemo"; { final int step39 = 1; final int limit39 = (int) (_idprodsvariables.getSize()-1); _i = (int) (0) ; for (;_i <= limit39 ;_i = _i + step39 ) { -RDebugUtils.currentLine=14286890; - //BA.debugLineNum = 14286890;BA.debugLine="If invDispParaPromo.ContainsKey(idProdsVariable"; + //BA.debugLineNum = 1155;BA.debugLine="If invDispParaPromo.ContainsKey(idProdsVariable"; if (_invdispparapromo.ContainsKey(_idprodsvariables.Get(_i))) { -RDebugUtils.currentLine=14286891; - //BA.debugLineNum = 14286891;BA.debugLine="totalProdsVariablesDisponibles = totalProdsVar"; + //BA.debugLineNum = 1156;BA.debugLine="totalProdsVariablesDisponibles = totalProdsVar"; _totalprodsvariablesdisponibles = (int) (_totalprodsvariablesdisponibles+(double)(BA.ObjectToNumber(_invdispparapromo.Get(_idprodsvariables.Get(_i))))); }; } }; -RDebugUtils.currentLine=14286895; - //BA.debugLineNum = 14286895;BA.debugLine="If thisLog Then Log($\"Var disponibles - var req"; + //BA.debugLineNum = 1160;BA.debugLine="If thisLog Then Log($\"Var disponibles - var req"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314286895",("Var disponibles - var requeridos : "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_totalprodsvariablesdisponibles))+" - "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodsvariablesrequeridos*_x))+""),0);}; -RDebugUtils.currentLine=14286896; - //BA.debugLineNum = 14286896;BA.debugLine="totalProdsVariablesDisponibles = totalProdsVaria"; +anywheresoftware.b4a.keywords.Common.LogImpl("350593839",("Var disponibles - var requeridos : "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_totalprodsvariablesdisponibles))+" - "+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_prodsvariablesrequeridos*_x))+""),0);}; + //BA.debugLineNum = 1161;BA.debugLine="totalProdsVariablesDisponibles = totalProdsVaria"; _totalprodsvariablesdisponibles = (int) (_totalprodsvariablesdisponibles-(_prodsvariablesrequeridos*_x)); -RDebugUtils.currentLine=14286897; - //BA.debugLineNum = 14286897;BA.debugLine="If thisLog Then Log(\"prodsVariables disponibles"; + //BA.debugLineNum = 1162;BA.debugLine="If thisLog Then Log(\"prodsVariables disponibles"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314286897","prodsVariables disponibles despues de promo = "+BA.NumberToString(_totalprodsvariablesdisponibles),0);}; -RDebugUtils.currentLine=14286898; - //BA.debugLineNum = 14286898;BA.debugLine="If totalProdsVariablesDisponibles < 0 Then Exit"; +anywheresoftware.b4a.keywords.Common.LogImpl("350593841","prodsVariables disponibles despues de promo = "+BA.NumberToString(_totalprodsvariablesdisponibles),0);}; + //BA.debugLineNum = 1163;BA.debugLine="If totalProdsVariablesDisponibles < 0 Then Exit"; if (_totalprodsvariablesdisponibles<0) { if (true) break;}; -RDebugUtils.currentLine=14286899; - //BA.debugLineNum = 14286899;BA.debugLine="maxPromosXVariables = x"; + //BA.debugLineNum = 1164;BA.debugLine="maxPromosXVariables = x"; _maxpromosxvariables = _x; } }; -RDebugUtils.currentLine=14286902; - //BA.debugLineNum = 14286902;BA.debugLine="If thisLog Then LogColor(\"Max promos de prodsVari"; + //BA.debugLineNum = 1167;BA.debugLine="If thisLog Then LogColor(\"Max promos de prodsVari"; if (_thislog) { -anywheresoftware.b4a.keywords.Common.LogImpl("314286902","Max promos de prodsVariables POR inventario = "+BA.NumberToString(_maxpromosxvariables),anywheresoftware.b4a.keywords.Common.Colors.Red);}; -RDebugUtils.currentLine=14286903; - //BA.debugLineNum = 14286903;BA.debugLine="Return maxPromosXVariables"; +anywheresoftware.b4a.keywords.Common.LogImpl("350593846","Max promos de prodsVariables POR inventario = "+BA.NumberToString(_maxpromosxvariables),anywheresoftware.b4a.keywords.Common.Colors.Red);}; + //BA.debugLineNum = 1168;BA.debugLine="Return maxPromosXVariables"; if (true) return _maxpromosxvariables; -RDebugUtils.currentLine=14286904; - //BA.debugLineNum = 14286904;BA.debugLine="End Sub"; + //BA.debugLineNum = 1169;BA.debugLine="End Sub"; return 0; } public static String _revisauug(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "revisauug", false)) - {return ((String) Debug.delegate(null, "revisauug", new Object[] {_ba}));} int _daa = 0; -RDebugUtils.currentLine=12058624; - //BA.debugLineNum = 12058624;BA.debugLine="Sub revisaUUG 'ignore"; -RDebugUtils.currentLine=12058625; - //BA.debugLineNum = 12058625;BA.debugLine="Try"; -try {RDebugUtils.currentLine=12058627; - //BA.debugLineNum = 12058627;BA.debugLine="If Tracker.FLP.GetLastKnownLocation.IsInitialize"; + //BA.debugLineNum = 408;BA.debugLine="Sub revisaUUG 'ignore"; + //BA.debugLineNum = 409;BA.debugLine="Try"; +try { //BA.debugLineNum = 411;BA.debugLine="If Tracker.FLP.GetLastKnownLocation.IsInitialize"; if (mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().IsInitialized()) { -RDebugUtils.currentLine=12058628; - //BA.debugLineNum = 12058628;BA.debugLine="Dim daa As Int = Tracker.UUGCoords.DistanceTo(T"; + //BA.debugLineNum = 412;BA.debugLine="Dim daa As Int = Tracker.UUGCoords.DistanceTo(T"; _daa = (int) (mostCurrent._tracker._uugcoords /*anywheresoftware.b4a.gps.LocationWrapper*/ .DistanceTo((android.location.Location)(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getObject()))); -RDebugUtils.currentLine=12058629; - //BA.debugLineNum = 12058629;BA.debugLine="If Starter.Logger Then LogColor($\"**** UUC \"${f"; + //BA.debugLineNum = 413;BA.debugLine="If Starter.Logger Then LogColor($\"**** UUC \"${f"; if (mostCurrent._starter._logger /*boolean*/ ) { -anywheresoftware.b4a.keywords.Common.LogImpl("312058629",("**** UUC \""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_fechakmt(_ba,BA.NumberToString(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getTime()))))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.2",(Object)(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getAccuracy()))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.8",(Object)(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getLatitude()))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.8",(Object)(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getLongitude()))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.2",(Object)(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getSpeed()))+"|"),anywheresoftware.b4a.keywords.Common.Colors.RGB((int) (255),(int) (112),(int) (35)));}; -RDebugUtils.currentLine=12058630; - //BA.debugLineNum = 12058630;BA.debugLine="If daa > 40 And Tracker.FLP.GetLastKnownLocatio"; +anywheresoftware.b4a.keywords.Common.LogImpl("348365573",("**** UUC \""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_fechakmt(_ba,BA.NumberToString(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getTime()))))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.2",(Object)(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getAccuracy()))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.8",(Object)(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getLatitude()))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.8",(Object)(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getLongitude()))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.2",(Object)(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getSpeed()))+"|"),anywheresoftware.b4a.keywords.Common.Colors.RGB((int) (255),(int) (112),(int) (35)));}; + //BA.debugLineNum = 414;BA.debugLine="If daa > 40 And Tracker.FLP.GetLastKnownLocatio"; if (_daa>40 && mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getAccuracy()<35) { -RDebugUtils.currentLine=12058631; - //BA.debugLineNum = 12058631;BA.debugLine="kmt.ExecNonQuery2(\"INSERT INTO RUTA_GPS(fecha,"; + //BA.debugLineNum = 415;BA.debugLine="kmt.ExecNonQuery2(\"INSERT INTO RUTA_GPS(fecha,"; _kmt.ExecNonQuery2("INSERT INTO RUTA_GPS(fecha, lat, lon) VALUES (?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_fechakmt(_ba,BA.NumberToString(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getTime()))),(Object)(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getLatitude()),(Object)(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getLongitude())})); -RDebugUtils.currentLine=12058632; - //BA.debugLineNum = 12058632;BA.debugLine="If Starter.Logger Then Log(\"++++ Distancia a a"; + //BA.debugLineNum = 416;BA.debugLine="If Starter.Logger Then Log(\"++++ Distancia a a"; if (mostCurrent._starter._logger /*boolean*/ ) { -anywheresoftware.b4a.keywords.Common.LogImpl("312058632","++++ Distancia a anterior="+BA.NumberToString(_daa)+"|"+"Precision="+BA.NumberToString(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getAccuracy()),0);}; +anywheresoftware.b4a.keywords.Common.LogImpl("348365576","++++ Distancia a anterior="+BA.NumberToString(_daa)+"|"+"Precision="+BA.NumberToString(mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation().getAccuracy()),0);}; }; -RDebugUtils.currentLine=12058634; - //BA.debugLineNum = 12058634;BA.debugLine="Tracker.UUGCoords = Tracker.FLP.GetLastKnownLoc"; + //BA.debugLineNum = 418;BA.debugLine="Tracker.UUGCoords = Tracker.FLP.GetLastKnownLoc"; mostCurrent._tracker._uugcoords /*anywheresoftware.b4a.gps.LocationWrapper*/ = mostCurrent._tracker._flp /*uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper*/ .GetLastKnownLocation(); }; } catch (Exception e12) { - (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e12);RDebugUtils.currentLine=12058637; - //BA.debugLineNum = 12058637;BA.debugLine="LogColor(\"If Tracker.FLP.GetLastKnownLocation.Is"; -anywheresoftware.b4a.keywords.Common.LogImpl("312058637","If Tracker.FLP.GetLastKnownLocation.IsInitialized --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); + (_ba.processBA == null ? _ba : _ba.processBA).setLastException(e12); //BA.debugLineNum = 421;BA.debugLine="LogColor(\"If Tracker.FLP.GetLastKnownLocation.Is"; +anywheresoftware.b4a.keywords.Common.LogImpl("348365581","If Tracker.FLP.GetLastKnownLocation.IsInitialized --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(_ba)),anywheresoftware.b4a.keywords.Common.Colors.Red); }; -RDebugUtils.currentLine=12058639; - //BA.debugLineNum = 12058639;BA.debugLine="End Sub"; + //BA.debugLineNum = 423;BA.debugLine="End Sub"; +return ""; +} +public static String _traealmacen(anywheresoftware.b4a.BA _ba) throws Exception{ +anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; +String _a = ""; + //BA.debugLineNum = 694;BA.debugLine="Sub traeAlmacen As String 'ignore"; + //BA.debugLineNum = 695;BA.debugLine="Private c As Cursor"; +_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); + //BA.debugLineNum = 696;BA.debugLine="Private a As String"; +_a = ""; + //BA.debugLineNum = 697;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select ID_AL"; +_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select ID_ALMACEN from CAT_ALMACEN"))); + //BA.debugLineNum = 698;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 699;BA.debugLine="a = C.GetString(\"ID_ALMACEN\")"; +_a = _c.GetString("ID_ALMACEN"); + //BA.debugLineNum = 700;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 701;BA.debugLine="Return a"; +if (true) return _a; + //BA.debugLineNum = 702;BA.debugLine="End Sub"; +return ""; +} +public static String _traecliente(anywheresoftware.b4a.BA _ba) throws Exception{ +anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; +String _cl = ""; + //BA.debugLineNum = 734;BA.debugLine="Sub traeCliente As String 'ignore"; + //BA.debugLineNum = 735;BA.debugLine="Private c As Cursor"; +_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); + //BA.debugLineNum = 736;BA.debugLine="Private cl As String"; +_cl = ""; + //BA.debugLineNum = 737;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"Select CUENTA"; +_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("Select CUENTA from cuentaa"))); + //BA.debugLineNum = 738;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 739;BA.debugLine="cl = c.GetString(\"CUENTA\")"; +_cl = _c.GetString("CUENTA"); + //BA.debugLineNum = 740;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 741;BA.debugLine="Return cl"; +if (true) return _cl; + //BA.debugLineNum = 742;BA.debugLine="End Sub"; return ""; } public static String _traefecha(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "traefecha", false)) - {return ((String) Debug.delegate(null, "traefecha", new Object[] {_ba}));} String _sdate = ""; String _stime = ""; -RDebugUtils.currentLine=13369344; - //BA.debugLineNum = 13369344;BA.debugLine="Sub traeFecha As String 'ignore"; -RDebugUtils.currentLine=13369345; - //BA.debugLineNum = 13369345;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; + //BA.debugLineNum = 744;BA.debugLine="Sub traeFecha As String 'ignore"; + //BA.debugLineNum = 745;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat("MM/dd/yyyy"); -RDebugUtils.currentLine=13369346; - //BA.debugLineNum = 13369346;BA.debugLine="Private sDate As String =DateTime.Date(DateTime.N"; + //BA.debugLineNum = 746;BA.debugLine="Private sDate As String =DateTime.Date(DateTime.N"; _sdate = anywheresoftware.b4a.keywords.Common.DateTime.Date(anywheresoftware.b4a.keywords.Common.DateTime.getNow()); -RDebugUtils.currentLine=13369347; - //BA.debugLineNum = 13369347;BA.debugLine="Private sTime As String =DateTime.Time(DateTime.N"; + //BA.debugLineNum = 747;BA.debugLine="Private sTime As String =DateTime.Time(DateTime.N"; _stime = anywheresoftware.b4a.keywords.Common.DateTime.Time(anywheresoftware.b4a.keywords.Common.DateTime.getNow()); -RDebugUtils.currentLine=13369348; - //BA.debugLineNum = 13369348;BA.debugLine="Return sDate & sTime"; + //BA.debugLineNum = 748;BA.debugLine="Return sDate & sTime"; if (true) return _sdate+_stime; -RDebugUtils.currentLine=13369349; - //BA.debugLineNum = 13369349;BA.debugLine="End Sub"; + //BA.debugLineNum = 749;BA.debugLine="End Sub"; return ""; } -public static String _traenombreclientev(anywheresoftware.b4a.BA _ba,String _id) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "traenombreclientev", false)) - {return ((String) Debug.delegate(null, "traenombreclientev", new Object[] {_ba,_id}));} +public static int _traemaxpromos(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.collections.Map _pm) throws Exception{ +boolean _thislog = false; +anywheresoftware.b4a.objects.collections.List _maxpromos = null; +int _vendidas = 0; +anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; + //BA.debugLineNum = 964;BA.debugLine="Sub traeMaxPromos(pm As Map) As Int"; + //BA.debugLineNum = 965;BA.debugLine="Private thisLog As Boolean = False 'Si es verdade"; +_thislog = anywheresoftware.b4a.keywords.Common.False; + //BA.debugLineNum = 966;BA.debugLine="Private maxPromos As List"; +_maxpromos = new anywheresoftware.b4a.objects.collections.List(); + //BA.debugLineNum = 967;BA.debugLine="Private vendidas As Int = 0"; +_vendidas = (int) (0); + //BA.debugLineNum = 968;BA.debugLine="maxPromos.Initialize"; +_maxpromos.Initialize(); + //BA.debugLineNum = 970;BA.debugLine="If thisLog Then Log(pm)"; +if (_thislog) { +anywheresoftware.b4a.keywords.Common.LogImpl("350266118",BA.ObjectToString(_pm),0);}; + //BA.debugLineNum = 971;BA.debugLine="If pm.Get(\"historico\") = \"1\" Then maxPromos.Add(p"; +if ((_pm.Get((Object)("historico"))).equals((Object)("1"))) { +_maxpromos.Add(_pm.Get((Object)("maxRecurrente")));}; + //BA.debugLineNum = 972;BA.debugLine="maxPromos.Add(pm.Get(\"maxPromos\")) 'Agregamos max"; +_maxpromos.Add(_pm.Get((Object)("maxPromos"))); + //BA.debugLineNum = 973;BA.debugLine="maxPromos.Add(pm.Get(\"maxXcliente\")) 'Agregamos m"; +_maxpromos.Add(_pm.Get((Object)("maxXcliente"))); + //BA.debugLineNum = 974;BA.debugLine="maxPromos.Sort(True)"; +_maxpromos.Sort(anywheresoftware.b4a.keywords.Common.True); + //BA.debugLineNum = 977;BA.debugLine="Private c As Cursor = B4XPages.MainPage.skmt.Exec"; +_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); +_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery2("select sum(PE_CANT) as vendidas from PEDIDO where PE_PROID = ? and PE_CLIENTE = ? ",new String[]{(BA.ObjectToString(_pm.Get((Object)("id")))).trim(),_traecliente(_ba).trim()}))); + //BA.debugLineNum = 978;BA.debugLine="If c.RowCount > 0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 979;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 980;BA.debugLine="vendidas = c.GetInt(\"vendidas\")"; +_vendidas = _c.GetInt("vendidas"); + }; + //BA.debugLineNum = 987;BA.debugLine="Return maxPromos.Get(0) - vendidas 'Regresamos el"; +if (true) return (int) ((double)(BA.ObjectToNumber(_maxpromos.Get((int) (0))))-_vendidas); + //BA.debugLineNum = 988;BA.debugLine="End Sub"; +return 0; +} +public static anywheresoftware.b4a.objects.collections.Map _traemosinventariodisponibleparapromo(anywheresoftware.b4a.BA _ba,String _promo) throws Exception{ +anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; +anywheresoftware.b4a.objects.collections.Map _prods = null; +int _i = 0; + //BA.debugLineNum = 887;BA.debugLine="Sub traemosInventarioDisponibleParaPromo(promo As"; + //BA.debugLineNum = 888;BA.debugLine="Private c As Cursor"; +_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); + //BA.debugLineNum = 889;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery2(\"SELECT CAT"; +_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery2("SELECT CAT_GP_ID, CAT_GP_ALMACEN FROM CAT_GUNAPROD WHERE CAT_GP_ID IN (select CAT_DP_IDPROD FROM CAT_DETALLES_PAQ WHERE CAT_DP_ID = ?)",new String[]{_promo}))); + //BA.debugLineNum = 892;BA.debugLine="Private prods As Map"; +_prods = new anywheresoftware.b4a.objects.collections.Map(); + //BA.debugLineNum = 893;BA.debugLine="prods.Initialize"; +_prods.Initialize(); + //BA.debugLineNum = 894;BA.debugLine="If c.RowCount > 0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 895;BA.debugLine="For i=0 To c.RowCount -1"; +{ +final int step6 = 1; +final int limit6 = (int) (_c.getRowCount()-1); +_i = (int) (0) ; +for (;_i <= limit6 ;_i = _i + step6 ) { + //BA.debugLineNum = 896;BA.debugLine="c.Position=i"; +_c.setPosition(_i); + //BA.debugLineNum = 897;BA.debugLine="prods.Put(c.GetString(\"CAT_GP_ID\"), c.GetString"; +_prods.Put((Object)(_c.GetString("CAT_GP_ID")),(Object)(_c.GetString("CAT_GP_ALMACEN"))); + } +}; + }; + //BA.debugLineNum = 902;BA.debugLine="Return prods"; +if (true) return _prods; + //BA.debugLineNum = 903;BA.debugLine="End Sub"; +return null; +} +public static String _traenombrecliente(anywheresoftware.b4a.BA _ba,String _id) throws Exception{ anywheresoftware.b4a.sql.SQL.ResultSetWrapper _c = null; String _n = ""; -RDebugUtils.currentLine=15204352; - //BA.debugLineNum = 15204352;BA.debugLine="Sub traeNombreClientev(id As String) As String"; -RDebugUtils.currentLine=15204353; - //BA.debugLineNum = 15204353;BA.debugLine="Private c As ResultSet = B4XPages.MainPage.skmt.E"; + //BA.debugLineNum = 1339;BA.debugLine="Sub traeNombreCliente(id As String) As String"; + //BA.debugLineNum = 1340;BA.debugLine="Private c As ResultSet = B4XPages.MainPage.skmt.E"; _c = new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(); _c = (anywheresoftware.b4a.sql.SQL.ResultSetWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select CAT_CL_NOMBRE from kmt_info where CAT_CL_CODIGO = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_id))+"'")))); -RDebugUtils.currentLine=15204354; - //BA.debugLineNum = 15204354;BA.debugLine="Private n As String = \"N/A\""; + //BA.debugLineNum = 1341;BA.debugLine="Private n As String = \"N/A\""; _n = "N/A"; -RDebugUtils.currentLine=15204355; - //BA.debugLineNum = 15204355;BA.debugLine="Do While c.NextRow"; + //BA.debugLineNum = 1342;BA.debugLine="Do While c.NextRow"; while (_c.NextRow()) { -RDebugUtils.currentLine=15204356; - //BA.debugLineNum = 15204356;BA.debugLine="n = c.GetString(\"CAT_CL_NOMBRE\")"; + //BA.debugLineNum = 1343;BA.debugLine="n = c.GetString(\"CAT_CL_NOMBRE\")"; _n = _c.GetString("CAT_CL_NOMBRE"); } ; -RDebugUtils.currentLine=15204358; - //BA.debugLineNum = 15204358;BA.debugLine="Return n"; + //BA.debugLineNum = 1345;BA.debugLine="Return n"; if (true) return _n; -RDebugUtils.currentLine=15204359; - //BA.debugLineNum = 15204359;BA.debugLine="End Sub"; + //BA.debugLineNum = 1346;BA.debugLine="End Sub"; +return ""; +} +public static String _traenombreclientev(anywheresoftware.b4a.BA _ba,String _id) throws Exception{ +anywheresoftware.b4a.sql.SQL.ResultSetWrapper _c = null; +String _n = ""; + //BA.debugLineNum = 1413;BA.debugLine="Sub traeNombreClientev(id As String) As String"; + //BA.debugLineNum = 1414;BA.debugLine="Private c As ResultSet = B4XPages.MainPage.skmt.E"; +_c = new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(); +_c = (anywheresoftware.b4a.sql.SQL.ResultSetWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.ResultSetWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select CAT_CL_NOMBRE from kmt_info where CAT_CL_CODIGO = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_id))+"'")))); + //BA.debugLineNum = 1415;BA.debugLine="Private n As String = \"N/A\""; +_n = "N/A"; + //BA.debugLineNum = 1416;BA.debugLine="Do While c.NextRow"; +while (_c.NextRow()) { + //BA.debugLineNum = 1417;BA.debugLine="n = c.GetString(\"CAT_CL_NOMBRE\")"; +_n = _c.GetString("CAT_CL_NOMBRE"); + } +; + //BA.debugLineNum = 1419;BA.debugLine="Return n"; +if (true) return _n; + //BA.debugLineNum = 1420;BA.debugLine="End Sub"; return ""; } public static anywheresoftware.b4a.objects.collections.Map _traeprodiddebd(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "traeprodiddebd", false)) - {return ((anywheresoftware.b4a.objects.collections.Map) Debug.delegate(null, "traeprodiddebd", new Object[] {_ba}));} anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; anywheresoftware.b4a.objects.collections.Map _m = null; -RDebugUtils.currentLine=14417920; - //BA.debugLineNum = 14417920;BA.debugLine="Sub traeProdIdDeBD As Map 'ignore"; -RDebugUtils.currentLine=14417921; - //BA.debugLineNum = 14417921;BA.debugLine="Private c As Cursor"; + //BA.debugLineNum = 1187;BA.debugLine="Sub traeProdIdDeBD As Map 'ignore"; + //BA.debugLineNum = 1188;BA.debugLine="Private c As Cursor"; _c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=14417922; - //BA.debugLineNum = 14417922;BA.debugLine="Private m As Map"; + //BA.debugLineNum = 1189;BA.debugLine="Private m As Map"; _m = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=14417923; - //BA.debugLineNum = 14417923;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_GP"; + //BA.debugLineNum = 1190;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_GP"; _c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select CAT_GP_ID,CAT_GP_NOMBRE,CAT_GP_TIPO,CAT_GP_SUBTIPO from CAT_GUNAPROD where CAT_GP_NOMBRE In (Select PDESC from PROID)"))); -RDebugUtils.currentLine=14417924; - //BA.debugLineNum = 14417924;BA.debugLine="If c.RowCount > 0 Then"; + //BA.debugLineNum = 1191;BA.debugLine="If c.RowCount > 0 Then"; if (_c.getRowCount()>0) { -RDebugUtils.currentLine=14417925; - //BA.debugLineNum = 14417925;BA.debugLine="c.Position = 0"; + //BA.debugLineNum = 1192;BA.debugLine="c.Position = 0"; _c.setPosition((int) (0)); -RDebugUtils.currentLine=14417926; - //BA.debugLineNum = 14417926;BA.debugLine="m = CreateMap(\"id\":c.GetString(\"CAT_GP_ID\"), \"no"; + //BA.debugLineNum = 1193;BA.debugLine="m = CreateMap(\"id\":c.GetString(\"CAT_GP_ID\"), \"no"; _m = anywheresoftware.b4a.keywords.Common.createMap(new Object[] {(Object)("id"),(Object)(_c.GetString("CAT_GP_ID")),(Object)("nombre"),(Object)(_c.GetString("CAT_GP_NOMBRE")),(Object)("tipo"),(Object)(_c.GetString("CAT_GP_TIPO")),(Object)("subtipo"),(Object)(_c.GetString("CAT_GP_SUBTIPO"))}); }else { -RDebugUtils.currentLine=14417928; - //BA.debugLineNum = 14417928;BA.debugLine="m = CreateMap(\"id\":\"N/A\", \"nombre\":\"N/A\", \"tipo\""; + //BA.debugLineNum = 1195;BA.debugLine="m = CreateMap(\"id\":\"N/A\", \"nombre\":\"N/A\", \"tipo\""; _m = anywheresoftware.b4a.keywords.Common.createMap(new Object[] {(Object)("id"),(Object)("N/A"),(Object)("nombre"),(Object)("N/A"),(Object)("tipo"),(Object)("N/A"),(Object)("subtipo"),(Object)("N/A")}); }; -RDebugUtils.currentLine=14417930; - //BA.debugLineNum = 14417930;BA.debugLine="c.Close"; + //BA.debugLineNum = 1197;BA.debugLine="c.Close"; _c.Close(); -RDebugUtils.currentLine=14417931; - //BA.debugLineNum = 14417931;BA.debugLine="Return m"; + //BA.debugLineNum = 1198;BA.debugLine="Return m"; if (true) return _m; -RDebugUtils.currentLine=14417932; - //BA.debugLineNum = 14417932;BA.debugLine="End Sub"; + //BA.debugLineNum = 1199;BA.debugLine="End Sub"; return null; } public static String _traeprodnombre(anywheresoftware.b4a.BA _ba,String _id) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "traeprodnombre", false)) - {return ((String) Debug.delegate(null, "traeprodnombre", new Object[] {_ba,_id}));} anywheresoftware.b4a.sql.SQL.CursorWrapper _h = null; String _n = ""; -RDebugUtils.currentLine=13172736; - //BA.debugLineNum = 13172736;BA.debugLine="Sub traeProdNombre(id As String) As String"; -RDebugUtils.currentLine=13172737; - //BA.debugLineNum = 13172737;BA.debugLine="Private h As Cursor"; + //BA.debugLineNum = 705;BA.debugLine="Sub traeProdNombre(id As String) As String"; + //BA.debugLineNum = 706;BA.debugLine="Private h As Cursor"; _h = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); -RDebugUtils.currentLine=13172738; - //BA.debugLineNum = 13172738;BA.debugLine="Private n As String"; + //BA.debugLineNum = 707;BA.debugLine="Private n As String"; _n = ""; -RDebugUtils.currentLine=13172739; - //BA.debugLineNum = 13172739;BA.debugLine="h=B4XPages.MainPage.skmt.ExecQuery2(\"select CAT_G"; + //BA.debugLineNum = 708;BA.debugLine="h=B4XPages.MainPage.skmt.ExecQuery2(\"select CAT_G"; _h = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery2("select CAT_GP_NOMBRE from CAT_GUNAPROD where CAT_GP_ID = ? ",new String[]{_id.trim()}))); -RDebugUtils.currentLine=13172740; - //BA.debugLineNum = 13172740;BA.debugLine="If h.RowCount > 0 Then"; + //BA.debugLineNum = 709;BA.debugLine="If h.RowCount > 0 Then"; if (_h.getRowCount()>0) { -RDebugUtils.currentLine=13172741; - //BA.debugLineNum = 13172741;BA.debugLine="h.Position = 0"; + //BA.debugLineNum = 710;BA.debugLine="h.Position = 0"; _h.setPosition((int) (0)); -RDebugUtils.currentLine=13172742; - //BA.debugLineNum = 13172742;BA.debugLine="n = h.GetString(\"CAT_GP_NOMBRE\")"; + //BA.debugLineNum = 711;BA.debugLine="n = h.GetString(\"CAT_GP_NOMBRE\")"; _n = _h.GetString("CAT_GP_NOMBRE"); }; -RDebugUtils.currentLine=13172745; - //BA.debugLineNum = 13172745;BA.debugLine="h.Close"; + //BA.debugLineNum = 714;BA.debugLine="h.Close"; _h.Close(); -RDebugUtils.currentLine=13172746; - //BA.debugLineNum = 13172746;BA.debugLine="If n = Null Or n=\"\" Then n = \"N/A\""; + //BA.debugLineNum = 715;BA.debugLine="If n = Null Or n=\"\" Then n = \"N/A\""; if (_n== null || (_n).equals("")) { _n = "N/A";}; -RDebugUtils.currentLine=13172748; - //BA.debugLineNum = 13172748;BA.debugLine="Return n"; + //BA.debugLineNum = 717;BA.debugLine="Return n"; if (true) return _n; -RDebugUtils.currentLine=13172749; - //BA.debugLineNum = 13172749;BA.debugLine="End Sub"; + //BA.debugLineNum = 718;BA.debugLine="End Sub"; +return ""; +} +public static anywheresoftware.b4a.objects.collections.Map _traepromo(anywheresoftware.b4a.BA _ba,String _promo,String _cliente) throws Exception{ +String _iniciocontador = ""; +anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; +String _sihistorico = ""; +anywheresoftware.b4a.objects.collections.Map _promomap = null; +anywheresoftware.b4a.objects.collections.List _prodsfijos = null; +anywheresoftware.b4a.objects.collections.List _prodsfijosprecios = null; +anywheresoftware.b4a.objects.collections.List _prodsfijospiezas = null; +anywheresoftware.b4a.objects.collections.List _prodsvariables = null; +anywheresoftware.b4a.objects.collections.Map _prods = null; +anywheresoftware.b4a.objects.collections.Map _tipos = null; +int _i = 0; +String _pvr = ""; + //BA.debugLineNum = 822;BA.debugLine="Sub traePromo(promo As String, cliente As String)"; + //BA.debugLineNum = 823;BA.debugLine="Private inicioContador As String = DateTime.Now"; +_iniciocontador = BA.NumberToString(anywheresoftware.b4a.keywords.Common.DateTime.getNow()); + //BA.debugLineNum = 824;BA.debugLine="Private c As Cursor = B4XPages.MainPage.skmt.Exec"; +_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); +_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("Select * from promos_comp where cat_pa_id = '"+_promo+"'"))); + //BA.debugLineNum = 825;BA.debugLine="Private siHistorico As String = 0"; +_sihistorico = BA.NumberToString(0); + //BA.debugLineNum = 826;BA.debugLine="Private promoMap As Map"; +_promomap = new anywheresoftware.b4a.objects.collections.Map(); + //BA.debugLineNum = 827;BA.debugLine="Private prodsFijos, prodsFijosPrecios, prodsFijos"; +_prodsfijos = new anywheresoftware.b4a.objects.collections.List(); +_prodsfijosprecios = new anywheresoftware.b4a.objects.collections.List(); +_prodsfijospiezas = new anywheresoftware.b4a.objects.collections.List(); +_prodsvariables = new anywheresoftware.b4a.objects.collections.List(); + //BA.debugLineNum = 828;BA.debugLine="promoMap.Initialize"; +_promomap.Initialize(); + //BA.debugLineNum = 829;BA.debugLine="prodsFijos.Initialize"; +_prodsfijos.Initialize(); + //BA.debugLineNum = 830;BA.debugLine="prodsFijosPrecios.Initialize"; +_prodsfijosprecios.Initialize(); + //BA.debugLineNum = 831;BA.debugLine="prodsFijosPiezas.Initialize"; +_prodsfijospiezas.Initialize(); + //BA.debugLineNum = 832;BA.debugLine="prodsVariables.Initialize"; +_prodsvariables.Initialize(); + //BA.debugLineNum = 833;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 834;BA.debugLine="If c.RowCount > 0 Then promoMap = CreateMap(\"id\":"; +if (_c.getRowCount()>0) { +_promomap = anywheresoftware.b4a.keywords.Common.createMap(new Object[] {(Object)("id"),(Object)(_promo),(Object)("maxXcliente"),(Object)(_c.GetString("CAT_PA_MAXPROMCLIE")),(Object)("maxRecurrente"),(Object)(_c.GetString("CAT_PA_MAXPROMREC")),(Object)("maxPromos"),(Object)(_c.GetString("CAT_PA_MAXPROM"))});}; + //BA.debugLineNum = 835;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"Select coun"; +_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("Select count(*) as hist from HIST_PROMOS where HP_CLIENTE = '"+_cliente+"' and HP_CODIGO_PROMOCION = '"+_promo+"'"))); + //BA.debugLineNum = 836;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 837;BA.debugLine="If c.GetString(\"hist\") > 0 Then siHistorico = 1"; +if ((double)(Double.parseDouble(_c.GetString("hist")))>0) { +_sihistorico = BA.NumberToString(1);}; + //BA.debugLineNum = 838;BA.debugLine="promoMap.Put(\"historico\", siHistorico)"; +_promomap.Put((Object)("historico"),(Object)(_sihistorico)); + //BA.debugLineNum = 839;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"Select * fr"; +_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("Select * from CAT_DETALLES_PAQ where CAT_DP_ID = '"+_promo+"'"))); + //BA.debugLineNum = 840;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 841;BA.debugLine="If c.RowCount > 0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 842;BA.debugLine="Private prods, tipos As Map"; +_prods = new anywheresoftware.b4a.objects.collections.Map(); +_tipos = new anywheresoftware.b4a.objects.collections.Map(); + //BA.debugLineNum = 843;BA.debugLine="prods.Initialize"; +_prods.Initialize(); + //BA.debugLineNum = 844;BA.debugLine="tipos.Initialize"; +_tipos.Initialize(); + //BA.debugLineNum = 845;BA.debugLine="For i=0 To c.RowCount -1"; +{ +final int step23 = 1; +final int limit23 = (int) (_c.getRowCount()-1); +_i = (int) (0) ; +for (;_i <= limit23 ;_i = _i + step23 ) { + //BA.debugLineNum = 846;BA.debugLine="c.Position=i"; +_c.setPosition(_i); + //BA.debugLineNum = 847;BA.debugLine="prods.Put(c.GetString(\"CAT_DP_IDPROD\"), CreateM"; +_prods.Put((Object)(_c.GetString("CAT_DP_IDPROD")),(Object)(anywheresoftware.b4a.keywords.Common.createMap(new Object[] {(Object)("idProducto"),(Object)(_c.GetString("CAT_DP_IDPROD")),(Object)("precioSimptos"),(Object)(_c.GetString("CAT_DP_PRECIO_SIMPTOS")),(Object)("precio"),(Object)(_c.GetString("CAT_DP_PRECIO")),(Object)("almacen"),(Object)(_c.GetString("CAT_DP_ALMACEN")),(Object)("tipo"),(Object)(_c.GetString("CAT_DP_TIPO")),(Object)("piezas"),(Object)(_c.GetString("CAT_DP_PZAS")),(Object)("usuario"),(Object)(_c.GetString("CAT_DP_USUARIO")),(Object)("regalo"),(Object)(_c.GetString("CAT_DP_REGALO")),(Object)("clasif"),(Object)(_c.GetString("CAT_DP_CLASIF"))}).getObject())); + //BA.debugLineNum = 848;BA.debugLine="tipos.Put(c.GetString(\"CAT_DP_IDPROD\"), c.GetSt"; +_tipos.Put((Object)(_c.GetString("CAT_DP_IDPROD")),(Object)(_c.GetString("CAT_DP_TIPO"))); + //BA.debugLineNum = 849;BA.debugLine="If c.GetString(\"CAT_DP_TIPO\") = \"0\" Then"; +if ((_c.GetString("CAT_DP_TIPO")).equals("0")) { + //BA.debugLineNum = 850;BA.debugLine="prodsFijos.Add(c.GetString(\"CAT_DP_IDPROD\"))"; +_prodsfijos.Add((Object)(_c.GetString("CAT_DP_IDPROD"))); + //BA.debugLineNum = 851;BA.debugLine="prodsFijosPrecios.Add(c.GetString(\"CAT_DP_PREC"; +_prodsfijosprecios.Add((Object)(_c.GetString("CAT_DP_PRECIO"))); + //BA.debugLineNum = 852;BA.debugLine="prodsFijosPiezas.Add(c.GetString(\"CAT_DP_PZAS\""; +_prodsfijospiezas.Add((Object)(_c.GetString("CAT_DP_PZAS"))); + }; + //BA.debugLineNum = 854;BA.debugLine="If c.GetString(\"CAT_DP_TIPO\") = \"1\" Then prodsV"; +if ((_c.GetString("CAT_DP_TIPO")).equals("1")) { +_prodsvariables.Add((Object)(_c.GetString("CAT_DP_IDPROD")));}; + } +}; + //BA.debugLineNum = 857;BA.debugLine="promoMap.Put(\"productos\", prods) 'Mapa con los p"; +_promomap.Put((Object)("productos"),(Object)(_prods.getObject())); + //BA.debugLineNum = 858;BA.debugLine="promoMap.Put(\"tipos\", tipos) 'Mapa con los produ"; +_promomap.Put((Object)("tipos"),(Object)(_tipos.getObject())); + //BA.debugLineNum = 859;BA.debugLine="promoMap.Put(\"prodsFijos\", prodsFijos) 'Lista de"; +_promomap.Put((Object)("prodsFijos"),(Object)(_prodsfijos.getObject())); + //BA.debugLineNum = 860;BA.debugLine="promoMap.Put(\"prodsVariables\", prodsVariables) '"; +_promomap.Put((Object)("prodsVariables"),(Object)(_prodsvariables.getObject())); + //BA.debugLineNum = 861;BA.debugLine="promoMap.Put(\"prodsFijosCant\", prodsFijos.Size)"; +_promomap.Put((Object)("prodsFijosCant"),(Object)(_prodsfijos.getSize())); + //BA.debugLineNum = 862;BA.debugLine="promoMap.Put(\"prodsFijosPrecios\", prodsFijosPrec"; +_promomap.Put((Object)("prodsFijosPrecios"),(Object)(_prodsfijosprecios.getObject())); + //BA.debugLineNum = 863;BA.debugLine="promoMap.Put(\"prodsFijosPiezas\", prodsFijosPieza"; +_promomap.Put((Object)("prodsFijosPiezas"),(Object)(_prodsfijospiezas.getObject())); + //BA.debugLineNum = 864;BA.debugLine="promoMap.Put(\"prodsVariablesCant\", prodsVariable"; +_promomap.Put((Object)("prodsVariablesCant"),(Object)(_prodsvariables.getSize())); + //BA.debugLineNum = 865;BA.debugLine="promoMap.Put(\"resultado\", \"ok\")"; +_promomap.Put((Object)("resultado"),(Object)("ok")); + }else { + //BA.debugLineNum = 867;BA.debugLine="promoMap.Put(\"resultado\", \"No hay datos de la pr"; +_promomap.Put((Object)("resultado"),(Object)("No hay datos de la promoción.")); + }; + //BA.debugLineNum = 869;BA.debugLine="c = B4XPages.MainPage.skmt.ExecQuery(\"Select CAT_"; +_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("Select CAT_GP_STS, CAT_GP_NOMBRE from CAT_GUNAPROD where CAT_GP_ID = '"+_promo+"'"))); + //BA.debugLineNum = 870;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 871;BA.debugLine="Private pvr As String = 0"; +_pvr = BA.NumberToString(0); + //BA.debugLineNum = 872;BA.debugLine="If c.RowCount > 0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 873;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 874;BA.debugLine="pvr = c.GetString(\"CAT_GP_STS\")"; +_pvr = _c.GetString("CAT_GP_STS"); + //BA.debugLineNum = 875;BA.debugLine="promoMap.Put(\"prodsVariablesRequeridos\", pvr) 'C"; +_promomap.Put((Object)("prodsVariablesRequeridos"),(Object)(_pvr)); + //BA.debugLineNum = 876;BA.debugLine="promoMap.put(\"descripcion\", c.GetString(\"CAT_GP_"; +_promomap.Put((Object)("descripcion"),(Object)(_c.GetString("CAT_GP_NOMBRE"))); + }; + //BA.debugLineNum = 878;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 883;BA.debugLine="Return promoMap"; +if (true) return _promomap; + //BA.debugLineNum = 884;BA.debugLine="End Sub"; +return null; +} +public static int _traepromosvendidas(anywheresoftware.b4a.BA _ba,String _promo,String _cliente) throws Exception{ +anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; +int _pv = 0; + //BA.debugLineNum = 991;BA.debugLine="Sub traePromosVendidas(promo As String, cliente As"; + //BA.debugLineNum = 992;BA.debugLine="Private c As Cursor"; +_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); + //BA.debugLineNum = 993;BA.debugLine="Private pv As Int = 0"; +_pv = (int) (0); + //BA.debugLineNum = 994;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery($\"select PE_CA"; +_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("select PE_CANT from PEDIDO where PE_PROID = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_promo))+"' and PE_CLIENTE = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_cliente))+"'")))); + //BA.debugLineNum = 995;BA.debugLine="If c.RowCount > 0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 996;BA.debugLine="c.Position = 0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 997;BA.debugLine="pv = c.GetInt(\"PE_CANT\")"; +_pv = _c.GetInt("PE_CANT"); + }; + //BA.debugLineNum = 999;BA.debugLine="Return pv"; +if (true) return _pv; + //BA.debugLineNum = 1000;BA.debugLine="End Sub"; +return 0; +} +public static String _traeruta(anywheresoftware.b4a.BA _ba) throws Exception{ +anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; +String _r = ""; + //BA.debugLineNum = 721;BA.debugLine="Sub traeRuta As String 'ignore"; + //BA.debugLineNum = 722;BA.debugLine="Private c As Cursor"; +_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); + //BA.debugLineNum = 723;BA.debugLine="Private r As String"; +_r = ""; + //BA.debugLineNum = 724;BA.debugLine="c=B4XPages.MainPage.skmt.ExecQuery(\"select CAT_CL"; +_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select CAT_CL_RUTA from kmt_info where CAT_CL_CODIGO In (Select cuenta from cuentaa)"))); + //BA.debugLineNum = 725;BA.debugLine="r = \"0\""; +_r = "0"; + //BA.debugLineNum = 726;BA.debugLine="If c.RowCount > 0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 727;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 728;BA.debugLine="r = c.GetString(\"CAT_CL_RUTA\")"; +_r = _c.GetString("CAT_CL_RUTA"); + }; + //BA.debugLineNum = 730;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 731;BA.debugLine="Return r"; +if (true) return _r; + //BA.debugLineNum = 732;BA.debugLine="End Sub"; return ""; } public static anywheresoftware.b4a.objects.collections.Map _traetotalesclienteactual(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="subs"; -if (Debug.shouldDelegate(null, "traetotalesclienteactual", false)) - {return ((anywheresoftware.b4a.objects.collections.Map) Debug.delegate(null, "traetotalesclienteactual", new Object[] {_ba}));} anywheresoftware.b4a.objects.collections.Map _m = null; anywheresoftware.b4a.sql.SQL.CursorWrapper _c_prodsx = null; -RDebugUtils.currentLine=14614528; - //BA.debugLineNum = 14614528;BA.debugLine="Sub traeTotalesClienteActual As Map"; -RDebugUtils.currentLine=14614529; - //BA.debugLineNum = 14614529;BA.debugLine="Private m As Map"; + //BA.debugLineNum = 1226;BA.debugLine="Sub traeTotalesClienteActual As Map"; + //BA.debugLineNum = 1227;BA.debugLine="Private m As Map"; _m = new anywheresoftware.b4a.objects.collections.Map(); -RDebugUtils.currentLine=14614530; - //BA.debugLineNum = 14614530;BA.debugLine="m.Initialize"; + //BA.debugLineNum = 1228;BA.debugLine="m.Initialize"; _m.Initialize(); -RDebugUtils.currentLine=14614531; - //BA.debugLineNum = 14614531;BA.debugLine="Private c_prodsX As Cursor=B4XPages.MainPage.skmt"; + //BA.debugLineNum = 1229;BA.debugLine="Private c_prodsX As Cursor=B4XPages.MainPage.skmt"; _c_prodsx = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); _c_prodsx = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery("select ifnull(sum(PE_CANT), 0) as cantProds, ifnull(sum(PE_COSTO_TOT), 0) as costoTotal FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa) order by PE_PRONOMBRE asc"))); -RDebugUtils.currentLine=14614532; - //BA.debugLineNum = 14614532;BA.debugLine="c_prodsX.Position=0"; + //BA.debugLineNum = 1230;BA.debugLine="c_prodsX.Position=0"; _c_prodsx.setPosition((int) (0)); -RDebugUtils.currentLine=14614534; - //BA.debugLineNum = 14614534;BA.debugLine="m = CreateMap(\"productos\": c_prodsX.GetString(\"ca"; + //BA.debugLineNum = 1232;BA.debugLine="m = CreateMap(\"productos\": c_prodsX.GetString(\"ca"; _m = anywheresoftware.b4a.keywords.Common.createMap(new Object[] {(Object)("productos"),(Object)(_c_prodsx.GetString("cantProds")),(Object)("monto"),(Object)(_c_prodsx.GetString("costoTotal"))}); -RDebugUtils.currentLine=14614535; - //BA.debugLineNum = 14614535;BA.debugLine="Return m"; + //BA.debugLineNum = 1233;BA.debugLine="Return m"; if (true) return _m; -RDebugUtils.currentLine=14614536; - //BA.debugLineNum = 14614536;BA.debugLine="End Sub"; + //BA.debugLineNum = 1234;BA.debugLine="End Sub"; return null; } -} \ No newline at end of file +public static String _traeusuariodebd(anywheresoftware.b4a.BA _ba) throws Exception{ +anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; +String _u = ""; + //BA.debugLineNum = 752;BA.debugLine="Sub traeUsuarioDeBD As String 'ignore"; + //BA.debugLineNum = 753;BA.debugLine="Private c As Cursor"; +_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); + //BA.debugLineNum = 754;BA.debugLine="Private u As String = \"SinUsuario\""; +_u = "SinUsuario"; + //BA.debugLineNum = 755;BA.debugLine="If Not(kmt.IsInitialized) Then revisaBD"; +if (anywheresoftware.b4a.keywords.Common.Not(_kmt.IsInitialized())) { +_revisabd(_ba);}; + //BA.debugLineNum = 756;BA.debugLine="c=kmt.ExecQuery(\"select USUARIO from usuarioa\")"; +_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(_kmt.ExecQuery("select USUARIO from usuarioa"))); + //BA.debugLineNum = 757;BA.debugLine="c.Position=0"; +_c.setPosition((int) (0)); + //BA.debugLineNum = 758;BA.debugLine="If c.RowCount > 0 Then u = c.GetString(\"USUARIO\")"; +if (_c.getRowCount()>0) { +_u = _c.GetString("USUARIO");}; + //BA.debugLineNum = 759;BA.debugLine="c.Close"; +_c.Close(); + //BA.debugLineNum = 760;BA.debugLine="Return u"; +if (true) return _u; + //BA.debugLineNum = 761;BA.debugLine="End Sub"; +return ""; +} +public static String _ventanoventa(anywheresoftware.b4a.BA _ba,String _usuariov,String _almacenv,String _rutav,String _eventov,String _clientev,String _iniciov,String _latitudv,String _longitudv,String _montoventav) throws Exception{ +keymon.lat.medicomed.dbrequestmanager._dbcommand _cmd = null; +String _nombreclientev = ""; +anywheresoftware.b4a.sql.SQL.CursorWrapper _c = null; + //BA.debugLineNum = 1369;BA.debugLine="Sub ventaNoVenta(usuariov As String, almacenv As S"; + //BA.debugLineNum = 1370;BA.debugLine="Log(\"ventaNoVenta\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("351445761","ventaNoVenta",0); + //BA.debugLineNum = 1371;BA.debugLine="Log(eventov)"; +anywheresoftware.b4a.keywords.Common.LogImpl("351445762",_eventov,0); + //BA.debugLineNum = 1373;BA.debugLine="Private cmd As DBCommand"; +_cmd = new keymon.lat.medicomed.dbrequestmanager._dbcommand(); + //BA.debugLineNum = 1374;BA.debugLine="cmd.Initialize"; +_cmd.Initialize(); + //BA.debugLineNum = 1375;BA.debugLine="cmd.Name = \"insert_venta_no_venta_MEDICOMED\""; +_cmd.Name /*String*/ = "insert_venta_no_venta_MEDICOMED"; + //BA.debugLineNum = 1378;BA.debugLine="Private nombreClientev As String = traeNombreClie"; +_nombreclientev = _traenombreclientev(_ba,_clientev); + //BA.debugLineNum = 1381;BA.debugLine="If eventov = \"Llega a almacen\" Then"; +if ((_eventov).equals("Llega a almacen")) { + //BA.debugLineNum = 1382;BA.debugLine="nombreClientev = \"BOLETA\""; +_nombreclientev = "BOLETA"; + //BA.debugLineNum = 1383;BA.debugLine="clientev = \"\""; +_clientev = ""; + }else if((_eventov).equals("ConVenta")) { + //BA.debugLineNum = 1385;BA.debugLine="nombreClientev = \"VENTA\""; +_nombreclientev = "VENTA"; + }else if((_eventov).equals("SinVenta")) { + //BA.debugLineNum = 1387;BA.debugLine="nombreClientev = \"Sin Venta\""; +_nombreclientev = "Sin Venta"; + }; + //BA.debugLineNum = 1391;BA.debugLine="Private c As Cursor = B4XPages.MainPage.skmt.Exec"; +_c = new anywheresoftware.b4a.sql.SQL.CursorWrapper(); +_c = (anywheresoftware.b4a.sql.SQL.CursorWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.sql.SQL.CursorWrapper(), (android.database.Cursor)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecQuery(("SELECT * FROM VENTA_No_VENTA WHERE usuariov = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_usuariov))+"' AND almacenv = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_almacenv))+"' AND rutav = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_rutav))+"' AND clientev = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clientev))+"' ORDER BY iniciov DESC")))); + //BA.debugLineNum = 1393;BA.debugLine="If c.RowCount > 0 Then"; +if (_c.getRowCount()>0) { + //BA.debugLineNum = 1395;BA.debugLine="Log(\"Actualizando registro existente\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("351445786","Actualizando registro existente",0); + //BA.debugLineNum = 1396;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"UPDATE VEN"; +mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("UPDATE VENTA_No_VENTA SET eventov = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_eventov))+"', montoVentav = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_montoventav))+"' WHERE usuariov = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_usuariov))+"' AND almacenv = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_almacenv))+"' AND rutav = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_rutav))+"' AND clientev = '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clientev))+"'")); + }else { + //BA.debugLineNum = 1399;BA.debugLine="Log(\"Insertando nuevo registro\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("351445790","Insertando nuevo registro",0); + //BA.debugLineNum = 1400;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery($\"INSERT INT"; +mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery(("INSERT INTO VENTA_No_VENTA (usuariov, almacenv, rutav, eventov, clientev, iniciov, latitudv, longitudv, montoVentav) VALUES ('"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_usuariov))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_almacenv))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_rutav))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_eventov))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clientev))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_iniciov))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_latitudv))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_longitudv))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_montoventav))+"')")); + }; + //BA.debugLineNum = 1404;BA.debugLine="cmd.Parameters = Array As Object(usuariov, almace"; +_cmd.Parameters /*Object[]*/ = new Object[]{(Object)(_usuariov),(Object)(_almacenv),(Object)(_rutav),(Object)(_eventov),(Object)(_clientev),(Object)(_iniciov),(Object)(_latitudv),(Object)(_longitudv),(Object)(_montoventav)}; + //BA.debugLineNum = 1405;BA.debugLine="B4XPages.MainPage.reqManager.ExecuteCommand(cmd,"; +mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (_ba)._reqmanager /*keymon.lat.medicomed.dbrequestmanager*/ ._executecommand /*String*/ (_cmd,(Object)("ventaNoVenta")); + //BA.debugLineNum = 1407;BA.debugLine="Log($\"Datos procesados: '${usuariov}', '${almacen"; +anywheresoftware.b4a.keywords.Common.LogImpl("351445798",("Datos procesados: '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_usuariov))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_almacenv))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_rutav))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_eventov))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_clientev))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_iniciov))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_latitudv))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_longitudv))+"', '"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(_montoventav))+"'"),0); + //BA.debugLineNum = 1408;BA.debugLine="Log(\"Mandamos Venta_No_Venta\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("351445799","Mandamos Venta_No_Venta",0); + //BA.debugLineNum = 1409;BA.debugLine="End Sub"; +return ""; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/swiftbutton.java b/B4A/Objects/src/keymon/lat/medicomed/swiftbutton.java index 8559a77..e02b26b 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/swiftbutton.java +++ b/B4A/Objects/src/keymon/lat/medicomed/swiftbutton.java @@ -10,7 +10,7 @@ public class swiftbutton extends B4AClass.ImplB4AClass implements BA.SubDelegato private static java.util.HashMap htSubs; private void innerInitialize(BA _ba) throws Exception { if (ba == null) { - ba = new anywheresoftware.b4a.ShellBA(_ba, this, htSubs, "keymon.lat.medicomed.swiftbutton"); + ba = new BA(_ba, this, htSubs, "keymon.lat.medicomed.swiftbutton"); if (htSubs == null) { ba.loadHtSubs(this.getClass()); htSubs = ba.htSubs; @@ -23,14 +23,7 @@ public class swiftbutton extends B4AClass.ImplB4AClass implements BA.SubDelegato 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.keywords.Common __c = null; public String _meventname = ""; public Object _mcallback = null; public anywheresoftware.b4a.objects.B4XViewWrapper _mbase = null; @@ -58,410 +51,268 @@ 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 _base_resize(keymon.lat.medicomed.swiftbutton __ref,double _width,double _height) throws Exception{ -__ref = this; -RDebugUtils.currentModule="swiftbutton"; -if (Debug.shouldDelegate(ba, "base_resize", true)) - {return ((String) Debug.delegate(ba, "base_resize", new Object[] {_width,_height}));} +public String _base_resize(double _width,double _height) throws Exception{ anywheresoftware.b4a.objects.B4XViewWrapper _v = null; -RDebugUtils.currentLine=64225280; - //BA.debugLineNum = 64225280;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; -RDebugUtils.currentLine=64225281; - //BA.debugLineNum = 64225281;BA.debugLine="cvs.Resize(Width, Height)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Resize((float) (_width),(float) (_height)); -RDebugUtils.currentLine=64225282; - //BA.debugLineNum = 64225282;BA.debugLine="For Each v As B4XView In mBase.GetAllViewsRecursi"; + //BA.debugLineNum = 54;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A"; + //BA.debugLineNum = 55;BA.debugLine="cvs.Resize(Width, Height)"; +_cvs.Resize((float) (_width),(float) (_height)); + //BA.debugLineNum = 56;BA.debugLine="For Each v As B4XView In mBase.GetAllViewsRecursi"; _v = new anywheresoftware.b4a.objects.B4XViewWrapper(); { -final anywheresoftware.b4a.BA.IterableList group2 = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .GetAllViewsRecursive(); +final anywheresoftware.b4a.BA.IterableList group2 = _mbase.GetAllViewsRecursive(); final int groupLen2 = group2.getSize() ;int index2 = 0; ; for (; index2 < groupLen2;index2++){ _v = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(group2.Get(index2))); -RDebugUtils.currentLine=64225283; - //BA.debugLineNum = 64225283;BA.debugLine="v.SetLayoutAnimated(0, 0, 0, Width, Height)"; + //BA.debugLineNum = 57;BA.debugLine="v.SetLayoutAnimated(0, 0, 0, Width, Height)"; _v.SetLayoutAnimated((int) (0),(int) (0),(int) (0),(int) (_width),(int) (_height)); } }; -RDebugUtils.currentLine=64225285; - //BA.debugLineNum = 64225285;BA.debugLine="Draw"; -__ref._draw /*String*/ (null); -RDebugUtils.currentLine=64225286; - //BA.debugLineNum = 64225286;BA.debugLine="End Sub"; + //BA.debugLineNum = 59;BA.debugLine="Draw"; +_draw(); + //BA.debugLineNum = 60;BA.debugLine="End Sub"; return ""; } -public String _draw(keymon.lat.medicomed.swiftbutton __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="swiftbutton"; -if (Debug.shouldDelegate(ba, "draw", true)) - {return ((String) Debug.delegate(ba, "draw", null));} -anywheresoftware.b4a.objects.B4XCanvas.B4XRect _r = null; -anywheresoftware.b4a.objects.B4XCanvas.B4XPath _p = null; -int _c = 0; -RDebugUtils.currentLine=64684032; - //BA.debugLineNum = 64684032;BA.debugLine="Private Sub Draw"; -RDebugUtils.currentLine=64684033; - //BA.debugLineNum = 64684033;BA.debugLine="cvs.ClearRect(cvs.TargetRect)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .ClearRect(__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .getTargetRect()); -RDebugUtils.currentLine=64684034; - //BA.debugLineNum = 64684034;BA.debugLine="Dim r As B4XRect"; -_r = new anywheresoftware.b4a.objects.B4XCanvas.B4XRect(); -RDebugUtils.currentLine=64684035; - //BA.debugLineNum = 64684035;BA.debugLine="Dim p As B4XPath"; -_p = new anywheresoftware.b4a.objects.B4XCanvas.B4XPath(); -RDebugUtils.currentLine=64684036; - //BA.debugLineNum = 64684036;BA.debugLine="r.Initialize(0, SideHeight, mBase.Width, mBase.He"; -_r.Initialize((float) (0),(float) (__ref._sideheight /*int*/ ),(float) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()),(float) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight())); -RDebugUtils.currentLine=64684037; - //BA.debugLineNum = 64684037;BA.debugLine="If pressed = False Then"; -if (__ref._pressed /*boolean*/ ==__c.False) { -RDebugUtils.currentLine=64684038; - //BA.debugLineNum = 64684038;BA.debugLine="xLBL.Top = 0"; -__ref._xlbl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTop((int) (0)); -RDebugUtils.currentLine=64684039; - //BA.debugLineNum = 64684039;BA.debugLine="p.InitializeRoundedRect(r, CornersRadius)"; -_p.InitializeRoundedRect(_r,(float) (__ref._cornersradius /*int*/ )); -RDebugUtils.currentLine=64684040; - //BA.debugLineNum = 64684040;BA.debugLine="cvs.DrawPath(p, clr2, True, 0)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawPath(_p,__ref._clr2 /*int*/ ,__c.True,(float) (0)); -RDebugUtils.currentLine=64684041; - //BA.debugLineNum = 64684041;BA.debugLine="r.Initialize(0, 0, mBase.Width, mBase.Height - S"; -_r.Initialize((float) (0),(float) (0),(float) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth()),(float) (__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()-__ref._sideheight /*int*/ )); -RDebugUtils.currentLine=64684042; - //BA.debugLineNum = 64684042;BA.debugLine="p.InitializeRoundedRect(r, CornersRadius)"; -_p.InitializeRoundedRect(_r,(float) (__ref._cornersradius /*int*/ )); -RDebugUtils.currentLine=64684043; - //BA.debugLineNum = 64684043;BA.debugLine="cvs.DrawPath(p, clr1, True, 0)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawPath(_p,__ref._clr1 /*int*/ ,__c.True,(float) (0)); - }else { -RDebugUtils.currentLine=64684045; - //BA.debugLineNum = 64684045;BA.debugLine="xLBL.Top = SideHeight"; -__ref._xlbl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTop(__ref._sideheight /*int*/ ); -RDebugUtils.currentLine=64684046; - //BA.debugLineNum = 64684046;BA.debugLine="p.InitializeRoundedRect(r, CornersRadius)"; -_p.InitializeRoundedRect(_r,(float) (__ref._cornersradius /*int*/ )); -RDebugUtils.currentLine=64684047; - //BA.debugLineNum = 64684047;BA.debugLine="Dim c As Int"; -_c = 0; -RDebugUtils.currentLine=64684048; - //BA.debugLineNum = 64684048;BA.debugLine="If mDisabled Then c = disabledColor Else c = clr"; -if (__ref._mdisabled /*boolean*/ ) { -_c = __ref._disabledcolor /*int*/ ;} -else { -_c = __ref._clr1 /*int*/ ;}; -RDebugUtils.currentLine=64684049; - //BA.debugLineNum = 64684049;BA.debugLine="cvs.DrawPath(p, c, True, 0)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .DrawPath(_p,_c,__c.True,(float) (0)); - }; -RDebugUtils.currentLine=64684052; - //BA.debugLineNum = 64684052;BA.debugLine="cvs.Invalidate"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Invalidate(); -RDebugUtils.currentLine=64684053; - //BA.debugLineNum = 64684053;BA.debugLine="End Sub"; -return ""; -} -public String _class_globals(keymon.lat.medicomed.swiftbutton __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="swiftbutton"; -RDebugUtils.currentLine=64028672; - //BA.debugLineNum = 64028672;BA.debugLine="Sub Class_Globals"; -RDebugUtils.currentLine=64028673; - //BA.debugLineNum = 64028673;BA.debugLine="Private mEventName As String 'ignore"; +public String _class_globals() throws Exception{ + //BA.debugLineNum = 12;BA.debugLine="Sub Class_Globals"; + //BA.debugLineNum = 13;BA.debugLine="Private mEventName As String 'ignore"; _meventname = ""; -RDebugUtils.currentLine=64028674; - //BA.debugLineNum = 64028674;BA.debugLine="Private mCallBack As Object 'ignore"; + //BA.debugLineNum = 14;BA.debugLine="Private mCallBack As Object 'ignore"; _mcallback = new Object(); -RDebugUtils.currentLine=64028675; - //BA.debugLineNum = 64028675;BA.debugLine="Public mBase As B4XView 'ignore"; + //BA.debugLineNum = 15;BA.debugLine="Public mBase As B4XView 'ignore"; _mbase = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=64028676; - //BA.debugLineNum = 64028676;BA.debugLine="Private xui As XUI 'ignore"; + //BA.debugLineNum = 16;BA.debugLine="Private xui As XUI 'ignore"; _xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); -RDebugUtils.currentLine=64028677; - //BA.debugLineNum = 64028677;BA.debugLine="Private cvs As B4XCanvas"; + //BA.debugLineNum = 17;BA.debugLine="Private cvs As B4XCanvas"; _cvs = new anywheresoftware.b4a.objects.B4XCanvas(); -RDebugUtils.currentLine=64028678; - //BA.debugLineNum = 64028678;BA.debugLine="Public xLBL As B4XView"; + //BA.debugLineNum = 18;BA.debugLine="Public xLBL As B4XView"; _xlbl = new anywheresoftware.b4a.objects.B4XViewWrapper(); -RDebugUtils.currentLine=64028679; - //BA.debugLineNum = 64028679;BA.debugLine="Public clr1, clr2, disabledColor As Int"; + //BA.debugLineNum = 19;BA.debugLine="Public clr1, clr2, disabledColor As Int"; _clr1 = 0; _clr2 = 0; _disabledcolor = 0; -RDebugUtils.currentLine=64028680; - //BA.debugLineNum = 64028680;BA.debugLine="Private pressed As Boolean"; + //BA.debugLineNum = 20;BA.debugLine="Private pressed As Boolean"; _pressed = false; -RDebugUtils.currentLine=64028681; - //BA.debugLineNum = 64028681;BA.debugLine="Public Tag As Object"; + //BA.debugLineNum = 21;BA.debugLine="Public Tag As Object"; _tag = new Object(); -RDebugUtils.currentLine=64028682; - //BA.debugLineNum = 64028682;BA.debugLine="Private mDisabled As Boolean"; + //BA.debugLineNum = 22;BA.debugLine="Private mDisabled As Boolean"; _mdisabled = false; -RDebugUtils.currentLine=64028683; - //BA.debugLineNum = 64028683;BA.debugLine="Public CornersRadius, SideHeight As Int"; + //BA.debugLineNum = 23;BA.debugLine="Public CornersRadius, SideHeight As Int"; _cornersradius = 0; _sideheight = 0; -RDebugUtils.currentLine=64028684; - //BA.debugLineNum = 64028684;BA.debugLine="Public mHaptic As Boolean"; + //BA.debugLineNum = 24;BA.debugLine="Public mHaptic As Boolean"; _mhaptic = false; -RDebugUtils.currentLine=64028685; - //BA.debugLineNum = 64028685;BA.debugLine="End Sub"; + //BA.debugLineNum = 25;BA.debugLine="End Sub"; return ""; } -public String _designercreateview(keymon.lat.medicomed.swiftbutton __ref,Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ -__ref = this; -RDebugUtils.currentModule="swiftbutton"; -if (Debug.shouldDelegate(ba, "designercreateview", true)) - {return ((String) Debug.delegate(ba, "designercreateview", new Object[] {_base,_lbl,_props}));} +public String _designercreateview(Object _base,anywheresoftware.b4a.objects.LabelWrapper _lbl,anywheresoftware.b4a.objects.collections.Map _props) throws Exception{ anywheresoftware.b4a.objects.B4XViewWrapper _p = null; -RDebugUtils.currentLine=64159744; - //BA.debugLineNum = 64159744;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; -RDebugUtils.currentLine=64159745; - //BA.debugLineNum = 64159745;BA.debugLine="mBase = Base"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); -RDebugUtils.currentLine=64159746; - //BA.debugLineNum = 64159746;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._tag /*Object*/ = __ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getTag(); -RDebugUtils.currentLine=64159746; - //BA.debugLineNum = 64159746;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setTag(this); -RDebugUtils.currentLine=64159747; - //BA.debugLineNum = 64159747;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"p\")"; + //BA.debugLineNum = 32;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl"; + //BA.debugLineNum = 33;BA.debugLine="mBase = Base"; +_mbase = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_base)); + //BA.debugLineNum = 34;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_tag = _mbase.getTag(); + //BA.debugLineNum = 34;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me"; +_mbase.setTag(this); + //BA.debugLineNum = 35;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"p\")"; _p = new anywheresoftware.b4a.objects.B4XViewWrapper(); -_p = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .CreatePanel(ba,"p"); -RDebugUtils.currentLine=64159748; - //BA.debugLineNum = 64159748;BA.debugLine="p.Color = xui.Color_Transparent"; -_p.setColor(__ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .Color_Transparent); -RDebugUtils.currentLine=64159749; - //BA.debugLineNum = 64159749;BA.debugLine="clr1 = xui.PaintOrColorToColor(Props.Get(\"Primary"; -__ref._clr1 /*int*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor(_props.Get((Object)("PrimaryColor"))); -RDebugUtils.currentLine=64159750; - //BA.debugLineNum = 64159750;BA.debugLine="clr2 = xui.PaintOrColorToColor(Props.Get(\"Seconda"; -__ref._clr2 /*int*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor(_props.Get((Object)("SecondaryColor"))); -RDebugUtils.currentLine=64159751; - //BA.debugLineNum = 64159751;BA.debugLine="disabledColor = xui.PaintOrColorToColor(Props.Get"; -__ref._disabledcolor /*int*/ = __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .PaintOrColorToColor(_props.GetDefault((Object)("DisabledColor"),(Object)(((int)0xff999999)))); -RDebugUtils.currentLine=64159752; - //BA.debugLineNum = 64159752;BA.debugLine="CornersRadius = DipToCurrent(Props.GetDefault(\"Co"; -__ref._cornersradius /*int*/ = __c.DipToCurrent((int)(BA.ObjectToNumber(_props.GetDefault((Object)("CornersRadius"),(Object)(15))))); -RDebugUtils.currentLine=64159753; - //BA.debugLineNum = 64159753;BA.debugLine="SideHeight = DipToCurrent(Props.GetDefault(\"SideH"; -__ref._sideheight /*int*/ = __c.DipToCurrent((int)(BA.ObjectToNumber(_props.GetDefault((Object)("SideHeight"),(Object)(5))))); -RDebugUtils.currentLine=64159754; - //BA.debugLineNum = 64159754;BA.debugLine="mDisabled = Not(Props.GetDefault(\"ButtonEnabled\","; -__ref._mdisabled /*boolean*/ = __c.Not(BA.ObjectToBoolean(_props.GetDefault((Object)("ButtonEnabled"),(Object)(__c.True)))); -RDebugUtils.currentLine=64159755; - //BA.debugLineNum = 64159755;BA.debugLine="mHaptic = Props.GetDefault(\"HapticFeedback\", Fals"; -__ref._mhaptic /*boolean*/ = BA.ObjectToBoolean(_props.GetDefault((Object)("HapticFeedback"),(Object)(__c.False))); -RDebugUtils.currentLine=64159756; - //BA.debugLineNum = 64159756;BA.debugLine="pressed = mDisabled"; -__ref._pressed /*boolean*/ = __ref._mdisabled /*boolean*/ ; -RDebugUtils.currentLine=64159757; - //BA.debugLineNum = 64159757;BA.debugLine="xLBL = Lbl"; -__ref._xlbl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lbl.getObject())); -RDebugUtils.currentLine=64159758; - //BA.debugLineNum = 64159758;BA.debugLine="xLBL.Visible = True"; -__ref._xlbl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .setVisible(__c.True); -RDebugUtils.currentLine=64159759; - //BA.debugLineNum = 64159759;BA.debugLine="mBase.AddView(xLBL, 0, 0, 0, 0)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(__ref._xlbl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=64159760; - //BA.debugLineNum = 64159760;BA.debugLine="mBase.AddView(p, 0, 0, 0, 0)"; -__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .AddView((android.view.View)(_p.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); -RDebugUtils.currentLine=64159761; - //BA.debugLineNum = 64159761;BA.debugLine="xLBL.SetTextAlignment(\"CENTER\", \"CENTER\")"; -__ref._xlbl /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .SetTextAlignment("CENTER","CENTER"); -RDebugUtils.currentLine=64159762; - //BA.debugLineNum = 64159762;BA.debugLine="cvs.Initialize(mBase)"; -__ref._cvs /*anywheresoftware.b4a.objects.B4XCanvas*/ .Initialize(__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ ); -RDebugUtils.currentLine=64159763; - //BA.debugLineNum = 64159763;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; -__ref._base_resize /*String*/ (null,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth(),__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight()); -RDebugUtils.currentLine=64159764; - //BA.debugLineNum = 64159764;BA.debugLine="End Sub"; +_p = _xui.CreatePanel(ba,"p"); + //BA.debugLineNum = 36;BA.debugLine="p.Color = xui.Color_Transparent"; +_p.setColor(_xui.Color_Transparent); + //BA.debugLineNum = 37;BA.debugLine="clr1 = xui.PaintOrColorToColor(Props.Get(\"Primary"; +_clr1 = _xui.PaintOrColorToColor(_props.Get((Object)("PrimaryColor"))); + //BA.debugLineNum = 38;BA.debugLine="clr2 = xui.PaintOrColorToColor(Props.Get(\"Seconda"; +_clr2 = _xui.PaintOrColorToColor(_props.Get((Object)("SecondaryColor"))); + //BA.debugLineNum = 39;BA.debugLine="disabledColor = xui.PaintOrColorToColor(Props.Get"; +_disabledcolor = _xui.PaintOrColorToColor(_props.GetDefault((Object)("DisabledColor"),(Object)(((int)0xff999999)))); + //BA.debugLineNum = 40;BA.debugLine="CornersRadius = DipToCurrent(Props.GetDefault(\"Co"; +_cornersradius = __c.DipToCurrent((int)(BA.ObjectToNumber(_props.GetDefault((Object)("CornersRadius"),(Object)(15))))); + //BA.debugLineNum = 41;BA.debugLine="SideHeight = DipToCurrent(Props.GetDefault(\"SideH"; +_sideheight = __c.DipToCurrent((int)(BA.ObjectToNumber(_props.GetDefault((Object)("SideHeight"),(Object)(5))))); + //BA.debugLineNum = 42;BA.debugLine="mDisabled = Not(Props.GetDefault(\"ButtonEnabled\","; +_mdisabled = __c.Not(BA.ObjectToBoolean(_props.GetDefault((Object)("ButtonEnabled"),(Object)(__c.True)))); + //BA.debugLineNum = 43;BA.debugLine="mHaptic = Props.GetDefault(\"HapticFeedback\", Fals"; +_mhaptic = BA.ObjectToBoolean(_props.GetDefault((Object)("HapticFeedback"),(Object)(__c.False))); + //BA.debugLineNum = 44;BA.debugLine="pressed = mDisabled"; +_pressed = _mdisabled; + //BA.debugLineNum = 45;BA.debugLine="xLBL = Lbl"; +_xlbl = (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lbl.getObject())); + //BA.debugLineNum = 46;BA.debugLine="xLBL.Visible = True"; +_xlbl.setVisible(__c.True); + //BA.debugLineNum = 47;BA.debugLine="mBase.AddView(xLBL, 0, 0, 0, 0)"; +_mbase.AddView((android.view.View)(_xlbl.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 48;BA.debugLine="mBase.AddView(p, 0, 0, 0, 0)"; +_mbase.AddView((android.view.View)(_p.getObject()),(int) (0),(int) (0),(int) (0),(int) (0)); + //BA.debugLineNum = 49;BA.debugLine="xLBL.SetTextAlignment(\"CENTER\", \"CENTER\")"; +_xlbl.SetTextAlignment("CENTER","CENTER"); + //BA.debugLineNum = 50;BA.debugLine="cvs.Initialize(mBase)"; +_cvs.Initialize(_mbase); + //BA.debugLineNum = 51;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)"; +_base_resize(_mbase.getWidth(),_mbase.getHeight()); + //BA.debugLineNum = 52;BA.debugLine="End Sub"; return ""; } -public boolean _getenabled(keymon.lat.medicomed.swiftbutton __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="swiftbutton"; -if (Debug.shouldDelegate(ba, "getenabled", true)) - {return ((Boolean) Debug.delegate(ba, "getenabled", null));} -RDebugUtils.currentLine=64290816; - //BA.debugLineNum = 64290816;BA.debugLine="Public Sub getEnabled As Boolean"; -RDebugUtils.currentLine=64290817; - //BA.debugLineNum = 64290817;BA.debugLine="Return Not(mDisabled)"; -if (true) return __c.Not(__ref._mdisabled /*boolean*/ ); -RDebugUtils.currentLine=64290818; - //BA.debugLineNum = 64290818;BA.debugLine="End Sub"; +public String _draw() throws Exception{ +anywheresoftware.b4a.objects.B4XCanvas.B4XRect _r = null; +anywheresoftware.b4a.objects.B4XCanvas.B4XPath _p = null; +int _c = 0; + //BA.debugLineNum = 121;BA.debugLine="Private Sub Draw"; + //BA.debugLineNum = 122;BA.debugLine="cvs.ClearRect(cvs.TargetRect)"; +_cvs.ClearRect(_cvs.getTargetRect()); + //BA.debugLineNum = 123;BA.debugLine="Dim r As B4XRect"; +_r = new anywheresoftware.b4a.objects.B4XCanvas.B4XRect(); + //BA.debugLineNum = 124;BA.debugLine="Dim p As B4XPath"; +_p = new anywheresoftware.b4a.objects.B4XCanvas.B4XPath(); + //BA.debugLineNum = 125;BA.debugLine="r.Initialize(0, SideHeight, mBase.Width, mBase.He"; +_r.Initialize((float) (0),(float) (_sideheight),(float) (_mbase.getWidth()),(float) (_mbase.getHeight())); + //BA.debugLineNum = 126;BA.debugLine="If pressed = False Then"; +if (_pressed==__c.False) { + //BA.debugLineNum = 127;BA.debugLine="xLBL.Top = 0"; +_xlbl.setTop((int) (0)); + //BA.debugLineNum = 128;BA.debugLine="p.InitializeRoundedRect(r, CornersRadius)"; +_p.InitializeRoundedRect(_r,(float) (_cornersradius)); + //BA.debugLineNum = 129;BA.debugLine="cvs.DrawPath(p, clr2, True, 0)"; +_cvs.DrawPath(_p,_clr2,__c.True,(float) (0)); + //BA.debugLineNum = 130;BA.debugLine="r.Initialize(0, 0, mBase.Width, mBase.Height - S"; +_r.Initialize((float) (0),(float) (0),(float) (_mbase.getWidth()),(float) (_mbase.getHeight()-_sideheight)); + //BA.debugLineNum = 131;BA.debugLine="p.InitializeRoundedRect(r, CornersRadius)"; +_p.InitializeRoundedRect(_r,(float) (_cornersradius)); + //BA.debugLineNum = 132;BA.debugLine="cvs.DrawPath(p, clr1, True, 0)"; +_cvs.DrawPath(_p,_clr1,__c.True,(float) (0)); + }else { + //BA.debugLineNum = 134;BA.debugLine="xLBL.Top = SideHeight"; +_xlbl.setTop(_sideheight); + //BA.debugLineNum = 135;BA.debugLine="p.InitializeRoundedRect(r, CornersRadius)"; +_p.InitializeRoundedRect(_r,(float) (_cornersradius)); + //BA.debugLineNum = 136;BA.debugLine="Dim c As Int"; +_c = 0; + //BA.debugLineNum = 137;BA.debugLine="If mDisabled Then c = disabledColor Else c = clr"; +if (_mdisabled) { +_c = _disabledcolor;} +else { +_c = _clr1;}; + //BA.debugLineNum = 138;BA.debugLine="cvs.DrawPath(p, c, True, 0)"; +_cvs.DrawPath(_p,_c,__c.True,(float) (0)); + }; + //BA.debugLineNum = 141;BA.debugLine="cvs.Invalidate"; +_cvs.Invalidate(); + //BA.debugLineNum = 142;BA.debugLine="End Sub"; +return ""; +} +public boolean _getenabled() throws Exception{ + //BA.debugLineNum = 62;BA.debugLine="Public Sub getEnabled As Boolean"; + //BA.debugLineNum = 63;BA.debugLine="Return Not(mDisabled)"; +if (true) return __c.Not(_mdisabled); + //BA.debugLineNum = 64;BA.debugLine="End Sub"; return false; } -public String _initialize(keymon.lat.medicomed.swiftbutton __ref,anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ -__ref = this; +public String _initialize(anywheresoftware.b4a.BA _ba,Object _callback,String _eventname) throws Exception{ innerInitialize(_ba); -RDebugUtils.currentModule="swiftbutton"; -if (Debug.shouldDelegate(ba, "initialize", true)) - {return ((String) Debug.delegate(ba, "initialize", new Object[] {_ba,_callback,_eventname}));} -RDebugUtils.currentLine=64094208; - //BA.debugLineNum = 64094208;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; -RDebugUtils.currentLine=64094209; - //BA.debugLineNum = 64094209;BA.debugLine="mEventName = EventName"; -__ref._meventname /*String*/ = _eventname; -RDebugUtils.currentLine=64094210; - //BA.debugLineNum = 64094210;BA.debugLine="mCallBack = Callback"; -__ref._mcallback /*Object*/ = _callback; -RDebugUtils.currentLine=64094211; - //BA.debugLineNum = 64094211;BA.debugLine="End Sub"; + //BA.debugLineNum = 27;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa"; + //BA.debugLineNum = 28;BA.debugLine="mEventName = EventName"; +_meventname = _eventname; + //BA.debugLineNum = 29;BA.debugLine="mCallBack = Callback"; +_mcallback = _callback; + //BA.debugLineNum = 30;BA.debugLine="End Sub"; return ""; } -public String _p_touch(keymon.lat.medicomed.swiftbutton __ref,int _action,float _x,float _y) throws Exception{ -__ref = this; -RDebugUtils.currentModule="swiftbutton"; -if (Debug.shouldDelegate(ba, "p_touch", true)) - {return ((String) Debug.delegate(ba, "p_touch", new Object[] {_action,_x,_y}));} +public String _p_touch(int _action,float _x,float _y) throws Exception{ boolean _inside = false; -RDebugUtils.currentLine=64421888; - //BA.debugLineNum = 64421888;BA.debugLine="Private Sub p_Touch (Action As Int, X As Float, Y"; -RDebugUtils.currentLine=64421889; - //BA.debugLineNum = 64421889;BA.debugLine="If mDisabled Then Return"; -if (__ref._mdisabled /*boolean*/ ) { + //BA.debugLineNum = 72;BA.debugLine="Private Sub p_Touch (Action As Int, X As Float, Y"; + //BA.debugLineNum = 73;BA.debugLine="If mDisabled Then Return"; +if (_mdisabled) { if (true) return "";}; -RDebugUtils.currentLine=64421890; - //BA.debugLineNum = 64421890;BA.debugLine="Dim Inside As Boolean = x > 0 And x < mBase.Width"; -_inside = _x>0 && _x<__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getWidth() && _y>0 && _y<__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .getHeight(); -RDebugUtils.currentLine=64421891; - //BA.debugLineNum = 64421891;BA.debugLine="Select Action"; -switch (BA.switchObjectToInt(_action,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .TOUCH_ACTION_DOWN,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .TOUCH_ACTION_MOVE,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ .TOUCH_ACTION_UP,(int) (3))) { + //BA.debugLineNum = 74;BA.debugLine="Dim Inside As Boolean = x > 0 And x < mBase.Width"; +_inside = _x>0 && _x<_mbase.getWidth() && _y>0 && _y<_mbase.getHeight(); + //BA.debugLineNum = 75;BA.debugLine="Select Action"; +switch (BA.switchObjectToInt(_action,_mbase.TOUCH_ACTION_DOWN,_mbase.TOUCH_ACTION_MOVE,_mbase.TOUCH_ACTION_UP,(int) (3))) { case 0: { -RDebugUtils.currentLine=64421893; - //BA.debugLineNum = 64421893;BA.debugLine="SetPressedState(True)"; -__ref._setpressedstate /*String*/ (null,__c.True); -RDebugUtils.currentLine=64421894; - //BA.debugLineNum = 64421894;BA.debugLine="Draw"; -__ref._draw /*String*/ (null); + //BA.debugLineNum = 77;BA.debugLine="SetPressedState(True)"; +_setpressedstate(__c.True); + //BA.debugLineNum = 78;BA.debugLine="Draw"; +_draw(); break; } case 1: { -RDebugUtils.currentLine=64421896; - //BA.debugLineNum = 64421896;BA.debugLine="If pressed <> Inside Then"; -if (__ref._pressed /*boolean*/ !=_inside) { -RDebugUtils.currentLine=64421897; - //BA.debugLineNum = 64421897;BA.debugLine="SetPressedState(Inside)"; -__ref._setpressedstate /*String*/ (null,_inside); -RDebugUtils.currentLine=64421898; - //BA.debugLineNum = 64421898;BA.debugLine="Draw"; -__ref._draw /*String*/ (null); + //BA.debugLineNum = 80;BA.debugLine="If pressed <> Inside Then"; +if (_pressed!=_inside) { + //BA.debugLineNum = 81;BA.debugLine="SetPressedState(Inside)"; +_setpressedstate(_inside); + //BA.debugLineNum = 82;BA.debugLine="Draw"; +_draw(); }; break; } case 2: case 3: { -RDebugUtils.currentLine=64421901; - //BA.debugLineNum = 64421901;BA.debugLine="SetPressedState(False)"; -__ref._setpressedstate /*String*/ (null,__c.False); -RDebugUtils.currentLine=64421902; - //BA.debugLineNum = 64421902;BA.debugLine="Draw"; -__ref._draw /*String*/ (null); -RDebugUtils.currentLine=64421903; - //BA.debugLineNum = 64421903;BA.debugLine="If Inside Then"; + //BA.debugLineNum = 85;BA.debugLine="SetPressedState(False)"; +_setpressedstate(__c.False); + //BA.debugLineNum = 86;BA.debugLine="Draw"; +_draw(); + //BA.debugLineNum = 87;BA.debugLine="If Inside Then"; if (_inside) { -RDebugUtils.currentLine=64421904; - //BA.debugLineNum = 64421904;BA.debugLine="If mHaptic Then XUIViewsUtils.PerformHapticFee"; -if (__ref._mhaptic /*boolean*/ ) { -_xuiviewsutils._performhapticfeedback /*String*/ (ba,__ref._mbase /*anywheresoftware.b4a.objects.B4XViewWrapper*/ );}; -RDebugUtils.currentLine=64421905; - //BA.debugLineNum = 64421905;BA.debugLine="CallSubDelayed(mCallBack, mEventName & \"_Click"; -__c.CallSubDelayed(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_Click"); + //BA.debugLineNum = 88;BA.debugLine="If mHaptic Then XUIViewsUtils.PerformHapticFee"; +if (_mhaptic) { +_xuiviewsutils._performhapticfeedback /*String*/ (ba,_mbase);}; + //BA.debugLineNum = 89;BA.debugLine="CallSubDelayed(mCallBack, mEventName & \"_Click"; +__c.CallSubDelayed(ba,_mcallback,_meventname+"_Click"); }; break; } } ; -RDebugUtils.currentLine=64421908; - //BA.debugLineNum = 64421908;BA.debugLine="End Sub"; + //BA.debugLineNum = 92;BA.debugLine="End Sub"; return ""; } -public String _setpressedstate(keymon.lat.medicomed.swiftbutton __ref,boolean _newstate) throws Exception{ -__ref = this; -RDebugUtils.currentModule="swiftbutton"; -if (Debug.shouldDelegate(ba, "setpressedstate", true)) - {return ((String) Debug.delegate(ba, "setpressedstate", new Object[] {_newstate}));} -RDebugUtils.currentLine=64487424; - //BA.debugLineNum = 64487424;BA.debugLine="Private Sub SetPressedState(NewState As Boolean)"; -RDebugUtils.currentLine=64487425; - //BA.debugLineNum = 64487425;BA.debugLine="If pressed = NewState Then Return"; -if (__ref._pressed /*boolean*/ ==_newstate) { +public String _setcolors(int _primary,int _secondary) throws Exception{ + //BA.debugLineNum = 111;BA.debugLine="Public Sub SetColors(Primary As Int, Secondary As"; + //BA.debugLineNum = 112;BA.debugLine="clr1 = Primary"; +_clr1 = _primary; + //BA.debugLineNum = 113;BA.debugLine="clr2 = Secondary"; +_clr2 = _secondary; + //BA.debugLineNum = 114;BA.debugLine="Draw"; +_draw(); + //BA.debugLineNum = 115;BA.debugLine="End Sub"; +return ""; +} +public String _setenabled(boolean _b) throws Exception{ + //BA.debugLineNum = 66;BA.debugLine="Public Sub setEnabled(b As Boolean)"; + //BA.debugLineNum = 67;BA.debugLine="mDisabled = Not(b)"; +_mdisabled = __c.Not(_b); + //BA.debugLineNum = 68;BA.debugLine="pressed = mDisabled"; +_pressed = _mdisabled; + //BA.debugLineNum = 69;BA.debugLine="Draw"; +_draw(); + //BA.debugLineNum = 70;BA.debugLine="End Sub"; +return ""; +} +public String _setpressedstate(boolean _newstate) throws Exception{ + //BA.debugLineNum = 94;BA.debugLine="Private Sub SetPressedState(NewState As Boolean)"; + //BA.debugLineNum = 95;BA.debugLine="If pressed = NewState Then Return"; +if (_pressed==_newstate) { if (true) return "";}; -RDebugUtils.currentLine=64487426; - //BA.debugLineNum = 64487426;BA.debugLine="If NewState And xui.SubExists(mCallBack, mEventNa"; -if (_newstate && __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .SubExists(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_ButtonDown",(int) (0))) { -RDebugUtils.currentLine=64487427; - //BA.debugLineNum = 64487427;BA.debugLine="CallSubDelayed(mCallBack, mEventName & \"_ButtonD"; -__c.CallSubDelayed(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_ButtonDown"); + //BA.debugLineNum = 96;BA.debugLine="If NewState And xui.SubExists(mCallBack, mEventNa"; +if (_newstate && _xui.SubExists(ba,_mcallback,_meventname+"_ButtonDown",(int) (0))) { + //BA.debugLineNum = 97;BA.debugLine="CallSubDelayed(mCallBack, mEventName & \"_ButtonD"; +__c.CallSubDelayed(ba,_mcallback,_meventname+"_ButtonDown"); }; -RDebugUtils.currentLine=64487429; - //BA.debugLineNum = 64487429;BA.debugLine="If NewState = False And xui.SubExists(mCallBack,"; -if (_newstate==__c.False && __ref._xui /*anywheresoftware.b4a.objects.B4XViewWrapper.XUI*/ .SubExists(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_ButtonUp",(int) (0))) { -RDebugUtils.currentLine=64487430; - //BA.debugLineNum = 64487430;BA.debugLine="CallSubDelayed(mCallBack, mEventName & \"_ButtonU"; -__c.CallSubDelayed(ba,__ref._mcallback /*Object*/ ,__ref._meventname /*String*/ +"_ButtonUp"); + //BA.debugLineNum = 99;BA.debugLine="If NewState = False And xui.SubExists(mCallBack,"; +if (_newstate==__c.False && _xui.SubExists(ba,_mcallback,_meventname+"_ButtonUp",(int) (0))) { + //BA.debugLineNum = 100;BA.debugLine="CallSubDelayed(mCallBack, mEventName & \"_ButtonU"; +__c.CallSubDelayed(ba,_mcallback,_meventname+"_ButtonUp"); }; -RDebugUtils.currentLine=64487432; - //BA.debugLineNum = 64487432;BA.debugLine="pressed= NewState"; -__ref._pressed /*boolean*/ = _newstate; -RDebugUtils.currentLine=64487433; - //BA.debugLineNum = 64487433;BA.debugLine="End Sub"; + //BA.debugLineNum = 102;BA.debugLine="pressed= NewState"; +_pressed = _newstate; + //BA.debugLineNum = 103;BA.debugLine="End Sub"; return ""; } -public String _setcolors(keymon.lat.medicomed.swiftbutton __ref,int _primary,int _secondary) throws Exception{ -__ref = this; -RDebugUtils.currentModule="swiftbutton"; -if (Debug.shouldDelegate(ba, "setcolors", true)) - {return ((String) Debug.delegate(ba, "setcolors", new Object[] {_primary,_secondary}));} -RDebugUtils.currentLine=64552960; - //BA.debugLineNum = 64552960;BA.debugLine="Public Sub SetColors(Primary As Int, Secondary As"; -RDebugUtils.currentLine=64552961; - //BA.debugLineNum = 64552961;BA.debugLine="clr1 = Primary"; -__ref._clr1 /*int*/ = _primary; -RDebugUtils.currentLine=64552962; - //BA.debugLineNum = 64552962;BA.debugLine="clr2 = Secondary"; -__ref._clr2 /*int*/ = _secondary; -RDebugUtils.currentLine=64552963; - //BA.debugLineNum = 64552963;BA.debugLine="Draw"; -__ref._draw /*String*/ (null); -RDebugUtils.currentLine=64552964; - //BA.debugLineNum = 64552964;BA.debugLine="End Sub"; +public String _update() throws Exception{ + //BA.debugLineNum = 117;BA.debugLine="Public Sub Update"; + //BA.debugLineNum = 118;BA.debugLine="Draw"; +_draw(); + //BA.debugLineNum = 119;BA.debugLine="End Sub"; return ""; } -public String _setenabled(keymon.lat.medicomed.swiftbutton __ref,boolean _b) throws Exception{ -__ref = this; -RDebugUtils.currentModule="swiftbutton"; -if (Debug.shouldDelegate(ba, "setenabled", true)) - {return ((String) Debug.delegate(ba, "setenabled", new Object[] {_b}));} -RDebugUtils.currentLine=64356352; - //BA.debugLineNum = 64356352;BA.debugLine="Public Sub setEnabled(b As Boolean)"; -RDebugUtils.currentLine=64356353; - //BA.debugLineNum = 64356353;BA.debugLine="mDisabled = Not(b)"; -__ref._mdisabled /*boolean*/ = __c.Not(_b); -RDebugUtils.currentLine=64356354; - //BA.debugLineNum = 64356354;BA.debugLine="pressed = mDisabled"; -__ref._pressed /*boolean*/ = __ref._mdisabled /*boolean*/ ; -RDebugUtils.currentLine=64356355; - //BA.debugLineNum = 64356355;BA.debugLine="Draw"; -__ref._draw /*String*/ (null); -RDebugUtils.currentLine=64356356; - //BA.debugLineNum = 64356356;BA.debugLine="End Sub"; -return ""; +public Object callSub(String sub, Object sender, Object[] args) throws Exception { +BA.senderHolder.set(sender); +return BA.SubDelegator.SubNotFound; } -public String _update(keymon.lat.medicomed.swiftbutton __ref) throws Exception{ -__ref = this; -RDebugUtils.currentModule="swiftbutton"; -if (Debug.shouldDelegate(ba, "update", true)) - {return ((String) Debug.delegate(ba, "update", null));} -RDebugUtils.currentLine=64618496; - //BA.debugLineNum = 64618496;BA.debugLine="Public Sub Update"; -RDebugUtils.currentLine=64618497; - //BA.debugLineNum = 64618497;BA.debugLine="Draw"; -__ref._draw /*String*/ (null); -RDebugUtils.currentLine=64618498; - //BA.debugLineNum = 64618498;BA.debugLine="End Sub"; -return ""; } -} \ No newline at end of file diff --git a/B4A/Objects/src/keymon/lat/medicomed/tracker.java b/B4A/Objects/src/keymon/lat/medicomed/tracker.java index 9c5cc92..16ae13c 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/tracker.java +++ b/B4A/Objects/src/keymon/lat/medicomed/tracker.java @@ -14,7 +14,7 @@ public class tracker extends android.app.Service{ android.content.Intent in = new android.content.Intent(context, tracker.class); if (intent != null) in.putExtra("b4a_internal_intent", intent); - ServiceHelper.StarterHelper.startServiceFromReceiver (context, in, false, anywheresoftware.b4a.ShellBA.class); + ServiceHelper.StarterHelper.startServiceFromReceiver (context, in, false, BA.class); } } @@ -29,7 +29,7 @@ public class tracker extends android.app.Service{ super.onCreate(); mostCurrent = this; if (processBA == null) { - processBA = new anywheresoftware.b4a.ShellBA(this, null, null, "keymon.lat.medicomed", "keymon.lat.medicomed.tracker"); + processBA = new BA(this, null, null, "keymon.lat.medicomed", "keymon.lat.medicomed.tracker"); if (BA.isShellModeRuntimeCheck(processBA)) { processBA.raiseEvent2(null, true, "SHELL", false); } @@ -127,8 +127,7 @@ public class tracker extends android.app.Service{ @Override public android.os.IBinder onBind(android.content.Intent intent) { return null; - } -public anywheresoftware.b4a.keywords.Common __c = null; + }public anywheresoftware.b4a.keywords.Common __c = null; public static int _nid = 0; public static boolean _tracking = false; public static anywheresoftware.b4a.phone.Phone.PhoneWakeState _lock = null; @@ -148,339 +147,328 @@ public keymon.lat.medicomed.b4xcollections _b4xcollections = null; public keymon.lat.medicomed.httputils2service _httputils2service = null; public keymon.lat.medicomed.xuiviewsutils _xuiviewsutils = null; public static uk.co.martinpearman.b4a.fusedlocationprovider.LocationRequest _createlocationrequest() throws Exception{ -RDebugUtils.currentModule="tracker"; -if (Debug.shouldDelegate(processBA, "createlocationrequest", false)) - {return ((uk.co.martinpearman.b4a.fusedlocationprovider.LocationRequest) Debug.delegate(processBA, "createlocationrequest", null));} uk.co.martinpearman.b4a.fusedlocationprovider.LocationRequest _lr = null; -RDebugUtils.currentLine=29556736; - //BA.debugLineNum = 29556736;BA.debugLine="Private Sub CreateLocationRequest As LocationReque"; -RDebugUtils.currentLine=29556738; - //BA.debugLineNum = 29556738;BA.debugLine="Dim lr As LocationRequest"; + //BA.debugLineNum = 111;BA.debugLine="Private Sub CreateLocationRequest As LocationReque"; + //BA.debugLineNum = 113;BA.debugLine="Dim lr As LocationRequest"; _lr = new uk.co.martinpearman.b4a.fusedlocationprovider.LocationRequest(); -RDebugUtils.currentLine=29556739; - //BA.debugLineNum = 29556739;BA.debugLine="lr.Initialize"; + //BA.debugLineNum = 114;BA.debugLine="lr.Initialize"; _lr.Initialize(); -RDebugUtils.currentLine=29556740; - //BA.debugLineNum = 29556740;BA.debugLine="lr.SetInterval(10000) 'Intervalo deseado para act"; + //BA.debugLineNum = 115;BA.debugLine="lr.SetInterval(10000) 'Intervalo deseado para act"; _lr.SetInterval((long) (10000)); -RDebugUtils.currentLine=29556741; - //BA.debugLineNum = 29556741;BA.debugLine="lr.SetFastestInterval(lr.GetInterval / 2) 'Interv"; + //BA.debugLineNum = 116;BA.debugLine="lr.SetFastestInterval(lr.GetInterval / 2) 'Interv"; _lr.SetFastestInterval((long) (_lr.GetInterval()/(double)2)); -RDebugUtils.currentLine=29556742; - //BA.debugLineNum = 29556742;BA.debugLine="lr.SetSmallestDisplacement(50) 'Solo registra cam"; + //BA.debugLineNum = 117;BA.debugLine="lr.SetSmallestDisplacement(50) 'Solo registra cam"; _lr.SetSmallestDisplacement((float) (50)); -RDebugUtils.currentLine=29556743; - //BA.debugLineNum = 29556743;BA.debugLine="lr.SetPriority(lr.Priority.PRIORITY_HIGH_ACCURACY"; + //BA.debugLineNum = 118;BA.debugLine="lr.SetPriority(lr.Priority.PRIORITY_HIGH_ACCURACY"; _lr.SetPriority(_lr.Priority.PRIORITY_HIGH_ACCURACY); -RDebugUtils.currentLine=29556744; - //BA.debugLineNum = 29556744;BA.debugLine="actualLR=lr"; + //BA.debugLineNum = 119;BA.debugLine="actualLR=lr"; _actuallr = _lr; -RDebugUtils.currentLine=29556745; - //BA.debugLineNum = 29556745;BA.debugLine="Return lr"; + //BA.debugLineNum = 120;BA.debugLine="Return lr"; if (true) return _lr; -RDebugUtils.currentLine=29556746; - //BA.debugLineNum = 29556746;BA.debugLine="End Sub"; + //BA.debugLineNum = 121;BA.debugLine="End Sub"; return null; } public static uk.co.martinpearman.b4a.fusedlocationprovider.LocationRequest _createlocationrequestsmalld() throws Exception{ -RDebugUtils.currentModule="tracker"; -if (Debug.shouldDelegate(processBA, "createlocationrequestsmalld", false)) - {return ((uk.co.martinpearman.b4a.fusedlocationprovider.LocationRequest) Debug.delegate(processBA, "createlocationrequestsmalld", null));} uk.co.martinpearman.b4a.fusedlocationprovider.LocationRequest _lr = null; -RDebugUtils.currentLine=29622272; - //BA.debugLineNum = 29622272;BA.debugLine="Private Sub CreateLocationRequestSmallD As Locatio"; -RDebugUtils.currentLine=29622274; - //BA.debugLineNum = 29622274;BA.debugLine="Dim lr As LocationRequest"; + //BA.debugLineNum = 123;BA.debugLine="Private Sub CreateLocationRequestSmallD As Locatio"; + //BA.debugLineNum = 125;BA.debugLine="Dim lr As LocationRequest"; _lr = new uk.co.martinpearman.b4a.fusedlocationprovider.LocationRequest(); -RDebugUtils.currentLine=29622275; - //BA.debugLineNum = 29622275;BA.debugLine="lr.Initialize"; + //BA.debugLineNum = 126;BA.debugLine="lr.Initialize"; _lr.Initialize(); -RDebugUtils.currentLine=29622276; - //BA.debugLineNum = 29622276;BA.debugLine="lr.SetInterval(2000) 'Intervalo deseado para actu"; + //BA.debugLineNum = 127;BA.debugLine="lr.SetInterval(2000) 'Intervalo deseado para actu"; _lr.SetInterval((long) (2000)); -RDebugUtils.currentLine=29622277; - //BA.debugLineNum = 29622277;BA.debugLine="lr.SetFastestInterval(lr.GetInterval / 2) 'Interv"; + //BA.debugLineNum = 128;BA.debugLine="lr.SetFastestInterval(lr.GetInterval / 2) 'Interv"; _lr.SetFastestInterval((long) (_lr.GetInterval()/(double)2)); -RDebugUtils.currentLine=29622278; - //BA.debugLineNum = 29622278;BA.debugLine="lr.setNumUpdates(2) 'Solicitamos solo 2 actualiza"; + //BA.debugLineNum = 129;BA.debugLine="lr.setNumUpdates(2) 'Solicitamos solo 2 actualiza"; _lr.SetNumUpdates((int) (2)); -RDebugUtils.currentLine=29622279; - //BA.debugLineNum = 29622279;BA.debugLine="lr.SetSmallestDisplacement(0) 'Solo registra camb"; + //BA.debugLineNum = 130;BA.debugLine="lr.SetSmallestDisplacement(0) 'Solo registra camb"; _lr.SetSmallestDisplacement((float) (0)); -RDebugUtils.currentLine=29622280; - //BA.debugLineNum = 29622280;BA.debugLine="lr.SetPriority(lr.Priority.PRIORITY_HIGH_ACCURACY"; + //BA.debugLineNum = 131;BA.debugLine="lr.SetPriority(lr.Priority.PRIORITY_HIGH_ACCURACY"; _lr.SetPriority(_lr.Priority.PRIORITY_HIGH_ACCURACY); -RDebugUtils.currentLine=29622281; - //BA.debugLineNum = 29622281;BA.debugLine="actualLR=lr"; + //BA.debugLineNum = 132;BA.debugLine="actualLR=lr"; _actuallr = _lr; -RDebugUtils.currentLine=29622282; - //BA.debugLineNum = 29622282;BA.debugLine="Return lr"; + //BA.debugLineNum = 133;BA.debugLine="Return lr"; if (true) return _lr; -RDebugUtils.currentLine=29622283; - //BA.debugLineNum = 29622283;BA.debugLine="End Sub"; + //BA.debugLineNum = 134;BA.debugLine="End Sub"; return null; } public static anywheresoftware.b4a.objects.NotificationWrapper _createnotification(String _body) throws Exception{ -RDebugUtils.currentModule="tracker"; -if (Debug.shouldDelegate(processBA, "createnotification", false)) - {return ((anywheresoftware.b4a.objects.NotificationWrapper) Debug.delegate(processBA, "createnotification", new Object[] {_body}));} anywheresoftware.b4a.objects.NotificationWrapper _notification = null; -RDebugUtils.currentLine=29884416; - //BA.debugLineNum = 29884416;BA.debugLine="Sub CreateNotification (Body As String) As Notific"; -RDebugUtils.currentLine=29884417; - //BA.debugLineNum = 29884417;BA.debugLine="Dim notification As Notification"; + //BA.debugLineNum = 194;BA.debugLine="Sub CreateNotification (Body As String) As Notific"; + //BA.debugLineNum = 195;BA.debugLine="Dim notification As Notification"; _notification = new anywheresoftware.b4a.objects.NotificationWrapper(); -RDebugUtils.currentLine=29884418; - //BA.debugLineNum = 29884418;BA.debugLine="notification.Initialize2(notification.IMPORTANCE_"; + //BA.debugLineNum = 196;BA.debugLine="notification.Initialize2(notification.IMPORTANCE_"; _notification.Initialize2(_notification.IMPORTANCE_LOW); -RDebugUtils.currentLine=29884419; - //BA.debugLineNum = 29884419;BA.debugLine="notification.Icon = \"icon\""; + //BA.debugLineNum = 197;BA.debugLine="notification.Icon = \"icon\""; _notification.setIcon("icon"); -RDebugUtils.currentLine=29884420; - //BA.debugLineNum = 29884420;BA.debugLine="notification.SetInfo(\"Medicomed\", Body, Main)"; + //BA.debugLineNum = 198;BA.debugLine="notification.SetInfo(\"Medicomed\", Body, Main)"; _notification.SetInfoNew(processBA,BA.ObjectToCharSequence("Medicomed"),BA.ObjectToCharSequence(_body),(Object)(mostCurrent._main.getObject())); -RDebugUtils.currentLine=29884421; - //BA.debugLineNum = 29884421;BA.debugLine="Return notification"; + //BA.debugLineNum = 199;BA.debugLine="Return notification"; if (true) return _notification; -RDebugUtils.currentLine=29884422; - //BA.debugLineNum = 29884422;BA.debugLine="End Sub"; + //BA.debugLineNum = 200;BA.debugLine="End Sub"; return null; } public static String _dameultimaubicacionconocida() throws Exception{ -RDebugUtils.currentModule="tracker"; -if (Debug.shouldDelegate(processBA, "dameultimaubicacionconocida", false)) - {return ((String) Debug.delegate(processBA, "dameultimaubicacionconocida", null));} String _coords = ""; -RDebugUtils.currentLine=29687808; - //BA.debugLineNum = 29687808;BA.debugLine="Sub dameUltimaUbicacionConocida"; -RDebugUtils.currentLine=29687809; - //BA.debugLineNum = 29687809;BA.debugLine="If FLP.GetLastKnownLocation.IsInitialized Then 'M"; + //BA.debugLineNum = 136;BA.debugLine="Sub dameUltimaUbicacionConocida"; + //BA.debugLineNum = 137;BA.debugLine="If FLP.GetLastKnownLocation.IsInitialized Then 'M"; if (_flp.GetLastKnownLocation().IsInitialized()) { -RDebugUtils.currentLine=29687811; - //BA.debugLineNum = 29687811;BA.debugLine="If Starter.Logger Then LogColor($\"Mandamos UUC \""; + //BA.debugLineNum = 139;BA.debugLine="If Starter.Logger Then LogColor($\"Mandamos UUC \""; if (mostCurrent._starter._logger /*boolean*/ ) { -anywheresoftware.b4a.keywords.Common.LogImpl("329687811",("Mandamos UUC \""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(mostCurrent._subs._fechakmt /*String*/ (processBA,BA.NumberToString(_flp.GetLastKnownLocation().getTime()))))+"|Acc:"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.2",(Object)(_flp.GetLastKnownLocation().getAccuracy()))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.8",(Object)(_flp.GetLastKnownLocation().getLatitude()))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.8",(Object)(_flp.GetLastKnownLocation().getLongitude()))+"|Spd:"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.2",(Object)(_flp.GetLastKnownLocation().getSpeed()))+"|"),anywheresoftware.b4a.keywords.Common.Colors.RGB((int) (255),(int) (112),(int) (35)));}; -RDebugUtils.currentLine=29687812; - //BA.debugLineNum = 29687812;BA.debugLine="Dim coords As String = FLP.GetLastKnownLocation."; +anywheresoftware.b4a.keywords.Common.LogImpl("365994755",("Mandamos UUC \""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(mostCurrent._subs._fechakmt /*String*/ (processBA,BA.NumberToString(_flp.GetLastKnownLocation().getTime()))))+"|Acc:"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.2",(Object)(_flp.GetLastKnownLocation().getAccuracy()))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.8",(Object)(_flp.GetLastKnownLocation().getLatitude()))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.8",(Object)(_flp.GetLastKnownLocation().getLongitude()))+"|Spd:"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.2",(Object)(_flp.GetLastKnownLocation().getSpeed()))+"|"),anywheresoftware.b4a.keywords.Common.Colors.RGB((int) (255),(int) (112),(int) (35)));}; + //BA.debugLineNum = 140;BA.debugLine="Dim coords As String = FLP.GetLastKnownLocation."; _coords = BA.NumberToString(_flp.GetLastKnownLocation().getLatitude())+","+BA.NumberToString(_flp.GetLastKnownLocation().getLongitude())+","+_formatofecha(BA.NumberToString(_flp.GetLastKnownLocation().getTime())); }; -RDebugUtils.currentLine=29687816; - //BA.debugLineNum = 29687816;BA.debugLine="End Sub"; -return ""; -} -public static String _formatofecha(String _fecha) throws Exception{ -RDebugUtils.currentModule="tracker"; -if (Debug.shouldDelegate(processBA, "formatofecha", false)) - {return ((String) Debug.delegate(processBA, "formatofecha", new Object[] {_fecha}));} -String _origformat = ""; -String _lastupdate = ""; -RDebugUtils.currentLine=30015488; - //BA.debugLineNum = 30015488;BA.debugLine="Sub formatoFecha(fecha As String) As String 'Convi"; -RDebugUtils.currentLine=30015490; - //BA.debugLineNum = 30015490;BA.debugLine="Dim OrigFormat As String = DateTime.DateFormat '"; -_origformat = anywheresoftware.b4a.keywords.Common.DateTime.getDateFormat(); -RDebugUtils.currentLine=30015491; - //BA.debugLineNum = 30015491;BA.debugLine="DateTime.DateFormat=\"yyMMddHHmmss\""; -anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat("yyMMddHHmmss"); -RDebugUtils.currentLine=30015492; - //BA.debugLineNum = 30015492;BA.debugLine="Dim lastUpdate As String=DateTime.Date(fecha)"; -_lastupdate = anywheresoftware.b4a.keywords.Common.DateTime.Date((long)(Double.parseDouble(_fecha))); -RDebugUtils.currentLine=30015493; - //BA.debugLineNum = 30015493;BA.debugLine="DateTime.DateFormat=OrigFormat 'return to orig d"; -anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat(_origformat); -RDebugUtils.currentLine=30015495; - //BA.debugLineNum = 30015495;BA.debugLine="Return lastUpdate"; -if (true) return _lastupdate; -RDebugUtils.currentLine=30015496; - //BA.debugLineNum = 30015496;BA.debugLine="End Sub"; + //BA.debugLineNum = 144;BA.debugLine="End Sub"; return ""; } public static String _flp_connectionfailed(int _connectionresult1) throws Exception{ -RDebugUtils.currentModule="tracker"; -if (Debug.shouldDelegate(processBA, "flp_connectionfailed", false)) - {return ((String) Debug.delegate(processBA, "flp_connectionfailed", new Object[] {_connectionresult1}));} -RDebugUtils.currentLine=29229056; - //BA.debugLineNum = 29229056;BA.debugLine="Sub flp_ConnectionFailed(ConnectionResult1 As Int)"; -RDebugUtils.currentLine=29229057; - //BA.debugLineNum = 29229057;BA.debugLine="Log(\"Failed to connect to location provider\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("329229057","Failed to connect to location provider",0); -RDebugUtils.currentLine=29229058; - //BA.debugLineNum = 29229058;BA.debugLine="End Sub"; + //BA.debugLineNum = 55;BA.debugLine="Sub flp_ConnectionFailed(ConnectionResult1 As Int)"; + //BA.debugLineNum = 56;BA.debugLine="Log(\"Failed to connect to location provider\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("365536001","Failed to connect to location provider",0); + //BA.debugLineNum = 57;BA.debugLine="End Sub"; return ""; } public static String _flp_connectionsuccess() throws Exception{ -RDebugUtils.currentModule="tracker"; -if (Debug.shouldDelegate(processBA, "flp_connectionsuccess", false)) - {return ((String) Debug.delegate(processBA, "flp_connectionsuccess", null));} -RDebugUtils.currentLine=29163520; - //BA.debugLineNum = 29163520;BA.debugLine="Sub flp_ConnectionSuccess"; -RDebugUtils.currentLine=29163523; - //BA.debugLineNum = 29163523;BA.debugLine="End Sub"; + //BA.debugLineNum = 50;BA.debugLine="Sub flp_ConnectionSuccess"; + //BA.debugLineNum = 53;BA.debugLine="End Sub"; return ""; } public static String _flp_locationchanged(anywheresoftware.b4a.gps.LocationWrapper _location1) throws Exception{ -RDebugUtils.currentModule="tracker"; -if (Debug.shouldDelegate(processBA, "flp_locationchanged", false)) - {return ((String) Debug.delegate(processBA, "flp_locationchanged", new Object[] {_location1}));} String _sdate = ""; String _stime = ""; String _coords = ""; -RDebugUtils.currentLine=29818880; - //BA.debugLineNum = 29818880;BA.debugLine="Sub flp_LocationChanged (Location1 As Location)"; -RDebugUtils.currentLine=29818883; - //BA.debugLineNum = 29818883;BA.debugLine="B4XPages.MainPage.lat_gps = Location1.Latitude"; + //BA.debugLineNum = 154;BA.debugLine="Sub flp_LocationChanged (Location1 As Location)"; + //BA.debugLineNum = 157;BA.debugLine="B4XPages.MainPage.lat_gps = Location1.Latitude"; mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._lat_gps /*String*/ = BA.NumberToString(_location1.getLatitude()); -RDebugUtils.currentLine=29818884; - //BA.debugLineNum = 29818884;BA.debugLine="B4XPages.MainPage.lon_gps = Location1.Longitude"; + //BA.debugLineNum = 158;BA.debugLine="B4XPages.MainPage.lon_gps = Location1.Longitude"; mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._lon_gps /*String*/ = BA.NumberToString(_location1.getLongitude()); -RDebugUtils.currentLine=29818885; - //BA.debugLineNum = 29818885;BA.debugLine="UUGCoords = Location1"; + //BA.debugLineNum = 159;BA.debugLine="UUGCoords = Location1"; _uugcoords = _location1; -RDebugUtils.currentLine=29818893; - //BA.debugLineNum = 29818893;BA.debugLine="Dim sDate,sTime As String"; + //BA.debugLineNum = 167;BA.debugLine="Dim sDate,sTime As String"; _sdate = ""; _stime = ""; -RDebugUtils.currentLine=29818894; - //BA.debugLineNum = 29818894;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; + //BA.debugLineNum = 168;BA.debugLine="DateTime.DateFormat = \"MM/dd/yyyy\""; anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat("MM/dd/yyyy"); -RDebugUtils.currentLine=29818895; - //BA.debugLineNum = 29818895;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; + //BA.debugLineNum = 169;BA.debugLine="sDate=DateTime.Date(DateTime.Now)"; _sdate = anywheresoftware.b4a.keywords.Common.DateTime.Date(anywheresoftware.b4a.keywords.Common.DateTime.getNow()); -RDebugUtils.currentLine=29818896; - //BA.debugLineNum = 29818896;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; + //BA.debugLineNum = 170;BA.debugLine="sTime=DateTime.Time(DateTime.Now)"; _stime = anywheresoftware.b4a.keywords.Common.DateTime.Time(anywheresoftware.b4a.keywords.Common.DateTime.getNow()); -RDebugUtils.currentLine=29818897; - //BA.debugLineNum = 29818897;BA.debugLine="If Not(B4XPages.MainPage.skmt.IsInitialized) Then"; + //BA.debugLineNum = 171;BA.debugLine="If Not(B4XPages.MainPage.skmt.IsInitialized) Then"; if (anywheresoftware.b4a.keywords.Common.Not(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._skmt /*anywheresoftware.b4a.sql.SQL*/ .IsInitialized())) { mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._skmt /*anywheresoftware.b4a.sql.SQL*/ .Initialize(mostCurrent._starter._ruta /*String*/ ,"kmt.db",anywheresoftware.b4a.keywords.Common.True);}; -RDebugUtils.currentLine=29818898; - //BA.debugLineNum = 29818898;BA.debugLine="Try"; -try {RDebugUtils.currentLine=29818899; - //BA.debugLineNum = 29818899;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; + //BA.debugLineNum = 172;BA.debugLine="Try"; +try { //BA.debugLineNum = 173;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT INT"; mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO HIST_GPS (HGDATE, HGLAT, HGLON) VALUES(?,?,?) ",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(_sdate+_stime),(Object)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._lat_gps /*String*/ ),(Object)(mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._lon_gps /*String*/ )})); -RDebugUtils.currentLine=29818900; - //BA.debugLineNum = 29818900;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FROM"; + //BA.debugLineNum = 174;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery(\"DELETE FROM"; mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery("DELETE FROM HIST_GPS"); } catch (Exception e13) { - processBA.setLastException(e13);RDebugUtils.currentLine=29818902; - //BA.debugLineNum = 29818902;BA.debugLine="LogColor(LastException, Colors.Red)"; -anywheresoftware.b4a.keywords.Common.LogImpl("329818902",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(processBA)),anywheresoftware.b4a.keywords.Common.Colors.Red); + processBA.setLastException(e13); //BA.debugLineNum = 176;BA.debugLine="LogColor(LastException, Colors.Red)"; +anywheresoftware.b4a.keywords.Common.LogImpl("366125846",BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(processBA)),anywheresoftware.b4a.keywords.Common.Colors.Red); }; -RDebugUtils.currentLine=29818905; - //BA.debugLineNum = 29818905;BA.debugLine="Dim coords As String = Location1.Latitude&\",\"&Loc"; + //BA.debugLineNum = 179;BA.debugLine="Dim coords As String = Location1.Latitude&\",\"&Loc"; _coords = BA.NumberToString(_location1.getLatitude())+","+BA.NumberToString(_location1.getLongitude())+","+_formatofecha(BA.NumberToString(_location1.getTime())); -RDebugUtils.currentLine=29818910; - //BA.debugLineNum = 29818910;BA.debugLine="If Location1.Accuracy < 100 Then"; + //BA.debugLineNum = 184;BA.debugLine="If Location1.Accuracy < 100 Then"; if (_location1.getAccuracy()<100) { }; -RDebugUtils.currentLine=29818914; - //BA.debugLineNum = 29818914;BA.debugLine="CallSub2(Starter, \"GPS_LocationChanged\", Location"; -anywheresoftware.b4a.keywords.Common.CallSubDebug2(processBA,(Object)(mostCurrent._starter.getObject()),"GPS_LocationChanged",(Object)(_location1)); -RDebugUtils.currentLine=29818918; - //BA.debugLineNum = 29818918;BA.debugLine="End Sub"; + //BA.debugLineNum = 188;BA.debugLine="CallSub2(Starter, \"GPS_LocationChanged\", Location"; +anywheresoftware.b4a.keywords.Common.CallSubNew2(processBA,(Object)(mostCurrent._starter.getObject()),"GPS_LocationChanged",(Object)(_location1)); + //BA.debugLineNum = 192;BA.debugLine="End Sub"; +return ""; +} +public static String _formatofecha(String _fecha) throws Exception{ +String _origformat = ""; +String _lastupdate = ""; + //BA.debugLineNum = 210;BA.debugLine="Sub formatoFecha(fecha As String) As String 'Convi"; + //BA.debugLineNum = 212;BA.debugLine="Dim OrigFormat As String = DateTime.DateFormat '"; +_origformat = anywheresoftware.b4a.keywords.Common.DateTime.getDateFormat(); + //BA.debugLineNum = 213;BA.debugLine="DateTime.DateFormat=\"yyMMddHHmmss\""; +anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat("yyMMddHHmmss"); + //BA.debugLineNum = 214;BA.debugLine="Dim lastUpdate As String=DateTime.Date(fecha)"; +_lastupdate = anywheresoftware.b4a.keywords.Common.DateTime.Date((long)(Double.parseDouble(_fecha))); + //BA.debugLineNum = 215;BA.debugLine="DateTime.DateFormat=OrigFormat 'return to orig d"; +anywheresoftware.b4a.keywords.Common.DateTime.setDateFormat(_origformat); + //BA.debugLineNum = 217;BA.debugLine="Return lastUpdate"; +if (true) return _lastupdate; + //BA.debugLineNum = 218;BA.debugLine="End Sub"; +return ""; +} +public static String _process_globals() throws Exception{ + //BA.debugLineNum = 29;BA.debugLine="Sub Process_Globals"; + //BA.debugLineNum = 30;BA.debugLine="Private nid As Int = 51042"; +_nid = (int) (51042); + //BA.debugLineNum = 31;BA.debugLine="Private Tracking As Boolean"; +_tracking = false; + //BA.debugLineNum = 32;BA.debugLine="Private lock As PhoneWakeState"; +_lock = new anywheresoftware.b4a.phone.Phone.PhoneWakeState(); + //BA.debugLineNum = 34;BA.debugLine="Public FLP As FusedLocationProvider"; +_flp = new uk.co.martinpearman.b4a.fusedlocationprovider.FusedLocationProviderWrapper(); + //BA.debugLineNum = 35;BA.debugLine="Dim actualLR As LocationRequest"; +_actuallr = new uk.co.martinpearman.b4a.fusedlocationprovider.LocationRequest(); + //BA.debugLineNum = 36;BA.debugLine="Private flpStarted As Boolean"; +_flpstarted = false; + //BA.debugLineNum = 38;BA.debugLine="Dim UUGCoords As Location 'Ultima Ubicacion Guard"; +_uugcoords = new anywheresoftware.b4a.gps.LocationWrapper(); + //BA.debugLineNum = 39;BA.debugLine="End Sub"; return ""; } public static String _revisaflp() throws Exception{ -RDebugUtils.currentModule="tracker"; -if (Debug.shouldDelegate(processBA, "revisaflp", false)) - {return ((String) Debug.delegate(processBA, "revisaflp", null));} boolean _todobienflp = false; -RDebugUtils.currentLine=30081024; - //BA.debugLineNum = 30081024;BA.debugLine="Sub revisaFLP 'ignore"; -RDebugUtils.currentLine=30081025; - //BA.debugLineNum = 30081025;BA.debugLine="LogColor(\"**** **** Revisamos FLP **** ****\", Col"; -anywheresoftware.b4a.keywords.Common.LogImpl("330081025","**** **** Revisamos FLP **** ****",anywheresoftware.b4a.keywords.Common.Colors.RGB((int) (78),(int) (0),(int) (227))); -RDebugUtils.currentLine=30081026; - //BA.debugLineNum = 30081026;BA.debugLine="Private todoBienFLP As Boolean = True"; + //BA.debugLineNum = 221;BA.debugLine="Sub revisaFLP 'ignore"; + //BA.debugLineNum = 222;BA.debugLine="LogColor(\"**** **** Revisamos FLP **** ****\", Col"; +anywheresoftware.b4a.keywords.Common.LogImpl("366387969","**** **** Revisamos FLP **** ****",anywheresoftware.b4a.keywords.Common.Colors.RGB((int) (78),(int) (0),(int) (227))); + //BA.debugLineNum = 223;BA.debugLine="Private todoBienFLP As Boolean = True"; _todobienflp = anywheresoftware.b4a.keywords.Common.True; -RDebugUtils.currentLine=30081027; - //BA.debugLineNum = 30081027;BA.debugLine="Try"; -try {RDebugUtils.currentLine=30081028; - //BA.debugLineNum = 30081028;BA.debugLine="If Not(FLP.IsInitialized) Then"; + //BA.debugLineNum = 224;BA.debugLine="Try"; +try { //BA.debugLineNum = 225;BA.debugLine="If Not(FLP.IsInitialized) Then"; if (anywheresoftware.b4a.keywords.Common.Not(_flp.IsInitialized())) { -RDebugUtils.currentLine=30081029; - //BA.debugLineNum = 30081029;BA.debugLine="Subs.log2DB(\"revisaFLP: No esta inicializado .."; + //BA.debugLineNum = 226;BA.debugLine="Subs.log2DB(\"revisaFLP: No esta inicializado .."; mostCurrent._subs._log2db /*String*/ (processBA,"revisaFLP: No esta inicializado ... 'Reinicializando FLP'"); -RDebugUtils.currentLine=30081030; - //BA.debugLineNum = 30081030;BA.debugLine="FLP.Initialize(\"flp\")"; + //BA.debugLineNum = 227;BA.debugLine="FLP.Initialize(\"flp\")"; _flp.Initialize(processBA,"flp"); -RDebugUtils.currentLine=30081031; - //BA.debugLineNum = 30081031;BA.debugLine="todoBienFLP = False"; + //BA.debugLineNum = 228;BA.debugLine="todoBienFLP = False"; _todobienflp = anywheresoftware.b4a.keywords.Common.False; }; } catch (Exception e10) { - processBA.setLastException(e10);RDebugUtils.currentLine=30081034; - //BA.debugLineNum = 30081034;BA.debugLine="LogColor(\"If Not(Tracker.FLP.IsInitialized) -->"; -anywheresoftware.b4a.keywords.Common.LogImpl("330081034","If Not(Tracker.FLP.IsInitialized) --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(processBA)),anywheresoftware.b4a.keywords.Common.Colors.Red); + processBA.setLastException(e10); //BA.debugLineNum = 231;BA.debugLine="LogColor(\"If Not(Tracker.FLP.IsInitialized) -->"; +anywheresoftware.b4a.keywords.Common.LogImpl("366387978","If Not(Tracker.FLP.IsInitialized) --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(processBA)),anywheresoftware.b4a.keywords.Common.Colors.Red); }; -RDebugUtils.currentLine=30081036; - //BA.debugLineNum = 30081036;BA.debugLine="Try"; -try {RDebugUtils.currentLine=30081037; - //BA.debugLineNum = 30081037;BA.debugLine="If FLP.IsInitialized Then"; + //BA.debugLineNum = 233;BA.debugLine="Try"; +try { //BA.debugLineNum = 234;BA.debugLine="If FLP.IsInitialized Then"; if (_flp.IsInitialized()) { -RDebugUtils.currentLine=30081038; - //BA.debugLineNum = 30081038;BA.debugLine="Try"; -try {RDebugUtils.currentLine=30081039; - //BA.debugLineNum = 30081039;BA.debugLine="If Not(FLP.IsConnected) Then"; + //BA.debugLineNum = 235;BA.debugLine="Try"; +try { //BA.debugLineNum = 236;BA.debugLine="If Not(FLP.IsConnected) Then"; if (anywheresoftware.b4a.keywords.Common.Not(_flp.IsConnected())) { -RDebugUtils.currentLine=30081040; - //BA.debugLineNum = 30081040;BA.debugLine="Subs.log2DB(\"revisaFLP: No esta conectado ..."; + //BA.debugLineNum = 237;BA.debugLine="Subs.log2DB(\"revisaFLP: No esta conectado ..."; mostCurrent._subs._log2db /*String*/ (processBA,"revisaFLP: No esta conectado ... 'Reconectando FLP'"); -RDebugUtils.currentLine=30081042; - //BA.debugLineNum = 30081042;BA.debugLine="StartFLP"; + //BA.debugLineNum = 239;BA.debugLine="StartFLP"; _startflp(); -RDebugUtils.currentLine=30081043; - //BA.debugLineNum = 30081043;BA.debugLine="todoBienFLP = False"; + //BA.debugLineNum = 240;BA.debugLine="todoBienFLP = False"; _todobienflp = anywheresoftware.b4a.keywords.Common.False; }; } catch (Exception e21) { - processBA.setLastException(e21);RDebugUtils.currentLine=30081046; - //BA.debugLineNum = 30081046;BA.debugLine="LogColor(\"If Not(Tracker.FLP.IsConnected) -->"; -anywheresoftware.b4a.keywords.Common.LogImpl("330081046","If Not(Tracker.FLP.IsConnected) --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(processBA)),anywheresoftware.b4a.keywords.Common.Colors.Red); + processBA.setLastException(e21); //BA.debugLineNum = 243;BA.debugLine="LogColor(\"If Not(Tracker.FLP.IsConnected) -->"; +anywheresoftware.b4a.keywords.Common.LogImpl("366387990","If Not(Tracker.FLP.IsConnected) --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(processBA)),anywheresoftware.b4a.keywords.Common.Colors.Red); }; -RDebugUtils.currentLine=30081048; - //BA.debugLineNum = 30081048;BA.debugLine="Try"; -try {RDebugUtils.currentLine=30081049; - //BA.debugLineNum = 30081049;BA.debugLine="If FLP.IsConnected And _ FLP.GetLastKnown"; + //BA.debugLineNum = 245;BA.debugLine="Try"; +try { //BA.debugLineNum = 246;BA.debugLine="If FLP.IsConnected And _ FLP.GetLastKnown"; if (_flp.IsConnected() && _flp.GetLastKnownLocation().IsInitialized() && _flp.GetLastKnownLocation().DistanceTo((android.location.Location)(_uugcoords.getObject()))>500) { -RDebugUtils.currentLine=30081052; - //BA.debugLineNum = 30081052;BA.debugLine="Subs.log2DB(\"revisaFLP: 'No se esta actualiza"; + //BA.debugLineNum = 249;BA.debugLine="Subs.log2DB(\"revisaFLP: 'No se esta actualiza"; mostCurrent._subs._log2db /*String*/ (processBA,"revisaFLP: 'No se esta actualizando, lo reiniciamos ...'"); -RDebugUtils.currentLine=30081053; - //BA.debugLineNum = 30081053;BA.debugLine="StartService(Me)"; + //BA.debugLineNum = 250;BA.debugLine="StartService(Me)"; anywheresoftware.b4a.keywords.Common.StartService(processBA,tracker.getObject()); -RDebugUtils.currentLine=30081054; - //BA.debugLineNum = 30081054;BA.debugLine="todoBienFLP = False"; + //BA.debugLineNum = 251;BA.debugLine="todoBienFLP = False"; _todobienflp = anywheresoftware.b4a.keywords.Common.False; }; } catch (Exception e30) { - processBA.setLastException(e30);RDebugUtils.currentLine=30081057; - //BA.debugLineNum = 30081057;BA.debugLine="LogColor(\"If FLP.IsConnectctd and FLP.getLKL.I"; -anywheresoftware.b4a.keywords.Common.LogImpl("330081057","If FLP.IsConnectctd and FLP.getLKL.IsInitialized --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(processBA)),anywheresoftware.b4a.keywords.Common.Colors.Red); + processBA.setLastException(e30); //BA.debugLineNum = 254;BA.debugLine="LogColor(\"If FLP.IsConnectctd and FLP.getLKL.I"; +anywheresoftware.b4a.keywords.Common.LogImpl("366388001","If FLP.IsConnectctd and FLP.getLKL.IsInitialized --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(processBA)),anywheresoftware.b4a.keywords.Common.Colors.Red); }; }; -RDebugUtils.currentLine=30081060; - //BA.debugLineNum = 30081060;BA.debugLine="If todoBienFLP Then LogColor(\" +++ +++ Sin error"; + //BA.debugLineNum = 257;BA.debugLine="If todoBienFLP Then LogColor(\" +++ +++ Sin error"; if (_todobienflp) { -anywheresoftware.b4a.keywords.Common.LogImpl("330081060"," +++ +++ Sin errores en FLP",anywheresoftware.b4a.keywords.Common.Colors.Green);}; +anywheresoftware.b4a.keywords.Common.LogImpl("366388004"," +++ +++ Sin errores en FLP",anywheresoftware.b4a.keywords.Common.Colors.Green);}; } catch (Exception e35) { - processBA.setLastException(e35);RDebugUtils.currentLine=30081062; - //BA.debugLineNum = 30081062;BA.debugLine="LogColor(\"If Tracker.FLP.IsInitialized --> \"&Las"; -anywheresoftware.b4a.keywords.Common.LogImpl("330081062","If Tracker.FLP.IsInitialized --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(processBA)),anywheresoftware.b4a.keywords.Common.Colors.Red); + processBA.setLastException(e35); //BA.debugLineNum = 259;BA.debugLine="LogColor(\"If Tracker.FLP.IsInitialized --> \"&Las"; +anywheresoftware.b4a.keywords.Common.LogImpl("366388006","If Tracker.FLP.IsInitialized --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(processBA)),anywheresoftware.b4a.keywords.Common.Colors.Red); }; -RDebugUtils.currentLine=30081065; - //BA.debugLineNum = 30081065;BA.debugLine="End Sub"; + //BA.debugLineNum = 262;BA.debugLine="End Sub"; +return ""; +} +public static String _revisauug() throws Exception{ +int _daa = 0; + //BA.debugLineNum = 266;BA.debugLine="Sub revisaUUG 'ignore"; + //BA.debugLineNum = 267;BA.debugLine="Try"; +try { //BA.debugLineNum = 269;BA.debugLine="If FLP.IsInitialized And FLP.IsConnected Then"; +if (_flp.IsInitialized() && _flp.IsConnected()) { + //BA.debugLineNum = 270;BA.debugLine="Try"; +try { //BA.debugLineNum = 271;BA.debugLine="If FLP.GetLastKnownLocation.IsInitialized Then"; +if (_flp.GetLastKnownLocation().IsInitialized()) { + //BA.debugLineNum = 273;BA.debugLine="Dim daa As Int = UUGCoords.DistanceTo(FLP.Get"; +_daa = (int) (_uugcoords.DistanceTo((android.location.Location)(_flp.GetLastKnownLocation().getObject()))); + //BA.debugLineNum = 274;BA.debugLine="If Starter.Logger Then LogColor($\"**** UUC \"$"; +if (mostCurrent._starter._logger /*boolean*/ ) { +anywheresoftware.b4a.keywords.Common.LogImpl("366453512",("**** UUC \""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(mostCurrent._subs._fechakmt /*String*/ (processBA,BA.NumberToString(_flp.GetLastKnownLocation().getTime()))))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.2",(Object)(_flp.GetLastKnownLocation().getAccuracy()))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.8",(Object)(_flp.GetLastKnownLocation().getLatitude()))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.8",(Object)(_flp.GetLastKnownLocation().getLongitude()))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.2",(Object)(_flp.GetLastKnownLocation().getSpeed()))+"|"),anywheresoftware.b4a.keywords.Common.Colors.RGB((int) (255),(int) (112),(int) (35)));}; + //BA.debugLineNum = 275;BA.debugLine="If daa > 40 And FLP.GetLastKnownLocation.Accu"; +if (_daa>40 && _flp.GetLastKnownLocation().getAccuracy()<35) { + //BA.debugLineNum = 276;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; +mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO RUTA_GPS(fecha, lat, lon) VALUES (?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(mostCurrent._subs._fechakmt /*String*/ (processBA,BA.NumberToString(_flp.GetLastKnownLocation().getTime()))),(Object)(_flp.GetLastKnownLocation().getLatitude()),(Object)(_flp.GetLastKnownLocation().getLongitude())})); + //BA.debugLineNum = 277;BA.debugLine="If Starter.Logger Then Log(\"++++ Distancia a"; +if (mostCurrent._starter._logger /*boolean*/ ) { +anywheresoftware.b4a.keywords.Common.LogImpl("366453515","++++ Distancia a anterior="+BA.NumberToString(_daa)+"|"+"Precision="+BA.NumberToString(_flp.GetLastKnownLocation().getAccuracy()),0);}; + }; + //BA.debugLineNum = 279;BA.debugLine="UUGCoords = FLP.GetLastKnownLocation"; +_uugcoords = _flp.GetLastKnownLocation(); + }; + } + catch (Exception e14) { + processBA.setLastException(e14); //BA.debugLineNum = 282;BA.debugLine="LogColor(\"FLP.GetLastKnownLocation.IsInitializ"; +anywheresoftware.b4a.keywords.Common.LogImpl("366453520","FLP.GetLastKnownLocation.IsInitialized --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(processBA)),anywheresoftware.b4a.keywords.Common.Colors.Red); + }; + }else { + //BA.debugLineNum = 285;BA.debugLine="Log(\"StartFLP\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("366453523","StartFLP",0); + //BA.debugLineNum = 286;BA.debugLine="StartFLP"; +_startflp(); + }; + } + catch (Exception e21) { + processBA.setLastException(e21); //BA.debugLineNum = 289;BA.debugLine="LogColor(\"If FLP.IsInitialized --> \"&LastExcepti"; +anywheresoftware.b4a.keywords.Common.LogImpl("366453527","If FLP.IsInitialized --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(processBA)),anywheresoftware.b4a.keywords.Common.Colors.Red); + }; + //BA.debugLineNum = 291;BA.debugLine="End Sub"; +return ""; +} +public static String _service_create() throws Exception{ + //BA.debugLineNum = 41;BA.debugLine="Sub Service_Create"; + //BA.debugLineNum = 42;BA.debugLine="Service.AutomaticForegroundMode = Service.AUTOMAT"; +mostCurrent._service.AutomaticForegroundMode = mostCurrent._service.AUTOMATIC_FOREGROUND_NEVER; + //BA.debugLineNum = 44;BA.debugLine="FLP.Initialize(\"flp\")"; +_flp.Initialize(processBA,"flp"); + //BA.debugLineNum = 45;BA.debugLine="FLP.Connect"; +_flp.Connect(); + //BA.debugLineNum = 46;BA.debugLine="lock.PartialLock"; +_lock.PartialLock(processBA); + //BA.debugLineNum = 47;BA.debugLine="StartFLP"; +_startflp(); + //BA.debugLineNum = 48;BA.debugLine="End Sub"; +return ""; +} +public static String _service_destroy() throws Exception{ + //BA.debugLineNum = 202;BA.debugLine="Sub Service_Destroy"; + //BA.debugLineNum = 203;BA.debugLine="If Tracking Then"; +if (_tracking) { + //BA.debugLineNum = 204;BA.debugLine="StopFLP"; +_stopflp(); + }; + //BA.debugLineNum = 206;BA.debugLine="Tracking = False"; +_tracking = anywheresoftware.b4a.keywords.Common.False; + //BA.debugLineNum = 207;BA.debugLine="lock.ReleasePartialLock"; +_lock.ReleasePartialLock(); + //BA.debugLineNum = 208;BA.debugLine="End Sub"; +return ""; +} +public static String _service_start(anywheresoftware.b4a.objects.IntentWrapper _startingintent) throws Exception{ + //BA.debugLineNum = 59;BA.debugLine="Sub Service_Start (StartingIntent As Intent)"; + //BA.debugLineNum = 61;BA.debugLine="Service.StopAutomaticForeground"; +mostCurrent._service.StopAutomaticForeground(); + //BA.debugLineNum = 62;BA.debugLine="Service.StartForeground(nid, CreateNotification(\""; +mostCurrent._service.StartForeground(_nid,(android.app.Notification)(_createnotification("...").getObject())); + //BA.debugLineNum = 63;BA.debugLine="Track"; +_track(); + //BA.debugLineNum = 64;BA.debugLine="StartServiceAt(Me, DateTime.Now + 5 * DateTime.Ti"; +anywheresoftware.b4a.keywords.Common.StartServiceAt(processBA,tracker.getObject(),(long) (anywheresoftware.b4a.keywords.Common.DateTime.getNow()+5*anywheresoftware.b4a.keywords.Common.DateTime.TicksPerMinute),anywheresoftware.b4a.keywords.Common.True); + //BA.debugLineNum = 65;BA.debugLine="FLP.GetLastKnownLocation.Initialize"; +_flp.GetLastKnownLocation().Initialize(); + //BA.debugLineNum = 66;BA.debugLine="End Sub"; return ""; } public static void _startflp() throws Exception{ -RDebugUtils.currentModule="tracker"; -if (Debug.shouldDelegate(processBA, "startflp", false)) - {Debug.delegate(processBA, "startflp", null); return;} ResumableSub_StartFLP rsub = new ResumableSub_StartFLP(null); rsub.resume(processBA, null); } @@ -492,7 +480,6 @@ keymon.lat.medicomed.tracker parent; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="tracker"; while (true) { switch (state) { @@ -502,8 +489,7 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=29425666; - //BA.debugLineNum = 29425666;BA.debugLine="Do While FLP.IsConnected = False"; + //BA.debugLineNum = 86;BA.debugLine="Do While FLP.IsConnected = False"; if (true) break; case 1: @@ -518,9 +504,8 @@ if (true) break; case 3: //C this.state = 1; -RDebugUtils.currentLine=29425667; - //BA.debugLineNum = 29425667;BA.debugLine="Sleep(500)"; -anywheresoftware.b4a.keywords.Common.Sleep(processBA,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "tracker", "startflp"),(int) (500)); + //BA.debugLineNum = 87;BA.debugLine="Sleep(500)"; +anywheresoftware.b4a.keywords.Common.Sleep(processBA,this,(int) (500)); this.state = 5; return; case 5: @@ -533,221 +518,18 @@ case 4: //C this.state = -1; ; -RDebugUtils.currentLine=29425672; - //BA.debugLineNum = 29425672;BA.debugLine="FLP.RequestLocationUpdates(CreateLocationRequest)"; + //BA.debugLineNum = 92;BA.debugLine="FLP.RequestLocationUpdates(CreateLocationRequest)"; parent._flp.RequestLocationUpdates((com.google.android.gms.location.LocationRequest)(_createlocationrequest().getObject())); -RDebugUtils.currentLine=29425675; - //BA.debugLineNum = 29425675;BA.debugLine="flpStarted = True"; + //BA.debugLineNum = 95;BA.debugLine="flpStarted = True"; parent._flpstarted = anywheresoftware.b4a.keywords.Common.True; -RDebugUtils.currentLine=29425677; - //BA.debugLineNum = 29425677;BA.debugLine="End Sub"; + //BA.debugLineNum = 97;BA.debugLine="End Sub"; if (true) break; } } } } -public static String _revisauug() throws Exception{ -RDebugUtils.currentModule="tracker"; -if (Debug.shouldDelegate(processBA, "revisauug", false)) - {return ((String) Debug.delegate(processBA, "revisauug", null));} -int _daa = 0; -RDebugUtils.currentLine=30146560; - //BA.debugLineNum = 30146560;BA.debugLine="Sub revisaUUG 'ignore"; -RDebugUtils.currentLine=30146561; - //BA.debugLineNum = 30146561;BA.debugLine="Try"; -try {RDebugUtils.currentLine=30146563; - //BA.debugLineNum = 30146563;BA.debugLine="If FLP.IsInitialized And FLP.IsConnected Then"; -if (_flp.IsInitialized() && _flp.IsConnected()) { -RDebugUtils.currentLine=30146564; - //BA.debugLineNum = 30146564;BA.debugLine="Try"; -try {RDebugUtils.currentLine=30146565; - //BA.debugLineNum = 30146565;BA.debugLine="If FLP.GetLastKnownLocation.IsInitialized Then"; -if (_flp.GetLastKnownLocation().IsInitialized()) { -RDebugUtils.currentLine=30146567; - //BA.debugLineNum = 30146567;BA.debugLine="Dim daa As Int = UUGCoords.DistanceTo(FLP.Get"; -_daa = (int) (_uugcoords.DistanceTo((android.location.Location)(_flp.GetLastKnownLocation().getObject()))); -RDebugUtils.currentLine=30146568; - //BA.debugLineNum = 30146568;BA.debugLine="If Starter.Logger Then LogColor($\"**** UUC \"$"; -if (mostCurrent._starter._logger /*boolean*/ ) { -anywheresoftware.b4a.keywords.Common.LogImpl("330146568",("**** UUC \""+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("",(Object)(mostCurrent._subs._fechakmt /*String*/ (processBA,BA.NumberToString(_flp.GetLastKnownLocation().getTime()))))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.2",(Object)(_flp.GetLastKnownLocation().getAccuracy()))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.8",(Object)(_flp.GetLastKnownLocation().getLatitude()))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.8",(Object)(_flp.GetLastKnownLocation().getLongitude()))+"|"+anywheresoftware.b4a.keywords.Common.SmartStringFormatter("0.2",(Object)(_flp.GetLastKnownLocation().getSpeed()))+"|"),anywheresoftware.b4a.keywords.Common.Colors.RGB((int) (255),(int) (112),(int) (35)));}; -RDebugUtils.currentLine=30146569; - //BA.debugLineNum = 30146569;BA.debugLine="If daa > 40 And FLP.GetLastKnownLocation.Accu"; -if (_daa>40 && _flp.GetLastKnownLocation().getAccuracy()<35) { -RDebugUtils.currentLine=30146570; - //BA.debugLineNum = 30146570;BA.debugLine="B4XPages.MainPage.skmt.ExecNonQuery2(\"INSERT"; -mostCurrent._b4xpages._mainpage /*keymon.lat.medicomed.b4xmainpage*/ (processBA)._skmt /*anywheresoftware.b4a.sql.SQL*/ .ExecNonQuery2("INSERT INTO RUTA_GPS(fecha, lat, lon) VALUES (?,?,?)",anywheresoftware.b4a.keywords.Common.ArrayToList(new Object[]{(Object)(mostCurrent._subs._fechakmt /*String*/ (processBA,BA.NumberToString(_flp.GetLastKnownLocation().getTime()))),(Object)(_flp.GetLastKnownLocation().getLatitude()),(Object)(_flp.GetLastKnownLocation().getLongitude())})); -RDebugUtils.currentLine=30146571; - //BA.debugLineNum = 30146571;BA.debugLine="If Starter.Logger Then Log(\"++++ Distancia a"; -if (mostCurrent._starter._logger /*boolean*/ ) { -anywheresoftware.b4a.keywords.Common.LogImpl("330146571","++++ Distancia a anterior="+BA.NumberToString(_daa)+"|"+"Precision="+BA.NumberToString(_flp.GetLastKnownLocation().getAccuracy()),0);}; - }; -RDebugUtils.currentLine=30146573; - //BA.debugLineNum = 30146573;BA.debugLine="UUGCoords = FLP.GetLastKnownLocation"; -_uugcoords = _flp.GetLastKnownLocation(); - }; - } - catch (Exception e14) { - processBA.setLastException(e14);RDebugUtils.currentLine=30146576; - //BA.debugLineNum = 30146576;BA.debugLine="LogColor(\"FLP.GetLastKnownLocation.IsInitializ"; -anywheresoftware.b4a.keywords.Common.LogImpl("330146576","FLP.GetLastKnownLocation.IsInitialized --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(processBA)),anywheresoftware.b4a.keywords.Common.Colors.Red); - }; - }else { -RDebugUtils.currentLine=30146579; - //BA.debugLineNum = 30146579;BA.debugLine="Log(\"StartFLP\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("330146579","StartFLP",0); -RDebugUtils.currentLine=30146580; - //BA.debugLineNum = 30146580;BA.debugLine="StartFLP"; -_startflp(); - }; - } - catch (Exception e21) { - processBA.setLastException(e21);RDebugUtils.currentLine=30146583; - //BA.debugLineNum = 30146583;BA.debugLine="LogColor(\"If FLP.IsInitialized --> \"&LastExcepti"; -anywheresoftware.b4a.keywords.Common.LogImpl("330146583","If FLP.IsInitialized --> "+BA.ObjectToString(anywheresoftware.b4a.keywords.Common.LastException(processBA)),anywheresoftware.b4a.keywords.Common.Colors.Red); - }; -RDebugUtils.currentLine=30146585; - //BA.debugLineNum = 30146585;BA.debugLine="End Sub"; -return ""; -} -public static String _service_create() throws Exception{ -RDebugUtils.currentModule="tracker"; -if (Debug.shouldDelegate(processBA, "service_create", false)) - {return ((String) Debug.delegate(processBA, "service_create", null));} -RDebugUtils.currentLine=29097984; - //BA.debugLineNum = 29097984;BA.debugLine="Sub Service_Create"; -RDebugUtils.currentLine=29097985; - //BA.debugLineNum = 29097985;BA.debugLine="Service.AutomaticForegroundMode = Service.AUTOMAT"; -mostCurrent._service.AutomaticForegroundMode = mostCurrent._service.AUTOMATIC_FOREGROUND_NEVER; -RDebugUtils.currentLine=29097987; - //BA.debugLineNum = 29097987;BA.debugLine="FLP.Initialize(\"flp\")"; -_flp.Initialize(processBA,"flp"); -RDebugUtils.currentLine=29097988; - //BA.debugLineNum = 29097988;BA.debugLine="FLP.Connect"; -_flp.Connect(); -RDebugUtils.currentLine=29097989; - //BA.debugLineNum = 29097989;BA.debugLine="lock.PartialLock"; -_lock.PartialLock(processBA); -RDebugUtils.currentLine=29097990; - //BA.debugLineNum = 29097990;BA.debugLine="StartFLP"; -_startflp(); -RDebugUtils.currentLine=29097991; - //BA.debugLineNum = 29097991;BA.debugLine="End Sub"; -return ""; -} -public static String _service_destroy() throws Exception{ -RDebugUtils.currentModule="tracker"; -if (Debug.shouldDelegate(processBA, "service_destroy", false)) - {return ((String) Debug.delegate(processBA, "service_destroy", null));} -RDebugUtils.currentLine=29949952; - //BA.debugLineNum = 29949952;BA.debugLine="Sub Service_Destroy"; -RDebugUtils.currentLine=29949953; - //BA.debugLineNum = 29949953;BA.debugLine="If Tracking Then"; -if (_tracking) { -RDebugUtils.currentLine=29949954; - //BA.debugLineNum = 29949954;BA.debugLine="StopFLP"; -_stopflp(); - }; -RDebugUtils.currentLine=29949956; - //BA.debugLineNum = 29949956;BA.debugLine="Tracking = False"; -_tracking = anywheresoftware.b4a.keywords.Common.False; -RDebugUtils.currentLine=29949957; - //BA.debugLineNum = 29949957;BA.debugLine="lock.ReleasePartialLock"; -_lock.ReleasePartialLock(); -RDebugUtils.currentLine=29949958; - //BA.debugLineNum = 29949958;BA.debugLine="End Sub"; -return ""; -} -public static String _stopflp() throws Exception{ -RDebugUtils.currentModule="tracker"; -if (Debug.shouldDelegate(processBA, "stopflp", false)) - {return ((String) Debug.delegate(processBA, "stopflp", null));} -RDebugUtils.currentLine=29753344; - //BA.debugLineNum = 29753344;BA.debugLine="Public Sub StopFLP"; -RDebugUtils.currentLine=29753346; - //BA.debugLineNum = 29753346;BA.debugLine="If flpStarted Then"; -if (_flpstarted) { -RDebugUtils.currentLine=29753347; - //BA.debugLineNum = 29753347;BA.debugLine="FLP.RemoveLocationUpdates 'Eliminamos todas las"; -_flp.RemoveLocationUpdates(); -RDebugUtils.currentLine=29753348; - //BA.debugLineNum = 29753348;BA.debugLine="flpStarted = False"; -_flpstarted = anywheresoftware.b4a.keywords.Common.False; - }; -RDebugUtils.currentLine=29753350; - //BA.debugLineNum = 29753350;BA.debugLine="End Sub"; -return ""; -} -public static String _service_start(anywheresoftware.b4a.objects.IntentWrapper _startingintent) throws Exception{ -RDebugUtils.currentModule="tracker"; -if (Debug.shouldDelegate(processBA, "service_start", false)) - {return ((String) Debug.delegate(processBA, "service_start", new Object[] {_startingintent}));} -RDebugUtils.currentLine=29294592; - //BA.debugLineNum = 29294592;BA.debugLine="Sub Service_Start (StartingIntent As Intent)"; -RDebugUtils.currentLine=29294594; - //BA.debugLineNum = 29294594;BA.debugLine="Service.StopAutomaticForeground"; -mostCurrent._service.StopAutomaticForeground(); -RDebugUtils.currentLine=29294595; - //BA.debugLineNum = 29294595;BA.debugLine="Service.StartForeground(nid, CreateNotification(\""; -mostCurrent._service.StartForeground(_nid,(android.app.Notification)(_createnotification("...").getObject())); -RDebugUtils.currentLine=29294596; - //BA.debugLineNum = 29294596;BA.debugLine="Track"; -_track(); -RDebugUtils.currentLine=29294597; - //BA.debugLineNum = 29294597;BA.debugLine="StartServiceAt(Me, DateTime.Now + 5 * DateTime.Ti"; -anywheresoftware.b4a.keywords.Common.StartServiceAt(processBA,tracker.getObject(),(long) (anywheresoftware.b4a.keywords.Common.DateTime.getNow()+5*anywheresoftware.b4a.keywords.Common.DateTime.TicksPerMinute),anywheresoftware.b4a.keywords.Common.True); -RDebugUtils.currentLine=29294598; - //BA.debugLineNum = 29294598;BA.debugLine="FLP.GetLastKnownLocation.Initialize"; -_flp.GetLastKnownLocation().Initialize(); -RDebugUtils.currentLine=29294599; - //BA.debugLineNum = 29294599;BA.debugLine="End Sub"; -return ""; -} -public static String _track() throws Exception{ -RDebugUtils.currentModule="tracker"; -if (Debug.shouldDelegate(processBA, "track", false)) - {return ((String) Debug.delegate(processBA, "track", null));} -RDebugUtils.currentLine=29360128; - //BA.debugLineNum = 29360128;BA.debugLine="Public Sub Track"; -RDebugUtils.currentLine=29360130; - //BA.debugLineNum = 29360130;BA.debugLine="If Not(FLP.IsInitialized) Then FLP.Initialize(\"fl"; -if (anywheresoftware.b4a.keywords.Common.Not(_flp.IsInitialized())) { -_flp.Initialize(processBA,"flp");}; -RDebugUtils.currentLine=29360131; - //BA.debugLineNum = 29360131;BA.debugLine="If Not(FLP.IsConnected) Then FLP.Connect"; -if (anywheresoftware.b4a.keywords.Common.Not(_flp.IsConnected())) { -_flp.Connect();}; -RDebugUtils.currentLine=29360132; - //BA.debugLineNum = 29360132;BA.debugLine="If Tracking And actualLR.IsInitialized Then"; -if (_tracking && _actuallr.IsInitialized()) { -RDebugUtils.currentLine=29360134; - //BA.debugLineNum = 29360134;BA.debugLine="Return 'Si ya estamos \"rastreando\" no hacemos na"; -if (true) return ""; - }; -RDebugUtils.currentLine=29360136; - //BA.debugLineNum = 29360136;BA.debugLine="If Starter.rp.Check(Starter.rp.PERMISSION_ACCESS_"; -if (mostCurrent._starter._rp /*anywheresoftware.b4a.objects.RuntimePermissions*/ .Check(mostCurrent._starter._rp /*anywheresoftware.b4a.objects.RuntimePermissions*/ .PERMISSION_ACCESS_FINE_LOCATION)==anywheresoftware.b4a.keywords.Common.False) { -RDebugUtils.currentLine=29360137; - //BA.debugLineNum = 29360137;BA.debugLine="Log(\"No permission\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("329360137","No permission",0); -RDebugUtils.currentLine=29360138; - //BA.debugLineNum = 29360138;BA.debugLine="Return"; -if (true) return ""; - }; -RDebugUtils.currentLine=29360140; - //BA.debugLineNum = 29360140;BA.debugLine="StartFLP 'Iniciamos FusedLocationProvider"; -_startflp(); -RDebugUtils.currentLine=29360141; - //BA.debugLineNum = 29360141;BA.debugLine="Tracking = True"; -_tracking = anywheresoftware.b4a.keywords.Common.True; -RDebugUtils.currentLine=29360142; - //BA.debugLineNum = 29360142;BA.debugLine="End Sub"; -return ""; -} public static void _startflpsmall() throws Exception{ -RDebugUtils.currentModule="tracker"; -if (Debug.shouldDelegate(processBA, "startflpsmall", false)) - {Debug.delegate(processBA, "startflpsmall", null); return;} ResumableSub_StartFLPSmall rsub = new ResumableSub_StartFLPSmall(null); rsub.resume(processBA, null); } @@ -759,7 +541,6 @@ keymon.lat.medicomed.tracker parent; @Override public void resume(BA ba, Object[] result) throws Exception{ -RDebugUtils.currentModule="tracker"; while (true) { switch (state) { @@ -769,8 +550,7 @@ return; case 0: //C this.state = 1; -RDebugUtils.currentLine=29491202; - //BA.debugLineNum = 29491202;BA.debugLine="Do While FLP.IsConnected = False"; + //BA.debugLineNum = 101;BA.debugLine="Do While FLP.IsConnected = False"; if (true) break; case 1: @@ -785,36 +565,70 @@ if (true) break; case 3: //C this.state = 1; -RDebugUtils.currentLine=29491203; - //BA.debugLineNum = 29491203;BA.debugLine="Sleep(500)"; -anywheresoftware.b4a.keywords.Common.Sleep(processBA,new anywheresoftware.b4a.shell.DebugResumableSub.DelegatableResumableSub(this, "tracker", "startflpsmall"),(int) (500)); + //BA.debugLineNum = 102;BA.debugLine="Sleep(500)"; +anywheresoftware.b4a.keywords.Common.Sleep(processBA,this,(int) (500)); this.state = 5; return; case 5: //C this.state = 1; ; -RDebugUtils.currentLine=29491204; - //BA.debugLineNum = 29491204;BA.debugLine="Log(\"sleeping\")"; -anywheresoftware.b4a.keywords.Common.LogImpl("329491204","sleeping",0); + //BA.debugLineNum = 103;BA.debugLine="Log(\"sleeping\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("365798148","sleeping",0); if (true) break; case 4: //C this.state = -1; ; -RDebugUtils.currentLine=29491206; - //BA.debugLineNum = 29491206;BA.debugLine="dameUltimaUbicacionConocida 'Regresamos ultima ub"; + //BA.debugLineNum = 105;BA.debugLine="dameUltimaUbicacionConocida 'Regresamos ultima ub"; _dameultimaubicacionconocida(); -RDebugUtils.currentLine=29491207; - //BA.debugLineNum = 29491207;BA.debugLine="FLP.RequestLocationUpdates(CreateLocationRequestS"; + //BA.debugLineNum = 106;BA.debugLine="FLP.RequestLocationUpdates(CreateLocationRequestS"; parent._flp.RequestLocationUpdates((com.google.android.gms.location.LocationRequest)(_createlocationrequestsmalld().getObject())); -RDebugUtils.currentLine=29491210; - //BA.debugLineNum = 29491210;BA.debugLine="End Sub"; + //BA.debugLineNum = 109;BA.debugLine="End Sub"; if (true) break; } } } } -} \ No newline at end of file +public static String _stopflp() throws Exception{ + //BA.debugLineNum = 146;BA.debugLine="Public Sub StopFLP"; + //BA.debugLineNum = 148;BA.debugLine="If flpStarted Then"; +if (_flpstarted) { + //BA.debugLineNum = 149;BA.debugLine="FLP.RemoveLocationUpdates 'Eliminamos todas las"; +_flp.RemoveLocationUpdates(); + //BA.debugLineNum = 150;BA.debugLine="flpStarted = False"; +_flpstarted = anywheresoftware.b4a.keywords.Common.False; + }; + //BA.debugLineNum = 152;BA.debugLine="End Sub"; +return ""; +} +public static String _track() throws Exception{ + //BA.debugLineNum = 68;BA.debugLine="Public Sub Track"; + //BA.debugLineNum = 70;BA.debugLine="If Not(FLP.IsInitialized) Then FLP.Initialize(\"fl"; +if (anywheresoftware.b4a.keywords.Common.Not(_flp.IsInitialized())) { +_flp.Initialize(processBA,"flp");}; + //BA.debugLineNum = 71;BA.debugLine="If Not(FLP.IsConnected) Then FLP.Connect"; +if (anywheresoftware.b4a.keywords.Common.Not(_flp.IsConnected())) { +_flp.Connect();}; + //BA.debugLineNum = 72;BA.debugLine="If Tracking And actualLR.IsInitialized Then"; +if (_tracking && _actuallr.IsInitialized()) { + //BA.debugLineNum = 74;BA.debugLine="Return 'Si ya estamos \"rastreando\" no hacemos na"; +if (true) return ""; + }; + //BA.debugLineNum = 76;BA.debugLine="If Starter.rp.Check(Starter.rp.PERMISSION_ACCESS_"; +if (mostCurrent._starter._rp /*anywheresoftware.b4a.objects.RuntimePermissions*/ .Check(mostCurrent._starter._rp /*anywheresoftware.b4a.objects.RuntimePermissions*/ .PERMISSION_ACCESS_FINE_LOCATION)==anywheresoftware.b4a.keywords.Common.False) { + //BA.debugLineNum = 77;BA.debugLine="Log(\"No permission\")"; +anywheresoftware.b4a.keywords.Common.LogImpl("365667081","No permission",0); + //BA.debugLineNum = 78;BA.debugLine="Return"; +if (true) return ""; + }; + //BA.debugLineNum = 80;BA.debugLine="StartFLP 'Iniciamos FusedLocationProvider"; +_startflp(); + //BA.debugLineNum = 81;BA.debugLine="Tracking = True"; +_tracking = anywheresoftware.b4a.keywords.Common.True; + //BA.debugLineNum = 82;BA.debugLine="End Sub"; +return ""; +} +} diff --git a/B4A/Objects/src/keymon/lat/medicomed/xuiviewsutils.java b/B4A/Objects/src/keymon/lat/medicomed/xuiviewsutils.java index 0998847..778face 100644 --- a/B4A/Objects/src/keymon/lat/medicomed/xuiviewsutils.java +++ b/B4A/Objects/src/keymon/lat/medicomed/xuiviewsutils.java @@ -10,8 +10,7 @@ private static xuiviewsutils mostCurrent = new xuiviewsutils(); public static Object getObject() { throw new RuntimeException("Code module does not support this method."); } - -public anywheresoftware.b4a.keywords.Common __c = null; + public anywheresoftware.b4a.keywords.Common __c = null; public static boolean _utilsinitialized = false; public static anywheresoftware.b4a.objects.B4XViewWrapper.XUI _xui = null; public b4a.example.dateutils _dateutils = null; @@ -25,196 +24,134 @@ 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 static String _performhapticfeedback(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.B4XViewWrapper _view) throws Exception{ -RDebugUtils.currentModule="xuiviewsutils"; -if (Debug.shouldDelegate(null, "performhapticfeedback", true)) - {return ((String) Debug.delegate(null, "performhapticfeedback", new Object[] {_ba,_view}));} -anywheresoftware.b4j.object.JavaObject _jo = null; -RDebugUtils.currentLine=64880640; - //BA.debugLineNum = 64880640;BA.debugLine="Public Sub PerformHapticFeedback (View As B4XView)"; -RDebugUtils.currentLine=64880641; - //BA.debugLineNum = 64880641;BA.debugLine="Initialize"; -_initialize(_ba); -RDebugUtils.currentLine=64880643; - //BA.debugLineNum = 64880643;BA.debugLine="Dim jo As JavaObject = View"; -_jo = new anywheresoftware.b4j.object.JavaObject(); -_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_view.getObject())); -RDebugUtils.currentLine=64880644; - //BA.debugLineNum = 64880644;BA.debugLine="jo.RunMethod(\"performHapticFeedback\", Array(1))"; -_jo.RunMethod("performHapticFeedback",new Object[]{(Object)(1)}); -RDebugUtils.currentLine=64880650; - //BA.debugLineNum = 64880650;BA.debugLine="End Sub"; -return ""; -} -public static String _settextorcsbuildertolabel(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.B4XViewWrapper _xlbl,Object _text) throws Exception{ -RDebugUtils.currentModule="xuiviewsutils"; -if (Debug.shouldDelegate(null, "settextorcsbuildertolabel", true)) - {return ((String) Debug.delegate(null, "settextorcsbuildertolabel", new Object[] {_ba,_xlbl,_text}));} -RDebugUtils.currentLine=65011712; - //BA.debugLineNum = 65011712;BA.debugLine="Public Sub SetTextOrCSBuilderToLabel(xlbl As B4XVi"; -RDebugUtils.currentLine=65011714; - //BA.debugLineNum = 65011714;BA.debugLine="xlbl.Text = Text"; -_xlbl.setText(BA.ObjectToCharSequence(_text)); -RDebugUtils.currentLine=65011724; - //BA.debugLineNum = 65011724;BA.debugLine="End Sub"; -return ""; -} public static String _addstubtoclvifneeded(anywheresoftware.b4a.BA _ba,b4a.example3.customlistview _customlistview1,int _color) throws Exception{ -RDebugUtils.currentModule="xuiviewsutils"; -if (Debug.shouldDelegate(null, "addstubtoclvifneeded", true)) - {return ((String) Debug.delegate(null, "addstubtoclvifneeded", new Object[] {_ba,_customlistview1,_color}));} b4a.example3.customlistview._clvitem _lastitem = null; anywheresoftware.b4a.objects.B4XViewWrapper _p = null; int _height = 0; -RDebugUtils.currentLine=64946176; - //BA.debugLineNum = 64946176;BA.debugLine="Public Sub AddStubToCLVIfNeeded(CustomListView1 As"; -RDebugUtils.currentLine=64946177; - //BA.debugLineNum = 64946177;BA.debugLine="If CustomListView1.Size = 0 Then Return"; + //BA.debugLineNum = 34;BA.debugLine="Public Sub AddStubToCLVIfNeeded(CustomListView1 As"; + //BA.debugLineNum = 35;BA.debugLine="If CustomListView1.Size = 0 Then Return"; if (_customlistview1._getsize()==0) { if (true) return "";}; -RDebugUtils.currentLine=64946178; - //BA.debugLineNum = 64946178;BA.debugLine="Dim LastItem As CLVItem = CustomListView1.GetRawL"; + //BA.debugLineNum = 36;BA.debugLine="Dim LastItem As CLVItem = CustomListView1.GetRawL"; _lastitem = _customlistview1._getrawlistitem((int) (_customlistview1._getsize()-1)); -RDebugUtils.currentLine=64946179; - //BA.debugLineNum = 64946179;BA.debugLine="If LastItem.Offset + LastItem.Panel.Height < Cust"; + //BA.debugLineNum = 37;BA.debugLine="If LastItem.Offset + LastItem.Panel.Height < Cust"; if (_lastitem.Offset+_lastitem.Panel.getHeight()<_customlistview1._asview().getHeight()) { -RDebugUtils.currentLine=64946181; - //BA.debugLineNum = 64946181;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"stub\")"; + //BA.debugLineNum = 39;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"stub\")"; _p = new anywheresoftware.b4a.objects.B4XViewWrapper(); _p = _xui.CreatePanel((_ba.processBA == null ? _ba : _ba.processBA),"stub"); -RDebugUtils.currentLine=64946182; - //BA.debugLineNum = 64946182;BA.debugLine="p.Color = Color"; + //BA.debugLineNum = 40;BA.debugLine="p.Color = Color"; _p.setColor(_color); -RDebugUtils.currentLine=64946183; - //BA.debugLineNum = 64946183;BA.debugLine="Dim Height As Int = CustomListView1.AsView.Heigh"; + //BA.debugLineNum = 41;BA.debugLine="Dim Height As Int = CustomListView1.AsView.Heigh"; _height = (int) (_customlistview1._asview().getHeight()-_lastitem.Offset-_lastitem.Panel.getHeight()-anywheresoftware.b4a.keywords.Common.DipToCurrent((int) (3))); -RDebugUtils.currentLine=64946184; - //BA.debugLineNum = 64946184;BA.debugLine="If xui.IsB4J Then Height = Height + 5"; + //BA.debugLineNum = 42;BA.debugLine="If xui.IsB4J Then Height = Height + 5"; if (_xui.getIsB4J()) { _height = (int) (_height+5);}; -RDebugUtils.currentLine=64946185; - //BA.debugLineNum = 64946185;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, CustomListView1.AsV"; + //BA.debugLineNum = 43;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, CustomListView1.AsV"; _p.SetLayoutAnimated((int) (0),(int) (0),(int) (0),_customlistview1._asview().getWidth(),_height); -RDebugUtils.currentLine=64946186; - //BA.debugLineNum = 64946186;BA.debugLine="CustomListView1.Add(p, \"\")"; + //BA.debugLineNum = 44;BA.debugLine="CustomListView1.Add(p, \"\")"; _customlistview1._add(_p,(Object)("")); -RDebugUtils.currentLine=64946187; - //BA.debugLineNum = 64946187;BA.debugLine="CustomListView1.sv.ScrollViewContentHeight = Cus"; + //BA.debugLineNum = 45;BA.debugLine="CustomListView1.sv.ScrollViewContentHeight = Cus"; _customlistview1._sv.setScrollViewContentHeight((int) (_customlistview1._sv.getScrollViewContentHeight()-_customlistview1._getdividersize())); }; -RDebugUtils.currentLine=64946189; - //BA.debugLineNum = 64946189;BA.debugLine="End Sub"; -return ""; -} -public static String _setbitmapandfill(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.B4XViewWrapper _imageview,anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _bmp) throws Exception{ -RDebugUtils.currentModule="xuiviewsutils"; -if (Debug.shouldDelegate(null, "setbitmapandfill", true)) - {return ((String) Debug.delegate(null, "setbitmapandfill", new Object[] {_ba,_imageview,_bmp}));} -anywheresoftware.b4a.objects.ImageViewWrapper _iiv = null; -RDebugUtils.currentLine=65077248; - //BA.debugLineNum = 65077248;BA.debugLine="Public Sub SetBitmapAndFill (ImageView As B4XView,"; -RDebugUtils.currentLine=65077249; - //BA.debugLineNum = 65077249;BA.debugLine="ImageView.SetBitmap(Bmp)"; -_imageview.SetBitmap((android.graphics.Bitmap)(_bmp.getObject())); -RDebugUtils.currentLine=65077250; - //BA.debugLineNum = 65077250;BA.debugLine="Dim iiv As ImageView = ImageView"; -_iiv = new anywheresoftware.b4a.objects.ImageViewWrapper(); -_iiv = (anywheresoftware.b4a.objects.ImageViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.ImageViewWrapper(), (android.widget.ImageView)(_imageview.getObject())); -RDebugUtils.currentLine=65077252; - //BA.debugLineNum = 65077252;BA.debugLine="iiv.Gravity = Gravity.FILL"; -_iiv.setGravity(anywheresoftware.b4a.keywords.Common.Gravity.FILL); -RDebugUtils.currentLine=65077258; - //BA.debugLineNum = 65077258;BA.debugLine="End Sub"; -return ""; -} -public static String _setalpha(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.B4XViewWrapper _view,float _level) throws Exception{ -RDebugUtils.currentModule="xuiviewsutils"; -if (Debug.shouldDelegate(null, "setalpha", true)) - {return ((String) Debug.delegate(null, "setalpha", new Object[] {_ba,_view,_level}));} -anywheresoftware.b4j.object.JavaObject _jo = null; -float _alpha = 0f; -RDebugUtils.currentLine=65273856; - //BA.debugLineNum = 65273856;BA.debugLine="Public Sub SetAlpha (View As B4XView, Level As Flo"; -RDebugUtils.currentLine=65273858; - //BA.debugLineNum = 65273858;BA.debugLine="Dim jo As JavaObject = View"; -_jo = new anywheresoftware.b4j.object.JavaObject(); -_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_view.getObject())); -RDebugUtils.currentLine=65273859; - //BA.debugLineNum = 65273859;BA.debugLine="Dim alpha As Float = Level"; -_alpha = _level; -RDebugUtils.currentLine=65273860; - //BA.debugLineNum = 65273860;BA.debugLine="jo.RunMethod(\"setAlpha\", Array(alpha))"; -_jo.RunMethod("setAlpha",new Object[]{(Object)(_alpha)}); -RDebugUtils.currentLine=65273868; - //BA.debugLineNum = 65273868;BA.debugLine="End Sub"; + //BA.debugLineNum = 47;BA.debugLine="End Sub"; return ""; } public static keymon.lat.medicomed.b4ximageview _createb4ximageview(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="xuiviewsutils"; -if (Debug.shouldDelegate(null, "createb4ximageview", true)) - {return ((keymon.lat.medicomed.b4ximageview) Debug.delegate(null, "createb4ximageview", new Object[] {_ba}));} keymon.lat.medicomed.b4ximageview _iv = null; anywheresoftware.b4a.objects.B4XViewWrapper _base = null; -RDebugUtils.currentLine=65208320; - //BA.debugLineNum = 65208320;BA.debugLine="Public Sub CreateB4XImageView As B4XImageView"; -RDebugUtils.currentLine=65208321; - //BA.debugLineNum = 65208321;BA.debugLine="Dim iv As B4XImageView"; + //BA.debugLineNum = 85;BA.debugLine="Public Sub CreateB4XImageView As B4XImageView"; + //BA.debugLineNum = 86;BA.debugLine="Dim iv As B4XImageView"; _iv = new keymon.lat.medicomed.b4ximageview(); -RDebugUtils.currentLine=65208322; - //BA.debugLineNum = 65208322;BA.debugLine="iv.Initialize(Null, \"\")"; -_iv._initialize /*String*/ (null,_ba,anywheresoftware.b4a.keywords.Common.Null,""); -RDebugUtils.currentLine=65208323; - //BA.debugLineNum = 65208323;BA.debugLine="Dim base As B4XView = xui.CreatePanel(\"\")"; + //BA.debugLineNum = 87;BA.debugLine="iv.Initialize(Null, \"\")"; +_iv._initialize /*String*/ (_ba,anywheresoftware.b4a.keywords.Common.Null,""); + //BA.debugLineNum = 88;BA.debugLine="Dim base As B4XView = xui.CreatePanel(\"\")"; _base = new anywheresoftware.b4a.objects.B4XViewWrapper(); _base = _xui.CreatePanel((_ba.processBA == null ? _ba : _ba.processBA),""); -RDebugUtils.currentLine=65208324; - //BA.debugLineNum = 65208324;BA.debugLine="base.SetLayoutAnimated(0, 0, 0, 100dip, 100dip)"; + //BA.debugLineNum = 89;BA.debugLine="base.SetLayoutAnimated(0, 0, 0, 100dip, 100dip)"; _base.SetLayoutAnimated((int) (0),(int) (0),(int) (0),anywheresoftware.b4a.keywords.Common.DipToCurrent((int) (100)),anywheresoftware.b4a.keywords.Common.DipToCurrent((int) (100))); -RDebugUtils.currentLine=65208325; - //BA.debugLineNum = 65208325;BA.debugLine="iv.DesignerCreateView(base, Null, CreateMap(\"Roun"; -_iv._designercreateview /*String*/ (null,(Object)(_base.getObject()),(anywheresoftware.b4a.objects.LabelWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.LabelWrapper(), (android.widget.TextView)(anywheresoftware.b4a.keywords.Common.Null)),anywheresoftware.b4a.keywords.Common.createMap(new Object[] {(Object)("Round"),(Object)(anywheresoftware.b4a.keywords.Common.False),(Object)("ResizeMode"),(Object)("FIT"),(Object)("BackgroundColor"),(Object)(((int)0xffaaaaaa)),(Object)("CornersRadius"),(Object)(0)})); -RDebugUtils.currentLine=65208326; - //BA.debugLineNum = 65208326;BA.debugLine="Return iv"; + //BA.debugLineNum = 90;BA.debugLine="iv.DesignerCreateView(base, Null, CreateMap(\"Roun"; +_iv._designercreateview /*String*/ ((Object)(_base.getObject()),(anywheresoftware.b4a.objects.LabelWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.LabelWrapper(), (android.widget.TextView)(anywheresoftware.b4a.keywords.Common.Null)),anywheresoftware.b4a.keywords.Common.createMap(new Object[] {(Object)("Round"),(Object)(anywheresoftware.b4a.keywords.Common.False),(Object)("ResizeMode"),(Object)("FIT"),(Object)("BackgroundColor"),(Object)(((int)0xffaaaaaa)),(Object)("CornersRadius"),(Object)(0)})); + //BA.debugLineNum = 91;BA.debugLine="Return iv"; if (true) return _iv; -RDebugUtils.currentLine=65208327; - //BA.debugLineNum = 65208327;BA.debugLine="End Sub"; + //BA.debugLineNum = 92;BA.debugLine="End Sub"; return null; } public static anywheresoftware.b4a.objects.B4XViewWrapper _createlabel(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="xuiviewsutils"; -if (Debug.shouldDelegate(null, "createlabel", true)) - {return ((anywheresoftware.b4a.objects.B4XViewWrapper) Debug.delegate(null, "createlabel", new Object[] {_ba}));} anywheresoftware.b4a.objects.LabelWrapper _lbl = null; -RDebugUtils.currentLine=65142784; - //BA.debugLineNum = 65142784;BA.debugLine="Public Sub CreateLabel As B4XView"; -RDebugUtils.currentLine=65142785; - //BA.debugLineNum = 65142785;BA.debugLine="Dim lbl As Label"; + //BA.debugLineNum = 78;BA.debugLine="Public Sub CreateLabel As B4XView"; + //BA.debugLineNum = 79;BA.debugLine="Dim lbl As Label"; _lbl = new anywheresoftware.b4a.objects.LabelWrapper(); -RDebugUtils.currentLine=65142786; - //BA.debugLineNum = 65142786;BA.debugLine="lbl.Initialize(\"\")"; + //BA.debugLineNum = 80;BA.debugLine="lbl.Initialize(\"\")"; _lbl.Initialize(_ba,""); -RDebugUtils.currentLine=65142787; - //BA.debugLineNum = 65142787;BA.debugLine="Return lbl"; + //BA.debugLineNum = 81;BA.debugLine="Return lbl"; if (true) return (anywheresoftware.b4a.objects.B4XViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.B4XViewWrapper(), (java.lang.Object)(_lbl.getObject())); -RDebugUtils.currentLine=65142788; - //BA.debugLineNum = 65142788;BA.debugLine="End Sub"; + //BA.debugLineNum = 82;BA.debugLine="End Sub"; return null; } public static String _initialize(anywheresoftware.b4a.BA _ba) throws Exception{ -RDebugUtils.currentModule="xuiviewsutils"; -if (Debug.shouldDelegate(null, "initialize", true)) - {return ((String) Debug.delegate(null, "initialize", new Object[] {_ba}));} -RDebugUtils.currentLine=64815104; - //BA.debugLineNum = 64815104;BA.debugLine="Private Sub Initialize"; -RDebugUtils.currentLine=64815105; - //BA.debugLineNum = 64815105;BA.debugLine="If UtilsInitialized Then Return"; + //BA.debugLineNum = 10;BA.debugLine="Private Sub Initialize"; + //BA.debugLineNum = 11;BA.debugLine="If UtilsInitialized Then Return"; if (_utilsinitialized) { if (true) return "";}; -RDebugUtils.currentLine=64815106; - //BA.debugLineNum = 64815106;BA.debugLine="UtilsInitialized = True"; + //BA.debugLineNum = 12;BA.debugLine="UtilsInitialized = True"; _utilsinitialized = anywheresoftware.b4a.keywords.Common.True; -RDebugUtils.currentLine=64815113; - //BA.debugLineNum = 64815113;BA.debugLine="End Sub"; + //BA.debugLineNum = 19;BA.debugLine="End Sub"; return ""; } -} \ No newline at end of file +public static String _performhapticfeedback(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.B4XViewWrapper _view) throws Exception{ +anywheresoftware.b4j.object.JavaObject _jo = null; + //BA.debugLineNum = 21;BA.debugLine="Public Sub PerformHapticFeedback (View As B4XView)"; + //BA.debugLineNum = 22;BA.debugLine="Initialize"; +_initialize(_ba); + //BA.debugLineNum = 24;BA.debugLine="Dim jo As JavaObject = View"; +_jo = new anywheresoftware.b4j.object.JavaObject(); +_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_view.getObject())); + //BA.debugLineNum = 25;BA.debugLine="jo.RunMethod(\"performHapticFeedback\", Array(1))"; +_jo.RunMethod("performHapticFeedback",new Object[]{(Object)(1)}); + //BA.debugLineNum = 31;BA.debugLine="End Sub"; +return ""; +} +public static String _process_globals() throws Exception{ + //BA.debugLineNum = 2;BA.debugLine="Sub Process_Globals"; + //BA.debugLineNum = 6;BA.debugLine="Private UtilsInitialized As Boolean"; +_utilsinitialized = false; + //BA.debugLineNum = 7;BA.debugLine="Private xui As XUI"; +_xui = new anywheresoftware.b4a.objects.B4XViewWrapper.XUI(); + //BA.debugLineNum = 8;BA.debugLine="End Sub"; +return ""; +} +public static String _setalpha(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.B4XViewWrapper _view,float _level) throws Exception{ +anywheresoftware.b4j.object.JavaObject _jo = null; +float _alpha = 0f; + //BA.debugLineNum = 95;BA.debugLine="Public Sub SetAlpha (View As B4XView, Level As Flo"; + //BA.debugLineNum = 97;BA.debugLine="Dim jo As JavaObject = View"; +_jo = new anywheresoftware.b4j.object.JavaObject(); +_jo = (anywheresoftware.b4j.object.JavaObject) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4j.object.JavaObject(), (java.lang.Object)(_view.getObject())); + //BA.debugLineNum = 98;BA.debugLine="Dim alpha As Float = Level"; +_alpha = _level; + //BA.debugLineNum = 99;BA.debugLine="jo.RunMethod(\"setAlpha\", Array(alpha))"; +_jo.RunMethod("setAlpha",new Object[]{(Object)(_alpha)}); + //BA.debugLineNum = 107;BA.debugLine="End Sub"; +return ""; +} +public static String _setbitmapandfill(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.B4XViewWrapper _imageview,anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper _bmp) throws Exception{ +anywheresoftware.b4a.objects.ImageViewWrapper _iiv = null; + //BA.debugLineNum = 65;BA.debugLine="Public Sub SetBitmapAndFill (ImageView As B4XView,"; + //BA.debugLineNum = 66;BA.debugLine="ImageView.SetBitmap(Bmp)"; +_imageview.SetBitmap((android.graphics.Bitmap)(_bmp.getObject())); + //BA.debugLineNum = 67;BA.debugLine="Dim iiv As ImageView = ImageView"; +_iiv = new anywheresoftware.b4a.objects.ImageViewWrapper(); +_iiv = (anywheresoftware.b4a.objects.ImageViewWrapper) anywheresoftware.b4a.AbsObjectWrapper.ConvertToWrapper(new anywheresoftware.b4a.objects.ImageViewWrapper(), (android.widget.ImageView)(_imageview.getObject())); + //BA.debugLineNum = 69;BA.debugLine="iiv.Gravity = Gravity.FILL"; +_iiv.setGravity(anywheresoftware.b4a.keywords.Common.Gravity.FILL); + //BA.debugLineNum = 75;BA.debugLine="End Sub"; +return ""; +} +public static String _settextorcsbuildertolabel(anywheresoftware.b4a.BA _ba,anywheresoftware.b4a.objects.B4XViewWrapper _xlbl,Object _text) throws Exception{ + //BA.debugLineNum = 50;BA.debugLine="Public Sub SetTextOrCSBuilderToLabel(xlbl As B4XVi"; + //BA.debugLineNum = 52;BA.debugLine="xlbl.Text = Text"; +_xlbl.setText(BA.ObjectToCharSequence(_text)); + //BA.debugLineNum = 62;BA.debugLine="End Sub"; +return ""; +} +} diff --git a/B4A/Starter.bas b/B4A/Starter.bas index c6f0f68..3cf7524 100644 --- a/B4A/Starter.bas +++ b/B4A/Starter.bas @@ -91,7 +91,18 @@ Sub ENVIA_ULTIMA_GPS cmd.Name = "UPDATE_MEDI_ACTUAL2_GPS" If B4XPages.MainPage.lat_gps.Length < 15 Then B4XPages.MainPage.lat_gps = B4XPages.MainPage.lat_gps&"0" 'isaacPrueba - cmd.Parameters = Array As Object(B4XPages.MainPage.montoActual, B4XPages.MainPage.clientestotal, B4XPages.MainPage.clientesventa,B4XPages.MainPage.clientesvisitados,B4XPages.MainPage.lat_gps,B4XPages.MainPage.lon_gps,B4XPages.MainPage.batt,0, 0, 0,B4XPages.MainPage.ALMACEN,B4XPages.MainPage.rutapreventa) + Private cursor As Cursor = B4XPages.MainPage.skmt.ExecQuery("SELECT Sum(montoVentav) AS MONTO_VENTA FROM VENTA_NO_VENTA") + cursor.Position = 0 + Private cursor2 As Cursor = B4XPages.MainPage.skmt.ExecQuery("SELECT COUNT (*) AS CUENTA_TODO FROM VENTA_NO_VENTA") + cursor2.Position = 0 + Private cursor3 As Cursor = B4XPages.MainPage.skmt.ExecQuery("SELECT COUNT (*) AS CUENTA_VENTA FROM VENTA_NO_VENTA WHERE montoVentaV <> 0") + cursor3.Position = 0 + + cmd.Parameters = Array As String(cursor.GetString("MONTO_VENTA"), cursor2.GetString("CUENTA_TODO"), cursor3.GetString("CUENTA_VENTA"),B4XPages.MainPage.clientesvisitados,B4XPages.MainPage.lat_gps,B4XPages.MainPage.lon_gps,B4XPages.MainPage.batt,0, 0, 0,B4XPages.MainPage.ALMACEN,B4XPages.MainPage.rutapreventa) + cursor.Close + cursor2.Close + cursor3.Close +' cmd.Parameters = Array As Object(B4XPages.MainPage.montoActual, B4XPages.MainPage.clientestotal, B4XPages.MainPage.clientesventa,B4XPages.MainPage.clientesvisitados,B4XPages.MainPage.lat_gps,B4XPages.MainPage.lon_gps,B4XPages.MainPage.batt,0, 0, 0,B4XPages.MainPage.ALMACEN,B4XPages.MainPage.rutapreventa) ' If logger Then Log($"montoActual: ${B4XPages.MainPage.montoActual}, cTotal: ${B4XPages.MainPage.clientestotal}, cVenta: ${B4XPages.MainPage.clientesventa}, cVisitados: ${B4XPages.MainPage.clientesvisitados}, ${B4XPages.MainPage.lat_gps}, ${B4XPages.MainPage.lon_gps}, Batt: ${B4XPages.MainPage.batt}, 0, 0, 0, Almacen: ${B4XPages.MainPage.ALMACEN}, Ruta: ${B4XPages.MainPage.rutapreventa}"$) reqManager.ExecuteCommand(cmd, "inst_visitas") skmt.ExecNonQuery2("Update cat_variables set CAT_VA_VALOR = ? WHERE CAT_VA_DESCRIPCION = ?" , Array As String(DateTime.Time(DateTime.Now),"HoraIngreso")) diff --git a/B4A/medicomed.b4a b/B4A/medicomed.b4a index 81f4692..b5c1085 100644 --- a/B4A/medicomed.b4a +++ b/B4A/medicomed.b4a @@ -759,7 +759,7 @@ Version=12.8 #Region Project Attributes #ApplicationLabel: Medicomed #VersionCode: 1 - #VersionName: 5.10.24 + #VersionName: 4.11.02 'SupportedOrientations possible values: unspecified, landscape or portrait. #SupportedOrientations: portrait #CanInstallToExternalStorage: False diff --git a/B4A/medicomed.b4a.meta b/B4A/medicomed.b4a.meta index 558efa4..77fa4c7 100644 --- a/B4A/medicomed.b4a.meta +++ b/B4A/medicomed.b4a.meta @@ -67,6 +67,6 @@ ModuleClosedNodes6= ModuleClosedNodes7= ModuleClosedNodes8= ModuleClosedNodes9= -NavigationStack=Diseñador Visual,proditem.bal,-100,1,Diseñador Visual,nota.bal,-100,1,Diseñador Visual,celltitle.bal,-100,1,C_TicketsDia,b_noventa_Click,165,1,C_Cliente,MODS,0,0,C_Cliente,b_can_monto_venta_Click,1086,1,C_Cliente,b_clienteVenta_Click,1024,0,Diseñador Visual,cliente.bal,-100,4,C_Cliente,b_clinteSinVenta_Click,1056,0,C_Cliente,b_gu_monto_venta_Click,1057,0 +NavigationStack=C_Cliente,b_clinteSinVenta_Click,1035,0,C_Cliente,b_gu_monto_venta_Click,1064,0,C_Principal,Class_Globals,117,0,C_Principal,B4XPage_Appear,474,0,Diseñador Visual,principal.bal,-100,2,Diseñador Visual,cliente.bal,-100,3,C_Principal,resdia_Click,2113,6,Diseñador Visual,resdia.bal,-100,6,C_NuevoCliente,B4XPage_Appear,83,0,Subs,ventaNoVenta,1371,0,B4XMainPage,B4XPage_Created,152,0 SelectedBuild=0 -VisibleModules=2,20,12,5,7,4,8,9,21,15 +VisibleModules=2,20,12,5,7,4,8,9,21,15,10